Mahor rewrite:
[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  *                                                                      *
14  * -------------------------------------------------------------------- *
15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
16  * For more information visit: http://www.mxchange.org                  *
17  *                                                                      *
18  * This program is free software; you can redistribute it and/or modify *
19  * it under the terms of the GNU General Public License as published by *
20  * the Free Software Foundation; either version 2 of the License, or    *
21  * (at your option) any later version.                                  *
22  *                                                                      *
23  * This program is distributed in the hope that it will be useful,      *
24  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
26  * GNU General Public License for more details.                         *
27  *                                                                      *
28  * You should have received a copy of the GNU General Public License    *
29  * along with this program; if not, write to the Free Software          *
30  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
31  * MA  02110-1301  USA                                                  *
32  ************************************************************************/
33
34 // Some security stuff...
35 if (!defined('__SECURITY')) {
36         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
37         require($INC);
38 }
39
40 // SQL queries
41 function SQL_QUERY ($sql_string, $F, $L) {
42         global $link, $CSS, $_CONFIG, $OK;
43
44         // Remove \t, \n and \r from queries they may confuse some MySQL version I have heard
45         $sql_string = str_replace("\t", " ", str_replace("\n", " ", str_replace("\r", " ", $sql_string)));
46
47         // Starting time
48         $querytimeBefore = array_sum(explode(' ', microtime()));
49
50         // Run SQL command
51         //* DEBUG: */ echo $sql_string."<br />\n";
52         $result = @mysql_query($sql_string, $link)
53          or ADD_FATAL($F." (".$L."):".mysql_error()."<br />
54 Query string:<br />
55 ".$sql_string);
56
57         // Ending time
58         $querytimeAfter = array_sum(explode(' ', microtime()));
59
60         // Calculate query time
61         $queryTime = $querytimeAfter - $querytimeBefore;
62
63         // Save last successfull query
64         $_CONFIG['db_last_query'] = $sql_string;
65
66         // Count this query
67         if (getConfig('sql_count') == null) $_CONFIG['sql_count'] = 0;
68         $_CONFIG['sql_count']++;
69
70         // Debug output
71         //* DEBUG: */ print "Query=<pre>".$sql_string."</pre>, affected=<b>".SQL_AFFECTEDROWS()."</b>, numrows=<b>".SQL_NUMROWS($result)."</b><br />\n";
72
73         if (($CSS != "1") && ($CSS != "-1") && (isBooleanConstantAndTrue('DEBUG_MODE')) && (isBooleanConstantAndTrue('DEBUG_SQL'))) {
74                 //
75                 // Debugging stuff...
76                 //
77                 $fp = @fopen(PATH."inc/cache/mysql.log", 'a') or mxchange_die("Cannot write mysql.log!");
78                 if (!isset($OK)) {
79                         // Write first entry
80                         fwrite($fp, "Module=".$GLOBALS['module']."\n");
81                         $OK = true;
82                 } // END - if
83                 fwrite($fp, $F."(LINE=".$L."|NUM=".SQL_NUMROWS($result)."|AFFECTED=".SQL_AFFECTEDROWS()."|QUERYTIME:".$queryTime."): ".str_replace('\r', "", str_replace('\n', " ", $sql_string))."\n");
84                 fclose($fp);
85         } // END - if
86
87         // Count DB hits
88         if (getConfig('db_hits_run') == null) {
89                 // Count in dummy variable
90                 $_CONFIG['db_hits_run'] = 1;
91         } else {
92                 // Count to config array
93                 $_CONFIG['db_hits_run']++;
94         }
95
96         // Return the result
97         return $result;
98 }
99
100 // SQL num rows
101 function SQL_NUMROWS($result) {
102         // Is the result a valid resource?
103         if (is_resource($result)) {
104                 // Get the count of rows from database
105                 $lines = @mysql_num_rows($result);
106
107                 // Is the result empty? Then we have an error!
108                 if (empty($lines)) $lines = 0;
109         } else {
110                 // No resource given, no lines found!
111                 $lines = 0;
112         }
113         return $lines;
114 }
115
116 // SQL affected rows
117 function SQL_AFFECTEDROWS() {
118         global $link;
119
120         // Valid link resource?
121         if (!is_resource($link)) return false;
122
123         // Get affected rows
124         $lines = @mysql_affected_rows($link);
125
126         // Return it
127         return $lines;
128 }
129
130 // SQL fetch row
131 function SQL_FETCHROW($result) {
132         // Init data
133         $DATA = array();
134
135         // Is a result resource set?
136         if (!is_resource($result)) return false;
137
138         $DATA = @mysql_fetch_row($result);
139         return $DATA;
140 }
141
142 // SQL fetch array
143 function SQL_FETCHARRAY($res, $nr=0, $remove_numerical=true) {
144         // Is a result resource set?
145         if (!is_resource($res)) return false;
146
147         // Initialize array
148         $row = array();
149
150         // Load row from database
151         $row = @mysql_fetch_array($res);
152
153         // Return only arrays here
154         if (is_array($row)) {
155                 // Shall we remove numerical data here automatically?
156                 if ($remove_numerical) {
157                                  // So let's remove all numerical elements to save memory!
158                         $max = count($row);
159                         for ($idx = 0; $idx < ($max / 2); $idx++) {
160                                 // Remove entry
161                                 unset($row[$idx]);
162                         }
163                 }
164
165                 // Return row
166                 return $row;
167         } else {
168                 // Return a false here...
169                 return false;
170         }
171 }
172
173 // SQL result
174 function SQL_RESULT($res, $row, $field) {
175         $result = @mysql_result($res, $row, $field);
176         return $result;
177 }
178 // SQL connect
179 function SQL_CONNECT($host, $login, $password, $F, $L) {
180         $connect = @mysql_connect($host, $login, $password) or ADD_FATAL($F." (".$L."):".mysql_error());
181         return $connect;
182 }
183 // SQL select database
184 function SQL_SELECT_DB($dbName, $link, $F, $L) {
185         $select = false;
186         if (is_resource($link)) {
187                 $select = @mysql_select_db($dbName, $link) or ADD_FATAL($F." (".$L."):".mysql_error());
188         }
189         return $select;
190 }
191 // SQL close link
192 function SQL_CLOSE(&$link, $F, $L) {
193         global $_CONFIG, $cacheInstance, $cacheArray;
194
195         // Is there still a valid link?
196         if (!is_resource($link)) {
197                 // Skip double close
198                 return false;
199         } // END - if
200
201         // Do we need to update cache/db counter?
202         //* DEBUG: */ echo "DB=".getConfig('db_hits').",CACHE=".getConfig('cache_hits')."<br />\n";
203         if ((GET_EXT_VERSION("cache") >= "0.0.7") && (getConfig('db_hits') > 0) && (getConfig('cache_hits') > 0) && (is_object($cacheInstance))) {
204                 // Add new hits
205                 $_CONFIG['db_hits'] += getConfig('db_hits_run');
206
207                 // Update counter for db/cache
208                 UPDATE_CONFIG(array("db_hits", "cache_hits"), array(bigintval(getConfig('db_hits')), bigintval(getConfig('cache_hits'))));
209         } // END - if
210
211         // Close database link and forget the link
212         $close = @mysql_close($link) or ADD_FATAL($F." (".$L."):".mysql_error());
213         $link = null;
214         return $close;
215 }
216 // SQL free result
217 function SQL_FREERESULT($result) {
218         if (!is_resource($result)) {
219                 // Abort here
220                 return false;
221         } // END - if
222
223         $res = @mysql_free_result($result);
224         return $res;
225 }
226 // SQL string escaping
227 function SQL_QUERY_ESC($qstring, $data, $file, $line, $run=true, $strip=true) {
228         global $link;
229
230         if ($strip) {
231                 $strip = "true";
232         } else {
233                 $strip = "false";
234         }
235
236         $query = "";
237         $eval = "\$query = sprintf(\"".$qstring."\"";
238         foreach ($data as $var) {
239                 if ((!empty($var)) || ($var === 0)) {
240                         $eval .= ", SQL_ESCAPE(\"".$var."\",true,".$strip.")";
241                 } else {
242                         $eval .= ", ''";
243                 }
244         }
245         $eval .= ");";
246         //
247         // Debugging
248         //
249         //* DEBUG: */ $fp = fopen(PATH."inc/cache/escape_debug.log", 'a') or mxchange_die("Cannot write debug.log!");
250         //* DEBUG: */ fwrite($fp, $file."(".$line."): ".str_replace("\r", "", str_replace("\n", " ", $eval))."\n");
251         //* DEBUG: */ fclose($fp);
252
253         // Run the code
254         @eval($eval);
255
256         // Was the eval() command fine?
257         if (empty($query)) {
258                 // Something went wrong?
259                 print "eval=".htmlentities($eval)."<pre>";
260                 debug_print_backtrace();
261                 die("</pre>");
262         } // END - if
263
264         if ($run) {
265                 // Run SQL query (default)
266                 return SQL_QUERY($query, $file, $line);
267         } else {
268                 // Return secured string
269                 return $query;
270         }
271 }
272 // Get ID from last INSERT command
273 function SQL_INSERTID() {
274         return @mysql_insert_id();
275 }
276 // Escape a string for the database
277 function SQL_ESCAPE($str, $secureString=true,$strip=true) {
278         global $link;
279
280         // Secure string first? (which is the default behaviour!)
281         if ($secureString) {
282                 // Then do it here
283                 $str = secureString($str, $strip);
284         } // END - if
285
286         if (!is_resource($link)) {
287                 // Fall-back to addslashes() when there is no link
288                 return addslashes($str);
289         } // END - if
290
291         if (function_exists('mysql_real_escape_string')) {
292                 // The new and improved version
293                 //* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):str={$str}<br />\n";
294                 return mysql_real_escape_string($str, $link);
295         } elseif (function_exists('mysql_escape_string')) {
296                 // The obsolete function
297                 return mysql_escape_string($str, $link);
298         } else {
299                 // If nothing else works
300                 return addslashes($str);
301         }
302 }
303 // SELECT query string from table, columns and so on... ;-)
304 function SQL_RESULT_FROM_ARRAY ($table, $columns, $idRow, $id, $F, $L) {
305         // Prepare the SQL statement
306         $SQL = "SELECT ".implode(", ", $columns)." FROM "._MYSQL_PREFIX."_".$table." WHERE ".$idRow."=%s LIMIT 1";
307
308         // Return the result
309         return SQL_QUERY_ESC($SQL, array(bigintval($id)), $F, $L);
310 }
311 // ALTER TABLE wrapper function
312 function SQL_ALTER_TABLE($sql, $F, $L) {
313         // Shall we add?
314         if (eregi("ADD", $sql) > 0) {
315                 // Extract table name
316                 $tableArray = explode(" ", $sql);
317                 $tableName = str_replace("`", "", $tableArray[2]);
318
319                 // And column name as well
320                 $columnName = str_replace("`", "", $tableArray[4]);
321
322                 // Get column information
323                 $result = SQL_QUERY_ESC("SHOW COLUMNS FROM %s LIKE '%s'",
324                         array($tableName, $columnName), $F, $L);
325
326                 // Do we have no entry?
327                 if (SQL_NUMROWS($result) == 0) {
328                         // Do the query
329                         return SQL_QUERY($sql, $F, $L, false);
330                 } // END - if
331         } else {
332                 // Send it to the SQL_QUERY() function
333                 return SQL_QUERY($sql, $F, $L, false);
334         }
335 }
336 //
337 ?>