adx: rename struct PREV to ADXChannelState
[ffmpeg.git] / libavcodec / adxdec.c
1 /*
2  * ADX ADPCM codecs
3  * Copyright (c) 2001,2003 BERO
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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  * Libav 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 Libav; 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 "avcodec.h"
24 #include "adx.h"
25
26 /**
27  * @file
28  * SEGA CRI adx codecs.
29  *
30  * Reference documents:
31  * http://ku-www.ss.titech.ac.jp/~yatsushi/adx.html
32  * adx2wav & wav2adx http://www.geocities.co.jp/Playtown/2004/
33  */
34
35 static av_cold int adx_decode_init(AVCodecContext *avctx)
36 {
37     avctx->sample_fmt = AV_SAMPLE_FMT_S16;
38     return 0;
39 }
40
41 /* 18 bytes <-> 32 samples */
42
43 static void adx_decode(short *out,const unsigned char *in,
44                        ADXChannelState *prev)
45 {
46     int scale = AV_RB16(in);
47     int i;
48     int s0,s1,s2,d;
49
50 //    printf("%x ",scale);
51
52     in+=2;
53     s1 = prev->s1;
54     s2 = prev->s2;
55     for(i=0;i<16;i++) {
56         d = in[i];
57         // d>>=4; if (d&8) d-=16;
58         d = ((signed char)d >> 4);
59         s0 = (BASEVOL*d*scale + SCALE1*s1 - SCALE2*s2)>>14;
60         s2 = s1;
61         s1 = av_clip_int16(s0);
62         *out++=s1;
63
64         d = in[i];
65         //d&=15; if (d&8) d-=16;
66         d = ((signed char)(d<<4) >> 4);
67         s0 = (BASEVOL*d*scale + SCALE1*s1 - SCALE2*s2)>>14;
68         s2 = s1;
69         s1 = av_clip_int16(s0);
70         *out++=s1;
71     }
72     prev->s1 = s1;
73     prev->s2 = s2;
74
75 }
76
77 static void adx_decode_stereo(short *out,const unsigned char *in,
78                               ADXChannelState *prev)
79 {
80     short tmp[32*2];
81     int i;
82
83     adx_decode(tmp   ,in   ,prev);
84     adx_decode(tmp+32,in+18,prev+1);
85     for(i=0;i<32;i++) {
86         out[i*2]   = tmp[i];
87         out[i*2+1] = tmp[i+32];
88     }
89 }
90
91 /* return data offset or 0 */
92 static int adx_decode_header(AVCodecContext *avctx,const unsigned char *buf,size_t bufsize)
93 {
94     int offset;
95
96     if (buf[0]!=0x80) return 0;
97     offset = (AV_RB32(buf)^0x80000000)+4;
98     if (bufsize<offset || memcmp(buf+offset-6,"(c)CRI",6)) return 0;
99
100     avctx->channels    = buf[7];
101     avctx->sample_rate = AV_RB32(buf+8);
102     avctx->bit_rate    = avctx->sample_rate*avctx->channels*18*8/32;
103
104     return offset;
105 }
106
107 static int adx_decode_frame(AVCodecContext *avctx,
108                 void *data, int *data_size,
109                 AVPacket *avpkt)
110 {
111     const uint8_t *buf0 = avpkt->data;
112     int buf_size = avpkt->size;
113     ADXContext *c = avctx->priv_data;
114     short *samples = data;
115     const uint8_t *buf = buf0;
116     int rest = buf_size;
117
118     if (!c->header_parsed) {
119         int hdrsize = adx_decode_header(avctx,buf,rest);
120         if (hdrsize==0) return -1;
121         c->header_parsed = 1;
122         buf  += hdrsize;
123         rest -= hdrsize;
124     }
125
126     /* 18 bytes of data are expanded into 32*2 bytes of audio,
127        so guard against buffer overflows */
128     if(rest/18 > *data_size/64)
129         rest = (*data_size/64) * 18;
130
131     if (c->in_temp) {
132         int copysize = 18*avctx->channels - c->in_temp;
133         memcpy(c->dec_temp+c->in_temp,buf,copysize);
134         rest -= copysize;
135         buf  += copysize;
136         if (avctx->channels==1) {
137             adx_decode(samples,c->dec_temp,c->prev);
138             samples += 32;
139         } else {
140             adx_decode_stereo(samples,c->dec_temp,c->prev);
141             samples += 32*2;
142         }
143     }
144     //
145     if (avctx->channels==1) {
146         while(rest>=18) {
147             adx_decode(samples,buf,c->prev);
148             rest-=18;
149             buf+=18;
150             samples+=32;
151         }
152     } else {
153         while(rest>=18*2) {
154             adx_decode_stereo(samples,buf,c->prev);
155             rest-=18*2;
156             buf+=18*2;
157             samples+=32*2;
158         }
159     }
160     //
161     c->in_temp = rest;
162     if (rest) {
163         memcpy(c->dec_temp,buf,rest);
164         buf+=rest;
165     }
166     *data_size = (uint8_t*)samples - (uint8_t*)data;
167 //    printf("%d:%d ",buf-buf0,*data_size); fflush(stdout);
168     return buf-buf0;
169 }
170
171 AVCodec ff_adpcm_adx_decoder = {
172     .name           = "adpcm_adx",
173     .type           = AVMEDIA_TYPE_AUDIO,
174     .id             = CODEC_ID_ADPCM_ADX,
175     .priv_data_size = sizeof(ADXContext),
176     .init           = adx_decode_init,
177     .decode         = adx_decode_frame,
178     .long_name = NULL_IF_CONFIG_SMALL("SEGA CRI ADX ADPCM"),
179 };
180