libavformat/sol.c

   1 /*
   2  * Sierra SOL decoder
   3  * Copyright Konstantin Shishkov.
   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 /*
  23  * Based on documents from Game Audio Player and own research
  24  */
  25
  26 #include "avformat.h"
  27 #include "allformats.h"
  28 #include "riff.h"
  29 #include "bswap.h"
  30
  31 /* if we don't know the size in advance */
  32 #define AU_UNKOWN_SIZE ((uint32_t)(~0))
  33
  34 static int sol_probe(AVProbeData *p)
  35 {
  36     /* check file header */
  37     uint16_t magic;
  38     if (p->buf_size <= 14)
  39         return 0;
  40     magic=le2me_16(*((uint16_t*)p->buf));
  41     if ((magic == 0x0B8D || magic == 0x0C0D || magic == 0x0C8D) &&
  42         p->buf[2] == 'S' && p->buf[3] == 'O' &&
  43         p->buf[4] == 'L' && p->buf[5] == 0)
  44         return AVPROBE_SCORE_MAX;
  45     else
  46         return 0;
  47 }
  48
  49 #define SOL_DPCM    1
  50 #define SOL_16BIT   4
  51 #define SOL_STEREO 16
  52
  53 static int sol_codec_id(int magic, int type)
  54 {
  55     if (magic == 0x0B8D)
  56     {
  57         if (type & SOL_DPCM) return CODEC_ID_SOL_DPCM;
  58         else return CODEC_ID_PCM_U8;
  59     }
  60     if (type & SOL_DPCM)
  61     {
  62         if (type & SOL_16BIT) return CODEC_ID_SOL_DPCM;
  63         else if (magic == 0x0C8D) return CODEC_ID_SOL_DPCM;
  64         else return CODEC_ID_SOL_DPCM;
  65     }
  66     if (type & SOL_16BIT) return CODEC_ID_PCM_S16LE;
  67     return CODEC_ID_PCM_U8;
  68 }
  69
  70 static int sol_codec_type(int magic, int type)
  71 {
  72     if (magic == 0x0B8D) return 1;//SOL_DPCM_OLD;
  73     if (type & SOL_DPCM)
  74     {
  75         if (type & SOL_16BIT) return 3;//SOL_DPCM_NEW16;
  76         else if (magic == 0x0C8D) return 1;//SOL_DPCM_OLD;
  77         else return 2;//SOL_DPCM_NEW8;
  78     }
  79     return -1;
  80 }
  81
  82 static int sol_channels(int magic, int type)
  83 {
  84     if (magic == 0x0B8D || !(type & SOL_STEREO)) return 1;
  85     return 2;
  86 }
  87
  88 static int sol_read_header(AVFormatContext *s,
  89                           AVFormatParameters *ap)
  90 {
  91     int size;
  92     unsigned int magic,tag;
  93     ByteIOContext *pb = &s->pb;
  94     unsigned int id, codec, channels, rate, type;
  95     AVStream *st;
  96
  97     /* check ".snd" header */
  98     magic = get_le16(pb);
  99     tag = get_le32(pb);
 100     if (tag != MKTAG('S', 'O', 'L', 0))
 101         return -1;
 102     rate = get_le16(pb);
 103     type = get_byte(pb);
 104     size = get_le32(pb);
 105     if (magic != 0x0B8D)
 106         get_byte(pb); /* newer SOLs contain padding byte */
 107
 108     codec = sol_codec_id(magic, type);
 109     channels = sol_channels(magic, type);
 110
 111     if (codec == CODEC_ID_SOL_DPCM)
 112         id = sol_codec_type(magic, type);
 113     else id = 0;
 114
 115     /* now we are ready: build format streams */
 116     st = av_new_stream(s, 0);
 117     if (!st)
 118         return -1;
 119     st->codec->codec_type = CODEC_TYPE_AUDIO;
 120     st->codec->codec_tag = id;
 121     st->codec->codec_id = codec;
 122     st->codec->channels = channels;
 123     st->codec->sample_rate = rate;
 124     av_set_pts_info(st, 64, 1, rate);
 125     return 0;
 126 }
 127
 128 #define MAX_SIZE 4096
 129
 130 static int sol_read_packet(AVFormatContext *s,
 131                           AVPacket *pkt)
 132 {
 133     int ret;
 134
 135     if (url_feof(&s->pb))
 136         return -EIO;
 137     ret= av_get_packet(&s->pb, pkt, MAX_SIZE);
 138     pkt->stream_index = 0;
 139
 140     /* note: we need to modify the packet size here to handle the last
 141        packet */
 142     pkt->size = ret;
 143     return 0;
 144 }
 145
 146 static int sol_read_close(AVFormatContext *s)
 147 {
 148     return 0;
 149 }
 150
 151 AVInputFormat sol_demuxer = {
 152     "sol",
 153     "Sierra SOL Format",
 154     0,
 155     sol_probe,
 156     sol_read_header,
 157     sol_read_packet,
 158     sol_read_close,
 159     pcm_read_seek,
 160 };