コード例 #1
0
ファイル: DB.class.php プロジェクト: nicholasryan/CorePlus
	private function __construct() {
		$connectionSettings = ConfigHandler::LoadConfigFile("db");

		switch ($connectionSettings['type']) {
			case 'cassandra':
				require_once(ROOT_PDIR . 'core/libs/phpcassa-0.7.a.4/connection.php');
				require_once(ROOT_PDIR . 'core/libs/core/ADODB_cassandra.class.php');
				$this->connection = new ADODB_cassandra();
				$this->connection->connect($connectionSettings['server'], null, null, $connectionSettings['name']);
				//var_dump($this->connection); die();
				break;
			default:
				$dsn              = "{$connectionSettings['type']}://"
					. "{$connectionSettings['user']}:{$connectionSettings['pass']}"
					. "@{$connectionSettings['server']}"
					. "/{$connectionSettings['name']}"
					. "?persist&fetchmode=ASSOC";
				$this->connection =& ADONewConnection($dsn);

				break;
		}


		// No go?
		if (!$this->connection) return;

		// Caching?
		// @todo Make this a config option.
		//$this->connection->memCache = true;
		//$this->connection->memCacheHost = 'localhost';
		//$this->connection->memCacheCompress = false;
	}
コード例 #2
0
ファイル: model.php プロジェクト: Zyqsempai/amanet
 /**
  * Override the default `doquote` method to better sanitize numeric values.
  *
  * @param ADOConnection $db
  * @param mixed $value
  * @param string $type
  * @return mixed
  */
 public function doquote(&$db, $value, $type)
 {
     switch ($type) {
         case 'L':
         case 'I':
         case 'I1':
         case 'I2':
         case 'I4':
         case 'I8':
         case 'F':
         case 'N':
             if (!is_numeric($value)) {
                 if (is_null($value)) {
                     return null;
                 }
                 if ($value === true) {
                     return 1;
                 }
                 if ($value === false) {
                     return 0;
                 }
                 $db->outp_throw('Numeric field type "' . $type . '" requires numeric value.', 'DOQUOTE');
                 return 0;
             }
         default:
             return parent::doquote($db, $value, $type);
     }
 }
コード例 #3
0
ファイル: ADOdb.php プロジェクト: quangbt2005/vhost-kis
 /**
  * Constructor
  *
  * @param ADOConnection $db An instance of ADOConnection.
  *
  * @throws XML_Query2XML_DBException If the ADOConnection instance passed as
  *                          argument was not connected to the database server.
  */
 public function __construct(ADOConnection $db)
 {
     if (!$db->IsConnected()) {
         throw new XML_Query2XML_DBException('ADOConnection instance was not connected');
     }
     $db->SetFetchMode(ADODB_FETCH_ASSOC);
     $this->_db = $db;
 }
コード例 #4
0
ファイル: DB.php プロジェクト: hopitio/framework
 function __construct($type, $host, $user, $pass, $db, $debug)
 {
     $this->_adoConnection = NewADOConnection($type);
     $this->_adoConnection->debug = $debug;
     $status = $this->_adoConnection->Connect($host, $user, $pass, $db);
     if (!$status) {
         throw new Exception("Không kết nối được CSDL");
     }
     $this->_adoConnection->SetCharSet('utf8');
     $this->_adoConnection->SetFetchMode(ADODB_FETCH_ASSOC);
 }
コード例 #5
0
 function DropColumnSQL($tabname, $flds)
 {
     if ($this->debug) {
         ADOConnection::outp("DropColumnSQL not supported");
     }
     return array();
 }
コード例 #6
0
ファイル: datadict-generic.inc.php プロジェクト: bermi/akelos
 public function DropColumnSQL($tabname, $flds, $tableflds = '', $tableoptions = '')
 {
     if ($this->debug) {
         ADOConnection::outp("DropColumnSQL not supported");
     }
     return array();
 }
コード例 #7
0
	function BindTimeStamp($d)
	{
		$d = ADOConnection::DBTimeStamp($d);
		if (strncmp($d,"'",1)) return $d;

		return substr($d,1,strlen($d)-2);
	}
コード例 #8
0
ファイル: adodb-vfp.inc.php プロジェクト: katopenzz/openemr
 function &SelectLimit($sql, $nrows = -1, $offset = -1, $inputarr = false, $arg3 = false, $secs2cache = 0)
 {
     if (!preg_match('/ORDER[ \\t\\r\\n]+BY/is', $sql)) {
         $sql .= ' ORDER BY 1';
     }
     return ADOConnection::SelectLimit($sql, $nrows, $offset, $inputarr, $arg3, $secs2cache);
 }
コード例 #9
0
ファイル: SparqlEngineDb.php プロジェクト: VUW-SIM-FIS/emiemi
 /**
  *   Sends the sql to the database and returns the results.
  *
  *   @internal Switches between ADOConnection::Execute() and
  *    ADOConnection::SelectLimit() depending on the $query parameter's
  *    $solutionModifier "limit" and "offset" settings.
  *   Uses $query variable.
  *
  *   @param array $arSql     Array that gets a SQL query string once imploded
  *
  *   @return mixed           Anything ADOConnection::Execute() may return
  *   @throws Exception       If Database query does not work
  */
 function queryDb($arSql, $nOffset, $nLimit)
 {
     $strSql = SparqlEngineDb_SqlMerger::getSelect($this->query, $arSql);
     if ($strSql == '()') {
         return new ADORecordSet(false);
     }
     // I want associative arrays.
     $oldmode = $this->dbConn->SetFetchMode(ADODB_FETCH_ASSOC);
     if (isset($GLOBALS['debugSparql']) && $GLOBALS['debugSparql']) {
         echo 'SQL query: ' . $strSql . "\n";
     }
     if ($nLimit === null && $nOffset == 0) {
         $ret = $this->dbConn->execute($strSql);
     } else {
         if ($nLimit === null) {
             $ret = $this->dbConn->SelectLimit($strSql, -1, $nOffset);
         } else {
             $ret = $this->dbConn->SelectLimit($strSql, $nLimit, $nOffset);
         }
     }
     //... but others maybe not
     $this->dbConn->SetFetchMode($oldmode);
     if (!$ret) {
         //Error occured
         throw new Exception('ADOdb error: ' . $this->dbConn->ErrorMsg() . "\n" . $strSql);
     }
     return $ret;
 }
コード例 #10
0
ファイル: adodb-mssqlpo.inc.php プロジェクト: joeymetal/v1
	public function PrepareSP($sql)
	{
		if (!$this->_has_mssql_init) {
			ADOConnection::outp( "PrepareSP: mssql_init only available since PHP 4.1.0");
			return $sql;
		}
		if (is_string($sql)) $sql = str_replace('||','+',$sql);
		$stmt = mssql_init($sql,$this->_connectionID);
		if (!$stmt)  return $sql;
		return array($sql,$stmt);
	}
コード例 #11
0
ファイル: DbSequence.class.php プロジェクト: pixxid/xengine
 /**
  * Fonction static permettant d'obtenir la séquence suivante
  *
  * @name DbSequence::next()
  *
  * @access public
  * @static
  * @param ADOConnection $conn Connexion valide à une base de données
  * @param string $table Table sur laquelle on doit obtenir la sequence suivante
  * @param string $column Nom de la colonne Primary Key de type numerique
  *
  * @return int Numero de séquence suivante
  */
 public static function next(ADOConnection $conn, $table, $column)
 {
     try {
         $sql = "SELECT {$column} FROM {$table} ORDER BY 1 DESC";
         $rs = $conn->SelectLimit($sql, 1);
         // Si il n'y a aucun enregistrement : insertion du premier
         if ($rs->RecordCount() == 0) {
             $id = 1;
         } else {
             while (!$rs->EOF) {
                 $id = $rs->fields[0];
                 break;
             }
             $id++;
         }
     } catch (exception $e) {
         return null;
     }
     return $id;
 }
コード例 #12
0
 /**
  * Remove right
  *
  * @param array $params
  * @return void
  */
 public function removeRight(array $params)
 {
     $rightId = (int) $params['right_id'];
     // get permission
     $sql = 'SELECT right_define_name
             FROM ' . self::RIGHTS . "\n                WHERE right_id = {$rightId}";
     $permission = $this->db->GetOne($sql);
     // remove acl rules
     try {
         list($resource, ) = PermissionToAcl::translate($permission);
     } catch (\InvalidArgumentException $e) {
         return;
     }
     $sql = 'DELETE
             FROM ' . self::RULES . "\n                WHERE resource = '{$resource}'";
     $this->db->Execute($sql);
     // remove right
     $sql = 'DELETE
             FROM ' . self::RIGHTS . "\n                WHERE right_id = {$rightId}";
     $this->db->Execute($sql);
 }
コード例 #13
0
 function MetaTables($ttype = false, $showSchema = false, $mask = false)
 {
     if ($mask) {
         $save = $this->metaTablesSQL;
         $mask = $this->qstr(strtoupper($mask));
         $this->metaTablesSQL .= " AND table_name like {$mask}";
     }
     $ret = ADOConnection::MetaTables($ttype, $showSchema);
     if ($mask) {
         $this->metaTablesSQL = $save;
     }
     return $ret;
 }
コード例 #14
0
 function &MetaTables($ttype = false, $showSchema = false, $mask = false)
 {
     if ($mask) {
         $save = $this->metaTablesSQL;
         $mask = $this->qstr($mask);
         $this->metaTablesSQL .= " like {$mask}";
     }
     $ret =& ADOConnection::MetaTables($ttype, $showSchema);
     if ($mask) {
         $this->metaTablesSQL = $save;
     }
     return $ret;
 }
コード例 #15
0
 function MetaTables($ttype = false, $showSchema = false, $mask = false)
 {
     $save = $this->metaTablesSQL;
     if ($showSchema && is_string($showSchema)) {
         $this->metaTablesSQL .= " from {$showSchema}";
     }
     if ($mask) {
         $mask = $this->qstr($mask);
         $this->metaTablesSQL .= " like {$mask}";
     }
     $ret = ADOConnection::MetaTables($ttype, $showSchema);
     $this->metaTablesSQL = $save;
     return $ret;
 }
コード例 #16
0
	function ServerInfo()
	{
		$arr['dialect'] = $this->dialect;
		switch($arr['dialect']) {
		case '':
		case '1': $s = 'Firebird Dialect 1'; break;
		case '2': $s = 'Firebird Dialect 2'; break;
		default:
		case '3': $s = 'Firebird Dialect 3'; break;
		}
		$arr['version'] = ADOConnection::_findvers($s);
		$arr['description'] = $s;
		return $arr;
	}
コード例 #17
0
 function MetaTables($ttype = false, $showSchema = false, $mask = false)
 {
     $save = $this->metaTablesSQL;
     if ($showSchema && is_string($showSchema)) {
         $this->metaTablesSQL .= $this->qstr($showSchema);
     } else {
         $this->metaTablesSQL .= "schema()";
     }
     if ($mask) {
         $mask = $this->qstr($mask);
         $this->metaTablesSQL .= " AND table_name LIKE {$mask}";
     }
     $ret = ADOConnection::MetaTables($ttype, $showSchema);
     $this->metaTablesSQL = $save;
     return $ret;
 }
コード例 #18
0
ファイル: adodb-odbc.inc.php プロジェクト: qoire/portal
 function ErrorNo()
 {
     if ($this->_haserrorfunctions) {
         if (empty($this->_connectionID)) {
             $e = @odbc_error();
         } else {
             $e = @odbc_error($this->_connectionID);
         }
         // bug in 4.0.6, error number can be corrupted string (should be 6 digits)
         // so we check and patch
         if (strlen($e) <= 2) {
             return 0;
         }
         return $e;
     } else {
         return ADOConnection::ErrorNo();
     }
 }
コード例 #19
0
 function _connect($host, $username, $password, $ldapbase)
 {
     global $LDAP_CONNECT_OPTIONS;
     if (!function_exists('ldap_connect')) {
         return null;
     }
     if (strpos($host, 'ldap://') === 0 || strpos($host, 'ldaps://') === 0) {
         $this->_connectionID = @ldap_connect($host);
     } else {
         $conn_info = array($host, $this->port);
         if (strstr($host, ':')) {
             $conn_info = explode(':', $host);
         }
         $this->_connectionID = @ldap_connect($conn_info[0], $conn_info[1]);
     }
     if (!$this->_connectionID) {
         $e = 'Could not connect to ' . $conn_info[0];
         $this->_errorMsg = $e;
         if ($this->debug) {
             ADOConnection::outp($e);
         }
         return false;
     }
     if (count($LDAP_CONNECT_OPTIONS) > 0) {
         $this->_inject_bind_options($LDAP_CONNECT_OPTIONS);
     }
     if ($username) {
         $bind = @ldap_bind($this->_connectionID, $username, $password);
     } else {
         $username = '******';
         $bind = @ldap_bind($this->_connectionID);
     }
     if (!$bind) {
         $e = sprintf($this->_bind_errmsg, ldap_error($this->_connectionID));
         $this->_errorMsg = $e;
         if ($this->debug) {
             ADOConnection::outp($e);
         }
         return false;
     }
     $this->_errorMsg = '';
     $this->database = $ldapbase;
     return $this->_connectionID;
 }
コード例 #20
0
 function SelectLimit($sql, $nrows = -1, $offset = -1, $inputarr = false, $secs2cache = 0)
 {
     // seems that oracle only supports 1 hint comment in 8i
     if (strpos($sql, '/*+') !== false) {
         $sql = str_replace('/*+ ', '/*+FIRST_ROWS ', $sql);
     } else {
         $sql = preg_replace('/^[ \\t\\n]*select/i', 'SELECT /*+FIRST_ROWS*/', $sql);
     }
     /* 
     	The following is only available from 8.1.5 because order by in inline views not 
     	available before then...
     	http://www.jlcomp.demon.co.uk/faq/top_sql.html
     if ($nrows > 0) {	
     	if ($offset > 0) $nrows += $offset;
     	$sql = "select * from ($sql) where rownum <= $nrows";
     	$nrows = -1;
     }
     */
     return ADOConnection::SelectLimit($sql, $nrows, $offset, $inputarr, $secs2cache);
 }
コード例 #21
0
ファイル: adodb-ldap.inc.php プロジェクト: joeymetal/v1
	public function _connect( $host, $username, $password, $ldapbase)
	{
	global $LDAP_CONNECT_OPTIONS;
		
		if ( !function_exists( 'ldap_connect' ) ) return null;
		
		$conn_info = array( $host,$this->port);
		
		if ( strstr( $host, ':' ) ) {
		    $conn_info = split( ':', $host );
		} 
		
		$this->_connectionID = ldap_connect( $conn_info[0], $conn_info[1] );
		if (!$this->_connectionID) {
			$e = 'Could not connect to ' . $conn_info[0];
			$this->_errorMsg = $e;
			if ($this->debug) ADOConnection::outp($e);
			return false;
		}
		if( count( $LDAP_CONNECT_OPTIONS ) > 0 ) {
			$this->_inject_bind_options( $LDAP_CONNECT_OPTIONS );
		}
		
		if ($username) {
		    $bind = ldap_bind( $this->_connectionID, $username, $password );
		} else {
			$username = '******';
		    $bind = ldap_bind( $this->_connectionID );		
		}
		
		if (!$bind) {
			$e = 'Could not bind to ' . $conn_info[0] . " as ".$username;
			$this->_errorMsg = $e;
			if ($this->debug) ADOConnection::outp($e);
			return false;
		}
		$this->_errorMsg = '';
		$this->database = $ldapbase;
		return $this->_connectionID;
	}
コード例 #22
0
 /**
  * Метод получения коннекта к БД
  * 
  * @return ADOConnection
  */
 protected final function getConnection()
 {
     if ($this->CONNECTION != null) {
         return $this->CONNECTION;
         //---
     }
     if (!$this->isConfigured()) {
         PsUtil::raise('Cannot get DB connection, {} is not configured.', get_called_class());
     }
     $this->LOGGER->info();
     $this->LOGGER->info('?  Connection for [{}] is requested', $this->CONNECTION_PARAMS);
     $URL = $this->CONNECTION_PARAMS->url();
     //Посмотрим, есть ли у нас нужный коннект
     if (array_key_exists($URL, $this->CONNECTIONS)) {
         $this->LOGGER->info('<  Fast returned from cache');
         return $this->CONNECTION = $this->CONNECTIONS[$URL];
     }
     //Отлогируем
     $this->LOGGER->info('+  Establishing connection {}', $this->CONNECTION_PARAMS);
     //Подключаем adodb
     PsLibs::inst()->AdoDb();
     //Подключаемся
     $this->CONNECTION = ADONewConnection($URL);
     if (!is_object($this->CONNECTION)) {
         PsUtil::raise("Unable to connect to [{}]", $this->CONNECTION_PARAMS);
     }
     //Зададим некоторые настройки
     $this->CONNECTION->debug = ADODB_DEBUG;
     $this->CONNECTION->SetFetchMode(ADODB_FETCH_ASSOC);
     $this->CONNECTION->query("SET NAMES 'utf8'");
     $this->CONNECTION->query("SET CHARACTER SET 'utf8'");
     //Положим соединение в пул
     if (array_key_exists($URL, $this->CONNECTIONS)) {
         raise_error('Double trying to register db connection');
     }
     $this->LOGGER->info('<  Established connection returned');
     return $this->CONNECTIONS[$URL] = $this->CONNECTION;
 }
コード例 #23
0
 /**
  * @see adodb_perf#optimizeTable
  */
 function optimizeTable($table, $mode = ADODB_OPT_LOW)
 {
     if (!is_string($table)) {
         return false;
     }
     $conn = $this->conn;
     if (!$conn) {
         return false;
     }
     $sql = '';
     switch ($mode) {
         case ADODB_OPT_LOW:
             $sql = $this->optimizeTableLow;
             break;
         case ADODB_OPT_HIGH:
             $sql = $this->optimizeTableHigh;
             break;
         default:
             ADOConnection::outp(sprintf("<p>%s: '%s' using of undefined mode '%s'</p>", __CLASS__, 'optimizeTable', $mode));
             return false;
     }
     $sql = sprintf($sql, $table);
     return $conn->Execute($sql) !== false;
 }
コード例 #24
0
 function ServerInfo()
 {
     global $ADODB_FETCH_MODE;
     $this->debug = 1;
     $stmt = $this->PrepareSP('sp_server_info');
     $val = 2;
     if ($this->fetchMode === false) {
         $savem = $ADODB_FETCH_MODE;
         $ADODB_FETCH_MODE = ADODB_FETCH_NUM;
     } else {
         $savem = $this->SetFetchMode(ADODB_FETCH_NUM);
     }
     $this->Parameter($stmt, $val, 'attribute_id');
     $row = $this->GetRow($stmt);
     //$row = $this->GetRow("execute sp_server_info 2");
     if ($this->fetchMode === false) {
         $ADODB_FETCH_MODE = $savem;
     } else {
         $this->SetFetchMode($savem);
     }
     $arr['description'] = $row[2];
     $arr['version'] = ADOConnection::_findvers($arr['description']);
     return $arr;
 }
コード例 #25
0
ファイル: adodb.inc.php プロジェクト: dasatti/dashboard
 /**
  * @param $v is a timestamp string in YYYY-MM-DD HH-NN-SS format
  *
  * @return date in unix timestamp format, or 0 if before TIMESTAMP_FIRST_YEAR, or false if invalid date format
  */
 function UnixTimeStamp($v)
 {
     return ADOConnection::UnixTimeStamp($v);
 }
コード例 #26
0
 function _fetch()
 {
     $rs = $this->_queryID;
     if (!$rs or $rs->EOF) {
         $this->fields = false;
         return false;
     }
     $this->fields = array();
     if (!$this->_tarr) {
         $tarr = array();
         $flds = array();
         for ($i = 0, $max = $this->_numOfFields; $i < $max; $i++) {
             $f = $rs->Fields($i);
             $flds[] = $f;
             $tarr[] = $f->Type;
         }
         // bind types and flds only once
         $this->_tarr = $tarr;
         $this->_flds = $flds;
     }
     $t = reset($this->_tarr);
     $f = reset($this->_flds);
     if ($this->hideErrors) {
         $olde = error_reporting(E_ERROR | E_CORE_ERROR);
     }
     // sometimes $f->value be null
     for ($i = 0, $max = $this->_numOfFields; $i < $max; $i++) {
         //echo "<p>",$t,' ';var_dump($f->value); echo '</p>';
         switch ($t) {
             case 135:
                 // timestamp
                 if (!strlen((string) $f->value)) {
                     $this->fields[] = false;
                 } else {
                     if (!is_numeric($f->value)) {
                         $val = variant_date_to_timestamp($f->value);
                     } else {
                         $val = $f->value;
                     }
                     $this->fields[] = adodb_date('Y-m-d H:i:s', $val);
                 }
                 break;
             case 133:
                 // A date value (yyyymmdd)
                 if ($val = $f->value) {
                     $this->fields[] = substr($val, 0, 4) . '-' . substr($val, 4, 2) . '-' . substr($val, 6, 2);
                 } else {
                     $this->fields[] = false;
                 }
                 break;
             case 7:
                 // adDate
                 if (!strlen((string) $f->value)) {
                     $this->fields[] = false;
                 } else {
                     if (!is_numeric($f->value)) {
                         $val = variant_date_to_timestamp($f->value);
                     } else {
                         $val = $f->value;
                     }
                     if ($val % 86400 == 0) {
                         $this->fields[] = adodb_date('Y-m-d', $val);
                     } else {
                         $this->fields[] = adodb_date('Y-m-d H:i:s', $val);
                     }
                 }
                 break;
             case 1:
                 // null
                 $this->fields[] = false;
                 break;
             case 6:
                 // currency is not supported properly;
                 ADOConnection::outp('<b>' . $f->Name . ': currency type not supported by PHP</b>');
                 $this->fields[] = (double) $f->value;
                 break;
             default:
                 $this->fields[] = $f->value;
                 break;
         }
         //print " $f->value $t, ";
         $f = next($this->_flds);
         $t = next($this->_tarr);
     }
     // for
     if ($this->hideErrors) {
         error_reporting($olde);
     }
     @$rs->MoveNext();
     // @ needed for some versions of PHP!
     if ($this->fetchMode & ADODB_FETCH_ASSOC) {
         $this->fields =& $this->GetRowAssoc(ADODB_ASSOC_CASE);
     }
     return true;
 }
コード例 #27
0
 function &SelectLimit($sql, $nrows = -1, $offset = -1, $inputarr = false, $secs2cache = 0)
 {
     if ($nrows > 0 && $offset <= 0) {
         $sql = preg_replace('/(^\\s*select\\s+(distinctrow|distinct)?)/i', '\\1 ' . $this->hasTop . " {$nrows} ", $sql);
         $rs =& $this->Execute($sql, $inputarr);
     } else {
         $rs =& ADOConnection::SelectLimit($sql, $nrows, $offset, $inputarr, $secs2cache);
     }
     return $rs;
 }
コード例 #28
0
 function ErrorNo()
 {
     $e = $this->ErrorMsg();
     if (strlen($e)) {
         return ADOConnection::MetaError($e);
     }
     return 0;
 }
コード例 #29
0
ファイル: adodb-csvlib.inc.php プロジェクト: joeymetal/v1
/**
 * Save a file $filename and its $contents (normally for caching) with file locking
 */
function adodb_write_file($filename, $contents, $debug = false)
{
    # http://www.php.net/bugs.php?id=9203 Bug that flock fails on Windows
    # So to simulate locking, we assume that rename is an atomic operation.
    # First we delete $filename, then we create a $tempfile write to it and
    # rename to the desired $filename. If the rename works, then we successfully
    # modified the file exclusively.
    # What a stupid need - having to simulate locking.
    # Risks:
    # 1. $tempfile name is not unique -- very very low
    # 2. unlink($filename) fails -- ok, rename will fail
    # 3. adodb reads stale file because unlink fails -- ok, $rs timeout occurs
    # 4. another process creates $filename between unlink() and rename() -- ok, rename() fails and  cache updated
    if (strncmp(PHP_OS, 'WIN', 3) === 0) {
        // skip the decimal place
        $mtime = substr(str_replace(' ', '_', microtime()), 2);
        // getmypid() actually returns 0 on Win98 - never mind!
        $tmpname = $filename . uniqid($mtime) . getmypid();
        if (!($fd = @fopen($tmpname, 'a'))) {
            return false;
        }
        $ok = ftruncate($fd, 0);
        if (!fwrite($fd, $contents)) {
            $ok = false;
        }
        fclose($fd);
        chmod($tmpname, 0644);
        // the tricky moment
        @unlink($filename);
        if (!@rename($tmpname, $filename)) {
            unlink($tmpname);
            $ok = false;
        }
        if (!$ok) {
            if ($debug) {
                ADOConnection::outp(" Rename {$tmpname} " . ($ok ? 'ok' : 'failed'));
            }
        }
        return $ok;
    }
    if (!($fd = @fopen($filename, 'a'))) {
        return false;
    }
    if (flock($fd, LOCK_EX) && ftruncate($fd, 0)) {
        $ok = fwrite($fd, $contents);
        fclose($fd);
        chmod($filename, 0644);
    } else {
        fclose($fd);
        if ($debug) {
            ADOConnection::outp(" Failed acquiring lock for {$filename}<br>\n");
        }
        $ok = false;
    }
    return $ok;
}
コード例 #30
0
 function Error($err, $fn)
 {
     global $_ADODB_ACTIVE_DBS;
     $fn = get_class($this) . '::' . $fn;
     $this->_lasterr = $fn . ': ' . $err;
     if ($this->_dbat < 0) {
         $db = false;
     } else {
         $activedb = $_ADODB_ACTIVE_DBS[$this->_dbat];
         $db = $activedb->db;
     }
     if (function_exists('adodb_throw')) {
         if (!$db) {
             adodb_throw('ADOdb_Active_Record', $fn, -1, $err, 0, 0, false);
         } else {
             adodb_throw($db->databaseType, $fn, -1, $err, 0, 0, $db);
         }
     } else {
         if (!$db || $db->debug) {
             ADOConnection::outp($this->_lasterr);
         }
     }
 }