Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

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