From c6beb095dccd6ef834e4e17409133bdf7f6743ca Mon Sep 17 00:00:00 2001 From: Richard W.M. Jones Date: Feb 13 2009 16:37:59 +0000 Subject: Change to use Berkeley DB for storage. --- diff --git a/crossreport.pl b/crossreport.pl index 7cc92a6..0f3ceaa 100755 --- a/crossreport.pl +++ b/crossreport.pl @@ -28,7 +28,7 @@ binmode STDOUT, ":utf8"; use Getopt::Long; use Pod::Usage; -use GDBM_File; +use DB_File; use POSIX qw(strftime floor); =pod @@ -118,7 +118,7 @@ sub get_db "/usr/share/crossreport/crossreport.db", "crossreport.db") { if (-f $_) { - tie %symbols, "GDBM_File", $_, &GDBM_READER, 0; + tie %symbols, "DB_File", $_, O_RDONLY, 0666, $DB_HASH; return; } } diff --git a/mingw32-crossreport.spec b/mingw32-crossreport.spec index f39cfae..0851131 100644 --- a/mingw32-crossreport.spec +++ b/mingw32-crossreport.spec @@ -1,5 +1,5 @@ Name: mingw32-crossreport -Version: 5 +Version: 6 Release: 1%{?dist} Summary: Analysis tool to help cross-compilation to Windows @@ -82,6 +82,9 @@ rm -rf $RPM_BUILD_ROOT %changelog +* Fri Feb 13 2009 Richard W.M. Jones - 6-1 +- Change to use Berkeley DB for storage. + * Fri Feb 13 2009 Richard W.M. Jones - 5-1 - Requires binutils, for nm and c++filt (thanks Richard Hughes). diff --git a/sources b/sources index 115c9db..4ecf759 100644 --- a/sources +++ b/sources @@ -1 +1 @@ -ecdbc678758bdde66d01ec2d657bbb8f crossreport.db +b4046143dc92c5f13b0cc6b5ab1541dd crossreport.db diff --git a/update-crossreport-db.pl b/update-crossreport-db.pl index 628510c..afd128b 100755 --- a/update-crossreport-db.pl +++ b/update-crossreport-db.pl @@ -21,12 +21,12 @@ use strict; -use GDBM_File; +use DB_File; # Map of symbol name -> RPM owner. my %symbols; my $symdbm = - tie %symbols, "GDBM_File", "crossreport.db", &GDBM_NEWDB, 0666; + tie %symbols, "DB_File", "crossreport.db", O_CREAT|O_RDWR, 0666, $DB_HASH; main (); $symbols{__crossreport_time} = time (); $symdbm->sync ();