1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
<?php
// File debug_funcs.inc.php / ibWebAdmin
// Purpose provides functions for debuging purpose
// Author Lutz Brueckner <irie@gmx.de>
// Copyright (c) 2000, 2001, 2002 by Lutz Brueckner,
// published under the terms of the GNU General Public Licence v.2,
// see file LICENCE for details
// Created <01/09/02 14:19:32 lb>
//
// $Id: debug_funcs.inc.php,v 1.4 2002/10/19 17:58:17 lbrueckner Exp $
//
// write the content of php's output_buffer to $fname
//
function write_output_buffer($fname) {
$fp = fopen($fname, 'w')
or die('Error opening file '.$fname);
fwrite($fp, ob_get_contents())
or die('Error writing to file '.$fname);
ob_end_flush();
}
//
// output the distance between $start and $end,
// which are resultstrings from microtime()
//
function show_time_consumption($start, $end) {
list($sm, $ss) = split(' ', $start);
list($em, $es) = split(' ', $end);
$elapsed = $es - $ss + $em - $sm;
echo 'time consumption: '.$elapsed."<br>\n";
}
// add a string to array $debug[], $debug[] is printed on the info-panel if DEBUG == TRUE
// call this function with one or three parameters:
//
// $str : if $$str is a variable print its name and value, else just print $str
// $file, $line : are thought to be __FILE__ and __LINE__ at the place the function is called
//
function add_debug($str, $file=NULL, $line=NULL) {
if ($file == NULL || $line == NULL) {
$dstr = "<tr>\n<td colspan=\"2\">";
if (isset($GLOBALS[$str])) {
$dstr .= add_var_debug($str, "<br>\n");
} else {
$dstr .= "$str<br>\n";
}
}
else {
$dstr = "<tr>\n<td>$file, $line:</td>\n";
if (isset($GLOBALS[$str])) {
$dstr .= "<td>".add_var_debug($str, "<br>\n");
} else {
$dstr .= "<td>$str<br>\n";
}
}
$dstr .= "</td>\n</tr>\n";
$GLOBALS['debug'][] = $dstr;
}
function add_var_debug($var, $separator) {
if (!is_array($GLOBALS[$var])) {
return($var.' = '.$GLOBALS[$var]);
} else {
$str = $var.' = array('.$separator;
$arr = $GLOBALS[$var];
foreach($arr as $key => $val) {
$str .= $key.' => '.$val.$separator;
}
$str .= ')'.$separator;
return $str;
}
}
//
// append debugging output $str to the file debug.txt in the temporay directory
//
function file_debug($str) {
include_once('inc/configuration.inc.php');
$fp = fopen(TMPPATH.'debug.txt', 'a') or die('Error: cannot open file for debug output');
fwrite($fp, $str);
fclose($fp);
}
//
// pop up a javascript window displaying $string
//
function js_alert($string) {
?>
<script language="JavaScript">
<!--
alert("<?php echo $string; ?>");
//-->
</script>
<?php
}
//
// display all session variables
//
function show_session() {
debug_var($GLOBALS['HTTP_SESSION_VAR']);
}
// display content and structure of $var and die()
function debug_die($var) {
debug_var($var);
die();
}
// display content and structure of $var
function debug_var($var) {
echo "<pre>\n";
print_r($var);
echo "</pre>\n";
}
?>
|
