git.sesse.net Git - ffmpeg/blob - libavcodec/adpcm.c

   1 /*
   2  * Copyright (c) 2001-2003 The ffmpeg Project
   3  *
   4  * This file is part of FFmpeg.
   5  *
   6  * FFmpeg is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * FFmpeg is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with FFmpeg; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20 #include "avcodec.h"
  21 #include "get_bits.h"
  22 #include "put_bits.h"
  23 #include "bytestream.h"
  24 #include "adpcm.h"
  25 #include "adpcm_data.h"
  26
  27 /**
  28  * @file
  29  * ADPCM decoders
  30  * First version by Francois Revol (revol@free.fr)
  31  * Fringe ADPCM codecs (e.g., DK3, DK4, Westwood)
  32  *   by Mike Melanson (melanson@pcisys.net)
  33  * CD-ROM XA ADPCM codec by BERO
  34  * EA ADPCM decoder by Robin Kay (komadori@myrealbox.com)
  35  * EA ADPCM R1/R2/R3 decoder by Peter Ross (pross@xvid.org)
  36  * EA IMA EACS decoder by Peter Ross (pross@xvid.org)
  37  * EA IMA SEAD decoder by Peter Ross (pross@xvid.org)
  38  * EA ADPCM XAS decoder by Peter Ross (pross@xvid.org)
  39  * MAXIS EA ADPCM decoder by Robert Marston (rmarston@gmail.com)
  40  * THP ADPCM decoder by Marco Gerards (mgerards@xs4all.nl)
  41  *
  42  * Features and limitations:
  43  *
  44  * Reference documents:
  45  * http://wiki.multimedia.cx/index.php?title=Category:ADPCM_Audio_Codecs
  46  * http://www.pcisys.net/~melanson/codecs/simpleaudio.html [dead]
  47  * http://www.geocities.com/SiliconValley/8682/aud3.txt [dead]
  48  * http://openquicktime.sourceforge.net/
  49  * XAnim sources (xa_codec.c) http://xanim.polter.net/
  50  * http://www.cs.ucla.edu/~leec/mediabench/applications.html [dead]
  51  * SoX source code http://sox.sourceforge.net/
  52  *
  53  * CD-ROM XA:
  54  * http://ku-www.ss.titech.ac.jp/~yatsushi/xaadpcm.html [dead]
  55  * vagpack & depack http://homepages.compuserve.de/bITmASTER32/psx-index.html [dead]
  56  * readstr http://www.geocities.co.jp/Playtown/2004/
  57  */
  58
  59 /* These are for CD-ROM XA ADPCM */
  60 static const int xa_adpcm_table[5][2] = {
  61     {   0,   0 },
  62     {  60,   0 },
  63     { 115, -52 },
  64     {  98, -55 },
  65     { 122, -60 }
  66 };
  67
  68 static const int ea_adpcm_table[] = {
  69     0,  240,  460,  392,
  70     0,    0, -208, -220,
  71     0,    1,    3,    4,
  72     7,    8,   10,   11,
  73     0,   -1,   -3,   -4
  74 };
  75
  76 // padded to zero where table size is less then 16
  77 static const int swf_index_tables[4][16] = {
  78     /*2*/ { -1, 2 },
  79     /*3*/ { -1, -1, 2, 4 },
  80     /*4*/ { -1, -1, -1, -1, 2, 4, 6, 8 },
  81     /*5*/ { -1, -1, -1, -1, -1, -1, -1, -1, 1, 2, 4, 6, 8, 10, 13, 16 }
  82 };
  83
  84 /* end of tables */
  85
  86 typedef struct ADPCMDecodeContext {
  87     AVFrame frame;
  88     ADPCMChannelStatus status[6];
  89     int vqa_version;                /**< VQA version. Used for ADPCM_IMA_WS */
  90 } ADPCMDecodeContext;
  91
  92 static av_cold int adpcm_decode_init(AVCodecContext * avctx)
  93 {
  94     ADPCMDecodeContext *c = avctx->priv_data;
  95     unsigned int min_channels = 1;
  96     unsigned int max_channels = 2;
  97
  98     switch(avctx->codec->id) {
  99     case CODEC_ID_ADPCM_EA:
 100         min_channels = 2;
 101         break;
 102     case CODEC_ID_ADPCM_EA_R1:
 103     case CODEC_ID_ADPCM_EA_R2:
 104     case CODEC_ID_ADPCM_EA_R3:
 105     case CODEC_ID_ADPCM_EA_XAS:
 106         max_channels = 6;
 107         break;
 108     }
 109     if (avctx->channels < min_channels || avctx->channels > max_channels) {
 110         av_log(avctx, AV_LOG_ERROR, "Invalid number of channels\n");
 111         return AVERROR(EINVAL);
 112     }
 113
 114     switch(avctx->codec->id) {
 115     case CODEC_ID_ADPCM_CT:
 116         c->status[0].step = c->status[1].step = 511;
 117         break;
 118     case CODEC_ID_ADPCM_IMA_WAV:
 119         if (avctx->bits_per_coded_sample != 4) {
 120             av_log(avctx, AV_LOG_ERROR, "Only 4-bit ADPCM IMA WAV files are supported\n");
 121             return -1;
 122         }
 123         break;
 124     case CODEC_ID_ADPCM_IMA_APC:
 125         if (avctx->extradata && avctx->extradata_size >= 8) {
 126             c->status[0].predictor = AV_RL32(avctx->extradata);
 127             c->status[1].predictor = AV_RL32(avctx->extradata + 4);
 128         }
 129         break;
 130     case CODEC_ID_ADPCM_IMA_WS:
 131         if (avctx->extradata && avctx->extradata_size >= 42)
 132             c->vqa_version = AV_RL16(avctx->extradata);
 133         break;
 134     default:
 135         break;
 136     }
 137     avctx->sample_fmt = AV_SAMPLE_FMT_S16;
 138
 139     avcodec_get_frame_defaults(&c->frame);
 140     avctx->coded_frame = &c->frame;
 141
 142     return 0;
 143 }
 144
 145 static inline short adpcm_ima_expand_nibble(ADPCMChannelStatus *c, char nibble, int shift)
 146 {
 147     int step_index;
 148     int predictor;
 149     int sign, delta, diff, step;
 150
 151     step = ff_adpcm_step_table[c->step_index];
 152     step_index = c->step_index + ff_adpcm_index_table[(unsigned)nibble];
 153     if (step_index < 0) step_index = 0;
 154     else if (step_index > 88) step_index = 88;
 155
 156     sign = nibble & 8;
 157     delta = nibble & 7;
 158     /* perform direct multiplication instead of series of jumps proposed by
 159      * the reference ADPCM implementation since modern CPUs can do the mults
 160      * quickly enough */
 161     diff = ((2 * delta + 1) * step) >> shift;
 162     predictor = c->predictor;
 163     if (sign) predictor -= diff;
 164     else predictor += diff;
 165
 166     c->predictor = av_clip_int16(predictor);
 167     c->step_index = step_index;
 168
 169     return (short)c->predictor;
 170 }
 171
 172 static inline int adpcm_ima_qt_expand_nibble(ADPCMChannelStatus *c, int nibble, int shift)
 173 {
 174     int step_index;
 175     int predictor;
 176     int diff, step;
 177
 178     step = ff_adpcm_step_table[c->step_index];
 179     step_index = c->step_index + ff_adpcm_index_table[nibble];
 180     step_index = av_clip(step_index, 0, 88);
 181
 182     diff = step >> 3;
 183     if (nibble & 4) diff += step;
 184     if (nibble & 2) diff += step >> 1;
 185     if (nibble & 1) diff += step >> 2;
 186
 187     if (nibble & 8)
 188         predictor = c->predictor - diff;
 189     else
 190         predictor = c->predictor + diff;
 191
 192     c->predictor = av_clip_int16(predictor);
 193     c->step_index = step_index;
 194
 195     return c->predictor;
 196 }
 197
 198 static inline short adpcm_ms_expand_nibble(ADPCMChannelStatus *c, char nibble)
 199 {
 200     int predictor;
 201
 202     predictor = (((c->sample1) * (c->coeff1)) + ((c->sample2) * (c->coeff2))) / 64;
 203     predictor += (signed)((nibble & 0x08)?(nibble - 0x10):(nibble)) * c->idelta;
 204
 205     c->sample2 = c->sample1;
 206     c->sample1 = av_clip_int16(predictor);
 207     c->idelta = (ff_adpcm_AdaptationTable[(int)nibble] * c->idelta) >> 8;
 208     if (c->idelta < 16) c->idelta = 16;
 209
 210     return c->sample1;
 211 }
 212
 213 static inline short adpcm_ct_expand_nibble(ADPCMChannelStatus *c, char nibble)
 214 {
 215     int sign, delta, diff;
 216     int new_step;
 217
 218     sign = nibble & 8;
 219     delta = nibble & 7;
 220     /* perform direct multiplication instead of series of jumps proposed by
 221      * the reference ADPCM implementation since modern CPUs can do the mults
 222      * quickly enough */
 223     diff = ((2 * delta + 1) * c->step) >> 3;
 224     /* predictor update is not so trivial: predictor is multiplied on 254/256 before updating */
 225     c->predictor = ((c->predictor * 254) >> 8) + (sign ? -diff : diff);
 226     c->predictor = av_clip_int16(c->predictor);
 227     /* calculate new step and clamp it to range 511..32767 */
 228     new_step = (ff_adpcm_AdaptationTable[nibble & 7] * c->step) >> 8;
 229     c->step = av_clip(new_step, 511, 32767);
 230
 231     return (short)c->predictor;
 232 }
 233
 234 static inline short adpcm_sbpro_expand_nibble(ADPCMChannelStatus *c, char nibble, int size, int shift)
 235 {
 236     int sign, delta, diff;
 237
 238     sign = nibble & (1<<(size-1));
 239     delta = nibble & ((1<<(size-1))-1);
 240     diff = delta << (7 + c->step + shift);
 241
 242     /* clamp result */
 243     c->predictor = av_clip(c->predictor + (sign ? -diff : diff), -16384,16256);
 244
 245     /* calculate new step */
 246     if (delta >= (2*size - 3) && c->step < 3)
 247         c->step++;
 248     else if (delta == 0 && c->step > 0)
 249         c->step--;
 250
 251     return (short) c->predictor;
 252 }
 253
 254 static inline short adpcm_yamaha_expand_nibble(ADPCMChannelStatus *c, unsigned char nibble)
 255 {
 256     if(!c->step) {
 257         c->predictor = 0;
 258         c->step = 127;
 259     }
 260
 261     c->predictor += (c->step * ff_adpcm_yamaha_difflookup[nibble]) / 8;
 262     c->predictor = av_clip_int16(c->predictor);
 263     c->step = (c->step * ff_adpcm_yamaha_indexscale[nibble]) >> 8;
 264     c->step = av_clip(c->step, 127, 24567);
 265     return c->predictor;
 266 }
 267
 268 static void xa_decode(short *out, const unsigned char *in,
 269     ADPCMChannelStatus *left, ADPCMChannelStatus *right, int inc)
 270 {
 271     int i, j;
 272     int shift,filter,f0,f1;
 273     int s_1,s_2;
 274     int d,s,t;
 275
 276     for(i=0;i<4;i++) {
 277
 278         shift  = 12 - (in[4+i*2] & 15);
 279         filter = in[4+i*2] >> 4;
 280         f0 = xa_adpcm_table[filter][0];
 281         f1 = xa_adpcm_table[filter][1];
 282
 283         s_1 = left->sample1;
 284         s_2 = left->sample2;
 285
 286         for(j=0;j<28;j++) {
 287             d = in[16+i+j*4];
 288
 289             t = (signed char)(d<<4)>>4;
 290             s = ( t<<shift ) + ((s_1*f0 + s_2*f1+32)>>6);
 291             s_2 = s_1;
 292             s_1 = av_clip_int16(s);
 293             *out = s_1;
 294             out += inc;
 295         }
 296
 297         if (inc==2) { /* stereo */
 298             left->sample1 = s_1;
 299             left->sample2 = s_2;
 300             s_1 = right->sample1;
 301             s_2 = right->sample2;
 302             out = out + 1 - 28*2;
 303         }
 304
 305         shift  = 12 - (in[5+i*2] & 15);
 306         filter = in[5+i*2] >> 4;
 307
 308         f0 = xa_adpcm_table[filter][0];
 309         f1 = xa_adpcm_table[filter][1];
 310
 311         for(j=0;j<28;j++) {
 312             d = in[16+i+j*4];
 313
 314             t = (signed char)d >> 4;
 315             s = ( t<<shift ) + ((s_1*f0 + s_2*f1+32)>>6);
 316             s_2 = s_1;
 317             s_1 = av_clip_int16(s);
 318             *out = s_1;
 319             out += inc;
 320         }
 321
 322         if (inc==2) { /* stereo */
 323             right->sample1 = s_1;
 324             right->sample2 = s_2;
 325             out -= 1;
 326         } else {
 327             left->sample1 = s_1;
 328             left->sample2 = s_2;
 329         }
 330     }
 331 }
 332
 333 /**
 334  * Get the number of samples that will be decoded from the packet.
 335  * In one case, this is actually the maximum number of samples possible to
 336  * decode with the given buf_size.
 337  *
 338  * @param[out] coded_samples set to the number of samples as coded in the
 339  *                           packet, or 0 if the codec does not encode the
 340  *                           number of samples in each frame.
 341  */
 342 static int get_nb_samples(AVCodecContext *avctx, const uint8_t *buf,
 343                           int buf_size, int *coded_samples)
 344 {
 345     ADPCMDecodeContext *s = avctx->priv_data;
 346     int nb_samples        = 0;
 347     int ch                = avctx->channels;
 348     int has_coded_samples = 0;
 349     int header_size;
 350
 351     *coded_samples = 0;
 352
 353     if(ch <= 0)
 354         return 0;
 355
 356     switch (avctx->codec->id) {
 357     /* constant, only check buf_size */
 358     case CODEC_ID_ADPCM_EA_XAS:
 359         if (buf_size < 76 * ch)
 360             return 0;
 361         nb_samples = 128;
 362         break;
 363     case CODEC_ID_ADPCM_IMA_QT:
 364         if (buf_size < 34 * ch)
 365             return 0;
 366         nb_samples = 64;
 367         break;
 368     /* simple 4-bit adpcm */
 369     case CODEC_ID_ADPCM_CT:
 370     case CODEC_ID_ADPCM_IMA_APC:
 371     case CODEC_ID_ADPCM_IMA_EA_SEAD:
 372     case CODEC_ID_ADPCM_IMA_WS:
 373     case CODEC_ID_ADPCM_YAMAHA:
 374         nb_samples = buf_size * 2 / ch;
 375         break;
 376     }
 377     if (nb_samples)
 378         return nb_samples;
 379
 380     /* simple 4-bit adpcm, with header */
 381     header_size = 0;
 382     switch (avctx->codec->id) {
 383         case CODEC_ID_ADPCM_4XM:
 384         case CODEC_ID_ADPCM_IMA_ISS:     header_size = 4 * ch;      break;
 385         case CODEC_ID_ADPCM_IMA_AMV:     header_size = 8;           break;
 386         case CODEC_ID_ADPCM_IMA_SMJPEG:  header_size = 4;           break;
 387     }
 388     if (header_size > 0)
 389         return (buf_size - header_size) * 2 / ch;
 390
 391     /* more complex formats */
 392     switch (avctx->codec->id) {
 393     case CODEC_ID_ADPCM_EA:
 394         has_coded_samples = 1;
 395         if (buf_size < 4)
 396             return 0;
 397         *coded_samples  = AV_RL32(buf);
 398         *coded_samples -= *coded_samples % 28;
 399         nb_samples      = (buf_size - 12) / 30 * 28;
 400         break;
 401     case CODEC_ID_ADPCM_IMA_EA_EACS:
 402         has_coded_samples = 1;
 403         if (buf_size < 4)
 404             return 0;
 405         *coded_samples = AV_RL32(buf);
 406         nb_samples     = (buf_size - (4 + 8 * ch)) * 2 / ch;
 407         break;
 408     case CODEC_ID_ADPCM_EA_MAXIS_XA:
 409         nb_samples = ((buf_size - ch) / (2 * ch)) * 2 * ch;
 410         break;
 411     case CODEC_ID_ADPCM_EA_R1:
 412     case CODEC_ID_ADPCM_EA_R2:
 413     case CODEC_ID_ADPCM_EA_R3:
 414         /* maximum number of samples */
 415         /* has internal offsets and a per-frame switch to signal raw 16-bit */
 416         has_coded_samples = 1;
 417         if (buf_size < 4)
 418             return 0;
 419         switch (avctx->codec->id) {
 420         case CODEC_ID_ADPCM_EA_R1:
 421             header_size    = 4 + 9 * ch;
 422             *coded_samples = AV_RL32(buf);
 423             break;
 424         case CODEC_ID_ADPCM_EA_R2:
 425             header_size    = 4 + 5 * ch;
 426             *coded_samples = AV_RL32(buf);
 427             break;
 428         case CODEC_ID_ADPCM_EA_R3:
 429             header_size    = 4 + 5 * ch;
 430             *coded_samples = AV_RB32(buf);
 431             break;
 432         }
 433         *coded_samples -= *coded_samples % 28;
 434         nb_samples      = (buf_size - header_size) * 2 / ch;
 435         nb_samples     -= nb_samples % 28;
 436         break;
 437     case CODEC_ID_ADPCM_IMA_DK3:
 438         if (avctx->block_align > 0)
 439             buf_size = FFMIN(buf_size, avctx->block_align);
 440         nb_samples = ((buf_size - 16) * 8 / 3) / ch;
 441         break;
 442     case CODEC_ID_ADPCM_IMA_DK4:
 443         nb_samples = 1 + (buf_size - 4 * ch) * 2 / ch;
 444         break;
 445     case CODEC_ID_ADPCM_IMA_WAV:
 446         if (avctx->block_align > 0)
 447             buf_size = FFMIN(buf_size, avctx->block_align);
 448         nb_samples = 1 + (buf_size - 4 * ch) / (4 * ch) * 8;
 449         break;
 450     case CODEC_ID_ADPCM_MS:
 451         if (avctx->block_align > 0)
 452             buf_size = FFMIN(buf_size, avctx->block_align);
 453         nb_samples = 2 + (buf_size - 7 * ch) * 2 / ch;
 454         break;
 455     case CODEC_ID_ADPCM_SBPRO_2:
 456     case CODEC_ID_ADPCM_SBPRO_3:
 457     case CODEC_ID_ADPCM_SBPRO_4:
 458     {
 459         int samples_per_byte;
 460         switch (avctx->codec->id) {
 461         case CODEC_ID_ADPCM_SBPRO_2: samples_per_byte = 4; break;
 462         case CODEC_ID_ADPCM_SBPRO_3: samples_per_byte = 3; break;
 463         case CODEC_ID_ADPCM_SBPRO_4: samples_per_byte = 2; break;
 464         }
 465         if (!s->status[0].step_index) {
 466             nb_samples++;
 467             buf_size -= ch;
 468         }
 469         nb_samples += buf_size * samples_per_byte / ch;
 470         break;
 471     }
 472     case CODEC_ID_ADPCM_SWF:
 473     {
 474         int buf_bits       = buf_size * 8 - 2;
 475         int nbits          = (buf[0] >> 6) + 2;
 476         int block_hdr_size = 22 * ch;
 477         int block_size     = block_hdr_size + nbits * ch * 4095;
 478         int nblocks        = buf_bits / block_size;
 479         int bits_left      = buf_bits - nblocks * block_size;
 480         nb_samples         = nblocks * 4096;
 481         if (bits_left >= block_hdr_size)
 482             nb_samples += 1 + (bits_left - block_hdr_size) / (nbits * ch);
 483         break;
 484     }
 485     case CODEC_ID_ADPCM_THP:
 486         has_coded_samples = 1;
 487         if (buf_size < 8)
 488             return 0;
 489         *coded_samples  = AV_RB32(&buf[4]);
 490         *coded_samples -= *coded_samples % 14;
 491         nb_samples      = (buf_size - 80) / (8 * ch) * 14;
 492         break;
 493     case CODEC_ID_ADPCM_XA:
 494         nb_samples = (buf_size / 128) * 224 / ch;
 495         break;
 496     }
 497
 498     /* validate coded sample count */
 499     if (has_coded_samples && (*coded_samples <= 0 || *coded_samples > nb_samples))
 500         return AVERROR_INVALIDDATA;
 501
 502     return nb_samples;
 503 }
 504
 505 /* DK3 ADPCM support macro */
 506 #define DK3_GET_NEXT_NIBBLE() \
 507     if (decode_top_nibble_next) \
 508     { \
 509         nibble = last_byte >> 4; \
 510         decode_top_nibble_next = 0; \
 511     } \
 512     else \
 513     { \
 514         if (end_of_packet) \
 515             break; \
 516         last_byte = *src++; \
 517         if (src >= buf + buf_size) \
 518             end_of_packet = 1; \
 519         nibble = last_byte & 0x0F; \
 520         decode_top_nibble_next = 1; \
 521     }
 522
 523 static int adpcm_decode_frame(AVCodecContext *avctx, void *data,
 524                               int *got_frame_ptr, AVPacket *avpkt)
 525 {
 526     const uint8_t *buf = avpkt->data;
 527     int buf_size = avpkt->size;
 528     ADPCMDecodeContext *c = avctx->priv_data;
 529     ADPCMChannelStatus *cs;
 530     int n, m, channel, i;
 531     short *samples;
 532     const uint8_t *src;
 533     int st; /* stereo */
 534     int count1, count2;
 535     int nb_samples, coded_samples, ret;
 536
 537     nb_samples = get_nb_samples(avctx, buf, buf_size, &coded_samples);
 538     if (nb_samples <= 0) {
 539         av_log(avctx, AV_LOG_ERROR, "invalid number of samples in packet\n");
 540         return AVERROR_INVALIDDATA;
 541     }
 542
 543     /* get output buffer */
 544     c->frame.nb_samples = nb_samples;
 545     if ((ret = avctx->get_buffer(avctx, &c->frame)) < 0) {
 546         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
 547         return ret;
 548     }
 549     samples = (short *)c->frame.data[0];
 550
 551     /* use coded_samples when applicable */
 552     /* it is always <= nb_samples, so the output buffer will be large enough */
 553     if (coded_samples) {
 554         if (coded_samples != nb_samples)
 555             av_log(avctx, AV_LOG_WARNING, "mismatch in coded sample count\n");
 556         c->frame.nb_samples = nb_samples = coded_samples;
 557     }
 558
 559     src = buf;
 560
 561     st = avctx->channels == 2 ? 1 : 0;
 562
 563     switch(avctx->codec->id) {
 564     case CODEC_ID_ADPCM_IMA_QT:
 565         /* In QuickTime, IMA is encoded by chunks of 34 bytes (=64 samples).
 566            Channel data is interleaved per-chunk. */
 567         for (channel = 0; channel < avctx->channels; channel++) {
 568             int16_t predictor;
 569             int step_index;
 570             cs = &(c->status[channel]);
 571             /* (pppppp) (piiiiiii) */
 572
 573             /* Bits 15-7 are the _top_ 9 bits of the 16-bit initial predictor value */
 574             predictor = AV_RB16(src);
 575             step_index = predictor & 0x7F;
 576             predictor &= 0xFF80;
 577
 578             src += 2;
 579
 580             if (cs->step_index == step_index) {
 581                 int diff = (int)predictor - cs->predictor;
 582                 if (diff < 0)
 583                     diff = - diff;
 584                 if (diff > 0x7f)
 585                     goto update;
 586             } else {
 587             update:
 588                 cs->step_index = step_index;
 589                 cs->predictor = predictor;
 590             }
 591
 592             if (cs->step_index > 88){
 593                 av_log(avctx, AV_LOG_ERROR, "ERROR: step_index = %i\n", cs->step_index);
 594                 cs->step_index = 88;
 595             }
 596
 597             samples = (short *)c->frame.data[0] + channel;
 598
 599             for (m = 0; m < 32; m++) {
 600                 *samples = adpcm_ima_qt_expand_nibble(cs, src[0] & 0x0F, 3);
 601                 samples += avctx->channels;
 602                 *samples = adpcm_ima_qt_expand_nibble(cs, src[0] >> 4  , 3);
 603                 samples += avctx->channels;
 604                 src ++;
 605             }
 606         }
 607         break;
 608     case CODEC_ID_ADPCM_IMA_WAV:
 609         if (avctx->block_align != 0 && buf_size > avctx->block_align)
 610             buf_size = avctx->block_align;
 611
 612         for(i=0; i<avctx->channels; i++){
 613             cs = &(c->status[i]);
 614             cs->predictor = *samples++ = (int16_t)bytestream_get_le16(&src);
 615
 616             cs->step_index = *src++;
 617             if (cs->step_index > 88){
 618                 av_log(avctx, AV_LOG_ERROR, "ERROR: step_index = %i\n", cs->step_index);
 619                 cs->step_index = 88;
 620             }
 621             if (*src++) av_log(avctx, AV_LOG_ERROR, "unused byte should be null but is %d!!\n", src[-1]); /* unused */
 622         }
 623
 624         for (n = (nb_samples - 1) / 8; n > 0; n--) {
 625             for (i = 0; i < avctx->channels; i++) {
 626                 cs = &c->status[i];
 627                 for (m = 0; m < 4; m++) {
 628                     uint8_t v = *src++;
 629                     *samples = adpcm_ima_expand_nibble(cs, v & 0x0F, 3);
 630                     samples += avctx->channels;
 631                     *samples = adpcm_ima_expand_nibble(cs, v >> 4  , 3);
 632                     samples += avctx->channels;
 633                 }
 634                 samples -= 8 * avctx->channels - 1;
 635             }
 636             samples += 7 * avctx->channels;
 637         }
 638         break;
 639     case CODEC_ID_ADPCM_4XM:
 640         for (i = 0; i < avctx->channels; i++)
 641             c->status[i].predictor= (int16_t)bytestream_get_le16(&src);
 642
 643         for (i = 0; i < avctx->channels; i++) {
 644             c->status[i].step_index= (int16_t)bytestream_get_le16(&src);
 645             c->status[i].step_index = av_clip(c->status[i].step_index, 0, 88);
 646         }
 647
 648         for (i = 0; i < avctx->channels; i++) {
 649             samples = (short *)c->frame.data[0] + i;
 650             cs = &c->status[i];
 651             for (n = nb_samples >> 1; n > 0; n--, src++) {
 652                 uint8_t v = *src;
 653                 *samples = adpcm_ima_expand_nibble(cs, v & 0x0F, 4);
 654                 samples += avctx->channels;
 655                 *samples = adpcm_ima_expand_nibble(cs, v >> 4  , 4);
 656                 samples += avctx->channels;
 657             }
 658         }
 659         break;
 660     case CODEC_ID_ADPCM_MS:
 661     {
 662         int block_predictor;
 663
 664         if (avctx->block_align != 0 && buf_size > avctx->block_align)
 665             buf_size = avctx->block_align;
 666
 667         block_predictor = av_clip(*src++, 0, 6);
 668         c->status[0].coeff1 = ff_adpcm_AdaptCoeff1[block_predictor];
 669         c->status[0].coeff2 = ff_adpcm_AdaptCoeff2[block_predictor];
 670         if (st) {
 671             block_predictor = av_clip(*src++, 0, 6);
 672             c->status[1].coeff1 = ff_adpcm_AdaptCoeff1[block_predictor];
 673             c->status[1].coeff2 = ff_adpcm_AdaptCoeff2[block_predictor];
 674         }
 675         c->status[0].idelta = (int16_t)bytestream_get_le16(&src);
 676         if (st){
 677             c->status[1].idelta = (int16_t)bytestream_get_le16(&src);
 678         }
 679
 680         c->status[0].sample1 = bytestream_get_le16(&src);
 681         if (st) c->status[1].sample1 = bytestream_get_le16(&src);
 682         c->status[0].sample2 = bytestream_get_le16(&src);
 683         if (st) c->status[1].sample2 = bytestream_get_le16(&src);
 684
 685         *samples++ = c->status[0].sample2;
 686         if (st) *samples++ = c->status[1].sample2;
 687         *samples++ = c->status[0].sample1;
 688         if (st) *samples++ = c->status[1].sample1;
 689         for(n = (nb_samples - 2) >> (1 - st); n > 0; n--, src++) {
 690             *samples++ = adpcm_ms_expand_nibble(&c->status[0 ], src[0] >> 4  );
 691             *samples++ = adpcm_ms_expand_nibble(&c->status[st], src[0] & 0x0F);
 692         }
 693         break;
 694     }
 695     case CODEC_ID_ADPCM_IMA_DK4:
 696         if (avctx->block_align != 0 && buf_size > avctx->block_align)
 697             buf_size = avctx->block_align;
 698
 699         for (channel = 0; channel < avctx->channels; channel++) {
 700             cs = &c->status[channel];
 701             cs->predictor  = (int16_t)bytestream_get_le16(&src);
 702             cs->step_index = *src++;
 703             src++;
 704             *samples++ = cs->predictor;
 705         }
 706         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
 707             uint8_t v = *src;
 708             *samples++ = adpcm_ima_expand_nibble(&c->status[0 ], v >> 4  , 3);
 709             *samples++ = adpcm_ima_expand_nibble(&c->status[st], v & 0x0F, 3);
 710         }
 711         break;
 712     case CODEC_ID_ADPCM_IMA_DK3:
 713     {
 714         unsigned char last_byte = 0;
 715         unsigned char nibble;
 716         int decode_top_nibble_next = 0;
 717         int end_of_packet = 0;
 718         int diff_channel;
 719
 720         if (avctx->block_align != 0 && buf_size > avctx->block_align)
 721             buf_size = avctx->block_align;
 722
 723         c->status[0].predictor  = (int16_t)AV_RL16(src + 10);
 724         c->status[1].predictor  = (int16_t)AV_RL16(src + 12);
 725         c->status[0].step_index = src[14];
 726         c->status[1].step_index = src[15];
 727         /* sign extend the predictors */
 728         src += 16;
 729         diff_channel = c->status[1].predictor;
 730
 731         /* the DK3_GET_NEXT_NIBBLE macro issues the break statement when
 732          * the buffer is consumed */
 733         while (1) {
 734
 735             /* for this algorithm, c->status[0] is the sum channel and
 736              * c->status[1] is the diff channel */
 737
 738             /* process the first predictor of the sum channel */
 739             DK3_GET_NEXT_NIBBLE();
 740             adpcm_ima_expand_nibble(&c->status[0], nibble, 3);
 741
 742             /* process the diff channel predictor */
 743             DK3_GET_NEXT_NIBBLE();
 744             adpcm_ima_expand_nibble(&c->status[1], nibble, 3);
 745
 746             /* process the first pair of stereo PCM samples */
 747             diff_channel = (diff_channel + c->status[1].predictor) / 2;
 748             *samples++ = c->status[0].predictor + c->status[1].predictor;
 749             *samples++ = c->status[0].predictor - c->status[1].predictor;
 750
 751             /* process the second predictor of the sum channel */
 752             DK3_GET_NEXT_NIBBLE();
 753             adpcm_ima_expand_nibble(&c->status[0], nibble, 3);
 754
 755             /* process the second pair of stereo PCM samples */
 756             diff_channel = (diff_channel + c->status[1].predictor) / 2;
 757             *samples++ = c->status[0].predictor + c->status[1].predictor;
 758             *samples++ = c->status[0].predictor - c->status[1].predictor;
 759         }
 760         break;
 761     }
 762     case CODEC_ID_ADPCM_IMA_ISS:
 763         for (channel = 0; channel < avctx->channels; channel++) {
 764             cs = &c->status[channel];
 765             cs->predictor  = (int16_t)bytestream_get_le16(&src);
 766             cs->step_index = *src++;
 767             src++;
 768         }
 769
 770         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
 771             uint8_t v1, v2;
 772             uint8_t v = *src;
 773             /* nibbles are swapped for mono */
 774             if (st) {
 775                 v1 = v >> 4;
 776                 v2 = v & 0x0F;
 777             } else {
 778                 v2 = v >> 4;
 779                 v1 = v & 0x0F;
 780             }
 781             *samples++ = adpcm_ima_expand_nibble(&c->status[0 ], v1, 3);
 782             *samples++ = adpcm_ima_expand_nibble(&c->status[st], v2, 3);
 783         }
 784         break;
 785     case CODEC_ID_ADPCM_IMA_APC:
 786         while (src < buf + buf_size) {
 787             uint8_t v = *src++;
 788             *samples++ = adpcm_ima_expand_nibble(&c->status[0],  v >> 4  , 3);
 789             *samples++ = adpcm_ima_expand_nibble(&c->status[st], v & 0x0F, 3);
 790         }
 791         break;
 792     case CODEC_ID_ADPCM_IMA_WS:
 793         for (channel = 0; channel < avctx->channels; channel++) {
 794             const uint8_t *src0;
 795             int src_stride;
 796             int16_t *smp = samples + channel;
 797
 798             if (c->vqa_version == 3) {
 799                 src0 = src + channel * buf_size / 2;
 800                 src_stride = 1;
 801             } else {
 802                 src0 = src + channel;
 803                 src_stride = avctx->channels;
 804             }
 805             for (n = nb_samples / 2; n > 0; n--) {
 806                 uint8_t v = *src0;
 807                 src0 += src_stride;
 808                 *smp = adpcm_ima_expand_nibble(&c->status[channel], v >> 4  , 3);
 809                 smp += avctx->channels;
 810                 *smp = adpcm_ima_expand_nibble(&c->status[channel], v & 0x0F, 3);
 811                 smp += avctx->channels;
 812             }
 813         }
 814         src = buf + buf_size;
 815         break;
 816     case CODEC_ID_ADPCM_XA:
 817         while (buf_size >= 128) {
 818             xa_decode(samples, src, &c->status[0], &c->status[1],
 819                 avctx->channels);
 820             src += 128;
 821             samples += 28 * 8;
 822             buf_size -= 128;
 823         }
 824         break;
 825     case CODEC_ID_ADPCM_IMA_EA_EACS:
 826         src += 4; // skip sample count (already read)
 827
 828         for (i=0; i<=st; i++)
 829             c->status[i].step_index = bytestream_get_le32(&src);
 830         for (i=0; i<=st; i++)
 831             c->status[i].predictor  = bytestream_get_le32(&src);
 832
 833         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
 834             *samples++ = adpcm_ima_expand_nibble(&c->status[0],  *src>>4,   3);
 835             *samples++ = adpcm_ima_expand_nibble(&c->status[st], *src&0x0F, 3);
 836         }
 837         break;
 838     case CODEC_ID_ADPCM_IMA_EA_SEAD:
 839         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
 840             *samples++ = adpcm_ima_expand_nibble(&c->status[0], src[0] >> 4, 6);
 841             *samples++ = adpcm_ima_expand_nibble(&c->status[st],src[0]&0x0F, 6);
 842         }
 843         break;
 844     case CODEC_ID_ADPCM_EA:
 845     {
 846         int32_t previous_left_sample, previous_right_sample;
 847         int32_t current_left_sample, current_right_sample;
 848         int32_t next_left_sample, next_right_sample;
 849         int32_t coeff1l, coeff2l, coeff1r, coeff2r;
 850         uint8_t shift_left, shift_right;
 851
 852         /* Each EA ADPCM frame has a 12-byte header followed by 30-byte pieces,
 853            each coding 28 stereo samples. */
 854
 855         if(avctx->channels != 2)
 856             return AVERROR_INVALIDDATA;
 857
 858         src += 4; // skip sample count (already read)
 859
 860         current_left_sample   = (int16_t)bytestream_get_le16(&src);
 861         previous_left_sample  = (int16_t)bytestream_get_le16(&src);
 862         current_right_sample  = (int16_t)bytestream_get_le16(&src);
 863         previous_right_sample = (int16_t)bytestream_get_le16(&src);
 864
 865         for (count1 = 0; count1 < nb_samples / 28; count1++) {
 866             coeff1l = ea_adpcm_table[ *src >> 4       ];
 867             coeff2l = ea_adpcm_table[(*src >> 4  ) + 4];
 868             coeff1r = ea_adpcm_table[*src & 0x0F];
 869             coeff2r = ea_adpcm_table[(*src & 0x0F) + 4];
 870             src++;
 871
 872             shift_left  = 20 - (*src >> 4);
 873             shift_right = 20 - (*src & 0x0F);
 874             src++;
 875
 876             for (count2 = 0; count2 < 28; count2++) {
 877                 next_left_sample  = sign_extend(*src >> 4, 4) << shift_left;
 878                 next_right_sample = sign_extend(*src,      4) << shift_right;
 879                 src++;
 880
 881                 next_left_sample = (next_left_sample +
 882                     (current_left_sample * coeff1l) +
 883                     (previous_left_sample * coeff2l) + 0x80) >> 8;
 884                 next_right_sample = (next_right_sample +
 885                     (current_right_sample * coeff1r) +
 886                     (previous_right_sample * coeff2r) + 0x80) >> 8;
 887
 888                 previous_left_sample = current_left_sample;
 889                 current_left_sample = av_clip_int16(next_left_sample);
 890                 previous_right_sample = current_right_sample;
 891                 current_right_sample = av_clip_int16(next_right_sample);
 892                 *samples++ = (unsigned short)current_left_sample;
 893                 *samples++ = (unsigned short)current_right_sample;
 894             }
 895         }
 896
 897         if (src - buf == buf_size - 2)
 898             src += 2; // Skip terminating 0x0000
 899
 900         break;
 901     }
 902     case CODEC_ID_ADPCM_EA_MAXIS_XA:
 903     {
 904         int coeff[2][2], shift[2];
 905
 906         for(channel = 0; channel < avctx->channels; channel++) {
 907             for (i=0; i<2; i++)
 908                 coeff[channel][i] = ea_adpcm_table[(*src >> 4) + 4*i];
 909             shift[channel] = 20 - (*src & 0x0F);
 910             src++;
 911         }
 912         for (count1 = 0; count1 < nb_samples / 2; count1++) {
 913             for(i = 4; i >= 0; i-=4) { /* Pairwise samples LL RR (st) or LL LL (mono) */
 914                 for(channel = 0; channel < avctx->channels; channel++) {
 915                     int32_t sample = sign_extend(src[channel] >> i, 4) << shift[channel];
 916                     sample = (sample +
 917                              c->status[channel].sample1 * coeff[channel][0] +
 918                              c->status[channel].sample2 * coeff[channel][1] + 0x80) >> 8;
 919                     c->status[channel].sample2 = c->status[channel].sample1;
 920                     c->status[channel].sample1 = av_clip_int16(sample);
 921                     *samples++ = c->status[channel].sample1;
 922                 }
 923             }
 924             src+=avctx->channels;
 925         }
 926         /* consume whole packet */
 927         src = buf + buf_size;
 928         break;
 929     }
 930     case CODEC_ID_ADPCM_EA_R1:
 931     case CODEC_ID_ADPCM_EA_R2:
 932     case CODEC_ID_ADPCM_EA_R3: {
 933         /* channel numbering
 934            2chan: 0=fl, 1=fr
 935            4chan: 0=fl, 1=rl, 2=fr, 3=rr
 936            6chan: 0=fl, 1=c,  2=fr, 3=rl,  4=rr, 5=sub */
 937         const int big_endian = avctx->codec->id == CODEC_ID_ADPCM_EA_R3;
 938         int32_t previous_sample, current_sample, next_sample;
 939         int32_t coeff1, coeff2;
 940         uint8_t shift;
 941         unsigned int channel;
 942         uint16_t *samplesC;
 943         const uint8_t *srcC;
 944         const uint8_t *src_end = buf + buf_size;
 945         int count = 0;
 946
 947         src += 4; // skip sample count (already read)
 948
 949         for (channel=0; channel<avctx->channels; channel++) {
 950             int32_t offset = (big_endian ? bytestream_get_be32(&src)
 951                                          : bytestream_get_le32(&src))
 952                            + (avctx->channels-channel-1) * 4;
 953
 954             if ((offset < 0) || (offset >= src_end - src - 4)) break;
 955             srcC  = src + offset;
 956             samplesC = samples + channel;
 957
 958             if (avctx->codec->id == CODEC_ID_ADPCM_EA_R1) {
 959                 current_sample  = (int16_t)bytestream_get_le16(&srcC);
 960                 previous_sample = (int16_t)bytestream_get_le16(&srcC);
 961             } else {
 962                 current_sample  = c->status[channel].predictor;
 963                 previous_sample = c->status[channel].prev_sample;
 964             }
 965
 966             for (count1 = 0; count1 < nb_samples / 28; count1++) {
 967                 if (*srcC == 0xEE) {  /* only seen in R2 and R3 */
 968                     srcC++;
 969                     if (srcC > src_end - 30*2) break;
 970                     current_sample  = (int16_t)bytestream_get_be16(&srcC);
 971                     previous_sample = (int16_t)bytestream_get_be16(&srcC);
 972
 973                     for (count2=0; count2<28; count2++) {
 974                         *samplesC = (int16_t)bytestream_get_be16(&srcC);
 975                         samplesC += avctx->channels;
 976                     }
 977                 } else {
 978                     coeff1 = ea_adpcm_table[ *srcC>>4     ];
 979                     coeff2 = ea_adpcm_table[(*srcC>>4) + 4];
 980                     shift = 20 - (*srcC++ & 0x0F);
 981
 982                     if (srcC > src_end - 14) break;
 983                     for (count2=0; count2<28; count2++) {
 984                         if (count2 & 1)
 985                             next_sample = sign_extend(*srcC++,    4) << shift;
 986                         else
 987                             next_sample = sign_extend(*srcC >> 4, 4) << shift;
 988
 989                         next_sample += (current_sample  * coeff1) +
 990                                        (previous_sample * coeff2);
 991                         next_sample = av_clip_int16(next_sample >> 8);
 992
 993                         previous_sample = current_sample;
 994                         current_sample  = next_sample;
 995                         *samplesC = current_sample;
 996                         samplesC += avctx->channels;
 997                     }
 998                 }
 999             }
1000             if (!count) {
1001                 count = count1;
1002             } else if (count != count1) {
1003                 av_log(avctx, AV_LOG_WARNING, "per-channel sample count mismatch\n");
1004                 count = FFMAX(count, count1);
1005             }
1006
1007             if (avctx->codec->id != CODEC_ID_ADPCM_EA_R1) {
1008                 c->status[channel].predictor   = current_sample;
1009                 c->status[channel].prev_sample = previous_sample;
1010             }
1011         }
1012
1013         c->frame.nb_samples = count * 28;
1014         src = src_end;
1015         break;
1016     }
1017     case CODEC_ID_ADPCM_EA_XAS:
1018         for (channel=0; channel<avctx->channels; channel++) {
1019             int coeff[2][4], shift[4];
1020             short *s2, *s = &samples[channel];
1021             for (n=0; n<4; n++, s+=32*avctx->channels) {
1022                 for (i=0; i<2; i++)
1023                     coeff[i][n] = ea_adpcm_table[(src[0]&0x0F)+4*i];
1024                 shift[n] = 20 - (src[2] & 0x0F);
1025                 for (s2=s, i=0; i<2; i++, src+=2, s2+=avctx->channels)
1026                     s2[0] = (src[0]&0xF0) + (src[1]<<8);
1027             }
1028
1029             for (m=2; m<32; m+=2) {
1030                 s = &samples[m*avctx->channels + channel];
1031                 for (n=0; n<4; n++, src++, s+=32*avctx->channels) {
1032                     for (s2=s, i=0; i<8; i+=4, s2+=avctx->channels) {
1033                         int level = sign_extend(*src >> (4 - i), 4) << shift[n];
1034                         int pred  = s2[-1*avctx->channels] * coeff[0][n]
1035                                   + s2[-2*avctx->channels] * coeff[1][n];
1036                         s2[0] = av_clip_int16((level + pred + 0x80) >> 8);
1037                     }
1038                 }
1039             }
1040         }
1041         break;
1042     case CODEC_ID_ADPCM_IMA_AMV:
1043     case CODEC_ID_ADPCM_IMA_SMJPEG:
1044         if (avctx->codec->id == CODEC_ID_ADPCM_IMA_AMV) {
1045             c->status[0].predictor = sign_extend(bytestream_get_le16(&src), 16);
1046             c->status[0].step_index = bytestream_get_le16(&src);
1047             src += 4;
1048         } else {
1049             c->status[0].predictor = sign_extend(bytestream_get_be16(&src), 16);
1050             c->status[0].step_index = bytestream_get_byte(&src);
1051             src += 1;
1052         }
1053
1054         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
1055             char hi, lo;
1056             lo = *src & 0x0F;
1057             hi = *src >> 4;
1058
1059             if (avctx->codec->id == CODEC_ID_ADPCM_IMA_AMV)
1060                 FFSWAP(char, hi, lo);
1061
1062             *samples++ = adpcm_ima_expand_nibble(&c->status[0],
1063                 lo, 3);
1064             *samples++ = adpcm_ima_expand_nibble(&c->status[0],
1065                 hi, 3);
1066         }
1067         break;
1068     case CODEC_ID_ADPCM_CT:
1069         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
1070             uint8_t v = *src;
1071             *samples++ = adpcm_ct_expand_nibble(&c->status[0 ], v >> 4  );
1072             *samples++ = adpcm_ct_expand_nibble(&c->status[st], v & 0x0F);
1073         }
1074         break;
1075     case CODEC_ID_ADPCM_SBPRO_4:
1076     case CODEC_ID_ADPCM_SBPRO_3:
1077     case CODEC_ID_ADPCM_SBPRO_2:
1078         if (!c->status[0].step_index) {
1079             /* the first byte is a raw sample */
1080             *samples++ = 128 * (*src++ - 0x80);
1081             if (st)
1082               *samples++ = 128 * (*src++ - 0x80);
1083             c->status[0].step_index = 1;
1084             nb_samples--;
1085         }
1086         if (avctx->codec->id == CODEC_ID_ADPCM_SBPRO_4) {
1087             for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
1088                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1089                     src[0] >> 4, 4, 0);
1090                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[st],
1091                     src[0] & 0x0F, 4, 0);
1092             }
1093         } else if (avctx->codec->id == CODEC_ID_ADPCM_SBPRO_3) {
1094             for (n = nb_samples / 3; n > 0; n--, src++) {
1095                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1096                      src[0] >> 5        , 3, 0);
1097                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1098                     (src[0] >> 2) & 0x07, 3, 0);
1099                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1100                     src[0] & 0x03, 2, 0);
1101             }
1102         } else {
1103             for (n = nb_samples >> (2 - st); n > 0; n--, src++) {
1104                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1105                      src[0] >> 6        , 2, 2);
1106                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[st],
1107                     (src[0] >> 4) & 0x03, 2, 2);
1108                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[0],
1109                     (src[0] >> 2) & 0x03, 2, 2);
1110                 *samples++ = adpcm_sbpro_expand_nibble(&c->status[st],
1111                     src[0] & 0x03, 2, 2);
1112             }
1113         }
1114         break;
1115     case CODEC_ID_ADPCM_SWF:
1116     {
1117         GetBitContext gb;
1118         const int *table;
1119         int k0, signmask, nb_bits, count;
1120         int size = buf_size*8;
1121
1122         init_get_bits(&gb, buf, size);
1123
1124         //read bits & initial values
1125         nb_bits = get_bits(&gb, 2)+2;
1126         //av_log(NULL,AV_LOG_INFO,"nb_bits: %d\n", nb_bits);
1127         table = swf_index_tables[nb_bits-2];
1128         k0 = 1 << (nb_bits-2);
1129         signmask = 1 << (nb_bits-1);
1130
1131         while (get_bits_count(&gb) <= size - 22*avctx->channels) {
1132             for (i = 0; i < avctx->channels; i++) {
1133                 *samples++ = c->status[i].predictor = get_sbits(&gb, 16);
1134                 c->status[i].step_index = get_bits(&gb, 6);
1135             }
1136
1137             for (count = 0; get_bits_count(&gb) <= size - nb_bits*avctx->channels && count < 4095; count++) {
1138                 int i;
1139
1140                 for (i = 0; i < avctx->channels; i++) {
1141                     // similar to IMA adpcm
1142                     int delta = get_bits(&gb, nb_bits);
1143                     int step = ff_adpcm_step_table[c->status[i].step_index];
1144                     long vpdiff = 0; // vpdiff = (delta+0.5)*step/4
1145                     int k = k0;
1146
1147                     do {
1148                         if (delta & k)
1149                             vpdiff += step;
1150                         step >>= 1;
1151                         k >>= 1;
1152                     } while(k);
1153                     vpdiff += step;
1154
1155                     if (delta & signmask)
1156                         c->status[i].predictor -= vpdiff;
1157                     else
1158                         c->status[i].predictor += vpdiff;
1159
1160                     c->status[i].step_index += table[delta & (~signmask)];
1161
1162                     c->status[i].step_index = av_clip(c->status[i].step_index, 0, 88);
1163                     c->status[i].predictor = av_clip_int16(c->status[i].predictor);
1164
1165                     *samples++ = c->status[i].predictor;
1166                 }
1167             }
1168         }
1169         src += buf_size;
1170         break;
1171     }
1172     case CODEC_ID_ADPCM_YAMAHA:
1173         for (n = nb_samples >> (1 - st); n > 0; n--, src++) {
1174             uint8_t v = *src;
1175             *samples++ = adpcm_yamaha_expand_nibble(&c->status[0 ], v & 0x0F);
1176             *samples++ = adpcm_yamaha_expand_nibble(&c->status[st], v >> 4  );
1177         }
1178         break;
1179     case CODEC_ID_ADPCM_THP:
1180     {
1181         int table[2][16];
1182         int prev[2][2];
1183         int ch;
1184
1185         src += 4; // skip channel size
1186         src += 4; // skip number of samples (already read)
1187
1188         for (i = 0; i < 32; i++)
1189             table[0][i] = (int16_t)bytestream_get_be16(&src);
1190
1191         /* Initialize the previous sample.  */
1192         for (i = 0; i < 4; i++)
1193             prev[0][i] = (int16_t)bytestream_get_be16(&src);
1194
1195         for (ch = 0; ch <= st; ch++) {
1196             samples = (short *)c->frame.data[0] + ch;
1197
1198             /* Read in every sample for this channel.  */
1199             for (i = 0; i < nb_samples / 14; i++) {
1200                 int index = (*src >> 4) & 7;
1201                 unsigned int exp = *src++ & 15;
1202                 int factor1 = table[ch][index * 2];
1203                 int factor2 = table[ch][index * 2 + 1];
1204
1205                 /* Decode 14 samples.  */
1206                 for (n = 0; n < 14; n++) {
1207                     int32_t sampledat;
1208                     if(n&1) sampledat = sign_extend(*src++, 4);
1209                     else    sampledat = sign_extend(*src >> 4, 4);
1210
1211                     sampledat = ((prev[ch][0]*factor1
1212                                 + prev[ch][1]*factor2) >> 11) + (sampledat << exp);
1213                     *samples = av_clip_int16(sampledat);
1214                     prev[ch][1] = prev[ch][0];
1215                     prev[ch][0] = *samples++;
1216
1217                     /* In case of stereo, skip one sample, this sample
1218                        is for the other channel.  */
1219                     samples += st;
1220                 }
1221             }
1222         }
1223         break;
1224     }
1225
1226     default:
1227         return -1;
1228     }
1229
1230     *got_frame_ptr   = 1;
1231     *(AVFrame *)data = c->frame;
1232
1233     return src - buf;
1234 }
1235
1236
1237 #define ADPCM_DECODER(id_, name_, long_name_)               \
1238 AVCodec ff_ ## name_ ## _decoder = {                        \
1239     .name           = #name_,                               \
1240     .type           = AVMEDIA_TYPE_AUDIO,                   \
1241     .id             = id_,                                  \
1242     .priv_data_size = sizeof(ADPCMDecodeContext),           \
1243     .init           = adpcm_decode_init,                    \
1244     .decode         = adpcm_decode_frame,                   \
1245     .capabilities   = CODEC_CAP_DR1,                        \
1246     .long_name      = NULL_IF_CONFIG_SMALL(long_name_),     \
1247 }
1248
1249 /* Note: Do not forget to add new entries to the Makefile as well. */
1250 ADPCM_DECODER(CODEC_ID_ADPCM_4XM, adpcm_4xm, "ADPCM 4X Movie");
1251 ADPCM_DECODER(CODEC_ID_ADPCM_CT, adpcm_ct, "ADPCM Creative Technology");
1252 ADPCM_DECODER(CODEC_ID_ADPCM_EA, adpcm_ea, "ADPCM Electronic Arts");
1253 ADPCM_DECODER(CODEC_ID_ADPCM_EA_MAXIS_XA, adpcm_ea_maxis_xa, "ADPCM Electronic Arts Maxis CDROM XA");
1254 ADPCM_DECODER(CODEC_ID_ADPCM_EA_R1, adpcm_ea_r1, "ADPCM Electronic Arts R1");
1255 ADPCM_DECODER(CODEC_ID_ADPCM_EA_R2, adpcm_ea_r2, "ADPCM Electronic Arts R2");
1256 ADPCM_DECODER(CODEC_ID_ADPCM_EA_R3, adpcm_ea_r3, "ADPCM Electronic Arts R3");
1257 ADPCM_DECODER(CODEC_ID_ADPCM_EA_XAS, adpcm_ea_xas, "ADPCM Electronic Arts XAS");
1258 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_AMV, adpcm_ima_amv, "ADPCM IMA AMV");
1259 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_APC, adpcm_ima_apc, "ADPCM IMA CRYO APC");
1260 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_DK3, adpcm_ima_dk3, "ADPCM IMA Duck DK3");
1261 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_DK4, adpcm_ima_dk4, "ADPCM IMA Duck DK4");
1262 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_EA_EACS, adpcm_ima_ea_eacs, "ADPCM IMA Electronic Arts EACS");
1263 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_EA_SEAD, adpcm_ima_ea_sead, "ADPCM IMA Electronic Arts SEAD");
1264 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_ISS, adpcm_ima_iss, "ADPCM IMA Funcom ISS");
1265 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_QT, adpcm_ima_qt, "ADPCM IMA QuickTime");
1266 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_SMJPEG, adpcm_ima_smjpeg, "ADPCM IMA Loki SDL MJPEG");
1267 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_WAV, adpcm_ima_wav, "ADPCM IMA WAV");
1268 ADPCM_DECODER(CODEC_ID_ADPCM_IMA_WS, adpcm_ima_ws, "ADPCM IMA Westwood");
1269 ADPCM_DECODER(CODEC_ID_ADPCM_MS, adpcm_ms, "ADPCM Microsoft");
1270 ADPCM_DECODER(CODEC_ID_ADPCM_SBPRO_2, adpcm_sbpro_2, "ADPCM Sound Blaster Pro 2-bit");
1271 ADPCM_DECODER(CODEC_ID_ADPCM_SBPRO_3, adpcm_sbpro_3, "ADPCM Sound Blaster Pro 2.6-bit");
1272 ADPCM_DECODER(CODEC_ID_ADPCM_SBPRO_4, adpcm_sbpro_4, "ADPCM Sound Blaster Pro 4-bit");
1273 ADPCM_DECODER(CODEC_ID_ADPCM_SWF, adpcm_swf, "ADPCM Shockwave Flash");
1274 ADPCM_DECODER(CODEC_ID_ADPCM_THP, adpcm_thp, "ADPCM Nintendo Gamecube THP");
1275 ADPCM_DECODER(CODEC_ID_ADPCM_XA, adpcm_xa, "ADPCM CDROM XA");
1276 ADPCM_DECODER(CODEC_ID_ADPCM_YAMAHA, adpcm_yamaha, "ADPCM Yamaha");