2 /************************************************************************
3 * Mailer v0.2.1-FINAL Start: 04/04/2009 *
4 * =================== Last change: 04/04/2009 *
6 * -------------------------------------------------------------------- *
7 * File : wrapper-functions.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Wrapper functions *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Wrapper-Funktionen *
12 * -------------------------------------------------------------------- *
15 * $Tag:: 0.2.1-FINAL $ *
17 * Needs to be in all Files and every File needs "svn propset *
18 * svn:keywords Date Revision" (autoprobset!) at least!!!!!! *
19 * -------------------------------------------------------------------- *
20 * Copyright (c) 2003 - 2009 by Roland Haeder *
21 * Copyright (c) 2009, 2010 by Mailer Developer Team *
22 * For more information visit: http://www.mxchange.org *
24 * This program is free software; you can redistribute it and/or modify *
25 * it under the terms of the GNU General Public License as published by *
26 * the Free Software Foundation; either version 2 of the License, or *
27 * (at your option) any later version. *
29 * This program is distributed in the hope that it will be useful, *
30 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
31 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
32 * GNU General Public License for more details. *
34 * You should have received a copy of the GNU General Public License *
35 * along with this program; if not, write to the Free Software *
36 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
38 ************************************************************************/
40 // Some security stuff...
41 if (!defined('__SECURITY')) {
46 function readFromFile ($FQFN) {
47 // Sanity-check if file is there (should be there, but just to make it sure)
48 if (!isFileReadable($FQFN)) {
49 // This should not happen
50 debug_report_bug(__FUNCTION__.': File ' . basename($FQFN) . ' is not readable!');
54 if (!isset($GLOBALS['file_content'][$FQFN])) {
56 if (function_exists('file_get_contents')) {
58 $GLOBALS['file_content'][$FQFN] = file_get_contents($FQFN);
60 // Fall-back to implode-file chain
61 $GLOBALS['file_content'][$FQFN] = implode('', file($FQFN));
66 return $GLOBALS['file_content'][$FQFN];
69 // Writes content to a file
70 function writeToFile ($FQFN, $content, $aquireLock = false) {
71 // Is the file writeable?
72 if ((isFileReadable($FQFN)) && (!is_writeable($FQFN)) && (!changeMode($FQFN, 0644))) {
74 logDebugMessage(__FUNCTION__, __LINE__, sprintf("File %s not writeable.", basename($FQFN)));
80 // By default all is failed...
83 // Is the function there?
84 if (function_exists('file_put_contents')) {
86 if ($aquireLock === true) {
87 // Write it directly with lock
88 $return = file_put_contents($FQFN, $content, LOCK_EX);
91 $return = file_put_contents($FQFN, $content);
94 // Write it with fopen
95 $fp = fopen($FQFN, 'w') or app_die(__FUNCTION__, __LINE__, "Cannot write file ".basename($FQFN).'!');
98 if ($aquireLock === true) flock($fp, LOCK_EX);
101 fwrite($fp, $content);
107 // Mark it as readable
108 $GLOBALS['file_readable'][$FQFN] = true;
110 // Remember content in cache
111 $GLOBALS['file_content'][$FQFN] = $content;
114 return changeMode($FQFN, 0644);
117 // Clears the output buffer. This function does *NOT* backup sent content.
118 function clearOutputBuffer () {
119 // Trigger an error on failure
120 if (!ob_end_clean()) {
122 debug_report_bug(__FUNCTION__.': Failed to clean output buffer.');
127 // @TODO Implement $compress
128 function encodeString ($str, $compress = true) {
129 $str = urlencode(base64_encode(compileUriCode($str)));
133 // Decode strings encoded with encodeString()
134 // @TODO Implement $decompress
135 function decodeString ($str, $decompress = true) {
136 $str = compileUriCode(base64_decode(urldecode(compileUriCode($str))));
140 // Decode entities in a nicer way
141 function decodeEntities ($str, $quote = ENT_NOQUOTES) {
142 // Decode the entities to UTF-8 now
143 $decodedString = html_entity_decode($str, $quote, 'UTF-8');
145 // Return decoded string
146 return $decodedString;
149 // Merges an array together but only if both are arrays
150 function merge_array ($array1, $array2) {
151 // Are both an array?
152 if ((!is_array($array1)) && (!is_array($array2))) {
153 // Both are not arrays
154 debug_report_bug(__FUNCTION__ . ': No arrays provided!');
155 } elseif (!is_array($array1)) {
156 // Left one is not an array
157 debug_report_bug(sprintf("[%s:%s] array1 is not an array. array != %s", __FUNCTION__, __LINE__, gettype($array1)));
158 } elseif (!is_array($array2)) {
159 // Right one is not an array
160 debug_report_bug(sprintf("[%s:%s] array2 is not an array. array != %s", __FUNCTION__, __LINE__, gettype($array2)));
163 // Merge all together
164 return array_merge($array1, $array2);
167 // Check if given FQFN is a readable file
168 function isFileReadable ($FQFN) {
170 if (!isset($GLOBALS['file_readable'][$FQFN])) {
172 $GLOBALS['file_readable'][$FQFN] = ((file_exists($FQFN)) && (is_file($FQFN)) && (is_readable($FQFN)));
175 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'file=' . basename($FQFN) . ' - CHECK! (' . intval($GLOBALS['file_readable'][$FQFN]) . ')');
178 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'file=' . basename($FQFN) . ' - CACHE! (' . intval($GLOBALS['file_readable'][$FQFN]) . ')');
182 return $GLOBALS['file_readable'][$FQFN];
185 // Checks wether the given FQFN is a directory and not ., .. or .svn
186 function isDirectory ($FQFN) {
188 if (!isset($GLOBALS['is_directory'][$FQFN])) {
190 $baseName = basename($FQFN);
193 $GLOBALS['is_directory'][$FQFN] = ((is_dir($FQFN)) && ($baseName != '.') && ($baseName != '..') && ($baseName != '.svn'));
197 return $GLOBALS['is_directory'][$FQFN];
200 // "Getter" for remote IP number
201 function detectRemoteAddr () {
202 // Get remote ip from environment
203 $remoteAddr = determineRealRemoteAddress();
205 // Is removeip installed?
206 if (isExtensionActive('removeip')) {
208 $remoteAddr = getAnonymousRemoteAddress($remoteAddr);
215 // "Getter" for remote hostname
216 function detectRemoteHostname () {
217 // Get remote ip from environment
218 $remoteHost = getenv('REMOTE_HOST');
220 // Is removeip installed?
221 if (isExtensionActive('removeip')) {
223 $remoteHost = getAnonymousRemoteHost($remoteHost);
230 // "Getter" for user agent
231 function detectUserAgent ($alwaysReal = false) {
232 // Get remote ip from environment
233 $userAgent = getenv('HTTP_USER_AGENT');
235 // Is removeip installed?
236 if ((isExtensionActive('removeip')) && ($alwaysReal === false)) {
238 $userAgent = getAnonymousUserAgent($userAgent);
245 // "Getter" for referer
246 function detectReferer () {
247 // Get remote ip from environment
248 $referer = getenv('HTTP_REFERER');
250 // Is removeip installed?
251 if (isExtensionActive('removeip')) {
253 $referer = getAnonymousReferer($referer);
260 // "Getter" for request URI
261 function detectRequestUri () {
263 return (getenv('REQUEST_URI'));
266 // "Getter" for query string
267 function detectQueryString () {
268 return str_replace('&', '&', (getenv('QUERY_STRING')));
271 // "Getter" for SERVER_NAME
272 function detectServerName () {
274 return (getenv('SERVER_NAME'));
277 // Check wether we are installing
278 function isInstalling () {
279 // Determine wether we are installing
280 if (!isset($GLOBALS['mailer_installing'])) {
281 // Check URL (css.php/js.php need this)
282 $GLOBALS['mailer_installing'] = isGetRequestParameterSet('installing');
286 return $GLOBALS['mailer_installing'];
289 // Check wether this script is installed
290 function isInstalled () {
292 if (!isset($GLOBALS['is_installed'])) {
293 // Determine wether this script is installed
294 $GLOBALS['is_installed'] = (
299 isConfigEntrySet('MXCHANGE_INSTALLED')
301 getConfig('MXCHANGE_INSTALLED') == 'Y'
305 // New config file found and loaded
306 isIncludeReadable(getConfig('CACHE_PATH') . 'config-local.php')
309 // New config file found, but not yet read
310 isIncludeReadable(getConfig('CACHE_PATH') . 'config-local.php')
313 // Only new config file is found
314 !isIncludeReadable('inc/config.php')
316 // Is installation mode
323 // Then use the cache
324 return $GLOBALS['is_installed'];
327 // Check wether an admin is registered
328 function isAdminRegistered () {
330 if (!isset($GLOBALS['is_admin_registered'])) {
332 $GLOBALS['is_admin_registered'] = ((isConfigEntrySet('ADMIN_REGISTERED')) && (getConfig('ADMIN_REGISTERED') == 'Y'));
336 return $GLOBALS['is_admin_registered'];
339 // Checks wether the reset mode is active
340 function isResetModeEnabled () {
341 // Now simply check it
342 return ((isset($GLOBALS['reset_enabled'])) && ($GLOBALS['reset_enabled'] === true));
345 // Checks wether the debug mode is enabled
346 function isDebugModeEnabled () {
348 if (!isset($GLOBALS['is_debugmode_enabled'])) {
350 $GLOBALS['is_debugmode_enabled'] = ((isConfigEntrySet('DEBUG_MODE')) && (getConfig('DEBUG_MODE') == 'Y'));
354 return $GLOBALS['is_debugmode_enabled'];
357 // Checks wether SQL debugging is enabled
358 function isSqlDebuggingEnabled () {
360 if (!isset($GLOBALS['is_sql_debug_enabled'])) {
361 // Determine if SQL debugging is enabled
362 $GLOBALS['is_sql_debug_enabled'] = ((isConfigEntrySet('DEBUG_SQL')) && (getConfig('DEBUG_SQL') == 'Y'));
366 return $GLOBALS['is_sql_debug_enabled'];
369 // Checks wether we shall debug regular expressions
370 function isDebugRegularExpressionEnabled () {
372 return ((isConfigEntrySet('DEBUG_REGEX')) && (getConfig('DEBUG_REGEX') == 'Y'));
375 // Checks wether the cache instance is valid
376 function isCacheInstanceValid () {
377 return ((isset($GLOBALS['cache_instance'])) && (is_object($GLOBALS['cache_instance'])));
380 // Copies a file from source to destination and verifies if that goes fine.
381 // This function should wrap the copy() command and make a nicer debug backtrace
382 // even if there is no xdebug extension installed.
383 function copyFileVerified ($source, $dest, $chmod = '') {
384 // Failed is the default
387 // Is the source file there?
388 if (!isFileReadable($source)) {
390 debug_report_bug('Cannot read from source file ' . basename($source) . '.');
393 // Is the target directory there?
394 if (!isDirectory(dirname($dest))) {
396 debug_report_bug('Cannot find directory ' . str_replace(getConfig('PATH'), '', dirname($dest)) . '.');
399 // Now try to copy it
400 if (!copy($source, $dest)) {
401 // Something went wrong
402 debug_report_bug('copy() has failed to copy the file.');
405 $GLOBALS['file_readable'][$dest] = true;
408 // If there are chmod rights set, apply them
409 if (!empty($chmod)) {
411 $status = changeMode($dest, $chmod);
421 // Wrapper function for header()
422 // Send a header but checks before if we can do so
423 function sendHeader ($header) {
425 //* DEBUG: */ logDebugMessage(__FUNCTION__ . ': header=' . $header);
426 $GLOBALS['header'][] = trim($header);
429 // Flushes all headers
430 function flushHeaders () {
431 // Is the header already sent?
432 if (headers_sent()) {
434 debug_report_bug('Headers already sent!');
437 // Flush all headers if found
438 if ((isset($GLOBALS['header'])) && (is_array($GLOBALS['header']))) {
439 foreach ($GLOBALS['header'] as $header) {
444 // Mark them as flushed
445 $GLOBALS['header'] = array();
448 // Wrapper function for chmod()
449 // @TODO Do some more sanity check here
450 function changeMode ($FQFN, $mode) {
451 // Is the file/directory there?
452 if ((!isFileReadable($FQFN)) && (!isDirectory($FQFN))) {
453 // Neither, so abort here
454 debug_report_bug('Cannot chmod() on ' . basename($FQFN) . '.');
461 // Wrapper for unlink()
462 function removeFile ($FQFN) {
463 // Is the file there?
464 if (isFileReadable($FQFN)) {
466 $GLOBALS['file_readable'][$FQFN] = false;
469 return unlink($FQFN);
472 // All fine if no file was removed. If we change this to 'false' or rewrite
473 // above if() block it would be to restrictive.
477 // Wrapper for $_POST['sel']
478 function countPostSelection ($element = 'sel') {
480 if (isPostRequestParameterSet($element)) {
481 // Return counted elements
482 return countSelection(postRequestParameter($element));
484 // Return zero if not found
489 // Checks wether the config-local.php is loaded
490 function isConfigLocalLoaded () {
491 return ((isset($GLOBALS['config_local_loaded'])) && ($GLOBALS['config_local_loaded'] === true));
494 // Checks wether a nickname or userid was entered and caches the result
495 function isNicknameUsed ($userid) {
499 // Is the cache there
500 if (isset($GLOBALS['is_nickname_used'][$userid])) {
502 $isUsed = $GLOBALS['is_nickname_used'][$userid];
505 $isUsed = (('' . round($userid) . '') != $userid);
507 // And write it to the cache
508 $GLOBALS['is_nickname_used'][$userid] = $isUsed;
515 // Getter for 'what' value
516 function getWhat () {
521 if (isWhatSet(true)) {
523 $what = $GLOBALS['what'];
530 // Setter for 'what' value
531 function setWhat ($newWhat) {
532 $GLOBALS['what'] = SQL_ESCAPE($newWhat);
535 // Setter for 'what' from configuration
536 function setWhatFromConfig ($configEntry) {
537 // Get 'what' from config
538 $what = getConfig($configEntry);
544 // Checks wether what is set and optionally aborts on miss
545 function isWhatSet ($strict = false) {
547 $isset = isset($GLOBALS['what']);
549 // Should we abort here?
550 if (($strict === true) && ($isset === false)) {
552 debug_report_bug('what is empty.');
559 // Getter for 'action' value
560 function getAction () {
565 if (isActionSet(true)) {
567 $action = $GLOBALS['action'];
574 // Setter for 'action' value
575 function setAction ($newAction) {
576 $GLOBALS['action'] = SQL_ESCAPE($newAction);
579 // Checks wether action is set and optionally aborts on miss
580 function isActionSet ($strict = false) {
582 $isset = ((isset($GLOBALS['action'])) && (!empty($GLOBALS['action'])));
584 // Should we abort here?
585 if (($strict === true) && ($isset === false)) {
587 debug_report_bug('action is empty.');
594 // Getter for 'module' value
595 function getModule ($strict = true) {
600 if (isModuleSet($strict)) {
602 $module = $GLOBALS['module'];
609 // Setter for 'module' value
610 function setModule ($newModule) {
611 // Secure it and make all modules lower-case
612 $GLOBALS['module'] = SQL_ESCAPE(strtolower($newModule));
615 // Checks wether module is set and optionally aborts on miss
616 function isModuleSet ($strict = false) {
618 $isset = (!empty($GLOBALS['module']));
620 // Should we abort here?
621 if (($strict === true) && ($isset === false)) {
623 debug_report_bug('module is empty.');
627 return (($isset === true) && ($GLOBALS['module'] != 'unknown')) ;
630 // Getter for 'output_mode' value
631 function getOutputMode () {
636 if (isOutputModeSet(true)) {
638 $output_mode = $GLOBALS['output_mode'];
645 // Setter for 'output_mode' value
646 function setOutputMode ($newOutputMode) {
647 $GLOBALS['output_mode'] = (int) $newOutputMode;
650 // Checks wether output_mode is set and optionally aborts on miss
651 function isOutputModeSet ($strict = false) {
653 $isset = (isset($GLOBALS['output_mode']));
655 // Should we abort here?
656 if (($strict === true) && ($isset === false)) {
658 debug_report_bug('output_mode is empty.');
665 // Enables block-mode
666 function enableBlockMode ($enabled = true) {
667 $GLOBALS['block_mode'] = $enabled;
670 // Checks wether block-mode is enabled
671 function isBlockModeEnabled () {
673 if (!isset($GLOBALS['block_mode'])) {
675 debug_report_bug(__FUNCTION__ . ': block_mode is not set.');
679 return $GLOBALS['block_mode'];
682 // Wrapper function for addPointsThroughReferalSystem()
683 function addPointsDirectly ($subject, $userid, $points) {
685 unset($GLOBALS['ref_level']);
687 // Call more complicated method (due to more parameters)
688 return addPointsThroughReferalSystem($subject, $userid, $points, false, 0, false, 'direct');
691 // Wrapper function to redirect from member-only modules to index
692 function redirectToIndexMemberOnlyModule () {
693 // Do the redirect here
694 redirectToUrl('modules.php?module=index&code=' . getCode('MODULE_MEM_ONLY') . '&mod=' . getModule());
697 // Wrapper function to redirect to current URL
698 function redirectToRequestUri () {
699 redirectToUrl(basename(detectRequestUri()));
702 // Wrapper function to redirect to de-refered URL
703 function redirectToDereferedUrl ($URL) {
705 redirectToUrl(generateDerefererUrl($URL));
708 // Wrapper function for checking if extension is installed and newer or same version
709 function isExtensionInstalledAndNewer ($ext_name, $version) {
711 //* DEBUG: */ print __FUNCTION__.':'.$ext_name.'=>'.$version.'<br />';
712 return ((isExtensionInstalled($ext_name)) && (getExtensionVersion($ext_name) >= $version));
715 // Wrapper function for checking if extension is installed and older than given version
716 function isExtensionInstalledAndOlder ($ext_name, $version) {
718 //* DEBUG: */ print __FUNCTION__.':'.$ext_name.'<'.$version.'<br />';
719 return ((isExtensionInstalled($ext_name)) && (isExtensionOlder($ext_name, $version)));
723 function setUsername ($userName) {
724 $GLOBALS['username'] = (string) $userName;
728 function getUsername () {
730 if (!isset($GLOBALS['username'])) {
731 // No, so it has to be a guest
732 $GLOBALS['username'] = getMessage('USERNAME_GUEST');
736 return $GLOBALS['username'];
739 // Wrapper function for installation phase
740 function isInstallationPhase () {
742 if (!isset($GLOBALS['installation_phase'])) {
744 $GLOBALS['installation_phase'] = ((!isInstalled()) || (isInstalling()));
748 return $GLOBALS['installation_phase'];
751 // Checks wether the extension demo is actuve and the admin login is demo (password needs to be demo, too!)
752 function isDemoModeActive () {
753 return ((isExtensionActive('demo')) && (getSession('admin_login') == 'demo'));
756 // Getter for PHP caching value
757 function getPhpCaching () {
758 return $GLOBALS['php_caching'];
761 // Checks wether the admin hash is set
762 function isAdminHashSet ($admin) {
764 * @TODO Do we really need this check? If yes, try to fix this:
765 * 1.:functions.php:2504, debug_get_mailable_backtrace(0)
766 * 2.:wrapper-functions.php:744, debug_report_bug(1)
767 * 3.:mysql-manager.php:728, isAdminHashSet(1)
768 * 4.:filters.php:384, isAdmin(0)
769 * 5.:debug_get_mailable_backtrace:2457, FILTER_DETERMINE_USERNAME(1)
770 * 6.:filter-functions.php:280, call_user_func_array(2)
771 * 7.:load_cache.php:74, runFilterChain(1)
772 * 8.:inc-functions.php:131, include(1)
773 * 9.:inc-functions.php:145, loadInclude(1)
774 * 10.:mysql-connect.php:104, loadIncludeOnce(1)
775 * 11.:inc-functions.php:131, include(1)
776 * 12.:inc-functions.php:145, loadInclude(1)
777 * 13.:config-global.php:106, loadIncludeOnce(1)
778 * 14.:js.php:57, require(1)
780 if (!isset($GLOBALS['cache_array']['admin'])) {
781 debug_report_bug('Cache not set.');
784 // Check for admin hash
785 return isset($GLOBALS['cache_array']['admin']['password'][$admin]);
788 // Setter for admin hash
789 function setAdminHash ($admin, $hash) {
790 $GLOBALS['cache_array']['admin']['password'][$admin] = $hash;
793 // Init user data array
794 function initUserData () {
795 // User id should not be zero
796 if (getCurrentUserId() < 1) debug_report_bug(__FUNCTION__.': User id is zero.');
799 $GLOBALS['user_data'][getCurrentUserId()] = array();
802 // Getter for user data
803 function getUserData ($column) {
804 // User id should not be zero
805 if (getCurrentUserId() < 1) debug_report_bug(__FUNCTION__.': User id is zero.');
808 return $GLOBALS['user_data'][getCurrentUserId()][$column];
811 // Geter for whole user data array
812 function getUserDataArray () {
814 $uid = getCurrentUserId();
816 // User id should not be zero
817 if ($uid < 1) debug_report_bug(__FUNCTION__.': User id is zero.');
819 // Get the whole array if found
820 if (isset($GLOBALS['user_data'][$uid])) {
821 // Found, so return it
822 return $GLOBALS['user_data'][$uid];
824 // Return empty array
829 // Checks if the user data is valid, this may indicate that the user has logged
830 // in, but you should use isMember() if you want to find that out.
831 function isUserDataValid () {
832 // User id should not be zero so abort here
833 if (!isCurrentUserIdSet()) return false;
836 if (!isset($GLOBALS['is_userdata_valid'][getCurrentUserId()])) {
838 $GLOBALS['is_userdata_valid'][getCurrentUserId()] = ((isset($GLOBALS['user_data'][getCurrentUserId()])) && (count($GLOBALS['user_data'][getCurrentUserId()]) > 1));
842 return $GLOBALS['is_userdata_valid'][getCurrentUserId()];
845 // Setter for current userid
846 function setCurrentUserId ($userid) {
847 $GLOBALS['current_userid'] = bigintval($userid);
850 // Getter for current userid
851 function getCurrentUserId () {
852 // Userid must be set before it can be used
853 if (!isCurrentUserIdSet()) {
855 debug_report_bug('User id is not set.');
859 return $GLOBALS['current_userid'];
862 // Checks if current userid is set
863 function isCurrentUserIdSet () {
864 return isset($GLOBALS['current_userid']);
867 // Checks wether we are debugging template cache
868 function isDebuggingTemplateCache () {
869 return (getConfig('DEBUG_TEMPLATE_CACHE') == 'Y');
872 // Wrapper for fetchUserData() and getUserData() calls
873 function getFetchedUserData ($keyColumn, $userId, $valueColumn) {
875 if (!isset($GLOBALS['user_data_cache'][$userid][$keyColumn][$valueColumn])) {
876 // Default is 'guest'
877 $data = getMessage('USERNAME_GUEST');
879 // Can we fetch the user data?
880 if (($userId > 0) && (fetchUserData($userId, $keyColumn))) {
881 // Now get the data back
882 $data = getUserData($valueColumn);
886 $GLOBALS['user_data_cache'][$userid][$keyColumn][$valueColumn] = $data;
890 return $GLOBALS['user_data_cache'][$userid][$keyColumn][$valueColumn];
893 // Wrapper for strpos() to ease porting from deprecated ereg() function
894 function isInString ($needle, $haystack) {
895 //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'needle=' . $needle . ', haystack=' . $haystack . ', returned=' . intval(strpos($haystack, $needle) !== false));
896 return (strpos($haystack, $needle) !== false);
899 // Wrapper for strpos() to ease porting from deprecated eregi() function
900 // This function is case-insensitive
901 function isInStringIgnoreCase ($needle, $haystack) {
902 return (isInString(strtolower($needle), strtolower($haystack)));
905 // Wrapper to check for if fatal errors where detected
906 function ifFatalErrorsDetected () {
907 // Just call the inner function
908 return (getTotalFatalErrors() > 0);