"cats.php",
"version" => "4.13",
"modified" => "2025.11.21",
"release" => "release",
"status" => "open source",
"author" => "Sean Shrum",
"email" => "sshrum01@gmail.com",
"created" => "2005.07.21",
"distribute" => "http://cats.shrum.net"
);
// force the document root to the WWW Root
debug("+ Script info- CATS version: " . $aScript['version'] . " [ " . $aScript['modified'] . " ] " . $aScript['distribute'] . "" ."
- Document Root: " . $_SERVER['DOCUMENT_ROOT'] . "
- Relative (where cats.php is being called from): " . $_SERVER['PHP_SELF'] . "
");
$aTemp = explode(".", $_SERVER['SERVER_NAME']);
switch (count($aTemp)) {
case 2: // shrum.net
$aScript['domain'] = $aTemp[0].".".$aTemp[1];
$aScript['subdomain'] = "www";
break;
case 3: // www.shrum.net, sean.shrum.net, etc.
$aScript['domain'] = $aTemp[1].".".$aTemp[2];
$aScript['subdomain'] = $aTemp[0];
break;
case 4: // 205.177.72.189 (if running locally, edit HOSTS file to make it local.[livesitename]
$aScript['domain'] = $_SERVER['SERVER_NAME'];
$aScript['subdomain'] = "";
}
$aScript['relative'] = "/".substr( $_SERVER['SCRIPT_NAME'], 1, -(strlen(basename(__FILE__))+1));
// local/www swap link (if developing on a local/remote setup); you can place a link in your page to quick switch
if ($aScript['subdomain'] == "www") {
$aScript['subdomain'] = "www";
} elseif ($aScript['subdomain'] != "") {
$aScript['subdomain'] = "".$aScript['subdomain']."";
}
// define each of our accepted parameters and set default values
$aParams = array (
"align" => "center",
"body" => "null",
"border" => "0",
"caption" => "null",
"cellspacing" => "4",
"cellpadding" => "4",
"cols" => "1",
"debug" => "null",
"dir" => "/",
"in" => "null",
"hr" => "null",
"limit" => "null",
"nav" => "null",
"order" => "null",
"page" => "null",
"plugin" => "text",
"plugins" => "nulll",
"record" => "null",
"rowcolor1" => "ffffff",
"rowcolor2" => "eeeeee",
"rows" => "10",
"table" => "null",
"templates" => "/",
"search" => "null",
"sort" => "asc",
"valign" => "middle",
"width" => "100%"
);
ksort($aParams);
debug("+ List of available parameters and their script set defaults (null'ed items unless specified get UNSET()):
");
foreach($aParams as $key => $value) { debug('- '.$key.' = '.$value); }
debug("
");
// this will hold file content data when they load
$aTemplates = array (
"page" => "",
"body" => "",
"nav" => "",
"table" => "",
"hr" => "",
"record" => "",
);
// set all timer values to ZERO
$aScript['timer:templates'] = 0.000;
$aScript['timer:plugin'] = 0.000;
$aScript['timer:search'] = 0.000;
$aScript['timer:sort'] = 0.000;
$aScript['timer:overall'] = 0.000;
$aScript['timer:cats'] = 0.000;
// ************************************************************************
// start the overall timer
$aScript['timer:overall'] = microtime();
// merge $_REQUEST array over $aParams to overwrite script defaults and cat.ini to values that are defined in the
// query line. Keep $_REQUEST pure and dont muddle it with our additional overhead and dump everything into PARAMS
$aParams = array_merge($aParams, $_REQUEST);
// split out the requested subdirectories; '/ ' in there for root access
debug("+ Importing '".substr(basename(__FILE__), 0, -4 ).".ini' key => value pairs from all directories starting in [DOCUMENT_ROOT] thru ".$aParams['dir']."...
");
$sTemp = $_SERVER['DOCUMENT_ROOT'];
$aTemp = explode("/", $aParams['dir']);
foreach ($aTemp as $key => $value) {
if ($key == 0) {
$sTemp .= "/";
} else {
$sTemp .= $value . "/";
}
if (file_exists($sTemp.substr(basename(__FILE__), 0, -4 ).".ini")) {
$aTemp = ini_parse($sTemp.substr(basename(__FILE__), 0, -4 ).".ini");
if (array_key_exists('defaults', $aTemp)) { foreach ($aTemp['defaults'] as $key => $value) { $aParams[$key] = $value; } }
if (array_key_exists('pages', $aTemp)) { foreach ($aTemp['pages'] as $key => $value ) { $aPages[$key] = $value; } }
if (array_key_exists('keywords', $aTemp)) { foreach ($aTemp['keywords'] as $key => $value) { $aKeywords[$key] = $value; } }
}
}
debug("
");
//merge $_REQUEST array over $aParams to overwrite script defaults and cat.ini to values that are defined in the query line
$aParams = array_merge($aParams, $_REQUEST);
// UNSET 'null'd variables, do here in case URL has a entry setting to null
debug("+ UNSET()'ing any parameters = 'null'....");
$iCut=0;
ksort($aParams);
foreach($aParams as $key => $value) {
if (strtolower($value) == "null") {
$iCut++;
unset($aParams[$key]);
}
}
debug("" . $iCut . " parameters removed
");
// display our finalized $aParams if debug defined
debug("+ Current [PARAM]eters for this run (CATS.INI::[defaults] + URL-based parameters)
");
foreach($aParams as $key => $value) { debug("- " . $key . " = " . $value); }
debug("
");
if (isset($aPages)) {
debug("+ Current [PAGES] for this run (CATS.INI / [pages])
");
foreach($aPages as $key => $value) { debug("- $" . $key . "$ = " . $value); }
debug("
");
}
if (isset($aKeywords)) {
debug("+ Current [KEYWORDS] for this run (CATS.INI / [keywords])
");
foreach($aKeywords as $key => $value) { debug("- " . $key . " = " . $value); }
debug("
");
}
debug("+ Retrieving templates...
");
$aScript['timer:templates'] = microtime();
// look at TEMPLATES array and retrieve the file content and store there
foreach($aTemplates as $key => $value) {
debug("- [".strtoupper($key)."] => ");
if (isset($aParams[$key])) {
$sTemp = $_SERVER['DOCUMENT_ROOT'];
// '/' started names (DOCUMENT_ROOT based)
if (substr($aParams[$key],0,1) == "/") {
$sTemp .= $aParams[$key];
// './' started names (DIR based)
} elseif (substr($aParams[$key],0,2) == "./") {
$sTemp .= $aParams['dir'].substr($aParams[$key], 1);
// everything else (typically just the filename) (TEMPLATES based)
} else {
$sTemp .= $aParams['templates']."/".$aParams[$key];
}
debug($sTemp."...");
If (file_exists($sTemp)) {
debug("FOUND");
$aTemplates[$key] = file_get_contents($sTemp);
} else {
debug("NOT FOUND");
}
}
}
debug("
");
$aA = explode(' ', $aScript['timer:templates'].' '.microtime());
$aScript['timer:templates'] = sprintf('%01.4f',($aA[2]+$aA[3])-($aA[0]+$aA[1]));
// [PLUGIN] / [PLUGINS] functions ********************************************************
if (isset($aParams['plugin'])) {
debug("+ [PLUGIN] defined => ".$aParams['plugin']."
");
if (substr($sTemp, -4, 4) != ".php") { $aParams['plugin'] .= ".php"; }
if (isset($aParams['plugins'])) {
debug("+ [PLUGINS] defined => ".$aParams['plugins']."
");
if (file_exists($_SERVER['DOCUMENT_ROOT'].$aParams['plugins'])) {
debug("+ [PLUGINS] => [DOCUMENT_ROOT]".$aParams['plugins']."
");
$aParams['plugins'] = $_SERVER['DOCUMENT_ROOT'].$aParams['plugins'];
} else {
Print "+ [PLUGINS] => " . $aParams['plugins']." could not be found. Please check spelling and file existance. Exiting
";
exit;
}
} else {
debug("+ [PLUGINS] undefined; using: [DOCUMENT_ROOT]
");
debug("+ [PLUGINS] => ".$_SERVER['DOCUMENT_ROOT']."
");
$aParams['plugins'] = $_SERVER['DOCUMENT_ROOT'];
}
if (file_exists($aParams['plugins']."/".$aParams['plugin'])) {
debug(" + [PLUGINS]/[PLUGIN] => '".$aParams['plugins']."/".$aParams['plugin'] . "' FOUND");
require $aParams['plugins']."/".$aParams['plugin'];
} else {
print "
";
print "[PLUGINS]/[PLUGIN] => '".$aParams['plugins']."/".$aParams['plugin']."' does not exist.";
print "
Please check [PLUGIN] spelling and existance in location.
";
print "Script execution halted.
";
exit;
}
debug("+ Calling [PLUGINS]/[PLUGIN] for [DATA] array...
");
$aScript['timer:plugin'] = microtime();
$aData = main($aParams);
if (isset($aData) && is_array($aData) && count($aData) > 0 ) {
debug("+ [DATA] => [".count($aData)."] x [".count($aData[0])."]
");
debug($aData);
}
$aA = explode(' ', $aScript['timer:plugin'].' '.microtime());
$aScript['timer:plugin'] = sprintf('%01.4f',($aA[2]+$aA[3])-($aA[0]+$aA[1]));
} else {
$aScript['timer:plugin'] = 0;
}
// [DATA] functions ******************************************************
while (true) {
$aRecordset['start'] = 0;
if (isset($aData) && is_array($aData) && count($aData) > 0 ) {
// [WHERE] functions ******************************************************
// currently only handling 1 where field.
// this allows the webmaster to define a top level recordset SEARCH
// [search] will provide user end filtering within the WHERE recordset
if (isset($aParams['where'])) {
debug("+ [WHERE] => '" . $aParams['where']."'
");
list($sField, $sValue) = explode("=", $aParams['where']);
if (array_key_exists($sField, $aData[0])) {
$iCut=0;
debug("+ Unsetting records from [DATA]...");
foreach ($aData as $key => $row) {
if ($aData[$key][$sField] <> $sValue) {
$iCut++;
unset($aData[$key]);
}
}
if ($iCut > 0) {
$aData = array_values($aData);
debug("".$iCut." entries cut
");
debug("+ [WHERE][DATA] => [".count($aData)."] x [".count($aData[0])."]
");
debug($aData);
} else {
debug("".$iCut." entries cut");
}
} else {
debug("+ [WHERE] field => '".$sValue."' not found in [DATA], operation skipped");
}
} else {
debug("
+ [WHERE] undefined; operation skipped");
}
if (count($aData) == 0) { break; }
$aRecordset['total'] = count($aData);
$aRecordset['cols'] = count($aData[0]);
if (!isset($aParams['search'])) { $sSearch = ""; } else { $sSearch = $aParams['search']; }
if (!isset($aParams['in'])) { $sIn = ""; } else { $sIn = $aParams['in']; }
if (!isset($aParams['order'])) { $sOrder = ""; } else { $sOrder = $aParams['order']; }
if (!isset($aParams['sort'])) {
$sSort = "undefined";
} else {
if (substr(strtolower($aParams['sort']), 0, 1) == "a") { $sSort = "ascending"; }
if (substr(strtolower($aParams['sort']), 0, 1) == "d") { $sSort = "descending"; }
if (isset($sSort) && isset($aParams['order'])) { $sSort .= " ".$aParams['order']; }
if (substr(strtolower($aParams['sort']), 0, 1) == "r") { $sSort = "random"; }
}
$aRecordset['ascdesc'] = $sSort;
ass_search($aData, $sSearch, $sIn, $sOrder, $sSort);
if (count($aData) == 0) { break; }
$aRecordset['match'] = count($aData);
$aRecordset['range'] = $aRecordset['match']; // 0 - all records
if (isset($aParams['limit'])) {
list($aRecordset['start'], $aRecordset['range']) = explode(",", $aParams['limit']);
if (!isset($aRecordset['start']) || (!isset($aRecordset['range']))) {
debug("
+ [LIMIT] badly formatted; should be in '#,#' format; [start],[range]
");
debug("+ [LIMIT] operations are skipped
");
}
if ($aRecordset['start'] > $aRecordset['match']) {
print "+ [LIMIT] start => '".$aRecordset['start']."' is beyond the total of records in [DATA]: '".$aRecordset['match']."'.";
print "
Script execution halted.";
exit;
}
if ($aRecordset['start'] + $aRecordset['range'] > $aRecordset['match']) { $aRecordset['range'] = $aRecordset['match'] - $aRecordset['start'];}
if (count($aData) < $aRecordset['start'] + $aRecordset['range']) { $aRecordset['range'] = count($aData) - $aRecordset['start']; }
debug("
+ [LIMIT] => [".$aRecordset['start'].",".$aRecordset['range']."]
");
$aData = array_slice($aData,$aRecordset['start'], $aRecordset['range']);
debug($aData);
} else {
debug("+ [LIMIT] undefined, setting for all records => [".$aRecordset['start'].",".$aRecordset['range']."]
");
}
$aRecordset['colnav'] = "";
for ($i = 1; $i <= 7; $i++) {
if ($i == $aParams['cols']) {
$sTemp = "" . $i . " ";
} else {
$sTemp = "" . $i . " ";
}
$aRecordset['colnav'] .= $sTemp;
}
$aRecordset['limitnav'] = "";
for ($i = 2; $i <= 4; $i++) {
$sTemp = "" . $aParams['cols'] * $aParams['rows'] * $i . "";
$aRecordset['limitnav'] .= " " . $sTemp;
}
$aRecordset['first'] = $aRecordset['start'] + 1;
$aRecordset['last'] = $aRecordset['start'] + $aRecordset['range'];
// deals with last slices with row < range
if (isset($aParams['limit'])) {
list($aRecordset['start'], $aRecordset['range']) = explode(",", $aParams['limit']);
} else {
$aRecordset['range'] = $aRecordset['match'];
}
$aRecordset['slicecount'] = 1;
$aRecordset['slicecurrent'] = 1;
$aRecordset['sliceprevious'] = $_SERVER['REQUEST_URI'];
$aRecordset['slicenext'] = $_SERVER['REQUEST_URI'];
$aRecordset['sliceall'] = query_string_mod ($_SERVER['REQUEST_URI'], "limit", "null");
$aRecordset['slicefirst'] = query_string_mod ($_SERVER['REQUEST_URI'], "limit", "0,".$aRecordset['range']);
$aRecordset['slicelast'] = query_string_mod ($_SERVER['REQUEST_URI'], "limit", floor($aRecordset['match']/$aRecordset['range']) * $aRecordset['range'] . ",".$aRecordset['range']);
$aRecordset['sortasc'] = query_string_mod ($_SERVER['REQUEST_URI'], "sort", "asc");
$aRecordset['sortdesc'] = query_string_mod ($_SERVER['REQUEST_URI'], "sort", "desc");
$aRecordset['sortrandom'] = query_string_mod($_SERVER['REQUEST_URI'], "sort", "random");
if ($aRecordset['range'] <= $aRecordset['match']) {
$aRecordset['slicecount'] = ceil($aRecordset['match']/$aRecordset['range']);
$aRecordset['slicecurrent'] = ceil($aRecordset['first']/$aRecordset['range']);
}
if($aRecordset['slicecount'] > 1 ) {
if($aRecordset['slicecurrent'] != 1 ) { $aRecordset['sliceprevious'] = query_string_mod($_SERVER['REQUEST_URI'], "limit", $aRecordset['start'] - $aRecordset['range'].",".$aRecordset['range']); }
if ($aRecordset['slicecurrent'] != $aRecordset['slicecount'] ) { $aRecordset['slicenext'] = query_string_mod($_SERVER['REQUEST_URI'], "limit", $aRecordset['start'] + $aRecordset['range'].",".$aRecordset['range']); }
}
$aRecordset['slicecurrent'] = ceil(($aRecordset['start'] + 1) / $aRecordset['range']);
// HR inclusion between rows; set as blank, change if needed
$sHR = "";
if (isset($aParams['hr'])) {
if (strtoupper($aParams['hr']) == "Y") {
$sHR = "
|
";
} else {
$sHR = "| ".$aTemplates['hr']." |
";
}
}
// [ROWCOLOR1][ROWCOLOR2] zebrastriping
if (isset($aParams['rowcolor1'])) { $sTROdd = ""; } else { $sTROdd = "
"; }
if (isset($aParams['rowcolor2'])) { $sTREven = "
"; } else { $sTREven = "
"; }
// HTML Table header
$sRecords = "";
$iColNum = 0;
$iRowNum = 1;
debug("+ Populating ".$aRecordset['range']." records...");
$iColWidthPct = 100 / $aParams['cols'];
// Search and Replace [DATA][HEADER][VALUE] into record template
$iColNum=0;
$iRecord=0;
$aColNames = array_keys($aData[0]);
foreach ($aData as $row) {
$iColNum++;
if ($iColNum == 1) {
if ($iRowNum > 1) { $sRecords .= $sHR; }
if ($iRowNum % 2) { $sRecords .= $sTREven; } else { $sRecords .= $sTROdd; }
}
$sRecord = $aTemplates['record'];
$iCol=0;
foreach ($row as $cell) {
$sRecord = str_replace ("%".$aColNames[$iCol]."%", stripslashes($cell), $sRecord);
$iCol++;
}
$sRecord = str_replace ("#recordnum#", $aRecordset['start'] + $iRecord + 1, $sRecord);
$sRecord = str_replace ("#rownum#", $iRowNum, $sRecord);
$sRecord = str_replace ("#colnum#", $iColNum, $sRecord);
$sRecords .= "
".$sRecord." | ";
if ($iColNum == $aParams['cols']) {
$sRecords .= "";
$iColNum = 0;
$iRowNum++;
}
$iRecord++;
}
$aRecordset['return'] = count($aData);
debug("DONE");
$sRecords .= "
+ Filtered [DATA] set contains ZERO records
");
$sRecords ="
";
} elseif (isset($aData) && !is_array($aData)) {
debug("+ Plugin returned ZERO records
");
$sRecords ="No records returned";
} elseif (!isset($aData)) {
// static page creation via plugin=null
$sRecords = "";
}
// nest body -> page, nav -> page, table -> page, records -> page
debug("+ Combining templates; [RECORDS]=>[TABLE]=>[BODY]=>[PAGE]
");
$sPage = str_replace ('$nest$', $aTemplates['body'], $aTemplates['page']);
$sPage = str_replace ('$nest$', $aTemplates['table'], $sPage);
$sPage = str_replace ('$nest$', $sRecords, $sPage);
debug("+ NAV replacement in output
");
$sPage = str_replace ('$nav$', $aTemplates['nav'], $sPage);
// retrieve any user cats.ini [pages] into the final PAGE var (do this before PARAM s-n-r)
if ((isset($aPages)) && (count($aPages) >= 1)) {
debug("+ Retrieving and nesting user defined cats.ini [PAGES] into final PAGE var
");
foreach($aPages as $key => $value) {
debug("- ".$key." => ");
if (substr($value,0,1) == "/") {
$sTemp = $_SERVER['DOCUMENT_ROOT'].$value;
} elseif (substr($value,0,1) == ".") {
$sTemp = $_SERVER['DOCUMENT_ROOT'].$aParams['dir'].substr($value, 1);
} else {
$sTemp = $_SERVER['DOCUMENT_ROOT'].$aParams['templates']."/".$value;
}
debug($sTemp."...");
If (file_exists($sTemp)) {
debug("FOUND");
$sPage = str_replace ("$".$key."$", file_get_contents($sTemp),$sPage);
} else {
debug("NOT FOUND");
die("File not found: ". $sTemp);
}
}
debug("
");
}
// if data was an array, process slice replacements
if (isset($aData) && is_array($aData)) {
foreach($aRecordset as $key => $value) {
$sPage = str_replace ("#".$key."#", stripslashes($value), $sPage);
}
}
debug("+ Processing search and replace on template tokens...");
foreach($aParams as $key => $value) { $sPage = str_replace ("!".$key."!", stripslashes($value), $sPage); }
foreach($_SERVER as $key => $value) {
If (!is_array($value)) {
$sPage = str_replace ("$".$key."$", stripslashes($value), $sPage);
}
}
if (isset($aKeywords)) { foreach($aKeywords as $key => $value) { $sPage = str_replace ($key, $value, $sPage); } }
foreach(date_array("0") as $key => $value) { $sPage = str_replace (":".$key.":", $value, $sPage); }
// get the end time for timer:overall
$aA = explode(' ', $aScript['timer:overall'].' '.microtime());
$aScript['timer:overall'] = sprintf('%01.4f',($aA[2]+$aA[3])-($aA[0]+$aA[1]));
$aScript['timer:cats'] = $aScript['timer:overall'] - $aScript['timer:plugin'] - $aScript['timer:templates'];
foreach($aScript as $key => $value) { $sPage = str_replace ("*".$key."*", stripslashes($value), $sPage); }
$sPage = str_replace ("*pagesize*", number_format(strlen($sPage)/1024), $sPage);
print($sPage);
exit;
//=========================================================
// Function Library
//=========================================================
Function ass_search(&$aData, $sSearch, $sIn = "", $sOrder = "", $sSort = "") {
debug("
+ ass_search()
");
// [DATA] validation
if (!isset($aData) && !is_array($aData) && !count($aData) > 0) {
debug("+ [DATA] is not set/an array/or empty; operation skipped
");
return;
}
// timer start
$iTimer = microtime();
// [SEARCH] validation
if ($sSearch !== "") {
debug("+ [SEARCH] defined; => '" . $sSearch ."'
");
// [IN] validation and $aIn creation
$iIn = 0;
if ($sIn !== "") {
$iIn = substr_count($sIn,',') + 1;
debug("+ [IN] defined; => '".$sIn."'
");
$aIn = explode(",", $sIn);
foreach ($aIn as $key => $value) {
if (!array_key_exists($value, $aData[0])) {
debug("+ [IN] => '".$value."' not found in [DATA]; removing
");
unset($aIn[$key]);
}
}
$iIn = count($aIn);
}
// [SEARCH] breakdown into $aSearch => [operator][term]
$aSearch = array();
while (True) {
$sOperator = "";
$sTerm = "";
if (substr($sSearch, 0,1) == "-" || substr($sSearch, 0,1) == "+" || substr($sSearch, 0,1) == "^") {
$sOperator = substr($sSearch, 0, 1);
$sSearch = substr($sSearch, 1);
$sSearch = substr($sSearch, strlen($sTerm));
}
if (substr($sSearch, 0,1) == '"') {
$sOperator = substr($sSearch, 0, 1);
$sSearch = substr($sSearch, 1);
$sTerm = substr($sSearch, 0, stripos($sSearch, '"'));
$sSearch = substr($sSearch, strlen($sTerm));
$sSearch = substr($sSearch, 1);
} else {
if (strpos($sSearch, " ") == false) {
$sTerm = $sSearch;
$sSearch = "";
} else {
$sTerm = substr($sSearch, 0, stripos($sSearch, " ")+1);
$sSearch = substr($sSearch, strlen($sTerm));
}
}
$aSearch[] = array ("operator" => $sOperator, "term" => $sTerm);
if ($sSearch == "") { break; }
}
debug("+ [SEARCH] ".count($aSearch)." term(s) detected
");
$iCut = 0;
$iTerms = count($aSearch);
debug($aSearch);
debug("+ [SEARCH] applying search terms to [DATA]...
");
// [DATA] filtering based on [SEARCH] or [SEARCH][IN]
foreach ($aData as $key => $row) {
if ($iIn > 0) {
$sData = "";
For ($i=0; $i < $iIn; $i++) {
$sData .= $aData[$key][$aIn[$i]] . " | ";
}
If ($iIn > 1) { array_multisort("operator", SORT_ASC, SORT_NATURAL|SORT_FLAG_CASE, $aIn); } // -,+,none,^,"
} else {
$sData = implode(" | ", $row);
}
// [SEARCH] operator handling
For ($i=0; $i < $iTerms; $i++) {
$iKeep = FALSE;
if ($aSearch[$i]['operator'] == "-") {
if (stripos($sData, $aSearch[$i]['term']) !== FALSE ) {
$i = $iTerms;
} else {
$iKeep = TRUE;
}
} elseif ($aSearch[$i]['operator'] == "+") {
if (stripos($sData, $aSearch[$i]['term']) == FALSE) {
$i = $iTerms;
} else {
$iKeep = TRUE;
}
} elseif ($aSearch[$i]['operator'] == "" || $aSearch[$i]['operator'] == '"') {
if (stripos($sData, $aSearch[$i]['term']) !== FALSE) {
$iKeep = TRUE;
}
} elseif ($aSearch[$i]['operator'] == "^") {
if (strpos($sData, $aSearch[$i]['term']) !== FALSE) {
$iKeep = TRUE;
}
}
if ($iKeep == FALSE) { break; }
}
if ($iKeep == False) {
$iCut++;
unset($aData[$key]);
}
}
$aData = array_values($aData);
debug("+ [SEARCH] ".$iCut." entries cut
");
if (count($aData) > 0) {
debug("+ [DATA] => [".count($aData)."] x [".count($aData[0])."]
");
debug($aData);
}
} else {
debug("+ [SEARCH] undefined; operation skipped");
}
// Are there any records left after [SEARCH] for [ORDER][SORT] and [LIMIT]
if (count($aData) == 0) {
debug("
+ ass_search():[DATA] contains matching records
");
return;
}
// [ORDER][SORT] functions ******************************************************
if ($sOrder !== "") {
// right now I only take 1 order field.
// need to create routine to take multiple order fields for array_multisort()
// also need to clean this up so random is in with asc and desc
// VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVV
if (array_key_exists($sOrder, $aData[0])) {
debug("+ [ORDER] defined => '" . $sOrder ."', header exists
");
// [ORDER][SORT] functions ******************************************************
if ($sSort !== "undefined" or $sSort !== "" or $sSort !== "random") {
debug("+ [SORT] defined => ". $sSort . "
");
$aData = array_values($aData);
$order = array_column($aData, $sOrder);
If (substr(strtolower($sSort), 0, 1) == "a") {
array_multisort($order, SORT_ASC, SORT_NATURAL|SORT_FLAG_CASE, $aData);
} elseif (substr(strtolower($sSort), 0, 1) == "d") {
array_multisort($order, SORT_DESC, SORT_NATURAL|SORT_FLAG_CASE, $aData);
}
debug("
+ [ORDER]+[SORT] => [".$sSort."]
");
} else {
debug("+ [SORT] undefined; operation skipped
");
}
} else {
// [ORDER] field not found in [DATA]
debug("+ [ORDER] => '".$sOrder."' header does not exist in DATA; operations skipped.");
}
} else {
debug("
+ [ORDER] undefined; [ORDER]+[SORT] operations skipped.");
}
// [SORT] Randomize; [ORDER] not needed for randomization
if (substr(strtolower($sSort), 0, 1) == "r") {
debug("
+ [SORT] undefined; [ORDER]+[SORT] operations skipped.");
shuffle($aData);
}
$aA = explode(' ', $iTimer.' '.microtime());
debug("
+ ass_search():time => ". sprintf('%01.4f',($aA[2]+$aA[3])-($aA[0]+$aA[1])) . "/s
");
}Function debug($data) {
if (isset($_REQUEST['debug'])) {
if (!is_array($data)) {
print($data);
} else {
if (count($data) > 0) {
$sTable ="";
foreach (array_keys($data[0]) as $header) {
$sTable .= "| " . htmlspecialchars($header) . " | ";
}
$sTable .= "
";
foreach ($data as $row) {
$sTable .= "";
foreach ($row as $cell) {
$sTable .= "| " . htmlspecialchars($cell) . " | ";
}
$sTable .= "
";
}
$sTable .= "
";
print($sTable);
}
}
}
}
function ini_parse($filename) {
// need to parse this ourselves as PHPs built in
// parse_ini_file() doesn't like keys with special
// chars like "$" in them or values with "=" in them
// [Foo]
// $bar$=this=that <--- errors out on this
debug("".$filename);
if($fp = fopen($filename, 'r')) {
debug(" FOUND.");
while(!feof($fp)) {
$line = trim(fgets($fp, 9216));
if (substr($line, 0,1) == "[") {
// get [section name]
$section = substr($line, 1, strlen($line) - 2);
} elseif (substr($line, 0,1) == ";") {
// do nothing...';' denotes a comment line
} elseif (strlen(trim(($line))) == 0) {
// do nothing...blank line
} else {
// extract the key and value from the line using first "=" from left
$pos = strpos($line, "=");
$key = substr($line, 0, $pos);
$value = substr($line, $pos + 1, strlen($line) - $pos - 1);
$array[$section][$key] = $value;
}
}
fclose($fp);
} else {
debug(" NOT FOUND");
return false;
}
return $array;
}
function date_array() {
// used for inserting current date/time values into page
$aTime["sec"] = date("s");
$aTime["min"] = date("i");
$aTime["hour_24"] = date("G");
$aTime["hour_0_24"] = date("H");
$aTime["hour_12"] = date("g");
$aTime["hour_0_12"] = date("h");
$aTime["mdayth"] = date("jS");
$aTime["mdayth_0"] = date("d").date("S");
$aTime["mday"] = date("j");
$aTime["mday_0"] = date("d");
$aTime["month"] = date("F");
$aTime["mon"] = date("M");
$aTime["mnum_0"] = date("m");
$aTime["mnum"] = date("n");
$aTime["year"] = date("Y");
$aTime["yr"] = date("y");
$aTime["weekday"] = date("l");
$aTime["wkday"] = date("D");
$aTime["timezone"] = date("T");
$aTime["daysinmonth"] = date("t");
$aTime["epochsecs"] = date("U");
if(date('G') >= 0 && date("G") < 12 ) { $aTime["timeofday"] = "morning"; } elseif(date("G") >= 12 && date("G") < 17 ) { $aTime["timeofday"] = "afternoon"; } else { $aTime["timeofday"] = "evening"; }
$aTime["yday"] = date("z") + 1;
if(date("I") == 1 ) { $aTime["isdst"] = "Daylight Savings Time"; } else { $aTime["isdst"] = ""; }
$aTime["am_pm"] = strtolower( date("A"));
$aTime["AM_PM"] = date("A");
$aTime["last_month"] = date("F", mktime(0, 0, 0, date("m")-1, date("d"), date("Y")));
$aTime["last_mon"] = date("M", mktime(0, 0, 0, date("m")-1, date("d"), date("Y")));
$aTime["last_mnum"] = date("n")-1;
$aTime["last_mnum_0"] = date("m", mktime(0, 0, 0, date("n"), 0, 0));
$aTime['last_year'] = date("Y")-1;
$aTime['last_yr'] = date("y", mktime(0, 0, 0, date("m"), date("d"), date("Y")-1));
if($aTime["mnum"] == 1 ) {
$aTime['last_month_year'] = date("Y")-1;
$aTime['last_month_yr'] = date("y", mktime(0, 0, 0, date("m"), date("d"), date("Y")));
} else {
$aTime['last_month_year'] = date("Y");
$aTime['last_month_yr'] = date("y");
}
$aTime["next_month"] = date("F", mktime(0, 0, 0, date("m")+1, date("d"), date("Y")));
$aTime["next_mon"] = date("M", mktime(0, 0, 0, date("m")+1, date("d"), date("Y")));
$aTime["next_mnum"] = date("n", mktime(0, 0, 0, date("m")+1, date("d"), date("Y")));
$aTime["next_mnum_0"] = date("m", mktime(0, 0, 0, date("m")+1, date("d"), date("Y")));
$aTime['next_year'] = date("Y")+1;
$aTime['next_yr'] = date("y", mktime(0, 0, 0, date("m"), date("d"), date("Y")+1));
if($aTime["mnum"] == "12" ) {
$aTime['next_month_year'] = date("Y")+1;
$aTime['next_month_yr'] = date("y", mktime(0, 0, 0, date("m")+1, date("d"), date("Y")));
} else {
$aTime['next_month_year'] = date("Y");
$aTime['next_month_yr'] = date("y");
}
return $aTime;
}
function query_string_mod ($query_string, $argument, $value) {
// used for modifying the value of a key=>value pair in the URL
$stripped_query_string = stripslashes($query_string);
if(strpos($stripped_query_string, "?".$argument) === false && strpos($stripped_query_string, "&".$argument) === false ) {
if(strpos($stripped_query_string, "?") === false ) {
return $stripped_query_string."?".$argument."=".$value;
} else {
return $stripped_query_string."&".$argument."=".$value;
}
} else {
$argument_length = strlen($argument);
$pre_end = strpos($stripped_query_string, $argument);
$pre = substr($stripped_query_string, 0, $pre_end);
if(strpos($stripped_query_string, "&", $pre_end ) === false ) {
return $pre.$argument."=".$value;
} else {
$post = substr($stripped_query_string, $pre_end +(strpos($stripped_query_string, "&", $pre_end ) - $pre_end ));
return $pre.$argument."=".$value.$post;
}
}
}
?>