<?php
/*      (c) Joonas Loppi / joonas.loppi@xs.fi

        Changed: 11.10.2004 (dd.mm.yyyy)
        License: http://creativecommons.org/licenses/by-nc/2.0/

        --- Description ---
        XS Labs TV API example. For wider use contact sales@xs.fi to obtain
        your own license key. The sample key can be deactivated at any time.

        Contact support@xs.fi for any questions.
*/
$key = '6b7u-dTp3-TAmu-6cf7';

function error($str) {
        die('XS TV API: '.$str);
        }

// We need to update the cache
if(!file_exists('tv_cache.dat') || filemtime('tv_cache.dat') < strtotime(date('j F Y'))) {
        $update = file_get_contents('http://service.xs.fi/tv/?v=1&k='.$key);

        $h = &fopen('tv_cache.dat', 'w');
        if($h) {
                fwrite($h, $update, strlen($update));
                fclose($h);
                }

        else error('Cannot open tv_cache.dat for writing.');
        }

$file = explode("\n", file_get_contents('tv_cache.dat'));

$prog = array(); // Program list from tv_cache.dat
$chan = null;    // Currently handling channel
$sday = 0;             // Start of the day (UNIX timestamp)
$prev = 0;             // Previous program's start time

for($i = 0, $c = count($file); $i < $c; $i++) {
        /*      Opcodes: (stolen from XS Labs interface)

                e / Error
                d / Date (unix timestamp/human readable)
                p / Program data (Relative start time/Name/Description)
                c / Channel (Country code (ISO)/Channel name)
                l / Come back later
        */
        $data = substr($file[$i], 1);

        switch($file[$i]{0}) {
                case 'e': // Error occurred.
                  error($data);
                  break;
                case 'd':
                  list($sday) = explode('/', $data);
                  break;
                case 'c':
                  list($iso, $chan) = explode('/', $data);
                  $prev = $sday; // First show's start time is relative to start of the day again
                  break;
                case 'p':
                  if(!array_key_exists($chan, $prog))
                        $prog[$chan] = array();

                  // Showtime is relative, add the previous show's start time
                  list($showTime, $showName, $showDesc) = explode('/', $data);
                  $prev = $showTime+$prev;
                  $prog[$chan][] = array(
                        $prev,
                        $showName,
                        $showDesc);
        }
}

// Fill the 'display' array with 3 currently airing shows.

$display = array();

$now = time();
for(reset($prog); ($key = key($prog)) !== null; next($prog)) {
        $chan = $key;
        $display[$chan] = array();
        $mode = 0;

        for($i = 0, $c = count($prog[$chan]); $i < $c; $i++) {
                if($mode == 0 && $prog[$chan][$i][0] > $now) {
                        $mode = 1;

                        $ex = (array_key_exists($i-1, $prog[$chan]));
                        $display[$chan][] = $prog[$chan][(($ex) ? $i-1 : $i)];
                        }
                elseif($mode == 0) continue; // Ignore the aired shows.

                if(count($display[$chan]) > 2)
                  break; // We only want the 3 latest shows.

                $display[$chan][] = $prog[$chan][$i];
                }
        }

// This chunk of code renders the display array.

for(reset($display); ($key = key($display)) !== null; next($display)) {
        print '<br /><b>'.$key."</b><br />";

        for($i = 0, $c = count($display[$key]); $i < $c; $i++)
          print (($i == 0) ? 'Nyt' : date('G:i', $display[$key][$i][0])).': '.str_replace('&', '&amp;', $display[$key][$i][1])."<br />\n";
        }

?>