Changeset 28801


Ignore:
Timestamp:
01/30/14 15:09:31 (7 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 edited

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.
Note: See TracChangeset for help on using the changeset viewer.