libavformat/yop.c

   1 /*
   2  * Psygnosis YOP demuxer
   3  *
   4  * Copyright (C) 2010 Mohamed Naufal Basheer <naufal11@gmail.com>
   5  * derived from the code by
   6  * Copyright (C) 2009 Thomas P. Higdon <thomas.p.higdon@gmail.com>
   7  *
   8  * This file is part of FFmpeg.
   9  *
  10  * FFmpeg is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU Lesser General Public
  12  * License as published by the Free Software Foundation; either
  13  * version 2.1 of the License, or (at your option) any later version.
  14  *
  15  * FFmpeg is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  * Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public
  21  * License along with FFmpeg; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  23  */
  24
  25 #include "libavutil/intreadwrite.h"
  26 #include "avformat.h"
  27
  28 typedef struct yop_dec_context {
  29     AVPacket video_packet;
  30
  31     int odd_frame;
  32     int frame_size;
  33     int audio_block_length;
  34     int palette_size;
  35 } YopDecContext;
  36
  37 static int yop_probe(AVProbeData *probe_packet)
  38 {
  39     if (AV_RB16(probe_packet->buf) == AV_RB16("YO")  &&
  40         probe_packet->buf[6]                         &&
  41         probe_packet->buf[7]                         &&
  42         !(probe_packet->buf[8] & 1)                  &&
  43         !(probe_packet->buf[10] & 1))
  44         return AVPROBE_SCORE_MAX * 3 / 4;
  45
  46     return 0;
  47 }
  48
  49 static int yop_read_header(AVFormatContext *s, AVFormatParameters *ap)
  50 {
  51     YopDecContext *yop = s->priv_data;
  52     AVIOContext *pb  = s->pb;
  53
  54     AVCodecContext *audio_dec, *video_dec;
  55     AVStream *audio_stream, *video_stream;
  56
  57     int frame_rate, ret;
  58
  59     audio_stream = av_new_stream(s, 0);
  60     video_stream = av_new_stream(s, 1);
  61
  62     // Extra data that will be passed to the decoder
  63     video_stream->codec->extradata_size = 8;
  64
  65     video_stream->codec->extradata = av_mallocz(video_stream->codec->extradata_size +
  66                                                 FF_INPUT_BUFFER_PADDING_SIZE);
  67
  68     if (!video_stream->codec->extradata)
  69         return AVERROR(ENOMEM);
  70
  71     // Audio
  72     audio_dec               = audio_stream->codec;
  73     audio_dec->codec_type   = AVMEDIA_TYPE_AUDIO;
  74     audio_dec->codec_id     = CODEC_ID_ADPCM_IMA_WS;
  75     audio_dec->channels     = 1;
  76     audio_dec->sample_rate  = 22050;
  77
  78     // Video
  79     video_dec               = video_stream->codec;
  80     video_dec->codec_type   = AVMEDIA_TYPE_VIDEO;
  81     video_dec->codec_id     = CODEC_ID_YOP;
  82
  83     avio_skip(pb, 6);
  84
  85     frame_rate              = avio_r8(pb);
  86     yop->frame_size         = avio_r8(pb) * 2048;
  87     video_dec->width        = avio_rl16(pb);
  88     video_dec->height       = avio_rl16(pb);
  89
  90     video_stream->sample_aspect_ratio = (AVRational){1, 2};
  91
  92     ret = avio_read(pb, video_dec->extradata, 8);
  93     if (ret < 8)
  94         return ret < 0 ? ret : AVERROR_EOF;
  95
  96     yop->palette_size       = video_dec->extradata[0] * 3 + 4;
  97     yop->audio_block_length = AV_RL16(video_dec->extradata + 6);
  98
  99     // 1840 samples per frame, 1 nibble per sample; hence 1840/2 = 920
 100     if (yop->audio_block_length < 920 ||
 101         yop->audio_block_length + yop->palette_size >= yop->frame_size) {
 102         av_log(s, AV_LOG_ERROR, "YOP has invalid header\n");
 103         return AVERROR_INVALIDDATA;
 104     }
 105
 106     avio_seek(pb, 2048, SEEK_SET);
 107
 108     av_set_pts_info(video_stream, 32, 1, frame_rate);
 109
 110     return 0;
 111 }
 112
 113 static int yop_read_packet(AVFormatContext *s, AVPacket *pkt)
 114 {
 115     YopDecContext *yop = s->priv_data;
 116     AVIOContext *pb  = s->pb;
 117
 118     int ret;
 119     int actual_video_data_size = yop->frame_size -
 120                                  yop->audio_block_length - yop->palette_size;
 121
 122     yop->video_packet.stream_index = 1;
 123
 124     if (yop->video_packet.data) {
 125         *pkt                   =  yop->video_packet;
 126         yop->video_packet.data =  NULL;
 127         yop->video_packet.size =  0;
 128         pkt->data[0]           =  yop->odd_frame;
 129         pkt->flags             |= AV_PKT_FLAG_KEY;
 130         yop->odd_frame         ^= 1;
 131         return pkt->size;
 132     }
 133     ret = av_new_packet(&yop->video_packet,
 134                         yop->frame_size - yop->audio_block_length);
 135     if (ret < 0)
 136         return ret;
 137
 138     yop->video_packet.pos = avio_tell(pb);
 139
 140     ret = avio_read(pb, yop->video_packet.data, yop->palette_size);
 141     if (ret < 0) {
 142         goto err_out;
 143     }else if (ret < yop->palette_size) {
 144         ret = AVERROR_EOF;
 145         goto err_out;
 146     }
 147
 148     ret = av_get_packet(pb, pkt, 920);
 149     if (ret < 0)
 150         goto err_out;
 151
 152     // Set position to the start of the frame
 153     pkt->pos = yop->video_packet.pos;
 154
 155     avio_skip(pb, yop->audio_block_length - ret);
 156
 157     ret = avio_read(pb, yop->video_packet.data + yop->palette_size,
 158                      actual_video_data_size);
 159     if (ret < 0)
 160         goto err_out;
 161     else if (ret < actual_video_data_size)
 162         av_shrink_packet(&yop->video_packet, yop->palette_size + ret);
 163
 164     // Arbitrarily return the audio data first
 165     return yop->audio_block_length;
 166
 167 err_out:
 168     av_free_packet(&yop->video_packet);
 169     return ret;
 170 }
 171
 172 static int yop_read_close(AVFormatContext *s)
 173 {
 174     YopDecContext *yop = s->priv_data;
 175     av_free_packet(&yop->video_packet);
 176     return 0;
 177 }
 178
 179 static int yop_read_seek(AVFormatContext *s, int stream_index,
 180                          int64_t timestamp, int flags)
 181 {
 182     YopDecContext *yop = s->priv_data;
 183     int64_t frame_pos, pos_min, pos_max;
 184     int frame_count;
 185
 186     av_free_packet(&yop->video_packet);
 187
 188     if (!stream_index)
 189         return -1;
 190
 191     pos_min        = s->data_offset;
 192     pos_max        = avio_size(s->pb) - yop->frame_size;
 193     frame_count    = (pos_max - pos_min) / yop->frame_size;
 194
 195     timestamp      = FFMAX(0, FFMIN(frame_count, timestamp));
 196
 197     frame_pos      = timestamp * yop->frame_size + pos_min;
 198     yop->odd_frame = timestamp & 1;
 199
 200     avio_seek(s->pb, frame_pos, SEEK_SET);
 201     return 0;
 202 }
 203
 204 AVInputFormat ff_yop_demuxer = {
 205     .name           = "yop",
 206     .long_name      = NULL_IF_CONFIG_SMALL("Psygnosis YOP Format"),
 207     .priv_data_size = sizeof(YopDecContext),
 208     .read_probe     = yop_probe,
 209     .read_header    = yop_read_header,
 210     .read_packet    = yop_read_packet,
 211     .read_close     = yop_read_close,
 212     .read_seek      = yop_read_seek,
 213     .extensions = "yop",
 214     .flags = AVFMT_GENERIC_INDEX,
 215 };