2 /************************************************************************
3 * Mailer v0.2.1-FINAL Start: 08/29/2004 *
4 * =================== Last change: 08/29/2004 *
6 * -------------------------------------------------------------------- *
7 * File : lib-mysql3.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Database layer for MySQL +3.x server *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Datenbankschicht fuer MySQL +3.x Server *
12 * -------------------------------------------------------------------- *
15 * $Tag:: 0.2.1-FINAL $ *
17 * Needs to be in all Files and every File needs "svn propset *
18 * svn:keywords Date Revision" (autoprobset!) at least!!!!!! *
19 * -------------------------------------------------------------------- *
20 * Copyright (c) 2003 - 2009 by Roland Haeder *
21 * For more information visit: http://www.mxchange.org *
23 * This program is free software; you can redistribute it and/or modify *
24 * it under the terms of the GNU General Public License as published by *
25 * the Free Software Foundation; either version 2 of the License, or *
26 * (at your option) any later version. *
28 * This program is distributed in the hope that it will be useful, *
29 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
30 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
31 * GNU General Public License for more details. *
33 * You should have received a copy of the GNU General Public License *
34 * along with this program; if not, write to the Free Software *
35 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
37 ************************************************************************/
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
45 function SQL_QUERY ($sqlString, $F, $L) {
47 $sqlString = trim($sqlString);
50 if (!SQL_IS_LINK_UP()) {
51 // We should not quietly ignore this!
52 debug_report_bug(sprintf("Cannot query database: sqlString=%s,file=%s,line=%s",
58 // Return 'false' because it has failed
60 } elseif (empty($sqlString)) {
62 debug_report_bug(sprintf("SQL string is empty. Please fix this. file=%s, line=%s",
67 // This is invalid, of course
71 // Remove \t, \n and \r from queries they may confuse some MySQL version I have heard
72 $sqlString = str_replace("\t", ' ', str_replace("\n", ' ', str_replace("\r", ' ', $sqlString)));
75 $sqlString = str_replace('{PER}', '%', $sqlString);
77 // Compile config entries out
78 $eval = "\$sqlString = \"".FILTER_COMPILE_CONFIG(escapeQuotes($sqlString))."\";";
82 $querytimeBefore = microtime(true);
85 //* DEBUG: */ print('F=' . basename($F) . ',L=' . $L . 'sql=' . htmlentities($sqlString) . '<br />');
86 $result = mysql_query($sqlString, SQL_GET_LINK())
87 or addFatalMessage(__FUNCTION__, __LINE__, $F . ' (' . $L . '):' . mysql_error() . '<br />
90 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'sql=' . $sqlString . ',numRows=' . SQL_NUMROWS($result) . ',affected=' . SQL_AFFECTEDROWS());
92 // Calculate query time
93 $queryTime = microtime(true) - $querytimeBefore;
95 // Add this query to array including timing
96 addSqlToDebug($result, $sqlString, $queryTime, $F, $L);
98 // Save last successfull query
99 setConfigEntry('db_last_query', $sqlString);
101 // Count all query times
102 incrementConfigEntry('sql_time', $queryTime);
105 incrementConfigEntry('sql_count');
108 if ((getOutputMode() != 1) && (isDebugModeEnabled()) && (isConfigEntrySet('DEBUG_SQL')) && (getConfig('DEBUG_SQL') == 'Y')) {
110 // Debugging stuff...
112 $fp = fopen(getConfig('CACHE_PATH') . 'mysql.log', 'a') or app_die(__FILE__, __LINE__, 'Cannot write mysql.log!');
113 if (!isset($GLOBALS['sql_first_entry'])) {
115 fwrite($fp, 'Module=' . getModule() . "\n");
116 $GLOBALS['sql_first_entry'] = true;
118 fwrite($fp, $F . '(LINE=' . $L . '|NUM=' . SQL_NUMROWS($result) . '|AFFECTED=' . SQL_AFFECTEDROWS() . '|QUERYTIME:' . $queryTime . '): ' . str_replace("\r", '', str_replace("\n", ' ', $sqlString)) . "\n");
123 if (!isStatsEntrySet('db_hits')) {
124 // Count in dummy variable
125 setStatsEntry('db_hits', 1);
127 // Count to config array
128 incrementStatsEntry('db_hits');
136 function SQL_NUMROWS ($result) {
137 // Link is not up, no rows by default
140 // Is the result a valid resource?
141 if (is_resource($result)) {
142 // Get the count of rows from database
143 $lines = mysql_num_rows($result);
145 // Is the result empty? Then we have an error!
146 if (empty($lines)) $lines = '0';
147 } elseif (SQL_IS_LINK_UP()) {
148 // No resource given, no lines found!
157 function SQL_AFFECTEDROWS() {
158 // Valid link resource?
159 if (!SQL_IS_LINK_UP()) return false;
162 $lines = mysql_affected_rows(SQL_GET_LINK());
169 function SQL_FETCHROW ($result) {
170 // Is a result resource set?
171 if ((!is_resource($result)) || (!SQL_IS_LINK_UP())) return false;
173 // Fetch the data and return it
174 return mysql_fetch_row($result);
178 function SQL_FETCHARRAY ($res, $nr=0, $remove_numerical=true) {
179 // Is a result resource set?
180 if ((!is_resource($res)) || (!SQL_IS_LINK_UP())) return false;
185 // Load row from database
186 $row = mysql_fetch_array($res);
188 // Return only arrays here
189 if (is_array($row)) {
190 // Shall we remove numerical data here automatically?
191 if ($remove_numerical) {
192 // So let's remove all numerical elements to save memory!
194 for ($idx = '0'; $idx < ($max / 2); $idx++) {
203 // Return a false here...
209 function SQL_RESULT ($res, $row, $field = '0') {
211 if ((!is_resource($res)) || (!SQL_IS_LINK_UP())) return false;
213 // Run the result command and return the result
214 $result = mysql_result($res, $row, $field);
219 function SQL_CONNECT ($host, $login, $password, $F, $L) {
221 $connect = mysql_connect($host, $login, $password) or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error());
223 // Set the link resource
224 SQL_SET_LINK($connect);
227 unset($GLOBALS['sql_link_res']);
230 // SQL select database
231 function SQL_SELECT_DB ($dbName, $F, $L) {
232 // Is there still a valid link? If not, skip it.
233 if (!SQL_IS_LINK_UP()) return false;
236 return mysql_select_db($dbName, SQL_GET_LINK()) or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error());
240 function SQL_CLOSE ($F, $L) {
241 if (!SQL_IS_LINK_UP()) {
246 // Close database link and forget the link
247 $close = mysql_close(SQL_GET_LINK())
248 or addFatalMessage(__FUNCTION__, __LINE__, $F . ' (' . $L . '):'.mysql_error());
254 unset($GLOBALS['sql_link_res']);
261 function SQL_FREERESULT ($result) {
262 if ((!is_resource($result)) || (!SQL_IS_LINK_UP())) {
267 $res = mysql_free_result($result);
271 // SQL string escaping
272 function SQL_QUERY_ESC ($qstring, $data, $F, $L, $run=true, $strip=true, $secure=true) {
274 if ((!SQL_IS_LINK_UP()) || (!is_array($data))) return false;
277 $dataSecured['__sql_string'] = $qstring;
278 foreach ($data as $key => $value) {
279 $dataSecured[$key] = SQL_ESCAPE($value, $secure, $strip);
283 $query = call_user_func_array('sprintf', $dataSecured);
287 //* DEBUG: */ $fp = fopen(getConfig('CACHE_PATH') . 'escape_debug.log', 'a') or app_die(__FILE__, __LINE__, "Cannot write debug.log!");
288 //* DEBUG: */ fwrite($fp, $F.'('.$L."): ".str_replace("\r", '', str_replace("\n", ' ', $eval))."\n");
289 //* DEBUG: */ fclose($fp);
292 // Run SQL query (default)
293 return SQL_QUERY($query, $F, $L);
295 // Return secured string
300 // Get id from last INSERT command
301 function SQL_INSERTID () {
302 if (!SQL_IS_LINK_UP()) return false;
303 return mysql_insert_id();
306 // Escape a string for the database
307 function SQL_ESCAPE ($str, $secureString=true, $strip=true) {
309 if (!isset($GLOBALS['sql_escapes'][''.$str.''])) {
310 // Secure string first? (which is the default behaviour!)
311 if ($secureString === true) {
313 $str = secureString($str, $strip);
316 if (!SQL_IS_LINK_UP()) {
317 // Fall-back to escapeQuotes() when there is no link
318 $ret = escapeQuotes($str);
319 } elseif (function_exists('mysql_real_escape_string')) {
320 // The new and improved version
321 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'str='.$str);
322 $ret = mysql_real_escape_string($str, SQL_GET_LINK());
323 } elseif (function_exists('mysql_escape_string')) {
324 // The obsolete function
325 $ret = mysql_escape_string($str, SQL_GET_LINK());
327 // If nothing else works, fall back to escapeQuotes() again
328 $ret = escapeQuotes($str);
332 $GLOBALS['sql_escapes'][''.$str.''] = $ret;
336 return $GLOBALS['sql_escapes'][''.$str.''];
339 // SELECT query string from table, columns and so on... ;-)
340 function SQL_RESULT_FROM_ARRAY ($table, $columns, $idRow, $id, $F, $L) {
341 // Is columns an array?
342 if (!is_array($columns)) {
344 debug_report_bug(sprintf("columns is not an array. %s != array, file=%s, line=%s",
350 // Abort here with 'false'
354 // Prepare the SQL statement
355 $sql = "SELECT `".implode("`,`", $columns)."` FROM `{?_MYSQL_PREFIX?}_%s` WHERE `%s`='%s' LIMIT 1";
358 return SQL_QUERY_ESC($sql,
367 // ALTER TABLE wrapper function
368 function SQL_ALTER_TABLE ($sql, $F, $L) {
369 // Abort if link is down
370 if (!SQL_IS_LINK_UP()) return false;
372 // This is the default result...
375 // Determine index/fulltext/unique word
378 strpos($sql, 'INDEX') === false
380 strpos($sql, 'KEY') === false
382 strpos($sql, 'FULLTEXT') === false
384 strpos($sql, 'UNIQUE') === false
388 // Extract table name
389 $tableArray = explode(' ', $sql);
390 $tableName = str_replace('`', '', $tableArray[2]);
392 // Shall we add/drop?
393 if (((strpos($sql, 'ADD') !== false) || (strpos($sql, 'DROP') !== false)) && ($noIndex === true)) {
394 // Try two columns, one should fix
395 foreach (array(4,5) as $idx) {
396 // And column name as well
397 $columnName = str_replace('`', '', $tableArray[$idx]);
399 // Get column information
400 $result = SQL_QUERY_ESC("SHOW COLUMNS FROM `%s` LIKE '%s'",
401 array($tableName, $columnName), __FILE__, __LINE__);
403 // Do we have no entry on ADD or an entry on DROP?
404 // 123 4 4 3 3 4 4 32 23 4 4 3 3 4 4 321
405 if (((SQL_NUMROWS($result) == '0') && (strpos($sql, 'ADD') !== false)) || ((SQL_NUMROWS($result) == 1) && (strpos($sql, 'DROP') !== false))) {
407 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Executing: ' . $sql);
408 $result = SQL_QUERY($sql, $F, $L, false);
410 // Skip further attempt(s)
412 } elseif ((((SQL_NUMROWS($result) == 1) && (strpos($sql, 'ADD') !== false)) || ((SQL_NUMROWS($result) == '0') && (strpos($sql, 'DROP') !== false))) && ($columnName != 'KEY')) {
413 // Abort here because it is alreay there
414 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Skipped: ' . $sql);
416 } elseif ($columnName != 'KEY') {
417 // Something didn't fit
418 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Possible problem: ' . $sql);
421 } elseif ((getConfig('_TABLE_TYPE') == 'InnoDB') && (strpos($sql, 'FULLTEXT') !== false)) {
422 // Skip this query silently
423 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, sprintf("Skipped FULLTEXT: sql=%s,file=%s,line=%s", $sql, $F, $L));
424 } elseif ($noIndex === false) {
425 // And column name as well
426 //* DEBUG: */ print __LINE__.':tableArray=<pre>' . print_r($tableArray, true) . '</pre>';
427 $keyName = str_replace('`', '', $tableArray[5]);
429 // Is this "UNIQUE" or so? FULLTEXT has been handled the elseif() block above
430 if (in_array(strtoupper($keyName), array('INDEX', 'UNIQUE', 'KEY', 'FULLTEXT'))) {
432 $begin = 1; $keyName = ',';
433 while (strpos($keyName, ',') !== false) {
435 $keyName = str_replace('`', '', $tableArray[count($tableArray) - $begin]);
436 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, $keyName . '----------------' . $begin);
439 $keyName = str_replace('(', '', str_replace(')', '', $keyName));
440 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, $keyName . '----------------' . $begin);
448 $result = SQL_QUERY_ESC("SHOW INDEX FROM `%s`", array($tableName), __FILE__, __LINE__);
450 // Non-skipping is default for ADD
453 // But should we DROP?
454 if ($tableArray[3] == 'DROP') {
455 // Then skip if nothing found!
457 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Going to drop key ' . $keyName);
461 while ($content = SQL_FETCHARRAY($result)) {
463 //* DEBUG: */ print(__LINE__.':columnName='.$keyName.',content=<pre>' . print_r($content, true) . '</pre>');
464 if (($content['Key_name'] == $keyName) && ($tableArray[3] == 'ADD')) {
466 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, sprintf("ADD: Skiped: %s", $sql));
469 } elseif (($content['Key_name'] == $keyName) && ($tableArray[3] == 'DROP')) {
471 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, sprintf("DROP: Not skiped: %s", $sql));
478 SQL_FREERESULT($result);
481 if ($skip === false) {
482 // Send it to the SQL_QUERY() function
483 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, $sql);
484 $result = SQL_QUERY($sql, $F, $L, false);
487 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'Not executed: ' . $sql);
490 // Other ALTER TABLE query
491 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, $sql);
492 $result = SQL_QUERY($sql, $F, $L, false);
499 // Getter for SQL link
500 function SQL_GET_LINK () {
504 // Is it in the globals?
505 if (isset($GLOBALS['sql_link'])) {
507 $link = $GLOBALS['sql_link'];
515 function SQL_SET_LINK ($link) {
516 // Is this a resource or null?
517 if ((!is_resource($link)) && (!is_null($link))) {
518 // This should never happen!
519 debug_report_bug(sprintf("link is not resource or null. Type: %s", gettype($link)));
523 $GLOBALS['sql_link'] = $link;
526 // Checks if the link is up
527 function SQL_IS_LINK_UP () {
531 // Do we have cached this?
532 if (isset($GLOBALS['sql_link_res'])) {
534 $linkUp = $GLOBALS['sql_link_res'];
537 $linkUp = is_resource(SQL_GET_LINK());
540 $GLOBALS['sql_link_res'] = $linkUp;