56ebf64d1bfda1e70f23b9227b92129171803a2c
[mailer.git] / inc / db / lib-mysql3.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 08/29/2004 *
4  * ===============                              Last change: 08/29/2004 *
5  *                                                                      *
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  * -------------------------------------------------------------------- *
13  * $Revision::                                                        $ *
14  * $Date::                                                            $ *
15  * $Tag:: 0.2.1-FINAL                                                 $ *
16  * $Author::                                                          $ *
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 - 2008 by Roland Haeder                           *
21  * For more information visit: http://www.mxchange.org                  *
22  *                                                                      *
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.                                  *
27  *                                                                      *
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.                         *
32  *                                                                      *
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,               *
36  * MA  02110-1301  USA                                                  *
37  ************************************************************************/
38
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
42         require($INC);
43 }
44
45 // SQL queries
46 function SQL_QUERY ($sql_string, $F, $L) {
47         // Link is up?
48         if (!SQL_IS_LINK_UP()) return false;
49
50         // Remove \t, \n and \r from queries they may confuse some MySQL version I have heard
51         $sql_string = str_replace("\t", " ", str_replace("\n", " ", str_replace("\r", " ", $sql_string)));
52
53         // Replace {!_MYSQL_PREFIX!} with constant, closes #84. Thanks to profi-concept
54         $sql_string = str_replace("{!_MYSQL_PREFIX!}", constant('_MYSQL_PREFIX'), $sql_string);
55
56         // Replace {!_TABLE_TYPE!} with constant
57         $sql_string = str_replace("{!_TABLE_TYPE!}", constant('_TABLE_TYPE'), $sql_string);
58
59         // Starting time
60         $querytimeBefore = array_sum(explode(' ', microtime()));
61
62         // Run SQL command
63         //* DEBUG: */ echo $sql_string."<br />\n";
64         $result = mysql_query($sql_string, SQL_GET_LINK())
65          or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error()."<br />
66 Query string:<br />
67 ".$sql_string);
68
69         // Ending time
70         $querytimeAfter = array_sum(explode(' ', microtime()));
71
72         // Calculate query time
73         $queryTime = $querytimeAfter - $querytimeBefore;
74
75         // Save last successfull query
76         setConfigEntry('db_last_query', $sql_string);
77
78         // Count this query
79         incrementConfigEntry('sql_count');
80
81         // Debug output
82         //* DEBUG: */ print "Query=<pre>".$sql_string."</pre>, affected=<strong>".SQL_AFFECTEDROWS()."</strong>, numrows=<strong>".SQL_NUMROWS($result)."</strong><br />\n";
83         if (($GLOBALS['output_mode'] != "1") && ($GLOBALS['output_mode'] != "-1") && (isDebugModeEnabled()) && (isBooleanConstantAndTrue('DEBUG_SQL'))) {
84                 //
85                 // Debugging stuff...
86                 //
87                 $fp = fopen(constant('PATH')."inc/cache/mysql.log", 'a') or mxchange_die("Cannot write mysql.log!");
88                 if (!isset($GLOBALS['sql_first_entry'])) {
89                         // Write first entry
90                         fwrite($fp, "Module=".$GLOBALS['module']."\n");
91                         $GLOBALS['sql_first_entry'] = true;
92                 } // END - if
93                 fwrite($fp, $F."(LINE=".$L."|NUM=".SQL_NUMROWS($result)."|AFFECTED=".SQL_AFFECTEDROWS()."|QUERYTIME:".$queryTime."): ".str_replace('\r', "", str_replace('\n', " ", $sql_string))."\n");
94                 fclose($fp);
95         } // END - if
96
97         // Count DB hits
98         if (!isConfigEntrySet('db_hits_run')) {
99                 // Count in dummy variable
100                 setConfigEntry('db_hits_run', 1);
101         } else {
102                 // Count to config array
103                 incrementConfigEntry('db_hits_run');
104         }
105
106         // Return the result
107         return $result;
108 }
109
110 // SQL num rows
111 function SQL_NUMROWS ($result) {
112         // Is the result a valid resource?
113         if (is_resource($result)) {
114                 // Get the count of rows from database
115                 $lines = mysql_num_rows($result);
116
117                 // Is the result empty? Then we have an error!
118                 if (empty($lines)) $lines = 0;
119         } else {
120                 // No resource given, no lines found!
121                 $lines = 0;
122         }
123         return $lines;
124 }
125
126 // SQL affected rows
127 function SQL_AFFECTEDROWS() {
128         // Valid link resource?
129         if (!SQL_IS_LINK_UP()) return false;
130
131         // Get affected rows
132         $lines = mysql_affected_rows(SQL_GET_LINK());
133
134         // Return it
135         return $lines;
136 }
137
138 // SQL fetch row
139 function SQL_FETCHROW($result) {
140         // Init data
141         $DATA = array();
142
143         // Is a result resource set?
144         if (!is_resource($result)) return false;
145
146         $DATA = mysql_fetch_row($result);
147         return $DATA;
148 }
149
150 // SQL fetch array
151 function SQL_FETCHARRAY($res, $nr=0, $remove_numerical=true) {
152         // Is a result resource set?
153         if (!is_resource($res)) return false;
154
155         // Initialize array
156         $row = array();
157
158         // Load row from database
159         $row = mysql_fetch_array($res);
160
161         // Return only arrays here
162         if (is_array($row)) {
163                 // Shall we remove numerical data here automatically?
164                 if ($remove_numerical) {
165                                  // So let's remove all numerical elements to save memory!
166                         $max = count($row);
167                         for ($idx = 0; $idx < ($max / 2); $idx++) {
168                                 // Remove entry
169                                 unset($row[$idx]);
170                         } // END - for
171                 } // END - if
172
173                 // Return row
174                 return $row;
175         } else {
176                 // Return a false here...
177                 return false;
178         }
179 }
180
181 // SQL result
182 function SQL_RESULT ($res, $row, $field = 0) {
183         // Is $res valid?
184         if (!is_resource($res)) return false;
185
186         // Run the result command and return the result
187         $result = mysql_result($res, $row, $field);
188         return $result;
189 }
190
191 // SQL connect
192 function SQL_CONNECT ($host, $login, $password, $F, $L) {
193         // Try to connect
194         $connect = mysql_connect($host, $login, $password) or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error());
195
196         // Set the link resource
197         SQL_SET_LINK($connect);
198 }
199
200 // SQL select database
201 function SQL_SELECT_DB ($dbName, $F, $L) {
202         // Is there still a valid link? If not, skip it.
203         if (!SQL_IS_LINK_UP()) return false;
204
205         // Return the result
206         return mysql_select_db($dbName, SQL_GET_LINK()) or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error());
207 }
208
209 // SQL close link
210 function SQL_CLOSE ($F, $L) {
211         if (!SQL_IS_LINK_UP()) {
212                 // Skip double close
213                 return false;
214         } // END - if
215
216         // Do we need to update cache/db counter?
217         //* DEBUG: */ echo "DB=".getConfig('db_hits').",CACHE=".getConfig('cache_hits')."<br />\n";
218         if ((GET_EXT_VERSION("cache") >= "0.0.7") && (getConfig('db_hits') > 0) && (getConfig('cache_hits') > 0) && (isCacheInstanceValid())) {
219                 // Add new hits
220                 incrementConfigEntry('db_hits', getConfig('db_hits_run'));
221
222                 // Update counter for db/cache
223                 UPDATE_CONFIG(array("db_hits", "cache_hits"), array(getConfig(('db_hits')), getConfig(('cache_hits'))));
224         } // END - if
225
226         // Close database link and forget the link
227         $close = mysql_close(SQL_GET_LINK()) or addFatalMessage(__FUNCTION__, __LINE__, $F." (".$L."):".mysql_error());
228
229         // Close link
230         SQL_SET_LINK(null);
231
232         // Return the result
233         return $close;
234 }
235
236 // SQL free result
237 function SQL_FREERESULT ($result) {
238         if (!is_resource($result)) {
239                 // Abort here
240                 return false;
241         } // END - if
242
243         $res = mysql_free_result($result);
244         return $res;
245 }
246
247 // SQL string escaping
248 function SQL_QUERY_ESC ($qstring, $data, $F, $L, $run=true, $strip=true) {
249         // Link is there?
250         if (!SQL_IS_LINK_UP()) return false;
251
252         // Init variable
253         $query = "failed";
254
255         if ($strip === true) {
256                 $strip = "true";
257         } else {
258                 $strip = "false";
259         }
260
261         $eval = "\$query = sprintf(\"".$qstring."\"";
262         foreach ($data as $var) {
263                 if ((!empty($var)) || ($var === 0)) {
264                         $eval .= ", SQL_ESCAPE(\"".$var."\",true,".$strip.")";
265                 } else {
266                         $eval .= ", ''";
267                 }
268         } // END - foreach
269         $eval .= ");";
270         //
271         // Debugging
272         //
273         //* DEBUG: */ $fp = fopen(constant('PATH')."inc/cache/escape_debug.log", 'a') or mxchange_die("Cannot write debug.log!");
274         //* DEBUG: */ fwrite($fp, $F."(".$L."): ".str_replace("\r", "", str_replace("\n", " ", $eval))."\n");
275         //* DEBUG: */ fclose($fp);
276
277         // Run the code
278         eval($eval);
279
280         // Was the eval() command fine?
281         if ($query == "failed") {
282                 // Something went wrong?
283                 debug_report_bug("eval={$eval}");
284         } // END - if
285
286         if ($run === true) {
287                 // Run SQL query (default)
288                 return SQL_QUERY($query, $F, $L);
289         } else {
290                 // Return secured string
291                 return $query;
292         }
293 }
294
295 // Get ID from last INSERT command
296 function SQL_INSERTID () {
297         if (!SQL_IS_LINK_UP()) return false;
298         return mysql_insert_id();
299 }
300
301 // Escape a string for the database
302 function SQL_ESCAPE ($str, $secureString=true, $strip=true) {
303         // Secure string first? (which is the default behaviour!)
304         if ($secureString) {
305                 // Then do it here
306                 $str = secureString($str, $strip);
307         } // END - if
308
309         if (!SQL_IS_LINK_UP()) {
310                 // Fall-back to smartAddSlashes() when there is no link
311                 return smartAddSlashes($str);
312         } elseif (function_exists('mysql_real_escape_string')) {
313                 // The new and improved version
314                 //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):str={$str}<br />\n";
315                 return mysql_real_escape_string($str, SQL_GET_LINK());
316         } elseif (function_exists('mysql_escape_string')) {
317                 // The obsolete function
318                 return mysql_escape_string($str, SQL_GET_LINK());
319         } else {
320                 // If nothing else works, fall back to smartAddSlashes()
321                 return smartAddSlashes($str);
322         }
323 }
324
325 // SELECT query string from table, columns and so on... ;-)
326 function SQL_RESULT_FROM_ARRAY ($table, $columns, $idRow, $id, $F, $L) {
327         // Is columns an array?
328         if (!is_array($columns)) {
329                 // No array
330                 trigger_error(sprintf("columns is not array. %s!=array", gettype($columns)));
331         } // END  - if
332
333         // Prepare the SQL statement
334         $sql = "SELECT `".implode("`,`", $columns)."` FROM `{!_MYSQL_PREFIX!}_%s` WHERE ``='%s' LIMIT 1";
335
336         // Return the result
337         return SQL_QUERY_ESC($sql,
338                 array(
339                         bigintval($id),
340                         $table,
341                         $idRow
342                 ), $F, $L);
343 }
344
345 // ALTER TABLE wrapper function
346 function SQL_ALTER_TABLE ($sql, $F, $L) {
347         // This is the default result...
348         $result = false;
349
350         // Determine index/fulltext/unique word
351         //         12    3             3         2    2    3                3         2    2    3              3         21
352         $noIndex = ((ereg("INDEX", $sql) == false) && (ereg("FULLTEXT", $sql) == false) && (ereg("UNIQUE", $sql) == false));
353
354         // Extract table name
355         $tableArray = explode(" ", $sql);
356         $tableName = str_replace("`", "", $tableArray[2]);
357
358         // Shall we add/drop?
359         if (((ereg("ADD", $sql)) || (ereg("DROP", $sql))) && ($noIndex)) {
360                 // And column name as well
361                 $columnName = str_replace("`", "", $tableArray[4]);
362
363                 // Get column information
364                 $result = SQL_QUERY_ESC("SHOW COLUMNS FROM %s LIKE '%s'",
365                         array($tableName, $columnName), __FILE__, __LINE__);
366
367                 // Do we have no entry on ADD or an entry on DROP?
368                 // 123           4       4     3    3    4           432    23           4       4     3    3    4            4321
369                 if (((SQL_NUMROWS($result) == 0) && (ereg("ADD", $sql))) || ((SQL_NUMROWS($result) == 1) && (ereg("DROP", $sql)))) {
370                         // Do the query
371                         //* DEBUG: */ print __LINE__.":".$sql."<br />\n";
372                         $result = SQL_QUERY($sql, $F, $L, false);
373                 } // END - if
374         } elseif ((constant('_TABLE_TYPE') == "InnoDB") && (ereg("FULLTEXT", $sql))) {
375                 // Skip this query silently
376                 //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Skipped FULLTEXT: sql=%s,file=%s,line=%s", $sql, $F, $L));
377         } elseif (!$noIndex) {
378                 // And column name as well
379                 $columnName = str_replace("`", "", $tableArray[4]);
380
381                 // Is this "UNIQUE" or so? FULLTEXT has been handled the elseif() block above
382                 if (in_array(strtoupper($columnName), array("INDEX", "UNIQUE", "KEY", "FULLTEXT"))) {
383                         // Init loop
384                         $begin = 1; $columnName = ",";
385                         while (strpos($columnName, ",") !== false) {
386                                 // Use last
387                                 $columnName = str_replace("`", "", $tableArray[count($tableArray) - $begin]);
388                                 //* DEBUG: */ print __LINE__.":".$columnName."----------------".$begin."<br />\n";
389
390                                 // Remove brackes
391                                 $columnName = str_replace("(", "", str_replace(")", "", $columnName));
392                                 //* DEBUG: */ print __LINE__.":".$columnName."----------------".$begin."<br />\n";
393
394                                 // Continue
395                                 $begin++;
396                         } // END while
397                 } // END - if
398
399                 // Show indexes
400                 $result = SQL_QUERY_ESC("SHOW INDEX FROM %s",
401                         array($tableName), __FILE__, __LINE__);
402
403                 // Walk through all
404                 $skip = false;
405                 while ($content = SQL_FETCHARRAY($result)) {
406                         // Is it found?
407                         //* DEBUG: */ print "<pre>".print_r($content, true)."</pre>";
408                         if (($content['Column_name'] == $columnName) || ($content['Key_name'] == $columnName)) {
409                                 // Skip this query!
410                                 //* DEBUG: */ DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Skiped: %s", $sql));
411                                 $skip = true;
412                                 break;
413                         } // END - if
414                 } // END - while
415
416                 // Free result
417                 SQL_FREERESULT($result);
418
419                 // Shall we run it?
420                 if (!$skip) {
421                         // Send it to the SQL_QUERY() function
422                         //* DEBUG: */ print __LINE__.":".$sql."<br />\n";
423                         $result = SQL_QUERY($sql, $F, $L, false);
424                 } // END - if
425         } else {
426                 // Other ALTER TABLE query
427                 //* DEBUG: */ print __LINE__.":".$sql."<br />\n";
428                 $result = SQL_QUERY($sql, $F, $L, false);
429         }
430
431         // Return result
432         return $result;
433 }
434
435 // Getter for SQL link
436 function SQL_GET_LINK () {
437         // Init link
438         $link = null;
439
440         // Is it in the globals?
441         if (isset($GLOBALS['sql_link'])) {
442                 // Then take it
443                 $link = $GLOBALS['sql_link'];
444         } // END - if
445
446         // Return it
447         return $link;
448 }
449
450 // Setter for link
451 function SQL_SET_LINK ($link) {
452         // Is this a resource or null?
453         if ((!is_resource($link)) && (!is_null($link))) {
454                 // This should never happen!
455                 trigger_error(sprintf("link is not resource or null. Type: %s", gettype($link)));
456         } // END - if
457
458         // Set it
459         $GLOBALS['sql_link'] = $link;
460 }
461
462 // Checks if the link is up
463 function SQL_IS_LINK_UP () {
464         // Get the link
465         $link = SQL_GET_LINK();
466
467         // Return the result
468         return (is_resource($link));
469 }
470
471 //
472 ?>