/* GStreamer RIFF I/O

 * Copyright (C) 2003 Ronald Bultje <rbultje@ronald.bitfreak.net>

 *

 * riff-media.h: RIFF-id to/from caps routines

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Library General Public

 * License as published by the Free Software Foundation; either

 * version 2 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Library General Public License for more details.

 *

 * You should have received a copy of the GNU Library General Public

 * License along with this library; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include "riff-ids.h"

#include "riff-media.h"

#include <gst/audio/multichannel.h>

#include <string.h>

#include <math.h>

GST_DEBUG_CATEGORY_EXTERN (riff_debug);

#define GST_CAT_DEFAULT riff_debug

/**

 * gst_riff_create_video_caps_with_data:

 * @codec_fcc: fourCC codec for this codec.

 * @strh: pointer to the strh stream header structure.

 * @strf: pointer to the strf stream header structure, including any

 *        data that is within the range of strf.size, but excluding any

 *        additional data withint this chunk but outside strf.size.

 * @strf_data: a #GstBuffer containing the additional data in the strf

 *             chunk outside reach of strf.size. Ususally a palette.

 * @strd_data: a #GstBuffer containing the data in the strd stream header

 *             chunk. Usually codec initialization data.

 * @codec_name: if given, will be filled with a human-readable codec name.

 */

#ifdef __SYMBIAN32__

EXPORT_C

#endif

GstCaps *

gst_riff_create_video_caps (guint32 codec_fcc,

    gst_riff_strh * strh, gst_riff_strf_vids * strf,

    GstBuffer * strf_data, GstBuffer * strd_data, char **codec_name)

{

  GstCaps *caps = NULL;

  GstBuffer *palette = NULL;

  GST_DEBUG ("video fourcc %" GST_FOURCC_FORMAT, GST_FOURCC_ARGS (codec_fcc));

  switch (codec_fcc) {

    case GST_MAKE_FOURCC ('D', 'I', 'B', ' '):{

      gint bpp = (strf && strf->bit_cnt != 0) ? strf->bit_cnt : 8;

      if (strf) {

        if (bpp == 8) {

          caps = gst_caps_new_simple ("video/x-raw-rgb",

              "bpp", G_TYPE_INT, 8, "depth", G_TYPE_INT, 8,

              "endianness", G_TYPE_INT, G_BYTE_ORDER, NULL);

        } else if (bpp == 24) {

          caps = gst_caps_new_simple ("video/x-raw-rgb",

              "bpp", G_TYPE_INT, 24, "depth", G_TYPE_INT, 24,

              "endianness", G_TYPE_INT, G_BIG_ENDIAN,

              "red_mask", G_TYPE_INT, 0xff, "green_mask", G_TYPE_INT, 0xff00,

              "blue_mask", G_TYPE_INT, 0xff0000, NULL);

        } else {

          GST_WARNING ("Unhandled DIB RGB depth: %d", bpp);

        }

      } else {

        /* for template */

        caps = gst_caps_from_string ("video/x-raw-rgb, bpp = (int) { 8, 24 }, "

            "depth = (int) { 8, 24}");

      }

      palette = strf_data;

      strf_data = NULL;

      if (codec_name)

        *codec_name = g_strdup_printf ("Palettized %d-bit RGB", bpp);

      break;

    }

    case GST_MAKE_FOURCC ('I', '4', '2', '0'):

      caps = gst_caps_new_simple ("video/x-raw-yuv",

          "format", GST_TYPE_FOURCC, codec_fcc, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Uncompressed planar YUV 4:2:0");

      break;

    case GST_MAKE_FOURCC ('Y', 'U', 'Y', '2'):

      caps = gst_caps_new_simple ("video/x-raw-yuv",

          "format", GST_TYPE_FOURCC, codec_fcc, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Uncompressed packed YUV 4:2:2");

      break;

    case GST_MAKE_FOURCC ('Y', 'V', 'U', '9'):

      caps = gst_caps_new_simple ("video/x-raw-yuv",

          "format", GST_TYPE_FOURCC, codec_fcc, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Uncompressed packed YVU 4:1:0");

      break;

    case GST_MAKE_FOURCC ('M', 'J', 'P', 'G'): /* YUY2 MJPEG */

    case GST_MAKE_FOURCC ('A', 'V', 'R', 'n'):

    case GST_MAKE_FOURCC ('I', 'J', 'P', 'G'):

    case GST_MAKE_FOURCC ('i', 'j', 'p', 'g'):

    case GST_MAKE_FOURCC ('J', 'P', 'G', 'L'):

      caps = gst_caps_new_simple ("image/jpeg", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Motion JPEG");

      break;

    case GST_MAKE_FOURCC ('J', 'P', 'E', 'G'): /* generic (mostly RGB) MJPEG */

    case GST_MAKE_FOURCC ('j', 'p', 'e', 'g'): /* generic (mostly RGB) MJPEG */

      caps = gst_caps_new_simple ("image/jpeg", NULL);

      if (codec_name)

        *codec_name = g_strdup ("JPEG Still Image");

      break;

    case GST_MAKE_FOURCC ('P', 'I', 'X', 'L'): /* Miro/Pinnacle fourccs */

    case GST_MAKE_FOURCC ('V', 'I', 'X', 'L'): /* Miro/Pinnacle fourccs */

      caps = gst_caps_new_simple ("image/jpeg", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Miro/Pinnacle Motion JPEG Video");

      break;

    case GST_MAKE_FOURCC ('S', 'P', '5', '3'):

    case GST_MAKE_FOURCC ('S', 'P', '5', '4'):

    case GST_MAKE_FOURCC ('S', 'P', '5', '5'):

    case GST_MAKE_FOURCC ('S', 'P', '5', '6'):

    case GST_MAKE_FOURCC ('S', 'P', '5', '7'):

    case GST_MAKE_FOURCC ('S', 'P', '5', '8'):

      caps = gst_caps_new_simple ("video/sp5x", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Sp5x-like JPEG");

      break;

    case GST_MAKE_FOURCC ('H', 'F', 'Y', 'U'):

      caps = gst_caps_new_simple ("video/x-huffyuv", NULL);

      if (strf) {

        gst_caps_set_simple (caps, "bpp",

            G_TYPE_INT, (int) strf->bit_cnt, NULL);

      }

      if (codec_name)

        *codec_name = g_strdup ("Huffman Lossless Codec");

      break;

    case GST_MAKE_FOURCC ('M', 'P', 'E', 'G'):

    case GST_MAKE_FOURCC ('M', 'P', 'G', 'I'):

    case GST_MAKE_FOURCC ('m', 'p', 'g', '1'):

    case GST_MAKE_FOURCC ('M', 'P', 'G', '1'):

    case GST_MAKE_FOURCC ('P', 'I', 'M', '1'):

      caps = gst_caps_new_simple ("video/mpeg",

          "systemstream", G_TYPE_BOOLEAN, FALSE,

          "mpegversion", G_TYPE_INT, 1, NULL);

      if (codec_name)

        *codec_name = g_strdup ("MPEG-1 video");

      break;

    case GST_MAKE_FOURCC ('M', 'P', 'G', '2'):

    case GST_MAKE_FOURCC ('m', 'p', 'g', '2'):

      caps = gst_caps_new_simple ("video/mpeg",

          "systemstream", G_TYPE_BOOLEAN, FALSE,

          "mpegversion", G_TYPE_INT, 2, NULL);

      if (codec_name)

        *codec_name = g_strdup ("MPEG-2 video");

      break;

    case GST_MAKE_FOURCC ('H', '2', '6', '3'):

    case GST_MAKE_FOURCC ('h', '2', '6', '3'):

    case GST_MAKE_FOURCC ('i', '2', '6', '3'):

    case GST_MAKE_FOURCC ('U', '2', '6', '3'):

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "itu", NULL);

      if (codec_name)

        *codec_name = g_strdup ("ITU H.26n");

      break;

    case GST_MAKE_FOURCC ('L', '2', '6', '3'):

      /* http://www.leadcodecs.com/Codecs/LEAD-H263.htm */

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "lead", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Lead H.263");

      break;

    case GST_MAKE_FOURCC ('M', '2', '6', '3'):

    case GST_MAKE_FOURCC ('m', '2', '6', '3'):

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "microsoft", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft H.263");

      break;

    case GST_MAKE_FOURCC ('V', 'D', 'O', 'W'):

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "vdolive", NULL);

      if (codec_name)

        *codec_name = g_strdup ("VDOLive");

      break;

    case GST_MAKE_FOURCC ('V', 'I', 'V', 'O'):

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "vivo", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Vivo H.263");

      break;

    case GST_MAKE_FOURCC ('x', '2', '6', '3'):

      caps = gst_caps_new_simple ("video/x-h263",

          "variant", G_TYPE_STRING, "xirlink", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Xirlink H.263");

      break;

      /* apparently not standard H.263...? */

    case GST_MAKE_FOURCC ('I', '2', '6', '3'):

      caps = gst_caps_new_simple ("video/x-intel-h263",

          "variant", G_TYPE_STRING, "intel", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Intel H.263");

      break;

    case GST_MAKE_FOURCC ('H', '2', '6', '4'):

    case GST_MAKE_FOURCC ('h', '2', '6', '4'):

    case GST_MAKE_FOURCC ('a', 'v', 'c', '1'):

    case GST_MAKE_FOURCC ('A', 'V', 'C', '1'):

      caps = gst_caps_new_simple ("video/x-h264",

          "variant", G_TYPE_STRING, "itu", NULL);

      if (codec_name)

        *codec_name = g_strdup ("ITU H.264");

      break;

    case GST_MAKE_FOURCC ('V', 'S', 'S', 'H'):

      caps = gst_caps_new_simple ("video/x-h264",

          "variant", G_TYPE_STRING, "videosoft", NULL);

      if (codec_name)

        *codec_name = g_strdup ("VideoSoft H.264");

      break;

    case GST_MAKE_FOURCC ('S', 'E', 'D', 'G'):

      caps = gst_caps_new_simple ("video/mpeg",

          "mpegversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Samsung MPEG-4");

      break;

    case GST_MAKE_FOURCC ('D', 'I', 'V', '3'):

    case GST_MAKE_FOURCC ('d', 'i', 'v', '3'):

    case GST_MAKE_FOURCC ('D', 'I', 'V', '4'):

    case GST_MAKE_FOURCC ('d', 'i', 'v', '4'):

    case GST_MAKE_FOURCC ('D', 'I', 'V', '5'):

    case GST_MAKE_FOURCC ('d', 'i', 'v', '5'):

    case GST_MAKE_FOURCC ('D', 'I', 'V', '6'):

    case GST_MAKE_FOURCC ('d', 'i', 'v', '6'):

    case GST_MAKE_FOURCC ('M', 'P', 'G', '3'):

    case GST_MAKE_FOURCC ('m', 'p', 'g', '3'):

    case GST_MAKE_FOURCC ('c', 'o', 'l', '0'):

    case GST_MAKE_FOURCC ('C', 'O', 'L', '0'):

    case GST_MAKE_FOURCC ('c', 'o', 'l', '1'):

    case GST_MAKE_FOURCC ('C', 'O', 'L', '1'):

    case GST_MAKE_FOURCC ('A', 'P', '4', '1'):

      caps = gst_caps_new_simple ("video/x-divx",

          "divxversion", G_TYPE_INT, 3, NULL);

      if (codec_name)

        *codec_name = g_strdup ("DivX MS-MPEG-4 Version 3");

      break;

    case GST_MAKE_FOURCC ('d', 'i', 'v', 'x'):

    case GST_MAKE_FOURCC ('D', 'I', 'V', 'X'):

      caps = gst_caps_new_simple ("video/x-divx",

          "divxversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("DivX MPEG-4 Version 4");

      break;

    case GST_MAKE_FOURCC ('B', 'L', 'Z', '0'):

      caps = gst_caps_new_simple ("video/x-divx",

          "divxversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Blizzard DivX");

      break;

    case GST_MAKE_FOURCC ('D', 'X', '5', '0'):

      caps = gst_caps_new_simple ("video/x-divx",

          "divxversion", G_TYPE_INT, 5, NULL);

      if (codec_name)

        *codec_name = g_strdup ("DivX MPEG-4 Version 5");

      break;

    case GST_MAKE_FOURCC ('X', 'V', 'I', 'D'):

    case GST_MAKE_FOURCC ('x', 'v', 'i', 'd'):

      caps = gst_caps_new_simple ("video/x-xvid", NULL);

      if (codec_name)

        *codec_name = g_strdup ("XVID MPEG-4");

      break;

    case GST_MAKE_FOURCC ('M', 'P', 'G', '4'):

    case GST_MAKE_FOURCC ('M', 'P', '4', 'S'):

      caps = gst_caps_new_simple ("video/x-msmpeg",

          "msmpegversion", G_TYPE_INT, 41, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft MPEG-4 4.1");

      break;

    case GST_MAKE_FOURCC ('m', 'p', '4', '2'):

    case GST_MAKE_FOURCC ('M', 'P', '4', '2'):

      caps = gst_caps_new_simple ("video/x-msmpeg",

          "msmpegversion", G_TYPE_INT, 42, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft MPEG-4 4.2");

      break;

    case GST_MAKE_FOURCC ('m', 'p', '4', '3'):

    case GST_MAKE_FOURCC ('M', 'P', '4', '3'):

      caps = gst_caps_new_simple ("video/x-msmpeg",

          "msmpegversion", G_TYPE_INT, 43, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft MPEG-4 4.3");

      break;

    case GST_MAKE_FOURCC ('M', '4', 'S', '2'):

      caps = gst_caps_new_simple ("video/mpeg",

          "mpegversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft ISO MPEG-4 1.1");

      break;

    case GST_MAKE_FOURCC ('F', 'M', 'P', '4'):

    case GST_MAKE_FOURCC ('U', 'M', 'P', '4'):

      caps = gst_caps_new_simple ("video/mpeg",

          "mpegversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("FFmpeg MPEG-4");

      break;

    case GST_MAKE_FOURCC ('3', 'i', 'v', 'd'):

    case GST_MAKE_FOURCC ('3', 'I', 'V', 'D'):

      if (codec_name)

        *codec_name = g_strdup ("Microsoft MPEG-4 4.3");        /* FIXME? */

      return gst_caps_from_string ("video/x-msmpeg, msmpegversion = (int) 43");

    case GST_MAKE_FOURCC ('3', 'I', 'V', '1'):

    case GST_MAKE_FOURCC ('3', 'I', 'V', '2'):

      caps = gst_caps_new_simple ("video/x-3ivx", NULL);

      if (codec_name)

        *codec_name = g_strdup ("3ivx");

      break;

    case GST_MAKE_FOURCC ('D', 'V', 'S', 'D'):

    case GST_MAKE_FOURCC ('d', 'v', 's', 'd'):

    case GST_MAKE_FOURCC ('C', 'D', 'V', 'C'):

      caps = gst_caps_new_simple ("video/x-dv",

          "systemstream", G_TYPE_BOOLEAN, FALSE, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Generic DV");

      break;

    case GST_MAKE_FOURCC ('W', 'M', 'V', '1'):

      caps = gst_caps_new_simple ("video/x-wmv",

          "wmvversion", G_TYPE_INT, 1, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft Windows Media 7");

      break;

    case GST_MAKE_FOURCC ('W', 'M', 'V', '2'):

      caps = gst_caps_new_simple ("video/x-wmv",

          "wmvversion", G_TYPE_INT, 2, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft Windows Media 8");

      break;

    case GST_MAKE_FOURCC ('W', 'M', 'V', '3'):

      caps = gst_caps_new_simple ("video/x-wmv",

          "wmvversion", G_TYPE_INT, 3, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft Windows Media 9");

      break;

    case GST_MAKE_FOURCC ('W', 'M', 'V', 'A'):

      caps = gst_caps_new_simple ("video/x-wmv",

          "wmvversion", G_TYPE_INT, 3, "fourcc", GST_TYPE_FOURCC,

          codec_fcc, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft Windows Media Advanced Profile");

      break;

    case GST_MAKE_FOURCC ('W', 'V', 'C', '1'):

      caps = gst_caps_new_simple ("video/x-wmv",

          "wmvversion", G_TYPE_INT, 3, "fourcc", GST_TYPE_FOURCC,

          codec_fcc, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Microsoft Windows Media VC-1");

      break;

    case GST_MAKE_FOURCC ('c', 'v', 'i', 'd'):

      caps = gst_caps_new_simple ("video/x-cinepak", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Cinepak video");

      break;

    case GST_MAKE_FOURCC ('M', 'S', 'V', 'C'):

    case GST_MAKE_FOURCC ('m', 's', 'v', 'c'):

    case GST_MAKE_FOURCC ('C', 'R', 'A', 'M'):

    case GST_MAKE_FOURCC ('c', 'r', 'a', 'm'):

    case GST_MAKE_FOURCC ('W', 'H', 'A', 'M'):

    case GST_MAKE_FOURCC ('w', 'h', 'a', 'm'):

      caps = gst_caps_new_simple ("video/x-msvideocodec",

          "msvideoversion", G_TYPE_INT, 1, NULL);

      if (codec_name)

        *codec_name = g_strdup ("MS video v1");

      palette = strf_data;

      strf_data = NULL;

      break;

    case GST_MAKE_FOURCC ('R', 'L', 'E', ' '):

    case GST_MAKE_FOURCC ('m', 'r', 'l', 'e'):

    case GST_MAKE_FOURCC (0x1, 0x0, 0x0, 0x0): /* why, why, why? */

      caps = gst_caps_new_simple ("video/x-rle",

          "layout", G_TYPE_STRING, "microsoft", NULL);

      palette = strf_data;

      strf_data = NULL;

      if (strf) {

        gst_caps_set_simple (caps,

            "depth", G_TYPE_INT, (gint) strf->bit_cnt, NULL);

      } else {

        gst_caps_set_simple (caps, "depth", GST_TYPE_INT_RANGE, 1, 64, NULL);

      }

      if (codec_name)

        *codec_name = g_strdup ("Microsoft RLE");

      break;

    case GST_MAKE_FOURCC ('X', 'x', 'a', 'n'):

      caps = gst_caps_new_simple ("video/x-xan",

          "wcversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Xan Wing Commander 4");

      break;

    case GST_MAKE_FOURCC ('R', 'T', '2', '1'):

      caps = gst_caps_new_simple ("video/x-indeo",

          "indeoversion", G_TYPE_INT, 2, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Intel Video 2");

      break;

    case GST_MAKE_FOURCC ('I', 'V', '3', '1'):

    case GST_MAKE_FOURCC ('I', 'V', '3', '2'):

    case GST_MAKE_FOURCC ('i', 'v', '3', '1'):

    case GST_MAKE_FOURCC ('i', 'v', '3', '2'):

      caps = gst_caps_new_simple ("video/x-indeo",

          "indeoversion", G_TYPE_INT, 3, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Intel Video 3");

      break;

    case GST_MAKE_FOURCC ('I', 'V', '4', '1'):

    case GST_MAKE_FOURCC ('i', 'v', '4', '1'):

      caps = gst_caps_new_simple ("video/x-indeo",

          "indeoversion", G_TYPE_INT, 4, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Intel Video 4");

      break;

    case GST_MAKE_FOURCC ('I', 'V', '5', '0'):

      caps = gst_caps_new_simple ("video/x-indeo",

          "indeoversion", G_TYPE_INT, 5, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Intel Video 5");

      break;

    case GST_MAKE_FOURCC ('M', 'S', 'Z', 'H'):

      caps = gst_caps_new_simple ("video/x-mszh", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Lossless MSZH Video");

      break;

    case GST_MAKE_FOURCC ('Z', 'L', 'I', 'B'):

      caps = gst_caps_new_simple ("video/x-zlib", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Lossless zlib video");

      break;

    case GST_MAKE_FOURCC ('C', 'L', 'J', 'R'):

      caps = gst_caps_new_simple ("video/x-cirrus-logic-accupak", NULL);

      if (codec_name)

        *codec_name = g_strdup ("Cirrus Logipak AccuPak");

      break;

    case GST_MAKE_FOURCC ('C', 'Y', 'U', 'V'):

    case GST_MAKE_FOURCC ('c', 'y', 'u', 'v'):

      caps = gst_caps_new_simple ("video/x-compressed-yuv", NULL);

      if (codec_name)

        *codec_name = g_strdup ("CYUV Lossless");

      break;

    case GST_MAKE_FOURCC ('D', 'U', 'C', 'K'):

      caps = gst_caps_new_simple ("video/x-truemotion",

          "trueversion", G_TYPE_INT, 1, NULL);

      if (codec_name)

        *codec_name = g_strdup ("Duck Truemotion1");

      break;

    case GST_MAKE_FOURCC ('T', 'M', '2', '0'):

      caps = gst_caps_new_simple ("video/x-truemotion",

          "trueversion", G_TYPE_INT, 2, NULL);

      if (codec_name)

        *codec_name = g_strdup ("TrueMotion 2.0");

      break;

    case GST_MAKE_FOURCC ('V', 'P', '3', '0'):

    case GST_MAKE_FOURCC ('v', 'p', '3', '0'):

    case GST_MAKE_FOURCC ('V', 'P', '3', '1'):

    case GST_MAKE_FOURCC ('v', 'p', '3', '1'):

    case GST_MAKE_FOURCC ('V', 'P', '3', ' '):

      caps = gst_caps_new_simple ("video/x-vp3", NULL);