| // +----------------------------------------------------------------------+ // // $Id: Rates_NBP.php,v 1.1.1.1 2003/09/13 15:03:54 mroch Exp $ /** * Exchange rate driver - National Bank of Poland * * Retrieves daily exchange rates from the National Bank of Poland * Snippet from RatesA.html: * * Current average exchange rates of foreign currencies in zlotys defined in 2 * para. 1 and 2 of the Resolution No. 51/2002 of the Management Board of the * National Bank of Poland on the way of calculating and announcing current * exchange rates of foreign currencies, of September 23, 2002 (Dziennik * Urzedowy NBP no. 14, item 39 and no. 20, item 51) * * @link http://www.nbp.pl/Kursy/RatesA.html English HTML version * @link http://www.nbp.pl/Kursy/KursyA.html Polish HTML version (with link to XML) * * @author Piotr Klaban * @copyright Copyright 2003 Piotr Klaban * @license http://www.php.net/license/2_02.txt PHP License 2.0 * @package Services_ExchangeRates */ /** * Include common functions to handle cache and fetch the file from the server */ require_once 'Services/ExchangeRates/Common.php'; /** * National Bank of Poland Exchange Rate Driver * * @package Services_ExchangeRates */ class Services_ExchangeRates_Rates_NBP extends Services_ExchangeRates_Common { /** * URL of XML feed * @var string */ var $feedXMLUrl; /** * URL of HTML page where the XML feed URL is given * @var string */ var $feedHTMLUrl = 'http://www.nbp.pl/Kursy/KursyA.html'; /** * Directory in which the XML file is located * @var string */ var $feedDir = 'http://www.nbp.pl/Kursy/'; /** * Downloads exchange rates in terms of the PLN from the National Bank of * Poland (NBP). This information is updated daily, and is cached by default for 1 hour. * * Returns a multi-dimensional array containing: * 'rates' => associative array of currency codes to exchange rates * 'source' => URL of feed * 'date' => date feed last updated, pulled from the feed (more reliable than file mod time) * * @link http://www.nbp.pl/Kursy/RatesA.html English HTML version * @link http://www.nbp.pl/Kursy/KursyA.html Polish HTML version (with link to XML) * * @param int Length of time to cache (in seconds) * @return array */ function retrieve($cacheLength, $cacheDir) { $return['rates'] = array('PLN' => 1.0); // retrieve XML address $htmlpage = $this->retrieveFile($this->feedHTMLUrl, $cacheLength, $cacheDir); // Example line is: //

powysza tabela w formacie .xml

if (!preg_match('#href="(xml/a\d+z\d+\.xml)"#', $htmlpage, $match)) { Services_ExchangeRates::raiseError("Retrieved url " . $this->feedHTMLUrl . " has no link to XML page", SERVICES_EXCHANGERATES_RETRIEVAL_FAILED); return false; } $this->feedXMLUrl = $this->feedDir . $match[1]; $return['source'] = $this->_feedXMLUrl; // retrieve the feed from the server or cache $root = $this->retrieveXML($this->feedXMLUrl, $cacheLength, $cacheDir); // get down to array of exchange rates foreach ($root->children as $rateinfo) { if ($rateinfo->name == 'pozycja') { $rateinfo->children[4]->content = strtr($rateinfo->children[4]->content, ',', '.'); $value = $rateinfo->children[2]->content // przelicznik (conversion rate) / $rateinfo->children[4]->content; // currency rate $return['rates'][$rateinfo->children[3]->content] = $value; } elseif ($rateinfo->name == 'data_publikacji') { // set date published $return['date'] = $rateinfo->content; } } return $return; } } ?>