git.sesse.net Git - vlc/blob - modules/demux/playlist/sgimb.c

   1 /*****************************************************************************
   2  * sgimb.c: a meta demux to parse sgimb referrer files
   3  *****************************************************************************
   4  * Copyright (C) 2004 the VideoLAN team
   5  * $Id$
   6  *
   7  * Authors: Derk-Jan Hartman <hartman at videolan dot org>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23
  24 /*****************************************************************************
  25  * This is a metademux for the Kasenna MediaBase metafile format.
  26  * Kasenna MediaBase first returns this file when you are trying to access
  27  * their MPEG streams (MIME: application/x-sgimb). Very few applications
  28  * understand this format and the format is not really documented on the net.
  29  * Following a typical MediaBase file. Notice the sgi prefix of all the elements.
  30  * This stems from the fact that the MediaBase servers were first introduced by SGI?????.
  31  *
  32  * sgiNameServerHost=host.name.tld
  33  *     Obvious: the host hosting this stream
  34  * Stream="xdma://host.name.tld/demo/a_very_cool.mpg"
  35  *     Not always present. xdma can be read as RTSP.
  36  * sgiMovieName=/demo/a_very_cool.mpg
  37  *     The path to the asset
  38  * sgiAuxState=1|2
  39  *     AuxState=2 is always Video On Demand (so not Scheduled)
  40  *     Not present with Live streams
  41  * sgiLiveFeed=True|False
  42  *     Denounces if the stream is live or from assets (Canned?)
  43  *     Live appears as a little sattelite dish in the web interface of Kasenna
  44  * sgiFormatName=PARTNER_41_MPEG-4
  45  *     The type of stream. One of:
  46  *       PARTNER_41_MPEG-4 (RTSP MPEG-4 fully compliant)
  47  *       MPEG1-Audio       (MP3 Audio streams in MPEG TS)
  48  *       MPEG-1            (MPEG 1 A/V in MPEG TS)
  49  *       MPEG-2            (MPEG 2 A/V in MPEG TS)
  50  * sgiWidth=720
  51  *     The width of the to be received stream. Only present if stream is not Live.
  52  * sgiHeight=576
  53  *     The height of the to be received stream. Only present if stream is not Live.
  54  * sgiBitrate=1630208
  55  *     The bitrate of the to be received stream. Only present if stream is not Live.
  56  * sgiDuration=378345000
  57  *     The duration of the to be received stream. Only present if stream is not Live.
  58  * sgiQTFileBegin
  59  * rtsptext
  60  * rtsp://host.name.tld/demo/a_very_cool.mpg
  61  * sgiQTFileEnd
  62  *     Sometimes present. QT will recognize this as a RTSP reference file, if present.
  63  * sgiApplicationName=MediaBaseURL
  64  *     Beats me !! :)
  65  * sgiElapsedTime=0
  66  *     Time passed since the asset was started (resets for repeating non live assets?)
  67  * sgiMulticastAddress=233.81.233.15
  68  *     The multicast IP used for the Multicast feed.
  69  *     Also defines if a stream is multicast or not. (blue dot in kasenna web interface)
  70  * sgiMulticastPort=1234
  71  *     The multicast port for the same Multicast feed.
  72  * sgiPacketSize=16384
  73  *     The packetsize of the UDP frames that Kasenna sends. They should have used a default
  74  *     that is a multiple of 188 (TS frame size). Most networks don't support more than 1500 anyways.
  75  *     Also, when you lose a frame of this size, imagecorruption is more likely then with smaller
  76  *     frames.
  77  * sgiServerVersion=6.1.2
  78  *     Version of the server
  79  * sgiRtspPort=554
  80  *     TCP port used for RTSP communication
  81  * AutoStart=True
  82  *     Start playing automatically
  83  * DeliveryService=cds
  84  *     Simulcasted (scheduled unicast) content. (Green dot in Kasenna web interface)
  85  * sgiShowingName=A nice name that everyone likes
  86  *     A human readible descriptive title for this stream.
  87  * sgiSid=2311
  88  *     Looks like this is the ID of the scheduled asset?
  89  * sgiUserAccount=pid=1724&time=1078527309&displayText=You%20are%20logged%20as%20guest&
  90  *     User Authentication. Above is a default guest entry. Not required for RTSP communication.
  91  * sgiUserPassword=
  92  *     Password :)
  93  *
  94  *****************************************************************************/
  95
  96
  97 /*****************************************************************************
  98  * Preamble
  99  *****************************************************************************/
 100
 101 #ifdef HAVE_CONFIG_H
 102 # include "config.h"
 103 #endif
 104
 105 #include <vlc_common.h>
 106 #include <vlc_demux.h>
 107 #include "playlist.h"
 108
 109 /*****************************************************************************
 110  * Local prototypes
 111  *****************************************************************************/
 112 #define MAX_LINE 1024
 113
 114 struct demux_sys_t
 115 {
 116     char        *psz_uri;       /* Stream= or sgiQTFileBegin rtsp link */
 117     char        *psz_server;    /* sgiNameServerHost= */
 118     char        *psz_location;  /* sgiMovieName= */
 119     char        *psz_name;      /* sgiShowingName= */
 120     char        *psz_user;      /* sgiUserAccount= */
 121     char        *psz_password;  /* sgiUserPassword= */
 122     char        *psz_mcast_ip;  /* sgiMulticastAddress= */
 123     int         i_mcast_port;   /* sgiMulticastPort= */
 124     int         i_packet_size;  /* sgiPacketSize= */
 125     mtime_t     i_duration;     /* sgiDuration= */
 126     int         i_port;         /* sgiRtspPort= */
 127     int         i_sid;          /* sgiSid= */
 128     bool  b_concert;      /* DeliveryService=cds */
 129     bool  b_rtsp_kasenna; /* kasenna style RTSP */
 130 };
 131
 132 static int Demux ( demux_t *p_demux );
 133 static int Control( demux_t *p_demux, int i_query, va_list args );
 134
 135 /*****************************************************************************
 136  * Activate: initializes m3u demux structures
 137  *****************************************************************************/
 138 int Import_SGIMB( vlc_object_t * p_this )
 139 {
 140     demux_t *p_demux = (demux_t *)p_this;
 141     const uint8_t *p_peek;
 142     int i_size;
 143
 144     /* Lets check the content to see if this is a sgi mediabase file */
 145     i_size = stream_Peek( p_demux->s, &p_peek, MAX_LINE );
 146     i_size -= sizeof("sgiNameServerHost=") - 1;
 147     if ( i_size > 0 )
 148     {
 149         unsigned int i_len = sizeof("sgiNameServerHost=") - 1;
 150         while ( i_size && strncasecmp( (char *)p_peek, "sgiNameServerHost=", i_len ) )
 151         {
 152             p_peek++;
 153             i_size--;
 154         }
 155         if ( !strncasecmp( (char *)p_peek, "sgiNameServerHost=", i_len ) )
 156         {
 157             STANDARD_DEMUX_INIT_MSG( "using SGIMB playlist reader" );
 158             p_demux->p_sys->psz_uri = NULL;
 159             p_demux->p_sys->psz_server = NULL;
 160             p_demux->p_sys->psz_location = NULL;
 161             p_demux->p_sys->psz_name = NULL;
 162             p_demux->p_sys->psz_user = NULL;
 163             p_demux->p_sys->psz_password = NULL;
 164             p_demux->p_sys->psz_mcast_ip = NULL;
 165             p_demux->p_sys->i_mcast_port = 0;
 166             p_demux->p_sys->i_packet_size = 0;
 167             p_demux->p_sys->i_duration = 0;
 168             p_demux->p_sys->i_port = 0;
 169             p_demux->p_sys->i_sid = 0;
 170             p_demux->p_sys->b_rtsp_kasenna = false;
 171             p_demux->p_sys->b_concert = false;
 172
 173             return VLC_SUCCESS;
 174         }
 175     }
 176     return VLC_EGENERIC;
 177 }
 178
 179 /*****************************************************************************
 180  * Deactivate: frees unused data
 181  *****************************************************************************/
 182 void Close_SGIMB( vlc_object_t *p_this )
 183 {
 184     demux_t *p_demux = (demux_t*)p_this;
 185     demux_sys_t *p_sys = p_demux->p_sys;
 186     free( p_sys->psz_uri );
 187     free( p_sys->psz_server );
 188     free( p_sys->psz_location );
 189     free( p_sys->psz_name );
 190     free( p_sys->psz_user );
 191     free( p_sys->psz_password );
 192     free( p_sys->psz_mcast_ip );
 193     free( p_demux->p_sys );
 194     return;
 195 }
 196
 197 static int ParseLine ( demux_t *p_demux, char *psz_line )
 198 {
 199     char        *psz_bol;
 200     demux_sys_t *p_sys = p_demux->p_sys;
 201
 202     psz_bol = psz_line;
 203
 204     /* Remove unnecessary tabs or spaces at the beginning of line */
 205     while( *psz_bol == ' ' || *psz_bol == '\t' ||
 206            *psz_bol == '\n' || *psz_bol == '\r' )
 207     {
 208         psz_bol++;
 209     }
 210
 211     if( !strncasecmp( psz_bol, "rtsp://", sizeof("rtsp://") - 1 ) )
 212     {
 213         /* We found the link, it was inside a sgiQTFileBegin */
 214         free( p_sys->psz_uri );
 215         p_sys->psz_uri = strdup( psz_bol );
 216     }
 217     else if( !strncasecmp( psz_bol, "Stream=\"", sizeof("Stream=\"") - 1 ) )
 218     {
 219         psz_bol += sizeof("Stream=\"") - 1;
 220         if ( !psz_bol )
 221             return 0;
 222         char* psz_tmp = strrchr( psz_bol, '"' );
 223         if( !psz_tmp )
 224             return 0;
 225         psz_tmp[0] = '\0';
 226         /* We cheat around xdma. for some reason xdma links work different then rtsp */
 227         if( !strncasecmp( psz_bol, "xdma://", sizeof("xdma://") - 1 ) )
 228         {
 229             psz_bol[0] = 'r';
 230             psz_bol[1] = 't';
 231             psz_bol[2] = 's';
 232             psz_bol[3] = 'p';
 233         }
 234         free( p_sys->psz_uri );
 235         p_sys->psz_uri = strdup( psz_bol );
 236     }
 237     else if( !strncasecmp( psz_bol, "sgiNameServerHost=", sizeof("sgiNameServerHost=") - 1 ) )
 238     {
 239         psz_bol += sizeof("sgiNameServerHost=") - 1;
 240         free( p_sys->psz_server );
 241         p_sys->psz_server = strdup( psz_bol );
 242     }
 243     else if( !strncasecmp( psz_bol, "sgiMovieName=", sizeof("sgiMovieName=") - 1 ) )
 244     {
 245         psz_bol += sizeof("sgiMovieName=") - 1;
 246         free( p_sys->psz_location );
 247         p_sys->psz_location = strdup( psz_bol );
 248     }
 249     else if( !strncasecmp( psz_bol, "sgiUserAccount=", sizeof("sgiUserAccount=") - 1 ) )
 250     {
 251         psz_bol += sizeof("sgiUserAccount=") - 1;
 252         free( p_sys->psz_user );
 253         p_sys->psz_user = strdup( psz_bol );
 254     }
 255     else if( !strncasecmp( psz_bol, "sgiUserPassword=", sizeof("sgiUserPassword=") - 1 ) )
 256     {
 257         psz_bol += sizeof("sgiUserPassword=") - 1;
 258         free( p_sys->psz_password );
 259         p_sys->psz_password = strdup( psz_bol );
 260     }
 261     else if( !strncasecmp( psz_bol, "sgiShowingName=", sizeof("sgiShowingName=") - 1 ) )
 262     {
 263         psz_bol += sizeof("sgiShowingName=") - 1;
 264         free( p_sys->psz_name );
 265         p_sys->psz_name = strdup( psz_bol );
 266     }
 267     else if( !strncasecmp( psz_bol, "sgiFormatName=", sizeof("sgiFormatName=") - 1 ) )
 268     {
 269         psz_bol += sizeof("sgiFormatName=") - 1;
 270         if( strcasestr( psz_bol, "MPEG-4") == NULL ) /*not mpeg4 found in string */
 271             p_sys->b_rtsp_kasenna = true;
 272     }
 273     else if( !strncasecmp( psz_bol, "sgiMulticastAddress=", sizeof("sgiMulticastAddress=") - 1 ) )
 274     {
 275         psz_bol += sizeof("sgiMulticastAddress=") - 1;
 276         free( p_sys->psz_mcast_ip );
 277         p_sys->psz_mcast_ip = strdup( psz_bol );
 278     }
 279     else if( !strncasecmp( psz_bol, "sgiMulticastPort=", sizeof("sgiMulticastPort=") - 1 ) )
 280     {
 281         psz_bol += sizeof("sgiMulticastPort=") - 1;
 282         p_sys->i_mcast_port = (int) strtol( psz_bol, NULL, 0 );
 283     }
 284     else if( !strncasecmp( psz_bol, "sgiPacketSize=", sizeof("sgiPacketSize=") - 1 ) )
 285     {
 286         psz_bol += sizeof("sgiPacketSize=") - 1;
 287         p_sys->i_packet_size = (int) strtol( psz_bol, NULL, 0 );
 288     }
 289     else if( !strncasecmp( psz_bol, "sgiDuration=", sizeof("sgiDuration=") - 1 ) )
 290     {
 291         psz_bol += sizeof("sgiDuration=") - 1;
 292         p_sys->i_duration = (mtime_t) strtol( psz_bol, NULL, 0 );
 293     }
 294     else if( !strncasecmp( psz_bol, "sgiRtspPort=", sizeof("sgiRtspPort=") - 1 ) )
 295     {
 296         psz_bol += sizeof("sgiRtspPort=") - 1;
 297         p_sys->i_port = (int) strtol( psz_bol, NULL, 0 );
 298     }
 299     else if( !strncasecmp( psz_bol, "sgiSid=", sizeof("sgiSid=") - 1 ) )
 300     {
 301         psz_bol += sizeof("sgiSid=") - 1;
 302         p_sys->i_sid = (int) strtol( psz_bol, NULL, 0 );
 303     }
 304     else if( !strncasecmp( psz_bol, "DeliveryService=cds", sizeof("DeliveryService=cds") - 1 ) )
 305     {
 306         p_sys->b_concert = true;
 307     }
 308     else
 309     {
 310         /* This line isn't really important */
 311         return 0;
 312     }
 313     return VLC_SUCCESS;
 314 }
 315
 316 /*****************************************************************************
 317  * Demux: reads and demuxes data packets
 318  *****************************************************************************
 319  * Returns -1 in case of error, 0 in case of EOF, 1 otherwise
 320  *****************************************************************************/
 321 static int Demux ( demux_t *p_demux )
 322 {
 323     demux_sys_t     *p_sys = p_demux->p_sys;
 324     input_item_t    *p_child = NULL;
 325     char            *psz_line;
 326
 327     input_item_t *p_current_input = GetCurrentItem(p_demux);
 328
 329     while( ( psz_line = stream_ReadLine( p_demux->s ) ) )
 330     {
 331         ParseLine( p_demux, psz_line );
 332         free( psz_line );
 333     }
 334
 335     if( p_sys->psz_mcast_ip )
 336     {
 337         /* Definetly schedules multicast session */
 338         /* We don't care if it's live or not */
 339         free( p_sys->psz_uri );
 340         if( asprintf( &p_sys->psz_uri, "udp://@" "%s:%i", p_sys->psz_mcast_ip, p_sys->i_mcast_port ) == -1 )
 341         {
 342             p_sys->psz_uri = NULL;
 343             return -1;
 344         }
 345     }
 346
 347     if( p_sys->psz_uri == NULL )
 348     {
 349         if( p_sys->psz_server && p_sys->psz_location )
 350         {
 351             if( asprintf( &p_sys->psz_uri, "rtsp://" "%s:%i%s",
 352                      p_sys->psz_server, p_sys->i_port > 0 ? p_sys->i_port : 554, p_sys->psz_location ) == -1 )
 353             {
 354                 p_sys->psz_uri = NULL;
 355                 return -1;
 356             }
 357         }
 358     }
 359
 360     if( p_sys->b_concert )
 361     {
 362         /* It's definetly a simulcasted scheduled stream */
 363         /* We don't care if it's live or not */
 364         if( p_sys->psz_uri == NULL )
 365         {
 366             msg_Err( p_demux, "no URI was found" );
 367             return -1;
 368         }
 369
 370         free( p_sys->psz_uri );
 371         if( asprintf( &p_sys->psz_uri, "%s%%3FMeDiAbAsEshowingId=%d%%26MeDiAbAsEconcert%%3FMeDiAbAsE",
 372                 p_sys->psz_uri, p_sys->i_sid ) == -1 )
 373         {
 374             p_sys->psz_uri = NULL;
 375             return -1;
 376         }
 377     }
 378
 379     p_child = input_item_NewWithType( VLC_OBJECT(p_demux), p_sys->psz_uri,
 380                       p_sys->psz_name ? p_sys->psz_name : p_sys->psz_uri,
 381                       0, NULL, 0, p_sys->i_duration, ITEM_TYPE_NET );
 382
 383     if( !p_child )
 384     {
 385         msg_Err( p_demux, "A valid playlistitem could not be created" );
 386         return -1;
 387     }
 388
 389     input_item_CopyOptions( p_current_input, p_child );
 390     if( p_sys->i_packet_size && p_sys->psz_mcast_ip )
 391     {
 392         char *psz_option;
 393         p_sys->i_packet_size += 1000;
 394         if( asprintf( &psz_option, "mtu=%i", p_sys->i_packet_size ) != -1 )
 395         {
 396             input_item_AddOption( p_child, psz_option, VLC_INPUT_OPTION_TRUSTED );
 397             free( psz_option );
 398         }
 399     }
 400     if( !p_sys->psz_mcast_ip )
 401         input_item_AddOption( p_child, "rtsp-caching=5000", VLC_INPUT_OPTION_TRUSTED );
 402     if( !p_sys->psz_mcast_ip && p_sys->b_rtsp_kasenna )
 403         input_item_AddOption( p_child, "rtsp-kasenna", VLC_INPUT_OPTION_TRUSTED );
 404
 405     input_item_AddSubItem( p_current_input, p_child );
 406     vlc_gc_decref( p_child );
 407     vlc_gc_decref(p_current_input);
 408     return 0; /* Needed for correct operation of go back */
 409 }
 410
 411 static int Control( demux_t *p_demux, int i_query, va_list args )
 412 {
 413     VLC_UNUSED(p_demux); VLC_UNUSED(i_query); VLC_UNUSED(args);
 414     return VLC_EGENERIC;
 415 }
 416