| 1 |
djmaze |
1.1 |
<?php |
| 2 |
djmaze |
1.1 |
/********************************************* |
| 3 |
djmaze |
1.1 |
CPG-NUKE: Advanced Content Management System |
| 4 |
djmaze |
1.1 |
******************************************** |
| 5 |
djmaze |
1.1 |
Copyright (c) 2004 by CPG-Nuke Dev Team |
| 6 |
djmaze |
1.1 |
http://www.cpgnuke.com |
| 7 |
djmaze |
1.1 |
  |
| 8 |
djmaze |
1.1 |
CPG-Nuke is released under the terms and conditions |
| 9 |
djmaze |
1.16 |
of the CPG Open Source License Agreement version 1 |
| 10 |
djmaze |
1.1 |
  |
| 11 |
djmaze |
1.1 |
Last modification notes: |
| 12 |
djmaze |
1.17 |
$Source: /cvs/html/includes/cmsinit.inc,v $ |
| 13 |
djmaze |
1.21 |
$Revision: 1.20 $ |
| 14 |
djmaze |
1.16 |
$Author: djmaze $ |
| 15 |
djmaze |
1.21 |
$Date: 2004/09/16 02:08:58 $ |
| 16 |
djmaze |
1.1 |
  |
| 17 |
djmaze |
1.16 |
***********************************************************************/ |
| 18 |
djmaze |
1.1 |
set_magic_quotes_runtime(0); // Disable magic_quotes_runtime |
| 19 |
djmaze |
1.20 |
$phpver = explode('.', phpversion()); |
| 20 |
djmaze |
1.20 |
if ($phpver[0] < 5) { |
| 21 |
djmaze |
1.20 |
define('E_STRICT', 2048); |
| 22 |
djmaze |
1.20 |
} |
| 23 |
djmaze |
1.20 |
$phpver = "$phpver[0]$phpver[1]"; |
| 24 |
djmaze |
1.20 |
// we define our own error handler |
| 25 |
djmaze |
1.20 |
error_reporting(0); |
| 26 |
djmaze |
1.20 |
$old_error_handler = set_error_handler('CPG_ErrorHandler'); |
| 27 |
djmaze |
1.1 |
  |
| 28 |
djmaze |
1.1 |
// Disable DOS Attacks |
| 29 |
djmaze |
1.1 |
if (($_SERVER['HTTP_USER_AGENT'] == '' || $_SERVER['HTTP_USER_AGENT'] == '-') && !defined('XMLFEED')) { |
| 30 |
djmaze |
1.1 |
exit; |
| 31 |
djmaze |
1.1 |
} |
| 32 |
djmaze |
1.1 |
  |
| 33 |
djmaze |
1.1 |
// Compress output if server/php config allows |
| 34 |
djmaze |
1.1 |
$do_gzip_compress = false; |
| 35 |
djmaze |
1.1 |
$do_zlib_compress = false; |
| 36 |
djmaze |
1.1 |
  |
| 37 |
djmaze |
1.1 |
if (extension_loaded('zlib')) { |
| 38 |
djmaze |
1.1 |
if (isset($_SERVER['HTTP_ACCEPT_ENCODING']) && eregi('gzip', $_SERVER['HTTP_ACCEPT_ENCODING'])) { |
| 39 |
djmaze |
1.1 |
if ($phpver >= 43) { // PHP 4.2.x seems to give memleak |
| 40 |
djmaze |
1.1 |
ob_start('ob_gzhandler'); |
| 41 |
djmaze |
1.1 |
} |
| 42 |
djmaze |
1.1 |
else if ($phpver > 40) { |
| 43 |
djmaze |
1.1 |
$do_gzip_compress = true; |
| 44 |
djmaze |
1.1 |
ob_start(); |
| 45 |
djmaze |
1.1 |
ob_implicit_flush(0); |
| 46 |
djmaze |
1.1 |
header('Content-Encoding: gzip'); |
| 47 |
djmaze |
1.1 |
} |
| 48 |
djmaze |
1.1 |
} else { |
| 49 |
djmaze |
1.1 |
// Some stupid firewalls don't send the HTTP_ACCEPT_ENCODING |
| 50 |
djmaze |
1.1 |
// So we still compress in memory for fast page generations |
| 51 |
djmaze |
1.1 |
// But it will take longer for the visitor to see the page. |
| 52 |
djmaze |
1.1 |
$do_zlib_compress = true; |
| 53 |
djmaze |
1.1 |
ob_start(); |
| 54 |
djmaze |
1.1 |
ob_implicit_flush(0); |
| 55 |
djmaze |
1.1 |
} |
| 56 |
djmaze |
1.1 |
} |
| 57 |
djmaze |
1.1 |
  |
| 58 |
djmaze |
1.1 |
if ($phpver >= 41) { |
| 59 |
djmaze |
1.1 |
$PHP_SELF = $_SERVER['PHP_SELF']; |
| 60 |
djmaze |
1.1 |
} |
| 61 |
djmaze |
1.1 |
// Import GET/POST/Cookie variables into the global scope |
| 62 |
djmaze |
1.1 |
//if (!ini_get("register_globals")) { |
| 63 |
djmaze |
1.20 |
if (intval(ini_get('register_globals')) == 0) { |
| 64 |
djmaze |
1.21 |
import_request_variables('GPC'); |
| 65 |
djmaze |
1.1 |
} |
| 66 |
djmaze |
1.20 |
//error_reporting(E_ALL); |
| 67 |
djmaze |
1.1 |
// unset any vars set from globals |
| 68 |
djmaze |
1.1 |
$phpEx = 'php'; |
| 69 |
djmaze |
1.19 |
$pagetitle = $modheader = $adminmenuitems = $adminmail = ''; |
| 70 |
djmaze |
1.1 |
$showblocks = 1; |
| 71 |
djmaze |
1.1 |
// useless vars but still here to prevent "notice" messages |
| 72 |
djmaze |
1.1 |
$user = $admin = $cookie = ''; |
| 73 |
djmaze |
1.1 |
  |
| 74 |
djmaze |
1.1 |
if (!isset($file)) $file = NULL; |
| 75 |
djmaze |
1.1 |
if (!isset($name)) $name = NULL; |
| 76 |
djmaze |
1.1 |
  |
| 77 |
djmaze |
1.1 |
list($usec, $sec) = explode(' ', microtime()); |
| 78 |
djmaze |
1.1 |
$start_time = ($usec + $sec); |
| 79 |
djmaze |
1.1 |
if (!defined('CPG_NUKE')) define('CPG_NUKE', true); |
| 80 |
djmaze |
1.1 |
  |
| 81 |
trevor |
1.8 |
// stops the page creation and shows an error page |
| 82 |
djmaze |
1.1 |
function nuke_error($message, $title='ERROR', $redirect='') { |
| 83 |
djmaze |
1.1 |
cpg_error($message, $title, $redirect); |
| 84 |
djmaze |
1.1 |
} |
| 85 |
djmaze |
1.1 |
function cpg_error($message, $title='ERROR', $redirect='') { |
| 86 |
djmaze |
1.1 |
global $userinfo, $SESS; |
| 87 |
djmaze |
1.1 |
if ($redirect) { header('Refresh: 3; url='.$redirect); } |
| 88 |
djmaze |
1.1 |
if (defined('THEME_USES_TPL')) { |
| 89 |
djmaze |
1.1 |
global $pagetitle, $showblocks, $home; |
| 90 |
djmaze |
1.1 |
$home = $showblocks = 0; |
| 91 |
djmaze |
1.1 |
$pagetitle = $title; |
| 92 |
djmaze |
1.1 |
require_once('header.php'); |
| 93 |
djmaze |
1.1 |
OpenTable(); |
| 94 |
djmaze |
1.1 |
echo '<center>'.$message.'<br /><br />'._GOBACK.'</center>'; |
| 95 |
djmaze |
1.1 |
CloseTable(); |
| 96 |
djmaze |
1.1 |
require_once('footer.php'); |
| 97 |
djmaze |
1.1 |
} else { |
| 98 |
djmaze |
1.1 |
require_once('includes/cpg_page.php'); |
| 99 |
djmaze |
1.1 |
$errorpage = cpg_header($title); |
| 100 |
djmaze |
1.1 |
$errorpage .= "<center>$message</center>"; |
| 101 |
djmaze |
1.1 |
$errorpage .= cpg_footer(); |
| 102 |
djmaze |
1.1 |
if (isset($SESS)) $SESS->write_close(); |
| 103 |
djmaze |
1.1 |
die($errorpage); |
| 104 |
djmaze |
1.1 |
} |
| 105 |
djmaze |
1.1 |
} |
| 106 |
djmaze |
1.1 |
  |
| 107 |
djmaze |
1.1 |
// include database connection, sql abstraction layer and globally used functions |
| 108 |
djmaze |
1.1 |
require_once('config.php'); |
| 109 |
djmaze |
1.20 |
//if (!CPG_DEBUG && !defined('INSTALL')) { error_reporting(E_ALL ^ E_NOTICE); } |
| 110 |
djmaze |
1.1 |
require_once('db/db.php'); |
| 111 |
djmaze |
1.1 |
require_once('includes/classes/session.php'); |
| 112 |
djmaze |
1.1 |
require_once('includes/functions/display.php'); |
| 113 |
djmaze |
1.1 |
require_once('includes/functions/linking.php'); |
| 114 |
djmaze |
1.1 |
require_once('includes/classes/template.php'); |
| 115 |
djmaze |
1.1 |
require_once('includes/classes/cpg_member.php'); |
| 116 |
djmaze |
1.1 |
if (defined('INSTALL')) return; |
| 117 |
djmaze |
1.1 |
  |
| 118 |
djmaze |
1.1 |
if ($file != 'posting' && $name != 'Forums') { |
| 119 |
djmaze |
1.1 |
foreach ($_POST as $secvalue) { |
| 120 |
djmaze |
1.1 |
if (eregi("<[^>]*script *\"?[^>]*>", $secvalue)) { |
| 121 |
trevor |
1.13 |
cpg_error('<strong>The characters that you tried to include in your html request are forbidden...</strong>', 'Security Error'); |
| 122 |
djmaze |
1.1 |
} |
| 123 |
djmaze |
1.1 |
} |
| 124 |
djmaze |
1.1 |
} |
| 125 |
djmaze |
1.1 |
  |
| 126 |
djmaze |
1.4 |
if (!load_cfg('MAIN_CFG')) { |
| 127 |
djmaze |
1.1 |
if (!($result = $db->sql_query('SELECT * FROM '.$prefix.'_config_custom', true))) { |
| 128 |
djmaze |
1.1 |
url_redirect('install.php'); |
| 129 |
djmaze |
1.1 |
} |
| 130 |
djmaze |
1.1 |
while ($row = $db->sql_fetchrow($result)) { |
| 131 |
djmaze |
1.1 |
$MAIN_CFG[$row['cfg_name']][$row['cfg_field']] = $row['cfg_value']; |
| 132 |
djmaze |
1.1 |
} |
| 133 |
djmaze |
1.1 |
save_cfg('MAIN_CFG'); |
| 134 |
djmaze |
1.1 |
$db->sql_freeresult($result); |
| 135 |
djmaze |
1.4 |
} |
| 136 |
djmaze |
1.5 |
if (!extension_loaded('gd')) { $MAIN_CFG['global']['gfx_chk'] = 0; } |
| 137 |
djmaze |
1.15 |
if (substr($MAIN_CFG['global']['nukeurl'], -1) == '/') { $MAIN_CFG['global']['nukeurl'] = substr($MAIN_CFG['global']['nukeurl'], 0, -1); } |
| 138 |
djmaze |
1.5 |
if (substr($MAIN_CFG['server']['path'], -1) != '/') $MAIN_CFG['server']['path'] .= '/'; |
| 139 |
djmaze |
1.5 |
if ($MAIN_CFG['server']['path'][0] != '/') $MAIN_CFG['server']['path'] = '/'.$MAIN_CFG['server']['path']; |
| 140 |
djmaze |
1.5 |
  |
| 141 |
djmaze |
1.1 |
if ($phpver >= 43) { // version_compare() |
| 142 |
djmaze |
1.1 |
extract($MAIN_CFG['global'], EXTR_OVERWRITE | EXTR_REFS); |
| 143 |
djmaze |
1.1 |
} else { |
| 144 |
djmaze |
1.1 |
extract($MAIN_CFG['global'], EXTR_OVERWRITE); |
| 145 |
djmaze |
1.1 |
} |
| 146 |
djmaze |
1.1 |
  |
| 147 |
djmaze |
1.1 |
if (defined('XMLFEED')) return; // no need to load everything if it's a feed |
| 148 |
djmaze |
1.1 |
  |
| 149 |
djmaze |
1.6 |
global $CPG_SESS; |
| 150 |
djmaze |
1.6 |
$SESS =& new cpg_session(); |
| 151 |
djmaze |
1.1 |
if (isset($_GET['name']) && ($_GET['name'] == 'gfx' || (isset($_GET['op']) && $_GET['name'] == 'Your_Account' && $_GET['op'] == 'gfx')) && isset($random_num)) { |
| 152 |
djmaze |
1.1 |
require('includes/gfxchk.php'); |
| 153 |
djmaze |
1.1 |
} |
| 154 |
djmaze |
1.1 |
//$SESS = new cpg_session($dbonly, $name, $time); |
| 155 |
djmaze |
1.1 |
//register_shutdown_function(array(&$SESS, "write_close")); |
| 156 |
djmaze |
1.18 |
$CLASS['member'] =& new cpg_member(); |
| 157 |
djmaze |
1.1 |
$userinfo =& $CLASS['member']->members[$CLASS['member']->user_id]; |
| 158 |
djmaze |
1.1 |
$nukeuser =& $CLASS['member']->cookie; |
| 159 |
djmaze |
1.18 |
if ($CLASS['member']->loadadmin()) { |
| 160 |
djmaze |
1.1 |
foreach($CLASS['member']->admin as $var => $val) { |
| 161 |
djmaze |
1.4 |
if (ereg('radmin',$var)) { $$var =& $val; } |
| 162 |
djmaze |
1.1 |
} |
| 163 |
djmaze |
1.1 |
} |
| 164 |
djmaze |
1.1 |
if (($MAIN_CFG['global']['maintenance']==1) && !is_admin() && !defined('ADMIN_PAGES') && !defined('INSTALL')) { |
| 165 |
trevor |
1.12 |
cpg_error('<strong>'.$MAIN_CFG['global']['maintenance_text'].'</strong>', 'Maintenance'); |
| 166 |
djmaze |
1.1 |
} |
| 167 |
djmaze |
1.1 |
$SESS->init_info(); |
| 168 |
djmaze |
1.1 |
/************************************************************************************/ |
| 169 |
djmaze |
1.3 |
/* Include language to detect languages from browser setting and user preferences */ |
| 170 |
djmaze |
1.1 |
/* Join the nuke language initiative (NLI) http://cpgnuke.com */ |
| 171 |
djmaze |
1.1 |
/************************************************************************************/ |
| 172 |
djmaze |
1.1 |
require_once('includes/functions/language.php'); |
| 173 |
djmaze |
1.1 |
  |
| 174 |
djmaze |
1.1 |
// Load cache handler |
| 175 |
djmaze |
1.1 |
if (isset($MAIN_CFG['cache']['handler'])) { |
| 176 |
djmaze |
1.1 |
// mmcache.php |
| 177 |
djmaze |
1.1 |
} |
| 178 |
djmaze |
1.1 |
  |
| 179 |
djmaze |
1.3 |
/************************************************************************************/ |
| 180 |
djmaze |
1.7 |
/* Load the theme template system and check if the current theme uses the system */ |
| 181 |
djmaze |
1.7 |
/************************************************************************************/ |
| 182 |
djmaze |
1.7 |
$ThemeSel = get_theme(); |
| 183 |
djmaze |
1.7 |
define('THEME_USES_TPL', file_exists('themes/'.$ThemeSel.'/template/header.html')); |
| 184 |
djmaze |
1.7 |
// Load template handler |
| 185 |
djmaze |
1.7 |
$cpgtpl =& new cpg_template(); |
| 186 |
djmaze |
1.7 |
$cpgtpl->set_template(); // dynamic language |
| 187 |
djmaze |
1.7 |
//$cpgtpl->set_template(true); // static language |
| 188 |
djmaze |
1.7 |
//$cpgtpl->cachepath = ''; |
| 189 |
djmaze |
1.7 |
if (THEME_USES_TPL) { $template =& $cpgtpl; } |
| 190 |
djmaze |
1.7 |
  |
| 191 |
djmaze |
1.7 |
header('Content-Type: text/html; charset='._CHARSET); |
| 192 |
djmaze |
1.7 |
header('Content-language: ' . get_langcode($currentlang, 1)); |
| 193 |
djmaze |
1.7 |
// standard privacy header change to yours |
| 194 |
djmaze |
1.7 |
header('P3P: CP="CAO DSP COR CURa ADMa DEVa OUR IND PHY ONL UNI COM NAV INT DEM PRE"'); |
| 195 |
djmaze |
1.7 |
//header("P3P: CP=\"ALL DSP COR NID CURa OUR STP PUR\""); |
| 196 |
djmaze |
1.7 |
// Notify server time |
| 197 |
djmaze |
1.7 |
header('Date: '.date('D, d M Y H:i:s', gmtime()).' GMT'); |
| 198 |
djmaze |
1.7 |
  |
| 199 |
djmaze |
1.7 |
ini_set('sendmail_from', $adminmail); |
| 200 |
djmaze |
1.7 |
  |
| 201 |
djmaze |
1.7 |
/************************************************************************************/ |
| 202 |
djmaze |
1.3 |
/* Check if the <form> POST is comming from this server */ |
| 203 |
djmaze |
1.3 |
/************************************************************************************/ |
| 204 |
djmaze |
1.3 |
if ($_SERVER['REQUEST_METHOD'] == 'POST') { |
| 205 |
djmaze |
1.9 |
// if (isset($_SERVER['HTTP_REFERER'])) { |
| 206 |
djmaze |
1.3 |
if (!isset($CPG_SESS['user']['uri']) || empty($CPG_SESS['user']['uri'])) { |
| 207 |
djmaze |
1.3 |
// if (!ereg("(http://$_SERVER[HTTP_HOST])", $_SERVER['HTTP_REFERER']) && !ereg("(https://$_SERVER[HTTP_HOST])", $_SERVER['HTTP_REFERER'])&& !ereg("(http://www.$_SERVER[HTTP_HOST])", $_SERVER['HTTP_REFERER'])) { |
| 208 |
djmaze |
1.3 |
$errorpage = '<html><body><center><h1>ERROR</h1>'; |
| 209 |
djmaze |
1.3 |
$the_error = "Someone with IP $_SERVER[REMOTE_ADDR]<br />\n" |
| 210 |
djmaze |
1.3 |
."tried to send information thru a POST from the following url: $_SERVER[HTTP_REFERER]<br />\n<br />\n" |
| 211 |
djmaze |
1.3 |
."The website he tried it on is: $_SERVER[HTTP_HOST]<br />\n" |
| 212 |
djmaze |
1.3 |
."And to the following page: $_SERVER[REQUEST_URI]<br />"; |
| 213 |
djmaze |
1.3 |
$the_error = $errorpage . '<form><textarea rows="8" cols="60">' . htmlspecialchars($the_error) . '</textarea></form></body></html>'; |
| 214 |
djmaze |
1.3 |
if (is_admin()) { |
| 215 |
djmaze |
1.3 |
die($the_error); |
| 216 |
djmaze |
1.7 |
} else if (isset($adminmail) && $adminmail != '') { |
| 217 |
djmaze |
1.3 |
$subject = "POST Error on $sitename"; |
| 218 |
djmaze |
1.3 |
if(!send_mail($mailer_message,$the_error, 1, $subject)) { |
| 219 |
djmaze |
1.3 |
echo $mailer_message; |
| 220 |
djmaze |
1.3 |
} |
| 221 |
djmaze |
1.3 |
} |
| 222 |
djmaze |
1.3 |
die('Posting from another server not allowed!'); |
| 223 |
djmaze |
1.3 |
} |
| 224 |
djmaze |
1.9 |
// } |
| 225 |
djmaze |
1.3 |
/* problems when using some firewalls and proxy servers |
| 226 |
djmaze |
1.3 |
else { |
| 227 |
djmaze |
1.3 |
die("Warning you didn't send the HTTP_REFERER header to this website. |
| 228 |
djmaze |
1.3 |
This can be caused due to your browser, using a proxy server or firewall. |
| 229 |
djmaze |
1.3 |
Please change browser or turn off the use of a proxy or turn off the \"Deny servers to trace web browsing\" in your firewall |
| 230 |
djmaze |
1.3 |
and you shouldn't have problems when sending a POST on this website."); |
| 231 |
djmaze |
1.3 |
}*/ |
| 232 |
djmaze |
1.3 |
} |
| 233 |
djmaze |
1.3 |
  |
| 234 |
djmaze |
1.1 |
// Function which removes \015\012 which causes linebreaks in SMTP email |
| 235 |
djmaze |
1.1 |
function removecrlf($str) { |
| 236 |
djmaze |
1.1 |
return strtr($str, "\015\012", ' '); |
| 237 |
djmaze |
1.1 |
} |
| 238 |
djmaze |
1.1 |
/*********************************************************************************** |
| 239 |
djmaze |
1.1 |
  |
| 240 |
djmaze |
1.1 |
bool send_mail(&$mailer_message, $message, $html=0, $subject="", $to="", $to_name="", $from="",$from_name="" ) |
| 241 |
djmaze |
1.1 |
  |
| 242 |
djmaze |
1.1 |
Sends a email thru PHP or SMTP using plain text or html formatted |
| 243 |
djmaze |
1.1 |
$mailer_message: returns info about the send mail or the error message |
| 244 |
djmaze |
1.1 |
$message : the message that you want to send |
| 245 |
djmaze |
1.1 |
$html : send message as html or text 1 = html, 0 = text(default) |
| 246 |
djmaze |
1.1 |
$subject : the subject of the message, default = _FEEDBACK |
| 247 |
djmaze |
1.1 |
$to : emailaddress of person to send to, default = admin mailaddress |
| 248 |
djmaze |
1.1 |
$to_name : name of person to send to, default = sitename |
| 249 |
djmaze |
1.1 |
$from : emailaddress of person who sends the message, default = admin mailaddress |
| 250 |
djmaze |
1.1 |
$from_name: name of person who sends the message, default = sitename |
| 251 |
djmaze |
1.1 |
  |
| 252 |
djmaze |
1.1 |
************************************************************************************/ |
| 253 |
djmaze |
1.1 |
function send_mail(&$mailer_message, $message, $html=0, $subject='', $to='', $to_name='', $from='', $from_name='') { |
| 254 |
djmaze |
1.17 |
global $MAIN_CFG, $module_name, $PHPMAILER_LANG; |
| 255 |
djmaze |
1.17 |
$PHPMAILER_LANG['from_failed'] = 'The following From address failed: '; |
| 256 |
djmaze |
1.17 |
$PHPMAILER_LANG['recipients_failed'] = 'SMTP Error: The following recipients failed: '; |
| 257 |
alexm |
1.14 |
  |
| 258 |
djmaze |
1.1 |
if ($module_name != 'Contact' && function_exists('get_lang')) { |
| 259 |
djmaze |
1.1 |
get_lang('Contact'); |
| 260 |
djmaze |
1.1 |
} |
| 261 |
djmaze |
1.7 |
if ($to == '') $to = $MAIN_CFG['global']['adminmail']; |
| 262 |
djmaze |
1.17 |
if ($from == '') $from = $MAIN_CFG['global']['adminmail']; |
| 263 |
djmaze |
1.17 |
if (is_email($from) < 1) { |
| 264 |
djmaze |
1.17 |
$mailer_message = $PHPMAILER_LANG['from_failed'].$from; |
| 265 |
djmaze |
1.17 |
return false; |
| 266 |
djmaze |
1.17 |
} |
| 267 |
djmaze |
1.17 |
if (is_email($to) < 1) { |
| 268 |
djmaze |
1.17 |
$mailer_message = $PHPMAILER_LANG['recipients_failed'].$to; |
| 269 |
djmaze |
1.17 |
return false; |
| 270 |
djmaze |
1.17 |
} |
| 271 |
djmaze |
1.17 |
  |
| 272 |
djmaze |
1.1 |
require_once('includes/classes/phpmailer.php'); |
| 273 |
djmaze |
1.1 |
$mail = new PHPMailer(); |
| 274 |
djmaze |
1.1 |
$mail->SetLanguage(); |
| 275 |
djmaze |
1.1 |
if ($MAIN_CFG['email']['smtp_on']) { |
| 276 |
djmaze |
1.1 |
$mail->IsSMTP(); // set mailer to use SMTP |
| 277 |
djmaze |
1.1 |
$mail->Host = $MAIN_CFG['email']['smtphost']; |
| 278 |
djmaze |
1.1 |
if ($MAIN_CFG['email']['smtp_auth']) { |
| 279 |
djmaze |
1.1 |
$mail->SMTPAuth = true; // turn on SMTP authentication |
| 280 |
djmaze |
1.1 |
$mail->Username = $MAIN_CFG['email']['smtp_uname']; // SMTP username |
| 281 |
djmaze |
1.1 |
$mail->Password = $MAIN_CFG['email']['smtp_pass']; // SMTP password |
| 282 |
djmaze |
1.1 |
} |
| 283 |
djmaze |
1.1 |
} else { |
| 284 |
djmaze |
1.1 |
$mail->IsMail(); |
| 285 |
djmaze |
1.1 |
} |
| 286 |
djmaze |
1.17 |
$mail->From = removecrlf($from); |
| 287 |
djmaze |
1.7 |
$mail->FromName = ($from_name!='') ? removecrlf($from_name) : $MAIN_CFG['global']['sitename']; |
| 288 |
djmaze |
1.1 |
if ($to_name != ''){ |
| 289 |
djmaze |
1.1 |
$mail->AddAddress(removecrlf($to), removecrlf($to_name)); |
| 290 |
djmaze |
1.1 |
} else { |
| 291 |
djmaze |
1.1 |
$mail->AddAddress(removecrlf($to)); |
| 292 |
djmaze |
1.1 |
} |
| 293 |
djmaze |
1.1 |
$mail->Priority = 3; |
| 294 |
djmaze |
1.1 |
$mail->Encoding = '8bit'; |
| 295 |
djmaze |
1.1 |
$mail->CharSet = _CHARSET; |
| 296 |
djmaze |
1.1 |
$mail->Subject = ($subject!='') ? removecrlf($subject) : _FEEDBACK; |
| 297 |
djmaze |
1.1 |
if ($MAIN_CFG['email']['allow_html_email'] && $html) { |
| 298 |
djmaze |
1.1 |
require_once('includes/nbbcode.php'); |
| 299 |
djmaze |
1.1 |
$message = decode_bbcode($message); |
| 300 |
djmaze |
1.1 |
$mail->IsHTML(true); |
| 301 |
djmaze |
1.1 |
$mail->AltBody = strip_tags($message); |
| 302 |
djmaze |
1.1 |
$mail->Body = $message; |
| 303 |
djmaze |
1.1 |
} else { |
| 304 |
djmaze |
1.1 |
$mail->Body = strip_tags($message); |
| 305 |
djmaze |
1.1 |
} |
| 306 |
djmaze |
1.1 |
$mailer_message =''; |
| 307 |
djmaze |
1.1 |
if (!$mail->Send()) { |
| 308 |
djmaze |
1.1 |
$mailer_message .= 'Message could not be sent.<p>'; |
| 309 |
djmaze |
1.1 |
$mailer_message .= 'Mailer Error: ' . $mail->ErrorInfo; |
| 310 |
djmaze |
1.1 |
return false; |
| 311 |
djmaze |
1.1 |
} else { |
| 312 |
djmaze |
1.1 |
$mailer_message .= '<p align="center">'._SUCCESS_MESSAGE_SENT.'<br />'; |
| 313 |
djmaze |
1.1 |
$mailer_message .= "<code>$message</code><br />"; |
| 314 |
djmaze |
1.1 |
$mailer_message .= '<p align="center">'._MAHALO.'</center></p>'; |
| 315 |
djmaze |
1.1 |
return true; |
| 316 |
djmaze |
1.1 |
} |
| 317 |
djmaze |
1.1 |
//return $mailer_message; |
| 318 |
djmaze |
1.1 |
} |
| 319 |
djmaze |
1.1 |
  |
| 320 |
djmaze |
1.1 |
/*********************************************************************************** |
| 321 |
djmaze |
1.1 |
Returns if the emailaddress is valid or not |
| 322 |
djmaze |
1.1 |
************************************************************************************/ |
| 323 |
djmaze |
1.1 |
function is_email(&$email) { |
| 324 |
djmaze |
1.10 |
global $DeniedEmailDomains; |
| 325 |
djmaze |
1.1 |
if (strlen($email) < 5) return 0; |
| 326 |
djmaze |
1.1 |
$email = strtolower($email); |
| 327 |
djmaze |
1.1 |
if (!ereg('^[_\.\+0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,6}$',$email)) { |
| 328 |
djmaze |
1.1 |
return -1; |
| 329 |
djmaze |
1.1 |
} |
| 330 |
djmaze |
1.1 |
$email = explode('@', $email); |
| 331 |
djmaze |
1.10 |
$DeniedEmailDomains[] = 'mydomain.com'; |
| 332 |
djmaze |
1.10 |
$domains = implode('|', $DeniedEmailDomains); |
| 333 |
djmaze |
1.10 |
if (eregi("($domains)", $email[1])) { |
| 334 |
djmaze |
1.1 |
return -2; |
| 335 |
djmaze |
1.1 |
} |
| 336 |
djmaze |
1.1 |
$email = implode('@', $email); |
| 337 |
djmaze |
1.1 |
return 1; |
| 338 |
djmaze |
1.1 |
} |
| 339 |
djmaze |
1.1 |
  |
| 340 |
djmaze |
1.1 |
/*********************************************************************************** |
| 341 |
djmaze |
1.1 |
Returns admin name if the user is an administrator, otherwise false |
| 342 |
djmaze |
1.1 |
************************************************************************************/ |
| 343 |
djmaze |
1.1 |
function is_admin() { |
| 344 |
djmaze |
1.1 |
global $CLASS; |
| 345 |
djmaze |
1.1 |
return is_object($CLASS['member']) ? $CLASS['member']->admin_id : false; |
| 346 |
djmaze |
1.1 |
} |
| 347 |
djmaze |
1.1 |
function can_admin($module='') { |
| 348 |
djmaze |
1.7 |
global $CLASS; |
| 349 |
djmaze |
1.7 |
$adminfo =& $CLASS['member']->admin; |
| 350 |
djmaze |
1.1 |
return is_array($adminfo) ? ($adminfo['radminsuper'] || (isset($adminfo['radmin'.$module]) ? $adminfo['radmin'.$module] : false)) : false; |
| 351 |
djmaze |
1.1 |
} |
| 352 |
djmaze |
1.1 |
/*********************************************************************************** |
| 353 |
djmaze |
1.1 |
Returns member ID if the user is an registered member, otherwise false |
| 354 |
djmaze |
1.1 |
************************************************************************************/ |
| 355 |
djmaze |
1.1 |
function is_user() { |
| 356 |
djmaze |
1.1 |
global $CLASS; |
| 357 |
djmaze |
1.1 |
return ($CLASS['member']->user_id > 1) ? $CLASS['member']->user_id : false; |
| 358 |
djmaze |
1.1 |
} |
| 359 |
djmaze |
1.1 |
function is_group() { |
| 360 |
djmaze |
1.1 |
// Function does not exist; here for compatibility with PHP-Nuke 7 modules |
| 361 |
djmaze |
1.1 |
} |
| 362 |
djmaze |
1.1 |
function update_points() { |
| 363 |
djmaze |
1.1 |
// Function does not exist; here for compatibility with PHP-Nuke 7 modules |
| 364 |
djmaze |
1.1 |
} |
| 365 |
djmaze |
1.1 |
/*********************************************************************************** |
| 366 |
djmaze |
1.1 |
Useless unless you don't want to convert PHP-Nuke modules |
| 367 |
djmaze |
1.1 |
NOT RECOMENDED to use, the global $nukeuser already contains all the info |
| 368 |
djmaze |
1.1 |
************************************************************************************/ |
| 369 |
djmaze |
1.1 |
function cookiedecode() { |
| 370 |
djmaze |
1.1 |
global $nukeuser; |
| 371 |
djmaze |
1.1 |
return $nukeuser; |
| 372 |
djmaze |
1.1 |
} |
| 373 |
djmaze |
1.1 |
/*********************************************************************************** |
| 374 |
djmaze |
1.1 |
Useless unless you don't want to convert PHP-Nuke modules |
| 375 |
djmaze |
1.1 |
NOT RECOMENDED to use, the global $userinfo already contains all the info |
| 376 |
djmaze |
1.1 |
************************************************************************************/ |
| 377 |
djmaze |
1.1 |
function getusrinfo() { |
| 378 |
djmaze |
1.1 |
global $userinfo; |
| 379 |
djmaze |
1.1 |
return $userinfo; |
| 380 |
djmaze |
1.1 |
} |
| 381 |
djmaze |
1.1 |
/*********************************************************************************** |
| 382 |
djmaze |
1.1 |
See includes/classes/cpg_member -> getmemdata() for details |
| 383 |
djmaze |
1.1 |
************************************************************************************/ |
| 384 |
djmaze |
1.1 |
function getusrdata($user, $data='*') { |
| 385 |
djmaze |
1.1 |
global $CLASS; |
| 386 |
djmaze |
1.1 |
return $CLASS['member']->getmemdata($user, $data); |
| 387 |
djmaze |
1.1 |
} |
| 388 |
djmaze |
1.1 |
/*********************************************************************************** |
| 389 |
djmaze |
1.1 |
  |
| 390 |
djmaze |
1.1 |
bool is_active($module) |
| 391 |
djmaze |
1.1 |
  |
| 392 |
djmaze |
1.1 |
Checks if the module with 'modulename' is active |
| 393 |
djmaze |
1.1 |
$module: the name of the module which you wanna check; example: 'Your_Account' |
| 394 |
djmaze |
1.1 |
  |
| 395 |
djmaze |
1.1 |
************************************************************************************/ |
| 396 |
djmaze |
1.1 |
function is_active($module) { |
| 397 |
djmaze |
1.1 |
global $prefix, $db; |
| 398 |
djmaze |
1.1 |
static $save; // Added by steven111 |
| 399 |
djmaze |
1.1 |
if (is_array($save)) { |
| 400 |
djmaze |
1.1 |
if (isset($save[$module])) return ($save[$module]); |
| 401 |
djmaze |
1.1 |
return 0; |
| 402 |
djmaze |
1.1 |
} |
| 403 |
djmaze |
1.1 |
$result = $db->sql_query('SELECT title FROM '.$prefix.'_modules WHERE active=1'); |
| 404 |
djmaze |
1.1 |
while ($row = $db->sql_fetchrow($result)) { |
| 405 |
djmaze |
1.1 |
$save[$row[0]] = 1; |
| 406 |
djmaze |
1.1 |
} |
| 407 |
djmaze |
1.1 |
$db->sql_freeresult($result); |
| 408 |
djmaze |
1.1 |
if (isset($save[$module])) return ($save[$module]); |
| 409 |
djmaze |
1.1 |
return 0; |
| 410 |
djmaze |
1.1 |
} |
| 411 |
djmaze |
1.1 |
/*********************************************************************************** |
| 412 |
djmaze |
1.1 |
  |
| 413 |
djmaze |
1.1 |
string Fix_Quotes(&$str, $nohtml=0) |
| 414 |
djmaze |
1.1 |
  |
| 415 |
djmaze |
1.1 |
Adds slashes to string and strips PHP+HTML for SQL insertion and hack prevention |
| 416 |
djmaze |
1.1 |
$str : the string to modify |
| 417 |
djmaze |
1.1 |
$nohtml: strip PHP+HTML tags, 0 = no, 1 = yes, default = 0 |
| 418 |
djmaze |
1.1 |
  |
| 419 |
djmaze |
1.1 |
************************************************************************************/ |
| 420 |
djmaze |
1.1 |
function Fix_Quotes(&$str, $nohtml=false, $spchar=false) { |
| 421 |
djmaze |
1.1 |
global $db; |
| 422 |
djmaze |
1.1 |
$str = $db->sql_escape_string(trim($str)); |
| 423 |
djmaze |
1.1 |
if ($nohtml) { $str = strip_tags($str); } |
| 424 |
djmaze |
1.1 |
if ($spchar) { $str = htmlspecialchars($str,ENT_NOQUOTES,'UTF-8'); } |
| 425 |
djmaze |
1.1 |
return $str; |
| 426 |
djmaze |
1.1 |
} |
| 427 |
djmaze |
1.1 |
  |
| 428 |
djmaze |
1.1 |
/*********************************************************************************** |
| 429 |
djmaze |
1.1 |
  |
| 430 |
djmaze |
1.1 |
string FixQuotes ($what = "") |
| 431 |
djmaze |
1.1 |
  |
| 432 |
djmaze |
1.1 |
Old PHP-Nuke function to stay compatible, use the advanced Fix_Quotes instead |
| 433 |
djmaze |
1.1 |
  |
| 434 |
djmaze |
1.1 |
************************************************************************************/ |
| 435 |
djmaze |
1.1 |
function FixQuotes($what = "") { |
| 436 |
djmaze |
1.1 |
$what = ereg_replace("'","''",$what); |
| 437 |
djmaze |
1.1 |
while (eregi("\\\\'", $what)) { |
| 438 |
djmaze |
1.1 |
$what = ereg_replace("\\\\'","'",$what); |
| 439 |
djmaze |
1.1 |
} |
| 440 |
djmaze |
1.1 |
return $what; |
| 441 |
djmaze |
1.1 |
} |
| 442 |
djmaze |
1.1 |
  |
| 443 |
djmaze |
1.1 |
/*********************************************************/ |
| 444 |
djmaze |
1.1 |
/* text filterering */ |
| 445 |
djmaze |
1.1 |
/*********************************************************/ |
| 446 |
djmaze |
1.1 |
  |
| 447 |
djmaze |
1.1 |
function check_words(&$Message) { |
| 448 |
djmaze |
1.1 |
global $CensorList, $CensorReplace, $CensorMode; |
| 449 |
djmaze |
1.1 |
if ($CensorMode != 0) { |
| 450 |
djmaze |
1.1 |
if (is_array($CensorList)) { |
| 451 |
djmaze |
1.1 |
if ($CensorMode == 1) { |
| 452 |
djmaze |
1.1 |
for ($i = 0; $i < count($CensorList); $i++) { |
| 453 |
djmaze |
1.1 |
$Message = eregi_replace("$CensorList[$i]([^a-zA-Z0-9])","$CensorReplace\\1",$Message); |
| 454 |
djmaze |
1.1 |
} |
| 455 |
djmaze |
1.1 |
} elseif ($CensorMode == 2) { |
| 456 |
djmaze |
1.1 |
for ($i = 0; $i < count($CensorList); $i++) { |
| 457 |
djmaze |
1.1 |
$Message = eregi_replace("(^|[^[:alnum:]])$CensorList[$i]","\\1$CensorReplace",$Message); |
| 458 |
djmaze |
1.1 |
} |
| 459 |
djmaze |
1.1 |
} elseif ($CensorMode == 3) { |
| 460 |
djmaze |
1.1 |
for ($i = 0; $i < count($CensorList); $i++) { |
| 461 |
djmaze |
1.1 |
$Message = eregi_replace($CensorList[$i],$CensorReplace,$Message); |
| 462 |
djmaze |
1.1 |
} |
| 463 |
djmaze |
1.1 |
} |
| 464 |
djmaze |
1.1 |
} |
| 465 |
djmaze |
1.1 |
} |
| 466 |
djmaze |
1.1 |
return $Message; |
| 467 |
djmaze |
1.1 |
} |
| 468 |
djmaze |
1.1 |
  |
| 469 |
djmaze |
1.1 |
function delQuotes($string){ |
| 470 |
djmaze |
1.1 |
/* no recursive function to add quote to an HTML tag if needed */ |
| 471 |
djmaze |
1.1 |
/* and delete duplicate spaces between attribs. */ |
| 472 |
djmaze |
1.1 |
$tmp = ""; # string buffer |
| 473 |
djmaze |
1.1 |
$result = ""; # result string |
| 474 |
djmaze |
1.1 |
$i = 0; |
| 475 |
djmaze |
1.1 |
$attrib = -1; # Are us in an HTML attrib ? -1: no attrib 0: name of the attrib 1: value of the atrib |
| 476 |
djmaze |
1.1 |
$quote = 0; # Is a string quote delimited opened ? 0=no, 1=yes |
| 477 |
djmaze |
1.1 |
$len = strlen($string); |
| 478 |
djmaze |
1.1 |
while ($i < $len) { |
| 479 |
djmaze |
1.1 |
switch($string[$i]) { # What car is it in the buffer ? |
| 480 |
djmaze |
1.1 |
case '"': #" # a quote. |
| 481 |
djmaze |
1.1 |
if ($quote == 0) { |
| 482 |
djmaze |
1.1 |
$quote = 1; |
| 483 |
djmaze |
1.1 |
} else { |
| 484 |
djmaze |
1.1 |
$quote = 0; |
| 485 |
djmaze |
1.1 |
if (($attrib > 0) && ($tmp != '')) { $result .= "=\"$tmp\""; } |
| 486 |
djmaze |
1.1 |
$tmp = ''; |
| 487 |
djmaze |
1.1 |
$attrib = -1; |
| 488 |
djmaze |
1.1 |
} |
| 489 |
djmaze |
1.1 |
break; |
| 490 |
djmaze |
1.1 |
case '=': # an equal - attrib delimiter |
| 491 |
djmaze |
1.1 |
if ($quote == 0) { # Is it found in a string ? |
| 492 |
djmaze |
1.1 |
$attrib = 1; |
| 493 |
djmaze |
1.1 |
if ($tmp != '') $result.=" $tmp"; |
| 494 |
djmaze |
1.1 |
$tmp = ''; |
| 495 |
djmaze |
1.1 |
} else $tmp .= '='; |
| 496 |
djmaze |
1.1 |
break; |
| 497 |
djmaze |
1.1 |
case ' ': # a blank ? |
| 498 |
djmaze |
1.1 |
if ($attrib > 0) { # add it to the string, if one opened. |
| 499 |
djmaze |
1.1 |
$tmp .= $string[$i]; |
| 500 |
djmaze |
1.1 |
} |
| 501 |
djmaze |
1.1 |
break; |
| 502 |
djmaze |
1.1 |
default: # Other |
| 503 |
djmaze |
1.1 |
if ($attrib < 0) # If we weren't in an attrib, set attrib to 0 |
| 504 |
djmaze |
1.1 |
$attrib = 0; |
| 505 |
djmaze |
1.1 |
$tmp .= $string[$i]; |
| 506 |
djmaze |
1.1 |
break; |
| 507 |
djmaze |
1.1 |
} |
| 508 |
djmaze |
1.1 |
$i++; |
| 509 |
djmaze |
1.1 |
} |
| 510 |
djmaze |
1.1 |
if (($quote != 0) && ($tmp != '')) { |
| 511 |
djmaze |
1.1 |
if ($attrib == 1) $result .= '='; |
| 512 |
djmaze |
1.1 |
/* If it is the value of an atrib, add the '=' */ |
| 513 |
djmaze |
1.1 |
$result .= "\"$tmp\""; /* Add quote if needed (the reason of the function ;-) */ |
| 514 |
djmaze |
1.1 |
} |
| 515 |
djmaze |
1.1 |
return $result; |
| 516 |
djmaze |
1.1 |
} |
| 517 |
djmaze |
1.1 |
  |
| 518 |
djmaze |
1.1 |
function convert_html($message, $tohtml=0) { |
| 519 |
djmaze |
1.1 |
if ($tohtml) { |
| 520 |
djmaze |
1.1 |
$html_entities_match = array('#>#', '#<#', '#"#', '#&#'); |
| 521 |
djmaze |
1.1 |
$html_entities_replace = array('>', '<', '"', '&'); |
| 522 |
djmaze |
1.1 |
} else { |
| 523 |
djmaze |
1.1 |
$html_entities_match = array('#&(?!\(\#[0-9]+)#', '#<#', '#>#', '#"#'); |
| 524 |
djmaze |
1.1 |
$html_entities_replace = array('&', '<', '>', '"'); |
| 525 |
djmaze |
1.1 |
} |
| 526 |
djmaze |
1.1 |
return preg_replace($html_entities_match, $html_entities_replace, $message); |
| 527 |
djmaze |
1.1 |
} |
| 528 |
djmaze |
1.1 |
  |
| 529 |
djmaze |
1.1 |
function check_html($str, $strip="") { |
| 530 |
djmaze |
1.1 |
/* The core of this code has been lifted from phpslash */ |
| 531 |
djmaze |
1.1 |
/* which is licenced under the GPL. */ |
| 532 |
djmaze |
1.1 |
global $AllowableHTML; |
| 533 |
djmaze |
1.1 |
if ($strip == 'nohtml') { $HTML=array(''); } |
| 534 |
djmaze |
1.1 |
else { $HTML = $AllowableHTML; } |
| 535 |
djmaze |
1.1 |
$str = stripslashes($str); |
| 536 |
djmaze |
1.1 |
$str = eregi_replace('<[[:space:]]*([^>]*)[[:space:]]*>','<\\1>', $str); |
| 537 |
djmaze |
1.1 |
// Delete all spaces from html tags . |
| 538 |
djmaze |
1.1 |
$str = eregi_replace('<a[^>]*href[[:space:]]*=[[:space:]]*"?[[:space:]]*([^" >]*)[[:space:]]*"?[^>]*>','<a href="\\1">', $str); |
| 539 |
djmaze |
1.1 |
// Delete all attribs from Anchor, except an href, double quoted. |
| 540 |
djmaze |
1.1 |
$str = eregi_replace('<[[:space:]]* img[[:space:]]*([^>]*)[[:space:]]*>', '', $str); |
| 541 |
djmaze |
1.1 |
// Delete all img tags |
| 542 |
djmaze |
1.1 |
$str = eregi_replace('<a[^>]*href[[:space:]]*=[[:space:]]*"?javascript[[:punct:]]*"?[^>]*>', '', $str); |
| 543 |
djmaze |
1.1 |
// Delete javascript code from a href tags -- Zhen-Xjell @ http://nukecops.com |
| 544 |
djmaze |
1.1 |
$tmp = ""; |
| 545 |
djmaze |
1.1 |
while (ereg('<(/?[[:alpha:]]*)[[:space:]]*([^>]*)>',$str,$reg)) { |
| 546 |
djmaze |
1.1 |
$i = strpos($str,$reg[0]); |
| 547 |
djmaze |
1.1 |
$l = strlen($reg[0]); |
| 548 |
djmaze |
1.1 |
if ($reg[1][0] == '/') $tag = strtolower(substr($reg[1],1)); |
| 549 |
djmaze |
1.1 |
else $tag = strtolower($reg[1]); |
| 550 |
djmaze |
1.1 |
if ($a = $HTML[$tag]) { |
| 551 |
djmaze |
1.1 |
if ($reg[1][0] == '/') $tag = "</$tag>"; |
| 552 |
djmaze |
1.1 |
elseif ($a == 1 || $reg[2] == '') $tag = "<$tag>"; |
| 553 |
djmaze |
1.1 |
else { |
| 554 |
djmaze |
1.1 |
# Place here the double quote fix function. |
| 555 |
djmaze |
1.1 |
$attrb_list=delQuotes($reg[2]); |
| 556 |
djmaze |
1.1 |
// A VER |
| 557 |
djmaze |
1.1 |
$attrb_list = ereg_replace('&','&',$attrb_list); |
| 558 |
djmaze |
1.1 |
$tag = "<$tag" . $attrb_list . ">"; |
| 559 |
djmaze |
1.1 |
} |
| 560 |
djmaze |
1.1 |
} # Attribs in tag allowed |
| 561 |
djmaze |
1.1 |
else $tag = ''; |
| 562 |
djmaze |
1.1 |
$tmp .= substr($str,0,$i) . $tag; |
| 563 |
djmaze |
1.1 |
$str = substr($str,$i+$l); |
| 564 |
djmaze |
1.1 |
} |
| 565 |
djmaze |
1.1 |
$str = $tmp . $str; |
| 566 |
djmaze |
1.1 |
$str = addslashes($str); |
| 567 |
djmaze |
1.1 |
return $str; |
| 568 |
djmaze |
1.1 |
// exit; |
| 569 |
djmaze |
1.1 |
/* Squash PHP tags unconditionally */ |
| 570 |
djmaze |
1.1 |
// $str = ereg_replace("<\?","",$str); |
| 571 |
djmaze |
1.1 |
// return $str; |
| 572 |
djmaze |
1.1 |
} |
| 573 |
djmaze |
1.1 |
  |
| 574 |
djmaze |
1.1 |
function filter_text($Message, $strip="") { |
| 575 |
djmaze |
1.1 |
check_words($Message); |
| 576 |
djmaze |
1.1 |
$Message = check_html($Message, $strip); |
| 577 |
djmaze |
1.1 |
return $Message; |
| 578 |
djmaze |
1.1 |
} |
| 579 |
djmaze |
1.1 |
  |
| 580 |
djmaze |
1.1 |
/*********************************************************/ |
| 581 |
djmaze |
1.1 |
/* Time formatting */ |
| 582 |
djmaze |
1.1 |
/*********************************************************/ |
| 583 |
djmaze |
1.1 |
  |
| 584 |
djmaze |
1.1 |
function gmtime() { |
| 585 |
djmaze |
1.1 |
static $time; |
| 586 |
djmaze |
1.1 |
if (!$time) { $time = (time() - date('Z')); } |
| 587 |
djmaze |
1.1 |
return $time; |
| 588 |
djmaze |
1.1 |
} |
| 589 |
djmaze |
1.1 |
function formatTimestamp($time) { |
| 590 |
djmaze |
1.1 |
return formatDateTime($time, _DATESTRING); |
| 591 |
djmaze |
1.1 |
} |
| 592 |
djmaze |
1.1 |
function formatDateTime($time, $format) { |
| 593 |
djmaze |
1.1 |
global $locale, $userinfo; |
| 594 |
djmaze |
1.1 |
// setlocale(LC_TIME, $locale); |
| 595 |
djmaze |
1.1 |
if (!is_numeric($time)) { |
| 596 |
djmaze |
1.1 |
ereg('([0-9]{4})-([0-9]{1,2})-([0-9]{1,2}) ([0-9]{1,2}):([0-9]{1,2}):([0-9]{1,2})', $time, $datetime); |
| 597 |
djmaze |
1.1 |
$time = mktime($datetime[4],$datetime[5],$datetime[6],$datetime[2],$datetime[3],$datetime[1]); |
| 598 |
djmaze |
1.1 |
} |
| 599 |
djmaze |
1.1 |
if (is_user() && intval($userinfo['user_timezone']) != 0) { |
| 600 |
djmaze |
1.1 |
$time = $time+(3600*intval($userinfo['user_timezone'])); |
| 601 |
djmaze |
1.1 |
} |
| 602 |
djmaze |
1.1 |
return utf8_encode(ucfirst(strftime($format, $time))); |
| 603 |
djmaze |
1.1 |
} |
| 604 |
djmaze |
1.1 |
  |
| 605 |
djmaze |
1.1 |
function formatAidHeader($aid) { |
| 606 |
djmaze |
1.1 |
echo $aid; |
| 607 |
djmaze |
1.1 |
} |
| 608 |
djmaze |
1.1 |
  |
| 609 |
djmaze |
1.1 |
function get_author($aid) { |
| 610 |
djmaze |
1.1 |
return $aid; |
| 611 |
djmaze |
1.1 |
} |
| 612 |
djmaze |
1.1 |
  |
| 613 |
djmaze |
1.1 |
function encode_ip($dotquad_ip) { |
| 614 |
djmaze |
1.1 |
$ip_sep = explode('.', $dotquad_ip); |
| 615 |
djmaze |
1.1 |
return (count($ip_sep) == 4) ? sprintf('%02x%02x%02x%02x', $ip_sep[0], $ip_sep[1], $ip_sep[2], $ip_sep[3]) : ''; |
| 616 |
djmaze |
1.1 |
} |
| 617 |
djmaze |
1.1 |
function decode_ip($int_ip) { |
| 618 |
djmaze |
1.1 |
$hexipbang = explode('.', chunk_split($int_ip, 2, '.')); |
| 619 |
djmaze |
1.1 |
return hexdec($hexipbang[0]). '.' . hexdec($hexipbang[1]) . '.' . hexdec($hexipbang[2]) . '.' . hexdec($hexipbang[3]); |
| 620 |
djmaze |
1.1 |
} |
| 621 |
djmaze |
1.1 |
  |
| 622 |
djmaze |
1.1 |
function save_cfg($name) { |
| 623 |
djmaze |
1.1 |
$cache_dir = 'cache'; |
| 624 |
djmaze |
1.1 |
$filename = $cache_dir."/config_$name.php"; |
| 625 |
djmaze |
1.1 |
if (is_dir($cache_dir) && is_writable($cache_dir)) { |
| 626 |
djmaze |
1.1 |
if ($fp = @fopen($filename, 'wb')) { |
| 627 |
djmaze |
1.1 |
@flock($fp, LOCK_EX); |
| 628 |
djmaze |
1.1 |
$data = "<?php\nif (!defined('CPG_NUKE')) { header('Location: index.php'); exit; }\n"; |
| 629 |
djmaze |
1.1 |
global $$name; |
| 630 |
djmaze |
1.1 |
$config =& $$name; |
| 631 |
djmaze |
1.1 |
if (is_array($config)) { |
| 632 |
djmaze |
1.1 |
@reset($config); |
| 633 |
djmaze |
1.1 |
while (list($key, $value) = @each($config) ) { |
| 634 |
djmaze |
1.1 |
if (is_array($value)) { |
| 635 |
djmaze |
1.1 |
while (list($subkey, $subvalue) = @each($value) ) { |
| 636 |
djmaze |
1.1 |
$data .= '$'.$name.'[\''.$key.'\'][\''.$subkey.'\'] = \''.ereg_replace('\'', '\\\'', trim($subvalue))."';\n"; |
| 637 |
djmaze |
1.1 |
} |
| 638 |
djmaze |
1.1 |
} else { |
| 639 |
djmaze |
1.1 |
$data .= '$'.$name.'[\''.$key.'\'] = \''.trim($value).'\';'."\n"; |
| 640 |
djmaze |
1.1 |
} |
| 641 |
djmaze |
1.1 |
} |
| 642 |
djmaze |
1.1 |
} |
| 643 |
djmaze |
1.1 |
@fwrite ($fp, $data.'?>'); |
| 644 |
djmaze |
1.1 |
@flock($fp, LOCK_UN); |
| 645 |
djmaze |
1.1 |
@fclose($fp); |
| 646 |
djmaze |
1.1 |
@umask(0); |
| 647 |
djmaze |
1.1 |
} |
| 648 |
djmaze |
1.1 |
} |
| 649 |
djmaze |
1.1 |
} |
| 650 |
djmaze |
1.1 |
function load_cfg($name) { |
| 651 |
djmaze |
1.1 |
global $$name; |
| 652 |
djmaze |
1.1 |
if (file_exists("cache/config_$name.php")) { |
| 653 |
djmaze |
1.1 |
include("cache/config_$name.php"); |
| 654 |
djmaze |
1.1 |
return true; |
| 655 |
djmaze |
1.1 |
} else { |
| 656 |
djmaze |
1.1 |
return false; |
| 657 |
djmaze |
1.1 |
} |
| 658 |
djmaze |
1.1 |
} |
| 659 |
djmaze |
1.1 |
function delete_cfg($name) { |
| 660 |
djmaze |
1.1 |
$cache_dir = 'cache'; |
| 661 |
djmaze |
1.1 |
$filename = $cache_dir."/config_$name.php"; |
| 662 |
djmaze |
1.1 |
if (is_dir($cache_dir) && is_writable($cache_dir)) { |
| 663 |
djmaze |
1.1 |
if (file_exists($filename)) { |
| 664 |
djmaze |
1.1 |
@unlink($filename); |
| 665 |
djmaze |
1.1 |
} |
| 666 |
djmaze |
1.1 |
} |
| 667 |
djmaze |
1.15 |
} |
| 668 |
djmaze |
1.20 |
  |
| 669 |
djmaze |
1.20 |
// user defined error handling function |
| 670 |
djmaze |
1.20 |
function CPG_ErrorHandler($errno, $errmsg, $filename, $linenum, $vars, $result=false) |
| 671 |
djmaze |
1.20 |
{ |
| 672 |
djmaze |
1.20 |
static $report; |
| 673 |
djmaze |
1.20 |
if ($result) { return $report; } |
| 674 |
djmaze |
1.20 |
  |
| 675 |
djmaze |
1.20 |
$errmsg = utf8_encode($errmsg); |
| 676 |
djmaze |
1.20 |
//http://nl2.php.net/manual/en/ref.errorfunc.php#errorfunc.constants |
| 677 |
djmaze |
1.20 |
// timestamp for the error entry |
| 678 |
djmaze |
1.20 |
$dt = date("Y-m-d H:i:s (T)"); |
| 679 |
djmaze |
1.20 |
// define an assoc array of error string in reality the only entries we should |
| 680 |
djmaze |
1.20 |
// consider are E_WARNING, E_NOTICE, E_USER_ERROR, E_USER_WARNING and E_USER_NOTICE |
| 681 |
djmaze |
1.20 |
$errortype = array ( |
| 682 |
djmaze |
1.20 |
E_ERROR => "Error", |
| 683 |
djmaze |
1.20 |
E_WARNING => "Warning", |
| 684 |
djmaze |
1.20 |
E_PARSE => "Parsing Error", |
| 685 |
djmaze |
1.20 |
E_NOTICE => "Notice", |
| 686 |
djmaze |
1.20 |
E_CORE_ERROR => "Core Error", |
| 687 |
djmaze |
1.20 |
E_CORE_WARNING => "Core Warning", |
| 688 |
djmaze |
1.20 |
E_COMPILE_ERROR => "Compile Error", |
| 689 |
djmaze |
1.20 |
E_COMPILE_WARNING => "Compile Warning", |
| 690 |
djmaze |
1.20 |
E_USER_ERROR => "User Error", |
| 691 |
djmaze |
1.20 |
E_USER_WARNING => "User Warning", |
| 692 |
djmaze |
1.20 |
E_USER_NOTICE => "User Notice", |
| 693 |
djmaze |
1.20 |
E_STRICT => "Runtime Notice" |
| 694 |
djmaze |
1.20 |
); |
| 695 |
djmaze |
1.20 |
  |
| 696 |
djmaze |
1.20 |
if ($errno == E_ERROR || $errno == E_USER_ERROR) { |
| 697 |
djmaze |
1.20 |
if (is_admin) { |
| 698 |
djmaze |
1.20 |
cpg_error($errortype[$errno]." $filename line $linenum: ".$errmsg); |
| 699 |
djmaze |
1.20 |
} else { |
| 700 |
djmaze |
1.20 |
cpg_error("A error occured while processing this page.<br />Please report the error to the owner of this webiste."); |
| 701 |
djmaze |
1.20 |
} |
| 702 |
djmaze |
1.20 |
} |
| 703 |
djmaze |
1.20 |
  |
| 704 |
djmaze |
1.20 |
// set of errors for which a var trace will be saved |
| 705 |
djmaze |
1.20 |
$user_errors = array(E_WARNING, E_PARSE, E_NOTICE, E_USER_WARNING, E_USER_NOTICE); |
| 706 |
djmaze |
1.20 |
if (in_array($errno, $user_errors)) { |
| 707 |
djmaze |
1.20 |
$report[$filename][] = $errortype[$errno]." line $linenum: ".$errmsg; |
| 708 |
djmaze |
1.20 |
} |
| 709 |
djmaze |
1.20 |
  |
| 710 |
djmaze |
1.20 |
// for testing |
| 711 |
djmaze |
1.20 |
// echo $err; |
| 712 |
djmaze |
1.20 |
  |
| 713 |
djmaze |
1.20 |
// save to the error log |
| 714 |
djmaze |
1.20 |
// http://www.php.net/error_log |
| 715 |
djmaze |
1.20 |
// error_log($err, 3, "/usr/local/php4/error.log"); |
| 716 |
djmaze |
1.20 |
} |