PHP ADODB_Session::_sessionKey方法代码示例

 static function write($key, $oval)
 {
     global $ADODB_SESSION_READONLY;
     if (!empty($ADODB_SESSION_READONLY)) {
         return;
     }
     $clob = ADODB_Session::clob();
     $conn = ADODB_Session::_conn();
     $crc = ADODB_Session::_crc();
     $debug = ADODB_Session::debug();
     $driver = ADODB_Session::driver();
     $expire_notify = ADODB_Session::expireNotify();
     $filter = ADODB_Session::filter();
     $lifetime = ADODB_Session::lifetime();
     $table = ADODB_Session::table();
     if (!$conn) {
         return false;
     }
     if ($debug) {
         $conn->debug = 1;
     }
     $sysTimeStamp = $conn->sysTimeStamp;
     //assert('$table');
     $expiry = $conn->OffsetDate($lifetime / (24 * 3600), $sysTimeStamp);
     $binary = $conn->dataProvider === 'mysql' ? '/*! BINARY */' : '';
     // crc32 optimization since adodb 2.1
     // now we only update expiry date, thx to sebastian thom in adodb 2.32
     if ($crc !== '00' && $crc !== false && $crc == strlen($oval) . crc32($oval)) {
         if ($debug) {
             echo '<p>Session: Only updating date - crc32 not changed</p>';
         }
         $expirevar = '';
         if ($expire_notify) {
             $var = reset($expire_notify);
             global ${$var};
             if (isset(${$var})) {
                 $expirevar = ${$var};
             }
         }
         $sql = "UPDATE {$table} SET expiry = {$expiry} ,expireref=" . $conn->Param('0') . ", modified = {$sysTimeStamp} WHERE {$binary} sesskey = " . $conn->Param('1') . " AND expiry >= {$sysTimeStamp}";
         $rs = $conn->Execute($sql, array($expirevar, $key));
         return true;
     }
     $val = rawurlencode($oval);
     foreach ($filter as $f) {
         if (is_object($f)) {
             $val = $f->write($val, ADODB_Session::_sessionKey());
         }
     }
     $expireref = '';
     if ($expire_notify) {
         $var = reset($expire_notify);
         global ${$var};
         if (isset(${$var})) {
             $expireref = ${$var};
         }
     }
     if (!$clob) {
         // no lobs, simply use replace()
         $rs = $conn->Execute("SELECT COUNT(*) AS cnt FROM {$table} WHERE {$binary} sesskey = " . $conn->Param(0), array($key));
         if ($rs) {
             $rs->Close();
         }
         if ($rs && reset($rs->fields) > 0) {
             $sql = "UPDATE {$table} SET expiry={$expiry}, sessdata=" . $conn->Param(0) . ", expireref= " . $conn->Param(1) . ",modified={$sysTimeStamp} WHERE sesskey = " . $conn->Param(2);
         } else {
             $sql = "INSERT INTO {$table} (expiry, sessdata, expireref, sesskey, created, modified)\n\t\t\t\t\tVALUES ({$expiry}," . $conn->Param('0') . ", " . $conn->Param('1') . ", " . $conn->Param('2') . ", {$sysTimeStamp}, {$sysTimeStamp})";
         }
         $rs = $conn->Execute($sql, array($val, $expireref, $key));
     } else {
         // what value shall we insert/update for lob row?
         if (strncmp($driver, 'oci8', 4) == 0) {
             $lob_value = sprintf('empty_%s()', strtolower($clob));
         } else {
             $lob_value = 'null';
         }
         $conn->StartTrans();
         $rs = $conn->Execute("SELECT COUNT(*) AS cnt FROM {$table} WHERE {$binary} sesskey = " . $conn->Param(0), array($key));
         if ($rs && reset($rs->fields) > 0) {
             $sql = "UPDATE {$table} SET expiry={$expiry}, sessdata={$lob_value}, expireref= " . $conn->Param(0) . ",modified={$sysTimeStamp} WHERE sesskey = " . $conn->Param('1');
         } else {
             $sql = "INSERT INTO {$table} (expiry, sessdata, expireref, sesskey, created, modified)\n\t\t\t\t\tVALUES ({$expiry},{$lob_value}, " . $conn->Param('0') . ", " . $conn->Param('1') . ", {$sysTimeStamp}, {$sysTimeStamp})";
         }
         $rs = $conn->Execute($sql, array($expireref, $key));
         $qkey = $conn->qstr($key);
         $rs2 = $conn->UpdateBlob($table, 'sessdata', $val, " sesskey={$qkey}", strtoupper($clob));
         if ($debug) {
             echo "<hr>", htmlspecialchars($oval), "<hr>";
         }
         $rs = @$conn->CompleteTrans();
     }
     if (!$rs) {
         ADOConnection::outp('<p>Session Replace: ' . $conn->ErrorMsg() . '</p>', false);
         return false;
     } else {
         // bug in access driver (could be odbc?) means that info is not committed
         // properly unless select statement executed in Win2000
         if ($conn->databaseType == 'access') {
             $sql = "SELECT sesskey FROM {$table} WHERE {$binary} sesskey = {$qkey}";
             $rs = $conn->Execute($sql);
//.........这里部分代码省略.........

 function write($key, $val)
 {
     global $ADODB_SESSION_READONLY;
     if (!empty($ADODB_SESSION_READONLY)) {
         return;
     }
     $clob = ADODB_Session::clob();
     $conn =& ADODB_Session::_conn();
     $crc = ADODB_Session::_crc();
     $data = ADODB_Session::dataFieldName();
     $debug = ADODB_Session::debug();
     $driver = ADODB_Session::driver();
     $expire_notify = ADODB_Session::expireNotify();
     $filter = ADODB_Session::filter();
     $lifetime = ADODB_Session::lifetime();
     $table = ADODB_Session::table();
     if (!$conn) {
         return false;
     }
     $qkey = $conn->qstr($key);
     //assert('$table');
     $expiry = time() + $lifetime;
     $binary = $conn->dataProvider === 'mysql' ? '/*! BINARY */' : '';
     // crc32 optimization since adodb 2.1
     // now we only update expiry date, thx to sebastian thom in adodb 2.32
     if ($crc !== false && $crc == strlen($val) . crc32($val)) {
         if ($debug) {
             ADOConnection::outp('<p>Session: Only updating date - crc32 not changed</p>');
         }
         $expirevar = '';
         if ($expire_notify) {
             $var = reset($expire_notify);
             global ${$var};
             if (isset(${$var})) {
                 $expirevar = ${$var};
             }
         }
         $sql = "UPDATE {$table} SET expiry = " . $conn->Param('0') . ",expireref=" . $conn->Param('1') . " WHERE {$binary} sesskey = " . $conn->Param('2') . " AND expiry >= " . $conn->Param('3');
         $rs =& $conn->Execute($sql, array($expiry, $expirevar, $key, time()));
         return true;
     }
     $val = rawurlencode($val);
     foreach ($filter as $f) {
         if (is_object($f)) {
             $val = $f->write($val, ADODB_Session::_sessionKey());
         }
     }
     $arr = array('sesskey' => $key, 'expiry' => $expiry, $data => $val, 'expireref' => '');
     if ($expire_notify) {
         $var = reset($expire_notify);
         global ${$var};
         if (isset(${$var})) {
             $arr['expireref'] = ${$var};
         }
     }
     if (!$clob) {
         // no lobs, simply use replace()
         $arr[$data] = $conn->qstr($val);
         $rs = $conn->Replace($table, $arr, 'sesskey', $autoQuote = true);
     } else {
         // what value shall we insert/update for lob row?
         switch ($driver) {
             // empty_clob or empty_lob for oracle dbs
             case 'oracle':
             case 'oci8':
             case 'oci8po':
             case 'oci805':
                 $lob_value = sprintf('empty_%s()', strtolower($clob));
                 break;
                 // null for all other
             // null for all other
             default:
                 $lob_value = 'null';
                 break;
         }
         $conn->StartTrans();
         $expiryref = $conn->qstr($arr['expireref']);
         // do we insert or update? => as for sesskey
         $rs =& $conn->Execute("SELECT COUNT(*) AS cnt FROM {$table} WHERE {$binary} sesskey = {$qkey}");
         if ($rs && reset($rs->fields) > 0) {
             $sql = "UPDATE {$table} SET expiry = {$expiry}, {$data} = {$lob_value}, expireref={$expiryref} WHERE  sesskey = {$qkey}";
         } else {
             $sql = "INSERT INTO {$table} (expiry, {$data}, sesskey,expireref) VALUES ({$expiry}, {$lob_value}, {$qkey},{$expiryref})";
         }
         if ($rs) {
             $rs->Close();
         }
         $err = '';
         $rs1 =& $conn->Execute($sql);
         if (!$rs1) {
             $err = $conn->ErrorMsg() . "\n";
         }
         $rs2 =& $conn->UpdateBlob($table, $data, $val, " sesskey={$qkey}", strtoupper($clob));
         if (!$rs2) {
             $err .= $conn->ErrorMsg() . "\n";
         }
         $rs = $rs && $rs2 ? true : false;
         $conn->CompleteTrans();
     }
     if (!$rs) {
//.........这里部分代码省略.........

 function sess_write($sess_id, $data)
 {
     $filter = ADODB_Session::filter();
     $dataFieldName = ADODB_Session::dataFieldName();
     $db_object =& $GLOBALS['ADODB_SESS_CONN'];
     $table = $GLOBALS['ADODB_SESSION_TBL'];
     if (isset($GLOBALS['ADODB_SESS_LIFE'])) {
         $lifetime = $GLOBALS['ADODB_SESS_LIFE'];
     } else {
         $lifetime = ini_get('session.gc_maxlifetime');
         if ($lifetime <= 1) {
             $lifetime = 1440;
         }
     }
     $expire_notify = $GLOBALS['ADODB_SESSION_EXPIRE_NOTIFY'];
     $notify = '';
     if (isset($expire_notify)) {
         $var = reset($expire_notify);
         global ${$var};
         if (isset(${$var})) {
             $notify = ${$var};
         }
     }
     $CurrentTime = time() + $lifetime;
     $data = rawurlencode($data);
     foreach ($filter as $f) {
         if (is_object($f)) {
             $data = $f->write($data, ADODB_Session::_sessionKey());
         }
     }
     $db_object->execute("UPDATE {$table} SET {$dataFieldName} = '{$data}', expiry = '{$CurrentTime}', expireref = '{$notify}' WHERE SessionID = '{$sess_id}'");
     return true;
 }