Subversion-Projekte lars-tiefland.php_share

Revision

Details | Letzte Änderung | Log anzeigen | RSS feed

Revision Autor Zeilennr. Zeile
1 lars 1
--TEST--
2
DB::Error 2
3
--SKIPIF--
4
<?php require_once dirname(__FILE__) . '/skipif.inc'; ?>
5
--FILE--
6
<?php
7
require_once dirname(__FILE__) . '/include.inc';
8
require_once 'DB.php';
9
 
10
error_reporting(E_ALL);
11
 
12
function myfunc($obj) {
13
    print 'myfunc here, obj='
14
          . strtolower($obj->toString()) . "\n";
15
}
16
function myfunc2($obj) {
17
    print 'myfunc2 here, obj='
18
          . strtolower($obj->toString()) . "\n";
19
}
20
class myclass {
21
    function myfunc($obj) {
22
        print 'myclass::myfunc here, obj='
23
          . strtolower($obj->toString()) . "\n";
24
    }
25
}
26
function test_error_handler($errno, $errmsg, $file, $line, $vars) {
27
    if (defined('E_STRICT')) {
28
        if ($errno & E_STRICT
29
            && (error_reporting() & E_STRICT) != E_STRICT) {
30
            // Ignore E_STRICT notices unless they have been turned on
31
            return;
32
        }
33
    } else {
34
        define('E_STRICT', 2048);
35
    }
36
    $errortype = array (
37
        E_ERROR => 'Error',
38
        E_WARNING => 'Warning',
39
        E_PARSE => 'Parsing Error',
40
        E_NOTICE => 'Notice',
41
        E_CORE_ERROR => 'Core Error',
42
        E_CORE_WARNING => 'Core Warning',
43
        E_COMPILE_ERROR => 'Compile Error',
44
        E_COMPILE_WARNING => 'Compile Warning',
45
        E_USER_ERROR => 'User Error',
46
        E_USER_WARNING => 'User Warning',
47
        E_USER_NOTICE => 'User Notice',
48
        E_STRICT => 'Strict Notice',
49
    );
50
    $prefix = $errortype[$errno];
51
    print strtolower("$prefix: $errmsg in " . basename($file)
52
                     . " on line XXX\n");
53
}
54
 
55
$obj = new myclass;
56
 
57
$dbh = DB::factory("mysql");
58
 
59
print "default: ";
60
$e = $dbh->raiseError("return testing error");
61
print strtolower($e->toString()) . "\n";
62
 
63
print "global default: ";
64
PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, "myfunc2");
65
$e = $dbh->raiseError("global default test");
66
 
67
$dbh->setErrorHandling(PEAR_ERROR_PRINT);
68
print "mode=print: ";
69
$e = $dbh->raiseError("print testing error");
70
print "\n";
71
 
72
$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, "myfunc");
73
print "mode=function callback: ";
74
$e = $dbh->raiseError("function callback testing error");
75
 
76
$dbh->setErrorHandling(PEAR_ERROR_CALLBACK, array($obj, "myfunc"));
77
print "mode=object callback: ";
78
$e = $dbh->raiseError("object callback testing error");
79
 
80
set_error_handler("test_error_handler");
81
$dbh->setErrorHandling(PEAR_ERROR_TRIGGER);
82
print "mode=trigger: ";
83
$e = $dbh->raiseError("trigger testing error");
84
 
85
?>
86
--EXPECT--
87
default: [db_error: message="db error: return testing error" code=-1 mode=return level=notice prefix="" info=" [db error: unknown error]"]
88
global default: myfunc2 here, obj=[db_error: message="db error: global default test" code=-1 mode=callback callback=myfunc2 prefix="" info=" [db error: unknown error]"]
89
mode=print: DB Error: print testing error
90
mode=function callback: myfunc here, obj=[db_error: message="db error: function callback testing error" code=-1 mode=callback callback=myfunc prefix="" info=" [db error: unknown error]"]
91
mode=object callback: myclass::myfunc here, obj=[db_error: message="db error: object callback testing error" code=-1 mode=callback callback=myclass::myfunc prefix="" info=" [db error: unknown error]"]
92
mode=trigger: user notice: db error: trigger testing error in pear.php on line xxx