Changeset 28801

Show
Ignore:
Timestamp:
30.01.2014 15:09:31 (6 years ago)
Author:
ak19
Message:

New mode to buildcol.pl added called 'extra'. This restricts the build to only sending/processing the archives content by the orthogonal indexes

Location:
main/trunk/greenstone2
Files:
3 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/bin/script/buildcol.pl

    r27634 r28801  
    102102        'desc' => "{buildcol.mode.build_index}" }, 
    103103      { 'name' => "infodb", 
    104         'desc' => "{buildcol.mode.infodb}" } ]; 
     104        'desc' => "{buildcol.mode.infodb}" }, 
     105      { 'name' => "extra", 
     106        'desc' => "{buildcol.mode.extra}" } ]; 
    105107 
    106108my $sec_index_list = 
  • main/trunk/greenstone2/perllib/buildcolutils.pm

    r28566 r28801  
    2727 
    2828package buildcolutils; 
     29 
     30#use strict;  
     31#no strict 'refs'; 
    2932 
    3033use File::Basename; 
     
    329332  } 
    330333 
    331   if ($self->{'mode'} !~ /^(all|compress_text|build_index|infodb)$/) 
    332   { 
    333     if (defined $collectcfg->{'mode'} && $collectcfg->{'mode'} =~ /^(all|compress_text|build_index|infodb)$/) 
     334  if ($self->{'mode'} !~ /^(all|compress_text|build_index|infodb|extra)$/) 
     335  { 
     336    if (defined $collectcfg->{'mode'} && $collectcfg->{'mode'} =~ /^(all|compress_text|build_index|infodb|extra)$/) 
    334337    { 
    335338      $self->{'mode'} = $collectcfg->{'mode'}; 
     
    556559  my @buildertype_list = ($buildertype); 
    557560 
     561  my $mode = $self->{'mode'}; 
     562 
     563  if ($mode eq "extra") { 
     564      # knock out the main builder type, by reseting the lists to be empty 
     565      @builderdir_list = (); 
     566      @buildertype_list = (); 
     567  } 
     568 
    558569  if (defined $orthogonalbuildtypes) 
    559570  { 
     
    639650 
    640651  # Run the requested passes 
    641   if ($mode =~ /^all$/i) 
     652  if ($mode =~ /^(all|extra)$/i) 
    642653  { 
    643654    # 'map' modifies the elements of the original array, so calling 
  • main/trunk/greenstone2/perllib/strings.properties

    r28763 r28801  
    116116buildcol.mode.compress_text:Just compress the text. 
    117117buildcol.mode.infodb:Just build the metadata database. 
     118buildcol.mode.extra:Skip the main indexing stages, and just build the extra (orthogonal) passes 
    118119 
    119120buildcol.no_default_images:Default images will not be generated.