← Back to branch summary

~diresu/blender/blender-command-port

« back to all changes in this revision

Viewing changes to extern/ffmpeg/libavformat/nuv.c

  • Committer: theeth
  • Date: 2008-10-14 16:52:04 UTC
  • Revision ID: vcs-imports@canonical.com-20081014165204-r32w2gm6s0osvdhn
copy back trunk

Show diffs side-by-side

added added

removed removed

Lines of Context:
extern/ffmpeg/libavformat/nuv.c
 
1
/*
 
2
 * NuppelVideo demuxer.
 
3
 * Copyright (c) 2006 Reimar Doeffinger.
 
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
#include "avformat.h"
 
22
#include "riff.h"
 
23
 
 
24
typedef struct {
 
25
    int v_id;
 
26
    int a_id;
 
27
    int rtjpg_video;
 
28
} NUVContext;
 
29
 
 
30
typedef enum {
 
31
    NUV_VIDEO = 'V',
 
32
    NUV_EXTRADATA = 'D',
 
33
    NUV_AUDIO = 'A',
 
34
    NUV_SEEKP = 'R',
 
35
    NUV_MYTHEXT = 'X'
 
36
} frametype_t;
 
37
 
 
38
static int nuv_probe(AVProbeData *p) {
 
39
    if (!memcmp(p->buf, "NuppelVideo", 12))
 
40
        return AVPROBE_SCORE_MAX;
 
41
    if (!memcmp(p->buf, "MythTVVideo", 12))
 
42
        return AVPROBE_SCORE_MAX;
 
43
    return 0;
 
44
}
 
45
 
 
46
//! little macro to sanitize packet size
 
47
#define PKTSIZE(s) (s &  0xffffff)
 
48
 
 
49
/**
 
50
 * \brief read until we found all data needed for decoding
 
51
 * \param vst video stream of which to change parameters
 
52
 * \param ast video stream of which to change parameters
 
53
 * \param myth set if this is a MythTVVideo format file
 
54
 * \return 1 if all required codec data was found
 
55
 */
 
56
static int get_codec_data(ByteIOContext *pb, AVStream *vst,
 
57
                          AVStream *ast, int myth) {
 
58
    frametype_t frametype;
 
59
    if (!vst && !myth)
 
60
        return 1; // no codec data needed
 
61
    while (!url_feof(pb)) {
 
62
        int size, subtype;
 
63
        frametype = get_byte(pb);
 
64
        switch (frametype) {
 
65
            case NUV_EXTRADATA:
 
66
                subtype = get_byte(pb);
 
67
                url_fskip(pb, 6);
 
68
                size = PKTSIZE(get_le32(pb));
 
69
                if (vst && subtype == 'R') {
 
70
                    vst->codec->extradata_size = size;
 
71
                    vst->codec->extradata = av_malloc(size);
 
72
                    get_buffer(pb, vst->codec->extradata, size);
 
73
                    size = 0;
 
74
                    if (!myth)
 
75
                        return 1;
 
76
                }
 
77
                break;
 
78
            case NUV_MYTHEXT:
 
79
                url_fskip(pb, 7);
 
80
                size = PKTSIZE(get_le32(pb));
 
81
                if (size != 128 * 4)
 
82
                    break;
 
83
                get_le32(pb); // version
 
84
                if (vst) {
 
85
                    vst->codec->codec_tag = get_le32(pb);
 
86
                    vst->codec->codec_id =
 
87
                        codec_get_id(codec_bmp_tags, vst->codec->codec_tag);
 
88
                    if (vst->codec->codec_tag == MKTAG('R', 'J', 'P', 'G'))
 
89
                        vst->codec->codec_id = CODEC_ID_NUV;
 
90
                } else
 
91
                    url_fskip(pb, 4);
 
92
 
 
93
                if (ast) {
 
94
                    ast->codec->codec_tag = get_le32(pb);
 
95
                    ast->codec->sample_rate = get_le32(pb);
 
96
                    ast->codec->bits_per_sample = get_le32(pb);
 
97
                    ast->codec->channels = get_le32(pb);
 
98
                    ast->codec->codec_id =
 
99
                        wav_codec_get_id(ast->codec->codec_tag,
 
100
                                         ast->codec->bits_per_sample);
 
101
                    ast->need_parsing = AVSTREAM_PARSE_FULL;
 
102
                } else
 
103
                    url_fskip(pb, 4 * 4);
 
104
 
 
105
                size -= 6 * 4;
 
106
                url_fskip(pb, size);
 
107
                return 1;
 
108
            case NUV_SEEKP:
 
109
                size = 11;
 
110
                break;
 
111
            default:
 
112
                url_fskip(pb, 7);
 
113
                size = PKTSIZE(get_le32(pb));
 
114
                break;
 
115
        }
 
116
        url_fskip(pb, size);
 
117
    }
 
118
    return 0;
 
119
}
 
120
 
 
121
static int nuv_header(AVFormatContext *s, AVFormatParameters *ap) {
 
122
    NUVContext *ctx = s->priv_data;
 
123
    ByteIOContext *pb = &s->pb;
 
124
    char id_string[12], version_string[5];
 
125
    double aspect, fps;
 
126
    int is_mythtv, width, height, v_packs, a_packs;
 
127
    int stream_nr = 0;
 
128
    AVStream *vst = NULL, *ast = NULL;
 
129
    get_buffer(pb, id_string, 12);
 
130
    is_mythtv = !memcmp(id_string, "MythTVVideo", 12);
 
131
    get_buffer(pb, version_string, 5);
 
132
    url_fskip(pb, 3); // padding
 
133
    width = get_le32(pb);
 
134
    height = get_le32(pb);
 
135
    get_le32(pb); // unused, "desiredwidth"
 
136
    get_le32(pb); // unused, "desiredheight"
 
137
    get_byte(pb); // 'P' == progressive, 'I' == interlaced
 
138
    url_fskip(pb, 3); // padding
 
139
    aspect = av_int2dbl(get_le64(pb));
 
140
    fps = av_int2dbl(get_le64(pb));
 
141
 
 
142
    // number of packets per stream type, -1 means unknown, e.g. streaming
 
143
    v_packs = get_le32(pb);
 
144
    a_packs = get_le32(pb);
 
145
    get_le32(pb); // text
 
146
 
 
147
    get_le32(pb); // keyframe distance (?)
 
148
 
 
149
    if (v_packs) {
 
150
        ctx->v_id = stream_nr++;
 
151
        vst = av_new_stream(s, ctx->v_id);
 
152
        vst->codec->codec_type = CODEC_TYPE_VIDEO;
 
153
        vst->codec->codec_id = CODEC_ID_NUV;
 
154
        vst->codec->width = width;
 
155
        vst->codec->height = height;
 
156
        vst->codec->bits_per_sample = 10;
 
157
        vst->codec->sample_aspect_ratio = av_d2q(aspect, 10000);
 
158
        vst->r_frame_rate = av_d2q(fps, 60000);
 
159
        av_set_pts_info(vst, 32, 1, 1000);
 
160
    } else
 
161
        ctx->v_id = -1;
 
162
 
 
163
    if (a_packs) {
 
164
        ctx->a_id = stream_nr++;
 
165
        ast = av_new_stream(s, ctx->a_id);
 
166
        ast->codec->codec_type = CODEC_TYPE_AUDIO;
 
167
        ast->codec->codec_id = CODEC_ID_PCM_S16LE;
 
168
        ast->codec->channels = 2;
 
169
        ast->codec->sample_rate = 44100;
 
170
        ast->codec->bit_rate = 2 * 2 * 44100 * 8;
 
171
        ast->codec->block_align = 2 * 2;
 
172
        ast->codec->bits_per_sample = 16;
 
173
        av_set_pts_info(ast, 32, 1, 1000);
 
174
    } else
 
175
        ctx->a_id = -1;
 
176
 
 
177
    get_codec_data(pb, vst, ast, is_mythtv);
 
178
    ctx->rtjpg_video = vst->codec->codec_id == CODEC_ID_NUV;
 
179
    return 0;
 
180
}
 
181
 
 
182
#define HDRSIZE 12
 
183
 
 
184
static int nuv_packet(AVFormatContext *s, AVPacket *pkt) {
 
185
    NUVContext *ctx = s->priv_data;
 
186
    ByteIOContext *pb = &s->pb;
 
187
    uint8_t hdr[HDRSIZE];
 
188
    frametype_t frametype;
 
189
    int ret, size;
 
190
    while (!url_feof(pb)) {
 
191
        int copyhdrsize = ctx->rtjpg_video ? HDRSIZE : 0;
 
192
        ret = get_buffer(pb, hdr, HDRSIZE);
 
193
        if (ret <= 0)
 
194
            return ret ? ret : -1;
 
195
        frametype = hdr[0];
 
196
        size = PKTSIZE(AV_RL32(&hdr[8]));
 
197
        switch (frametype) {
 
198
            case NUV_EXTRADATA:
 
199
                if (!ctx->rtjpg_video) {
 
200
                    url_fskip(pb, size);
 
201
                    break;
 
202
                }
 
203
            case NUV_VIDEO:
 
204
                if (ctx->v_id < 0) {
 
205
                    av_log(s, AV_LOG_ERROR, "Video packet in file without video stream!\n");
 
206
                    url_fskip(pb, size);
 
207
                    break;
 
208
                }
 
209
                ret = av_new_packet(pkt, copyhdrsize + size);
 
210
                if (ret < 0)
 
211
                    return ret;
 
212
                pkt->pos = url_ftell(pb) - copyhdrsize;
 
213
                pkt->pts = AV_RL32(&hdr[4]);
 
214
                pkt->stream_index = ctx->v_id;
 
215
                memcpy(pkt->data, hdr, copyhdrsize);
 
216
                ret = get_buffer(pb, pkt->data + copyhdrsize, size);
 
217
                return ret;
 
218
            case NUV_AUDIO:
 
219
                if (ctx->a_id < 0) {
 
220
                    av_log(s, AV_LOG_ERROR, "Audio packet in file without audio stream!\n");
 
221
                    url_fskip(pb, size);
 
222
                    break;
 
223
                }
 
224
                ret = av_get_packet(pb, pkt, size);
 
225
                pkt->pts = AV_RL32(&hdr[4]);
 
226
                pkt->stream_index = ctx->a_id;
 
227
                return ret;
 
228
            case NUV_SEEKP:
 
229
                // contains no data, size value is invalid
 
230
                break;
 
231
            default:
 
232
                url_fskip(pb, size);
 
233
                break;
 
234
        }
 
235
    }
 
236
    return AVERROR(EIO);
 
237
}
 
238
 
 
239
AVInputFormat nuv_demuxer = {
 
240
    "nuv",
 
241
    "NuppelVideo format",
 
242
    sizeof(NUVContext),
 
243
    nuv_probe,
 
244
    nuv_header,
 
245
    nuv_packet,
 
246
    NULL,
 
247
    NULL,
 
248
};