/** Searches a string for an array of posibilities. */
function array_stringsearch($string, $arr){
return knjarray::stringsearch($string, $arr);
}
/** Returns the registered operating-system - "windows", "linux", "mac" or "bot". */
static function getOS(){
require_once("knj/functions_array.php");
$bots = array(
"yahoo! slurp",
"msnbot",
"googlebot",
"adsbot",
"ask jeeves",
"conpilot crawler",
"yandex",
"exabot",
"hostharvest",
"dotbot",
"ia_archiver",
"httpclient",
"spider.html",
"comodo-certificates-spider",
"sbider",
"speedy spider",
"spbot",
"aihitbot",
"scoutjet",
"com_bot",
"aihitbot",
"robot.html",
"robot.htm",
"catchbot",
"baiduspider",
"setoozbot",
"sslbot",
"browsershots",
"perl",
"wget",
"w3c_validator"
);
if (array_key_exists("HTTP_USER_AGENT", $_SERVER)){
$ua = strtolower($_SERVER["HTTP_USER_AGENT"]);
}else{
return "unknown";
}
if (strpos($ua, "windows") !== false){
return "windows";
}elseif(strpos($ua, "linux") !== false){
return "linux";
}elseif(strpos($ua, "mac") !== false){
return "mac";
}elseif(strpos($ua, "playstation") !== false){
return "playstation";
}elseif(strpos($ua, "nintendo wii") !== false){
return "wii";
}elseif(knjarray::stringsearch($ua, $bots)){
return "bot";
}elseif(strpos($ua, "sunos") !== false){
return "sun";
}elseif(trim($ua) == ""){
return false;
}else{
return "unknown";
}
}
function makeWhere($where){
$first = true;
foreach($where AS $key => $value){
if ($first == true){
$first = false;
}else{
$sql .= " AND ";
}
if (is_array($value)){
$sql .= $this->sep_col . $key . $this->sep_col . " IN (" . knjarray::implode(array("array" => $value, "impl" => ",", "surr" => "'", "self_callback" => array($this, "sql"))) . ")";
}else{
$sql .= $this->sep_col . $key . $this->sep_col . " = " . $this->sep_val . $this->sql($value) . $this->sep_val;
}
}
return $sql;
}
function sqlhelper(&$list_args, $args){
if ($args and array_key_exists("db", $args) and $args["db"]){
$db = $args["db"];
}else{
$db = $this->config["db"];
}
if ($args and array_key_exists("table", $args) and $args["table"]){
$table = $db->conn->sep_table . $db->escape_table($args["table"]) . $db->conn->sep_table . ".";
}else{
$table = "";
}
$colsep = $db->conn->sep_col;
if (!is_array($list_args)){
throw new exception("The arguments given was not an array.");
}
$sql_where = "";
$sql_limit = "";
$sql_order = "";
$dbrows_exist = array_key_exists("cols_dbrows", $args);
$num_exists = array_key_exists("cols_num", $args);
$str_exists = array_key_exists("cols_str", $args);
foreach($list_args as $list_key => $list_val){
$found = false;
if ($args and array_key_exists("utf8_decode", $args) and $args["utf8_decode"]){
$list_val = utf8_decode($list_val);
}
if (($str_exists and in_array($list_key, $args["cols_str"]) or ($num_exists and in_array($list_key, $args["cols_num"])))){
if (is_array($list_val)){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key) . $colsep . " IN (" . knjarray::implode(array("array" => $list_val, "impl" => ",", "surr" => "'", "self_callback" => array($db, "sql"))) . ")";
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key) . $colsep . " = '" . $db->sql($list_val) . "'";
}
$found = true;
}elseif(($str_exists or $num_exists) and preg_match("/^(.+)_(has|not)$/", $list_key, $match) and (($str_exists and in_array($match[1], $args["cols_str"])) or ($num_exists and in_array($match[1], $args["cols_num"])))){
if ($match[2] == "has"){
if ($list_val){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep . " != ''";
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep . " = ''";
}
$found = true;
}elseif($match[2] == "not"){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep . " != '" . $db->sql($list_val) . "'";
$found = true;
}
}elseif($dbrows_exist and in_array($list_key . "_id", $args["cols_dbrows"])){
if (!is_object($list_val) and !is_bool($list_val) and !is_array($list_val)){
throw new exception("Unknown type: " . gettype($list_val) . " for argument " . $list_key);
}elseif(is_object($list_val) and !method_exists($list_val, "id")){
throw new exception("Unknown method on object: " . get_class($list_val) . "->id().");
}
if ($list_val === true){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "_id") . $colsep . " != '0'";
}elseif($list_val === false){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "_id") . $colsep . " = '0'";
}elseif(is_array($list_val)){
if (empty($list_val)){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "_id") . $colsep . " = '-1'";
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "_id") . $colsep . " IN (" . knjarray::implode(array("array" => $list_val, "impl" => ",", "surr" => "'", "func_callback" => "id")) . ")";
}
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "_id") . $colsep . " = '" . $db->sql($list_val->id()) . "'";
}
$found = true;
}elseif($dbrows_exist and in_array($list_key . "Id", $args["cols_dbrows"])){
if (!is_object($list_val) and !is_bool($list_val)){
throw new exception("Unknown type: " . gettype($list_val));
}elseif(is_object($list_val) and !method_exists($list_val, "id")){
throw new exception("Unknown method on object: " . get_class($list_val) . "->id().");
}
if ($list_val === true){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "Id") . $colsep . " != '0'";
}elseif($list_val === false){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "Id") . $colsep . " = '0'";
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key . "Id") . $colsep . " = '" . $db->sql($list_val->id()) . "'";
}
$found = true;
}elseif($dbrows_exist and in_array($list_key, $args["cols_dbrows"])){
if (is_array($list_val)){
if (empty($list_val)) throw new exception("No elements was given in array.");
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key) . $colsep . " IN (" . knjarray::implode(array("array" => $list_val, "impl" => ",", "surr" => "'", "self_callback" => array($db, "sql"))) . ")";
}else{
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key) . $colsep . " = '" . $db->sql($list_val) . "'";
}
$found = true;
}elseif(array_key_exists("cols_bool", $args) and in_array($list_key, $args["cols_bool"])){
if ($list_val){
$list_val = "1";
}else{
$list_val = "0";
}
$sql_where .= " AND " . $table . $colsep . $db->escape_column($list_key) . $colsep . " = '" . $db->sql($list_val) . "'";
$found = true;
}elseif(substr($list_key, -7, 7) == "_search" and preg_match("/^(.+)_search$/", $list_key, $match) and (($str_exists and in_array($match[1], $args["cols_str"])) or ($dbrows_exist and in_array($match[1], $args["cols_dbrows"])) or ($num_exists and in_array($match[1], $args["cols_num"])))){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep . " LIKE '%" . $db->sql($list_val) . "%'";
$found = true;
}elseif(substr($list_key, -6, 6) == "_lower" and preg_match("/^(.+)_lower$/", $list_key, $match) and in_array($match[1], $args["cols_str"])){
$sql_where .= " AND LOWER(" . $table . $colsep . $db->escape_column($match[1]) . $colsep . ") = LOWER('" . $db->sql($list_val) . "')";
$found = true;
}elseif(array_key_exists("cols_num", $args) and preg_match("/^(.+)_(from|to)/", $list_key, $match) and in_array($match[1], $args["cols_num"])){
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep;
$found = true;
switch($match[2]){
case "from":
$sql_where .= " >= '" . $db->sql($list_val) . "'";
break;
case "to":
$sql_where .= " <= '" . $db->sql($list_val) . "'";
break;
default:
throw new exception("Invalid mode: " . $match[2]);
}
}elseif(array_key_exists("cols_dates", $args) and preg_match("/^(.+)_(date|time|from|to)/", $list_key, $match) and in_array($match[1], $args["cols_dates"])){
$found = true;
switch($match[2]){
case "date":
if (is_array($list_val)){
if (empty($list_val)){
throw new exception("Array was empty!");
}
$sql_where .= " AND (";
$first = true;
foreach($list_val as $time_s){
if ($first){
$first = false;
}else{
$sql_where .= " OR ";
}
$sql_where .= "DATE(" . $table . $colsep . $db->escape_column($match[1]) . $colsep . ")";
$sql_where .= " = '" . $db->sql($db->date_format($time_s, array("time" => false))) . "'";
}
$sql_where .= ")";
}else{
$sql_where .= " AND DATE(" . $table . $colsep . $db->escape_column($match[1]) . $colsep . ")";
$sql_where .= " = '" . $db->sql($db->date_format($list_val, array("time" => false))) . "'";
}
break;
case "time":
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep;
$sql_where .= " = '" . $db->sql($db->date_format($list_val, array("time" => true))) . "'";
case "from":
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep;
$sql_where .= " >= '" . $db->sql($db->date_format($list_val, array("time" => true))) . "'";
break;
case "to":
$sql_where .= " AND " . $table . $colsep . $db->escape_column($match[1]) . $colsep;
$sql_where .= " <= '" . $db->sql($db->date_format($list_val, array("time" => true))) . "'";
break;
default:
throw new exception("Invalid mode: " . $match[2]);
}
}elseif($list_key == "limit"){
$sql_limit .= " LIMIT " . intval($list_val);
$found = true;
}elseif($list_key == "limit_from" and $list_args["limit_to"]){
$sql_limit .= " LIMIT " . intval($list_val) . ", " . intval($list_args["limit_to"]);
$found = true;
}elseif($list_key == "limit_to"){
$found = true;
}elseif($list_key == "orderby"){
if (is_string($list_val)){
if ($args["orderby_callbacks"][$list_val]){
$orderby_res = $args["orderby_callbacks"][$list_val]();
if ($orderby_res){
$sql_order .= " ORDER BY " . $db->escape_column($orderby_res);
$found = true;
}
}else{
$sql_order .= " ORDER BY " . $table . $colsep . $db->escape_column($list_val) . $colsep;
$found = true;
}
}elseif(is_array($list_val)){
$found = true;
$sql_order .= " ORDER BY ";
$first = true;
foreach($list_val as $val_ele){
if ($first){
$first = false;
}else{
$sql_order .= ", ";
}
if (is_array($val_ele)){
$ordermode = strtolower($val_ele[1]);
$val_ele = $val_ele[0];
}
$sql_order .= $table . $colsep . $db->escape_column($val_ele) . $colsep;
if ($ordermode == "desc"){
$sql_order .= " DESC";
}elseif($ordermode == "asc"){
$sql_order .= " ASC";
}elseif($ordermode){
throw new exception("Invalid order-mode: " . $ordermode);
}
}
}
}
if ($found){
unset($list_args[$list_key]);
}
}
return array(
"sql_where" => $sql_where,
"sql_limit" => $sql_limit,
"sql_order" => $sql_order
);
}
