yop.c 6.92 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 62 63 64 65

    AVCodecContext *audio_dec, *video_dec;
    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 72 73 74 75 76 77 78 79 80 81

    // Extra data that will be passed to the decoder
    video_stream->codec->extradata_size = 8;

    video_stream->codec->extradata = av_mallocz(video_stream->codec->extradata_size +
                                                FF_INPUT_BUFFER_PADDING_SIZE);

    if (!video_stream->codec->extradata)
        return AVERROR(ENOMEM);

    // Audio
    audio_dec               = audio_stream->codec;
82
    audio_dec->codec_type   = AVMEDIA_TYPE_AUDIO;
83
    audio_dec->codec_id     = AV_CODEC_ID_ADPCM_IMA_APC;
84
    audio_dec->channels     = 1;
Paul B Mahol's avatar
Paul B Mahol committed
85
    audio_dec->channel_layout = AV_CH_LAYOUT_MONO;
86 87 88 89
    audio_dec->sample_rate  = 22050;

    // Video
    video_dec               = video_stream->codec;
90
    video_dec->codec_type   = AVMEDIA_TYPE_VIDEO;
91
    video_dec->codec_id     = AV_CODEC_ID_YOP;
92

93
    avio_skip(pb, 6);
94

95 96 97 98
    frame_rate              = avio_r8(pb);
    yop->frame_size         = avio_r8(pb) * 2048;
    video_dec->width        = avio_rl16(pb);
    video_dec->height       = avio_rl16(pb);
99 100 101

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

102
    ret = avio_read(pb, video_dec->extradata, 8);
103 104 105 106 107 108
    if (ret < 8)
        return ret < 0 ? ret : AVERROR_EOF;

    yop->palette_size       = video_dec->extradata[0] * 3 + 4;
    yop->audio_block_length = AV_RL16(video_dec->extradata + 6);

109 110
    video_dec->bit_rate     = 8 * (yop->frame_size - yop->audio_block_length) * frame_rate;

111 112 113 114 115 116 117
    // 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;
    }

118
    avio_seek(pb, 2048, SEEK_SET);
119

120
    avpriv_set_pts_info(video_stream, 32, 1, frame_rate);
121 122 123 124 125 126 127

    return 0;
}

static int yop_read_packet(AVFormatContext *s, AVPacket *pkt)
{
    YopDecContext *yop = s->priv_data;
128
    AVIOContext *pb  = s->pb;
129 130 131 132 133 134 135 136 137 138 139 140

    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;
        yop->video_packet.size =  0;
        pkt->data[0]           =  yop->odd_frame;
141
        pkt->flags             |= AV_PKT_FLAG_KEY;
142 143 144 145 146 147 148 149
        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;

150
    yop->video_packet.pos = avio_tell(pb);
151

152
    ret = avio_read(pb, yop->video_packet.data, yop->palette_size);
153 154 155 156 157 158 159 160 161 162 163 164 165 166
    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;

167
    avio_skip(pb, yop->audio_block_length - ret);
168

169
    ret = avio_read(pb, yop->video_packet.data + yop->palette_size,
170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201
                     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:
    av_free_packet(&yop->video_packet);
    return ret;
}

static int yop_read_close(AVFormatContext *s)
{
    YopDecContext *yop = s->priv_data;
    av_free_packet(&yop->video_packet);
    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;

    pos_min        = s->data_offset;
202
    pos_max        = avio_size(s->pb) - yop->frame_size;
203 204 205 206 207
    frame_count    = (pos_max - pos_min) / yop->frame_size;

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

    frame_pos      = timestamp * yop->frame_size + pos_min;
208 209 210 211 212

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

    av_free_packet(&yop->video_packet);
213 214 215 216 217
    yop->odd_frame = timestamp & 1;

    return 0;
}

218
AVInputFormat ff_yop_demuxer = {
219
    .name           = "yop",
220
    .long_name      = NULL_IF_CONFIG_SMALL("Psygnosis YOP"),
221 222 223 224 225 226
    .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,
227 228
    .extensions     = "yop",
    .flags          = AVFMT_GENERIC_INDEX,
229
};