gst/avi/gstavidemux.c

   1 /* GStreamer
   2  * Copyright (C) <1999> Erik Walthinsen <omega@temple-baptist.com>
   3  * Copyright (C) <2006> Nokia Corporation (contact <stefan.kost@nokia.com>)
   4  * Copyright (C) <2009-2010> STEricsson <benjamin.gaignard@stericsson.com>
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Library General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Library General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Library General Public
  17  * License along with this library; if not, write to the
  18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19  * Boston, MA 02111-1307, USA.
  20  */
  21 /* Element-Checklist-Version: 5 */
  22
  23 /**
  24  * SECTION:element-avidemux
  25  *
  26  * Demuxes an .avi file into raw or compressed audio and/or video streams.
  27  *
  28  * This element supports both push and pull-based scheduling, depending on the
  29  * capabilities of the upstream elements.
  30  *
  31  * <refsect2>
  32  * <title>Example launch line</title>
  33  * |[
  34  * gst-launch-1.0 filesrc location=test.avi ! avidemux name=demux  demux.audio_00 ! decodebin ! audioconvert ! audioresample ! autoaudiosink   demux.video_00 ! queue ! decodebin ! videoconvert ! videoscale ! autovideosink
  35  * ]| Play (parse and decode) an .avi file and try to output it to
  36  * an automatically detected soundcard and videosink. If the AVI file contains
  37  * compressed audio or video data, this will only work if you have the
  38  * right decoder elements/plugins installed.
  39  * </refsect2>
  40  *
  41  * Last reviewed on 2006-12-29 (0.10.6)
  42  */
  43
  44 #ifdef HAVE_CONFIG_H
  45 #include "config.h"
  46 #endif
  47
  48 #include <string.h>
  49 #include <stdio.h>
  50
  51 #include "gst/riff/riff-media.h"
  52 #include "gstavidemux.h"
  53 #include "avi-ids.h"
  54 #include <gst/gst-i18n-plugin.h>
  55 #include <gst/base/gstadapter.h>
  56
  57
  58 #define DIV_ROUND_UP(s,v) (((s) + ((v)-1)) / (v))
  59
  60 #define GST_AVI_KEYFRAME 1
  61 #define ENTRY_IS_KEYFRAME(e) ((e)->flags == GST_AVI_KEYFRAME)
  62 #define ENTRY_SET_KEYFRAME(e) ((e)->flags = GST_AVI_KEYFRAME)
  63 #define ENTRY_UNSET_KEYFRAME(e) ((e)->flags = 0)
  64
  65
  66 GST_DEBUG_CATEGORY_STATIC (avidemux_debug);
  67 #define GST_CAT_DEFAULT avidemux_debug
  68
  69 static GstStaticPadTemplate sink_templ = GST_STATIC_PAD_TEMPLATE ("sink",
  70     GST_PAD_SINK,
  71     GST_PAD_ALWAYS,
  72     GST_STATIC_CAPS ("video/x-msvideo")
  73     );
  74
  75 #ifndef GST_DISABLE_GST_DEBUG
  76 static const char *const snap_types[2][2] = {
  77   {"any", "before"},
  78   {"after", "nearest"},
  79 };
  80 #endif
  81
  82 static void gst_avi_demux_finalize (GObject * object);
  83
  84 static void gst_avi_demux_reset (GstAviDemux * avi);
  85
  86 #if 0
  87 static const GstEventMask *gst_avi_demux_get_event_mask (GstPad * pad);
  88 #endif
  89 static gboolean gst_avi_demux_handle_src_event (GstPad * pad,
  90     GstObject * parent, GstEvent * event);
  91 static gboolean gst_avi_demux_handle_sink_event (GstPad * pad,
  92     GstObject * parent, GstEvent * event);
  93 static gboolean gst_avi_demux_push_event (GstAviDemux * avi, GstEvent * event);
  94
  95 #if 0
  96 static const GstFormat *gst_avi_demux_get_src_formats (GstPad * pad);
  97 #endif
  98 static gboolean gst_avi_demux_handle_src_query (GstPad * pad,
  99     GstObject * parent, GstQuery * query);
 100 static gboolean gst_avi_demux_src_convert (GstPad * pad, GstFormat src_format,
 101     gint64 src_value, GstFormat * dest_format, gint64 * dest_value);
 102
 103 static gboolean gst_avi_demux_do_seek (GstAviDemux * avi, GstSegment * segment);
 104 static gboolean gst_avi_demux_handle_seek (GstAviDemux * avi, GstPad * pad,
 105     GstEvent * event);
 106 static gboolean gst_avi_demux_handle_seek_push (GstAviDemux * avi, GstPad * pad,
 107     GstEvent * event);
 108 static void gst_avi_demux_loop (GstPad * pad);
 109 static gboolean gst_avi_demux_sink_activate (GstPad * sinkpad,
 110     GstObject * parent);
 111 static gboolean gst_avi_demux_sink_activate_mode (GstPad * sinkpad,
 112     GstObject * parent, GstPadMode mode, gboolean active);
 113 static GstFlowReturn gst_avi_demux_chain (GstPad * pad, GstObject * parent,
 114     GstBuffer * buf);
 115 #if 0
 116 static void gst_avi_demux_set_index (GstElement * element, GstIndex * index);
 117 static GstIndex *gst_avi_demux_get_index (GstElement * element);
 118 #endif
 119 static GstStateChangeReturn gst_avi_demux_change_state (GstElement * element,
 120     GstStateChange transition);
 121 static void gst_avi_demux_calculate_durations_from_index (GstAviDemux * avi);
 122 static void gst_avi_demux_get_buffer_info (GstAviDemux * avi,
 123     GstAviStream * stream, guint entry_n, GstClockTime * timestamp,
 124     GstClockTime * ts_end, guint64 * offset, guint64 * offset_end);
 125
 126 static void gst_avi_demux_parse_idit (GstAviDemux * avi, GstBuffer * buf);
 127
 128 /* GObject methods */
 129
 130 #define gst_avi_demux_parent_class parent_class
 131 G_DEFINE_TYPE (GstAviDemux, gst_avi_demux, GST_TYPE_ELEMENT);
 132
 133 static void
 134 gst_avi_demux_class_init (GstAviDemuxClass * klass)
 135 {
 136   GstElementClass *gstelement_class = GST_ELEMENT_CLASS (klass);
 137   GObjectClass *gobject_class = (GObjectClass *) klass;
 138   GstPadTemplate *videosrctempl, *audiosrctempl, *subsrctempl;
 139   GstCaps *audcaps, *vidcaps, *subcaps;
 140
 141   GST_DEBUG_CATEGORY_INIT (avidemux_debug, "avidemux",
 142       0, "Demuxer for AVI streams");
 143
 144   gobject_class->finalize = gst_avi_demux_finalize;
 145
 146   gstelement_class->change_state =
 147       GST_DEBUG_FUNCPTR (gst_avi_demux_change_state);
 148 #if 0
 149   gstelement_class->set_index = GST_DEBUG_FUNCPTR (gst_avi_demux_set_index);
 150   gstelement_class->get_index = GST_DEBUG_FUNCPTR (gst_avi_demux_get_index);
 151 #endif
 152
 153   audcaps = gst_riff_create_audio_template_caps ();
 154   gst_caps_append (audcaps, gst_caps_new_empty_simple ("audio/x-avi-unknown"));
 155   audiosrctempl = gst_pad_template_new ("audio_%u",
 156       GST_PAD_SRC, GST_PAD_SOMETIMES, audcaps);
 157
 158   vidcaps = gst_riff_create_video_template_caps ();
 159   gst_caps_append (vidcaps, gst_riff_create_iavs_template_caps ());
 160   gst_caps_append (vidcaps, gst_caps_new_empty_simple ("video/x-avi-unknown"));
 161   videosrctempl = gst_pad_template_new ("video_%u",
 162       GST_PAD_SRC, GST_PAD_SOMETIMES, vidcaps);
 163
 164   subcaps = gst_caps_new_empty_simple ("application/x-subtitle-avi");
 165   subsrctempl = gst_pad_template_new ("subtitle_%u",
 166       GST_PAD_SRC, GST_PAD_SOMETIMES, subcaps);
 167   gst_element_class_add_pad_template (gstelement_class, audiosrctempl);
 168   gst_element_class_add_pad_template (gstelement_class, videosrctempl);
 169   gst_element_class_add_pad_template (gstelement_class, subsrctempl);
 170   gst_element_class_add_pad_template (gstelement_class,
 171       gst_static_pad_template_get (&sink_templ));
 172
 173   gst_element_class_set_static_metadata (gstelement_class, "Avi demuxer",
 174       "Codec/Demuxer",
 175       "Demultiplex an avi file into audio and video",
 176       "Erik Walthinsen <omega@cse.ogi.edu>, "
 177       "Wim Taymans <wim.taymans@chello.be>, "
 178       "Thijs Vermeir <thijsvermeir@gmail.com>");
 179 }
 180
 181 static void
 182 gst_avi_demux_init (GstAviDemux * avi)
 183 {
 184   avi->sinkpad = gst_pad_new_from_static_template (&sink_templ, "sink");
 185   gst_pad_set_activate_function (avi->sinkpad,
 186       GST_DEBUG_FUNCPTR (gst_avi_demux_sink_activate));
 187   gst_pad_set_activatemode_function (avi->sinkpad,
 188       GST_DEBUG_FUNCPTR (gst_avi_demux_sink_activate_mode));
 189   gst_pad_set_chain_function (avi->sinkpad,
 190       GST_DEBUG_FUNCPTR (gst_avi_demux_chain));
 191   gst_pad_set_event_function (avi->sinkpad,
 192       GST_DEBUG_FUNCPTR (gst_avi_demux_handle_sink_event));
 193   gst_element_add_pad (GST_ELEMENT_CAST (avi), avi->sinkpad);
 194
 195   avi->adapter = gst_adapter_new ();
 196
 197   gst_avi_demux_reset (avi);
 198
 199   GST_OBJECT_FLAG_SET (avi, GST_ELEMENT_FLAG_INDEXABLE);
 200 }
 201
 202 static void
 203 gst_avi_demux_finalize (GObject * object)
 204 {
 205   GstAviDemux *avi = GST_AVI_DEMUX (object);
 206
 207   GST_DEBUG ("AVI: finalize");
 208
 209   g_object_unref (avi->adapter);
 210
 211   G_OBJECT_CLASS (parent_class)->finalize (object);
 212 }
 213
 214 static void
 215 gst_avi_demux_reset_stream (GstAviDemux * avi, GstAviStream * stream)
 216 {
 217   g_free (stream->strh);
 218   g_free (stream->strf.data);
 219   g_free (stream->name);
 220   g_free (stream->index);
 221   g_free (stream->indexes);
 222   if (stream->initdata)
 223     gst_buffer_unref (stream->initdata);
 224   if (stream->extradata)
 225     gst_buffer_unref (stream->extradata);
 226   if (stream->pad) {
 227     if (stream->exposed) {
 228       gst_pad_set_active (stream->pad, FALSE);
 229       gst_element_remove_pad (GST_ELEMENT_CAST (avi), stream->pad);
 230     } else
 231       gst_object_unref (stream->pad);
 232   }
 233   if (stream->taglist) {
 234     gst_tag_list_unref (stream->taglist);
 235     stream->taglist = NULL;
 236   }
 237   memset (stream, 0, sizeof (GstAviStream));
 238 }
 239
 240 static void
 241 gst_avi_demux_reset (GstAviDemux * avi)
 242 {
 243   gint i;
 244
 245   GST_DEBUG ("AVI: reset");
 246
 247   for (i = 0; i < avi->num_streams; i++)
 248     gst_avi_demux_reset_stream (avi, &avi->stream[i]);
 249
 250   avi->header_state = GST_AVI_DEMUX_HEADER_TAG_LIST;
 251   avi->num_streams = 0;
 252   avi->num_v_streams = 0;
 253   avi->num_a_streams = 0;
 254   avi->num_t_streams = 0;
 255   avi->main_stream = -1;
 256
 257   avi->state = GST_AVI_DEMUX_START;
 258   avi->offset = 0;
 259   avi->building_index = FALSE;
 260
 261   avi->index_offset = 0;
 262   g_free (avi->avih);
 263   avi->avih = NULL;
 264
 265 #if 0
 266   if (avi->element_index)
 267     gst_object_unref (avi->element_index);
 268   avi->element_index = NULL;
 269 #endif
 270
 271   if (avi->seg_event) {
 272     gst_event_unref (avi->seg_event);
 273     avi->seg_event = NULL;
 274   }
 275   if (avi->seek_event) {
 276     gst_event_unref (avi->seek_event);
 277     avi->seek_event = NULL;
 278   }
 279
 280   if (avi->globaltags)
 281     gst_tag_list_unref (avi->globaltags);
 282   avi->globaltags = NULL;
 283
 284   avi->got_tags = TRUE;         /* we always want to push global tags */
 285   avi->have_eos = FALSE;
 286   avi->seekable = TRUE;
 287
 288   gst_adapter_clear (avi->adapter);
 289
 290   gst_segment_init (&avi->segment, GST_FORMAT_TIME);
 291 }
 292
 293
 294 /* GstElement methods */
 295
 296 #if 0
 297 static const GstFormat *
 298 gst_avi_demux_get_src_formats (GstPad * pad)
 299 {
 300   GstAviStream *stream = gst_pad_get_element_private (pad);
 301
 302   static const GstFormat src_a_formats[] = {
 303     GST_FORMAT_TIME,
 304     GST_FORMAT_BYTES,
 305     GST_FORMAT_DEFAULT,
 306     0
 307   };
 308   static const GstFormat src_v_formats[] = {
 309     GST_FORMAT_TIME,
 310     GST_FORMAT_DEFAULT,
 311     0
 312   };
 313
 314   return (stream->strh->type == GST_RIFF_FCC_auds ?
 315       src_a_formats : src_v_formats);
 316 }
 317 #endif
 318
 319 /* assumes stream->strf.auds->av_bps != 0 */
 320 static inline GstClockTime
 321 avi_stream_convert_bytes_to_time_unchecked (GstAviStream * stream,
 322     guint64 bytes)
 323 {
 324   return gst_util_uint64_scale_int (bytes, GST_SECOND,
 325       stream->strf.auds->av_bps);
 326 }
 327
 328 static inline guint64
 329 avi_stream_convert_time_to_bytes_unchecked (GstAviStream * stream,
 330     GstClockTime time)
 331 {
 332   return gst_util_uint64_scale_int (time, stream->strf.auds->av_bps,
 333       GST_SECOND);
 334 }
 335
 336 /* assumes stream->strh->rate != 0 */
 337 static inline GstClockTime
 338 avi_stream_convert_frames_to_time_unchecked (GstAviStream * stream,
 339     guint64 frames)
 340 {
 341   return gst_util_uint64_scale (frames, stream->strh->scale * GST_SECOND,
 342       stream->strh->rate);
 343 }
 344
 345 static inline guint64
 346 avi_stream_convert_time_to_frames_unchecked (GstAviStream * stream,
 347     GstClockTime time)
 348 {
 349   return gst_util_uint64_scale (time, stream->strh->rate,
 350       stream->strh->scale * GST_SECOND);
 351 }
 352
 353 static gboolean
 354 gst_avi_demux_src_convert (GstPad * pad,
 355     GstFormat src_format,
 356     gint64 src_value, GstFormat * dest_format, gint64 * dest_value)
 357 {
 358   GstAviStream *stream = gst_pad_get_element_private (pad);
 359   gboolean res = TRUE;
 360
 361   GST_LOG_OBJECT (pad,
 362       "Received  src_format:%s, src_value:%" G_GUINT64_FORMAT
 363       ", dest_format:%s", gst_format_get_name (src_format), src_value,
 364       gst_format_get_name (*dest_format));
 365
 366   if (G_UNLIKELY (src_format == *dest_format)) {
 367     *dest_value = src_value;
 368     goto done;
 369   }
 370   if (G_UNLIKELY (!stream->strh || !stream->strf.data)) {
 371     res = FALSE;
 372     goto done;
 373   }
 374   if (G_UNLIKELY (stream->strh->type == GST_RIFF_FCC_vids &&
 375           (src_format == GST_FORMAT_BYTES
 376               || *dest_format == GST_FORMAT_BYTES))) {
 377     res = FALSE;
 378     goto done;
 379   }
 380
 381   switch (src_format) {
 382     case GST_FORMAT_TIME:
 383       switch (*dest_format) {
 384         case GST_FORMAT_BYTES:
 385           *dest_value = gst_util_uint64_scale_int (src_value,
 386               stream->strf.auds->av_bps, GST_SECOND);
 387           break;
 388         case GST_FORMAT_DEFAULT:
 389           *dest_value =
 390               gst_util_uint64_scale_round (src_value, stream->strh->rate,
 391               stream->strh->scale * GST_SECOND);
 392           break;
 393         default:
 394           res = FALSE;
 395           break;
 396       }
 397       break;
 398     case GST_FORMAT_BYTES:
 399       switch (*dest_format) {
 400         case GST_FORMAT_TIME:
 401           if (stream->strf.auds->av_bps != 0) {
 402             *dest_value = avi_stream_convert_bytes_to_time_unchecked (stream,
 403                 src_value);
 404           } else
 405             res = FALSE;
 406           break;
 407         default:
 408           res = FALSE;
 409           break;
 410       }
 411       break;
 412     case GST_FORMAT_DEFAULT:
 413       switch (*dest_format) {
 414         case GST_FORMAT_TIME:
 415           *dest_value =
 416               avi_stream_convert_frames_to_time_unchecked (stream, src_value);
 417           break;
 418         default:
 419           res = FALSE;
 420           break;
 421       }
 422       break;
 423     default:
 424       res = FALSE;
 425   }
 426
 427 done:
 428   GST_LOG_OBJECT (pad,
 429       "Returning res:%d dest_format:%s dest_value:%" G_GUINT64_FORMAT, res,
 430       gst_format_get_name (*dest_format), *dest_value);
 431   return res;
 432 }
 433
 434 static gboolean
 435 gst_avi_demux_handle_src_query (GstPad * pad, GstObject * parent,
 436     GstQuery * query)
 437 {
 438   gboolean res = TRUE;
 439   GstAviDemux *avi = GST_AVI_DEMUX (parent);
 440
 441   GstAviStream *stream = gst_pad_get_element_private (pad);
 442
 443   if (!stream->strh || !stream->strf.data)
 444     return gst_pad_query_default (pad, parent, query);
 445
 446   switch (GST_QUERY_TYPE (query)) {
 447     case GST_QUERY_POSITION:{
 448       gint64 pos = 0;
 449
 450       GST_DEBUG ("pos query for stream %u: frames %u, bytes %u",
 451           stream->num, stream->current_entry, stream->current_total);
 452
 453       /* FIXME, this looks clumsy */
 454       if (stream->strh->type == GST_RIFF_FCC_auds) {
 455         if (stream->is_vbr) {
 456           /* VBR */
 457           pos = gst_util_uint64_scale ((gint64) stream->current_entry *
 458               stream->strh->scale, GST_SECOND, (guint64) stream->strh->rate);
 459           GST_DEBUG_OBJECT (avi, "VBR convert frame %u, time %"
 460               GST_TIME_FORMAT, stream->current_entry, GST_TIME_ARGS (pos));
 461         } else if (stream->strf.auds->av_bps != 0) {
 462           /* CBR */
 463           pos = gst_util_uint64_scale (stream->current_total, GST_SECOND,
 464               (guint64) stream->strf.auds->av_bps);
 465           GST_DEBUG_OBJECT (avi,
 466               "CBR convert bytes %u, time %" GST_TIME_FORMAT,
 467               stream->current_total, GST_TIME_ARGS (pos));
 468         } else if (stream->idx_n != 0 && stream->total_bytes != 0) {
 469           /* calculate timestamps based on percentage of length */
 470           guint64 xlen = avi->avih->us_frame *
 471               avi->avih->tot_frames * GST_USECOND;
 472
 473           if (stream->is_vbr) {
 474             pos = gst_util_uint64_scale (xlen, stream->current_entry,
 475                 stream->idx_n);
 476             GST_DEBUG_OBJECT (avi, "VBR perc convert frame %u, time %"
 477                 GST_TIME_FORMAT, stream->current_entry, GST_TIME_ARGS (pos));
 478           } else {
 479             pos = gst_util_uint64_scale (xlen, stream->current_total,
 480                 stream->total_bytes);
 481             GST_DEBUG_OBJECT (avi,
 482                 "CBR perc convert bytes %u, time %" GST_TIME_FORMAT,
 483                 stream->current_total, GST_TIME_ARGS (pos));
 484           }
 485         } else {
 486           /* we don't know */
 487           res = FALSE;
 488         }
 489       } else {
 490         if (stream->strh->rate != 0) {
 491           pos = gst_util_uint64_scale ((guint64) stream->current_entry *
 492               stream->strh->scale, GST_SECOND, (guint64) stream->strh->rate);
 493         } else {
 494           pos = stream->current_entry * avi->avih->us_frame * GST_USECOND;
 495         }
 496       }
 497       if (res) {
 498         GST_DEBUG ("pos query : %" GST_TIME_FORMAT, GST_TIME_ARGS (pos));
 499         gst_query_set_position (query, GST_FORMAT_TIME, pos);
 500       } else
 501         GST_WARNING ("pos query failed");
 502       break;
 503     }
 504     case GST_QUERY_DURATION:
 505     {
 506       GstFormat fmt;
 507       GstClockTime duration;
 508
 509       /* only act on audio or video streams */
 510       if (stream->strh->type != GST_RIFF_FCC_auds &&
 511           stream->strh->type != GST_RIFF_FCC_vids) {
 512         res = FALSE;
 513         break;
 514       }
 515
 516       /* take stream duration, fall back to avih duration */
 517       if ((duration = stream->duration) == -1)
 518         duration = avi->duration;
 519
 520       gst_query_parse_duration (query, &fmt, NULL);
 521
 522       switch (fmt) {
 523         case GST_FORMAT_TIME:
 524           gst_query_set_duration (query, fmt, duration);
 525           break;
 526         case GST_FORMAT_DEFAULT:
 527         {
 528           gint64 dur;
 529           GST_DEBUG_OBJECT (query, "total frames is %" G_GUINT32_FORMAT,
 530               stream->idx_n);
 531
 532           if (stream->idx_n > 0)
 533             gst_query_set_duration (query, fmt, stream->idx_n);
 534           else if (gst_pad_query_convert (pad, GST_FORMAT_TIME,
 535                   duration, fmt, &dur))
 536             gst_query_set_duration (query, fmt, dur);
 537           break;
 538         }
 539         default:
 540           res = FALSE;
 541           break;
 542       }
 543       break;
 544     }
 545     case GST_QUERY_SEEKING:{
 546       GstFormat fmt;
 547
 548       gst_query_parse_seeking (query, &fmt, NULL, NULL, NULL);
 549       if (fmt == GST_FORMAT_TIME) {
 550         gboolean seekable = TRUE;
 551
 552         if (avi->streaming) {
 553           seekable = avi->seekable;
 554         }
 555
 556         gst_query_set_seeking (query, GST_FORMAT_TIME, seekable,
 557             0, stream->duration);
 558         res = TRUE;
 559       }
 560       break;
 561     }
 562     case GST_QUERY_CONVERT:{
 563       GstFormat src_fmt, dest_fmt;
 564       gint64 src_val, dest_val;
 565
 566       gst_query_parse_convert (query, &src_fmt, &src_val, &dest_fmt, &dest_val);
 567       if ((res = gst_avi_demux_src_convert (pad, src_fmt, src_val, &dest_fmt,
 568                   &dest_val)))
 569         gst_query_set_convert (query, src_fmt, src_val, dest_fmt, dest_val);
 570       else
 571         res = gst_pad_query_default (pad, parent, query);
 572       break;
 573     }
 574     default:
 575       res = gst_pad_query_default (pad, parent, query);
 576       break;
 577   }
 578
 579   return res;
 580 }
 581
 582 #if 0
 583 static const GstEventMask *
 584 gst_avi_demux_get_event_mask (GstPad * pad)
 585 {
 586   static const GstEventMask masks[] = {
 587     {GST_EVENT_SEEK, GST_SEEK_METHOD_SET | GST_SEEK_FLAG_KEY_UNIT},
 588     {0,}
 589   };
 590
 591   return masks;
 592 }
 593 #endif
 594
 595 #if 0
 596 static guint64
 597 gst_avi_demux_seek_streams (GstAviDemux * avi, guint64 offset, gboolean before)
 598 {
 599   GstAviStream *stream;
 600   GstIndexEntry *entry;
 601   gint i;
 602   gint64 val, min = offset;
 603
 604   for (i = 0; i < avi->num_streams; i++) {
 605     stream = &avi->stream[i];
 606
 607     entry = gst_index_get_assoc_entry (avi->element_index, stream->index_id,
 608         before ? GST_INDEX_LOOKUP_BEFORE : GST_INDEX_LOOKUP_AFTER,
 609         GST_ASSOCIATION_FLAG_NONE, GST_FORMAT_BYTES, offset);
 610
 611     if (before) {
 612       if (entry) {
 613         gst_index_entry_assoc_map (entry, GST_FORMAT_BYTES, &val);
 614         GST_DEBUG_OBJECT (avi, "stream %d, previous entry at %"
 615             G_GUINT64_FORMAT, i, val);
 616         if (val < min)
 617           min = val;
 618       }
 619       continue;
 620     }
 621
 622     if (!entry) {
 623       GST_DEBUG_OBJECT (avi, "no position for stream %d, assuming at start", i);
 624       stream->current_entry = 0;
 625       stream->current_total = 0;
 626       continue;
 627     }
 628
 629     gst_index_entry_assoc_map (entry, GST_FORMAT_BYTES, &val);
 630     GST_DEBUG_OBJECT (avi, "stream %d, next entry at %" G_GUINT64_FORMAT,
 631         i, val);
 632
 633     gst_index_entry_assoc_map (entry, GST_FORMAT_TIME, &val);
 634     stream->current_total = val;
 635     gst_index_entry_assoc_map (entry, GST_FORMAT_DEFAULT, &val);
 636     stream->current_entry = val;
 637   }
 638
 639   return min;
 640 }
 641 #endif
 642
 643 static guint
 644 gst_avi_demux_index_entry_offset_search (GstAviIndexEntry * entry,
 645     guint64 * offset)
 646 {
 647   if (entry->offset < *offset)
 648     return -1;
 649   else if (entry->offset > *offset)
 650     return 1;
 651   return 0;
 652 }
 653
 654 static guint64
 655 gst_avi_demux_seek_streams_index (GstAviDemux * avi, guint64 offset,
 656     gboolean before)
 657 {
 658   GstAviStream *stream;
 659   GstAviIndexEntry *entry;
 660   gint i;
 661   gint64 val, min = offset;
 662   guint index = 0;
 663
 664   for (i = 0; i < avi->num_streams; i++) {
 665     stream = &avi->stream[i];
 666
 667     /* compensate for chunk header */
 668     offset += 8;
 669     entry =
 670         gst_util_array_binary_search (stream->index, stream->idx_n,
 671         sizeof (GstAviIndexEntry),
 672         (GCompareDataFunc) gst_avi_demux_index_entry_offset_search,
 673         before ? GST_SEARCH_MODE_BEFORE : GST_SEARCH_MODE_AFTER, &offset, NULL);
 674     offset -= 8;
 675
 676     if (entry)
 677       index = entry - stream->index;
 678
 679     if (before) {
 680       if (entry) {
 681         val = stream->index[index].offset;
 682         GST_DEBUG_OBJECT (avi,
 683             "stream %d, previous entry at %" G_GUINT64_FORMAT, i, val);
 684         if (val < min)
 685           min = val;
 686       }
 687       continue;
 688     }
 689
 690     if (!entry) {
 691       GST_DEBUG_OBJECT (avi, "no position for stream %d, assuming at start", i);
 692       stream->current_entry = 0;
 693       stream->current_total = 0;
 694       continue;
 695     }
 696
 697     val = stream->index[index].offset - 8;
 698     GST_DEBUG_OBJECT (avi, "stream %d, next entry at %" G_GUINT64_FORMAT, i,
 699         val);
 700
 701     stream->current_total = stream->index[index].total;
 702     stream->current_entry = index;
 703   }
 704
 705   return min;
 706 }
 707
 708 #define GST_AVI_SEEK_PUSH_DISPLACE     (4 * GST_SECOND)
 709
 710 static gboolean
 711 gst_avi_demux_handle_sink_event (GstPad * pad, GstObject * parent,
 712     GstEvent * event)
 713 {
 714   gboolean res = TRUE;
 715   GstAviDemux *avi = GST_AVI_DEMUX (parent);
 716
 717   GST_DEBUG_OBJECT (avi,
 718       "have event type %s: %p on sink pad", GST_EVENT_TYPE_NAME (event), event);
 719
 720   switch (GST_EVENT_TYPE (event)) {
 721     case GST_EVENT_SEGMENT:
 722     {
 723       gint64 boffset, offset = 0;
 724       GstSegment segment;
 725
 726       /* some debug output */
 727       gst_event_copy_segment (event, &segment);
 728       GST_DEBUG_OBJECT (avi, "received newsegment %" GST_SEGMENT_FORMAT,
 729           &segment);
 730
 731       /* chain will send initial newsegment after pads have been added */
 732       if (avi->state != GST_AVI_DEMUX_MOVI) {
 733         GST_DEBUG_OBJECT (avi, "still starting, eating event");
 734         goto exit;
 735       }
 736
 737       /* we only expect a BYTE segment, e.g. following a seek */
 738       if (segment.format != GST_FORMAT_BYTES) {
 739         GST_DEBUG_OBJECT (avi, "unsupported segment format, ignoring");
 740         goto exit;
 741       }
 742
 743       if (avi->have_index) {
 744         GstAviIndexEntry *entry;
 745         guint i = 0, index = 0, k = 0;
 746         GstAviStream *stream;
 747
 748         /* compensate chunk header, stored index offset points after header */
 749         boffset = segment.start + 8;
 750         /* find which stream we're on */
 751         do {
 752           stream = &avi->stream[i];
 753
 754           /* find the index for start bytes offset */
 755           entry = gst_util_array_binary_search (stream->index,
 756               stream->idx_n, sizeof (GstAviIndexEntry),
 757               (GCompareDataFunc) gst_avi_demux_index_entry_offset_search,
 758               GST_SEARCH_MODE_AFTER, &boffset, NULL);
 759
 760           if (entry == NULL)
 761             continue;
 762           index = entry - stream->index;
 763
 764           /* we are on the stream with a chunk start offset closest to start */
 765           if (!offset || stream->index[index].offset < offset) {
 766             offset = stream->index[index].offset;
 767             k = i;
 768           }
 769           /* exact match needs no further searching */
 770           if (stream->index[index].offset == boffset)
 771             break;
 772         } while (++i < avi->num_streams);
 773         boffset -= 8;
 774         offset -= 8;
 775         stream = &avi->stream[k];
 776
 777         /* so we have no idea what is to come, or where we are */
 778         if (!offset) {
 779           GST_WARNING_OBJECT (avi, "insufficient index data, forcing EOS");
 780           goto eos;
 781         }
 782
 783         /* get the ts corresponding to start offset bytes for the stream */
 784         gst_avi_demux_get_buffer_info (avi, stream, index,
 785             (GstClockTime *) & segment.time, NULL, NULL, NULL);
 786 #if 0
 787       } else if (avi->element_index) {
 788         GstIndexEntry *entry;
 789
 790         /* Let's check if we have an index entry for this position */
 791         entry = gst_index_get_assoc_entry (avi->element_index, avi->index_id,
 792             GST_INDEX_LOOKUP_AFTER, GST_ASSOCIATION_FLAG_NONE,
 793             GST_FORMAT_BYTES, segment.start);
 794
 795         /* we can not go where we have not yet been before ... */
 796         if (!entry) {
 797           GST_WARNING_OBJECT (avi, "insufficient index data, forcing EOS");
 798           goto eos;
 799         }
 800
 801         gst_index_entry_assoc_map (entry, GST_FORMAT_TIME,
 802             (gint64 *) & segment.time);
 803         gst_index_entry_assoc_map (entry, GST_FORMAT_BYTES, &offset);
 804 #endif
 805       } else {
 806         GST_WARNING_OBJECT (avi, "no index data, forcing EOS");
 807         goto eos;
 808       }
 809
 810       segment.format = GST_FORMAT_TIME;
 811       segment.start = segment.time;
 812       segment.stop = GST_CLOCK_TIME_NONE;
 813       segment.position = segment.start;
 814
 815       /* rescue duration */
 816       segment.duration = avi->segment.duration;
 817
 818       /* set up segment and send downstream */
 819       gst_segment_copy_into (&segment, &avi->segment);
 820
 821       GST_DEBUG_OBJECT (avi, "Pushing newseg %" GST_SEGMENT_FORMAT, &segment);
 822       gst_avi_demux_push_event (avi, gst_event_new_segment (&segment));
 823
 824       GST_DEBUG_OBJECT (avi, "next chunk expected at %" G_GINT64_FORMAT,
 825           boffset);
 826
 827       /* adjust state for streaming thread accordingly */
 828       if (avi->have_index)
 829         gst_avi_demux_seek_streams_index (avi, offset, FALSE);
 830 #if 0
 831       else
 832         gst_avi_demux_seek_streams (avi, offset, FALSE);
 833 #endif
 834
 835       /* set up streaming thread */
 836       g_assert (offset >= boffset);
 837       avi->offset = boffset;
 838       avi->todrop = offset - boffset;
 839
 840     exit:
 841       gst_event_unref (event);
 842       res = TRUE;
 843       break;
 844     eos:
 845       /* set up for EOS */
 846       avi->have_eos = TRUE;
 847       goto exit;
 848     }
 849     case GST_EVENT_EOS:
 850     {
 851       if (avi->state != GST_AVI_DEMUX_MOVI) {
 852         gst_event_unref (event);
 853         GST_ELEMENT_ERROR (avi, STREAM, DEMUX,
 854             (NULL), ("got eos and didn't receive a complete header object"));
 855       } else if (!gst_avi_demux_push_event (avi, event)) {
 856         GST_ELEMENT_ERROR (avi, STREAM, DEMUX,
 857             (NULL), ("got eos but no streams (yet)"));
 858       }
 859       break;
 860     }
 861     case GST_EVENT_FLUSH_STOP:
 862     {
 863       gint i;
 864
 865       gst_adapter_clear (avi->adapter);
 866       avi->have_eos = FALSE;
 867       for (i = 0; i < avi->num_streams; i++) {
 868         avi->stream[i].last_flow = GST_FLOW_OK;
 869         avi->stream[i].discont = TRUE;
 870       }
 871       /* fall through to default case so that the event gets passed downstream */
 872     }
 873     default:
 874       res = gst_pad_event_default (pad, parent, event);
 875       break;
 876   }
 877
 878   return res;
 879 }
 880
 881 static gboolean
 882 gst_avi_demux_handle_src_event (GstPad * pad, GstObject * parent,
 883     GstEvent * event)
 884 {
 885   gboolean res = TRUE;
 886   GstAviDemux *avi = GST_AVI_DEMUX (parent);
 887
 888   GST_DEBUG_OBJECT (avi,
 889       "have event type %s: %p on src pad", GST_EVENT_TYPE_NAME (event), event);
 890
 891   switch (GST_EVENT_TYPE (event)) {
 892     case GST_EVENT_SEEK:
 893       if (!avi->streaming) {
 894         res = gst_avi_demux_handle_seek (avi, pad, event);
 895       } else {
 896         res = gst_avi_demux_handle_seek_push (avi, pad, event);
 897       }
 898       gst_event_unref (event);
 899       break;
 900     case GST_EVENT_QOS:
 901     case GST_EVENT_NAVIGATION:
 902       res = FALSE;
 903       gst_event_unref (event);
 904       break;
 905     default:
 906       res = gst_pad_event_default (pad, parent, event);
 907       break;
 908   }
 909
 910   return res;
 911 }
 912
 913 /* streaming helper (push) */
 914
 915 /*
 916  * gst_avi_demux_peek_chunk_info:
 917  * @avi: Avi object
 918  * @tag: holder for tag
 919  * @size: holder for tag size
 920  *
 921  * Peek next chunk info (tag and size)
 922  *
 923  * Returns: TRUE when one chunk info has been got
 924  */
 925 static gboolean
 926 gst_avi_demux_peek_chunk_info (GstAviDemux * avi, guint32 * tag, guint32 * size)
 927 {
 928   const guint8 *data = NULL;
 929
 930   if (gst_adapter_available (avi->adapter) < 8)
 931     return FALSE;
 932
 933   data = gst_adapter_map (avi->adapter, 8);
 934   *tag = GST_READ_UINT32_LE (data);
 935   *size = GST_READ_UINT32_LE (data + 4);
 936   gst_adapter_unmap (avi->adapter);
 937
 938   return TRUE;
 939 }
 940
 941 /*
 942  * gst_avi_demux_peek_chunk:
 943  * @avi: Avi object
 944  * @tag: holder for tag
 945  * @size: holder for tag size
 946  *
 947  * Peek enough data for one full chunk
 948  *
 949  * Returns: %TRUE when one chunk has been got
 950  */
 951 static gboolean
 952 gst_avi_demux_peek_chunk (GstAviDemux * avi, guint32 * tag, guint32 * size)
 953 {
 954   guint32 peek_size = 0;
 955   gint available;
 956
 957   if (!gst_avi_demux_peek_chunk_info (avi, tag, size))
 958     goto peek_failed;
 959
 960   /* size 0 -> empty data buffer would surprise most callers,
 961    * large size -> do not bother trying to squeeze that into adapter,
 962    * so we throw poor man's exception, which can be caught if caller really
 963    * wants to handle 0 size chunk */
 964   if (!(*size) || (*size) >= (1 << 30))
 965     goto strange_size;
 966
 967   peek_size = (*size + 1) & ~1;
 968   available = gst_adapter_available (avi->adapter);
 969
 970   GST_DEBUG_OBJECT (avi,
 971       "Need to peek chunk of %d bytes to read chunk %" GST_FOURCC_FORMAT
 972       ", %d bytes available", *size, GST_FOURCC_ARGS (*tag), available);
 973
 974   if (available < (8 + peek_size))
 975     goto need_more;
 976
 977   return TRUE;
 978
 979   /* ERRORS */
 980 peek_failed:
 981   {
 982     GST_INFO_OBJECT (avi, "Failed to peek");
 983     return FALSE;
 984   }
 985 strange_size:
 986   {
 987     GST_INFO_OBJECT (avi,
 988         "Invalid/unexpected chunk size %d for tag %" GST_FOURCC_FORMAT, *size,
 989         GST_FOURCC_ARGS (*tag));
 990     /* chain should give up */
 991     avi->abort_buffering = TRUE;
 992     return FALSE;
 993   }
 994 need_more:
 995   {
 996     GST_INFO_OBJECT (avi, "need more %d < %" G_GUINT32_FORMAT,
 997         available, 8 + peek_size);
 998     return FALSE;
 999   }
1000 }
1001
1002 /* AVI init */
1003
1004 /*
1005  * gst_avi_demux_parse_file_header:
1006  * @element: caller element (used for errors/debug).
1007  * @buf: input data to be used for parsing.
1008  *
1009  * "Open" a RIFF/AVI file. The buffer should be at least 12
1010  * bytes long. Takes ownership of @buf.
1011  *
1012  * Returns: TRUE if the file is a RIFF/AVI file, FALSE otherwise.
1013  *          Throws an error, caller should error out (fatal).
1014  */
1015 static gboolean
1016 gst_avi_demux_parse_file_header (GstElement * element, GstBuffer * buf)
1017 {
1018   guint32 doctype;
1019   GstClockTime stamp;
1020
1021   stamp = gst_util_get_timestamp ();
1022
1023   /* riff_parse posts an error */
1024   if (!gst_riff_parse_file_header (element, buf, &doctype))
1025     return FALSE;
1026
1027   if (doctype != GST_RIFF_RIFF_AVI)
1028     goto not_avi;
1029
1030   stamp = gst_util_get_timestamp () - stamp;
1031   GST_DEBUG_OBJECT (element, "header parsing took %" GST_TIME_FORMAT,
1032       GST_TIME_ARGS (stamp));
1033
1034   return TRUE;
1035
1036   /* ERRORS */
1037 not_avi:
1038   {
1039     GST_ELEMENT_ERROR (element, STREAM, WRONG_TYPE, (NULL),
1040         ("File is not an AVI file: %" GST_FOURCC_FORMAT,
1041             GST_FOURCC_ARGS (doctype)));
1042     return FALSE;
1043   }
1044 }
1045
1046 /*
1047  * Read AVI file tag when streaming
1048  */
1049 static GstFlowReturn
1050 gst_avi_demux_stream_init_push (GstAviDemux * avi)
1051 {
1052   if (gst_adapter_available (avi->adapter) >= 12) {
1053     GstBuffer *tmp;
1054
1055     tmp = gst_adapter_take_buffer (avi->adapter, 12);
1056
1057     GST_DEBUG ("Parsing avi header");
1058     if (!gst_avi_demux_parse_file_header (GST_ELEMENT_CAST (avi), tmp)) {
1059       return GST_FLOW_ERROR;
1060     }
1061     GST_DEBUG ("header ok");
1062     avi->offset += 12;
1063
1064     avi->state = GST_AVI_DEMUX_HEADER;
1065   }
1066   return GST_FLOW_OK;
1067 }
1068
1069 /*
1070  * Read AVI file tag
1071  */
1072 static GstFlowReturn
1073 gst_avi_demux_stream_init_pull (GstAviDemux * avi)
1074 {
1075   GstFlowReturn res;
1076   GstBuffer *buf = NULL;
1077
1078   res = gst_pad_pull_range (avi->sinkpad, avi->offset, 12, &buf);
1079   if (res != GST_FLOW_OK)
1080     return res;
1081   else if (!gst_avi_demux_parse_file_header (GST_ELEMENT_CAST (avi), buf))
1082     goto wrong_header;
1083
1084   avi->offset += 12;
1085
1086   return GST_FLOW_OK;
1087
1088   /* ERRORS */
1089 wrong_header:
1090   {
1091     GST_DEBUG_OBJECT (avi, "error parsing file header");
1092     return GST_FLOW_ERROR;
1093   }
1094 }
1095
1096 /* AVI header handling */
1097 /*
1098  * gst_avi_demux_parse_avih:
1099  * @avi: caller element (used for errors/debug).
1100  * @buf: input data to be used for parsing.
1101  * @avih: pointer to structure (filled in by function) containing
1102  *        stream information (such as flags, number of streams, etc.).
1103  *
1104  * Read 'avih' header. Discards buffer after use.
1105  *
1106  * Returns: TRUE on success, FALSE otherwise. Throws an error if
1107  *          the header is invalid. The caller should error out
1108  *          (fatal).
1109  */
1110 static gboolean
1111 gst_avi_demux_parse_avih (GstAviDemux * avi,
1112     GstBuffer * buf, gst_riff_avih ** _avih)
1113 {
1114   gst_riff_avih *avih;
1115   gsize size;
1116
1117   if (buf == NULL)
1118     goto no_buffer;
1119
1120   size = gst_buffer_get_size (buf);
1121   if (size < sizeof (gst_riff_avih))
1122     goto avih_too_small;
1123
1124   avih = g_malloc (size);
1125   gst_buffer_extract (buf, 0, avih, size);
1126
1127 #if (G_BYTE_ORDER == G_BIG_ENDIAN)
1128   avih->us_frame = GUINT32_FROM_LE (avih->us_frame);
1129   avih->max_bps = GUINT32_FROM_LE (avih->max_bps);
1130   avih->pad_gran = GUINT32_FROM_LE (avih->pad_gran);
1131   avih->flags = GUINT32_FROM_LE (avih->flags);
1132   avih->tot_frames = GUINT32_FROM_LE (avih->tot_frames);
1133   avih->init_frames = GUINT32_FROM_LE (avih->init_frames);
1134   avih->streams = GUINT32_FROM_LE (avih->streams);
1135   avih->bufsize = GUINT32_FROM_LE (avih->bufsize);
1136   avih->width = GUINT32_FROM_LE (avih->width);
1137   avih->height = GUINT32_FROM_LE (avih->height);
1138   avih->scale = GUINT32_FROM_LE (avih->scale);
1139   avih->rate = GUINT32_FROM_LE (avih->rate);
1140   avih->start = GUINT32_FROM_LE (avih->start);
1141   avih->length = GUINT32_FROM_LE (avih->length);
1142 #endif
1143
1144   /* debug stuff */
1145   GST_INFO_OBJECT (avi, "avih tag found:");
1146   GST_INFO_OBJECT (avi, " us_frame    %u", avih->us_frame);
1147   GST_INFO_OBJECT (avi, " max_bps     %u", avih->max_bps);
1148   GST_INFO_OBJECT (avi, " pad_gran    %u", avih->pad_gran);
1149   GST_INFO_OBJECT (avi, " flags       0x%08x", avih->flags);
1150   GST_INFO_OBJECT (avi, " tot_frames  %u", avih->tot_frames);
1151   GST_INFO_OBJECT (avi, " init_frames %u", avih->init_frames);
1152   GST_INFO_OBJECT (avi, " streams     %u", avih->streams);
1153   GST_INFO_OBJECT (avi, " bufsize     %u", avih->bufsize);
1154   GST_INFO_OBJECT (avi, " width       %u", avih->width);
1155   GST_INFO_OBJECT (avi, " height      %u", avih->height);
1156   GST_INFO_OBJECT (avi, " scale       %u", avih->scale);
1157   GST_INFO_OBJECT (avi, " rate        %u", avih->rate);
1158   GST_INFO_OBJECT (avi, " start       %u", avih->start);
1159   GST_INFO_OBJECT (avi, " length      %u", avih->length);
1160
1161   *_avih = avih;
1162   gst_buffer_unref (buf);
1163
1164   if (avih->us_frame != 0 && avih->tot_frames != 0)
1165     avi->duration =
1166         (guint64) avih->us_frame * (guint64) avih->tot_frames * 1000;
1167   else
1168     avi->duration = GST_CLOCK_TIME_NONE;
1169
1170   GST_INFO_OBJECT (avi, " header duration  %" GST_TIME_FORMAT,
1171       GST_TIME_ARGS (avi->duration));
1172
1173   return TRUE;
1174
1175   /* ERRORS */
1176 no_buffer:
1177   {
1178     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("No buffer"));
1179     return FALSE;
1180   }
1181 avih_too_small:
1182   {
1183     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
1184         ("Too small avih (%" G_GSIZE_FORMAT " available, %d needed)",
1185             size, (int) sizeof (gst_riff_avih)));
1186     gst_buffer_unref (buf);
1187     return FALSE;
1188   }
1189 }
1190
1191 /*
1192  * gst_avi_demux_parse_superindex:
1193  * @avi: caller element (used for debugging/errors).
1194  * @buf: input data to use for parsing.
1195  * @locations: locations in the file (byte-offsets) that contain
1196  *             the actual indexes (see get_avi_demux_parse_subindex()).
1197  *             The array ends with GST_BUFFER_OFFSET_NONE.
1198  *
1199  * Reads superindex (openDML-2 spec stuff) from the provided data.
1200  *
1201  * Returns: TRUE on success, FALSE otherwise. Indexes should be skipped
1202  *          on error, but they are not fatal.
1203  */
1204 static gboolean
1205 gst_avi_demux_parse_superindex (GstAviDemux * avi,
1206     GstBuffer * buf, guint64 ** _indexes)
1207 {
1208   GstMapInfo map;
1209   guint8 *data;
1210   guint16 bpe = 16;
1211   guint32 num, i;
1212   guint64 *indexes;
1213   gsize size;
1214
1215   *_indexes = NULL;
1216
1217   if (buf) {
1218     gst_buffer_map (buf, &map, GST_MAP_READ);
1219     data = map.data;
1220     size = map.size;
1221   } else {
1222     data = NULL;
1223     size = 0;
1224   }
1225
1226   if (size < 24)
1227     goto too_small;
1228
1229   /* check type of index. The opendml2 specs state that
1230    * there should be 4 dwords per array entry. Type can be
1231    * either frame or field (and we don't care). */
1232   if (GST_READ_UINT16_LE (data) != 4 ||
1233       (data[2] & 0xfe) != 0x0 || data[3] != 0x0) {
1234     GST_WARNING_OBJECT (avi,
1235         "Superindex for stream has unexpected "
1236         "size_entry %d (bytes) or flags 0x%02x/0x%02x",
1237         GST_READ_UINT16_LE (data), data[2], data[3]);
1238     bpe = GST_READ_UINT16_LE (data) * 4;
1239   }
1240   num = GST_READ_UINT32_LE (&data[4]);
1241
1242   GST_DEBUG_OBJECT (avi, "got %d indexes", num);
1243
1244   /* this can't work out well ... */
1245   if (num > G_MAXUINT32 >> 1 || bpe < 8) {
1246     goto invalid_params;
1247   }
1248
1249   indexes = g_new (guint64, num + 1);
1250   for (i = 0; i < num; i++) {
1251     if (size < 24 + bpe * (i + 1))
1252       break;
1253     indexes[i] = GST_READ_UINT64_LE (&data[24 + bpe * i]);
1254     GST_DEBUG_OBJECT (avi, "index %d at %" G_GUINT64_FORMAT, i, indexes[i]);
1255   }
1256   indexes[i] = GST_BUFFER_OFFSET_NONE;
1257   *_indexes = indexes;
1258
1259   gst_buffer_unmap (buf, &map);
1260   gst_buffer_unref (buf);
1261
1262   return TRUE;
1263
1264   /* ERRORS */
1265 too_small:
1266   {
1267     GST_ERROR_OBJECT (avi,
1268         "Not enough data to parse superindex (%" G_GSIZE_FORMAT
1269         " available, 24 needed)", size);
1270     if (buf) {
1271       gst_buffer_unmap (buf, &map);
1272       gst_buffer_unref (buf);
1273     }
1274     return FALSE;
1275   }
1276 invalid_params:
1277   {
1278     GST_ERROR_OBJECT (avi, "invalid index parameters (num = %d, bpe = %d)",
1279         num, bpe);
1280     gst_buffer_unmap (buf, &map);
1281     gst_buffer_unref (buf);
1282     return FALSE;
1283   }
1284 }
1285
1286 /* add an entry to the index of a stream. @num should be an estimate of the
1287  * total amount of index entries for all streams and is used to dynamically
1288  * allocate memory for the index entries. */
1289 static inline gboolean
1290 gst_avi_demux_add_index (GstAviDemux * avi, GstAviStream * stream,
1291     guint num, GstAviIndexEntry * entry)
1292 {
1293   /* ensure index memory */
1294   if (G_UNLIKELY (stream->idx_n >= stream->idx_max)) {
1295     guint idx_max = stream->idx_max;
1296     GstAviIndexEntry *new_idx;
1297
1298     /* we need to make some more room */
1299     if (idx_max == 0) {
1300       /* initial size guess, assume each stream has an equal amount of entries,
1301        * overshoot with at least 8K */
1302       idx_max = (num / avi->num_streams) + (8192 / sizeof (GstAviIndexEntry));
1303     } else {
1304       idx_max += 8192 / sizeof (GstAviIndexEntry);
1305       GST_DEBUG_OBJECT (avi, "expanded index from %u to %u",
1306           stream->idx_max, idx_max);
1307     }
1308     new_idx = g_try_renew (GstAviIndexEntry, stream->index, idx_max);
1309     /* out of memory, if this fails stream->index is untouched. */
1310     if (G_UNLIKELY (!new_idx))
1311       return FALSE;
1312     /* use new index */
1313     stream->index = new_idx;
1314     stream->idx_max = idx_max;
1315   }
1316
1317   /* update entry total and stream stats. The entry total can be converted to
1318    * the timestamp of the entry easily. */
1319   if (stream->strh->type == GST_RIFF_FCC_auds) {
1320     gint blockalign;
1321
1322     if (stream->is_vbr) {
1323       entry->total = stream->total_blocks;
1324     } else {
1325       entry->total = stream->total_bytes;
1326     }
1327     blockalign = stream->strf.auds->blockalign;
1328     if (blockalign > 0)
1329       stream->total_blocks += DIV_ROUND_UP (entry->size, blockalign);
1330     else
1331       stream->total_blocks++;
1332   } else {
1333     if (stream->is_vbr) {
1334       entry->total = stream->idx_n;
1335     } else {
1336       entry->total = stream->total_bytes;
1337     }
1338   }
1339   stream->total_bytes += entry->size;
1340   if (ENTRY_IS_KEYFRAME (entry))
1341     stream->n_keyframes++;
1342
1343   /* and add */
1344   GST_LOG_OBJECT (avi,
1345       "Adding stream %u, index entry %d, kf %d, size %u "
1346       ", offset %" G_GUINT64_FORMAT ", total %" G_GUINT64_FORMAT, stream->num,
1347       stream->idx_n, ENTRY_IS_KEYFRAME (entry), entry->size, entry->offset,
1348       entry->total);
1349   stream->index[stream->idx_n++] = *entry;
1350
1351   return TRUE;
1352 }
1353
1354 /* given @entry_n in @stream, calculate info such as timestamps and
1355  * offsets for the entry. */
1356 static void
1357 gst_avi_demux_get_buffer_info (GstAviDemux * avi, GstAviStream * stream,
1358     guint entry_n, GstClockTime * timestamp, GstClockTime * ts_end,
1359     guint64 * offset, guint64 * offset_end)
1360 {
1361   GstAviIndexEntry *entry;
1362
1363   entry = &stream->index[entry_n];
1364
1365   if (stream->is_vbr) {
1366     /* VBR stream next timestamp */
1367     if (stream->strh->type == GST_RIFF_FCC_auds) {
1368       if (timestamp)
1369         *timestamp =
1370             avi_stream_convert_frames_to_time_unchecked (stream, entry->total);
1371       if (ts_end)
1372         *ts_end = avi_stream_convert_frames_to_time_unchecked (stream,
1373             entry->total + 1);
1374     } else {
1375       if (timestamp)
1376         *timestamp =
1377             avi_stream_convert_frames_to_time_unchecked (stream, entry_n);
1378       if (ts_end)
1379         *ts_end = avi_stream_convert_frames_to_time_unchecked (stream,
1380             entry_n + 1);
1381     }
1382   } else if (stream->strh->type == GST_RIFF_FCC_auds) {
1383     /* constant rate stream */
1384     if (timestamp)
1385       *timestamp =
1386           avi_stream_convert_bytes_to_time_unchecked (stream, entry->total);
1387     if (ts_end)
1388       *ts_end = avi_stream_convert_bytes_to_time_unchecked (stream,
1389           entry->total + entry->size);
1390   }
1391   if (stream->strh->type == GST_RIFF_FCC_vids) {
1392     /* video offsets are the frame number */
1393     if (offset)
1394       *offset = entry_n;
1395     if (offset_end)
1396       *offset_end = entry_n + 1;
1397   } else {
1398     /* no offsets for audio */
1399     if (offset)
1400       *offset = -1;
1401     if (offset_end)
1402       *offset_end = -1;
1403   }
1404 }
1405
1406 /* collect and debug stats about the indexes for all streams.
1407  * This method is also responsible for filling in the stream duration
1408  * as measured by the amount of index entries.
1409  *
1410  * Returns TRUE if the index is not empty, else FALSE */
1411 static gboolean
1412 gst_avi_demux_do_index_stats (GstAviDemux * avi)
1413 {
1414   guint total_idx = 0;
1415   guint i;
1416 #ifndef GST_DISABLE_GST_DEBUG
1417   guint total_max = 0;
1418 #endif
1419
1420   /* get stream stats now */
1421   for (i = 0; i < avi->num_streams; i++) {
1422     GstAviStream *stream;
1423
1424     if (G_UNLIKELY (!(stream = &avi->stream[i])))
1425       continue;
1426     if (G_UNLIKELY (!stream->strh))
1427       continue;
1428     if (G_UNLIKELY (!stream->index || stream->idx_n == 0))
1429       continue;
1430
1431     /* we interested in the end_ts of the last entry, which is the total
1432      * duration of this stream */
1433     gst_avi_demux_get_buffer_info (avi, stream, stream->idx_n - 1,
1434         NULL, &stream->idx_duration, NULL, NULL);
1435
1436     total_idx += stream->idx_n;
1437 #ifndef GST_DISABLE_GST_DEBUG
1438     total_max += stream->idx_max;
1439 #endif
1440     GST_INFO_OBJECT (avi, "Stream %d, dur %" GST_TIME_FORMAT ", %6u entries, "
1441         "%5u keyframes, entry size = %2u, total size = %10u, allocated %10u",
1442         i, GST_TIME_ARGS (stream->idx_duration), stream->idx_n,
1443         stream->n_keyframes, (guint) sizeof (GstAviIndexEntry),
1444         (guint) (stream->idx_n * sizeof (GstAviIndexEntry)),
1445         (guint) (stream->idx_max * sizeof (GstAviIndexEntry)));
1446   }
1447   total_idx *= sizeof (GstAviIndexEntry);
1448 #ifndef GST_DISABLE_GST_DEBUG
1449   total_max *= sizeof (GstAviIndexEntry);
1450 #endif
1451   GST_INFO_OBJECT (avi, "%u bytes for index vs %u ideally, %u wasted",
1452       total_max, total_idx, total_max - total_idx);
1453
1454   if (total_idx == 0) {
1455     GST_WARNING_OBJECT (avi, "Index is empty !");
1456     return FALSE;
1457   }
1458   return TRUE;
1459 }
1460
1461 /*
1462  * gst_avi_demux_parse_subindex:
1463  * @avi: Avi object
1464  * @buf: input data to use for parsing.
1465  * @stream: stream context.
1466  * @entries_list: a list (returned by the function) containing all the
1467  *           indexes parsed in this specific subindex. The first
1468  *           entry is also a pointer to allocated memory that needs
1469  *           to be free´ed. May be NULL if no supported indexes were
1470  *           found.
1471  *
1472  * Reads superindex (openDML-2 spec stuff) from the provided data.
1473  * The buffer should contain a GST_RIFF_TAG_ix?? chunk.
1474  *
1475  * Returns: TRUE on success, FALSE otherwise. Errors are fatal, we
1476  *          throw an error, caller should bail out asap.
1477  */
1478 static gboolean
1479 gst_avi_demux_parse_subindex (GstAviDemux * avi, GstAviStream * stream,
1480     GstBuffer * buf)
1481 {
1482   GstMapInfo map;
1483   guint8 *data;
1484   guint16 bpe;
1485   guint32 num, i;
1486   guint64 baseoff;
1487
1488   if (buf == NULL)
1489     return TRUE;
1490
1491   gst_buffer_map (buf, &map, GST_MAP_READ);
1492   data = map.data;
1493
1494   /* check size */
1495   if (map.size < 24)
1496     goto too_small;
1497
1498   /* We don't support index-data yet */
1499   if (data[3] & 0x80)
1500     goto not_implemented;
1501
1502   /* check type of index. The opendml2 specs state that
1503    * there should be 4 dwords per array entry. Type can be
1504    * either frame or field (and we don't care). */
1505   bpe = (data[2] & 0x01) ? 12 : 8;
1506   if (GST_READ_UINT16_LE (data) != bpe / 4 ||
1507       (data[2] & 0xfe) != 0x0 || data[3] != 0x1) {
1508     GST_WARNING_OBJECT (avi,
1509         "Superindex for stream %d has unexpected "
1510         "size_entry %d (bytes) or flags 0x%02x/0x%02x",
1511         stream->num, GST_READ_UINT16_LE (data), data[2], data[3]);
1512     bpe = GST_READ_UINT16_LE (data) * 4;
1513   }
1514   num = GST_READ_UINT32_LE (&data[4]);
1515   baseoff = GST_READ_UINT64_LE (&data[12]);
1516
1517   /* If there's nothing, just return ! */
1518   if (num == 0)
1519     goto empty_index;
1520
1521   GST_INFO_OBJECT (avi, "Parsing subindex, nr_entries = %6d", num);
1522
1523   for (i = 0; i < num; i++) {
1524     GstAviIndexEntry entry;
1525
1526     if (map.size < 24 + bpe * (i + 1))
1527       break;
1528
1529     /* fill in offset and size. offset contains the keyframe flag in the
1530      * upper bit*/
1531     entry.offset = baseoff + GST_READ_UINT32_LE (&data[24 + bpe * i]);
1532     entry.size = GST_READ_UINT32_LE (&data[24 + bpe * i + 4]);
1533     /* handle flags */
1534     if (stream->strh->type == GST_RIFF_FCC_auds) {
1535       /* all audio frames are keyframes */
1536       ENTRY_SET_KEYFRAME (&entry);
1537     } else {
1538       /* else read flags */
1539       entry.flags = (entry.size & 0x80000000) ? 0 : GST_AVI_KEYFRAME;
1540     }
1541     entry.size &= ~0x80000000;
1542
1543     /* and add */
1544     if (G_UNLIKELY (!gst_avi_demux_add_index (avi, stream, num, &entry)))
1545       goto out_of_mem;
1546   }
1547 done:
1548   gst_buffer_unmap (buf, &map);
1549   gst_buffer_unref (buf);
1550
1551   return TRUE;
1552
1553   /* ERRORS */
1554 too_small:
1555   {
1556     GST_ERROR_OBJECT (avi,
1557         "Not enough data to parse subindex (%" G_GSIZE_FORMAT
1558         " available, 24 needed)", map.size);
1559     goto done;                  /* continue */
1560   }
1561 not_implemented:
1562   {
1563     GST_ELEMENT_ERROR (avi, STREAM, NOT_IMPLEMENTED, (NULL),
1564         ("Subindex-is-data is not implemented"));
1565     gst_buffer_unmap (buf, &map);
1566     gst_buffer_unref (buf);
1567     return FALSE;
1568   }
1569 empty_index:
1570   {
1571     GST_DEBUG_OBJECT (avi, "the index is empty");
1572     goto done;                  /* continue */
1573   }
1574 out_of_mem:
1575   {
1576     GST_ELEMENT_ERROR (avi, RESOURCE, NO_SPACE_LEFT, (NULL),
1577         ("Cannot allocate memory for %u*%u=%u bytes",
1578             (guint) sizeof (GstAviIndexEntry), num,
1579             (guint) sizeof (GstAviIndexEntry) * num));
1580     gst_buffer_unmap (buf, &map);
1581     gst_buffer_unref (buf);
1582     return FALSE;
1583   }
1584 }
1585
1586 /*
1587  * Create and push a flushing seek event upstream
1588  */
1589 static gboolean
1590 perform_seek_to_offset (GstAviDemux * demux, guint64 offset)
1591 {
1592   GstEvent *event;
1593   gboolean res = 0;
1594
1595   GST_DEBUG_OBJECT (demux, "Seeking to %" G_GUINT64_FORMAT, offset);
1596
1597   event =
1598       gst_event_new_seek (1.0, GST_FORMAT_BYTES,
1599       GST_SEEK_FLAG_FLUSH | GST_SEEK_FLAG_ACCURATE, GST_SEEK_TYPE_SET, offset,
1600       GST_SEEK_TYPE_NONE, -1);
1601
1602   res = gst_pad_push_event (demux->sinkpad, event);
1603
1604   if (res)
1605     demux->offset = offset;
1606   return res;
1607 }
1608
1609 /*
1610  * Read AVI index when streaming
1611  */
1612 static gboolean
1613 gst_avi_demux_read_subindexes_push (GstAviDemux * avi)
1614 {
1615   guint32 tag = 0, size;
1616   GstBuffer *buf = NULL;
1617   guint odml_stream;
1618
1619   GST_DEBUG_OBJECT (avi, "read subindexes for %d streams", avi->num_streams);
1620
1621   if (avi->odml_subidxs[avi->odml_subidx] != avi->offset)
1622     return FALSE;
1623
1624   if (!gst_avi_demux_peek_chunk (avi, &tag, &size))
1625     return TRUE;
1626
1627   /* this is the ODML chunk we expect */
1628   odml_stream = avi->odml_stream;
1629
1630   if ((tag != GST_MAKE_FOURCC ('i', 'x', '0' + odml_stream / 10,
1631               '0' + odml_stream % 10)) &&
1632       (tag != GST_MAKE_FOURCC ('0' + odml_stream / 10,
1633               '0' + odml_stream % 10, 'i', 'x'))) {
1634     GST_WARNING_OBJECT (avi, "Not an ix## chunk (%" GST_FOURCC_FORMAT ")",
1635         GST_FOURCC_ARGS (tag));
1636     return FALSE;
1637   }
1638
1639   avi->offset += 8 + GST_ROUND_UP_2 (size);
1640   /* flush chunk header so we get just the 'size' payload data */
1641   gst_adapter_flush (avi->adapter, 8);
1642   buf = gst_adapter_take_buffer (avi->adapter, size);
1643
1644   if (!gst_avi_demux_parse_subindex (avi, &avi->stream[odml_stream], buf))
1645     return FALSE;
1646
1647   /* we parsed the index, go to next subindex */
1648   avi->odml_subidx++;
1649
1650   if (avi->odml_subidxs[avi->odml_subidx] == GST_BUFFER_OFFSET_NONE) {
1651     /* we reached the end of the indexes for this stream, move to the next
1652      * stream to handle the first index */
1653     avi->odml_stream++;
1654     avi->odml_subidx = 0;
1655
1656     if (avi->odml_stream < avi->num_streams) {
1657       /* there are more indexes */
1658       avi->odml_subidxs = avi->stream[avi->odml_stream].indexes;
1659     } else {
1660       /* we're done, get stream stats now */
1661       avi->have_index = gst_avi_demux_do_index_stats (avi);
1662
1663       return TRUE;
1664     }
1665   }
1666
1667   /* seek to next index */
1668   return perform_seek_to_offset (avi, avi->odml_subidxs[avi->odml_subidx]);
1669 }
1670
1671 /*
1672  * Read AVI index
1673  */
1674 static void
1675 gst_avi_demux_read_subindexes_pull (GstAviDemux * avi)
1676 {
1677   guint32 tag;
1678   GstBuffer *buf;
1679   gint i, n;
1680
1681   GST_DEBUG_OBJECT (avi, "read subindexes for %d streams", avi->num_streams);
1682
1683   for (n = 0; n < avi->num_streams; n++) {
1684     GstAviStream *stream = &avi->stream[n];
1685
1686     if (stream->indexes == NULL)
1687       continue;
1688
1689     for (i = 0; stream->indexes[i] != GST_BUFFER_OFFSET_NONE; i++) {
1690       if (gst_riff_read_chunk (GST_ELEMENT_CAST (avi), avi->sinkpad,
1691               &stream->indexes[i], &tag, &buf) != GST_FLOW_OK)
1692         continue;
1693       else if ((tag != GST_MAKE_FOURCC ('i', 'x', '0' + stream->num / 10,
1694                   '0' + stream->num % 10)) &&
1695           (tag != GST_MAKE_FOURCC ('0' + stream->num / 10,
1696                   '0' + stream->num % 10, 'i', 'x'))) {
1697         /* Some ODML files (created by god knows what muxer) have a ##ix format
1698          * instead of the 'official' ix##. They are still valid though. */
1699         GST_WARNING_OBJECT (avi, "Not an ix## chunk (%" GST_FOURCC_FORMAT ")",
1700             GST_FOURCC_ARGS (tag));
1701         gst_buffer_unref (buf);
1702         continue;
1703       }
1704
1705       if (!gst_avi_demux_parse_subindex (avi, stream, buf))
1706         continue;
1707     }
1708
1709     g_free (stream->indexes);
1710     stream->indexes = NULL;
1711   }
1712   /* get stream stats now */
1713   avi->have_index = gst_avi_demux_do_index_stats (avi);
1714 }
1715
1716 /*
1717  * gst_avi_demux_riff_parse_vprp:
1718  * @element: caller element (used for debugging/error).
1719  * @buf: input data to be used for parsing, stripped from header.
1720  * @vprp: a pointer (returned by this function) to a filled-in vprp
1721  *        structure. Caller should free it.
1722  *
1723  * Parses a video stream´s vprp. This function takes ownership of @buf.
1724  *
1725  * Returns: TRUE if parsing succeeded, otherwise FALSE. The stream
1726  *          should be skipped on error, but it is not fatal.
1727  */
1728 static gboolean
1729 gst_avi_demux_riff_parse_vprp (GstElement * element,
1730     GstBuffer * buf, gst_riff_vprp ** _vprp)
1731 {
1732   gst_riff_vprp *vprp;
1733   gint k;
1734   gsize size;
1735
1736   g_return_val_if_fail (buf != NULL, FALSE);
1737   g_return_val_if_fail (_vprp != NULL, FALSE);
1738
1739   size = gst_buffer_get_size (buf);
1740
1741   if (size < G_STRUCT_OFFSET (gst_riff_vprp, field_info))
1742     goto too_small;
1743
1744   vprp = g_malloc (size);
1745   gst_buffer_extract (buf, 0, vprp, size);
1746
1747 #if (G_BYTE_ORDER == G_BIG_ENDIAN)
1748   vprp->format_token = GUINT32_FROM_LE (vprp->format_token);
1749   vprp->standard = GUINT32_FROM_LE (vprp->standard);
1750   vprp->vert_rate = GUINT32_FROM_LE (vprp->vert_rate);
1751   vprp->hor_t_total = GUINT32_FROM_LE (vprp->hor_t_total);
1752   vprp->vert_lines = GUINT32_FROM_LE (vprp->vert_lines);
1753   vprp->aspect = GUINT32_FROM_LE (vprp->aspect);
1754   vprp->width = GUINT32_FROM_LE (vprp->width);
1755   vprp->height = GUINT32_FROM_LE (vprp->height);
1756   vprp->fields = GUINT32_FROM_LE (vprp->fields);
1757 #endif
1758
1759   /* size checking */
1760   /* calculate fields based on size */
1761   k = (size - G_STRUCT_OFFSET (gst_riff_vprp, field_info)) / vprp->fields;
1762   if (vprp->fields > k) {
1763     GST_WARNING_OBJECT (element,
1764         "vprp header indicated %d fields, only %d available", vprp->fields, k);
1765     vprp->fields = k;
1766   }
1767   if (vprp->fields > GST_RIFF_VPRP_VIDEO_FIELDS) {
1768     GST_WARNING_OBJECT (element,
1769         "vprp header indicated %d fields, at most %d supported", vprp->fields,
1770         GST_RIFF_VPRP_VIDEO_FIELDS);
1771     vprp->fields = GST_RIFF_VPRP_VIDEO_FIELDS;
1772   }
1773 #if (G_BYTE_ORDER == G_BIG_ENDIAN)
1774   for (k = 0; k < vprp->fields; k++) {
1775     gst_riff_vprp_video_field_desc *fd;
1776
1777     fd = &vprp->field_info[k];
1778     fd->compressed_bm_height = GUINT32_FROM_LE (fd->compressed_bm_height);
1779     fd->compressed_bm_width = GUINT32_FROM_LE (fd->compressed_bm_width);
1780     fd->valid_bm_height = GUINT32_FROM_LE (fd->valid_bm_height);
1781     fd->valid_bm_width = GUINT16_FROM_LE (fd->valid_bm_width);
1782     fd->valid_bm_x_offset = GUINT16_FROM_LE (fd->valid_bm_x_offset);
1783     fd->valid_bm_y_offset = GUINT32_FROM_LE (fd->valid_bm_y_offset);
1784     fd->video_x_t_offset = GUINT32_FROM_LE (fd->video_x_t_offset);
1785     fd->video_y_start = GUINT32_FROM_LE (fd->video_y_start);
1786   }
1787 #endif
1788
1789   /* debug */
1790   GST_INFO_OBJECT (element, "vprp tag found in context vids:");
1791   GST_INFO_OBJECT (element, " format_token  %d", vprp->format_token);
1792   GST_INFO_OBJECT (element, " standard      %d", vprp->standard);
1793   GST_INFO_OBJECT (element, " vert_rate     %d", vprp->vert_rate);
1794   GST_INFO_OBJECT (element, " hor_t_total   %d", vprp->hor_t_total);
1795   GST_INFO_OBJECT (element, " vert_lines    %d", vprp->vert_lines);
1796   GST_INFO_OBJECT (element, " aspect        %d:%d", vprp->aspect >> 16,
1797       vprp->aspect & 0xffff);
1798   GST_INFO_OBJECT (element, " width         %d", vprp->width);
1799   GST_INFO_OBJECT (element, " height        %d", vprp->height);
1800   GST_INFO_OBJECT (element, " fields        %d", vprp->fields);
1801   for (k = 0; k < vprp->fields; k++) {
1802     gst_riff_vprp_video_field_desc *fd;
1803
1804     fd = &(vprp->field_info[k]);
1805     GST_INFO_OBJECT (element, " field %u description:", k);
1806     GST_INFO_OBJECT (element, "  compressed_bm_height  %d",
1807         fd->compressed_bm_height);
1808     GST_INFO_OBJECT (element, "  compressed_bm_width  %d",
1809         fd->compressed_bm_width);
1810     GST_INFO_OBJECT (element, "  valid_bm_height       %d",
1811         fd->valid_bm_height);
1812     GST_INFO_OBJECT (element, "  valid_bm_width        %d", fd->valid_bm_width);
1813     GST_INFO_OBJECT (element, "  valid_bm_x_offset     %d",
1814         fd->valid_bm_x_offset);
1815     GST_INFO_OBJECT (element, "  valid_bm_y_offset     %d",
1816         fd->valid_bm_y_offset);
1817     GST_INFO_OBJECT (element, "  video_x_t_offset      %d",
1818         fd->video_x_t_offset);
1819     GST_INFO_OBJECT (element, "  video_y_start         %d", fd->video_y_start);
1820   }
1821
1822   gst_buffer_unref (buf);
1823
1824   *_vprp = vprp;
1825
1826   return TRUE;
1827
1828   /* ERRORS */
1829 too_small:
1830   {
1831     GST_ERROR_OBJECT (element,
1832         "Too small vprp (%" G_GSIZE_FORMAT " available, at least %d needed)",
1833         size, (int) G_STRUCT_OFFSET (gst_riff_vprp, field_info));
1834     gst_buffer_unref (buf);
1835     return FALSE;
1836   }
1837 }
1838
1839 static void
1840 gst_avi_demux_expose_streams (GstAviDemux * avi, gboolean force)
1841 {
1842   guint i;
1843
1844   GST_DEBUG_OBJECT (avi, "force : %d", force);
1845
1846   for (i = 0; i < avi->num_streams; i++) {
1847     GstAviStream *stream = &avi->stream[i];
1848
1849     if (force || stream->idx_n != 0) {
1850       GST_LOG_OBJECT (avi, "Adding pad %s" GST_PTR_FORMAT,
1851           GST_PAD_NAME (stream->pad));
1852       gst_element_add_pad ((GstElement *) avi, stream->pad);
1853
1854 #if 0
1855       if (avi->element_index)
1856         gst_index_get_writer_id (avi->element_index,
1857             GST_OBJECT_CAST (stream->pad), &stream->index_id);
1858 #endif
1859
1860       stream->exposed = TRUE;
1861       if (avi->main_stream == -1)
1862         avi->main_stream = i;
1863     } else {
1864       GST_WARNING_OBJECT (avi, "Stream #%d doesn't have any entry, removing it",
1865           i);
1866       gst_avi_demux_reset_stream (avi, stream);
1867     }
1868   }
1869 }
1870
1871 /* buf contains LIST chunk data, and will be padded to even size,
1872  * since some buggy files do not account for the padding of chunks
1873  * within a LIST in the size of the LIST */
1874 static inline void
1875 gst_avi_demux_roundup_list (GstAviDemux * avi, GstBuffer ** buf)
1876 {
1877   gsize size;
1878
1879   size = gst_buffer_get_size (*buf);
1880
1881   if (G_UNLIKELY (size & 1)) {
1882     GstBuffer *obuf;
1883     GstMapInfo map;
1884
1885     GST_DEBUG_OBJECT (avi, "rounding up dubious list size %" G_GSIZE_FORMAT,
1886         size);
1887     obuf = gst_buffer_new_and_alloc (size + 1);
1888
1889     gst_buffer_map (obuf, &map, GST_MAP_WRITE);
1890     gst_buffer_extract (*buf, 0, map.data, size);
1891     /* assume 0 padding, at least makes outcome deterministic */
1892     map.data[size] = 0;
1893     gst_buffer_unmap (obuf, &map);
1894     gst_buffer_replace (buf, obuf);
1895   }
1896 }
1897
1898 static GstCaps *
1899 gst_avi_demux_check_caps (GstAviDemux * avi, GstCaps * caps)
1900 {
1901   GstStructure *s;
1902   const GValue *val;
1903   GstBuffer *buf;
1904
1905   s = gst_caps_get_structure (caps, 0);
1906   if (!gst_structure_has_name (s, "video/x-h264"))
1907     return caps;
1908
1909   GST_DEBUG_OBJECT (avi, "checking caps %" GST_PTR_FORMAT, caps);
1910
1911   /* some muxers put invalid bytestream stuff in h264 extra data */
1912   val = gst_structure_get_value (s, "codec_data");
1913   if (val && (buf = gst_value_get_buffer (val))) {
1914     guint8 *data;
1915     gint size;
1916     GstMapInfo map;
1917
1918     gst_buffer_map (buf, &map, GST_MAP_READ);
1919     data = map.data;
1920     size = map.size;
1921     if (size >= 4) {
1922       guint32 h = GST_READ_UINT32_BE (data);
1923       gst_buffer_unmap (buf, &map);
1924       if (h == 0x01) {
1925         /* can hardly be valid AVC codec data */
1926         GST_DEBUG_OBJECT (avi,
1927             "discarding invalid codec_data containing byte-stream");
1928         /* so do not pretend to downstream that it is packetized avc */
1929         gst_structure_remove_field (s, "codec_data");
1930         /* ... but rather properly parsed bytestream */
1931         gst_structure_set (s, "stream-format", G_TYPE_STRING, "byte-stream",
1932             "alignment", G_TYPE_STRING, "au", NULL);
1933       }
1934     } else {
1935       gst_buffer_unmap (buf, &map);
1936     }
1937   }
1938
1939   return caps;
1940 }
1941
1942 /*
1943  * gst_avi_demux_parse_stream:
1944  * @avi: calling element (used for debugging/errors).
1945  * @buf: input buffer used to parse the stream.
1946  *
1947  * Parses all subchunks in a strl chunk (which defines a single
1948  * stream). Discards the buffer after use. This function will
1949  * increment the stream counter internally.
1950  *
1951  * Returns: whether the stream was identified successfully.
1952  *          Errors are not fatal. It does indicate the stream
1953  *          was skipped.
1954  */
1955 static gboolean
1956 gst_avi_demux_parse_stream (GstAviDemux * avi, GstBuffer * buf)
1957 {
1958   GstAviStream *stream;
1959   GstElementClass *klass;
1960   GstPadTemplate *templ;
1961   GstBuffer *sub = NULL;
1962   guint offset = 4;
1963   guint32 tag = 0;
1964   gchar *codec_name = NULL, *padname = NULL;
1965   const gchar *tag_name;
1966   GstCaps *caps = NULL;
1967   GstPad *pad;
1968   GstElement *element;
1969   gboolean got_strh = FALSE, got_strf = FALSE, got_vprp = FALSE;
1970   gst_riff_vprp *vprp = NULL;
1971   gchar *stream_id;
1972
1973   element = GST_ELEMENT_CAST (avi);
1974
1975   GST_DEBUG_OBJECT (avi, "Parsing stream");
1976
1977   gst_avi_demux_roundup_list (avi, &buf);
1978
1979   if (avi->num_streams >= GST_AVI_DEMUX_MAX_STREAMS) {
1980     GST_WARNING_OBJECT (avi,
1981         "maximum no of streams (%d) exceeded, ignoring stream",
1982         GST_AVI_DEMUX_MAX_STREAMS);
1983     gst_buffer_unref (buf);
1984     /* not a fatal error, let's say */
1985     return TRUE;
1986   }
1987
1988   stream = &avi->stream[avi->num_streams];
1989
1990   /* initial settings */
1991   stream->idx_duration = GST_CLOCK_TIME_NONE;
1992   stream->hdr_duration = GST_CLOCK_TIME_NONE;
1993   stream->duration = GST_CLOCK_TIME_NONE;
1994
1995   while (gst_riff_parse_chunk (element, buf, &offset, &tag, &sub)) {
1996     /* sub can be NULL if the chunk is empty */
1997     if (sub == NULL) {
1998       GST_DEBUG_OBJECT (avi, "ignoring empty chunk %" GST_FOURCC_FORMAT,
1999           GST_FOURCC_ARGS (tag));
2000       continue;
2001     }
2002     switch (tag) {
2003       case GST_RIFF_TAG_strh:
2004       {
2005         gst_riff_strh *strh;
2006
2007         if (got_strh) {
2008           GST_WARNING_OBJECT (avi, "Ignoring additional strh chunk");
2009           break;
2010         }
2011         if (!gst_riff_parse_strh (element, sub, &stream->strh)) {
2012           /* ownership given away */
2013           sub = NULL;
2014           GST_WARNING_OBJECT (avi, "Failed to parse strh chunk");
2015           goto fail;
2016         }
2017         sub = NULL;
2018         strh = stream->strh;
2019         /* sanity check; stream header frame rate matches global header
2020          * frame duration */
2021         if (stream->strh->type == GST_RIFF_FCC_vids) {
2022           GstClockTime s_dur;
2023           GstClockTime h_dur = avi->avih->us_frame * GST_USECOND;
2024
2025           s_dur = gst_util_uint64_scale (GST_SECOND, strh->scale, strh->rate);
2026           GST_DEBUG_OBJECT (avi, "verifying stream framerate %d/%d, "
2027               "frame duration = %d ms", strh->rate, strh->scale,
2028               (gint) (s_dur / GST_MSECOND));
2029           if (h_dur > (10 * GST_MSECOND) && (s_dur > 10 * h_dur)) {
2030             strh->rate = GST_SECOND / GST_USECOND;
2031             strh->scale = h_dur / GST_USECOND;
2032             GST_DEBUG_OBJECT (avi, "correcting stream framerate to %d/%d",
2033                 strh->rate, strh->scale);
2034           }
2035         }
2036         /* determine duration as indicated by header */
2037         stream->hdr_duration = gst_util_uint64_scale ((guint64) strh->length *
2038             strh->scale, GST_SECOND, (guint64) strh->rate);
2039         GST_INFO ("Stream duration according to header: %" GST_TIME_FORMAT,
2040             GST_TIME_ARGS (stream->hdr_duration));
2041         if (stream->hdr_duration == 0)
2042           stream->hdr_duration = GST_CLOCK_TIME_NONE;
2043
2044         got_strh = TRUE;
2045         break;
2046       }
2047       case GST_RIFF_TAG_strf:
2048       {
2049         gboolean res = FALSE;
2050
2051         if (got_strf) {
2052           GST_WARNING_OBJECT (avi, "Ignoring additional strf chunk");
2053           break;
2054         }
2055         if (!got_strh) {
2056           GST_ERROR_OBJECT (avi, "Found strf chunk before strh chunk");
2057           goto fail;
2058         }
2059         switch (stream->strh->type) {
2060           case GST_RIFF_FCC_vids:
2061             stream->is_vbr = TRUE;
2062             res = gst_riff_parse_strf_vids (element, sub,
2063                 &stream->strf.vids, &stream->extradata);
2064             sub = NULL;
2065             GST_DEBUG_OBJECT (element, "marking video as VBR, res %d", res);
2066             break;
2067           case GST_RIFF_FCC_auds:
2068             res =
2069                 gst_riff_parse_strf_auds (element, sub, &stream->strf.auds,
2070                 &stream->extradata);
2071             sub = NULL;
2072             if (!res)
2073               break;
2074             stream->is_vbr = (stream->strh->samplesize == 0)
2075                 && stream->strh->scale > 1
2076                 && stream->strf.auds->blockalign != 1;
2077             GST_DEBUG_OBJECT (element, "marking audio as VBR:%d, res %d",
2078                 stream->is_vbr, res);
2079             /* we need these or we have no way to come up with timestamps */
2080             if ((!stream->is_vbr && !stream->strf.auds->av_bps) ||
2081                 (stream->is_vbr && (!stream->strh->scale ||
2082                         !stream->strh->rate))) {
2083               GST_WARNING_OBJECT (element,
2084                   "invalid audio header, ignoring stream");
2085               goto fail;
2086             }
2087             /* some more sanity checks */
2088             if (stream->is_vbr) {
2089               if (stream->strf.auds->blockalign <= 4) {
2090                 /* that would mean (too) many frames per chunk,
2091                  * so not likely set as expected */
2092                 GST_DEBUG_OBJECT (element,
2093                     "suspicious blockalign %d for VBR audio; "
2094                     "overriding to 1 frame per chunk",
2095                     stream->strf.auds->blockalign);
2096                 /* this should top any likely value */
2097                 stream->strf.auds->blockalign = (1 << 12);
2098               }
2099             }
2100             break;
2101           case GST_RIFF_FCC_iavs:
2102             stream->is_vbr = TRUE;
2103             res = gst_riff_parse_strf_iavs (element, sub,
2104                 &stream->strf.iavs, &stream->extradata);
2105             sub = NULL;
2106             GST_DEBUG_OBJECT (element, "marking iavs as VBR, res %d", res);
2107             break;
2108           case GST_RIFF_FCC_txts:
2109             /* nothing to parse here */
2110             stream->is_vbr = (stream->strh->samplesize == 0)
2111                 && (stream->strh->scale > 1);
2112             res = TRUE;
2113             break;
2114           default:
2115             GST_ERROR_OBJECT (avi,
2116                 "Don´t know how to handle stream type %" GST_FOURCC_FORMAT,
2117                 GST_FOURCC_ARGS (stream->strh->type));
2118             break;
2119         }
2120         if (sub) {
2121           gst_buffer_unref (sub);
2122           sub = NULL;
2123         }
2124         if (!res)
2125           goto fail;
2126         got_strf = TRUE;
2127         break;
2128       }
2129       case GST_RIFF_TAG_vprp:
2130       {
2131         if (got_vprp) {
2132           GST_WARNING_OBJECT (avi, "Ignoring additional vprp chunk");
2133           break;
2134         }
2135         if (!got_strh) {
2136           GST_ERROR_OBJECT (avi, "Found vprp chunk before strh chunk");
2137           goto fail;
2138         }
2139         if (!got_strf) {
2140           GST_ERROR_OBJECT (avi, "Found vprp chunk before strf chunk");
2141           goto fail;
2142         }
2143
2144         if (!gst_avi_demux_riff_parse_vprp (element, sub, &vprp)) {
2145           GST_WARNING_OBJECT (avi, "Failed to parse vprp chunk");
2146           /* not considered fatal */
2147           g_free (vprp);
2148           vprp = NULL;
2149         } else
2150           got_vprp = TRUE;
2151         sub = NULL;
2152         break;
2153       }
2154       case GST_RIFF_TAG_strd:
2155         if (stream->initdata)
2156           gst_buffer_unref (stream->initdata);
2157         stream->initdata = sub;
2158         sub = NULL;
2159         break;
2160       case GST_RIFF_TAG_strn:
2161         g_free (stream->name);
2162         if (sub != NULL) {
2163           GstMapInfo map;
2164
2165           gst_buffer_map (sub, &map, GST_MAP_READ);
2166           stream->name = g_strndup ((gchar *) map.data, map.size);
2167           gst_buffer_unmap (sub, &map);
2168           gst_buffer_unref (sub);
2169           sub = NULL;
2170         } else {
2171           stream->name = g_strdup ("");
2172         }
2173         GST_DEBUG_OBJECT (avi, "stream name: %s", stream->name);
2174         break;
2175       case GST_RIFF_IDIT:
2176         gst_avi_demux_parse_idit (avi, sub);
2177         break;
2178       default:
2179         if (tag == GST_MAKE_FOURCC ('i', 'n', 'd', 'x') ||
2180             tag == GST_MAKE_FOURCC ('i', 'x', '0' + avi->num_streams / 10,
2181                 '0' + avi->num_streams % 10)) {
2182           g_free (stream->indexes);
2183           gst_avi_demux_parse_superindex (avi, sub, &stream->indexes);
2184           stream->superindex = TRUE;
2185           sub = NULL;
2186           break;
2187         }
2188         GST_WARNING_OBJECT (avi,
2189             "Unknown stream header tag %" GST_FOURCC_FORMAT ", ignoring",
2190             GST_FOURCC_ARGS (tag));
2191         /* fall-through */
2192       case GST_RIFF_TAG_JUNQ:
2193       case GST_RIFF_TAG_JUNK:
2194         break;
2195     }
2196     if (sub != NULL) {
2197       gst_buffer_unref (sub);
2198       sub = NULL;
2199     }
2200   }
2201
2202   if (!got_strh) {
2203     GST_WARNING_OBJECT (avi, "Failed to find strh chunk");
2204     goto fail;
2205   }
2206
2207   if (!got_strf) {
2208     GST_WARNING_OBJECT (avi, "Failed to find strf chunk");
2209     goto fail;
2210   }
2211
2212   /* get class to figure out the template */
2213   klass = GST_ELEMENT_GET_CLASS (avi);
2214
2215   /* we now have all info, let´s set up a pad and a caps and be done */
2216   /* create stream name + pad */
2217   switch (stream->strh->type) {
2218     case GST_RIFF_FCC_vids:{
2219       guint32 fourcc;
2220
2221       fourcc = (stream->strf.vids->compression) ?
2222           stream->strf.vids->compression : stream->strh->fcc_handler;
2223       padname = g_strdup_printf ("video_%u", avi->num_v_streams);
2224       templ = gst_element_class_get_pad_template (klass, "video_%u");
2225       caps = gst_riff_create_video_caps (fourcc, stream->strh,
2226           stream->strf.vids, stream->extradata, stream->initdata, &codec_name);
2227       if (!caps) {
2228         caps = gst_caps_new_simple ("video/x-avi-unknown", "fourcc",
2229             G_TYPE_INT, fourcc, NULL);
2230       } else if (got_vprp && vprp) {
2231         guint32 aspect_n, aspect_d;
2232         gint n, d;
2233
2234         aspect_n = vprp->aspect >> 16;
2235         aspect_d = vprp->aspect & 0xffff;
2236         /* calculate the pixel aspect ratio using w/h and aspect ratio */
2237         n = aspect_n * stream->strf.vids->height;
2238         d = aspect_d * stream->strf.vids->width;
2239         if (n && d)
2240           gst_caps_set_simple (caps, "pixel-aspect-ratio", GST_TYPE_FRACTION,
2241               n, d, NULL);
2242         /* very local, not needed elsewhere */
2243         g_free (vprp);
2244         vprp = NULL;
2245       }
2246       caps = gst_avi_demux_check_caps (avi, caps);
2247       tag_name = GST_TAG_VIDEO_CODEC;
2248       avi->num_v_streams++;
2249       break;
2250     }
2251     case GST_RIFF_FCC_auds:{
2252       /* FIXME: Do something with the channel reorder map */
2253       padname = g_strdup_printf ("audio_%u", avi->num_a_streams);
2254       templ = gst_element_class_get_pad_template (klass, "audio_%u");
2255       caps = gst_riff_create_audio_caps (stream->strf.auds->format,
2256           stream->strh, stream->strf.auds, stream->extradata,
2257           stream->initdata, &codec_name, NULL);
2258       if (!caps) {
2259         caps = gst_caps_new_simple ("audio/x-avi-unknown", "codec_id",
2260             G_TYPE_INT, stream->strf.auds->format, NULL);
2261       }
2262       tag_name = GST_TAG_AUDIO_CODEC;
2263       avi->num_a_streams++;
2264       break;
2265     }
2266     case GST_RIFF_FCC_iavs:{
2267       guint32 fourcc = stream->strh->fcc_handler;
2268
2269       padname = g_strdup_printf ("video_%u", avi->num_v_streams);
2270       templ = gst_element_class_get_pad_template (klass, "video_%u");
2271       caps = gst_riff_create_iavs_caps (fourcc, stream->strh,
2272           stream->strf.iavs, stream->extradata, stream->initdata, &codec_name);
2273       if (!caps) {
2274         caps = gst_caps_new_simple ("video/x-avi-unknown", "fourcc",
2275             G_TYPE_INT, fourcc, NULL);
2276       }
2277       tag_name = GST_TAG_VIDEO_CODEC;
2278       avi->num_v_streams++;
2279       break;
2280     }
2281     case GST_RIFF_FCC_txts:{
2282       padname = g_strdup_printf ("subtitle_%u", avi->num_t_streams);
2283       templ = gst_element_class_get_pad_template (klass, "subtitle_%u");
2284       caps = gst_caps_new_empty_simple ("application/x-subtitle-avi");
2285       tag_name = NULL;
2286       avi->num_t_streams++;
2287       break;
2288     }
2289     default:
2290       g_return_val_if_reached (FALSE);
2291   }
2292
2293   /* no caps means no stream */
2294   if (!caps) {
2295     GST_ERROR_OBJECT (element, "Did not find caps for stream %s", padname);
2296     goto fail;
2297   }
2298
2299   GST_DEBUG_OBJECT (element, "codec-name=%s",
2300       (codec_name ? codec_name : "NULL"));
2301   GST_DEBUG_OBJECT (element, "caps=%" GST_PTR_FORMAT, caps);
2302
2303   /* set proper settings and add it */
2304   if (stream->pad)
2305     gst_object_unref (stream->pad);
2306   pad = stream->pad = gst_pad_new_from_template (templ, padname);
2307   g_free (padname);
2308
2309   gst_pad_use_fixed_caps (pad);
2310 #if 0
2311   gst_pad_set_formats_function (pad,
2312       GST_DEBUG_FUNCPTR (gst_avi_demux_get_src_formats));
2313   gst_pad_set_event_mask_function (pad,
2314       GST_DEBUG_FUNCPTR (gst_avi_demux_get_event_mask));
2315 #endif
2316   gst_pad_set_event_function (pad,
2317       GST_DEBUG_FUNCPTR (gst_avi_demux_handle_src_event));
2318   gst_pad_set_query_function (pad,
2319       GST_DEBUG_FUNCPTR (gst_avi_demux_handle_src_query));
2320 #if 0
2321   gst_pad_set_convert_function (pad,
2322       GST_DEBUG_FUNCPTR (gst_avi_demux_src_convert));
2323 #endif
2324
2325   stream->num = avi->num_streams;
2326
2327   stream->start_entry = 0;
2328   stream->step_entry = 0;
2329   stream->stop_entry = 0;
2330
2331   stream->current_entry = -1;
2332   stream->current_total = 0;
2333
2334   stream->last_flow = GST_FLOW_OK;
2335   stream->discont = TRUE;
2336
2337   stream->total_bytes = 0;
2338   stream->total_blocks = 0;
2339   stream->n_keyframes = 0;
2340
2341   stream->idx_n = 0;
2342   stream->idx_max = 0;
2343
2344   gst_pad_set_element_private (pad, stream);
2345   avi->num_streams++;
2346
2347   gst_pad_set_active (pad, TRUE);
2348   stream_id =
2349       gst_pad_create_stream_id_printf (pad, GST_ELEMENT_CAST (avi), "%u",
2350       avi->num_streams);
2351   gst_pad_push_event (pad, gst_event_new_stream_start (stream_id));
2352   g_free (stream_id);
2353   gst_pad_set_caps (pad, caps);
2354   gst_caps_unref (caps);
2355
2356   /* make tags */
2357   if (codec_name) {
2358     if (!stream->taglist)
2359       stream->taglist = gst_tag_list_new_empty ();
2360
2361     avi->got_tags = TRUE;
2362
2363     gst_tag_list_add (stream->taglist, GST_TAG_MERGE_APPEND, tag_name,
2364         codec_name, NULL);
2365     g_free (codec_name);
2366   }
2367
2368   gst_buffer_unref (buf);
2369
2370   return TRUE;
2371
2372   /* ERRORS */
2373 fail:
2374   {
2375     /* unref any mem that may be in use */
2376     if (buf)
2377       gst_buffer_unref (buf);
2378     if (sub)
2379       gst_buffer_unref (sub);
2380     g_free (vprp);
2381     g_free (codec_name);
2382     gst_avi_demux_reset_stream (avi, stream);
2383     avi->num_streams++;
2384     return FALSE;
2385   }
2386 }
2387
2388 /*
2389  * gst_avi_demux_parse_odml:
2390  * @avi: calling element (used for debug/error).
2391  * @buf: input buffer to be used for parsing.
2392  *
2393  * Read an openDML-2.0 extension header. Fills in the frame number
2394  * in the avi demuxer object when reading succeeds.
2395  */
2396 static void
2397 gst_avi_demux_parse_odml (GstAviDemux * avi, GstBuffer * buf)
2398 {
2399   guint32 tag = 0;
2400   guint offset = 4;
2401   GstBuffer *sub = NULL;
2402
2403   while (gst_riff_parse_chunk (GST_ELEMENT_CAST (avi), buf, &offset, &tag,
2404           &sub)) {
2405     switch (tag) {
2406       case GST_RIFF_TAG_dmlh:{
2407         gst_riff_dmlh dmlh, *_dmlh;
2408         GstMapInfo map;
2409
2410         /* sub == NULL is possible and means an empty buffer */
2411         if (sub == NULL)
2412           goto next;
2413
2414         gst_buffer_map (sub, &map, GST_MAP_READ);
2415
2416         /* check size */
2417         if (map.size < sizeof (gst_riff_dmlh)) {
2418           GST_ERROR_OBJECT (avi,
2419               "DMLH entry is too small (%" G_GSIZE_FORMAT " bytes, %d needed)",
2420               map.size, (int) sizeof (gst_riff_dmlh));
2421           gst_buffer_unmap (sub, &map);
2422           goto next;
2423         }
2424         _dmlh = (gst_riff_dmlh *) map.data;
2425         dmlh.totalframes = GST_READ_UINT32_LE (&_dmlh->totalframes);
2426         gst_buffer_unmap (sub, &map);
2427
2428         GST_INFO_OBJECT (avi, "dmlh tag found: totalframes: %u",
2429             dmlh.totalframes);
2430
2431         avi->avih->tot_frames = dmlh.totalframes;
2432         goto next;
2433       }
2434
2435       default:
2436         GST_WARNING_OBJECT (avi,
2437             "Unknown tag %" GST_FOURCC_FORMAT " in ODML header",
2438             GST_FOURCC_ARGS (tag));
2439         /* fall-through */
2440       case GST_RIFF_TAG_JUNQ:
2441       case GST_RIFF_TAG_JUNK:
2442       next:
2443         /* skip and move to next chunk */
2444         if (sub) {
2445           gst_buffer_unref (sub);
2446           sub = NULL;
2447         }
2448         break;
2449     }
2450   }
2451   if (buf)
2452     gst_buffer_unref (buf);
2453 }
2454
2455 /* Index helper */
2456 static guint
2457 gst_avi_demux_index_last (GstAviDemux * avi, GstAviStream * stream)
2458 {
2459   return stream->idx_n;
2460 }
2461
2462 /* find a previous entry in the index with the given flags */
2463 static guint
2464 gst_avi_demux_index_prev (GstAviDemux * avi, GstAviStream * stream,
2465     guint last, gboolean keyframe)
2466 {
2467   GstAviIndexEntry *entry;
2468   guint i;
2469
2470   for (i = last; i > 0; i--) {
2471     entry = &stream->index[i - 1];
2472     if (!keyframe || ENTRY_IS_KEYFRAME (entry)) {
2473       return i - 1;
2474     }
2475   }
2476   return 0;
2477 }
2478
2479 static guint
2480 gst_avi_demux_index_next (GstAviDemux * avi, GstAviStream * stream,
2481     guint last, gboolean keyframe)
2482 {
2483   GstAviIndexEntry *entry;
2484   gint i;
2485
2486   for (i = last + 1; i < stream->idx_n; i++) {
2487     entry = &stream->index[i];
2488     if (!keyframe || ENTRY_IS_KEYFRAME (entry)) {
2489       return i;
2490     }
2491   }
2492   return stream->idx_n - 1;
2493 }
2494
2495 static guint
2496 gst_avi_demux_index_entry_search (GstAviIndexEntry * entry, guint64 * total)
2497 {
2498   if (entry->total < *total)
2499     return -1;
2500   else if (entry->total > *total)
2501     return 1;
2502   return 0;
2503 }
2504
2505 /*
2506  * gst_avi_demux_index_for_time:
2507  * @avi: Avi object
2508  * @stream: the stream
2509  * @time: a time position
2510  *
2511  * Finds the index entry which time is less or equal than the requested time.
2512  * Try to avoid binary search when we can convert the time to an index
2513  * position directly (for example for video frames with a fixed duration).
2514  *
2515  * Returns: the found position in the index.
2516  */
2517 static guint
2518 gst_avi_demux_index_for_time (GstAviDemux * avi,
2519     GstAviStream * stream, guint64 time)
2520 {
2521   guint index = -1;
2522   guint64 total;
2523
2524   GST_LOG_OBJECT (avi, "search time:%" GST_TIME_FORMAT, GST_TIME_ARGS (time));
2525
2526   /* easy (and common) cases */
2527   if (time == 0 || stream->idx_n == 0)
2528     return 0;
2529   if (time >= stream->idx_duration)
2530     return stream->idx_n - 1;
2531
2532   /* figure out where we need to go. For that we convert the time to an
2533    * index entry or we convert it to a total and then do a binary search. */
2534   if (stream->is_vbr) {
2535     /* VBR stream next timestamp */
2536     if (stream->strh->type == GST_RIFF_FCC_auds) {
2537       total = avi_stream_convert_time_to_frames_unchecked (stream, time);
2538     } else {
2539       index = avi_stream_convert_time_to_frames_unchecked (stream, time);
2540     }
2541   } else {
2542     /* constant rate stream */
2543     total = avi_stream_convert_time_to_bytes_unchecked (stream, time);
2544   }
2545
2546   if (index == -1) {
2547     GstAviIndexEntry *entry;
2548
2549     /* no index, find index with binary search on total */
2550     GST_LOG_OBJECT (avi, "binary search for entry with total %"
2551         G_GUINT64_FORMAT, total);
2552
2553     entry = gst_util_array_binary_search (stream->index,
2554         stream->idx_n, sizeof (GstAviIndexEntry),
2555         (GCompareDataFunc) gst_avi_demux_index_entry_search,
2556         GST_SEARCH_MODE_BEFORE, &total, NULL);
2557
2558     if (entry == NULL) {
2559       GST_LOG_OBJECT (avi, "not found, assume index 0");
2560       index = 0;
2561     } else {
2562       index = entry - stream->index;
2563       GST_LOG_OBJECT (avi, "found at %u", index);
2564     }
2565   } else {
2566     GST_LOG_OBJECT (avi, "converted time to index %u", index);
2567   }
2568
2569   return index;
2570 }
2571
2572 static inline GstAviStream *
2573 gst_avi_demux_stream_for_id (GstAviDemux * avi, guint32 id)
2574 {
2575   guint stream_nr;
2576   GstAviStream *stream;
2577
2578   /* get the stream for this entry */
2579   stream_nr = CHUNKID_TO_STREAMNR (id);
2580   if (G_UNLIKELY (stream_nr >= avi->num_streams)) {
2581     GST_WARNING_OBJECT (avi, "invalid stream nr %d", stream_nr);
2582     return NULL;
2583   }
2584   stream = &avi->stream[stream_nr];
2585   if (G_UNLIKELY (!stream->strh)) {
2586     GST_WARNING_OBJECT (avi, "Unhandled stream %d, skipping", stream_nr);
2587     return NULL;
2588   }
2589   return stream;
2590 }
2591
2592 /*
2593  * gst_avi_demux_parse_index:
2594  * @avi: calling element (used for debugging/errors).
2595  * @buf: buffer containing the full index.
2596  *
2597  * Read index entries from the provided buffer.
2598  * The buffer should contain a GST_RIFF_TAG_idx1 chunk.
2599  */
2600 static gboolean
2601 gst_avi_demux_parse_index (GstAviDemux * avi, GstBuffer * buf)
2602 {
2603   GstMapInfo map;
2604   guint i, num, n;
2605   gst_riff_index_entry *index;
2606   GstClockTime stamp;
2607   GstAviStream *stream;
2608   GstAviIndexEntry entry;
2609   guint32 id;
2610
2611   if (!buf)
2612     return FALSE;
2613
2614   gst_buffer_map (buf, &map, GST_MAP_READ);
2615
2616   stamp = gst_util_get_timestamp ();
2617
2618   /* see how many items in the index */
2619   num = map.size / sizeof (gst_riff_index_entry);
2620   if (num == 0)
2621     goto empty_list;
2622
2623   GST_INFO_OBJECT (avi, "Parsing index, nr_entries = %6d", num);
2624
2625   index = (gst_riff_index_entry *) map.data;
2626
2627   /* figure out if the index is 0 based or relative to the MOVI start */
2628   entry.offset = GST_READ_UINT32_LE (&index[0].offset);
2629   if (entry.offset < avi->offset) {
2630     avi->index_offset = avi->offset + 8;
2631     GST_DEBUG ("index_offset = %" G_GUINT64_FORMAT, avi->index_offset);
2632   } else {
2633     avi->index_offset = 0;
2634     GST_DEBUG ("index is 0 based");
2635   }
2636
2637   for (i = 0, n = 0; i < num; i++) {
2638     id = GST_READ_UINT32_LE (&index[i].id);
2639     entry.offset = GST_READ_UINT32_LE (&index[i].offset);
2640
2641     /* some sanity checks */
2642     if (G_UNLIKELY (id == GST_RIFF_rec || id == 0 ||
2643             (entry.offset == 0 && n > 0)))
2644       continue;
2645
2646     /* get the stream for this entry */
2647     stream = gst_avi_demux_stream_for_id (avi, id);
2648     if (G_UNLIKELY (!stream))
2649       continue;
2650
2651     /* handle offset and size */
2652     entry.offset += avi->index_offset + 8;
2653     entry.size = GST_READ_UINT32_LE (&index[i].size);
2654
2655     /* handle flags */
2656     if (stream->strh->type == GST_RIFF_FCC_auds) {
2657       /* all audio frames are keyframes */
2658       ENTRY_SET_KEYFRAME (&entry);
2659     } else {
2660       guint32 flags;
2661       /* else read flags */
2662       flags = GST_READ_UINT32_LE (&index[i].flags);
2663       if (flags & GST_RIFF_IF_KEYFRAME) {
2664         ENTRY_SET_KEYFRAME (&entry);
2665       } else {
2666         ENTRY_UNSET_KEYFRAME (&entry);
2667       }
2668     }
2669
2670     /* and add */
2671     if (G_UNLIKELY (!gst_avi_demux_add_index (avi, stream, num, &entry)))
2672       goto out_of_mem;
2673
2674     n++;
2675   }
2676   gst_buffer_unmap (buf, &map);
2677   gst_buffer_unref (buf);
2678
2679   /* get stream stats now */
2680   avi->have_index = gst_avi_demux_do_index_stats (avi);
2681
2682   stamp = gst_util_get_timestamp () - stamp;
2683   GST_DEBUG_OBJECT (avi, "index parsing took %" GST_TIME_FORMAT,
2684       GST_TIME_ARGS (stamp));
2685
2686   return TRUE;
2687
2688   /* ERRORS */
2689 empty_list:
2690   {
2691     GST_DEBUG_OBJECT (avi, "empty index");
2692     gst_buffer_unmap (buf, &map);
2693     gst_buffer_unref (buf);
2694     return FALSE;
2695   }
2696 out_of_mem:
2697   {
2698     GST_ELEMENT_ERROR (avi, RESOURCE, NO_SPACE_LEFT, (NULL),
2699         ("Cannot allocate memory for %u*%u=%u bytes",
2700             (guint) sizeof (GstAviIndexEntry), num,
2701             (guint) sizeof (GstAviIndexEntry) * num));
2702     gst_buffer_unmap (buf, &map);
2703     gst_buffer_unref (buf);
2704     return FALSE;
2705   }
2706 }
2707
2708 /*
2709  * gst_avi_demux_stream_index:
2710  * @avi: avi demuxer object.
2711  *
2712  * Seeks to index and reads it.
2713  */
2714 static void
2715 gst_avi_demux_stream_index (GstAviDemux * avi)
2716 {
2717   GstFlowReturn res;
2718   guint64 offset = avi->offset;
2719   GstBuffer *buf = NULL;
2720   guint32 tag;
2721   guint32 size;
2722   GstMapInfo map;
2723
2724   GST_DEBUG ("demux stream index at offset %" G_GUINT64_FORMAT, offset);
2725
2726   /* get chunk information */
2727   res = gst_pad_pull_range (avi->sinkpad, offset, 8, &buf);
2728   if (res != GST_FLOW_OK)
2729     goto pull_failed;
2730
2731   gst_buffer_map (buf, &map, GST_MAP_READ);
2732   if (map.size < 8)
2733     goto too_small;
2734
2735   /* check tag first before blindy trying to read 'size' bytes */
2736   tag = GST_READ_UINT32_LE (map.data);
2737   size = GST_READ_UINT32_LE (map.data + 4);
2738   if (tag == GST_RIFF_TAG_LIST) {
2739     /* this is the movi tag */
2740     GST_DEBUG_OBJECT (avi, "skip LIST chunk, size %" G_GUINT32_FORMAT,
2741         (8 + GST_ROUND_UP_2 (size)));
2742     offset += 8 + GST_ROUND_UP_2 (size);
2743     gst_buffer_unmap (buf, &map);
2744     gst_buffer_unref (buf);
2745
2746     buf = NULL;
2747     res = gst_pad_pull_range (avi->sinkpad, offset, 8, &buf);
2748     if (res != GST_FLOW_OK)
2749       goto pull_failed;
2750
2751     gst_buffer_map (buf, &map, GST_MAP_READ);
2752     if (map.size < 8)
2753       goto too_small;
2754
2755     tag = GST_READ_UINT32_LE (map.data);
2756     size = GST_READ_UINT32_LE (map.data + 4);
2757   }
2758   gst_buffer_unmap (buf, &map);
2759   gst_buffer_unref (buf);
2760
2761   if (tag != GST_RIFF_TAG_idx1)
2762     goto no_index;
2763   if (!size)
2764     goto zero_index;
2765
2766   GST_DEBUG ("index found at offset %" G_GUINT64_FORMAT, offset);
2767
2768   /* read chunk, advance offset */
2769   if (gst_riff_read_chunk (GST_ELEMENT_CAST (avi),
2770           avi->sinkpad, &offset, &tag, &buf) != GST_FLOW_OK)
2771     return;
2772
2773   GST_DEBUG ("will parse index chunk size %" G_GSIZE_FORMAT " for tag %"
2774       GST_FOURCC_FORMAT, gst_buffer_get_size (buf), GST_FOURCC_ARGS (tag));
2775
2776   gst_avi_demux_parse_index (avi, buf);
2777
2778 #ifndef GST_DISABLE_GST_DEBUG
2779   /* debug our indexes */
2780   {
2781     gint i;
2782     GstAviStream *stream;
2783
2784     for (i = 0; i < avi->num_streams; i++) {
2785       stream = &avi->stream[i];
2786       GST_DEBUG_OBJECT (avi, "stream %u: %u frames, %" G_GINT64_FORMAT " bytes",
2787           i, stream->idx_n, stream->total_bytes);
2788     }
2789   }
2790 #endif
2791   return;
2792
2793   /* ERRORS */
2794 pull_failed:
2795   {
2796     GST_DEBUG_OBJECT (avi,
2797         "pull range failed: pos=%" G_GUINT64_FORMAT " size=8", offset);
2798     return;
2799   }
2800 too_small:
2801   {
2802     GST_DEBUG_OBJECT (avi, "Buffer is too small");
2803     gst_buffer_unmap (buf, &map);
2804     gst_buffer_unref (buf);
2805     return;
2806   }
2807 no_index:
2808   {
2809     GST_WARNING_OBJECT (avi,
2810         "No index data (idx1) after movi chunk, but %" GST_FOURCC_FORMAT,
2811         GST_FOURCC_ARGS (tag));
2812     return;
2813   }
2814 zero_index:
2815   {
2816     GST_WARNING_OBJECT (avi, "Empty index data (idx1) after movi chunk");
2817     return;
2818   }
2819 }
2820
2821 /*
2822  * gst_avi_demux_stream_index_push:
2823  * @avi: avi demuxer object.
2824  *
2825  * Read index.
2826  */
2827 static void
2828 gst_avi_demux_stream_index_push (GstAviDemux * avi)
2829 {
2830   guint64 offset = avi->idx1_offset;
2831   GstBuffer *buf;
2832   guint32 tag;
2833   guint32 size;
2834
2835   GST_DEBUG ("demux stream index at offset %" G_GUINT64_FORMAT, offset);
2836
2837   /* get chunk information */
2838   if (!gst_avi_demux_peek_chunk (avi, &tag, &size))
2839     return;
2840
2841   /* check tag first before blindly trying to read 'size' bytes */
2842   if (tag == GST_RIFF_TAG_LIST) {
2843     /* this is the movi tag */
2844     GST_DEBUG_OBJECT (avi, "skip LIST chunk, size %" G_GUINT32_FORMAT,
2845         (8 + GST_ROUND_UP_2 (size)));
2846     avi->idx1_offset = offset + 8 + GST_ROUND_UP_2 (size);
2847     /* issue seek to allow chain function to handle it and return! */
2848     perform_seek_to_offset (avi, avi->idx1_offset);
2849     return;
2850   }
2851
2852   if (tag != GST_RIFF_TAG_idx1)
2853     goto no_index;
2854
2855   GST_DEBUG ("index found at offset %" G_GUINT64_FORMAT, offset);
2856
2857   /* flush chunk header */
2858   gst_adapter_flush (avi->adapter, 8);
2859   /* read chunk payload */
2860   buf = gst_adapter_take_buffer (avi->adapter, size);
2861   if (!buf)
2862     goto pull_failed;
2863   /* advance offset */
2864   offset += 8 + GST_ROUND_UP_2 (size);
2865
2866   GST_DEBUG ("will parse index chunk size %" G_GSIZE_FORMAT " for tag %"
2867       GST_FOURCC_FORMAT, gst_buffer_get_size (buf), GST_FOURCC_ARGS (tag));
2868
2869   avi->offset = avi->first_movi_offset;
2870   gst_avi_demux_parse_index (avi, buf);
2871
2872 #ifndef GST_DISABLE_GST_DEBUG
2873   /* debug our indexes */
2874   {
2875     gint i;
2876     GstAviStream *stream;
2877
2878     for (i = 0; i < avi->num_streams; i++) {
2879       stream = &avi->stream[i];
2880       GST_DEBUG_OBJECT (avi, "stream %u: %u frames, %" G_GINT64_FORMAT " bytes",
2881           i, stream->idx_n, stream->total_bytes);
2882     }
2883   }
2884 #endif
2885   return;
2886
2887   /* ERRORS */
2888 pull_failed:
2889   {
2890     GST_DEBUG_OBJECT (avi,
2891         "taking data from adapter failed: pos=%" G_GUINT64_FORMAT " size=%u",
2892         offset, size);
2893     return;
2894   }
2895 no_index:
2896   {
2897     GST_WARNING_OBJECT (avi,
2898         "No index data (idx1) after movi chunk, but %" GST_FOURCC_FORMAT,
2899         GST_FOURCC_ARGS (tag));
2900     return;
2901   }
2902 }
2903
2904 /*
2905  * gst_avi_demux_peek_tag:
2906  *
2907  * Returns the tag and size of the next chunk
2908  */
2909 static GstFlowReturn
2910 gst_avi_demux_peek_tag (GstAviDemux * avi, guint64 offset, guint32 * tag,
2911     guint * size)
2912 {
2913   GstFlowReturn res = GST_FLOW_OK;
2914   GstBuffer *buf = NULL;
2915   GstMapInfo map;
2916
2917   res = gst_pad_pull_range (avi->sinkpad, offset, 8, &buf);
2918   if (res != GST_FLOW_OK)
2919     goto pull_failed;
2920
2921   gst_buffer_map (buf, &map, GST_MAP_READ);
2922   if (map.size != 8)
2923     goto wrong_size;
2924
2925   *tag = GST_READ_UINT32_LE (map.data);
2926   *size = GST_READ_UINT32_LE (map.data + 4);
2927
2928   GST_LOG_OBJECT (avi, "Tag[%" GST_FOURCC_FORMAT "] (size:%d) %"
2929       G_GINT64_FORMAT " -- %" G_GINT64_FORMAT, GST_FOURCC_ARGS (*tag),
2930       *size, offset + 8, offset + 8 + (gint64) * size);
2931
2932 done:
2933   gst_buffer_unmap (buf, &map);
2934   gst_buffer_unref (buf);
2935
2936   return res;
2937
2938   /* ERRORS */
2939 pull_failed:
2940   {
2941     GST_DEBUG_OBJECT (avi, "pull_ranged returned %s", gst_flow_get_name (res));
2942     return res;
2943   }
2944 wrong_size:
2945   {
2946     GST_DEBUG_OBJECT (avi, "got %" G_GSIZE_FORMAT " bytes which is <> 8 bytes",
2947         map.size);
2948     res = GST_FLOW_ERROR;
2949     goto done;
2950   }
2951 }
2952
2953 /*
2954  * gst_avi_demux_next_data_buffer:
2955  *
2956  * Returns the offset and size of the next buffer
2957  * Position is the position of the buffer (after tag and size)
2958  */
2959 static GstFlowReturn
2960 gst_avi_demux_next_data_buffer (GstAviDemux * avi, guint64 * offset,
2961     guint32 * tag, guint * size)
2962 {
2963   guint64 off = *offset;
2964   guint _size = 0;
2965   GstFlowReturn res;
2966
2967   do {
2968     res = gst_avi_demux_peek_tag (avi, off, tag, &_size);
2969     if (res != GST_FLOW_OK)
2970       break;
2971     if (*tag == GST_RIFF_TAG_LIST || *tag == GST_RIFF_TAG_RIFF)
2972       off += 8 + 4;             /* skip tag + size + subtag */
2973     else {
2974       *offset = off + 8;
2975       *size = _size;
2976       break;
2977     }
2978   } while (TRUE);
2979
2980   return res;
2981 }
2982
2983 /*
2984  * gst_avi_demux_stream_scan:
2985  * @avi: calling element (used for debugging/errors).
2986  *
2987  * Scan the file for all chunks to "create" a new index.
2988  * pull-range based
2989  */
2990 static gboolean
2991 gst_avi_demux_stream_scan (GstAviDemux * avi)
2992 {
2993   GstFlowReturn res;
2994   GstAviStream *stream;
2995   guint64 pos = 0;
2996   guint64 length;
2997   gint64 tmplength;
2998   guint32 tag = 0;
2999   guint num;
3000
3001   /* FIXME:
3002    * - implement non-seekable source support.
3003    */
3004   GST_DEBUG_OBJECT (avi, "Creating index");
3005
3006   /* get the size of the file */
3007   if (!gst_pad_peer_query_duration (avi->sinkpad, GST_FORMAT_BYTES, &tmplength))
3008     return FALSE;
3009   length = tmplength;
3010
3011   /* guess the total amount of entries we expect */
3012   num = 16000;
3013
3014   while (TRUE) {
3015     GstAviIndexEntry entry;
3016     guint size = 0;
3017
3018     /* start reading data buffers to find the id and offset */
3019     res = gst_avi_demux_next_data_buffer (avi, &pos, &tag, &size);
3020     if (G_UNLIKELY (res != GST_FLOW_OK))
3021       break;
3022
3023     /* get stream */
3024     stream = gst_avi_demux_stream_for_id (avi, tag);
3025     if (G_UNLIKELY (!stream))
3026       goto next;
3027
3028     /* we can't figure out the keyframes, assume they all are */
3029     entry.flags = GST_AVI_KEYFRAME;
3030     entry.offset = pos;
3031     entry.size = size;
3032
3033     /* and add to the index of this stream */
3034     if (G_UNLIKELY (!gst_avi_demux_add_index (avi, stream, num, &entry)))
3035       goto out_of_mem;
3036
3037   next:
3038     /* update position */
3039     pos += GST_ROUND_UP_2 (size);
3040     if (G_UNLIKELY (pos > length)) {
3041       GST_WARNING_OBJECT (avi,
3042           "Stopping index lookup since we are further than EOF");
3043       break;
3044     }
3045   }
3046
3047   /* collect stats */
3048   avi->have_index = gst_avi_demux_do_index_stats (avi);
3049
3050   return TRUE;
3051
3052   /* ERRORS */
3053 out_of_mem:
3054   {
3055     GST_ELEMENT_ERROR (avi, RESOURCE, NO_SPACE_LEFT, (NULL),
3056         ("Cannot allocate memory for %u*%u=%u bytes",
3057             (guint) sizeof (GstAviIndexEntry), num,
3058             (guint) sizeof (GstAviIndexEntry) * num));
3059     return FALSE;
3060   }
3061 }
3062
3063 static void
3064 gst_avi_demux_calculate_durations_from_index (GstAviDemux * avi)
3065 {
3066   guint i;
3067   GstClockTime total;
3068   GstAviStream *stream;
3069
3070   total = GST_CLOCK_TIME_NONE;
3071
3072   /* all streams start at a timestamp 0 */
3073   for (i = 0; i < avi->num_streams; i++) {
3074     GstClockTime duration, hduration;
3075     gst_riff_strh *strh;
3076
3077     stream = &avi->stream[i];
3078     if (G_UNLIKELY (!stream || !stream->idx_n || !(strh = stream->strh)))
3079       continue;
3080
3081     /* get header duration for the stream */
3082     hduration = stream->hdr_duration;
3083     /* index duration calculated during parsing */
3084     duration = stream->idx_duration;
3085
3086     /* now pick a good duration */
3087     if (GST_CLOCK_TIME_IS_VALID (duration)) {
3088       /* index gave valid duration, use that */
3089       GST_INFO ("Stream %p duration according to index: %" GST_TIME_FORMAT,
3090           stream, GST_TIME_ARGS (duration));
3091     } else {
3092       /* fall back to header info to calculate a duration */
3093       duration = hduration;
3094     }
3095     GST_INFO ("Setting duration of stream #%d to %" GST_TIME_FORMAT,
3096         i, GST_TIME_ARGS (duration));
3097     /* set duration for the stream */
3098     stream->duration = duration;
3099
3100     /* find total duration */
3101     if (total == GST_CLOCK_TIME_NONE ||
3102         (GST_CLOCK_TIME_IS_VALID (duration) && duration > total))
3103       total = duration;
3104   }
3105
3106   if (GST_CLOCK_TIME_IS_VALID (total) && (total > 0)) {
3107     /* now update the duration for those streams where we had none */
3108     for (i = 0; i < avi->num_streams; i++) {
3109       stream = &avi->stream[i];
3110
3111       if (!GST_CLOCK_TIME_IS_VALID (stream->duration)
3112           || stream->duration == 0) {
3113         stream->duration = total;
3114
3115         GST_INFO ("Stream %p duration according to total: %" GST_TIME_FORMAT,
3116             stream, GST_TIME_ARGS (total));
3117       }
3118     }
3119   }
3120
3121   /* and set the total duration in the segment. */
3122   GST_INFO ("Setting total duration to: %" GST_TIME_FORMAT,
3123       GST_TIME_ARGS (total));
3124
3125   avi->segment.duration = total;
3126 }
3127
3128 /* returns FALSE if there are no pads to deliver event to,
3129  * otherwise TRUE (whatever the outcome of event sending),
3130  * takes ownership of the event. */
3131 static gboolean
3132 gst_avi_demux_push_event (GstAviDemux * avi, GstEvent * event)
3133 {
3134   gboolean result = FALSE;
3135   gint i;
3136
3137   GST_DEBUG_OBJECT (avi, "sending %s event to %d streams",
3138       GST_EVENT_TYPE_NAME (event), avi->num_streams);
3139
3140   for (i = 0; i < avi->num_streams; i++) {
3141     GstAviStream *stream = &avi->stream[i];
3142
3143     if (stream->pad) {
3144       result = TRUE;
3145       gst_pad_push_event (stream->pad, gst_event_ref (event));
3146     }
3147   }
3148   gst_event_unref (event);
3149   return result;
3150 }
3151
3152 static void
3153 gst_avi_demux_check_seekability (GstAviDemux * avi)
3154 {
3155   GstQuery *query;
3156   gboolean seekable = FALSE;
3157   gint64 start = -1, stop = -1;
3158
3159   query = gst_query_new_seeking (GST_FORMAT_BYTES);
3160   if (!gst_pad_peer_query (avi->sinkpad, query)) {
3161     GST_DEBUG_OBJECT (avi, "seeking query failed");
3162     goto done;
3163   }
3164
3165   gst_query_parse_seeking (query, NULL, &seekable, &start, &stop);
3166
3167   /* try harder to query upstream size if we didn't get it the first time */
3168   if (seekable && stop == -1) {
3169     GST_DEBUG_OBJECT (avi, "doing duration query to fix up unset stop");
3170     gst_pad_peer_query_duration (avi->sinkpad, GST_FORMAT_BYTES, &stop);
3171   }
3172
3173   /* if upstream doesn't know the size, it's likely that it's not seekable in
3174    * practice even if it technically may be seekable */
3175   if (seekable && (start != 0 || stop <= start)) {
3176     GST_DEBUG_OBJECT (avi, "seekable but unknown start/stop -> disable");
3177     seekable = FALSE;
3178   }
3179
3180 done:
3181   GST_INFO_OBJECT (avi, "seekable: %d (%" G_GUINT64_FORMAT " - %"
3182       G_GUINT64_FORMAT ")", seekable, start, stop);
3183   avi->seekable = seekable;
3184
3185   gst_query_unref (query);
3186 }
3187
3188 /*
3189  * Read AVI headers when streaming
3190  */
3191 static GstFlowReturn
3192 gst_avi_demux_stream_header_push (GstAviDemux * avi)
3193 {
3194   GstFlowReturn ret = GST_FLOW_OK;
3195   guint32 tag = 0;
3196   guint32 ltag = 0;
3197   guint32 size = 0;
3198   const guint8 *data;
3199   GstBuffer *buf = NULL, *sub = NULL;
3200   guint offset = 4;
3201   gint i;
3202   GstTagList *tags = NULL;
3203   guint8 fourcc[4];
3204
3205   GST_DEBUG ("Reading and parsing avi headers: %d", avi->header_state);
3206
3207   switch (avi->header_state) {
3208     case GST_AVI_DEMUX_HEADER_TAG_LIST:
3209       if (gst_avi_demux_peek_chunk (avi, &tag, &size)) {
3210         avi->offset += 8 + GST_ROUND_UP_2 (size);
3211         if (tag != GST_RIFF_TAG_LIST)
3212           goto header_no_list;
3213
3214         gst_adapter_flush (avi->adapter, 8);
3215         /* Find the 'hdrl' LIST tag */
3216         GST_DEBUG ("Reading %d bytes", size);
3217         buf = gst_adapter_take_buffer (avi->adapter, size);
3218
3219         gst_buffer_extract (buf, 0, fourcc, 4);
3220
3221         if (GST_READ_UINT32_LE (fourcc) != GST_RIFF_LIST_hdrl)
3222           goto header_no_hdrl;
3223
3224         /* mind padding */
3225         if (size & 1)
3226           gst_adapter_flush (avi->adapter, 1);
3227
3228         GST_DEBUG ("'hdrl' LIST tag found. Parsing next chunk");
3229
3230         gst_avi_demux_roundup_list (avi, &buf);
3231
3232         /* the hdrl starts with a 'avih' header */
3233         if (!gst_riff_parse_chunk (GST_ELEMENT_CAST (avi), buf, &offset, &tag,
3234                 &sub))
3235           goto header_no_avih;
3236
3237         if (tag != GST_RIFF_TAG_avih)
3238           goto header_no_avih;
3239
3240         if (!gst_avi_demux_parse_avih (avi, sub, &avi->avih))
3241           goto header_wrong_avih;
3242
3243         GST_DEBUG_OBJECT (avi, "AVI header ok, reading elemnts from header");
3244
3245         /* now, read the elements from the header until the end */
3246         while (gst_riff_parse_chunk (GST_ELEMENT_CAST (avi), buf, &offset, &tag,
3247                 &sub)) {
3248           /* sub can be NULL on empty tags */
3249           if (!sub)
3250             continue;
3251
3252           switch (tag) {
3253             case GST_RIFF_TAG_LIST:
3254               if (gst_buffer_get_size (sub) < 4)
3255                 goto next;
3256
3257               gst_buffer_extract (sub, 0, fourcc, 4);
3258
3259               switch (GST_READ_UINT32_LE (fourcc)) {
3260                 case GST_RIFF_LIST_strl:
3261                   if (!(gst_avi_demux_parse_stream (avi, sub))) {
3262                     sub = NULL;
3263                     GST_ELEMENT_WARNING (avi, STREAM, DEMUX, (NULL),
3264                         ("failed to parse stream, ignoring"));
3265                     goto next;
3266                   }
3267                   sub = NULL;
3268                   goto next;
3269                 case GST_RIFF_LIST_odml:
3270                   gst_avi_demux_parse_odml (avi, sub);
3271                   sub = NULL;
3272                   break;
3273                 default:
3274                   GST_WARNING_OBJECT (avi,
3275                       "Unknown list %" GST_FOURCC_FORMAT " in AVI header",
3276                       GST_FOURCC_ARGS (GST_READ_UINT32_LE (fourcc)));
3277                   /* fall-through */
3278                 case GST_RIFF_TAG_JUNQ:
3279                 case GST_RIFF_TAG_JUNK:
3280                   goto next;
3281               }
3282               break;
3283             case GST_RIFF_IDIT:
3284               gst_avi_demux_parse_idit (avi, sub);
3285               goto next;
3286             default:
3287               GST_WARNING_OBJECT (avi,
3288                   "Unknown off %d tag %" GST_FOURCC_FORMAT " in AVI header",
3289                   offset, GST_FOURCC_ARGS (tag));
3290               /* fall-through */
3291             case GST_RIFF_TAG_JUNQ:
3292             case GST_RIFF_TAG_JUNK:
3293             next:
3294               /* move to next chunk */
3295               if (sub)
3296                 gst_buffer_unref (sub);
3297               sub = NULL;
3298               break;
3299           }
3300         }
3301         gst_buffer_unref (buf);
3302         GST_DEBUG ("elements parsed");
3303
3304         /* check parsed streams */
3305         if (avi->num_streams == 0) {
3306           goto no_streams;
3307         } else if (avi->num_streams != avi->avih->streams) {
3308           GST_WARNING_OBJECT (avi,
3309               "Stream header mentioned %d streams, but %d available",
3310               avi->avih->streams, avi->num_streams);
3311         }
3312         GST_DEBUG ("Get junk and info next");
3313         avi->header_state = GST_AVI_DEMUX_HEADER_INFO;
3314       } else {
3315         /* Need more data */
3316         return ret;
3317       }
3318       /* fall-though */
3319     case GST_AVI_DEMUX_HEADER_INFO:
3320       GST_DEBUG_OBJECT (avi, "skipping junk between header and data ...");
3321       while (TRUE) {
3322         if (gst_adapter_available (avi->adapter) < 12)
3323           return GST_FLOW_OK;
3324
3325         data = gst_adapter_map (avi->adapter, 12);
3326         tag = GST_READ_UINT32_LE (data);
3327         size = GST_READ_UINT32_LE (data + 4);
3328         ltag = GST_READ_UINT32_LE (data + 8);
3329         gst_adapter_unmap (avi->adapter);
3330
3331         if (tag == GST_RIFF_TAG_LIST) {
3332           switch (ltag) {
3333             case GST_RIFF_LIST_movi:
3334               gst_adapter_flush (avi->adapter, 12);
3335               if (!avi->first_movi_offset)
3336                 avi->first_movi_offset = avi->offset;
3337               avi->offset += 12;
3338               avi->idx1_offset = avi->offset + size - 4;
3339               goto skipping_done;
3340             case GST_RIFF_LIST_INFO:
3341               GST_DEBUG ("Found INFO chunk");
3342               if (gst_avi_demux_peek_chunk (avi, &tag, &size)) {
3343                 GST_DEBUG ("got size %d", size);
3344                 avi->offset += 12;
3345                 gst_adapter_flush (avi->adapter, 12);
3346                 if (size > 4) {
3347                   buf = gst_adapter_take_buffer (avi->adapter, size - 4);
3348                   /* mind padding */
3349                   if (size & 1)
3350                     gst_adapter_flush (avi->adapter, 1);
3351                   gst_riff_parse_info (GST_ELEMENT_CAST (avi), buf, &tags);
3352                   if (tags) {
3353                     if (avi->globaltags) {
3354                       gst_tag_list_insert (avi->globaltags, tags,
3355                           GST_TAG_MERGE_REPLACE);
3356                     } else {
3357                       avi->globaltags = tags;
3358                     }
3359                   }
3360                   tags = NULL;
3361                   gst_buffer_unref (buf);
3362
3363                   avi->offset += GST_ROUND_UP_2 (size) - 4;
3364                 } else {
3365                   GST_DEBUG ("skipping INFO LIST prefix");
3366                 }
3367               } else {
3368                 /* Need more data */
3369                 return GST_FLOW_OK;
3370               }
3371               break;
3372             default:
3373               if (gst_avi_demux_peek_chunk (avi, &tag, &size)) {
3374                 avi->offset += 8 + GST_ROUND_UP_2 (size);
3375                 gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
3376               } else {
3377                 /* Need more data */
3378                 return GST_FLOW_OK;
3379               }
3380               break;
3381           }
3382         } else {
3383           if (gst_avi_demux_peek_chunk (avi, &tag, &size)) {
3384             avi->offset += 8 + GST_ROUND_UP_2 (size);
3385             gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
3386           } else {
3387             /* Need more data */
3388             return GST_FLOW_OK;
3389           }
3390         }
3391       }
3392       break;
3393     default:
3394       GST_WARNING ("unhandled header state: %d", avi->header_state);
3395       break;
3396   }
3397 skipping_done:
3398
3399   GST_DEBUG_OBJECT (avi, "skipping done ... (streams=%u, stream[0].indexes=%p)",
3400       avi->num_streams, avi->stream[0].indexes);
3401
3402   GST_DEBUG ("Found movi chunk. Starting to stream data");
3403   avi->state = GST_AVI_DEMUX_MOVI;
3404
3405   /* no indexes in push mode, but it still sets some variables */
3406   gst_avi_demux_calculate_durations_from_index (avi);
3407
3408   gst_avi_demux_expose_streams (avi, TRUE);
3409
3410   /* prepare all streams for index 0 */
3411   for (i = 0; i < avi->num_streams; i++)
3412     avi->stream[i].current_entry = 0;
3413
3414   /* create initial NEWSEGMENT event */
3415   if (avi->seg_event)
3416     gst_event_unref (avi->seg_event);
3417   avi->seg_event = gst_event_new_segment (&avi->segment);
3418
3419   gst_avi_demux_check_seekability (avi);
3420
3421   /* at this point we know all the streams and we can signal the no more
3422    * pads signal */
3423   GST_DEBUG_OBJECT (avi, "signaling no more pads");
3424   gst_element_no_more_pads (GST_ELEMENT_CAST (avi));
3425
3426   return GST_FLOW_OK;
3427
3428   /* ERRORS */
3429 no_streams:
3430   {
3431     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("No streams found"));
3432     return GST_FLOW_ERROR;
3433   }
3434 header_no_list:
3435   {
3436     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3437         ("Invalid AVI header (no LIST at start): %"
3438             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3439     return GST_FLOW_ERROR;
3440   }
3441 header_no_hdrl:
3442   {
3443     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3444         ("Invalid AVI header (no hdrl at start): %"
3445             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3446     gst_buffer_unref (buf);
3447     return GST_FLOW_ERROR;
3448   }
3449 header_no_avih:
3450   {
3451     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3452         ("Invalid AVI header (no avih at start): %"
3453             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3454     if (sub)
3455       gst_buffer_unref (sub);
3456
3457     gst_buffer_unref (buf);
3458     return GST_FLOW_ERROR;
3459   }
3460 header_wrong_avih:
3461   {
3462     gst_buffer_unref (buf);
3463     return GST_FLOW_ERROR;
3464   }
3465 }
3466
3467 static void
3468 gst_avi_demux_add_date_tag (GstAviDemux * avi, gint y, gint m, gint d,
3469     gint h, gint min, gint s)
3470 {
3471   GDate *date;
3472   GstDateTime *dt;
3473
3474   date = g_date_new_dmy (d, m, y);
3475   if (!g_date_valid (date)) {
3476     /* bogus date */
3477     GST_WARNING_OBJECT (avi, "Refusing to add invalid date %d-%d-%d", y, m, d);
3478     g_date_free (date);
3479     return;
3480   }
3481
3482   dt = gst_date_time_new_local_time (y, m, d, h, min, s);
3483
3484   if (avi->globaltags == NULL)
3485     avi->globaltags = gst_tag_list_new_empty ();
3486
3487   gst_tag_list_add (avi->globaltags, GST_TAG_MERGE_REPLACE, GST_TAG_DATE, date,
3488       NULL);
3489   g_date_free (date);
3490   if (dt) {
3491     gst_tag_list_add (avi->globaltags, GST_TAG_MERGE_REPLACE, GST_TAG_DATE_TIME,
3492         dt, NULL);
3493     gst_date_time_unref (dt);
3494   }
3495 }
3496
3497 static void
3498 gst_avi_demux_parse_idit_nums_only (GstAviDemux * avi, gchar * data)
3499 {
3500   gint y, m, d;
3501   gint hr = 0, min = 0, sec = 0;
3502   gint ret;
3503
3504   GST_DEBUG ("data : '%s'", data);
3505
3506   ret = sscanf (data, "%d:%d:%d %d:%d:%d", &y, &m, &d, &hr, &min, &sec);
3507   if (ret < 3) {
3508     /* Attempt YYYY/MM/DD/ HH:MM variant (found in CASIO cameras) */
3509     ret = sscanf (data, "%04d/%02d/%02d/ %d:%d", &y, &m, &d, &hr, &min);
3510     if (ret < 3) {
3511       GST_WARNING_OBJECT (avi, "Failed to parse IDIT tag");
3512       return;
3513     }
3514   }
3515   gst_avi_demux_add_date_tag (avi, y, m, d, hr, min, sec);
3516 }
3517
3518 static gint
3519 get_month_num (gchar * data, guint size)
3520 {
3521   if (g_ascii_strncasecmp (data, "jan", 3) == 0) {
3522     return 1;
3523   } else if (g_ascii_strncasecmp (data, "feb", 3) == 0) {
3524     return 2;
3525   } else if (g_ascii_strncasecmp (data, "mar", 3) == 0) {
3526     return 3;
3527   } else if (g_ascii_strncasecmp (data, "apr", 3) == 0) {
3528     return 4;
3529   } else if (g_ascii_strncasecmp (data, "may", 3) == 0) {
3530     return 5;
3531   } else if (g_ascii_strncasecmp (data, "jun", 3) == 0) {
3532     return 6;
3533   } else if (g_ascii_strncasecmp (data, "jul", 3) == 0) {
3534     return 7;
3535   } else if (g_ascii_strncasecmp (data, "aug", 3) == 0) {
3536     return 8;
3537   } else if (g_ascii_strncasecmp (data, "sep", 3) == 0) {
3538     return 9;
3539   } else if (g_ascii_strncasecmp (data, "oct", 3) == 0) {
3540     return 10;
3541   } else if (g_ascii_strncasecmp (data, "nov", 3) == 0) {
3542     return 11;
3543   } else if (g_ascii_strncasecmp (data, "dec", 3) == 0) {
3544     return 12;
3545   }
3546
3547   return 0;
3548 }
3549
3550 static void
3551 gst_avi_demux_parse_idit_text (GstAviDemux * avi, gchar * data)
3552 {
3553   gint year, month, day;
3554   gint hour, min, sec;
3555   gint ret;
3556   gchar weekday[4];
3557   gchar monthstr[4];
3558
3559   ret = sscanf (data, "%3s %3s %d %d:%d:%d %d", weekday, monthstr, &day, &hour,
3560       &min, &sec, &year);
3561   if (ret != 7) {
3562     GST_WARNING_OBJECT (avi, "Failed to parse IDIT tag");
3563     return;
3564   }
3565   month = get_month_num (monthstr, strlen (monthstr));
3566   gst_avi_demux_add_date_tag (avi, year, month, day, hour, min, sec);
3567 }
3568
3569 static void
3570 gst_avi_demux_parse_idit (GstAviDemux * avi, GstBuffer * buf)
3571 {
3572   GstMapInfo map;
3573   gchar *ptr;
3574   gsize left;
3575   gchar *safedata = NULL;
3576
3577   gst_buffer_map (buf, &map, GST_MAP_READ);
3578   /*
3579    * According to:
3580    * http://www.eden-foundation.org/products/code/film_date_stamp/index.html
3581    *
3582    * This tag could be in one of the below formats
3583    * 2005:08:17 11:42:43
3584    * THU OCT 26 16:46:04 2006
3585    * Mon Mar  3 09:44:56 2008
3586    *
3587    * FIXME: Our date tag doesn't include hours
3588    */
3589
3590   /* skip eventual initial whitespace */
3591   ptr = (gchar *) map.data;
3592   left = map.size;
3593
3594   while (left > 0 && g_ascii_isspace (ptr[0])) {
3595     ptr++;
3596     left--;
3597   }
3598
3599   if (left == 0) {
3600     goto non_parsable;
3601   }
3602
3603   /* make a safe copy to add a \0 to the end of the string */
3604   safedata = g_strndup (ptr, left);
3605
3606   /* test if the first char is a alpha or a number */
3607   if (g_ascii_isdigit (ptr[0])) {
3608     gst_avi_demux_parse_idit_nums_only (avi, safedata);
3609     g_free (safedata);
3610     return;
3611   } else if (g_ascii_isalpha (ptr[0])) {
3612     gst_avi_demux_parse_idit_text (avi, safedata);
3613     g_free (safedata);
3614     return;
3615   }
3616
3617   g_free (safedata);
3618
3619 non_parsable:
3620   GST_WARNING_OBJECT (avi, "IDIT tag has no parsable info");
3621   gst_buffer_unmap (buf, &map);
3622 }
3623
3624 /*
3625  * Read full AVI headers.
3626  */
3627 static GstFlowReturn
3628 gst_avi_demux_stream_header_pull (GstAviDemux * avi)
3629 {
3630   GstFlowReturn res;
3631   GstBuffer *buf, *sub = NULL;
3632   guint32 tag;
3633   guint offset = 4;
3634   GstElement *element = GST_ELEMENT_CAST (avi);
3635   GstClockTime stamp;
3636   GstTagList *tags = NULL;
3637   guint8 fourcc[4];
3638
3639   stamp = gst_util_get_timestamp ();
3640
3641   /* the header consists of a 'hdrl' LIST tag */
3642   res = gst_riff_read_chunk (element, avi->sinkpad, &avi->offset, &tag, &buf);
3643   if (res != GST_FLOW_OK)
3644     goto pull_range_failed;
3645   else if (tag != GST_RIFF_TAG_LIST)
3646     goto no_list;
3647   else if (gst_buffer_get_size (buf) < 4)
3648     goto no_header;
3649
3650   GST_DEBUG_OBJECT (avi, "parsing headers");
3651
3652   /* Find the 'hdrl' LIST tag */
3653   gst_buffer_extract (buf, 0, fourcc, 4);
3654   while (GST_READ_UINT32_LE (fourcc) != GST_RIFF_LIST_hdrl) {
3655     GST_LOG_OBJECT (avi, "buffer contains %" GST_FOURCC_FORMAT,
3656         GST_FOURCC_ARGS (GST_READ_UINT32_LE (fourcc)));
3657
3658     /* Eat up */
3659     gst_buffer_unref (buf);
3660
3661     /* read new chunk */
3662     res = gst_riff_read_chunk (element, avi->sinkpad, &avi->offset, &tag, &buf);
3663     if (res != GST_FLOW_OK)
3664       goto pull_range_failed;
3665     else if (tag != GST_RIFF_TAG_LIST)
3666       goto no_list;
3667     else if (gst_buffer_get_size (buf) < 4)
3668       goto no_header;
3669     gst_buffer_extract (buf, 0, fourcc, 4);
3670   }
3671
3672   GST_DEBUG_OBJECT (avi, "hdrl LIST tag found");
3673
3674   gst_avi_demux_roundup_list (avi, &buf);
3675
3676   /* the hdrl starts with a 'avih' header */
3677   if (!gst_riff_parse_chunk (element, buf, &offset, &tag, &sub))
3678     goto no_avih;
3679   else if (tag != GST_RIFF_TAG_avih)
3680     goto no_avih;
3681   else if (!gst_avi_demux_parse_avih (avi, sub, &avi->avih))
3682     goto invalid_avih;
3683
3684   GST_DEBUG_OBJECT (avi, "AVI header ok, reading elements from header");
3685
3686   /* now, read the elements from the header until the end */
3687   while (gst_riff_parse_chunk (element, buf, &offset, &tag, &sub)) {
3688     GstMapInfo map;
3689
3690     /* sub can be NULL on empty tags */
3691     if (!sub)
3692       continue;
3693
3694     gst_buffer_map (sub, &map, GST_MAP_READ);
3695
3696     switch (tag) {
3697       case GST_RIFF_TAG_LIST:
3698         if (map.size < 4)
3699           goto next;
3700
3701         switch (GST_READ_UINT32_LE (map.data)) {
3702           case GST_RIFF_LIST_strl:
3703             if (!(gst_avi_demux_parse_stream (avi, sub))) {
3704               GST_ELEMENT_WARNING (avi, STREAM, DEMUX, (NULL),
3705                   ("failed to parse stream, ignoring"));
3706               sub = NULL;
3707             }
3708             sub = NULL;
3709             goto next;
3710           case GST_RIFF_LIST_odml:
3711             gst_avi_demux_parse_odml (avi, sub);
3712             sub = NULL;
3713             break;
3714           case GST_RIFF_LIST_INFO:
3715             gst_buffer_resize (sub, 4, -1);
3716             gst_riff_parse_info (element, sub, &tags);
3717             if (tags) {
3718               if (avi->globaltags) {
3719                 gst_tag_list_insert (avi->globaltags, tags,
3720                     GST_TAG_MERGE_REPLACE);
3721               } else {
3722                 avi->globaltags = tags;
3723               }
3724             }
3725             tags = NULL;
3726             break;
3727           default:
3728             GST_WARNING_OBJECT (avi,
3729                 "Unknown list %" GST_FOURCC_FORMAT " in AVI header",
3730                 GST_FOURCC_ARGS (GST_READ_UINT32_LE (map.data)));
3731             GST_MEMDUMP_OBJECT (avi, "Unknown list", map.data, map.size);
3732             /* fall-through */
3733           case GST_RIFF_TAG_JUNQ:
3734           case GST_RIFF_TAG_JUNK:
3735             goto next;
3736         }
3737         break;
3738       case GST_RIFF_IDIT:
3739         gst_avi_demux_parse_idit (avi, sub);
3740         goto next;
3741       default:
3742         GST_WARNING_OBJECT (avi,
3743             "Unknown tag %" GST_FOURCC_FORMAT " in AVI header at off %d",
3744             GST_FOURCC_ARGS (tag), offset);
3745         GST_MEMDUMP_OBJECT (avi, "Unknown tag", map.data, map.size);
3746         /* fall-through */
3747       case GST_RIFF_TAG_JUNQ:
3748       case GST_RIFF_TAG_JUNK:
3749       next:
3750         if (sub) {
3751           gst_buffer_unmap (sub, &map);
3752           gst_buffer_unref (sub);
3753         }
3754         sub = NULL;
3755         break;
3756     }
3757   }
3758   gst_buffer_unref (buf);
3759   GST_DEBUG ("elements parsed");
3760
3761   /* check parsed streams */
3762   if (avi->num_streams == 0)
3763     goto no_streams;
3764   else if (avi->num_streams != avi->avih->streams) {
3765     GST_WARNING_OBJECT (avi,
3766         "Stream header mentioned %d streams, but %d available",
3767         avi->avih->streams, avi->num_streams);
3768   }
3769
3770   GST_DEBUG_OBJECT (avi, "skipping junk between header and data, offset=%"
3771       G_GUINT64_FORMAT, avi->offset);
3772
3773   /* Now, find the data (i.e. skip all junk between header and data) */
3774   do {
3775     GstMapInfo map;
3776     guint size;
3777     guint32 tag, ltag;
3778
3779     buf = NULL;
3780     res = gst_pad_pull_range (avi->sinkpad, avi->offset, 12, &buf);
3781     if (res != GST_FLOW_OK) {
3782       GST_DEBUG_OBJECT (avi, "pull_range failure while looking for tags");
3783       goto pull_range_failed;
3784     } else if (gst_buffer_get_size (buf) < 12) {
3785       GST_DEBUG_OBJECT (avi,
3786           "got %" G_GSIZE_FORMAT " bytes which is less than 12 bytes",
3787           gst_buffer_get_size (buf));
3788       gst_buffer_unref (buf);
3789       return GST_FLOW_ERROR;
3790     }
3791
3792     gst_buffer_map (buf, &map, GST_MAP_READ);
3793     tag = GST_READ_UINT32_LE (map.data);
3794     size = GST_READ_UINT32_LE (map.data + 4);
3795     ltag = GST_READ_UINT32_LE (map.data + 8);
3796
3797     GST_DEBUG ("tag %" GST_FOURCC_FORMAT ", size %u",
3798         GST_FOURCC_ARGS (tag), size);
3799     GST_MEMDUMP ("Tag content", map.data, map.size);
3800     gst_buffer_unmap (buf, &map);
3801     gst_buffer_unref (buf);
3802
3803     switch (tag) {
3804       case GST_RIFF_TAG_LIST:{
3805         switch (ltag) {
3806           case GST_RIFF_LIST_movi:
3807             GST_DEBUG_OBJECT (avi,
3808                 "Reached the 'movi' tag, we're done with skipping");
3809             goto skipping_done;
3810           case GST_RIFF_LIST_INFO:
3811             res =
3812                 gst_riff_read_chunk (element, avi->sinkpad, &avi->offset, &tag,
3813                 &buf);
3814             if (res != GST_FLOW_OK) {
3815               GST_DEBUG_OBJECT (avi, "couldn't read INFO chunk");
3816               goto pull_range_failed;
3817             }
3818             GST_DEBUG ("got size %" G_GSIZE_FORMAT, gst_buffer_get_size (buf));
3819             if (size < 4) {
3820               GST_DEBUG ("skipping INFO LIST prefix");
3821               avi->offset += (4 - GST_ROUND_UP_2 (size));
3822               gst_buffer_unref (buf);
3823               continue;
3824             }
3825
3826             sub = gst_buffer_copy_region (buf, GST_BUFFER_COPY_ALL, 4, -1);
3827             gst_riff_parse_info (element, sub, &tags);
3828             if (tags) {
3829               if (avi->globaltags) {
3830                 gst_tag_list_insert (avi->globaltags, tags,
3831                     GST_TAG_MERGE_REPLACE);
3832               } else {
3833                 avi->globaltags = tags;
3834               }
3835             }
3836             tags = NULL;
3837             if (sub) {
3838               gst_buffer_unref (sub);
3839               sub = NULL;
3840             }
3841             gst_buffer_unref (buf);
3842             /* gst_riff_read_chunk() has already advanced avi->offset */
3843             break;
3844           default:
3845             GST_WARNING_OBJECT (avi,
3846                 "Skipping unknown list tag %" GST_FOURCC_FORMAT,
3847                 GST_FOURCC_ARGS (ltag));
3848             avi->offset += 8 + GST_ROUND_UP_2 (size);
3849             break;
3850         }
3851       }
3852         break;
3853       default:
3854         GST_WARNING_OBJECT (avi, "Skipping unknown tag %" GST_FOURCC_FORMAT,
3855             GST_FOURCC_ARGS (tag));
3856         /* Fall-through */
3857       case GST_MAKE_FOURCC ('J', 'U', 'N', 'Q'):
3858       case GST_MAKE_FOURCC ('J', 'U', 'N', 'K'):
3859         /* Only get buffer for debugging if the memdump is needed  */
3860         if (gst_debug_category_get_threshold (GST_CAT_DEFAULT) >= 9) {
3861           buf = NULL;
3862           res = gst_pad_pull_range (avi->sinkpad, avi->offset, size, &buf);
3863           if (res != GST_FLOW_OK) {
3864             GST_DEBUG_OBJECT (avi, "couldn't read INFO chunk");
3865             goto pull_range_failed;
3866           }
3867           gst_buffer_map (buf, &map, GST_MAP_READ);
3868           GST_MEMDUMP ("Junk", map.data, map.size);
3869           gst_buffer_unmap (buf, &map);
3870           gst_buffer_unref (buf);
3871         }
3872         avi->offset += 8 + GST_ROUND_UP_2 (size);
3873         break;
3874     }
3875   } while (1);
3876 skipping_done:
3877
3878   GST_DEBUG_OBJECT (avi, "skipping done ... (streams=%u, stream[0].indexes=%p)",
3879       avi->num_streams, avi->stream[0].indexes);
3880
3881   /* create or read stream index (for seeking) */
3882   if (avi->stream[0].indexes != NULL) {
3883     /* we read a super index already (gst_avi_demux_parse_superindex() ) */
3884     gst_avi_demux_read_subindexes_pull (avi);
3885   }
3886   if (!avi->have_index) {
3887     if (avi->avih->flags & GST_RIFF_AVIH_HASINDEX)
3888       gst_avi_demux_stream_index (avi);
3889
3890     /* still no index, scan */
3891     if (!avi->have_index) {
3892       gst_avi_demux_stream_scan (avi);
3893
3894       /* still no index.. this is a fatal error for now.
3895        * FIXME, we should switch to plain push mode without seeking
3896        * instead of failing. */
3897       if (!avi->have_index)
3898         goto no_index;
3899     }
3900   }
3901   /* use the indexes now to construct nice durations */
3902   gst_avi_demux_calculate_durations_from_index (avi);
3903
3904   gst_avi_demux_expose_streams (avi, FALSE);
3905
3906   /* do initial seek to the default segment values */
3907   gst_avi_demux_do_seek (avi, &avi->segment);
3908
3909   /* create initial NEWSEGMENT event */
3910   if (avi->seg_event)
3911     gst_event_unref (avi->seg_event);
3912   avi->seg_event = gst_event_new_segment (&avi->segment);
3913
3914   stamp = gst_util_get_timestamp () - stamp;
3915   GST_DEBUG_OBJECT (avi, "pulling header took %" GST_TIME_FORMAT,
3916       GST_TIME_ARGS (stamp));
3917
3918   /* at this point we know all the streams and we can signal the no more
3919    * pads signal */
3920   GST_DEBUG_OBJECT (avi, "signaling no more pads");
3921   gst_element_no_more_pads (GST_ELEMENT_CAST (avi));
3922
3923   return GST_FLOW_OK;
3924
3925   /* ERRORS */
3926 no_list:
3927   {
3928     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3929         ("Invalid AVI header (no LIST at start): %"
3930             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3931     gst_buffer_unref (buf);
3932     return GST_FLOW_ERROR;
3933   }
3934 no_header:
3935   {
3936     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3937         ("Invalid AVI header (no hdrl at start): %"
3938             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3939     gst_buffer_unref (buf);
3940     return GST_FLOW_ERROR;
3941   }
3942 no_avih:
3943   {
3944     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3945         ("Invalid AVI header (no avih at start): %"
3946             GST_FOURCC_FORMAT, GST_FOURCC_ARGS (tag)));
3947     if (sub)
3948       gst_buffer_unref (sub);
3949     gst_buffer_unref (buf);
3950     return GST_FLOW_ERROR;
3951   }
3952 invalid_avih:
3953   {
3954     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3955         ("Invalid AVI header (cannot parse avih at start)"));
3956     gst_buffer_unref (buf);
3957     return GST_FLOW_ERROR;
3958   }
3959 no_streams:
3960   {
3961     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("No streams found"));
3962     return GST_FLOW_ERROR;
3963   }
3964 no_index:
3965   {
3966     GST_WARNING ("file without or too big index");
3967     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3968         ("Could not get/create index"));
3969     return GST_FLOW_ERROR;
3970   }
3971 pull_range_failed:
3972   {
3973     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL),
3974         ("pull_range flow reading header: %s", gst_flow_get_name (res)));
3975     return GST_FLOW_ERROR;
3976   }
3977 }
3978
3979 /* move a stream to @index */
3980 static void
3981 gst_avi_demux_move_stream (GstAviDemux * avi, GstAviStream * stream,
3982     GstSegment * segment, guint index)
3983 {
3984   GST_DEBUG_OBJECT (avi, "Move stream %d to %u", stream->num, index);
3985
3986   if (segment->rate < 0.0) {
3987     guint next_key;
3988     /* Because we don't know the frame order we need to push from the prev keyframe
3989      * to the next keyframe. If there is a smart decoder downstream he will notice
3990      * that there are too many encoded frames send and return EOS when there
3991      * are enough decoded frames to fill the segment. */
3992     next_key = gst_avi_demux_index_next (avi, stream, index, TRUE);
3993
3994     /* FIXME, we go back to 0, we should look at segment.start. We will however
3995      * stop earlier when the see the timestamp < segment.start */
3996     stream->start_entry = 0;
3997     stream->step_entry = index;
3998     stream->current_entry = index;
3999     stream->stop_entry = next_key;
4000
4001     GST_DEBUG_OBJECT (avi, "reverse seek: start %u, step %u, stop %u",
4002         stream->start_entry, stream->step_entry, stream->stop_entry);
4003   } else {
4004     stream->start_entry = index;
4005     stream->step_entry = index;
4006     stream->stop_entry = gst_avi_demux_index_last (avi, stream);
4007   }
4008   if (stream->current_entry != index) {
4009     GST_DEBUG_OBJECT (avi, "Move DISCONT from %u to %u",
4010         stream->current_entry, index);
4011     stream->current_entry = index;
4012     stream->discont = TRUE;
4013   }
4014
4015   /* update the buffer info */
4016   gst_avi_demux_get_buffer_info (avi, stream, index,
4017       &stream->current_timestamp, &stream->current_ts_end,
4018       &stream->current_offset, &stream->current_offset_end);
4019
4020   GST_DEBUG_OBJECT (avi, "Moved to %u, ts %" GST_TIME_FORMAT
4021       ", ts_end %" GST_TIME_FORMAT ", off %" G_GUINT64_FORMAT
4022       ", off_end %" G_GUINT64_FORMAT, index,
4023       GST_TIME_ARGS (stream->current_timestamp),
4024       GST_TIME_ARGS (stream->current_ts_end), stream->current_offset,
4025       stream->current_offset_end);
4026
4027   GST_DEBUG_OBJECT (avi, "Seeking to offset %" G_GUINT64_FORMAT,
4028       stream->index[index].offset);
4029 }
4030
4031 /*
4032  * Do the actual seeking.
4033  */
4034 static gboolean
4035 gst_avi_demux_do_seek (GstAviDemux * avi, GstSegment * segment)
4036 {
4037   GstClockTime seek_time;
4038   gboolean keyframe, before, after;
4039   guint i, index;
4040   GstAviStream *stream;
4041
4042   seek_time = segment->position;
4043   keyframe = ! !(segment->flags & GST_SEEK_FLAG_KEY_UNIT);
4044   before = ! !(segment->flags & GST_SEEK_FLAG_SNAP_BEFORE);
4045   after = ! !(segment->flags & GST_SEEK_FLAG_SNAP_AFTER);
4046
4047   GST_DEBUG_OBJECT (avi, "seek to: %" GST_TIME_FORMAT
4048       " keyframe seeking:%d, %s", GST_TIME_ARGS (seek_time), keyframe,
4049       snap_types[before ? 1 : 0][after ? 1 : 0]);
4050
4051   /* FIXME, this code assumes the main stream with keyframes is stream 0,
4052    * which is mostly correct... */
4053   stream = &avi->stream[avi->main_stream];
4054
4055   /* get the entry index for the requested position */
4056   index = gst_avi_demux_index_for_time (avi, stream, seek_time);
4057   GST_DEBUG_OBJECT (avi, "Got entry %u", index);
4058
4059   /* check if we are already on a keyframe */
4060   if (!ENTRY_IS_KEYFRAME (&stream->index[index])) {
4061     gboolean next;
4062
4063     next = after && !before;
4064     if (segment->rate < 0)
4065       next = !next;
4066
4067     if (next) {
4068       GST_DEBUG_OBJECT (avi, "not keyframe, searching forward");
4069       /* now go to the next keyframe, this is where we should start
4070        * decoding from. */
4071       index = gst_avi_demux_index_next (avi, stream, index, TRUE);
4072       GST_DEBUG_OBJECT (avi, "next keyframe at %u", index);
4073     } else {
4074       GST_DEBUG_OBJECT (avi, "not keyframe, searching back");
4075       /* now go to the previous keyframe, this is where we should start
4076        * decoding from. */
4077       index = gst_avi_demux_index_prev (avi, stream, index, TRUE);
4078       GST_DEBUG_OBJECT (avi, "previous keyframe at %u", index);
4079     }
4080   }
4081
4082   /* move the main stream to this position */
4083   gst_avi_demux_move_stream (avi, stream, segment, index);
4084
4085   if (keyframe) {
4086     /* when seeking to a keyframe, we update the result seek time
4087      * to the time of the keyframe. */
4088     seek_time = stream->current_timestamp;
4089     GST_DEBUG_OBJECT (avi, "keyframe adjusted to %" GST_TIME_FORMAT,
4090         GST_TIME_ARGS (seek_time));
4091   }
4092
4093   /* the seek time is also the position and stream time when going
4094    * forwards */
4095   segment->position = seek_time;
4096   if (segment->rate > 0.0)
4097     segment->time = seek_time;
4098
4099   /* now set DISCONT and align the other streams */
4100   for (i = 0; i < avi->num_streams; i++) {
4101     GstAviStream *ostream;
4102
4103     ostream = &avi->stream[i];
4104     if ((ostream == stream) || (ostream->index == NULL))
4105       continue;
4106
4107     /* get the entry index for the requested position */
4108     index = gst_avi_demux_index_for_time (avi, ostream, seek_time);
4109
4110     /* move to previous keyframe */
4111     if (!ENTRY_IS_KEYFRAME (&ostream->index[index]))
4112       index = gst_avi_demux_index_prev (avi, ostream, index, TRUE);
4113
4114     gst_avi_demux_move_stream (avi, ostream, segment, index);
4115   }
4116   GST_DEBUG_OBJECT (avi, "done seek to: %" GST_TIME_FORMAT,
4117       GST_TIME_ARGS (seek_time));
4118
4119   return TRUE;
4120 }
4121
4122 /*
4123  * Handle seek event in pull mode.
4124  */
4125 static gboolean
4126 gst_avi_demux_handle_seek (GstAviDemux * avi, GstPad * pad, GstEvent * event)
4127 {
4128   gdouble rate;
4129   GstFormat format;
4130   GstSeekFlags flags;
4131   GstSeekType cur_type = GST_SEEK_TYPE_NONE, stop_type;
4132   gint64 cur, stop;
4133   gboolean flush;
4134   gboolean update;
4135   GstSegment seeksegment = { 0, };
4136   gint i;
4137
4138   if (event) {
4139     GST_DEBUG_OBJECT (avi, "doing seek with event");
4140
4141     gst_event_parse_seek (event, &rate, &format, &flags,
4142         &cur_type, &cur, &stop_type, &stop);
4143
4144     /* we have to have a format as the segment format. Try to convert
4145      * if not. */
4146     if (format != GST_FORMAT_TIME) {
4147       gboolean res = TRUE;
4148
4149       if (cur_type != GST_SEEK_TYPE_NONE)
4150         res = gst_pad_query_convert (pad, format, cur, GST_FORMAT_TIME, &cur);
4151       if (res && stop_type != GST_SEEK_TYPE_NONE)
4152         res = gst_pad_query_convert (pad, format, stop, GST_FORMAT_TIME, &stop);
4153       if (!res)
4154         goto no_format;
4155
4156       format = GST_FORMAT_TIME;
4157     }
4158     GST_DEBUG_OBJECT (avi,
4159         "seek requested: rate %g cur %" GST_TIME_FORMAT " stop %"
4160         GST_TIME_FORMAT, rate, GST_TIME_ARGS (cur), GST_TIME_ARGS (stop));
4161     /* FIXME: can we do anything with rate!=1.0 */
4162   } else {
4163     GST_DEBUG_OBJECT (avi, "doing seek without event");
4164     flags = 0;
4165     rate = 1.0;
4166   }
4167
4168   /* save flush flag */
4169   flush = flags & GST_SEEK_FLAG_FLUSH;
4170
4171   if (flush) {
4172     GstEvent *fevent = gst_event_new_flush_start ();
4173
4174     /* for a flushing seek, we send a flush_start on all pads. This will
4175      * eventually stop streaming with a WRONG_STATE. We can thus eventually
4176      * take the STREAM_LOCK. */
4177     GST_DEBUG_OBJECT (avi, "sending flush start");
4178     gst_avi_demux_push_event (avi, gst_event_ref (fevent));
4179     gst_pad_push_event (avi->sinkpad, fevent);
4180   } else {
4181     /* a non-flushing seek, we PAUSE the task so that we can take the
4182      * STREAM_LOCK */
4183     GST_DEBUG_OBJECT (avi, "non flushing seek, pausing task");
4184     gst_pad_pause_task (avi->sinkpad);
4185   }
4186
4187   /* wait for streaming to stop */
4188   GST_DEBUG_OBJECT (avi, "wait for streaming to stop");
4189   GST_PAD_STREAM_LOCK (avi->sinkpad);
4190
4191   /* copy segment, we need this because we still need the old
4192    * segment when we close the current segment. */
4193   memcpy (&seeksegment, &avi->segment, sizeof (GstSegment));
4194
4195   if (event) {
4196     GST_DEBUG_OBJECT (avi, "configuring seek");
4197     gst_segment_do_seek (&seeksegment, rate, format, flags,
4198         cur_type, cur, stop_type, stop, &update);
4199   }
4200   /* do the seek, seeksegment.position contains the new position, this
4201    * actually never fails. */
4202   gst_avi_demux_do_seek (avi, &seeksegment);
4203
4204   if (flush) {
4205     GstEvent *fevent = gst_event_new_flush_stop (TRUE);
4206
4207     GST_DEBUG_OBJECT (avi, "sending flush stop");
4208     gst_avi_demux_push_event (avi, gst_event_ref (fevent));
4209     gst_pad_push_event (avi->sinkpad, fevent);
4210   }
4211
4212   /* now update the real segment info */
4213   memcpy (&avi->segment, &seeksegment, sizeof (GstSegment));
4214
4215   /* post the SEGMENT_START message when we do segmented playback */
4216   if (avi->segment.flags & GST_SEEK_FLAG_SEGMENT) {
4217     gst_element_post_message (GST_ELEMENT_CAST (avi),
4218         gst_message_new_segment_start (GST_OBJECT_CAST (avi),
4219             avi->segment.format, avi->segment.position));
4220   }
4221
4222   /* queue the segment event for the streaming thread. */
4223   if (avi->seg_event)
4224     gst_event_unref (avi->seg_event);
4225   avi->seg_event = gst_event_new_segment (&avi->segment);
4226
4227   if (!avi->streaming) {
4228     gst_pad_start_task (avi->sinkpad, (GstTaskFunction) gst_avi_demux_loop,
4229         avi->sinkpad, NULL);
4230   }
4231   /* reset the last flow and mark discont, seek is always DISCONT */
4232   for (i = 0; i < avi->num_streams; i++) {
4233     GST_DEBUG_OBJECT (avi, "marking DISCONT");
4234     avi->stream[i].last_flow = GST_FLOW_OK;
4235     avi->stream[i].discont = TRUE;
4236   }
4237   GST_PAD_STREAM_UNLOCK (avi->sinkpad);
4238
4239   return TRUE;
4240
4241   /* ERRORS */
4242 no_format:
4243   {
4244     GST_DEBUG_OBJECT (avi, "unsupported format given, seek aborted.");
4245     return FALSE;
4246   }
4247 }
4248
4249 /*
4250  * Handle seek event in push mode.
4251  */
4252 static gboolean
4253 avi_demux_handle_seek_push (GstAviDemux * avi, GstPad * pad, GstEvent * event)
4254 {
4255   gdouble rate;
4256   GstFormat format;
4257   GstSeekFlags flags;
4258   GstSeekType cur_type = GST_SEEK_TYPE_NONE, stop_type;
4259   gint64 cur, stop;
4260   gboolean keyframe, before, after;
4261   GstAviStream *stream;
4262   guint index;
4263   guint n, str_num;
4264   guint64 min_offset;
4265   GstSegment seeksegment;
4266   gboolean update;
4267
4268   /* check we have the index */
4269   if (!avi->have_index) {
4270     GST_DEBUG_OBJECT (avi, "no seek index built, seek aborted.");
4271     return FALSE;
4272   } else {
4273     GST_DEBUG_OBJECT (avi, "doing push-based seek with event");
4274   }
4275
4276   gst_event_parse_seek (event, &rate, &format, &flags,
4277       &cur_type, &cur, &stop_type, &stop);
4278
4279   if (format != GST_FORMAT_TIME) {
4280     gboolean res = TRUE;
4281
4282     if (cur_type != GST_SEEK_TYPE_NONE)
4283       res = gst_pad_query_convert (pad, format, cur, GST_FORMAT_TIME, &cur);
4284     if (res && stop_type != GST_SEEK_TYPE_NONE)
4285       res = gst_pad_query_convert (pad, format, stop, GST_FORMAT_TIME, &stop);
4286     if (!res) {
4287       GST_DEBUG_OBJECT (avi, "unsupported format given, seek aborted.");
4288       return FALSE;
4289     }
4290
4291     format = GST_FORMAT_TIME;
4292   }
4293
4294   /* let gst_segment handle any tricky stuff */
4295   GST_DEBUG_OBJECT (avi, "configuring seek");
4296   memcpy (&seeksegment, &avi->segment, sizeof (GstSegment));
4297   gst_segment_do_seek (&seeksegment, rate, format, flags,
4298       cur_type, cur, stop_type, stop, &update);
4299
4300   keyframe = ! !(flags & GST_SEEK_FLAG_KEY_UNIT);
4301   cur = seeksegment.position;
4302   before = ! !(flags & GST_SEEK_FLAG_SNAP_BEFORE);
4303   after = ! !(flags & GST_SEEK_FLAG_SNAP_AFTER);
4304
4305   GST_DEBUG_OBJECT (avi,
4306       "Seek requested: ts %" GST_TIME_FORMAT " stop %" GST_TIME_FORMAT
4307       ", kf %u, %s, rate %lf", GST_TIME_ARGS (cur), GST_TIME_ARGS (stop),
4308       keyframe, snap_types[before ? 1 : 0][after ? 1 : 0], rate);
4309
4310   if (rate < 0) {
4311     GST_DEBUG_OBJECT (avi, "negative rate seek not supported in push mode");
4312     return FALSE;
4313   }
4314
4315   /* FIXME, this code assumes the main stream with keyframes is stream 0,
4316    * which is mostly correct... */
4317   str_num = avi->main_stream;
4318   stream = &avi->stream[str_num];
4319
4320   /* get the entry index for the requested position */
4321   index = gst_avi_demux_index_for_time (avi, stream, cur);
4322   GST_DEBUG_OBJECT (avi, "str %u: Found entry %u for %" GST_TIME_FORMAT,
4323       str_num, index, GST_TIME_ARGS (cur));
4324
4325   /* check if we are already on a keyframe */
4326   if (!ENTRY_IS_KEYFRAME (&stream->index[index])) {
4327     gboolean next;
4328
4329     next = after && !before;
4330     if (seeksegment.rate < 0)
4331       next = !next;
4332
4333     if (next) {
4334       GST_DEBUG_OBJECT (avi, "Entry is not a keyframe - searching forward");
4335       /* now go to the next keyframe, this is where we should start
4336        * decoding from. */
4337       index = gst_avi_demux_index_next (avi, stream, index, TRUE);
4338       GST_DEBUG_OBJECT (avi, "Found previous keyframe at %u", index);
4339     } else {
4340       GST_DEBUG_OBJECT (avi, "Entry is not a keyframe - searching back");
4341       /* now go to the previous keyframe, this is where we should start
4342        * decoding from. */
4343       index = gst_avi_demux_index_prev (avi, stream, index, TRUE);
4344       GST_DEBUG_OBJECT (avi, "Found previous keyframe at %u", index);
4345     }
4346   }
4347
4348   gst_avi_demux_get_buffer_info (avi, stream, index,
4349       &stream->current_timestamp, &stream->current_ts_end,
4350       &stream->current_offset, &stream->current_offset_end);
4351
4352   /* re-use cur to be the timestamp of the seek as it _will_ be */
4353   cur = stream->current_timestamp;
4354
4355   min_offset = stream->index[index].offset;
4356   avi->seek_kf_offset = min_offset - 8;
4357
4358   GST_DEBUG_OBJECT (avi,
4359       "Seek to: ts %" GST_TIME_FORMAT " (on str %u, idx %u, offset %"
4360       G_GUINT64_FORMAT ")", GST_TIME_ARGS (stream->current_timestamp), str_num,
4361       index, min_offset);
4362
4363   for (n = 0; n < avi->num_streams; n++) {
4364     GstAviStream *str = &avi->stream[n];
4365     guint idx;
4366
4367     if (n == avi->main_stream)
4368       continue;
4369
4370     /* get the entry index for the requested position */
4371     idx = gst_avi_demux_index_for_time (avi, str, cur);
4372     GST_DEBUG_OBJECT (avi, "str %u: Found entry %u for %" GST_TIME_FORMAT, n,
4373         idx, GST_TIME_ARGS (cur));
4374
4375     /* check if we are already on a keyframe */
4376     if (!ENTRY_IS_KEYFRAME (&str->index[idx])) {
4377       if (after && !before) {
4378         GST_DEBUG_OBJECT (avi, "Entry is not a keyframe - searching forward");
4379         /* now go to the next keyframe, this is where we should start
4380          * decoding from. */
4381         idx = gst_avi_demux_index_next (avi, str, idx, TRUE);
4382         GST_DEBUG_OBJECT (avi, "Found next keyframe at %u", idx);
4383       } else {
4384         GST_DEBUG_OBJECT (avi, "Entry is not a keyframe - searching back");
4385         /* now go to the previous keyframe, this is where we should start
4386          * decoding from. */
4387         idx = gst_avi_demux_index_prev (avi, str, idx, TRUE);
4388         GST_DEBUG_OBJECT (avi, "Found previous keyframe at %u", idx);
4389       }
4390     }
4391
4392     gst_avi_demux_get_buffer_info (avi, str, idx,
4393         &str->current_timestamp, &str->current_ts_end,
4394         &str->current_offset, &str->current_offset_end);
4395
4396     if (str->index[idx].offset < min_offset) {
4397       min_offset = str->index[idx].offset;
4398       GST_DEBUG_OBJECT (avi,
4399           "Found an earlier offset at %" G_GUINT64_FORMAT ", str %u",
4400           min_offset, n);
4401       str_num = n;
4402       stream = str;
4403       index = idx;
4404     }
4405   }
4406
4407   GST_DEBUG_OBJECT (avi,
4408       "Seek performed: str %u, offset %" G_GUINT64_FORMAT ", idx %u, ts %"
4409       GST_TIME_FORMAT ", ts_end %" GST_TIME_FORMAT ", off %" G_GUINT64_FORMAT
4410       ", off_end %" G_GUINT64_FORMAT, str_num, min_offset, index,
4411       GST_TIME_ARGS (stream->current_timestamp),
4412       GST_TIME_ARGS (stream->current_ts_end), stream->current_offset,
4413       stream->current_offset_end);
4414
4415   /* index data refers to data, not chunk header (for pull mode convenience) */
4416   min_offset -= 8;
4417   GST_DEBUG_OBJECT (avi, "seeking to chunk at offset %" G_GUINT64_FORMAT,
4418       min_offset);
4419
4420   if (!perform_seek_to_offset (avi, min_offset)) {
4421     GST_DEBUG_OBJECT (avi, "seek event failed!");
4422     return FALSE;
4423   }
4424
4425   return TRUE;
4426 }
4427
4428 /*
4429  * Handle whether we can perform the seek event or if we have to let the chain
4430  * function handle seeks to build the seek indexes first.
4431  */
4432 static gboolean
4433 gst_avi_demux_handle_seek_push (GstAviDemux * avi, GstPad * pad,
4434     GstEvent * event)
4435 {
4436   /* check for having parsed index already */
4437   if (!avi->have_index) {
4438     guint64 offset = 0;
4439     gboolean building_index;
4440
4441     GST_OBJECT_LOCK (avi);
4442     /* handle the seek event in the chain function */
4443     avi->state = GST_AVI_DEMUX_SEEK;
4444
4445     /* copy the event */
4446     if (avi->seek_event)
4447       gst_event_unref (avi->seek_event);
4448     avi->seek_event = gst_event_ref (event);
4449
4450     /* set the building_index flag so that only one thread can setup the
4451      * structures for index seeking. */
4452     building_index = avi->building_index;
4453     if (!building_index) {
4454       avi->building_index = TRUE;
4455       if (avi->stream[0].indexes) {
4456         avi->odml_stream = 0;
4457         avi->odml_subidxs = avi->stream[avi->odml_stream].indexes;
4458         offset = avi->odml_subidxs[0];
4459       } else {
4460         offset = avi->idx1_offset;
4461       }
4462     }
4463     GST_OBJECT_UNLOCK (avi);
4464
4465     if (!building_index) {
4466       /* seek to the first subindex or legacy index */
4467       GST_INFO_OBJECT (avi,
4468           "Seeking to legacy index/first subindex at %" G_GUINT64_FORMAT,
4469           offset);
4470       return perform_seek_to_offset (avi, offset);
4471     }
4472
4473     /* FIXME: we have to always return true so that we don't block the seek
4474      * thread.
4475      * Note: maybe it is OK to return true if we're still building the index */
4476     return TRUE;
4477   }
4478
4479   return avi_demux_handle_seek_push (avi, pad, event);
4480 }
4481
4482 /*
4483  * Helper for gst_avi_demux_invert()
4484  */
4485 static inline void
4486 swap_line (guint8 * d1, guint8 * d2, guint8 * tmp, gint bytes)
4487 {
4488   memcpy (tmp, d1, bytes);
4489   memcpy (d1, d2, bytes);
4490   memcpy (d2, tmp, bytes);
4491 }
4492
4493
4494 #define gst_avi_demux_is_uncompressed(fourcc)           \
4495   (fourcc == GST_RIFF_DIB ||                            \
4496    fourcc == GST_RIFF_rgb ||                            \
4497    fourcc == GST_RIFF_RGB || fourcc == GST_RIFF_RAW)
4498
4499 /*
4500  * Invert DIB buffers... Takes existing buffer and
4501  * returns either the buffer or a new one (with old
4502  * one dereferenced).
4503  * FIXME: can't we preallocate tmp? and remember stride, bpp?
4504  */
4505 static GstBuffer *
4506 gst_avi_demux_invert (GstAviStream * stream, GstBuffer * buf)
4507 {
4508   GstStructure *s;
4509   gint y, w, h;
4510   gint bpp, stride;
4511   guint8 *tmp = NULL;
4512   GstMapInfo map;
4513   GstCaps *caps;
4514   guint32 fourcc;
4515
4516   if (stream->strh->type != GST_RIFF_FCC_vids)
4517     return buf;
4518
4519   if (stream->strf.vids == NULL) {
4520     GST_WARNING ("Failed to retrieve vids for stream");
4521     return buf;
4522   }
4523
4524   fourcc = (stream->strf.vids->compression) ?
4525       stream->strf.vids->compression : stream->strh->fcc_handler;
4526   if (!gst_avi_demux_is_uncompressed (fourcc)) {
4527     return buf;                 /* Ignore non DIB buffers */
4528   }
4529
4530   caps = gst_pad_get_current_caps (stream->pad);
4531   s = gst_caps_get_structure (caps, 0);
4532   gst_caps_unref (caps);
4533
4534   if (!gst_structure_get_int (s, "bpp", &bpp)) {
4535     GST_WARNING ("Failed to retrieve depth from caps");
4536     return buf;
4537   }
4538
4539   h = stream->strf.vids->height;
4540   w = stream->strf.vids->width;
4541   stride = GST_ROUND_UP_4 (w * (bpp / 8));
4542
4543   buf = gst_buffer_make_writable (buf);
4544
4545   gst_buffer_map (buf, &map, GST_MAP_READWRITE);
4546   if (map.size < (stride * h)) {
4547     GST_WARNING ("Buffer is smaller than reported Width x Height x Depth");
4548     gst_buffer_unmap (buf, &map);
4549     return buf;
4550   }
4551
4552   tmp = g_malloc (stride);
4553
4554   for (y = 0; y < h / 2; y++) {
4555     swap_line (map.data + stride * y, map.data + stride * (h - 1 - y), tmp,
4556         stride);
4557   }
4558
4559   g_free (tmp);
4560
4561   gst_buffer_unmap (buf, &map);
4562
4563   return buf;
4564 }
4565
4566 #if 0
4567 static void
4568 gst_avi_demux_add_assoc (GstAviDemux * avi, GstAviStream * stream,
4569     GstClockTime timestamp, guint64 offset, gboolean keyframe)
4570 {
4571   /* do not add indefinitely for open-ended streaming */
4572   if (G_UNLIKELY (avi->element_index && avi->seekable)) {
4573     GST_LOG_OBJECT (avi, "adding association %" GST_TIME_FORMAT "-> %"
4574         G_GUINT64_FORMAT, GST_TIME_ARGS (timestamp), offset);
4575     gst_index_add_association (avi->element_index, avi->index_id,
4576         keyframe ? GST_ASSOCIATION_FLAG_KEY_UNIT :
4577         GST_ASSOCIATION_FLAG_DELTA_UNIT, GST_FORMAT_TIME, timestamp,
4578         GST_FORMAT_BYTES, offset, NULL);
4579     /* current_entry is DEFAULT (frame #) */
4580     gst_index_add_association (avi->element_index, stream->index_id,
4581         keyframe ? GST_ASSOCIATION_FLAG_KEY_UNIT :
4582         GST_ASSOCIATION_FLAG_DELTA_UNIT, GST_FORMAT_TIME, timestamp,
4583         GST_FORMAT_BYTES, offset, GST_FORMAT_DEFAULT, stream->current_entry,
4584         NULL);
4585   }
4586 }
4587 #endif
4588
4589 /*
4590  * Returns the aggregated GstFlowReturn.
4591  */
4592 static GstFlowReturn
4593 gst_avi_demux_combine_flows (GstAviDemux * avi, GstAviStream * stream,
4594     GstFlowReturn ret)
4595 {
4596   guint i;
4597   gboolean unexpected = FALSE, not_linked = TRUE;
4598
4599   /* store the value */
4600   stream->last_flow = ret;
4601
4602   /* any other error that is not-linked or eos can be returned right away */
4603   if (G_LIKELY (ret != GST_FLOW_EOS && ret != GST_FLOW_NOT_LINKED))
4604     goto done;
4605
4606   /* only return NOT_LINKED if all other pads returned NOT_LINKED */
4607   for (i = 0; i < avi->num_streams; i++) {
4608     GstAviStream *ostream = &avi->stream[i];
4609
4610     ret = ostream->last_flow;
4611     /* no unexpected or unlinked, return */
4612     if (G_LIKELY (ret != GST_FLOW_EOS && ret != GST_FLOW_NOT_LINKED))
4613       goto done;
4614
4615     /* we check to see if we have at least 1 unexpected or all unlinked */
4616     unexpected |= (ret == GST_FLOW_EOS);
4617     not_linked &= (ret == GST_FLOW_NOT_LINKED);
4618   }
4619   /* when we get here, we all have unlinked or unexpected */
4620   if (not_linked)
4621     ret = GST_FLOW_NOT_LINKED;
4622   else if (unexpected)
4623     ret = GST_FLOW_EOS;
4624 done:
4625   GST_LOG_OBJECT (avi, "combined %s to return %s",
4626       gst_flow_get_name (stream->last_flow), gst_flow_get_name (ret));
4627   return ret;
4628 }
4629
4630 /* move @stream to the next position in its index */
4631 static GstFlowReturn
4632 gst_avi_demux_advance (GstAviDemux * avi, GstAviStream * stream,
4633     GstFlowReturn ret)
4634 {
4635   guint old_entry, new_entry;
4636
4637   old_entry = stream->current_entry;
4638   /* move forwards */
4639   new_entry = old_entry + 1;
4640
4641   /* see if we reached the end */
4642   if (new_entry >= stream->stop_entry) {
4643     if (avi->segment.rate < 0.0) {
4644       if (stream->step_entry == stream->start_entry) {
4645         /* we stepped all the way to the start, eos */
4646         GST_DEBUG_OBJECT (avi, "reverse reached start %u", stream->start_entry);
4647         goto eos;
4648       }
4649       /* backwards, stop becomes step, find a new step */
4650       stream->stop_entry = stream->step_entry;
4651       stream->step_entry = gst_avi_demux_index_prev (avi, stream,
4652           stream->stop_entry, TRUE);
4653
4654       GST_DEBUG_OBJECT (avi,
4655           "reverse playback jump: start %u, step %u, stop %u",
4656           stream->start_entry, stream->step_entry, stream->stop_entry);
4657
4658       /* and start from the previous keyframe now */
4659       new_entry = stream->step_entry;
4660     } else {
4661       /* EOS */
4662       GST_DEBUG_OBJECT (avi, "forward reached stop %u", stream->stop_entry);
4663       goto eos;
4664     }
4665   }
4666
4667   if (new_entry != old_entry) {
4668     stream->current_entry = new_entry;
4669     stream->current_total = stream->index[new_entry].total;
4670
4671     if (new_entry == old_entry + 1) {
4672       GST_DEBUG_OBJECT (avi, "moved forwards from %u to %u",
4673           old_entry, new_entry);
4674       /* we simply moved one step forwards, reuse current info */
4675       stream->current_timestamp = stream->current_ts_end;
4676       stream->current_offset = stream->current_offset_end;
4677       gst_avi_demux_get_buffer_info (avi, stream, new_entry,
4678           NULL, &stream->current_ts_end, NULL, &stream->current_offset_end);
4679     } else {
4680       /* we moved DISCONT, full update */
4681       gst_avi_demux_get_buffer_info (avi, stream, new_entry,
4682           &stream->current_timestamp, &stream->current_ts_end,
4683           &stream->current_offset, &stream->current_offset_end);
4684       /* and MARK discont for this stream */
4685       stream->last_flow = GST_FLOW_OK;
4686       stream->discont = TRUE;
4687       GST_DEBUG_OBJECT (avi, "Moved from %u to %u, ts %" GST_TIME_FORMAT
4688           ", ts_end %" GST_TIME_FORMAT ", off %" G_GUINT64_FORMAT
4689           ", off_end %" G_GUINT64_FORMAT, old_entry, new_entry,
4690           GST_TIME_ARGS (stream->current_timestamp),
4691           GST_TIME_ARGS (stream->current_ts_end), stream->current_offset,
4692           stream->current_offset_end);
4693     }
4694   }
4695   return ret;
4696
4697   /* ERROR */
4698 eos:
4699   {
4700     GST_DEBUG_OBJECT (avi, "we are EOS");
4701     /* setting current_timestamp to -1 marks EOS */
4702     stream->current_timestamp = -1;
4703     return GST_FLOW_EOS;
4704   }
4705 }
4706
4707 /* find the stream with the lowest current position when going forwards or with
4708  * the highest position when going backwards, this is the stream
4709  * we should push from next */
4710 static gint
4711 gst_avi_demux_find_next (GstAviDemux * avi, gfloat rate)
4712 {
4713   guint64 min_time, max_time;
4714   guint stream_num, i;
4715
4716   max_time = 0;
4717   min_time = G_MAXUINT64;
4718   stream_num = -1;
4719
4720   for (i = 0; i < avi->num_streams; i++) {
4721     guint64 position;
4722     GstAviStream *stream;
4723
4724     stream = &avi->stream[i];
4725
4726     /* ignore streams that finished */
4727     if (stream->last_flow == GST_FLOW_EOS)
4728       continue;
4729
4730     position = stream->current_timestamp;
4731
4732     /* position of -1 is EOS */
4733     if (position != -1) {
4734       if (rate > 0.0 && position < min_time) {
4735         min_time = position;
4736         stream_num = i;
4737       } else if (rate < 0.0 && position >= max_time) {
4738         max_time = position;
4739         stream_num = i;
4740       }
4741     }
4742   }
4743   return stream_num;
4744 }
4745
4746 static GstFlowReturn
4747 gst_avi_demux_loop_data (GstAviDemux * avi)
4748 {
4749   GstFlowReturn ret = GST_FLOW_OK;
4750   guint stream_num;
4751   GstAviStream *stream;
4752   gboolean processed = FALSE;
4753   GstBuffer *buf;
4754   guint64 offset, size;
4755   GstClockTime timestamp, duration;
4756   guint64 out_offset, out_offset_end;
4757   gboolean keyframe;
4758   GstAviIndexEntry *entry;
4759
4760   do {
4761     stream_num = gst_avi_demux_find_next (avi, avi->segment.rate);
4762
4763     /* all are EOS */
4764     if (G_UNLIKELY (stream_num == -1)) {
4765       GST_DEBUG_OBJECT (avi, "all streams are EOS");
4766       goto eos;
4767     }
4768
4769     /* we have the stream now */
4770     stream = &avi->stream[stream_num];
4771
4772     /* skip streams without pads */
4773     if (!stream->pad) {
4774       GST_DEBUG_OBJECT (avi, "skipping entry from stream %d without pad",
4775           stream_num);
4776       goto next;
4777     }
4778
4779     /* get the timing info for the entry */
4780     timestamp = stream->current_timestamp;
4781     duration = stream->current_ts_end - timestamp;
4782     out_offset = stream->current_offset;
4783     out_offset_end = stream->current_offset_end;
4784
4785     /* get the entry data info */
4786     entry = &stream->index[stream->current_entry];
4787     offset = entry->offset;
4788     size = entry->size;
4789     keyframe = ENTRY_IS_KEYFRAME (entry);
4790
4791     /* skip empty entries */
4792     if (size == 0) {
4793       GST_DEBUG_OBJECT (avi, "Skipping entry %u (%" G_GUINT64_FORMAT ", %p)",
4794           stream->current_entry, size, stream->pad);
4795       goto next;
4796     }
4797
4798     if (avi->segment.rate > 0.0) {
4799       /* only check this for fowards playback for now */
4800       if (keyframe && GST_CLOCK_TIME_IS_VALID (avi->segment.stop)
4801           && (timestamp > avi->segment.stop)) {
4802         goto eos_stop;
4803       }
4804     }
4805
4806     GST_LOG ("reading buffer (size=%" G_GUINT64_FORMAT "), stream %d, pos %"
4807         G_GUINT64_FORMAT " (0x%" G_GINT64_MODIFIER "x), kf %d", size,
4808         stream_num, offset, offset, keyframe);
4809
4810     /* FIXME, check large chunks and cut them up */
4811
4812     /* pull in the data */
4813     buf = NULL;
4814     ret = gst_pad_pull_range (avi->sinkpad, offset, size, &buf);
4815     if (ret != GST_FLOW_OK)
4816       goto pull_failed;
4817
4818     /* check for short buffers, this is EOS as well */
4819     if (gst_buffer_get_size (buf) < size)
4820       goto short_buffer;
4821
4822     /* invert the picture if needed */
4823     buf = gst_avi_demux_invert (stream, buf);
4824
4825     /* mark non-keyframes */
4826     if (keyframe) {
4827       GST_BUFFER_FLAG_UNSET (buf, GST_BUFFER_FLAG_DELTA_UNIT);
4828       GST_BUFFER_PTS (buf) = timestamp;
4829     } else {
4830       GST_BUFFER_FLAG_SET (buf, GST_BUFFER_FLAG_DELTA_UNIT);
4831       GST_BUFFER_PTS (buf) = GST_CLOCK_TIME_NONE;
4832     }
4833     GST_BUFFER_DTS (buf) = timestamp;
4834     GST_BUFFER_DURATION (buf) = duration;
4835     GST_BUFFER_OFFSET (buf) = out_offset;
4836     GST_BUFFER_OFFSET_END (buf) = out_offset_end;
4837
4838     /* mark discont when pending */
4839     if (stream->discont) {
4840       GST_DEBUG_OBJECT (avi, "setting DISCONT flag");
4841       GST_BUFFER_FLAG_SET (buf, GST_BUFFER_FLAG_DISCONT);
4842       stream->discont = FALSE;
4843     }
4844 #if 0
4845     gst_avi_demux_add_assoc (avi, stream, timestamp, offset, keyframe);
4846 #endif
4847
4848     /* update current position in the segment */
4849     avi->segment.position = timestamp;
4850
4851     GST_DEBUG_OBJECT (avi, "Pushing buffer of size %" G_GSIZE_FORMAT ", ts %"
4852         GST_TIME_FORMAT ", dur %" GST_TIME_FORMAT ", off %" G_GUINT64_FORMAT
4853         ", off_end %" G_GUINT64_FORMAT,
4854         gst_buffer_get_size (buf), GST_TIME_ARGS (timestamp),
4855         GST_TIME_ARGS (duration), out_offset, out_offset_end);
4856
4857     ret = gst_pad_push (stream->pad, buf);
4858
4859     /* mark as processed, we increment the frame and byte counters then
4860      * leave the while loop and return the GstFlowReturn */
4861     processed = TRUE;
4862
4863     if (avi->segment.rate < 0) {
4864       if (timestamp > avi->segment.stop && ret == GST_FLOW_EOS) {
4865         /* In reverse playback we can get a GST_FLOW_EOS when
4866          * we are at the end of the segment, so we just need to jump
4867          * back to the previous section. */
4868         GST_DEBUG_OBJECT (avi, "downstream has reached end of segment");
4869         ret = GST_FLOW_OK;
4870       }
4871     }
4872   next:
4873     /* move to next item */
4874     ret = gst_avi_demux_advance (avi, stream, ret);
4875
4876     /* combine flows */
4877     ret = gst_avi_demux_combine_flows (avi, stream, ret);
4878   } while (!processed);
4879
4880 beach:
4881   return ret;
4882
4883   /* special cases */
4884 eos:
4885   {
4886     GST_DEBUG_OBJECT (avi, "No samples left for any streams - EOS");
4887     ret = GST_FLOW_EOS;
4888     goto beach;
4889   }
4890 eos_stop:
4891   {
4892     GST_LOG_OBJECT (avi, "Found keyframe after segment,"
4893         " setting EOS (%" GST_TIME_FORMAT " > %" GST_TIME_FORMAT ")",
4894         GST_TIME_ARGS (timestamp), GST_TIME_ARGS (avi->segment.stop));
4895     ret = GST_FLOW_EOS;
4896     /* move to next stream */
4897     goto next;
4898   }
4899 pull_failed:
4900   {
4901     GST_DEBUG_OBJECT (avi, "pull range failed: pos=%" G_GUINT64_FORMAT
4902         " size=%" G_GUINT64_FORMAT, offset, size);
4903     goto beach;
4904   }
4905 short_buffer:
4906   {
4907     GST_WARNING_OBJECT (avi, "Short read at offset %" G_GUINT64_FORMAT
4908         ", only got %" G_GSIZE_FORMAT "/%" G_GUINT64_FORMAT
4909         " bytes (truncated file?)", offset, gst_buffer_get_size (buf), size);
4910     gst_buffer_unref (buf);
4911     ret = GST_FLOW_EOS;
4912     goto beach;
4913   }
4914 }
4915
4916 /*
4917  * Read data. If we have an index it delegates to
4918  * gst_avi_demux_process_next_entry().
4919  */
4920 static GstFlowReturn
4921 gst_avi_demux_stream_data (GstAviDemux * avi)
4922 {
4923   guint32 tag = 0;
4924   guint32 size = 0;
4925   gint stream_nr = 0;
4926   GstFlowReturn res = GST_FLOW_OK;
4927
4928   if (G_UNLIKELY (avi->have_eos)) {
4929     /* Clean adapter, we're done */
4930     gst_adapter_clear (avi->adapter);
4931     return GST_FLOW_EOS;
4932   }
4933
4934   if (G_UNLIKELY (avi->todrop)) {
4935     guint drop;
4936
4937     if ((drop = gst_adapter_available (avi->adapter))) {
4938       if (drop > avi->todrop)
4939         drop = avi->todrop;
4940       GST_DEBUG_OBJECT (avi, "Dropping %d bytes", drop);
4941       gst_adapter_flush (avi->adapter, drop);
4942       avi->todrop -= drop;
4943       avi->offset += drop;
4944     }
4945   }
4946
4947   /* Iterate until need more data, so adapter won't grow too much */
4948   while (1) {
4949     if (G_UNLIKELY (!gst_avi_demux_peek_chunk_info (avi, &tag, &size))) {
4950       return GST_FLOW_OK;
4951     }
4952
4953     GST_DEBUG ("Trying chunk (%" GST_FOURCC_FORMAT "), size %d",
4954         GST_FOURCC_ARGS (tag), size);
4955
4956     if (G_LIKELY ((tag & 0xff) >= '0' && (tag & 0xff) <= '9' &&
4957             ((tag >> 8) & 0xff) >= '0' && ((tag >> 8) & 0xff) <= '9')) {
4958       GST_LOG ("Chunk ok");
4959     } else if ((tag & 0xffff) == (('x' << 8) | 'i')) {
4960       GST_DEBUG ("Found sub-index tag");
4961       if (gst_avi_demux_peek_chunk (avi, &tag, &size) || size == 0) {
4962         /* accept 0 size buffer here */
4963         avi->abort_buffering = FALSE;
4964         GST_DEBUG ("  skipping %d bytes for now", size);
4965         gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
4966       }
4967       return GST_FLOW_OK;
4968     } else if (tag == GST_RIFF_TAG_RIFF) {
4969       /* RIFF tags can appear in ODML files, just jump over them */
4970       if (gst_adapter_available (avi->adapter) >= 12) {
4971         GST_DEBUG ("Found RIFF tag, skipping RIFF header");
4972         gst_adapter_flush (avi->adapter, 12);
4973         continue;
4974       }
4975       return GST_FLOW_OK;
4976     } else if (tag == GST_RIFF_TAG_idx1) {
4977       GST_DEBUG ("Found index tag");
4978       if (gst_avi_demux_peek_chunk (avi, &tag, &size) || size == 0) {
4979         /* accept 0 size buffer here */
4980         avi->abort_buffering = FALSE;
4981         GST_DEBUG ("  skipping %d bytes for now", size);
4982         gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
4983       }
4984       return GST_FLOW_OK;
4985     } else if (tag == GST_RIFF_TAG_LIST) {
4986       /* movi chunks might be grouped in rec list */
4987       if (gst_adapter_available (avi->adapter) >= 12) {
4988         GST_DEBUG ("Found LIST tag, skipping LIST header");
4989         gst_adapter_flush (avi->adapter, 12);
4990         continue;
4991       }
4992       return GST_FLOW_OK;
4993     } else if (tag == GST_RIFF_TAG_JUNK || tag == GST_RIFF_TAG_JUNQ) {
4994       /* rec list might contain JUNK chunks */
4995       GST_DEBUG ("Found JUNK tag");
4996       if (gst_avi_demux_peek_chunk (avi, &tag, &size) || size == 0) {
4997         /* accept 0 size buffer here */
4998         avi->abort_buffering = FALSE;
4999         GST_DEBUG ("  skipping %d bytes for now", size);
5000         gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
5001       }
5002       return GST_FLOW_OK;
5003     } else {
5004       GST_DEBUG ("No more stream chunks, send EOS");
5005       avi->have_eos = TRUE;
5006       return GST_FLOW_EOS;
5007     }
5008
5009     if (G_UNLIKELY (!gst_avi_demux_peek_chunk (avi, &tag, &size))) {
5010       /* supposedly one hopes to catch a nicer chunk later on ... */
5011       /* FIXME ?? give up here rather than possibly ending up going
5012        * through the whole file */
5013       if (avi->abort_buffering) {
5014         avi->abort_buffering = FALSE;
5015         if (size) {
5016           gst_adapter_flush (avi->adapter, 8);
5017           return GST_FLOW_OK;
5018         }
5019       } else {
5020         return GST_FLOW_OK;
5021       }
5022     }
5023     GST_DEBUG ("chunk ID %" GST_FOURCC_FORMAT ", size %u",
5024         GST_FOURCC_ARGS (tag), size);
5025
5026     stream_nr = CHUNKID_TO_STREAMNR (tag);
5027
5028     if (G_UNLIKELY (stream_nr < 0 || stream_nr >= avi->num_streams)) {
5029       /* recoverable */
5030       GST_WARNING ("Invalid stream ID %d (%" GST_FOURCC_FORMAT ")",
5031           stream_nr, GST_FOURCC_ARGS (tag));
5032       avi->offset += 8 + GST_ROUND_UP_2 (size);
5033       gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
5034     } else {
5035       GstAviStream *stream;
5036       GstClockTime next_ts = 0;
5037       GstBuffer *buf = NULL;
5038 #if 0
5039       guint64 offset;
5040 #endif
5041       gboolean saw_desired_kf = stream_nr != avi->main_stream
5042           || avi->offset >= avi->seek_kf_offset;
5043
5044       if (stream_nr == avi->main_stream && avi->offset == avi->seek_kf_offset) {
5045         GST_DEBUG_OBJECT (avi, "Desired keyframe reached");
5046         avi->seek_kf_offset = 0;
5047       }
5048
5049       if (saw_desired_kf) {
5050         gst_adapter_flush (avi->adapter, 8);
5051         /* get buffer */
5052         if (size) {
5053           buf = gst_adapter_take_buffer (avi->adapter, GST_ROUND_UP_2 (size));
5054           /* patch the size */
5055           gst_buffer_resize (buf, 0, size);
5056         } else {
5057           buf = NULL;
5058         }
5059       } else {
5060         GST_DEBUG_OBJECT (avi,
5061             "Desired keyframe not yet reached, flushing chunk");
5062         gst_adapter_flush (avi->adapter, 8 + GST_ROUND_UP_2 (size));
5063       }
5064
5065 #if 0
5066       offset = avi->offset;
5067 #endif
5068       avi->offset += 8 + GST_ROUND_UP_2 (size);
5069
5070       stream = &avi->stream[stream_nr];
5071
5072       /* set delay (if any)
5073          if (stream->strh->init_frames == stream->current_frame &&
5074          stream->delay == 0)
5075          stream->delay = next_ts;
5076        */
5077
5078       /* parsing of corresponding header may have failed */
5079       if (G_UNLIKELY (!stream->pad)) {
5080         GST_WARNING_OBJECT (avi, "no pad for stream ID %" GST_FOURCC_FORMAT,
5081             GST_FOURCC_ARGS (tag));
5082         if (buf)
5083           gst_buffer_unref (buf);
5084       } else {
5085         /* get time of this buffer */
5086         gst_pad_query_position (stream->pad, GST_FORMAT_TIME,
5087             (gint64 *) & next_ts);
5088
5089 #if 0
5090         gst_avi_demux_add_assoc (avi, stream, next_ts, offset, FALSE);
5091 #endif
5092
5093         /* increment our positions */
5094         stream->current_entry++;
5095         stream->current_total += size;
5096
5097         /* update current position in the segment */
5098         avi->segment.position = next_ts;
5099
5100         if (saw_desired_kf && buf) {
5101           GstClockTime dur_ts = 0;
5102
5103           /* invert the picture if needed */
5104           buf = gst_avi_demux_invert (stream, buf);
5105
5106           gst_pad_query_position (stream->pad, GST_FORMAT_TIME,
5107               (gint64 *) & dur_ts);
5108
5109           GST_BUFFER_DTS (buf) = next_ts;
5110           GST_BUFFER_PTS (buf) = GST_CLOCK_TIME_NONE;
5111           GST_BUFFER_DURATION (buf) = dur_ts - next_ts;
5112           if (stream->strh->type == GST_RIFF_FCC_vids) {
5113             GST_BUFFER_OFFSET (buf) = stream->current_entry - 1;
5114             GST_BUFFER_OFFSET_END (buf) = stream->current_entry;
5115           } else {
5116             GST_BUFFER_OFFSET (buf) = GST_BUFFER_OFFSET_NONE;
5117             GST_BUFFER_OFFSET_END (buf) = GST_BUFFER_OFFSET_NONE;
5118           }
5119
5120           GST_DEBUG_OBJECT (avi,
5121               "Pushing buffer with time=%" GST_TIME_FORMAT ", duration %"
5122               GST_TIME_FORMAT ", offset %" G_GUINT64_FORMAT
5123               " and size %d over pad %s", GST_TIME_ARGS (next_ts),
5124               GST_TIME_ARGS (GST_BUFFER_DURATION (buf)),
5125               GST_BUFFER_OFFSET (buf), size, GST_PAD_NAME (stream->pad));
5126
5127           /* mark discont when pending */
5128           if (G_UNLIKELY (stream->discont)) {
5129             GST_DEBUG_OBJECT (avi, "Setting DISCONT");
5130             GST_BUFFER_FLAG_SET (buf, GST_BUFFER_FLAG_DISCONT);
5131             stream->discont = FALSE;
5132           }
5133           res = gst_pad_push (stream->pad, buf);
5134           buf = NULL;
5135
5136           /* combine flows */
5137           res = gst_avi_demux_combine_flows (avi, stream, res);
5138           if (G_UNLIKELY (res != GST_FLOW_OK)) {
5139             GST_DEBUG ("Push failed; %s", gst_flow_get_name (res));
5140             return res;
5141           }
5142         }
5143       }
5144     }
5145   }
5146
5147   return res;
5148 }
5149
5150 /*
5151  * Send pending tags.
5152  */
5153 static void
5154 push_tag_lists (GstAviDemux * avi)
5155 {
5156   guint i;
5157   GstTagList *tags;
5158
5159   if (!avi->got_tags)
5160     return;
5161
5162   GST_DEBUG_OBJECT (avi, "Pushing pending tag lists");
5163
5164   for (i = 0; i < avi->num_streams; i++) {
5165     GstAviStream *stream = &avi->stream[i];
5166     GstPad *pad = stream->pad;
5167
5168     tags = stream->taglist;
5169
5170     if (pad && tags) {
5171       GST_DEBUG_OBJECT (pad, "Tags: %" GST_PTR_FORMAT, tags);
5172
5173       gst_pad_push_event (pad, gst_event_new_tag (tags));
5174       stream->taglist = NULL;
5175     }
5176   }
5177
5178   if (!(tags = avi->globaltags))
5179     tags = gst_tag_list_new_empty ();
5180
5181   gst_tag_list_add (tags, GST_TAG_MERGE_REPLACE,
5182       GST_TAG_CONTAINER_FORMAT, "AVI", NULL);
5183
5184   GST_DEBUG_OBJECT (avi, "Global tags: %" GST_PTR_FORMAT, tags);
5185   gst_tag_list_set_scope (tags, GST_TAG_SCOPE_GLOBAL);
5186   gst_avi_demux_push_event (avi, gst_event_new_tag (tags));
5187   avi->globaltags = NULL;
5188   avi->got_tags = FALSE;
5189 }
5190
5191 static void
5192 gst_avi_demux_loop (GstPad * pad)
5193 {
5194   GstFlowReturn res;
5195   GstAviDemux *avi = GST_AVI_DEMUX (GST_PAD_PARENT (pad));
5196
5197   switch (avi->state) {
5198     case GST_AVI_DEMUX_START:
5199       res = gst_avi_demux_stream_init_pull (avi);
5200       if (G_UNLIKELY (res != GST_FLOW_OK)) {
5201         GST_WARNING ("stream_init flow: %s", gst_flow_get_name (res));
5202         goto pause;
5203       }
5204       avi->state = GST_AVI_DEMUX_HEADER;
5205       /* fall-through */
5206     case GST_AVI_DEMUX_HEADER:
5207       res = gst_avi_demux_stream_header_pull (avi);
5208       if (G_UNLIKELY (res != GST_FLOW_OK)) {
5209         GST_WARNING ("stream_header flow: %s", gst_flow_get_name (res));
5210         goto pause;
5211       }
5212       avi->state = GST_AVI_DEMUX_MOVI;
5213       break;
5214     case GST_AVI_DEMUX_MOVI:
5215       if (G_UNLIKELY (avi->seg_event)) {
5216         gst_avi_demux_push_event (avi, avi->seg_event);
5217         avi->seg_event = NULL;
5218       }
5219       if (G_UNLIKELY (avi->got_tags)) {
5220         push_tag_lists (avi);
5221       }
5222       /* process each index entry in turn */
5223       res = gst_avi_demux_loop_data (avi);
5224
5225       /* pause when error */
5226       if (G_UNLIKELY (res != GST_FLOW_OK)) {
5227         GST_INFO ("stream_movi flow: %s", gst_flow_get_name (res));
5228         goto pause;
5229       }
5230       break;
5231     default:
5232       GST_ERROR_OBJECT (avi, "unknown state %d", avi->state);
5233       res = GST_FLOW_ERROR;
5234       goto pause;
5235   }
5236
5237   return;
5238
5239   /* ERRORS */
5240 pause:{
5241
5242     gboolean push_eos = FALSE;
5243     GST_LOG_OBJECT (avi, "pausing task, reason %s", gst_flow_get_name (res));
5244     gst_pad_pause_task (avi->sinkpad);
5245
5246     if (res == GST_FLOW_EOS) {
5247       /* handle end-of-stream/segment */
5248       /* so align our position with the end of it, if there is one
5249        * this ensures a subsequent will arrive at correct base/acc time */
5250       if (avi->segment.rate > 0.0 &&
5251           GST_CLOCK_TIME_IS_VALID (avi->segment.stop))
5252         avi->segment.position = avi->segment.stop;
5253       else if (avi->segment.rate < 0.0)
5254         avi->segment.position = avi->segment.start;
5255       if (avi->segment.flags & GST_SEEK_FLAG_SEGMENT) {
5256         gint64 stop;
5257
5258         if ((stop = avi->segment.stop) == -1)
5259           stop = avi->segment.duration;
5260
5261         GST_INFO_OBJECT (avi, "sending segment_done");
5262
5263         gst_element_post_message
5264             (GST_ELEMENT_CAST (avi),
5265             gst_message_new_segment_done (GST_OBJECT_CAST (avi),
5266                 GST_FORMAT_TIME, stop));
5267         gst_avi_demux_push_event (avi,
5268             gst_event_new_segment_done (GST_FORMAT_TIME, stop));
5269       } else {
5270         push_eos = TRUE;
5271       }
5272     } else if (res == GST_FLOW_NOT_LINKED || res < GST_FLOW_EOS) {
5273       /* for fatal errors we post an error message, wrong-state is
5274        * not fatal because it happens due to flushes and only means
5275        * that we should stop now. */
5276       GST_ELEMENT_ERROR (avi, STREAM, FAILED,
5277           (_("Internal data stream error.")),
5278           ("streaming stopped, reason %s", gst_flow_get_name (res)));
5279       push_eos = TRUE;
5280     }
5281     if (push_eos) {
5282       GST_INFO_OBJECT (avi, "sending eos");
5283       if (!gst_avi_demux_push_event (avi, gst_event_new_eos ()) &&
5284           (res == GST_FLOW_EOS)) {
5285         GST_ELEMENT_ERROR (avi, STREAM, DEMUX,
5286             (NULL), ("got eos but no streams (yet)"));
5287       }
5288     }
5289   }
5290 }
5291
5292
5293 static GstFlowReturn
5294 gst_avi_demux_chain (GstPad * pad, GstObject * parent, GstBuffer * buf)
5295 {
5296   GstFlowReturn res;
5297   GstAviDemux *avi = GST_AVI_DEMUX (parent);
5298   gint i;
5299
5300   if (GST_BUFFER_IS_DISCONT (buf)) {
5301     GST_DEBUG_OBJECT (avi, "got DISCONT");
5302     gst_adapter_clear (avi->adapter);
5303     /* mark all streams DISCONT */
5304     for (i = 0; i < avi->num_streams; i++)
5305       avi->stream[i].discont = TRUE;
5306   }
5307
5308   GST_DEBUG ("Store %" G_GSIZE_FORMAT " bytes in adapter",
5309       gst_buffer_get_size (buf));
5310   gst_adapter_push (avi->adapter, buf);
5311
5312   switch (avi->state) {
5313     case GST_AVI_DEMUX_START:
5314       if ((res = gst_avi_demux_stream_init_push (avi)) != GST_FLOW_OK) {
5315         GST_WARNING ("stream_init flow: %s", gst_flow_get_name (res));
5316         break;
5317       }
5318       break;
5319     case GST_AVI_DEMUX_HEADER:
5320       if ((res = gst_avi_demux_stream_header_push (avi)) != GST_FLOW_OK) {
5321         GST_WARNING ("stream_header flow: %s", gst_flow_get_name (res));
5322         break;
5323       }
5324       break;
5325     case GST_AVI_DEMUX_MOVI:
5326       if (G_UNLIKELY (avi->seg_event)) {
5327         gst_avi_demux_push_event (avi, avi->seg_event);
5328         avi->seg_event = NULL;
5329       }
5330       if (G_UNLIKELY (avi->got_tags)) {
5331         push_tag_lists (avi);
5332       }
5333       res = gst_avi_demux_stream_data (avi);
5334       break;
5335     case GST_AVI_DEMUX_SEEK:
5336     {
5337       GstEvent *event;
5338
5339       res = GST_FLOW_OK;
5340
5341       /* obtain and parse indexes */
5342       if (avi->stream[0].indexes && !gst_avi_demux_read_subindexes_push (avi))
5343         /* seek in subindex read function failed */
5344         goto index_failed;
5345
5346       if (!avi->stream[0].indexes && !avi->have_index
5347           && avi->avih->flags & GST_RIFF_AVIH_HASINDEX)
5348         gst_avi_demux_stream_index_push (avi);
5349
5350       if (avi->have_index) {
5351         /* use the indexes now to construct nice durations */
5352         gst_avi_demux_calculate_durations_from_index (avi);
5353       } else {
5354         /* still parsing indexes */
5355         break;
5356       }
5357
5358       GST_OBJECT_LOCK (avi);
5359       event = avi->seek_event;
5360       avi->seek_event = NULL;
5361       GST_OBJECT_UNLOCK (avi);
5362
5363       /* calculate and perform seek */
5364       if (!avi_demux_handle_seek_push (avi, avi->sinkpad, event))
5365         goto seek_failed;
5366
5367       gst_event_unref (event);
5368       avi->state = GST_AVI_DEMUX_MOVI;
5369       break;
5370     }
5371     default:
5372       GST_ELEMENT_ERROR (avi, STREAM, FAILED, (NULL),
5373           ("Illegal internal state"));
5374       res = GST_FLOW_ERROR;
5375       break;
5376   }
5377
5378   GST_DEBUG_OBJECT (avi, "state: %d res:%s", avi->state,
5379       gst_flow_get_name (res));
5380
5381   if (G_UNLIKELY (avi->abort_buffering))
5382     goto abort_buffering;
5383
5384   return res;
5385
5386   /* ERRORS */
5387 index_failed:
5388   {
5389     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("failed to read indexes"));
5390     return GST_FLOW_ERROR;
5391   }
5392 seek_failed:
5393   {
5394     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("push mode seek failed"));
5395     return GST_FLOW_ERROR;
5396   }
5397 abort_buffering:
5398   {
5399     avi->abort_buffering = FALSE;
5400     GST_ELEMENT_ERROR (avi, STREAM, DEMUX, (NULL), ("unhandled buffer size"));
5401     return GST_FLOW_ERROR;
5402   }
5403 }
5404
5405 static gboolean
5406 gst_avi_demux_sink_activate (GstPad * sinkpad, GstObject * parent)
5407 {
5408   GstQuery *query;
5409   gboolean pull_mode;
5410
5411   query = gst_query_new_scheduling ();
5412
5413   if (!gst_pad_peer_query (sinkpad, query)) {
5414     gst_query_unref (query);
5415     goto activate_push;
5416   }
5417
5418   pull_mode = gst_query_has_scheduling_mode_with_flags (query,
5419       GST_PAD_MODE_PULL, GST_SCHEDULING_FLAG_SEEKABLE);
5420   gst_query_unref (query);
5421
5422   if (!pull_mode)
5423     goto activate_push;
5424
5425   GST_DEBUG_OBJECT (sinkpad, "activating pull");
5426   return gst_pad_activate_mode (sinkpad, GST_PAD_MODE_PULL, TRUE);
5427
5428 activate_push:
5429   {
5430     GST_DEBUG_OBJECT (sinkpad, "activating push");
5431     return gst_pad_activate_mode (sinkpad, GST_PAD_MODE_PUSH, TRUE);
5432   }
5433 }
5434
5435 static gboolean
5436 gst_avi_demux_sink_activate_mode (GstPad * sinkpad, GstObject * parent,
5437     GstPadMode mode, gboolean active)
5438 {
5439   gboolean res;
5440   GstAviDemux *avi = GST_AVI_DEMUX (parent);
5441
5442   switch (mode) {
5443     case GST_PAD_MODE_PULL:
5444       if (active) {
5445         avi->streaming = FALSE;
5446         res = gst_pad_start_task (sinkpad, (GstTaskFunction) gst_avi_demux_loop,
5447             sinkpad, NULL);
5448       } else {
5449         res = gst_pad_stop_task (sinkpad);
5450       }
5451       break;
5452     case GST_PAD_MODE_PUSH:
5453       if (active) {
5454         GST_DEBUG ("avi: activating push/chain function");
5455         avi->streaming = TRUE;
5456       } else {
5457         GST_DEBUG ("avi: deactivating push/chain function");
5458       }
5459       res = TRUE;
5460       break;
5461     default:
5462       res = FALSE;
5463       break;
5464   }
5465   return res;
5466 }
5467
5468 #if 0
5469 static void
5470 gst_avi_demux_set_index (GstElement * element, GstIndex * index)
5471 {
5472   GstAviDemux *avi = GST_AVI_DEMUX (element);
5473
5474   GST_OBJECT_LOCK (avi);
5475   if (avi->element_index)
5476     gst_object_unref (avi->element_index);
5477   if (index) {
5478     avi->element_index = gst_object_ref (index);
5479   } else {
5480     avi->element_index = NULL;
5481   }
5482   GST_OBJECT_UNLOCK (avi);
5483   /* object lock might be taken again */
5484   if (index)
5485     gst_index_get_writer_id (index, GST_OBJECT_CAST (element), &avi->index_id);
5486   GST_DEBUG_OBJECT (avi, "Set index %" GST_PTR_FORMAT, avi->element_index);
5487 }
5488
5489 static GstIndex *
5490 gst_avi_demux_get_index (GstElement * element)
5491 {
5492   GstIndex *result = NULL;
5493   GstAviDemux *avi = GST_AVI_DEMUX (element);
5494
5495   GST_OBJECT_LOCK (avi);
5496   if (avi->element_index)
5497     result = gst_object_ref (avi->element_index);
5498   GST_OBJECT_UNLOCK (avi);
5499
5500   GST_DEBUG_OBJECT (avi, "Returning index %" GST_PTR_FORMAT, result);
5501
5502   return result;
5503 }
5504 #endif
5505
5506 static GstStateChangeReturn
5507 gst_avi_demux_change_state (GstElement * element, GstStateChange transition)
5508 {
5509   GstStateChangeReturn ret;
5510   GstAviDemux *avi = GST_AVI_DEMUX (element);
5511
5512   switch (transition) {
5513     case GST_STATE_CHANGE_READY_TO_PAUSED:
5514       avi->streaming = FALSE;
5515       gst_segment_init (&avi->segment, GST_FORMAT_TIME);
5516       break;
5517     default:
5518       break;
5519   }
5520
5521   ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
5522   if (ret == GST_STATE_CHANGE_FAILURE)
5523     goto done;
5524
5525   switch (transition) {
5526     case GST_STATE_CHANGE_PAUSED_TO_READY:
5527       avi->have_index = FALSE;
5528       gst_avi_demux_reset (avi);
5529       break;
5530     default:
5531       break;
5532   }
5533
5534 done:
5535   return ret;
5536 }