"; $tablemidbit="" . $formbits; $tablesuffix=""; $bonload=""; $cfilter=" function filter(oi) { var iois=oi.value; var wasi=iois; if ((wasi + 'z').substring(0,1) == ' ' && wasi.indexOf('[') != -1) { iois=iois.replace(/\ \+\ /g, \"+\"); iois=iois.replace(/\ \+/g, \"+\"); iois=iois.replace(/\+\ /g, \"+\"); } iois=iois.replace(/\+/g, \"~ + char(43) + ~\"); iois=iois.replace(/\'/g, \"' + char(39) + '\"); iois=iois.replace(/\~ \+ char(43) \+ \~/g,\"' + char(43) + '\"); iois=iois.replace(/\,/g, \"' + char(44) + '\"); iois=iois.replace(/\`/g, \"' + char(96) + '\"); iois=iois.replace(/\|/g, \"' + char(124) + '\"); iois=iois.replace(/\~/g, \"' + char(126) + '\"); iois=iois.replace(/\"/g, \"' + char(34) + '\"); iois=iois.replace(/\' \+ char\(126\) \+ \' \+ char\(43\) \+ \' \+ char\(126\) \+ \'/g,\"' + char(43) + '\"); if (iois != oi.value) { oi.value=iois; oi.title+=' ... ' + was; } return iois; } "; function reverse_filter($iois) { $iois=str_replace("' + char(43) + '", "+",$iois); $iois=str_replace("' + char(39) + '", "'",$iois); $iois=str_replace("' + char(44) + '", ",",$iois); $iois=str_replace("' + char(96) + '", "`",$iois); $iois=str_replace("' + char(126) + '", "~",$iois); $iois=str_replace("' + char(124) + '", "|",$iois); $iois=str_replace("' + char(34) + '", '"',$iois); $iois=str_replace("' char(43) '", "+",$iois); $iois=str_replace("' char(39) '", "'",$iois); $iois=str_replace("' char(44) '", ",",$iois); $iois=str_replace("' char(96) '", "`",$iois); $iois=str_replace("' char(126) '", "~",$iois); $iois=str_replace("' char(124) '", "|",$iois); $iois=str_replace("' char(34) '", '"',$iois); $iois=str_replace("' char(43) '", "+",$iois); $iois=str_replace("' char(39) '", "'",$iois); $iois=str_replace("' char(44) '", ",",$iois); $iois=str_replace("' char(96) '", "`",$iois); $iois=str_replace("' char(126) '", "~",$iois); $iois=str_replace("' char(124) '", "|",$iois); $iois=str_replace("' char(34) '", '"',$iois); $iois=str_replace("' char(43) '", "+",$iois); $iois=str_replace("' char(39) '", "'",$iois); $iois=str_replace("' char(44) '", ",",$iois); $iois=str_replace("' char(96) '", "`",$iois); $iois=str_replace("' char(126) '", "~",$iois); $iois=str_replace("' char(124) '", "|",$iois); $iois=str_replace("' char(34) '", '"',$iois); return $iois; } function rev_filter($iois) { $iois=str_replace("' char(43) '", "' + char(43) + '",$iois); $iois=str_replace("' char(39) '", "' + char(39) + '",$iois); $iois=str_replace("' char(44) '", "' + char(44) + '",$iois); $iois=str_replace("' char(96) '", "' + char(96) + '",$iois); $iois=str_replace("' char(126) '", "' + char(126) + '",$iois); $iois=str_replace("' char(124) '", "' + char(124) + '",$iois); $iois=str_replace("' char(34) '", "' + char(34) + '",$iois); $iois=str_replace("' char(43) '", "' + char(43) + '",$iois); $iois=str_replace("' char(39) '", "' + char(39) + '",$iois); $iois=str_replace("' char(44) '", "' + char(44) + '",$iois); $iois=str_replace("' char(96) '", "' + char(96) + '",$iois); $iois=str_replace("' char(126) '", "' + char(126) + '",$iois); $iois=str_replace("' char(124) '", "' + char(124) + '",$iois); $iois=str_replace("' char(34) '", "' + char(34) + '",$iois); $iois=str_replace("' char(43) '", "' + char(43) + '",$iois); $iois=str_replace("' char(39) '", "' + char(39) + '",$iois); $iois=str_replace("' char(44) '", "' + char(44) + '",$iois); $iois=str_replace("' char(96) '", "' + char(96) + '",$iois); $iois=str_replace("' char(126) '", "' + char(126) + '",$iois); $iois=str_replace("' char(124) '", "' + char(124) + '",$iois); $iois=str_replace("' char(34) '", "' + char(34) + '",$iois); $iois=str_replace(" + char(126) + ' char(43) ' + char(126) + "," + char(43) + ",$iois); return $iois; } function unsquarebracket($inversus, $inrecsis, $colsarris, $thistablename, $thistabledata, $willplonkinto) { global $inrecsis; $versus=$inversus; //echo "prez0-0011 " . sizeof($inrecsis) . " " . $inversus . " " . $thistabledata . "
"; if (substr(($versus . "z"),0,1) == " " && strpos($versus,"[") !== false) { //echo "z0-0011" . $versus . " " . $thistabledata . "
"; if ($thistabledata == "") { $madeup=""; $mud=""; for ($ku=0; $ku $ku) { //echo "inrecsis=" . $ku . $inrecsis[$ku] . "
"; $xpi=explode("max(",$inrecsis[$ku]); //echo "sizeof" . sizeof($xpi) . " " . $inrecsis[$ku] . "
"; if (sizeof($xpi) > 1 && strpos(explode(",",$xpi[1])[0],"[") === false) { $madeup.=$mud . explode(",",$xpi[1])[0]; } else { $madeup.=$mud . "0"; } } else { $madeup.=$mud . "0"; } $mud=","; } $allrecs=explode("~", $madeup); } else { $allrecs=explode("~", $thistabledata); } $partsoi=explode("[", $versus); for ($ip=1; $ip"; if (sizeof($uparts) == 1) { // just [col1of7] type of syntax //echo "zz0-0011" . $fprefix . $versus . $fsuffix . "
"; for ($ku=0; $ku"; if (is_numeric(str_replace(' ','',('' . $inrecsis[$ku]))) && strpos($versus,"[") === false) { eval("\$nournum " . "=0 + " . $fprefix . $versus . $fsuffix . ";"); $versus = "" . $nournum; } } } } else if (is_numeric($uparts[0])) { // record number referencing syntaxes Vs those [!+=_col1of7] sum of others types of syntaxes in next else if level down //echo "zzzz0-0011" . $versus . " " . $uparts[0] . "
"; if ($uparts[0] <= 0) { // [0_col1of7] is last value of col1of7 column, [-1_col1of7] is second last value of col_1of7 column //echo "zero-zzzz0-0011" . $versus . "
"; for ($ku=0; $ku"; $versus=str_replace("(+","(0+",str_replace("`","",str_replace("+`","+0`", str_replace("+)","+0)", str_replace("[" . $fldname . "]", explode(",",$allrecs[max(0,($uparts[0] - 1 + sizeof($allrecs)))])[$ku], $versus . "`"))))); for ($iip=1; $iip"; //echo "bzero-zzzz0-0011" . $versus . "
"; if (is_numeric(str_replace(' ','',('' . explode(",",$allrecs[max(0,($uparts[0] - 1 + sizeof($allrecs)))])[$ku]))) && strpos($versus,"[") === false) { eval("\$nournum " . "=0 + " . $fprefix . $versus . $fsuffix . ";"); $versus = "" . $nournum; //echo "bbzero-zzzz0-0011" . $versus . "
"; } else if (strpos($versus,"[") === false) { eval("\$nournum " . "=0 + " . $fprefix . $versus . $fsuffix . ";"); $versus = "" . $nournum; //echo "bbbzero-zzzz0-0011" . $versus . "
"; } //else { //echo "bbbbzero-zzzz0-0011" . $versus . "
"; //} } } } else { // [1_col1of7] is first value of col1of7 column //echo "0-0011" . $versus . "
"; for ($ku=0; $ku"; //echo "00-0011" . $versus . "
"; if (is_numeric(str_replace(' ','',('' . explode(",",$allrecs[max((-1 + sizeof($uparts)),$uparts[0])])[$ku]))) && strpos($versus,"[") === false) { eval("\$nournum " . "=0 + " . $fprefix . $versus . $fsuffix . ";"); $versus = "" . $nournum; //echo "000-0011" . $versus . "
"; } } } } } else if ($uparts[0] == "!=" || $uparts[0] == "!+=" || $uparts[0] == "!+" || $uparts[0] == "!-=" || $uparts[0] == "!-" || $uparts[0] == "!*=" || $uparts[0] == "!*" || $uparts[0] == "!/=" || $uparts[0] == "!/") { $paredf=str_replace("]","",str_replace($uparts[0],"[" . $uparts[0] . "_","",$versus)); $uparts[0]=str_replace("!=","!+=",$uparts[0]); //echo "zzz " . $versus . "
"; if (strpos($uparts[0],"=") !== false) { for ($xku=0; $xku"; if (is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!+") { if (is_numeric($sum)) $sum+=$xbits[$ku]; } else if (is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!-") { if (is_numeric($sum)) $sum-=$xbits[$ku]; } else if (is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!*") { if (is_numeric($sum)) $sum*=$xbits[$ku]; } else if (is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!/") { if (is_numeric($sum)) $sum/=$xbits[$ku]; } else if (!is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!+") { $sum=("" . $sum) . ("" . $xbits[$ku]); } else if (!is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!-") { $sum=str_replace(("" . $xbits[$ku]),"",("" . $sum)); } else if (!is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!*") { $sum=("" . $sum) . "\n" . ("" . $xbits[$ku]); } else if (!is_numeric($xbits[$ku]) && substr($uparts[0],0,2) == "!/") { $forsum=""; for ($iip=0; $iip"; } } } } else { for ($ku=0; $ku"; if (is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!+") { if (is_numeric($sum)) $sum+=$inrecsis[$ku]; } else if (is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!-") { if (is_numeric($sum)) $sum-=$inrecsis[$ku]; } else if (is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!*") { if (is_numeric($sum)) $sum*=$inrecsis[$ku]; } else if (is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!/") { if (is_numeric($sum)) $sum/=$inrecsis[$ku]; } else if (!is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!+") { $sum=("" . $sum) . ("" . $inrecsis[$ku]); } else if (!is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!-") { $sum=str_replace(("" . $inrecsis[$ku]),"",("" . $sum)); } else if (!is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!*") { $sum=("" . $sum) . "\n" . ("" . $inrecsis[$ku]); } else if (!is_numeric($inrecsis[$ku]) && substr($uparts[0],0,2) == "!/") { $forsum=""; for ($iip=0; $iip"; } } } } } if (is_numeric(str_replace(' ','',('' . $versus)))) { eval("\$nournum " . "=0 + " . $versus . ";"); $versus = "" . $nournum; } } return $versus; } function lastmapping($proposed, $beforebits, $ndel, $inrecis, $thiscollist, $thistablename, $thistabledata) { global $inrecsis; $op = array("+", "-", "/", "*", "%"); $optwo = array("++", "--"); //echo "prepre0" . $inrecis . " and " . $thistabledata . "
"; $inrecsis=explode(" ,", $inrecis); $colsarris=explode(",", $thiscollist); $interim=$proposed; $isthere=false; $isnum=0; $jnterim=$beforebits . $ndel; $jndelim=""; for ($ip=0; $ip"; if (substr(($inrecsis[$ip] . "z"),0,1) == " " && strpos($inrecsis[$ip],"[") !== false) { $versus=explode(" ,", $inrecis)[$ip]; $vsversus=$versus; //echo "00" . $proposed . " vs " . $thistabledata . "
"; if (substr(($versus . "z"),0,1) == " " && strpos($versus,"[") !== false) { //echo "0011" . $versus . "
"; $versus=unsquarebracket($versus,$inrecsis,$colsarris,$thistablename,$thistabledata,$colsarris[$ip]); //echo "00011" . $versus . "
"; eval("\$ournum " . "=" . " \"$versus\";"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else { $jnterim.=$jndelim . $inrecsis[$ip]; $jndelim=","; } } else if (strpos(ltrim($inrecsis[$ip]),"(") !== false && strpos(substr((ltrim($inrecsis[$ip]) . "x"),1),"(") !== false) { eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else if (strpos(substr($inrecsis[$ip],0,1),"+") !== false && is_numeric(str_replace(" ","",str_replace("+","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"+") !== false) { $inrecsis[$ip]=str_replace("/0","",str_replace(" ","+",substr($inrecsis[$ip],1))); //echo "q+00011" . " " . $inrecsis[$ip] . " ~~~" . $versus . "
"; eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else if (strpos($inrecsis[$ip],"+") !== false && is_numeric(str_replace(" ","",str_replace("+","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"+") !== false) { //echo "preq00011" . " " . $inrecsis[$ip] . " ~~~" . $versus . "
"; $inrecsis[$ip]=str_replace("/0","",str_replace("++","+0+",substr($inrecsis[$ip],0,1) . str_replace(" ","+",substr($inrecsis[$ip],1)))); //echo "q00011" . " " . $inrecsis[$ip] . " ~~~" . $versus . "
"; eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; //echo "' [0_thisf]',' max([-1_thisf]+[0_thisf],1)',' max([-1_thisf]+[0_thisf],1)/[0_thisf]' qw00011" . " " . $jnterim . "
"; } else if (strpos($inrecsis[$ip],"-") !== false && is_numeric(str_replace(" ","",str_replace("-","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"-") !== false) { eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else if (strpos($inrecsis[$ip],"*") !== false && is_numeric(str_replace(" ","",str_replace("*","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"*") !== false) { eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else if (strpos($inrecsis[$ip],"/") !== false && is_numeric(str_replace(" ","",str_replace("/","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"/") !== false) { eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else if (strpos($inrecsis[$ip],"%") !== false && is_numeric(str_replace(" ","",str_replace("%","",$inrecsis[$ip]))) && strpos(substr(($inrecsis[$ip] . "x"),1),"%") !== false) { eval("\$ournum " . "=" . " $inrecsis[$ip];"); $jnterim.=$jndelim . $ournum; $jndelim=","; } else { $jnterim.=$jndelim . $inrecsis[$ip]; $jndelim=","; } } if ($jnterim != ($beforebits . $ndel)) $interim=$jnterim; $ku=(-1 + sizeof($colsarris)); //echo "0" . $proposed . " vs " . $interim . "
"; if (sizeof($inrecsis) == sizeof($colsarris) && strpos($thiscollist, ",") !== false && strpos($inrecis, ",") !== false) { //echo "1" . $inrecis . "
"; $versus=str_replace("(+","(0+",str_replace("] ","]+",explode(",", $inrecis)[-1 + sizeof(explode(",", $inrecis))])); if ($versus != "") { //echo "11" . $versus . "
"; $huhseq=explode("=", (ltrim($versus) . "=")); //[1]; $allbut=str_replace("`","",str_replace("," . $versus . "`",",",("`" . $inrecis . "`"))); if (strpos(("~" . $proposed . "~"), "~" . $allbut) !== false || $proposed == "") { //echo "12" . "~" . $allbut . " in " . str_replace("|","~",$beforebits) . "
"; $findings=explode("~" . $allbut, ("~" . str_replace("|","~",$beforebits) . "~")); if (sizeof($findings) == 2) { //echo "13 " . $findings[1] . "
"; if (is_numeric(explode(",",explode("~",$findings[1])[0])[0])) { $isnum=explode(",",explode("~",$findings[1])[0])[0]; $isthere=true; } else { $isnum="gfdsgfds"; } } } //echo $isnum . "
"; if (is_numeric($isnum) && in_array($huhseq[0],$op) && is_numeric($huhseq[1]) && $huhseq[1] != "" && strpos($versus,"=") !== false && substr(($versus . "z"),0,1) == " ") { if (!$isthere) { $ournum=0; eval("\$ournum " . $huhseq[0] . "=" . " \"$huhseq[1]\";"); $interim=$beforebits . $ndel . $allbut . $ournum; } else { $ournum=explode(",",explode("~",$findings[1])[0])[0]; eval("\$ournum " . $huhseq[0] . "=" . " \"$huhseq[1]\";"); $interim=str_replace($allbut . $isnum,$allbut . $ournum,$beforebits); } } else if (is_numeric($isnum) && ($versus . "z") == " ++z") { if (!$isthere) { $ournum=0; $ournum++; $interim=$beforebits . $ndel . $allbut . $ournum; } else { $ournum=explode(",",explode("~",$findings[1])[0])[0]; $ournum++; $interim=str_replace($allbut . $isnum,$allbut . $ournum,$beforebits); } } else if (is_numeric($isnum) && ($versus . "z") == " --z") { if (!$isthere) { $ournum=0; $ournum--; $interim=$beforebits . $ndel . $allbut . $ournum; } else { $ournum=explode(",",explode("~",$findings[1])[0])[0]; $ournum--; $interim=str_replace($allbut . $isnum,$allbut . $ournum,$beforebits); } } } } return $interim; } function within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata) { global $inrecsis; $op = array("+", "-", "/", "*", "%"); $optwo = array("++", "--"); $outrec=$inrecis; $ju=0; for ($iu=0; $iu"; return $outrec; } function isrec_relevant($inrecis, $colarris, $arrayindex, $uptonow, $thistablename, $thistabledata) { global $inrecsis,$initialrec,$hshr,$hrvs,$bitsd,$cwhereset,$cwherefld,$cwhereeq,$cwhereval,$cwhereao,$cwheretrues,$cwheredelim,$cwheretrue,$deletenow,$updatenow,$shownow; if (!$cwheretrue) return true; $colsarris=explode(',',$colarris); $inrecsis=explode(',',$inrecis); $cwheresset=explode(',',$cwhereset); $cwheresfld=explode(',',$cwherefld); $cwhereweq=explode(',',$cwhereeq); $cwheresval=explode(',',$cwhereval); $cwheresao=explode(',',$cwhereao); $cwherestrues=explode(',',$cwheretrues); $ju=0; $val=""; $versus=""; $retval=$cwheretue; for ($iu=0; $iu"; if ($cwhereweq[$iu] == "=") { if ($val == $versus) { //echo sizeof($cwheresfld) . " val=" . $val . " versus=" . $versus . " equal
"; $cwherestrues[$iu] = "1"; } else { //echo sizeof($cwheresfld) . " val=" . $val . " versus=" . $versus . " not equal
"; $cwherestrues[$iu] = "0"; } } else if ($cwhereweq[$iu] == "!=") { if ($val == $versus) { $cwherestrues[$iu] = "0"; } else { $cwherestrues[$iu] = "1"; } } else if ($cwhereweq[$iu] == ">") { if ($val > $versus) { $cwherestrues[$iu] = "1"; } else { $cwherestrues[$iu] = "0"; } } else if ($cwhereweq[$iu] == ">=") { if ($val >= $versus) { $cwherestrues[$iu] = "1"; } else { $cwherestrues[$iu] = "0"; } } else if ($cwhereweq[$iu] == "<") { if ($val < $versus) { $cwherestrues[$iu] = "1"; } else { $cwherestrues[$iu] = "0"; } } else if ($cwhereweq[$iu] == "<=") { if ($val <= $versus) { $cwherestrues[$iu] = "1"; } else { $cwherestrues[$iu] = "0"; } } else if (str_replace("not","",$cwhereweq[$iu]) != $cwhereweq[$iu] && str_replace("like","",$cwhereweq[$iu]) != $cwhereweq[$iu]) { $huhf=preg_match("/" . $versus . "/",$val); if ($huhf == 1) { $cwherestrues[$iu] = "0"; } else { $cwherestrues[$iu] = "1"; } } else if (str_replace("like","",$cwhereweq[$iu]) != $cwhereweq[$iu]) { $huhf=preg_match("/" . $versus . "/",$val); //echo $cwhereweq[$iu] . " " . $huhf . "
"; if ($huhf == 1) { //echo "here at versus,val=" . $versus . "," . $val . " " . preg_match("/" . $versus . "/",$val) . "
"; $cwherestrues[$iu] = "1"; } else { $cwherestrues[$iu] = "0"; } } } } } if ($cwherestrues[0] == "1") $retval=true; if ($cwherestrues[0] == "0") $retval=false; for ($iu=1; $iu"; if (strpos($bitsd, "~" . $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis . "~","~" . $outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis . "~","~",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace($inrecis . "~","",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, "~" . $inrecis) !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis,"",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } } return $retval; } else if ($retval && $cwherestrues[$iu] == "1" && $cwheresao != "OR") { $retval=true; } else if ($retval && $cwherestrues[$iu] == "1" && $cwheresao == "OR") { if ($retval) { $shownow=0; $updatenow=0; $deletenow=true; if (strpos($bitsd, "~" . $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis . "~","~" . $outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis . "~","~",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace($inrecis . "~","",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, "~" . $inrecis) !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis,"~" . $outrecis,$bitsd); } else { $bitsd=str_replace("~" . $inrecis,"",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } } //echo $inrecis . " x " . $colarris . " x " . $arrayindex . " d " . $retval . "
"; return $retval; } else if (!$retval && $cwherestrues[$iu] == "0" && $cwheresao == "OR") { $retval=false; } else if (!$retval && $cwherestrues[$iu] == "0" && $cwheresao != "OR") { if ($retval) { $shownow=0; $updatenow=0; $deletenow=true; if (strpos($bitsd, "~" . $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis . "~","~" . $outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis . "~","~",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace($inrecis . "~","",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, "~" . $inrecis) !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis,"~" . $outrecis,$bitsd); } else { $bitsd=str_replace("~" . $inrecis,"",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } } //echo $inrecis . " z " . $colarris . " z " . $arrayindex . " d " . $retval . "
"; return $retval; } else if ($retval && $cwherestrues[$iu] == "0" && $cwheresao != "OR") { $retval=false; if ($retval) { $shownow=0; $updatenow=0; $deletenow=true; if (strpos($bitsd, "~" . $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis . "~","~" . $outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis . "~","~",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace($inrecis . "~","",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, "~" . $inrecis) !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis,"~" . $outrecis,$bitsd); } else { $bitsd=str_replace("~" . $inrecis,"",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } } //echo $inrecis . " b " . $colarris . " b " . $arrayindex . " d " . $retval . "
"; return $retval; } else if ($retval && $cwherestrues[$iu] == "0" && $cwheresao == "OR") { $retval=true; } } if ($retval) { $shownow=0; $updatenow=0; $deletenow=true; if (strpos($bitsd, "~" . $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis . "~","~" . $outrecis . "~",$bitsd); } else { $bitsd=str_replace("~" . $inrecis . "~","~",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, $inrecis . "~") !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace($inrecis . "~",$outrecis . "~",$bitsd); } else { $bitsd=str_replace($inrecis . "~","",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } else if (strpos($bitsd, "~" . $inrecis) !== false) { if ($cwhereset != "") { $outrecis=within($cwheresset, $inrecis, $inrecsis, $colsarris, $thistablename, $thistabledata); $bitsd=str_replace("~" . $inrecis,"~" . $outrecis,$bitsd); } else { $bitsd=str_replace("~" . $inrecis,"",$bitsd); //if ($bitsd != "") echo $inrecis . " " . $bitsd . "
"; } } //echo $inrecis . " d " . $colarris . " d " . $arrayindex . " d " . $cwhereval . " d " . $cwherestrues[0] . "GG" . $retval . "
"; } //echo $inrecis . " d " . $colarris . " d " . $arrayindex . " d " . $cwhereval . " d " . sizeof($cwherestrues) . "F" . $cwherestrues[0] . "G" . $retval . "
"; return $retval; } if (!isset($_GET['first'])) { if (isset($_GET['sql'])) { $insql=urldecode($_GET['sql']); } else if (isset($_POST['sql'])) { $insql=urldecode($_POST['sql']); } if (isset($_POST['ssql'])) { $tnis=urldecode($_POST['stable']); $insql="SELECT * FROM " . $tnis; } else if (isset($_POST['isql'])) { $tnis=urldecode($_POST['itable']); $insql="INSERT INTO " . $tnis; } else if (isset($_POST['usql'])) { $tnis=urldecode($_POST['utable']); $insql="UPDATE " . $tnis . " SET 1=1 WHERE 1=1"; } else if (isset($_POST['dsql'])) { $tnis=urldecode($_POST['dtable']); $insql="DELETE FROM " . $tnis; } $iwhatisleft=explode("INSERT INTO ", $insql); $dwhatisleft=explode("DELETE FROM ", $insql); $uwhatisleft=explode("UPDATE ", $insql); if (isset($_GET['file'])) { $fis=urldecode($_GET['file']); $datais=@file_get_contents(urldecode($_GET['file'])); } else if (isset($_POST['file'])) { $fis=urldecode($_POST['file']); $datais=@file_get_contents(urldecode($_POST['file'])); } else if (file_exists("flat_file.dat")) { $fis="flat_file.dat"; $datais=@file_get_contents("flat_file.dat"); } $dbrecs=explode("`", $datais); $insideoptions=""; $allowed_insideoptions=""; $cwherefld=""; $cwhereeq=""; $cwhereval=""; $cwhereao=""; $cwheredelim=""; $cwheretrues=""; $cwheretrue=false; $cwhereset=""; $bits3=""; if (isset($_POST['ddl']) && strpos($_SERVER['SERVER_NAME'],$hrvs) !== false) { if (strpos(urldecode($_POST['ddl']),"' ") !== false) { $ddl_statement=str_replace("! =_","!+=_",str_replace("! _","!+_",str_replace("' char(43) '","+", str_replace("] ","]+",str_replace("' =","'+=",str_replace("' '","'++'",str_replace("' =","' +=",str_replace("' '","' ++'",urldecode($_POST['ddl']))))))))); //echo $ddl_statement . "
"; } else { $ddl_statement=str_replace("! =_","!+=_",str_replace("! _","!+_",str_replace("' char(43) '","+", str_replace("' =","'+=",str_replace("' '","'++'",str_replace("' =","' +=",str_replace("' '","' ++'",urldecode($_POST['ddl'])))))))); //echo $ddl_statement . " huh
"; } $ddls=explode("CREATE TABLE ", $ddl_statement); $ddlis=explode("INSERT INTO ", $ddl_statement); $ddlb=explode(" (", $ddl_statement); if ((sizeof($ddls) > 1) && strpos($hshr,$hrvs) !== false) { $ddl_table=explode(" (",explode(",",explode(";",explode(" ",$ddls[1])[0])[0])[0])[0]; $tnis=$ddl_table; $ddl_owner=str_replace("","",str_replace("https:","",$hshr)); for ($ij=0; $ij has been done once already and so we await, more, your SQL (DML) statements like INSERT INTO " . $ddl_table . " (" . str_replace("\n","",$bits[1]) . ") VALUES " . $hc . " to populate this flat file data table."; $insql="SELECT * FROM " . $ddl_table; if (strpos($ddl_statement,'INSERT INTO ') === false && $ddl_table == explode(" ",$tnis)[0] && sizeof($bits) == 4 && strpos($insql,"SELECT * FROM ") !== false && strpos($insql,"_poll") !== false) { $bits=explode("|",$dbrecs[$i]); $bits3=$bits[3]; $themes=explode(" ",str_replace("moviegenre","Favourite Movie Genre",str_replace("_"," ",str_replace("_poll","",str_replace("\n","",$bits[0]))))); $htitle=""; $hdelim=""; for ($ih=0; $ih 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } } else if (sizeof($ddlb) > 1) { if (strlen(str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0]))) > 0) { $initialrec=""; if ((sizeof($ddlis) > 1) && strpos(str_replace("","",str_replace("https:","",$hshr)),$hrvs) !== false) { $xddl_table=explode(" (",explode(",",explode(";",explode(" ",$ddlis[1])[0])[0])[0])[0]; $xddl_owner=str_replace("","",str_replace("https:","",$hshr)); if (sizeof($ddlb) >= 4 && $xddl_table == $ddl_table && $xddl_owner == $ddl_owner) { $tnis=$xddl_table; //echo "preinitialrec=" . $ddlb[-1 + sizeof($ddlb)] . "
"; $initialrec=str_replace("`","",str_replace("`'","",str_replace("'`","",("`" . str_replace("\n","",str_replace("'","",str_replace("','"," ,",explode(");",$ddlb[-1 + sizeof($ddlb)])[0])) . "`"))))); //echo "initialrec=" . $initialrec . "
"; $ddlis=explode(" (", " "); } } $ndelim=""; //if (str_replace("\n","",$bits[3]) != "") $ndelim="~"; if (isset($_POST['listddl'])) { if (strlen($_POST['listddl']) == 0) { $pp=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|" . "" . "\n`"; $ppb=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|"; //echo "q00" . " " . $bits3 . "
"; file_put_contents($fis, rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|" . lastmapping("",rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) ,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits3) ) . "\n`"); } else { $pp=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";" . urldecode($_POST['listddl']) . "\n|" . "" . "\n`"; $ppb=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";" . urldecode($_POST['listddl']) . "\n|"; //echo "qq00" . " " . $bits3 . "
"; file_put_contents($fis, rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";" . urldecode($_POST['listddl']) . "\n|" . lastmapping("",rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) ,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits3) ) . "\n`"); } } else { $pp=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|" . "" . "\n`"; $ppb=rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|"; //echo "qqq00" . " " . $bits3 . " "; // . lastmapping("",rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) ,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits3) ) . "
"; file_put_contents($fis, rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|" . lastmapping("",rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) ,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits3) ) . "\n`"); } //file_put_contents($fis, rtrim($datais) . "\n" . $ddl_table . "\n|" . str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n|" . $ddl_owner . "^" . $_SERVER['REMOTE_ADDR'] . ";\n|" . lastmapping(rtrim($dbrecs[$i]) . $ndelim . $initialrec,rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",$bits[1])) . "\n`"); //file_put_contents($fis, $ppb . lastmapping("",rtrim($ppb),$ndelim,$initialrec,str_replace("\n","",str_replace("'","",explode(")",$ddlb[1])[0])) . "\n`")); if ($initialrec != "") { $initialrec=""; $insql="SELECT * FROM " . $ddl_table; if (str_replace("\n","",$bits[0]) == explode(" ",$tnis)[0] && sizeof($bits) == 4 && strpos($insql,"SELECT * FROM ") !== false && strpos($insql,"_poll") !== false) { $themes=explode(" ",str_replace("moviegenre","Favourite Movie Genre",str_replace("_"," ",str_replace("_poll","",str_replace("\n","",$bits[0]))))); $htitle=""; $hdelim=""; for ($ih=0; $ih 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } } $datais=@file_get_contents($fis); $dbrecs=explode("`", $datais); $ddl_exists=true; } } } if ((sizeof($ddlis) > 1) && strpos(str_replace("","",str_replace("https:","",$hshr)),$hrvs) !== false) { $ddl_table=explode(" (",explode(",",explode(";",explode(" ",$ddlis[1])[0])[0])[0])[0]; $tnis=$ddl_table; $ddl_owner=str_replace("","",str_replace("https:","",$hshr)); for ($ij=0; $ij can not be processed without a preceeding CREATE TABLE " . $ddl_table . " (colname1,colname2,colname3) type of Flat File DDL SQL statement."; $insql="SELECT * FROM " . $ddl_table; if (str_replace("\n","",$bits[0]) == explode(" ",$tnis)[0] && sizeof($bits) == 4 && strpos($insql,"SELECT * FROM ") !== false && strpos($insql,"_poll") !== false) { $themes=explode(" ",str_replace("moviegenre","Favourite Movie Genre",str_replace("_"," ",str_replace("_poll","",str_replace("\n","",$bits[0]))))); $htitle=""; $hdelim=""; for ($ih=0; $ih 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } } else if (sizeof($ddlb) >= 3) { $initialrec=str_replace("`","",str_replace("`'","",str_replace("'`","",("`" . str_replace("\n","",str_replace("'","",str_replace("','"," ,",explode(");",$ddlb[-1 + sizeof($ddlb)])[0])) . "`"))))); //echo "initialrEc=" . $initialrec . "
"; } } } for ($i=0; $i"; $newdatais=str_replace(rtrim($dbrecs[$i]), lastmapping(rtrim($dbrecs[$i]) . $ndelim . $initialrec,rtrim($dbrecs[$i]),$ndelim,$initialrec,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits[1]) ,str_replace("\n","",$bits[3]) ), $datais); file_put_contents($fis, rev_filter($newdatais)); $datais=@file_get_contents($fis); $dbrecs=explode("`", $datais); $bits=explode("|",$dbrecs[$i]); //if (sizeof($bits) == 3) $bits[3]=""; $initialrec=""; $insql="SELECT * FROM " . $ddl_table; if (str_replace("\n","",$bits[0]) == explode(" ",$tnis)[0] && sizeof($bits) == 4 && strpos($insql,"SELECT * FROM ") !== false && strpos($insql,"_poll") !== false) { $bits3=$bits[3]; $themes=explode(" ",str_replace("moviegenre","Favourite Movie Genre",str_replace("_"," ",str_replace("_poll","",str_replace("\n","",$bits[0]))))); $htitle=""; $hdelim=""; for ($ih=0; $ih 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } } } } $ucollistbit=""; $uwcollistbit=""; $collistbit=""; $blanks=""; $dl=""; $cdl="'"; $acdl=""; $aacdl=""; $eqetc=""; $andor=""; $selgen=""; $colblanks=explode(",",str_replace("\n","",$bits[1])); if (str_replace("\n","",$bits[0]) == explode(" ",$tnis)[0] && sizeof($bits) == 4 && strpos($insql,"SELECT * FROM ") !== false && strpos($insql,"_poll") !== false) { $themes=explode(" ",str_replace("moviegenre","Favourite Movie Genre",str_replace("_"," ",str_replace("_poll","",str_replace("\n","",$bits[0]))))); $htitle=""; $hdelim=""; for ($ih=0; $ih 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } if (sizeof($bits) == 4 && isset($_POST['isql']) && str_replace("\n","",$bits[0]) == $tnis) { $insql.=" (" . str_replace("\n","",$bits[1]) . ") VALUES ("; $rows=explode("~",rtrim($bits[3])); if (str_replace("\n","",$bits[3]) != "") { if ($irecord == "") $irecord="~"; } } $idelim=""; for ($ii=0; $ii","",$selgen); if ($ii == 0) { // update where if (!isset($_POST['nw' . $colblanks[$ii]]) && isset($_POST['usql']) && str_replace("\n","",$bits[0]) == $tnis) { $updatenow=0; } else if (isset($_POST['eqq' . $colblanks[$ii]]) && isset($_POST['nw' . $colblanks[$ii]]) && isset($_POST['usql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['ao' . $colblanks[$ii]])) $cwhereao=urldecode($_POST['ao' . $colblanks[$ii]]); $cwherefld=urldecode($_POST['nw' . $colblanks[$ii]]); $cwhereeq=urldecode($_POST['eqq' . $colblanks[$ii]]); $cwhereval=urldecode($_POST['ux_' . $colblanks[$ii]]); $cwhereset=" SET " . urldecode($_POST['un' . $colblanks[$ii]]) . "='" . urldecode($_POST['u' . $colblanks[$ii]]) . "'"; $cwheretrues="0"; $cwheretrue=true; $cwheredelim=","; $bitsd=str_replace("\n","",$bits[3]); $insql=str_replace(" SET 1=1 WHERE 1=1","",$insql) . " WHERE " . $cwherefld . $cwhereeq . "'" . $cwhereval . "'"; } } else if ($cwheredelim != "" && isset($_POST['nw' . $colblanks[$ii]]) && isset($_POST['usql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['ao' . $colblanks[$ii]])) $cwhereao.=$cwheredelim . urldecode($_POST['ao' . $colblanks[$ii]]); $cwherefld.=$cwheredelim . urldecode($_POST['nw' . $colblanks[$ii]]); $cwhereeq.=$cwheredelim . urldecode($_POST['eqq' . $colblanks[$ii]]); $cwhereval.=$cwheredelim . urldecode($_POST['ux_' . $colblanks[$ii]]); $cwheretrues.=$cwheredelim . "0"; $cwheretrue=true; $cwheredelim=","; $bitsd=str_replace("\n","",$bits[3]); if (isset($_POST['un' . $colblanks[$ii]])) $cwhereset.=$cwheredelim . urldecode($_POST['un' . $colblanks[$ii]]) . "='" . urldecode($_POST['u' . $colblanks[$ii]]) . "'"; $insql.=" " . urldecode($_POST['ao' . $colblanks[$ii]]) . " " . urldecode($_POST['nw' . $colblanks[$ii]]) . urldecode($_POST['eqq' . $colblanks[$ii]]) . "'" . urldecode($_POST['ux_' . $colblanks[$ii]]) . "'"; } else if ($cwheredelim != "" && isset($_POST['un' . $colblanks[$ii]]) && isset($_POST['usql']) && str_replace("\n","",$bits[0]) == $tnis) { $cwhereset.=$cwheredelim . urldecode($_POST['un' . $colblanks[$ii]]) . "='" . urldecode($_POST['u' . $colblanks[$ii]]) . "'"; $bitsd=str_replace("\n","",$bits[3]); } if ($ii == 0) { // delete where if (!isset($_POST['ynw' . $colblanks[$ii]]) && isset($_POST['dsql']) && str_replace("\n","",$bits[0]) == $tnis) { $deletenow=true; } else if (isset($_POST['yeqq' . $colblanks[$ii]]) && isset($_POST['ynw' . $colblanks[$ii]]) && isset($_POST['dsql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['yao' . $colblanks[$ii]])) $cwhereao=urldecode($_POST['yao' . $colblanks[$ii]]); $cwherefld=urldecode($_POST['ynw' . $colblanks[$ii]]); $cwhereeq=urldecode($_POST['yeqq' . $colblanks[$ii]]); $cwhereval=urldecode($_POST['yux_' . $colblanks[$ii]]); $cwheretrues="0"; $cwheretrue=true; $cwheredelim=","; $insql.=" WHERE " . $cwherefld . $cwhereeq . "'" . $cwhereval . "'"; $bitsd=str_replace("\n","",$bits[3]); } } else if ($cwheredelim != "" && isset($_POST['ynw' . $colblanks[$ii]]) && isset($_POST['dsql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['yao' . $colblanks[$ii]])) $cwhereao.=$cwheredelim . urldecode($_POST['yao' . $colblanks[$ii]]); $cwherefld.=$cwheredelim . urldecode($_POST['ynw' . $colblanks[$ii]]); $cwhereeq.=$cwheredelim . urldecode($_POST['yeqq' . $colblanks[$ii]]); $cwhereval.=$cwheredelim . urldecode($_POST['yux_' . $colblanks[$ii]]); $cwheretrues.=$cwheredelim . "0"; $cwheretrue=true; $cwheredelim=","; $insql.=" " . urldecode($_POST['yao' . $colblanks[$ii]]) . " " . urldecode($_POST['ynw' . $colblanks[$ii]]) . urldecode($_POST['yeqq' . $colblanks[$ii]]) . "'" . urldecode($_POST['yux_' . $colblanks[$ii]]) . "'"; $bitsd=str_replace("\n","",$bits[3]); } if ($ii == 0) { // select where if (!isset($_POST['knw' . $colblanks[$ii]]) && isset($_POST['ssql']) && str_replace("\n","",$bits[0]) == $tnis) { $shownow=0; } else if (isset($_POST['keqq' . $colblanks[$ii]]) && isset($_POST['knw' . $colblanks[$ii]]) && isset($_POST['ssql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['kao' . $colblanks[$ii]])) $cwhereao==urldecode($_POST['kao' . $colblanks[$ii]]); $cwherefld=urldecode($_POST['knw' . $colblanks[$ii]]); $cwhereeq=urldecode($_POST['keqq' . $colblanks[$ii]]); $cwhereval=urldecode($_POST['kux_' . $colblanks[$ii]]); $cwheretrues="0"; $cwheretrue=true; $cwheredelim=","; $insql.=" WHERE " . $cwherefld . $cwhereeq . "'" . $cwhereval . "'"; } } else if ($cwheredelim != "" && isset($_POST['knw' . $colblanks[$ii]]) && isset($_POST['ssql']) && str_replace("\n","",$bits[0]) == $tnis) { if (isset($_POST['kao' . $colblanks[$ii]])) $cwhereao.=$cwheredelim . urldecode($_POST['kao' . $colblanks[$ii]]); $cwherefld.=$cwheredelim . urldecode($_POST['knw' . $colblanks[$ii]]); $cwhereeq.=$cwheredelim . urldecode($_POST['keqq' . $colblanks[$ii]]); $cwhereval.=$cwheredelim . urldecode($_POST['kux_' . $colblanks[$ii]]); $cwheretrues.=$cwheredelim . "0"; $cwheretrue=true; $cwheredelim=","; $insql.=" " . urldecode($_POST['kao' . $colblanks[$ii]]) . " " . urldecode($_POST['knw' . $colblanks[$ii]]) . urldecode($_POST['keqq' . $colblanks[$ii]]) . "'" . urldecode($_POST['kux_' . $colblanks[$ii]]) . "'"; } if (isset($_POST[$colblanks[$ii]]) && isset($_POST['isql']) && str_replace("\n","",$bits[0]) == $tnis) { $irecord.=($idelim . str_replace('`','',str_replace('~','',str_replace(',','',str_replace('|','',urldecode($_POST[$colblanks[$ii]])))))); $insql.=($idelim . "'" . str_replace('`','',str_replace('~','',str_replace(',','',str_replace('|','',urldecode($_POST[$colblanks[$ii]])))))) . "'"; $idelim=","; } } if (isset($_POST['isql']) && sizeof($iwhatisleft) == 2 && str_replace("\n","",$bits[0]) == $tnis) { $insql.=")"; $newdatais=str_replace(rtrim($dbrecs[$i]), rtrim($dbrecs[$i]) . $irecord, $datais); file_put_contents($fis, rev_filter($newdatais)); } if (isset($_POST['dsql']) && sizeof($dwhatisleft) == 2 && str_replace("\n","",$bits[0]) == $tnis && ($deletenow || $bitsd != "")) { if ($bitsd != "") { $gotridof="; /* ... got rid of the following record(s) ... */"; $jnum=0; for ($qi=0; $qi 1) { $htitle.=$hdelim . strtoupper(substr($themes[$ih],0,1)) . strtolower(substr($themes[$ih],1)); } else { $htitle.=$hdelim . $themes[$ih]; } $hdelim=" "; } $bonload=" onload=\" document.getElementById('mys').click();\" "; $hdatas=explode("~",str_replace("\n","",$bits[3])); $hdata=""; $hdelim=","; for ($ih=0; $ih "; $tablemidbit="" . $formbits; } if (sizeof($bits) == 4) { $yellow="orange"; $results.=$tableprefix . "
#


"; $cols=explode(",",$bits[1]); for ($j=0; $j", "" . str_replace("\n","",$cols[$j]) . "", $results); } $rows=explode("~",rtrim($bits[3])); if (rtrim($bits[3]) != "") { for ($j=0; $j", "" . ($jnum + 1) . " ", $results); } else { $results=str_replace("", "" . ($jnum + 1) . "", $results); } $jnum++; } $rhs=""; for ($jj=0; $jj"; } else { $results=str_replace("", "" . reverse_filter($rowcols[$jj]) . "", $results); } } } $results=str_replace("" . ($jnum) . " <", "" . ($jnum) . "" . $rhs . "<", $results); } } if ($jnum == 1) { $results.="

" . $jnum . " row selected.

" . $tablemidbit . $tablesuffix; } else { $results.="

" . $jnum . " rows selected.

" . $tablemidbit . $tablesuffix; } if ($shownow < 0) $results="

No rows found with " . rev_filter($qinsql) . "

" . $tablemidbit . $tablesuffix; } else { $results="

Data table called " . explode(" ",$whatisleft[1])[0] . " found in flat file database has invalid data content.



" . $tablemidbit . $tablesuffix; } } } //echo $bitsd . "

"; } $deletenow=true; if (rtrim($bits[3]) != "") { if ($bitsd != "") { //if (strpos(rtrim($dbrecs[$i]),rtrim($bits[3])) !== false) echo "is " . rtrim($bitsd) . " in " . rtrim($dbrecs[$i]); $newdatais=str_replace(rtrim($dbrecs[$i]), str_replace(rtrim($bits[3]),rtrim($bitsd),rtrim($dbrecs[$i])), $datais); } else { $newdatais=str_replace(rtrim($dbrecs[$i]), str_replace(rtrim($bits[3]),"",rtrim($dbrecs[$i])), $datais); } file_put_contents($fis, rev_filter($newdatais)); } } if (isset($_POST['usql']) && sizeof($uwhatisleft) == 2 && str_replace("\n","",$bits[0]) == $tnis && ($updatenow >= 0 || $bitsd != "")) { if ($bitsd != "") { $gotridof="; /* ... updated the following record(s) ... */"; $jnum=0; for ($qi=0; $qi#

"; $cols=explode(",",$bits[1]); for ($j=0; $j", "" . str_replace("\n","",$cols[$j]) . "", $results); } $rows=explode("~",rtrim($bits[3])); if (rtrim($bits[3]) != "") { for ($j=0; $j", "" . ($jnum + 1) . " ", $results); } else { $results=str_replace("", "" . ($jnum + 1) . "", $results); } $jnum++; } $rhs=""; for ($jj=0; $jj", "" . reverse_filter($rowcols[$jj]) . "", $results); //} if ($show) { if (strpos($bits[0],"fibonacci_") !== false) { $rhs.="" . reverse_filter($rowcols[$jj]) . ""; } else { $results=str_replace("", "" . reverse_filter($rowcols[$jj]) . "", $results); } } } $results=str_replace("" . ($jnum) . " <", "" . ($jnum) . "" . $rhs . "<", $results); } } if ($jnum == 1) { $results.="

" . $jnum . " row selected.

" . $tablemidbit . $tablesuffix; } else { $results.="

" . $jnum . " rows selected.

" . $tablemidbit . $tablesuffix; } if ($shownow < 0) $results="

No rows found with " . rev_filter($qinsql) . "

" . $tablemidbit . $tablesuffix; } else { $results="

Data table called " . explode(" ",$whatisleft[1])[0] . " found in flat file database has invalid data content.



" . $tablemidbit . $tablesuffix; } } } //echo $bitsd . "

"; } $updatenow=0; if (rtrim($bits[3]) != "") { if ($bitsd != "") { //if (strpos(rtrim($dbrecs[$i]),rtrim($bits[3])) !== false) echo "is " . rtrim($bitsd) . " in " . rtrim($dbrecs[$i]); $newdatais=str_replace(rtrim($dbrecs[$i]), str_replace(rtrim($bits[3]),rtrim($bitsd),rtrim($dbrecs[$i])), $datais); } else { $newdatais=str_replace(rtrim($dbrecs[$i]), str_replace(rtrim($bits[3]),"",rtrim($dbrecs[$i])), $datais); } file_put_contents($fis, rev_filter($newdatais)); } } for ($ii=0; $ii" . str_replace(",","",str_replace(",'","'",$cdl)); $uwcollistbit.=$acdl . str_replace(" value=" . $colblanks[$ii], " selected value=" . $colblanks[$ii], str_replace("?","w" . $colblanks[$ii],$selgen)) . str_replace("?","q" . $colblanks[$ii],$eqetc) . str_replace(",","",$cdl) . "" . str_replace(",","",str_replace(",'","'",$cdl)); $collistbit.=$cdl . "" . str_replace(",","",$cdl); $dl=","; $cdl=",'"; if ($ii < (-1 + sizeof($colblanks))) { $acdl="
" . str_replace("?",$colblanks[1 + $ii],$andor) . " "; $aacdl="
"; } } $insideoptions.=""; if ($thisallowed) $allowed_insideoptions.=""; } } $ask="
SELECT SQL to process:
SELECT * FROM



INSERT SQL to process:
INSERT INTO
VALUES (
''
)



UPDATE SQL to process:
UPDATE
SET
1=1

WHERE
1=1



DELETE SQL to process:
DELETE FROM



"; if ($cwhereset != "") { $insql=str_replace(" WHERE ", " " . $cwhereset . " WHERE ",$insql); $cwhereset=""; } if ($datais != "") { if ($insql != "") { if (strpos(rev_filter($insql), "UPDATE ") !== false) { $whatisleft=["",$tnis]; } else { $whatisleft=explode("SELECT * FROM ", str_replace("DELETE FROM ","SELECT * FROM ",rev_filter($insql))); } if (sizeof($whatisleft) > 1) { if ($whatisleft[1] == "") { $results="

Nothing much to do.



"; } else if (strpos($insideoptions,">" . explode(" ",$whatisleft[1])[0] . "<") === false) { $results="

No data table called " . explode(" ",$whatisleft[1])[0] . " found in flat file database.



"; } else { $results="

Results for ... " . rev_filter($insql) . $gotridof . "


"; $jnum=0; for ($i=0; $i#

"; $cols=explode(",",$bits[1]); for ($j=0; $j", "" . str_replace("\n","",$cols[$j]) . "", $results); } $rows=explode("~",rtrim(str_replace(" ,",",",$bits[3]))); if (rtrim($bits[3]) != "") { for ($j=0; $j", "" . ($jnum + 1) . " ", $results); } else { $results=str_replace("", "" . ($jnum + 1) . "", $results); } $jnum++; } $rhs=""; for ($jj=0; $jj", "" . reverse_filter($rowcols[$jj]) . "", $results); if ($show) { if (strpos($bits[0],"fibonacci_") !== false) { $rhs.="" . reverse_filter($rowcols[$jj]) . ""; } else { $results=str_replace("", "" . reverse_filter($rowcols[$jj]) . "", $results); } } } $results=str_replace("" . ($jnum) . " <", "" . ($jnum) . "" . $rhs . "<", $results); } } if ($jnum == 1) { $results.="

" . $jnum . " row selected.

" . $tablemidbit . $tablesuffix; } else { $results.="

" . $jnum . " rows selected.

" . $tablemidbit . $tablesuffix; } if ($shownow < 0) $results="

No rows found with " . rev_filter($insql) . "

" . $tablemidbit . $tablesuffix; } else { $results="

Data table called " . explode(" ",$whatisleft[1])[0] . " found in flat file database has invalid data content.



" . $tablemidbit . $tablesuffix; } } } } } else if (isset($_POST['dsql']) && sizeof($dwhatisleft) == 2 && deletenow) { $results="

Record(s) deleted via " . rev_filter($insql) . ";



"; } else if (isset($_POST['usql']) && sizeof($uwhatisleft) == 2) { if ($cwhereset != "") { $insql=str_replace(" WHERE ", " " . $cwhereset . " WHERE ",$insql); $cwhereset=""; } $results="

Record(s) updated via " . rev_filter($insql) . ";



"; } else if (isset($_POST['isql']) && sizeof($iwhatisleft) == 2) { $results="

Record inserted via " . rev_filter($insql) . ";



"; } else { $results="

Nothing to do for " . rev_filter($insql) . ";



"; } } echo "Flat file data source engine - RJM Programming - April, 2017 var ltitle='ClickDeletes'; " . $cfilter . " function oc(othis) { if (ltitle == 'ClickDeletes') { othis.innerHTML=String.fromCharCode(32); } ltitle='ClickDeletes'; } function ocsuw() { document.getElementById('suwcollist').innerHTML=''; } function ocsuwd() { document.getElementById('suwdcollist').innerHTML=''; }

Flat File SQL Engine

RJM Programming - April, 2017

" . $results . $ask . ""; } else { echo "Flat file data source engine - RJM Programming - April, 2017 var ltitle='ClickDeletes'; " . $cfilter . " function oc(othis) { if (ltitle == 'ClickDeletes') { othis.innerHTML=String.fromCharCode(32); } ltitle='ClickDeletes'; } function ocsuw() { document.getElementById('suwcollist').innerHTML=''; } function ocsuwd() { document.getElementById('suwdcollist').innerHTML=''; } "; } } ?>