View | Details | Raw Unified | Return to bug 7246
Collapse All | Expand All

(-)a/misc/migration_tools/rebuild_zebra.pl (-5 / +25 lines)
Lines 34-39 my $want_help; Link Here
34
my $as_xml;
34
my $as_xml;
35
my $process_zebraqueue;
35
my $process_zebraqueue;
36
my $do_not_clear_zebraqueue;
36
my $do_not_clear_zebraqueue;
37
my $length;
38
my $where;
39
my $offset;
37
my $verbose_logging = 0;
40
my $verbose_logging = 0;
38
my $zebraidx_log_opt = " -v none,fatal,warn ";
41
my $zebraidx_log_opt = " -v none,fatal,warn ";
39
my $result = GetOptions(
42
my $result = GetOptions(
Lines 51-57 my $result = GetOptions( Link Here
51
	'x'				=> \$as_xml,
54
	'x'				=> \$as_xml,
52
    'y'             => \$do_not_clear_zebraqueue,
55
    'y'             => \$do_not_clear_zebraqueue,
53
    'z'             => \$process_zebraqueue,
56
    'z'             => \$process_zebraqueue,
54
    'v+'            => \$verbose_logging,
57
    'where:s'        => \$where,
58
    'length:i'        => \$length,
59
    'offset:i'      => \$offset,
60
    'v+'             => \$verbose_logging,
55
);
61
);
56
62
57
63
Lines 294-306 sub select_all_records { Link Here
294
}
300
}
295
301
296
sub select_all_authorities {
302
sub select_all_authorities {
297
    my $sth = $dbh->prepare("SELECT authid FROM auth_header");
303
    my $strsth=qq{SELECT authid FROM auth_header};
304
    $strsth.=qq{ WHERE $where } if ($where);
305
    $strsth.=qq{ LIMIT $length } if ($length && !$offset);
306
    $strsth.=qq{ LIMIT $offset,$length } if ($length && $offset);
307
    my $sth = $dbh->prepare($strsth);
298
    $sth->execute();
308
    $sth->execute();
299
    return $sth;
309
    return $sth;
300
}
310
}
301
311
302
sub select_all_biblios {
312
sub select_all_biblios {
303
    my $sth = $dbh->prepare("SELECT biblionumber FROM biblioitems ORDER BY biblionumber");
313
    my $strsth = qq{ SELECT biblionumber FROM biblioitems };
314
    $strsth.=qq{ WHERE $where } if ($where);
315
    $strsth.=qq{ LIMIT $length } if ($length && !$offset);
316
    $strsth.=qq{ LIMIT $offset,$length } if ($offset);
317
    my $sth = $dbh->prepare($strsth);
304
    $sth->execute();
318
    $sth->execute();
305
    return $sth;
319
    return $sth;
306
}
320
}
Lines 639-645 Parameters: Link Here
639
                            warnings and errors from the indexing are shown.
653
                            warnings and errors from the indexing are shown.
640
                            Use log level 2 (-v -v) to include all Zebra logs.
654
                            Use log level 2 (-v -v) to include all Zebra logs.
641
655
642
    -munge-config           Deprecated option to try
656
    --length   1234         how many biblio you want to export
657
    --offset 1243           offset you want to start to
658
                                example: --offset 500 --length=500 will result in a LIMIT 500,1000 (exporting 1000 records, starting by the 500th one)
659
                                note that the numbers are NOT related to biblionumber, that's the intended behaviour.
660
    --where                 let you specify a WHERE query, like itemtype='BOOK'
661
                            or something like that
662
663
    --munge-config          Deprecated option to try
643
                            to fix Zebra config files.
664
                            to fix Zebra config files.
644
    --help or -h            show this message.
665
    --help or -h            show this message.
645
_USAGE_
666
_USAGE_
646
- 

Return to bug 7246