blob: 79116cd9f8b80ee8ca8f980c62ec0bce78e5cb18 (
plain)
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
|
<?php
class Debug {
const LOG_DISABLED = -1;
const LOG_NORMAL = 0;
const LOG_VERBOSE = 1;
const LOG_EXTENDED = 2;
public static int $LOG_DISABLED = -1;
public static int $LOG_NORMAL = 0;
public static int $LOG_VERBOSE = 1;
public static int $LOG_EXTENDED = 2;
private static bool $enabled = false;
private static bool $quiet = false;
private static string $logfile = "";
private static int $loglevel = 0;
public static function set_logfile(string $logfile) : void {
self::$logfile = $logfile;
}
public static function enabled() : bool {
return self::$enabled;
}
public static function set_enabled(bool $enable) : void {
self::$enabled = $enable;
}
public static function set_quiet(bool $quiet) : void {
self::$quiet = $quiet;
}
public static function set_loglevel(int $level) : void {
self::$loglevel = $level;
}
public static function get_loglevel() : int {
return self::$loglevel;
}
public static function log(string $message, int $level = 0) : void {
if (!self::$enabled || self::$loglevel < $level) return;
$ts = strftime("%H:%M:%S", time());
if (function_exists('posix_getpid')) {
$ts = "$ts/" . posix_getpid();
}
if (self::$logfile) {
$fp = fopen(self::$logfile, 'a+');
if ($fp) {
$locked = false;
if (function_exists("flock")) {
$tries = 0;
// try to lock logfile for writing
while ($tries < 5 && !$locked = flock($fp, LOCK_EX | LOCK_NB)) {
sleep(1);
++$tries;
}
if (!$locked) {
fclose($fp);
user_error("Unable to lock debugging log file: " . self::$logfile, E_USER_WARNING);
return;
}
}
fputs($fp, "[$ts] $message\n");
if (function_exists("flock")) {
flock($fp, LOCK_UN);
}
fclose($fp);
if (self::$quiet)
return;
} else {
user_error("Unable to open debugging log file: " . self::$logfile, E_USER_WARNING);
}
}
print "[$ts] $message\n";
}
}
|