\n";
$newhash['version'] = isset($pagehash['version']) ?
$pagehash['version'] : 1;
$newhash['author'] = isset($pagehash['author']) ?
$pagehash['author'] : '1.0 wiki setup page';
$newhash['created'] = time();
$newhash['lastmodified'] = time();
$newhash['flags'] = 0;
$newhash['pagename'] = $pagename;
$newhash['refs'] = array();
for ($i=1; $i <= 4; $i++) {
if (isset($pagehash['r$i']))
$newhash['refs'][$i] = $pagehash['r$i'];
}
$content = implode("\n", $pagehash['text']);
$content = str_replace("[", "[[", $content);
$newhash['content'] = explode("\n", $content);
InsertPage($dbi, $pagename, $newhash);
}
echo "opening dbm file: $portdbmfile ... \n";
if (! file_exists($portdbmfile)) {
echo "File '$portdbmfile' does not exist.
\n";
exit;
}
if (! ($dbmh = dbmopen($portdbmfile, "r"))) {
echo "Cannot open '$portdbmfile'
\n";
exit;
}
echo " ok ($dbmh)\n";
$namelist = array();
$ctr = 0;
$namelist[$ctr] = $key = dbmfirstkey($dbmh);
port1_0renderhash($dbi, $dbmh, $key);
while ($key = dbmnextkey($dbmh, $key)) {
$ctr++;
$namelist[$ctr] = $key;
port1_0renderhash($dbi, $dbmh, $key);
}
dbmclose($dbmh);
?>
Done.