$value) { if (is_array($value)) cleanup_magic_quotes($value); else $array[$key] = stripslashes($value); } } if (get_magic_quotes_gpc()) { if (isset($_GET)) cleanup_magic_quotes($_GET); if (isset($_POST)) cleanup_magic_quotes($_POST); } function htmlenc($string) { return htmlspecialchars($string, ENT_QUOTES, 'UTF-8'); } function fatal_error($string) { if (php_sapi_name() != 'cli') header('Content-Type: text/plain'); die('fatal error: '.$string."\n"); } require_once('MDB2.php'); function mdb2_open($dsn) { $mdb2 =& MDB2::connect($dsn); if (PEAR::isError($mdb2)) fatal_error($mdb2->getMessage()); return $mdb2; } function mdb2_res_table($res) { $no_columns = $res->numCols(); $columns = $res->getColumnNames(); //print_r($columns); if ($no_columns == 0) return; ?> $value) { ?>fetchRow()) { ?>

NULL'); else echo($data); ?>

seek(); // reset row pointer } // format characters // %% -> % // %q -> string to be escaped, must already be insides 's in $format // %w -> string to be escaped, must already be insides 's in $format, also escapes wildcard characters // %i -> positive integer function mdb2_vprintf($mdb2, $format, $args) { $out = ''; $arg = 0; while (($pos = strpos($format, '%')) !== FALSE) { $out .= substr($format, 0, $pos); switch ($format[$pos + 1]) { case '%': $out .= '%'; break; case 'q': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $out .= $mdb2->escape($args[$arg]); $arg++; break; case 'w': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $out .= $mdb2->escape($args[$arg], true); $arg++; break; case 'i': if (count($args) <= $arg) fatal_error('te weinig argumenten'); $val = (int)$args[$arg]; if ($val == NULL) { $out .= 'NULL'; } else { if ($val != $args[$arg]) fatal_error('SQL argument is geen integer'); if ($val <= 0) fatal_error('SQL argument is geen positieve integer: '.$val); $out .= $val; } $arg++; break; default: fatal_error('onzinnig format character'); break; } $format = substr($format, $pos + 2); } if ($arg != count($args)) fatal_error('te veel argumenten voor format string'); //logit($out.$format); echo($out.$format); return $out.$format; } function mdb2_vquery($mdb2, $format, $args) { $res =& $mdb2->query(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($res)) { $errorInfo = $mdb2->errorInfo($res); fatal_error($res->getMessage().': '.$errorInfo[2]); } return $res; } function mdb2_query($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); return mdb2_vquery($mdb2, $format, $args); } function mdb2_vexec_error($mdb2, $err, $format, $args) { $affected =& $mdb2->exec(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($affected)) { if (PEAR::isError($affected, $err)) return false; else { $errorInfo = $mdb2->errorInfo($affected); fatal_error($affected->getMessage().': '.$errorInfo[2]); } } return true; } function mdb2_exec_error($mdb2, $err, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vexec_error($mdb2, $err, $format, $args); } function mdb2_vexec($mdb2, $format, $args) { $affected =& $mdb2->query(mdb2_vprintf($mdb2, $format, $args)); if (PEAR::isError($affected)) { $errorInfo = $mdb2->errorInfo($affected); fatal_error($affected->getMessage().': '.$errorInfo[2]); } } function mdb2_exec($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); mdb2_vexec($mdb2, $format, $args); } function mdb2_vsingle_row($mdb2, $mode, $format, $args) { $res = mdb2_vquery($mdb2, $format, $args); $array = $res->fetchRow($mode); $res->free(); return $array; } function mdb2_single_row($mdb2, $mode, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, $mode, $format, $args); } function mdb2_single_array($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, MDB2_FETCHMODE_ORDERED, $format, $args); } function mdb2_single_assoc($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); array_shift($args); return mdb2_vsingle_row($mdb2, MDB2_FETCHMODE_ASSOC, $format, $args); } function get_date($string) { if (preg_match('/^([0-9]+)-([0-9]+)-([0-9]+)$/', $string, $matches) != 1) fatal_error('ongeldige deadline'); if (!checkdate($matches[2], $matches[3], $matches[1])) fatal_error('ongeldige deadline'); return mktime(0, 0, 0, $matches[2], $matches[3], $matches[1]); } function mdb2_single_val($mdb2, $format) { $args = func_get_args(); array_shift($args); array_shift($args); $res = mdb2_vquery($mdb2, $format, $args); $array = $res->fetchRow(); $res->free(); if (isset($array[0])) return $array[0]; else return NULL; } ?>