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 public static function execute()
165 $args = func_get_args();
166 if ($globals->mode
!= 'rw' && !strpos($args[0], 'logger')) {
169 return self
::_query(XDB
::_prepare($args));
172 public static function iterator()
174 return new XOrgDBIterator(self
::_prepare(func_get_args()));
177 public static function iterRow()
179 return new XOrgDBIterator(self
::_prepare(func_get_args()), MYSQL_NUM
);
182 private static function findQuery($params, $default = array())
184 for ($i = 0 ; $i < count($default) ; ++
$i) {
186 foreach (array('insert', 'select', 'replace', 'delete', 'update') as $kwd) {
187 if (stripos($params[0], $kwd) !== false
) {
195 $default[$i] = array_shift($params);
198 return array($default, $params);
201 /** Fetch all rows returned by the given query.
202 * This functions can take 2 optional arguments (cf XOrgDBResult::fetchAllRow()).
203 * Optional arguments are given *before* the query.
205 public static function fetchAllRow()
207 list($args, $query) = self
::findQuery(func_get_args(), array(false
, false
));
208 return self
::queryv($query)->fetchAllRow($args[0], $args[1]);
211 /** Fetch all rows returned by the given query.
212 * This functions can take 2 optional arguments (cf XOrgDBResult::fetchAllAssoc()).
213 * Optional arguments are given *before* the query.
215 public static function fetchAllAssoc()
217 list($args, $query) = self
::findQuery(func_get_args(), array(false
, false
));
218 return self
::queryv($query)->fetchAllAssoc($args[0], $args[1]);
221 public static function fetchOneCell()
223 list($args, $query) = self
::findQuery(func_get_args());
224 return self
::queryv($query)->fetchOneCell();
227 public static function fetchOneRow()
229 list($args, $query) = self
::findQuery(func_get_args());
230 return self
::queryv($query)->fetchOneRow();
233 public static function fetchOneAssoc()
235 list($args, $query) = self
::findQuery(func_get_args());
236 return self
::queryv($query)->fetchOneAssoc();
239 /** Fetch a column from the result of the given query.
240 * This functions can take 1 optional arguments (cf XOrgDBResult::fetchColumn()).
241 * Optional arguments are given *before* the query.
243 public static function fetchColumn()
245 list($args, $query) = self
::findQuery(func_get_args(), array(0));
246 return self
::queryv($query)->fetchColumn();
249 public static function insertId()
251 return self
::$mysqli->insert_id
;
254 public static function errno()
256 return self
::$mysqli->errno
;
259 public static function error()
261 return self
::$mysqli->error
;
264 public static function affectedRows()
266 return self
::$mysqli->affected_rows
;
269 public static function escape($var)
271 switch (gettype($var)) {
281 return "'".addslashes($var)."'";
287 if ($var instanceof PlFlagSet
) {
288 return "'" . addslashes($var->flags()) . "'";
291 return "'".addslashes(serialize($var))."'";
294 die(var_export($var, true
).' is not a valid for a database entry');
304 public function __construct($query)
306 $this->_res
= XDB
::_query($query);
309 public function free()
317 protected function _fetchRow()
319 return $this->_res ?
$this->_res
->fetch_row() : null
;
322 protected function _fetchAssoc()
324 return $this->_res ?
$this->_res
->fetch_assoc() : null
;
327 public function fetchAllRow($id = false
, $keep_array = false
)
333 while (($data = $this->_res
->fetch_row())) {
337 if (!$keep_array && count($data) == 1) {
339 $result[$key] = current($data);
341 $result[$key] = $data;
351 public function fetchAllAssoc($id = false
, $keep_array = false
)
357 while (($data = $this->_res
->fetch_assoc())) {
361 if (!$keep_array && count($data) == 1) {
363 $result[$key] = current($data);
365 $result[$key] = $data;
375 public function fetchOneAssoc()
377 $tmp = $this->_fetchAssoc();
382 public function fetchOneRow()
384 $tmp = $this->_fetchRow();
389 public function fetchOneCell()
391 $tmp = $this->_fetchRow();
396 public function fetchColumn($key = 0)
399 if (is_numeric($key)) {
400 while($tmp = $this->_fetchRow()) {
404 while($tmp = $this->_fetchAssoc()) {
412 public function fetchOneField()
414 return $this->_res ?
$this->_res
->fetch_field() : null
;
417 public function fetchFields()
420 while ($res[] = $this->fetchOneField());
424 public function numRows()
426 return $this->_res ?
$this->_res
->num_rows
: 0;
429 public function fieldCount()
431 return $this->_res ?
$this->_res
->field_count
: 0;
435 require_once dirname(__FILE__
) . '/pliterator.php';
437 class XOrgDBIterator
extends XOrgDBResult
implements PlIterator
444 private $_mode = MYSQL_ASSOC
;
446 public function __construct($query, $mode = MYSQL_ASSOC
)
448 parent
::__construct($query);
450 $this->_total
= $this->numRows();
452 $this->_fields
= $this->fieldCount();
453 $this->_mode
= $mode;
456 public function next()
459 if ($this->_pos
> $this->_total
) {
464 return $this->_mode
!= MYSQL_ASSOC ?
$this->_fetchRow() : $this->_fetchAssoc();
467 public function first()
469 return $this->_pos
== 1;
472 public function last()
474 return $this->_pos
== $this->_total
;
477 public function total()
479 return $this->_total
;
482 public function nextField()
485 if ($this->_fpos
> $this->_fields
) {
488 return $this->fetchOneField();
491 public function firstField()
493 return $this->_fpos
== 1;
496 public function lastField()
498 return $this->_fpos
== $this->_fields
;
501 public function totalFields()
503 return $this->_fields
;
507 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: