1 <!-- $Id: test_dbmlib.php3,v 1.4 2000-06-18 03:53:29 wainstead Exp $ -->
4 <title>Test bed for database library</title>
10 include "wiki_config.php3";
13 // Try to open the database
15 $dbi = OpenDataBase($WikiDataBase);
18 $vartype = gettype($dbi);
19 echo "Return type from OpenDataBase($WikiDataBase): $vartype<br>\n";
20 if ($vartype == 'array') {
22 while (list($key, $val) = each($dbi)) {
23 echo "<dd>$key : $val</dd>\n";
26 echo "Return value: $dbi <p>\n";
29 echo "Database open failed: return value '$dbi' <br>\n";
39 // Test for pages to see if they are there
41 $pagename = "TestPage";
42 echo "Testing for existence of $pagename<br>\n";
43 $res = IsWikiPage($dbi, $pagename);
46 echo "Return code for $pagename: '$res' <p>\n";
49 echo "PAGE NOT FOUND! (return code '$res')<p>\n";
52 $pagename = "pageThatDoesNotExist";
53 echo "Testing for existence of $pagename<br>\n";
54 $res = IsWikiPage($dbi, $pagename);
57 echo "FOUND NONEXISTENT PAGE $pagename! (return code '$res')<p>\n";
60 echo "Returned false (test passed, return code '$res')<p>\n";
71 // Retrieve a page; should handle successful
72 // retrieves and failed retrieves
75 $pagename = "TestPage";
76 echo "Retrieving page '$pagename'<br>\n";
77 $pagehash = RetrievePage($dbi, $pagename);
78 $type = gettype($pagehash);
79 if ($type == "array") {
81 echo "RetrievePage($pagename) returned type '$type'<p>\n";
84 echo "RetrievePage($pagename) returned type '$type'<p>\n";
87 $pagename = "thisIsAPageThatIsNotThere";
88 echo "Retrieving page '$pagename'<br>\n";
89 $pagehash = RetrievePage($dbi, $pagename);
90 if ($pagehash == -1) {
92 echo "RetrievePage($pagename) returned -1<p>\n";
95 echo "RetrievePage($pagename) returned '$pagehash'<p>\n";
107 // try to close the database
110 $res = CloseDataBase($dbi);
111 echo "Result from close: '$res'\n";