$param){ if(strlen(trim($param)) > 0 && $key != 'codepage'){ $cf['meta'][$key] = $param;} } foreach($tx['site'] as $key => $param){ if(strlen(trim($param)) > 0){ $cf['site'][$key] = $param;} } // END of code added for (CMSimple_XH beta) // Plugin loading if ($function == 'save'){$edit = true;} if ($cf['plugins']['folder'] != "")include($pth['folder']['plugins'].'index.php'); if ($f == 'search')@include($pth['file']['search']); if ($f == 'mailform' && $cf['mailform']['email'] != '')include($pth['file']['mailform']); if ($f == 'sitemap') { $title = $tx['title'][$f]; $ta = array(); $o .= '

'.$title.'

'; for($i = 0; $i < $cl; $i++)if(!hide($i))$ta[] = $i; $o .= li($ta, 'sitemaplevel'); } // Compatibility for DHTML menus, moved from functions.php to cms.php - by MD 2009/09 (CMSimple_XH 1.0rc1) $si = -1; $hc = array(); for($i = 0; $i < $cl; $i++) { if (!hide($i))$hc[] = $i; if ($i == $s)$si = count($hc); } $hl = count($hc); //END Compatibility for DHTML menus, moved from functions.php to cms.php - by MD 2009/09 (CMSimple_XH 1.0rc1) // LEGAL NOTICES - no needed under GPL3 if(@$cf['menu']['legal']=='')$cf['menu']['legal']='CMSimple Legal Notices'; if ($su==uenc($cf['menu']['legal'])) { $f = $title = $cf['menu']['legal']; $s = -1; $o .= '

'.$title.'

'.rf($pth['folder']['cmsimple'].'legal.txt'); } if (!include($pth['file']['adm'])) { if ($login)e('missing', 'file', $pth['file']['adm']); if ($s == -1 && !$f && $o == '' && $su == '')$s = 0; } // CMSimple scripting if (!($edit && $adm) && $s > -1) { $t = preg_replace("/^.*".$cf['scripting']['regexp'].".*$/is", "\\1", $c[$s]); if ($t != '' && $t != $c[$s] && $t != 'remove' && $t != 'hide') { $output = preg_replace("/".$cf['scripting']['regexp']."/is", "", $c[$s]); @eval(preg_replace(array("'&(quot|#34);'i", "'&(amp|#38);'i", "'&(apos|#39);'i", "'&(lt|#60);'i", "'&(gt|#62);'i", "'&(nbsp|#160);'i"), array("\"", "&", "'", "<", ">", " "), $t)); $c[$s] = $output; if (isset($keywords))$cf['meta']['keywords'] = $keywords; if (isset($description))$cf['meta']['description'] = $description; }; } // CMSimple scripting with error message - MD 2009/10 (CMSimple_XH 1.0rc2) /* if (!($edit && $adm) && $s > -1) { $t = preg_replace("/^.*".$cf['scripting']['regexp'].".*$/is", "\\1", $c[$s]); if ($t != '' && $t != $c[$s] && $t != 'remove' && $t != 'hide') { $output = preg_replace("/".$cf['scripting']['regexp']."/is", "", $c[$s]); preg_match('/'.$cf['scripting']['regexp'].'/is', $c[$s], $scripting); preg_match_all('/([a-z0-9_]*)\(([^\)]*)[\"|\']*\)/is', $scripting[1], $snippets); $evaluate = true; foreach($snippets[1] as $function){ if(!function_exists($function) && !in_array($function, array('if', 'while', 'foreach', 'for', 'declare', 'switch')) ){ $evaluate = false; $o .= '
Error: Call to undefined function '. $function . '().
'; trigger_error('Call to undefined function '. $function . '() from CMSimple-Scripting on page ' . $h[$s], E_USER_WARNING); } } if($evaluate){ if(is_bool(eval(preg_replace(array("'&(quot|#34);'i", "'&(amp|#38);'i", "'&(apos|#39);'i", "'&(lt|#60);'i", "'&(gt|#62);'i", "'&(nbsp|#160);'i"), array("\"", "&", "'", "<", ">", " "), $t)))){ trigger_error('Above parse error was evoked by CMSimple scripting error on page ' . $h[$s], E_USER_WARNING); } } $c[$s] = $output; if (isset($keywords))$cf['meta']['keywords'] = $keywords; if (isset($description))$cf['meta']['description'] = $description; } } */ //END CMSimple scripting with error message - MD 2009/10 (CMSimple_XH 1.0rc2) if ($s == -1 && !$f && $o == '')shead('404'); if (function_exists('loginforms'))loginforms(); foreach(array('content', 'config', 'language', 'stylesheet', 'template', 'log') as $i)chkfile($i, (($login || $settings) && $adm)); if ($e)$o = '

'.$tx['heading']['warning'].'

'.$o; if ($title == '') { if ($s > -1)$title = $h[$s]; else if($f != '')$title = ucfirst($f); } if ($retrieve) { echo ''.head().''.$c[$s].''; exit; } if ($print) { echo ''.head().''.content().''; exit; } if (!include($pth['file']['template']))echo ''.$tx['heading']['error'].''.$o.''; // GLOBAL INTERNAL FUNCTIONS function initvar($name) { if (!isset($GLOBALS[$name])) { if (isset($_GET[$name])) $GLOBALS[$name] = $_GET[$name]; else if (isset($_POST[$name])) $GLOBALS[$name] = $_POST[$name]; else $GLOBALS[$name] = @preg_replace("/.*?(".$name."=([^\&]*))?.*?/i", "\\2", sv('QUERY_STRING')); } } function sv($s) { if (!isset($_SERVER)) { global $_SERVER; $_SERVER = $GLOBALS['HTTP_SERVER_VARS']; } if (isset($_SERVER[$s]))return $_SERVER[$s]; else return''; } function rmnl($t) { return preg_replace("/(\r\n|\r|\n)+/", "\n", $t); } function rmanl($t) { return preg_replace("/(\r\n|\r|\n)+/", "", $t); } function stsl($t) { if (get_magic_quotes_gpc())return stripslashes($t); else return $t; } function download($fl) { global $sn, $download, $tx; if (!is_readable($fl) || ($download != '' && !chkdl($sn.'?download='.basename($fl)))) { global $o, $text_title; shead('404'); $o .= '

File '.$fl.'

'; return; } else { header('Content-Type: application/save-as'); header('Content-Disposition: attachment; filename="'.basename($fl).'"'); header('Content-Length:'.filesize($fl)); header('Content-Transfer-Encoding: binary'); if ($fh = @fopen($fl, "rb")) { while (!feof($fh))echo fread($fh, filesize($fl)); fclose($fh); } exit; } } function chkdl($fl) { global $pth, $sn; $m = false; if (@is_dir($pth['folder']['downloads'])) { $fd = @opendir($pth['folder']['downloads']); while (($p = @readdir($fd)) == true) { if (preg_match("/.+\..+$/", $p)) { if ($fl == $sn.'?download='.$p)$m = true; } } if ($fd == true)closedir($fd); } return $m; } function rf($fl) { $fl = @rp($fl); if (!file_exists($fl))return; clearstatcache(); if (function_exists('file_get_contents'))return file_get_contents($fl); else { return join("\n", file($fl)); } } function chkfile($fl, $writable) { global $pth, $tx; $t = @rp($pth['file'][$fl]); if ($t == '')e('undefined', 'file', $fl); else if(!file_exists($t))e('missing', $fl, $t); else if(!is_readable($t))e('notreadable', $fl, $t); else if(!is_writable($t) && $writable)e('notwritable', $fl, $t); } function e($et, $ft, $fn) { global $e, $tx; $e .= '
  • '.$tx['error'][$et].' '.$tx['filetype'][$ft].' '.$fn.'
    • '; } function rfc() { global $c, $cl, $h, $u, $l, $docstart, $su, $s, $pth, $tx, $edit, $adm, $cf; $c = array(); $h = array(); $u = array(); $l = array(); $c = explode("\xC2\xA7", preg_replace("/(]*>)/i", "\xC2\xA7\\1", str_replace("\xC2\xA7", '§', rf($pth['file']['content'])))); $docstart = ''; if (h(0) == '')$docstart .= array_shift($c); if (count($c) == 0)$c[0] = '

    '.$tx['toc']['newpage'].'

    '; if (!preg_match("/^]*>.*<\/h1>/is", $c[0]))$c[0] = '

    '.$tx['toc']['missing'].'

    '.$c[0]; $c[count($c)-1] = preg_replace("/(.*)<\/body>.*<\/html>/i", "\\1", $c[count($c)-1]); if (!($edit && $adm)) { foreach($c as $i => $j) { if (cmscript('remove', $j))unset($c[$i]); } $c = array_values($c); } $duplicate = 1; $empty = 1; $s = -1; $ta = array(); $cl = count($c); for($i = 0; $i < $cl; $i++) { $l[$i] = l($i); $h[$i] = h($i); if ($h[$i] == '')$u[$i] = $h[$i] = $tx['toc']['empty'].' '.$empty++; $ta[$l[$i]] = $u[$i] = uenc($h[$i]); if ($l[$i] > 1)for($j = $l[$i]-1; $j > 0; $j--)$u[$i] = (isset($ta[$j])?$ta[$j]:'').$cf['uri']['seperator'].''.$u[$i]; $u[$i] = substr($u[$i], 0, $cf['uri']['length']); $w = count($u)-1; for($j = 0; $j < $w; $j++)if($u[$i] == $u[$j]) { $h[$i] = $tx['toc']['dupl'].' '.$duplicate++; $u[$i] = uenc($h[$i]); } if ($su == $u[$i])$s = $i; } } function h($n) { global $c, $cf; return trim(strip_tags(preg_replace("/(]*>([^§]*?)<\/h[1-".$cf['menu']['levels']."]>)?[^§]*/i", "\\2", $c[$n]))); } function l($n) { global $c, $cf; if (isset($c[$n]))return preg_replace("/]*>[^§]*/i", "\\1", $c[$n]); else return 0; } function a($i, $x) { global $sn, $u; return isset($u[$i]) ? '' : ''; // changed by LM CMSimple_XH 1.1 } function meta($n) { global $cf; if ($cf['meta'][$n] != '')return tag('meta name="'.$n.'" content="'.$cf['meta'][$n].'"')."\n"; } function ml($i) { global $f, $sn, $tx; $t = ''; if ($f != $i)$t .= ''; $t .= $tx['menu'][$i]; if ($f != $i)$t .= ''; return $t; } function uenc($s) { global $tx; if (isset($tx['urichar']['org']) && isset($tx['urichar']['new']))$s = str_replace(explode(",", $tx['urichar']['org']), explode(",", $tx['urichar']['new']), $s); return str_replace('+', '_', urlencode($s)); } function rp($p) { if (@realpath($p) == '')return $p; else return realpath($p); } function sortdir($dir) { $fs = array(); $fd = @opendir($dir); while (false !== ($fn = @readdir($fd))) { $fs[] = $fn; } if ($fd == true)closedir($fd); @sort($fs, SORT_STRING); return $fs; } function cmscript($s, $i) { global $cf; return preg_match(preg_replace("/\(\.\*\?\)/", $s, "/".$cf['scripting']['regexp']."/is"), $i); } function hide($i) { global $c, $edit, $adm; return (!($edit && $adm) && cmscript('hide', $c[$i])); } // For valid XHTML function tag($s) { global $cf; $t = ''; if ($cf['xhtml']['endtags'] == 'true')$t = ' /'; return '<'.$s.$t.'>'; } function amp() { global $cf; if ($cf['xhtml']['amp'] == 'true')return '&'; else return('&'); } function shead($s) { global $iis, $cgi, $tx, $title, $o; if ($s == '401')header(($cgi || $iis)?'status: 401 Unauthorized':'HTTP/1.0 401 Unauthorized'); if ($s == '404')header(($cgi || $iis)?'status: 404 Not Found':'HTTP/1.0 404 Not Found'); $title = $tx['error'][$s]; $o = '

    '.$title.'

    '.$o; } /** * Debug-Mode * Check if file "_XHdebug.txt" exists to turn on debug-mode * with default setting E_ERROR | E_USER_WARNING | E_PARSE. * Level of debug mode can be adjusted by placing an * integer-value within the file using following values: * * Possible values of $dbglevel: * 0 - Turn off all error reporting * 1 - Running errors except warnings * 2 - Running errors * 3 - Running errors + notices * 4 - All errors except notices and warnings * 5 - All errors except notices * 6 - All errors * * @author Holger * @since CMSimple_XH V.1.0rc3 / Pluginloader V.2.1 beta 9 * * @global array $pth CMSimple's pathes * @return boolean Returns true/false if error_reporting was enabled or not */ function xh_debugmode() { global $pth; $dbglevel = ''; # possible values of $dbglevel: # 0 - Turn off all error reporting # 1 - Running errors except warnings # 2 - Running errors # 3 - Running errors + notices # 4 - All errors except notices and warnings # 5 - All errors except notices # 6 - All errors if (file_exists($pth['folder']['downloads'].'_XHdebug.txt')) { ini_set('display_errors', 1); $dbglevel = rf($pth['folder']['downloads'].'_XHdebug.txt'); if (strlen($dbglevel) == 1) { switch($dbglevel) { case 0: error_reporting(0); break; case 1: error_reporting(E_ERROR | E_USER_WARNING | E_PARSE); break; case 2: error_reporting(E_ERROR | E_WARNING | E_USER_WARNING | E_PARSE); break; case 3: error_reporting(E_ERROR | E_WARNING | E_USER_WARNING | E_PARSE | E_NOTICE); break; case 4: error_reporting(E_ALL ^ (E_NOTICE | E_WARNING | E_USER_WARNING)); break; case 5: error_reporting(E_ALL ^ E_NOTICE); break; case 6: error_reporting(E_ALL); break; default: error_reporting(E_ERROR | E_USER_WARNING | E_PARSE); } } else { error_reporting(E_ERROR | E_USER_WARNING | E_PARSE); } } else { ini_set('display_errors', 0); error_reporting(0); } if (error_reporting() > 0) { return true; } else { return false; } } // PAGE FUNCTIONS // new function head() ready for html5 - by GE 2009/06 (CMSimple_XH beta) function head() { global $title, $cf, $pth, $tx, $hjs; if (isset($cf['site']['title']) && $cf['site']['title'] != '')$t = $cf['site']['title'].' - '.$title; // changed by LM CMSimple_XH 1.1 else $t = $title; $t = ''.strip_tags($t).''."\n"; foreach($cf['meta'] as $i => $k)$t .= meta($i); if ($tx['meta']['codepage'] != '')$t = tag('meta http-equiv="content-type" content="text/html;charset='.$tx['meta']['codepage'].'"')."\n".$t; return $t.tag('meta name="generator" content="'.CMSIMPLE_XH_VERSION.' '.CMSIMPLE_XH_BUILD.' - www.cmssimpel.com"')."\n".tag('link rel="stylesheet" href="'.$pth['file']['stylesheet'].'" type="text/css"')."\n".tag('link rel="stylesheet" href="./css/core.css" type="text/css"')."\n".$hjs; } // END new function head() (CMSimple_XH) function sitename() { global $tx; return isset($tx['site']['title']) ? $tx['site']['title'] : ''; // changed by GE CMSimple_XH 1.2 } function pagename() { // changed by GE CMSimple_XH 1.2 global $cf; return isset($cf['site']['title']) ? $cf['site']['title'] : ''; // changed by LM CMSimple_XH 1.1 } function onload() { global $onload; return $onload; } function toc($start = NULL, $end = NULL) { // changed by LM CMSimple_XH 1.1 global $c, $cl, $s, $l, $cf; $ta = array(); if (isset($start)) { if (!isset($end))$end = $start; } else $start = 1; if (!isset($end))$end = $cf['menu']['levels']; $ta = array(); if ($s > -1) { $tl = $l[$s]; for($i = $s; $i > -1; $i--) { if ($l[$i] <= $tl && $l[$i] >= $start && $l[$i] <= $end)if(!hide($i))$ta[] = $i; if ($l[$i] < $tl)$tl = $l[$i]; } @sort($ta); $tl = $l[$s]; } else $tl = 0; $tl += 1+$cf['menu']['levelcatch']; for($i = $s+1; $i < $cl; $i++) { if ($l[$i] <= $tl && $l[$i] >= $start && $l[$i] <= $end)if(!hide($i))$ta[] = $i; if ($l[$i] < $tl)$tl = $l[$i]; } return li($ta, $start); } // inserted many "\n" for better structured Sourcecode - by GE 2009/06 (CMSimple_XH beta) function li($ta, $st) { global $s, $l, $h, $cl, $cf, $u; $tl = count($ta); if ($tl < 1)return; $t = ''; if ($st == 'submenu' || $st == 'search')$t .= '
      '; $b = 0; if ($st > 0) { $b = $st-1; $st = 'menulevel'; } $lf = array(); for($i = 0; $i < $tl; $i++) { $tf = ($s != $ta[$i]); if ($st == 'menulevel' || $st == 'sitemaplevel') { for($k = (isset($ta[$i-1])?$l[$ta[$i-1]]:$b); $k < $l[$ta[$i]]; $k++)$t .= "\n".'
        '."\n"; } $t .= '
      • -1) { if ($l[$ta[$i]] < $l[$s]) { if (@substr($u[$s], 0, 1+strlen($u[$ta[$i]])) == $u[$ta[$i]].$cf['uri']['seperator'])$t .= 's'; } } $t .= 'doc'; for($j = $ta[$i]+1; $j < $cl; $j++)if(!hide($j) && $l[$j]-$l[$ta[$i]] < 2+$cf['menu']['levelcatch']) { if ($l[$j] > $l[$ta[$i]])$t .= 's'; break; } $t .= '">'; if ($tf)$t .= a($ta[$i], ''); $t .= $h[$ta[$i]]; if ($tf)$t .= ''; if ($st == 'menulevel' || $st == 'sitemaplevel') { if ((isset($ta[$i+1])?$l[$ta[$i+1]]:$b) > $l[$ta[$i]])$lf[$l[$ta[$i]]] = true; else { $t .= '
        • '."\n"; $lf[$l[$ta[$i]]] = false; } for($k = $l[$ta[$i]]; $k > (isset($ta[$i+1])?$l[$ta[$i+1]]:$b); $k--) { $t .= '
      '."\n"; if (isset($lf[$k-1]))if($lf[$k-1]) { $t .= ''."\n"; $lf[$k-1] = false; } }; } else $t .= ''."\n"; } if ($st == 'submenu' || $st == 'search')$t .= '
    '."\n"; return $t; } // END modified function li (CMSimple_XH) function searchbox() { global $sn, $tx; return '
    '."\n".''."\n".'
    '."\n"; } function sitemaplink() { return ml('sitemap'); } // str_replace for QUERY_STRING in printlink - by GE 2009/06 (CMSimple_XH beta) function printlink() { global $f, $search, $file, $sn, $tx; $t = amp().'print'; if ($f == 'search')$t .= amp().'function=search'.amp().'search='.htmlspecialchars(stsl($search)); else if($f == 'file')$t .= amp().'file='.$file; else if($f != '' && $f != 'save')$t .= amp().$f; else if(sv('QUERY_STRING') != '')$t = str_replace('&','&',sv('QUERY_STRING')).$t; // str_replace by GE 09-06-22 return ''.$tx['menu']['print'].''; } // END modified printlink (CMSimple_XH) function mailformlink() { global $cf; if ($cf['mailform']['email'] != '')return ml('mailform'); } function guestbooklink() { if (function_exists('gblink'))return gblink(); } function loginlink() { if (function_exists('lilink'))return lilink(); } function lastupdate($br = NULL, $hour = NULL) { // changed by LM CMSimple_XH 1.1 global $tx, $pth; $t = $tx['lastupdate']['text'].':'; if (!(isset($br)))$t .= tag('br'); else $t .= ' '; return $t.date($tx['lastupdate']['dateformat'], filemtime($pth['file']['content'])+(isset($hour)?$hour * 3600:0)); } function legallink() { global $cf, $sn; // changed by LM CMSimple_XH 1.1 return ''.$cf['menu']['legal'].''; } function locator() { global $title, $h, $s, $f, $c, $l; if (hide($s))return $h[$s]; if ($title != '' && (isset($h[$s]) && $h[$s] != $title))return $title; $t = ''; if ($s == 0)return $h[$s]; else if($f != '')return ucfirst($f); else if($s > 0) { $tl = $l[$s]; if ($tl > 1) { for($i = $s-1; $i > 0 ; $i--) { if ($l[$i] < $tl) { $t = a($i, '').$h[$i].' > '.$t; $tl--; } if ($tl < 2)break; } } return a(0, '').$h[0].' > '.$t.$h[$s]; } else return ' '; } // added version info and Links to cmsimple-xh.de and FAQ-section - by GE 2009/09 (CMSimple_XH) //HI changed for use version informations defined at top of cms.php (CMSimple_XH 1.0rc3 2009-10-30) function editmenu() { global $adm, $edit, $s, $sn, $tx, $sl; if ($adm) { $t = '
    '.CMSIMPLE_XH_VERSION.'  Build: '.CMSIMPLE_XH_BUILD.'
    '; if (xh_debugmode())$t .= '
    Notice: Debug-Mode is enabled!
    '; $t .= '
    '; if ($edit)$t .= a($s, amp().'normal').$tx['editmenu']['normal'].''; else $t .= a($s, amp().'edit').$tx['editmenu']['edit'].''; return $t.''.$tx['editmenu']['validate'].''.$tx['editmenu']['images'].''.$tx['editmenu']['downloads'].''.$tx['editmenu']['settings'].''.$tx['editmenu']['help'].''.a($s, amp().'logout').$tx['editmenu']['logout'].'
    '; } } // END added version info and Links to cmsimple-xh.de and FAQ-section (CMSimple_XH) function content() { global $s, $o, $c, $edit, $adm, $cf; if (!($edit && $adm) && $s > -1)return $o.preg_replace("/".$cf['scripting']['regexp']."/is", "", $c[$s]); else return $o; } function submenu() { global $s, $cl, $l, $tx, $cf; $ta = array(); if ($s > -1) { $tl = $l[$s]+1+$cf['menu']['levelcatch']; for($i = $s+1; $i < $cl; $i++) { if ($l[$i] <= $l[$s])break; if ($l[$i] <= $tl)if(!hide($i))$ta[] = $i; if ($l[$i] < $tl)$tl = $l[$i]; } if (count($ta) != 0)return '

    '.$tx['submenu']['heading'].'

    '.li($ta, 'submenu'); } } function previouspage() { global $s, $cl, $tx; for($i = $s-1; $i > -1; $i--)if(!hide($i))return a($i, '').$tx['navigator']['previous'].''; } function nextpage() { global $s, $cl, $tx; for($i = $s+1; $i < $cl; $i++)if(!hide($i))return a($i, '').$tx['navigator']['next'].''; } function top() { global $tx; return ''.$tx['navigator']['top'].''; } // tagged img-tags in function languagemenu() - by GE 09-06-26 (CMSimple_XH beta3) // title-tags for flag-gifs - by GE 09-10-07 (CMSimple_XH 1.0rc2) function languagemenu() { global $pth, $cf, $sl; $t = ''; $r = array(); $fd = @opendir($pth['folder']['base']); while (($p = @readdir($fd)) == true ) { if (@is_dir($pth['folder']['base'].$p)) { if (preg_match('/^[A-z]{2}$/', $p))$r[] = $p; } } if ($fd == true)closedir($fd); if(count($r) == 0)return ''; if($cf['language']['default'] != $sl)$t .= ''.tag('img src="'.$pth['folder']['flags'].$cf['language']['default'].'.gif" alt="'.$cf['language']['default'].'" title=" '.$cf['language']['default'].' " style="border: 0;" class="flag"').' '; $v = count($r); for($i = 0; $i < $v; $i++) { if ($sl != $r[$i]) { if (is_file($pth['folder']['flags'].'/'.$r[$i].'.gif')) { $t .= ''.tag('img src="'.$pth['folder']['flags'].$r[$i].'.gif" alt="'.$r[$i].'" title=" '.$r[$i].' " style="border: 0;" class="flag"').' '; } else { $t .= '['.$r[$i].'] '; } } } return ''.$t.''; } // END modified function languagemenu() - by GE 09-06-26 (CMSimple_XH beta3) ?>