DIR : /home/kozerus/public_html/dgs/include/quick_common_orig.php /home/kozerus/public_html/dgs/include <?php /* Dragon Go Server Copyright (C) 2001- Erik Ouchterlony, Rod Ival, Jens-Uwe Gaspar This program is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more details. You should have received a copy of the GNU Affero General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ require_once 'include/globals.php'; require_once 'include/json_pear.php'; require_once 'include/error_functions.php'; require_once 'include/connect2mysql.php'; // $is_down can be overriden for maintenance-allowed users (in config-local.php) // $is_maintenance is not changed (can be used to indicate maintenance-mode) global $is_down, $is_down_message, $is_maintenance; //PHP5 $is_down = false; $is_down_message = "Sorry, the Dragon Go Server is down for an upgrade (starting [21-Apr-2019 11:15 GMT]). \n" . "Please retry in 1-2 hours. \n" . "Don't worry: the clocks are frozen until the server restarts." ; /* "Between 07-10. June 2012 the Dragon Go Server will be down for maintenance. \n" . " Clocks of running games are frozen till the server restarts. \n" . " Status updates of the maintenance are available at: http://senseis.xmp.net/?DragonGoServer" */ $is_maintenance = $is_down; $clocks_stopped = false; //e.g. shortly after big maintenance for safety // chained crons, see 'cron_chained.php' global $chained; //PHP5 $chained = 0; // options settable by admins (user-capabilities) // NOTE: also adjust admin_users.php and admin_show_users.php on adding new options // field Players.AdminOptions //define('ADMOPT_BYPASS_IP_BLOCK', 0x001); // by-passes blocked IP for user define('ADMOPT_DENY_LOGIN', 0x0002); // deny: server usage, login define('ADMOPT_DENY_EDIT_BIO', 0x0004); define('ADMOPT_ALLOW_TOURNEY_CREATE', 0x0008); // allow: tournament creation //define('', 0x0010); // for re-use //define('', 0x0020); // for re-use define('ADMOPT_CANDIDATE_USER_DEL', 0x0040); // candidate for account-deletion define('ADMOPT_HIDE_BIO', 0x0080); // hide user bio define('ADMOPT_FGROUP_ADMIN', 0x0100); // user can see ADMIN-forums define('ADMOPT_FGROUP_DEV', 0x0200); // user can see DEV-forums define('ADMOPT_DENY_FEATURE_VOTE', 0x0400); // deny: voting on features define('ADMOPT_DENY_TOURNEY_CREATE', 0x0800); // deny: tournament creation define('ADMOPT_DENY_TOURNEY_REGISTER', 0x1000); // deny: tournament registration define('ADMOPT_FORUM_NO_POST', 0x2000); // deny: forum posting at all (no new post, no edit) define('ADMOPT_FORUM_MOD_POST', 0x4000); // deny: all new/edited forum posts are moderated define('ADMOPT_DENY_SURVEY_VOTE', 0x8000); // deny: voting on surveys function setTZ( $tz='GMT') { static $curtz; if ( !@$curtz ) $curtz='GMT'; //default $res= $curtz; if ( is_string( $tz) && !empty( $tz) ) { if ( !function_exists('date_default_timezone_set') || !date_default_timezone_set( $tz) ) { putenv( 'TZ='.$tz); //putenv('PHP_TZ='.$tz); //Does not seem to realize something } $curtz= $tz; } return $res; } setTZ('GMT'); //default global $timeadjust; //PHP5 $timeadjust = 0; if ( @is_readable( "timeadjust.php" ) ) include_once( "timeadjust.php" ); if ( !is_numeric($timeadjust) ) $timeadjust = 0; // time() always returns time in UTC global $NOW; //PHP5 $NOW = time() + (int)$timeadjust; define('FMT_PARSE_DATE', 'YYYY-MM-DD hh:mm'); define('FMT_PARSE_DATE2', 'YYYY-MM-DD hh:mm:ss'); define('DATE_FMT', 'Y-m-d H:i'); // see also parseDate()-func define('DATE_FMT2', 'Y-m-d&\n\b\s\p;H:i'); define('DATE_FMT3', 'Y-m-d&\n\b\s\p;H:i:s'); define('DATE_FMT4', 'YmdHis'); define('DATE_FMT5', 'D, Y-m-d H:i T'); // e.g. "Sun, 2013-11-24 15:30 CET" define('DATE_FMT6', 'd-M-Y H:i'); // e.g. "21-Jan-2001 17:55" define('DATE_FMT_TZ', 'd-M-Y H:i:s T (O)'); // with full time-zone, e.g. "05-Jan-2013 23:00:00 CET (+0100)" define('GMDATE_FMT', 'D, d M Y H:i:s \G\M\T'); define('DATE_FMT_YMD', 'Y-m-d'); define('DATE_FMT_QUICK_YMD', 'Y-m-d'); // quick-suite date-format define('DATE_FMT_QUICK', 'Y-m-d H:i:s'); // quick-suite datetime-format define('SESSION_DURATION', SECS_PER_HOUR*12*61); // 1 month (=30.5 days) define('TICK_FREQUENCY', 12); // ticks/hour (every 5 minutes) //a $_REQUEST['handle'] will not overlap $_COOKIE['cookie_handle'] define('COOKIE_PREFIX', 'cookie_'); // don't set UHANDLE_NAME to 'userid' which is the handle of the // user currently browsing the site (associated to 'passwd'). // This one, like 'uid', is an other user that the logged one. define('UHANDLE_NAME', 'user'); //see quick_status.php and get_request_user() /*! SQL-clause-part applied for Games.Status to select all running games. */ define('IS_RUNNING_GAME', " IN ('PLAY','PASS','SCORE','SCORE2') "); // all running-games (play-mode) define('IS_STARTED_GAME', " IN ('KOMI','PLAY','PASS','SCORE','SCORE2') "); // running-games + fair-komi-negotiation, also used for SameOpponent-check //used in daily_cron.php & others (to "mark" forum oldest unread entry) define('FORUM_SECS_NEW_END', 7 * FORUM_WEEKS_NEW_END * SECS_PER_DAY); // [secs] function get_utc_timeinfo( $time=0, $is_assoc=true ) { $oldTZ = setTZ('GMT'); $info = localtime( ($time > 0 ? $time : $GLOBALS['NOW']), $is_assoc); setTZ($oldTZ); return $info; } // NOTE: also calling arg_stripslashes recursively can be exploited: // see http://talks.php.net/show/php-best-practices/26 if ( get_magic_quotes_gpc() ) { function arg_stripslashes( $arg) { if ( is_string( $arg) ) return stripslashes($arg); if ( !is_array( $arg) ) return $arg; return array_map('arg_stripslashes',$arg); } } else { function arg_stripslashes( $arg) { return $arg; } } function safe_getcookie($name) { $cookie = arg_stripslashes((string)@$_COOKIE[COOKIE_PREFIX.$name]); return $cookie; } function get_base_page() { return substr( @$_SERVER['PHP_SELF'], strlen(SUB_PATH)); } // Returns value for passed varname $name or else $default if varname not set or if value is invalid // (invalid = not an element of the optional list containing the valid values) function get_request_arg( $name, $def = '', array $valid_list = null ) { $val = (isset($_REQUEST[$name])) ? arg_stripslashes($_REQUEST[$name]) : $def; //$HTTP_REQUEST_VARS does not exist if ( is_array( $valid_list ) && !is_array( $val ) && !array_key_exists( (string)$val, $valid_list ) ) $val = $def; return $val; } function set_request_arg( $name, $val ) { $_REQUEST[$name] = $val; } /*! \brief emergency-error-page particular useful for errors in constructors, exists script avoiding redirect-loops. */ function init_error( $errcode, $debugmsg=null ) { echo '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">', "\n<HTML>\n", "<BODY style=\"background: #F7F5E3;\">\n", "<center>\n", "<h3>Dragon-Go-Server EMERGENCY ERROR PAGE</h3>\n", "Please report this to the DGS-support!\n", "Error details ($errcode): ", (is_null($debugmsg) ? NO_VALUE : $debugmsg), "", "</center>\n", "\n</BODY>\n</HTML>"; exit; }//init_error // languages and encodings... define('LANG_TRANSL_CHAR', ','); //do not use '-' define('LANG_CHARSET_CHAR', '.'); //do not use '-' //define('LANG_DEF_CHARSET', 'iso-8859-1'); //lowercase define('LANG_DEF_CHARSET', 'utf-8'); //lowercase //used as default load of translations: define('LANG_DEF_LOAD', 'en'.LANG_CHARSET_CHAR.'iso-8859-1'); //lowercase function fnop( $a ) { return $a; } function get_preferred_browser_language() { global $known_languages; //for instance: "fr-FR,fr,en;q=0.8,es;q=0.5,en-us;q=0.3" $accept_langcodes = explode( ',', @$_SERVER['HTTP_ACCEPT_LANGUAGE'] ); //for instance: "UTF-8,*" $accept_charset = strtolower(trim(@$_SERVER['HTTP_ACCEPT_CHARSET'])); $current_q_val = -100; $language = NULL; foreach ( $accept_langcodes as $lang ) { @list($browsercode, $q_val) = explode( ';', $lang); $q_val = trim(preg_replace( '/q=/i', '', $q_val)); if ( empty($q_val) || !is_numeric($q_val) ) $q_val = 1.0; if ( $current_q_val >= $q_val ) continue; // Normalization for the array_key_exists() matchings $browsercode = strtolower(trim($browsercode)); if ( $browsercode == 'n' ) { $language = 'N'; $current_q_val = $q_val; continue; } while ( $browsercode && !array_key_exists($browsercode, $known_languages)) { $tmp = strrpos( $browsercode, '-'); if ( !is_numeric($tmp) || $tmp < 2 ) { $browsercode = ''; break; } $browsercode = substr( $browsercode, 0, $tmp); $q_val-= 1.0; } if ( !$browsercode ) continue; if ( $current_q_val >= $q_val ) continue; $found = false; if ( $accept_charset ) { foreach ( $known_languages[$browsercode] as $charenc => $langname ) { //$charenc = strtolower($charenc); // Normalization if ( strpos( $accept_charset, $charenc) !== false ) { $found = true; break; } } } if ( !$found ) { // No supporting encoding found. Take the first one anyway. reset($known_languages[$browsercode]); $charenc = key($known_languages[$browsercode]); } $language = $browsercode . LANG_CHARSET_CHAR . $charenc; $current_q_val = $q_val; } return $language; } //set the globals $language_used and $encoding_used //if $player_row is absent, use the browser default settings //called by include_translate_group() function recover_language( array $player_row = null ) //must be called from main dir { //see also: include_once( "translations/known_languages.php" ); global $language_used, $encoding_used, $known_languages; if ( !empty( $language_used ) ) //set by a previous call return $language_used; //else first call: find $language_used and $encoding_used if ( !isset($known_languages) ) if ( file_exists( "translations/known_languages.php") ) include_once( "translations/known_languages.php" ); //must be called from main dir if ( !isset($known_languages) ) $known_languages = array(); if ( isset($_REQUEST['language']) ) $language = (string)$_REQUEST['language']; else if ( isset($player_row['Lang']) ) $language = (string)$player_row['Lang']; else $language = 'C'; if ( empty($language) || $language == 'C' ) $language = get_preferred_browser_language(); if ( empty($language) || $language == 'en' ) $language = LANG_DEF_LOAD; @list($browsercode,$encoding_used) = explode( LANG_CHARSET_CHAR, $language, 2); if ( @$browsercode && !@$encoding_used ) { if ( isset($known_languages[$browsercode][LANG_DEF_CHARSET]) ) { $encoding_used = LANG_DEF_CHARSET; } else if ( isset($known_languages[$browsercode]) ) { //get the first suitable encoding reset($known_languages[$browsercode]); $encoding_used = @key($known_languages[$browsercode]); } if ( !@$encoding_used ) $encoding_used = LANG_DEF_CHARSET; if ( $language != 'N' ) $language = $browsercode.LANG_CHARSET_CHAR.$encoding_used; } $language_used = $language; return $language_used; }//recover_language // can't use html_entity_decode() because of the ' ' below: //HTML_SPECIALCHARS or HTML_ENTITIES, ENT_COMPAT or ENT_QUOTES or ENT_NOQUOTES $reverse_htmlentities_table = get_html_translation_table(HTML_ENTITIES, ENT_QUOTES); $reverse_htmlentities_table = array_flip($reverse_htmlentities_table); $reverse_htmlentities_table[' '] = ' '; //else may be '\xa0' as with html_entity_decode() function reverse_htmlentities( $str) { //return html_entity_decode($str, ENT_QUOTES, 'UTF-8'); global $reverse_htmlentities_table; return strtr($str, $reverse_htmlentities_table); } // Throws error() with errorcode if current-IP is blocked and no user-ip-block-bypass is active // param row: expect field AdminOptions, if null only check for IP function error_on_blocked_ip( $errorcode, array $row = null ) { //if ( is_array($row) && (@$row['AdminOptions'] & ADMOPT_BYPASS_IP_BLOCK) ) //return; if ( is_blocked_ip() ) { $userid = (is_array($row)) ? @$row['Handle'] : '???'; admin_log( 0, $userid, $errorcode ); error($errorcode); } } // Returns current IP, if used IP is blocked (listed in IP-blocklist set in config.php) // return '' if IP is ok function is_blocked_ip( $ip = null, array $arr_check = null ) { global $ARR_BLOCK_IPLIST; if ( is_null($ip) ) $ip = (string)@$_SERVER['REMOTE_ADDR']; if ( !is_array($arr_check) ) $arr_check = $ARR_BLOCK_IPLIST; // check simple IP-syntax in config-array: 1.2.3.4 (=ip) if ( in_array( $ip, $arr_check ) ) return $ip; // check IP-Syntax in config-array: 1.2.3.4/8 (=subnet), /.../ (=regex) foreach ( $arr_check as $checkip ) { if ( $checkip[0] == '/' ) // regex { if ( preg_match( $checkip, $ip ) ) return $ip; } elseif ( strpos( $checkip, '/' ) !== false ) // subnet { if ( check_subnet_ip( $checkip, $ip ) == 1 ) return $ip; } } return ''; } // Checks, if subnet matches IP, syntax: 1.2.3.4/8 or 1.2.3.4/32 // Return values: 1=ip-matches, 0=ip-not-matching, -1=subnet-syntax-error, -2=ip-syntax-error function check_subnet_ip( $subnet, $ip ) { // NOTE: PHP-ints are always signed, so split IP and check on 24+8-bit-parts // split subnet $arrnet = array(); if ( !preg_match( "/^((\d+\.\d+\.\d+)\.(\d+))\/(\d+)$/", $subnet, $arrnet ) ) return -1; $netbits = $arrnet[4]; if ( $netbits == 32 && strcmp($arrnet[1], $ip) == 0 ) return 1; // ip matching subnet [ip/32] if ( $netbits <= 0 || $netbits > 32 ) return -1; // split ip $arrip = array(); if ( !preg_match( "/^(\d+\.\d+\.\d+)\.(\d+)$/", $ip, $arrip ) ) return -2; // match high 24-bit $ip_high = ip2long("0.{$arrip[1]}"); $net_high = ip2long("0.{$arrnet[2]}"); if ( $netbits < 24 ) { $matchmask = 0xffffff ^ ((1 << (24 - $netbits)) - 1); if ( ($ip_high & $matchmask) == ($net_high & $matchmask) ) return 1; } elseif ( ($ip_high & 0xffffff) != ($net_high & 0xffffff) ) {// high 24-bits don't match return 0; } elseif ( $netbits == 24 ) {// high 24-bits match exactly return 1; } else {// match low 8-bit (netbits != 32, already checked above) $lowbits = $netbits - 24; $ip_low = ip2long("0.0.0.{$arrip[2]}"); $net_low = ip2long("0.0.0.{$arrnet[3]}"); $matchmask = 0xff ^ ((1 << (8 - $lowbits)) - 1); if ( ($ip_low & $matchmask) == ($net_low & $matchmask) ) return 1; } return 0; // no match }//check_subnet_ip function isRunningGame( $status ) { return preg_match("/^(".CHECK_GAME_STATUS_RUNNING.")$/", $status); } function isStartedGame( $status ) { return preg_match("/^(".CHECK_GAME_STATUS_STARTED.")$/", $status); } global $JSON; $JSON = new Services_JSON(); // PEAR-json library // NOTES: Lightweight JSON encoder using PEAR-JSON // working also for PHP4 (and < PHP 5.2 with built-in json-funcs) function dgs_json_encode( $var ) { global $JSON; return $JSON->encode( $var ); } // set quota-count/expire for quick-suite in given array in fields: quota_count, quota_expire function quick_suite_add_quota( array &$arr ) { global $player_row; if ( isset($player_row['VaultCnt']) && isset($player_row['X_VaultTime']) ) { $arr['quota_count'] = (int)@$player_row['VaultCnt']; $arr['quota_expire'] = date(DATE_FMT_QUICK, @$player_row['X_VaultTime']); } } function set_sysmessage( $msg ) { $_REQUEST['sysmsg'] = ( get_magic_quotes_gpc() ) ? addslashes($msg) : $msg; } ?>

Drag mouse to navigate.

Navigation

Left/Right Mouse drag: Changes camera heading.
Up/Sown Mouse drag: Changes camera pitch.
Scroll wheel: Changes camera field of view.
I-Key: Displays Info panel with canvas size, image size and FPS.

17.Aug.2010, Martin Wengenmayer

koh5_pano

Navigation