<?php
defined('_VALID_MOS') or die('Direct Access to this location is not allowed.');
/**
* Генерация блоков для отображения с сайта SotMarket.ru
* Для помощи в настройки скрипта прочитайте README
*/
/**
* Класс реализует работу с протоколом HTTP 1.1
*/
include("cache_function_sotmar.php");
$version_sm_mag='201';

if(isset($_GET['mag_manufacter']))
{
if(!is_numeric($_GET['mag_manufacter']))
{
unset($_GET['mag_manufacter']);
echo '<font color="red"><b>ОШИБКА: значение производителя('.$_GET['mag_manufacter'].') не числовой параметр</b></font>';
}
}
if(isset($_GET['mag_cat']))
{
if(!is_numeric($_GET['mag_cat']))
{
unset($_GET['mag_cat']);
echo '<font color="red"><b>ОШИБКА: значение категориии('.$_GET['mag_manufacter'].') не числовой параметр</b></font>';
}
}


class SotmarClient
{
/**
* @var string адрес прокси-сервера (если используется)
*/
var $sProxyAddress = NULL;

/**
* @var integer порт прокси-сервера (если используется)
*/
var $iProxyPort = NULL;

/**
* @var array массив строк - заголовков запроса HTTP
*/
var $aRequestHeaders;

/**
* @var array массив строк - заголовков ответа HTTP
*/
var $aResponseHeaders = array();

/**
* @var boolean сжимать ли контент. Сжатие происходит только при наличии модуля ZLIB
*/
var $bCanCompress = false;

/**
* Конструктор
*/
function wkSotmarClient()
{
$this->aRequestHeaders = array(
'User-Agent' => $_SERVER['HTTP_USER_AGENT'],
'IPclient' => sotmar_ip_det_sm(),
'Connection' => 'Keep-Alive',
);
}

/**
* Функция устанавливает заголовки, переопределяя установленные ранее.
* @param array $aHeaders [in] массив заголовков
* @return integer true
*/
function SetHeaders($aHeaders)
{
$this->aRequestHeaders = array_merge($this->aRequestHeaders, $aHeaders);
return true;
}

/**
* Устанавливает параметры Basic-аунтификации HTTP
* @param string $sUser [in] username
* @param string $sPassword [in] password
* @return integer true
*/
function SetAuthParams($sUser, $sPassword)
{
$tmp = base64_encode("$sUser:$sPassword");
$this->SetHeaders(array('Authorization' => 'Basic '.$tmp));
return true;
}

/**
* Устанавливает адрес Proxy
* @param string $sAddress [in] адрес прокси-сервера
* @param integer $iPort [in] порт прокси-сервера
* @return integer true
*/
function SetProxy($sAddress, $iPort = 8080)
{
$this->sProxyAddress = $sAddress;
$this->iProxyPort = $iPort;
return true;
}

/**
* Устанавливает параметры Proxy-аунтификации
* @param string $sUser [in] username
* @param string $sPassword [in] password
* @return integer true
*/
function SetProxyAuthParams($sUser, $sPassword)
{
$tmp = base64_encode("$sUser:$sPassword");
$this->SetHeaders(array('Proxy-Authorization' => 'Basic '.$tmp));
return true;
}

/**
* Функция выполняет запрос HTTP 1.1 GET
*
* @global class использует $wk_logger
* @param string $sHost [in] доменное имя сервера
* @param string $sUrl [in] путь к файлу на сервере (напр. '/webkarta/disp_js?qwe=3')
* @param string $iPort [in] порт сервера, опциональный параметр
* @return mixed http response string on succeed or wkError
*/
function Get($sHost, $sUrl, $iPort = 80)
{
$req_str = "GET http://$sHost/$sUrl HTTP/1.0\r\n"
."Host: $sHost\r\n";

if (is_array($this->aRequestHeaders)){
foreach($this->aRequestHeaders as $k => $v)
{
$req_str .= "$k: $v\r\n";
}
}

// включить сжатие, если поддерживается
$bCompress = (boolean)extension_loaded('zlib') && $this->bCanCompress;
if ($bCompress)
{
$req_str .= "Accept-Encoding: gzip,deflate\r\n";
}

$req_str .= "\r\n";

// открываем сокет
$sock_errno = 0;
$sock_errstr = '';

// выбираем, работать напрямую или через прокси
if (empty($this->sProxyAddress))
{
$h = $sHost;
$p = $iPort;
}
else
{
$h = $this->sProxyAddress;
$p = $this->iProxyPort;
}

$sock = @fsockopen($h, $p, $sock_errno, $sock_errstr, 30);
if (FALSE === $sock)
return false;

// посылаем заголовок HTTP
$res = fwrite($sock, $req_str);
if (strlen($req_str) != $res)
return false;

//читаем построчно заголовок ответа HTTP
$bEndOfHeader = false;

while (!feof($sock) && !$bEndOfHeader)
{
$s = fgets($sock, 1024);
$this->aResponseHeaders[] = $s; //todo split by :

// Get Content Length
$param = stristr($s, 'Content-length: ');
if (is_string($param))
{
$content_length = (integer)substr($s, strlen('Content-length: '));
}

// Get Compression Method
$param = stristr($s, 'Content-encoding: ');
if (is_string($param))
{
$compress_method = trim( substr($s, strlen('Content-encoding: ')));
}

// признак конца заголовка
if ("\r\n" == $s) $bEndOfHeader = true;
}

// читаем данные
$res = '';
while (!feof($sock))
{
$tmp = fread($sock, 128);
$res .= $tmp;
}

// закрываем сокет
fclose($sock);

// если контент сжат расжать
if (isset($compress_method))
{
switch ($compress_method)
{
case 'gzip' :
$res = gzuncompress($res);
break;

case 'deflate' :
$res = gzinflate($res);
break;
default:
return 1;
}
}
return $res;
}
}
auth_sotmarket();
function auth_sotmarket()
{
global $_GET, $HTTP_POST_VARS, $HTTP_HOST;
foreach($_GET as $key=>$val){
if ('mag_csotset_'==substr($key, 0, 12))
{
$val= preg_replace("/ +/" ,"+", $val);
setcookie(str_replace('mag_csotset_', 'mag_csot_', $key), $val, time()+ (365 * 24 * 3600));
}
}
if(isset($_POST['mag_customerid']) and !isset($_COOKIE['sotmarketid']))
{
setcookie('sotmarketid', $_POST['mag_customerid'], time()+ (365 * 24 * 3600));
}

if(!isset($_COOKIE["test_login"]) and !isset($_GET['mag_errorlogin']))
{
setcookie('test_login', 'test_login', time()+ (365 * 24 * 3600), '', '', ((getenv('HTTPS') == 'on') ? 1 : 0));
}
if(!isset($_GET['auth'])) $auth="";
else $auth=$_GET['auth'];
if($auth=="yes" and isset($_POST['mag_passmagaz']) and isset($_POST['mag_mail']))
{
if(!isset($_COOKIE["email_address"]) and !isset($_COOKIE["password"]))
{
$cookie_path="/";

setcookie('email_address', $_POST['mag_mail'], time()+ (365 * 24 * 3600), $cookie_path, 'sotmarket.ru', ((getenv('HTTPS') == 'on') ? 1 : 0));
setcookie('password', $_POST['mag_passmagaz'], time()+ (365 * 24 * 3600), $cookie_path, 'sotmarket.ru', ((getenv('HTTPS') == 'on') ? 1 : 0));
}}
if(!isset($_COOKIE["mag_cook_client"]) and isset($_GET['mag_client']))
{
setcookie('mag_cook_client', $_GET['mag_client'], time()+ (365 * 24 * 3600));
//setcookie('mag_cook_client', '', time()-(365 * 24 * 3600));
}
}
function magaz($sDealerURL,$iDealerID, $defaultcat='', $def_man=''){
global $version_sm_mag;
$sRequest = 'mag_durl='.urlencode($sDealerURL);
$sRequest .= '&mag_did='.urlencode($iDealerID);
$sRequest .= '&mag_urlpar='.urlencode($_SERVER["HTTP_HOST"].''.$_SERVER["REQUEST_URI"]);

if($defaultcat!='')
{
$sRequest .= '&mag_defaultcat='.urlencode($defaultcat);
}
if($def_man!='')
{
$sRequest .= '&mag_defman='.urlencode($def_man);
}

if(isset($_GET['magaz']) and !isset($_COOKIE["test_login"]))
{
$sRequest .="&mag_errorlogin=yes";
}
if(isset($_GET['magaz'])) $sotmarket=$_GET['magaz'];
else $sotmarket="";
if($sotmarket=='thankyou')
{
$sRequest .= '&mag_useragent='.urlencode($_SERVER['HTTP_USER_AGENT']);
}




if(isset($_COOKIE["sotmarketid"]))
{

if(strlen($_COOKIE["sotmarketid"])>0)
{
$sRequest .= '&mag_customerid='.$_COOKIE["sotmarketid"];
}}

if(isset($_COOKIE["mag_cook_client"]))
{
$sRequest .= '&mag_cook_client='.$_COOKIE["mag_cook_client"];
}
if(isset($_GET))
{
foreach($_GET as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}
}
if(isset($_POST))
{
foreach($_POST as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}
}
if(isset($_COOKIE))
{
foreach($_COOKIE as $key=>$val){
if ('mag_csot_'==substr($key, 0, 9))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}}
$sRequest .= '&mag_ua='.urlencode($_SERVER['HTTP_USER_AGENT']);
$sRequest .= '&mag_spider='.spider_opred_sotmar();
$sRequest .= '&mag_versionsm='.$version_sm_mag;
$sRequest .= '&mag_clientip='.sotmar_ip_det_sm();

$Soc = new SotmarClient();
$sContent = $Soc->Get('oldpartner.sotmarket.ru', 'partner/dealer.php?'.$sRequest);
return $sContent;
}



function spider_opred_sotmar()
{
$ar_bots=array(
'aport',
'yandex',
'msnbot',
'stackrambler',
'yandexbot',
'almaden.ibm.com',
'appie 1.1',
'architext',
'inktomi',
'ask jeeves',
'asterias2.0',
'augurfind',
'baiduspider',
'bannana_bot',
'bdcindexer',
'crawler',
'crawler@fast',
'docomo',
'fast-webcrawler',
'fluffy the spider',
'frooglebot',
'ibm',
'geobot',
'googlebot',
'gulliver',
'henrythemiragorobot',
'ia_archiver',
'turtle',
'infoseek',
'kit_fireball',
'lachesis',
'lycos_spider',
'mantraagent',
'mercator',
'moget/1.0',
'muscatferret',
'nationaldirectory-webspider',
'naverrobot',
'ncsa beta',
'netresearchserver',
'ng/1.0',
'osis-project',
'polybot',
'pompos',
'scooter',
'eStyleSearch',
'yahoo',
'seventwentyfour',
'sidewinder',
'sleek spider',
'slurp/si',
'slurp@inktomi.com',
'steeler/1.3',
'szukacz',
't-h-u-n-d-e-r-s-t-o-n-e',
'teoma',
'turnitinbot',
'ultraseek',
'vagabondo',
'voilabot',
'w3c_validator',
'zao/0',
'zyborg/1.0',
);
$bot_name='';
$b_n_vip=0;
for($b_f=0; $b_f<count($ar_bots); $b_f++)
{
if(eregi($ar_bots[$b_f], $_SERVER['HTTP_USER_AGENT']))
{
$bot_name=$ar_bots[$b_f];
$b_n_vip=1;
break;
}
}
$bots_razr='yandex;yandexbot;stackrambler;googlebot;mail';
if($bot_name!='')
{
if(eregi($bot_name, $bots_razr))
{
$b_n_vip=2;
}
}

return $b_n_vip;
}

function title_uni($sDealerURL,$iDealerID, $title_id='', $defaultcat='', $def_man=''){
global $version_sm_mag;

if($defaultcat!='')
{
$sRequest .= '&mag_defaultcat='.urlencode($defaultcat);
}
if($def_man!='')
{
$sRequest .= '&mag_defman='.urlencode($def_man);
}
if(isset($_GET))
{
foreach($_GET as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}}
if(isset($_POST))
{
foreach($_POST as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}}
$sRequest .='&mag_spider='.spider_opred_sotmar();
$sRequest .= "&mag_did=".urlencode($iDealerID);
$sRequest .= '&mag_versionsm='.$version_sm_mag;
if($title_id!='')
{
$sRequest .= "&mag_tid=".urlencode($title_id);
}
$Soc = new SotmarClient();

if($title_id!='')
{
$spec_papka_title_uni="title_uni/".$title_id."";
}
$rez_prov=pov_cache_sotmar($spec_papka_title_uni);
if($rez_prov=='1')
{
$sContent=read_sotmar($spec_papka_title_uni);
}
elseif($rez_prov=='0')
{
$sContent=$Soc->Get('oldpartner.sotmarket.ru', 'partner/ver2/title_uni.php?'.$sRequest);
write_sotmar($sContent, $spec_papka_title_uni);
}
else
{
$sContent=$Soc->Get('oldpartner.sotmarket.ru', 'partner/ver2/title_uni.php?'.$sRequest);
}
if(isset($_GET['mag_model']))
{
$sContent=str_replace('[model]', $_GET['mag_model'], $sContent);
}
else
{
$sContent=str_replace('[model]', ' ', $sContent);
}
return $sContent;
}



function title($sDealerURL,$iDealerID, $defaultcat='', $def_man=''){
global $owntitle, $version_sm_mag;

if($defaultcat!='')
{
$sRequest .= '&mag_defaultcat='.urlencode($defaultcat);
}
if($def_man!='')
{
$sRequest .= '&mag_defman='.urlencode($def_man);
}
if(isset($_GET))
{
foreach($_GET as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}}
if(isset($_POST))
{
foreach($_POST as $key=>$val){
if ('mag'==substr($key, 0, 3))
{
$val= preg_replace("/ +/" ,"+", $val);
$sRequest .= '&'.$key.'='.$val;
}
}}
$sRequest .='&mag_spider='.spider_opred_sotmar();
$sRequest .= "&mag_did=".urlencode($iDealerID);
$sRequest .= '&mag_versionsm='.$version_sm_mag;

$Soc = new SotmarClient();

$spec_papka_title_uni="title";
$rez_prov=pov_cache_sotmar($spec_papka_title_uni);


if($rez_prov=='1')
{
$sContent=read_sotmar($spec_papka_title_uni);
}
elseif($rez_prov=='0')
{
$sContent=$Soc->Get('oldpartner-tm.sotmarket.ru', 'partner/ver2/title_simple.php?'.$sRequest);
write_sotmar($sContent, $spec_papka_title_uni);
}
else
{
$sContent=$Soc->Get('oldpartner-tm.sotmarket.ru', 'partner/ver2/title_simple.php?'.$sRequest);
}

if(isset($_GET['mag_model']))
{
$sContent=str_replace('[model]', $_GET['mag_model'], $sContent);
}
else
{
$sContent=str_replace('[model]', '', $sContent);
}
$sContent=str_replace('<own>', $owntitle, $sContent);
return $sContent;
}


function optim($sDealerURL,$iDealerID, $defaultcat='', $def_man=''){
return '';
}

function sotmar_ip_det_sm()
{
global $REMOTE_ADDR;
global $HTTP_X_FORWARDED_FOR, $HTTP_X_FORWARDED, $HTTP_FORWARDED_FOR, $HTTP_FORWARDED;
global $HTTP_VIA, $HTTP_X_COMING_FROM, $HTTP_COMING_FROM;
global $HTTP_SERVER_VARS, $HTTP_ENV_VARS;

// Get some server/environment variables values
if (empty($REMOTE_ADDR)) {
if (!empty($_SERVER) && isset($_SERVER['REMOTE_ADDR'])) {
$REMOTE_ADDR = $_SERVER['REMOTE_ADDR'];
}
else if (!empty($_ENV) && isset($_ENV['REMOTE_ADDR'])) {
$REMOTE_ADDR = $_ENV['REMOTE_ADDR'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['REMOTE_ADDR'])) {
$REMOTE_ADDR = $HTTP_SERVER_VARS['REMOTE_ADDR'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['REMOTE_ADDR'])) {
$REMOTE_ADDR = $HTTP_ENV_VARS['REMOTE_ADDR'];
}
else if (@getenv('REMOTE_ADDR')) {
$REMOTE_ADDR = getenv('REMOTE_ADDR');
}
} // end if
if (empty($HTTP_X_FORWARDED_FOR)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
$HTTP_X_FORWARDED_FOR = $_SERVER['HTTP_X_FORWARDED_FOR'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_X_FORWARDED_FOR'])) {
$HTTP_X_FORWARDED_FOR = $_ENV['HTTP_X_FORWARDED_FOR'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_X_FORWARDED_FOR'])) {
$HTTP_X_FORWARDED_FOR = $HTTP_SERVER_VARS['HTTP_X_FORWARDED_FOR'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_X_FORWARDED_FOR'])) {
$HTTP_X_FORWARDED_FOR = $HTTP_ENV_VARS['HTTP_X_FORWARDED_FOR'];
}
else if (@getenv('HTTP_X_FORWARDED_FOR')) {
$HTTP_X_FORWARDED_FOR = getenv('HTTP_X_FORWARDED_FOR');
}
} // end if
if (empty($HTTP_X_FORWARDED)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_X_FORWARDED'])) {
$HTTP_X_FORWARDED = $_SERVER['HTTP_X_FORWARDED'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_X_FORWARDED'])) {
$HTTP_X_FORWARDED = $_ENV['HTTP_X_FORWARDED'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_X_FORWARDED'])) {
$HTTP_X_FORWARDED = $HTTP_SERVER_VARS['HTTP_X_FORWARDED'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_X_FORWARDED'])) {
$HTTP_X_FORWARDED = $HTTP_ENV_VARS['HTTP_X_FORWARDED'];
}
else if (@getenv('HTTP_X_FORWARDED')) {
$HTTP_X_FORWARDED = getenv('HTTP_X_FORWARDED');
}
} // end if
if (empty($HTTP_FORWARDED_FOR)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_FORWARDED_FOR'])) {
$HTTP_FORWARDED_FOR = $_SERVER['HTTP_FORWARDED_FOR'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_FORWARDED_FOR'])) {
$HTTP_FORWARDED_FOR = $_ENV['HTTP_FORWARDED_FOR'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_FORWARDED_FOR'])) {
$HTTP_FORWARDED_FOR = $HTTP_SERVER_VARS['HTTP_FORWARDED_FOR'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_FORWARDED_FOR'])) {
$HTTP_FORWARDED_FOR = $HTTP_ENV_VARS['HTTP_FORWARDED_FOR'];
}
else if (@getenv('HTTP_FORWARDED_FOR')) {
$HTTP_FORWARDED_FOR = getenv('HTTP_FORWARDED_FOR');
}
} // end if
if (empty($HTTP_FORWARDED)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_FORWARDED'])) {
$HTTP_FORWARDED = $_SERVER['HTTP_FORWARDED'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_FORWARDED'])) {
$HTTP_FORWARDED = $_ENV['HTTP_FORWARDED'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_FORWARDED'])) {
$HTTP_FORWARDED = $HTTP_SERVER_VARS['HTTP_FORWARDED'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_FORWARDED'])) {
$HTTP_FORWARDED = $HTTP_ENV_VARS['HTTP_FORWARDED'];
}
else if (@getenv('HTTP_FORWARDED')) {
$HTTP_FORWARDED = getenv('HTTP_FORWARDED');
}
} // end if
if (empty($HTTP_VIA)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_VIA'])) {
$HTTP_VIA = $_SERVER['HTTP_VIA'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_VIA'])) {
$HTTP_VIA = $_ENV['HTTP_VIA'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_VIA'])) {
$HTTP_VIA = $HTTP_SERVER_VARS['HTTP_VIA'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_VIA'])) {
$HTTP_VIA = $HTTP_ENV_VARS['HTTP_VIA'];
}
else if (@getenv('HTTP_VIA')) {
$HTTP_VIA = getenv('HTTP_VIA');
}
} // end if
if (empty($HTTP_X_COMING_FROM)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_X_COMING_FROM'])) {
$HTTP_X_COMING_FROM = $_SERVER['HTTP_X_COMING_FROM'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_X_COMING_FROM'])) {
$HTTP_X_COMING_FROM = $_ENV['HTTP_X_COMING_FROM'];
}
else if (!empty($HTTP_SERVER_VARS) && isset($HTTP_SERVER_VARS['HTTP_X_COMING_FROM'])) {
$HTTP_X_COMING_FROM = $HTTP_SERVER_VARS['HTTP_X_COMING_FROM'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_X_COMING_FROM'])) {
$HTTP_X_COMING_FROM = $HTTP_ENV_VARS['HTTP_X_COMING_FROM'];
}
else if (@getenv('HTTP_X_COMING_FROM')) {
$HTTP_X_COMING_FROM = getenv('HTTP_X_COMING_FROM');
}
} // end if
if (empty($HTTP_COMING_FROM)) {
if (!empty($_SERVER) && isset($_SERVER['HTTP_COMING_FROM'])) {
$HTTP_COMING_FROM = $_SERVER['HTTP_COMING_FROM'];
}
else if (!empty($_ENV) && isset($_ENV['HTTP_COMING_FROM'])) {
$HTTP_COMING_FROM = $_ENV['HTTP_COMING_FROM'];
}
else if (!empty($HTTP_COMING_FROM) && isset($HTTP_SERVER_VARS['HTTP_COMING_FROM'])) {
$HTTP_COMING_FROM = $HTTP_SERVER_VARS['HTTP_COMING_FROM'];
}
else if (!empty($HTTP_ENV_VARS) && isset($HTTP_ENV_VARS['HTTP_COMING_FROM'])) {
$HTTP_COMING_FROM = $HTTP_ENV_VARS['HTTP_COMING_FROM'];
}
else if (@getenv('HTTP_COMING_FROM')) {
$HTTP_COMING_FROM = getenv('HTTP_COMING_FROM');
}
} // end if

// Gets the default ip sent by the user
if (!empty($REMOTE_ADDR)) {
$direct_ip = $REMOTE_ADDR;
}

// Gets the proxy ip sent by the user
$proxy_ip = '';
if (!empty($HTTP_X_FORWARDED_FOR)) {
$proxy_ip = $HTTP_X_FORWARDED_FOR;
} else if (!empty($HTTP_X_FORWARDED)) {
$proxy_ip = $HTTP_X_FORWARDED;
} else if (!empty($HTTP_FORWARDED_FOR)) {
$proxy_ip = $HTTP_FORWARDED_FOR;
} else if (!empty($HTTP_FORWARDED)) {
$proxy_ip = $HTTP_FORWARDED;
} else if (!empty($HTTP_VIA)) {
$proxy_ip = $HTTP_VIA;
} else if (!empty($HTTP_X_COMING_FROM)) {
$proxy_ip = $HTTP_X_COMING_FROM;
} else if (!empty($HTTP_COMING_FROM)) {
$proxy_ip = $HTTP_COMING_FROM;
} // end if... else if...

// Returns the true IP if it has been found, else FALSE
if (empty($proxy_ip)) {
// True IP without proxy
return $direct_ip;
} else {
$is_ip = ereg('^([0-9]{1,3}\.){3,3}[0-9]{1,3}', $proxy_ip, $regs);
if ($is_ip && (count($regs) > 0)) {
// True IP behind a proxy
return $regs[0];
} else {
// Can't define IP: there is a proxy but we don't have
// information about the true IP
return FALSE;
}
} // end if... else...
} // end of the 'PMA_getIp()' function

?>