-<?php\r
-\r
-/**\r
- * Nucleus: PHP/MySQL Weblog CMS (http://nucleuscms.org/)\r
- * Copyright (C) 2002-2005 The Nucleus Group\r
- *\r
- * This program is free software; you can redistribute it and/or\r
- * modify it under the terms of the GNU General Public License\r
- * as published by the Free Software Foundation; either version 2\r
- * of the License, or (at your option) any later version.\r
- * (see nucleus/documentation/index.html#license for more info)\r
- *\r
- * $Id: globalfunctions.php,v 1.6 2005-03-19 09:06:10 kimitake Exp $\r
- * $NucleusJP: globalfunctions.php,v 1.5 2005/03/16 08:10:35 kimitake Exp $\r
- */\r
-\r
-// needed if we include globalfunctions from install.php\r
-global $nucleus, $CONF, $DIR_LIBS, $DIR_LANG, $manager, $member; \r
-\r
-\r
-checkVars(array('nucleus', 'CONF', 'DIR_LIBS', 'MYSQL_HOST', 'MYSQL_USER', 'MYSQL_PASSWORD', 'MYSQL_DATABASE', 'DIR_LANG', 'DIR_PLUGINS'));\r
-\r
-$CONF['debug'] = 0;\r
-\r
-$nucleus['version'] = 'v3.2';\r
-if (getNucleusPatchLevel() > 0)\r
-{\r
- $nucleus['version'] .= '/' . getNucleusPatchLevel();\r
-}\r
-\r
-/*\r
- Indicates when Nucleus should display startup errors. Set to 1 if you want\r
- the error enabled (default), false otherwise\r
-\r
- alertOnHeadersSent\r
- Displays an error when visiting a public Nucleus page and headers have\r
- been sent out to early. This usually indicates an error in either a\r
- configuration file or a language file, and could cause Nucleus to\r
- malfunction\r
- alertOnSecurityRisk\r
- Displays an error only when visiting the admin area, and when one or\r
- more of the installation files (install.php, install.sql, upgrades/\r
- directory) are still on the server.\r
-*/\r
-$CONF['alertOnHeadersSent'] = 1;\r
-$CONF['alertOnSecurityRisk'] = 1;\r
-\r
-/**\r
- * returns the currently used version (100 = 1.00, 101 = 1.01, etc...)\r
- */\r
-function getNucleusVersion() {\r
- return 320;\r
-}\r
-\r
-/**\r
- * power users can install patches in between nucleus releases. These patches\r
- * usually add new functionality in the plugin API and allow those to\r
- * be tested without having to install CVS.\r
- */\r
-function getNucleusPatchLevel() {\r
- return 0;\r
-}\r
-\r
-\r
-if ($CONF['debug']) {\r
- error_reporting(E_ALL & ~E_NOTICE); // report almost all errors!\r
- // (no uninitialized vars and such)\r
-} else {\r
- error_reporting(E_ERROR | E_WARNING | E_PARSE);\r
-}\r
-\r
-// we will use postVar, getVar, ... methods instead of HTTP_GET_VARS or _GET\r
-if ($CONF['installscript']!=1){ // vars were already included in install.php\r
- if (phpversion() >= '4.1.0')\r
- include_once($DIR_LIBS . 'vars4.1.0.php');\r
- else\r
- include_once($DIR_LIBS . 'vars4.0.6.php');\r
-}\r
-\r
-function intPostVar($name) { return intval(postVar($name));}\r
-function intGetVar($name) { return intval(getVar($name));}\r
-function intRequestVar($name) { return intval(requestVar($name)); }\r
-function intCookieVar($name) { return intval(cookieVar($name)); }\r
-\r
-// get all variables that can come from the request and put them in the global scope\r
-$blogid = requestVar('blogid');\r
-$itemid = intRequestVar('itemid');\r
-$catid = intRequestVar('catid');\r
-$skinid = requestVar('skinid');\r
-$memberid = requestVar('memberid');\r
-$archivelist = requestVar('archivelist');\r
-$imagepopup = requestVar('imagepopup');\r
-$archive = requestVar('archive');\r
-$query = requestVar('query');\r
-$highlight = requestVar('highlight');\r
-$amount = requestVar('amount');\r
-$action = requestVar('action');\r
-$nextaction = requestVar('nextaction');\r
-$maxresults = requestVar('maxresults');\r
-$startpos = intRequestVar('startpos');\r
-$errormessage = '';\r
-$error = '';\r
-\r
-if (!headers_sent())\r
- header('Generator: Nucleus CMS ' . $nucleus['version']);\r
-\r
-// include core classes that are needed for login & plugin handling\r
-include($DIR_LIBS . 'MEMBER.php');\r
-include($DIR_LIBS . 'ACTIONLOG.php');\r
-include($DIR_LIBS . 'MANAGER.php');\r
-include($DIR_LIBS . 'PLUGIN.php');\r
-\r
-$manager =& MANAGER::instance();\r
-\r
-// make sure there's no unnecessary escaping:\r
-set_magic_quotes_runtime(0);\r
-\r
-// only needed when updating logs\r
-if ($CONF['UsingAdminArea']) {\r
- include($DIR_LIBS . 'xmlrpc.inc.php'); // XML-RPC client classes\r
- include_once($DIR_LIBS . 'ADMIN.php');\r
-}\r
-\r
-\r
-// connect to sql\r
-sql_connect();\r
-\r
-// makes sure database connection gets closed on script termination\r
-register_shutdown_function('sql_disconnect');\r
-\r
-// read config\r
-getConfig();\r
-\r
-// automatically use simpler toolbar for mozilla\r
-if (($CONF['DisableJsTools'] == 0) && strstr(serverVar('HTTP_USER_AGENT'),'Mozilla/5.0') && strstr(serverVar('HTTP_USER_AGENT'),'Gecko'))\r
- $CONF['DisableJsTools'] = 2;\r
-\r
-// login if cookies set\r
-\r
-$member =& new MEMBER();\r
-\r
-// login/logout when required or renew cookies\r
-if ($action == 'login') {\r
- // Form Authentication\r
- $login = postVar('login');\r
- $pw = postVar('password');\r
- $shared = intPostVar('shared'); // shared computer or not\r
-\r
- if ($member->login($login,$pw)) {\r
-\r
- $member->newCookieKey();\r
- $member->setCookies($shared);\r
-\r
- // allows direct access to parts of the admin area after logging in\r
- if ($nextaction)\r
- $action = $nextaction;\r
-\r
- $manager->notify('LoginSuccess',array('member' => &$member));\r
- ACTIONLOG::add(INFO, "Login successful for $login (sharedpc=$shared)");\r
- } else {\r
- $manager->notify('LoginFailed',array('username' => $login));\r
- ACTIONLOG::add(INFO, 'Login failed for ' . $login);\r
- }\r
-/*\r
-\r
-Backed out for now: See http://forum.nucleuscms.org/viewtopic.php?t=3684 for details\r
-\r
-} elseif (serverVar('PHP_AUTH_USER') && serverVar('PHP_AUTH_PW')) {\r
- // HTTP Authentication\r
- $login = serverVar('PHP_AUTH_USER');\r
- $pw = serverVar('PHP_AUTH_PW');\r
-\r
- if ($member->login($login,$pw)) {\r
- $manager->notify('LoginSuccess',array('member' => &$member));\r
- ACTIONLOG::add(INFO, "HTTP authentication successful for $login");\r
- } else {\r
- $manager->notify('LoginFailed',array('username' => $login));\r
- ACTIONLOG::add(INFO, 'HTTP authentication failed for ' . $login);\r
-\r
- //Since bad credentials, generate an apropriate error page\r
- header("WWW-Authenticate: Basic realm=\"Nucleus CMS {$nucleus['version']}\"");\r
- header('HTTP/1.0 401 Unauthorized');\r
- echo 'Invalid username or password';\r
- exit;\r
- }\r
-*/\r
-\r
-} elseif (($action == 'logout') && (!headers_sent()) && cookieVar($CONF['CookiePrefix'] . 'user')){\r
- // remove cookies on logout\r
- setcookie($CONF['CookiePrefix'] .'user','',(time()-2592000),$CONF['CookiePath'],$CONF['CookieDomain'],$CONF['CookieSecure']);\r
- setcookie($CONF['CookiePrefix'] .'loginkey','',(time()-2592000),$CONF['CookiePath'],$CONF['CookieDomain'],$CONF['CookieSecure']);\r
- $manager->notify('Logout',array('username' => cookieVar($CONF['CookiePrefix'] .'user')));\r
-} elseif (cookieVar($CONF['CookiePrefix'] .'user')) {\r
- // Cookie Authentication\r
- $res = $member->cookielogin(cookieVar($CONF['CookiePrefix'] .'user'), cookieVar($CONF['CookiePrefix'] .'loginkey'));\r
-\r
- // renew cookies when not on a shared computer\r
- if ($res && (cookieVar($CONF['CookiePrefix'] .'sharedpc') != 1) && (!headers_sent()))\r
- $member->setCookies();\r
-}\r
-\r
-// login completed\r
-$manager->notify('PostAuthentication',array('loggedIn' => $member->isLoggedIn()));\r
-\r
-// first, let's see if the site is disabled or not\r
-if ($CONF['DisableSite'] && !$member->isAdmin()) {\r
- redirect($CONF['DisableSiteURL']);\r
- exit;\r
-}\r
-\r
-// load other classes\r
-include($DIR_LIBS . 'PARSER.php');\r
-include($DIR_LIBS . 'SKIN.php');\r
-include($DIR_LIBS . 'TEMPLATE.php');\r
-include($DIR_LIBS . 'BLOG.php');\r
-include($DIR_LIBS . 'COMMENTS.php');\r
-include($DIR_LIBS . 'COMMENT.php');\r
-//include($DIR_LIBS . 'ITEM.php');\r
-include($DIR_LIBS . 'NOTIFICATION.php');\r
-include($DIR_LIBS . 'BAN.php');\r
-include($DIR_LIBS . 'PAGEFACTORY.php');\r
-include($DIR_LIBS . 'SEARCH.php');\r
-\r
-\r
-// set lastVisit cookie (if allowed)\r
-if (!headers_sent()) {\r
- if ($CONF['LastVisit'])\r
- setcookie($CONF['CookiePrefix'] .'lastVisit',time(),time()+2592000,$CONF['CookiePath'],$CONF['CookieDomain'],$CONF['CookieSecure']);\r
- else\r
- setcookie($CONF['CookiePrefix'] .'lastVisit','',(time()-2592000),$CONF['CookiePath'],$CONF['CookieDomain'],$CONF['CookieSecure']);\r
-}\r
-\r
-// read language file, only after user has been initialized\r
-$language = getLanguageName();\r
-include($DIR_LANG . ereg_replace( '[\\|/]', '', $language) . '.php');\r
-\r
-/*\r
- Backed out for now: See http://forum.nucleuscms.org/viewtopic.php?t=3684 for details\r
- \r
-// To remove after v2.5 is released and language files have been updated. \r
-// Including this makes sure that language files for v2.5beta can still be used for v2.5final\r
-// without having weird _SETTINGS_EXTAUTH string showing up in the admin area.\r
-if (!defined('_MEMBERS_BYPASS'))\r
-{\r
- define('_SETTINGS_EXTAUTH', 'Enable External Authentication');\r
- define('_WARNING_EXTAUTH', 'Warning: Enable only if needed.');\r
- define('_MEMBERS_BYPASS', 'Use External Authentication');\r
-}\r
-\r
-*/\r
-\r
-// make sure the archivetype skinvar keeps working when _ARCHIVETYPE_XXX not defined\r
-if (!defined('_ARCHIVETYPE_MONTH'))\r
-{\r
- define('_ARCHIVETYPE_DAY','day');\r
- define('_ARCHIVETYPE_MONTH','month');\r
-}\r
-\r
-\r
-// decode path_info\r
-if ($CONF['URLMode'] == 'pathinfo') {\r
- $data = explode("/",serverVar('PATH_INFO'));\r
- for ($i=0;$i<sizeof($data);$i++) {\r
- switch ($data[$i]) {\r
- case 'item': // item/1 (blogid)\r
- $i++;\r
- if ($i<sizeof($data)) $itemid = intval($data[$i]);\r
- break;\r
- case 'archives': // archives/1 (blogid)\r
- $i++;\r
- if ($i<sizeof($data)) $archivelist = intval($data[$i]);\r
- break;\r
- case 'archive': // two possibilities: archive/yyyy-mm or archive/1/yyyy-mm (with blogid)\r
- if ((($i+1)<sizeof($data)) && (!strstr($data[$i+1],'-')) ){\r
- $blogid = intval($data[++$i]);\r
- }\r
- $i++;\r
- if ($i<sizeof($data)) $archive = $data[$i];\r
- break;\r
- case 'blogid': // blogid/1\r
- case 'blog': // blog/1\r
- $i++;\r
- if ($i<sizeof($data)) $blogid = intval($data[$i]);\r
- break;\r
- case 'category': // category/1 (catid)\r
- case 'catid':\r
- $i++;\r
- if ($i<sizeof($data)) $catid = intval($data[$i]);\r
- break;\r
- case 'member':\r
- $i++;\r
- if ($i<sizeof($data)) $memberid = intval($data[$i]);\r
- break;\r
- default:\r
- // skip...\r
- }\r
- }\r
-}\r
-\r
-/**\r
- * Connects to mysql server\r
- */\r
-function sql_connect() {\r
- global $MYSQL_HOST, $MYSQL_USER, $MYSQL_PASSWORD, $MYSQL_DATABASE;\r
-\r
- $connection = @mysql_connect($MYSQL_HOST, $MYSQL_USER, $MYSQL_PASSWORD) or startUpError('<p>Could not connect to MySQL database.</p>','Connect Error');\r
- mysql_select_db($MYSQL_DATABASE) or startUpError('<p>Could not select database: '. mysql_error().'</p>', 'Connect Error');\r
-\r
- return $connection;\r
-}\r
-\r
-/**\r
- * returns a prefixed nucleus table name\r
- */\r
-function sql_table($name)\r
-{\r
- global $MYSQL_PREFIX;\r
-\r
- if ($MYSQL_PREFIX)\r
- return $MYSQL_PREFIX . 'nucleus_' . $name;\r
- else\r
- return 'nucleus_' . $name;\r
-}\r
-\r
-function sendContentType($contenttype, $pagetype = '', $charset = _CHARSET) {\r
- global $manager, $CONF;\r
- \r
- if (!headers_sent()) {\r
- // if content type is application/xhtml+xml, only send it to browsers\r
- // that can handle it (IE6 cannot). Otherwise, send text/html\r
- \r
- // v2.5: For admin area pages, keep sending text/html (unless it's a debug version)\r
- // application/xhtml+xml still causes too much problems with the javascript implementations\r
- if (\r
- ($contenttype == 'application/xhtml+xml')\r
- && (($CONF['UsingAdminArea'] && !$CONF['debug']) || !stristr(serverVar('HTTP_ACCEPT'),'application/xhtml+xml'))\r
- )\r
- {\r
- $contenttype = 'text/html';\r
- }\r
- \r
- $manager->notify(\r
- 'PreSendContentType',\r
- array(\r
- 'contentType' => &$contenttype,\r
- 'charset' => &$charset,\r
- 'pageType' => $pagetype\r
- )\r
- );\r
-\r
- // strip strange characters\r
- $contenttype = preg_replace('|[^a-z0-9-+./]|i', '', $contenttype);\r
- $charset = preg_replace('|[^a-z0-9-_]|i', '', $charset);\r
- \r
- header('Content-Type: ' . $contenttype . '; charset=' . $charset); \r
- }\r
- \r
- \r
-\r
- \r
-}\r
-\r
-/**\r
- * Errors before the database connection has been made\r
- */\r
-function startUpError($msg, $title) {\r
- ?>\r
- <html xmlns="http://www.w3.org/1999/xhtml">\r
- <head><meta http-equiv="Content-Type" content="text/html; charset=EUC-JP" /><title><?php echo htmlspecialchars($title)?></title></head>\r
- <body>\r
- <h1><?php echo htmlspecialchars($title)?></h1>\r
- <?php echo $msg?>\r
- </body>\r
- </html>\r
- <?php exit;\r
-}\r
-\r
-/**\r
- * disconnects from SQL server\r
- */\r
-function sql_disconnect() {\r
- @mysql_close();\r
-}\r
-\r
-/**\r
- * executes an SQL query\r
- */\r
-function sql_query($query) {\r
- $res = mysql_query($query) or print("mySQL error with query $query: " . mysql_error() . '<p />');\r
- return $res;\r
-}\r
-\r
-\r
-/**\r
- * Highlights a specific query in a given HTML text (not within HTML tags) and returns it\r
- *\r
- * @param $text\r
- * text to be highlighted\r
- * @param $expression\r
- * regular expression to be matched (can be an array of expressions as well)\r
- * @param $highlight\r
- * highlight to be used (use \\0 to indicate the matched expression)\r
- *\r
- */\r
-function highlight($text, $expression, $highlight) {\r
- if (!$highlight || !$expression) return $text;\r
- if (is_array($expression) && (count($expression) == 0))\r
- return $text;\r
-\r
- // add a tag in front (is needed for preg_match_all to work correct)\r
- $text = '<!--h-->'.$text;\r
-\r
- // split the HTML up so we have HTML tags\r
- // $matches[0][i] = HTML + text\r
- // $matches[1][i] = HTML\r
- // $matches[2][i] = text\r
- preg_match_all('/(<[^>]+>)([^<>]*)/', $text, $matches);\r
-\r
- // throw it all together again while applying the highlight to the text pieces\r
- $result = '';\r
- for ($i = 0; $i < sizeof($matches[2]); $i++) {\r
- if ($i != 0) $result .= $matches[1][$i];\r
-\r
- if (is_array($expression)) {\r
- foreach ($expression as $regex)\r
- if ($regex)\r
- $matches[2][$i] = @eregi_replace($regex,$highlight,$matches[2][$i]);\r
- $result .= $matches[2][$i];\r
- } else {\r
- $result .= @eregi_replace($expression,$highlight,$matches[2][$i]);\r
- }\r
- }\r
-\r
- return $result;\r
-}\r
-\r
-/**\r
- * Parses a query into an array of expressions that can be passed on to the highlight method\r
- */\r
-function parseHighlight($query) {\r
- // TODO: add more intelligent splitting logic\r
-\r
- // get rid of quotes\r
- $query = preg_replace('/\'|"/','',$query);\r
-\r
- if (!query) return array();\r
-\r
- $aHighlight = explode(' ', $query);\r
-\r
- for ($i = 0; $i<count($aHighlight); $i++) {\r
- $aHighlight[$i] = trim($aHighlight[$i]);\r
- if (strlen($aHighlight[$i]) < 3)\r
- unset($aHighlight[$i]);\r
- }\r
-\r
- if (count($aHighlight) == 1)\r
- return $aHighlight[0];\r
- else\r
- return $aHighlight;\r
-}\r
-\r
-/**\r
- * Checks if email address is valid\r
- */\r
-function isValidMailAddress($address) {\r
- if (preg_match('/^[a-zA-Z0-9\._-]+@[a-zA-Z0-9\._-]+\.[A-Za-z]{2,5}$/', $address))\r
- return 1;\r
- else\r
- return 0;\r
-}\r
-\r
-\r
-// some helper functions\r
-function getBlogIDFromName($name) {\r
- return quickQuery('SELECT bnumber as result FROM '.sql_table('blog').' WHERE bshortname="'.addslashes($name).'"');\r
-}\r
-function getBlogNameFromID($id) {\r
- return quickQuery('SELECT bname as result FROM '.sql_table('blog').' WHERE bnumber='.intval($id));\r
-}\r
-function getBlogIDFromItemID($itemid) {\r
- return quickQuery('SELECT iblog as result FROM '.sql_table('item').' WHERE inumber='.intval($itemid));\r
-}\r
-function getBlogIDFromCommentID($commentid) {\r
- return quickQuery('SELECT cblog as result FROM '.sql_table('comment').' WHERE cnumber='.intval($commentid));\r
-}\r
-function getBlogIDFromCatID($catid) {\r
- return quickQuery('SELECT cblog as result FROM '.sql_table('category').' WHERE catid='.intval($catid));\r
-}\r
-function getCatIDFromName($name) {\r
- return quickQuery('SELECT catid as result FROM '.sql_table('category').' WHERE cname="'.addslashes($name).'"');\r
-}\r
-function quickQuery($q) {\r
- $res = sql_query($q);\r
- $obj = mysql_fetch_object($res);\r
- return $obj->result;\r
-}\r
-\r
-function getPluginNameFromPid($pid) {\r
- $obj = mysql_fetch_object(sql_query('SELECT pfile FROM '.sql_table('plugin').' WHERE pid='.intval($pid)));\r
- return $obj->pfile;\r
-}\r
-\r
-function selector() {\r
- global $itemid, $blogid, $memberid, $query, $amount, $archivelist, $maxresults;\r
- global $archive, $skinid, $blog, $memberinfo, $CONF, $member;\r
- global $imagepopup, $catid;\r
- global $manager;\r
-\r
- $actionNames = array('addcomment', 'sendmessage', 'createaccount', 'forgotpassword', 'votepositive', 'votenegative', 'plugin');\r
- $action = requestVar('action');\r
- if (in_array($action, $actionNames))\r
- {\r
- global $DIR_LIBS, $errormessage;\r
- include_once($DIR_LIBS . 'ACTION.php');\r
- $a =& new ACTION();\r
- $errorInfo = $a->doAction($action);\r
- if ($errorInfo)\r
- $errormessage = $errorInfo['message'];\r
- } \r
-\r
- // show error when headers already sent out\r
- if (headers_sent() && $CONF['alertOnHeadersSent']) {\r
-\r
- // try to get line number/filename (extra headers_sent params only exists in PHP 4.3+)\r
- if (function_exists('version_compare') && version_compare('4.3.0', phpversion(), '<=')) {\r
- headers_sent($hsFile, $hsLine);\r
- $extraInfo = ' in <code>'.$hsFile.'</code> line <code>'.$hsLine.'</code>';\r
- } else {\r
- $extraInfo = '';\r
- }\r
-\r
-\r
- startUpError(\r
- '<p>The page headers have already been sent out'.$extraInfo.'. This could cause Nucleus not to work in the expected way.</p><p>Usually, this is caused by spaces or newlines at the end of the <code>config.php</code> file, at the end of the language file or at the end of a plugin file. Please check this and try again.</p><p>If you don\'t want to see this error message again, without solving the problem, set <code>$CONF[\'alertOnHeadersSent\']</code> in <code>globalfunctions.php</code> to <code>0</code></p>',\r
- 'Page headers already sent'\r
- );\r
- exit;\r
- }\r
-\r
- // make is so ?archivelist without blogname or blogid shows the archivelist\r
- // for the default weblog\r
- if (serverVar('QUERY_STRING') == 'archivelist')\r
- $archivelist = $CONF['DefaultBlog'];\r
-\r
- // now decide which type of skin we need\r
- if ($itemid) {\r
- // itemid given -> only show that item\r
- $type = 'item';\r
- if (!$manager->existsItem($itemid,0,0))\r
- doError(_ERROR_NOSUCHITEM);\r
-\r
-\r
- global $itemidprev, $itemidnext, $catid, $itemtitlenext, $itemtitleprev;\r
-\r
- // 1. get timestamp and blogid for item\r
- $query = 'SELECT itime, iblog FROM '.sql_table('item').' WHERE inumber=' . intval($itemid);\r
- $res = sql_query($query);\r
- $obj = mysql_fetch_object($res);\r
-\r
- // if a different blog id has been set through the request or selectBlog(),\r
- // jump to correct url\r
-// if ($blogid && (intval($blogid) != $obj->iblog))\r
-// doError(_ERROR_NOSUCHITEM);\r
- if ($blogid && (intval($blogid) != $obj->iblog)) {\r
- if (!headers_sent()) {\r
- $b =& $manager->getBlog($obj->iblog);\r
- $correctURL = $b->getURL();\r
-\r
- if ($CONF['URLMode'] == 'pathinfo') {\r
- if (substr($correctURL,strlen($correctURL)-1,1)=='/')\r
- $correctURL .= 'item/' . $itemid;\r
- else\r
- $correctURL .= '/item/' . $itemid;\r
- }\r
- else\r
- $correctURL .= '?itemid=' . $itemid;\r
-\r
- redirect('Location: ' . $correctURL);\r
- exit;\r
- }\r
- else doError(_ERROR_NOSUCHITEM);\r
- }\r
-\r
- $blogid = $obj->iblog;\r
- $timestamp = strtotime($obj->itime);\r
-\r
- $b =& $manager->getBlog($blogid);\r
- if ($b->isValidCategory($catid))\r
- $catextra = ' and icat=' . $catid;\r
-\r
- // get previous itemid and title\r
- $query = 'SELECT inumber, ititle FROM '.sql_table('item').' WHERE itime<' . mysqldate($timestamp) . ' and idraft=0 and iblog=' . $blogid . $catextra . ' ORDER BY itime DESC LIMIT 1';\r
- $res = sql_query($query);\r
-\r
- $obj = mysql_fetch_object($res);\r
- if ($obj) {\r
- $itemidprev = $obj->inumber;\r
- $itemtitleprev = $obj->ititle;\r
- }\r
-\r
- // get next itemid and title\r
- $query = 'SELECT inumber, ititle FROM '.sql_table('item').' WHERE itime>' . mysqldate($timestamp) . ' and itime <= ' . mysqldate(time()) . ' and idraft=0 and iblog=' . $blogid . $catextra . ' ORDER BY itime ASC LIMIT 1';\r
- $res = sql_query($query);\r
-\r
- $obj = mysql_fetch_object($res);\r
- if ($obj) {\r
- $itemidnext = $obj->inumber;\r
- $itemtitlenext = $obj->ititle;\r
- }\r
-\r
- } elseif ($archive) {\r
- // show archive\r
- $type = 'archive';\r
-\r
- // get next and prev month links\r
- global $archivenext, $archiveprev, $archivetype;\r
-\r
- sscanf($archive,'%d-%d-%d',$y,$m,$d);\r
- if ($d != 0) {\r
- $archivetype = _ARCHIVETYPE_DAY;\r
- $t = mktime(0,0,0,$m,$d,$y);\r
- $archiveprev = strftime('%Y-%m-%d',$t - (24*60*60));\r
- $archivenext = strftime('%Y-%m-%d',$t + (24*60*60));\r
-\r
- } else {\r
- $archivetype = _ARCHIVETYPE_MONTH;\r
- $t = mktime(0,0,0,$m,1,$y);\r
- $archiveprev = strftime('%Y-%m',$t - (1*24*60*60));\r
- $archivenext = strftime('%Y-%m',$t + (32*24*60*60));\r
- }\r
-\r
-\r
- } elseif ($archivelist) {\r
- $type = 'archivelist';\r
- if (intval($archivelist) != 0)\r
- $blogid = $archivelist;\r
- else\r
- $blogid = getBlogIDFromName($archivelist);\r
- if (!$blogid) doError(_ERROR_NOSUCHBLOG);\r
- } elseif ($query) {\r
- global $startpos;\r
- $type = 'search';\r
- $query = stripslashes($query);\r
- if(preg_match("/^(\xA1{2}|\xe3\x80{2}|\x20)+$/",$query)){\r
- $type = 'index';\r
- }\r
- $order = (_CHARSET == 'EUC-JP') ? 'EUC-JP, UTF-8,' : 'UTF-8, EUC-JP,';\r
- $query = mb_convert_encoding($query, _CHARSET, $order.' JIS, SJIS, ASCII');\r
- if (intval($blogid)==0)\r
- $blogid = getBlogIDFromName($blogid);\r
- if (!$blogid) doError(_ERROR_NOSUCHBLOG);\r
- } elseif ($memberid) {\r
- $type = 'member';\r
- if (!MEMBER::existsID($memberid))\r
- doError(_ERROR_NOSUCHMEMBER);\r
- $memberinfo = MEMBER::createFromID($memberid);\r
-\r
- } elseif ($imagepopup) {\r
- // media object (images etc.)\r
- $type = 'imagepopup';\r
-\r
- // TODO: check if media-object exists\r
- // TODO: set some vars?\r
- } else {\r
- // show regular index page\r
- global $startpos;\r
- $type = 'index';\r
- }\r
-\r
- // decide which blog should be displayed\r
- if (!$blogid)\r
- $blogid = $CONF['DefaultBlog'];\r
-\r
- $b =& $manager->getBlog($blogid);\r
- $blog = $b; // references can't be placed in global variables?\r
- if (!$blog->isValid)\r
- doError(_ERROR_NOSUCHBLOG);\r
-\r
- // set catid if necessary\r
- if ($catid)\r
- $blog->setSelectedCategory($catid);\r
-\r
- // decide which skin should be used\r
- if ($skinid != '' && ($skinid == 0))\r
- selectSkin($skinid);\r
- if (!$skinid)\r
- $skinid = $blog->getDefaultSkin();\r
-\r
- \r
- $skin =& new SKIN($skinid);\r
- if (!$skin->isValid)\r
- doError(_ERROR_NOSUCHSKIN);\r
-\r
- // parse the skin\r
- $skin->parse($type);\r
-}\r
-\r
-/**\r
- * Show error skin with given message. An optional skin-object to use can be given\r
- */\r
-function doError($msg, $skin = '') {\r
- global $errormessage, $CONF, $skinid, $blogid, $manager;\r
-\r
- if ($skin == '') {\r
- if (SKIN::existsID($skinid)) {\r
- $skin =& new SKIN($skinid);\r
- } elseif ($manager->existsBlogID($blogid)) {\r
- $blog =& $manager->getBlog($blogid);\r
- $skin =& new SKIN($blog->getDefaultSkin());\r
- } elseif ($CONF['DefaultBlog']) {\r
- $blog =& $manager->getBlog($CONF['DefaultBlog']);\r
- $skin =& new SKIN($blog->getDefaultSkin());\r
- } else {\r
- // this statement should actually never be executed\r
- $skin =& new SKIN($CONF['BaseSkin']);\r
- }\r
- }\r
-\r
- $errormessage = $msg;\r
- $skin->parse('error');\r
- exit;\r
-}\r
-\r
-function getConfig() {\r
- global $CONF;\r
-\r
- $query = 'SELECT * FROM '.sql_table('config');\r
- $res = sql_query($query);\r
- while ($obj = mysql_fetch_object($res)) {\r
- $CONF[$obj->name] = $obj->value;\r
- }\r
-}\r
-\r
-// some checks for names of blogs, categories, templates, members, ...\r
-function isValidShortName($name) { return eregi('^[a-z0-9]+$', $name); }\r
-function isValidDisplayName($name) { return eregi('^[a-z0-9]+[a-z0-9 ]*[a-z0-9]+$', $name); }\r
-function isValidCategoryName($name) { return 1; } \r
-function isValidTemplateName($name) { return eregi('^[a-z0-9/]+$', $name); }\r
-function isValidSkinName($name) { return eregi('^[a-z0-9/]+$', $name); }\r
-\r
-// add and remove linebreaks\r
-function addBreaks($var) { return nl2br($var); }\r
-function removeBreaks($var) { return preg_replace("/<br \/>([\r\n])/","$1",$var); }\r
-\r
-// shortens a text string to maxlength ($toadd) is what needs to be added\r
-// at the end (end length is <= $maxlength)\r
-function shorten($text, $maxlength, $toadd) {\r
- // 1. remove entities...\r
- $trans = get_html_translation_table(HTML_ENTITIES);\r
- $trans = array_flip($trans);\r
- $text = strtr($text, $trans);\r
- // 2. the actual shortening\r
- if (strlen($text) > $maxlength)\r
- $text = mb_strimwidth($text, 0, $maxlength, $toadd, _CHARSET);\r
- return $text;\r
-}\r
-\r
-/**\r
- * Converts a unix timestamp to a mysql DATETIME format, and places\r
- * quotes around it.\r
- */\r
-function mysqldate($timestamp) {\r
- return '"' . date('Y-m-d H:i:s',$timestamp) . '"';\r
-}\r
-\r
-/**\r
- * functions for use in index.php\r
- */\r
-function selectBlog($shortname) {\r
- global $blogid, $archivelist;\r
- $blogid = getBlogIDFromName($shortname);\r
-\r
- // also force archivelist variable, if it is set\r
- if ($archivelist)\r
- $archivelist = $blogid;\r
-}\r
-\r
-function selectSkin($skinname) {\r
- global $skinid;\r
- $skinid = SKIN::getIdFromName($skinname);\r
-}\r
-\r
-/**\r
- * Can take either a category ID or a category name (be aware that\r
- * multiple categories can have the same name)\r
- */\r
-function selectCategory($cat) {\r
- global $catid;\r
- if (is_numeric($cat))\r
- $catid = intval($cat);\r
- else\r
- $catid = getCatIDFromName($cat);\r
-}\r
-\r
-function selectItem($id){\r
- global $itemid;\r
- $itemid = intval($id);\r
-}\r
-\r
-// force the use of a language file (warning: can cause warnings)\r
-function selectLanguage($language) {\r
- global $DIR_LANG;\r
- include($DIR_LANG . ereg_replace( '[\\|/]', '', $language) . '.php');\r
-}\r
-\r
-function parseFile($filename) {\r
- $handler =& new ACTIONS('fileparser');\r
- $parser =& new PARSER(SKIN::getAllowedActionsForType('fileparser'), $handler);\r
- $handler->parser =& $parser;\r
-\r
- if (!file_exists($filename)) doError('A file is missing');\r
-\r
- $fsize = filesize($filename);\r
- if ($fsize <= 0)\r
- return;\r
-\r
- // read file\r
- $fd = fopen ($filename, 'r');\r
- $contents = fread ($fd, $fsize);\r
- fclose ($fd);\r
-\r
- // parse file contents\r
- $parser->parse($contents);\r
-}\r
-\r
-/**\r
- * Outputs a debug message\r
- */\r
-function debug($msg) {\r
- echo '<p><b>' . $msg . "</b></p>\n";\r
-}\r
-\r
-// shortcut\r
-function addToLog($level, $msg) { ACTIONLOG::add($level, $msg); }\r
-\r
-// shows a link to help file\r
-function help($id) {\r
- echo helpHtml($id);\r
-}\r
-\r
-function helpHtml($id) {\r
- return helplink($id) . '<img src="documentation/icon-help.gif" width="15" height="15" alt="'._HELP_TT.'" /></a>';\r
-}\r
-\r
-function helplink($id) {\r
- return '<a href="documentation/help.html#'. $id . '" onclick="if (event && event.preventDefault) event.preventDefault(); return help(this.href);">';\r
-}\r
-\r
-function getMailFooter() {\r
- $message = "\n\n-----------------------------";\r
- $message .= "\n Powered by Nucleus CMS";\r
- $message .= "\n(http://www.nucleuscms.org/)";\r
- return $message;\r
-}\r
-\r
-/**\r
- * Returns the name of the language to use\r
- * preference priority: member - site\r
- * defaults to english when no good language found\r
- *\r
- * checks if file exists, etc...\r
- */\r
-function getLanguageName() {\r
- global $CONF, $member;\r
-\r
- if ($member) {\r
- // try to use members language\r
- $memlang = $member->getLanguage();\r
-\r
- if (($memlang != '') && (checkLanguage($memlang)))\r
- return $memlang;\r
- }\r
-\r
- // use default language\r
- if (checkLanguage($CONF['Language']))\r
- return $CONF['Language'];\r
- else\r
- return 'english';\r
-}\r
-\r
-/**\r
- * Includes a PHP file. This method can be called while parsing templates and skins\r
- */\r
-function includephp($filename) {\r
- // make predefined variables global, so most simple scripts can be used here\r
-\r
- // apache (names taken from PHP doc)\r
- global $GATEWAY_INTERFACE, $SERVER_NAME, $SERVER_SOFTWARE, $SERVER_PROTOCOL;\r
- global $REQUEST_METHOD, $QUERY_STRING, $DOCUMENT_ROOT, $HTTP_ACCEPT;\r
- global $HTTP_ACCEPT_CHARSET, $HTTP_ACCEPT_ENCODING, $HTTP_ACCEPT_LANGUAGE;\r
- global $HTTP_CONNECTION, $HTTP_HOST, $HTTP_REFERER, $HTTP_USER_AGENT;\r
- global $REMOTE_ADDR, $REMOTE_PORT, $SCRIPT_FILENAME, $SERVER_ADMIN;\r
- global $SERVER_PORT, $SERVER_SIGNATURE, $PATH_TRANSLATED, $SCRIPT_NAME;\r
- global $REQUEST_URI;\r
-\r
- // php (taken from PHP doc)\r
- global $argv, $argc, $PHP_SELF, $HTTP_COOKIE_VARS, $HTTP_GET_VARS, $HTTP_POST_VARS;\r
- global $HTTP_POST_FILES, $HTTP_ENV_VARS, $HTTP_SERVER_VARS, $HTTP_SESSION_VARS;\r
-\r
- // other\r
- global $PATH_INFO, $HTTPS, $HTTP_RAW_POST_DATA, $HTTP_X_FORWARDED_FOR;\r
-\r
- if (@file_exists($filename)) include($filename);\r
-}\r
-\r
-/**\r
- * Checks if a certain language/plugin exists\r
- */\r
-function checkLanguage($lang) {\r
- global $DIR_LANG ;\r
- return file_exists($DIR_LANG . ereg_replace( '[\\|/]', '', $lang) . '.php');\r
-}\r
-function checkPlugin($plug) {\r
- global $DIR_PLUGINS;\r
- return file_exists($DIR_PLUGINS . ereg_replace( '[\\|/]', '', $plug) . '.php');\r
-}\r
-\r
-\r
-$CONF['ItemURL'] = $CONF['Self'];\r
-$CONF['ArchiveURL'] = $CONF['Self'];\r
-$CONF['ArchiveListURL'] = $CONF['Self'];\r
-$CONF['MemberURL'] = $CONF['Self'];\r
-$CONF['SearchURL'] = $CONF['Self'];\r
-$CONF['BlogURL'] = $CONF['Self'];\r
-$CONF['CategoryURL'] = $CONF['Self'];\r
-\r
-// switch URLMode back to normal when $CONF['Self'] ends in .php\r
-// this avoids urls like index.php/item/13/index.php/item/15\r
-if ( ($CONF['URLMode'] == 'pathinfo')\r
- && (substr($CONF['Self'], strlen($CONF['Self']) - 4) == '.php')\r
- ) {\r
- $CONF['URLMode'] = 'normal';\r
-}\r
-\r
-/**\r
- * Centralisation of the functions that generate links\r
- */\r
-function createItemLink($itemid, $extra = '') {\r
- global $CONF;\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['ItemURL'] . '/item/' . $itemid;\r
- else\r
- $link = $CONF['ItemURL'] . '?itemid=' . $itemid;\r
- return addLinkParams($link, $extra);\r
-}\r
-function createMemberLink($memberid, $extra = '') {\r
- global $CONF;\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['MemberURL'] . '/member/' . $memberid;\r
- else\r
- $link = $CONF['MemberURL'] . '?memberid=' . $memberid;\r
- return addLinkParams($link, $extra);\r
-}\r
-function createCategoryLink($catid, $extra = '') {\r
- global $CONF;\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['CategoryURL'] . '/category/' . $catid;\r
- else\r
- $link = $CONF['CategoryURL'] . '?catid=' . $catid;\r
- return addLinkParams($link, $extra);\r
-}\r
-function createArchiveListLink($blogid = '', $extra = '') {\r
- global $CONF;\r
- if (!$blogid)\r
- $blogid = $CONF['DefaultBlog'];\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['ArchiveListURL'] . '/archives/' . $blogid;\r
- else\r
- $link = $CONF['ArchiveListURL'] . '?archivelist=' . $blogid;\r
- return addLinkParams($link, $extra);\r
-}\r
-function createArchiveLink($blogid, $archive, $extra = '') {\r
- global $CONF;\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['ArchiveURL'] . '/archive/'.$blogid.'/' . $archive;\r
- else\r
- $link = $CONF['ArchiveURL'] . '?blogid='.$blogid.'&archive=' . $archive;\r
- return addLinkParams($link, $extra);\r
-}\r
-function createBlogLink($url, $params) {\r
- return addLinkParams($url . '?', $params);\r
-}\r
-function createBlogidLink($blogid, $params = '') {\r
- global $CONF;\r
- if ($CONF['URLMode'] == 'pathinfo')\r
- $link = $CONF['BlogURL'] . '/blog/' . $blogid;\r
- else\r
- $link = $CONF['BlogURL'] . '?blogid=' . $blogid;\r
- return addLinkParams($link, $params);\r
-}\r
-\r
-\r
-function addLinkParams($link, $params) {\r
- global $CONF;\r
- if (is_array($params)) {\r
- if ($CONF['URLMode'] == 'pathinfo') {\r
- foreach ($params as $param => $value) {\r
- $link .= '/' . $param . '/' . urlencode($value);\r
- }\r
- } else {\r
- foreach ($params as $param => $value) {\r
- $link .= '&' . $param . '=' . urlencode($value);\r
- }\r
- }\r
- }\r
- return $link;\r
-}\r
-\r
-/**\r
- * @param $querystr\r
- * querystring to alter (e.g. foo=1&bar=2&x=y)\r
- * @param $param\r
- * name of parameter to change (e.g. 'foo')\r
- * @param $value\r
- * New value for that parameter (e.g. 3)\r
- * @result \r
- * altered query string (for the examples above: foo=3&bar=2&x=y)\r
- */\r
-function alterQueryStr($querystr, $param, $value) {\r
- $vars = explode("&", $querystr);\r
- $set = false;\r
- for ($i=0;$i<count($vars);$i++) {\r
- $v = explode('=',$vars[$i]);\r
- if ($v[0] == $param) {\r
- $v[1] = $value;\r
- $vars[$i] = implode('=', $v);\r
- $set = true;\r
- break;\r
- }\r
- }\r
- if (!$set) {$vars[] = $param . '=' . $value;}\r
- return ltrim(implode('&', $vars), '&');\r
-}\r
-\r
-// passes one variable as hidden input field (multiple fields for arrays)\r
-// @see passRequestVars in varsx.x.x.php\r
-function passVar($key, $value) {\r
- // array ?\r
- if (is_array($value)) {\r
- for ($i=0;$i<sizeof($value);$i++)\r
- passVar($key.'['.$i.']',$value[$i]);\r
- return;\r
- }\r
-\r
- // other values: do stripslashes if needed\r
- ?><input type="hidden" name="<?php echo htmlspecialchars($key)?>" value="<?php echo htmlspecialchars(undoMagic($value))?>" /><?php\r
-}\r
-\r
-/*\r
- Date format functions (to be used from [%date(..)%] skinvars\r
-*/\r
-function formatDate($format, $timestamp, $defaultFormat) {\r
- if ($format == 'rfc822') { \r
- return date('r', $timestamp); \r
- } else if ($format == 'rfc822GMT') { \r
- return gmdate('r', $timestamp); \r
- } else if ($format == 'utc') { \r
- return gmdate('Y-m-d\TH:i:s\Z', $timestamp); \r
- } else if ($format == 'iso8601') {\r
- $tz = date('O', $timestamp);\r
- $tz = substr($tz, 0, 3) . ':' . substr($tz, 3, 2); \r
- return gmdate('Y-m-d\TH:i:s', $timestamp) . $tz;\r
- } else { \r
- return strftime($format ? $format : $defaultFormat,$timestamp); \r
- } \r
-\r
-}\r
-\r
-function checkVars($aVars)\r
-{\r
- global $HTTP_GET_VARS, $HTTP_POST_VARS, $HTTP_COOKIE_VARS, $HTTP_ENV_VARS, $HTTP_POST_FILES, $HTTP_SESSION_VARS;\r
- foreach ($aVars as $varName)\r
- {\r
- if (phpversion() >= '4.1.0')\r
- {\r
- if ( isset($_GET[$varName]) \r
- || isset($_POST[$varName]) \r
- || isset($_COOKIE[$varName])\r
- || isset($_ENV[$varName])\r
- || isset($_SESSION[$varName])\r
- || isset($_FILES[$varName])\r
- ){\r
- die('Sorry. An error occurred.');\r
- }\r
- } else {\r
- if ( isset($HTTP_GET_VARS[$varName]) \r
- || isset($HTTP_POST_VARS[$varName]) \r
- || isset($HTTP_COOKIE_VARS[$varName])\r
- || isset($HTTP_ENV_VARS[$varName])\r
- || isset($HTTP_SESSION_VARS[$varName])\r
- || isset($HTTP_POST_FILES[$varName])\r
- ){\r
- die('Sorry. An error occurred.');\r
- } \r
- }\r
- }\r
-}\r
-\r
-/** \r
- * Stops processing the request and redirects to the given URL.\r
- * - no actual contents should have been sent to the output yet\r
- * - the URL will be stripped of illegal or dangerous characters\r
- */\r
-function redirect($url)\r
-{\r
- $url = preg_replace('|[^a-z0-9-~+_.?#=&;,/:@%]|i', '', $url);\r
- header('Location: ' . $url);\r
- exit;\r
-}\r
-\r
-?>\r
+<?php
+
+/*
+ * Nucleus: PHP/MySQL Weblog CMS (http://nucleuscms.org/)
+ * Copyright (C) 2002-2007 The Nucleus Group
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ * (see nucleus/documentation/index.html#license for more info)
+ */
+/**
+ * @license http://nucleuscms.org/license.txt GNU General Public License
+ * @copyright Copyright (C) 2002-2007 The Nucleus Group
+ * @version $Id: globalfunctions.php,v 1.10 2007-04-04 21:00:14 kmorimatsu Exp $
+ * $NucleusJP: globalfunctions.php,v 1.9 2007/03/27 12:13:56 kimitake Exp $
+ */
+
+// needed if we include globalfunctions from install.php
+global $nucleus, $CONF, $DIR_LIBS, $DIR_LANG, $manager, $member;
+
+//$nucleus['version'] = 'v3.3SVN';
+//$nucleus['codename'] = 'Lithium';
+$nucleus['version'] = 'v3.3';
+$nucleus['codename'] = '';
+
+checkVars(array('nucleus', 'CONF', 'DIR_LIBS', 'MYSQL_HOST', 'MYSQL_USER', 'MYSQL_PASSWORD', 'MYSQL_DATABASE', 'DIR_LANG', 'DIR_PLUGINS', 'HTTP_GET_VARS', 'HTTP_POST_VARS', 'HTTP_COOKIE_VARS', 'HTTP_ENV_VARS', 'HTTP_SESSION_VARS', 'HTTP_POST_FILES', 'HTTP_SERVER_VARS', 'GLOBALS', 'argv', 'argc', '_GET', '_POST', '_COOKIE', '_ENV', '_SESSION', '_SERVER', '_FILES'));
+
+$CONF['debug'] = 0;
+if ($CONF['debug']) {
+ error_reporting(E_ALL); // report all errors!
+} else {
+ error_reporting(E_ERROR | E_WARNING | E_PARSE);
+}
+
+// Avoid notices
+if (!isset($CONF['Self'])) {
+ $CONF['Self'] = $_SERVER['PHP_SELF'];
+}
+
+/*
+ Indicates when Nucleus should display startup errors. Set to 1 if you want
+ the error enabled (default), false otherwise
+
+ alertOnHeadersSent
+ Displays an error when visiting a public Nucleus page and headers have
+ been sent out to early. This usually indicates an error in either a
+ configuration file or a language file, and could cause Nucleus to
+ malfunction
+ alertOnSecurityRisk
+ Displays an error only when visiting the admin area, and when one or
+ more of the installation files (install.php, install.sql, upgrades/
+ directory) are still on the server.
+*/
+$CONF['alertOnHeadersSent'] = 1;
+$CONF['alertOnSecurityRisk'] = 1;
+$CONF['ItemURL'] = $CONF['Self'];
+$CONF['ArchiveURL'] = $CONF['Self'];
+$CONF['ArchiveListURL'] = $CONF['Self'];
+$CONF['MemberURL'] = $CONF['Self'];
+$CONF['SearchURL'] = $CONF['Self'];
+$CONF['BlogURL'] = $CONF['Self'];
+$CONF['CategoryURL'] = $CONF['Self'];
+
+// switch URLMode back to normal when $CONF['Self'] ends in .php
+// this avoids urls like index.php/item/13/index.php/item/15
+if (!isset($CONF['URLMode']) || (($CONF['URLMode'] == 'pathinfo') && (substr($CONF['Self'], strlen($CONF['Self']) - 4) == '.php'))) {
+ $CONF['URLMode'] = 'normal';
+}
+
+if (getNucleusPatchLevel() > 0) {
+ $nucleus['version'] .= '/' . getNucleusPatchLevel();
+}
+
+// Avoid notices
+if (!isset($CONF['installscript'])) {
+ $CONF['installscript'] = 0;
+}
+
+// we will use postVar, getVar, ... methods instead of HTTP_GET_VARS or _GET
+if ($CONF['installscript'] != 1) { // vars were already included in install.php
+ if (phpversion() >= '4.1.0') {
+ include_once($DIR_LIBS . 'vars4.1.0.php');
+ } else {
+ include_once($DIR_LIBS . 'vars4.0.6.php');
+ }
+}
+
+// sanitize option
+$bLoggingSanitizedResult=0;
+$bSanitizeAndContinue=0;
+
+$orgRequestURI = serverVar('REQUEST_URI');
+sanitizeParams();
+
+// get all variables that can come from the request and put them in the global scope
+$blogid = requestVar('blogid');
+$itemid = intRequestVar('itemid');
+$catid = intRequestVar('catid');
+$skinid = requestVar('skinid');
+$memberid = requestVar('memberid');
+$archivelist = requestVar('archivelist');
+$imagepopup = requestVar('imagepopup');
+$archive = requestVar('archive');
+$query = requestVar('query');
+$highlight = requestVar('highlight');
+$amount = requestVar('amount');
+$action = requestVar('action');
+$nextaction = requestVar('nextaction');
+$maxresults = requestVar('maxresults');
+$startpos = intRequestVar('startpos');
+$errormessage = '';
+$error = '';
+$virtualpath = ((getVar('virtualpath') != null) ? getVar('virtualpath') : serverVar('PATH_INFO'));
+
+if (!headers_sent() ) {
+ header('Generator: Nucleus CMS ' . $nucleus['version']);
+}
+
+// include core classes that are needed for login & plugin handling
+include($DIR_LIBS . 'mysql.php');
+include($DIR_LIBS . 'MEMBER.php');
+include($DIR_LIBS . 'ACTIONLOG.php');
+include($DIR_LIBS . 'MANAGER.php');
+include($DIR_LIBS . 'PLUGIN.php');
+
+$manager =& MANAGER::instance();
+
+// make sure there's no unnecessary escaping:
+set_magic_quotes_runtime(0);
+
+// Avoid notices
+if (!isset($CONF['UsingAdminArea'])) {
+ $CONF['UsingAdminArea'] = 0;
+}
+
+// only needed when updating logs
+if ($CONF['UsingAdminArea']) {
+ include($DIR_LIBS . 'xmlrpc.inc.php'); // XML-RPC client classes
+ include_once($DIR_LIBS . 'ADMIN.php');
+}
+
+// connect to database
+sql_connect();
+$SQLCount = 0;
+
+// logs sanitized result if need
+if ($orgRequestURI!==serverVar('REQUEST_URI')) {
+ $msg = "Sanitized [" . serverVar('REMOTE_ADDR') . "] ";
+ $msg .= $orgRequestURI . " -> " . serverVar('REQUEST_URI');
+ if ($bLoggingSanitizedResult) {
+ addToLog(WARNING, $msg);
+ }
+ if (!$bSanitizeAndContinue) {
+ die("");
+ }
+}
+
+// makes sure database connection gets closed on script termination
+register_shutdown_function('sql_disconnect');
+
+// read config
+getConfig();
+
+// automatically use simpler toolbar for mozilla
+if (($CONF['DisableJsTools'] == 0) && strstr(serverVar('HTTP_USER_AGENT'), 'Mozilla/5.0') && strstr(serverVar('HTTP_USER_AGENT'), 'Gecko') ) {
+ $CONF['DisableJsTools'] = 2;
+}
+
+// login if cookies set
+$member = new MEMBER();
+
+// login/logout when required or renew cookies
+if ($action == 'login') {
+ // Form Authentication
+ $login = postVar('login');
+ $pw = postVar('password');
+ $shared = intPostVar('shared'); // shared computer or not
+
+ if ($member->login($login, $pw) ) {
+
+ $member->newCookieKey();
+ $member->setCookies($shared);
+
+ // allows direct access to parts of the admin area after logging in
+ if ($nextaction) {
+ $action = $nextaction;
+ }
+
+ $manager->notify('LoginSuccess', array('member' => &$member) );
+ $errormessage = '';
+ ACTIONLOG::add(INFO, "Login successful for $login (sharedpc=$shared)");
+ } else {
+ // errormessage for [%errordiv%]
+ $errormessage = 'Login failed for ' . $login;
+
+ $manager->notify('LoginFailed', array('username' => $login) );
+ ACTIONLOG::add(INFO, $errormessage);
+ }
+/*
+
+Backed out for now: See http://forum.nucleuscms.org/viewtopic.php?t=3684 for details
+
+} elseif (serverVar('PHP_AUTH_USER') && serverVar('PHP_AUTH_PW')) {
+ // HTTP Authentication
+ $login = serverVar('PHP_AUTH_USER');
+ $pw = serverVar('PHP_AUTH_PW');
+
+ if ($member->login($login, $pw) ) {
+ $manager->notify('LoginSuccess',array('member' => &$member));
+ ACTIONLOG::add(INFO, "HTTP authentication successful for $login");
+ } else {
+ $manager->notify('LoginFailed',array('username' => $login));
+ ACTIONLOG::add(INFO, 'HTTP authentication failed for ' . $login);
+
+ //Since bad credentials, generate an apropriate error page
+ header("WWW-Authenticate: Basic realm=\"Nucleus CMS {$nucleus['version']}\"");
+ header('HTTP/1.0 401 Unauthorized');
+ echo 'Invalid username or password';
+ exit;
+ }
+*/
+
+} elseif (($action == 'logout') && (!headers_sent() ) && cookieVar($CONF['CookiePrefix'] . 'user') ) {
+ // remove cookies on logout
+ setcookie($CONF['CookiePrefix'] . 'user', '', (time() - 2592000), $CONF['CookiePath'], $CONF['CookieDomain'], $CONF['CookieSecure']);
+ setcookie($CONF['CookiePrefix'] . 'loginkey', '', (time() - 2592000), $CONF['CookiePath'], $CONF['CookieDomain'], $CONF['CookieSecure']);
+ $manager->notify('Logout', array('username' => cookieVar($CONF['CookiePrefix'] . 'user') ) );
+} elseif (cookieVar($CONF['CookiePrefix'] . 'user') ) {
+ // Cookie Authentication
+ $res = $member->cookielogin(cookieVar($CONF['CookiePrefix'] . 'user'), cookieVar($CONF['CookiePrefix'] . 'loginkey') );
+
+ // renew cookies when not on a shared computer
+ if ($res && (cookieVar($CONF['CookiePrefix'] . 'sharedpc') != 1) && (!headers_sent() ) ) {
+ $member->setCookies();
+ }
+}
+
+// login completed
+$manager->notify('PostAuthentication', array('loggedIn' => $member->isLoggedIn() ) );
+ticketForPlugin();
+
+// first, let's see if the site is disabled or not. always allow admin area access.
+if ($CONF['DisableSite'] && !$member->isAdmin() && !$CONF['UsingAdminArea']) {
+ redirect($CONF['DisableSiteURL']);
+ exit;
+}
+
+// load other classes
+include($DIR_LIBS . 'PARSER.php');
+include($DIR_LIBS . 'SKIN.php');
+include($DIR_LIBS . 'TEMPLATE.php');
+include($DIR_LIBS . 'BLOG.php');
+include($DIR_LIBS . 'BODYACTIONS.php');
+include($DIR_LIBS . 'COMMENTS.php');
+include($DIR_LIBS . 'COMMENT.php');
+//include($DIR_LIBS . 'ITEM.php');
+include($DIR_LIBS . 'NOTIFICATION.php');
+include($DIR_LIBS . 'BAN.php');
+include($DIR_LIBS . 'PAGEFACTORY.php');
+include($DIR_LIBS . 'SEARCH.php');
+include($DIR_LIBS . 'entity.php');
+
+
+// set lastVisit cookie (if allowed)
+if (!headers_sent() ) {
+ if ($CONF['LastVisit']) {
+ setcookie($CONF['CookiePrefix'] . 'lastVisit', time(), time() + 2592000, $CONF['CookiePath'], $CONF['CookieDomain'], $CONF['CookieSecure']);
+ } else {
+ setcookie($CONF['CookiePrefix'] . 'lastVisit', '', (time() - 2592000), $CONF['CookiePath'], $CONF['CookieDomain'], $CONF['CookieSecure']);
+ }
+}
+
+// read language file, only after user has been initialized
+$language = getLanguageName();
+include($DIR_LANG . ereg_replace( '[\\|/]', '', $language) . '.php');
+
+/*
+ Backed out for now: See http://forum.nucleuscms.org/viewtopic.php?t=3684 for details
+
+// To remove after v2.5 is released and language files have been updated.
+// Including this makes sure that language files for v2.5beta can still be used for v2.5final
+// without having weird _SETTINGS_EXTAUTH string showing up in the admin area.
+if (!defined('_MEMBERS_BYPASS'))
+{
+ define('_SETTINGS_EXTAUTH', 'Enable External Authentication');
+ define('_WARNING_EXTAUTH', 'Warning: Enable only if needed.');
+ define('_MEMBERS_BYPASS', 'Use External Authentication');
+}
+
+*/
+
+// make sure the archivetype skinvar keeps working when _ARCHIVETYPE_XXX not defined
+if (!defined('_ARCHIVETYPE_MONTH') ) {
+ define('_ARCHIVETYPE_DAY', 'day');
+ define('_ARCHIVETYPE_MONTH', 'month');
+}
+
+// decode path_info
+if ($CONF['URLMode'] == 'pathinfo') {
+ // initialize keywords if this hasn't been done before
+ if ($CONF['ItemKey'] == '') {
+ $CONF['ItemKey'] = 'item';
+ }
+
+ if ($CONF['ArchiveKey'] == '') {
+ $CONF['ArchiveKey'] = 'archive';
+ }
+
+ if ($CONF['ArchivesKey'] == '') {
+ $CONF['ArchivesKey'] = 'archives';
+ }
+
+ if ($CONF['MemberKey'] == '') {
+ $CONF['MemberKey'] = 'member';
+ }
+
+ if ($CONF['BlogKey'] == '') {
+ $CONF['BlogKey'] = 'blog';
+ }
+
+ if ($CONF['CategoryKey'] == '') {
+ $CONF['CategoryKey'] = 'category';
+ }
+
+ if ($CONF['SpecialskinKey'] == '') {
+ $CONF['SpecialskinKey'] = 'special';
+ }
+
+ $parsed = false;
+ $manager->notify(
+ 'ParseURL',
+ array(
+ 'type' => basename(serverVar('SCRIPT_NAME') ), // e.g. item, blog, ...
+ 'info' => $virtualpath,
+ 'complete' => &$parsed
+ )
+ );
+
+ if (!$parsed) {
+ // default implementation
+ $data = explode("/", $virtualpath );
+ for ($i = 0; $i < sizeof($data); $i++) {
+ switch ($data[$i]) {
+ case $CONF['ItemKey']: // item/1 (blogid)
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $itemid = intval($data[$i]);
+ }
+ break;
+
+ case $CONF['ArchivesKey']: // archives/1 (blogid)
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $archivelist = intval($data[$i]);
+ }
+ break;
+
+ case $CONF['ArchiveKey']: // two possibilities: archive/yyyy-mm or archive/1/yyyy-mm (with blogid)
+ if ((($i + 1) < sizeof($data) ) && (!strstr($data[$i + 1], '-') ) ) {
+ $blogid = intval($data[++$i]);
+ }
+
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $archive = $data[$i];
+ }
+ break;
+
+ case 'blogid': // blogid/1
+ case $CONF['BlogKey']: // blog/1
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $blogid = intval($data[$i]);
+ }
+ break;
+
+ case $CONF['CategoryKey']: // category/1 (catid)
+ case 'catid':
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $catid = intval($data[$i]);
+ }
+ break;
+
+ case $CONF['MemberKey']:
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $memberid = intval($data[$i]);
+ }
+ break;
+
+ case $CONF['SpecialskinKey']:
+ $i++;
+
+ if ($i < sizeof($data) ) {
+ $_REQUEST['special'] = $data[$i];
+ }
+ break;
+
+ default:
+ // skip...
+ }
+ }
+ }
+}
+
+function intPostVar($name) {
+ return intval(postVar($name) );
+}
+
+function intGetVar($name) {
+ return intval(getVar($name) );
+}
+
+function intRequestVar($name) {
+ return intval(requestVar($name) );
+}
+
+function intCookieVar($name) {
+ return intval(cookieVar($name) );
+}
+
+/**
+ * returns the currently used version (100 = 1.00, 101 = 1.01, etc...)
+ */
+function getNucleusVersion() {
+ return 330;
+}
+
+/**
+ * power users can install patches in between nucleus releases. These patches
+ * usually add new functionality in the plugin API and allow those to
+ * be tested without having to install CVS.
+ */
+function getNucleusPatchLevel() {
+ return 0;
+}
+
+/**
+ * Connects to mysql server
+ */
+function sql_connect() {
+ global $MYSQL_HOST, $MYSQL_USER, $MYSQL_PASSWORD, $MYSQL_DATABASE, $MYSQL_CONN;
+
+ $MYSQL_CONN = @mysql_connect($MYSQL_HOST, $MYSQL_USER, $MYSQL_PASSWORD) or startUpError('<p>Could not connect to MySQL database.</p>', 'Connect Error');
+ mysql_select_db($MYSQL_DATABASE) or startUpError('<p>Could not select database: ' . mysql_error() . '</p>', 'Connect Error');
+
+ return $MYSQL_CONN;
+}
+
+/**
+ * returns a prefixed nucleus table name
+ */
+function sql_table($name) {
+ global $MYSQL_PREFIX;
+
+ if ($MYSQL_PREFIX) {
+ return $MYSQL_PREFIX . 'nucleus_' . $name;
+ } else {
+ return 'nucleus_' . $name;
+ }
+}
+
+function sendContentType($contenttype, $pagetype = '', $charset = _CHARSET) {
+ global $manager, $CONF;
+
+ if (!headers_sent() ) {
+ // if content type is application/xhtml+xml, only send it to browsers
+ // that can handle it (IE6 cannot). Otherwise, send text/html
+
+ // v2.5: For admin area pages, keep sending text/html (unless it's a debug version)
+ // application/xhtml+xml still causes too much problems with the javascript implementations
+
+ // v3.3: ($CONF['UsingAdminArea'] && !$CONF['debug']) gets removed,
+ // application/xhtml+xml seems to be working, so we're going to use it if we can.
+ //
+ // Note: reverted the following function in JP version
+ //
+ /*
+ // v3.3 code
+ if (
+ ($contenttype == 'application/xhtml+xml')
+ && (!stristr(serverVar('HTTP_ACCEPT'), 'application/xhtml+xml') )
+ ) {
+ $contenttype = 'text/html';
+ }
+ */
+ // v3.2x code
+ if (
+ ($contenttype == 'application/xhtml+xml')
+ && (($CONF['UsingAdminArea'] && !$CONF['debug']) || !stristr(serverVar('HTTP_ACCEPT'),'application/xhtml+xml'))
+ )
+ {
+ $contenttype = 'text/html';
+ }
+
+ $manager->notify(
+ 'PreSendContentType',
+ array(
+ 'contentType' => &$contenttype,
+ 'charset' => &$charset,
+ 'pageType' => $pagetype
+ )
+ );
+
+ // strip strange characters
+ $contenttype = preg_replace('|[^a-z0-9-+./]|i', '', $contenttype);
+ $charset = preg_replace('|[^a-z0-9-_]|i', '', $charset);
+
+ if ($charset != '') {
+ header('Content-Type: ' . $contenttype . '; charset=' . $charset);
+ } else {
+ header('Content-Type: ' . $contenttype);
+ }
+ }
+}
+
+/**
+ * Errors before the database connection has been made
+ */
+function startUpError($msg, $title) {
+ ?>
+ <html xmlns="http://www.w3.org/1999/xhtml">
+ <head><meta http-equiv="Content-Type" content="text/html; charset=EUC-JP" />
+ <title><?php echo htmlspecialchars($title)?></title></head>
+ <body>
+ <h1><?php echo htmlspecialchars($title)?></h1>
+ <?php echo $msg?>
+ </body>
+ </html>
+ <?php exit;
+}
+
+/**
+ * disconnects from SQL server
+ */
+function sql_disconnect() {
+ @mysql_close();
+}
+
+/**
+ * executes an SQL query
+ */
+function sql_query($query) {
+ global $SQLCount;
+ $SQLCount++;
+ $res = mysql_query($query) or print("mySQL error with query $query: " . mysql_error() . '<p />');
+ return $res;
+}
+
+
+/**
+ * Highlights a specific query in a given HTML text (not within HTML tags) and returns it
+ *
+ * @param $text
+ * text to be highlighted
+ * @param $expression
+ * regular expression to be matched (can be an array of expressions as well)
+ * @param $highlight
+ * highlight to be used (use \\0 to indicate the matched expression)
+ *
+ */
+function highlight($text, $expression, $highlight) {
+ if (!$highlight || !$expression) {
+ return $text;
+ }
+
+ if (is_array($expression) && (count($expression) == 0) ) {
+ return $text;
+ }
+
+ // add a tag in front (is needed for preg_match_all to work correct)
+ $text = '<!--h-->' . $text;
+
+ // split the HTML up so we have HTML tags
+ // $matches[0][i] = HTML + text
+ // $matches[1][i] = HTML
+ // $matches[2][i] = text
+ preg_match_all('/(<[^>]+>)([^<>]*)/', $text, $matches);
+
+ // throw it all together again while applying the highlight to the text pieces
+ $result = '';
+ for ($i = 0; $i < sizeof($matches[2]); $i++) {
+ if ($i != 0) {
+ $result .= $matches[1][$i];
+ }
+
+ if (is_array($expression) ) {
+ foreach ($expression as $regex) {
+ if ($regex) {
+ $matches[2][$i] = @eregi_replace($regex, $highlight, $matches[2][$i]);
+ }
+ }
+
+ $result .= $matches[2][$i];
+ } else {
+ $result .= @eregi_replace($expression, $highlight, $matches[2][$i]);
+ }
+ }
+
+ return $result;
+}
+
+/**
+ * Parses a query into an array of expressions that can be passed on to the highlight method
+ */
+function parseHighlight($query) {
+ // TODO: add more intelligent splitting logic
+
+ // get rid of quotes
+ $query = preg_replace('/\'|"/', '', $query);
+
+ if (!query) {
+ return array();
+ }
+
+ $aHighlight = explode(' ', $query);
+
+ for ($i = 0; $i < count($aHighlight); $i++) {
+ $aHighlight[$i] = trim($aHighlight[$i]);
+
+ if (strlen($aHighlight[$i]) < 3) {
+ unset($aHighlight[$i]);
+ }
+ }
+
+ if (count($aHighlight) == 1) {
+ return $aHighlight[0];
+ } else {
+ return $aHighlight;
+ }
+}
+
+/**
+ * Checks if email address is valid
+ */
+function isValidMailAddress($address) {
+ if (preg_match('/^[a-zA-Z+0-9\._-]+@[a-zA-Z0-9\._-]+\.[A-Za-z]{2,5}$/', $address)) {
+ return 1;
+ } else {
+ return 0;
+ }
+}
+
+
+// some helper functions
+function getBlogIDFromName($name) {
+ return quickQuery('SELECT bnumber as result FROM ' . sql_table('blog') . ' WHERE bshortname="' . addslashes($name) . '"');
+}
+
+function getBlogNameFromID($id) {
+ return quickQuery('SELECT bname as result FROM ' . sql_table('blog') . ' WHERE bnumber=' . intval($id) );
+}
+
+function getBlogIDFromItemID($itemid) {
+ return quickQuery('SELECT iblog as result FROM ' . sql_table('item') . ' WHERE inumber=' . intval($itemid) );
+}
+
+function getBlogIDFromCommentID($commentid) {
+ return quickQuery('SELECT cblog as result FROM ' . sql_table('comment') . ' WHERE cnumber=' . intval($commentid) );
+}
+
+function getBlogIDFromCatID($catid) {
+ return quickQuery('SELECT cblog as result FROM ' . sql_table('category') . ' WHERE catid=' . intval($catid) );
+}
+
+function getCatIDFromName($name) {
+ return quickQuery('SELECT catid as result FROM ' . sql_table('category') . ' WHERE cname="' . addslashes($name) . '"');
+}
+
+function quickQuery($q) {
+ $res = sql_query($q);
+ $obj = mysql_fetch_object($res);
+ return $obj->result;
+}
+
+function getPluginNameFromPid($pid) {
+ $res = sql_query('SELECT pfile FROM ' . sql_table('plugin') . ' WHERE pid=' . intval($pid) );
+ $obj = mysql_fetch_object($res);
+ return $obj->pfile;
+}
+
+function selector() {
+ global $itemid, $blogid, $memberid, $query, $amount, $archivelist, $maxresults;
+ global $archive, $skinid, $blog, $memberinfo, $CONF, $member;
+ global $imagepopup, $catid;
+ global $manager;
+
+ $actionNames = array('addcomment', 'sendmessage', 'createaccount', 'forgotpassword', 'votepositive', 'votenegative', 'plugin');
+ $action = requestVar('action');
+
+ if (in_array($action, $actionNames) ) {
+ global $DIR_LIBS, $errormessage;
+ include_once($DIR_LIBS . 'ACTION.php');
+ $a = new ACTION();
+ $errorInfo = $a->doAction($action);
+
+ if ($errorInfo) {
+ $errormessage = $errorInfo['message'];
+ }
+ }
+
+ // show error when headers already sent out
+ if (headers_sent() && $CONF['alertOnHeadersSent']) {
+
+ // try to get line number/filename (extra headers_sent params only exists in PHP 4.3+)
+ if (function_exists('version_compare') && version_compare('4.3.0', phpversion(), '<=') ) {
+ headers_sent($hsFile, $hsLine);
+ $extraInfo = ' in <code>' . $hsFile . '</code> line <code>' . $hsLine . '</code>';
+ } else {
+ $extraInfo = '';
+ }
+
+ startUpError(
+ '<p>The page headers have already been sent out' . $extraInfo . '. This could cause Nucleus not to work in the expected way.</p><p>Usually, this is caused by spaces or newlines at the end of the <code>config.php</code> file, at the end of the language file or at the end of a plugin file. Please check this and try again.</p><p>If you don\'t want to see this error message again, without solving the problem, set <code>$CONF[\'alertOnHeadersSent\']</code> in <code>globalfunctions.php</code> to <code>0</code></p>',
+ 'Page headers already sent'
+ );
+ exit;
+ }
+
+ // make is so ?archivelist without blogname or blogid shows the archivelist
+ // for the default weblog
+ if (serverVar('QUERY_STRING') == 'archivelist') {
+ $archivelist = $CONF['DefaultBlog'];
+ }
+
+ // now decide which type of skin we need
+ if ($itemid) {
+ // itemid given -> only show that item
+ $type = 'item';
+
+ if (!$manager->existsItem($itemid,0,0) ) {
+ doError(_ERROR_NOSUCHITEM);
+ }
+
+ global $itemidprev, $itemidnext, $catid, $itemtitlenext, $itemtitleprev;
+
+ // 1. get timestamp, blogid and catid for item
+ $query = 'SELECT itime, iblog, icat FROM ' . sql_table('item') . ' WHERE inumber=' . intval($itemid);
+ $res = sql_query($query);
+ $obj = mysql_fetch_object($res);
+
+ // if a different blog id has been set through the request or selectBlog(),
+ // deny access
+// if ($blogid && (intval($blogid) != $obj->iblog) ) {
+// doError(_ERROR_NOSUCHITEM);
+// }
+ if ($blogid && (intval($blogid) != $obj->iblog)) {
+ if (!headers_sent()) {
+ $b =& $manager->getBlog($obj->iblog);
+ $CONF['ItemURL'] = $b->getURL();
+ if ($CONF['URLMode'] == 'pathinfo' and substr($CONF['ItemURL'],-1) == '/')
+ $CONF['ItemURL'] = substr($CONF['ItemURL'], 0, -1);
+ $correctURL = createItemLink($itemid, '');
+ redirect($correctURL);
+ exit;
+ } else {
+ doError(_ERROR_NOSUCHITEM);
+ }
+ }
+
+ // if a category has been selected which doesn't match the item, ignore the
+ // category. #85
+ if (($catid != 0) && ($catid != $obj->icat) ) {
+ $catid = 0;
+ }
+
+ $blogid = $obj->iblog;
+ $timestamp = strtotime($obj->itime);
+
+ $b =& $manager->getBlog($blogid);
+
+ if ($b->isValidCategory($catid) ) {
+ $catextra = ' and icat=' . $catid;
+ }
+
+ // get previous itemid and title
+ $query = 'SELECT inumber, ititle FROM ' . sql_table('item') . ' WHERE itime<' . mysqldate($timestamp) . ' and idraft=0 and iblog=' . $blogid . $catextra . ' ORDER BY itime DESC LIMIT 1';
+ $res = sql_query($query);
+
+ $obj = mysql_fetch_object($res);
+
+ if ($obj) {
+ $itemidprev = $obj->inumber;
+ $itemtitleprev = $obj->ititle;
+ }
+
+ // get next itemid and title
+ $query = 'SELECT inumber, ititle FROM ' . sql_table('item') . ' WHERE itime>' . mysqldate($timestamp) . ' and itime <= ' . mysqldate($b->getCorrectTime()) . ' and idraft=0 and iblog=' . $blogid . $catextra . ' ORDER BY itime ASC LIMIT 1';
+ $res = sql_query($query);
+
+ $obj = mysql_fetch_object($res);
+
+ if ($obj) {
+ $itemidnext = $obj->inumber;
+ $itemtitlenext = $obj->ititle;
+ }
+
+ } elseif ($archive) {
+ // show archive
+ $type = 'archive';
+
+ // get next and prev month links ...
+ global $archivenext, $archiveprev, $archivetype, $archivenextexists, $archiveprevexists;
+
+ // sql queries for the timestamp of the first and the last published item
+ $query = "SELECT UNIX_TIMESTAMP(itime) as result FROM ".sql_table('item')." WHERE idraft=0 ORDER BY itime ASC";
+ $first_timestamp=quickQuery ($query);
+ $query = "SELECT UNIX_TIMESTAMP(itime) as result FROM ".sql_table('item')." WHERE idraft=0 ORDER BY itime DESC";
+ $last_timestamp=quickQuery ($query);
+
+ sscanf($archive, '%d-%d-%d', $y, $m, $d);
+
+ if ($d != 0) {
+ $archivetype = _ARCHIVETYPE_DAY;
+ $t = mktime(0, 0, 0, $m, $d, $y);
+
+ $archiveprev = strftime('%Y-%m-%d', $t - (24 * 60 * 60) );
+ // check for published items
+ if ($t > $first_timestamp) {
+ $archiveprevexists = true;
+ }
+ else {
+ $archiveprevexists = false;
+ }
+
+ // one day later
+// $t += 86400;
+// $archivenext = strftime('%Y-%m-%d', $t);
+ $archivenext = strftime('%Y-%m-%d', $t + (24 * 60 * 60) );
+ if ($t + (24 * 60 * 60) < $last_timestamp) {
+ $archivenextexists = true;
+ }
+ else {
+ $archivenextexists = false;
+ }
+
+ } else {
+ $archivetype = _ARCHIVETYPE_MONTH;
+ $t = mktime(0, 0, 0, $m, 1, $y);
+
+ $archiveprev = strftime('%Y-%m', $t - (1 * 24 * 60 * 60) );
+ if ($t > $first_timestamp) {
+ $archiveprevexists = true;
+ }
+ else {
+ $archiveprevexists = false;
+ }
+
+// $archivenext = strftime('%Y-%m', $t + (32 * 24 * 60 * 60) );
+ // timestamp for the next month
+ $t = mktime(0, 0, 0, $m+1, 1, $y);
+ $archivenext = strftime('%Y-%m', $t);
+ if ($t < $last_timestamp) {
+ $archivenextexists = true;
+ }
+ else {
+ $archivenextexists = false;
+ }
+ }
+
+ } elseif ($archivelist) {
+ $type = 'archivelist';
+
+ if (is_numeric($archivelist)) {
+ $blogid = intVal($archivelist);
+ } else {
+ $blogid = getBlogIDFromName($archivelist);
+ }
+
+ if (!$blogid) {
+ doError(_ERROR_NOSUCHBLOG);
+ }
+
+ } elseif ($query) {
+ global $startpos;
+ $type = 'search';
+ $query = stripslashes($query);
+ if(preg_match("/^(\xA1{2}|\xe3\x80{2}|\x20)+$/",$query)){
+ $type = 'index';
+ }
+ $order = (_CHARSET == 'EUC-JP') ? 'EUC-JP, UTF-8,' : 'UTF-8, EUC-JP,';
+ $query = mb_convert_encoding($query, _CHARSET, $order.' JIS, SJIS, ASCII');
+ if (is_numeric($blogid)) {
+ $blogid = intVal($blogid);
+ } else {
+ $blogid = getBlogIDFromName($blogid);
+ }
+
+ if (!$blogid) {
+ doError(_ERROR_NOSUCHBLOG);
+ }
+
+ } elseif ($memberid) {
+ $type = 'member';
+
+ if (!MEMBER::existsID($memberid) ) {
+ doError(_ERROR_NOSUCHMEMBER);
+ }
+
+ $memberinfo = $manager->getMember($memberid);
+
+ } elseif ($imagepopup) {
+ // media object (images etc.)
+ $type = 'imagepopup';
+
+ // TODO: check if media-object exists
+ // TODO: set some vars?
+ } else {
+ // show regular index page
+ global $startpos;
+ $type = 'index';
+ }
+
+ // decide which blog should be displayed
+ if (!$blogid) {
+ $blogid = $CONF['DefaultBlog'];
+ }
+
+ $b =& $manager->getBlog($blogid);
+ $blog = $b; // references can't be placed in global variables?
+
+ if (!$blog->isValid) {
+ doError(_ERROR_NOSUCHBLOG);
+ }
+
+ // set catid if necessary
+ if ($catid) {
+ $blog->setSelectedCategory($catid);
+ }
+
+ // decide which skin should be used
+ if ($skinid != '' && ($skinid == 0) ) {
+ selectSkin($skinid);
+ }
+
+ if (!$skinid) {
+ $skinid = $blog->getDefaultSkin();
+ }
+
+ $special = requestVar('special');
+ if (!empty($special) && isValidShortName($special)) {
+ $type = strtolower($special);
+ }
+
+ $skin = new SKIN($skinid);
+
+ if (!$skin->isValid) {
+ doError(_ERROR_NOSUCHSKIN);
+ }
+
+ // parse the skin
+ $skin->parse($type);
+}
+
+/**
+ * Show error skin with given message. An optional skin-object to use can be given
+ */
+function doError($msg, $skin = '') {
+ global $errormessage, $CONF, $skinid, $blogid, $manager;
+
+ if ($skin == '') {
+
+ if (SKIN::existsID($skinid) ) {
+ $skin = new SKIN($skinid);
+ } elseif ($manager->existsBlogID($blogid) ) {
+ $blog =& $manager->getBlog($blogid);
+ $skin = new SKIN($blog->getDefaultSkin() );
+ } elseif ($CONF['DefaultBlog']) {
+ $blog =& $manager->getBlog($CONF['DefaultBlog']);
+ $skin = new SKIN($blog->getDefaultSkin() );
+ } else {
+ // this statement should actually never be executed
+ $skin = new SKIN($CONF['BaseSkin']);
+ }
+
+ }
+
+ $errormessage = $msg;
+ $skin->parse('error');
+ exit;
+}
+
+function getConfig() {
+ global $CONF;
+
+ $query = 'SELECT * FROM ' . sql_table('config');
+ $res = sql_query($query);
+
+ while ($obj = mysql_fetch_object($res) ) {
+ $CONF[$obj->name] = $obj->value;
+ }
+}
+
+// some checks for names of blogs, categories, templates, members, ...
+function isValidShortName($name) {
+ return eregi('^[a-z0-9]+$', $name);
+}
+
+function isValidDisplayName($name) {
+ return eregi('^[a-z0-9]+[a-z0-9 ]*[a-z0-9]+$', $name);
+}
+
+function isValidCategoryName($name) {
+ return 1;
+}
+
+function isValidTemplateName($name) {
+ return eregi('^[a-z0-9/]+$', $name);
+}
+
+function isValidSkinName($name) {
+ return eregi('^[a-z0-9/]+$', $name);
+}
+
+// add and remove linebreaks
+function addBreaks($var) {
+ return nl2br($var);
+}
+
+function removeBreaks($var) {
+ return preg_replace("/<br \/>([\r\n])/", "$1", $var);
+}
+
+// shortens a text string to maxlength ($toadd) is what needs to be added
+// at the end (end length is <= $maxlength)
+function shorten($text, $maxlength, $toadd) {
+ // 1. remove entities...
+// $trans = get_html_translation_table(HTML_ENTITIES);
+ $trans = get_html_translation_table(HTML_SPECIALCHARS); // for Japanese
+ $trans = array_flip($trans);
+ $text = strtr($text, $trans);
+
+ // 2. the actual shortening
+ if (strlen($text) > $maxlength)
+ $text = mb_strimwidth($text, 0, $maxlength, $toadd, _CHARSET);
+ return $text;
+}
+
+/**
+ * Converts a unix timestamp to a mysql DATETIME format, and places
+ * quotes around it.
+ */
+function mysqldate($timestamp) {
+ return '"' . date('Y-m-d H:i:s', $timestamp) . '"';
+}
+
+/**
+ * functions for use in index.php
+ */
+function selectBlog($shortname) {
+ global $blogid, $archivelist;
+ $blogid = getBlogIDFromName($shortname);
+
+ // also force archivelist variable, if it is set
+ if ($archivelist) {
+ $archivelist = $blogid;
+ }
+}
+
+function selectSkin($skinname) {
+ global $skinid;
+ $skinid = SKIN::getIdFromName($skinname);
+}
+
+/**
+ * Can take either a category ID or a category name (be aware that
+ * multiple categories can have the same name)
+ */
+function selectCategory($cat) {
+ global $catid;
+ if (is_numeric($cat) ) {
+ $catid = intval($cat);
+ } else {
+ $catid = getCatIDFromName($cat);
+ }
+}
+
+function selectItem($id) {
+ global $itemid;
+ $itemid = intval($id);
+}
+
+// force the use of a language file (warning: can cause warnings)
+function selectLanguage($language) {
+ global $DIR_LANG;
+ include($DIR_LANG . ereg_replace( '[\\|/]', '', $language) . '.php');
+}
+
+function parseFile($filename, $includeMode = 'normal', $includePrefix = '') {
+ $handler = new ACTIONS('fileparser');
+ $parser = new PARSER(SKIN::getAllowedActionsForType('fileparser'), $handler);
+ $handler->parser =& $parser;
+
+ // set IncludeMode properties of parser
+ PARSER::setProperty('IncludeMode', $includeMode);
+ PARSER::setProperty('IncludePrefix', $includePrefix);
+
+ if (!file_exists($filename) ) {
+ doError('A file is missing');
+ }
+
+ $fsize = filesize($filename);
+
+ if ($fsize <= 0) {
+ return;
+ }
+
+ // read file
+ $fd = fopen ($filename, 'r');
+ $contents = fread ($fd, $fsize);
+ fclose ($fd);
+
+ // parse file contents
+ $parser->parse($contents);
+}
+
+/**
+ * Outputs a debug message
+ */
+function debug($msg) {
+ echo '<p><b>' . $msg . "</b></p>\n";
+}
+
+// shortcut
+function addToLog($level, $msg) {
+ ACTIONLOG::add($level, $msg);
+}
+
+// shows a link to help file
+function help($id) {
+ echo helpHtml($id);
+}
+
+function helpHtml($id) {
+ return helplink($id) . '<img src="documentation/icon-help.gif" width="15" height="15" alt="' . _HELP_TT . '" /></a>';
+}
+
+function helplink($id) {
+ return '<a href="documentation/help.html#'. $id . '" onclick="if (event && event.preventDefault) event.preventDefault(); return help(this.href);">';
+}
+
+function getMailFooter() {
+ $message = "\n\n-----------------------------";
+ $message .= "\n Powered by Nucleus CMS";
+ $message .= "\n(http://www.nucleuscms.org/)";
+ return $message;
+}
+
+/**
+ * Returns the name of the language to use
+ * preference priority: member - site
+ * defaults to english when no good language found
+ *
+ * checks if file exists, etc...
+ */
+function getLanguageName() {
+ global $CONF, $member;
+
+ if ($member && $member->isLoggedIn() ) {
+ // try to use members language
+ $memlang = $member->getLanguage();
+
+ if (($memlang != '') && (checkLanguage($memlang) ) ) {
+ return $memlang;
+ }
+ }
+
+ // use default language
+ if (checkLanguage($CONF['Language']) ) {
+ return $CONF['Language'];
+ } else {
+ return 'english';
+ }
+}
+
+/**
+ * Includes a PHP file. This method can be called while parsing templates and skins
+ */
+function includephp($filename) {
+ // make predefined variables global, so most simple scripts can be used here
+
+ // apache (names taken from PHP doc)
+ global $GATEWAY_INTERFACE, $SERVER_NAME, $SERVER_SOFTWARE, $SERVER_PROTOCOL;
+ global $REQUEST_METHOD, $QUERY_STRING, $DOCUMENT_ROOT, $HTTP_ACCEPT;
+ global $HTTP_ACCEPT_CHARSET, $HTTP_ACCEPT_ENCODING, $HTTP_ACCEPT_LANGUAGE;
+ global $HTTP_CONNECTION, $HTTP_HOST, $HTTP_REFERER, $HTTP_USER_AGENT;
+ global $REMOTE_ADDR, $REMOTE_PORT, $SCRIPT_FILENAME, $SERVER_ADMIN;
+ global $SERVER_PORT, $SERVER_SIGNATURE, $PATH_TRANSLATED, $SCRIPT_NAME;
+ global $REQUEST_URI;
+
+ // php (taken from PHP doc)
+ global $argv, $argc, $PHP_SELF, $HTTP_COOKIE_VARS, $HTTP_GET_VARS, $HTTP_POST_VARS;
+ global $HTTP_POST_FILES, $HTTP_ENV_VARS, $HTTP_SERVER_VARS, $HTTP_SESSION_VARS;
+
+ // other
+ global $PATH_INFO, $HTTPS, $HTTP_RAW_POST_DATA, $HTTP_X_FORWARDED_FOR;
+
+ if (@file_exists($filename) ) {
+ include($filename);
+ }
+}
+
+/**
+ * Checks if a certain language/plugin exists
+ */
+function checkLanguage($lang) {
+ global $DIR_LANG ;
+ return file_exists($DIR_LANG . ereg_replace( '[\\|/]', '', $lang) . '.php');
+}
+
+function checkPlugin($plug) {
+ global $DIR_PLUGINS;
+ return file_exists($DIR_PLUGINS . ereg_replace( '[\\|/]', '', $plug) . '.php');
+}
+
+/**
+ * Centralisation of the functions that generate links
+ */
+function createItemLink($itemid, $extra = '') {
+ return createLink('item', array('itemid' => $itemid, 'extra' => $extra) );
+}
+
+function createMemberLink($memberid, $extra = '') {
+ return createLink('member', array('memberid' => $memberid, 'extra' => $extra) );
+}
+
+function createCategoryLink($catid, $extra = '') {
+ return createLink('category', array('catid' => $catid, 'extra' => $extra) );
+}
+
+function createArchiveListLink($blogid = '', $extra = '') {
+ return createLink('archivelist', array('blogid' => $blogid, 'extra' => $extra) );
+}
+
+function createArchiveLink($blogid, $archive, $extra = '') {
+ return createLink('archive', array('blogid' => $blogid, 'archive' => $archive, 'extra' => $extra) );
+}
+
+function createBlogidLink($blogid, $params = '') {
+ return createLink('blog', array('blogid' => $blogid, 'extra' => $params) );
+}
+
+function createLink($type, $params) {
+ global $manager, $CONF;
+
+ $generatedURL = '';
+ $usePathInfo = ($CONF['URLMode'] == 'pathinfo');
+
+ // ask plugins first
+ $created = false;
+
+ if ($usePathInfo) {
+ $manager->notify(
+ 'GenerateURL',
+ array(
+ 'type' => $type,
+ 'params' => $params,
+ 'completed' => &$created,
+ 'url' => &$url
+ )
+ );
+ }
+
+ // if a plugin created the URL, return it
+ if ($created) {
+ return $url;
+ }
+
+ // default implementation
+ switch ($type) {
+ case 'item':
+ if ($usePathInfo) {
+ $url = $CONF['ItemURL'] . '/' . $CONF['ItemKey'] . '/' . $params['itemid'];
+ } else {
+ $url = $CONF['ItemURL'] . '?itemid=' . $params['itemid'];
+ }
+ break;
+
+ case 'member':
+ if ($usePathInfo) {
+ $url = $CONF['MemberURL'] . '/' . $CONF['MemberKey'] . '/' . $params['memberid'];
+ } else {
+ $url = $CONF['MemberURL'] . '?memberid=' . $params['memberid'];
+ }
+ break;
+
+ case 'category':
+ if ($usePathInfo) {
+ $url = $CONF['CategoryURL'] . '/' . $CONF['CategoryKey'] . '/' . $params['catid'];
+ } else {
+ $url = $CONF['CategoryURL'] . '?catid=' . $params['catid'];
+ }
+ break;
+
+ case 'archivelist':
+ if (!$params['blogid']) {
+ $params['blogid'] = $CONF['DefaultBlog'];
+ }
+
+ if ($usePathInfo) {
+ $url = $CONF['ArchiveListURL'] . '/' . $CONF['ArchivesKey'] . '/' . $params['blogid'];
+ } else {
+ $url = $CONF['ArchiveListURL'] . '?archivelist=' . $params['blogid'];
+ }
+ break;
+
+ case 'archive':
+ if ($usePathInfo) {
+ $url = $CONF['ArchiveURL'] . '/' . $CONF['ArchiveKey'] . '/'.$params['blogid'].'/' . $params['archive'];
+ } else {
+ $url = $CONF['ArchiveURL'] . '?blogid='.$params['blogid'].'&archive=' . $params['archive'];
+ }
+ break;
+
+ case 'blog':
+ if ($usePathInfo) {
+ $url = $CONF['BlogURL'] . '/' . $CONF['BlogKey'] . '/' . $params['blogid'];
+ } else {
+ $url = $CONF['BlogURL'] . '?blogid=' . $params['blogid'];
+ }
+ break;
+ }
+
+ return addLinkParams($url, (isset($params['extra'])? $params['extra'] : null));
+}
+
+function createBlogLink($url, $params) {
+ global $CONF;
+ if ($CONF['URLMode'] == 'normal') {
+ if (strpos($url, '?') === FALSE && is_array($params)) {
+ $fParam = reset($params);
+ $fKey = key($params);
+ array_shift($params);
+ $url .= '?' . $fKey . '=' . $fParam;
+ }
+ } elseif ($CONF['URLMode'] == 'pathinfo' && substr($url, -1) == '/') {
+ $url = substr($url, 0, -1);
+ }
+ return addLinkParams($url, $params);
+}
+
+function addLinkParams($link, $params) {
+ global $CONF;
+
+ if (is_array($params) ) {
+
+ if ($CONF['URLMode'] == 'pathinfo') {
+
+ foreach ($params as $param => $value) {
+ $link .= '/' . $param . '/' . urlencode($value);
+ }
+
+ } else {
+
+ foreach ($params as $param => $value) {
+ $link .= '&' . $param . '=' . urlencode($value);
+ }
+
+ }
+ }
+
+ return $link;
+}
+
+/**
+ * @param $querystr
+ * querystring to alter (e.g. foo=1&bar=2&x=y)
+ * @param $param
+ * name of parameter to change (e.g. 'foo')
+ * @param $value
+ * New value for that parameter (e.g. 3)
+ * @result
+ * altered query string (for the examples above: foo=3&bar=2&x=y)
+ */
+function alterQueryStr($querystr, $param, $value) {
+ $vars = explode('&', $querystr);
+ $set = false;
+
+ for ($i = 0; $i < count($vars); $i++) {
+ $v = explode('=', $vars[$i]);
+
+ if ($v[0] == $param) {
+ $v[1] = $value;
+ $vars[$i] = implode('=', $v);
+ $set = true;
+ break;
+ }
+ }
+
+ if (!$set) {
+ $vars[] = $param . '=' . $value;
+ }
+
+ return ltrim(implode('&', $vars), '&');
+}
+
+// passes one variable as hidden input field (multiple fields for arrays)
+// @see passRequestVars in varsx.x.x.php
+function passVar($key, $value) {
+ // array ?
+ if (is_array($value) ) {
+ for ($i = 0; $i < sizeof($value); $i++) {
+ passVar($key . '[' . $i . ']', $value[$i]);
+ }
+
+ return;
+ }
+
+ // other values: do stripslashes if needed
+ ?><input type="hidden" name="<?php echo htmlspecialchars($key)?>" value="<?php echo htmlspecialchars(undoMagic($value) )?>" /><?php
+}
+
+/*
+ Date format functions (to be used from [%date(..)%] skinvars
+*/
+function formatDate($format, $timestamp, $defaultFormat, &$blog) {
+ // apply blog offset (#42)
+ $boffset = $blog ? $blog->getTimeOffset() * 3600 : 0;
+ $offset = date('Z', $timestamp) + $boffset;
+
+ switch ($format) {
+ case 'rfc822':
+ if ($offset >= 0) {
+ $tz = '+';
+ } else {
+ $tz = '-';
+ $offset = -$offset;
+ }
+
+ $tz .= sprintf("%02d%02d", floor($offset / 3600), round(($offset % 3600) / 60) );
+ return date('D, j M Y H:i:s ', $timestamp) . $tz;
+
+ case 'rfc822GMT':
+ $timestamp -= $offset;
+ return date('D, j M Y H:i:s ', $timestamp) . 'GMT';
+
+ case 'utc':
+ $timestamp -= $offset;
+ return date('Y-m-d\TH:i:s\Z', $timestamp);
+
+ case 'iso8601':
+ if ($offset >= 0) {
+ $tz = '+';
+ } else {
+ $tz = '-';
+ $offset = -$offset;
+ }
+
+ $tz .= sprintf("%02d:%02d", floor($offset / 3600), round(($offset % 3600) / 60) );
+ return date('Y-m-d\TH:i:s', $timestamp) . $tz;
+
+ default :
+ return strftime($format ? $format : $defaultFormat, $timestamp);
+ }
+}
+
+function checkVars($aVars) {
+ global $HTTP_GET_VARS, $HTTP_POST_VARS, $HTTP_COOKIE_VARS, $HTTP_ENV_VARS, $HTTP_POST_FILES, $HTTP_SESSION_VARS;
+
+ foreach ($aVars as $varName) {
+
+ if (phpversion() >= '4.1.0') {
+
+ if ( isset($_GET[$varName])
+ || isset($_POST[$varName])
+ || isset($_COOKIE[$varName])
+ || isset($_ENV[$varName])
+ || isset($_SESSION[$varName])
+ || isset($_FILES[$varName])
+ ) {
+ die('Sorry. An error occurred.');
+ }
+
+ } else {
+
+ if ( isset($HTTP_GET_VARS[$varName])
+ || isset($HTTP_POST_VARS[$varName])
+ || isset($HTTP_COOKIE_VARS[$varName])
+ || isset($HTTP_ENV_VARS[$varName])
+ || isset($HTTP_SESSION_VARS[$varName])
+ || isset($HTTP_POST_FILES[$varName])
+ ) {
+ die('Sorry. An error occurred.');
+ }
+
+ }
+ }
+}
+
+
+/**
+ * Sanitize parameters such as $_GET and $_SERVER['REQUEST_URI'] etc.
+ * to avoid XSS
+ */
+function sanitizeParams()
+{
+ global $HTTP_SERVER_VARS;
+
+ $array = array();
+ $str = '';
+ $frontParam = '';
+
+ // REQUEST_URI of $HTTP_SERVER_VARS
+ $str =& $HTTP_SERVER_VARS["REQUEST_URI"];
+ serverStringToArray($str, $array, $frontParam);
+ sanitizeArray($array);
+ arrayToServerString($array, $frontParam, $str);
+
+ // QUERY_STRING of $HTTP_SERVER_VARS
+ $str =& $HTTP_SERVER_VARS["QUERY_STRING"];
+ serverStringToArray($str, $array, $frontParam);
+ sanitizeArray($array);
+ arrayToServerString($array, $frontParam, $str);
+
+ if (phpversion() >= '4.1.0') {
+ // REQUEST_URI of $_SERVER
+ $str =& $_SERVER["REQUEST_URI"];
+ serverStringToArray($str, $array, $frontParam);
+ sanitizeArray($array);
+ arrayToServerString($array, $frontParam, $str);
+
+ // QUERY_STRING of $_SERVER
+ $str =& $_SERVER["QUERY_STRING"];
+ serverStringToArray($str, $array, $frontParam);
+ sanitizeArray($array);
+ arrayToServerString($array, $frontParam, $str);
+ }
+
+ // $_GET
+ convArrayForSanitizing($_GET, $array);
+ sanitizeArray($array);
+ revertArrayForSanitizing($array, $_GET);
+
+ // $_REQUEST (only GET param)
+ convArrayForSanitizing($_REQUEST, $array);
+ sanitizeArray($array);
+ revertArrayForSanitizing($array, $_REQUEST);
+}
+
+/**
+ * Check ticket when not checked in plugin's admin page
+ * to avoid CSRF.
+ * Also avoid the access to plugin/index.php by guest user.
+ */
+function ticketForPlugin(){
+ global $CONF,$DIR_PLUGINS,$member,$ticketforplugin;
+
+ /* initialize */
+ $ticketforplugin=array();
+ $ticketforplugin['ticket']=false;
+
+ /* Check if using plugin's php file. */
+ if ($p_translated=serverVar('PATH_TRANSLATED')) {
+ if (!file_exists($p_translated)) $p_translated='';
+ }
+ if (!$p_translated) {
+ $p_translated=serverVar('SCRIPT_FILENAME');
+ if (!file_exists($p_translated)) {
+ header("HTTP/1.0 404 Not Found");
+ exit('');
+ }
+ }
+ $p_translated=str_replace('\\','/',$p_translated);
+ $d_plugins=str_replace('\\','/',$DIR_PLUGINS);
+ if (strpos($p_translated,$d_plugins)!==0) return;// This isn't plugin php file.
+
+ /* Solve the plugin php file or admin directory */
+ $phppath=substr($p_translated,strlen($d_plugins));
+ $phppath=preg_replace('!^/!','',$phppath);// Remove the first "/" if exists.
+ $path=preg_replace('/^NP_(.*)\.php$/','$1',$phppath); // Remove the first "NP_" and the last ".php" if exists.
+ $path=preg_replace('!^([^/]*)/(.*)$!','$1',$path); // Remove the "/" and beyond.
+
+ /* Solve the plugin name. */
+ $plugins=array();
+ $query='SELECT pfile FROM '.sql_table('plugin');
+ $res=sql_query($query);
+ while($row=mysql_fetch_row($res)) {
+ $name=substr($row[0],3);
+ $plugins[strtolower($name)]=$name;
+ }
+ mysql_free_result($res);
+ if ($plugins[$path]) $plugin_name=$plugins[$path];
+ else if (in_array($path,$plugins)) $plugin_name=$path;
+ else {
+ header("HTTP/1.0 404 Not Found");
+ exit('');
+ }
+
+ /* Return if not index.php */
+ if ( $phppath!=strtolower($plugin_name).'/'
+ && $phppath!=strtolower($plugin_name).'/index.php' ) return;
+
+ /* Exit if not logged in. */
+ if ( !$member->isLoggedIn() ) exit("You aren't logged in.");
+
+ global $manager,$DIR_LIBS,$DIR_LANG,$HTTP_GET_VARS,$HTTP_POST_VARS;
+
+ /* Check if this feature is needed (ie, if "$manager->checkTicket()" is not included in the script). */
+ if (!($p_translated=serverVar('PATH_TRANSLATED'))) $p_translated=serverVar('SCRIPT_FILENAME');
+ if ($file=@file($p_translated)) {
+ $prevline='';
+ foreach($file as $line) {
+ if (preg_match('/[\$]manager([\s]*)[\-]>([\s]*)checkTicket([\s]*)[\(]/i',$prevline.$line)) return;
+ $prevline=$line;
+ }
+ }
+
+ /* Show a form if not valid ticket */
+ if ( ( strstr(serverVar('REQUEST_URI'),'?') || serverVar('QUERY_STRING')
+ || strtoupper(serverVar('REQUEST_METHOD'))=='POST' )
+ && (!$manager->checkTicket()) ){
+
+ if (!class_exists('PluginAdmin')) {
+ $language = getLanguageName();
+ include($DIR_LANG . ereg_replace( '[\\|/]', '', $language) . '.php');
+ include($DIR_LIBS . 'PLUGINADMIN.php');
+ }
+ if (!(function_exists('mb_strimwidth') || extension_loaded('mbstring'))) {
+ if (file_exists($DIR_LIBS.'mb_emulator/mb-emulator.php')) {
+ global $mbemu_internals;
+ include_once($DIR_LIBS.'mb_emulator/mb-emulator.php');
+ }
+ }
+ $oPluginAdmin = new PluginAdmin($plugin_name);
+ $oPluginAdmin->start();
+ echo '<p>' . _ERROR_BADTICKET . "</p>\n";
+
+ /* Show the form to confirm action */
+ // PHP 4.0.x support
+ $get= (isset($_GET)) ? $_GET : $HTTP_GET_VARS;
+ $post= (isset($_POST)) ? $_POST : $HTTP_POST_VARS;
+ // Resolve URI and QUERY_STRING
+ if ($uri=serverVar('REQUEST_URI')) {
+ list($uri,$qstring)=explode('?',$uri);
+ } else {
+ if ( !($uri=serverVar('PHP_SELF')) ) $uri=serverVar('SCRIPT_NAME');
+ $qstring=serverVar('QUERY_STRING');
+ }
+ if ($qstring) $qstring='?'.$qstring;
+ echo '<p>'._SETTINGS_UPDATE.' : '._QMENU_PLUGINS.' <span style="color:red;">'.
+ htmlspecialchars($plugin_name)."</span> ?</p>\n";
+ switch(strtoupper(serverVar('REQUEST_METHOD'))){
+ case 'POST':
+ echo '<form method="POST" action="'.htmlspecialchars($uri.$qstring).'">';
+ $manager->addTicketHidden();
+ _addInputTags($post);
+ break;
+ case 'GET':
+ echo '<form method="GET" action="'.htmlspecialchars($uri).'">';
+ $manager->addTicketHidden();
+ _addInputTags($get);
+ default:
+ break;
+ }
+ echo '<input type="submit" value="'._YES.'" /> ';
+ echo '<input type="button" value="'._NO.'" onclick="history.back(); return false;" />';
+ echo "</form>\n";
+
+ $oPluginAdmin->end();
+ exit;
+ }
+
+ /* Create new ticket */
+ $ticket=$manager->addTicketToUrl('');
+ $ticketforplugin['ticket']=substr($ticket,strpos($ticket,'ticket=')+7);
+}
+function _addInputTags(&$keys,$prefix=''){
+ foreach($keys as $key=>$value){
+ if ($prefix) $key=$prefix.'['.$key.']';
+ if (is_array($value)) _addInputTags($value,$key);
+ else {
+ if (get_magic_quotes_gpc()) $value=stripslashes($value);
+ if ($key=='ticket') continue;
+ echo '<input type="hidden" name="'.htmlspecialchars($key).
+ '" value="'.htmlspecialchars($value).'" />'."\n";
+ }
+ }
+}
+
+/**
+ * Convert the server string such as $_SERVER['REQUEST_URI']
+ * to arry like arry['blogid']=1 and array['page']=2 etc.
+ */
+function serverStringToArray($str, &$array, &$frontParam)
+{
+ // init param
+ $array = array();
+ $fronParam = "";
+
+ // split front param, e.g. /index.php, and others, e.g. blogid=1&page=2
+ if (strstr($str, "?")){
+ list($frontParam, $args) = preg_split("/\?/", $str, 2);
+ }
+ else {
+ $args = $str;
+ $frontParam = "";
+ }
+
+ // If there is no args like blogid=1&page=2, return
+ if (!strstr($str, "=") && !strlen($frontParam)) {
+ $frontParam = $str;
+ return;
+ }
+
+ $array = explode("&", $args);
+}
+
+/**
+ * Convert array like array['blogid'] to server string
+ * such as $_SERVER['REQUEST_URI']
+ */
+function arrayToServerString($array, $frontParam, &$str)
+{
+ if (strstr($str, "?")) {
+ $str = $frontParam . "?";
+ } else {
+ $str = $frontParam;
+ }
+ if (count($array)) {
+ $str .= implode("&", $array);
+ }
+}
+
+/**
+ * Sanitize array parameters.
+ * This function checks both key and value.
+ * - check key if it inclues " (double quote), remove from array
+ * - check value if it includes \ (escape sequece), remove remaining string
+ */
+function sanitizeArray(&$array)
+{
+ $excludeListForSanitization = array('query');
+// $excludeListForSanitization = array();
+
+ foreach ($array as $k => $v) {
+
+ // split to key and value
+ list($key, $val) = preg_split("/=/", $v, 2);
+ if (!isset($val)) {
+ continue;
+ }
+
+ // when magic quotes is on, need to use stripslashes,
+ // and then addslashes
+ if (get_magic_quotes_gpc()) {
+ $val = stripslashes($val);
+ }
+ $val = addslashes($val);
+
+ // if $key is included in exclude list, skip this param
+ if (!in_array($key, $excludeListForSanitization)) {
+
+ // check value
+ list($val, $tmp) = explode('\\', $val);
+
+ // remove control code etc.
+ $val = strtr($val, "\0\r\n<>'\"", " ");
+
+ // check key
+ if (preg_match('/\"/i', $key)) {
+ unset($array[$k]);
+ continue;
+ }
+
+ // set sanitized info
+ $array[$k] = sprintf("%s=%s", $key, $val);
+ }
+ }
+}
+
+/**
+ * Convert array for sanitizeArray function
+ */
+function convArrayForSanitizing($src, &$array)
+{
+ $array = array();
+ foreach ($src as $key => $val) {
+ if (key_exists($key, $_GET)) {
+ array_push($array, sprintf("%s=%s", $key, $val));
+ }
+ }
+}
+
+/**
+ * Revert array after sanitizeArray function
+ */
+function revertArrayForSanitizing($array, &$dst)
+{
+ foreach ($array as $v) {
+ list($key, $val) = preg_split("/=/", $v, 2);
+ $dst[$key] = $val;
+ }
+}
+
+/**
+ * Stops processing the request and redirects to the given URL.
+ * - no actual contents should have been sent to the output yet
+ * - the URL will be stripped of illegal or dangerous characters
+ */
+function redirect($url) {
+ $url = preg_replace('|[^a-z0-9-~+_.?#=&;,/:@%]|i', '', $url);
+ header('Location: ' . $url);
+ exit;
+}
+
+/**
+ * Strip HTML tags from a string
+ * This function is a bit more intelligent than a regular call to strip_tags(),
+ * because it also deletes the contents of certain tags and cleans up any
+ * unneeded whitespace.
+ */
+function stringStripTags ($string) {
+ $string = preg_replace("/<del[^>]*>.+<\/del[^>]*>/isU", '', $string);
+ $string = preg_replace("/<script[^>]*>.+<\/script[^>]*>/isU", '', $string);
+ $string = preg_replace("/<style[^>]*>.+<\/style[^>]*>/isU", '', $string);
+ $string = str_replace('>', '> ', $string);
+ $string = str_replace('<', ' <', $string);
+ $string = strip_tags($string);
+ $string = preg_replace("/\s+/", " ", $string);
+ $string = trim($string);
+ return $string;
+}
+
+/**
+ * Make a string containing HTML safe for use in a HTML attribute
+ * Tags are stripped and entities are normalized
+ */
+function stringToAttribute ($string) {
+ $string = stringStripTags($string);
+ $string = entity::named_to_numeric($string);
+ $string = entity::normalize_numeric($string);
+
+ if (_CHARSET == 'UTF-8') {
+ $string = entity::numeric_to_utf8($string);
+ }
+
+ $string = entity::specialchars($string, 'html');
+ $string = entity::numeric_to_named($string);
+ return $string;
+}
+
+/**
+ * Make a string containing HTML safe for use in a XML document
+ * Tags are stripped, entities are normalized and named entities are
+ * converted to numeric entities.
+ */
+function stringToXML ($string) {
+ $string = stringStripTags($string);
+ $string = entity::named_to_numeric($string);
+ $string = entity::normalize_numeric($string);
+
+ if (_CHARSET == 'UTF-8') {
+ $string = entity::numeric_to_utf8($string);
+ }
+
+ $string = entity::specialchars($string, 'xml');
+ return $string;
+}
+
+// START: functions from the end of file BLOG.php
+// used for mail notification (html -> text)
+function toAscii($html) {
+ // strip off most tags
+ $html = strip_tags($html,'<a>');
+ $to_replace = "/<a[^>]*href=[\"\']([^\"^']*)[\"\'][^>]*>([^<]*)<\/a>/i";
+ _links_init();
+ $ascii = preg_replace_callback ($to_replace, '_links_add', $html);
+ $ascii .= "\n\n" . _links_list();
+ return strip_tags($ascii);
+}
+
+function _links_init() {
+ global $tmp_links;
+ $tmp_links = array();
+}
+
+function _links_add($match) {
+ global $tmp_links;
+ array_push($tmp_links, $match[1]);
+ return $match[2] . ' [' . sizeof($tmp_links) .']';
+}
+
+function _links_list() {
+ global $tmp_links;
+ $output = '';
+ $i = 1;
+ foreach ($tmp_links as $current) {
+ $output .= "[$i] $current\n";
+ $i++;
+ }
+ return $output;
+}
+// END: functions from the end of file BLOG.php
+
+// START: functions from the end of file ADMIN.php
+/**
+ * @todo document this
+ */
+function encode_desc(&$data)
+ { //_$to_entities = get_html_translation_table(HTML_ENTITIES);
+ $to_entities = get_html_translation_table(HTML_SPECIALCHARS);
+ $from_entities = array_flip($to_entities);
+ $data = str_replace('<br />','\n',$data); //hack
+ $data = strtr($data,$from_entities);
+ $data = strtr($data,$to_entities);
+ $data = str_replace('\n','<br />',$data); //hack
+ return $data;
+ }
+
+/**
+ * Returns the Javascript code for a bookmarklet that works on most modern browsers
+ *
+ * @param blogid
+ */
+function getBookmarklet($blogid) {
+ global $CONF;
+
+ // normal
+ $document = 'document';
+ $bookmarkletline = "javascript:Q='';x=".$document.";y=window;if(x.selection){Q=x.selection.createRange().text;}else if(y.getSelection){Q=y.getSelection();}else if(x.getSelection){Q=x.getSelection();}wingm=window.open('";
+ $bookmarkletline .= $CONF['AdminURL'] . "bookmarklet.php?blogid=$blogid";
+ $bookmarkletline .="&logtext='+escape(Q)+'&loglink='+escape(x.location.href)+'&loglinktitle='+escape(x.title),'nucleusbm','scrollbars=yes,width=600,height=500,left=10,top=10,status=yes,resizable=yes');wingm.focus();";
+
+ return $bookmarkletline;
+}
+// END: functions from the end of file ADMIN.php
+
+/**
+ * Returns a variable or null if not set
+ *
+ * @param mixed Variable
+ * @return mixed Variable
+ */
+function ifset(&$var) {
+ if (isset($var)) {
+ return $var;
+ }
+
+ return null;
+}
+
+?>
\ No newline at end of file