yop.c 6.79 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 23 24
 * Psygnosis YOP demuxer
 *
 * Copyright (C) 2010 Mohamed Naufal Basheer <naufal11@gmail.com>
 * derived from the code by
 * Copyright (C) 2009 Thomas P. Higdon <thomas.p.higdon@gmail.com>
 *
 * 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
 */

Justin Ruggles's avatar
Justin Ruggles committed
25
#include "libavutil/channel_layout.h"
26 27
#include "libavutil/intreadwrite.h"
#include "avformat.h"
28
#include "internal.h"
29 30 31 32 33 34 35 36 37 38 39 40 41

typedef struct yop_dec_context {
    AVPacket video_packet;

    int odd_frame;
    int frame_size;
    int audio_block_length;
    int palette_size;
} YopDecContext;

static int yop_probe(AVProbeData *probe_packet)
{
    if (AV_RB16(probe_packet->buf) == AV_RB16("YO")  &&
42 43
        probe_packet->buf[2]<10                      &&
        probe_packet->buf[3]<10                      &&
44 45 46
        probe_packet->buf[6]                         &&
        probe_packet->buf[7]                         &&
        !(probe_packet->buf[8] & 1)                  &&
47 48 49 50
        !(probe_packet->buf[10] & 1)                 &&
        AV_RL16(probe_packet->buf + 12 + 6) >= 920    &&
        AV_RL16(probe_packet->buf + 12 + 6) < probe_packet->buf[12] * 3 + 4 + probe_packet->buf[7] * 2048
    )
51 52 53 54 55
        return AVPROBE_SCORE_MAX * 3 / 4;

    return 0;
}

56
static int yop_read_header(AVFormatContext *s)
57 58
{
    YopDecContext *yop = s->priv_data;
59
    AVIOContext *pb  = s->pb;
60

61
    AVCodecParameters *audio_par, *video_par;
62 63 64 65
    AVStream *audio_stream, *video_stream;

    int frame_rate, ret;

66
    audio_stream = avformat_new_stream(s, NULL);
67
    video_stream = avformat_new_stream(s, NULL);
68 69
    if (!audio_stream || !video_stream)
        return AVERROR(ENOMEM);
70 71

    // Extra data that will be passed to the decoder
72
    if (ff_alloc_extradata(video_stream->codecpar, 8))
73 74 75
        return AVERROR(ENOMEM);

    // Audio
76 77 78 79 80 81
    audio_par                 = audio_stream->codecpar;
    audio_par->codec_type     = AVMEDIA_TYPE_AUDIO;
    audio_par->codec_id       = AV_CODEC_ID_ADPCM_IMA_APC;
    audio_par->channels       = 1;
    audio_par->channel_layout = AV_CH_LAYOUT_MONO;
    audio_par->sample_rate    = 22050;
82 83

    // Video
84 85 86
    video_par               = video_stream->codecpar;
    video_par->codec_type   = AVMEDIA_TYPE_VIDEO;
    video_par->codec_id     = AV_CODEC_ID_YOP;
87

88
    avio_skip(pb, 6);
89

90 91
    frame_rate              = avio_r8(pb);
    yop->frame_size         = avio_r8(pb) * 2048;
92 93
    video_par->width        = avio_rl16(pb);
    video_par->height       = avio_rl16(pb);
94 95 96

    video_stream->sample_aspect_ratio = (AVRational){1, 2};

97
    ret = avio_read(pb, video_par->extradata, 8);
98 99 100
    if (ret < 8)
        return ret < 0 ? ret : AVERROR_EOF;

101 102
    yop->palette_size       = video_par->extradata[0] * 3 + 4;
    yop->audio_block_length = AV_RL16(video_par->extradata + 6);
103

104
    video_par->bit_rate     = 8 * (yop->frame_size - yop->audio_block_length) * frame_rate;
105

106 107 108 109 110 111 112
    // 1840 samples per frame, 1 nibble per sample; hence 1840/2 = 920
    if (yop->audio_block_length < 920 ||
        yop->audio_block_length + yop->palette_size >= yop->frame_size) {
        av_log(s, AV_LOG_ERROR, "YOP has invalid header\n");
        return AVERROR_INVALIDDATA;
    }

113
    avio_seek(pb, 2048, SEEK_SET);
114

115
    avpriv_set_pts_info(video_stream, 32, 1, frame_rate);
116 117 118 119 120 121 122

    return 0;
}

static int yop_read_packet(AVFormatContext *s, AVPacket *pkt)
{
    YopDecContext *yop = s->priv_data;
123
    AVIOContext *pb  = s->pb;
124 125 126 127 128 129 130 131 132 133

    int ret;
    int actual_video_data_size = yop->frame_size -
                                 yop->audio_block_length - yop->palette_size;

    yop->video_packet.stream_index = 1;

    if (yop->video_packet.data) {
        *pkt                   =  yop->video_packet;
        yop->video_packet.data =  NULL;
134
        yop->video_packet.buf  =  NULL;
135 136
        yop->video_packet.size =  0;
        pkt->data[0]           =  yop->odd_frame;
137
        pkt->flags             |= AV_PKT_FLAG_KEY;
138 139 140 141 142 143 144 145
        yop->odd_frame         ^= 1;
        return pkt->size;
    }
    ret = av_new_packet(&yop->video_packet,
                        yop->frame_size - yop->audio_block_length);
    if (ret < 0)
        return ret;

146
    yop->video_packet.pos = avio_tell(pb);
147

148
    ret = avio_read(pb, yop->video_packet.data, yop->palette_size);
149 150 151 152 153 154 155 156 157 158 159 160 161 162
    if (ret < 0) {
        goto err_out;
    }else if (ret < yop->palette_size) {
        ret = AVERROR_EOF;
        goto err_out;
    }

    ret = av_get_packet(pb, pkt, 920);
    if (ret < 0)
        goto err_out;

    // Set position to the start of the frame
    pkt->pos = yop->video_packet.pos;

163
    avio_skip(pb, yop->audio_block_length - ret);
164

165
    ret = avio_read(pb, yop->video_packet.data + yop->palette_size,
166 167 168 169 170 171 172 173 174 175
                     actual_video_data_size);
    if (ret < 0)
        goto err_out;
    else if (ret < actual_video_data_size)
        av_shrink_packet(&yop->video_packet, yop->palette_size + ret);

    // Arbitrarily return the audio data first
    return yop->audio_block_length;

err_out:
176
    av_packet_unref(&yop->video_packet);
177 178 179 180 181 182
    return ret;
}

static int yop_read_close(AVFormatContext *s)
{
    YopDecContext *yop = s->priv_data;
183
    av_packet_unref(&yop->video_packet);
184 185 186 187 188 189 190 191 192 193 194 195 196
    return 0;
}

static int yop_read_seek(AVFormatContext *s, int stream_index,
                         int64_t timestamp, int flags)
{
    YopDecContext *yop = s->priv_data;
    int64_t frame_pos, pos_min, pos_max;
    int frame_count;

    if (!stream_index)
        return -1;

197
    pos_min        = s->internal->data_offset;
198
    pos_max        = avio_size(s->pb) - yop->frame_size;
199 200 201 202 203
    frame_count    = (pos_max - pos_min) / yop->frame_size;

    timestamp      = FFMAX(0, FFMIN(frame_count, timestamp));

    frame_pos      = timestamp * yop->frame_size + pos_min;
204 205 206 207

    if (avio_seek(s->pb, frame_pos, SEEK_SET) < 0)
        return -1;

208
    av_packet_unref(&yop->video_packet);
209 210 211 212 213
    yop->odd_frame = timestamp & 1;

    return 0;
}

214
AVInputFormat ff_yop_demuxer = {
215
    .name           = "yop",
216
    .long_name      = NULL_IF_CONFIG_SMALL("Psygnosis YOP"),
217 218 219 220 221 222
    .priv_data_size = sizeof(YopDecContext),
    .read_probe     = yop_probe,
    .read_header    = yop_read_header,
    .read_packet    = yop_read_packet,
    .read_close     = yop_read_close,
    .read_seek      = yop_read_seek,
223 224
    .extensions     = "yop",
    .flags          = AVFMT_GENERIC_INDEX,
225
};