BMV demuxer and decoder
[ffmpeg.git] / libavformat / bmv.c
1 /*
2  * Discworld II BMV demuxer
3  * Copyright (c) 2011 Konstantin Shishkov.
4  *
5  * This file is part of Libav.
6  *
7  * Libav is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * Libav is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "avformat.h"
23
24 enum BMVFlags {
25     BMV_NOP = 0,
26     BMV_END,
27     BMV_DELTA,
28     BMV_INTRA,
29
30     BMV_AUDIO   = 0x20,
31 };
32
33 typedef struct BMVContext {
34     uint8_t *packet;
35     int      size;
36     int      get_next;
37     int64_t  audio_pos;
38 } BMVContext;
39
40 static int bmv_read_header(AVFormatContext *s, AVFormatParameters *ap)
41 {
42     AVStream *st, *ast;
43     BMVContext *c = s->priv_data;
44
45     st = avformat_new_stream(s, 0);
46     if (!st)
47         return AVERROR(ENOMEM);
48     st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
49     st->codec->codec_id   = CODEC_ID_BMV_VIDEO;
50     st->codec->width      = 640;
51     st->codec->height     = 429;
52     st->codec->pix_fmt    = PIX_FMT_PAL8;
53     av_set_pts_info(st, 16, 1, 12);
54     ast = avformat_new_stream(s, 0);
55     if (!ast)
56         return AVERROR(ENOMEM);
57     ast->codec->codec_type      = AVMEDIA_TYPE_AUDIO;
58     ast->codec->codec_id        = CODEC_ID_BMV_AUDIO;
59     ast->codec->channels        = 2;
60     ast->codec->sample_rate     = 22050;
61     av_set_pts_info(ast, 16, 1, 22050);
62
63     c->get_next  = 1;
64     c->audio_pos = 0;
65     return 0;
66 }
67
68 static int bmv_read_packet(AVFormatContext *s, AVPacket *pkt)
69 {
70     BMVContext *c = s->priv_data;
71     int type;
72     void *tmp;
73
74     while (c->get_next) {
75         if (s->pb->eof_reached)
76             return AVERROR_EOF;
77         type = avio_r8(s->pb);
78         if (type == BMV_NOP)
79             continue;
80         if (type == BMV_END)
81             return AVERROR_EOF;
82         c->size = avio_rl24(s->pb);
83         if (!c->size)
84             return AVERROR_INVALIDDATA;
85         tmp = av_realloc(c->packet, c->size + 1);
86         if (!tmp)
87             return AVERROR(ENOMEM);
88         c->packet = tmp;
89         c->packet[0] = type;
90         if (avio_read(s->pb, c->packet + 1, c->size) != c->size)
91             return AVERROR(EIO);
92         if (type & BMV_AUDIO) {
93             int audio_size = c->packet[1] * 65 + 1;
94             if (audio_size >= c->size) {
95                 av_log(s, AV_LOG_ERROR, "Reported audio size %d is bigger than packet size (%d)\n",
96                        audio_size, c->size);
97                 return AVERROR_INVALIDDATA;
98             }
99             if (av_new_packet(pkt, audio_size) < 0)
100                 return AVERROR(ENOMEM);
101             memcpy(pkt->data, c->packet + 1, pkt->size);
102             pkt->stream_index = 1;
103             pkt->pts          = c->audio_pos;
104             pkt->duration     = c->packet[1] * 32;
105             c->audio_pos += pkt->duration;
106             c->get_next   = 0;
107             return pkt->size;
108         } else
109             break;
110     }
111     if (av_new_packet(pkt, c->size + 1) < 0)
112         return AVERROR(ENOMEM);
113     pkt->stream_index = 0;
114     c->get_next = 1;
115     memcpy(pkt->data, c->packet, pkt->size);
116     return pkt->size;
117 }
118
119 static int bmv_read_close(AVFormatContext *s)
120 {
121     BMVContext *c = s->priv_data;
122
123     av_freep(&c->packet);
124
125     return 0;
126 }
127
128 AVInputFormat ff_bmv_demuxer = {
129     .name           = "bmv",
130     .long_name      = NULL_IF_CONFIG_SMALL("Discworld II BMV"),
131     .priv_data_size = sizeof(BMVContext),
132     .read_header    = bmv_read_header,
133     .read_packet    = bmv_read_packet,
134     .read_close     = bmv_read_close,
135     .extensions     = "bmv"
136 };