AUTHORS: Add me to the authors file
[platform/upstream/gst-plugins-good.git] / ext / dv / gstdvdec.c
1 /* GStreamer
2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Library General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Library General Public License for more details.
13  *
14  * You should have received a copy of the GNU Library General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23 #include <string.h>
24
25 /* First, include the header file for the plugin, to bring in the
26  * object definition and other useful things.
27  */
28 #include "gstdvdec.h"
29
30 #define NTSC_HEIGHT 480
31 #define NTSC_BUFFER 120000
32 #define NTSC_FRAMERATE 29.997
33
34 #define PAL_HEIGHT 576
35 #define PAL_BUFFER 144000
36 #define PAL_FRAMERATE 25.0
37
38 /* The ElementDetails structure gives a human-readable description
39  * of the plugin, as well as author and version data.
40  */
41 static GstElementDetails dvdec_details =
42 GST_ELEMENT_DETAILS ("DV (smpte314) decoder plugin",
43     "Codec/Decoder/Video",
44     "Uses libdv to decode DV video (libdv.sourceforge.net)",
45     "Erik Walthinsen <omega@cse.ogi.edu>\n" "Wim Taymans <wim.taymans@tvd.be>");
46
47
48 /* These are the signals that this element can fire.  They are zero-
49  * based because the numbers themselves are private to the object.
50  * LAST_SIGNAL is used for initialization of the signal array.
51  */
52 enum
53 {
54   /* FILL ME */
55   LAST_SIGNAL
56 };
57
58 /* Arguments are identified the same way, but cannot be zero, so you
59  * must leave the ARG_0 entry in as a placeholder.
60  */
61 enum
62 {
63   ARG_0,
64   ARG_CLAMP_LUMA,
65   ARG_CLAMP_CHROMA,
66   ARG_QUALITY
67       /* FILL ME */
68 };
69
70 const gint qualities[] = {
71   DV_QUALITY_DC,
72   DV_QUALITY_AC_1,
73   DV_QUALITY_AC_2,
74   DV_QUALITY_DC | DV_QUALITY_COLOR,
75   DV_QUALITY_AC_1 | DV_QUALITY_COLOR,
76   DV_QUALITY_AC_2 | DV_QUALITY_COLOR
77 };
78
79 #define DV_QUALITY_DEFAULT 5
80
81 /* The PadFactory structures describe what pads the element has or
82  * can have.  They can be quite complex, but for this dvdec plugin
83  * they are rather simple.
84  */
85 static GstStaticPadTemplate sink_temp = GST_STATIC_PAD_TEMPLATE ("sink",
86     GST_PAD_SINK,
87     GST_PAD_ALWAYS,
88     GST_STATIC_CAPS ("video/x-dv, systemstream = (boolean) true")
89     );
90
91 static GstStaticPadTemplate video_src_temp = GST_STATIC_PAD_TEMPLATE ("video",
92     GST_PAD_SRC,
93     GST_PAD_ALWAYS,
94     GST_STATIC_CAPS ("video/x-raw-yuv, "
95         "format = (fourcc) YUY2, "
96         "width = (int) 720, "
97         "height = (int) { "
98         G_STRINGIFY (NTSC_HEIGHT) ", " G_STRINGIFY (PAL_HEIGHT)
99         " }, "
100         "framerate = (double) { "
101         G_STRINGIFY (PAL_FRAMERATE) ", " G_STRINGIFY (NTSC_FRAMERATE)
102         " }; "
103         "video/x-raw-rgb, "
104         "bpp = (int) 32, "
105         "depth = (int) 32, "
106         "endianness = (int) " G_STRINGIFY (G_BIG_ENDIAN) ", "
107         "red_mask =   (int) 0x00ff0000, "
108         "green_mask = (int) 0x0000ff00, "
109         "blue_mask =  (int) 0x000000ff, "
110         "width = (int) 720, "
111         "height = (int) { "
112         G_STRINGIFY (NTSC_HEIGHT) ", " G_STRINGIFY (PAL_HEIGHT)
113         " }, "
114         "framerate = (double) { "
115         G_STRINGIFY (PAL_FRAMERATE) ", " G_STRINGIFY (NTSC_FRAMERATE)
116         " }; "
117         "video/x-raw-rgb, "
118         "bpp = (int) 24, "
119         "depth = (int) 24, "
120         "endianness = (int) " G_STRINGIFY (G_BIG_ENDIAN) ", "
121         "red_mask =   (int) 0x00ff0000, "
122         "green_mask = (int) 0x0000ff00, "
123         "blue_mask =  (int) 0x000000ff, "
124         "width = (int) 720, "
125         "height = (int) { "
126         G_STRINGIFY (NTSC_HEIGHT) ", " G_STRINGIFY (PAL_HEIGHT)
127         " }, "
128         "framerate = (double) { "
129         G_STRINGIFY (PAL_FRAMERATE) ", " G_STRINGIFY (NTSC_FRAMERATE)
130         " }")
131     );
132
133 static GstStaticPadTemplate audio_src_temp = GST_STATIC_PAD_TEMPLATE ("audio",
134     GST_PAD_SRC,
135     GST_PAD_ALWAYS,
136     GST_STATIC_CAPS ("audio/x-raw-int, "
137         "depth = (int) 16, "
138         "width = (int) 16, "
139         "signed = (boolean) TRUE, "
140         "channels = (int) 2, "
141         "endianness = (int) " G_STRINGIFY (G_LITTLE_ENDIAN) ", "
142         "rate = (int) [ 4000, 48000 ]")
143     );
144
145 #define GST_TYPE_DVDEC_QUALITY (gst_dvdec_quality_get_type())
146 GType
147 gst_dvdec_quality_get_type (void)
148 {
149   static GType qtype = 0;
150
151   if (qtype == 0) {
152     static const GEnumValue values[] = {
153       {0, "DV_QUALITY_FASTEST", "Fastest decoding, low-quality mono"},
154       {1, "DV_QUALITY_AC_1", "Mono decoding using the first AC coefficient"},
155       {2, "DV_QUALITY_AC_2", "Highest quality mono decoding"},
156       {3, "DV_QUALITY_DC|DV_QUALITY_COLOUR", "Fastest colour decoding"},
157       {4, "DV_QUALITY_AC_1|DV_QUALITY_COLOUR",
158           "Colour, using only the first AC coefficient"},
159       {5, "DV_QUALITY_BEST", "Highest quality colour decoding"},
160       {0, NULL, NULL},
161     };
162
163     qtype = g_enum_register_static ("GstDVDecQualityEnum", values);
164   }
165   return qtype;
166 }
167
168 /* A number of functon prototypes are given so we can refer to them later. */
169 static void gst_dvdec_base_init (gpointer g_class);
170 static void gst_dvdec_class_init (GstDVDecClass * klass);
171 static void gst_dvdec_init (GstDVDec * dvdec);
172
173 static const GstQueryType *gst_dvdec_get_src_query_types (GstPad * pad);
174 static gboolean gst_dvdec_src_query (GstPad * pad, GstQueryType type,
175     GstFormat * format, gint64 * value);
176 static const GstFormat *gst_dvdec_get_formats (GstPad * pad);
177 static gboolean gst_dvdec_sink_convert (GstPad * pad, GstFormat src_format,
178     gint64 src_value, GstFormat * dest_format, gint64 * dest_value);
179 static gboolean gst_dvdec_src_convert (GstPad * pad, GstFormat src_format,
180     gint64 src_value, GstFormat * dest_format, gint64 * dest_value);
181
182 static GstPadLinkReturn gst_dvdec_video_link (GstPad * pad,
183     const GstCaps * caps);
184 static GstCaps *gst_dvdec_video_getcaps (GstPad * pad);
185
186 static const GstEventMask *gst_dvdec_get_event_masks (GstPad * pad);
187 static gboolean gst_dvdec_handle_src_event (GstPad * pad, GstEvent * event);
188
189 static void gst_dvdec_loop (GstElement * element);
190
191 static GstElementStateReturn gst_dvdec_change_state (GstElement * element);
192
193 static void gst_dvdec_set_property (GObject * object, guint prop_id,
194     const GValue * value, GParamSpec * pspec);
195 static void gst_dvdec_get_property (GObject * object, guint prop_id,
196     GValue * value, GParamSpec * pspec);
197
198 /* The parent class pointer needs to be kept around for some object
199  * operations.
200  */
201 static GstElementClass *parent_class = NULL;
202
203 /* This array holds the ids of the signals registered for this object.
204  * The array indexes are based on the enum up above.
205  */
206 /*static guint gst_dvdec_signals[LAST_SIGNAL] = { 0 }; */
207
208 /* This function is used to register and subsequently return the type
209  * identifier for this object class.  On first invocation, it will
210  * register the type, providing the name of the class, struct sizes,
211  * and pointers to the various functions that define the class.
212  */
213 GType
214 gst_dvdec_get_type (void)
215 {
216   static GType dvdec_type = 0;
217
218   if (!dvdec_type) {
219     static const GTypeInfo dvdec_info = {
220       sizeof (GstDVDecClass),
221       gst_dvdec_base_init,
222       NULL,
223       (GClassInitFunc) gst_dvdec_class_init,
224       NULL,
225       NULL,
226       sizeof (GstDVDec),
227       0,
228       (GInstanceInitFunc) gst_dvdec_init,
229     };
230
231     dvdec_type =
232         g_type_register_static (GST_TYPE_ELEMENT, "GstDVDec", &dvdec_info, 0);
233   }
234   return dvdec_type;
235 }
236
237 static void
238 gst_dvdec_base_init (gpointer g_class)
239 {
240   GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
241
242   /* The pad templates can be easily generated from the factories above,
243    * and then added to the list of padtemplates for the elementfactory.
244    * Note that the generated padtemplates are stored in static global
245    * variables, for the gst_dvdec_init function to use later on.
246    */
247   gst_element_class_add_pad_template (element_class,
248       gst_static_pad_template_get (&sink_temp));
249   gst_element_class_add_pad_template (element_class,
250       gst_static_pad_template_get (&video_src_temp));
251   gst_element_class_add_pad_template (element_class,
252       gst_static_pad_template_get (&audio_src_temp));
253
254   gst_element_class_set_details (element_class, &dvdec_details);
255 }
256
257 /* In order to create an instance of an object, the class must be
258  * initialized by this function.  GObject will take care of running
259  * it, based on the pointer to the function provided above.
260  */
261 static void
262 gst_dvdec_class_init (GstDVDecClass * klass)
263 {
264   /* Class pointers are needed to supply pointers to the private
265    * implementations of parent class methods.
266    */
267   GObjectClass *gobject_class;
268   GstElementClass *gstelement_class;
269
270   /* Since the dvdec class contains the parent classes, you can simply
271    * cast the pointer to get access to the parent classes.
272    */
273   gobject_class = (GObjectClass *) klass;
274   gstelement_class = (GstElementClass *) klass;
275
276   /* The parent class is needed for class method overrides. */
277   parent_class = g_type_class_ref (GST_TYPE_ELEMENT);
278
279   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_CLAMP_LUMA,
280       g_param_spec_boolean ("clamp_luma", "Clamp luma", "Clamp luma",
281           FALSE, G_PARAM_READWRITE));
282   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_CLAMP_CHROMA,
283       g_param_spec_boolean ("clamp_chroma", "Clamp chroma", "Clamp chroma",
284           FALSE, G_PARAM_READWRITE));
285   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_QUALITY,
286       g_param_spec_enum ("quality", "Quality", "Decoding quality",
287           GST_TYPE_DVDEC_QUALITY, DV_QUALITY_DEFAULT, G_PARAM_READWRITE));
288
289   gobject_class->set_property = gst_dvdec_set_property;
290   gobject_class->get_property = gst_dvdec_get_property;
291
292   gstelement_class->change_state = gst_dvdec_change_state;
293
294   /* table initialization, only do once */
295   dv_init (0, 0);
296 }
297
298 /* This function is responsible for initializing a specific instance of
299  * the plugin.
300  */
301 static void
302 gst_dvdec_init (GstDVDec * dvdec)
303 {
304   gint i;
305
306   dvdec->found_header = FALSE;
307
308   dvdec->sinkpad =
309       gst_pad_new_from_template (gst_static_pad_template_get (&sink_temp),
310       "sink");
311   gst_pad_set_query_function (dvdec->sinkpad, NULL);
312   gst_pad_set_convert_function (dvdec->sinkpad,
313       GST_DEBUG_FUNCPTR (gst_dvdec_sink_convert));
314   gst_pad_set_formats_function (dvdec->sinkpad,
315       GST_DEBUG_FUNCPTR (gst_dvdec_get_formats));
316   gst_element_add_pad (GST_ELEMENT (dvdec), dvdec->sinkpad);
317
318   dvdec->videosrcpad =
319       gst_pad_new_from_template (gst_static_pad_template_get (&video_src_temp),
320       "video");
321   gst_pad_set_query_function (dvdec->videosrcpad,
322       GST_DEBUG_FUNCPTR (gst_dvdec_src_query));
323   gst_pad_set_query_type_function (dvdec->videosrcpad,
324       GST_DEBUG_FUNCPTR (gst_dvdec_get_src_query_types));
325   gst_pad_set_event_function (dvdec->videosrcpad,
326       GST_DEBUG_FUNCPTR (gst_dvdec_handle_src_event));
327   gst_pad_set_event_mask_function (dvdec->videosrcpad,
328       GST_DEBUG_FUNCPTR (gst_dvdec_get_event_masks));
329   gst_pad_set_convert_function (dvdec->videosrcpad,
330       GST_DEBUG_FUNCPTR (gst_dvdec_src_convert));
331   gst_pad_set_formats_function (dvdec->videosrcpad,
332       GST_DEBUG_FUNCPTR (gst_dvdec_get_formats));
333   gst_pad_set_getcaps_function (dvdec->videosrcpad,
334       GST_DEBUG_FUNCPTR (gst_dvdec_video_getcaps));
335   gst_pad_set_link_function (dvdec->videosrcpad,
336       GST_DEBUG_FUNCPTR (gst_dvdec_video_link));
337   gst_element_add_pad (GST_ELEMENT (dvdec), dvdec->videosrcpad);
338
339   dvdec->audiosrcpad =
340       gst_pad_new_from_template (gst_static_pad_template_get (&audio_src_temp),
341       "audio");
342   gst_pad_set_query_function (dvdec->audiosrcpad,
343       GST_DEBUG_FUNCPTR (gst_dvdec_src_query));
344   gst_pad_set_query_type_function (dvdec->audiosrcpad,
345       GST_DEBUG_FUNCPTR (gst_dvdec_get_src_query_types));
346   gst_pad_set_event_function (dvdec->audiosrcpad,
347       GST_DEBUG_FUNCPTR (gst_dvdec_handle_src_event));
348   gst_pad_set_event_mask_function (dvdec->audiosrcpad,
349       GST_DEBUG_FUNCPTR (gst_dvdec_get_event_masks));
350   gst_pad_set_convert_function (dvdec->audiosrcpad,
351       GST_DEBUG_FUNCPTR (gst_dvdec_src_convert));
352   gst_pad_set_formats_function (dvdec->audiosrcpad,
353       GST_DEBUG_FUNCPTR (gst_dvdec_get_formats));
354   gst_pad_use_explicit_caps (dvdec->audiosrcpad);
355   gst_element_add_pad (GST_ELEMENT (dvdec), dvdec->audiosrcpad);
356
357   gst_element_set_loop_function (GST_ELEMENT (dvdec), gst_dvdec_loop);
358
359   dvdec->bs = NULL;
360   dvdec->length = 0;
361   dvdec->next_ts = 0LL;
362   dvdec->end_position = -1LL;
363   dvdec->need_discont = FALSE;
364   dvdec->new_media = FALSE;
365   dvdec->framerate = 0;
366   dvdec->height = 0;
367   dvdec->frequency = 0;
368   dvdec->channels = 0;
369
370   dvdec->clamp_luma = FALSE;
371   dvdec->clamp_chroma = FALSE;
372   dvdec->quality = DV_QUALITY_BEST;
373   dvdec->loop = FALSE;
374
375   for (i = 0; i < 4; i++) {
376     dvdec->audio_buffers[i] =
377         (gint16 *) g_malloc (DV_AUDIO_MAX_SAMPLES * sizeof (gint16));
378   }
379 }
380
381 static const GstFormat *
382 gst_dvdec_get_formats (GstPad * pad)
383 {
384   static const GstFormat src_formats[] = {
385     GST_FORMAT_BYTES,
386     GST_FORMAT_DEFAULT,
387     GST_FORMAT_TIME,
388     0
389   };
390   static const GstFormat sink_formats[] = {
391     GST_FORMAT_BYTES,
392     GST_FORMAT_TIME,
393     GST_FORMAT_DEFAULT,
394     0
395   };
396
397   return (GST_PAD_IS_SRC (pad) ? src_formats : sink_formats);
398 }
399
400 static gboolean
401 gst_dvdec_src_convert (GstPad * pad, GstFormat src_format, gint64 src_value,
402     GstFormat * dest_format, gint64 * dest_value)
403 {
404   gboolean res = TRUE;
405   GstDVDec *dvdec;
406
407   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
408   if (dvdec->length == 0)
409     return FALSE;
410
411   if (dvdec->decoder == NULL)
412     return FALSE;
413
414   switch (src_format) {
415     case GST_FORMAT_BYTES:
416       switch (*dest_format) {
417         case GST_FORMAT_BYTES:
418           *dest_value = src_value;
419           break;
420         case GST_FORMAT_DEFAULT:
421         case GST_FORMAT_TIME:
422           *dest_format = GST_FORMAT_TIME;
423           if (pad == dvdec->videosrcpad)
424             *dest_value = src_value * GST_SECOND /
425                 (720 * dvdec->height * dvdec->bpp * dvdec->framerate /
426                 GST_SECOND);
427           else if (pad == dvdec->audiosrcpad)
428             *dest_value = src_value * GST_SECOND /
429                 (2 * dvdec->frequency * dvdec->channels);
430           break;
431         default:
432           res = FALSE;
433       }
434       break;
435     case GST_FORMAT_TIME:
436       switch (*dest_format) {
437         case GST_FORMAT_BYTES:
438           if (pad == dvdec->videosrcpad)
439             *dest_value = src_value * 720 * dvdec->height * dvdec->bpp *
440                 dvdec->framerate / GST_SECOND;
441           else if (pad == dvdec->audiosrcpad)
442             *dest_value = 2 * src_value * dvdec->frequency *
443                 dvdec->channels / GST_SECOND;
444           break;
445         case GST_FORMAT_TIME:
446         case GST_FORMAT_DEFAULT:
447           *dest_format = GST_FORMAT_TIME;
448           *dest_value = src_value;
449           break;
450         default:
451           res = FALSE;
452       }
453       break;
454     default:
455       res = FALSE;
456   }
457   return res;
458 }
459
460 static gboolean
461 gst_dvdec_sink_convert (GstPad * pad, GstFormat src_format, gint64 src_value,
462     GstFormat * dest_format, gint64 * dest_value)
463 {
464   gboolean res = TRUE;
465   GstDVDec *dvdec;
466
467   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
468
469   if (dvdec->length == 0)
470     return FALSE;
471
472   if (*dest_format == GST_FORMAT_DEFAULT)
473     *dest_format = GST_FORMAT_TIME;
474
475   switch (src_format) {
476     case GST_FORMAT_BYTES:
477       switch (*dest_format) {
478         case GST_FORMAT_TIME:
479         {
480           guint64 frame;
481
482           /* get frame number */
483           frame = src_value / dvdec->length;
484
485           *dest_value = (frame * GST_SECOND) / dvdec->framerate;
486           break;
487         }
488         case GST_FORMAT_BYTES:
489           *dest_value = src_value;
490           break;
491         default:
492           res = FALSE;
493       }
494       break;
495     case GST_FORMAT_TIME:
496       switch (*dest_format) {
497         case GST_FORMAT_BYTES:
498         {
499           guint64 frame;
500
501           /* calculate the frame */
502           frame = src_value * dvdec->framerate / GST_SECOND;
503           /* calculate the offset */
504           *dest_value = frame * dvdec->length;
505           break;
506         }
507         case GST_FORMAT_TIME:
508           *dest_value = src_value;
509           break;
510         default:
511           res = FALSE;
512       }
513       break;
514     default:
515       res = FALSE;
516   }
517   return res;
518 }
519
520 static const GstQueryType *
521 gst_dvdec_get_src_query_types (GstPad * pad)
522 {
523   static const GstQueryType src_query_types[] = {
524     GST_QUERY_TOTAL,
525     GST_QUERY_POSITION,
526     0
527   };
528
529   return src_query_types;
530 }
531
532 static gboolean
533 gst_dvdec_src_query (GstPad * pad, GstQueryType type,
534     GstFormat * format, gint64 * value)
535 {
536   gboolean res = TRUE;
537   GstDVDec *dvdec;
538
539   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
540
541   switch (type) {
542     case GST_QUERY_TOTAL:
543       switch (*format) {
544         default:
545         {
546           guint64 len;
547           GstFormat tmp_format;
548
549           if (!dvdec->bs)
550             return FALSE;
551
552           len = gst_bytestream_length (dvdec->bs);
553           tmp_format = GST_FORMAT_TIME;
554           if (len == -1 || !gst_pad_convert (dvdec->sinkpad,
555                   GST_FORMAT_BYTES, len, &tmp_format, value)) {
556             return FALSE;
557           }
558           if (!gst_pad_convert (pad, GST_FORMAT_TIME, *value, format, value)) {
559             return FALSE;
560           }
561           break;
562         }
563       }
564       break;
565     case GST_QUERY_POSITION:
566       switch (*format) {
567         default:
568           res =
569               gst_pad_convert (pad, GST_FORMAT_TIME, dvdec->next_ts, format,
570               value);
571           break;
572       }
573       break;
574     default:
575       res = FALSE;
576       break;
577   }
578   return res;
579 }
580
581 static const GstEventMask *
582 gst_dvdec_get_event_masks (GstPad * pad)
583 {
584   static const GstEventMask src_event_masks[] = {
585     {GST_EVENT_SEEK, GST_SEEK_METHOD_SET | GST_SEEK_FLAG_FLUSH},
586     {0,}
587   };
588   static const GstEventMask sink_event_masks[] = {
589     {GST_EVENT_EOS, 0},
590     {GST_EVENT_DISCONTINUOUS, 0},
591     {GST_EVENT_FLUSH, 0},
592     {0,}
593   };
594
595   return (GST_PAD_IS_SRC (pad) ? src_event_masks : sink_event_masks);
596 }
597
598 static gboolean
599 gst_dvdec_handle_sink_event (GstDVDec * dvdec)
600 {
601   guint32 remaining;
602   GstEvent *event;
603   GstEventType type;
604
605   gst_bytestream_get_status (dvdec->bs, &remaining, &event);
606
607   type = event ? GST_EVENT_TYPE (event) : GST_EVENT_UNKNOWN;
608
609   switch (type) {
610     case GST_EVENT_FLUSH:
611     case GST_EVENT_EOS:
612     case GST_EVENT_FILLER:
613       /* Forward the event to output sinks */
614       if (GST_PAD_IS_LINKED (dvdec->videosrcpad)) {
615         gst_event_ref (event);
616         gst_pad_push (dvdec->videosrcpad, GST_DATA (event));
617       }
618       if (GST_PAD_IS_LINKED (dvdec->audiosrcpad)) {
619         gst_event_ref (event);
620         gst_pad_push (dvdec->audiosrcpad, GST_DATA (event));
621       }
622       gst_event_unref (event);
623       break;
624     case GST_EVENT_DISCONTINUOUS:
625     {
626       gint i;
627       gboolean found = FALSE;
628       GstFormat format;
629
630       format = GST_FORMAT_TIME;
631       /* try to get a timestamp from the discont formats */
632       for (i = 0; i < GST_EVENT_DISCONT_OFFSET_LEN (event); i++) {
633         if (gst_pad_convert (dvdec->sinkpad,
634                 GST_EVENT_DISCONT_OFFSET (event, i).format,
635                 GST_EVENT_DISCONT_OFFSET (event, i).value,
636                 &format, &dvdec->next_ts)) {
637           found = TRUE;
638           break;
639         }
640       }
641       /* assume 0 then */
642       if (!found) {
643         dvdec->next_ts = 0LL;
644       }
645       dvdec->need_discont = TRUE;
646       break;
647     }
648     default:
649       return gst_pad_event_default (dvdec->sinkpad, event);
650       break;
651   }
652   gst_event_unref (event);
653   return TRUE;
654 }
655
656 static gboolean
657 gst_dvdec_handle_src_event (GstPad * pad, GstEvent * event)
658 {
659   gboolean res = TRUE;
660   GstDVDec *dvdec;
661
662   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
663
664   switch (GST_EVENT_TYPE (event)) {
665     case GST_EVENT_SEEK_SEGMENT:
666     {
667       gint64 position;
668       GstFormat format;
669
670       /* first bring the format to time */
671       format = GST_FORMAT_TIME;
672       if (!gst_pad_convert (pad,
673               GST_EVENT_SEEK_FORMAT (event),
674               GST_EVENT_SEEK_ENDOFFSET (event), &format, &position)) {
675         /* could not convert seek format to time offset */
676         res = FALSE;
677         break;
678       }
679
680       dvdec->end_position = position;
681       dvdec->loop = GST_EVENT_SEEK_TYPE (event) & GST_SEEK_FLAG_SEGMENT_LOOP;
682     }
683     case GST_EVENT_SEEK:
684     {
685       gint64 position;
686       GstFormat format;
687
688       /* first bring the format to time */
689       format = GST_FORMAT_TIME;
690       if (!gst_pad_convert (pad,
691               GST_EVENT_SEEK_FORMAT (event),
692               GST_EVENT_SEEK_OFFSET (event), &format, &position)) {
693         /* could not convert seek format to time offset */
694         res = FALSE;
695         break;
696       }
697       dvdec->next_ts = position;
698       /* then try to figure out the byteoffset for this time */
699       format = GST_FORMAT_BYTES;
700       if (!gst_pad_convert (dvdec->sinkpad, GST_FORMAT_TIME, position,
701               &format, &position)) {
702         /* could not convert seek format to byte offset */
703         res = FALSE;
704         break;
705       }
706       /* seek to offset */
707       if (!gst_bytestream_seek (dvdec->bs, position, GST_SEEK_METHOD_SET)) {
708         res = FALSE;
709       }
710       if (GST_EVENT_TYPE (event) != GST_EVENT_SEEK_SEGMENT)
711         dvdec->end_position = -1;
712       break;
713     }
714     default:
715       res = FALSE;
716       break;
717   }
718   gst_event_unref (event);
719   return res;
720 }
721
722 static GstCaps *
723 gst_dvdec_video_getcaps (GstPad * pad)
724 {
725   GstDVDec *dvdec;
726   GstCaps *caps;
727   GstPadTemplate *src_pad_template;
728
729   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
730   src_pad_template = gst_static_pad_template_get (&video_src_temp);
731   caps = gst_caps_copy (gst_pad_template_get_caps (src_pad_template));
732
733   if (dvdec->found_header) {
734     int i;
735
736     /* set the height */
737     for (i = 0; i < gst_caps_get_size (caps); i++) {
738       GstStructure *structure = gst_caps_get_structure (caps, i);
739
740       gst_structure_set (structure,
741           "height", G_TYPE_INT, dvdec->height,
742           "framerate", G_TYPE_DOUBLE, dvdec->framerate, NULL);
743     }
744   }
745
746   return caps;
747 }
748
749 static GstPadLinkReturn
750 gst_dvdec_video_link (GstPad * pad, const GstCaps * caps)
751 {
752   GstDVDec *dvdec;
753   GstStructure *structure;
754   guint32 fourcc;
755   gint height;
756   gdouble framerate;
757
758   dvdec = GST_DVDEC (gst_pad_get_parent (pad));
759
760   /* if we did not find a header yet, return delayed */
761   if (!dvdec->found_header) {
762     return GST_PAD_LINK_DELAYED;
763   }
764
765   structure = gst_caps_get_structure (caps, 0);
766
767   if (!gst_structure_get_int (structure, "height", &height) ||
768       !gst_structure_get_double (structure, "framerate", &framerate))
769     return GST_PAD_LINK_REFUSED;
770
771   if ((height != dvdec->height) || (framerate != dvdec->framerate))
772     return GST_PAD_LINK_REFUSED;
773
774   if (strcmp (gst_structure_get_name (structure), "video/x-raw-rgb") == 0) {
775     gint bpp;
776
777     gst_structure_get_int (structure, "bpp", &bpp);
778     if (bpp == 24) {
779       dvdec->space = e_dv_color_rgb;
780       dvdec->bpp = 3;
781     } else {
782       dvdec->space = e_dv_color_bgr0;
783       dvdec->bpp = 4;
784     }
785   } else {
786     if (!gst_structure_get_fourcc (structure, "format", &fourcc))
787       return GST_PAD_LINK_REFUSED;
788
789     dvdec->space = e_dv_color_yuv;
790     dvdec->bpp = 2;
791   }
792
793   return GST_PAD_LINK_OK;
794 }
795
796 static void
797 gst_dvdec_push (GstDVDec * dvdec, GstBuffer * outbuf, GstPad * pad,
798     GstClockTime ts)
799 {
800   GST_BUFFER_TIMESTAMP (outbuf) = ts;
801
802   if ((dvdec->need_discont) || (dvdec->new_media)) {
803     GstEvent *discont;
804
805     discont = gst_event_new_discontinuous (FALSE, GST_FORMAT_TIME, ts, NULL);
806     GST_EVENT_DISCONT_NEW_MEDIA (discont) = dvdec->new_media;
807
808     gst_pad_push (pad, GST_DATA (discont));
809   }
810
811   gst_pad_push (pad, GST_DATA (outbuf));
812
813   if ((dvdec->end_position != -1) && (dvdec->next_ts >= dvdec->end_position)) {
814     if (dvdec->loop)
815       gst_pad_push (pad, GST_DATA (gst_event_new (GST_EVENT_SEGMENT_DONE)));
816     else
817       gst_pad_push (pad, GST_DATA (gst_event_new (GST_EVENT_EOS)));
818   }
819 }
820
821 static void
822 gst_dvdec_loop (GstElement * element)
823 {
824   GstDVDec *dvdec;
825   GstBuffer *buf, *outbuf;
826   guint8 *inframe;
827   gint height;
828   guint32 length, got_bytes;
829   guint64 ts;
830   gdouble fps;
831
832   dvdec = GST_DVDEC (element);
833
834   /*
835    * Apparently dv_parse_header can read from the body of the frame
836    * too, so it needs more than header_size bytes. Wacky!
837    */
838   if (dvdec->found_header)
839     length = (dvdec->PAL ? PAL_BUFFER : NTSC_BUFFER);
840   else
841     length = NTSC_BUFFER;
842
843   /* first read enough bytes to parse the header */
844   got_bytes = gst_bytestream_peek_bytes (dvdec->bs, &inframe, length);
845   if (got_bytes < length) {
846     gst_dvdec_handle_sink_event (dvdec);
847     return;
848   }
849   if (dv_parse_header (dvdec->decoder, inframe) < 0) {
850     GST_ELEMENT_ERROR (dvdec, STREAM, DECODE, (NULL), (NULL));
851     return;
852   }
853
854   /* after parsing the header we know the length of the data */
855   dvdec->PAL = dv_system_50_fields (dvdec->decoder);
856   dvdec->found_header = TRUE;
857
858   fps = (dvdec->PAL ? PAL_FRAMERATE : NTSC_FRAMERATE);
859   height = (dvdec->PAL ? PAL_HEIGHT : NTSC_HEIGHT);
860   length = (dvdec->PAL ? PAL_BUFFER : NTSC_BUFFER);
861
862   if (length != dvdec->length) {
863     dvdec->length = length;
864     gst_bytestream_size_hint (dvdec->bs, length);
865   }
866
867   /* then read the read data */
868   got_bytes = gst_bytestream_read (dvdec->bs, &buf, length);
869   if (got_bytes < length) {
870     gst_dvdec_handle_sink_event (dvdec);
871     return;
872   }
873
874   ts = dvdec->next_ts;
875   dvdec->next_ts += GST_SECOND / dvdec->framerate;
876
877   dv_parse_packs (dvdec->decoder, GST_BUFFER_DATA (buf));
878   if (dv_is_new_recording (dvdec->decoder, GST_BUFFER_DATA (buf)))
879     dvdec->new_media = TRUE;
880
881   if (GST_PAD_IS_LINKED (dvdec->audiosrcpad)) {
882     gint16 *a_ptr;
883     gint i, j;
884
885     dv_decode_full_audio (dvdec->decoder, GST_BUFFER_DATA (buf),
886         dvdec->audio_buffers);
887
888     if ((dv_get_frequency (dvdec->decoder) != dvdec->frequency) ||
889         (dv_get_num_channels (dvdec->decoder) != dvdec->channels)) {
890       if (!gst_pad_set_explicit_caps (dvdec->audiosrcpad,
891               gst_caps_new_simple ("audio/x-raw-int",
892                   "rate", G_TYPE_INT, dv_get_frequency (dvdec->decoder),
893                   "depth", G_TYPE_INT, 16,
894                   "width", G_TYPE_INT, 16,
895                   "signed", G_TYPE_BOOLEAN, TRUE,
896                   "channels", G_TYPE_INT, dv_get_num_channels (dvdec->decoder),
897                   "endianness", G_TYPE_INT, G_LITTLE_ENDIAN, NULL))) {
898         gst_buffer_unref (buf);
899         GST_ELEMENT_ERROR (dvdec, CORE, NEGOTIATION, (NULL),
900             ("Failed to negotiate audio parameters for the DV audio stream"));
901         return;
902       }
903
904       dvdec->frequency = dv_get_frequency (dvdec->decoder);
905       dvdec->channels = dv_get_num_channels (dvdec->decoder);
906     }
907
908     if (dv_get_num_samples (dvdec->decoder) > 0) {
909       outbuf = gst_buffer_new ();
910       GST_BUFFER_SIZE (outbuf) = dv_get_num_samples (dvdec->decoder) *
911           sizeof (gint16) * dv_get_num_channels (dvdec->decoder);
912       GST_BUFFER_DATA (outbuf) = g_malloc (GST_BUFFER_SIZE (outbuf));
913
914       a_ptr = (gint16 *) GST_BUFFER_DATA (outbuf);
915
916       for (i = 0; i < dv_get_num_samples (dvdec->decoder); i++) {
917         for (j = 0; j < dv_get_num_channels (dvdec->decoder); j++) {
918           *(a_ptr++) = dvdec->audio_buffers[j][i];
919         }
920       }
921       gst_dvdec_push (dvdec, outbuf, dvdec->audiosrcpad, ts);
922     }
923   } else {
924     dvdec->frequency = dv_get_frequency (dvdec->decoder);
925     dvdec->channels = dv_get_num_channels (dvdec->decoder);
926   }
927
928   if (GST_PAD_IS_LINKED (dvdec->videosrcpad)) {
929     guint8 *outframe;
930     guint8 *outframe_ptrs[3];
931     gint outframe_pitches[3];
932
933     if ((dvdec->framerate != fps) || (dvdec->height != height)) {
934       dvdec->height = height;
935       dvdec->framerate = fps;
936
937       if (GST_PAD_LINK_FAILED (gst_pad_renegotiate (dvdec->videosrcpad))) {
938         GST_ELEMENT_ERROR (dvdec, CORE, NEGOTIATION, (NULL), (NULL));
939         return;
940       }
941     }
942
943     outbuf = gst_buffer_new_and_alloc ((720 * height) * dvdec->bpp);
944
945     outframe = GST_BUFFER_DATA (outbuf);
946
947     outframe_ptrs[0] = outframe;
948     outframe_pitches[0] = 720 * dvdec->bpp;
949
950     /* the rest only matters for YUY2 */
951     if (dvdec->bpp < 3) {
952       outframe_ptrs[1] = outframe_ptrs[0] + 720 * height;
953       outframe_ptrs[2] = outframe_ptrs[1] + 360 * height;
954
955       outframe_pitches[1] = height / 2;
956       outframe_pitches[2] = outframe_pitches[1];
957     }
958
959     dv_decode_full_frame (dvdec->decoder, GST_BUFFER_DATA (buf),
960         dvdec->space, outframe_ptrs, outframe_pitches);
961
962     gst_dvdec_push (dvdec, outbuf, dvdec->videosrcpad, ts);
963   } else {
964     dvdec->height = height;
965     dvdec->framerate = fps;
966   }
967
968   if ((dvdec->end_position != -1) &&
969       (dvdec->next_ts >= dvdec->end_position) && !dvdec->loop) {
970     gst_element_set_eos (GST_ELEMENT (dvdec));
971   }
972
973   dvdec->need_discont = FALSE;
974   dvdec->new_media = FALSE;
975
976   gst_buffer_unref (buf);
977 }
978
979 static GstElementStateReturn
980 gst_dvdec_change_state (GstElement * element)
981 {
982   GstDVDec *dvdec = GST_DVDEC (element);
983
984   switch (GST_STATE_TRANSITION (element)) {
985     case GST_STATE_NULL_TO_READY:
986       break;
987     case GST_STATE_READY_TO_PAUSED:
988       dvdec->bs = gst_bytestream_new (dvdec->sinkpad);
989       dvdec->decoder =
990           dv_decoder_new (0, dvdec->clamp_luma, dvdec->clamp_chroma);
991       dvdec->decoder->quality = qualities[dvdec->quality];
992       /* 
993        * Enable this function call when libdv2 0.100 or higher is more
994        * common
995        */
996       /* dv_set_quality (dvdec->decoder, qualities [dvdec->quality]); */
997       break;
998     case GST_STATE_PAUSED_TO_PLAYING:
999       break;
1000     case GST_STATE_PLAYING_TO_PAUSED:
1001       break;
1002     case GST_STATE_PAUSED_TO_READY:
1003       dv_decoder_free (dvdec->decoder);
1004       dvdec->decoder = NULL;
1005       dvdec->found_header = FALSE;
1006       gst_bytestream_destroy (dvdec->bs);
1007       dvdec->bs = NULL;
1008       break;
1009     case GST_STATE_READY_TO_NULL:
1010       break;
1011     default:
1012       break;
1013   }
1014
1015   return parent_class->change_state (element);
1016 }
1017
1018 /* Arguments are part of the Gtk+ object system, and these functions
1019  * enable the element to respond to various arguments.
1020  */
1021 static void
1022 gst_dvdec_set_property (GObject * object, guint prop_id, const GValue * value,
1023     GParamSpec * pspec)
1024 {
1025   GstDVDec *dvdec;
1026
1027   /* It's not null if we got it, but it might not be ours */
1028   g_return_if_fail (GST_IS_DVDEC (object));
1029
1030   /* Get a pointer of the right type. */
1031   dvdec = GST_DVDEC (object);
1032
1033   /* Check the argument id to see which argument we're setting. */
1034   switch (prop_id) {
1035     case ARG_CLAMP_LUMA:
1036       dvdec->clamp_luma = g_value_get_boolean (value);
1037       break;
1038     case ARG_CLAMP_CHROMA:
1039       dvdec->clamp_chroma = g_value_get_boolean (value);
1040       break;
1041     case ARG_QUALITY:
1042       dvdec->quality = g_value_get_enum (value);
1043       if ((dvdec->quality < 0) || (dvdec->quality > 5))
1044         dvdec->quality = 0;
1045       break;
1046     default:
1047       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1048       break;
1049   }
1050 }
1051
1052 /* The set function is simply the inverse of the get fuction. */
1053 static void
1054 gst_dvdec_get_property (GObject * object, guint prop_id, GValue * value,
1055     GParamSpec * pspec)
1056 {
1057   GstDVDec *dvdec;
1058
1059   /* It's not null if we got it, but it might not be ours */
1060   g_return_if_fail (GST_IS_DVDEC (object));
1061   dvdec = GST_DVDEC (object);
1062
1063   switch (prop_id) {
1064     case ARG_CLAMP_LUMA:
1065       g_value_set_boolean (value, dvdec->clamp_luma);
1066       break;
1067     case ARG_CLAMP_CHROMA:
1068       g_value_set_boolean (value, dvdec->clamp_chroma);
1069       break;
1070     case ARG_QUALITY:
1071       g_value_set_enum (value, dvdec->quality);
1072       break;
1073     default:
1074       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1075       break;
1076   }
1077 }
1078
1079 /* This is the entry into the plugin itself.  When the plugin loads,
1080  * this function is called to register everything that the plugin provides.
1081  */
1082 static gboolean
1083 plugin_init (GstPlugin * plugin)
1084 {
1085   if (!gst_library_load ("gstbytestream"))
1086     return FALSE;
1087
1088   if (!gst_element_register (plugin, "dvdec", GST_RANK_PRIMARY,
1089           gst_dvdec_get_type ()))
1090     return FALSE;
1091
1092   return TRUE;
1093 }
1094
1095 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
1096     GST_VERSION_MINOR,
1097     "dvdec",
1098     "Uses libdv to decode DV video (libdv.sourceforge.net)",
1099     plugin_init, VERSION, "LGPL", GST_PACKAGE, GST_ORIGIN);