You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1303 lines
43KB

  1. /*
  2. * WavPack lossless audio decoder
  3. * Copyright (c) 2006,2011 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. #define BITSTREAM_READER_LE
  22. #include "libavutil/channel_layout.h"
  23. #include "avcodec.h"
  24. #include "get_bits.h"
  25. #include "internal.h"
  26. #include "unary.h"
  27. /**
  28. * @file
  29. * WavPack lossless audio decoder
  30. */
  31. #define WV_MONO 0x00000004
  32. #define WV_JOINT_STEREO 0x00000010
  33. #define WV_FALSE_STEREO 0x40000000
  34. #define WV_HYBRID_MODE 0x00000008
  35. #define WV_HYBRID_SHAPE 0x00000008
  36. #define WV_HYBRID_BITRATE 0x00000200
  37. #define WV_HYBRID_BALANCE 0x00000400
  38. #define WV_FLT_SHIFT_ONES 0x01
  39. #define WV_FLT_SHIFT_SAME 0x02
  40. #define WV_FLT_SHIFT_SENT 0x04
  41. #define WV_FLT_ZERO_SENT 0x08
  42. #define WV_FLT_ZERO_SIGN 0x10
  43. #define WV_MAX_SAMPLES 131072
  44. enum WP_ID_Flags {
  45. WP_IDF_MASK = 0x1F,
  46. WP_IDF_IGNORE = 0x20,
  47. WP_IDF_ODD = 0x40,
  48. WP_IDF_LONG = 0x80
  49. };
  50. enum WP_ID {
  51. WP_ID_DUMMY = 0,
  52. WP_ID_ENCINFO,
  53. WP_ID_DECTERMS,
  54. WP_ID_DECWEIGHTS,
  55. WP_ID_DECSAMPLES,
  56. WP_ID_ENTROPY,
  57. WP_ID_HYBRID,
  58. WP_ID_SHAPING,
  59. WP_ID_FLOATINFO,
  60. WP_ID_INT32INFO,
  61. WP_ID_DATA,
  62. WP_ID_CORR,
  63. WP_ID_EXTRABITS,
  64. WP_ID_CHANINFO
  65. };
  66. typedef struct SavedContext {
  67. int offset;
  68. int size;
  69. int bits_used;
  70. uint32_t crc;
  71. } SavedContext;
  72. #define MAX_TERMS 16
  73. typedef struct Decorr {
  74. int delta;
  75. int value;
  76. int weightA;
  77. int weightB;
  78. int samplesA[8];
  79. int samplesB[8];
  80. } Decorr;
  81. typedef struct WvChannel {
  82. int median[3];
  83. int slow_level, error_limit;
  84. int bitrate_acc, bitrate_delta;
  85. } WvChannel;
  86. typedef struct WavpackFrameContext {
  87. AVCodecContext *avctx;
  88. int frame_flags;
  89. int stereo, stereo_in;
  90. int joint;
  91. uint32_t CRC;
  92. GetBitContext gb;
  93. int got_extra_bits;
  94. uint32_t crc_extra_bits;
  95. GetBitContext gb_extra_bits;
  96. int data_size; // in bits
  97. int samples;
  98. int terms;
  99. Decorr decorr[MAX_TERMS];
  100. int zero, one, zeroes;
  101. int extra_bits;
  102. int and, or, shift;
  103. int post_shift;
  104. int hybrid, hybrid_bitrate;
  105. int hybrid_maxclip, hybrid_minclip;
  106. int float_flag;
  107. int float_shift;
  108. int float_max_exp;
  109. WvChannel ch[2];
  110. int pos;
  111. SavedContext sc, extra_sc;
  112. } WavpackFrameContext;
  113. #define WV_MAX_FRAME_DECODERS 14
  114. typedef struct WavpackContext {
  115. AVCodecContext *avctx;
  116. WavpackFrameContext *fdec[WV_MAX_FRAME_DECODERS];
  117. int fdec_num;
  118. int multichannel;
  119. int mkv_mode;
  120. int block;
  121. int samples;
  122. int ch_offset;
  123. } WavpackContext;
  124. // exponent table copied from WavPack source
  125. static const uint8_t wp_exp2_table[256] = {
  126. 0x00, 0x01, 0x01, 0x02, 0x03, 0x03, 0x04, 0x05, 0x06, 0x06, 0x07, 0x08, 0x08, 0x09, 0x0a, 0x0b,
  127. 0x0b, 0x0c, 0x0d, 0x0e, 0x0e, 0x0f, 0x10, 0x10, 0x11, 0x12, 0x13, 0x13, 0x14, 0x15, 0x16, 0x16,
  128. 0x17, 0x18, 0x19, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1d, 0x1e, 0x1f, 0x20, 0x20, 0x21, 0x22, 0x23,
  129. 0x24, 0x24, 0x25, 0x26, 0x27, 0x28, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2c, 0x2d, 0x2e, 0x2f, 0x30,
  130. 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3a, 0x3b, 0x3c, 0x3d,
  131. 0x3e, 0x3f, 0x40, 0x41, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x48, 0x49, 0x4a, 0x4b,
  132. 0x4c, 0x4d, 0x4e, 0x4f, 0x50, 0x51, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a,
  133. 0x5b, 0x5c, 0x5d, 0x5e, 0x5e, 0x5f, 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69,
  134. 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79,
  135. 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x87, 0x88, 0x89, 0x8a,
  136. 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, 0x90, 0x91, 0x92, 0x93, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b,
  137. 0x9c, 0x9d, 0x9f, 0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad,
  138. 0xaf, 0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xbc, 0xbd, 0xbe, 0xbf, 0xc0,
  139. 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc8, 0xc9, 0xca, 0xcb, 0xcd, 0xce, 0xcf, 0xd0, 0xd2, 0xd3, 0xd4,
  140. 0xd6, 0xd7, 0xd8, 0xd9, 0xdb, 0xdc, 0xdd, 0xde, 0xe0, 0xe1, 0xe2, 0xe4, 0xe5, 0xe6, 0xe8, 0xe9,
  141. 0xea, 0xec, 0xed, 0xee, 0xf0, 0xf1, 0xf2, 0xf4, 0xf5, 0xf6, 0xf8, 0xf9, 0xfa, 0xfc, 0xfd, 0xff
  142. };
  143. static const uint8_t wp_log2_table [] = {
  144. 0x00, 0x01, 0x03, 0x04, 0x06, 0x07, 0x09, 0x0a, 0x0b, 0x0d, 0x0e, 0x10, 0x11, 0x12, 0x14, 0x15,
  145. 0x16, 0x18, 0x19, 0x1a, 0x1c, 0x1d, 0x1e, 0x20, 0x21, 0x22, 0x24, 0x25, 0x26, 0x28, 0x29, 0x2a,
  146. 0x2c, 0x2d, 0x2e, 0x2f, 0x31, 0x32, 0x33, 0x34, 0x36, 0x37, 0x38, 0x39, 0x3b, 0x3c, 0x3d, 0x3e,
  147. 0x3f, 0x41, 0x42, 0x43, 0x44, 0x45, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4d, 0x4e, 0x4f, 0x50, 0x51,
  148. 0x52, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x5c, 0x5d, 0x5e, 0x5f, 0x60, 0x61, 0x62, 0x63,
  149. 0x64, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x74, 0x75,
  150. 0x76, 0x77, 0x78, 0x79, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85,
  151. 0x86, 0x87, 0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, 0x90, 0x91, 0x92, 0x93, 0x94, 0x95,
  152. 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f, 0xa0, 0xa1, 0xa2, 0xa3, 0xa4,
  153. 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xa9, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf, 0xb0, 0xb1, 0xb2, 0xb2,
  154. 0xb3, 0xb4, 0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf, 0xc0, 0xc0,
  155. 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc6, 0xc7, 0xc8, 0xc9, 0xca, 0xcb, 0xcb, 0xcc, 0xcd, 0xce,
  156. 0xcf, 0xd0, 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd8, 0xd9, 0xda, 0xdb,
  157. 0xdc, 0xdc, 0xdd, 0xde, 0xdf, 0xe0, 0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe4, 0xe5, 0xe6, 0xe7, 0xe7,
  158. 0xe8, 0xe9, 0xea, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xee, 0xef, 0xf0, 0xf1, 0xf1, 0xf2, 0xf3, 0xf4,
  159. 0xf4, 0xf5, 0xf6, 0xf7, 0xf7, 0xf8, 0xf9, 0xf9, 0xfa, 0xfb, 0xfc, 0xfc, 0xfd, 0xfe, 0xff, 0xff
  160. };
  161. static av_always_inline int wp_exp2(int16_t val)
  162. {
  163. int res, neg = 0;
  164. if (val < 0) {
  165. val = -val;
  166. neg = 1;
  167. }
  168. res = wp_exp2_table[val & 0xFF] | 0x100;
  169. val >>= 8;
  170. res = (val > 9) ? (res << (val - 9)) : (res >> (9 - val));
  171. return neg ? -res : res;
  172. }
  173. static av_always_inline int wp_log2(int32_t val)
  174. {
  175. int bits;
  176. if (!val)
  177. return 0;
  178. if (val == 1)
  179. return 256;
  180. val += val >> 9;
  181. bits = av_log2(val) + 1;
  182. if (bits < 9)
  183. return (bits << 8) + wp_log2_table[(val << (9 - bits)) & 0xFF];
  184. else
  185. return (bits << 8) + wp_log2_table[(val >> (bits - 9)) & 0xFF];
  186. }
  187. #define LEVEL_DECAY(a) ((a + 0x80) >> 8)
  188. // macros for manipulating median values
  189. #define GET_MED(n) ((c->median[n] >> 4) + 1)
  190. #define DEC_MED(n) c->median[n] -= ((c->median[n] + (128 >> n) - 2) / (128 >> n)) * 2
  191. #define INC_MED(n) c->median[n] += ((c->median[n] + (128 >> n) ) / (128 >> n)) * 5
  192. // macros for applying weight
  193. #define UPDATE_WEIGHT_CLIP(weight, delta, samples, in) \
  194. if (samples && in) { \
  195. if ((samples ^ in) < 0) { \
  196. weight -= delta; \
  197. if (weight < -1024) \
  198. weight = -1024; \
  199. } else { \
  200. weight += delta; \
  201. if (weight > 1024) \
  202. weight = 1024; \
  203. } \
  204. }
  205. static av_always_inline int get_tail(GetBitContext *gb, int k)
  206. {
  207. int p, e, res;
  208. if (k < 1)
  209. return 0;
  210. p = av_log2(k);
  211. e = (1 << (p + 1)) - k - 1;
  212. res = p ? get_bits(gb, p) : 0;
  213. if (res >= e)
  214. res = (res << 1) - e + get_bits1(gb);
  215. return res;
  216. }
  217. static void update_error_limit(WavpackFrameContext *ctx)
  218. {
  219. int i, br[2], sl[2];
  220. for (i = 0; i <= ctx->stereo_in; i++) {
  221. ctx->ch[i].bitrate_acc += ctx->ch[i].bitrate_delta;
  222. br[i] = ctx->ch[i].bitrate_acc >> 16;
  223. sl[i] = LEVEL_DECAY(ctx->ch[i].slow_level);
  224. }
  225. if (ctx->stereo_in && ctx->hybrid_bitrate) {
  226. int balance = (sl[1] - sl[0] + br[1] + 1) >> 1;
  227. if (balance > br[0]) {
  228. br[1] = br[0] << 1;
  229. br[0] = 0;
  230. } else if (-balance > br[0]) {
  231. br[0] <<= 1;
  232. br[1] = 0;
  233. } else {
  234. br[1] = br[0] + balance;
  235. br[0] = br[0] - balance;
  236. }
  237. }
  238. for (i = 0; i <= ctx->stereo_in; i++) {
  239. if (ctx->hybrid_bitrate) {
  240. if (sl[i] - br[i] > -0x100)
  241. ctx->ch[i].error_limit = wp_exp2(sl[i] - br[i] + 0x100);
  242. else
  243. ctx->ch[i].error_limit = 0;
  244. } else {
  245. ctx->ch[i].error_limit = wp_exp2(br[i]);
  246. }
  247. }
  248. }
  249. static int wv_get_value(WavpackFrameContext *ctx, GetBitContext *gb,
  250. int channel, int *last)
  251. {
  252. int t, t2;
  253. int sign, base, add, ret;
  254. WvChannel *c = &ctx->ch[channel];
  255. *last = 0;
  256. if ((ctx->ch[0].median[0] < 2U) && (ctx->ch[1].median[0] < 2U) &&
  257. !ctx->zero && !ctx->one) {
  258. if (ctx->zeroes) {
  259. ctx->zeroes--;
  260. if (ctx->zeroes) {
  261. c->slow_level -= LEVEL_DECAY(c->slow_level);
  262. return 0;
  263. }
  264. } else {
  265. t = get_unary_0_33(gb);
  266. if (t >= 2) {
  267. if (get_bits_left(gb) < t - 1)
  268. goto error;
  269. t = get_bits(gb, t - 1) | (1 << (t - 1));
  270. } else {
  271. if (get_bits_left(gb) < 0)
  272. goto error;
  273. }
  274. ctx->zeroes = t;
  275. if (ctx->zeroes) {
  276. memset(ctx->ch[0].median, 0, sizeof(ctx->ch[0].median));
  277. memset(ctx->ch[1].median, 0, sizeof(ctx->ch[1].median));
  278. c->slow_level -= LEVEL_DECAY(c->slow_level);
  279. return 0;
  280. }
  281. }
  282. }
  283. if (ctx->zero) {
  284. t = 0;
  285. ctx->zero = 0;
  286. } else {
  287. t = get_unary_0_33(gb);
  288. if (get_bits_left(gb) < 0)
  289. goto error;
  290. if (t == 16) {
  291. t2 = get_unary_0_33(gb);
  292. if (t2 < 2) {
  293. if (get_bits_left(gb) < 0)
  294. goto error;
  295. t += t2;
  296. } else {
  297. if (get_bits_left(gb) < t2 - 1)
  298. goto error;
  299. t += get_bits(gb, t2 - 1) | (1 << (t2 - 1));
  300. }
  301. }
  302. if (ctx->one) {
  303. ctx->one = t & 1;
  304. t = (t >> 1) + 1;
  305. } else {
  306. ctx->one = t & 1;
  307. t >>= 1;
  308. }
  309. ctx->zero = !ctx->one;
  310. }
  311. if (ctx->hybrid && !channel)
  312. update_error_limit(ctx);
  313. if (!t) {
  314. base = 0;
  315. add = GET_MED(0) - 1;
  316. DEC_MED(0);
  317. } else if (t == 1) {
  318. base = GET_MED(0);
  319. add = GET_MED(1) - 1;
  320. INC_MED(0);
  321. DEC_MED(1);
  322. } else if (t == 2) {
  323. base = GET_MED(0) + GET_MED(1);
  324. add = GET_MED(2) - 1;
  325. INC_MED(0);
  326. INC_MED(1);
  327. DEC_MED(2);
  328. } else {
  329. base = GET_MED(0) + GET_MED(1) + GET_MED(2) * (t - 2);
  330. add = GET_MED(2) - 1;
  331. INC_MED(0);
  332. INC_MED(1);
  333. INC_MED(2);
  334. }
  335. if (!c->error_limit) {
  336. if (add >= 0x2000000U) {
  337. av_log(ctx->avctx, AV_LOG_ERROR, "k %d is too large\n", add);
  338. goto error;
  339. }
  340. ret = base + get_tail(gb, add);
  341. if (get_bits_left(gb) <= 0)
  342. goto error;
  343. } else {
  344. int mid = (base * 2 + add + 1) >> 1;
  345. while (add > c->error_limit) {
  346. if (get_bits_left(gb) <= 0)
  347. goto error;
  348. if (get_bits1(gb)) {
  349. add -= (mid - base);
  350. base = mid;
  351. } else
  352. add = mid - base - 1;
  353. mid = (base * 2 + add + 1) >> 1;
  354. }
  355. ret = mid;
  356. }
  357. sign = get_bits1(gb);
  358. if (ctx->hybrid_bitrate)
  359. c->slow_level += wp_log2(ret) - LEVEL_DECAY(c->slow_level);
  360. return sign ? ~ret : ret;
  361. error:
  362. *last = 1;
  363. return 0;
  364. }
  365. static inline int wv_get_value_integer(WavpackFrameContext *s, uint32_t *crc,
  366. int S)
  367. {
  368. int bit;
  369. if (s->extra_bits) {
  370. S <<= s->extra_bits;
  371. if (s->got_extra_bits &&
  372. get_bits_left(&s->gb_extra_bits) >= s->extra_bits) {
  373. S |= get_bits(&s->gb_extra_bits, s->extra_bits);
  374. *crc = *crc * 9 + (S & 0xffff) * 3 + ((unsigned)S >> 16);
  375. }
  376. }
  377. bit = (S & s->and) | s->or;
  378. bit = ((S + bit) << s->shift) - bit;
  379. if (s->hybrid)
  380. bit = av_clip(bit, s->hybrid_minclip, s->hybrid_maxclip);
  381. return bit << s->post_shift;
  382. }
  383. static float wv_get_value_float(WavpackFrameContext *s, uint32_t *crc, int S)
  384. {
  385. union {
  386. float f;
  387. uint32_t u;
  388. } value;
  389. unsigned int sign;
  390. int exp = s->float_max_exp;
  391. if (s->got_extra_bits) {
  392. const int max_bits = 1 + 23 + 8 + 1;
  393. const int left_bits = get_bits_left(&s->gb_extra_bits);
  394. if (left_bits + 8 * FF_INPUT_BUFFER_PADDING_SIZE < max_bits)
  395. return 0.0;
  396. }
  397. if (S) {
  398. S <<= s->float_shift;
  399. sign = S < 0;
  400. if (sign)
  401. S = -S;
  402. if (S >= 0x1000000) {
  403. if (s->got_extra_bits && get_bits1(&s->gb_extra_bits))
  404. S = get_bits(&s->gb_extra_bits, 23);
  405. else
  406. S = 0;
  407. exp = 255;
  408. } else if (exp) {
  409. int shift = 23 - av_log2(S);
  410. exp = s->float_max_exp;
  411. if (exp <= shift)
  412. shift = --exp;
  413. exp -= shift;
  414. if (shift) {
  415. S <<= shift;
  416. if ((s->float_flag & WV_FLT_SHIFT_ONES) ||
  417. (s->got_extra_bits &&
  418. (s->float_flag & WV_FLT_SHIFT_SAME) &&
  419. get_bits1(&s->gb_extra_bits))) {
  420. S |= (1 << shift) - 1;
  421. } else if (s->got_extra_bits &&
  422. (s->float_flag & WV_FLT_SHIFT_SENT)) {
  423. S |= get_bits(&s->gb_extra_bits, shift);
  424. }
  425. }
  426. } else {
  427. exp = s->float_max_exp;
  428. }
  429. S &= 0x7fffff;
  430. } else {
  431. sign = 0;
  432. exp = 0;
  433. if (s->got_extra_bits && (s->float_flag & WV_FLT_ZERO_SENT)) {
  434. if (get_bits1(&s->gb_extra_bits)) {
  435. S = get_bits(&s->gb_extra_bits, 23);
  436. if (s->float_max_exp >= 25)
  437. exp = get_bits(&s->gb_extra_bits, 8);
  438. sign = get_bits1(&s->gb_extra_bits);
  439. } else {
  440. if (s->float_flag & WV_FLT_ZERO_SIGN)
  441. sign = get_bits1(&s->gb_extra_bits);
  442. }
  443. }
  444. }
  445. *crc = *crc * 27 + S * 9 + exp * 3 + sign;
  446. value.u = (sign << 31) | (exp << 23) | S;
  447. return value.f;
  448. }
  449. static void wv_reset_saved_context(WavpackFrameContext *s)
  450. {
  451. s->pos = 0;
  452. s->sc.crc = s->extra_sc.crc = 0xFFFFFFFF;
  453. }
  454. static inline int wv_check_crc(WavpackFrameContext *s, uint32_t crc,
  455. uint32_t crc_extra_bits)
  456. {
  457. if (crc != s->CRC) {
  458. av_log(s->avctx, AV_LOG_ERROR, "CRC error\n");
  459. return AVERROR_INVALIDDATA;
  460. }
  461. if (s->got_extra_bits && crc_extra_bits != s->crc_extra_bits) {
  462. av_log(s->avctx, AV_LOG_ERROR, "Extra bits CRC error\n");
  463. return AVERROR_INVALIDDATA;
  464. }
  465. return 0;
  466. }
  467. static inline int wv_unpack_stereo(WavpackFrameContext *s, GetBitContext *gb,
  468. void *dst, const int type)
  469. {
  470. int i, j, count = 0;
  471. int last, t;
  472. int A, B, L, L2, R, R2;
  473. int pos = s->pos;
  474. uint32_t crc = s->sc.crc;
  475. uint32_t crc_extra_bits = s->extra_sc.crc;
  476. int16_t *dst16 = dst;
  477. int32_t *dst32 = dst;
  478. float *dstfl = dst;
  479. const int channel_pad = s->avctx->channels - 2;
  480. s->one = s->zero = s->zeroes = 0;
  481. do {
  482. L = wv_get_value(s, gb, 0, &last);
  483. if (last)
  484. break;
  485. R = wv_get_value(s, gb, 1, &last);
  486. if (last)
  487. break;
  488. for (i = 0; i < s->terms; i++) {
  489. t = s->decorr[i].value;
  490. if (t > 0) {
  491. if (t > 8) {
  492. if (t & 1) {
  493. A = 2 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1];
  494. B = 2 * s->decorr[i].samplesB[0] - s->decorr[i].samplesB[1];
  495. } else {
  496. A = (3 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]) >> 1;
  497. B = (3 * s->decorr[i].samplesB[0] - s->decorr[i].samplesB[1]) >> 1;
  498. }
  499. s->decorr[i].samplesA[1] = s->decorr[i].samplesA[0];
  500. s->decorr[i].samplesB[1] = s->decorr[i].samplesB[0];
  501. j = 0;
  502. } else {
  503. A = s->decorr[i].samplesA[pos];
  504. B = s->decorr[i].samplesB[pos];
  505. j = (pos + t) & 7;
  506. }
  507. if (type != AV_SAMPLE_FMT_S16) {
  508. L2 = L + ((s->decorr[i].weightA * (int64_t)A + 512) >> 10);
  509. R2 = R + ((s->decorr[i].weightB * (int64_t)B + 512) >> 10);
  510. } else {
  511. L2 = L + ((s->decorr[i].weightA * A + 512) >> 10);
  512. R2 = R + ((s->decorr[i].weightB * B + 512) >> 10);
  513. }
  514. if (A && L)
  515. s->decorr[i].weightA -= ((((L ^ A) >> 30) & 2) - 1) * s->decorr[i].delta;
  516. if (B && R)
  517. s->decorr[i].weightB -= ((((R ^ B) >> 30) & 2) - 1) * s->decorr[i].delta;
  518. s->decorr[i].samplesA[j] = L = L2;
  519. s->decorr[i].samplesB[j] = R = R2;
  520. } else if (t == -1) {
  521. if (type != AV_SAMPLE_FMT_S16)
  522. L2 = L + ((s->decorr[i].weightA * (int64_t)s->decorr[i].samplesA[0] + 512) >> 10);
  523. else
  524. L2 = L + ((s->decorr[i].weightA * s->decorr[i].samplesA[0] + 512) >> 10);
  525. UPDATE_WEIGHT_CLIP(s->decorr[i].weightA, s->decorr[i].delta, s->decorr[i].samplesA[0], L);
  526. L = L2;
  527. if (type != AV_SAMPLE_FMT_S16)
  528. R2 = R + ((s->decorr[i].weightB * (int64_t)L2 + 512) >> 10);
  529. else
  530. R2 = R + ((s->decorr[i].weightB * L2 + 512) >> 10);
  531. UPDATE_WEIGHT_CLIP(s->decorr[i].weightB, s->decorr[i].delta, L2, R);
  532. R = R2;
  533. s->decorr[i].samplesA[0] = R;
  534. } else {
  535. if (type != AV_SAMPLE_FMT_S16)
  536. R2 = R + ((s->decorr[i].weightB * (int64_t)s->decorr[i].samplesB[0] + 512) >> 10);
  537. else
  538. R2 = R + ((s->decorr[i].weightB * s->decorr[i].samplesB[0] + 512) >> 10);
  539. UPDATE_WEIGHT_CLIP(s->decorr[i].weightB, s->decorr[i].delta, s->decorr[i].samplesB[0], R);
  540. R = R2;
  541. if (t == -3) {
  542. R2 = s->decorr[i].samplesA[0];
  543. s->decorr[i].samplesA[0] = R;
  544. }
  545. if (type != AV_SAMPLE_FMT_S16)
  546. L2 = L + ((s->decorr[i].weightA * (int64_t)R2 + 512) >> 10);
  547. else
  548. L2 = L + ((s->decorr[i].weightA * R2 + 512) >> 10);
  549. UPDATE_WEIGHT_CLIP(s->decorr[i].weightA, s->decorr[i].delta, R2, L);
  550. L = L2;
  551. s->decorr[i].samplesB[0] = L;
  552. }
  553. }
  554. pos = (pos + 1) & 7;
  555. if (s->joint)
  556. L += (R -= (L >> 1));
  557. crc = (crc * 3 + L) * 3 + R;
  558. if (type == AV_SAMPLE_FMT_FLT) {
  559. *dstfl++ = wv_get_value_float(s, &crc_extra_bits, L);
  560. *dstfl++ = wv_get_value_float(s, &crc_extra_bits, R);
  561. dstfl += channel_pad;
  562. } else if (type == AV_SAMPLE_FMT_S32) {
  563. *dst32++ = wv_get_value_integer(s, &crc_extra_bits, L);
  564. *dst32++ = wv_get_value_integer(s, &crc_extra_bits, R);
  565. dst32 += channel_pad;
  566. } else {
  567. *dst16++ = wv_get_value_integer(s, &crc_extra_bits, L);
  568. *dst16++ = wv_get_value_integer(s, &crc_extra_bits, R);
  569. dst16 += channel_pad;
  570. }
  571. count++;
  572. } while (!last && count < s->samples);
  573. wv_reset_saved_context(s);
  574. if ((s->avctx->err_recognition & AV_EF_CRCCHECK) &&
  575. wv_check_crc(s, crc, crc_extra_bits))
  576. return AVERROR_INVALIDDATA;
  577. return count * 2;
  578. }
  579. static inline int wv_unpack_mono(WavpackFrameContext *s, GetBitContext *gb,
  580. void *dst, const int type)
  581. {
  582. int i, j, count = 0;
  583. int last, t;
  584. int A, S, T;
  585. int pos = s->pos;
  586. uint32_t crc = s->sc.crc;
  587. uint32_t crc_extra_bits = s->extra_sc.crc;
  588. int16_t *dst16 = dst;
  589. int32_t *dst32 = dst;
  590. float *dstfl = dst;
  591. const int channel_stride = s->avctx->channels;
  592. s->one = s->zero = s->zeroes = 0;
  593. do {
  594. T = wv_get_value(s, gb, 0, &last);
  595. S = 0;
  596. if (last)
  597. break;
  598. for (i = 0; i < s->terms; i++) {
  599. t = s->decorr[i].value;
  600. if (t > 8) {
  601. if (t & 1)
  602. A = 2 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1];
  603. else
  604. A = (3 * s->decorr[i].samplesA[0] - s->decorr[i].samplesA[1]) >> 1;
  605. s->decorr[i].samplesA[1] = s->decorr[i].samplesA[0];
  606. j = 0;
  607. } else {
  608. A = s->decorr[i].samplesA[pos];
  609. j = (pos + t) & 7;
  610. }
  611. if (type != AV_SAMPLE_FMT_S16)
  612. S = T + ((s->decorr[i].weightA * (int64_t)A + 512) >> 10);
  613. else
  614. S = T + ((s->decorr[i].weightA * A + 512) >> 10);
  615. if (A && T)
  616. s->decorr[i].weightA -= ((((T ^ A) >> 30) & 2) - 1) * s->decorr[i].delta;
  617. s->decorr[i].samplesA[j] = T = S;
  618. }
  619. pos = (pos + 1) & 7;
  620. crc = crc * 3 + S;
  621. if (type == AV_SAMPLE_FMT_FLT) {
  622. *dstfl = wv_get_value_float(s, &crc_extra_bits, S);
  623. dstfl += channel_stride;
  624. } else if (type == AV_SAMPLE_FMT_S32) {
  625. *dst32 = wv_get_value_integer(s, &crc_extra_bits, S);
  626. dst32 += channel_stride;
  627. } else {
  628. *dst16 = wv_get_value_integer(s, &crc_extra_bits, S);
  629. dst16 += channel_stride;
  630. }
  631. count++;
  632. } while (!last && count < s->samples);
  633. wv_reset_saved_context(s);
  634. if ((s->avctx->err_recognition & AV_EF_CRCCHECK) &&
  635. wv_check_crc(s, crc, crc_extra_bits))
  636. return AVERROR_INVALIDDATA;
  637. return count;
  638. }
  639. static av_cold int wv_alloc_frame_context(WavpackContext *c)
  640. {
  641. if (c->fdec_num == WV_MAX_FRAME_DECODERS)
  642. return -1;
  643. c->fdec[c->fdec_num] = av_mallocz(sizeof(**c->fdec));
  644. if (!c->fdec[c->fdec_num])
  645. return -1;
  646. c->fdec_num++;
  647. c->fdec[c->fdec_num - 1]->avctx = c->avctx;
  648. wv_reset_saved_context(c->fdec[c->fdec_num - 1]);
  649. return 0;
  650. }
  651. static av_cold int wavpack_decode_init(AVCodecContext *avctx)
  652. {
  653. WavpackContext *s = avctx->priv_data;
  654. s->avctx = avctx;
  655. if (avctx->bits_per_coded_sample <= 16)
  656. avctx->sample_fmt = AV_SAMPLE_FMT_S16;
  657. else
  658. avctx->sample_fmt = AV_SAMPLE_FMT_S32;
  659. if (avctx->channels <= 2 && !avctx->channel_layout)
  660. avctx->channel_layout = (avctx->channels == 2) ? AV_CH_LAYOUT_STEREO
  661. : AV_CH_LAYOUT_MONO;
  662. s->multichannel = avctx->channels > 2;
  663. /* lavf demuxer does not provide extradata, Matroska stores 0x403
  664. * there, use this to detect decoding mode for multichannel */
  665. s->mkv_mode = 0;
  666. if (s->multichannel && avctx->extradata && avctx->extradata_size == 2) {
  667. int ver = AV_RL16(avctx->extradata);
  668. if (ver >= 0x402 && ver <= 0x410)
  669. s->mkv_mode = 1;
  670. }
  671. s->fdec_num = 0;
  672. return 0;
  673. }
  674. static av_cold int wavpack_decode_end(AVCodecContext *avctx)
  675. {
  676. WavpackContext *s = avctx->priv_data;
  677. int i;
  678. for (i = 0; i < s->fdec_num; i++)
  679. av_freep(&s->fdec[i]);
  680. s->fdec_num = 0;
  681. return 0;
  682. }
  683. static int wavpack_decode_block(AVCodecContext *avctx, int block_no,
  684. void *data, int *got_frame_ptr,
  685. const uint8_t *buf, int buf_size)
  686. {
  687. WavpackContext *wc = avctx->priv_data;
  688. WavpackFrameContext *s;
  689. void *samples = data;
  690. int samplecount;
  691. int got_terms = 0, got_weights = 0, got_samples = 0,
  692. got_entropy = 0, got_bs = 0, got_float = 0, got_hybrid = 0;
  693. const uint8_t *orig_buf = buf;
  694. const uint8_t *buf_end = buf + buf_size;
  695. int i, j, id, size, ssize, weights, t;
  696. int bpp, chan, chmask, orig_bpp;
  697. if (buf_size == 0) {
  698. *got_frame_ptr = 0;
  699. return 0;
  700. }
  701. if (block_no >= wc->fdec_num && wv_alloc_frame_context(wc) < 0) {
  702. av_log(avctx, AV_LOG_ERROR, "Error creating frame decode context\n");
  703. return -1;
  704. }
  705. s = wc->fdec[block_no];
  706. if (!s) {
  707. av_log(avctx, AV_LOG_ERROR, "Context for block %d is not present\n",
  708. block_no);
  709. return -1;
  710. }
  711. if (wc->ch_offset >= avctx->channels) {
  712. av_log(avctx, AV_LOG_ERROR, "too many channels\n");
  713. return -1;
  714. }
  715. memset(s->decorr, 0, MAX_TERMS * sizeof(Decorr));
  716. memset(s->ch, 0, sizeof(s->ch));
  717. s->extra_bits = 0;
  718. s->and = s->or = s->shift = 0;
  719. s->got_extra_bits = 0;
  720. if (!wc->mkv_mode) {
  721. s->samples = AV_RL32(buf);
  722. buf += 4;
  723. if (!s->samples) {
  724. *got_frame_ptr = 0;
  725. return 0;
  726. }
  727. if (s->samples > wc->samples) {
  728. av_log(avctx, AV_LOG_ERROR, "too many samples in block");
  729. return -1;
  730. }
  731. } else {
  732. s->samples = wc->samples;
  733. }
  734. s->frame_flags = AV_RL32(buf);
  735. buf += 4;
  736. bpp = av_get_bytes_per_sample(avctx->sample_fmt);
  737. samples = (uint8_t *)samples + bpp * wc->ch_offset;
  738. orig_bpp = ((s->frame_flags & 0x03) + 1) << 3;
  739. s->stereo = !(s->frame_flags & WV_MONO);
  740. s->stereo_in = (s->frame_flags & WV_FALSE_STEREO) ? 0 : s->stereo;
  741. s->joint = s->frame_flags & WV_JOINT_STEREO;
  742. s->hybrid = s->frame_flags & WV_HYBRID_MODE;
  743. s->hybrid_bitrate = s->frame_flags & WV_HYBRID_BITRATE;
  744. s->post_shift = bpp * 8 - orig_bpp + ((s->frame_flags >> 13) & 0x1f);
  745. s->hybrid_maxclip = ((1LL << (orig_bpp - 1)) - 1);
  746. s->hybrid_minclip = ((-1LL << (orig_bpp - 1)));
  747. s->CRC = AV_RL32(buf);
  748. buf += 4;
  749. if (wc->mkv_mode)
  750. buf += 4; // skip block size;
  751. wc->ch_offset += 1 + s->stereo;
  752. // parse metadata blocks
  753. while (buf < buf_end) {
  754. id = *buf++;
  755. size = *buf++;
  756. if (id & WP_IDF_LONG) {
  757. size |= (*buf++) << 8;
  758. size |= (*buf++) << 16;
  759. }
  760. size <<= 1; // size is specified in words
  761. ssize = size;
  762. if (id & WP_IDF_ODD)
  763. size--;
  764. if (size < 0) {
  765. av_log(avctx, AV_LOG_ERROR,
  766. "Got incorrect block %02X with size %i\n", id, size);
  767. break;
  768. }
  769. if (buf + ssize > buf_end) {
  770. av_log(avctx, AV_LOG_ERROR,
  771. "Block size %i is out of bounds\n", size);
  772. break;
  773. }
  774. if (id & WP_IDF_IGNORE) {
  775. buf += ssize;
  776. continue;
  777. }
  778. switch (id & WP_IDF_MASK) {
  779. case WP_ID_DECTERMS:
  780. if (size > MAX_TERMS) {
  781. av_log(avctx, AV_LOG_ERROR, "Too many decorrelation terms\n");
  782. s->terms = 0;
  783. buf += ssize;
  784. continue;
  785. }
  786. s->terms = size;
  787. for (i = 0; i < s->terms; i++) {
  788. s->decorr[s->terms - i - 1].value = (*buf & 0x1F) - 5;
  789. s->decorr[s->terms - i - 1].delta = *buf >> 5;
  790. buf++;
  791. }
  792. got_terms = 1;
  793. break;
  794. case WP_ID_DECWEIGHTS:
  795. if (!got_terms) {
  796. av_log(avctx, AV_LOG_ERROR, "No decorrelation terms met\n");
  797. continue;
  798. }
  799. weights = size >> s->stereo_in;
  800. if (weights > MAX_TERMS || weights > s->terms) {
  801. av_log(avctx, AV_LOG_ERROR, "Too many decorrelation weights\n");
  802. buf += ssize;
  803. continue;
  804. }
  805. for (i = 0; i < weights; i++) {
  806. t = (int8_t)(*buf++);
  807. s->decorr[s->terms - i - 1].weightA = t << 3;
  808. if (s->decorr[s->terms - i - 1].weightA > 0)
  809. s->decorr[s->terms - i - 1].weightA +=
  810. (s->decorr[s->terms - i - 1].weightA + 64) >> 7;
  811. if (s->stereo_in) {
  812. t = (int8_t)(*buf++);
  813. s->decorr[s->terms - i - 1].weightB = t << 3;
  814. if (s->decorr[s->terms - i - 1].weightB > 0)
  815. s->decorr[s->terms - i - 1].weightB +=
  816. (s->decorr[s->terms - i - 1].weightB + 64) >> 7;
  817. }
  818. }
  819. got_weights = 1;
  820. break;
  821. case WP_ID_DECSAMPLES:
  822. if (!got_terms) {
  823. av_log(avctx, AV_LOG_ERROR, "No decorrelation terms met\n");
  824. continue;
  825. }
  826. t = 0;
  827. for (i = s->terms - 1; (i >= 0) && (t < size) && buf <= buf_end; i--) {
  828. if (s->decorr[i].value > 8) {
  829. s->decorr[i].samplesA[0] = wp_exp2(AV_RL16(buf));
  830. buf += 2;
  831. s->decorr[i].samplesA[1] = wp_exp2(AV_RL16(buf));
  832. buf += 2;
  833. if (s->stereo_in) {
  834. s->decorr[i].samplesB[0] = wp_exp2(AV_RL16(buf));
  835. buf += 2;
  836. s->decorr[i].samplesB[1] = wp_exp2(AV_RL16(buf));
  837. buf += 2;
  838. t += 4;
  839. }
  840. t += 4;
  841. } else if (s->decorr[i].value < 0) {
  842. s->decorr[i].samplesA[0] = wp_exp2(AV_RL16(buf));
  843. buf += 2;
  844. s->decorr[i].samplesB[0] = wp_exp2(AV_RL16(buf));
  845. buf += 2;
  846. t += 4;
  847. } else {
  848. for (j = 0; j < s->decorr[i].value && buf+1<buf_end; j++) {
  849. s->decorr[i].samplesA[j] = wp_exp2(AV_RL16(buf));
  850. buf += 2;
  851. if (s->stereo_in) {
  852. s->decorr[i].samplesB[j] = wp_exp2(AV_RL16(buf));
  853. buf += 2;
  854. }
  855. }
  856. t += s->decorr[i].value * 2 * (s->stereo_in + 1);
  857. }
  858. }
  859. got_samples = 1;
  860. break;
  861. case WP_ID_ENTROPY:
  862. if (size != 6 * (s->stereo_in + 1)) {
  863. av_log(avctx, AV_LOG_ERROR,
  864. "Entropy vars size should be %i, got %i",
  865. 6 * (s->stereo_in + 1), size);
  866. buf += ssize;
  867. continue;
  868. }
  869. for (j = 0; j <= s->stereo_in; j++)
  870. for (i = 0; i < 3; i++) {
  871. s->ch[j].median[i] = wp_exp2(AV_RL16(buf));
  872. buf += 2;
  873. }
  874. got_entropy = 1;
  875. break;
  876. case WP_ID_HYBRID:
  877. if (s->hybrid_bitrate) {
  878. for (i = 0; i <= s->stereo_in; i++) {
  879. s->ch[i].slow_level = wp_exp2(AV_RL16(buf));
  880. buf += 2;
  881. size -= 2;
  882. }
  883. }
  884. for (i = 0; i < (s->stereo_in + 1); i++) {
  885. s->ch[i].bitrate_acc = AV_RL16(buf) << 16;
  886. buf += 2;
  887. size -= 2;
  888. }
  889. if (size > 0) {
  890. for (i = 0; i < (s->stereo_in + 1); i++) {
  891. s->ch[i].bitrate_delta = wp_exp2((int16_t)AV_RL16(buf));
  892. buf += 2;
  893. }
  894. } else {
  895. for (i = 0; i < (s->stereo_in + 1); i++)
  896. s->ch[i].bitrate_delta = 0;
  897. }
  898. got_hybrid = 1;
  899. break;
  900. case WP_ID_INT32INFO:
  901. if (size != 4) {
  902. av_log(avctx, AV_LOG_ERROR,
  903. "Invalid INT32INFO, size = %i, sent_bits = %i\n",
  904. size, *buf);
  905. buf += ssize;
  906. continue;
  907. }
  908. if (buf[0])
  909. s->extra_bits = buf[0];
  910. else if (buf[1])
  911. s->shift = buf[1];
  912. else if (buf[2]) {
  913. s->and = s->or = 1;
  914. s->shift = buf[2];
  915. } else if (buf[3]) {
  916. s->and = 1;
  917. s->shift = buf[3];
  918. }
  919. /* original WavPack decoder forces 32-bit lossy sound to be treated
  920. * as 24-bit one in order to have proper clipping */
  921. if (s->hybrid && bpp == 4 && s->post_shift < 8 && s->shift > 8) {
  922. s->post_shift += 8;
  923. s->shift -= 8;
  924. s->hybrid_maxclip >>= 8;
  925. s->hybrid_minclip >>= 8;
  926. }
  927. buf += 4;
  928. break;
  929. case WP_ID_FLOATINFO:
  930. if (size != 4) {
  931. av_log(avctx, AV_LOG_ERROR,
  932. "Invalid FLOATINFO, size = %i\n", size);
  933. buf += ssize;
  934. continue;
  935. }
  936. s->float_flag = buf[0];
  937. s->float_shift = buf[1];
  938. s->float_max_exp = buf[2];
  939. buf += 4;
  940. got_float = 1;
  941. break;
  942. case WP_ID_DATA:
  943. s->sc.offset = buf - orig_buf;
  944. s->sc.size = size * 8;
  945. init_get_bits(&s->gb, buf, size * 8);
  946. s->data_size = size * 8;
  947. buf += size;
  948. got_bs = 1;
  949. break;
  950. case WP_ID_EXTRABITS:
  951. if (size <= 4) {
  952. av_log(avctx, AV_LOG_ERROR, "Invalid EXTRABITS, size = %i\n",
  953. size);
  954. buf += size;
  955. continue;
  956. }
  957. s->extra_sc.offset = buf - orig_buf;
  958. s->extra_sc.size = size * 8;
  959. init_get_bits(&s->gb_extra_bits, buf, size * 8);
  960. s->crc_extra_bits = get_bits_long(&s->gb_extra_bits, 32);
  961. buf += size;
  962. s->got_extra_bits = 1;
  963. break;
  964. case WP_ID_CHANINFO:
  965. if (size <= 1) {
  966. av_log(avctx, AV_LOG_ERROR,
  967. "Insufficient channel information\n");
  968. return -1;
  969. }
  970. chan = *buf++;
  971. switch (size - 2) {
  972. case 0:
  973. chmask = *buf;
  974. break;
  975. case 1:
  976. chmask = AV_RL16(buf);
  977. break;
  978. case 2:
  979. chmask = AV_RL24(buf);
  980. break;
  981. case 3:
  982. chmask = AV_RL32(buf);
  983. break;
  984. case 5:
  985. chan |= (buf[1] & 0xF) << 8;
  986. chmask = AV_RL24(buf + 2);
  987. break;
  988. default:
  989. av_log(avctx, AV_LOG_ERROR, "Invalid channel info size %d\n",
  990. size);
  991. chan = avctx->channels;
  992. chmask = avctx->channel_layout;
  993. }
  994. if (chan != avctx->channels) {
  995. av_log(avctx, AV_LOG_ERROR,
  996. "Block reports total %d channels, "
  997. "decoder believes it's %d channels\n",
  998. chan, avctx->channels);
  999. return -1;
  1000. }
  1001. if (!avctx->channel_layout)
  1002. avctx->channel_layout = chmask;
  1003. buf += size - 1;
  1004. break;
  1005. default:
  1006. buf += size;
  1007. }
  1008. if (id & WP_IDF_ODD)
  1009. buf++;
  1010. }
  1011. if (!got_terms) {
  1012. av_log(avctx, AV_LOG_ERROR, "No block with decorrelation terms\n");
  1013. return -1;
  1014. }
  1015. if (!got_weights) {
  1016. av_log(avctx, AV_LOG_ERROR, "No block with decorrelation weights\n");
  1017. return -1;
  1018. }
  1019. if (!got_samples) {
  1020. av_log(avctx, AV_LOG_ERROR, "No block with decorrelation samples\n");
  1021. return -1;
  1022. }
  1023. if (!got_entropy) {
  1024. av_log(avctx, AV_LOG_ERROR, "No block with entropy info\n");
  1025. return -1;
  1026. }
  1027. if (s->hybrid && !got_hybrid) {
  1028. av_log(avctx, AV_LOG_ERROR, "Hybrid config not found\n");
  1029. return -1;
  1030. }
  1031. if (!got_bs) {
  1032. av_log(avctx, AV_LOG_ERROR, "Packed samples not found\n");
  1033. return -1;
  1034. }
  1035. if (!got_float && avctx->sample_fmt == AV_SAMPLE_FMT_FLT) {
  1036. av_log(avctx, AV_LOG_ERROR, "Float information not found\n");
  1037. return -1;
  1038. }
  1039. if (s->got_extra_bits && avctx->sample_fmt != AV_SAMPLE_FMT_FLT) {
  1040. const int size = get_bits_left(&s->gb_extra_bits);
  1041. const int wanted = s->samples * s->extra_bits << s->stereo_in;
  1042. if (size < wanted) {
  1043. av_log(avctx, AV_LOG_ERROR, "Too small EXTRABITS\n");
  1044. s->got_extra_bits = 0;
  1045. }
  1046. }
  1047. if (s->stereo_in) {
  1048. if (avctx->sample_fmt == AV_SAMPLE_FMT_S16)
  1049. samplecount = wv_unpack_stereo(s, &s->gb, samples, AV_SAMPLE_FMT_S16);
  1050. else if (avctx->sample_fmt == AV_SAMPLE_FMT_S32)
  1051. samplecount = wv_unpack_stereo(s, &s->gb, samples, AV_SAMPLE_FMT_S32);
  1052. else
  1053. samplecount = wv_unpack_stereo(s, &s->gb, samples, AV_SAMPLE_FMT_FLT);
  1054. if (samplecount < 0)
  1055. return -1;
  1056. samplecount >>= 1;
  1057. } else {
  1058. const int channel_stride = avctx->channels;
  1059. if (avctx->sample_fmt == AV_SAMPLE_FMT_S16)
  1060. samplecount = wv_unpack_mono(s, &s->gb, samples, AV_SAMPLE_FMT_S16);
  1061. else if (avctx->sample_fmt == AV_SAMPLE_FMT_S32)
  1062. samplecount = wv_unpack_mono(s, &s->gb, samples, AV_SAMPLE_FMT_S32);
  1063. else
  1064. samplecount = wv_unpack_mono(s, &s->gb, samples, AV_SAMPLE_FMT_FLT);
  1065. if (samplecount < 0)
  1066. return -1;
  1067. if (s->stereo && avctx->sample_fmt == AV_SAMPLE_FMT_S16) {
  1068. int16_t *dst = (int16_t *)samples + 1;
  1069. int16_t *src = (int16_t *)samples;
  1070. int cnt = samplecount;
  1071. while (cnt--) {
  1072. *dst = *src;
  1073. src += channel_stride;
  1074. dst += channel_stride;
  1075. }
  1076. } else if (s->stereo && avctx->sample_fmt == AV_SAMPLE_FMT_S32) {
  1077. int32_t *dst = (int32_t *)samples + 1;
  1078. int32_t *src = (int32_t *)samples;
  1079. int cnt = samplecount;
  1080. while (cnt--) {
  1081. *dst = *src;
  1082. src += channel_stride;
  1083. dst += channel_stride;
  1084. }
  1085. } else if (s->stereo) {
  1086. float *dst = (float *)samples + 1;
  1087. float *src = (float *)samples;
  1088. int cnt = samplecount;
  1089. while (cnt--) {
  1090. *dst = *src;
  1091. src += channel_stride;
  1092. dst += channel_stride;
  1093. }
  1094. }
  1095. }
  1096. *got_frame_ptr = 1;
  1097. return samplecount * bpp;
  1098. }
  1099. static void wavpack_decode_flush(AVCodecContext *avctx)
  1100. {
  1101. WavpackContext *s = avctx->priv_data;
  1102. int i;
  1103. for (i = 0; i < s->fdec_num; i++)
  1104. wv_reset_saved_context(s->fdec[i]);
  1105. }
  1106. static int wavpack_decode_frame(AVCodecContext *avctx, void *data,
  1107. int *got_frame_ptr, AVPacket *avpkt)
  1108. {
  1109. WavpackContext *s = avctx->priv_data;
  1110. const uint8_t *buf = avpkt->data;
  1111. int buf_size = avpkt->size;
  1112. AVFrame *frame = data;
  1113. int frame_size, ret, frame_flags;
  1114. int samplecount = 0;
  1115. s->block = 0;
  1116. s->ch_offset = 0;
  1117. /* determine number of samples */
  1118. if (s->mkv_mode) {
  1119. s->samples = AV_RL32(buf);
  1120. buf += 4;
  1121. frame_flags = AV_RL32(buf);
  1122. } else {
  1123. if (s->multichannel) {
  1124. s->samples = AV_RL32(buf + 4);
  1125. frame_flags = AV_RL32(buf + 8);
  1126. } else {
  1127. s->samples = AV_RL32(buf);
  1128. frame_flags = AV_RL32(buf + 4);
  1129. }
  1130. }
  1131. if (s->samples <= 0 || s->samples > WV_MAX_SAMPLES) {
  1132. av_log(avctx, AV_LOG_ERROR, "Invalid number of samples: %d\n",
  1133. s->samples);
  1134. return AVERROR(EINVAL);
  1135. }
  1136. if (frame_flags & 0x80) {
  1137. avctx->sample_fmt = AV_SAMPLE_FMT_FLT;
  1138. } else if ((frame_flags & 0x03) <= 1) {
  1139. avctx->sample_fmt = AV_SAMPLE_FMT_S16;
  1140. } else {
  1141. avctx->sample_fmt = AV_SAMPLE_FMT_S32;
  1142. avctx->bits_per_raw_sample = ((frame_flags & 0x03) + 1) << 3;
  1143. }
  1144. /* get output buffer */
  1145. frame->nb_samples = s->samples + 1;
  1146. if ((ret = ff_get_buffer(avctx, frame, 0)) < 0)
  1147. return ret;
  1148. frame->nb_samples = s->samples;
  1149. while (buf_size > 0) {
  1150. if (!s->multichannel) {
  1151. frame_size = buf_size;
  1152. } else {
  1153. if (!s->mkv_mode) {
  1154. frame_size = AV_RL32(buf) - 12;
  1155. buf += 4;
  1156. buf_size -= 4;
  1157. } else {
  1158. if (buf_size < 12) // MKV files can have zero flags after last block
  1159. break;
  1160. frame_size = AV_RL32(buf + 8) + 12;
  1161. }
  1162. }
  1163. if (frame_size < 0 || frame_size > buf_size) {
  1164. av_log(avctx, AV_LOG_ERROR,
  1165. "Block %d has invalid size (size %d vs. %d bytes left)\n",
  1166. s->block, frame_size, buf_size);
  1167. wavpack_decode_flush(avctx);
  1168. return AVERROR_INVALIDDATA;
  1169. }
  1170. if ((samplecount = wavpack_decode_block(avctx, s->block,
  1171. frame->data[0], got_frame_ptr,
  1172. buf, frame_size)) < 0) {
  1173. wavpack_decode_flush(avctx);
  1174. return AVERROR_INVALIDDATA;
  1175. }
  1176. s->block++;
  1177. buf += frame_size;
  1178. buf_size -= frame_size;
  1179. }
  1180. return avpkt->size;
  1181. }
  1182. AVCodec ff_wavpack_decoder = {
  1183. .name = "wavpack",
  1184. .type = AVMEDIA_TYPE_AUDIO,
  1185. .id = AV_CODEC_ID_WAVPACK,
  1186. .priv_data_size = sizeof(WavpackContext),
  1187. .init = wavpack_decode_init,
  1188. .close = wavpack_decode_end,
  1189. .decode = wavpack_decode_frame,
  1190. .flush = wavpack_decode_flush,
  1191. .capabilities = CODEC_CAP_SUBFRAMES | CODEC_CAP_DR1,
  1192. .long_name = NULL_IF_CONFIG_SMALL("WavPack"),
  1193. };