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