1 |
richard.p.wagner |
731 |
<?php |
2 |
|
|
|
3 |
|
|
function barf($client) { |
4 |
|
|
print "<pre>\n"; |
5 |
|
|
print "Request:\n".htmlspecialchars($client->__getLastRequest()) ."\n"; |
6 |
|
|
print "Response:\n".htmlspecialchars($client->__getLastResponse())."\n"; |
7 |
|
|
print "</pre>"; |
8 |
|
|
|
9 |
|
|
print "<pre>"; |
10 |
|
|
print_r($client->__getTypes()); |
11 |
|
|
print "</pre>"; |
12 |
|
|
|
13 |
|
|
} |
14 |
|
|
|
15 |
|
|
function barf_min($client) { |
16 |
|
|
print "<pre>\n"; |
17 |
|
|
print "Request:\n".htmlspecialchars($client->__getLastRequest()) ."\n"; |
18 |
|
|
print "Response:\n".htmlspecialchars($client->__getLastResponse())."\n"; |
19 |
|
|
print "</pre>"; |
20 |
|
|
} |
21 |
|
|
|
22 |
|
|
function barf_var($var) { |
23 |
|
|
print "<pre>\n"; |
24 |
|
|
var_dump($var); |
25 |
|
|
print "</pre>"; |
26 |
|
|
} |
27 |
|
|
|
28 |
richard.p.wagner |
734 |
function url_exists($url) { |
29 |
|
|
$hdrs = @get_headers($url); |
30 |
|
|
return is_array($hdrs) ? preg_match('/^HTTP\\/\\d+\\.\\d+\\s+2\\d\\d\\s+.*$/',$hdrs[0]) : FALSE; |
31 |
|
|
} |
32 |
|
|
|
33 |
richard.p.wagner |
731 |
?> |