avformat: add VPK demuxer
[ffmpeg.git] / libavformat / vpk.c
1 /*
2  * VPK demuxer
3  * Copyright (c) 2015 Paul B Mahol
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 #include "libavutil/intreadwrite.h"
23 #include "avformat.h"
24 #include "internal.h"
25
26 typedef struct VPKDemuxContext {
27     unsigned block_count;
28     unsigned current_block;
29     unsigned last_block_size;
30 } VPKDemuxContext;
31
32 static int vpk_probe(AVProbeData *p)
33 {
34     if (AV_RL32(p->buf) != MKBETAG('V','P','K',' '))
35         return 0;
36
37     return AVPROBE_SCORE_MAX / 3 * 2;
38 }
39
40 static int vpk_read_header(AVFormatContext *s)
41 {
42     VPKDemuxContext *vpk = s->priv_data;
43     unsigned offset;
44     unsigned samples_per_block;
45     AVStream *st;
46
47     vpk->current_block = 0;
48     st = avformat_new_stream(s, NULL);
49     if (!st)
50         return AVERROR(ENOMEM);
51
52     avio_skip(s->pb, 4);
53     st->duration           = avio_rl32(s->pb) * 28 / 16;
54     offset                 = avio_rl32(s->pb);
55     st->codec->codec_type  = AVMEDIA_TYPE_AUDIO;
56     st->codec->codec_id    = AV_CODEC_ID_ADPCM_PSX;
57     st->codec->block_align = avio_rl32(s->pb);
58     st->codec->sample_rate = avio_rl32(s->pb);
59     if (st->codec->sample_rate <= 0)
60         return AVERROR_INVALIDDATA;
61     st->codec->channels    = avio_rl32(s->pb);
62     if (st->codec->channels <= 0)
63         return AVERROR_INVALIDDATA;
64     samples_per_block      = ((st->codec->block_align / st->codec->channels) * 28) / 16;
65     vpk->block_count       = (st->duration + (samples_per_block - 1)) / samples_per_block;
66     vpk->last_block_size   = (st->duration % samples_per_block) * 16 * st->codec->channels / 28;
67     avio_skip(s->pb, offset - avio_tell(s->pb));
68     avpriv_set_pts_info(st, 64, 1, st->codec->sample_rate);
69
70     return 0;
71 }
72
73 static int vpk_read_packet(AVFormatContext *s, AVPacket *pkt)
74 {
75     AVCodecContext *codec = s->streams[0]->codec;
76     VPKDemuxContext *vpk = s->priv_data;
77     int ret, i;
78
79     vpk->current_block++;
80     if (vpk->current_block == vpk->block_count) {
81         unsigned size = vpk->last_block_size / codec->channels;
82         unsigned skip = (codec->block_align - vpk->last_block_size) / codec->channels;
83
84         ret = av_new_packet(pkt, vpk->last_block_size);
85         if (ret < 0)
86             return ret;
87         for (i = 0; i < codec->channels; i++) {
88             ret = avio_read(s->pb, pkt->data + i * size, size);
89             avio_skip(s->pb, skip);
90             if (ret != size) {
91                 av_packet_unref(pkt);
92                 ret = AVERROR(EIO);
93                 break;
94             }
95         }
96         pkt->stream_index = 0;
97     } else if (vpk->current_block < vpk->block_count) {
98         ret = av_get_packet(s->pb, pkt, codec->block_align);
99         pkt->stream_index = 0;
100     } else {
101         return AVERROR_EOF;
102     }
103
104     return ret;
105 }
106
107 AVInputFormat ff_vpk_demuxer = {
108     .name           = "vpk",
109     .long_name      = NULL_IF_CONFIG_SMALL("Sony PS2 VPK"),
110     .priv_data_size = sizeof(VPKDemuxContext),
111     .read_probe     = vpk_probe,
112     .read_header    = vpk_read_header,
113     .read_packet    = vpk_read_packet,
114     .extensions     = "vpk",
115 };