Changeset 31190 for main/trunk/greenstone2/perllib/basebuilder.pm

Timestamp:

2016-12-09T21:37:52+13:00 (7 years ago)

Author:

ak19

Message:

First major commit to do with the new oaiinfo db that keeps track of which oids are deleted. Still need to fix up issue with the new remove and rename subroutines of dbutil's jdbm not being called to clean up *.lg log file associated with main db file. Still need to clean up unused methods in oaiinfo, remove debugging and test agains GS3 incr-build-with-manifest tutorial. (Previous 3 commits were commits, not all related.)

File:

• main/trunk/greenstone2/perllib/basebuilder.pm (modified) (3 diffs)

main/trunk/greenstone2/perllib/basebuilder.pm

@@ -29 +29 @@
 no strict 'refs'; # allow filehandles to be variables and viceversa
 
+use arcinfo;
 use classify;
 use cfgread;
 use colcfg;
 use dbutil;
+use oaiinfo;
 use plugin;
 use util;
@@ -92 +94 @@
 
     my $colcfgname = &colcfg::get_collect_cfg_name($outhandle, $gs_mode);
+    $self->{'colcfgname'} = $colcfgname;
     $self->{'collect_cfg'} = &colcfg::read_collection_cfg ($colcfgname, $gs_mode);
 
@@ -169 +172 @@
     }
 
+
+    # Prepare to work with the <collection>/etc/oai-inf.<db> that keeps track
+    # of the OAI identifiers with their time stamps and deleted status.
+    #
+    # At this stage of working with the oai info db, we don't care whether we have a
+    # manifest or are otherwise incremental, or whether we're doing removeold (full rebuild).
+    # Because we've already dealt with that during the import stage. From here on, we pretend
+    # we're incremental, since the oai info db should just do what archiveinfo contains.
+    # This is because "building is always incremental" where oai info db is concerned.
+    
+    my $archivedir = $self->{'source_dir'};
+    my $oai_info = new oaiinfo($self->{'colcfgname'}, $self->{'collect_cfg'}->{'infodbtype'});    
+    $oai_info->building_stage_before_indexing($archivedir);
+
+
     # check incremental against whether builder can cope or not.
     if ($self->{'incremental'} && !$self->is_incremental_capable()) {