Parenthesize correctly in TMV probe
[ffmpeg.git] / libavformat / tmv.c
1 /*
2  * 8088flex TMV file demuxer
3  * Copyright (c) 2009 Daniel Verkamp <daniel at drv.nu>
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg 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  * FFmpeg 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 FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * 8088flex TMV file demuxer
24  * @file libavformat/tmv.c
25  * @author Daniel Verkamp
26  * @sa http://www.oldskool.org/pc/8088_Corruption
27  */
28
29 #include "libavutil/intreadwrite.h"
30 #include "avformat.h"
31
32 enum {
33     TMV_PADDING = 0x01,
34     TMV_STEREO  = 0x02,
35 };
36
37 #define TMV_TAG MKTAG('T', 'M', 'A', 'V')
38
39 typedef struct TMVContext {
40     unsigned audio_chunk_size;
41     unsigned video_chunk_size;
42     unsigned padding;
43     unsigned stream_index;
44 } TMVContext;
45
46 #define PROBE_MIN_SAMPLE_RATE 5000
47 #define PROBE_MAX_FPS         120
48 #define PROBE_MIN_AUDIO_SIZE  (PROBE_MIN_SAMPLE_RATE / PROBE_MAX_FPS)
49
50 static int tmv_probe(AVProbeData *p)
51 {
52     if (AV_RL32(p->buf)   == TMV_TAG &&
53         AV_RL16(p->buf+4) >= PROBE_MIN_SAMPLE_RATE &&
54         AV_RL16(p->buf+6) >= PROBE_MIN_AUDIO_SIZE  &&
55                !p->buf[8] && // compression method
56                 p->buf[9] && // char cols
57                 p->buf[10])  // char rows
58         return AVPROBE_SCORE_MAX /
59             ((p->buf[9] == 40 && p->buf[10] == 25) ? 1 : 4);
60     return 0;
61 }
62
63 static int tmv_read_header(AVFormatContext *s, AVFormatParameters *ap)
64 {
65     TMVContext *tmv   = s->priv_data;
66     ByteIOContext *pb = s->pb;
67     AVStream *vst, *ast;
68     AVRational fps;
69     unsigned comp_method, char_cols, char_rows, features;
70
71     if (get_le32(pb) != TMV_TAG)
72         return -1;
73
74     if (!(vst = av_new_stream(s, 0)))
75         return AVERROR(ENOMEM);
76
77     if (!(ast = av_new_stream(s, 0)))
78         return AVERROR(ENOMEM);
79
80     ast->codec->sample_rate = get_le16(pb);
81     if (!ast->codec->sample_rate) {
82         av_log(s, AV_LOG_ERROR, "invalid sample rate\n");
83         return -1;
84     }
85
86     tmv->audio_chunk_size   = get_le16(pb);
87     if (!tmv->audio_chunk_size) {
88         av_log(s, AV_LOG_ERROR, "invalid audio chunk size\n");
89         return -1;
90     }
91
92     comp_method             = get_byte(pb);
93     if (comp_method) {
94         av_log(s, AV_LOG_ERROR, "unsupported compression method %d\n",
95                comp_method);
96         return -1;
97     }
98
99     char_cols = get_byte(pb);
100     char_rows = get_byte(pb);
101     tmv->video_chunk_size = char_cols * char_rows * 2;
102
103     features  = get_byte(pb);
104     if (features & ~(TMV_PADDING | TMV_STEREO)) {
105         av_log(s, AV_LOG_ERROR, "unsupported features 0x%02x\n",
106                features & ~(TMV_PADDING | TMV_STEREO));
107         return -1;
108     }
109
110     ast->codec->codec_type            = CODEC_TYPE_AUDIO;
111     ast->codec->codec_id              = CODEC_ID_PCM_U8;
112     ast->codec->sample_fmt            = SAMPLE_FMT_U8;
113     ast->codec->channels              = features & TMV_STEREO ? 2 : 1;
114     ast->codec->bits_per_coded_sample = 8;
115     ast->codec->bit_rate              = ast->codec->sample_rate *
116                                         ast->codec->bits_per_coded_sample;
117     av_set_pts_info(ast, 32, 1, ast->codec->sample_rate);
118
119     fps.num = ast->codec->sample_rate * ast->codec->channels;
120     fps.den = tmv->audio_chunk_size;
121     av_reduce(&fps.num, &fps.den, fps.num, fps.den, 0xFFFFFFFFLL);
122
123     vst->codec->codec_type = CODEC_TYPE_VIDEO;
124     vst->codec->codec_id   = CODEC_ID_TMV;
125     vst->codec->pix_fmt    = PIX_FMT_PAL8;
126     vst->codec->width      = char_cols * 8;
127     vst->codec->height     = char_rows * 8;
128     av_set_pts_info(vst, 32, fps.den, fps.num);
129
130     if (features & TMV_PADDING)
131         tmv->padding =
132             ((tmv->video_chunk_size + tmv->audio_chunk_size + 511) & ~511) -
133              (tmv->video_chunk_size + tmv->audio_chunk_size);
134
135     vst->codec->bit_rate = ((tmv->video_chunk_size + tmv->padding) *
136                             fps.num * 8) / fps.den;
137
138     return 0;
139 }
140
141 static int tmv_read_packet(AVFormatContext *s, AVPacket *pkt)
142 {
143     TMVContext *tmv   = s->priv_data;
144     ByteIOContext *pb = s->pb;
145     int ret, pkt_size = tmv->stream_index ?
146                         tmv->audio_chunk_size : tmv->video_chunk_size;
147
148     if (url_feof(pb))
149         return AVERROR_EOF;
150
151     ret = av_get_packet(pb, pkt, pkt_size);
152
153     if (tmv->stream_index)
154         url_fskip(pb, tmv->padding);
155
156     pkt->stream_index  = tmv->stream_index;
157     tmv->stream_index ^= 1;
158     pkt->flags        |= PKT_FLAG_KEY;
159
160     return ret;
161 }
162
163 AVInputFormat tmv_demuxer = {
164     "tmv",
165     NULL_IF_CONFIG_SMALL("8088flex TMV"),
166     sizeof(TMVContext),
167     tmv_probe,
168     tmv_read_header,
169     tmv_read_packet,
170     .flags = AVFMT_GENERIC_INDEX,
171 };