Changeset 30517 for main/trunk/greenstone2/perllib/DBDrivers

Timestamp:

2016-05-09T16:53:48+12:00 (8 years ago)

Author:

ak19

Message:

Fixing incremental-rebuild when the database is gdbm. At this point (see buildcolutils.pm), the code needs to deactivate the collection before calling make_infodatabase(), since otherwise there's a lock on the gdbm database which prevents successful incremental-rebuild and activation.

Location:

main/trunk/greenstone2/perllib/DBDrivers

Files:

• BaseDBDriver.pm (modified) (2 diffs)
• JDBM.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/DBDrivers/BaseDBDriver.pm

@@ -57 +57 @@
     $self->{'supports_persistentconnection'} = 0;
     $self->{'supports_rss'} = 0;
+    $self->{'supports_concurrent_read_and_write'} = 0;
     $self->{'supports_set'} = 0;
     $self->{'write_only'} = 0; # Some drivers are one way - i.e. STDOUTXML
@@ -383 +384 @@
 
 
+## @function supportsConcurrentReadAndWrite(void)  => integer
+#
+sub supportsConcurrentReadAndWrite 
+{
+    my $self = shift(@_);
+    return $self->{'supports_concurrent_read_and_write'};
+}
+## supportsConcurrentReadAndWrite(void) => integer ##
+
+
 ## @function supportsSet(void) => integer
 #

main/trunk/greenstone2/perllib/DBDrivers/JDBM.pm

@@ -50 +50 @@
     my $self = DBDrivers::70HyphenFormat->new(@_);
     $self->{'default_file_extension'} = 'jdb';
+    $self->{'supports_concurrent_read_and_write'} = 1;
 
     # Executables need a little extra work since we are using Java