/** * current rate fetching * * - we used to do historical rates... (but sources keep disappearing for that..) * * this just get's the current rates from the ecb.. * * */ function loadRates() { static $checked = false; if ($checked) { return true; } $checked = true; // how often do we need to know this..? // let's assume we do it once a week.. $x = DB_DataObject::Factory('core_curr_rate'); $x->whereAdd('to_dt > NOW()'); if ($x->count()) { // got some data for beyond today.. return; } // load our default rates to start with.. $dom = simplexml_load_file(dirname(__FILE__) . '/../eurofxref-daily.xml'); $rates['EUR'] = 1.0; $rates['TWD'] = 46.7008412; // taiwan dorlar $rates['VND'] = 25282.24; // veitnam dong? foreach ($dom->Cube->Cube->Cube as $c) { //echo '<PRE>';print_r($c ); $rates[(string) $c['currency']] = (string) $c['rate']; } $rates['RMB'] = $rates['CNY']; // now try loading from latest.. // this may fail... $f = @file_get_contents('http://www.ecb.europa.eu/stats/eurofxref/eurofxref-daily.xml'); if (!strlen($f)) { return false; } $dom = simplexml_load_string($f); $rates['EUR'] = 1.0; foreach ($dom->Cube->Cube->Cube as $c) { //echo '<PRE>';print_r($c ); $rates[(string) $c['currency']] = (string) $c['rate']; } $rates['RMB'] = $rates['CNY']; foreach ($rates as $cur => $in_euro) { $rate = 1.0 / $rates['USD'] * $in_euro; $ov = DB_DataObject::Factory('core_curr_rate'); $ov->curr = $cur; $nl = clone $ov; $ov->orderBy('to_dt DESC'); $ov->limit(1); $nl->from_dt = DB_DataObject::sqlValue("NOW()"); $nl->to_dt = DB_DataObject::sqlValue("NOW() + INTERVAL 7 DAY"); if ($ov->find(true)) { if (strtotime($ov->to_dt) > time()) { continue; } $nl->from_dt = $ov->to_dt; if ($ov->rate == $rate) { // modify the old one to expire $oo = clone $ov; $ov->to_dt = $nl->from_dt; $ov->update($oo); continue; } } else { // no previous record... $nl->from_dt = '1970-01-01 00:00:00'; } $nl->rate = $rate; // create a new row. $nl->insert(); } }