// // main // $channel_id = $_REQUEST['id']; $chann = sql_findChannel($myc, 'id', $channel_id); print "<h1>Programs for " . $chann['display_name'] . "</h1>\n"; if ($chann['logo']) { print "<img src=\"" . $dconf['urllogos'] . "/" . $chann['xmltvid'] . ".png\">\n"; } print "<h4>ID: " . $chann['id'] . "</h4>\n"; print "<h4>XMLTV ID: " . $chann['xmltvid'] . "</h4>\n"; print "<h4>Language: " . $chann['sched_lang'] . "</h4>\n"; print "<h4>Grabber : " . $chann['grabber'] . "</h4>\n"; print "<h4>Grabber info : " . $chann['grabber_info'] . "</h4>\n"; print "<h4>Exported: " . $chann['export'] . "</h4>\n"; $pdb = sql_findProgram($myc, $channel_id, '', ''); if ($debug) { dbg("programs", $pdb); } print "<h4>Total: " . sizeof($pdb) . " items found</h4>\n"; if ($pdb) { print "<table width=\"75%\">\n"; print "<tr class=\"tableTitle\">\n"; print " <td>Start time</td>\n"; print " <td>End time</td>\n"; print " <td>Title</td>\n"; print " <td>Description</td>\n"; print " <td>Category</td>\n"; print "</tr>\n"; listPrograms($chann['id'], $pdb); print "</table>\n";
} else { print "<h2>" . $lngstrpd['nochanspecified'] . "</h2>"; doexit(); } if (isset($_REQUEST['time'])) { $showtime = $_REQUEST['time']; } else { print "<h2>" . $lngstrpd['notimespecified'] . "</h2>"; doexit(); } $chann = sql_findChannel($myc, 'id', $channel_id); if (!$chann) { print "<h2>" . $lngstrpd['invchanid'] . ": " . $channel_id . "</h2>"; doexit(); } $prog = sql_findProgram($myc, $channel_id, "start_time", strftime("%Y-%m-%d %H:%M:%S", $showtime)); if (!$prog) { print "<h2>" . $lngstrpd['noprogstartingat'] . ": " . strftime("%Y-%m-%d %H:%M:%S", $showtime + date('Z')) . "</h2>"; doexit(); } //dbg("prog",$prog); if ($chann['logo']) { print "<img src=\"" . $dconf['urllogos'] . "/" . $chann['xmltvid'] . ".png\">\n"; } print "<h1>" . $lngstrpd['progdetailsfor'] . " " . $chann['display_name'] . " " . $lngstrpd['at'] . " " . strftime("%Y-%m-%d %H:%M:%S", $showtime + date('Z')) . "</h1>\n"; print "\n<!-- program details table -->\n"; print "<table width=\"75%\" border=\"0\" cellpadding=\"4\" cellspacing=\"2\" class=\"viewprogram\">\n"; print " <tr valign=\"top\" class=\"viewprogram_tableBody\">\n"; print " <td align=\"right\">" . $lngstrpd['prgtitle'] . ":</td>\n"; print " <td align=\"left\">\n"; print " <b>" . $prog[0]['title'] . "</b>\n";