mirror of https://github.com/FFmpeg/FFmpeg.git
Originally committed as revision 6336 to svn://svn.ffmpeg.org/ffmpeg/trunkpull/126/head
parent
1a174c2831
commit
730581f3b4
11 changed files with 770 additions and 0 deletions
@ -0,0 +1,548 @@ |
|||||||
|
/*
|
||||||
|
* WavPack lossless audio decoder |
||||||
|
* Copyright (c) 2006 Konstantin Shishkov |
||||||
|
* |
||||||
|
* This library is free software; you can redistribute it and/or |
||||||
|
* modify it under the terms of the GNU Lesser General Public |
||||||
|
* License as published by the Free Software Foundation; either |
||||||
|
* version 2 of the License, or (at your option) any later version. |
||||||
|
* |
||||||
|
* This library is distributed in the hope that it will be useful, |
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||||
|
* Lesser General Public License for more details. |
||||||
|
* |
||||||
|
* You should have received a copy of the GNU Lesser General Public |
||||||
|
* License along with this library; if not, write to the Free Software |
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||||
|
*/ |
||||||
|
#define ALT_BITSTREAM_READER_LE |
||||||
|
#include "avcodec.h" |
||||||
|
#include "bitstream.h" |
||||||
|
|
||||||
|
/**
|
||||||
|
* @file wavpack.c |
||||||
|
* WavPack lossless audio decoder |
||||||
|
*/ |
||||||
|
|
||||||
|
#define WV_JOINT 0x0010 |
||||||
|
|
||||||
|
enum WP_ID_Flags{ |
||||||
|
WP_IDF_MASK = 0x1F, |
||||||
|
WP_IDF_IGNORE = 0x20, |
||||||
|
WP_IDF_ODD = 0x40, |
||||||
|
WP_IDF_LONG = 0x80 |
||||||
|
}; |
||||||
|
|
||||||
|
enum WP_ID{ |
||||||
|
WP_ID_DUMMY = 0, |
||||||
|
WP_ID_ENCINFO, |
||||||
|
WP_ID_DECTERMS, |
||||||
|
WP_ID_DECWEIGHTS, |
||||||
|
WP_ID_DECSAMPLES, |
||||||
|
WP_ID_ENTROPY, |
||||||
|
WP_ID_HYBRID, |
||||||
|
WP_ID_SHAPING, |
||||||
|
WP_ID_FLOATINFO, |
||||||
|
WP_ID_INT32INFO, |
||||||
|
WP_ID_DATA, |
||||||
|
WP_ID_CORR, |
||||||
|
WP_ID_FLT, |
||||||
|
WP_ID_CHANINFO |
||||||
|
}; |
||||||
|
|
||||||
|
#define MAX_TERMS 16 |
||||||
|
|
||||||
|
typedef struct Decorr { |
||||||
|
int delta; |
||||||
|
int value; |
||||||
|
int weightA; |
||||||
|
int weightB; |
||||||
|
int samplesA[8]; |
||||||
|
int samplesB[8]; |
||||||
|
} Decorr; |
||||||
|
|
||||||
|
typedef struct WavpackContext { |
||||||
|
AVCodecContext *avctx; |
||||||
|
int stereo; |
||||||
|
int joint; |
||||||
|
uint32_t CRC; |
||||||
|
GetBitContext gb; |
||||||
|
int data_size; // in bits
|
||||||
|
int samples; |
||||||
|
int median[6]; |
||||||
|
int terms; |
||||||
|
Decorr decorr[MAX_TERMS]; |
||||||
|
int zero, one, zeroes; |
||||||
|
} WavpackContext; |
||||||
|
|
||||||
|
// exponent table copied from WavPack source
|
||||||
|
static const uint8_t wp_exp2_table [256] = { |
||||||
|
0x00, 0x01, 0x01, 0x02, 0x03, 0x03, 0x04, 0x05, 0x06, 0x06, 0x07, 0x08, 0x08, 0x09, 0x0a, 0x0b, |
||||||
|
0x0b, 0x0c, 0x0d, 0x0e, 0x0e, 0x0f, 0x10, 0x10, 0x11, 0x12, 0x13, 0x13, 0x14, 0x15, 0x16, 0x16, |
||||||
|
0x17, 0x18, 0x19, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1d, 0x1e, 0x1f, 0x20, 0x20, 0x21, 0x22, 0x23, |
||||||
|
0x24, 0x24, 0x25, 0x26, 0x27, 0x28, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, |
||||||
|
0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3a, 0x3b, 0x3c, 0x3d, |
||||||
|
0x3e, 0x3f, 0x40, 0x41, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x48, 0x49, 0x4a, 0x4b, |
||||||
|
0x4c, 0x4d, 0x4e, 0x4f, 0x50, 0x51, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, |
||||||
|
0x5b, 0x5c, 0x5d, 0x5e, 0x5e, 0x5f, 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, |
||||||
|
0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, |
||||||
|
0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x87, 0x88, 0x89, 0x8a, |
||||||
|
0x8b, 0x8c, 0x8d, 0x8e, 0x8f, 0x90, 0x91, 0x92, 0x93, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b, |
||||||
|
0x9c, 0x9d, 0x9f, 0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad, |
||||||
|
0xaf, 0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xbc, 0xbd, 0xbe, 0xbf, 0xc0, |
||||||
|
0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc8, 0xc9, 0xca, 0xcb, 0xcd, 0xce, 0xcf, 0xd0, 0xd2, 0xd3, 0xd4, |
||||||
|
0xd6, 0xd7, 0xd8, 0xd9, 0xdb, 0xdc, 0xdd, 0xde, 0xe0, 0xe1, 0xe2, 0xe4, 0xe5, 0xe6, 0xe8, 0xe9, |
||||||
|
0xea, 0xec, 0xed, 0xee, 0xf0, 0xf1, 0xf2, 0xf4, 0xf5, 0xf6, 0xf8, 0xf9, 0xfa, 0xfc, 0xfd, 0xff |
||||||
|
}; |
||||||
|
|
||||||
|
static always_inline int wp_exp2(int16_t val) |
||||||
|
{ |
||||||
|
int res, neg = 0; |
||||||
|
|
||||||
|
if(val < 0){ |
||||||
|
val = -val; |
||||||
|
neg = 1; |
||||||
|
} |
||||||
|
|
||||||
|
res = wp_exp2_table[val & 0xFF] | 0x100; |
||||||
|
val >>= 8; |
||||||
|
res = (val > 9) ? (res << (val - 9)) : (res >> (9 - val)); |
||||||
|
return neg ? -res : res; |
||||||
|
} |
||||||
|
|
||||||
|
static inline int get_unary(GetBitContext *gb){ |
||||||
|
int r=0; |
||||||
|
while(get_bits1(gb) && r<33)r++; |
||||||
|
return r; |
||||||
|
} |
||||||
|
|
||||||
|
// macros for manipulating median values
|
||||||
|
#define GET_MED(n) ((median[n] >> 4) + 1) |
||||||
|
#define DEC_MED(n) median[n] -= ((median[n] + (128>>n) - 2) / (128>>n)) * 2 |
||||||
|
#define INC_MED(n) median[n] += ((median[n] + (128>>n)) / (128>>n)) * 5 |
||||||
|
|
||||||
|
// macros for applying weight
|
||||||
|
#define UPDATE_WEIGHT_CLIP(weight, delta, samples, in) \ |
||||||
|
if(samples && in){ \
|
||||||
|
if((samples ^ in) < 0){ \
|
||||||
|
weight -= delta; \
|
||||||
|
if(weight < -1024) weight = -1024; \
|
||||||
|
}else{ \
|
||||||
|
weight += delta; \
|
||||||
|
if(weight > 1024) weight = 1024; \
|
||||||
|
} \
|
||||||
|
} |
||||||
|
|
||||||
|
|
||||||
|
static always_inline int get_tail(GetBitContext *gb, int k) |
||||||
|
{ |
||||||
|
int p, e, res; |
||||||
|
|
||||||
|
if(k<1 || k>65535)return 0; |
||||||
|
p = av_log2_16bit(k); |
||||||
|
e = (1 << (p + 1)) - k - 1; |
||||||
|
res = get_bits(gb, p); |
||||||
|
if(res >= e){ |
||||||
|
res = (res<<1) - e + get_bits1(gb); |
||||||
|
} |
||||||
|
return res; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_get_value(WavpackContext *ctx, GetBitContext *gb, int *median, int *last) |
||||||
|
{ |
||||||
|
int t, t2; |
||||||
|
int sign, base, add, ret; |
||||||
|
|
||||||
|
*last = 0; |
||||||
|
|
||||||
|
if((ctx->median[0] < 2U) && (ctx->median[3] < 2U) && !ctx->zero && !ctx->one){ |
||||||
|
if(ctx->zeroes){ |
||||||
|
ctx->zeroes--; |
||||||
|
if(ctx->zeroes) |
||||||
|
return 0; |
||||||
|
}else{ |
||||||
|
t = get_unary(gb); |
||||||
|
if(t >= 2) t = get_bits(gb, t - 1) | (1 << (t-1)); |
||||||
|
ctx->zeroes = t; |
||||||
|
if(ctx->zeroes){ |
||||||
|
memset(ctx->median, 0, sizeof(ctx->median)); |
||||||
|
return 0; |
||||||
|
} |
||||||
|
} |
||||||
|
} |
||||||
|
|
||||||
|
if(get_bits_count(gb) >= ctx->data_size){ |
||||||
|
*last = 1; |
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
if(ctx->zero){ |
||||||
|
t = 0; |
||||||
|
ctx->zero = 0; |
||||||
|
}else{ |
||||||
|
t = get_unary(gb); |
||||||
|
if(get_bits_count(gb) >= ctx->data_size){ |
||||||
|
*last = 1; |
||||||
|
return 0; |
||||||
|
} |
||||||
|
if(t == 16) { |
||||||
|
t2 = get_unary(gb); |
||||||
|
if(t2 < 2) t += t2; |
||||||
|
else t += get_bits(gb, t2 - 1) | (1 << (t2 - 1)); |
||||||
|
} |
||||||
|
|
||||||
|
if(ctx->one){ |
||||||
|
ctx->one = t&1; |
||||||
|
t = (t>>1) + 1; |
||||||
|
}else{ |
||||||
|
ctx->one = t&1; |
||||||
|
t >>= 1; |
||||||
|
} |
||||||
|
ctx->zero = !ctx->one; |
||||||
|
} |
||||||
|
|
||||||
|
if(!t){ |
||||||
|
base = 0; |
||||||
|
add = GET_MED(0) - 1; |
||||||
|
DEC_MED(0); |
||||||
|
}else if(t == 1){ |
||||||
|
base = GET_MED(0); |
||||||
|
add = GET_MED(1) - 1; |
||||||
|
INC_MED(0); |
||||||
|
DEC_MED(1); |
||||||
|
}else if(t == 2){ |
||||||
|
base = GET_MED(0) + GET_MED(1); |
||||||
|
add = GET_MED(2) - 1; |
||||||
|
INC_MED(0); |
||||||
|
INC_MED(1); |
||||||
|
DEC_MED(2); |
||||||
|
}else{ |
||||||
|
base = GET_MED(0) + GET_MED(1) + GET_MED(2) * (t - 2); |
||||||
|
add = GET_MED(2) - 1; |
||||||
|
INC_MED(0); |
||||||
|
INC_MED(1); |
||||||
|
INC_MED(2); |
||||||
|
} |
||||||
|
ret = base + get_tail(gb, add); |
||||||
|
sign = get_bits1(gb); |
||||||
|
return sign ? ~ret : ret; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_unpack_stereo(WavpackContext *s, GetBitContext *gb, int16_t *dst) |
||||||
|
{ |
||||||
|
int i, j, count = 0; |
||||||
|
int last, t; |
||||||
|
int A, B, L, L2, R, R2; |
||||||
|
int pos = 0; |
||||||
|
uint32_t crc = 0xFFFFFFFF; |
||||||
|
|
||||||
|
s->one = s->zero = s->zeroes = 0; |
||||||
|
do{ |
||||||
|
L = wv_get_value(s, gb, s->median, &last); |
||||||
|
if(last) break; |
||||||
|
R = wv_get_value(s, gb, s->median + 3, &last); |
||||||
|
if(last) break; |
||||||
|
for(i = 0; i < s->terms; i++){ |
||||||
|
t = s->decorr[i].value; |
||||||
|
j = 0; |
||||||
|
if(t > 0){ |
||||||
|
if(t > 8){ |
||||||
|
if(t & 1){ |
||||||
|
A = 2 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]; |
||||||
|
B = 2 * s->decorr[i].samplesB[0] - s->decorr[i].samplesB[1]; |
||||||
|
}else{ |
||||||
|
A = (3 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]) >> 1; |
||||||
|
B = (3 * s->decorr[i].samplesB[0] - s->decorr[i].samplesB[1]) >> 1; |
||||||
|
} |
||||||
|
s->decorr[i].samplesA[1] = s->decorr[i].samplesA[0]; |
||||||
|
s->decorr[i].samplesB[1] = s->decorr[i].samplesB[0]; |
||||||
|
j = 0; |
||||||
|
}else{ |
||||||
|
A = s->decorr[i].samplesA[pos]; |
||||||
|
B = s->decorr[i].samplesB[pos]; |
||||||
|
j = (pos + t) & 7; |
||||||
|
} |
||||||
|
L2 = L + ((s->decorr[i].weightA * A + 512) >> 10); |
||||||
|
R2 = R + ((s->decorr[i].weightB * B + 512) >> 10); |
||||||
|
if(A && L) s->decorr[i].weightA -= ((((L ^ A) >> 30) & 2) - 1) * s->decorr[i].delta; |
||||||
|
if(B && R) s->decorr[i].weightB -= ((((R ^ B) >> 30) & 2) - 1) * s->decorr[i].delta; |
||||||
|
s->decorr[i].samplesA[j] = L = L2; |
||||||
|
s->decorr[i].samplesB[j] = R = R2; |
||||||
|
}else if(t == -1){ |
||||||
|
L2 = L + ((s->decorr[i].weightA * s->decorr[i].samplesA[0] + 512) >> 10); |
||||||
|
UPDATE_WEIGHT_CLIP(s->decorr[i].weightA, s->decorr[i].delta, s->decorr[i].samplesA[0], L); |
||||||
|
L = L2; |
||||||
|
R2 = R + ((s->decorr[i].weightB * L2 + 512) >> 10); |
||||||
|
UPDATE_WEIGHT_CLIP(s->decorr[i].weightB, s->decorr[i].delta, L2, R); |
||||||
|
R = R2; |
||||||
|
s->decorr[i].samplesA[0] = R; |
||||||
|
}else{ |
||||||
|
R2 = R + ((s->decorr[i].weightB * s->decorr[i].samplesB[0] + 512) >> 10); |
||||||
|
UPDATE_WEIGHT_CLIP(s->decorr[i].weightB, s->decorr[i].delta, s->decorr[i].samplesB[0], R); |
||||||
|
R = R2; |
||||||
|
|
||||||
|
if(t == -3){ |
||||||
|
R2 = s->decorr[i].samplesA[0]; |
||||||
|
s->decorr[i].samplesA[0] = R; |
||||||
|
} |
||||||
|
|
||||||
|
L2 = L + ((s->decorr[i].weightA * R2 + 512) >> 10); |
||||||
|
UPDATE_WEIGHT_CLIP(s->decorr[i].weightA, s->decorr[i].delta, R2, L); |
||||||
|
L = L2; |
||||||
|
s->decorr[i].samplesB[0] = L; |
||||||
|
} |
||||||
|
} |
||||||
|
pos = (pos + 1) & 7; |
||||||
|
if(s->joint) |
||||||
|
L += (R -= (L >> 1)); |
||||||
|
crc = (crc * 3 + L) * 3 + R; |
||||||
|
*dst++ = L; |
||||||
|
*dst++ = R; |
||||||
|
|
||||||
|
count++; |
||||||
|
}while(!last && count < s->samples); |
||||||
|
|
||||||
|
if(crc != s->CRC){ |
||||||
|
av_log(s->avctx, AV_LOG_ERROR, "CRC error\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
return count * 2; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_unpack_mono(WavpackContext *s, GetBitContext *gb, int16_t *dst) |
||||||
|
{ |
||||||
|
int i, j, count = 0; |
||||||
|
int last, t; |
||||||
|
int A, S, T; |
||||||
|
int pos = 0; |
||||||
|
uint32_t crc = 0xFFFFFFFF; |
||||||
|
|
||||||
|
s->one = s->zero = s->zeroes = 0; |
||||||
|
do{ |
||||||
|
T = wv_get_value(s, gb, s->median, &last); |
||||||
|
S = 0; |
||||||
|
if(last) break; |
||||||
|
for(i = 0; i < s->terms; i++){ |
||||||
|
t = s->decorr[i].value; |
||||||
|
if(t > 8){ |
||||||
|
if(t & 1) |
||||||
|
A = 2 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]; |
||||||
|
else |
||||||
|
A = (3 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]) >> 1; |
||||||
|
s->decorr[i].samplesA[1] = s->decorr[i].samplesA[0]; |
||||||
|
j = 0; |
||||||
|
}else{ |
||||||
|
A = s->decorr[i].samplesA[pos]; |
||||||
|
j = (pos + t) & 7; |
||||||
|
} |
||||||
|
S = T + ((s->decorr[i].weightA * A + 512) >> 10); |
||||||
|
if(A && T) s->decorr[i].weightA -= ((((T ^ A) >> 30) & 2) - 1) * s->decorr[i].delta; |
||||||
|
s->decorr[i].samplesA[j] = T = S; |
||||||
|
} |
||||||
|
pos = (pos + 1) & 7; |
||||||
|
crc = crc * 3 + S; |
||||||
|
*dst++ = S; |
||||||
|
count++; |
||||||
|
}while(!last && count < s->samples); |
||||||
|
|
||||||
|
if(crc != s->CRC){ |
||||||
|
av_log(s->avctx, AV_LOG_ERROR, "CRC error\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
return count; |
||||||
|
} |
||||||
|
|
||||||
|
static int wavpack_decode_init(AVCodecContext *avctx) |
||||||
|
{ |
||||||
|
WavpackContext *s = avctx->priv_data; |
||||||
|
|
||||||
|
s->avctx = avctx; |
||||||
|
s->stereo = (avctx->channels == 2); |
||||||
|
|
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wavpack_decode_close(AVCodecContext *avctx) |
||||||
|
{ |
||||||
|
// WavpackContext *s = avctx->priv_data;
|
||||||
|
|
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wavpack_decode_frame(AVCodecContext *avctx, |
||||||
|
void *data, int *data_size, |
||||||
|
uint8_t *buf, int buf_size) |
||||||
|
{ |
||||||
|
WavpackContext *s = avctx->priv_data; |
||||||
|
int16_t *samples = data; |
||||||
|
int samplecount; |
||||||
|
int got_terms = 0, got_weights = 0, got_samples = 0, got_entropy = 0, got_bs = 0; |
||||||
|
uint8_t* buf_end = buf + buf_size; |
||||||
|
int i, j, id, size, ssize, weights, t; |
||||||
|
|
||||||
|
if (buf_size == 0) return 0; |
||||||
|
|
||||||
|
memset(s->decorr, 0, MAX_TERMS * sizeof(Decorr)); |
||||||
|
|
||||||
|
s->samples = LE_32(buf); buf += 4; |
||||||
|
s->joint = LE_32(buf) & WV_JOINT; buf += 4; |
||||||
|
s->CRC = LE_32(buf); buf += 4; |
||||||
|
// parse metadata blocks
|
||||||
|
while(buf < buf_end){ |
||||||
|
id = *buf++; |
||||||
|
size = *buf++; |
||||||
|
if(id & WP_IDF_LONG) { |
||||||
|
size |= (*buf++) << 8; |
||||||
|
size |= (*buf++) << 16; |
||||||
|
} |
||||||
|
size <<= 1; // size is specified in words
|
||||||
|
ssize = size; |
||||||
|
if(id & WP_IDF_ODD) size--; |
||||||
|
if(size < 0){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Got incorrect block %02X with size %i\n", id, size); |
||||||
|
break; |
||||||
|
} |
||||||
|
if(buf + ssize > buf_end){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Block size %i is out of bounds\n", size); |
||||||
|
break; |
||||||
|
} |
||||||
|
if(id & WP_IDF_IGNORE){ |
||||||
|
buf += ssize; |
||||||
|
continue; |
||||||
|
} |
||||||
|
switch(id & WP_IDF_MASK){ |
||||||
|
case WP_ID_DECTERMS: |
||||||
|
s->terms = size; |
||||||
|
if(s->terms > MAX_TERMS){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Too many decorrelation terms\n"); |
||||||
|
buf += ssize; |
||||||
|
continue; |
||||||
|
} |
||||||
|
for(i = 0; i < s->terms; i++) { |
||||||
|
s->decorr[s->terms - i - 1].value = (*buf & 0x1F) - 5; |
||||||
|
s->decorr[s->terms - i - 1].delta = *buf >> 5; |
||||||
|
buf++; |
||||||
|
} |
||||||
|
got_terms = 1; |
||||||
|
break; |
||||||
|
case WP_ID_DECWEIGHTS: |
||||||
|
if(!got_terms){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No decorrelation terms met\n"); |
||||||
|
continue; |
||||||
|
} |
||||||
|
weights = size >> s->stereo; |
||||||
|
if(weights > MAX_TERMS || weights > s->terms){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Too many decorrelation weights\n"); |
||||||
|
buf += ssize; |
||||||
|
continue; |
||||||
|
} |
||||||
|
for(i = 0; i < weights; i++) { |
||||||
|
t = (int8_t)(*buf++); |
||||||
|
s->decorr[s->terms - i - 1].weightA = t << 3; |
||||||
|
if(s->decorr[s->terms - i - 1].weightA > 0) |
||||||
|
s->decorr[s->terms - i - 1].weightA += (s->decorr[s->terms - i - 1].weightA + 64) >> 7; |
||||||
|
if(s->stereo){ |
||||||
|
t = (int8_t)(*buf++); |
||||||
|
s->decorr[s->terms - i - 1].weightB = t << 3; |
||||||
|
if(s->decorr[s->terms - i - 1].weightB > 0) |
||||||
|
s->decorr[s->terms - i - 1].weightB += (s->decorr[s->terms - i - 1].weightB + 64) >> 7; |
||||||
|
} |
||||||
|
} |
||||||
|
got_weights = 1; |
||||||
|
break; |
||||||
|
case WP_ID_DECSAMPLES: |
||||||
|
if(!got_terms){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No decorrelation terms met\n"); |
||||||
|
continue; |
||||||
|
} |
||||||
|
t = 0; |
||||||
|
for(i = s->terms - 1; (i >= 0) && (t < size); i--) { |
||||||
|
if(s->decorr[i].value > 8){ |
||||||
|
s->decorr[i].samplesA[0] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
s->decorr[i].samplesA[1] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
if(s->stereo){ |
||||||
|
s->decorr[i].samplesB[0] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
s->decorr[i].samplesB[1] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
t += 4; |
||||||
|
} |
||||||
|
t += 4; |
||||||
|
}else if(s->decorr[i].value < 0){ |
||||||
|
s->decorr[i].samplesA[0] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
s->decorr[i].samplesB[0] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
t += 4; |
||||||
|
}else{ |
||||||
|
for(j = 0; j < s->decorr[i].value; j++){ |
||||||
|
s->decorr[i].samplesA[j] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
if(s->stereo){ |
||||||
|
s->decorr[i].samplesB[j] = wp_exp2(LE_16(buf)); buf += 2; |
||||||
|
} |
||||||
|
} |
||||||
|
t += s->decorr[i].value * 2 * avctx->channels; |
||||||
|
} |
||||||
|
} |
||||||
|
got_samples = 1; |
||||||
|
break; |
||||||
|
case WP_ID_ENTROPY: |
||||||
|
if(size != 6 * avctx->channels){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Entropy vars size should be %i, got %i", 6 * avctx->channels, size); |
||||||
|
buf += ssize; |
||||||
|
continue; |
||||||
|
} |
||||||
|
for(i = 0; i < 3 * avctx->channels; i++){ |
||||||
|
s->median[i] = wp_exp2(LE_16(buf)); |
||||||
|
buf += 2; |
||||||
|
} |
||||||
|
got_entropy = 1; |
||||||
|
break; |
||||||
|
case WP_ID_DATA: |
||||||
|
init_get_bits(&s->gb, buf, size * 8); |
||||||
|
s->data_size = size * 8; |
||||||
|
buf += size; |
||||||
|
got_bs = 1; |
||||||
|
break; |
||||||
|
default: |
||||||
|
buf += size; |
||||||
|
} |
||||||
|
if(id & WP_IDF_ODD) buf++; |
||||||
|
} |
||||||
|
if(!got_terms){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No block with decorrelation terms\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(!got_weights){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No block with decorrelation weights\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(!got_samples){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No block with decorrelation samples\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(!got_entropy){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "No block with entropy info\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(!got_bs){ |
||||||
|
av_log(avctx, AV_LOG_ERROR, "Packed samples not found\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
|
||||||
|
if(s->stereo) |
||||||
|
samplecount = wv_unpack_stereo(s, &s->gb, samples); |
||||||
|
else |
||||||
|
samplecount = wv_unpack_mono(s, &s->gb, samples); |
||||||
|
*data_size = samplecount * 2; |
||||||
|
|
||||||
|
return buf_size; |
||||||
|
} |
||||||
|
|
||||||
|
AVCodec wavpack_decoder = { |
||||||
|
"wavpack", |
||||||
|
CODEC_TYPE_AUDIO, |
||||||
|
CODEC_ID_WAVPACK, |
||||||
|
sizeof(WavpackContext), |
||||||
|
wavpack_decode_init, |
||||||
|
NULL, |
||||||
|
wavpack_decode_close, |
||||||
|
wavpack_decode_frame, |
||||||
|
}; |
@ -0,0 +1,207 @@ |
|||||||
|
/*
|
||||||
|
* WavPack demuxer |
||||||
|
* Copyright (c) 2006 Konstantin Shishkov. |
||||||
|
* |
||||||
|
* This library is free software; you can redistribute it and/or |
||||||
|
* modify it under the terms of the GNU Lesser General Public |
||||||
|
* License as published by the Free Software Foundation; either |
||||||
|
* version 2 of the License, or (at your option) any later version. |
||||||
|
* |
||||||
|
* This library is distributed in the hope that it will be useful, |
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||||
|
* Lesser General Public License for more details. |
||||||
|
* |
||||||
|
* You should have received a copy of the GNU Lesser General Public |
||||||
|
* License along with this library; if not, write to the Free Software |
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||||
|
*/ |
||||||
|
|
||||||
|
#include "avformat.h" |
||||||
|
#include "allformats.h" |
||||||
|
#include "bswap.h" |
||||||
|
|
||||||
|
// specs say that maximum block size is 1Mb
|
||||||
|
#define WV_BLOCK_LIMIT 1047576 |
||||||
|
|
||||||
|
#define WV_EXTRA_SIZE 12 |
||||||
|
|
||||||
|
enum WV_FLAGS{ |
||||||
|
WV_MONO = 0x0004, |
||||||
|
WV_HYBRID = 0x0008, |
||||||
|
WV_JOINT = 0x0010, |
||||||
|
WV_CROSSD = 0x0020, |
||||||
|
WV_HSHAPE = 0x0040, |
||||||
|
WV_FLOAT = 0x0080, |
||||||
|
WV_INT32 = 0x0100, |
||||||
|
WV_HBR = 0x0200, |
||||||
|
WV_HBAL = 0x0400, |
||||||
|
WV_MCINIT = 0x0800, |
||||||
|
WV_MCEND = 0x1000, |
||||||
|
}; |
||||||
|
|
||||||
|
static const int wv_rates[16] = { |
||||||
|
6000, 8000, 9600, 11025, 12000, 16000, 22050, 24000, |
||||||
|
32000, 44100, 48000, 64000, 88200, 96000, 192000, -1 |
||||||
|
}; |
||||||
|
|
||||||
|
typedef struct{ |
||||||
|
uint32_t blksize, flags; |
||||||
|
int rate, chan, bpp; |
||||||
|
int block_parsed; |
||||||
|
uint8_t extra[WV_EXTRA_SIZE]; |
||||||
|
}WVContext; |
||||||
|
|
||||||
|
static int wv_probe(AVProbeData *p) |
||||||
|
{ |
||||||
|
/* check file header */ |
||||||
|
if (p->buf_size <= 32) |
||||||
|
return 0; |
||||||
|
if (p->buf[0] == 'w' && p->buf[1] == 'v' && |
||||||
|
p->buf[2] == 'p' && p->buf[3] == 'k') |
||||||
|
return AVPROBE_SCORE_MAX; |
||||||
|
else |
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_read_block_header(AVFormatContext *ctx, ByteIOContext *pb) |
||||||
|
{ |
||||||
|
WVContext *wc = ctx->priv_data; |
||||||
|
uint32_t tag, ver; |
||||||
|
int size; |
||||||
|
int rate, bpp, chan; |
||||||
|
|
||||||
|
tag = get_le32(pb); |
||||||
|
if (tag != MKTAG('w', 'v', 'p', 'k')) |
||||||
|
return -1; |
||||||
|
size = get_le32(pb); |
||||||
|
if(size < 24 || size > WV_BLOCK_LIMIT){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Incorrect block size %i\n", size); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
wc->blksize = size; |
||||||
|
ver = get_le16(pb); |
||||||
|
if(ver < 0x402 || ver > 0x40F){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Unsupported version %03X\n", ver); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
get_byte(pb); // track no
|
||||||
|
get_byte(pb); // track sub index
|
||||||
|
get_le32(pb); // total samples in file
|
||||||
|
get_le32(pb); // offset in samples of current block
|
||||||
|
get_buffer(pb, wc->extra, WV_EXTRA_SIZE); |
||||||
|
wc->flags = LE_32(wc->extra + 4); |
||||||
|
//parse flags
|
||||||
|
if(wc->flags & WV_FLOAT){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Floating point data is not supported\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(wc->flags & WV_HYBRID){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Hybrid coding mode is not supported\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(wc->flags & WV_INT32){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Integer point data is not supported\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
|
||||||
|
bpp = ((wc->flags & 3) + 1) << 3; |
||||||
|
chan = 1 + !(wc->flags & WV_MONO); |
||||||
|
rate = wv_rates[(wc->flags >> 23) & 0xF]; |
||||||
|
if(rate == -1){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Unknown sampling rate\n"); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(!wc->bpp) wc->bpp = bpp; |
||||||
|
if(!wc->chan) wc->chan = chan; |
||||||
|
if(!wc->rate) wc->rate = rate; |
||||||
|
|
||||||
|
if(bpp != wc->bpp){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Bits per sample differ, this block: %i, header block: %i\n", bpp, wc->bpp); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(chan != wc->chan){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Channels differ, this block: %i, header block: %i\n", chan, wc->chan); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
if(rate != wc->rate){ |
||||||
|
av_log(ctx, AV_LOG_ERROR, "Sampling rate differ, this block: %i, header block: %i\n", rate, wc->rate); |
||||||
|
return -1; |
||||||
|
} |
||||||
|
wc->blksize = size - 24; |
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_read_header(AVFormatContext *s, |
||||||
|
AVFormatParameters *ap) |
||||||
|
{ |
||||||
|
ByteIOContext *pb = &s->pb; |
||||||
|
WVContext *wc = s->priv_data; |
||||||
|
AVStream *st; |
||||||
|
|
||||||
|
if(wv_read_block_header(s, pb) < 0) |
||||||
|
return -1; |
||||||
|
|
||||||
|
wc->block_parsed = 0; |
||||||
|
/* now we are ready: build format streams */ |
||||||
|
st = av_new_stream(s, 0); |
||||||
|
if (!st) |
||||||
|
return -1; |
||||||
|
st->codec->codec_type = CODEC_TYPE_AUDIO; |
||||||
|
st->codec->codec_id = CODEC_ID_WAVPACK; |
||||||
|
st->codec->channels = wc->chan; |
||||||
|
st->codec->sample_rate = wc->rate; |
||||||
|
st->codec->bits_per_sample = wc->bpp; |
||||||
|
av_set_pts_info(st, 64, 1, wc->rate); |
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_read_packet(AVFormatContext *s, |
||||||
|
AVPacket *pkt) |
||||||
|
{ |
||||||
|
WVContext *wc = s->priv_data; |
||||||
|
int ret, samples; |
||||||
|
|
||||||
|
if (url_feof(&s->pb)) |
||||||
|
return -EIO; |
||||||
|
if(wc->block_parsed){ |
||||||
|
if(wv_read_block_header(s, &s->pb) < 0) |
||||||
|
return -1; |
||||||
|
} |
||||||
|
|
||||||
|
samples = LE_32(wc->extra); |
||||||
|
/* should not happen but who knows */ |
||||||
|
if(samples * 2 * wc->chan > AVCODEC_MAX_AUDIO_FRAME_SIZE){ |
||||||
|
av_log(s, AV_LOG_ERROR, "Packet size is too big to be handled in lavc!\n"); |
||||||
|
return -EIO; |
||||||
|
} |
||||||
|
if(av_new_packet(pkt, wc->blksize + WV_EXTRA_SIZE) < 0) |
||||||
|
return AVERROR_NOMEM; |
||||||
|
memcpy(pkt->data, wc->extra, WV_EXTRA_SIZE); |
||||||
|
ret = get_buffer(&s->pb, pkt->data + WV_EXTRA_SIZE, wc->blksize); |
||||||
|
if(ret != wc->blksize){ |
||||||
|
av_free_packet(pkt); |
||||||
|
return AVERROR_IO; |
||||||
|
} |
||||||
|
pkt->stream_index = 0; |
||||||
|
wc->block_parsed = 1; |
||||||
|
pkt->size = ret + WV_EXTRA_SIZE; |
||||||
|
|
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
static int wv_read_close(AVFormatContext *s) |
||||||
|
{ |
||||||
|
return 0; |
||||||
|
} |
||||||
|
|
||||||
|
AVInputFormat wv_demuxer = { |
||||||
|
"wv", |
||||||
|
"WavPack", |
||||||
|
sizeof(WVContext), |
||||||
|
wv_probe, |
||||||
|
wv_read_header, |
||||||
|
wv_read_packet, |
||||||
|
wv_read_close, |
||||||
|
pcm_read_seek, |
||||||
|
}; |
Loading…
Reference in new issue