<?php

# Web Helpers - updated for bus future choice example
# There are a number uf unused helpers in here as would be expected

/* The following routines are for cleaning up
form inputs, and for preparing text for web
display - dealing with characters like ' \ <
> and so on which the maverick user may enter */

function ss($summat) {
        return stripslashes(trim($summat));
        }
function web($summat) {
        return htmlspecialchars($summat);
        }

/* Validators for certain input types; it is
arguable whether these should be in the web
helper or business logic */

function chek_an_alpha($fname) {
        global $error;
        $retstr = "";
        if (! ereg('[[:alpha:]]',$_POST[$fname])) {
                $error = 1;
                $retstr = "Must contain a letter";
                }
        return $retstr;
        }

function chek_a_phone($fname) {
        global $error;
        $retstr = "";
        if (! ereg('[[:digit:]]',$_POST[$fname])) {
                $error = 1;
                $retstr = "Must contain a digit";
                }
        return $retstr;
        }

function chek_an_integer($fname,$min,$max) {
        global $error;
        $retstr = "";
        if (! ereg('^[[:digit:]]+$',$_POST[$fname])) {
                $error = 1;
                # $retstr = "Must be a whole number";
        } else { if ($_POST[$fname] < $min or $_POST[$fname] > $max) {
                $error = 1;
                # $retstr = "Must be in range $min to $max";
        }}

        return $retstr;
        }

function chek_a_postcode($fname) {
        global $error;
        $retstr = "";
        if (! ereg('[[:alpha:]][[:digit:]]',$_POST[$fname])) {
                $error = 1;
                $retstr = "Must contain a letter followed by a digit";
                }
        return $retstr;
        }

function chek_an_email($fname) {
        global $error;
        $retstr = "";
        if (! ereg('[[:graph:]]@[[:graph:]]',$_POST[$fname])) {
                $error = 1;
                $retstr = "No @ - not an email";
                }
        return $retstr;
        }

/* Form creation from an array of arrays that includes the
specification */

function mkeform($fields) {
        $form = "<p><form method=POST><table border=0>";
        foreach ($fields as $item) {
                $form .= makeformrow($item);
                }
        $form .= '<tr><td>&nbsp;</td><td style="width:195px"><input type=submit></td></tr>';
        $form .= "</table></form></p>";
        return $form;
}
function makeformrow($stuff) {
        if ($stuff[3]) {
                $errstring = "<br><font color=red>$stuff[3]</font>";
        } else {
                $errstring = "";
        }
        if ($stuff[size]) {
                $size = "size=$stuff[size]";
                }
        $string = "<tr><td>".htmlspecialchars($stuff[1]).
                "$errstring</td>";
        // Added - trust text supplier!
        $string = "<tr><td>".$stuff[1].
                "$errstring</td>";

        if ($stuff[type] == "pulldown") {
                $string .= "<td><select name='". $stuff[0]."'>";
                if (is_array($stuff[options])) {
                foreach ($stuff[options] as $menuitem) {
                        $string .= "<option value=$menuitem[0]>".
                                $menuitem[1];
                        }
                } else {
                $options = explode("|",$stuff[options]);
                foreach ($options as $maybe) {
                        $string .= "<option value=$maybe>$maybe";
                        }
                }
                $string .= "</select></td></tr>";
        } elseif ($stuff[type] == "label") {
                $string .= "<td>$stuff[2]</td></tr>";
        } elseif ($stuff[type] == "pips") {
                $string .= "<td>";
                if (is_array($stuff[options])) {
                foreach ($stuff[options] as $menuitem) {
                        $chk = ($stuff[2] == $menuitem) ? " CHECKED" : "";
                        $string .= '<input type="radio" name="'. $stuff[0] .'" value="'
                                .$menuitem .'"' .$chk . '>';
                        }
                } else {
                $options = explode("|",$stuff[options]);
                foreach ($options as $menuitem) {
                        $chk = ($stuff[2] == $menuitem) ? " CHECKED" : "";
                        $string .= '<input type="radio" name="'. $stuff[0] .'" value="'
                                .$menuitem .'"' .$chk . '>';
                        }
                }
                $string .= "</td></tr>";
        } else {
                $string .=
                "<td>".
                "<input name='".
                $stuff[0].
                "' value=\"".
                htmlentities(stripslashes($stuff[2])).
                "\" $size></td></tr>";
        }
        return $string;
        }

/* Function to fill in a template */

function filltemplate($source){
        global $fill;
        $fh = fopen ($source,"r");
        $html = fread($fh,filesize($source));
        foreach (array_keys($fill) as $k) {
                $html = preg_replace("/%$k%/",$fill[$k],$html);
        }
        return $html;
        }

?>