#!/usr/local/bin/perl -w

# the config file for DJB's new salami. Unlike Rob Hartill's,
# this is actual perl code and most of the names are the same as
# the one for the database forms access "config.ph".
# At a pinch you could copy one of those and hope ...
# Actually you would have to add @sortfields, that is new.
# But perhaps it will be added to the forms access soon.
# and here, field numbers always start at 0, not 1, oh well.

# The filename for the list of accession (sp?) numbers you want
# for the lecture. If this is a normal salami run, comment
# this line out!
#$ACC_FILENAME="numbers";
# The field number for the acc no. Remember, count starting at 0.
#$ACC_FIELDNO=0;

# the database file we want sliced
$DATABASE_FILENAME="/raid2/newimages/htdocs/bycountry/italy/rome/popolo/database/original/db";

# the field seperator character in the database
$FIELD_SEPARATOR=",";


# the directory to put the slices in
$directory=".";

# fields to sort by, starting at the most important, to the least
# important. Give the field number (starting at 0) preceded by an
# optional control character. n means numeric field. y means year
# or century field (it counts BC as negative). d means dictionary
# order (ignore case). no control letter gets you ascii order.
# the first sortfield will also get a master ready-index.
@sortfields=("d0","d1", "d2", "d5");

# number of rows of thumbgifs per page
$MAX_ROWS=3;
# number of thumbnails side by side
$THUMBS_ACCROSS=3;

# number of entries on each index page.
$indexlength=16;

# header for index pages
$indexheader="<h2>The Popolo Project</h2>";

# running header for indexed pages
$runningheader="<TABLE BORDER=1>";
$runningfooter="</TABLE>\n";

# the format to display the thumbnail gifs with.
# FIELD[n] gets the n'th field from the database, starting at 0. <== NB
# FIELD[n/xyz] same, but if the field is empty, xyz instead.
# AUTODIR[n] gets the directory number that would go with FIELD[n]
# using the Official Art History Laserdisk Standard Number Scheme
# BEFORE_THUMBS must have a <TR> and AFTER_THUMBS must have </TR>
# You can add other stuff such as blank lines as well.
$BEFORE_THUMBS="<TR><TD ALIGN=CENTER COLSPAN=$THUMBS_ACCROSS>".
		"<B>The Popolo Project</B></TD></TR><TR>\n";
$THUMB_FORMAT=
"<TD ALIGN=CENTER><TABLE BORDER=1>\n".
  "<TR>".
# This is the inline thumbnail gif.
    "<TD><IMG SRC=\"/htdocs/bycountry/italy/rome/popolo/pics/AUTODIR[8]/FIELD[8].GIF\"></TD>\n".
    "<TD>".
# Hotlink to zoom
"<A HREF=\"https://rubens.anu.edu.au/cgi-bin/david/mkmap/".
"htdocs/bycountry/italy/rome/popolo/pics/AUTODIR[8]/FIELD[8].JPG\">\n".
"ZOOM</A><BR>\n".
# Hotlink to the full size JPG image.
"<A HREF=\"/htdocs/bycountry/italy/rome/popolo/pics/AUTODIR[8]/FIELD[8].JPG\">BIG</A><BR>\n".
# Hotlink to the half size JPG image, created on the fly by jreduce .pl .
#"<A HREF=\"/cgi-bin/jreduce.pl/new/classics.museum/AUTODIR[10]/FIELD[10].JPG/2\">1/2</A><BR>\n".
# 1/4 size. Leave this out unless the full-size is pretty big.
#"<A HREF=\"/cgi-bin/jreduce.pl/new/classics.museum/AUTODIR[10]/FIELD[10].JPG/4\">1/4</A><BR>\n".
# 1/8 size. ditto.
#"<A HREF=\"/cgi-bin/jreduce.pl/new/classics.museum/AUTODIR[10]/FIELD[10].JPG/8\">1/8</A><BR>\n".
    "</TD>\n".
  "</TR>".
  "<TR><TD COLSPAN=2>".
# Interesting entries from the database file.
"<B>FIELD[0]<BR>Location: </b> FIELD[1]<BR><B> Patron: </b>FIELD[2] <BR>FIELD[4]<br> <B>Date:</b> FIELD[5]<BR><B>Subject: </b> FIELD[7] <b>Image: </b>FIELD[8]</TD>".
"</TR></TABLE></TD>\n";

# a fancy example. Adds a blank space after each row. replace <BR>
# with the caption of your choice!
$AFTER_THUMBS="</TR><TR><TD COLSPAN=$THUMBS_ACCROSS><BR></TD></TR>\n";

#$AFTER_THUMBS="</TR>\n";

# With modern formats this should be empty. Used to be used for the
# data lines that were seperate to the thumbnails.
$OUTPUT_FORMAT="";

# so require will succeed:
1;