Exemplo n.º 1
0
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);
    }
}
Exemplo n.º 2
0
 public function F_to_sym($block)
 {
     return F_Symbol::__from_string($this->__STRING);
 }
Exemplo n.º 3
0
 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;
 }