gst/realmedia/rmdemux.c

   1 /* GStreamer RealMedia demuxer
   2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
   3  * Copyright (C) <2003> David A. Schleef <ds@schleef.org>
   4  * Copyright (C) <2004> Stephane Loeuillet <gstreamer@leroutier.net>
   5  * Copyright (C) <2005> Owen Fraser-Green <owen@discobabe.net>
   6  * Copyright (C) <2005> Michael Smith <fluendo.com>
   7  * Copyright (C) <2006> Wim Taymans <wim@fluendo.com>
   8  * Copyright (C) <2006> Tim-Philipp Müller <tim centricular net>
   9  * Copyright (C) <2007> Wim Taymans <wim.taymans@gmail.com>
  10  *
  11  * This library is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU Library General Public
  13  * License as published by the Free Software Foundation; either
  14  * version 2 of the License, or (at your option) any later version.
  15  *
  16  * This library is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19  * Library General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU Library General Public
  22  * License along with this library; if not, write to the
  23  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  24  * Boston, MA 02111-1307, USA.
  25  */
  26
  27 #ifdef HAVE_CONFIG_H
  28 #  include "config.h"
  29 #endif
  30
  31 #include "rmdemux.h"
  32 #include "rdtdepay.h"
  33 #include "rdtmanager.h"
  34 #include "rtspreal.h"
  35 #include "rmutils.h"
  36 #include "rademux.h"
  37
  38 #include <string.h>
  39 #include <ctype.h>
  40
  41 #define RMDEMUX_GUINT32_GET(a)  GST_READ_UINT32_BE(a)
  42 #define RMDEMUX_GUINT16_GET(a)  GST_READ_UINT16_BE(a)
  43 #define RMDEMUX_FOURCC_GET(a)   GST_READ_UINT32_LE(a)
  44 #define HEADER_SIZE 10
  45 #define DATA_SIZE 8
  46
  47 #define MAX_FRAGS 256
  48
  49 typedef struct _GstRMDemuxIndex GstRMDemuxIndex;
  50
  51 struct _GstRMDemuxStream
  52 {
  53   guint32 subtype;
  54   guint32 fourcc;
  55   guint32 subformat;
  56   guint32 format;
  57
  58   int id;
  59   GstPad *pad;
  60   GstFlowReturn last_flow;
  61   int timescale;
  62
  63   int sample_index;
  64   GstRMDemuxIndex *index;
  65   int index_length;
  66   gint framerate_numerator;
  67   gint framerate_denominator;
  68   guint32 seek_offset;
  69
  70   guint16 width;
  71   guint16 height;
  72   guint16 flavor;
  73   guint16 rate;                 /* samplerate         */
  74   guint16 n_channels;           /* channels           */
  75   guint16 sample_width;         /* bits_per_sample    */
  76   guint16 leaf_size;            /* subpacket_size     */
  77   guint32 packet_size;          /* coded_frame_size   */
  78   guint16 version;
  79   guint32 extra_data_size;      /* codec_data_length  */
  80   guint8 *extra_data;           /* extras             */
  81
  82   gboolean needs_descrambling;
  83   guint subpackets_needed;      /* subpackets needed for descrambling    */
  84   GPtrArray *subpackets;        /* array containing subpacket GstBuffers */
  85
  86   /* Variables needed for fixing timestamps. */
  87   GstClockTime next_ts, last_ts;
  88   guint16 next_seq, last_seq;
  89
  90   gint frag_seqnum;
  91   gint frag_subseq;
  92   guint frag_length;
  93   guint frag_current;
  94   guint frag_count;
  95   guint frag_offset[MAX_FRAGS];
  96   GstAdapter *adapter;
  97
  98   GstTagList *pending_tags;
  99 };
 100
 101 struct _GstRMDemuxIndex
 102 {
 103   guint32 offset;
 104   GstClockTime timestamp;
 105 };
 106
 107 static GstElementDetails gst_rmdemux_details = {
 108   "RealMedia Demuxer",
 109   "Codec/Demuxer",
 110   "Demultiplex a RealMedia file into audio and video streams",
 111   "David Schleef <ds@schleef.org>"
 112 };
 113
 114 static GstStaticPadTemplate gst_rmdemux_sink_template =
 115 GST_STATIC_PAD_TEMPLATE ("sink",
 116     GST_PAD_SINK,
 117     GST_PAD_ALWAYS,
 118     GST_STATIC_CAPS ("application/vnd.rn-realmedia")
 119     );
 120
 121 static GstStaticPadTemplate gst_rmdemux_videosrc_template =
 122 GST_STATIC_PAD_TEMPLATE ("video_%02d",
 123     GST_PAD_SRC,
 124     GST_PAD_SOMETIMES,
 125     GST_STATIC_CAPS_ANY);
 126
 127 static GstStaticPadTemplate gst_rmdemux_audiosrc_template =
 128 GST_STATIC_PAD_TEMPLATE ("audio_%02d",
 129     GST_PAD_SRC,
 130     GST_PAD_SOMETIMES,
 131     GST_STATIC_CAPS_ANY);
 132
 133 GST_DEBUG_CATEGORY_STATIC (rmdemux_debug);
 134 #define GST_CAT_DEFAULT rmdemux_debug
 135
 136 static GstElementClass *parent_class = NULL;
 137
 138 static void gst_rmdemux_class_init (GstRMDemuxClass * klass);
 139 static void gst_rmdemux_base_init (GstRMDemuxClass * klass);
 140 static void gst_rmdemux_init (GstRMDemux * rmdemux);
 141 static void gst_rmdemux_finalize (GObject * object);
 142 static GstStateChangeReturn gst_rmdemux_change_state (GstElement * element,
 143     GstStateChange transition);
 144 static GstFlowReturn gst_rmdemux_chain (GstPad * pad, GstBuffer * buffer);
 145 static void gst_rmdemux_loop (GstPad * pad);
 146 static gboolean gst_rmdemux_sink_activate (GstPad * sinkpad);
 147 static gboolean gst_rmdemux_sink_activate_push (GstPad * sinkpad,
 148     gboolean active);
 149 static gboolean gst_rmdemux_sink_activate_pull (GstPad * sinkpad,
 150     gboolean active);
 151 static gboolean gst_rmdemux_sink_event (GstPad * pad, GstEvent * event);
 152 static gboolean gst_rmdemux_src_event (GstPad * pad, GstEvent * event);
 153 static void gst_rmdemux_send_event (GstRMDemux * rmdemux, GstEvent * event);
 154 static const GstQueryType *gst_rmdemux_src_query_types (GstPad * pad);
 155 static gboolean gst_rmdemux_src_query (GstPad * pad, GstQuery * query);
 156 static gboolean gst_rmdemux_perform_seek (GstRMDemux * rmdemux,
 157     GstEvent * event);
 158
 159 static void gst_rmdemux_parse__rmf (GstRMDemux * rmdemux, const guint8 * data,
 160     int length);
 161 static void gst_rmdemux_parse_prop (GstRMDemux * rmdemux, const guint8 * data,
 162     int length);
 163 static void gst_rmdemux_parse_mdpr (GstRMDemux * rmdemux,
 164     const guint8 * data, int length);
 165 static guint gst_rmdemux_parse_indx (GstRMDemux * rmdemux, const guint8 * data,
 166     int length);
 167 static void gst_rmdemux_parse_data (GstRMDemux * rmdemux, const guint8 * data,
 168     int length);
 169 static void gst_rmdemux_parse_cont (GstRMDemux * rmdemux, const guint8 * data,
 170     int length);
 171 static GstFlowReturn gst_rmdemux_parse_packet (GstRMDemux * rmdemux,
 172     GstBuffer * in, guint16 version);
 173 static void gst_rmdemux_parse_indx_data (GstRMDemux * rmdemux,
 174     const guint8 * data, int length);
 175 static void gst_rmdemux_stream_clear_cached_subpackets (GstRMDemux * rmdemux,
 176     GstRMDemuxStream * stream);
 177 static GstRMDemuxStream *gst_rmdemux_get_stream_by_id (GstRMDemux * rmdemux,
 178     int id);
 179
 180 static GType
 181 gst_rmdemux_get_type (void)
 182 {
 183   static GType rmdemux_type = 0;
 184
 185   if (!rmdemux_type) {
 186     static const GTypeInfo rmdemux_info = {
 187       sizeof (GstRMDemuxClass),
 188       (GBaseInitFunc) gst_rmdemux_base_init, NULL,
 189       (GClassInitFunc) gst_rmdemux_class_init,
 190       NULL, NULL, sizeof (GstRMDemux), 0,
 191       (GInstanceInitFunc) gst_rmdemux_init,
 192     };
 193
 194     rmdemux_type =
 195         g_type_register_static (GST_TYPE_ELEMENT, "GstRMDemux", &rmdemux_info,
 196         0);
 197   }
 198   return rmdemux_type;
 199 }
 200
 201 static void
 202 gst_rmdemux_base_init (GstRMDemuxClass * klass)
 203 {
 204   GstElementClass *element_class = GST_ELEMENT_CLASS (klass);
 205
 206   gst_element_class_add_pad_template (element_class,
 207       gst_static_pad_template_get (&gst_rmdemux_sink_template));
 208   gst_element_class_add_pad_template (element_class,
 209       gst_static_pad_template_get (&gst_rmdemux_videosrc_template));
 210   gst_element_class_add_pad_template (element_class,
 211       gst_static_pad_template_get (&gst_rmdemux_audiosrc_template));
 212   gst_element_class_set_details (element_class, &gst_rmdemux_details);
 213 }
 214
 215 static void
 216 gst_rmdemux_class_init (GstRMDemuxClass * klass)
 217 {
 218   GObjectClass *gobject_class;
 219   GstElementClass *gstelement_class;
 220
 221   gobject_class = (GObjectClass *) klass;
 222   gstelement_class = (GstElementClass *) klass;
 223
 224   parent_class = g_type_class_peek_parent (klass);
 225
 226   gstelement_class->change_state = GST_DEBUG_FUNCPTR (gst_rmdemux_change_state);
 227
 228   GST_DEBUG_CATEGORY_INIT (rmdemux_debug, "rmdemux",
 229       0, "Demuxer for Realmedia streams");
 230
 231   gobject_class->finalize = gst_rmdemux_finalize;
 232 }
 233
 234 static void
 235 gst_rmdemux_finalize (GObject * object)
 236 {
 237   GstRMDemux *rmdemux = GST_RMDEMUX (object);
 238
 239   if (rmdemux->adapter) {
 240     g_object_unref (rmdemux->adapter);
 241     rmdemux->adapter = NULL;
 242   }
 243
 244   GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
 245 }
 246
 247 static void
 248 gst_rmdemux_init (GstRMDemux * rmdemux)
 249 {
 250   rmdemux->sinkpad =
 251       gst_pad_new_from_static_template (&gst_rmdemux_sink_template, "sink");
 252   gst_pad_set_event_function (rmdemux->sinkpad,
 253       GST_DEBUG_FUNCPTR (gst_rmdemux_sink_event));
 254   gst_pad_set_chain_function (rmdemux->sinkpad,
 255       GST_DEBUG_FUNCPTR (gst_rmdemux_chain));
 256   gst_pad_set_activate_function (rmdemux->sinkpad,
 257       GST_DEBUG_FUNCPTR (gst_rmdemux_sink_activate));
 258   gst_pad_set_activatepull_function (rmdemux->sinkpad,
 259       GST_DEBUG_FUNCPTR (gst_rmdemux_sink_activate_pull));
 260   gst_pad_set_activatepush_function (rmdemux->sinkpad,
 261       GST_DEBUG_FUNCPTR (gst_rmdemux_sink_activate_push));
 262
 263   gst_element_add_pad (GST_ELEMENT (rmdemux), rmdemux->sinkpad);
 264
 265   rmdemux->adapter = gst_adapter_new ();
 266   rmdemux->first_ts = GST_CLOCK_TIME_NONE;
 267   rmdemux->need_newsegment = TRUE;
 268 }
 269
 270 static gboolean
 271 gst_rmdemux_sink_event (GstPad * pad, GstEvent * event)
 272 {
 273   GstRMDemux *rmdemux;
 274   gboolean ret;
 275
 276   rmdemux = GST_RMDEMUX (gst_pad_get_parent (pad));
 277
 278   GST_LOG_OBJECT (pad, "%s event", GST_EVENT_TYPE_NAME (event));
 279
 280   switch (GST_EVENT_TYPE (event)) {
 281     case GST_EVENT_NEWSEGMENT:
 282       gst_event_unref (event);
 283       ret = TRUE;
 284       break;
 285     default:
 286       ret = gst_pad_event_default (pad, event);
 287       break;
 288   }
 289
 290   gst_object_unref (rmdemux);
 291   return ret;
 292 }
 293
 294 static gboolean
 295 gst_rmdemux_src_event (GstPad * pad, GstEvent * event)
 296 {
 297   gboolean ret = TRUE;
 298
 299   GstRMDemux *rmdemux = GST_RMDEMUX (GST_PAD_PARENT (pad));
 300
 301   GST_LOG_OBJECT (rmdemux, "handling src event");
 302
 303   switch (GST_EVENT_TYPE (event)) {
 304     case GST_EVENT_SEEK:
 305     {
 306       gboolean running;
 307
 308       GST_LOG_OBJECT (rmdemux, "Event on src: SEEK");
 309       /* can't seek if we are not seekable, FIXME could pass the
 310        * seek query upstream after converting it to bytes using
 311        * the average bitrate of the stream. */
 312       if (!rmdemux->seekable) {
 313         ret = FALSE;
 314         GST_DEBUG ("seek on non seekable stream");
 315         goto done_unref;
 316       }
 317
 318       GST_OBJECT_LOCK (rmdemux);
 319       /* check if we can do the seek now */
 320       running = rmdemux->running;
 321       GST_OBJECT_UNLOCK (rmdemux);
 322
 323       /* now do the seek */
 324       if (running) {
 325         ret = gst_rmdemux_perform_seek (rmdemux, event);
 326       } else
 327         ret = TRUE;
 328
 329       gst_event_unref (event);
 330       break;
 331     }
 332     default:
 333       GST_LOG_OBJECT (rmdemux, "Event on src: type=%d", GST_EVENT_TYPE (event));
 334       ret = gst_pad_event_default (pad, event);
 335       break;
 336   }
 337
 338   return ret;
 339
 340 done_unref:
 341   GST_DEBUG ("error handling event");
 342   gst_event_unref (event);
 343   return ret;
 344 }
 345
 346 /* Validate that this looks like a reasonable point to seek to */
 347 static gboolean
 348 gst_rmdemux_validate_offset (GstRMDemux * rmdemux)
 349 {
 350   GstBuffer *buffer;
 351   GstFlowReturn flowret;
 352   guint16 version, length;
 353   gboolean ret = TRUE;
 354
 355   flowret = gst_pad_pull_range (rmdemux->sinkpad, rmdemux->offset, 4, &buffer);
 356
 357   if (flowret != GST_FLOW_OK) {
 358     GST_DEBUG_OBJECT (rmdemux, "Failed to pull data at offset %d",
 359         rmdemux->offset);
 360     return FALSE;
 361   }
 362   /* TODO: Can we also be seeking to a 'DATA' chunk header? Check this.
 363    * Also, for the case we currently handle, can we check any more? It's pretty
 364    * sucky to not be validating a little more heavily than this... */
 365   /* This should now be the start of a data packet header. That begins with
 366    * a 2-byte 'version' field, which has to be 0 or 1, then a length. I'm not
 367    * certain what values are valid for length, but it must always be at least
 368    * 4 bytes, and we can check that it won't take us past our known total size
 369    */
 370
 371   version = RMDEMUX_GUINT16_GET (GST_BUFFER_DATA (buffer));
 372   if (version != 0 && version != 1) {
 373     GST_DEBUG_OBJECT (rmdemux, "Expected version 0 or 1, got %d",
 374         (int) version);
 375     ret = FALSE;
 376   }
 377
 378   length = RMDEMUX_GUINT16_GET (GST_BUFFER_DATA (buffer) + 2);
 379   /* TODO: Also check against total stream length */
 380   if (length < 4) {
 381     GST_DEBUG_OBJECT (rmdemux, "Expected length >= 4, got %d", (int) length);
 382     ret = FALSE;
 383   }
 384
 385   if (ret) {
 386     rmdemux->offset += 4;
 387     gst_adapter_clear (rmdemux->adapter);
 388     gst_adapter_push (rmdemux->adapter, buffer);
 389   } else {
 390     GST_WARNING_OBJECT (rmdemux, "Failed to validate seek offset at %d",
 391         rmdemux->offset);
 392   }
 393
 394   return ret;
 395 }
 396
 397 static gboolean
 398 find_seek_offset_bytes (GstRMDemux * rmdemux, guint target)
 399 {
 400   int i;
 401   GSList *cur;
 402   gboolean ret = FALSE;
 403
 404   if (target < 0)
 405     return FALSE;
 406
 407   for (cur = rmdemux->streams; cur; cur = cur->next) {
 408     GstRMDemuxStream *stream = cur->data;
 409
 410     /* Search backwards through this stream's index until we find the first
 411      * timestamp before our target time */
 412     for (i = stream->index_length - 1; i >= 0; i--) {
 413       if (stream->index[i].offset <= target) {
 414         /* Set the seek_offset for the stream so we don't bother parsing it
 415          * until we've passed that point */
 416         stream->seek_offset = stream->index[i].offset;
 417         rmdemux->offset = stream->index[i].offset;
 418         ret = TRUE;
 419         break;
 420       }
 421     }
 422   }
 423   return ret;
 424 }
 425
 426 static gboolean
 427 find_seek_offset_time (GstRMDemux * rmdemux, GstClockTime time)
 428 {
 429   int i, n_stream;
 430   gboolean ret = FALSE;
 431   GSList *cur;
 432   GstClockTime earliest = GST_CLOCK_TIME_NONE;
 433
 434   n_stream = 0;
 435   for (cur = rmdemux->streams; cur; cur = cur->next, n_stream++) {
 436     GstRMDemuxStream *stream = cur->data;
 437
 438     /* Search backwards through this stream's index until we find the first
 439      * timestamp before our target time */
 440     for (i = stream->index_length - 1; i >= 0; i--) {
 441       if (stream->index[i].timestamp <= time) {
 442         /* Set the seek_offset for the stream so we don't bother parsing it
 443          * until we've passed that point */
 444         stream->seek_offset = stream->index[i].offset;
 445
 446         /* If it's also the earliest timestamp we've seen of all streams, then
 447          * that's our target!
 448          */
 449         if (earliest == GST_CLOCK_TIME_NONE ||
 450             stream->index[i].timestamp < earliest) {
 451           earliest = stream->index[i].timestamp;
 452           rmdemux->offset = stream->index[i].offset;
 453           GST_DEBUG_OBJECT (rmdemux,
 454               "We're looking for %" GST_TIME_FORMAT
 455               " and we found that stream %d has the latest index at %"
 456               GST_TIME_FORMAT, GST_TIME_ARGS (rmdemux->segment.start), n_stream,
 457               GST_TIME_ARGS (earliest));
 458         }
 459
 460         ret = TRUE;
 461
 462         break;
 463       }
 464     }
 465   }
 466   return ret;
 467 }
 468
 469 static gboolean
 470 gst_rmdemux_perform_seek (GstRMDemux * rmdemux, GstEvent * event)
 471 {
 472   gboolean validated;
 473   gboolean ret = TRUE;
 474   gboolean flush, accurate;
 475   GstFormat format;
 476   gdouble rate;
 477   GstSeekFlags flags;
 478   GstSeekType cur_type, stop_type;
 479   gint64 cur, stop;
 480   gboolean update;
 481
 482   if (event) {
 483     GST_DEBUG_OBJECT (rmdemux, "seek with event");
 484
 485     gst_event_parse_seek (event, &rate, &format, &flags,
 486         &cur_type, &cur, &stop_type, &stop);
 487
 488     /* we can only seek on time */
 489     if (format != GST_FORMAT_TIME) {
 490       GST_DEBUG_OBJECT (rmdemux, "can only seek on TIME");
 491       goto error;
 492     }
 493     /* cannot yet do backwards playback */
 494     if (rate <= 0.0) {
 495       GST_DEBUG_OBJECT (rmdemux, "can only seek with positive rate, not %lf",
 496           rate);
 497       goto error;
 498     }
 499   } else {
 500     GST_DEBUG_OBJECT (rmdemux, "seek without event");
 501
 502     flags = 0;
 503     rate = 1.0;
 504   }
 505
 506   GST_DEBUG_OBJECT (rmdemux, "seek, rate %g", rate);
 507
 508   flush = flags & GST_SEEK_FLAG_FLUSH;
 509   accurate = flags & GST_SEEK_FLAG_ACCURATE;
 510
 511   /* first step is to unlock the streaming thread if it is
 512    * blocked in a chain call, we do this by starting the flush. */
 513   if (flush) {
 514     gst_pad_push_event (rmdemux->sinkpad, gst_event_new_flush_start ());
 515     gst_rmdemux_send_event (rmdemux, gst_event_new_flush_start ());
 516   } else {
 517     gst_pad_pause_task (rmdemux->sinkpad);
 518   }
 519
 520   GST_LOG_OBJECT (rmdemux, "Done starting flushes");
 521
 522   /* now grab the stream lock so that streaming cannot continue, for
 523    * non flushing seeks when the element is in PAUSED this could block
 524    * forever. */
 525   GST_PAD_STREAM_LOCK (rmdemux->sinkpad);
 526
 527   GST_LOG_OBJECT (rmdemux, "Took streamlock");
 528
 529   /* close current segment first */
 530   if (rmdemux->segment_running && !flush) {
 531     GstEvent *newseg;
 532
 533     newseg = gst_event_new_new_segment (TRUE, rmdemux->segment.rate,
 534         GST_FORMAT_TIME, rmdemux->segment.start,
 535         rmdemux->segment.last_stop, rmdemux->segment.time);
 536
 537     gst_rmdemux_send_event (rmdemux, newseg);
 538   }
 539
 540   if (event) {
 541     gst_segment_set_seek (&rmdemux->segment, rate, format, flags,
 542         cur_type, cur, stop_type, stop, &update);
 543   }
 544
 545   GST_DEBUG_OBJECT (rmdemux, "segment positions set to %" GST_TIME_FORMAT "-%"
 546       GST_TIME_FORMAT, GST_TIME_ARGS (rmdemux->segment.start),
 547       GST_TIME_ARGS (rmdemux->segment.stop));
 548
 549   /* we need to stop flushing on the sinkpad as we're going to use it
 550    * next. We can do this as we have the STREAM lock now. */
 551   gst_pad_push_event (rmdemux->sinkpad, gst_event_new_flush_stop ());
 552
 553   GST_LOG_OBJECT (rmdemux, "Pushed FLUSH_STOP event");
 554
 555   /* For each stream, find the first index offset equal to or before our seek
 556    * target. Of these, find the smallest offset. That's where we seek to.
 557    *
 558    * Then we pull 4 bytes from that offset, and validate that we've seeked to a
 559    * what looks like a plausible packet.
 560    * If that fails, restart, with the seek target set to one less than the
 561    * offset we just tried. If we run out of places to try, treat that as a fatal
 562    * error.
 563    */
 564   if (!find_seek_offset_time (rmdemux, rmdemux->segment.last_stop)) {
 565     GST_LOG_OBJECT (rmdemux, "Failed to find seek offset by time");
 566     ret = FALSE;
 567     goto done;
 568   }
 569
 570   GST_LOG_OBJECT (rmdemux, "Validating offset %u", rmdemux->offset);
 571   validated = gst_rmdemux_validate_offset (rmdemux);
 572   while (!validated) {
 573     GST_INFO_OBJECT (rmdemux, "Failed to validate offset at %u",
 574         rmdemux->offset);
 575     if (!find_seek_offset_bytes (rmdemux, rmdemux->offset - 1)) {
 576       ret = FALSE;
 577       goto done;
 578     }
 579     validated = gst_rmdemux_validate_offset (rmdemux);
 580   }
 581
 582   GST_LOG_OBJECT (rmdemux, "Found final offset. Excellent!");
 583
 584   /* now we have a new position, prepare for streaming again */
 585   {
 586     /* Reset the demuxer state */
 587     rmdemux->state = RMDEMUX_STATE_DATA_PACKET;
 588
 589     if (flush)
 590       gst_rmdemux_send_event (rmdemux, gst_event_new_flush_stop ());
 591
 592     /* must send newsegment event from streaming thread, so just set flag */
 593     rmdemux->need_newsegment = TRUE;
 594
 595     /* notify start of new segment */
 596     if (rmdemux->segment.flags & GST_SEEK_FLAG_SEGMENT) {
 597       gst_element_post_message (GST_ELEMENT_CAST (rmdemux),
 598           gst_message_new_segment_start (GST_OBJECT_CAST (rmdemux),
 599               GST_FORMAT_TIME, rmdemux->segment.last_stop));
 600     }
 601
 602     /* restart our task since it might have been stopped when we did the
 603      * flush. */
 604     gst_pad_start_task (rmdemux->sinkpad, (GstTaskFunction) gst_rmdemux_loop,
 605         rmdemux->sinkpad);
 606   }
 607
 608 done:
 609   /* streaming can continue now */
 610   GST_PAD_STREAM_UNLOCK (rmdemux->sinkpad);
 611
 612   return TRUE;
 613
 614 error:
 615   {
 616     GST_DEBUG_OBJECT (rmdemux, "seek failed");
 617     return FALSE;
 618   }
 619 }
 620
 621
 622 static gboolean
 623 gst_rmdemux_src_query (GstPad * pad, GstQuery * query)
 624 {
 625   gboolean res = FALSE;
 626   GstRMDemux *rmdemux;
 627
 628   rmdemux = GST_RMDEMUX (gst_pad_get_parent (pad));
 629
 630   switch (GST_QUERY_TYPE (query)) {
 631     case GST_QUERY_POSITION:
 632       GST_DEBUG_OBJECT (rmdemux, "Position query: no idea from demuxer!");
 633       break;
 634     case GST_QUERY_DURATION:{
 635       GstFormat fmt;
 636
 637       gst_query_parse_duration (query, &fmt, NULL);
 638       if (fmt == GST_FORMAT_TIME) {
 639         GST_OBJECT_LOCK (rmdemux);
 640         if (G_LIKELY (rmdemux->running)) {
 641           gst_query_set_duration (query, GST_FORMAT_TIME, rmdemux->duration);
 642           GST_DEBUG_OBJECT (rmdemux, "duration set to %" GST_TIME_FORMAT,
 643               GST_TIME_ARGS (rmdemux->duration));
 644           res = TRUE;
 645         }
 646         GST_OBJECT_UNLOCK (rmdemux);
 647       }
 648       break;
 649     }
 650     case GST_QUERY_SEEKING:{
 651       GstFormat fmt;
 652
 653       gst_query_parse_seeking (query, &fmt, NULL, NULL, NULL);
 654       if (fmt == GST_FORMAT_TIME) {
 655         GST_OBJECT_LOCK (rmdemux);
 656         if (G_LIKELY (rmdemux->running)) {
 657           gst_query_set_seeking (query, GST_FORMAT_TIME, rmdemux->seekable,
 658               0, rmdemux->duration);
 659           res = TRUE;
 660         }
 661         GST_OBJECT_UNLOCK (rmdemux);
 662       }
 663       break;
 664     }
 665     default:
 666       res = gst_pad_query_default (pad, query);
 667       break;
 668   }
 669
 670   gst_object_unref (rmdemux);
 671   return res;
 672 }
 673
 674 static const GstQueryType *
 675 gst_rmdemux_src_query_types (GstPad * pad)
 676 {
 677   static const GstQueryType query_types[] = {
 678     GST_QUERY_POSITION,
 679     GST_QUERY_DURATION,
 680     GST_QUERY_SEEKING,
 681     0
 682   };
 683
 684   return query_types;
 685 }
 686
 687 static void
 688 gst_rmdemux_reset (GstRMDemux * rmdemux)
 689 {
 690   GSList *cur;
 691
 692   GST_OBJECT_LOCK (rmdemux);
 693   rmdemux->running = FALSE;
 694   GST_OBJECT_UNLOCK (rmdemux);
 695
 696   for (cur = rmdemux->streams; cur; cur = cur->next) {
 697     GstRMDemuxStream *stream = cur->data;
 698
 699     g_object_unref (stream->adapter);
 700     gst_rmdemux_stream_clear_cached_subpackets (rmdemux, stream);
 701     gst_element_remove_pad (GST_ELEMENT (rmdemux), stream->pad);
 702     if (stream->pending_tags)
 703       gst_tag_list_free (stream->pending_tags);
 704     if (stream->subpackets)
 705       g_ptr_array_free (stream->subpackets, TRUE);
 706     g_free (stream->index);
 707     g_free (stream);
 708   }
 709   g_slist_free (rmdemux->streams);
 710   rmdemux->streams = NULL;
 711   rmdemux->n_audio_streams = 0;
 712   rmdemux->n_video_streams = 0;
 713
 714   gst_adapter_clear (rmdemux->adapter);
 715   rmdemux->state = RMDEMUX_STATE_HEADER;
 716   rmdemux->have_pads = FALSE;
 717
 718   gst_segment_init (&rmdemux->segment, GST_FORMAT_UNDEFINED);
 719   rmdemux->first_ts = GST_CLOCK_TIME_NONE;
 720   rmdemux->need_newsegment = TRUE;
 721 }
 722
 723 static GstStateChangeReturn
 724 gst_rmdemux_change_state (GstElement * element, GstStateChange transition)
 725 {
 726   GstRMDemux *rmdemux = GST_RMDEMUX (element);
 727   GstStateChangeReturn res;
 728
 729   switch (transition) {
 730     case GST_STATE_CHANGE_NULL_TO_READY:
 731       break;
 732     case GST_STATE_CHANGE_READY_TO_PAUSED:
 733       rmdemux->state = RMDEMUX_STATE_HEADER;
 734       rmdemux->have_pads = FALSE;
 735       gst_segment_init (&rmdemux->segment, GST_FORMAT_TIME);
 736       rmdemux->running = FALSE;
 737       break;
 738     case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
 739       break;
 740     default:
 741       break;
 742   }
 743
 744   res = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
 745
 746   switch (transition) {
 747     case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
 748       break;
 749     case GST_STATE_CHANGE_PAUSED_TO_READY:{
 750       gst_rmdemux_reset (rmdemux);
 751       break;
 752     }
 753     case GST_STATE_CHANGE_READY_TO_NULL:
 754       break;
 755     default:
 756       break;
 757   }
 758
 759   return res;
 760 }
 761
 762 /* this function is called when the pad is activated and should start
 763  * processing data.
 764  *
 765  * We check if we can do random access to decide if we work push or
 766  * pull based.
 767  */
 768 static gboolean
 769 gst_rmdemux_sink_activate (GstPad * sinkpad)
 770 {
 771   if (gst_pad_check_pull_range (sinkpad)) {
 772     return gst_pad_activate_pull (sinkpad, TRUE);
 773   } else {
 774     return gst_pad_activate_push (sinkpad, TRUE);
 775   }
 776 }
 777
 778 /* this function gets called when we activate ourselves in push mode.
 779  * We cannot seek (ourselves) in the stream */
 780 static gboolean
 781 gst_rmdemux_sink_activate_push (GstPad * pad, gboolean active)
 782 {
 783   GstRMDemux *rmdemux;
 784
 785   rmdemux = GST_RMDEMUX (GST_PAD_PARENT (pad));
 786
 787   GST_DEBUG_OBJECT (rmdemux, "activate_push");
 788
 789   rmdemux->seekable = FALSE;
 790
 791   return TRUE;
 792 }
 793
 794 /* this function gets called when we activate ourselves in pull mode.
 795  * We can perform  random access to the resource and we start a task
 796  * to start reading */
 797 static gboolean
 798 gst_rmdemux_sink_activate_pull (GstPad * pad, gboolean active)
 799 {
 800   GstRMDemux *rmdemux;
 801
 802   rmdemux = GST_RMDEMUX (GST_PAD_PARENT (pad));
 803
 804   GST_DEBUG_OBJECT (rmdemux, "activate_pull");
 805
 806   if (active) {
 807     rmdemux->seekable = TRUE;
 808     rmdemux->offset = 0;
 809     rmdemux->loop_state = RMDEMUX_LOOP_STATE_HEADER;
 810     rmdemux->data_offset = G_MAXUINT;
 811
 812     return gst_pad_start_task (pad, (GstTaskFunction) gst_rmdemux_loop, pad);
 813   } else {
 814     return gst_pad_stop_task (pad);
 815   }
 816 }
 817
 818 /* random access mode - just pass over to our chain function */
 819 static void
 820 gst_rmdemux_loop (GstPad * pad)
 821 {
 822   GstRMDemux *rmdemux;
 823   GstBuffer *buffer;
 824   GstFlowReturn ret = GST_FLOW_OK;
 825   guint size;
 826
 827   rmdemux = GST_RMDEMUX (GST_PAD_PARENT (pad));
 828
 829   GST_LOG_OBJECT (rmdemux, "loop with state=%d and offset=0x%x",
 830       rmdemux->loop_state, rmdemux->offset);
 831
 832   switch (rmdemux->state) {
 833     case RMDEMUX_STATE_HEADER:
 834       size = HEADER_SIZE;
 835       break;
 836     case RMDEMUX_STATE_HEADER_DATA:
 837       size = DATA_SIZE;
 838       break;
 839     case RMDEMUX_STATE_DATA_PACKET:
 840       size = rmdemux->avg_packet_size;
 841       break;
 842     case RMDEMUX_STATE_EOS:
 843       GST_LOG_OBJECT (rmdemux, "At EOS, pausing task");
 844       ret = GST_FLOW_UNEXPECTED;
 845       goto need_pause;
 846     default:
 847       GST_LOG_OBJECT (rmdemux, "Default: requires %d bytes (state is %d)",
 848           (int) rmdemux->size, rmdemux->state);
 849       size = rmdemux->size;
 850   }
 851
 852   ret = gst_pad_pull_range (pad, rmdemux->offset, size, &buffer);
 853   if (ret != GST_FLOW_OK) {
 854     if (rmdemux->offset == rmdemux->index_offset) {
 855       /* The index isn't available so forget about it */
 856       rmdemux->loop_state = RMDEMUX_LOOP_STATE_DATA;
 857       rmdemux->offset = rmdemux->data_offset;
 858       GST_OBJECT_LOCK (rmdemux);
 859       rmdemux->running = TRUE;
 860       rmdemux->seekable = FALSE;
 861       GST_OBJECT_UNLOCK (rmdemux);
 862       return;
 863     } else {
 864       GST_DEBUG_OBJECT (rmdemux, "Unable to pull %d bytes at offset 0x%08x "
 865           "(pull_range returned flow %s, state is %d)", (gint) size,
 866           rmdemux->offset, gst_flow_get_name (ret), GST_STATE (rmdemux));
 867       goto need_pause;
 868     }
 869   }
 870
 871   size = GST_BUFFER_SIZE (buffer);
 872
 873   /* Defer to the chain function */
 874   ret = gst_rmdemux_chain (pad, buffer);
 875   if (ret != GST_FLOW_OK) {
 876     GST_DEBUG_OBJECT (rmdemux, "Chain flow failed at offset 0x%08x",
 877         rmdemux->offset);
 878     goto need_pause;
 879   }
 880
 881   rmdemux->offset += size;
 882
 883   switch (rmdemux->loop_state) {
 884     case RMDEMUX_LOOP_STATE_HEADER:
 885       if (rmdemux->offset >= rmdemux->data_offset) {
 886         /* It's the end of the header */
 887         rmdemux->loop_state = RMDEMUX_LOOP_STATE_INDEX;
 888         rmdemux->offset = rmdemux->index_offset;
 889       }
 890       break;
 891     case RMDEMUX_LOOP_STATE_INDEX:
 892       if (rmdemux->state == RMDEMUX_STATE_HEADER) {
 893         if (rmdemux->index_offset == 0) {
 894           /* We've read the last index */
 895           rmdemux->loop_state = RMDEMUX_LOOP_STATE_DATA;
 896           rmdemux->offset = rmdemux->data_offset;
 897           GST_OBJECT_LOCK (rmdemux);
 898           rmdemux->running = TRUE;
 899           GST_OBJECT_UNLOCK (rmdemux);
 900         } else {
 901           /* Get the next index */
 902           rmdemux->offset = rmdemux->index_offset;
 903         }
 904       }
 905       break;
 906     case RMDEMUX_LOOP_STATE_DATA:
 907       break;
 908   }
 909
 910   return;
 911
 912   /* ERRORS */
 913 need_pause:
 914   {
 915     const gchar *reason = gst_flow_get_name (ret);
 916
 917     GST_LOG_OBJECT (rmdemux, "pausing task, reason %s", reason);
 918     rmdemux->segment_running = FALSE;
 919     gst_pad_pause_task (rmdemux->sinkpad);
 920
 921     if (GST_FLOW_IS_FATAL (ret) || ret == GST_FLOW_NOT_LINKED) {
 922       if (ret == GST_FLOW_UNEXPECTED) {
 923         /* perform EOS logic */
 924         if (rmdemux->segment.flags & GST_SEEK_FLAG_SEGMENT) {
 925           gint64 stop;
 926
 927           /* for segment playback we need to post when (in stream time)
 928            * we stopped, this is either stop (when set) or the duration. */
 929           if ((stop = rmdemux->segment.stop) == -1)
 930             stop = rmdemux->segment.duration;
 931
 932           GST_LOG_OBJECT (rmdemux, "Sending segment done, at end of segment");
 933           gst_element_post_message (GST_ELEMENT (rmdemux),
 934               gst_message_new_segment_done (GST_OBJECT (rmdemux),
 935                   GST_FORMAT_TIME, stop));
 936         } else {
 937           /* normal playback, send EOS to all linked pads */
 938           GST_LOG_OBJECT (rmdemux, "Sending EOS, at end of stream");
 939           gst_rmdemux_send_event (rmdemux, gst_event_new_eos ());
 940         }
 941       } else {
 942         GST_ELEMENT_ERROR (rmdemux, STREAM, FAILED,
 943             (NULL), ("stream stopped, reason %s", reason));
 944         gst_rmdemux_send_event (rmdemux, gst_event_new_eos ());
 945       }
 946     }
 947     return;
 948   }
 949 }
 950
 951 static gboolean
 952 gst_rmdemux_fourcc_isplausible (guint32 fourcc)
 953 {
 954   int i;
 955
 956   for (i = 0; i < 4; i++) {
 957     if (!isprint ((int) ((unsigned char *) (&fourcc))[i])) {
 958       return FALSE;
 959     }
 960   }
 961   return TRUE;
 962 }
 963
 964 static GstFlowReturn
 965 gst_rmdemux_chain (GstPad * pad, GstBuffer * buffer)
 966 {
 967   GstFlowReturn ret = GST_FLOW_OK;
 968   const guint8 *data;
 969   guint16 version;
 970   guint avail;
 971
 972   GstRMDemux *rmdemux = GST_RMDEMUX (GST_PAD_PARENT (pad));
 973
 974   gst_adapter_push (rmdemux->adapter, buffer);
 975
 976   GST_LOG_OBJECT (rmdemux, "Chaining buffer of size %d",
 977       GST_BUFFER_SIZE (buffer));
 978
 979   while (TRUE) {
 980     avail = gst_adapter_available (rmdemux->adapter);
 981
 982     GST_LOG_OBJECT (rmdemux, "looping in chain, avail %u", avail);
 983     switch (rmdemux->state) {
 984       case RMDEMUX_STATE_HEADER:
 985       {
 986         if (gst_adapter_available (rmdemux->adapter) < HEADER_SIZE)
 987           goto unlock;
 988
 989         data = gst_adapter_peek (rmdemux->adapter, HEADER_SIZE);
 990
 991         rmdemux->object_id = RMDEMUX_FOURCC_GET (data + 0);
 992         rmdemux->size = RMDEMUX_GUINT32_GET (data + 4) - HEADER_SIZE;
 993         rmdemux->object_version = RMDEMUX_GUINT16_GET (data + 8);
 994
 995         /* Sanity-check. We assume that the FOURCC is printable ASCII */
 996         if (!gst_rmdemux_fourcc_isplausible (rmdemux->object_id)) {
 997           /* Failed. Remain in HEADER state, try again... We flush only
 998            * the actual FOURCC, not the entire header, because we could
 999            * need to resync anywhere at all... really, this should never
1000            * happen. */
1001           GST_WARNING_OBJECT (rmdemux, "Bogus looking header, unprintable "
1002               "FOURCC");
1003           gst_adapter_flush (rmdemux->adapter, 4);
1004
1005           break;
1006         }
1007
1008         GST_LOG_OBJECT (rmdemux, "header found with object_id=%"
1009             GST_FOURCC_FORMAT
1010             " size=%08x object_version=%d",
1011             GST_FOURCC_ARGS (rmdemux->object_id), rmdemux->size,
1012             rmdemux->object_version);
1013
1014         gst_adapter_flush (rmdemux->adapter, HEADER_SIZE);
1015
1016         switch (rmdemux->object_id) {
1017           case GST_MAKE_FOURCC ('.', 'R', 'M', 'F'):
1018             rmdemux->state = RMDEMUX_STATE_HEADER_RMF;
1019             break;
1020           case GST_MAKE_FOURCC ('P', 'R', 'O', 'P'):
1021             rmdemux->state = RMDEMUX_STATE_HEADER_PROP;
1022             break;
1023           case GST_MAKE_FOURCC ('M', 'D', 'P', 'R'):
1024             rmdemux->state = RMDEMUX_STATE_HEADER_MDPR;
1025             break;
1026           case GST_MAKE_FOURCC ('I', 'N', 'D', 'X'):
1027             rmdemux->state = RMDEMUX_STATE_HEADER_INDX;
1028             break;
1029           case GST_MAKE_FOURCC ('D', 'A', 'T', 'A'):
1030             rmdemux->state = RMDEMUX_STATE_HEADER_DATA;
1031             break;
1032           case GST_MAKE_FOURCC ('C', 'O', 'N', 'T'):
1033             rmdemux->state = RMDEMUX_STATE_HEADER_CONT;
1034             break;
1035           default:
1036             rmdemux->state = RMDEMUX_STATE_HEADER_UNKNOWN;
1037             break;
1038         }
1039         break;
1040       }
1041       case RMDEMUX_STATE_HEADER_UNKNOWN:
1042       {
1043         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1044           goto unlock;
1045
1046         GST_WARNING_OBJECT (rmdemux, "Unknown object_id %" GST_FOURCC_FORMAT,
1047             GST_FOURCC_ARGS (rmdemux->object_id));
1048
1049         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1050         rmdemux->state = RMDEMUX_STATE_HEADER;
1051         break;
1052       }
1053       case RMDEMUX_STATE_HEADER_RMF:
1054       {
1055         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1056           goto unlock;
1057
1058         if ((rmdemux->object_version == 0) || (rmdemux->object_version == 1)) {
1059           data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1060
1061           gst_rmdemux_parse__rmf (rmdemux, data, rmdemux->size);
1062         }
1063
1064         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1065         rmdemux->state = RMDEMUX_STATE_HEADER;
1066         break;
1067       }
1068       case RMDEMUX_STATE_HEADER_PROP:
1069       {
1070         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1071           goto unlock;
1072         data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1073
1074         gst_rmdemux_parse_prop (rmdemux, data, rmdemux->size);
1075
1076         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1077         rmdemux->state = RMDEMUX_STATE_HEADER;
1078         break;
1079       }
1080       case RMDEMUX_STATE_HEADER_MDPR:
1081       {
1082         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1083           goto unlock;
1084         data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1085
1086         gst_rmdemux_parse_mdpr (rmdemux, data, rmdemux->size);
1087
1088         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1089         rmdemux->state = RMDEMUX_STATE_HEADER;
1090         break;
1091       }
1092       case RMDEMUX_STATE_HEADER_CONT:
1093       {
1094         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1095           goto unlock;
1096         data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1097
1098         gst_rmdemux_parse_cont (rmdemux, data, rmdemux->size);
1099
1100         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1101         rmdemux->state = RMDEMUX_STATE_HEADER;
1102         break;
1103       }
1104       case RMDEMUX_STATE_HEADER_DATA:
1105       {
1106         /* If we haven't already done so then signal there are no more pads */
1107         if (!rmdemux->have_pads) {
1108           GST_LOG_OBJECT (rmdemux, "no more pads");
1109           gst_element_no_more_pads (GST_ELEMENT (rmdemux));
1110           rmdemux->have_pads = TRUE;
1111         }
1112
1113         /* The actual header is only 8 bytes */
1114         rmdemux->size = DATA_SIZE;
1115         GST_LOG_OBJECT (rmdemux, "data available %d",
1116             gst_adapter_available (rmdemux->adapter));
1117         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1118           goto unlock;
1119
1120         data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1121
1122         gst_rmdemux_parse_data (rmdemux, data, rmdemux->size);
1123
1124         gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1125
1126         rmdemux->state = RMDEMUX_STATE_DATA_PACKET;
1127         break;
1128       }
1129       case RMDEMUX_STATE_HEADER_INDX:
1130       {
1131         if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1132           goto unlock;
1133         data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1134
1135         rmdemux->size = gst_rmdemux_parse_indx (rmdemux, data, rmdemux->size);
1136
1137         /* Only flush the header */
1138         gst_adapter_flush (rmdemux->adapter, HEADER_SIZE);
1139
1140         rmdemux->state = RMDEMUX_STATE_INDX_DATA;
1141         break;
1142       }
1143       case RMDEMUX_STATE_INDX_DATA:
1144       {
1145         /* There's not always an data to get... */
1146         if (rmdemux->size > 0) {
1147           if (gst_adapter_available (rmdemux->adapter) < rmdemux->size)
1148             goto unlock;
1149
1150           data = gst_adapter_peek (rmdemux->adapter, rmdemux->size);
1151
1152           gst_rmdemux_parse_indx_data (rmdemux, data, rmdemux->size);
1153
1154           gst_adapter_flush (rmdemux->adapter, rmdemux->size);
1155         }
1156
1157         rmdemux->state = RMDEMUX_STATE_HEADER;
1158         break;
1159       }
1160       case RMDEMUX_STATE_DATA_PACKET:
1161       {
1162         if (gst_adapter_available (rmdemux->adapter) < 2)
1163           goto unlock;
1164
1165         data = gst_adapter_peek (rmdemux->adapter, 2);
1166         version = RMDEMUX_GUINT16_GET (data);
1167         GST_LOG_OBJECT (rmdemux, "Data packet with version=%d", version);
1168
1169         if (version == 0 || version == 1) {
1170           guint16 length;
1171
1172           if (gst_adapter_available (rmdemux->adapter) < 4)
1173             goto unlock;
1174           data = gst_adapter_peek (rmdemux->adapter, 4);
1175
1176           length = RMDEMUX_GUINT16_GET (data + 2);
1177           GST_LOG_OBJECT (rmdemux, "Got length %d", length);
1178
1179           if (length < 4) {
1180             GST_LOG_OBJECT (rmdemux, "length too small, dropping");
1181             /* Invalid, just drop it */
1182             gst_adapter_flush (rmdemux->adapter, 4);
1183           } else {
1184             GstBuffer *buffer;
1185
1186             avail = gst_adapter_available (rmdemux->adapter);
1187             if (avail < length)
1188               goto unlock;
1189
1190             GST_LOG_OBJECT (rmdemux, "we have %u available and we needed %d",
1191                 avail, length);
1192
1193             /* flush version and length */
1194             gst_adapter_flush (rmdemux->adapter, 4);
1195             length -= 4;
1196
1197             buffer = gst_adapter_take_buffer (rmdemux->adapter, length);
1198
1199             ret = gst_rmdemux_parse_packet (rmdemux, buffer, version);
1200             rmdemux->chunk_index++;
1201           }
1202
1203           if (rmdemux->chunk_index == rmdemux->n_chunks || length == 0)
1204             rmdemux->state = RMDEMUX_STATE_HEADER;
1205         } else {
1206           /* Stream done */
1207           gst_adapter_flush (rmdemux->adapter, 2);
1208
1209           if (rmdemux->data_offset == 0) {
1210             GST_LOG_OBJECT (rmdemux,
1211                 "No further data, internal demux state EOS");
1212             rmdemux->state = RMDEMUX_STATE_EOS;
1213           } else
1214             rmdemux->state = RMDEMUX_STATE_HEADER;
1215         }
1216         break;
1217       }
1218       case RMDEMUX_STATE_EOS:
1219         gst_rmdemux_send_event (rmdemux, gst_event_new_eos ());
1220         goto unlock;
1221       default:
1222         GST_WARNING_OBJECT (rmdemux, "Unhandled state %d", rmdemux->state);
1223         goto unlock;
1224     }
1225   }
1226
1227 unlock:
1228   return ret;
1229 }
1230
1231 static GstRMDemuxStream *
1232 gst_rmdemux_get_stream_by_id (GstRMDemux * rmdemux, int id)
1233 {
1234   GSList *cur;
1235
1236   for (cur = rmdemux->streams; cur; cur = cur->next) {
1237     GstRMDemuxStream *stream = cur->data;
1238
1239     if (stream->id == id) {
1240       return stream;
1241     }
1242   }
1243
1244   return NULL;
1245 }
1246
1247 static void
1248 gst_rmdemux_send_event (GstRMDemux * rmdemux, GstEvent * event)
1249 {
1250   GSList *cur;
1251
1252   for (cur = rmdemux->streams; cur; cur = cur->next) {
1253     GstRMDemuxStream *stream = cur->data;
1254
1255     GST_DEBUG_OBJECT (rmdemux, "Pushing %s event on pad %s",
1256         GST_EVENT_TYPE_NAME (event), GST_PAD_NAME (stream->pad));
1257
1258     gst_event_ref (event);
1259     gst_pad_push_event (stream->pad, event);
1260   }
1261   gst_event_unref (event);
1262 }
1263
1264 static void
1265 gst_rmdemux_add_stream (GstRMDemux * rmdemux, GstRMDemuxStream * stream)
1266 {
1267   GstCaps *stream_caps = NULL;
1268   const gchar *codec_tag = NULL;
1269   const gchar *codec_name = NULL;
1270   int version = 0;
1271
1272   if (stream->subtype == GST_RMDEMUX_STREAM_VIDEO) {
1273     char *name = g_strdup_printf ("video_%02d", rmdemux->n_video_streams);
1274
1275     stream->pad =
1276         gst_pad_new_from_static_template (&gst_rmdemux_videosrc_template, name);
1277     g_free (name);
1278
1279     codec_tag = GST_TAG_VIDEO_CODEC;
1280
1281     switch (stream->fourcc) {
1282       case GST_RM_VDO_RV10:
1283         codec_name = "Real Video 1.0";
1284         version = 1;
1285         break;
1286       case GST_RM_VDO_RV20:
1287         codec_name = "Real Video 2.0";
1288         version = 2;
1289         break;
1290       case GST_RM_VDO_RV30:
1291         codec_name = "Real Video 3.0";
1292         version = 3;
1293         break;
1294       case GST_RM_VDO_RV40:
1295         codec_name = "Real Video 4.0";
1296         version = 4;
1297         break;
1298       default:
1299         stream_caps = gst_caps_new_simple ("video/x-unknown-fourcc",
1300             "fourcc", GST_TYPE_FOURCC, stream->fourcc, NULL);
1301         GST_WARNING_OBJECT (rmdemux,
1302             "Unknown video FOURCC code \"%" GST_FOURCC_FORMAT "\" (%08x)",
1303             GST_FOURCC_ARGS (stream->fourcc), stream->fourcc);
1304     }
1305
1306     if (version) {
1307       stream_caps =
1308           gst_caps_new_simple ("video/x-pn-realvideo", "rmversion", G_TYPE_INT,
1309           (int) version,
1310           "format", G_TYPE_INT,
1311           (int) stream->format,
1312           "subformat", G_TYPE_INT, (int) stream->subformat, NULL);
1313     }
1314
1315     if (stream_caps) {
1316       gst_caps_set_simple (stream_caps,
1317           "width", G_TYPE_INT, stream->width,
1318           "height", G_TYPE_INT, stream->height,
1319           "framerate", GST_TYPE_FRACTION, stream->framerate_numerator,
1320           stream->framerate_denominator, NULL);
1321     }
1322     rmdemux->n_video_streams++;
1323
1324   } else if (stream->subtype == GST_RMDEMUX_STREAM_AUDIO) {
1325     char *name = g_strdup_printf ("audio_%02d", rmdemux->n_audio_streams);
1326
1327     stream->pad =
1328         gst_pad_new_from_static_template (&gst_rmdemux_audiosrc_template, name);
1329     GST_LOG_OBJECT (rmdemux, "Created audio pad \"%s\"", name);
1330     g_free (name);
1331
1332     codec_tag = GST_TAG_AUDIO_CODEC;
1333
1334     switch (stream->fourcc) {
1335         /* Older RealAudio Codecs */
1336       case GST_RM_AUD_14_4:
1337         codec_name = "Real Audio 14.4kbps";
1338         version = 1;
1339         break;
1340
1341       case GST_RM_AUD_28_8:
1342         codec_name = "Real Audio 28.8kbps";
1343         version = 2;
1344         break;
1345
1346         /* DolbyNet (Dolby AC3, low bitrate) */
1347       case GST_RM_AUD_DNET:
1348         codec_name = "AC-3 audio";
1349         stream_caps =
1350             gst_caps_new_simple ("audio/x-ac3", "rate", G_TYPE_INT,
1351             (int) stream->rate, NULL);
1352         stream->needs_descrambling = TRUE;
1353         stream->subpackets_needed = 1;
1354         stream->subpackets = NULL;
1355         break;
1356
1357         /* RealAudio 10 (AAC) */
1358       case GST_RM_AUD_RAAC:
1359         codec_name = "Real Audio 10 (AAC)";
1360         version = 10;
1361         break;
1362
1363         /* MPEG-4 based */
1364       case GST_RM_AUD_RACP:
1365         /* FIXME: codec_name = */
1366         stream_caps =
1367             gst_caps_new_simple ("audio/mpeg", "mpegversion", G_TYPE_INT,
1368             (int) 4, NULL);
1369         break;
1370
1371         /* Sony ATRAC3 */
1372       case GST_RM_AUD_ATRC:
1373         codec_name = "Sony ATRAC3";
1374         stream_caps = gst_caps_new_simple ("audio/x-vnd.sony.atrac3", NULL);
1375         break;
1376
1377         /* RealAudio G2 audio */
1378       case GST_RM_AUD_COOK:
1379         codec_name = "Real Audio G2 (Cook)";
1380         version = 8;
1381         stream->needs_descrambling = TRUE;
1382         stream->subpackets_needed = stream->height;
1383         stream->subpackets = NULL;
1384         break;
1385
1386         /* RALF is lossless */
1387       case GST_RM_AUD_RALF:
1388         /* FIXME: codec_name = */
1389         GST_DEBUG_OBJECT (rmdemux, "RALF");
1390         stream_caps = gst_caps_new_simple ("audio/x-ralf-mpeg4-generic", NULL);
1391         break;
1392
1393         /* Sipro/ACELP.NET Voice Codec (MIME unknown) */
1394       case GST_RM_AUD_SIPR:
1395         /* FIXME: codec_name = */
1396         stream_caps = gst_caps_new_simple ("audio/x-sipro", NULL);
1397         break;
1398
1399       default:
1400         stream_caps = gst_caps_new_simple ("video/x-unknown-fourcc",
1401             "fourcc", GST_TYPE_FOURCC, stream->fourcc, NULL);
1402         GST_WARNING_OBJECT (rmdemux,
1403             "Unknown audio FOURCC code \"%" GST_FOURCC_FORMAT "\" (%08x)",
1404             GST_FOURCC_ARGS (stream->fourcc), stream->fourcc);
1405         break;
1406     }
1407
1408     if (version) {
1409       stream_caps =
1410           gst_caps_new_simple ("audio/x-pn-realaudio", "raversion", G_TYPE_INT,
1411           (int) version, NULL);
1412     }
1413
1414     if (stream_caps) {
1415       gst_caps_set_simple (stream_caps,
1416           "flavor", G_TYPE_INT, (int) stream->flavor,
1417           "rate", G_TYPE_INT, (int) stream->rate,
1418           "channels", G_TYPE_INT, (int) stream->n_channels,
1419           "width", G_TYPE_INT, (int) stream->sample_width,
1420           "leaf_size", G_TYPE_INT, (int) stream->leaf_size,
1421           "packet_size", G_TYPE_INT, (int) stream->packet_size,
1422           "height", G_TYPE_INT, (int) stream->height, NULL);
1423     }
1424     rmdemux->n_audio_streams++;
1425   } else {
1426     GST_WARNING_OBJECT (rmdemux, "not adding stream of type %d, freeing it",
1427         stream->subtype);
1428     g_free (stream);
1429     goto beach;
1430   }
1431
1432   GST_PAD_ELEMENT_PRIVATE (stream->pad) = stream;
1433   rmdemux->streams = g_slist_append (rmdemux->streams, stream);
1434   GST_LOG_OBJECT (rmdemux, "n_streams is now %d",
1435       g_slist_length (rmdemux->streams));
1436
1437   GST_LOG ("stream->pad = %p, stream_caps = %" GST_PTR_FORMAT, stream->pad,
1438       stream_caps);
1439
1440   if (stream->pad && stream_caps) {
1441
1442     GST_LOG_OBJECT (rmdemux, "%d bytes of extra data for stream %s",
1443         stream->extra_data_size, GST_PAD_NAME (stream->pad));
1444
1445     /* add codec_data if there is any */
1446     if (stream->extra_data_size > 0) {
1447       GstBuffer *buffer;
1448
1449       buffer = gst_buffer_new_and_alloc (stream->extra_data_size);
1450       memcpy (GST_BUFFER_DATA (buffer), stream->extra_data,
1451           stream->extra_data_size);
1452
1453       gst_caps_set_simple (stream_caps, "codec_data", GST_TYPE_BUFFER,
1454           buffer, NULL);
1455
1456       gst_buffer_unref (buffer);
1457     }
1458
1459     gst_pad_use_fixed_caps (stream->pad);
1460
1461     gst_pad_set_caps (stream->pad, stream_caps);
1462     gst_pad_set_event_function (stream->pad,
1463         GST_DEBUG_FUNCPTR (gst_rmdemux_src_event));
1464     gst_pad_set_query_type_function (stream->pad,
1465         GST_DEBUG_FUNCPTR (gst_rmdemux_src_query_types));
1466     gst_pad_set_query_function (stream->pad,
1467         GST_DEBUG_FUNCPTR (gst_rmdemux_src_query));
1468
1469     GST_DEBUG_OBJECT (rmdemux, "adding pad %s with caps %" GST_PTR_FORMAT
1470         ", stream_id=%d", GST_PAD_NAME (stream->pad), stream_caps, stream->id);
1471     gst_pad_set_active (stream->pad, TRUE);
1472     gst_element_add_pad (GST_ELEMENT_CAST (rmdemux), stream->pad);
1473
1474     /* save for later, we must send the tags after the newsegment event */
1475     if (codec_name != NULL && codec_tag != NULL) {
1476       stream->pending_tags = gst_tag_list_new ();
1477       gst_tag_list_add (stream->pending_tags, GST_TAG_MERGE_KEEP,
1478           codec_tag, codec_name, NULL);
1479     }
1480   }
1481
1482 beach:
1483
1484   if (stream_caps)
1485     gst_caps_unref (stream_caps);
1486 }
1487
1488 static int
1489 re_skip_pascal_string (const guint8 * ptr)
1490 {
1491   int length;
1492
1493   length = ptr[0];
1494
1495   return length + 1;
1496 }
1497
1498 static void
1499 gst_rmdemux_parse__rmf (GstRMDemux * rmdemux, const guint8 * data, int length)
1500 {
1501   GST_LOG_OBJECT (rmdemux, "file_version: %d", RMDEMUX_GUINT32_GET (data));
1502   GST_LOG_OBJECT (rmdemux, "num_headers: %d", RMDEMUX_GUINT32_GET (data + 4));
1503 }
1504
1505 static void
1506 gst_rmdemux_parse_prop (GstRMDemux * rmdemux, const guint8 * data, int length)
1507 {
1508   GST_LOG_OBJECT (rmdemux, "max bitrate: %d", RMDEMUX_GUINT32_GET (data));
1509   GST_LOG_OBJECT (rmdemux, "avg bitrate: %d", RMDEMUX_GUINT32_GET (data + 4));
1510   GST_LOG_OBJECT (rmdemux, "max packet size: %d",
1511       RMDEMUX_GUINT32_GET (data + 8));
1512   rmdemux->avg_packet_size = RMDEMUX_GUINT32_GET (data + 12);
1513   GST_LOG_OBJECT (rmdemux, "avg packet size: %d", rmdemux->avg_packet_size);
1514   rmdemux->num_packets = RMDEMUX_GUINT32_GET (data + 16);
1515   GST_LOG_OBJECT (rmdemux, "number of packets: %d", rmdemux->num_packets);
1516
1517   GST_LOG_OBJECT (rmdemux, "duration: %d", RMDEMUX_GUINT32_GET (data + 20));
1518   rmdemux->duration = RMDEMUX_GUINT32_GET (data + 20) * GST_MSECOND;
1519
1520   GST_LOG_OBJECT (rmdemux, "preroll: %d", RMDEMUX_GUINT32_GET (data + 24));
1521   rmdemux->index_offset = RMDEMUX_GUINT32_GET (data + 28);
1522   GST_LOG_OBJECT (rmdemux, "offset of INDX section: 0x%08x",
1523       rmdemux->index_offset);
1524   rmdemux->data_offset = RMDEMUX_GUINT32_GET (data + 32);
1525   GST_LOG_OBJECT (rmdemux, "offset of DATA section: 0x%08x",
1526       rmdemux->data_offset);
1527   GST_LOG_OBJECT (rmdemux, "n streams: %d", RMDEMUX_GUINT16_GET (data + 36));
1528   GST_LOG_OBJECT (rmdemux, "flags: 0x%04x", RMDEMUX_GUINT16_GET (data + 38));
1529 }
1530
1531 static void
1532 gst_rmdemux_parse_mdpr (GstRMDemux * rmdemux, const guint8 * data, int length)
1533 {
1534   GstRMDemuxStream *stream;
1535   char *stream1_type_string;
1536   char *stream2_type_string;
1537   guint str_len = 0;
1538   int stream_type;
1539   int offset;
1540
1541   stream = g_new0 (GstRMDemuxStream, 1);
1542
1543   stream->id = RMDEMUX_GUINT16_GET (data);
1544   stream->index = NULL;
1545   stream->seek_offset = 0;
1546   stream->last_flow = GST_FLOW_OK;
1547   stream->adapter = gst_adapter_new ();
1548   GST_LOG_OBJECT (rmdemux, "stream_number=%d", stream->id);
1549
1550   offset = 30;
1551   stream_type = GST_RMDEMUX_STREAM_UNKNOWN;
1552   stream1_type_string = gst_rm_utils_read_string8 (data + offset,
1553       length - offset, &str_len);
1554   offset += str_len;
1555   stream2_type_string = gst_rm_utils_read_string8 (data + offset,
1556       length - offset, &str_len);
1557   offset += str_len;
1558
1559   /* stream1_type_string for audio and video stream is a "put_whatever_you_want" field :
1560    * observed values :
1561    * - "[The ]Video/Audio Stream" (File produced by an official Real encoder)
1562    * - "RealVideoPremierePlugIn-VIDEO/AUDIO" (File produced by Abobe Premiere)
1563    *
1564    * so, we should not rely on it to know which stream type it is
1565    */
1566
1567   GST_LOG_OBJECT (rmdemux, "stream type: %s", stream1_type_string);
1568   GST_LOG_OBJECT (rmdemux, "MIME type=%s", stream2_type_string);
1569
1570   if (strcmp (stream2_type_string, "video/x-pn-realvideo") == 0) {
1571     stream_type = GST_RMDEMUX_STREAM_VIDEO;
1572   } else if (strcmp (stream2_type_string,
1573           "video/x-pn-multirate-realvideo") == 0) {
1574     stream_type = GST_RMDEMUX_STREAM_VIDEO;
1575   } else if (strcmp (stream2_type_string, "audio/x-pn-realaudio") == 0) {
1576     stream_type = GST_RMDEMUX_STREAM_AUDIO;
1577   } else if (strcmp (stream2_type_string,
1578           "audio/x-pn-multirate-realaudio") == 0) {
1579     stream_type = GST_RMDEMUX_STREAM_AUDIO;
1580   } else if (strcmp (stream2_type_string,
1581           "audio/x-pn-multirate-realaudio-live") == 0) {
1582     stream_type = GST_RMDEMUX_STREAM_AUDIO;
1583   } else if (strcmp (stream2_type_string, "audio/x-ralf-mpeg4-generic") == 0) {
1584     /* Another audio type found in the real testsuite */
1585     stream_type = GST_RMDEMUX_STREAM_AUDIO;
1586   } else if (strcmp (stream1_type_string, "") == 0 &&
1587       strcmp (stream2_type_string, "logical-fileinfo") == 0) {
1588     stream_type = GST_RMDEMUX_STREAM_FILEINFO;
1589   } else {
1590     stream_type = GST_RMDEMUX_STREAM_UNKNOWN;
1591     GST_WARNING_OBJECT (rmdemux, "unknown stream type \"%s\",\"%s\"",
1592         stream1_type_string, stream2_type_string);
1593   }
1594   g_free (stream1_type_string);
1595   g_free (stream2_type_string);
1596
1597   offset += 4;
1598
1599   stream->subtype = stream_type;
1600   switch (stream_type) {
1601
1602     case GST_RMDEMUX_STREAM_VIDEO:
1603       /* RV10/RV20/RV30/RV40 => video/x-pn-realvideo, version=1,2,3,4 */
1604       stream->fourcc = RMDEMUX_FOURCC_GET (data + offset + 8);
1605       stream->width = RMDEMUX_GUINT16_GET (data + offset + 12);
1606       stream->height = RMDEMUX_GUINT16_GET (data + offset + 14);
1607       stream->rate = RMDEMUX_GUINT16_GET (data + offset + 16);
1608       stream->subformat = RMDEMUX_GUINT32_GET (data + offset + 26);
1609       stream->format = RMDEMUX_GUINT32_GET (data + offset + 30);
1610       stream->extra_data_size = length - (offset + 26);
1611       stream->extra_data = (guint8 *) data + offset + 26;
1612       /* Natural way to represent framerates here requires unsigned 32 bit
1613        * numerator, which we don't have. For the nasty case, approximate...
1614        */
1615       {
1616         guint32 numerator = RMDEMUX_GUINT16_GET (data + offset + 22) * 65536 +
1617             RMDEMUX_GUINT16_GET (data + offset + 24);
1618         if (numerator > G_MAXINT) {
1619           stream->framerate_numerator = (gint) (numerator >> 1);
1620           stream->framerate_denominator = 32768;
1621         } else {
1622           stream->framerate_numerator = (gint) numerator;
1623           stream->framerate_denominator = 65536;
1624         }
1625       }
1626
1627       GST_DEBUG_OBJECT (rmdemux,
1628           "Video stream with fourcc=%" GST_FOURCC_FORMAT
1629           " width=%d height=%d rate=%d framerate=%d/%d subformat=%x format=%x extra_data_size=%d",
1630           GST_FOURCC_ARGS (stream->fourcc), stream->width, stream->height,
1631           stream->rate, stream->framerate_numerator,
1632           stream->framerate_denominator, stream->subformat, stream->format,
1633           stream->extra_data_size);
1634       break;
1635     case GST_RMDEMUX_STREAM_AUDIO:{
1636       stream->version = RMDEMUX_GUINT16_GET (data + offset + 4);
1637       GST_INFO ("stream version = %u", stream->version);
1638       switch (stream->version) {
1639         case 3:
1640           stream->fourcc = GST_RM_AUD_14_4;
1641           stream->packet_size = 20;
1642           stream->rate = 8000;
1643           stream->n_channels = 1;
1644           stream->sample_width = 16;
1645           stream->flavor = 1;
1646           stream->leaf_size = 0;
1647           stream->height = 0;
1648           break;
1649         case 4:
1650           stream->flavor = RMDEMUX_GUINT16_GET (data + offset + 22);
1651           stream->packet_size = RMDEMUX_GUINT32_GET (data + offset + 24);
1652           /* stream->frame_size = RMDEMUX_GUINT32_GET (data + offset + 42); */
1653           stream->leaf_size = RMDEMUX_GUINT16_GET (data + offset + 44);
1654           stream->height = RMDEMUX_GUINT16_GET (data + offset + 40);
1655           stream->rate = RMDEMUX_GUINT16_GET (data + offset + 48);
1656           stream->sample_width = RMDEMUX_GUINT16_GET (data + offset + 52);
1657           stream->n_channels = RMDEMUX_GUINT16_GET (data + offset + 54);
1658           stream->fourcc = RMDEMUX_FOURCC_GET (data + offset + 62);
1659           stream->extra_data_size = RMDEMUX_GUINT32_GET (data + offset + 69);
1660           GST_DEBUG_OBJECT (rmdemux, "%u bytes of extra codec data",
1661               stream->extra_data_size);
1662           if (length - (offset + 73) >= stream->extra_data_size) {
1663             stream->extra_data = (guint8 *) data + offset + 73;
1664           } else {
1665             GST_WARNING_OBJECT (rmdemux, "codec data runs beyond MDPR chunk");
1666             stream->extra_data_size = 0;
1667           }
1668           break;
1669         case 5:
1670           stream->flavor = RMDEMUX_GUINT16_GET (data + offset + 22);
1671           stream->packet_size = RMDEMUX_GUINT32_GET (data + offset + 24);
1672           /* stream->frame_size = RMDEMUX_GUINT32_GET (data + offset + 42); */
1673           stream->leaf_size = RMDEMUX_GUINT16_GET (data + offset + 44);
1674           stream->height = RMDEMUX_GUINT16_GET (data + offset + 40);
1675           stream->rate = RMDEMUX_GUINT16_GET (data + offset + 54);
1676           stream->sample_width = RMDEMUX_GUINT16_GET (data + offset + 58);
1677           stream->n_channels = RMDEMUX_GUINT16_GET (data + offset + 60);
1678           stream->fourcc = RMDEMUX_FOURCC_GET (data + offset + 66);
1679           stream->extra_data_size = RMDEMUX_GUINT32_GET (data + offset + 74);
1680           GST_DEBUG_OBJECT (rmdemux, "%u bytes of extra codec data",
1681               stream->extra_data_size);
1682           if (length - (offset + 78) >= stream->extra_data_size) {
1683             stream->extra_data = (guint8 *) data + offset + 78;
1684           } else {
1685             GST_WARNING_OBJECT (rmdemux, "codec data runs beyond MDPR chunk");
1686             stream->extra_data_size = 0;
1687           }
1688           break;
1689         default:{
1690           GST_WARNING_OBJECT (rmdemux, "Unhandled audio stream version %d",
1691               stream->version);
1692           break;
1693         }
1694       }
1695
1696       /*  14_4, 28_8, cook, dnet, sipr, raac, racp, ralf, atrc */
1697       GST_DEBUG_OBJECT (rmdemux,
1698           "Audio stream with rate=%d sample_width=%d n_channels=%d",
1699           stream->rate, stream->sample_width, stream->n_channels);
1700
1701       break;
1702     }
1703     case GST_RMDEMUX_STREAM_FILEINFO:
1704     {
1705       int element_nb;
1706
1707       /* Length of this section */
1708       GST_DEBUG_OBJECT (rmdemux, "length2: 0x%08x",
1709           RMDEMUX_GUINT32_GET (data + offset));
1710       offset += 4;
1711
1712       /* Unknown : 00 00 00 00 */
1713       offset += 4;
1714
1715       /* Number of variables that would follow (loop iterations) */
1716       element_nb = RMDEMUX_GUINT32_GET (data + offset);
1717       offset += 4;
1718
1719       while (element_nb) {
1720         /* Category Id : 00 00 00 XX 00 00 */
1721         offset += 6;
1722
1723         /* Variable Name */
1724         offset += re_skip_pascal_string (data + offset);
1725
1726         /* Variable Value Type */
1727         /*   00 00 00 00 00 => integer/boolean, preceded by length */
1728         /*   00 00 00 02 00 => pascal string, preceded by length, no trailing \0 */
1729         offset += 5;
1730
1731         /* Variable Value */
1732         offset += re_skip_pascal_string (data + offset);
1733
1734         element_nb--;
1735       }
1736     }
1737       break;
1738     case GST_RMDEMUX_STREAM_UNKNOWN:
1739     default:
1740       break;
1741   }
1742
1743   gst_rmdemux_add_stream (rmdemux, stream);
1744 }
1745
1746 static guint
1747 gst_rmdemux_parse_indx (GstRMDemux * rmdemux, const guint8 * data, int length)
1748 {
1749   int n;
1750   int id;
1751
1752   n = RMDEMUX_GUINT32_GET (data);
1753   id = RMDEMUX_GUINT16_GET (data + 4);
1754   rmdemux->index_offset = RMDEMUX_GUINT32_GET (data + 6);
1755
1756   GST_DEBUG_OBJECT (rmdemux, "Number of indices=%d Stream ID=%d length=%d", n,
1757       id, length);
1758
1759   /* Point to the next index_stream */
1760   rmdemux->index_stream = gst_rmdemux_get_stream_by_id (rmdemux, id);
1761
1762   /* Return the length of the index */
1763   return 14 * n;
1764 }
1765
1766 static void
1767 gst_rmdemux_parse_indx_data (GstRMDemux * rmdemux, const guint8 * data,
1768     int length)
1769 {
1770   int i;
1771   int n;
1772   GstRMDemuxIndex *index;
1773
1774   /* The number of index records */
1775   n = length / 14;
1776
1777   if (rmdemux->index_stream == NULL)
1778     return;
1779
1780   /* don't parse the index a second time when operating pull-based and
1781    * reaching the end of the file */
1782   if (rmdemux->index_stream->index_length > 0) {
1783     GST_DEBUG_OBJECT (rmdemux, "Already have an index for this stream");
1784     return;
1785   }
1786
1787   index = g_malloc (sizeof (GstRMDemuxIndex) * n);
1788   rmdemux->index_stream->index = index;
1789   rmdemux->index_stream->index_length = n;
1790
1791   for (i = 0; i < n; i++) {
1792     index[i].timestamp = RMDEMUX_GUINT32_GET (data + 2) * GST_MSECOND;
1793     index[i].offset = RMDEMUX_GUINT32_GET (data + 6);
1794
1795     GST_DEBUG_OBJECT (rmdemux, "Index found for timestamp=%f (at offset=%x)",
1796         gst_guint64_to_gdouble (index[i].timestamp) / GST_SECOND,
1797         index[i].offset);
1798     data += 14;
1799   }
1800 }
1801
1802 static void
1803 gst_rmdemux_parse_data (GstRMDemux * rmdemux, const guint8 * data, int length)
1804 {
1805   rmdemux->n_chunks = RMDEMUX_GUINT32_GET (data);
1806   rmdemux->data_offset = RMDEMUX_GUINT32_GET (data + 4);
1807   rmdemux->chunk_index = 0;
1808   GST_DEBUG_OBJECT (rmdemux, "Data chunk found with %d packets "
1809       "(next data at 0x%08x)", rmdemux->n_chunks, rmdemux->data_offset);
1810 }
1811
1812 static void
1813 gst_rmdemux_parse_cont (GstRMDemux * rmdemux, const guint8 * data, int length)
1814 {
1815   GstTagList *tags;
1816
1817   tags = gst_rm_utils_read_tags (data, length, gst_rm_utils_read_string16);
1818   if (tags) {
1819     gst_element_found_tags (GST_ELEMENT (rmdemux), tags);
1820   }
1821 }
1822
1823 static GstFlowReturn
1824 gst_rmdemux_combine_flows (GstRMDemux * rmdemux, GstRMDemuxStream * stream,
1825     GstFlowReturn ret)
1826 {
1827   GSList *cur;
1828
1829   /* store the value */
1830   stream->last_flow = ret;
1831
1832   /* if it's success we can return the value right away */
1833   if (GST_FLOW_IS_SUCCESS (ret))
1834     goto done;
1835
1836   /* any other error that is not-linked can be returned right
1837    * away */
1838   if (ret != GST_FLOW_NOT_LINKED)
1839     goto done;
1840
1841   for (cur = rmdemux->streams; cur; cur = cur->next) {
1842     GstRMDemuxStream *ostream = cur->data;
1843
1844     ret = ostream->last_flow;
1845     /* some other return value (must be SUCCESS but we can return
1846      * other values as well) */
1847     if (ret != GST_FLOW_NOT_LINKED)
1848       goto done;
1849   }
1850   /* if we get here, all other pads were unlinked and we return
1851    * NOT_LINKED then */
1852 done:
1853   return ret;
1854 }
1855
1856 static void
1857 gst_rmdemux_stream_clear_cached_subpackets (GstRMDemux * rmdemux,
1858     GstRMDemuxStream * stream)
1859 {
1860   if (stream->subpackets == NULL || stream->subpackets->len == 0)
1861     return;
1862
1863   GST_DEBUG_OBJECT (rmdemux, "discarding %u previously collected subpackets",
1864       stream->subpackets->len);
1865   g_ptr_array_foreach (stream->subpackets, (GFunc) gst_mini_object_unref, NULL);
1866   g_ptr_array_set_size (stream->subpackets, 0);
1867 }
1868
1869 static GstFlowReturn
1870 gst_rmdemux_descramble_cook_audio (GstRMDemux * rmdemux,
1871     GstRMDemuxStream * stream)
1872 {
1873   GstFlowReturn ret;
1874   GstBuffer *outbuf;
1875   guint packet_size = stream->packet_size;
1876   guint height = stream->subpackets->len;
1877   guint leaf_size = stream->leaf_size;
1878   guint p, x;
1879
1880   g_assert (stream->height == height);
1881
1882   GST_LOG ("packet_size = %u, leaf_size = %u, height= %u", packet_size,
1883       leaf_size, height);
1884
1885   ret = gst_pad_alloc_buffer_and_set_caps (stream->pad,
1886       GST_BUFFER_OFFSET_NONE, height * packet_size,
1887       GST_PAD_CAPS (stream->pad), &outbuf);
1888
1889   if (ret != GST_FLOW_OK)
1890     goto done;
1891
1892   for (p = 0; p < height; ++p) {
1893     GstBuffer *b = g_ptr_array_index (stream->subpackets, p);
1894     guint8 *b_data = GST_BUFFER_DATA (b);
1895
1896     if (p == 0)
1897       GST_BUFFER_TIMESTAMP (outbuf) = GST_BUFFER_TIMESTAMP (b);
1898
1899     for (x = 0; x < packet_size / leaf_size; ++x) {
1900       guint idx;
1901
1902       idx = height * x + ((height + 1) / 2) * (p % 2) + (p / 2);
1903       /* GST_LOG ("%3u => %3u", (height * p) + x, idx); */
1904       memcpy (GST_BUFFER_DATA (outbuf) + leaf_size * idx, b_data, leaf_size);
1905       b_data += leaf_size;
1906     }
1907   }
1908
1909   /* some decoders, such as realaudiodec, need to be fed in packet units */
1910   for (p = 0; p < height; ++p) {
1911     GstBuffer *subbuf;
1912
1913     subbuf = gst_buffer_create_sub (outbuf, p * packet_size, packet_size);
1914     gst_buffer_set_caps (subbuf, GST_PAD_CAPS (stream->pad));
1915     ret = gst_pad_push (stream->pad, subbuf);
1916     if (ret != GST_FLOW_OK)
1917       break;
1918   }
1919
1920   gst_buffer_unref (outbuf);
1921
1922 done:
1923
1924   gst_rmdemux_stream_clear_cached_subpackets (rmdemux, stream);
1925
1926   return ret;
1927 }
1928
1929 static GstFlowReturn
1930 gst_rmdemux_descramble_dnet_audio (GstRMDemux * rmdemux,
1931     GstRMDemuxStream * stream)
1932 {
1933   GstBuffer *buf;
1934
1935   buf = g_ptr_array_index (stream->subpackets, 0);
1936   g_ptr_array_index (stream->subpackets, 0) = NULL;
1937   g_ptr_array_set_size (stream->subpackets, 0);
1938
1939   buf = gst_rm_utils_descramble_dnet_buffer (buf);
1940   return gst_pad_push (stream->pad, buf);
1941 }
1942
1943 static GstFlowReturn
1944 gst_rmdemux_handle_scrambled_packet (GstRMDemux * rmdemux,
1945     GstRMDemuxStream * stream, GstBuffer * buf, gboolean keyframe)
1946 {
1947   GstFlowReturn ret;
1948
1949   if (stream->subpackets == NULL)
1950     stream->subpackets = g_ptr_array_sized_new (stream->subpackets_needed);
1951
1952   GST_LOG ("Got subpacket %u/%u, len=%u, key=%d", stream->subpackets->len + 1,
1953       stream->subpackets_needed, GST_BUFFER_SIZE (buf), keyframe);
1954
1955   if (keyframe && stream->subpackets->len > 0) {
1956     gst_rmdemux_stream_clear_cached_subpackets (rmdemux, stream);
1957   }
1958
1959   g_ptr_array_add (stream->subpackets, buf);
1960
1961   if (stream->subpackets->len < stream->subpackets_needed)
1962     return GST_FLOW_OK;
1963
1964   g_assert (stream->subpackets->len >= 1);
1965
1966   switch (stream->fourcc) {
1967     case GST_RM_AUD_DNET:
1968       ret = gst_rmdemux_descramble_dnet_audio (rmdemux, stream);
1969       break;
1970     case GST_RM_AUD_COOK:
1971       ret = gst_rmdemux_descramble_cook_audio (rmdemux, stream);
1972       break;
1973     default:
1974       g_assert_not_reached ();
1975   }
1976
1977   return ret;
1978 }
1979
1980 static GstClockTime
1981 gst_rmdemux_fix_timestamp (GstRMDemux * rmdemux, GstRMDemuxStream * stream,
1982     guint8 * data, GstClockTime timestamp)
1983 {
1984   guint8 frame_type;
1985   guint16 seq;
1986   GstClockTime ts = timestamp;
1987
1988   if (timestamp == GST_CLOCK_TIME_NONE)
1989     goto done;
1990
1991   /* only adjust when we have a stream with B frames */
1992   if (stream->format < 0x20200002)
1993     goto done;
1994
1995   /* Fix timestamp. */
1996   switch (stream->fourcc) {
1997     case GST_RM_VDO_RV10:
1998       goto done;
1999     case GST_RM_VDO_RV20:
2000     {
2001       /*
2002        * Bit  1- 2: frame type
2003        * Bit  3- 9: ?
2004        * Bit 10-22: sequence number
2005        * Bit 23-32: ?
2006        */
2007       frame_type = (data[0] >> 6) & 0x03;
2008       seq = ((data[1] & 0x7f) << 6) + ((data[2] & 0xfc) >> 2);
2009       break;
2010     }
2011     case GST_RM_VDO_RV30:
2012     {
2013       /*
2014        * Bit  1- 2: ?
2015        * Bit     3: skip packet if 1
2016        * Bit  4- 5: frame type
2017        * Bit  6-12: ?
2018        * Bit 13-25: sequence number
2019        * Bit 26-32: ?
2020        */
2021       frame_type = (data[0] >> 3) & 0x03;
2022       seq = ((data[1] & 0x0f) << 9) + (data[2] << 1) + ((data[3] & 0x80) >> 7);
2023       break;
2024     }
2025     case GST_RM_VDO_RV40:
2026     {
2027       /*
2028        * Bit     1: skip packet if 1
2029        * Bit  2- 3: frame type
2030        * Bit  4-13: ?
2031        * Bit 14-26: sequence number
2032        * Bit 27-32: ?
2033        */
2034       frame_type = (data[0] >> 5) & 0x03;
2035       seq = ((data[1] & 0x07) << 10) + (data[2] << 2) + ((data[3] & 0xc0) >> 6);
2036       break;
2037     }
2038     default:
2039       goto unknown_version;
2040   }
2041
2042   switch (frame_type) {
2043     case 0:
2044     case 1:
2045     {
2046       GST_LOG_OBJECT (rmdemux, "I frame %d", frame_type);
2047       /* I frame */
2048       timestamp = stream->next_ts;
2049       stream->last_ts = stream->next_ts;
2050       stream->next_ts = ts;
2051       stream->last_seq = stream->next_seq;
2052       stream->next_seq = seq;
2053       break;
2054     }
2055     case 2:
2056     {
2057       GST_LOG_OBJECT (rmdemux, "P frame");
2058       /* P frame */
2059       timestamp = stream->last_ts = stream->next_ts;
2060       if (seq < stream->next_seq)
2061         stream->next_ts += (seq + 0x2000 - stream->next_seq) * GST_MSECOND;
2062       else
2063         stream->next_ts += (seq - stream->next_seq) * GST_MSECOND;
2064       stream->last_seq = stream->next_seq;
2065       stream->next_seq = seq;
2066       break;
2067     }
2068     case 3:
2069     {
2070       GST_LOG_OBJECT (rmdemux, "B frame");
2071       /* B frame */
2072       if (seq < stream->last_seq) {
2073         timestamp =
2074             (seq + 0x2000 - stream->last_seq) * GST_MSECOND + stream->last_ts;
2075       } else {
2076         timestamp = (seq - stream->last_seq) * GST_MSECOND + stream->last_ts;
2077       }
2078       break;
2079     }
2080     default:
2081       goto unknown_frame_type;
2082   }
2083
2084 done:
2085   GST_LOG_OBJECT (rmdemux,
2086       "timestamp %" GST_TIME_FORMAT " -> %" GST_TIME_FORMAT, GST_TIME_ARGS (ts),
2087       GST_TIME_ARGS (timestamp));
2088
2089   return timestamp;
2090
2091   /* Errors */
2092 unknown_version:
2093   {
2094     GST_ELEMENT_ERROR (rmdemux, STREAM, DECODE,
2095         ("Unknown version: %i.", stream->version), (NULL));
2096     return GST_FLOW_ERROR;
2097   }
2098
2099 unknown_frame_type:
2100   {
2101     GST_ELEMENT_ERROR (rmdemux, STREAM, DECODE, ("Unknown frame type %d.",
2102             frame_type), (NULL));
2103     return GST_FLOW_ERROR;
2104   }
2105 }
2106
2107 #define PARSE_NUMBER(data, size, number, label) \
2108 G_STMT_START {                                  \
2109   if (size < 2)                                 \
2110     goto label;                                 \
2111   number = GST_READ_UINT16_BE (data);           \
2112   if (!(number & 0xc000)) {                     \
2113     if (size < 4)                               \
2114       goto label;                               \
2115     number = GST_READ_UINT32_BE (data);         \
2116     data += 4;                                  \
2117     size -= 4;                                  \
2118   } else {                                      \
2119     number &= 0x3fff;                           \
2120     data += 2;                                  \
2121     size -= 2;                                  \
2122   }                                             \
2123 } G_STMT_END
2124
2125 static GstFlowReturn
2126 gst_rmdemux_parse_video_packet (GstRMDemux * rmdemux, GstRMDemuxStream * stream,
2127     GstBuffer * in, guint offset, guint16 version,
2128     GstClockTime timestamp, gboolean key)
2129 {
2130   GstFlowReturn ret;
2131   const guint8 *data, *base;
2132   guint size;
2133
2134   base = GST_BUFFER_DATA (in);
2135   data = base + offset;
2136   size = GST_BUFFER_SIZE (in) - offset;
2137
2138   while (size > 2) {
2139     guint8 pkg_header;
2140     guint pkg_offset;
2141     guint pkg_length;
2142     guint pkg_subseq = 0, pkg_seqnum = G_MAXUINT;
2143     guint fragment_size;
2144     GstBuffer *fragment;
2145
2146     pkg_header = *data++;
2147     size--;
2148
2149     /* packet header
2150      * bit 7: 1=last block in block chain
2151      * bit 6: 1=short header (only one block?)
2152      */
2153     if ((pkg_header & 0xc0) == 0x40) {
2154       /* skip unknown byte */
2155       data++;
2156       size--;
2157       pkg_offset = 0;
2158       pkg_length = size;
2159     } else {
2160       if ((pkg_header & 0x40) == 0) {
2161         pkg_subseq = (*data++) & 0x7f;
2162         size--;
2163       } else {
2164         pkg_subseq = 0;
2165       }
2166
2167       /* length */
2168       PARSE_NUMBER (data, size, pkg_length, not_enough_data);
2169
2170       /* offset */
2171       PARSE_NUMBER (data, size, pkg_offset, not_enough_data);
2172
2173       /* seqnum */
2174       if (size < 1)
2175         goto not_enough_data;
2176
2177       pkg_seqnum = *data++;
2178       size--;
2179     }
2180
2181     GST_DEBUG_OBJECT (rmdemux,
2182         "seq %d, subseq %d, offset %d, length %d, size %d, header %02x",
2183         pkg_seqnum, pkg_subseq, pkg_offset, pkg_length, size, pkg_header);
2184
2185     /* calc size of fragment */
2186     if ((pkg_header & 0xc0) == 0x80) {
2187       fragment_size = pkg_offset;
2188     } else {
2189       if ((pkg_header & 0xc0) == 0)
2190         fragment_size = size;
2191       else
2192         fragment_size = pkg_length;
2193     }
2194     GST_DEBUG_OBJECT (rmdemux, "fragment size %d", fragment_size);
2195
2196     /* get the fragment */
2197     fragment = gst_buffer_create_sub (in, data - base, fragment_size);
2198
2199     if (pkg_subseq == 1) {
2200       GST_DEBUG_OBJECT (rmdemux, "start new fragment");
2201       gst_adapter_clear (stream->adapter);
2202       stream->frag_current = 0;
2203       stream->frag_count = 0;
2204       stream->frag_length = pkg_length;
2205     } else if (pkg_subseq == 0) {
2206       GST_DEBUG_OBJECT (rmdemux, "non fragmented packet");
2207       stream->frag_current = 0;
2208       stream->frag_count = 0;
2209       stream->frag_length = fragment_size;
2210     }
2211
2212     /* put fragment in adapter */
2213     gst_adapter_push (stream->adapter, fragment);
2214     stream->frag_offset[stream->frag_count] = stream->frag_current;
2215     stream->frag_current += fragment_size;
2216     stream->frag_count++;
2217
2218     if (stream->frag_count > MAX_FRAGS)
2219       goto too_many_fragments;
2220
2221     GST_DEBUG_OBJECT (rmdemux, "stored fragment in adapter %d/%d",
2222         stream->frag_current, stream->frag_length);
2223
2224     /* flush fragment when complete */
2225     if (stream->frag_current >= stream->frag_length) {
2226       GstBuffer *out;
2227       guint8 *outdata;
2228       guint header_size;
2229       gint i;
2230
2231       /* calculate header size, which is:
2232        * 1 byte for the number of fragments - 1
2233        * for each fragment:
2234        *   4 bytes 0x00000001 little endian
2235        *   4 bytes fragment offset
2236        *
2237        * This is also the matroska header for realvideo, the decoder needs the
2238        * fragment offsets, both in ffmpeg and real .so, so we just give it that
2239        * in front of the data.
2240        */
2241       header_size = 1 + (8 * (stream->frag_count));
2242
2243       GST_DEBUG_OBJECT (rmdemux,
2244           "fragmented completed. count %d, header_size %u", stream->frag_count,
2245           header_size);
2246
2247       out = gst_buffer_new_and_alloc (header_size + stream->frag_length);
2248       outdata = GST_BUFFER_DATA (out);
2249
2250       /* create header */
2251       *outdata++ = stream->frag_count - 1;
2252       for (i = 0; i < stream->frag_count; i++) {
2253         GST_WRITE_UINT32_LE (outdata, 0x00000001);
2254         outdata += 4;
2255         GST_WRITE_UINT32_LE (outdata, stream->frag_offset[i]);
2256         outdata += 4;
2257       }
2258
2259       /* copy packet data after the header now */
2260       gst_adapter_copy (stream->adapter, outdata, 0, stream->frag_length);
2261       gst_adapter_flush (stream->adapter, stream->frag_length);
2262
2263       gst_buffer_set_caps (out, GST_PAD_CAPS (stream->pad));
2264       GST_BUFFER_TIMESTAMP (out) =
2265           gst_rmdemux_fix_timestamp (rmdemux, stream, outdata, timestamp);
2266
2267       ret = gst_pad_push (stream->pad, out);
2268
2269       timestamp = GST_CLOCK_TIME_NONE;
2270     }
2271     data += fragment_size;
2272     size -= fragment_size;
2273   }
2274   GST_DEBUG_OBJECT (rmdemux, "%d bytes left", size);
2275
2276   gst_buffer_unref (in);
2277
2278   ret = GST_FLOW_OK;
2279
2280   return ret;
2281
2282   /* ERRORS */
2283 not_enough_data:
2284   {
2285     GST_ELEMENT_WARNING (rmdemux, STREAM, DECODE, ("Skipping bad packet."),
2286         (NULL));
2287     gst_buffer_unref (in);
2288     return GST_FLOW_OK;
2289   }
2290 too_many_fragments:
2291   {
2292     GST_ELEMENT_ERROR (rmdemux, STREAM, DECODE,
2293         ("Got more fragments (%u) than can be handled (%u)",
2294             stream->frag_count, MAX_FRAGS), (NULL));
2295     gst_buffer_unref (in);
2296     return GST_FLOW_ERROR;
2297   }
2298 }
2299
2300 static GstFlowReturn
2301 gst_rmdemux_parse_audio_packet (GstRMDemux * rmdemux, GstRMDemuxStream * stream,
2302     GstBuffer * in, guint offset, guint16 version,
2303     GstClockTime timestamp, gboolean key)
2304 {
2305   GstFlowReturn ret, cret;
2306   GstBuffer *buffer;
2307   const guint8 *data;
2308   guint size;
2309
2310   data = GST_BUFFER_DATA (in) + offset;
2311   size = GST_BUFFER_SIZE (in) - offset;
2312
2313   ret = gst_pad_alloc_buffer_and_set_caps (stream->pad,
2314       GST_BUFFER_OFFSET_NONE, size, GST_PAD_CAPS (stream->pad), &buffer);
2315
2316   cret = gst_rmdemux_combine_flows (rmdemux, stream, ret);
2317   if (ret != GST_FLOW_OK)
2318     goto alloc_failed;
2319
2320   memcpy (GST_BUFFER_DATA (buffer), (guint8 *) data, size);
2321   GST_BUFFER_TIMESTAMP (buffer) = timestamp - rmdemux->first_ts;
2322
2323   if (stream->needs_descrambling) {
2324     ret = gst_rmdemux_handle_scrambled_packet (rmdemux, stream, buffer, key);
2325   } else {
2326     GST_LOG_OBJECT (rmdemux, "Pushing buffer of size %d to pad %s",
2327         GST_BUFFER_SIZE (buffer), GST_PAD_NAME (stream->pad));
2328
2329     ret = gst_pad_push (stream->pad, buffer);
2330   }
2331   return ret;
2332
2333   /* ERRORS */
2334 alloc_failed:
2335   {
2336     GST_DEBUG_OBJECT (rmdemux, "pad alloc returned %d", ret);
2337     return cret;
2338   }
2339 }
2340
2341 static GstFlowReturn
2342 gst_rmdemux_parse_packet (GstRMDemux * rmdemux, GstBuffer * in, guint16 version)
2343 {
2344   guint16 id;
2345   GstRMDemuxStream *stream;
2346   guint size;
2347   GstFlowReturn cret, ret;
2348   GstClockTime timestamp;
2349   gboolean key;
2350   guint8 *data, *base;
2351   guint8 flags;
2352
2353   base = data = GST_BUFFER_DATA (in);
2354   size = GST_BUFFER_SIZE (in);
2355
2356   /* stream number */
2357   id = RMDEMUX_GUINT16_GET (data);
2358
2359   stream = gst_rmdemux_get_stream_by_id (rmdemux, id);
2360   if (!stream || !stream->pad)
2361     goto unknown_stream;
2362
2363   /* timestamp in Msec */
2364   timestamp = RMDEMUX_GUINT32_GET (data + 2) * GST_MSECOND;
2365
2366   gst_segment_set_last_stop (&rmdemux->segment, GST_FORMAT_TIME, timestamp);
2367
2368   GST_LOG_OBJECT (rmdemux, "Parsing a packet for stream=%d, timestamp=%"
2369       GST_TIME_FORMAT ", size %u, version=%d", id, GST_TIME_ARGS (timestamp),
2370       size, version);
2371
2372   if (rmdemux->first_ts == GST_CLOCK_TIME_NONE) {
2373     GST_DEBUG_OBJECT (rmdemux, "First timestamp: %" GST_TIME_FORMAT,
2374         GST_TIME_ARGS (timestamp));
2375     rmdemux->first_ts = timestamp;
2376   }
2377
2378   /* skip stream_id and timestamp */
2379   data += (2 + 4);
2380   size -= (2 + 4);
2381
2382   /* skip other stuff */
2383   if (version == 0) {
2384     /* uint8 packet_group */
2385     /* uint8 flags        */
2386     flags = GST_READ_UINT8 (data + 1);
2387     data += 2;
2388     size -= 2;
2389   } else {
2390     /* uint16 asm_rule */
2391     /* uint8 asm_flags */
2392     flags = GST_READ_UINT8 (data + 2);
2393     data += 3;
2394     size -= 3;
2395   }
2396   key = (flags & 0x02) != 0;
2397   GST_DEBUG_OBJECT (rmdemux, "flags %d, Keyframe %d", flags, key);
2398
2399   if (rmdemux->need_newsegment) {
2400     GstEvent *event;
2401
2402     event = gst_event_new_new_segment (FALSE, rmdemux->segment.rate,
2403         rmdemux->segment.format, rmdemux->segment.start,
2404         rmdemux->segment.stop, rmdemux->segment.time);
2405
2406     GST_DEBUG_OBJECT (rmdemux, "sending NEWSEGMENT event, segment.start= %"
2407         GST_TIME_FORMAT, GST_TIME_ARGS (rmdemux->segment.start));
2408
2409     gst_rmdemux_send_event (rmdemux, event);
2410     rmdemux->need_newsegment = FALSE;
2411   }
2412
2413   if (stream->pending_tags != NULL) {
2414     GST_LOG_OBJECT (stream->pad, "tags %" GST_PTR_FORMAT, stream->pending_tags);
2415     gst_element_found_tags_for_pad (GST_ELEMENT_CAST (rmdemux), stream->pad,
2416         stream->pending_tags);
2417     stream->pending_tags = NULL;
2418   }
2419
2420   if ((rmdemux->offset + size) <= stream->seek_offset) {
2421     GST_DEBUG_OBJECT (rmdemux,
2422         "Stream %d is skipping: seek_offset=%d, offset=%d, size=%u",
2423         stream->id, stream->seek_offset, rmdemux->offset, size);
2424     cret = GST_FLOW_OK;
2425     goto beach;
2426   }
2427
2428   /* do special headers */
2429   if (stream->subtype == GST_RMDEMUX_STREAM_VIDEO) {
2430     ret =
2431         gst_rmdemux_parse_video_packet (rmdemux, stream, in, data - base,
2432         version, timestamp, key);
2433   } else if (stream->subtype == GST_RMDEMUX_STREAM_AUDIO) {
2434     ret =
2435         gst_rmdemux_parse_audio_packet (rmdemux, stream, in, data - base,
2436         version, timestamp, key);
2437   } else
2438     ret = GST_FLOW_OK;
2439
2440   cret = gst_rmdemux_combine_flows (rmdemux, stream, ret);
2441
2442 beach:
2443   return cret;
2444
2445   /* ERRORS */
2446 unknown_stream:
2447   {
2448     GST_WARNING_OBJECT (rmdemux, "No stream for stream id %d in parsing "
2449         "data packet", id);
2450     return GST_FLOW_OK;
2451   }
2452 }
2453
2454 static gboolean
2455 gst_rmdemux_plugin_init (GstPlugin * plugin)
2456 {
2457   return gst_element_register (plugin, "rmdemux",
2458       GST_RANK_PRIMARY, GST_TYPE_RMDEMUX) &&
2459       gst_element_register (plugin, "rademux",
2460       GST_RANK_SECONDARY, GST_TYPE_REAL_AUDIO_DEMUX);
2461 }
2462
2463
2464 static gboolean
2465 plugin_init (GstPlugin * plugin)
2466 {
2467   if (!gst_rmdemux_plugin_init (plugin))
2468     return FALSE;
2469
2470   if (!gst_rdt_depay_plugin_init (plugin))
2471     return FALSE;
2472
2473   if (!gst_rdt_manager_plugin_init (plugin))
2474     return FALSE;
2475
2476   if (!gst_rtsp_real_plugin_init (plugin))
2477     return FALSE;
2478
2479   return TRUE;
2480 }
2481
2482 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
2483     GST_VERSION_MINOR,
2484     "realmedia",
2485     "RealMedia demuxer and depayloader",
2486     plugin_init, VERSION, "LGPL", GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN);