rework configure.ac; make asterisk rtp stuff compile on mingw
[platform/upstream/gst-plugins-good.git] / gst / flx / gstflxdec.c
1 /* GStreamer
2  * Copyright (C) <1999> Erik Walthinsen <omega@temple-baptist.com>
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 #include "flx_fmt.h"
26 #include "gstflxdec.h"
27 #include <gst/video/video.h>
28
29 #define JIFFIE  (GST_SECOND/70)
30
31 GST_DEBUG_CATEGORY_STATIC (flxdec_debug);
32 #define GST_CAT_DEFAULT flxdec_debug
33
34 /* flx element information */
35 static GstElementDetails flxdec_details = {
36   "FLX Decoder",
37   "Codec/Decoder/Audio",
38   "FLX decoder",
39   "Sepp Wijnands <mrrazz@garbage-coderz.net>, Zeeshan Ali <zeenix@gmail.com>"
40 };
41
42 /* Flx signals and args */
43 enum
44 {
45   /* FILL ME */
46   LAST_SIGNAL
47 };
48
49 enum
50 {
51   ARG_0
52 };
53
54 /* input */
55 static GstStaticPadTemplate sink_factory = GST_STATIC_PAD_TEMPLATE ("sink",
56     GST_PAD_SINK,
57     GST_PAD_ALWAYS,
58     GST_STATIC_CAPS ("video/x-fli")
59     );
60
61 /* output */
62 static GstStaticPadTemplate src_video_factory = GST_STATIC_PAD_TEMPLATE ("src",
63     GST_PAD_SRC,
64     GST_PAD_ALWAYS,
65     GST_STATIC_CAPS (GST_VIDEO_CAPS_xRGB_HOST_ENDIAN)
66     );
67
68
69 static void gst_flxdec_class_init (GstFlxDecClass * klass);
70 static void gst_flxdec_base_init (GstFlxDecClass * klass);
71 static void gst_flxdec_init (GstFlxDec * flxdec);
72
73 static GstFlowReturn gst_flxdec_chain (GstPad * pad, GstBuffer * buf);
74
75 static GstStateChangeReturn gst_flxdec_change_state (GstElement * element,
76     GstStateChange transition);
77
78 static gboolean gst_flxdec_src_event_handler (GstPad * pad, GstEvent * event);
79 static gboolean gst_flxdec_sink_event_handler (GstPad * pad, GstEvent * event);
80
81 static void gst_flxdec_set_property (GObject * object, guint prop_id,
82     const GValue * value, GParamSpec * pspec);
83 static void gst_flxdec_get_property (GObject * object, guint prop_id,
84     GValue * value, GParamSpec * pspec);
85
86
87 static void flx_decode_color (GstFlxDec *, guchar *, guchar *, gint);
88 static void flx_decode_brun (GstFlxDec *, guchar *, guchar *);
89 static void flx_decode_delta_fli (GstFlxDec *, guchar *, guchar *);
90 static void flx_decode_delta_flc (GstFlxDec *, guchar *, guchar *);
91
92 #define rndalign(off) ((off) + ((off) % 2))
93
94 static GstElementClass *parent_class = NULL;
95
96 GType
97 gst_flxdec_get_type (void)
98 {
99   static GType flxdec_type = 0;
100
101   if (!flxdec_type) {
102     static const GTypeInfo flxdec_info = {
103       sizeof (GstFlxDecClass),
104       (GBaseInitFunc) gst_flxdec_base_init,
105       NULL,
106       (GClassInitFunc) gst_flxdec_class_init,
107       NULL,
108       NULL,
109       sizeof (GstFlxDec),
110       0,
111       (GInstanceInitFunc) gst_flxdec_init,
112     };
113
114     flxdec_type =
115         g_type_register_static (GST_TYPE_ELEMENT, "GstFlxDec", &flxdec_info, 0);
116   }
117   return flxdec_type;
118 }
119
120 static void
121 gst_flxdec_base_init (GstFlxDecClass * klass)
122 {
123   GstElementClass *gstelement_class = GST_ELEMENT_CLASS (klass);
124
125   gst_element_class_set_details (gstelement_class, &flxdec_details);
126   gst_element_class_add_pad_template (gstelement_class,
127       gst_static_pad_template_get (&sink_factory));
128   gst_element_class_add_pad_template (gstelement_class,
129       gst_static_pad_template_get (&src_video_factory));
130 }
131
132 static void
133 gst_flxdec_class_init (GstFlxDecClass * klass)
134 {
135   GObjectClass *gobject_class;
136   GstElementClass *gstelement_class;
137
138   gobject_class = (GObjectClass *) klass;
139   gstelement_class = (GstElementClass *) klass;
140
141   parent_class = g_type_class_ref (GST_TYPE_ELEMENT);
142
143   GST_DEBUG_CATEGORY_INIT (flxdec_debug, "flxdec", 0, "FLX video decoder");
144
145   gobject_class->set_property = gst_flxdec_set_property;
146   gobject_class->get_property = gst_flxdec_get_property;
147
148   gstelement_class->change_state = gst_flxdec_change_state;
149 }
150
151 static void
152 gst_flxdec_init (GstFlxDec * flxdec)
153 {
154   flxdec->sinkpad =
155       gst_pad_new_from_template (gst_static_pad_template_get (&sink_factory),
156       "sink");
157   gst_element_add_pad (GST_ELEMENT (flxdec), flxdec->sinkpad);
158   gst_pad_set_chain_function (flxdec->sinkpad, gst_flxdec_chain);
159   gst_pad_set_event_function (flxdec->sinkpad, gst_flxdec_sink_event_handler);
160
161   flxdec->srcpad =
162       gst_pad_new_from_template (gst_static_pad_template_get
163       (&src_video_factory), "src");
164   gst_element_add_pad (GST_ELEMENT (flxdec), flxdec->srcpad);
165   gst_pad_set_event_function (flxdec->srcpad, gst_flxdec_src_event_handler);
166
167   gst_pad_use_fixed_caps (flxdec->srcpad);
168
169   flxdec->frame = NULL;
170   flxdec->delta = NULL;
171
172   flxdec->adapter = gst_adapter_new ();
173 }
174
175 static gboolean
176 gst_flxdec_src_event_handler (GstPad * pad, GstEvent * event)
177 {
178   GstFlxDec *flxdec = (GstFlxDec *) gst_pad_get_parent (pad);
179
180   g_return_val_if_fail (GST_IS_EVENT (event), FALSE);
181
182   /* TODO: implement the seek and other event handling */
183
184   return gst_pad_push_event (flxdec->sinkpad, event);
185 }
186
187 static gboolean
188 gst_flxdec_sink_event_handler (GstPad * pad, GstEvent * event)
189 {
190   GstFlxDec *flxdec = (GstFlxDec *) gst_pad_get_parent (pad);
191
192   g_return_val_if_fail (GST_IS_EVENT (event), FALSE);
193
194   if (GST_EVENT_TYPE (event) == GST_EVENT_EOS ||
195       GST_EVENT_TYPE (event) == GST_EVENT_NEWSEGMENT)
196     GST_STREAM_LOCK (flxdec->srcpad);
197
198   gst_pad_push_event (flxdec->srcpad, gst_event_ref (event));
199
200   if (GST_EVENT_TYPE (event) == GST_EVENT_EOS ||
201       GST_EVENT_TYPE (event) == GST_EVENT_NEWSEGMENT)
202     GST_STREAM_UNLOCK (flxdec->srcpad);
203
204   return TRUE;
205 }
206
207 static void
208 flx_decode_chunks (GstFlxDec * flxdec, gulong count, guchar * data,
209     guchar * dest)
210 {
211   FlxFrameChunk *hdr;
212
213   g_return_if_fail (data != NULL);
214
215   while (count--) {
216     hdr = (FlxFrameChunk *) data;
217     data += FlxFrameChunkSize;
218
219     switch (hdr->id) {
220       case FLX_COLOR64:
221         flx_decode_color (flxdec, data, dest, 2);
222         data += rndalign (hdr->size) - FlxFrameChunkSize;
223         break;
224
225       case FLX_COLOR256:
226         flx_decode_color (flxdec, data, dest, 0);
227         data += rndalign (hdr->size) - FlxFrameChunkSize;
228         break;
229
230       case FLX_BRUN:
231         flx_decode_brun (flxdec, data, dest);
232         data += rndalign (hdr->size) - FlxFrameChunkSize;
233         break;
234
235       case FLX_LC:
236         flx_decode_delta_fli (flxdec, data, dest);
237         data += rndalign (hdr->size) - FlxFrameChunkSize;
238         break;
239
240       case FLX_SS2:
241         flx_decode_delta_flc (flxdec, data, dest);
242         data += rndalign (hdr->size) - FlxFrameChunkSize;
243         break;
244
245       case FLX_BLACK:
246         memset (dest, 0, flxdec->size);
247         break;
248
249       case FLX_MINI:
250         data += rndalign (hdr->size) - FlxFrameChunkSize;
251         break;
252
253       default:
254         GST_WARNING ("Unimplented chunk type: 0x%02x size: %d - skipping",
255             hdr->id, hdr->size);
256         data += rndalign (hdr->size) - FlxFrameChunkSize;
257         break;
258     }
259   }
260 }
261
262
263 static void
264 flx_decode_color (GstFlxDec * flxdec, guchar * data, guchar * dest, gint scale)
265 {
266   guint packs, count, indx;
267
268   g_return_if_fail (flxdec != NULL);
269
270   packs = (data[0] + (data[1] << 8));
271
272   data += 2;
273   indx = 0;
274
275   GST_LOG ("GstFlxDec: cmap packs: %d", packs);
276   while (packs--) {
277     /* color map index + skip count */
278     indx += *data++;
279
280     /* number of rgb triplets */
281     count = *data++ & 0xff;
282     if (count == 0)
283       count = 256;
284
285     GST_LOG ("GstFlxDec: cmap count: %d (indx: %d)\n", count, indx);
286     flx_set_palette_vector (flxdec->converter, indx, count, data, scale);
287
288     data += (count * 3);
289   }
290 }
291
292 static void
293 flx_decode_brun (GstFlxDec * flxdec, guchar * data, guchar * dest)
294 {
295   gulong count, lines, row;
296   guchar x;
297
298   g_return_if_fail (flxdec != NULL);
299
300   lines = flxdec->hdr.height;
301   while (lines--) {
302     /* packet count.  
303      * should not be used anymore, since the flc format can
304      * contain more then 255 RLE packets. we use the frame 
305      * width instead. 
306      */
307     data++;
308
309     row = flxdec->hdr.width;
310     while (row) {
311       count = *data++;
312
313       if (count > 0x7f) {
314         /* literal run */
315         count = 0x100 - count;
316         row -= count;
317
318         while (count--)
319           *dest++ = *data++;
320
321       } else {
322         /* replicate run */
323         row -= count;
324         x = *data++;
325
326         while (count--)
327           *dest++ = x;
328       }
329     }
330   }
331 }
332
333 static void
334 flx_decode_delta_fli (GstFlxDec * flxdec, guchar * data, guchar * dest)
335 {
336   gulong count, packets, lines, start_line, start_l;
337   guchar *start_p, x;
338
339   g_return_if_fail (flxdec != NULL);
340   g_return_if_fail (flxdec->delta != NULL);
341
342   /* use last frame for delta */
343   memcpy (dest, GST_BUFFER_DATA (flxdec->delta),
344       GST_BUFFER_SIZE (flxdec->delta));
345
346   start_line = (data[0] + (data[1] << 8));
347   lines = (data[2] + (data[3] << 8));
348   data += 4;
349
350   /* start position of delta */
351   dest += (flxdec->hdr.width * start_line);
352   start_p = dest;
353   start_l = lines;
354
355   while (lines--) {
356     /* packet count */
357     packets = *data++;
358
359     while (packets--) {
360       /* skip count */
361       dest += *data++;
362
363       /* RLE count */
364       count = *data++;
365
366       if (count > 0x7f) {
367         /* literal run */
368         count = 0x100 - count;
369         x = *data++;
370
371         while (count--)
372           *dest++ = x;
373
374       } else {
375         /* replicate run */
376         while (count--)
377           *dest++ = *data++;
378       }
379     }
380     start_p += flxdec->hdr.width;
381     dest = start_p;
382   }
383 }
384
385 static void
386 flx_decode_delta_flc (GstFlxDec * flxdec, guchar * data, guchar * dest)
387 {
388   gulong count, lines, start_l, opcode;
389   guchar *start_p;
390
391   g_return_if_fail (flxdec != NULL);
392   g_return_if_fail (flxdec->delta != NULL);
393
394   /* use last frame for delta */
395   memcpy (dest, GST_BUFFER_DATA (flxdec->delta),
396       GST_BUFFER_SIZE (flxdec->delta));
397
398   lines = (data[0] + (data[1] << 8));
399   data += 2;
400
401   start_p = dest;
402   start_l = lines;
403
404   while (lines) {
405     dest = start_p + (flxdec->hdr.width * (start_l - lines));
406
407     /* process opcode(s) */
408     while ((opcode = (data[0] + (data[1] << 8))) & 0xc000) {
409       data += 2;
410       if ((opcode & 0xc000) == 0xc000) {
411         /* skip count */
412         start_l += (0x10000 - opcode);
413         dest += flxdec->hdr.width * (0x10000 - opcode);
414       } else {
415         /* last pixel */
416         dest += flxdec->hdr.width;
417         *dest++ = (opcode & 0xff);
418       }
419     }
420     data += 2;
421
422     /* last opcode is the packet count */
423     while (opcode--) {
424       /* skip count */
425       dest += *data++;
426
427       /* RLE count */
428       count = *data++;
429
430       if (count > 0x7f) {
431         /* replicate word run */
432         count = 0x100 - count;
433         while (count--) {
434           *dest++ = data[0];
435           *dest++ = data[1];
436         }
437         data += 2;
438       } else {
439         /* literal word run */
440         while (count--) {
441           *dest++ = *data++;
442           *dest++ = *data++;
443         }
444       }
445     }
446     lines--;
447   }
448 }
449
450 static GstFlowReturn
451 gst_flxdec_chain (GstPad * pad, GstBuffer * buf)
452 {
453   GstCaps *caps;
454   guint avail;
455   GstFlowReturn res = GST_FLOW_OK;
456
457   GstFlxDec *flxdec;
458   FlxHeader *flxh;
459
460   g_return_val_if_fail (buf != NULL, GST_FLOW_ERROR);
461   flxdec = (GstFlxDec *) gst_pad_get_parent (pad);
462   g_return_val_if_fail (flxdec != NULL, GST_FLOW_ERROR);
463
464   gst_adapter_push (flxdec->adapter, buf);
465   avail = gst_adapter_available (flxdec->adapter);
466
467   if (flxdec->state == GST_FLXDEC_READ_HEADER) {
468     if (avail >= FlxHeaderSize) {
469       const guint8 *data = gst_adapter_peek (flxdec->adapter, FlxHeaderSize);
470
471       memcpy ((gchar *) & flxdec->hdr, data, FlxHeaderSize);
472       gst_adapter_flush (flxdec->adapter, FlxHeaderSize);
473
474       flxh = &flxdec->hdr;
475
476       /* check header */
477       if (flxh->type != FLX_MAGICHDR_FLI &&
478           flxh->type != FLX_MAGICHDR_FLC && flxh->type != FLX_MAGICHDR_FLX) {
479         GST_ELEMENT_ERROR (flxdec, STREAM, WRONG_TYPE, (NULL),
480             ("not a flx file (type %d)\n", flxh->type));
481         return GST_FLOW_ERROR;
482       }
483
484
485       GST_LOG ("size      :  %d\n", flxh->size);
486       GST_LOG ("frames    :  %d\n", flxh->frames);
487       GST_LOG ("width     :  %d\n", flxh->width);
488       GST_LOG ("height    :  %d\n", flxh->height);
489       GST_LOG ("depth     :  %d\n", flxh->depth);
490       GST_LOG ("speed     :  %d\n", flxh->speed);
491
492       flxdec->next_time = 0;
493
494       if (flxh->type == FLX_MAGICHDR_FLI) {
495         flxdec->frame_time = JIFFIE * flxh->speed;
496       } else {
497         flxdec->frame_time = flxh->speed * GST_MSECOND;
498       }
499
500       caps = gst_caps_from_string (GST_VIDEO_CAPS_xRGB_HOST_ENDIAN);
501       gst_caps_set_simple (caps,
502           "width", G_TYPE_INT, flxh->width,
503           "height", G_TYPE_INT, flxh->height,
504           "framerate", G_TYPE_DOUBLE,
505           (gdouble) (GST_SECOND / flxdec->frame_time), NULL);
506
507       gst_pad_set_caps (flxdec->srcpad, caps);
508       gst_caps_unref (caps);
509
510       if (flxh->depth <= 8)
511         flxdec->converter =
512             flx_colorspace_converter_new (flxh->width, flxh->height);
513
514       if (flxh->type == FLX_MAGICHDR_FLC || flxh->type == FLX_MAGICHDR_FLX) {
515         GST_LOG ("(FLC) aspect_dx :  %d\n", flxh->aspect_dx);
516         GST_LOG ("(FLC) aspect_dy :  %d\n", flxh->aspect_dy);
517         GST_LOG ("(FLC) oframe1   :  0x%08x\n", flxh->oframe1);
518         GST_LOG ("(FLC) oframe2   :  0x%08x\n", flxh->oframe2);
519       }
520
521       flxdec->size = (flxh->width * flxh->height);
522
523       /* create delta and output frame */
524       flxdec->frame = gst_buffer_new ();
525       flxdec->delta = gst_buffer_new ();
526       GST_BUFFER_DATA (flxdec->frame) = g_malloc (flxdec->size);
527       GST_BUFFER_SIZE (flxdec->frame) = flxdec->size;
528       GST_BUFFER_DATA (flxdec->delta) = g_malloc (flxdec->size);
529       GST_BUFFER_SIZE (flxdec->delta) = flxdec->size;
530
531       flxdec->state = GST_FLXDEC_PLAYING;
532     }
533   } else if (flxdec->state == GST_FLXDEC_PLAYING) {
534     GstBuffer *out;
535
536     if (avail >= FlxFrameChunkSize) {
537       FlxFrameChunk flxfh;
538       guchar *chunk = NULL;
539       guint to_flush = 0;
540       const guint8 *data =
541           gst_adapter_peek (flxdec->adapter, FlxFrameChunkSize);
542       memcpy (&flxfh, data, FlxFrameChunkSize);
543
544       switch (flxfh.id) {
545         case FLX_FRAME_TYPE:
546           if (avail < flxfh.size) {
547             break;
548           }
549
550           gst_adapter_flush (flxdec->adapter, FlxFrameChunkSize);
551           data = gst_adapter_peek (flxdec->adapter,
552               flxfh.size - FlxFrameChunkSize);
553           chunk = g_memdup (data, flxfh.size - FlxFrameChunkSize);
554           to_flush = flxfh.size - FlxFrameChunkSize;
555
556           if (((FlxFrameType *) chunk)->chunks == 0)
557             break;
558
559           /* create 32 bits output frame */
560           res = gst_pad_alloc_buffer (flxdec->srcpad,
561               GST_BUFFER_OFFSET_NONE,
562               flxdec->size * 4, GST_PAD_CAPS (flxdec->srcpad), &out);
563
564           if (res != GST_FLOW_OK)
565             break;
566
567           /* decode chunks */
568           flx_decode_chunks (flxdec,
569               ((FlxFrameType *) chunk)->chunks,
570               chunk + FlxFrameTypeSize, GST_BUFFER_DATA (flxdec->frame));
571
572           /* save copy of the current frame for possible delta. */
573           memcpy (GST_BUFFER_DATA (flxdec->delta),
574               GST_BUFFER_DATA (flxdec->frame), GST_BUFFER_SIZE (flxdec->delta));
575
576           /* convert current frame. */
577           flx_colorspace_convert (flxdec->converter,
578               GST_BUFFER_DATA (flxdec->frame), GST_BUFFER_DATA (out));
579
580           GST_BUFFER_TIMESTAMP (out) = flxdec->next_time;
581           flxdec->next_time += flxdec->frame_time;
582
583           gst_pad_push (flxdec->srcpad, out);
584           break;
585       }
586
587       gst_adapter_flush (flxdec->adapter, to_flush);
588
589       if (chunk)
590         g_free (chunk);
591     }
592   }
593
594   return res;
595 }
596
597 static GstStateChangeReturn
598 gst_flxdec_change_state (GstElement * element, GstStateChange transition)
599 {
600   GstFlxDec *flxdec;
601
602   flxdec = GST_FLXDEC (element);
603
604   switch (transition) {
605     case GST_STATE_CHANGE_NULL_TO_READY:
606       break;
607     case GST_STATE_CHANGE_READY_TO_PAUSED:
608       gst_adapter_clear (flxdec->adapter);
609       flxdec->state = GST_FLXDEC_READ_HEADER;
610       break;
611     case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
612       break;
613     case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
614       break;
615     case GST_STATE_CHANGE_PAUSED_TO_READY:
616       gst_buffer_unref (flxdec->frame);
617       flxdec->frame = NULL;
618       gst_buffer_unref (flxdec->delta);
619       flxdec->delta = NULL;
620       break;
621     case GST_STATE_CHANGE_READY_TO_NULL:
622       break;
623   }
624
625   return parent_class->change_state (element, transition);
626
627   //return GST_STATE_CHANGE_SUCCESS;
628 }
629
630 static void
631 gst_flxdec_set_property (GObject * object, guint prop_id, const GValue * value,
632     GParamSpec * pspec)
633 {
634   GstFlxDec *flxdec;
635
636   g_return_if_fail (GST_IS_FLXDEC (object));
637   flxdec = GST_FLXDEC (object);
638
639   switch (prop_id) {
640     default:
641       break;
642   }
643 }
644
645 static void
646 gst_flxdec_get_property (GObject * object, guint prop_id, GValue * value,
647     GParamSpec * pspec)
648 {
649   GstFlxDec *flxdec;
650
651   g_return_if_fail (GST_IS_FLXDEC (object));
652   flxdec = GST_FLXDEC (object);
653
654   switch (prop_id) {
655     default:
656       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
657       break;
658   }
659 }
660
661 static gboolean
662 plugin_init (GstPlugin * plugin)
663 {
664   return gst_element_register (plugin, "flxdec",
665       GST_RANK_PRIMARY, GST_TYPE_FLXDEC);
666 }
667
668 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
669     GST_VERSION_MINOR,
670     "flxdec",
671     "FLX video decoder",
672     plugin_init, VERSION, GST_LICENSE, GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN)