Changeset 18660 for gsdl/trunk/bin/script/import.pl

Timestamp:

2009-03-11T13:19:22+13:00 (15 years ago)

Author:

kjdon

Message:

we now use gdb instead of ldb/bdb for collection and archives-inf databases. We have a rename step to rename any legacy databases

File:

• gsdl/trunk/bin/script/import.pl (modified) (1 diff)

gsdl/trunk/bin/script/import.pl

@@ -529 +529 @@
     # read the archive information file
 ##  $arcinfo_doc_filename = &util::filename_cat ($archivedir, "archives.inf");
-
-    my $db_ext = &util::is_little_endian() ? ".ldb" : ".bdb";
-    my $doc_db = "archiveinf-doc$db_ext";
-    my $src_db = "archiveinf-src$db_ext";
-    $arcinfo_doc_filename = &util::filename_cat ($archivedir, $doc_db);
-    $arcinfo_src_filename = &util::filename_cat ($archivedir, $src_db);
-    
+    
+    $arcinfo_doc_filename = &util::filename_cat ($archivedir, "archiveinf-doc");
+    &util::rename_gdbm_file($arcinfo_doc_filename); # ensures gdb
+    $arcinfo_doc_filename .= ".gdb";
+    
+    $arcinfo_src_filename = &util::filename_cat ($archivedir, "archiveinf-src");   
+    &util::rename_gdbm_file($arcinfo_src_filename); # ensures gdb
+    $arcinfo_src_filename .= ".gdb";
+
+                            
     $archive_info = new arcinfo ();
     $archive_info->load_info ($arcinfo_doc_filename);