Настройка convertECB.php - [VM1] Общие вопросы и ошибки

<?php

if( !defined( '_VALID_MOS' ) && !defined( '_JEXEC' ) ) die( 'Direct Access to '.basename(__FILE__).' is not allowed.' );

class convertECB {

	function convert( $amountA, $currA='', $currB='' ) {
			global $mosConfig_cachepath, $mosConfig_live_site, $mosConfig_absolute_path,
				$mosConfig_offset, $vendor_currency, $vmLogger;
			// global $vendor_currency is DEFAULT!

		if( !$currA ) {

			$currA = $vendor_currency;

		}

		if( !$currB ) {

			$currB = $GLOBALS['product_currency'];

		}

		// If both currency codes match, do nothing

		if( $currA == $currB ) {

			return $amountA;

		}


# File: usd2.php, v.1.0/20010803
# Скрипт для вывода ... курса доллара, установленного ЦБР
# (c) 2001, Mikhail Turenko, http://www.turenko.net, <mikhail@turenko.net>
# строка "dd/mm/yyyy: 1USD=29.30RUR (+0.02)"

# модифицировано: Сергей Прудников 2009 для VirtuMart

# Базовый URL скрипта на cbr.ru
$scripturl = 'http://www.cbr.ru/scripts/XML_dynamic.asp';

# Начальная дата для запроса  (сегодня - 2 РґРЅСЏ)
$date_1=date('d/m/Y', time()-172800);

# Конечная дата (чтобы учитывать завтра добавьте параметр time()+86400)
$date_2=date('d/m/Y');

# Таким образом, мы получим данные либо за 2, либо за 3 последних дня.
# За 2 - если на "сегодня" курс еще не выставили, иначе - за 3

# Код валюты в архиве данных cbr.ru
$currency_code='R01235';

# URL для запроса данных
$requrl = "{$scripturl}?date_req1={$date_1}&date_req2={$date_2}&VAL_NM_RQ={$currency_code}";

#локальный файл РЅР° хосте, РІ котором РєРµС?ируется РєСѓСЂСЃ
if( is_writable($mosConfig_cachepath) ) {
				$file_curse = $mosConfig_cachepath;
	}
else {
				$file_curse = $mosConfig_absolute_path."/media";
	}
$file_curse .= "/curs_CBRF.txt";

#echo($file_curse.'<BR>');

$date_now_local = gmdate('Ymd', $now); // локальное время хостинга

if(file_exists($file_curse) && filesize( $file_curse ) > 0 ) {
	 $file_datestamp = date('Ymd', filemtime($file_curse));  	// timestamp for the Filename
	 #echo(date('Ymd:i:s', filemtime($file_curse)).' -- файл сущ <BR>');
	 }
else {
	 $file_datestamp = date('Ymd', 0);
	 #echo(date('Ymd:i:s', 0).'-- файл НЕ сущ <BR>');
	 };

$date_now_local = gmdate('Ymd', time());

#echo( $date_now_local."__".$file_datestamp."__дата локальная <BR>");

if( $date_now_local > $file_datestamp )	{    //  время РєРµС?-файла больС?Рµ даты РЅР° хосте более чем РЅР° день - получить новый РёР· ЦБ
				$doc = file($requrl);
				$doc = implode($doc, '');

				# инициализируем массив
				$r = array();

				# ищем <ValCurs>...</ValCurs>
				if(preg_match("/<ValCurs.*?>(.*?)<\/ValCurs>/is", $doc, $m))
					# а потом ищем все вхождения <Record>...</Record>
					preg_match_all("/<Record(.*?)>(.*?)<\/Record>/is", $m[1], $r, PREG_SET_ORDER);

				$m = array();	# его уже использовали, реинициализируем
				$d = array();	# этот тоже проинициализируем

				# Сканируем на предмет самых нужных цифр
				for($i=0; $i<count($r); $i++) {
					if(preg_match("/Date=\"(\d{2})\.(\d{2})\.(\d{4})\"/is", $r[$i][1],$m)) {
						$dv = "{$m[1]}/{$m[2]}/{$m[3]}"; # Приводим дату в норм. вид
						if(preg_match("/<Nominal>(.*?)<\/Nominal>.*?<Value>(.*?)<\/Value>/is", $r[$i][2], $m)) {
							$m[2] = preg_replace("/,/",".",$m[2]);
							$d[] = array($dv, $m[1], $m[2]);
							}
						}
					}

				$last = array_pop($d);				# последний известный день
				$prev = array_pop($d);				# предпосл. известный день
				$date = $last[0];				# отображаемая дата
				$rate = sprintf("%.2f",$last[2]);		# отображаемый курс
				# отображаемое изменение курса, например, "+0.02"
				$delta = (($last[2]>$prev[2])?"+":"").sprintf("%.2f",$last[2]-$prev[2]);

				$handle1 = fopen($file_curse, "w");
				#fwrite($handle1, "{$date}: 1 USD = {$rate} RUR\n"); # ({$delta})
				fwrite($handle1, "{$date} {$rate}\n");
				#fclose($handle);

				#echo('! получили РёР· ЦБ, запиали РІ РєРµС?-файл<BR>');

}  // получили СЃ сайта ЦБ Рё записали РІ файл. иначе читаем РёР· локального файла

else {
				//echo("CBRF - {$date}: 1 USD = {$rate} RUR ({$delta})<BR>");
				$fp = fopen($file_curse,"r");
				$userinfo = fscanf($fp, "%s %f");
				list ($date, $rate) = $userinfo;
				#$contents = fread($fp, filesize ($file_curse));
				fclose($fp);
				#echo ("РљСѓСЂСЃ РІР·СЏС‚ РёР· РєРµС?-файла <BR>");
}

	#echo ("ЦБ Р Р¤ дата: {$date} РєСѓСЂСЃ:  {$rate}<BR>");
	$val = round($amountA * $rate);
	return $val;

	}
}

?>