$session->trace (TC_Gui3, 'admStandardLink');

$rc = null;

switch ($page) {

case P_Home: $header = 'Übersicht'; break;

case P_Param: $header = 'Parameter'; break;

case P_Forum: $header = 'Forumsverwaltung'; break;

case P_ExportPages: $header = 'Seitenexport'; break;

case P_Backup: $header = 'Datensicherung'; break;

case P_Options: $header = 'Einstellungen'; break;

case P_Rename: $header = 'Umbenennen'; break;

case P_PHPInfo: $header = 'PHP-Info'; break;

default: $header = null; break;

}

if ($header)

$rc = guiInternLinkString ($session, $page, $header);

return $rc;

global $session_id, $session_user;

guiHeader ($session, 'Adminstration-Startseite für ' . $session->fUserName);

guiParagraph ($session, 'Willkommen ' . $session->fUserName, false);

guiParagraph ($session, admStandardLinkString ($session, P_Param), false);

guiParagraph ($session, admStandardLinkString ($session, P_Forum), false);

guiParagraph ($session, admStandardLinkString ($session, P_ExportPages), false);

guiParagraph ($session, admStandardLinkString ($session, P_Rename), false);

guiParagraph ($session, admStandardLinkString ($session, P_Backup), false);

guiParagraph ($session, admStandardLinkString ($session, P_Options), false);

guiParagraph ($session, admStandardLinkString ($session, P_PHPInfo), false);

guiFinishBody ($session, null);

global $param_id, $param_theme, $param_pos, $param_name, $param_text,

$textarea_width, $text_area_height;

$session->trace(TC_Gui1, 'admParam');

if (empty ($param_theme))

$param_theme = Theme_Standard;

getUserParam ($session, U_TextAreaWidth, $textarea_width);

getUserParam ($session, U_TextAreaHeight, $textarea_height);

guiHeader ($session, 'Parameter');

echo '<table border="1"><tr><td><b>Id</b></td><td><b>Beschreibung</b></td>';

echo '<td><b>Wert</b></td></tr>' . "\n";

$row = dbFirstRecord ($session, 'select pos,name,text from '

. dbTable ($session, T_Param) . ' where theme=' . $param_theme);

while ($row) {

echo "<tr><td>$row[0]</td><td>";

echo htmlentities ($row [1]);

echo '</td><td>';

echo htmlentities ($row [2]);

echo "</td></tr>\n";

$row = dbNextRecord ($session);

}

echo '</table>' . "\n";

if (! empty ($message))

guiParagraph ($session, $message, false);

guiStartForm ($session, "param", P_Param);

echo "<table border=\"0\">\n<tr><td>Id:</td><td>";

echo $param_id;

guiHiddenField ("param_id", $param_id);

echo "</td></tr>\n<tr><td>Theme/Pos:</td><td>";

guiTextField ("param_theme", $param_theme, 4, 4);

echo ' / ';

guiTextField ("param_pos", $param_pos, 4, 4);

guiButton ('param_load', 'Datensatz laden');

echo "</td></tr>\n<tr><td>Name:</td><td>";

guiTextField ("param_name", $param_name, 64, 64);

echo "</td></tr>\n<tr><td>Text:</td><td>";

guiTextArea ("param_text", $param_text, $textarea_width, $textarea_height);

echo "</td></tr>\n<tr><td></td><td>";

echo " "; guiButton ('param_insert', 'Eintragen');

echo " "; guiButton ('param_change', 'Ändern');

echo "<br /><br />Eingabefeld: Breite: ";

guiTextField ("textarea_width", $textarea_width, 3, 3);

echo " Höhe: ";

guiTextField ("textarea_height", $textarea_height, 3, 3);

echo "</td></tr>\n</table>\n";

guiFinishForm ($session);

guiFinishBody ($session, null);

global $param_id, $param_theme, $param_pos, $param_name, $param_text;

$session->trace(TC_Gui1, 'admParamAnswerLoad');

$param_text = textAreaToWiki ($session, $param_text);

if (! isInt ($param_theme))

$error = 'Theme nicht gültig: ' . $param_theme;

elseif (! isInt ($param_pos))

$error = 'Pos nicht gültig: ' . $param_pos;

else {

$record = dbGetRecordByClause ($session, T_Param, 'id,name,text',

"theme=$param_theme and pos=$param_pos");

$param_id = $record[0];

$param_name = $record[1];

$param_text = $record [2];

$error = '';

}

admParam ($session, $error);

global $param_id, $param_theme, $param_pos, $param_name, $param_text;

$session->trace(TC_Gui1, 'admParamAnswerChange');

$param_text = textAreaToWiki ($session, $param_text);

if (! isInt ($param_theme))

$message = 'Theme nicht gültig: ' . $param_theme;

elseif (! isInt ($param_pos))

$message = 'Pos nicht gültig: ' . $param_pos;

elseif ($mode == C_New

&& dbSingleValue ($session, 'select count(id) from ' . dbTable ($session, T_Param)

. " where theme=$param_theme and pos=$param_pos") > 0)

$message = 'Eintrag nicht möglich, da (Theme,Pos) schon existiert';

elseif ($mode == C_Change

&& dbSingleValue ($session, 'select id from ' . dbTable ($session, T_Param)

. " where theme=$param_theme and pos=$param_pos") <= 0)

$message = 'Ändern nicht möglich, da (Id, Theme, Pos) nicht korrekt';

else {

if ($mode == C_New) {

dbInsert ($session, T_Param, 'theme,pos,name,text',

$param_theme . ',' . $param_pos . ','

. dbSqlString ($session, $param_name) . ','

. dbSqlString ($session, $param_text));

$message = 'Parameter wurde eingefügt';

} elseif ($mode == C_Change){

dbUpdateRaw ($session, T_Param, $param_id, 'name='

. dbSqlString ($session, $param_name)

. ',' . 'text=' . dbSqlString ($session, $param_text));

$message = 'Parameter wurde geändert';

} else

$message = 'Unbekannter Modus: ' . $mode;

}

admParam ($session, $message);

global $forum_id, $forum_changeid, $forum_name, $forum_description;

$session->trace(TC_Gui1, 'admForum');

guiHeader ($session, 'Foren verwalten');

if (! empty ($message))

guiParagraph ($session, $message, false);

guiHeadLine ($session, 1, 'Forumsverwaltung');;

guiStartForm ($session, "forum", P_Forum);

guiHiddenField ('forum_id', $forum_id);

guiShowTable ($session, "<h2>Existierende Foren</h2>\n",

array ('Id', 'Name', 'Beschreibung'),

'select id,name,description from ' . dbTable ($session, T_Forum),

true, 'border="1" width="100%"');

echo "<h2>&Auml;nderungen<h2>\n<table border=\"0\">\n<tr>";

if ($mode == C_Change){

echo '<td>Id:</td><td>' . $forum_id . "</td></tr>\n";

}

echo "<td>Name:</td><td>";

guiTextField ("forum_name", $forum_name, 64, 64);

echo "</td><tr>\n<tr><td>Beschreibung</td><td>";

guiTextField ("forum_description", $forum_description, 64, 255);

echo "</td></tr>\n<tr><td></td><td>";

if (! empty ($forum_id)) {

guiButton ('forum_change', 'Ändern');

echo ' | ';

}

guiButton ('forum_insert', 'Eintragen');

echo "</td></tr>\n<td>Id:</td><td>";

guiTextField ('forum_changeid', $forum_changeid, 4, 4);

echo ' ';

guiButton ('forum_load', 'Datensatz laden');

echo "</td></tr>\n</table>\n";

guiFinishForm ($session);

guiFinishBody ($session, null);

global $forum_id, $forum_name, $forum_description, $forum_changeid,

$forum_load, $forum_insert, $forum_change;

$message = null;

$mode = C_New;

if (isset ($forum_load)) {

if (empty ($forum_changeid) || ! IsInt ($forum_changeid)){

$message = '+++ keine Id angegeben';

} else {

list ($forum_name, $forum_description, $dummy)

= dbGetRecordById ($session, T_Forum, $forum_changeid,

'name,description,readgroup,writegroup,admingroup');

$forum_id = $forum_changeid;

$forum_changeid = null;

$mode = C_Change;

}

} elseif (isset ($forum_insert)) {

if (empty ($forum_name))

$message = '+++ kein Name angegeben';

elseif (empty ($forum_description))

$message = '+++ keine Beschreibung angegeben';

elseif (dbSingleValue ($session, 'select count(id) from ' . dbTable ($session, T_Forum)

. ' where name=' . dbSqlString ($session, $forum_name)) > 0)

$message = '+++ Forum mit diesem Namen existiert schon';

else {

$id = dbInsert ($session, T_Forum,

'name,description,readgroup,writegroup,admingroup',

dbSqlString ($session, $forum_name)

. ',' . dbSqlString ($session, $forum_description)

. ',1,1,1');

$forum_name = $forum_description = null;

$message = 'Forum wurde unter der Id ' . $id . ' eingetragen';

$mode = C_New;

}

} elseif (isset ($forum_change)) {

if (dbSingleValue ($session,

'select count(id) from ' . dbTable ($session, T_Forum)

. ' where name=' . dbSqlString ($session, $forum_name)

. " and id<>$forum_id") > 0)

$message = '+++ Forum mit diesem Namen existiert schon';

else {

dbUpdateRaw ($session, T_Forum, $forum_id,

'name=' . dbSqlString ($session, $forum_name)

. ',description=' . dbSqlString ($session, $forum_description));

$message = "Forum $forum_name wurde geändert";

$forum_id = $forum_name = $forum_description = $forum_changeid = null;

$mode = C_New;

}

}

admForum ($session, $message, $mode);

$patterns = explode ('|', $pattern);

$session->trace(TC_Gui2, 'admBuildCondition');

if (count ($pattern) == 0)

$condition = 'name like ' . dbSqlString ($session, $pattern);

else {

$condition = '(';

foreach ($patterns as $ii => $pattern)

$condition .= ($ii == 0 ? 'name like ' : ' or name like ')

. dbSqlString ($session, $pattern);

$condition .= ')';

}

return $condition;

global $export_pattern, $export_preview, $export_exists;

$session->trace(TC_Gui1, 'admExportPages');

guiStandardHeader ($session, 'Seitenexport', Th_StandardHeader,

Th_StandardBodyStart);

if (! empty ($message))

guiParagraph ($session, $message, false);

if (isset ($export_preview) && ! empty ($export_pattern))

guiShowTable ($session, '<h2>Ausgesuchte Seiten ('

. htmlentities ($export_pattern) . "):</h2>\n",

array ('Id', 'Name'),

'select id,name from ' . dbTable ($session, T_Page)

. ' where ' . admBuildCondition ($session, $export_pattern),

true, 'border="1"');

if (isset ($export_exists))

guiParagraph ($session, 'Exportdatei: '

. guiInternLinkString ($session, $export_exists, null), false);

guiStartForm ($session, "export", P_ExportPages);

guiHiddenField ('export_exists', $export_exists);

echo '<table border="0">';

echo '<tr><td>Namensmuster:</td><td>';

guiTextField ('export_pattern', $export_pattern, 64, 0);

echo '</td><td>Joker: %: beliebig viele Zeichen _: ein Zeichen |: neues Teilmuster Bsp: Hilfe%|%Test%';

echo '</td></tr>' . "\n" . '<tr><td>Exportform:</td><td>';

guiComboBox ('export_type', array ('insert', 'update'), null);

echo '</td><tr>' . "\n" . '<tr><td></td><td>';

guiButton ('export_preview', 'Vorschau');

echo ' | ';

guiButton ('export_export', 'Exportieren');

echo "</td></tr>\n</table>\n";

guiFinishForm ($session);

guiFinishBody ($session, null);

global $export_pattern, $export_exists, $export_type,

$export_export, $export_preview;

$session->trace(TC_Gui1, 'admExportPagesAnswer');

$message = null;

if (isset ($export_export)) {

if (empty ($export_pattern) ){

$message = '+++ kein Suchmuster angegeben';

} else {

$page_list = dbIdList ($session, T_Page,

admBuildCondition ($session, $export_pattern));

if (! $file = fopen (FN_PageExport, 'w'))

$message = 'kann Datei nicht öffnen: ' . FN_PageExport;

else {

$prefix = $session->fDbTablePrefix;

fputs ($file, '/* Export ' . "\n"

. 'am: ' . strftime ("%Y.%m.%d %H:%M:%S") . "\n"

. 'von: ' . $session->fUserName . "\n"

. 'Modus: ' . $export_type . "\n"

. 'Prefix: ' . $prefix . "\n"

. 'Seiten: ' . implode (', ', $page_list) . "\n"

. "*/\n");

foreach ($page_list As $ii => $page_id) {

$page = dbGetRecordById ($session, T_Page, $page_id,

'name,type,readgroup,writegroup');

$text_id = dbSingleValue ($session, 'select max(id) from '

. dbTable ($session, T_Text) . ' where page=' . (0+$page_id));

$text = dbGetRecordById ($session, T_Text, $text_id,

'type,createdby,createdat,text');

if ($export_type == 'insert') {

fputs ($file,

'insert into ' . $prefix

. 'page(id,name,type,readgroup,writegroup) values ('

. (0 + $page_id) . ','

. dbSqlString ($session, $page [0]) . ','

. dbSqlString ($session, $page [1]) . ','

. (0 + $page [2]) . ',' . (0 + $page [3])

. ');' . "\n");

fputs ($file,

'insert into ' . $prefix

. 'text(page,type,createdby,createdat,text) values ('

. (0 + $page_id) . ','

. dbSqlString ($session, $text [0]) . ','

. dbSqlString ($session, $text [1]) . ','

. dbSqlString ($session, $text [2]) . ','

. dbSqlString ($session, $text [3])

. ');' . "\n");

} else {

fputs ($file, '/* Seite ' . $page [0] . "*/\n");

fputs ($file,

'/* delete from ' . $prefix

. dbTable ($session, T_Text)

. ' where page=' . $page_id . ';' . "\n*/\n");

fputs ($file,

'update ' . $prefix

. 'page set type='

. dbSqlString ($session, $page [1])

. ' where name=' . dbSqlString ($session, $page [0])

. ';' . "\n");

fputs ($file,

'insert into ' . $prefix

. 'text(page,createdby,createdat,text) values ('

. (0 + $page_id) . ','

. dbSqlString ($session, $text [0]) . ','

. dbSqlString ($session, $text [1]) . ','

. dbSqlString ($session, $text [2]) . ','

. dbSqlString ($session, $text [3])

. ');' . "\n");

}

}

fclose ($file);

$export_exists = FN_PageExport;

$message = 'Datei ' . FN_PageExport . ' wurde exportiert';

}

}

}

admExportPages ($session, $message);

$session->trace (TC_Gui1, 'admSaveTable: ' . $table);

$bytes = 0;

if (! dbGetTableInfo ($session, $table, $names, $types,

$is_string, $max_lengths, $ix_primary)) {

$session->trace (TC_Error, 'admSaveTable: keine Metainfo');

$bytes = -1;

}

$header = 'insert into ' . $table . ' ('

. join (',', $ignore_id

? array_splice ($names, $ix_primary, 1) : $names)

. ') values (';

if ($bytes == 0 && ($row = dbFirstRecord ($session,

'select * from ' . $table . ' where 1')))

do {

$line = $header;

$no = 0;

for ($ix = 0; $ix < count ($row); $ix++)

if (! $ignore_id || $ix != $ix_primary) {

if ($no++ > 0)

$line .= ',';

if ($row [$ix] == null)

$line .= 'NULL';

else

$line .= $is_string [$ix]

? dbSqlString ($session, $row [$ix])

: (0 + $row [$ix]);

}

$line .= ');';

$bytes += fwrite ($file, $line);

$bytes += fwrite ($file, "\r\n");

} while ( ($row = dbNextRecord ($session)));

return $bytes;

global $backup_table, $backup_compressed, $backup_save, $backup_file;

$session->trace(TC_Gui1, 'admBackup');

if ($with_header)

guiHeader ($session, 'Datenbank-Backup');

if (! empty ($message))

guiParagraph ($session, $message, false);

if (empty ($backup_file))

$backup_file = $session->fDbTablePrefix

. strftime ("_%Y_%m_%d") . '.sql';

guiHeadLine ($session, 1, 'Backup');;

guiStartForm ($session, "backup", P_Backup);

// guiHiddenField ('forum_id', $forum_id);

echo "<table border=\"0\">\n";

echo "<tr><td>Dateiname:</td><td>";

guiTextField ('backup_file', $backup_file, 64, 64);

echo "</td></tr>\n<tr><td>Tabelle:</td><td>";

guiTextField ('backup_table', $backup_table, 64, 64);

echo " (leer: alle Tabellen)</td></tr>\n<tr><td></td><td>";

guiCheckBox ('backup_compressed', 'komprimiert', $backup_compressed);

echo "</td></tr>\n<tr><td>";

guiButton ('backup_save', 'Sichern');

echo "</td></tr>";

echo "\n</table>\n";

guiFinishForm ($session);

guiFinishBody ($session, null);

echo '<tr><td>' . $table . '</td><td>';

fwrite ($file, "\n# Tabelle " . $table . "\n\n");

$bytes = admSaveTable ($session,$table, false, $file);

echo (0 + $bytes) . '</td></tr>' . "\n";

return $bytes;

global $backup_table, $backup_compressed, $backup_save, $backup_file;

$session->trace(TC_Gui1, 'admBackupAnswer');

$message = null;

guiHeader ($session, 'Datenbank-Backup');

if (isset ($backup_save)) {

if (empty ($backup_table))

$backup_table = '*';

guiHeadline ($session, 1, 'Backup der Tabelle ' . $backup_table);

$filename = $backup_table == '*' ? 'db_infobasar' : 'table_' . $backup_table;

if (! is_dir ($dir = $session->fFileSystemBase . PATH_DELIM . 'backup'))

mkdir ($dir);

if (empty ($backup_file))

$backup_file = $session->fMacroBasarName

. strftime ('_%Y_%m_%d.sql');

$filename = 'backup/' . $backup_file;

if ($backup_compressed)

$filename .= '.gz';

$open_name = $backup_compressed

? 'compress.zlib://' . $session->fFileSystemBase . '/' . $filename

: $session->fFileSystemBase . '/' . $filename;

$file = fopen ($open_name, $backup_compressed ? 'wb9' : 'wb');

fwrite ($file, '# InfoBasar: SQL Dump / Version: ' . PHP_ClassVersion

. " \n# gesichert am "

. strftime ('%Y.%m.%d %H:%M:%S', time ())

. "\n");

echo '<table border="0">';

if ($backup_table != '*') {

$bytes = admSaveTable ($session, $backup_table,

false, $file);

} else {

$bytes = admWriteOneTable ($session, dbTable ($session, T_Param),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Macro),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_User),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Group),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Forum),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Posting),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Text),

$file);

$bytes += admWriteOneTable ($session, dbTable ($session, T_Module),

$file);

}

fclose ($file);

$size = ! $backup_compressed ? $bytes

: filesize ( $session->fFileSystemBase . '/' . $filename);

echo '<tr><td>Summe:</td><td>' . (0 + $bytes);

if ($backup_compressed)

echo ' (' . (0 + $size) . ')';

echo '</td></tr></table>' . "\n";

echo '<br/>';

guiStaticDataLink ($session, '', $filename, 'Datei ' . $filename);

}

admBackup ($session, false, $message);

global $opt_basarname, $opt_save, $upload_go, $upload_file;

$session->trace (TC_Gui1, 'admOptions');

guiHeader ($session, 'Einstellungen');

guiHeadline ($session, 1, 'Allgemeine Einstellungen');

if (isset ($upload_go))

$message = guiUploadFileAnswer ($session, PATH_DELIM . 'pic' . PATH_DELIM,

'logo.png');

if (! empty ($message))

guiParagraph ($session, $message, false);

guiHeadline ($session, 2, 'Texte:');

if (empty ($opt_basarname))

$opt_basarname = $session->fMacroBasarName;

if (empty ($opt_css))

$opt_css = dbGetText ($session, Th_CSSFile);

guiStartForm ($session, 'Form', P_Options);

echo '<table border="0">';

echo '<tr><td>Basarname:</td><td>';

guiTextField ('opt_basarname', $opt_basarname, 32, 128);

echo '</td></tr>' . "\n";

echo '<tr><td></td><td>';

guiButton ('opt_save', '&Auml;ndern');

echo '</td></tr></table>' . "\n";

guiFinishForm ($session);

guiHeadline ($session, 2, 'Dateien:');

guiUploadFile ($session, 'Logo:', P_Options);

guiFinishBody ($session, null);

global $rename_oldname, $rename_newname, $rename_backlinks;

$session->trace (TC_Gui1, 'admRename');

guiHeader ($session, 'Umbenennen einer Seite');

guiHeadline ($session, 1, 'Umbenennen einer Seite');

if (! empty ($message))

guiParagraph ($session, $message, false);

guiStartForm ($session, 'Form', P_Rename);

echo '<table border="0">';

echo '<tr><td>Bisheriger Name:</td><td>';

guiTextField ('rename_oldname', $rename_oldname, 64, 64);

echo '<tr><td>Neuer Name:</td><td>';

guiTextField ('rename_newname', $rename_newname, 64, 64);

echo '</td></tr>' . "\n";

echo '<tr><td></td><td>';

guiButton ('rename_info', 'Info');

if (! empty ($rename_oldname) && ! empty ($rename_newname))

echo ' | ';

guiButton ('rename_rename', 'Umbenennen');

echo '<br>';

guiCheckBox ('rename_backlinks', 'Alle Verweise umbenennen',

! isset ($rename_backlinks) || $rename_backlinks == C_CHECKBOX_TRUE);

echo '</td></tr></table>' . "\n";

guiFinishForm ($session);

if (! empty ($rename_oldname) && dbPageId ($session, $rename_oldname) > 0){

$row = dbFirstRecord ($session,

'select page,text,createdby,createdat from '

. dbTable ($session, T_Text)

. ' where replacedby is null and text like '

. dbSqlString ($session, "%$rename_oldname%"));

if (! $row)

guiParagraph ($session, '+++ keine Verweise gefunden', false);

else {

echo '<table border="1"><tr><td>Seite:</td><td>Typ:</td>'

. '<td>von</td><td>Letzte &Auml;nderung</td><td>Fundstelle</td></tr>';

while ($row) {

$pagerecord = dbGetRecordById ($session, T_Page, $row[0],

'name,type');

$text = findTextInLine ($row [1], $rename_oldname, 10, true);

if (! empty ($text)){

echo "\n<tr><td>";

guiInternLink ($session,

encodeWikiName ($session, $pagerecord[0]),

$pagerecord[0], M_Base);

echo '</td><td>';

echo $pagerecord [1];

echo '</td><td>';

echo $row [2];

echo '</td><td>';

echo htmlentities ($row [3]);

echo '</td><td>';

echo $text;

echo "</td><tr>\n";

}

$row = dbNextRecord ($session);

}

echo "\n</table>\n";

}

}

guiFinishBody ($session, null);

global $rename_oldname, $rename_newname, $rename_rename, $rename_backlinks;

$session->trace (TC_Gui1, 'admAnswerRename');

$message = null;

$origin = isset ($rename_newname) ? $rename_newname : null;

if (!isset ($rename_oldname))

$message = '+++ kein bisheriger Name angegeben!';

elseif ( ($page_id = dbPageId ($session, $rename_oldname)) <= 0)

$message = '+++ Seite ' . $rename_oldname . ' existiert nicht';

elseif (isset ($rename_rename) && !isset ($rename_newname))

$message = '+++ kein neuer Name angegeben!';

elseif (isset ($rename_rename)

&& ($rename_newname = normalizeWikiName ($session, $rename_newname))

!= $origin)

$message = '+++ Unzulässiger neuer Name (' . $origin

. ') wurde korrigiert';

elseif (isset ($rename_rename) && dbPageId ($session, $rename_newname) > 0)

$message = '+++ Seite ' . $rename_newname . ' existiert schon!';

elseif (isset ($rename_rename)){

dbUpdate ($session, T_Page, $page_id,

'name=' . dbSQLString ($session, $rename_newname) . ',');

$message = 'Seite ' . $rename_oldname . ' wurde in ' . $rename_newname

. ' umbenannt.';

$pages = 0;

$hits = 0;

if ($rename_backlinks == C_CHECKBOX_TRUE){

$row = dbFirstRecord ($session,

'select id,text from '

. dbTable ($session, T_Text)

. ' where replacedby is null and text like '

. dbSqlString ($session, "%$rename_oldname%"));

$pattern1 = '/([^' . CL_WikiName . '])'

. $rename_oldname . '([^' . CL_WikiName . '])/';

$pattern2 = '/^' . $rename_oldname . '([^' . CL_WikiName . '])/';

$pattern3 = '/([^' . CL_WikiName . '])' . $rename_oldname . '$/';

$replacement1 = '\1' . $rename_newname . '\2';

$replacement2 = $rename_newname . '\1';

$replacement3 = '\1' . $rename_newname;

while ($row){

$text = $row [1];

$count1 = preg_match_all ($pattern1, $row [1], $dummy);

if ($count1 > 0)

$text = preg_replace ($pattern1, $replacement1, $text);

$count2 = preg_match ($pattern2, $row [1]);

if ($count2 > 0)

$text = preg_replace ($pattern2, $replacement2, $text);

$count3 = preg_match ($pattern3, $text);

if ($count3 > 0)

$text = preg_replace ($pattern3, $replacement3, $text);

if ($count1 + $count2 + $count3 > 0){

dbUpdate ($session, T_Text, $row [0],

'text=' . dbSQLString ($session, $text) . ',');

$pages++;

$hits += $count1 + $count2 + $count3;

}

$row = dbNextRecord ($session);

}

if ($pages > 0)

$message .= '<br>Es wurde'

. ($hits == 1 ? ' ' : 'n ')

. $hits . ($hits == 1 ? ' Verweis auf ' : ' Verweise auf ' )

. $pages

. ($pages == 1 ? ' Seite umbenannt.'

: ' Seiten umbenannt.');

}

addSystemMessage ($session, $rename_oldname

. ' >> ' . $rename_newname . ': ' . (0+$hits));

$rename_oldname = '';

$rename_newname = '';

}

admRename ($session, $message);

admStandardLink ($session, P_Home);

echo ' | ';

admStandardLink ($session, P_Param);

echo ' | ';

admStandardLink ($session, P_Forum);

echo ' | ';

admStandardLink ($session, P_ExportPages);

echo ' | ';

admStandardLink ($session, P_Backup);

echo ' | ';

admStandardLink ($session, P_Options);