playonwii/index.php

   1 <?php
   2
   3 include_once( "functions.php" );
   4
   5 function pretty_date( $date )
   6 {
   7     global $num_to_month;
   8
   9     $tm = mktime(
  10         (int)( substr( $date, 11, 2 ) ),
  11         (int)( substr( $date, 14, 2 ) ),
  12         0,
  13         (int)( substr( $date, 5, 2 ) ),
  14         (int)( substr( $date, 8, 2 ) ),
  15         (int)( substr( $date, 0, 4 ) ) );
  16
  17     return date( "D d M, H:i", $tm );
  18 }
  19
  20 function get_info_from_file( $fn )
  21 {
  22     $title = "";
  23     $sub_title = "";
  24     $description = "";
  25     $date = "";
  26     $channel = "";
  27
  28     $handle = fopen( $fn, "r" );
  29
  30     if( $handle )
  31     {
  32         while ( !feof( $handle ) )
  33         {
  34             $line = fgets( $handle );
  35             $line = substr( $line, 0, -1 );
  36
  37             list( $k, $v ) = split( "=", $line, 2 );
  38
  39             switch( $k )
  40             {
  41                 case "title":
  42                 {
  43                     $title = $v;
  44                     break;
  45                 }
  46                 case "sub_title":
  47                 {
  48                     $sub_title = $v;
  49                     break;
  50                 }
  51                 case "description":
  52                 {
  53                     $description = $v;
  54                     break;
  55                 }
  56                 case "startTime":
  57                 {
  58                     $date = $v;
  59                     break;
  60                 }
  61                 case "channel_pretty":
  62                 {
  63                     $channel = $v;
  64                     break;
  65                 }
  66             }
  67         }
  68
  69         fclose( $handle );
  70     }
  71
  72     return array( $title, $date, $channel, $sub_title, $description );
  73 }
  74
  75 function get_info_from_filename( $fn )
  76 {
  77     if( preg_match( '/^(.*?)-(.*)\\..*$/', $fn, $matches ) )
  78     {
  79         $title = $matches[1];
  80         $date = $matches[2];
  81     }
  82     else
  83     {
  84         $title = substr( $fn, 0, strlen( $fn ) - 4 );
  85         $date = "";
  86     }
  87
  88     return array( $title, $date );
  89 }
  90
  91 function get_info( $filename, $filenames )
  92 {
  93     global $videos_dir;
  94
  95     $title = Null;
  96
  97     if( preg_match( '/^(.*)\\.flv$/', $filename, $matches ) )
  98     {
  99
 100         $infofn = $matches[1] . ".rtvinfo";
 101
 102         if( array_key_exists( $infofn, $filenames ) )
 103         {
 104             list( $title, $date, $channel, $sub_title, $description ) =
 105                 get_info_from_file( $videos_dir . "/" . $infofn );
 106         }
 107         else
 108         {
 109             list( $title, $date ) = get_info_from_filename( $filename );
 110             $channel = "";
 111             $sub_title = "";
 112             $description = "";
 113         }
 114         $titles[$title][] = array( $num, $date, $channel, $sub_title,
 115             $description );
 116         $num++;
 117     }
 118
 119     return array( $title, $date, $channel, $sub_title, $description );
 120 }
 121
 122 // This is a hash filename -> nothing of all files in the directory
 123 $filenames = array();
 124 $handle = opendir( $videos_dir );
 125 if( $handle )
 126 {
 127     while( ( $filename = readdir( $handle ) ) )
 128     {
 129         $filenames[$filename] = '';
 130     }
 131
 132     closedir($handle);
 133 }
 134
 135 // This is a hash title->array( array( filenumber, date, filename, channel ) )
 136 $titles = array();
 137 $num = 0;
 138
 139 $sorted_fns = array_keys( $filenames );
 140 rsort( $sorted_fns );
 141
 142 foreach( $sorted_fns as $filename )
 143 {
 144     list( $title, $date, $channel, $sub_title, $description ) = get_info(
 145         $filename, $filenames );
 146
 147     if( $title != Null )
 148     {
 149         $titles[$title][] = array( $num, $date, $channel, $sub_title,
 150             $description, $filename );
 151         $num++;
 152     }
 153 }
 154
 155 ?>
 156
 157 <html>
 158
 159 <head>
 160     <title>Recorded programmes</title>
 161     <style type="text/css">
 162         body {
 163             font-family: verdana, sans-serif;
 164             text-align: center;
 165         }
 166         a {
 167             text-decoration: none;
 168             color: black;
 169         }
 170         a:hover {
 171             color: red;
 172         }
 173         span.smalltime {
 174             font-size: smaller;
 175             color: gray;
 176         }
 177         span.smalltime:hover {
 178             color: red;
 179         }
 180         th {
 181             font-size: x-large;
 182             font-weight: normal;
 183             color: blue;
 184         }
 185         td.dates {
 186             font-size: small;
 187         }
 188     </style>
 189 </head>
 190
 191 <body>
 192 <h1>Recorded programmes</h1>
 193
 194 <center>
 195 <?php
 196 print "<table cellpadding='2'>\n";
 197         ksort( $titles );
 198         foreach( $titles as $title => $arr )
 199         {
 200             list( $num, $date, $channel, $sub_title ) = $arr[0];
 201             print "<tr><th style='border-style: solid none none none; border-width: 1px; border-color: black;' width='50%' align='right' valign='top'>$title</th><td width='50%' class='dates'>";
 202
 203             foreach( $arr as $lst )
 204             {
 205                 list( $num, $date, $channel, $sub_title, $description,
 206                     $filename ) = $lst;
 207                 print "<a href='play.php?filename=$filename'";
 208
 209                 print " title='$description'";
 210
 211                 print ">";
 212
 213                 if( $sub_title )
 214                 {
 215                     print $sub_title . " <span class='smalltime'>(";
 216                 }
 217
 218                 print pretty_date( $date );
 219
 220                 if( $channel )
 221                 {
 222                     print " on $channel";
 223                 }
 224
 225                 if( $sub_title )
 226                 {
 227                     print ")</span>";
 228                 }
 229
 230                 print "</a><br />";
 231             }
 232             print "</td></tr>\n";
 233             print "<tr><th></th><td><br /></td></tr>";
 234         }
 235         print "</table>\n";
 236 ?>
 237 </center>
 238
 239 </body>
 240
 241 </html>
 242