function set_sgs($arr) { foreach ($arr as $sg => $superglobal) { global $http_reqarrs; global $_globals; $pairs = array(); foreach ($superglobal as $k => $v) { if (is_array($v)) { $val = array(); foreach ($v as $_k => $_v) { $str = F_String::__from_string($_v); $str->F_taint(NULL); $val[] = F_Array::__from_array(array(F_Symbol::__from_string($_k), $str)); } } else { $val = F_String::__from_string($v); $val->F_taint(NULL); } $pairs[] = F_Array::__from_array(array(F_Symbol::__from_string($k), $val)); } $_globals['F_' . $sg] = F_Hash::__from_pairs($pairs); } }
public function F_to_sym($block) { return F_Symbol::__from_string($this->__STRING); }
public function F_error_info($block) { $info = $this->__PDO->errorInfo(); $hash = F_Hash::SF_new(NULL); $hash->__operator_arrayset(NULL, F_Symbol::__from_string('state'), F_String::__from_string($info[0])); if ($info[1] !== NULL) { $hash->__operator_arrayset(NULL, F_Symbol::__from_string('code'), F_String::__from_string($info[1])); } if ($info[2] !== NULL) { $hash->__operator_arrayset(NULL, F_Symbol::__from_string('msg'), F_String::__from_string($info[2])); } return $hash; }