pva.c 7.01 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
/*
 * TechnoTrend PVA (.pva) demuxer
 * Copyright (c) 2007, 2008 Ivo van Poorten
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * FFmpeg 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "avformat.h"
23
#include "internal.h"
24
#include "mpeg.h"
25 26 27 28 29 30 31 32 33 34

#define PVA_MAX_PAYLOAD_LENGTH  0x17f8
#define PVA_VIDEO_PAYLOAD       0x01
#define PVA_AUDIO_PAYLOAD       0x02
#define PVA_MAGIC               (('A' << 8) + 'V')

typedef struct {
    int continue_pes;
} PVAContext;

35 36 37 38 39 40 41 42
static int pva_check(uint8_t *p) {
    int length = AV_RB16(p + 6);
    if (AV_RB16(p) != PVA_MAGIC || !p[2] || p[2] > 2 || p[4] != 0x55 ||
        (p[5] & 0xe0) || length > PVA_MAX_PAYLOAD_LENGTH)
        return -1;
    return length + 8;
}

43 44
static int pva_probe(AVProbeData * pd) {
    unsigned char *buf = pd->buf;
45 46 47 48
    int len = pva_check(buf);

    if (len < 0)
        return 0;
49

50 51
    if (pd->buf_size >= len + 8 &&
        pva_check(buf + len) >= 0)
52 53
        return AVPROBE_SCORE_MAX / 2;

54
    return AVPROBE_SCORE_MAX / 4;
55 56 57 58 59
}

static int pva_read_header(AVFormatContext *s, AVFormatParameters *ap) {
    AVStream *st;

60
    if (!(st = avformat_new_stream(s, NULL)))
61
        return AVERROR(ENOMEM);
62
    st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
63 64
    st->codec->codec_id   = CODEC_ID_MPEG2VIDEO;
    st->need_parsing      = AVSTREAM_PARSE_FULL;
65
    avpriv_set_pts_info(st, 32, 1, 90000);
66
    av_add_index_entry(st, 0, 0, 0, 0, AVINDEX_KEYFRAME);
67

68
    if (!(st = avformat_new_stream(s, NULL)))
69
        return AVERROR(ENOMEM);
70
    st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
71
    st->codec->codec_id   = CODEC_ID_MP2;
72
    st->need_parsing      = AVSTREAM_PARSE_FULL;
73
    avpriv_set_pts_info(st, 33, 1, 90000);
74
    av_add_index_entry(st, 0, 0, 0, 0, AVINDEX_KEYFRAME);
75 76 77 78 79

    /* the parameters will be extracted from the compressed bitstream */
    return 0;
}

80 81 82 83
#define pva_log if (read_packet) av_log

static int read_part_of_packet(AVFormatContext *s, int64_t *pts,
                               int *len, int *strid, int read_packet) {
84
    AVIOContext *pb = s->pb;
85
    PVAContext *pvactx = s->priv_data;
86 87
    int syncword, streamid, reserved, flags, length, pts_flag;
    int64_t pva_pts = AV_NOPTS_VALUE, startpos;
88

89
recover:
90
    startpos = avio_tell(pb);
91

92 93 94 95 96 97
    syncword = avio_rb16(pb);
    streamid = avio_r8(pb);
    avio_r8(pb);               /* counter not used */
    reserved = avio_r8(pb);
    flags    = avio_r8(pb);
    length   = avio_rb16(pb);
98

99
    pts_flag = flags & 0x10;
100 101

    if (syncword != PVA_MAGIC) {
102
        pva_log(s, AV_LOG_ERROR, "invalid syncword\n");
103 104
        return AVERROR(EIO);
    }
105
    if (streamid != PVA_VIDEO_PAYLOAD && streamid != PVA_AUDIO_PAYLOAD) {
106
        pva_log(s, AV_LOG_ERROR, "invalid streamid\n");
107 108
        return AVERROR(EIO);
    }
109
    if (reserved != 0x55) {
110
        pva_log(s, AV_LOG_WARNING, "expected reserved byte to be 0x55\n");
111 112
    }
    if (length > PVA_MAX_PAYLOAD_LENGTH) {
113
        pva_log(s, AV_LOG_ERROR, "invalid payload length %u\n", length);
114 115 116 117
        return AVERROR(EIO);
    }

    if (streamid == PVA_VIDEO_PAYLOAD && pts_flag) {
118
        pva_pts = avio_rb32(pb);
119 120 121 122 123 124 125 126 127 128 129
        length -= 4;
    } else if (streamid == PVA_AUDIO_PAYLOAD) {
        /* PVA Audio Packets either start with a signaled PES packet or
         * are a continuation of the previous PES packet. New PES packets
         * always start at the beginning of a PVA Packet, never somewhere in
         * the middle. */
        if (!pvactx->continue_pes) {
            int pes_signal, pes_header_data_length, pes_packet_length,
                pes_flags;
            unsigned char pes_header_data[256];

130 131 132 133 134
            pes_signal             = avio_rb24(pb);
            avio_r8(pb);
            pes_packet_length      = avio_rb16(pb);
            pes_flags              = avio_rb16(pb);
            pes_header_data_length = avio_r8(pb);
135 136

            if (pes_signal != 1) {
137
                pva_log(s, AV_LOG_WARNING, "expected signaled PES packet, "
138
                                          "trying to recover\n");
139
                avio_skip(pb, length - 9);
140 141
                if (!read_packet)
                    return AVERROR(EIO);
142
                goto recover;
143 144
            }

145
            avio_read(pb, pes_header_data, pes_header_data_length);
146 147 148 149 150 151
            length -= 9 + pes_header_data_length;

            pes_packet_length -= 3 + pes_header_data_length;

            pvactx->continue_pes = pes_packet_length;

152 153
            if (pes_flags & 0x80 && (pes_header_data[0] & 0xf0) == 0x20)
                pva_pts = ff_parse_pes_pts(pes_header_data);
154 155 156 157 158
        }

        pvactx->continue_pes -= length;

        if (pvactx->continue_pes < 0) {
159
            pva_log(s, AV_LOG_WARNING, "audio data corruption\n");
160 161 162 163
            pvactx->continue_pes = 0;
        }
    }

164 165 166 167 168 169 170 171 172 173
    if (pva_pts != AV_NOPTS_VALUE)
        av_add_index_entry(s->streams[streamid-1], startpos, pva_pts, 0, 0, AVINDEX_KEYFRAME);

    *pts   = pva_pts;
    *len   = length;
    *strid = streamid;
    return 0;
}

static int pva_read_packet(AVFormatContext *s, AVPacket *pkt) {
174
    AVIOContext *pb = s->pb;
175 176 177 178 179
    int64_t pva_pts;
    int ret, length, streamid;

    if (read_part_of_packet(s, &pva_pts, &length, &streamid, 1) < 0 ||
       (ret = av_get_packet(pb, pkt, length)) <= 0)
180 181 182
        return AVERROR(EIO);

    pkt->stream_index = streamid - 1;
Ivo van Poorten's avatar
Ivo van Poorten committed
183
    pkt->pts = pva_pts;
184 185 186 187

    return ret;
}

188 189
static int64_t pva_read_timestamp(struct AVFormatContext *s, int stream_index,
                                          int64_t *pos, int64_t pos_limit) {
190
    AVIOContext *pb = s->pb;
191 192
    PVAContext *pvactx = s->priv_data;
    int length, streamid;
193
    int64_t res = AV_NOPTS_VALUE;
194 195 196 197 198

    pos_limit = FFMIN(*pos+PVA_MAX_PAYLOAD_LENGTH*8, (uint64_t)*pos+pos_limit);

    while (*pos < pos_limit) {
        res = AV_NOPTS_VALUE;
199
        avio_seek(pb, *pos, SEEK_SET);
200 201 202 203 204 205 206

        pvactx->continue_pes = 0;
        if (read_part_of_packet(s, &res, &length, &streamid, 0)) {
            (*pos)++;
            continue;
        }
        if (streamid - 1 != stream_index || res == AV_NOPTS_VALUE) {
207
            *pos = avio_tell(pb) + length;
208 209 210 211 212 213 214 215 216
            continue;
        }
        break;
    }

    pvactx->continue_pes = 0;
    return res;
}

217
AVInputFormat ff_pva_demuxer = {
218 219 220 221 222 223
    .name           = "pva",
    .long_name      = NULL_IF_CONFIG_SMALL("TechnoTrend PVA file and stream format"),
    .priv_data_size = sizeof(PVAContext),
    .read_probe     = pva_probe,
    .read_header    = pva_read_header,
    .read_packet    = pva_read_packet,
224
    .read_timestamp = pva_read_timestamp
225
};