Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Newer
Older
100644 767 lines (715 sloc) 22.424 kB
667bfec Decomposition
jakubvrana authored
1 <?php
9a176b0 Comments
jakubvrana authored
2 /** Get database connection
3 * @return Min_DB
4 */
64d616c Rename get_dbh to connection
jakubvrana authored
5 function connection() {
6 // can be used in customization, $connection is minified
7 global $connection;
8 return $connection;
c64c4fd Adminer class
jakubvrana authored
9 }
10
9a176b0 Comments
jakubvrana authored
11 /** Unescape database identifier
12 * @param string text inside ``
13 * @return string
14 */
667bfec Decomposition
jakubvrana authored
15 function idf_unescape($idf) {
a29ac72 Improve drivers
jakubvrana authored
16 $last = substr($idf, -1);
17 return str_replace($last . $last, $last, substr($idf, 1, -1));
667bfec Decomposition
jakubvrana authored
18 }
19
5e01a62 Prepare for SQLite
jakubvrana authored
20 /** Escape string to use inside ''
21 * @param string
22 * @return string
23 */
24 function escape_string($val) {
7e644b4 @vrana Save bytes ($connection->quote shortcut)
authored
25 return substr(q($val), 1, -1);
5e01a62 Prepare for SQLite
jakubvrana authored
26 }
27
72f4d9e @vrana Function parse_str respects magic_quotes_gpc (bug #3034575)
authored
28 /** Disable magic_quotes_gpc
29 * @param array e.g. (&$_GET, &$_POST, &$_COOKIE)
30 * @return null modified in place
31 */
32 function remove_slashes($process) {
33 if (get_magic_quotes_gpc()) {
34 while (list($key, $val) = each($process)) {
35 foreach ($val as $k => $v) {
36 unset($process[$key][$k]);
37 if (is_array($v)) {
38 $process[$key][stripslashes($k)] = $v;
39 $process[] = &$process[$key][stripslashes($k)];
40 } else {
41 $process[$key][stripslashes($k)] = ($filter ? $v : stripslashes($v));
42 }
43 }
44 }
45 }
46 }
47
9a176b0 Comments
jakubvrana authored
48 /** Escape or unescape string to use inside form []
49 * @param string
50 * @param bool
51 * @return string
52 */
667bfec Decomposition
jakubvrana authored
53 function bracket_escape($idf, $back = false) {
64ba924 Comments
jakubvrana authored
54 // escape brackets inside name="x[]"
73e8631 Move stuff to functions.inc.php
jakubvrana authored
55 static $trans = array(':' => ':1', ']' => ':2', '[' => ':3');
667bfec Decomposition
jakubvrana authored
56 return strtr($idf, ($back ? array_flip($trans) : $trans));
57 }
58
9a176b0 Comments
jakubvrana authored
59 /** Escape for HTML
60 * @param string
61 * @return string
62 */
689699a Shortcut for htmlspecialchars
jakubvrana authored
63 function h($string) {
64 return htmlspecialchars($string, ENT_QUOTES);
65 }
66
9a176b0 Comments
jakubvrana authored
67 /** Escape for TD
68 * @param string
69 * @return string
70 */
c196985 Function nbsp
jakubvrana authored
71 function nbsp($string) {
7352c28 Replace strlen() by != ""
jakubvrana authored
72 return (trim($string) != "" ? h($string) : "&nbsp;");
c196985 Function nbsp
jakubvrana authored
73 }
74
3f5b683 Reintegrate sqlite branch
jakubvrana authored
75 /** Convert \n to <br>
76 * @param string
77 * @return string
78 */
79 function nl_br($string) {
80 return str_replace("\n", "<br>", $string); // nl2br() uses XHTML before PHP 5.3
81 }
82
6b30cfa Separate checkbox
jakubvrana authored
83 /** Generate HTML checkbox
84 * @param string
85 * @param string
86 * @param bool
87 * @param string
88 * @param string
89 * @return string
90 */
91 function checkbox($name, $value, $checked, $label = "", $onclick = "") {
c4fe12a Clickable labels in IE6
jakubvrana authored
92 static $id = 0;
93 $id++;
3f5b683 Reintegrate sqlite branch
jakubvrana authored
94 $return = "<input type='checkbox'" . ($name ? " name='$name' value='" . h($value) . "'" : "") . ($checked ? " checked" : "") . ($onclick ? " onclick=\"$onclick\"" : "") . " id='checkbox-$id'>";
7352c28 Replace strlen() by != ""
jakubvrana authored
95 return ($label != "" ? "<label for='checkbox-$id'>$return" . h($label) . "</label>" : $return);
6b30cfa Separate checkbox
jakubvrana authored
96 }
97
9a176b0 Comments
jakubvrana authored
98 /** Generate list of HTML options
99 * @param array array of strings or arrays (creates optgroup)
100 * @param mixed
101 * @param bool always use array keys for value="", otherwise only string keys are used
102 * @return string
103 */
1e4d11e Select from foreign keys in Editor
jakubvrana authored
104 function optionlist($options, $selected = null, $use_keys = false) {
667bfec Decomposition
jakubvrana authored
105 $return = "";
106 foreach ($options as $k => $v) {
107 if (is_array($v)) {
689699a Shortcut for htmlspecialchars
jakubvrana authored
108 $return .= '<optgroup label="' . h($k) . '">';
667bfec Decomposition
jakubvrana authored
109 }
ced9de9 Create single column foreign key in table structure
jakubvrana authored
110 foreach ((is_array($v) ? $v : array($k => $v)) as $key => $val) {
cb6d36c HTML instead of XHTML
jakubvrana authored
111 $return .= '<option' . ($use_keys || is_string($key) ? ' value="' . h($key) . '"' : '') . (($use_keys || is_string($key) ? (string) $key : $val) === $selected ? ' selected' : '') . '>' . h($val);
667bfec Decomposition
jakubvrana authored
112 }
113 if (is_array($v)) {
114 $return .= '</optgroup>';
115 }
116 }
117 return $return;
118 }
119
098b74b Move function
jakubvrana authored
120 /** Generate HTML radio list
121 * @param string
122 * @param array
123 * @param string
124 * @param string true for no onchange, false for radio
125 * @return string
126 */
127 function html_select($name, $options, $value = "", $onchange = true) {
128 if ($onchange) {
129 return "<select name='" . h($name) . "'" . (is_string($onchange) ? " onchange=\"$onchange\"" : "") . ">" . optionlist($options, $value) . "</select>";
130 }
131 $return = "";
132 foreach ($options as $key => $val) {
133 $return .= "<label><input type='radio' name='" . h($name) . "' value='" . h($key) . "'" . ($key == $value ? " checked" : "") . ">" . h($val) . "</label>";
134 }
135 return $return;
136 }
137
3f5b683 Reintegrate sqlite branch
jakubvrana authored
138 /** Get INI boolean value
139 * @param string
140 * @return bool
141 */
142 function ini_bool($ini) {
143 $val = ini_get($ini);
144 return (eregi('^(on|true|yes)$', $val) || (int) $val); // boolean values set by php_value are strings
145 }
146
7e644b4 @vrana Save bytes ($connection->quote shortcut)
authored
147 function q($string) {
148 global $connection;
149 return $connection->quote($string);
150 }
151
9a176b0 Comments
jakubvrana authored
152 /** Get list of values from database
153 * @param string
154 * @param mixed
155 * @return array
156 */
0bd864e Allow specifying column in get_vals
jakubvrana authored
157 function get_vals($query, $column = 0) {
64d616c Rename get_dbh to connection
jakubvrana authored
158 global $connection;
7769f2c Separate get_vals
jakubvrana authored
159 $return = array();
64d616c Rename get_dbh to connection
jakubvrana authored
160 $result = $connection->query($query);
b84252f Display SQLite compile options
jakubvrana authored
161 if (is_object($result)) {
49f7886 SHOW DATABASES can be revoked
jakubvrana authored
162 while ($row = $result->fetch_row()) {
0bd864e Allow specifying column in get_vals
jakubvrana authored
163 $return[] = $row[$column];
49f7886 SHOW DATABASES can be revoked
jakubvrana authored
164 }
7769f2c Separate get_vals
jakubvrana authored
165 }
166 return $return;
167 }
168
3f5b683 Reintegrate sqlite branch
jakubvrana authored
169 /** Get keys from first column and values from second
170 * @param string
171 * @param Min_DB
172 * @return array
173 */
174 function get_key_vals($query, $connection2 = null) {
175 global $connection;
176 if (!is_object($connection2)) {
177 $connection2 = $connection;
178 }
179 $return = array();
180 $result = $connection2->query($query);
181 while ($row = $result->fetch_row()) {
182 $return[$row[0]] = $row[1];
183 }
184 return $return;
185 }
186
b0d637b @vrana Avoid fatal errors
authored
187 /** Get all rows of result
188 * @param string
189 * @return array associative
190 */
96544ba @vrana Report errors in get_rows()
authored
191 function get_rows($query, $connection2 = null, $error = "<p class='error'>") {
b0d637b @vrana Avoid fatal errors
authored
192 global $connection;
193 if (!is_object($connection2)) {
194 $connection2 = $connection;
195 }
196 $return = array();
197 $result = $connection2->query($query);
198 if (is_object($result)) { // can return true
199 while ($row = $result->fetch_assoc()) {
200 $return[] = $row;
201 }
352fd58 @vrana Don't report no error
authored
202 } elseif (!$result && $error && (headers_sent() || ob_get_level())) {
96544ba @vrana Report errors in get_rows()
authored
203 echo $error . error() . "\n";
b0d637b @vrana Avoid fatal errors
authored
204 }
205 return $return;
206 }
207
9a176b0 Comments
jakubvrana authored
208 /** Find unique identifier of a row
209 * @param array
210 * @param array result of indexes()
35ec64c Link COUNT(*) result to listing
jakubvrana authored
211 * @return array
9a176b0 Comments
jakubvrana authored
212 */
35ec64c Link COUNT(*) result to listing
jakubvrana authored
213 function unique_array($row, $indexes) {
720f5fc Restructure indexes
jakubvrana authored
214 foreach ($indexes as $index) {
4b3d569 Save bytes
jakubvrana authored
215 if (ereg("PRIMARY|UNIQUE", $index["type"])) {
720f5fc Restructure indexes
jakubvrana authored
216 $return = array();
217 foreach ($index["columns"] as $key) {
64ba924 Comments
jakubvrana authored
218 if (!isset($row[$key])) { // NULL is ambiguous
720f5fc Restructure indexes
jakubvrana authored
219 continue 2;
667bfec Decomposition
jakubvrana authored
220 }
35ec64c Link COUNT(*) result to listing
jakubvrana authored
221 $return[$key] = $row[$key];
667bfec Decomposition
jakubvrana authored
222 }
720f5fc Restructure indexes
jakubvrana authored
223 return $return;
667bfec Decomposition
jakubvrana authored
224 }
225 }
226 $return = array();
227 foreach ($row as $key => $val) {
26c9d64 Fix long SQL query crash (bug #2839231)
jakubvrana authored
228 if (!preg_match('~^(COUNT\\((\\*|(DISTINCT )?`(?:[^`]|``)+`)\\)|(AVG|GROUP_CONCAT|MAX|MIN|SUM)\\(`(?:[^`]|``)+`\\))$~', $key)) { //! columns looking like functions
35ec64c Link COUNT(*) result to listing
jakubvrana authored
229 $return[$key] = $val;
988a29f Don't use aggregation functions in unique_idf
jakubvrana authored
230 }
430034c Cottage homework
jakubvrana authored
231 }
232 return $return;
233 }
234
9a176b0 Comments
jakubvrana authored
235 /** Create SQL condition from parsed query string
236 * @param array parsed query string
237 * @return string
238 */
9ea3112 Mandatory $where in where()
jakubvrana authored
239 function where($where) {
430034c Cottage homework
jakubvrana authored
240 $return = array();
341362a Driver specific INSERT INTO
jakubvrana authored
241 foreach ((array) $where["where"] as $key => $val) {
66ff153 Use bracket_escape function
jakubvrana authored
242 $return[] = idf_escape(bracket_escape($key, 1)) // 1 - back
243 . (ereg('\\.', $val) ? " LIKE " . exact_value(addcslashes($val, "%_")) : " = " . exact_value($val)) // LIKE because of floats, but slow with ints
244 ; //! enum and set
341362a Driver specific INSERT INTO
jakubvrana authored
245 }
246 foreach ((array) $where["null"] as $key) {
247 $return[] = idf_escape($key) . " IS NULL";
667bfec Decomposition
jakubvrana authored
248 }
c16c57b E-mail sending
jakubvrana authored
249 return implode(" AND ", $return);
667bfec Decomposition
jakubvrana authored
250 }
251
9a176b0 Comments
jakubvrana authored
252 /** Create SQL condition from query string
253 * @param string
254 * @return string
255 */
0cd2afb Remove single item clone
jakubvrana authored
256 function where_check($val) {
257 parse_str($val, $check);
72f4d9e @vrana Function parse_str respects magic_quotes_gpc (bug #3034575)
authored
258 remove_slashes(array(&$check));
0cd2afb Remove single item clone
jakubvrana authored
259 return where($check);
260 }
261
9a176b0 Comments
jakubvrana authored
262 /** Create query string where condition from value
263 * @param int condition order
264 * @param string column identifier
265 * @param string
266 * @return string
186c058 Utilize where_link function
jakubvrana authored
267 * @return string
9a176b0 Comments
jakubvrana authored
268 */
186c058 Utilize where_link function
jakubvrana authored
269 function where_link($i, $column, $value, $operator = "=") {
270 return "&where%5B$i%5D%5Bcol%5D=" . urlencode($column) . "&where%5B$i%5D%5Bop%5D=" . urlencode($operator) . "&where%5B$i%5D%5Bval%5D=" . urlencode($value);
c42c46a Table relations
jakubvrana authored
271 }
272
319cba4 Save e-mail from to cookie
jakubvrana authored
273 /** Set cookie valid for 1 month
274 * @param string
275 * @param string
276 * @return bool
277 */
278 function cookie($name, $value) {
2cec758 @vrana Direct links from HTTPS to HTTP
authored
279 global $HTTPS;
3f5b683 Reintegrate sqlite branch
jakubvrana authored
280 $params = array(
281 $name,
282 (ereg("\n", $value) ? "" : $value), // HTTP Response Splitting protection in PHP < 5.1.2
283 time() + 2592000, // 2592000 - 30 days
284 preg_replace('~\\?.*~', '', $_SERVER["REQUEST_URI"]),
285 "",
2cec758 @vrana Direct links from HTTPS to HTTP
authored
286 $HTTPS
3f5b683 Reintegrate sqlite branch
jakubvrana authored
287 );
c2334db Secure cookies
jakubvrana authored
288 if (version_compare(PHP_VERSION, '5.2.0') >= 0) {
289 $params[] = true; // HttpOnly
290 }
291 return call_user_func_array('setcookie', $params);
319cba4 Save e-mail from to cookie
jakubvrana authored
292 }
293
f9a2023 Improve concurrency
jakubvrana authored
294 /** Restart stopped session
295 * @return null
296 */
297 function restart_session() {
3f5b683 Reintegrate sqlite branch
jakubvrana authored
298 if (!ini_bool("session.use_cookies")) {
f9a2023 Improve concurrency
jakubvrana authored
299 session_start();
300 }
301 }
302
3f5b683 Reintegrate sqlite branch
jakubvrana authored
303 /** Get session variable for current server
304 * @param string
305 * @return mixed
306 */
307 function &get_session($key) {
308 return $_SESSION[$key][DRIVER][SERVER][$_GET["username"]];
309 }
310
311 /** Set session variable for current server
312 * @param string
313 * @param mixed
314 * @return mixed
315 */
316 function set_session($key, $val) {
317 $_SESSION[$key][DRIVER][SERVER][$_GET["username"]] = $val; // used also in auth.inc.php
318 }
319
605b093 @vrana List authentications
authored
320 /** Get authenticated URL
321 * @param string
322 * @param string
323 * @param string
324 * @return string
325 */
326 function auth_url($driver, $server, $username) {
327 global $drivers;
328 preg_match('~([^?]*)\\??(.*)~', remove_from_uri(implode("|", array_keys($drivers)) . "|username|" . session_name()), $match);
329 return "$match[1]?"
dea324f @vrana Store several permanent logins
authored
330 . (SID && !$_COOKIE ? SID . "&" : "")
605b093 @vrana List authentications
authored
331 . ($driver != "server" || $server != "" ? urlencode($driver) . "=" . urlencode($server) . "&" : "")
332 . "username=" . urlencode($username)
333 . ($match[2] ? "&$match[2]" : "")
334 ;
335 }
336
9a176b0 Comments
jakubvrana authored
337 /** Send Location header and exit
9bb1909 Fix Save and continue edit
jakubvrana authored
338 * @param string null to only set a message
9a176b0 Comments
jakubvrana authored
339 * @param string
340 * @return null
341 */
430034c Cottage homework
jakubvrana authored
342 function redirect($location, $message = null) {
343 if (isset($message)) {
be49e08 Improve session restarting
jakubvrana authored
344 restart_session();
ff74bf0 Allow multiple messages
jakubvrana authored
345 $_SESSION["messages"][] = $message;
430034c Cottage homework
jakubvrana authored
346 }
9bb1909 Fix Save and continue edit
jakubvrana authored
347 if (isset($location)) {
348 header("Location: " . ($location != "" ? $location : "."));
349 exit;
350 }
430034c Cottage homework
jakubvrana authored
351 }
352
9a176b0 Comments
jakubvrana authored
353 /** Execute query and redirect if successful
354 * @param string
355 * @param string
356 * @param string
357 * @param bool
358 * @param bool
359 * @param bool
360 * @return bool
361 */
748ee83 Print SQL command with multiple queries
jakubvrana authored
362 function query_redirect($query, $location, $message, $redirect = true, $execute = true, $failed = false) {
64d616c Rename get_dbh to connection
jakubvrana authored
363 global $connection, $error, $adminer;
f9a2023 Improve concurrency
jakubvrana authored
364 if ($execute) {
365 $failed = !$connection->query($query);
366 }
10bdbed Save queries to history
jakubvrana authored
367 $sql = "";
368 if ($query) {
c64c4fd Adminer class
jakubvrana authored
369 $sql = $adminer->messageQuery($query);
10bdbed Save queries to history
jakubvrana authored
370 }
748ee83 Print SQL command with multiple queries
jakubvrana authored
371 if ($failed) {
c1130ed Simplify SQL syntax errors everywhere
jakubvrana authored
372 $error = error() . $sql;
c48a017 Print SQL query by error
jakubvrana authored
373 return false;
f91b2c4 Print SQL query by message
jakubvrana authored
374 }
c48a017 Print SQL query by error
jakubvrana authored
375 if ($redirect) {
376 redirect($location, $message . $sql);
377 }
378 return true;
f91b2c4 Print SQL query by message
jakubvrana authored
379 }
380
9a176b0 Comments
jakubvrana authored
381 /** Execute and remember query
382 * @param string null to return remembered queries
383 * @return Min_Result
384 */
748ee83 Print SQL command with multiple queries
jakubvrana authored
385 function queries($query = null) {
64d616c Rename get_dbh to connection
jakubvrana authored
386 global $connection;
748ee83 Print SQL command with multiple queries
jakubvrana authored
387 static $queries = array();
388 if (!isset($query)) {
64ba924 Comments
jakubvrana authored
389 // return executed queries without parameter
36950eb Tables and views
jakubvrana authored
390 return implode(";\n", $queries);
748ee83 Print SQL command with multiple queries
jakubvrana authored
391 }
392 $queries[] = $query;
64d616c Rename get_dbh to connection
jakubvrana authored
393 return $connection->query($query);
748ee83 Print SQL command with multiple queries
jakubvrana authored
394 }
395
f9bb1c5 @vrana Introduce apply_queries function
authored
396 /** Apply command to all array items
397 * @param string
398 * @param array
399 * @param callback
400 * @return bool
401 */
402 function apply_queries($query, $tables, $escape = 'table') {
403 foreach ($tables as $table) {
404 if (!queries("$query " . $escape($table))) {
405 return false;
406 }
407 }
408 return true;
409 }
410
dbdd40a Introduce queries_redirect function
jakubvrana authored
411 /** Redirect by remembered queries
412 * @param string
413 * @param string
414 * @param bool
52b9820 @vrana Comment
authored
415 * @return bool
dbdd40a Introduce queries_redirect function
jakubvrana authored
416 */
417 function queries_redirect($location, $message, $redirect) {
418 return query_redirect(queries(), $location, $message, $redirect, false, !$redirect);
419 }
420
9a176b0 Comments
jakubvrana authored
421 /** Remove parameter from query string
422 * @param string
423 * @return string
424 */
d41d446 remove_from_uri()
jakubvrana authored
425 function remove_from_uri($param = "") {
483d7dc Remove session_name() only without SID (bug #2910681)
jakubvrana authored
426 return substr(preg_replace("~(?<=[?&])($param" . (SID ? "" : "|" . session_name()) . ")=[^&]*&~", '', "$_SERVER[REQUEST_URI]&"), 0, -1);
d41d446 remove_from_uri()
jakubvrana authored
427 }
428
9a176b0 Comments
jakubvrana authored
429 /** Generate page number for pagination
430 * @param int
431 * @return string
432 */
bd25295 Don't redirect from last page
jakubvrana authored
433 function pagination($page, $current) {
434 return " " . ($page == $current ? $page + 1 : '<a href="' . h(remove_from_uri("page") . ($page ? "&page=$page" : "")) . '">' . ($page + 1) . "</a>");
1456283 Pages on last page
jakubvrana authored
435 }
436
3e9b1ba Don't store files in hidden fields
jakubvrana authored
437 /** Get file contents from $_FILES
9a176b0 Comments
jakubvrana authored
438 * @param string
439 * @param bool
3e9b1ba Don't store files in hidden fields
jakubvrana authored
440 * @return mixed int for error, string otherwise
9a176b0 Comments
jakubvrana authored
441 */
25f01d3 Compress export and import
jakubvrana authored
442 function get_file($key, $decompress = false) {
443 $file = $_FILES[$key];
444 if (!$file || $file["error"]) {
445 return $file["error"];
430034c Cottage homework
jakubvrana authored
446 }
0a2d81d Bzip2 import
jakubvrana authored
447 return file_get_contents($decompress && ereg('\\.gz$', $file["name"]) ? "compress.zlib://$file[tmp_name]"
448 : ($decompress && ereg('\\.bz2$', $file["name"]) ? "compress.bzip2://$file[tmp_name]"
449 : $file["tmp_name"]
450 )); //! may not be reachable because of open_basedir
430034c Cottage homework
jakubvrana authored
451 }
452
9a176b0 Comments
jakubvrana authored
453 /** Determine upload error
454 * @param int
455 * @return string
456 */
e2a03c0 Show upload_max_filesize
jakubvrana authored
457 function upload_error($error) {
458 $max_size = ($error == UPLOAD_ERR_INI_SIZE ? ini_get("upload_max_filesize") : null); // post_max_size is checked in index.php
b2a7c7a Execute SQL file stored on server disk
jakubvrana authored
459 return ($error ? lang('Unable to upload a file.') . ($max_size ? " " . lang('Maximum allowed file size is %sB.', $max_size) : "") : lang('File does not exist.'));
e2a03c0 Show upload_max_filesize
jakubvrana authored
460 }
461
9a176b0 Comments
jakubvrana authored
462 /** Generate class for odd rows
463 * @param string return this for odd rows, empty to reset counter
464 * @return string
465 */
466 function odd($return = ' class="odd"') {
4e5b126 Highlight odd and hover rows
jakubvrana authored
467 static $i = 0;
9a176b0 Comments
jakubvrana authored
468 if (!$return) { // reset counter
1b97f48 Reset odd() for each result
jakubvrana authored
469 $i = -1;
4e5b126 Highlight odd and hover rows
jakubvrana authored
470 }
9a176b0 Comments
jakubvrana authored
471 return ($i++ % 2 ? $return : '');
4e5b126 Highlight odd and hover rows
jakubvrana authored
472 }
473
9a176b0 Comments
jakubvrana authored
474 /** Check whether the string is in UTF-8
475 * @param string
476 * @return bool
477 */
017ffb5 Better UTF-8 detection
jakubvrana authored
478 function is_utf8($val) {
64ba924 Comments
jakubvrana authored
479 // don't print control chars except \t\r\n
017ffb5 Better UTF-8 detection
jakubvrana authored
480 return (preg_match('~~u', $val) && !preg_match('~[\\0-\\x8\\xB\\xC\\xE-\\x1F]~', $val));
481 }
482
9a176b0 Comments
jakubvrana authored
483 /** Shorten UTF-8 string
484 * @param string
485 * @param int
486 * @param string
487 * @return string escaped string with appended ...
488 */
cd07584 Save SQL query to history
jakubvrana authored
489 function shorten_utf8($string, $length = 80, $suffix = "") {
11982f1 Shorten printed SQL query
jakubvrana authored
490 if (!preg_match("(^([\t\r\n -\x{FFFF}]{0,$length})($)?)u", $string, $match)) { // ~s causes trash in $match[2] under some PHP versions, (.|\n) is slow
491 preg_match("(^([\t\r\n -~]{0,$length})($)?)", $string, $match);
95764b0 Shorten binary strings
jakubvrana authored
492 }
687b3fd @vrana Replace <strong> by <b> and <em> by <i>
authored
493 return h($match[1]) . $suffix . (isset($match[2]) ? "" : "<i>...</i>");
02a851c Shorten texts in PHP
jakubvrana authored
494 }
3920ebb Remove InnoDB table comment in Tables and views
jakubvrana authored
495
9a176b0 Comments
jakubvrana authored
496 /** Generate friendly URL
497 * @param string
498 * @return string
499 */
8251896 Downloaded file name
jakubvrana authored
500 function friendly_url($val) {
64ba924 Comments
jakubvrana authored
501 // used for blobs and export
8251896 Downloaded file name
jakubvrana authored
502 return preg_replace('~[^a-z0-9_]~i', '-', $val);
503 }
504
9a176b0 Comments
jakubvrana authored
505 /** Print hidden fields
506 * @param array
507 * @param array
508 * @return null
509 */
820c882 Bulk clone
jakubvrana authored
510 function hidden_fields($process, $ignore = array()) {
5d7071a Choose language through option-list
jakubvrana authored
511 while (list($key, $val) = each($process)) {
512 if (is_array($val)) {
513 foreach ($val as $k => $v) {
514 $process[$key . "[$k]"] = $v;
515 }
516 } elseif (!in_array($key, $ignore)) {
689699a Shortcut for htmlspecialchars
jakubvrana authored
517 echo '<input type="hidden" name="' . h($key) . '" value="' . h($val) . '">';
5d7071a Choose language through option-list
jakubvrana authored
518 }
519 }
520 }
61640ee Move common functions
jakubvrana authored
521
3f5b683 Reintegrate sqlite branch
jakubvrana authored
522 /** Print hidden fields for GET forms
523 * @return null
524 */
525 function hidden_fields_get() {
526 echo (SID && !$_COOKIE ? '<input type="hidden" name="' . session_name() . '" value="' . h(session_id()) . '">' : '');
527 echo (SERVER !== null ? '<input type="hidden" name="' . DRIVER . '" value="' . h(SERVER) . '">' : "");
528 echo '<input type="hidden" name="username" value="' . h($_GET["username"]) . '">';
529 }
530
9a176b0 Comments
jakubvrana authored
531 /** Find out foreign keys for each column
532 * @param string
533 * @return array array($col => array())
534 */
1e4d11e Select from foreign keys in Editor
jakubvrana authored
535 function column_foreign_keys($table) {
536 $return = array();
537 foreach (foreign_keys($table) as $foreign_key) {
538 foreach ($foreign_key["source"] as $val) {
539 $return[$val][] = $foreign_key;
540 }
541 }
542 return $return;
543 }
544
3f5b683 Reintegrate sqlite branch
jakubvrana authored
545 /** Print enum input field
546 * @param string "radio"|"checkbox"
547 * @param string
548 * @param array
549 * @param mixed int|string|array
550 * @return null
551 */
454c80f @vrana Save bytes
authored
552 function enum_input($type, $attrs, $field, $value) {
3f5b683 Reintegrate sqlite branch
jakubvrana authored
553 preg_match_all("~'((?:[^']|'')*)'~", $field["length"], $matches);
554 foreach ($matches[1] as $i => $val) {
555 $val = stripcslashes(str_replace("''", "'", $val));
556 $checked = (is_int($value) ? $value == $i+1 : (is_array($value) ? in_array($i+1, $value) : $value === $val));
454c80f @vrana Save bytes
authored
557 echo " <label><input type='$type'$attrs value='" . ($i+1) . "'" . ($checked ? ' checked' : '') . '>' . h($val) . '</label>';
3f5b683 Reintegrate sqlite branch
jakubvrana authored
558 }
559 }
560
9a176b0 Comments
jakubvrana authored
561 /** Print edit input field
562 * @param array one field from fields()
563 * @param mixed
564 * @param string
565 * @return null
566 */
1e4d11e Select from foreign keys in Editor
jakubvrana authored
567 function input($field, $value, $function) {
e672694 @vrana Rename $driver to $jush
authored
568 global $types, $adminer, $jush;
689699a Shortcut for htmlspecialchars
jakubvrana authored
569 $name = h(bracket_escape($field["field"]));
61640ee Move common functions
jakubvrana authored
570 echo "<td class='function'>";
6758477 Hide NULL in Editor enum
jakubvrana authored
571 $functions = (isset($_GET["select"]) ? array("orig" => lang('original')) : array()) + $adminer->editFunctions($field);
454c80f @vrana Save bytes
authored
572 $attrs = " name='fields[$name]'";
61640ee Move common functions
jakubvrana authored
573 if ($field["type"] == "enum") {
454c80f @vrana Save bytes
authored
574 echo nbsp($functions[""]) . "<td>" . ($functions["orig"] ? "<label><input type='radio'$attrs value='-1' checked><i>$functions[orig]</i></label> " : "");
575 echo $adminer->editInput($_GET["edit"], $field, $attrs, $value);
576 enum_input("radio", $attrs, $field, $value);
61640ee Move common functions
jakubvrana authored
577 } else {
9903946 Use original values in Editor multi edit
jakubvrana authored
578 $first = 0;
579 foreach ($functions as $key => $val) {
580 if ($key === "" || !$val) {
581 break;
582 }
583 $first++;
584 }
689699a Shortcut for htmlspecialchars
jakubvrana authored
585 $onchange = ($first ? " onchange=\"var f = this.form['function[" . addcslashes($name, "\r\n'\\") . "]']; if ($first > f.selectedIndex) f.selectedIndex = $first;\"" : "");
454c80f @vrana Save bytes
authored
586 $attrs .= $onchange;
c5a1a77 @vrana Functions translation
authored
587 echo (count($functions) > 1 ? html_select("function[$name]", $functions, !isset($function) || in_array($function, $functions) || isset($functions[$function]) ? $function : "") : nbsp(reset($functions))) . '<td>';
a561252 Use distinct name for blob inputs
jakubvrana authored
588 $input = $adminer->editInput($_GET["edit"], $field, $attrs, $value); // usage in call is without a table
7352c28 Replace strlen() by != ""
jakubvrana authored
589 if ($input != "") {
e1abcda Treat tinyint(1) as boolean
jakubvrana authored
590 echo $input;
1e4d11e Select from foreign keys in Editor
jakubvrana authored
591 } elseif ($field["type"] == "set") { //! 64 bits
26c9d64 Fix long SQL query crash (bug #2839231)
jakubvrana authored
592 preg_match_all("~'((?:[^']|'')*)'~", $field["length"], $matches);
61640ee Move common functions
jakubvrana authored
593 foreach ($matches[1] as $i => $val) {
594 $val = stripcslashes(str_replace("''", "'", $val));
595 $checked = (is_int($value) ? ($value >> $i) & 1 : in_array($val, explode(",", $value), true));
4cead56 Edit default values directly in table creation
jakubvrana authored
596 echo " <label><input type='checkbox' name='fields[$name][$i]' value='" . (1 << $i) . "'" . ($checked ? ' checked' : '') . "$onchange>" . h($val) . '</label>';
61640ee Move common functions
jakubvrana authored
597 }
5a73c01 @vrana Treat binary type as hex
authored
598 } elseif (ereg('blob|bytea|raw|file', $field["type"]) && ini_bool("file_uploads")) {
a561252 Use distinct name for blob inputs
jakubvrana authored
599 echo "<input type='file' name='fields-$name'$onchange>";
375a5c8 @vrana Non-MySQL binary types
authored
600 } elseif (ereg('text|lob', $field["type"])) {
e672694 @vrana Rename $driver to $jush
authored
601 echo "<textarea " . ($jush != "sqlite" || ereg("\n", $value) ? "cols='50' rows='12'" : "cols='30' rows='1' style='height: 1.2em;'") . "$attrs>" . h($value) . '</textarea>'; // 1.2em - line-height
61640ee Move common functions
jakubvrana authored
602 } else {
603 // int(3) is only a display hint
5a73c01 @vrana Treat binary type as hex
authored
604 $maxlength = (!ereg('int', $field["type"]) && preg_match('~^([0-9]+)(,([0-9]+))?$~', $field["length"], $match) ? ((ereg("binary", $field["type"]) ? 2 : 1) * $match[1] + ($match[3] ? 1 : 0) + ($match[2] && !$field["unsigned"] ? 1 : 0)) : ($types[$field["type"]] ? $types[$field["type"]] + ($field["unsigned"] ? 0 : 1) : 0));
605 echo "<input value='" . h($value) . "'" . ($maxlength ? " maxlength='$maxlength'" : "") . (ereg('char|binary', $field["type"]) && $maxlength > 20 ? " size='40'" : "") . "$attrs>";
61640ee Move common functions
jakubvrana authored
606 }
607 }
608 }
609
9a176b0 Comments
jakubvrana authored
610 /** Process edit input field
611 * @param one field from fields()
612 * @return string
613 */
a0def47 Date localization
jakubvrana authored
614 function process_input($field) {
7e644b4 @vrana Save bytes ($connection->quote shortcut)
authored
615 global $adminer;
a0def47 Date localization
jakubvrana authored
616 $idf = bracket_escape($field["field"]);
61640ee Move common functions
jakubvrana authored
617 $function = $_POST["function"][$idf];
618 $value = $_POST["fields"][$idf];
3f5b683 Reintegrate sqlite branch
jakubvrana authored
619 if ($field["type"] == "enum") {
620 if ($value == -1) {
621 return false;
622 }
623 if ($value == "") {
624 return "NULL";
625 }
626 return intval($value);
627 }
628 if ($field["auto_increment"] && $value == "") {
629 return null;
630 }
631 if ($function == "orig") {
61640ee Move common functions
jakubvrana authored
632 return false;
3f5b683 Reintegrate sqlite branch
jakubvrana authored
633 }
634 if ($function == "NULL") {
61640ee Move common functions
jakubvrana authored
635 return "NULL";
3f5b683 Reintegrate sqlite branch
jakubvrana authored
636 }
637 if ($field["type"] == "set") {
4cead56 Edit default values directly in table creation
jakubvrana authored
638 return array_sum((array) $value);
3f5b683 Reintegrate sqlite branch
jakubvrana authored
639 }
5a73c01 @vrana Treat binary type as hex
authored
640 if (ereg('blob|bytea|raw|file', $field["type"]) && ini_bool("file_uploads")) {
a561252 Use distinct name for blob inputs
jakubvrana authored
641 $file = get_file("fields-$idf");
61640ee Move common functions
jakubvrana authored
642 if (!is_string($file)) {
643 return false; //! report errors
644 }
7e644b4 @vrana Save bytes ($connection->quote shortcut)
authored
645 return q($file);
61640ee Move common functions
jakubvrana authored
646 }
3f5b683 Reintegrate sqlite branch
jakubvrana authored
647 return $adminer->processInput($field, $value, $function);
61640ee Move common functions
jakubvrana authored
648 }
649
db07325 Search in all tables
jakubvrana authored
650 /** Print results of search in all tables
651 * @uses $_GET["where"][0]
652 * @uses $_POST["tables"]
653 * @return null
654 */
655 function search_tables() {
656 global $adminer, $connection;
dfa6cbf @vrana Show tables overview in Editor
authored
657 $_GET["where"][0]["op"] = "LIKE %%";
658 $_GET["where"][0]["val"] = $_POST["query"];
db07325 Search in all tables
jakubvrana authored
659 $found = false;
660 foreach (table_status() as $table => $table_status) {
661 $name = $adminer->tableName($table_status);
662 if (isset($table_status["Engine"]) && $name != "" && (!$_POST["tables"] || in_array($table, $_POST["tables"]))) {
ee3e045 @vrana Separate $where in limit function
authored
663 $result = $connection->query("SELECT" . limit("1 FROM " . table($table), " WHERE " . implode(" AND ", $adminer->selectSearchProcess(fields($table), array())), 1));
782921b @vrana Finish SQLite
authored
664 if ($result->fetch_row()) {
db07325 Search in all tables
jakubvrana authored
665 if (!$found) {
666 echo "<ul>\n";
667 $found = true;
668 }
669 echo "<li><a href='" . h(ME . "select=" . urlencode($table) . "&where[0][op]=" . urlencode($_GET["where"][0]["op"]) . "&where[0][val]=" . urlencode($_GET["where"][0]["val"])) . "'>" . h($name) . "</a>\n";
670 }
671 }
672 }
673 echo ($found ? "</ul>" : "<p class='message'>" . lang('No tables.')) . "\n";
674 }
675
9a176b0 Comments
jakubvrana authored
676 /** Print CSV row
677 * @param array
678 * @return null
679 */
61640ee Move common functions
jakubvrana authored
680 function dump_csv($row) {
681 foreach ($row as $key => $val) {
3f5b683 Reintegrate sqlite branch
jakubvrana authored
682 if (preg_match("~[\"\n,;]~", $val) || $val === "") {
61640ee Move common functions
jakubvrana authored
683 $row[$key] = '"' . str_replace('"', '""', $val) . '"';
684 }
685 }
acf7a42 Improve CSV; export
jakubvrana authored
686 echo implode(($_POST["format"] == "csv" ? "," : ";"), $row) . "\n";
61640ee Move common functions
jakubvrana authored
687 }
c16c57b E-mail sending
jakubvrana authored
688
9a176b0 Comments
jakubvrana authored
689 /** Apply SQL function
690 * @param string
691 * @param string escaped column identifier
692 * @return string
693 */
e331067 Move apply_sql_function
jakubvrana authored
694 function apply_sql_function($function, $column) {
3f5b683 Reintegrate sqlite branch
jakubvrana authored
695 return ($function ? ($function == "unixepoch" ? "DATETIME($column, '$function')" : ($function == "count distinct" ? "COUNT(DISTINCT " : strtoupper("$function(")) . "$column)") : $column);
e331067 Move apply_sql_function
jakubvrana authored
696 }
697
4ba2d85 @vrana Allow permanent login without customization
authored
698 /** Read password from file adminer.key in temporary directory or create one
699 * @return string or false if the file can not be created
700 */
701 function password_file() {
702 $dir = ini_get("upload_tmp_dir"); // session_save_path() may contain other storage path
703 if (!$dir) {
704 if (function_exists('sys_get_temp_dir')) {
705 $dir = sys_get_temp_dir();
706 } else {
707 $filename = @tempnam("", ""); // @ - temp directory can be disabled by open_basedir
708 if (!$filename) {
709 return false;
710 }
711 $dir = dirname($filename);
712 unlink($filename);
713 }
714 }
715 $filename = "$dir/adminer.key";
716 $return = @file_get_contents($filename); // @ - can not exist
717 if ($return) {
718 return $return;
719 }
720 $fp = @fopen($filename, "w"); // @ - can have insufficient rights //! is not atomic
721 if ($fp) {
722 $return = md5(uniqid(mt_rand(), true));
723 fwrite($fp, $return);
724 fclose($fp);
725 }
726 return $return;
727 }
728
9a176b0 Comments
jakubvrana authored
729 /** Check whether the string is e-mail address
730 * @param string
731 * @return bool
732 */
c16c57b E-mail sending
jakubvrana authored
733 function is_email($email) {
734 $atom = '[-a-z0-9!#$%&\'*+/=?^_`{|}~]'; // characters of local-name
735 $domain = '[a-z0-9]([-a-z0-9]{0,61}[a-z0-9])'; // one domain component
28e1dd2 Allow multiple e-mails
jakubvrana authored
736 $pattern = "$atom+(\\.$atom+)*@($domain?\\.)+$domain";
737 return preg_match("(^$pattern(,\\s*$pattern)*\$)i", $email);
c16c57b E-mail sending
jakubvrana authored
738 }
dc667ea Hide select export and import
jakubvrana authored
739
bc78866 Link URLs in select
jakubvrana authored
740 /** Check whether the string is URL address
741 * @param string
2cec758 @vrana Direct links from HTTPS to HTTP
authored
742 * @return string "http", "https" or ""
bc78866 Link URLs in select
jakubvrana authored
743 */
744 function is_url($string) {
2cec758 @vrana Direct links from HTTPS to HTTP
authored
745 $domain = '[a-z0-9]([-a-z0-9]{0,61}[a-z0-9])'; // one domain component //! IDN
746 return (preg_match("~^(https?)://($domain?\\.)+$domain(:[0-9]+)?(/.*)?(\\?.*)?(#.*)?\$~i", $string, $match) ? strtolower($match[1]) : ""); //! restrict path, query and fragment characters
bc78866 Link URLs in select
jakubvrana authored
747 }
748
dc667ea Hide select export and import
jakubvrana authored
749 /** Print header for hidden fieldset (close by </div></fieldset>)
750 * @param string
751 * @param string
752 * @param bool
753 * @return null
754 */
755 function print_fieldset($id, $legend, $visible = false) {
756 echo "<fieldset><legend><a href='#fieldset-$id' onclick=\"return !toggle('fieldset-$id');\">$legend</a></legend><div id='fieldset-$id'" . ($visible ? "" : " class='hidden'") . ">\n";
757 }
94a2be5 Highlight current links
jakubvrana authored
758
759 /** Enclose $string to <b> if $bold is true
760 * @param string
761 * @param bool
762 * @return string
763 */
764 function bold($string, $bold) {
765 return ($bold ? "<b>$string</b>" : $string);
766 }
Something went wrong with that request. Please try again.