<?php
/* Function List:
 * addDefaultConfig(Array of meta information, array of layout information)
 *      Return Value: -1 on error, else 0.
 *      Checks the config information to be sure we have the minimum
 *      required information.  And adds in defaults for anything that needs
 *      it.
 * getFilename(CGI Path info value)
 *      Return Value: '*' on error, else the filename the script is to
 *      operate on.
 *      Gets the name of the file the script is going to operate on from the
 *      CGI path_info variable.  Check to make sure it's a valid file for
 *      this script.
 * trimArray(array value to remove whitespace from, key to this array element)
 *      Used by an arrayWalk in parseConfigLine to remove whitespace from
 *      around config variables.
 * parseConfigLine(a configuration line)
 *      Return values: * on error, else an array of config variables
 *      Parses a config line into an array of config values.
 * printCommonTop(Title, Background colour or file, colour of text)
 *      prints the head and body tag since those are common to all layouts.
 * printCommonBottom(Author of the work, Date of copyright)
 *      Print the Copyright information that is common to all layouts.
 * printPoemTop(Title, Background colour or file, colour of text, colour of
 *      rectangle the poem is printed on)
 *      Prints the upper part of a poem layout.
 * printPoemBottom(Author, Copyright Date, colour of the bottom rectangle)
 *      Prints the bottom of the poem layout.
 * printStoryTop(Title, Background colour or file, colour of text,
 *      colour under the text, colour of the border, colour of the left
 *      margin)
 *      Prints the upper part of a story layout.
 * printStoryBottom(Author, Copyright date, border colour)
 *      Prints the lower part of a story layout.
 */

/* Defaults for configuration stuff that couldn't be found in the file. */
define ("COPYRIGHT_DATE","need date");
define ("AUTHOR","Anonymous Badger");
define ("POEMV1RECTANGLEFG","faa5df");
define ("POEMV1RECTANGLEBG","b8c0c0");
define ("POEMV1TEXTCOLOUR","000000");
define ("POEMV1BACKGROUND","ffffff");
define ("STORYV1MARGINCOLOUR","88AAE1");
define ("STORYV1BORDER","000000");
define ("STORYV1BACKGROUND","d2c6b5");
define ("STORYV1TEXTBACKGROUND","ffffff");
define ("STORYV1TEXTCOLOUR","000000");

/* Specify the directory hierarchy we're working with so we can specify a
 * base href.
 */
define ("BASE_DIR","http://prtr-13.ucsc.edu/~badger/arts/");

/*
 * Checks the config information to be sure we have the minimum
 * required information.  And adds in defaults for anything that needs
 * it.
 */
function addDefaultConfig(&$meta_info,&$layout_info) {
 /* If we don't have a title we can't continue. */
 if (!$meta_info[0]) {
    return -1;
 }
 /* Make sure each type of layout has a complete set of values. */
 switch ($layout_info[0]) {
 case "poem v1": if (!$layout_info[1]) { $layout_info[1]=POEMV1RECTANGLEFG; }
                 if (!$layout_info[2]) { $layout_info[2]=POEMV1RECTANGLEBG; }
                 if (!$layout_info[3]) { $layout_info[3]=POEMV1TEXTCOLOUR; }
                 if (!$layout_info[4]) { $layout_info[4]=POEMV1BACKGROUND; }
                 break;
 case "story v1":if (!$layout_info[1]) { $layout_info[1]=STORYV1MARGINCOLOUR; }
                 if (!$layout_info[2]) { $layout_info[2]=STORYV1BORDER; }
                 if (!$layout_info[3]) { $layout_info[3]=STORYV1BACKGROUND; }
                 if (!$layout_info[4]) { $layout_info[4]=STORYV1TEXTBACKGROUND; }
                 if (!$layout_info[5]) { $layout_info[5]=STORYV1TEXTCOLOUR; }
                 break;
 default: /* If we didn't get a value, then the layout type is not one that
           * we know how to deal with.
           */
           return -1;
 }
 /* Add default copyright date. */
 if (!$meta_info[1]) {
    $meta_info[1]=date("Y",time());
 }
 /* Add default author */
 if (!$meta_info[2]) {
    $meta_info[2]=AUTHOR;
 }
 return 0;
}

/*
 * Gets the name of the file the script is going to operate on from the
 * CGI path_info variable.  Check to make sure it's a valid file for
 * this script.
 */
function getFilename($path_info) {
 /* Get the filename from the path_info variable */
 if (eregi("^/(([a-z0-9._+-]+/)*[a-z0-9._+-]+)$",$path_info,$regs)) {
    $filename=$regs[1];
 } else {
    print ("$path_info contains characters I don't allow in filenames.<br>\n");
    return '*';
 }

 /* Check that the filename is valid: */
 if (ereg("^simplicity/",$filename)) {
     print ("Cannot read any file in the simplicity script directory<br>\n");
     return '*';
 }
 if (ereg("\.[^/]+$",$filename)) {
     print ("$filename has an extension which is not allowed.<br>\n");
     return '*';
 }
 /* Save directory info on the file: */
 $file_dir=BASE_DIR.dirname($filename)."/";
 /* Add the directory path for our filename: */
 $filename="../".$filename;

 /* Make sure the file exists and is not a directory. */
 if (!file_exists($filename)) {
     print ("$filename does not exist.<br>\n");
     return '*';
 }
 if (is_dir($filename)) {
     print ("$filename is a directory.<br>\n");
     return '*';
 }
 return array($file_dir, $filename);
}

/* Used by an arrayWalk in parseConfigLine to remove whitespace from around
 * config variables.
 */
function trimArray(&$value, $key) {
 $value=trim ($value);
}

/*
 * Parses a config line into an array of config values.
 */
function parseConfigLine($line) {
 /* Pull the config information into an array */
 if (ereg ("<!--(.*)\s*-->",$line,$regs)) {
     $info=explode(",", $regs[1], 6);
 } else {
     print ("Missing meta information line.<br>\n");
     return '*';
 }
 /* Trim the whitespace from all the elemnts in the array */
 array_walk($info,'trimArray');
 return $info;
}
/*
 * prints the head and body tag since those are common to all layouts.
 */
function printCommonTop($title, $background, $textcolour, $base_dir) {
?>
<html>
<head>
<?php
echo "<base href=$base_dir>\n";
echo "<title>$title</title>\n";
?>
</head>

<?php
/* If background contains an RGB triple use the bgcolor tag otherwise treat
 * it as a background file.
 */
 if (eregi("[0-9a-f]{6}",$background)) {
     echo "<body bgcolor=$background text=$textcolour>\n";
 } else {
     echo "<body background=$background text=$textcolour>\n";
 }
return 0;
}

/*
 * Print the Copyright information that is common to all layouts.
 */
function printCommonBottom($author, $copyrightdate) {
?>
<p>
<hr width=76% noshade align=center>
&#169; <?php echo "$author $copyrightdate\n"; ?>
<br>
<spacer type=block width=7 height=7>
</p>
<?php
}

/*
 * Print the top of the poem layout
 */
function printPoemTop($title, $background, $textcolour, $base_dir,
                      $top_colour) {
 printCommonTop($title, $background, $textcolour, $base_dir);
?>
<table col=5 border=0 cellspacing=0 cellpadding=3>
<tr><td>
<?php echo("</td><td bgcolor=\"$top_colour\">"); ?>
<spacer type=block width="7" height="7">
<?php echo("</td><td bgcolor=\"$top_colour\">"); ?>
<spacer type=block width="7" height="7">
</td><td>
<spacer type=block width="7" height="7">
</td><td>
<spacer type=block width="7" height="7">
</td></tr>

<tr><td>
<spacer type=block width="7" height="7">
<?php echo("</td><td bgcolor=\"$top_colour\">"); ?>
<spacer type=block width="7" height="7">
<?php echo("</td><td bgcolor=\"$top_colour\">");
echo "<h3><u>$title</u></h3>";
return 0;
} 

/*
 * Prints the bottom of a poem layout.
 */
function printPoemBottom($author, $copyrightdate, $bottom_colour) {
 printCommonBottom($author, $copyrightdate);
 echo("</td><td bgcolor=\"$bottom_colour\">");
?>
<spacer type=block width="7" height="7">
</td><td>
<spacer type=block width="7" height="7">
</td></tr>

<tr><td>
<spacer type=block width="7" height="7">
</td><td>
<spacer type=block width="7" height="7">
<?php echo("</td><td bgcolor=\"$bottom_colour\">"); ?>
<spacer type=block width="7" height="7">
<?php echo("</td><td bgcolor=\"$bottom_colour\">"); ?>
<spacer type=block width="7" height="7">
</td></tr>
</table>
</body>
</html>
<?php
}

/*
 * Print the top of a poem layout
 */
function printStoryTop($title, $background, $textcolour, $base_dir,
                       $textbackground, $border, $margin_colour) {
 printCommonTop($title, $background, $textcolour, $base_dir);
?>
<table border=0 cellpadding=0 cellspacing=0 bgcolor=ffffff>
<tr><td>
<table border=0 cellspacing=2 cellpadding=2>
<?php echo "<tr><td colspan=2 bgcolor=$border>\n"; ?>
<spacer type=block width=17 height=17>
<?php echo "</td><td rowspan=2 bgcolor=$border>\n"; ?>
<spacer type=block width=17 height=17>
</td></tr>

<?php echo "<tr><td rowspan=2 bgcolor=$margin_colour>\n"; ?>
<spacer type=block width=17 height=17>
<?php echo "</td><td bgcolor=$textbackground>\n"; ?>
<?php
echo "<h3><u>$title</u></h3>";
}

/*
 * Prints the lower part of a story layout.
 */
function printStoryBottom($author, $copyrightdate, $border) {
 printCommonBottom($author, $copyrightdate);
?>
</td></tr>
<?php echo "<tr><td colspan=2 bgcolor=$border>\n"; ?>
<spacer type=block width=17 height=17>
</td></tr>
</table>
</td></tr></table>
</body>
</html>
<?php
}
?>