yading@11: /*
yading@11:  * PMP demuxer.
yading@11:  * Copyright (c) 2011 Reimar Döffinger
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/intreadwrite.h"
yading@11: #include "avformat.h"
yading@11: #include "internal.h"
yading@11: 
yading@11: typedef struct {
yading@11:     int cur_stream;
yading@11:     int num_streams;
yading@11:     int audio_packets;
yading@11:     int current_packet;
yading@11:     uint32_t *packet_sizes;
yading@11:     int packet_sizes_alloc;
yading@11: } PMPContext;
yading@11: 
yading@11: static int pmp_probe(AVProbeData *p) {
yading@11:     if (AV_RN32(p->buf) == AV_RN32("pmpm") &&
yading@11:         AV_RL32(p->buf + 4) == 1)
yading@11:         return AVPROBE_SCORE_MAX;
yading@11:     return 0;
yading@11: }
yading@11: 
yading@11: static int pmp_header(AVFormatContext *s)
yading@11: {
yading@11:     PMPContext *pmp = s->priv_data;
yading@11:     AVIOContext *pb = s->pb;
yading@11:     int tb_num, tb_den;
yading@11:     uint32_t index_cnt;
yading@11:     int audio_codec_id = AV_CODEC_ID_NONE;
yading@11:     int srate, channels;
yading@11:     unsigned i;
yading@11:     uint64_t pos;
yading@11:     int64_t fsize = avio_size(pb);
yading@11: 
yading@11:     AVStream *vst = avformat_new_stream(s, NULL);
yading@11:     if (!vst)
yading@11:         return AVERROR(ENOMEM);
yading@11:     vst->codec->codec_type = AVMEDIA_TYPE_VIDEO;
yading@11:     avio_skip(pb, 8);
yading@11:     switch (avio_rl32(pb)) {
yading@11:     case 0:
yading@11:         vst->codec->codec_id = AV_CODEC_ID_MPEG4;
yading@11:         break;
yading@11:     case 1:
yading@11:         vst->codec->codec_id = AV_CODEC_ID_H264;
yading@11:         break;
yading@11:     default:
yading@11:         av_log(s, AV_LOG_ERROR, "Unsupported video format\n");
yading@11:         break;
yading@11:     }
yading@11:     index_cnt = avio_rl32(pb);
yading@11:     vst->codec->width  = avio_rl32(pb);
yading@11:     vst->codec->height = avio_rl32(pb);
yading@11: 
yading@11:     tb_num = avio_rl32(pb);
yading@11:     tb_den = avio_rl32(pb);
yading@11:     avpriv_set_pts_info(vst, 32, tb_num, tb_den);
yading@11:     vst->nb_frames = index_cnt;
yading@11:     vst->duration = index_cnt;
yading@11: 
yading@11:     switch (avio_rl32(pb)) {
yading@11:     case 0:
yading@11:         audio_codec_id = AV_CODEC_ID_MP3;
yading@11:         break;
yading@11:     case 1:
yading@11:         av_log(s, AV_LOG_ERROR, "AAC not yet correctly supported\n");
yading@11:         audio_codec_id = AV_CODEC_ID_AAC;
yading@11:         break;
yading@11:     default:
yading@11:         av_log(s, AV_LOG_ERROR, "Unsupported audio format\n");
yading@11:         break;
yading@11:     }
yading@11:     pmp->num_streams = avio_rl16(pb) + 1;
yading@11:     avio_skip(pb, 10);
yading@11:     srate = avio_rl32(pb);
yading@11:     channels = avio_rl32(pb) + 1;
yading@11:     pos = avio_tell(pb) + 4LL*index_cnt;
yading@11:     for (i = 0; i < index_cnt; i++) {
yading@11:         uint32_t size = avio_rl32(pb);
yading@11:         int flags = size & 1 ? AVINDEX_KEYFRAME : 0;
yading@11:         if (url_feof(pb)) {
yading@11:             av_log(s, AV_LOG_FATAL, "Encountered EOF while reading index.\n");
yading@11:             return AVERROR_INVALIDDATA;
yading@11:         }
yading@11:         size >>= 1;
yading@11:         if (size < 9 + 4*pmp->num_streams) {
yading@11:             av_log(s, AV_LOG_ERROR, "Packet too small\n");
yading@11:             return AVERROR_INVALIDDATA;
yading@11:         }
yading@11:         av_add_index_entry(vst, pos, i, size, 0, flags);
yading@11:         pos += size;
yading@11:         if (fsize > 0 && i == 0 && pos > fsize) {
yading@11:             av_log(s, AV_LOG_ERROR, "File ends before first packet\n");
yading@11:             return AVERROR_INVALIDDATA;
yading@11:         }
yading@11:     }
yading@11:     for (i = 1; i < pmp->num_streams; i++) {
yading@11:         AVStream *ast = avformat_new_stream(s, NULL);
yading@11:         if (!ast)
yading@11:             return AVERROR(ENOMEM);
yading@11:         ast->codec->codec_type = AVMEDIA_TYPE_AUDIO;
yading@11:         ast->codec->codec_id = audio_codec_id;
yading@11:         ast->codec->channels = channels;
yading@11:         ast->codec->sample_rate = srate;
yading@11:         avpriv_set_pts_info(ast, 32, 1, srate);
yading@11:     }
yading@11:     return 0;
yading@11: }
yading@11: 
yading@11: static int pmp_packet(AVFormatContext *s, AVPacket *pkt)
yading@11: {
yading@11:     PMPContext *pmp = s->priv_data;
yading@11:     AVIOContext *pb = s->pb;
yading@11:     int ret = 0;
yading@11:     int i;
yading@11: 
yading@11:     if (url_feof(pb))
yading@11:         return AVERROR_EOF;
yading@11:     if (pmp->cur_stream == 0) {
yading@11:         int num_packets;
yading@11:         pmp->audio_packets = avio_r8(pb);
yading@11:         if (!pmp->audio_packets) {
yading@11:             avpriv_request_sample(s, "0 audio packets");
yading@11:             return AVERROR_PATCHWELCOME;
yading@11:         }
yading@11:         num_packets = (pmp->num_streams - 1) * pmp->audio_packets + 1;
yading@11:         avio_skip(pb, 8);
yading@11:         pmp->current_packet = 0;
yading@11:         av_fast_malloc(&pmp->packet_sizes,
yading@11:                        &pmp->packet_sizes_alloc,
yading@11:                        num_packets * sizeof(*pmp->packet_sizes));
yading@11:         if (!pmp->packet_sizes_alloc) {
yading@11:             av_log(s, AV_LOG_ERROR, "Cannot (re)allocate packet buffer\n");
yading@11:             return AVERROR(ENOMEM);
yading@11:         }
yading@11:         for (i = 0; i < num_packets; i++)
yading@11:             pmp->packet_sizes[i] = avio_rl32(pb);
yading@11:     }
yading@11:     ret = av_get_packet(pb, pkt, pmp->packet_sizes[pmp->current_packet]);
yading@11:     if (ret >= 0) {
yading@11:         ret = 0;
yading@11:         // FIXME: this is a hack that should be removed once
yading@11:         // compute_pkt_fields() can handle timestamps properly
yading@11:         if (pmp->cur_stream == 0)
yading@11:             pkt->dts = s->streams[0]->cur_dts++;
yading@11:         pkt->stream_index = pmp->cur_stream;
yading@11:     }
yading@11:     if (pmp->current_packet % pmp->audio_packets == 0)
yading@11:         pmp->cur_stream = (pmp->cur_stream + 1) % pmp->num_streams;
yading@11:     pmp->current_packet++;
yading@11:     return ret;
yading@11: }
yading@11: 
yading@11: static int pmp_seek(AVFormatContext *s, int stream_index, int64_t ts, int flags)
yading@11: {
yading@11:     PMPContext *pmp = s->priv_data;
yading@11:     pmp->cur_stream = 0;
yading@11:     // fallback to default seek now
yading@11:     return -1;
yading@11: }
yading@11: 
yading@11: static int pmp_close(AVFormatContext *s)
yading@11: {
yading@11:     PMPContext *pmp = s->priv_data;
yading@11:     av_freep(&pmp->packet_sizes);
yading@11:     return 0;
yading@11: }
yading@11: 
yading@11: AVInputFormat ff_pmp_demuxer = {
yading@11:     .name           = "pmp",
yading@11:     .long_name      = NULL_IF_CONFIG_SMALL("Playstation Portable PMP"),
yading@11:     .priv_data_size = sizeof(PMPContext),
yading@11:     .read_probe     = pmp_probe,
yading@11:     .read_header    = pmp_header,
yading@11:     .read_packet    = pmp_packet,
yading@11:     .read_seek      = pmp_seek,
yading@11:     .read_close     = pmp_close,
yading@11: };