yading@11: /*
yading@11:  * CDXL demuxer
yading@11:  * Copyright (c) 2011-2012 Paul B Mahol
yading@11:  *
yading@11:  * This file is part of FFmpeg.
yading@11:  *
yading@11:  * FFmpeg is free software; you can redistribute it and/or
yading@11:  * modify it under the terms of the GNU Lesser General Public
yading@11:  * License as published by the Free Software Foundation; either
yading@11:  * version 2.1 of the License, or (at your option) any later version.
yading@11:  *
yading@11:  * FFmpeg is distributed in the hope that it will be useful,
yading@11:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
yading@11:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
yading@11:  * Lesser General Public License for more details.
yading@11:  *
yading@11:  * You should have received a copy of the GNU Lesser General Public
yading@11:  * License along with FFmpeg; if not, write to the Free Software
yading@11:  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
yading@11:  */
yading@11: 
yading@11: #include "libavutil/channel_layout.h"
yading@11: #include "libavutil/intreadwrite.h"
yading@11: #include "libavutil/parseutils.h"
yading@11: #include "libavutil/opt.h"
yading@11: #include "avformat.h"
yading@11: #include "internal.h"
yading@11: 
yading@11: #define CDXL_HEADER_SIZE 32
yading@11: 
yading@11: typedef struct CDXLDemuxContext {
yading@11:     AVClass     *class;
yading@11:     int         sample_rate;
yading@11:     char        *framerate;
yading@11:     AVRational  fps;
yading@11:     int         read_chunk;
yading@11:     uint8_t     header[CDXL_HEADER_SIZE];
yading@11:     int         video_stream_index;
yading@11:     int         audio_stream_index;
yading@11: } CDXLDemuxContext;
yading@11: 
yading@11: static int cdxl_read_probe(AVProbeData *p)
yading@11: {
yading@11:     int score = AVPROBE_SCORE_MAX / 2 + 10;
yading@11: 
yading@11:     if (p->buf_size < CDXL_HEADER_SIZE)
yading@11:         return 0;
yading@11: 
yading@11:     /* reserved bytes should always be set to 0 */
yading@11:     if (AV_RN64(&p->buf[24]) || AV_RN16(&p->buf[10]))
yading@11:         return 0;
yading@11: 
yading@11:     /* check type */
yading@11:     if (p->buf[0] != 1)
yading@11:         return 0;
yading@11: 
yading@11:     /* check palette size */
yading@11:     if (AV_RB16(&p->buf[20]) > 512)
yading@11:         return 0;
yading@11: 
yading@11:     /* check number of planes */
yading@11:     if (p->buf[18] || !p->buf[19])
yading@11:         return 0;
yading@11: 
yading@11:     /* check widh and height */
yading@11:     if (!AV_RN16(&p->buf[14]) || !AV_RN16(&p->buf[16]))
yading@11:         return 0;
yading@11: 
yading@11:     /* chunk size */
yading@11:     if (AV_RB32(&p->buf[2]) < AV_RB16(&p->buf[22]) + AV_RB16(&p->buf[20]) + CDXL_HEADER_SIZE)
yading@11:         return 0;
yading@11: 
yading@11:     /* previous chunk size */
yading@11:     if (AV_RN32(&p->buf[6]))
yading@11:         score /= 2;
yading@11: 
yading@11:     /* current frame number, usually starts from 1 */
yading@11:     if (AV_RB16(&p->buf[12]) != 1)
yading@11:         score /= 2;
yading@11: 
yading@11:     return score;
yading@11: }
yading@11: 
yading@11: static int cdxl_read_header(AVFormatContext *s)
yading@11: {
yading@11:     CDXLDemuxContext *cdxl = s->priv_data;
yading@11:     int ret;
yading@11: 
yading@11:     if (cdxl->framerate && (ret = av_parse_video_rate(&cdxl->fps, cdxl->framerate)) < 0) {
yading@11:         av_log(s, AV_LOG_ERROR,
yading@11:                "Could not parse framerate: %s.\n", cdxl->framerate);
yading@11:         return ret;
yading@11:     }
yading@11: 
yading@11:     cdxl->read_chunk         =  0;
yading@11:     cdxl->video_stream_index = -1;
yading@11:     cdxl->audio_stream_index = -1;
yading@11: 
yading@11:     s->ctx_flags |= AVFMTCTX_NOHEADER;
yading@11: 
yading@11:     return 0;
yading@11: }
yading@11: 
yading@11: static int cdxl_read_packet(AVFormatContext *s, AVPacket *pkt)
yading@11: {
yading@11:     CDXLDemuxContext *cdxl = s->priv_data;
yading@11:     AVIOContext *pb = s->pb;
yading@11:     uint32_t current_size, video_size, image_size;
yading@11:     uint16_t audio_size, palette_size, width, height;
yading@11:     int64_t  pos;
yading@11:     int      ret;
yading@11: 
yading@11:     if (url_feof(pb))
yading@11:         return AVERROR_EOF;
yading@11: 
yading@11:     pos = avio_tell(pb);
yading@11:     if (!cdxl->read_chunk &&
yading@11:         avio_read(pb, cdxl->header, CDXL_HEADER_SIZE) != CDXL_HEADER_SIZE)
yading@11:         return AVERROR_EOF;
yading@11:     if (cdxl->header[0] != 1) {
yading@11:         av_log(s, AV_LOG_ERROR, "non-standard cdxl file\n");
yading@11:         return AVERROR_INVALIDDATA;
yading@11:     }
yading@11: 
yading@11:     current_size = AV_RB32(&cdxl->header[2]);
yading@11:     width        = AV_RB16(&cdxl->header[14]);
yading@11:     height       = AV_RB16(&cdxl->header[16]);
yading@11:     palette_size = AV_RB16(&cdxl->header[20]);
yading@11:     audio_size   = AV_RB16(&cdxl->header[22]);
yading@11:     image_size   = FFALIGN(width, 16) * height * cdxl->header[19] / 8;
yading@11:     video_size   = palette_size + image_size;
yading@11: 
yading@11:     if (palette_size > 512)
yading@11:         return AVERROR_INVALIDDATA;
yading@11:     if (current_size < (uint64_t)audio_size + video_size + CDXL_HEADER_SIZE)
yading@11:         return AVERROR_INVALIDDATA;
yading@11: 
yading@11:     if (cdxl->read_chunk && audio_size) {
yading@11:         if (cdxl->audio_stream_index == -1) {
yading@11:             AVStream *st = avformat_new_stream(s, NULL);
yading@11:             if (!st)
yading@11:                 return AVERROR(ENOMEM);
yading@11: 
yading@11:             st->codec->codec_type    = AVMEDIA_TYPE_AUDIO;
yading@11:             st->codec->codec_tag     = 0;
yading@11:             st->codec->codec_id      = AV_CODEC_ID_PCM_S8;
yading@11:             if (cdxl->header[1] & 0x10) {
yading@11:                 st->codec->channels       = 2;
yading@11:                 st->codec->channel_layout = AV_CH_LAYOUT_STEREO;
yading@11:             } else {
yading@11:                 st->codec->channels       = 1;
yading@11:                 st->codec->channel_layout = AV_CH_LAYOUT_MONO;
yading@11:             }
yading@11:             st->codec->sample_rate   = cdxl->sample_rate;
yading@11:             st->start_time           = 0;
yading@11:             cdxl->audio_stream_index = st->index;
yading@11:             avpriv_set_pts_info(st, 64, 1, cdxl->sample_rate);
yading@11:         }
yading@11: 
yading@11:         ret = av_get_packet(pb, pkt, audio_size);
yading@11:         if (ret < 0)
yading@11:             return ret;
yading@11:         pkt->stream_index = cdxl->audio_stream_index;
yading@11:         pkt->pos          = pos;
yading@11:         pkt->duration     = audio_size;
yading@11:         cdxl->read_chunk  = 0;
yading@11:     } else {
yading@11:         if (cdxl->video_stream_index == -1) {
yading@11:             AVStream *st = avformat_new_stream(s, NULL);
yading@11:             if (!st)
yading@11:                 return AVERROR(ENOMEM);
yading@11: 
yading@11:             st->codec->codec_type    = AVMEDIA_TYPE_VIDEO;
yading@11:             st->codec->codec_tag     = 0;
yading@11:             st->codec->codec_id      = AV_CODEC_ID_CDXL;
yading@11:             st->codec->width         = width;
yading@11:             st->codec->height        = height;
yading@11:             st->start_time           = 0;
yading@11:             cdxl->video_stream_index = st->index;
yading@11:             if (cdxl->framerate)
yading@11:                 avpriv_set_pts_info(st, 64, cdxl->fps.den, cdxl->fps.num);
yading@11:             else
yading@11:                 avpriv_set_pts_info(st, 64, 1, cdxl->sample_rate);
yading@11:         }
yading@11: 
yading@11:         if (av_new_packet(pkt, video_size + CDXL_HEADER_SIZE) < 0)
yading@11:             return AVERROR(ENOMEM);
yading@11:         memcpy(pkt->data, cdxl->header, CDXL_HEADER_SIZE);
yading@11:         ret = avio_read(pb, pkt->data + CDXL_HEADER_SIZE, video_size);
yading@11:         if (ret < 0) {
yading@11:             av_free_packet(pkt);
yading@11:             return ret;
yading@11:         }
yading@11:         av_shrink_packet(pkt, CDXL_HEADER_SIZE + ret);
yading@11:         pkt->stream_index  = cdxl->video_stream_index;
yading@11:         pkt->flags        |= AV_PKT_FLAG_KEY;
yading@11:         pkt->pos           = pos;
yading@11:         pkt->duration      = cdxl->framerate ? 1 : audio_size ? audio_size : 220;
yading@11:         cdxl->read_chunk   = audio_size;
yading@11:     }
yading@11: 
yading@11:     if (!cdxl->read_chunk)
yading@11:         avio_skip(pb, current_size - audio_size - video_size - CDXL_HEADER_SIZE);
yading@11:     return ret;
yading@11: }
yading@11: 
yading@11: #define OFFSET(x) offsetof(CDXLDemuxContext, x)
yading@11: static const AVOption cdxl_options[] = {
yading@11:     { "sample_rate", "", OFFSET(sample_rate), AV_OPT_TYPE_INT,    { .i64 = 11025 }, 1, INT_MAX, AV_OPT_FLAG_DECODING_PARAM },
yading@11:     { "framerate",   "", OFFSET(framerate),   AV_OPT_TYPE_STRING, { .str = NULL },  0, 0,       AV_OPT_FLAG_DECODING_PARAM },
yading@11:     { NULL },
yading@11: };
yading@11: 
yading@11: static const AVClass cdxl_demuxer_class = {
yading@11:     .class_name = "CDXL demuxer",
yading@11:     .item_name  = av_default_item_name,
yading@11:     .option     = cdxl_options,
yading@11:     .version    = LIBAVUTIL_VERSION_INT,
yading@11: };
yading@11: 
yading@11: AVInputFormat ff_cdxl_demuxer = {
yading@11:     .name           = "cdxl",
yading@11:     .long_name      = NULL_IF_CONFIG_SMALL("Commodore CDXL video"),
yading@11:     .priv_data_size = sizeof(CDXLDemuxContext),
yading@11:     .read_probe     = cdxl_read_probe,
yading@11:     .read_header    = cdxl_read_header,
yading@11:     .read_packet    = cdxl_read_packet,
yading@11:     .extensions     = "cdxl,xl",
yading@11:     .flags          = AVFMT_GENERIC_INDEX,
yading@11:     .priv_class     = &cdxl_demuxer_class,
yading@11: };