2 /***************************************************************************
3 * Copyright (C) 2003-2009 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 **************************************************************************/
24 private static $mysqli = null
;
26 public static function connect()
29 self
::$mysqli = new mysqli($globals->dbhost
, $globals->dbuser
, $globals->dbpwd
, $globals->dbdb
);
30 if ($globals->debug
& DEBUG_BT
) {
31 $bt = new PlBacktrace('MySQL');
32 if (mysqli_connect_errno()) {
33 $bt->newEvent("MySQLI connection", 0, mysqli_connect_error());
37 self
::$mysqli->autocommit(true
);
38 self
::$mysqli->set_charset($globals->dbcharset
);
42 public static function _prepare($args)
45 $query = array_map(Array('XDB', 'escape'), $args);
46 $query[0] = preg_replace('/#([a-z0-9]*)#/', $globals->dbprefix
. '$1', $args[0]);
47 $query[0] = str_replace('%', '%%', $query[0]);
48 $query[0] = str_replace('{?}', '%s', $query[0]);
49 return call_user_func_array('sprintf', $query);
52 public static function _reformatQuery($query)
54 $query = preg_split("/\n\\s*/", trim($query));
56 foreach ($query as $key=>$line) {
58 if (preg_match('/^([A-Z]+(?:\s+(?:JOIN|BY|FROM|INTO))?)\s+(.*)/u', $line, $matches)
59 && $matches[1] != 'AND' && $matches[1] != 'OR')
61 $local = strlen($matches[1]);
62 $line = $matches[1] . ' ' . $matches[2];
63 $length = max($length, $local);
65 $query[$key] = array($line, $local);
68 foreach ($query as $array) {
69 list($line, $local) = $array;
70 $local = max(0, $length - $local);
71 $res .= str_repeat(' ', $local) . $line . "\n";
72 $length +
= 2 * (substr_count($line, '(') - substr_count($line, ')'));
77 public static function _query($query)
81 if (!self
::$mysqli && !self
::connect()) {
82 header($_SERVER['SERVER_PROTOCOL'] . ' 500 Internal Server Error');
83 Platal
::page()->kill('Impossible de se connecter à la base de données.');
87 if ($globals->debug
& DEBUG_BT
) {
89 if (strpos($query, 'FOUND_ROWS()') === false
) {
90 $res = self
::$mysqli->query("EXPLAIN $query");
92 while ($row = $res->fetch_assoc()) {
98 PlBacktrace
::$bt['MySQL']->start(XDB
::_reformatQuery($query));
101 $res = XDB
::$mysqli->query($query);
103 if ($globals->debug
& DEBUG_BT
) {
104 PlBacktrace
::$bt['MySQL']->stop(@$res->num_rows ?
$res->num_rows
: self
::$mysqli->affected_rows
,
105 self
::$mysqli->error
,
109 if ($res === false
) {
110 header($_SERVER['SERVER_PROTOCOL'] . ' 500 Internal Server Error');
111 if (strpos($query, 'INSERT') === false
&& strpos($query, 'UPDATE') === false
112 && strpos($query, 'REPLACE') === false
&& strpos($query, 'DELETE') === false
) {
113 $text = 'Erreur lors de l\'interrogation de la base de données';
115 $text = 'Erreur lors de l\'écriture dans la base de données';
117 if ($globals->debug
) {
118 $text .= '<pre>' . pl_entities(XDB
::_reformatQuery($query)) . '</pre>';
120 $file = fopen($globals->spoolroot
. '/spool/tmp/query_errors', 'a');
121 fwrite($file, '<pre>' . pl_entities(XDB
::_reformatQuery($query)) . '</pre>'
122 . '<pre>' . XDB
::$mysqli->error
. '</pre>' . "\n");
125 Platal
::page()->kill($text);
131 private static function queryv($query)
133 return new XOrgDBResult(self
::_prepare($query));
136 public static function query()
138 return self
::queryv(func_get_args());
141 public static function format()
143 return self
::_prepare(func_get_args());
146 // Produce the SQL statement for setting/unsetting a flag
147 public static function changeFlag($fieldname, $flagname, $state)
150 return XDB
::format($fieldname . ' = CONCAT({?}, \',\', ' . $fieldname . ')', $flagname);
152 return XDB
::format($fieldname . ' = REPLACE(' . $fieldname . ', {?}, \'\')', $flagname);
156 // Produce the SQL statement representing an array
157 public static function formatArray(array $array)
159 return '(' . implode(', ', array_map(array('XDB', 'escape'), $array)) . ')';
162 const WILDCARD_EXACT
= 0x00;
163 const WILDCARD_PREFIX
= 0x01;
164 const WILDCARD_SUFFIX
= 0x02;
165 const WILDCARD_CONTAINS
= 0x03; // WILDCARD_PREFIX | WILDCARD_SUFFIX
167 // Returns the SQL statement for a wildcard search.
168 public static function formatWildcards($mode, $text)
170 if ($mode == self
::WILDCARD_EXACT
) {
171 return XDB
::format(' = {?}', $text);
173 $text = str_replace(array('%', '_'), array('\%', '\_'), $text);
174 if ($mode & self
::WILDCARD_PREFIX
) {
177 if ($mode & self
::WILDCARD_SUFFIX
) {
180 return XDB
::format(" LIKE {?}", $text);
184 public static function execute()
187 $args = func_get_args();
188 if ($globals->mode
!= 'rw' && !strpos($args[0], 'logger')) {
191 return self
::_query(XDB
::_prepare($args));
194 public static function iterator()
196 return new XOrgDBIterator(self
::_prepare(func_get_args()));
199 public static function iterRow()
201 return new XOrgDBIterator(self
::_prepare(func_get_args()), MYSQL_NUM
);
204 private static function findQuery($params, $default = array())
206 for ($i = 0 ; $i < count($default) ; ++
$i) {
208 foreach (array('insert', 'select', 'replace', 'delete', 'update') as $kwd) {
209 if (stripos($params[0], $kwd) !== false
) {
217 $default[$i] = array_shift($params);
220 return array($default, $params);
223 /** Fetch all rows returned by the given query.
224 * This functions can take 2 optional arguments (cf XOrgDBResult::fetchAllRow()).
225 * Optional arguments are given *before* the query.
227 public static function fetchAllRow()
229 list($args, $query) = self
::findQuery(func_get_args(), array(false
, false
));
230 return self
::queryv($query)->fetchAllRow($args[0], $args[1]);
233 /** Fetch all rows returned by the given query.
234 * This functions can take 2 optional arguments (cf XOrgDBResult::fetchAllAssoc()).
235 * Optional arguments are given *before* the query.
237 public static function fetchAllAssoc()
239 list($args, $query) = self
::findQuery(func_get_args(), array(false
, false
));
240 return self
::queryv($query)->fetchAllAssoc($args[0], $args[1]);
243 public static function fetchOneCell()
245 list($args, $query) = self
::findQuery(func_get_args());
246 return self
::queryv($query)->fetchOneCell();
249 public static function fetchOneRow()
251 list($args, $query) = self
::findQuery(func_get_args());
252 return self
::queryv($query)->fetchOneRow();
255 public static function fetchOneAssoc()
257 list($args, $query) = self
::findQuery(func_get_args());
258 return self
::queryv($query)->fetchOneAssoc();
261 /** Fetch a column from the result of the given query.
262 * This functions can take 1 optional arguments (cf XOrgDBResult::fetchColumn()).
263 * Optional arguments are given *before* the query.
265 public static function fetchColumn()
267 list($args, $query) = self
::findQuery(func_get_args(), array(0));
268 return self
::queryv($query)->fetchColumn();
271 public static function insertId()
273 return self
::$mysqli->insert_id
;
276 public static function errno()
278 return self
::$mysqli->errno
;
281 public static function error()
283 return self
::$mysqli->error
;
286 public static function affectedRows()
288 return self
::$mysqli->affected_rows
;
291 public static function escape($var)
293 switch (gettype($var)) {
303 return "'".addslashes($var)."'";
309 if ($var instanceof PlFlagSet
) {
310 return "'" . addslashes($var->flags()) . "'";
313 return "'".addslashes(serialize($var))."'";
316 die(var_export($var, true
).' is not a valid for a database entry');
326 public function __construct($query)
328 $this->_res
= XDB
::_query($query);
331 public function free()
339 protected function _fetchRow()
341 return $this->_res ?
$this->_res
->fetch_row() : null
;
344 protected function _fetchAssoc()
346 return $this->_res ?
$this->_res
->fetch_assoc() : null
;
349 public function fetchAllRow($id = false
, $keep_array = false
)
355 while (($data = $this->_res
->fetch_row())) {
359 if (!$keep_array && count($data) == 1) {
361 $result[$key] = current($data);
363 $result[$key] = $data;
373 public function fetchAllAssoc($id = false
, $keep_array = false
)
379 while (($data = $this->_res
->fetch_assoc())) {
383 if (!$keep_array && count($data) == 1) {
385 $result[$key] = current($data);
387 $result[$key] = $data;
397 public function fetchOneAssoc()
399 $tmp = $this->_fetchAssoc();
404 public function fetchOneRow()
406 $tmp = $this->_fetchRow();
411 public function fetchOneCell()
413 $tmp = $this->_fetchRow();
418 public function fetchColumn($key = 0)
421 if (is_numeric($key)) {
422 while($tmp = $this->_fetchRow()) {
426 while($tmp = $this->_fetchAssoc()) {
434 public function fetchOneField()
436 return $this->_res ?
$this->_res
->fetch_field() : null
;
439 public function fetchFields()
442 while ($res[] = $this->fetchOneField());
446 public function numRows()
448 return $this->_res ?
$this->_res
->num_rows
: 0;
451 public function fieldCount()
453 return $this->_res ?
$this->_res
->field_count
: 0;
457 require_once dirname(__FILE__
) . '/pliterator.php';
459 class XOrgDBIterator
extends XOrgDBResult
implements PlIterator
466 private $_mode = MYSQL_ASSOC
;
468 public function __construct($query, $mode = MYSQL_ASSOC
)
470 parent
::__construct($query);
472 $this->_total
= $this->numRows();
474 $this->_fields
= $this->fieldCount();
475 $this->_mode
= $mode;
478 public function next()
481 if ($this->_pos
> $this->_total
) {
486 return $this->_mode
!= MYSQL_ASSOC ?
$this->_fetchRow() : $this->_fetchAssoc();
489 public function first()
491 return $this->_pos
== 1;
494 public function last()
496 return $this->_pos
== $this->_total
;
499 public function total()
501 return $this->_total
;
504 public function nextField()
507 if ($this->_fpos
> $this->_fields
) {
510 return $this->fetchOneField();
513 public function firstField()
515 return $this->_fpos
== 1;
518 public function lastField()
520 return $this->_fpos
== $this->_fields
;
523 public function totalFields()
525 return $this->_fields
;
529 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: