minimp3.h 73 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807
  1. #ifndef MINIMP3_H
  2. #define MINIMP3_H
  3. /*
  4. https://github.com/lieff/minimp3
  5. To the extent possible under law, the author(s) have dedicated all copyright and related and neighboring rights to this software to the public domain worldwide.
  6. This software is distributed without any warranty.
  7. See <http://creativecommons.org/publicdomain/zero/1.0/>.
  8. */
  9. #include <stdint.h>
  10. #define MINIMP3_MAX_SAMPLES_PER_FRAME (1152*2)
  11. typedef struct
  12. {
  13. int frame_offset, frame_size, channels, hz, layer, bitrate_kbps; // ESENTHEL CHANGED
  14. } mp3dec_frame_info_t;
  15. typedef struct
  16. {
  17. float mdct_overlap[2][9*32], qmf_state[15*2*32];
  18. int reserv, free_format_bytes;
  19. unsigned char header[4], reserv_buf[511];
  20. } mp3dec_t;
  21. #ifdef __cplusplus
  22. extern "C" {
  23. #endif /* __cplusplus */
  24. void mp3dec_init(mp3dec_t *dec);
  25. #ifndef MINIMP3_FLOAT_OUTPUT
  26. typedef int16_t mp3d_sample_t;
  27. #else /* MINIMP3_FLOAT_OUTPUT */
  28. typedef float mp3d_sample_t;
  29. void mp3dec_f32_to_s16(const float *in, int16_t *out, int num_samples);
  30. #endif /* MINIMP3_FLOAT_OUTPUT */
  31. int mp3dec_decode_frame(mp3dec_t *dec, const uint8_t *mp3, int mp3_bytes, mp3d_sample_t *pcm, mp3dec_frame_info_t *info);
  32. #ifdef __cplusplus
  33. }
  34. #endif /* __cplusplus */
  35. #endif /* MINIMP3_H */
  36. #if defined(MINIMP3_IMPLEMENTATION) && !defined(_MINIMP3_IMPLEMENTATION_GUARD)
  37. #define _MINIMP3_IMPLEMENTATION_GUARD
  38. #include <stdlib.h>
  39. #include <string.h>
  40. #define MAX_FREE_FORMAT_FRAME_SIZE 2304 /* more than ISO spec's */
  41. #ifndef MAX_FRAME_SYNC_MATCHES
  42. #define MAX_FRAME_SYNC_MATCHES 10
  43. #endif
  44. #define MAX_L3_FRAME_PAYLOAD_BYTES MAX_FREE_FORMAT_FRAME_SIZE /* MUST be >= 320000/8/32000*1152 = 1440 */
  45. #define MAX_BITRESERVOIR_BYTES 511
  46. #define SHORT_BLOCK_TYPE 2
  47. #define STOP_BLOCK_TYPE 3
  48. #define MODE_MONO 3
  49. #define MODE_JOINT_STEREO 1
  50. #define HDR_SIZE 4
  51. #define HDR_IS_MONO(h) (((h[3]) & 0xC0) == 0xC0)
  52. #define HDR_IS_MS_STEREO(h) (((h[3]) & 0xE0) == 0x60)
  53. #define HDR_IS_FREE_FORMAT(h) (((h[2]) & 0xF0) == 0)
  54. #define HDR_IS_CRC(h) (!((h[1]) & 1))
  55. #define HDR_TEST_PADDING(h) ((h[2]) & 0x2)
  56. #define HDR_TEST_MPEG1(h) ((h[1]) & 0x8)
  57. #define HDR_TEST_NOT_MPEG25(h) ((h[1]) & 0x10)
  58. #define HDR_TEST_I_STEREO(h) ((h[3]) & 0x10)
  59. #define HDR_TEST_MS_STEREO(h) ((h[3]) & 0x20)
  60. #define HDR_GET_STEREO_MODE(h) (((h[3]) >> 6) & 3)
  61. #define HDR_GET_STEREO_MODE_EXT(h) (((h[3]) >> 4) & 3)
  62. #define HDR_GET_LAYER(h) (((h[1]) >> 1) & 3)
  63. #define HDR_GET_BITRATE(h) ((h[2]) >> 4)
  64. #define HDR_GET_SAMPLE_RATE(h) (((h[2]) >> 2) & 3)
  65. #define HDR_GET_MY_SAMPLE_RATE(h) (HDR_GET_SAMPLE_RATE(h) + (((h[1] >> 3) & 1) + ((h[1] >> 4) & 1))*3)
  66. #define HDR_IS_FRAME_576(h) ((h[1] & 14) == 2)
  67. #define HDR_IS_LAYER_1(h) ((h[1] & 6) == 6)
  68. #define BITS_DEQUANTIZER_OUT -1
  69. #define MAX_SCF (255 + BITS_DEQUANTIZER_OUT*4 - 210)
  70. #define MAX_SCFI ((MAX_SCF + 3) & ~3)
  71. #define MINIMP3_MIN(a, b) ((a) > (b) ? (b) : (a))
  72. #define MINIMP3_MAX(a, b) ((a) < (b) ? (b) : (a))
  73. #if !defined(MINIMP3_NO_SIMD)
  74. #if !defined(MINIMP3_ONLY_SIMD) && (defined(_M_X64) || defined(_M_ARM64) || defined(__x86_64__) || defined(__aarch64__))
  75. /* x64 always have SSE2, arm64 always have neon, no need for generic code */
  76. #define MINIMP3_ONLY_SIMD
  77. #endif /* SIMD checks... */
  78. #if (defined(_MSC_VER) && (defined(_M_IX86) || defined(_M_X64))) || ((defined(__i386__) || defined(__x86_64__)) && defined(__SSE2__))
  79. #if defined(_MSC_VER)
  80. #include <intrin.h>
  81. #endif /* defined(_MSC_VER) */
  82. #include <immintrin.h>
  83. #define HAVE_SSE 1
  84. #define HAVE_SIMD 1
  85. #define VSTORE _mm_storeu_ps
  86. #define VLD _mm_loadu_ps
  87. #define VSET _mm_set1_ps
  88. #define VADD _mm_add_ps
  89. #define VSUB _mm_sub_ps
  90. #define VMUL _mm_mul_ps
  91. #define VMAC(a, x, y) _mm_add_ps(a, _mm_mul_ps(x, y))
  92. #define VMSB(a, x, y) _mm_sub_ps(a, _mm_mul_ps(x, y))
  93. #define VMUL_S(x, s) _mm_mul_ps(x, _mm_set1_ps(s))
  94. #define VREV(x) _mm_shuffle_ps(x, x, _MM_SHUFFLE(0, 1, 2, 3))
  95. typedef __m128 f4;
  96. #if defined(_MSC_VER) || defined(MINIMP3_ONLY_SIMD)
  97. #define minimp3_cpuid __cpuid
  98. #else /* defined(_MSC_VER) || defined(MINIMP3_ONLY_SIMD) */
  99. static __inline__ __attribute__((always_inline)) void minimp3_cpuid(int CPUInfo[], const int InfoType)
  100. {
  101. #if defined(__PIC__)
  102. __asm__ __volatile__(
  103. #if defined(__x86_64__)
  104. "push %%rbx\n"
  105. "cpuid\n"
  106. "xchgl %%ebx, %1\n"
  107. "pop %%rbx\n"
  108. #else /* defined(__x86_64__) */
  109. "xchgl %%ebx, %1\n"
  110. "cpuid\n"
  111. "xchgl %%ebx, %1\n"
  112. #endif /* defined(__x86_64__) */
  113. : "=a" (CPUInfo[0]), "=r" (CPUInfo[1]), "=c" (CPUInfo[2]), "=d" (CPUInfo[3])
  114. : "a" (InfoType));
  115. #else /* defined(__PIC__) */
  116. __asm__ __volatile__(
  117. "cpuid"
  118. : "=a" (CPUInfo[0]), "=b" (CPUInfo[1]), "=c" (CPUInfo[2]), "=d" (CPUInfo[3])
  119. : "a" (InfoType));
  120. #endif /* defined(__PIC__)*/
  121. }
  122. #endif /* defined(_MSC_VER) || defined(MINIMP3_ONLY_SIMD) */
  123. static int have_simd()
  124. {
  125. #ifdef MINIMP3_ONLY_SIMD
  126. return 1;
  127. #else /* MINIMP3_ONLY_SIMD */
  128. static int g_have_simd;
  129. int CPUInfo[4];
  130. #ifdef MINIMP3_TEST
  131. static int g_counter;
  132. if (g_counter++ > 100)
  133. return 0;
  134. #endif /* MINIMP3_TEST */
  135. if (g_have_simd)
  136. goto end;
  137. minimp3_cpuid(CPUInfo, 0);
  138. g_have_simd = 1;
  139. if (CPUInfo[0] > 0)
  140. {
  141. minimp3_cpuid(CPUInfo, 1);
  142. g_have_simd = (CPUInfo[3] & (1 << 26)) + 1; /* SSE2 */
  143. }
  144. end:
  145. return g_have_simd - 1;
  146. #endif /* MINIMP3_ONLY_SIMD */
  147. }
  148. #elif defined(__ARM_NEON) || defined(__aarch64__)
  149. #include <arm_neon.h>
  150. #define HAVE_SIMD 1
  151. #define VSTORE vst1q_f32
  152. #define VLD vld1q_f32
  153. #define VSET vmovq_n_f32
  154. #define VADD vaddq_f32
  155. #define VSUB vsubq_f32
  156. #define VMUL vmulq_f32
  157. #define VMAC(a, x, y) vmlaq_f32(a, x, y)
  158. #define VMSB(a, x, y) vmlsq_f32(a, x, y)
  159. #define VMUL_S(x, s) vmulq_f32(x, vmovq_n_f32(s))
  160. #define VREV(x) vcombine_f32(vget_high_f32(vrev64q_f32(x)), vget_low_f32(vrev64q_f32(x)))
  161. typedef float32x4_t f4;
  162. static int have_simd()
  163. { /* TODO: detect neon for !MINIMP3_ONLY_SIMD */
  164. return 1;
  165. }
  166. #else /* SIMD checks... */
  167. #define HAVE_SIMD 0
  168. #ifdef MINIMP3_ONLY_SIMD
  169. #error MINIMP3_ONLY_SIMD used, but SSE/NEON not enabled
  170. #endif /* MINIMP3_ONLY_SIMD */
  171. #endif /* SIMD checks... */
  172. #else /* !defined(MINIMP3_NO_SIMD) */
  173. #define HAVE_SIMD 0
  174. #endif /* !defined(MINIMP3_NO_SIMD) */
  175. typedef struct
  176. {
  177. const uint8_t *buf;
  178. int pos, limit;
  179. } bs_t;
  180. typedef struct
  181. {
  182. float scf[3*64];
  183. uint8_t total_bands, stereo_bands, bitalloc[64], scfcod[64];
  184. } L12_scale_info;
  185. typedef struct
  186. {
  187. uint8_t tab_offset, code_tab_width, band_count;
  188. } L12_subband_alloc_t;
  189. typedef struct
  190. {
  191. const uint8_t *sfbtab;
  192. uint16_t part_23_length, big_values, scalefac_compress;
  193. uint8_t global_gain, block_type, mixed_block_flag, n_long_sfb, n_short_sfb;
  194. uint8_t table_select[3], region_count[3], subblock_gain[3];
  195. uint8_t preflag, scalefac_scale, count1_table, scfsi;
  196. } L3_gr_info_t;
  197. typedef struct
  198. {
  199. bs_t bs;
  200. uint8_t maindata[MAX_BITRESERVOIR_BYTES + MAX_L3_FRAME_PAYLOAD_BYTES];
  201. L3_gr_info_t gr_info[4];
  202. float grbuf[2][576], scf[40], syn[18 + 15][2*32];
  203. uint8_t ist_pos[2][39];
  204. } mp3dec_scratch_t;
  205. static void bs_init(bs_t *bs, const uint8_t *data, int bytes)
  206. {
  207. bs->buf = data;
  208. bs->pos = 0;
  209. bs->limit = bytes*8;
  210. }
  211. static uint32_t get_bits(bs_t *bs, int n)
  212. {
  213. uint32_t next, cache = 0, s = bs->pos & 7;
  214. int shl = n + s;
  215. const uint8_t *p = bs->buf + (bs->pos >> 3);
  216. if ((bs->pos += n) > bs->limit)
  217. return 0;
  218. next = *p++ & (255 >> s);
  219. while ((shl -= 8) > 0)
  220. {
  221. cache |= next << shl;
  222. next = *p++;
  223. }
  224. return cache | (next >> -shl);
  225. }
  226. static int hdr_valid(const uint8_t *h)
  227. {
  228. return h[0] == 0xff &&
  229. ((h[1] & 0xF0) == 0xf0 || (h[1] & 0xFE) == 0xe2) &&
  230. (HDR_GET_LAYER(h) != 0) &&
  231. (HDR_GET_BITRATE(h) != 15) &&
  232. (HDR_GET_SAMPLE_RATE(h) != 3);
  233. }
  234. static int hdr_compare(const uint8_t *h1, const uint8_t *h2)
  235. {
  236. return hdr_valid(h2) &&
  237. ((h1[1] ^ h2[1]) & 0xFE) == 0 &&
  238. ((h1[2] ^ h2[2]) & 0x0C) == 0 &&
  239. !(HDR_IS_FREE_FORMAT(h1) ^ HDR_IS_FREE_FORMAT(h2));
  240. }
  241. static const uint8_t halfrate[2][3][15] = {
  242. { { 0,4,8,12,16,20,24,28,32,40,48,56,64,72,80 }, { 0,4,8,12,16,20,24,28,32,40,48,56,64,72,80 }, { 0,16,24,28,32,40,48,56,64,72,80,88,96,112,128 } },
  243. { { 0,16,20,24,28,32,40,48,56,64,80,96,112,128,160 }, { 0,16,24,28,32,40,48,56,64,80,96,112,128,160,192 }, { 0,16,32,48,64,80,96,112,128,144,160,176,192,208,224 } },
  244. };
  245. static unsigned hdr_bitrate_kbps(const uint8_t *h)
  246. {
  247. return 2*halfrate[!!HDR_TEST_MPEG1(h)][HDR_GET_LAYER(h) - 1][HDR_GET_BITRATE(h)];
  248. }
  249. static const unsigned g_hz[3] = { 44100, 48000, 32000 };
  250. static unsigned hdr_sample_rate_hz(const uint8_t *h)
  251. {
  252. return g_hz[HDR_GET_SAMPLE_RATE(h)] >> (int)!HDR_TEST_MPEG1(h) >> (int)!HDR_TEST_NOT_MPEG25(h);
  253. }
  254. static unsigned hdr_frame_samples(const uint8_t *h)
  255. {
  256. return HDR_IS_LAYER_1(h) ? 384 : (1152 >> (int)HDR_IS_FRAME_576(h));
  257. }
  258. static int hdr_frame_bytes(const uint8_t *h, int free_format_size)
  259. {
  260. int frame_bytes = hdr_frame_samples(h)*hdr_bitrate_kbps(h)*125/hdr_sample_rate_hz(h);
  261. if (HDR_IS_LAYER_1(h))
  262. {
  263. frame_bytes &= ~3; /* slot align */
  264. }
  265. return frame_bytes ? frame_bytes : free_format_size;
  266. }
  267. static int hdr_padding(const uint8_t *h)
  268. {
  269. return HDR_TEST_PADDING(h) ? (HDR_IS_LAYER_1(h) ? 4 : 1) : 0;
  270. }
  271. #ifndef MINIMP3_ONLY_MP3
  272. static const L12_subband_alloc_t *L12_subband_alloc_table(const uint8_t *hdr, L12_scale_info *sci)
  273. {
  274. const L12_subband_alloc_t *alloc;
  275. int mode = HDR_GET_STEREO_MODE(hdr);
  276. int nbands, stereo_bands = (mode == MODE_MONO) ? 0 : (mode == MODE_JOINT_STEREO) ? (HDR_GET_STEREO_MODE_EXT(hdr) << 2) + 4 : 32;
  277. if (HDR_IS_LAYER_1(hdr))
  278. {
  279. static const L12_subband_alloc_t g_alloc_L1[] = { { 76, 4, 32 } };
  280. alloc = g_alloc_L1;
  281. nbands = 32;
  282. } else if (!HDR_TEST_MPEG1(hdr))
  283. {
  284. static const L12_subband_alloc_t g_alloc_L2M2[] = { { 60, 4, 4 }, { 44, 3, 7 }, { 44, 2, 19 } };
  285. alloc = g_alloc_L2M2;
  286. nbands = 30;
  287. } else
  288. {
  289. static const L12_subband_alloc_t g_alloc_L2M1[] = { { 0, 4, 3 }, { 16, 4, 8 }, { 32, 3, 12 }, { 40, 2, 7 } };
  290. int sample_rate_idx = HDR_GET_SAMPLE_RATE(hdr);
  291. unsigned kbps = hdr_bitrate_kbps(hdr) >> (int)(mode != MODE_MONO);
  292. if (!kbps) /* free-format */
  293. {
  294. kbps = 192;
  295. }
  296. alloc = g_alloc_L2M1;
  297. nbands = 27;
  298. if (kbps < 56)
  299. {
  300. static const L12_subband_alloc_t g_alloc_L2M1_lowrate[] = { { 44, 4, 2 }, { 44, 3, 10 } };
  301. alloc = g_alloc_L2M1_lowrate;
  302. nbands = sample_rate_idx == 2 ? 12 : 8;
  303. } else if (kbps >= 96 && sample_rate_idx != 1)
  304. {
  305. nbands = 30;
  306. }
  307. }
  308. sci->total_bands = (uint8_t)nbands;
  309. sci->stereo_bands = (uint8_t)MINIMP3_MIN(stereo_bands, nbands);
  310. return alloc;
  311. }
  312. static void L12_read_scalefactors(bs_t *bs, uint8_t *pba, uint8_t *scfcod, int bands, float *scf)
  313. {
  314. static const float g_deq_L12[18*3] = {
  315. #define DQ(x) 9.53674316e-07f/x, 7.56931807e-07f/x, 6.00777173e-07f/x
  316. DQ(3),DQ(7),DQ(15),DQ(31),DQ(63),DQ(127),DQ(255),DQ(511),DQ(1023),DQ(2047),DQ(4095),DQ(8191),DQ(16383),DQ(32767),DQ(65535),DQ(3),DQ(5),DQ(9)
  317. };
  318. int i, m;
  319. for (i = 0; i < bands; i++)
  320. {
  321. float s = 0;
  322. int ba = *pba++;
  323. int mask = ba ? 4 + ((19 >> scfcod[i]) & 3) : 0;
  324. for (m = 4; m; m >>= 1)
  325. {
  326. if (mask & m)
  327. {
  328. int b = get_bits(bs, 6);
  329. s = g_deq_L12[ba*3 - 6 + b % 3]*(1 << 21 >> b/3);
  330. }
  331. *scf++ = s;
  332. }
  333. }
  334. }
  335. static void L12_read_scale_info(const uint8_t *hdr, bs_t *bs, L12_scale_info *sci)
  336. {
  337. static const uint8_t g_bitalloc_code_tab[] = {
  338. 0,17, 3, 4, 5,6,7, 8,9,10,11,12,13,14,15,16,
  339. 0,17,18, 3,19,4,5, 6,7, 8, 9,10,11,12,13,16,
  340. 0,17,18, 3,19,4,5,16,
  341. 0,17,18,16,
  342. 0,17,18,19, 4,5,6, 7,8, 9,10,11,12,13,14,15,
  343. 0,17,18, 3,19,4,5, 6,7, 8, 9,10,11,12,13,14,
  344. 0, 2, 3, 4, 5,6,7, 8,9,10,11,12,13,14,15,16
  345. };
  346. const L12_subband_alloc_t *subband_alloc = L12_subband_alloc_table(hdr, sci);
  347. int i, k = 0, ba_bits = 0;
  348. const uint8_t *ba_code_tab = g_bitalloc_code_tab;
  349. for (i = 0; i < sci->total_bands; i++)
  350. {
  351. uint8_t ba;
  352. if (i == k)
  353. {
  354. k += subband_alloc->band_count;
  355. ba_bits = subband_alloc->code_tab_width;
  356. ba_code_tab = g_bitalloc_code_tab + subband_alloc->tab_offset;
  357. subband_alloc++;
  358. }
  359. ba = ba_code_tab[get_bits(bs, ba_bits)];
  360. sci->bitalloc[2*i] = ba;
  361. if (i < sci->stereo_bands)
  362. {
  363. ba = ba_code_tab[get_bits(bs, ba_bits)];
  364. }
  365. sci->bitalloc[2*i + 1] = sci->stereo_bands ? ba : 0;
  366. }
  367. for (i = 0; i < 2*sci->total_bands; i++)
  368. {
  369. sci->scfcod[i] = sci->bitalloc[i] ? HDR_IS_LAYER_1(hdr) ? 2 : get_bits(bs, 2) : 6;
  370. }
  371. L12_read_scalefactors(bs, sci->bitalloc, sci->scfcod, sci->total_bands*2, sci->scf);
  372. for (i = sci->stereo_bands; i < sci->total_bands; i++)
  373. {
  374. sci->bitalloc[2*i + 1] = 0;
  375. }
  376. }
  377. static int L12_dequantize_granule(float *grbuf, bs_t *bs, L12_scale_info *sci, int group_size)
  378. {
  379. int i, j, k, choff = 576;
  380. for (j = 0; j < 4; j++)
  381. {
  382. float *dst = grbuf + group_size*j;
  383. for (i = 0; i < 2*sci->total_bands; i++)
  384. {
  385. int ba = sci->bitalloc[i];
  386. if (ba != 0)
  387. {
  388. if (ba < 17)
  389. {
  390. int half = (1 << (ba - 1)) - 1;
  391. for (k = 0; k < group_size; k++)
  392. {
  393. dst[k] = (float)((int)get_bits(bs, ba) - half);
  394. }
  395. } else
  396. {
  397. unsigned mod = (2 << (ba - 17)) + 1; /* 3, 5, 9 */
  398. unsigned code = get_bits(bs, mod + 2 - (mod >> 3)); /* 5, 7, 10 */
  399. for (k = 0; k < group_size; k++, code /= mod)
  400. {
  401. dst[k] = (float)((int)(code % mod - mod/2));
  402. }
  403. }
  404. }
  405. dst += choff;
  406. choff = 18 - choff;
  407. }
  408. }
  409. return group_size*4;
  410. }
  411. static void L12_apply_scf_384(L12_scale_info *sci, const float *scf, float *dst)
  412. {
  413. int i, k;
  414. memcpy(dst + 576 + sci->stereo_bands*18, dst + sci->stereo_bands*18, (sci->total_bands - sci->stereo_bands)*18*sizeof(float));
  415. for (i = 0; i < sci->total_bands; i++, dst += 18, scf += 6)
  416. {
  417. for (k = 0; k < 12; k++)
  418. {
  419. dst[k + 0] *= scf[0];
  420. dst[k + 576] *= scf[3];
  421. }
  422. }
  423. }
  424. #endif /* MINIMP3_ONLY_MP3 */
  425. static const uint8_t g_scf_long[8][23] = {
  426. { 6,6,6,6,6,6,8,10,12,14,16,20,24,28,32,38,46,52,60,68,58,54,0 },
  427. { 12,12,12,12,12,12,16,20,24,28,32,40,48,56,64,76,90,2,2,2,2,2,0 },
  428. { 6,6,6,6,6,6,8,10,12,14,16,20,24,28,32,38,46,52,60,68,58,54,0 },
  429. { 6,6,6,6,6,6,8,10,12,14,16,18,22,26,32,38,46,54,62,70,76,36,0 },
  430. { 6,6,6,6,6,6,8,10,12,14,16,20,24,28,32,38,46,52,60,68,58,54,0 },
  431. { 4,4,4,4,4,4,6,6,8,8,10,12,16,20,24,28,34,42,50,54,76,158,0 },
  432. { 4,4,4,4,4,4,6,6,6,8,10,12,16,18,22,28,34,40,46,54,54,192,0 },
  433. { 4,4,4,4,4,4,6,6,8,10,12,16,20,24,30,38,46,56,68,84,102,26,0 }
  434. };
  435. static const uint8_t g_scf_short[8][40] = {
  436. { 4,4,4,4,4,4,4,4,4,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,30,30,30,40,40,40,18,18,18,0 },
  437. { 8,8,8,8,8,8,8,8,8,12,12,12,16,16,16,20,20,20,24,24,24,28,28,28,36,36,36,2,2,2,2,2,2,2,2,2,26,26,26,0 },
  438. { 4,4,4,4,4,4,4,4,4,6,6,6,6,6,6,8,8,8,10,10,10,14,14,14,18,18,18,26,26,26,32,32,32,42,42,42,18,18,18,0 },
  439. { 4,4,4,4,4,4,4,4,4,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,32,32,32,44,44,44,12,12,12,0 },
  440. { 4,4,4,4,4,4,4,4,4,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,30,30,30,40,40,40,18,18,18,0 },
  441. { 4,4,4,4,4,4,4,4,4,4,4,4,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,22,22,22,30,30,30,56,56,56,0 },
  442. { 4,4,4,4,4,4,4,4,4,4,4,4,6,6,6,6,6,6,10,10,10,12,12,12,14,14,14,16,16,16,20,20,20,26,26,26,66,66,66,0 },
  443. { 4,4,4,4,4,4,4,4,4,4,4,4,6,6,6,8,8,8,12,12,12,16,16,16,20,20,20,26,26,26,34,34,34,42,42,42,12,12,12,0 }
  444. };
  445. static const uint8_t g_scf_mixed[8][40] = {
  446. { 6,6,6,6,6,6,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,30,30,30,40,40,40,18,18,18,0 },
  447. { 12,12,12,4,4,4,8,8,8,12,12,12,16,16,16,20,20,20,24,24,24,28,28,28,36,36,36,2,2,2,2,2,2,2,2,2,26,26,26,0 },
  448. { 6,6,6,6,6,6,6,6,6,6,6,6,8,8,8,10,10,10,14,14,14,18,18,18,26,26,26,32,32,32,42,42,42,18,18,18,0 },
  449. { 6,6,6,6,6,6,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,32,32,32,44,44,44,12,12,12,0 },
  450. { 6,6,6,6,6,6,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,24,24,24,30,30,30,40,40,40,18,18,18,0 },
  451. { 4,4,4,4,4,4,6,6,4,4,4,6,6,6,8,8,8,10,10,10,12,12,12,14,14,14,18,18,18,22,22,22,30,30,30,56,56,56,0 },
  452. { 4,4,4,4,4,4,6,6,4,4,4,6,6,6,6,6,6,10,10,10,12,12,12,14,14,14,16,16,16,20,20,20,26,26,26,66,66,66,0 },
  453. { 4,4,4,4,4,4,6,6,4,4,4,6,6,6,8,8,8,12,12,12,16,16,16,20,20,20,26,26,26,34,34,34,42,42,42,12,12,12,0 }
  454. };
  455. static int L3_read_side_info(bs_t *bs, L3_gr_info_t *gr, const uint8_t *hdr)
  456. {
  457. unsigned tables, scfsi = 0;
  458. int main_data_begin, part_23_sum = 0;
  459. int sr_idx = HDR_GET_MY_SAMPLE_RATE(hdr); sr_idx -= (sr_idx != 0);
  460. int gr_count = HDR_IS_MONO(hdr) ? 1 : 2;
  461. if (HDR_TEST_MPEG1(hdr))
  462. {
  463. gr_count *= 2;
  464. main_data_begin = get_bits(bs, 9);
  465. scfsi = get_bits(bs, 7 + gr_count);
  466. } else
  467. {
  468. main_data_begin = get_bits(bs, 8 + gr_count) >> gr_count;
  469. }
  470. do
  471. {
  472. if (HDR_IS_MONO(hdr))
  473. {
  474. scfsi <<= 4;
  475. }
  476. gr->part_23_length = (uint16_t)get_bits(bs, 12);
  477. part_23_sum += gr->part_23_length;
  478. gr->big_values = (uint16_t)get_bits(bs, 9);
  479. if (gr->big_values > 288)
  480. {
  481. return -1;
  482. }
  483. gr->global_gain = (uint8_t)get_bits(bs, 8);
  484. gr->scalefac_compress = (uint16_t)get_bits(bs, HDR_TEST_MPEG1(hdr) ? 4 : 9);
  485. gr->sfbtab = g_scf_long[sr_idx];
  486. gr->n_long_sfb = 22;
  487. gr->n_short_sfb = 0;
  488. if (get_bits(bs, 1))
  489. {
  490. gr->block_type = (uint8_t)get_bits(bs, 2);
  491. if (!gr->block_type)
  492. {
  493. return -1;
  494. }
  495. gr->mixed_block_flag = (uint8_t)get_bits(bs, 1);
  496. gr->region_count[0] = 7;
  497. gr->region_count[1] = 255;
  498. if (gr->block_type == SHORT_BLOCK_TYPE)
  499. {
  500. scfsi &= 0x0F0F;
  501. if (!gr->mixed_block_flag)
  502. {
  503. gr->region_count[0] = 8;
  504. gr->sfbtab = g_scf_short[sr_idx];
  505. gr->n_long_sfb = 0;
  506. gr->n_short_sfb = 39;
  507. } else
  508. {
  509. gr->sfbtab = g_scf_mixed[sr_idx];
  510. gr->n_long_sfb = HDR_TEST_MPEG1(hdr) ? 8 : 6;
  511. gr->n_short_sfb = 30;
  512. }
  513. }
  514. tables = get_bits(bs, 10);
  515. tables <<= 5;
  516. gr->subblock_gain[0] = (uint8_t)get_bits(bs, 3);
  517. gr->subblock_gain[1] = (uint8_t)get_bits(bs, 3);
  518. gr->subblock_gain[2] = (uint8_t)get_bits(bs, 3);
  519. } else
  520. {
  521. gr->block_type = 0;
  522. gr->mixed_block_flag = 0;
  523. tables = get_bits(bs, 15);
  524. gr->region_count[0] = (uint8_t)get_bits(bs, 4);
  525. gr->region_count[1] = (uint8_t)get_bits(bs, 3);
  526. gr->region_count[2] = 255;
  527. }
  528. gr->table_select[0] = (uint8_t)(tables >> 10);
  529. gr->table_select[1] = (uint8_t)((tables >> 5) & 31);
  530. gr->table_select[2] = (uint8_t)((tables) & 31);
  531. gr->preflag = HDR_TEST_MPEG1(hdr) ? get_bits(bs, 1) : (gr->scalefac_compress >= 500);
  532. gr->scalefac_scale = (uint8_t)get_bits(bs, 1);
  533. gr->count1_table = (uint8_t)get_bits(bs, 1);
  534. gr->scfsi = (uint8_t)((scfsi >> 12) & 15);
  535. scfsi <<= 4;
  536. gr++;
  537. } while(--gr_count);
  538. if (part_23_sum + bs->pos > bs->limit + main_data_begin*8)
  539. {
  540. return -1;
  541. }
  542. return main_data_begin;
  543. }
  544. static void L3_read_scalefactors(uint8_t *scf, uint8_t *ist_pos, const uint8_t *scf_size, const uint8_t *scf_count, bs_t *bitbuf, int scfsi)
  545. {
  546. int i, k;
  547. for (i = 0; i < 4 && scf_count[i]; i++, scfsi *= 2)
  548. {
  549. int cnt = scf_count[i];
  550. if (scfsi & 8)
  551. {
  552. memcpy(scf, ist_pos, cnt);
  553. } else
  554. {
  555. int bits = scf_size[i];
  556. if (!bits)
  557. {
  558. memset(scf, 0, cnt);
  559. memset(ist_pos, 0, cnt);
  560. } else
  561. {
  562. int max_scf = (scfsi < 0) ? (1 << bits) - 1 : -1;
  563. for (k = 0; k < cnt; k++)
  564. {
  565. int s = get_bits(bitbuf, bits);
  566. ist_pos[k] = (s == max_scf ? -1 : s);
  567. scf[k] = s;
  568. }
  569. }
  570. }
  571. ist_pos += cnt;
  572. scf += cnt;
  573. }
  574. scf[0] = scf[1] = scf[2] = 0;
  575. }
  576. static const float g_expfrac[4] = { 9.31322575e-10f,7.83145814e-10f,6.58544508e-10f,5.53767716e-10f };
  577. static float L3_ldexp_q2(float y, int exp_q2)
  578. {
  579. int e;
  580. do
  581. {
  582. e = MINIMP3_MIN(30*4, exp_q2);
  583. y *= g_expfrac[e & 3]*(1 << 30 >> (e >> 2));
  584. } while ((exp_q2 -= e) > 0);
  585. return y;
  586. }
  587. static const uint8_t g_scf_partitions[3][28] = {
  588. { 6,5,5, 5,6,5,5,5,6,5, 7,3,11,10,0,0, 7, 7, 7,0, 6, 6,6,3, 8, 8,5,0 },
  589. { 8,9,6,12,6,9,9,9,6,9,12,6,15,18,0,0, 6,15,12,0, 6,12,9,6, 6,18,9,0 },
  590. { 9,9,6,12,9,9,9,9,9,9,12,6,18,18,0,0,12,12,12,0,12, 9,9,6,15,12,9,0 }
  591. };
  592. static const uint8_t g_scfc_decode[16] = { 0,1,2,3, 12,5,6,7, 9,10,11,13, 14,15,18,19 };
  593. static const uint8_t g_mod[6*4] = { 5,5,4,4,5,5,4,1,4,3,1,1,5,6,6,1,4,4,4,1,4,3,1,1 };
  594. static const uint8_t g_preamp[10] = { 1,1,1,1,2,2,3,3,3,2 };
  595. static void L3_decode_scalefactors(const uint8_t *hdr, uint8_t *ist_pos, bs_t *bs, const L3_gr_info_t *gr, float *scf, int ch)
  596. {
  597. const uint8_t *scf_partition = g_scf_partitions[!!gr->n_short_sfb + !gr->n_long_sfb];
  598. uint8_t scf_size[4], iscf[40];
  599. int i, scf_shift = gr->scalefac_scale + 1, gain_exp, scfsi = gr->scfsi;
  600. float gain;
  601. if (HDR_TEST_MPEG1(hdr))
  602. {
  603. int part = g_scfc_decode[gr->scalefac_compress];
  604. scf_size[1] = scf_size[0] = (uint8_t)(part >> 2);
  605. scf_size[3] = scf_size[2] = (uint8_t)(part & 3);
  606. } else
  607. {
  608. int k, modprod, sfc, ist = HDR_TEST_I_STEREO(hdr) && ch;
  609. sfc = gr->scalefac_compress >> ist;
  610. for (k = ist*3*4; sfc >= 0; sfc -= modprod, k += 4)
  611. {
  612. for (modprod = 1, i = 3; i >= 0; i--)
  613. {
  614. scf_size[i] = (uint8_t)(sfc / modprod % g_mod[k + i]);
  615. modprod *= g_mod[k + i];
  616. }
  617. }
  618. scf_partition += k;
  619. scfsi = -16;
  620. }
  621. L3_read_scalefactors(iscf, ist_pos, scf_size, scf_partition, bs, scfsi);
  622. if (gr->n_short_sfb)
  623. {
  624. int sh = 3 - scf_shift;
  625. for (i = 0; i < gr->n_short_sfb; i += 3)
  626. {
  627. iscf[gr->n_long_sfb + i + 0] += gr->subblock_gain[0] << sh;
  628. iscf[gr->n_long_sfb + i + 1] += gr->subblock_gain[1] << sh;
  629. iscf[gr->n_long_sfb + i + 2] += gr->subblock_gain[2] << sh;
  630. }
  631. } else if (gr->preflag)
  632. {
  633. for (i = 0; i < 10; i++)
  634. {
  635. iscf[11 + i] += g_preamp[i];
  636. }
  637. }
  638. gain_exp = gr->global_gain + BITS_DEQUANTIZER_OUT*4 - 210 - (HDR_IS_MS_STEREO(hdr) ? 2 : 0);
  639. gain = L3_ldexp_q2(1 << (MAX_SCFI/4), MAX_SCFI - gain_exp);
  640. for (i = 0; i < (int)(gr->n_long_sfb + gr->n_short_sfb); i++)
  641. {
  642. scf[i] = L3_ldexp_q2(gain, iscf[i] << scf_shift);
  643. }
  644. }
  645. static const float g_pow43[129 + 16] = {
  646. 0,-1,-2.519842f,-4.326749f,-6.349604f,-8.549880f,-10.902724f,-13.390518f,-16.000000f,-18.720754f,-21.544347f,-24.463781f,-27.473142f,-30.567351f,-33.741992f,-36.993181f,
  647. 0,1,2.519842f,4.326749f,6.349604f,8.549880f,10.902724f,13.390518f,16.000000f,18.720754f,21.544347f,24.463781f,27.473142f,30.567351f,33.741992f,36.993181f,40.317474f,43.711787f,47.173345f,50.699631f,54.288352f,57.937408f,61.644865f,65.408941f,69.227979f,73.100443f,77.024898f,81.000000f,85.024491f,89.097188f,93.216975f,97.382800f,101.593667f,105.848633f,110.146801f,114.487321f,118.869381f,123.292209f,127.755065f,132.257246f,136.798076f,141.376907f,145.993119f,150.646117f,155.335327f,160.060199f,164.820202f,169.614826f,174.443577f,179.305980f,184.201575f,189.129918f,194.090580f,199.083145f,204.107210f,209.162385f,214.248292f,219.364564f,224.510845f,229.686789f,234.892058f,240.126328f,245.389280f,250.680604f,256.000000f,261.347174f,266.721841f,272.123723f,277.552547f,283.008049f,288.489971f,293.998060f,299.532071f,305.091761f,310.676898f,316.287249f,321.922592f,327.582707f,333.267377f,338.976394f,344.709550f,350.466646f,356.247482f,362.051866f,367.879608f,373.730522f,379.604427f,385.501143f,391.420496f,397.362314f,403.326427f,409.312672f,415.320884f,421.350905f,427.402579f,433.475750f,439.570269f,445.685987f,451.822757f,457.980436f,464.158883f,470.357960f,476.577530f,482.817459f,489.077615f,495.357868f,501.658090f,507.978156f,514.317941f,520.677324f,527.056184f,533.454404f,539.871867f,546.308458f,552.764065f,559.238575f,565.731879f,572.243870f,578.774440f,585.323483f,591.890898f,598.476581f,605.080431f,611.702349f,618.342238f,625.000000f,631.675540f,638.368763f,645.079578f
  648. };
  649. static float L3_pow_43(int x)
  650. {
  651. float frac;
  652. int sign, mult = 256;
  653. if (x < 129)
  654. {
  655. return g_pow43[16 + x];
  656. }
  657. if (x < 1024)
  658. {
  659. mult = 16;
  660. x <<= 3;
  661. }
  662. sign = 2*x & 64;
  663. frac = (float)((x & 63) - sign) / ((x & ~63) + sign);
  664. return g_pow43[16 + ((x + sign) >> 6)]*(1.f + frac*((4.f/3) + frac*(2.f/9)))*mult;
  665. }
  666. static const int16_t tabs[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  667. 785,785,785,785,784,784,784,784,513,513,513,513,513,513,513,513,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,
  668. -255,1313,1298,1282,785,785,785,785,784,784,784,784,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,290,288,
  669. -255,1313,1298,1282,769,769,769,769,529,529,529,529,529,529,529,529,528,528,528,528,528,528,528,528,512,512,512,512,512,512,512,512,290,288,
  670. -253,-318,-351,-367,785,785,785,785,784,784,784,784,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,819,818,547,547,275,275,275,275,561,560,515,546,289,274,288,258,
  671. -254,-287,1329,1299,1314,1312,1057,1057,1042,1042,1026,1026,784,784,784,784,529,529,529,529,529,529,529,529,769,769,769,769,768,768,768,768,563,560,306,306,291,259,
  672. -252,-413,-477,-542,1298,-575,1041,1041,784,784,784,784,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,-383,-399,1107,1092,1106,1061,849,849,789,789,1104,1091,773,773,1076,1075,341,340,325,309,834,804,577,577,532,532,516,516,832,818,803,816,561,561,531,531,515,546,289,289,288,258,
  673. -252,-429,-493,-559,1057,1057,1042,1042,529,529,529,529,529,529,529,529,784,784,784,784,769,769,769,769,512,512,512,512,512,512,512,512,-382,1077,-415,1106,1061,1104,849,849,789,789,1091,1076,1029,1075,834,834,597,581,340,340,339,324,804,833,532,532,832,772,818,803,817,787,816,771,290,290,290,290,288,258,
  674. -253,-349,-414,-447,-463,1329,1299,-479,1314,1312,1057,1057,1042,1042,1026,1026,785,785,785,785,784,784,784,784,769,769,769,769,768,768,768,768,-319,851,821,-335,836,850,805,849,341,340,325,336,533,533,579,579,564,564,773,832,578,548,563,516,321,276,306,291,304,259,
  675. -251,-572,-733,-830,-863,-879,1041,1041,784,784,784,784,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,-511,-527,-543,1396,1351,1381,1366,1395,1335,1380,-559,1334,1138,1138,1063,1063,1350,1392,1031,1031,1062,1062,1364,1363,1120,1120,1333,1348,881,881,881,881,375,374,359,373,343,358,341,325,791,791,1123,1122,-703,1105,1045,-719,865,865,790,790,774,774,1104,1029,338,293,323,308,-799,-815,833,788,772,818,803,816,322,292,307,320,561,531,515,546,289,274,288,258,
  676. -251,-525,-605,-685,-765,-831,-846,1298,1057,1057,1312,1282,785,785,785,785,784,784,784,784,769,769,769,769,512,512,512,512,512,512,512,512,1399,1398,1383,1367,1382,1396,1351,-511,1381,1366,1139,1139,1079,1079,1124,1124,1364,1349,1363,1333,882,882,882,882,807,807,807,807,1094,1094,1136,1136,373,341,535,535,881,775,867,822,774,-591,324,338,-671,849,550,550,866,864,609,609,293,336,534,534,789,835,773,-751,834,804,308,307,833,788,832,772,562,562,547,547,305,275,560,515,290,290,
  677. -252,-397,-477,-557,-622,-653,-719,-735,-750,1329,1299,1314,1057,1057,1042,1042,1312,1282,1024,1024,785,785,785,785,784,784,784,784,769,769,769,769,-383,1127,1141,1111,1126,1140,1095,1110,869,869,883,883,1079,1109,882,882,375,374,807,868,838,881,791,-463,867,822,368,263,852,837,836,-543,610,610,550,550,352,336,534,534,865,774,851,821,850,805,593,533,579,564,773,832,578,578,548,548,577,577,307,276,306,291,516,560,259,259,
  678. -250,-2107,-2507,-2764,-2909,-2974,-3007,-3023,1041,1041,1040,1040,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,-767,-1052,-1213,-1277,-1358,-1405,-1469,-1535,-1550,-1582,-1614,-1647,-1662,-1694,-1726,-1759,-1774,-1807,-1822,-1854,-1886,1565,-1919,-1935,-1951,-1967,1731,1730,1580,1717,-1983,1729,1564,-1999,1548,-2015,-2031,1715,1595,-2047,1714,-2063,1610,-2079,1609,-2095,1323,1323,1457,1457,1307,1307,1712,1547,1641,1700,1699,1594,1685,1625,1442,1442,1322,1322,-780,-973,-910,1279,1278,1277,1262,1276,1261,1275,1215,1260,1229,-959,974,974,989,989,-943,735,478,478,495,463,506,414,-1039,1003,958,1017,927,942,987,957,431,476,1272,1167,1228,-1183,1256,-1199,895,895,941,941,1242,1227,1212,1135,1014,1014,490,489,503,487,910,1013,985,925,863,894,970,955,1012,847,-1343,831,755,755,984,909,428,366,754,559,-1391,752,486,457,924,997,698,698,983,893,740,740,908,877,739,739,667,667,953,938,497,287,271,271,683,606,590,712,726,574,302,302,738,736,481,286,526,725,605,711,636,724,696,651,589,681,666,710,364,467,573,695,466,466,301,465,379,379,709,604,665,679,316,316,634,633,436,436,464,269,424,394,452,332,438,363,347,408,393,448,331,422,362,407,392,421,346,406,391,376,375,359,1441,1306,-2367,1290,-2383,1337,-2399,-2415,1426,1321,-2431,1411,1336,-2447,-2463,-2479,1169,1169,1049,1049,1424,1289,1412,1352,1319,-2495,1154,1154,1064,1064,1153,1153,416,390,360,404,403,389,344,374,373,343,358,372,327,357,342,311,356,326,1395,1394,1137,1137,1047,1047,1365,1392,1287,1379,1334,1364,1349,1378,1318,1363,792,792,792,792,1152,1152,1032,1032,1121,1121,1046,1046,1120,1120,1030,1030,-2895,1106,1061,1104,849,849,789,789,1091,1076,1029,1090,1060,1075,833,833,309,324,532,532,832,772,818,803,561,561,531,560,515,546,289,274,288,258,
  679. -250,-1179,-1579,-1836,-1996,-2124,-2253,-2333,-2413,-2477,-2542,-2574,-2607,-2622,-2655,1314,1313,1298,1312,1282,785,785,785,785,1040,1040,1025,1025,768,768,768,768,-766,-798,-830,-862,-895,-911,-927,-943,-959,-975,-991,-1007,-1023,-1039,-1055,-1070,1724,1647,-1103,-1119,1631,1767,1662,1738,1708,1723,-1135,1780,1615,1779,1599,1677,1646,1778,1583,-1151,1777,1567,1737,1692,1765,1722,1707,1630,1751,1661,1764,1614,1736,1676,1763,1750,1645,1598,1721,1691,1762,1706,1582,1761,1566,-1167,1749,1629,767,766,751,765,494,494,735,764,719,749,734,763,447,447,748,718,477,506,431,491,446,476,461,505,415,430,475,445,504,399,460,489,414,503,383,474,429,459,502,502,746,752,488,398,501,473,413,472,486,271,480,270,-1439,-1455,1357,-1471,-1487,-1503,1341,1325,-1519,1489,1463,1403,1309,-1535,1372,1448,1418,1476,1356,1462,1387,-1551,1475,1340,1447,1402,1386,-1567,1068,1068,1474,1461,455,380,468,440,395,425,410,454,364,467,466,464,453,269,409,448,268,432,1371,1473,1432,1417,1308,1460,1355,1446,1459,1431,1083,1083,1401,1416,1458,1445,1067,1067,1370,1457,1051,1051,1291,1430,1385,1444,1354,1415,1400,1443,1082,1082,1173,1113,1186,1066,1185,1050,-1967,1158,1128,1172,1097,1171,1081,-1983,1157,1112,416,266,375,400,1170,1142,1127,1065,793,793,1169,1033,1156,1096,1141,1111,1155,1080,1126,1140,898,898,808,808,897,897,792,792,1095,1152,1032,1125,1110,1139,1079,1124,882,807,838,881,853,791,-2319,867,368,263,822,852,837,866,806,865,-2399,851,352,262,534,534,821,836,594,594,549,549,593,593,533,533,848,773,579,579,564,578,548,563,276,276,577,576,306,291,516,560,305,305,275,259,
  680. -251,-892,-2058,-2620,-2828,-2957,-3023,-3039,1041,1041,1040,1040,769,769,769,769,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,256,-511,-527,-543,-559,1530,-575,-591,1528,1527,1407,1526,1391,1023,1023,1023,1023,1525,1375,1268,1268,1103,1103,1087,1087,1039,1039,1523,-604,815,815,815,815,510,495,509,479,508,463,507,447,431,505,415,399,-734,-782,1262,-815,1259,1244,-831,1258,1228,-847,-863,1196,-879,1253,987,987,748,-767,493,493,462,477,414,414,686,669,478,446,461,445,474,429,487,458,412,471,1266,1264,1009,1009,799,799,-1019,-1276,-1452,-1581,-1677,-1757,-1821,-1886,-1933,-1997,1257,1257,1483,1468,1512,1422,1497,1406,1467,1496,1421,1510,1134,1134,1225,1225,1466,1451,1374,1405,1252,1252,1358,1480,1164,1164,1251,1251,1238,1238,1389,1465,-1407,1054,1101,-1423,1207,-1439,830,830,1248,1038,1237,1117,1223,1148,1236,1208,411,426,395,410,379,269,1193,1222,1132,1235,1221,1116,976,976,1192,1162,1177,1220,1131,1191,963,963,-1647,961,780,-1663,558,558,994,993,437,408,393,407,829,978,813,797,947,-1743,721,721,377,392,844,950,828,890,706,706,812,859,796,960,948,843,934,874,571,571,-1919,690,555,689,421,346,539,539,944,779,918,873,932,842,903,888,570,570,931,917,674,674,-2575,1562,-2591,1609,-2607,1654,1322,1322,1441,1441,1696,1546,1683,1593,1669,1624,1426,1426,1321,1321,1639,1680,1425,1425,1305,1305,1545,1668,1608,1623,1667,1592,1638,1666,1320,1320,1652,1607,1409,1409,1304,1304,1288,1288,1664,1637,1395,1395,1335,1335,1622,1636,1394,1394,1319,1319,1606,1621,1392,1392,1137,1137,1137,1137,345,390,360,375,404,373,1047,-2751,-2767,-2783,1062,1121,1046,-2799,1077,-2815,1106,1061,789,789,1105,1104,263,355,310,340,325,354,352,262,339,324,1091,1076,1029,1090,1060,1075,833,833,788,788,1088,1028,818,818,803,803,561,561,531,531,816,771,546,546,289,274,288,258,
  681. -253,-317,-381,-446,-478,-509,1279,1279,-811,-1179,-1451,-1756,-1900,-2028,-2189,-2253,-2333,-2414,-2445,-2511,-2526,1313,1298,-2559,1041,1041,1040,1040,1025,1025,1024,1024,1022,1007,1021,991,1020,975,1019,959,687,687,1018,1017,671,671,655,655,1016,1015,639,639,758,758,623,623,757,607,756,591,755,575,754,559,543,543,1009,783,-575,-621,-685,-749,496,-590,750,749,734,748,974,989,1003,958,988,973,1002,942,987,957,972,1001,926,986,941,971,956,1000,910,985,925,999,894,970,-1071,-1087,-1102,1390,-1135,1436,1509,1451,1374,-1151,1405,1358,1480,1420,-1167,1507,1494,1389,1342,1465,1435,1450,1326,1505,1310,1493,1373,1479,1404,1492,1464,1419,428,443,472,397,736,526,464,464,486,457,442,471,484,482,1357,1449,1434,1478,1388,1491,1341,1490,1325,1489,1463,1403,1309,1477,1372,1448,1418,1433,1476,1356,1462,1387,-1439,1475,1340,1447,1402,1474,1324,1461,1371,1473,269,448,1432,1417,1308,1460,-1711,1459,-1727,1441,1099,1099,1446,1386,1431,1401,-1743,1289,1083,1083,1160,1160,1458,1445,1067,1067,1370,1457,1307,1430,1129,1129,1098,1098,268,432,267,416,266,400,-1887,1144,1187,1082,1173,1113,1186,1066,1050,1158,1128,1143,1172,1097,1171,1081,420,391,1157,1112,1170,1142,1127,1065,1169,1049,1156,1096,1141,1111,1155,1080,1126,1154,1064,1153,1140,1095,1048,-2159,1125,1110,1137,-2175,823,823,1139,1138,807,807,384,264,368,263,868,838,853,791,867,822,852,837,866,806,865,790,-2319,851,821,836,352,262,850,805,849,-2399,533,533,835,820,336,261,578,548,563,577,532,532,832,772,562,562,547,547,305,275,560,515,290,290,288,258 };
  682. static const uint8_t tab32[] = { 130,162,193,209,44,28,76,140,9,9,9,9,9,9,9,9,190,254,222,238,126,94,157,157,109,61,173,205 };
  683. static const uint8_t tab33[] = { 252,236,220,204,188,172,156,140,124,108,92,76,60,44,28,12 };
  684. static const int16_t tabindex[2*16] = { 0,32,64,98,0,132,180,218,292,364,426,538,648,746,0,1126,1460,1460,1460,1460,1460,1460,1460,1460,1842,1842,1842,1842,1842,1842,1842,1842 };
  685. static const uint8_t g_linbits[] = { 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,2,3,4,6,8,10,13,4,5,6,7,8,9,11,13 };
  686. static void L3_huffman(float *dst, bs_t *bs, const L3_gr_info_t *gr_info, const float *scf, int layer3gr_limit)
  687. {
  688. #define PEEK_BITS(n) (bs_cache >> (32 - n))
  689. #define FLUSH_BITS(n) { bs_cache <<= (n); bs_sh += (n); }
  690. #define CHECK_BITS while (bs_sh >= 0) { bs_cache |= (uint32_t)*bs_next_ptr++ << bs_sh; bs_sh -= 8; }
  691. #define BSPOS ((bs_next_ptr - bs->buf)*8 - 24 + bs_sh)
  692. float one = 0.0f;
  693. int ireg = 0, big_val_cnt = gr_info->big_values;
  694. const uint8_t *sfb = gr_info->sfbtab;
  695. const uint8_t *bs_next_ptr = bs->buf + bs->pos/8;
  696. uint32_t bs_cache = (((bs_next_ptr[0]*256u + bs_next_ptr[1])*256u + bs_next_ptr[2])*256u + bs_next_ptr[3]) << (bs->pos & 7);
  697. int pairs_to_decode, np, bs_sh = (bs->pos & 7) - 8;
  698. bs_next_ptr += 4;
  699. while (big_val_cnt > 0)
  700. {
  701. int tab_num = gr_info->table_select[ireg];
  702. int sfb_cnt = gr_info->region_count[ireg++];
  703. const int16_t *codebook = tabs + tabindex[tab_num];
  704. int linbits = g_linbits[tab_num];
  705. do
  706. {
  707. np = *sfb++ / 2;
  708. pairs_to_decode = MINIMP3_MIN(big_val_cnt, np);
  709. one = *scf++;
  710. do
  711. {
  712. int j, w = 5;
  713. int leaf = codebook[PEEK_BITS(w)];
  714. while (leaf < 0)
  715. {
  716. FLUSH_BITS(w);
  717. w = leaf & 7;
  718. leaf = codebook[PEEK_BITS(w) - (leaf >> 3)];
  719. }
  720. FLUSH_BITS(leaf >> 8);
  721. for (j = 0; j < 2; j++, dst++, leaf >>= 4)
  722. {
  723. int lsb = leaf & 0x0F;
  724. if (lsb == 15 && linbits)
  725. {
  726. lsb += PEEK_BITS(linbits);
  727. FLUSH_BITS(linbits);
  728. CHECK_BITS;
  729. *dst = one*L3_pow_43(lsb)*((int32_t)bs_cache < 0 ? -1: 1);
  730. } else
  731. {
  732. *dst = g_pow43[16 + lsb - 16*(bs_cache >> 31)]*one;
  733. }
  734. FLUSH_BITS(lsb ? 1 : 0);
  735. }
  736. CHECK_BITS;
  737. } while (--pairs_to_decode);
  738. } while ((big_val_cnt -= np) > 0 && --sfb_cnt >= 0);
  739. }
  740. for (np = 1 - big_val_cnt;; dst += 4)
  741. {
  742. const uint8_t *codebook_count1 = (gr_info->count1_table) ? tab33 : tab32;
  743. int leaf = codebook_count1[PEEK_BITS(4)];
  744. if (!(leaf & 8))
  745. {
  746. leaf = codebook_count1[(leaf >> 3) + (bs_cache << 4 >> (32 - (leaf & 3)))];
  747. }
  748. FLUSH_BITS(leaf & 7);
  749. if (BSPOS > layer3gr_limit)
  750. {
  751. break;
  752. }
  753. #define RELOAD_SCALEFACTOR if (!--np) { np = *sfb++/2; if (!np) break; one = *scf++; }
  754. #define DEQ_COUNT1(s) if (leaf & (128 >> s)) { dst[s] = ((int32_t)bs_cache < 0) ? -one : one; FLUSH_BITS(1) }
  755. RELOAD_SCALEFACTOR;
  756. DEQ_COUNT1(0);
  757. DEQ_COUNT1(1);
  758. RELOAD_SCALEFACTOR;
  759. DEQ_COUNT1(2);
  760. DEQ_COUNT1(3);
  761. CHECK_BITS;
  762. }
  763. bs->pos = layer3gr_limit;
  764. }
  765. static void L3_midside_stereo(float *left, int n)
  766. {
  767. int i = 0;
  768. float *right = left + 576;
  769. #if HAVE_SIMD
  770. if (have_simd()) for (; i < n - 3; i += 4)
  771. {
  772. f4 vl = VLD(left + i);
  773. f4 vr = VLD(right + i);
  774. VSTORE(left + i, VADD(vl, vr));
  775. VSTORE(right + i, VSUB(vl, vr));
  776. }
  777. #endif /* HAVE_SIMD */
  778. for (; i < n; i++)
  779. {
  780. float a = left[i];
  781. float b = right[i];
  782. left[i] = a + b;
  783. right[i] = a - b;
  784. }
  785. }
  786. static void L3_intensity_stereo_band(float *left, int n, float kl, float kr)
  787. {
  788. int i;
  789. for (i = 0; i < n; i++)
  790. {
  791. left[i + 576] = left[i]*kr;
  792. left[i] = left[i]*kl;
  793. }
  794. }
  795. static void L3_stereo_top_band(const float *right, const uint8_t *sfb, int nbands, int max_band[3])
  796. {
  797. int i, k;
  798. max_band[0] = max_band[1] = max_band[2] = -1;
  799. for (i = 0; i < nbands; i++)
  800. {
  801. for (k = 0; k < sfb[i]; k += 2)
  802. {
  803. if (right[k] != 0 || right[k + 1] != 0)
  804. {
  805. max_band[i % 3] = i;
  806. break;
  807. }
  808. }
  809. right += sfb[i];
  810. }
  811. }
  812. static const float g_pan[7*2] = { 0,1,0.21132487f,0.78867513f,0.36602540f,0.63397460f,0.5f,0.5f,0.63397460f,0.36602540f,0.78867513f,0.21132487f,1,0 };
  813. static void L3_stereo_process(float *left, const uint8_t *ist_pos, const uint8_t *sfb, const uint8_t *hdr, int max_band[3], int mpeg2_sh)
  814. {
  815. unsigned i, max_pos = HDR_TEST_MPEG1(hdr) ? 7 : 64;
  816. for (i = 0; sfb[i]; i++)
  817. {
  818. unsigned ipos = ist_pos[i];
  819. if ((int)i > max_band[i % 3] && ipos < max_pos)
  820. {
  821. float kl, kr, s = HDR_TEST_MS_STEREO(hdr) ? 1.41421356f : 1;
  822. if (HDR_TEST_MPEG1(hdr))
  823. {
  824. kl = g_pan[2*ipos];
  825. kr = g_pan[2*ipos + 1];
  826. } else
  827. {
  828. kl = 1;
  829. kr = L3_ldexp_q2(1, (ipos + 1) >> 1 << mpeg2_sh);
  830. if (ipos & 1)
  831. {
  832. kl = kr;
  833. kr = 1;
  834. }
  835. }
  836. L3_intensity_stereo_band(left, sfb[i], kl*s, kr*s);
  837. } else if (HDR_TEST_MS_STEREO(hdr))
  838. {
  839. L3_midside_stereo(left, sfb[i]);
  840. }
  841. left += sfb[i];
  842. }
  843. }
  844. static void L3_intensity_stereo(float *left, uint8_t *ist_pos, const L3_gr_info_t *gr, const uint8_t *hdr)
  845. {
  846. int max_band[3], n_sfb = gr->n_long_sfb + gr->n_short_sfb;
  847. int i, max_blocks = gr->n_short_sfb ? 3 : 1;
  848. L3_stereo_top_band(left + 576, gr->sfbtab, n_sfb, max_band);
  849. if (gr->n_long_sfb)
  850. {
  851. max_band[0] = max_band[1] = max_band[2] = MINIMP3_MAX(MINIMP3_MAX(max_band[0], max_band[1]), max_band[2]);
  852. }
  853. for (i = 0; i < max_blocks; i++)
  854. {
  855. int default_pos = HDR_TEST_MPEG1(hdr) ? 3 : 0;
  856. int itop = n_sfb - max_blocks + i;
  857. int prev = itop - max_blocks;
  858. ist_pos[itop] = max_band[i] >= prev ? default_pos : ist_pos[prev];
  859. }
  860. L3_stereo_process(left, ist_pos, gr->sfbtab, hdr, max_band, gr[1].scalefac_compress & 1);
  861. }
  862. static void L3_reorder(float *grbuf, float *scratch, const uint8_t *sfb)
  863. {
  864. int i, len;
  865. float *src = grbuf, *dst = scratch;
  866. for (;0 != (len = *sfb); sfb += 3, src += 2*len)
  867. {
  868. for (i = 0; i < len; i++, src++)
  869. {
  870. *dst++ = src[0*len];
  871. *dst++ = src[1*len];
  872. *dst++ = src[2*len];
  873. }
  874. }
  875. memcpy(grbuf, scratch, (dst - scratch)*sizeof(float));
  876. }
  877. static const float g_aa[2][8] = {
  878. {0.85749293f,0.88174200f,0.94962865f,0.98331459f,0.99551782f,0.99916056f,0.99989920f,0.99999316f},
  879. {0.51449576f,0.47173197f,0.31337745f,0.18191320f,0.09457419f,0.04096558f,0.01419856f,0.00369997f}
  880. };
  881. static void L3_antialias(float *grbuf, int nbands)
  882. {
  883. for (; nbands > 0; nbands--, grbuf += 18)
  884. {
  885. int i = 0;
  886. #if HAVE_SIMD
  887. if (have_simd()) for (; i < 8; i += 4)
  888. {
  889. f4 vu = VLD(grbuf + 18 + i);
  890. f4 vd = VLD(grbuf + 14 - i);
  891. f4 vc0 = VLD(g_aa[0] + i);
  892. f4 vc1 = VLD(g_aa[1] + i);
  893. vd = VREV(vd);
  894. VSTORE(grbuf + 18 + i, VSUB(VMUL(vu, vc0), VMUL(vd, vc1)));
  895. vd = VADD(VMUL(vu, vc1), VMUL(vd, vc0));
  896. VSTORE(grbuf + 14 - i, VREV(vd));
  897. }
  898. #endif /* HAVE_SIMD */
  899. #ifndef MINIMP3_ONLY_SIMD
  900. for(; i < 8; i++)
  901. {
  902. float u = grbuf[18 + i];
  903. float d = grbuf[17 - i];
  904. grbuf[18 + i] = u*g_aa[0][i] - d*g_aa[1][i];
  905. grbuf[17 - i] = u*g_aa[1][i] + d*g_aa[0][i];
  906. }
  907. #endif /* MINIMP3_ONLY_SIMD */
  908. }
  909. }
  910. static void L3_dct3_9(float *y)
  911. {
  912. float s0, s1, s2, s3, s4, s5, s6, s7, s8, t0, t2, t4;
  913. s0 = y[0]; s2 = y[2]; s4 = y[4]; s6 = y[6]; s8 = y[8];
  914. t0 = s0 + s6*0.5f;
  915. s0 -= s6;
  916. t4 = (s4 + s2)*0.93969262f;
  917. t2 = (s8 + s2)*0.76604444f;
  918. s6 = (s4 - s8)*0.17364818f;
  919. s4 += s8 - s2;
  920. s2 = s0 - s4*0.5f;
  921. y[4] = s4 + s0;
  922. s8 = t0 - t2 + s6;
  923. s0 = t0 - t4 + t2;
  924. s4 = t0 + t4 - s6;
  925. s1 = y[1]; s3 = y[3]; s5 = y[5]; s7 = y[7];
  926. s3 *= 0.86602540f;
  927. t0 = (s5 + s1)*0.98480775f;
  928. t4 = (s5 - s7)*0.34202014f;
  929. t2 = (s1 + s7)*0.64278761f;
  930. s1 = (s1 - s5 - s7)*0.86602540f;
  931. s5 = t0 - s3 - t2;
  932. s7 = t4 - s3 - t0;
  933. s3 = t4 + s3 - t2;
  934. y[0] = s4 - s7;
  935. y[1] = s2 + s1;
  936. y[2] = s0 - s3;
  937. y[3] = s8 + s5;
  938. y[5] = s8 - s5;
  939. y[6] = s0 + s3;
  940. y[7] = s2 - s1;
  941. y[8] = s4 + s7;
  942. }
  943. static const float g_twid9[18] = {
  944. 0.73727734f,0.79335334f,0.84339145f,0.88701083f,0.92387953f,0.95371695f,0.97629601f,0.99144486f,0.99904822f,0.67559021f,0.60876143f,0.53729961f,0.46174861f,0.38268343f,0.30070580f,0.21643961f,0.13052619f,0.04361938f
  945. };
  946. static void L3_imdct36(float *grbuf, float *overlap, const float *window, int nbands)
  947. {
  948. int i, j;
  949. for (j = 0; j < nbands; j++, grbuf += 18, overlap += 9)
  950. {
  951. float co[9], si[9];
  952. co[0] = -grbuf[0];
  953. si[0] = grbuf[17];
  954. for (i = 0; i < 4; i++)
  955. {
  956. si[8 - 2*i] = grbuf[4*i + 1] - grbuf[4*i + 2];
  957. co[1 + 2*i] = grbuf[4*i + 1] + grbuf[4*i + 2];
  958. si[7 - 2*i] = grbuf[4*i + 4] - grbuf[4*i + 3];
  959. co[2 + 2*i] = -(grbuf[4*i + 3] + grbuf[4*i + 4]);
  960. }
  961. L3_dct3_9(co);
  962. L3_dct3_9(si);
  963. si[1] = -si[1];
  964. si[3] = -si[3];
  965. si[5] = -si[5];
  966. si[7] = -si[7];
  967. i = 0;
  968. #if HAVE_SIMD
  969. if (have_simd()) for (; i < 8; i += 4)
  970. {
  971. f4 vovl = VLD(overlap + i);
  972. f4 vc = VLD(co + i);
  973. f4 vs = VLD(si + i);
  974. f4 vr0 = VLD(g_twid9 + i);
  975. f4 vr1 = VLD(g_twid9 + 9 + i);
  976. f4 vw0 = VLD(window + i);
  977. f4 vw1 = VLD(window + 9 + i);
  978. f4 vsum = VADD(VMUL(vc, vr1), VMUL(vs, vr0));
  979. VSTORE(overlap + i, VSUB(VMUL(vc, vr0), VMUL(vs, vr1)));
  980. VSTORE(grbuf + i, VSUB(VMUL(vovl, vw0), VMUL(vsum, vw1)));
  981. vsum = VADD(VMUL(vovl, vw1), VMUL(vsum, vw0));
  982. VSTORE(grbuf + 14 - i, VREV(vsum));
  983. }
  984. #endif /* HAVE_SIMD */
  985. for (; i < 9; i++)
  986. {
  987. float ovl = overlap[i];
  988. float sum = co[i]*g_twid9[9 + i] + si[i]*g_twid9[0 + i];
  989. overlap[i] = co[i]*g_twid9[0 + i] - si[i]*g_twid9[9 + i];
  990. grbuf[i] = ovl*window[0 + i] - sum*window[9 + i];
  991. grbuf[17 - i] = ovl*window[9 + i] + sum*window[0 + i];
  992. }
  993. }
  994. }
  995. static void L3_idct3(float x0, float x1, float x2, float *dst)
  996. {
  997. float m1 = x1*0.86602540f;
  998. float a1 = x0 - x2*0.5f;
  999. dst[1] = x0 + x2;
  1000. dst[0] = a1 + m1;
  1001. dst[2] = a1 - m1;
  1002. }
  1003. static const float g_twid3[6] = { 0.79335334f,0.92387953f,0.99144486f, 0.60876143f,0.38268343f,0.13052619f };
  1004. static void L3_imdct12(float *x, float *dst, float *overlap)
  1005. {
  1006. float co[3], si[3];
  1007. int i;
  1008. L3_idct3(-x[0], x[6] + x[3], x[12] + x[9], co);
  1009. L3_idct3(x[15], x[12] - x[9], x[6] - x[3], si);
  1010. si[1] = -si[1];
  1011. for (i = 0; i < 3; i++)
  1012. {
  1013. float ovl = overlap[i];
  1014. float sum = co[i]*g_twid3[3 + i] + si[i]*g_twid3[0 + i];
  1015. overlap[i] = co[i]*g_twid3[0 + i] - si[i]*g_twid3[3 + i];
  1016. dst[i] = ovl*g_twid3[2 - i] - sum*g_twid3[5 - i];
  1017. dst[5 - i] = ovl*g_twid3[5 - i] + sum*g_twid3[2 - i];
  1018. }
  1019. }
  1020. static void L3_imdct_short(float *grbuf, float *overlap, int nbands)
  1021. {
  1022. for (;nbands > 0; nbands--, overlap += 9, grbuf += 18)
  1023. {
  1024. float tmp[18];
  1025. memcpy(tmp, grbuf, sizeof(tmp));
  1026. memcpy(grbuf, overlap, 6*sizeof(float));
  1027. L3_imdct12(tmp, grbuf + 6, overlap + 6);
  1028. L3_imdct12(tmp + 1, grbuf + 12, overlap + 6);
  1029. L3_imdct12(tmp + 2, overlap, overlap + 6);
  1030. }
  1031. }
  1032. static void L3_change_sign(float *grbuf)
  1033. {
  1034. int b, i;
  1035. for (b = 0, grbuf += 18; b < 32; b += 2, grbuf += 36)
  1036. for (i = 1; i < 18; i += 2)
  1037. grbuf[i] = -grbuf[i];
  1038. }
  1039. static const float g_mdct_window[2][18] = {
  1040. { 0.99904822f,0.99144486f,0.97629601f,0.95371695f,0.92387953f,0.88701083f,0.84339145f,0.79335334f,0.73727734f,0.04361938f,0.13052619f,0.21643961f,0.30070580f,0.38268343f,0.46174861f,0.53729961f,0.60876143f,0.67559021f },
  1041. { 1,1,1,1,1,1,0.99144486f,0.92387953f,0.79335334f,0,0,0,0,0,0,0.13052619f,0.38268343f,0.60876143f }
  1042. };
  1043. static void L3_imdct_gr(float *grbuf, float *overlap, unsigned block_type, unsigned n_long_bands)
  1044. {
  1045. if (n_long_bands)
  1046. {
  1047. L3_imdct36(grbuf, overlap, g_mdct_window[0], n_long_bands);
  1048. grbuf += 18*n_long_bands;
  1049. overlap += 9*n_long_bands;
  1050. }
  1051. if (block_type == SHORT_BLOCK_TYPE)
  1052. L3_imdct_short(grbuf, overlap, 32 - n_long_bands);
  1053. else
  1054. L3_imdct36(grbuf, overlap, g_mdct_window[block_type == STOP_BLOCK_TYPE], 32 - n_long_bands);
  1055. }
  1056. static void L3_save_reservoir(mp3dec_t *h, mp3dec_scratch_t *s)
  1057. {
  1058. int pos = (s->bs.pos + 7)/8u;
  1059. int remains = s->bs.limit/8u - pos;
  1060. if (remains > MAX_BITRESERVOIR_BYTES)
  1061. {
  1062. pos += remains - MAX_BITRESERVOIR_BYTES;
  1063. remains = MAX_BITRESERVOIR_BYTES;
  1064. }
  1065. if (remains > 0)
  1066. {
  1067. memmove(h->reserv_buf, s->maindata + pos, remains);
  1068. }
  1069. h->reserv = remains;
  1070. }
  1071. static int L3_restore_reservoir(mp3dec_t *h, bs_t *bs, mp3dec_scratch_t *s, int main_data_begin)
  1072. {
  1073. int frame_bytes = (bs->limit - bs->pos)/8;
  1074. int bytes_have = MINIMP3_MIN(h->reserv, main_data_begin);
  1075. memcpy(s->maindata, h->reserv_buf + MINIMP3_MAX(0, h->reserv - main_data_begin), MINIMP3_MIN(h->reserv, main_data_begin));
  1076. memcpy(s->maindata + bytes_have, bs->buf + bs->pos/8, frame_bytes);
  1077. bs_init(&s->bs, s->maindata, bytes_have + frame_bytes);
  1078. return h->reserv >= main_data_begin;
  1079. }
  1080. static void L3_decode(mp3dec_t *h, mp3dec_scratch_t *s, L3_gr_info_t *gr_info, int nch)
  1081. {
  1082. int ch;
  1083. for (ch = 0; ch < nch; ch++)
  1084. {
  1085. int layer3gr_limit = s->bs.pos + gr_info[ch].part_23_length;
  1086. L3_decode_scalefactors(h->header, s->ist_pos[ch], &s->bs, gr_info + ch, s->scf, ch);
  1087. L3_huffman(s->grbuf[ch], &s->bs, gr_info + ch, s->scf, layer3gr_limit);
  1088. }
  1089. if (HDR_TEST_I_STEREO(h->header))
  1090. {
  1091. L3_intensity_stereo(s->grbuf[0], s->ist_pos[1], gr_info, h->header);
  1092. } else if (HDR_IS_MS_STEREO(h->header))
  1093. {
  1094. L3_midside_stereo(s->grbuf[0], 576);
  1095. }
  1096. for (ch = 0; ch < nch; ch++, gr_info++)
  1097. {
  1098. int aa_bands = 31;
  1099. int n_long_bands = (gr_info->mixed_block_flag ? 2 : 0) << (int)(HDR_GET_MY_SAMPLE_RATE(h->header) == 2);
  1100. if (gr_info->n_short_sfb)
  1101. {
  1102. aa_bands = n_long_bands - 1;
  1103. L3_reorder(s->grbuf[ch] + n_long_bands*18, s->syn[0], gr_info->sfbtab + gr_info->n_long_sfb);
  1104. }
  1105. L3_antialias(s->grbuf[ch], aa_bands);
  1106. L3_imdct_gr(s->grbuf[ch], h->mdct_overlap[ch], gr_info->block_type, n_long_bands);
  1107. L3_change_sign(s->grbuf[ch]);
  1108. }
  1109. }
  1110. static const float g_sec[24] = {
  1111. 10.19000816f,0.50060302f,0.50241929f,3.40760851f,0.50547093f,0.52249861f,2.05778098f,0.51544732f,0.56694406f,1.48416460f,0.53104258f,0.64682180f,1.16943991f,0.55310392f,0.78815460f,0.97256821f,0.58293498f,1.06067765f,0.83934963f,0.62250412f,1.72244716f,0.74453628f,0.67480832f,5.10114861f
  1112. };
  1113. static void mp3d_DCT_II(float *grbuf, int n)
  1114. {
  1115. int i, k = 0;
  1116. #if HAVE_SIMD
  1117. if (have_simd()) for (; k < n; k += 4)
  1118. {
  1119. f4 t[4][8], *x;
  1120. float *y = grbuf + k;
  1121. for (x = t[0], i = 0; i < 8; i++, x++)
  1122. {
  1123. f4 x0 = VLD(&y[i*18]);
  1124. f4 x1 = VLD(&y[(15 - i)*18]);
  1125. f4 x2 = VLD(&y[(16 + i)*18]);
  1126. f4 x3 = VLD(&y[(31 - i)*18]);
  1127. f4 t0 = VADD(x0, x3);
  1128. f4 t1 = VADD(x1, x2);
  1129. f4 t2 = VMUL_S(VSUB(x1, x2), g_sec[3*i + 0]);
  1130. f4 t3 = VMUL_S(VSUB(x0, x3), g_sec[3*i + 1]);
  1131. x[0] = VADD(t0, t1);
  1132. x[8] = VMUL_S(VSUB(t0, t1), g_sec[3*i + 2]);
  1133. x[16] = VADD(t3, t2);
  1134. x[24] = VMUL_S(VSUB(t3, t2), g_sec[3*i + 2]);
  1135. }
  1136. for (x = t[0], i = 0; i < 4; i++, x += 8)
  1137. {
  1138. f4 x0 = x[0], x1 = x[1], x2 = x[2], x3 = x[3], x4 = x[4], x5 = x[5], x6 = x[6], x7 = x[7], xt;
  1139. xt = VSUB(x0, x7); x0 = VADD(x0, x7);
  1140. x7 = VSUB(x1, x6); x1 = VADD(x1, x6);
  1141. x6 = VSUB(x2, x5); x2 = VADD(x2, x5);
  1142. x5 = VSUB(x3, x4); x3 = VADD(x3, x4);
  1143. x4 = VSUB(x0, x3); x0 = VADD(x0, x3);
  1144. x3 = VSUB(x1, x2); x1 = VADD(x1, x2);
  1145. x[0] = VADD(x0, x1);
  1146. x[4] = VMUL_S(VSUB(x0, x1), 0.70710677f);
  1147. x5 = VADD(x5, x6);
  1148. x6 = VMUL_S(VADD(x6, x7), 0.70710677f);
  1149. x7 = VADD(x7, xt);
  1150. x3 = VMUL_S(VADD(x3, x4), 0.70710677f);
  1151. x5 = VSUB(x5, VMUL_S(x7, 0.198912367f)); /* rotate by PI/8 */
  1152. x7 = VADD(x7, VMUL_S(x5, 0.382683432f));
  1153. x5 = VSUB(x5, VMUL_S(x7, 0.198912367f));
  1154. x0 = VSUB(xt, x6); xt = VADD(xt, x6);
  1155. x[1] = VMUL_S(VADD(xt, x7), 0.50979561f);
  1156. x[2] = VMUL_S(VADD(x4, x3), 0.54119611f);
  1157. x[3] = VMUL_S(VSUB(x0, x5), 0.60134488f);
  1158. x[5] = VMUL_S(VADD(x0, x5), 0.89997619f);
  1159. x[6] = VMUL_S(VSUB(x4, x3), 1.30656302f);
  1160. x[7] = VMUL_S(VSUB(xt, x7), 2.56291556f);
  1161. }
  1162. if (k > n - 3)
  1163. {
  1164. #if HAVE_SSE
  1165. #define VSAVE2(i, v) _mm_storel_pi((__m64 *)(void*)&y[i*18], v)
  1166. #else /* HAVE_SSE */
  1167. #define VSAVE2(i, v) vst1_f32((float32_t *)&y[i*18], vget_low_f32(v))
  1168. #endif /* HAVE_SSE */
  1169. for (i = 0; i < 7; i++, y += 4*18)
  1170. {
  1171. f4 s = VADD(t[3][i], t[3][i + 1]);
  1172. VSAVE2(0, t[0][i]);
  1173. VSAVE2(1, VADD(t[2][i], s));
  1174. VSAVE2(2, VADD(t[1][i], t[1][i + 1]));
  1175. VSAVE2(3, VADD(t[2][1 + i], s));
  1176. }
  1177. VSAVE2(0, t[0][7]);
  1178. VSAVE2(1, VADD(t[2][7], t[3][7]));
  1179. VSAVE2(2, t[1][7]);
  1180. VSAVE2(3, t[3][7]);
  1181. } else
  1182. {
  1183. #define VSAVE4(i, v) VSTORE(&y[i*18], v)
  1184. for (i = 0; i < 7; i++, y += 4*18)
  1185. {
  1186. f4 s = VADD(t[3][i], t[3][i + 1]);
  1187. VSAVE4(0, t[0][i]);
  1188. VSAVE4(1, VADD(t[2][i], s));
  1189. VSAVE4(2, VADD(t[1][i], t[1][i + 1]));
  1190. VSAVE4(3, VADD(t[2][1 + i], s));
  1191. }
  1192. VSAVE4(0, t[0][7]);
  1193. VSAVE4(1, VADD(t[2][7], t[3][7]));
  1194. VSAVE4(2, t[1][7]);
  1195. VSAVE4(3, t[3][7]);
  1196. }
  1197. } else
  1198. #endif /* HAVE_SIMD */
  1199. #ifdef MINIMP3_ONLY_SIMD
  1200. {}
  1201. #else /* MINIMP3_ONLY_SIMD */
  1202. for (; k < n; k++)
  1203. {
  1204. float t[4][8], *x, *y = grbuf + k;
  1205. for (x = t[0], i = 0; i < 8; i++, x++)
  1206. {
  1207. float x0 = y[i*18];
  1208. float x1 = y[(15 - i)*18];
  1209. float x2 = y[(16 + i)*18];
  1210. float x3 = y[(31 - i)*18];
  1211. float t0 = x0 + x3;
  1212. float t1 = x1 + x2;
  1213. float t2 = (x1 - x2)*g_sec[3*i + 0];
  1214. float t3 = (x0 - x3)*g_sec[3*i + 1];
  1215. x[0] = t0 + t1;
  1216. x[8] = (t0 - t1)*g_sec[3*i + 2];
  1217. x[16] = t3 + t2;
  1218. x[24] = (t3 - t2)*g_sec[3*i + 2];
  1219. }
  1220. for (x = t[0], i = 0; i < 4; i++, x += 8)
  1221. {
  1222. float x0 = x[0], x1 = x[1], x2 = x[2], x3 = x[3], x4 = x[4], x5 = x[5], x6 = x[6], x7 = x[7], xt;
  1223. xt = x0 - x7; x0 += x7;
  1224. x7 = x1 - x6; x1 += x6;
  1225. x6 = x2 - x5; x2 += x5;
  1226. x5 = x3 - x4; x3 += x4;
  1227. x4 = x0 - x3; x0 += x3;
  1228. x3 = x1 - x2; x1 += x2;
  1229. x[0] = x0 + x1;
  1230. x[4] = (x0 - x1)*0.70710677f;
  1231. x5 = x5 + x6;
  1232. x6 = (x6 + x7)*0.70710677f;
  1233. x7 = x7 + xt;
  1234. x3 = (x3 + x4)*0.70710677f;
  1235. x5 -= x7*0.198912367f; /* rotate by PI/8 */
  1236. x7 += x5*0.382683432f;
  1237. x5 -= x7*0.198912367f;
  1238. x0 = xt - x6; xt += x6;
  1239. x[1] = (xt + x7)*0.50979561f;
  1240. x[2] = (x4 + x3)*0.54119611f;
  1241. x[3] = (x0 - x5)*0.60134488f;
  1242. x[5] = (x0 + x5)*0.89997619f;
  1243. x[6] = (x4 - x3)*1.30656302f;
  1244. x[7] = (xt - x7)*2.56291556f;
  1245. }
  1246. for (i = 0; i < 7; i++, y += 4*18)
  1247. {
  1248. y[0*18] = t[0][i];
  1249. y[1*18] = t[2][i] + t[3][i] + t[3][i + 1];
  1250. y[2*18] = t[1][i] + t[1][i + 1];
  1251. y[3*18] = t[2][i + 1] + t[3][i] + t[3][i + 1];
  1252. }
  1253. y[0*18] = t[0][7];
  1254. y[1*18] = t[2][7] + t[3][7];
  1255. y[2*18] = t[1][7];
  1256. y[3*18] = t[3][7];
  1257. }
  1258. #endif /* MINIMP3_ONLY_SIMD */
  1259. }
  1260. #ifndef MINIMP3_FLOAT_OUTPUT
  1261. static int16_t mp3d_scale_pcm(float sample)
  1262. {
  1263. if (sample >= 32766.5) return (int16_t) 32767;
  1264. if (sample <= -32767.5) return (int16_t)-32768;
  1265. int16_t s = (int16_t)(sample + .5f);
  1266. s -= (s < 0); /* away from zero, to be compliant */
  1267. return s;
  1268. }
  1269. #else /* MINIMP3_FLOAT_OUTPUT */
  1270. static float mp3d_scale_pcm(float sample)
  1271. {
  1272. return sample*(1.f/32768.f);
  1273. }
  1274. #endif /* MINIMP3_FLOAT_OUTPUT */
  1275. static void mp3d_synth_pair(mp3d_sample_t *pcm, int nch, const float *z)
  1276. {
  1277. float a;
  1278. a = (z[14*64] - z[ 0]) * 29;
  1279. a += (z[ 1*64] + z[13*64]) * 213;
  1280. a += (z[12*64] - z[ 2*64]) * 459;
  1281. a += (z[ 3*64] + z[11*64]) * 2037;
  1282. a += (z[10*64] - z[ 4*64]) * 5153;
  1283. a += (z[ 5*64] + z[ 9*64]) * 6574;
  1284. a += (z[ 8*64] - z[ 6*64]) * 37489;
  1285. a += z[ 7*64] * 75038;
  1286. pcm[0] = mp3d_scale_pcm(a);
  1287. z += 2;
  1288. a = z[14*64] * 104;
  1289. a += z[12*64] * 1567;
  1290. a += z[10*64] * 9727;
  1291. a += z[ 8*64] * 64019;
  1292. a += z[ 6*64] * -9975;
  1293. a += z[ 4*64] * -45;
  1294. a += z[ 2*64] * 146;
  1295. a += z[ 0*64] * -5;
  1296. pcm[16*nch] = mp3d_scale_pcm(a);
  1297. }
  1298. static const float g_win[] = {
  1299. -1,26,-31,208,218,401,-519,2063,2000,4788,-5517,7134,5959,35640,-39336,74992,
  1300. -1,24,-35,202,222,347,-581,2080,1952,4425,-5879,7640,5288,33791,-41176,74856,
  1301. -1,21,-38,196,225,294,-645,2087,1893,4063,-6237,8092,4561,31947,-43006,74630,
  1302. -1,19,-41,190,227,244,-711,2085,1822,3705,-6589,8492,3776,30112,-44821,74313,
  1303. -1,17,-45,183,228,197,-779,2075,1739,3351,-6935,8840,2935,28289,-46617,73908,
  1304. -1,16,-49,176,228,153,-848,2057,1644,3004,-7271,9139,2037,26482,-48390,73415,
  1305. -2,14,-53,169,227,111,-919,2032,1535,2663,-7597,9389,1082,24694,-50137,72835,
  1306. -2,13,-58,161,224,72,-991,2001,1414,2330,-7910,9592,70,22929,-51853,72169,
  1307. -2,11,-63,154,221,36,-1064,1962,1280,2006,-8209,9750,-998,21189,-53534,71420,
  1308. -2,10,-68,147,215,2,-1137,1919,1131,1692,-8491,9863,-2122,19478,-55178,70590,
  1309. -3,9,-73,139,208,-29,-1210,1870,970,1388,-8755,9935,-3300,17799,-56778,69679,
  1310. -3,8,-79,132,200,-57,-1283,1817,794,1095,-8998,9966,-4533,16155,-58333,68692,
  1311. -4,7,-85,125,189,-83,-1356,1759,605,814,-9219,9959,-5818,14548,-59838,67629,
  1312. -4,7,-91,117,177,-106,-1428,1698,402,545,-9416,9916,-7154,12980,-61289,66494,
  1313. -5,6,-97,111,163,-127,-1498,1634,185,288,-9585,9838,-8540,11455,-62684,65290
  1314. };
  1315. #if HAVE_SIMD
  1316. static const f4 g_max = { 32767.0f, 32767.0f, 32767.0f, 32767.0f };
  1317. static const f4 g_min = { -32768.0f, -32768.0f, -32768.0f, -32768.0f };
  1318. static const f4 g_scale = { 1.0f/32768.0f, 1.0f/32768.0f, 1.0f/32768.0f, 1.0f/32768.0f };
  1319. #endif
  1320. static void mp3d_synth(float *xl, mp3d_sample_t *dstl, int nch, float *lins)
  1321. {
  1322. int i;
  1323. float *xr = xl + 576*(nch - 1);
  1324. mp3d_sample_t *dstr = dstl + (nch - 1);
  1325. float *zlin = lins + 15*64;
  1326. const float *w = g_win;
  1327. zlin[4*15] = xl[18*16];
  1328. zlin[4*15 + 1] = xr[18*16];
  1329. zlin[4*15 + 2] = xl[0];
  1330. zlin[4*15 + 3] = xr[0];
  1331. zlin[4*31] = xl[1 + 18*16];
  1332. zlin[4*31 + 1] = xr[1 + 18*16];
  1333. zlin[4*31 + 2] = xl[1];
  1334. zlin[4*31 + 3] = xr[1];
  1335. mp3d_synth_pair(dstr, nch, lins + 4*15 + 1);
  1336. mp3d_synth_pair(dstr + 32*nch, nch, lins + 4*15 + 64 + 1);
  1337. mp3d_synth_pair(dstl, nch, lins + 4*15);
  1338. mp3d_synth_pair(dstl + 32*nch, nch, lins + 4*15 + 64);
  1339. #if HAVE_SIMD
  1340. if (have_simd()) for (i = 14; i >= 0; i--)
  1341. {
  1342. #define VLOAD(k) f4 w0 = VSET(*w++); f4 w1 = VSET(*w++); f4 vz = VLD(&zlin[4*i - 64*k]); f4 vy = VLD(&zlin[4*i - 64*(15 - k)]);
  1343. #define V0(k) { VLOAD(k) b = VADD(VMUL(vz, w1), VMUL(vy, w0)) ; a = VSUB(VMUL(vz, w0), VMUL(vy, w1)); }
  1344. #define V1(k) { VLOAD(k) b = VADD(b, VADD(VMUL(vz, w1), VMUL(vy, w0))); a = VADD(a, VSUB(VMUL(vz, w0), VMUL(vy, w1))); }
  1345. #define V2(k) { VLOAD(k) b = VADD(b, VADD(VMUL(vz, w1), VMUL(vy, w0))); a = VADD(a, VSUB(VMUL(vy, w1), VMUL(vz, w0))); }
  1346. f4 a, b;
  1347. zlin[4*i] = xl[18*(31 - i)];
  1348. zlin[4*i + 1] = xr[18*(31 - i)];
  1349. zlin[4*i + 2] = xl[1 + 18*(31 - i)];
  1350. zlin[4*i + 3] = xr[1 + 18*(31 - i)];
  1351. zlin[4*i + 64] = xl[1 + 18*(1 + i)];
  1352. zlin[4*i + 64 + 1] = xr[1 + 18*(1 + i)];
  1353. zlin[4*i - 64 + 2] = xl[18*(1 + i)];
  1354. zlin[4*i - 64 + 3] = xr[18*(1 + i)];
  1355. V0(0) V2(1) V1(2) V2(3) V1(4) V2(5) V1(6) V2(7)
  1356. {
  1357. #ifndef MINIMP3_FLOAT_OUTPUT
  1358. #if HAVE_SSE
  1359. __m128i pcm8 = _mm_packs_epi32(_mm_cvtps_epi32(_mm_max_ps(_mm_min_ps(a, g_max), g_min)),
  1360. _mm_cvtps_epi32(_mm_max_ps(_mm_min_ps(b, g_max), g_min)));
  1361. dstr[(15 - i)*nch] = _mm_extract_epi16(pcm8, 1);
  1362. dstr[(17 + i)*nch] = _mm_extract_epi16(pcm8, 5);
  1363. dstl[(15 - i)*nch] = _mm_extract_epi16(pcm8, 0);
  1364. dstl[(17 + i)*nch] = _mm_extract_epi16(pcm8, 4);
  1365. dstr[(47 - i)*nch] = _mm_extract_epi16(pcm8, 3);
  1366. dstr[(49 + i)*nch] = _mm_extract_epi16(pcm8, 7);
  1367. dstl[(47 - i)*nch] = _mm_extract_epi16(pcm8, 2);
  1368. dstl[(49 + i)*nch] = _mm_extract_epi16(pcm8, 6);
  1369. #else /* HAVE_SSE */
  1370. int16x4_t pcma, pcmb;
  1371. a = VADD(a, VSET(0.5f));
  1372. b = VADD(b, VSET(0.5f));
  1373. pcma = vqmovn_s32(vqaddq_s32(vcvtq_s32_f32(a), vreinterpretq_s32_u32(vcltq_f32(a, VSET(0)))));
  1374. pcmb = vqmovn_s32(vqaddq_s32(vcvtq_s32_f32(b), vreinterpretq_s32_u32(vcltq_f32(b, VSET(0)))));
  1375. vst1_lane_s16(dstr + (15 - i)*nch, pcma, 1);
  1376. vst1_lane_s16(dstr + (17 + i)*nch, pcmb, 1);
  1377. vst1_lane_s16(dstl + (15 - i)*nch, pcma, 0);
  1378. vst1_lane_s16(dstl + (17 + i)*nch, pcmb, 0);
  1379. vst1_lane_s16(dstr + (47 - i)*nch, pcma, 3);
  1380. vst1_lane_s16(dstr + (49 + i)*nch, pcmb, 3);
  1381. vst1_lane_s16(dstl + (47 - i)*nch, pcma, 2);
  1382. vst1_lane_s16(dstl + (49 + i)*nch, pcmb, 2);
  1383. #endif /* HAVE_SSE */
  1384. #else /* MINIMP3_FLOAT_OUTPUT */
  1385. a = VMUL(a, g_scale);
  1386. b = VMUL(b, g_scale);
  1387. #if HAVE_SSE
  1388. _mm_store_ss(dstr + (15 - i)*nch, _mm_shuffle_ps(a, a, _MM_SHUFFLE(1, 1, 1, 1)));
  1389. _mm_store_ss(dstr + (17 + i)*nch, _mm_shuffle_ps(b, b, _MM_SHUFFLE(1, 1, 1, 1)));
  1390. _mm_store_ss(dstl + (15 - i)*nch, _mm_shuffle_ps(a, a, _MM_SHUFFLE(0, 0, 0, 0)));
  1391. _mm_store_ss(dstl + (17 + i)*nch, _mm_shuffle_ps(b, b, _MM_SHUFFLE(0, 0, 0, 0)));
  1392. _mm_store_ss(dstr + (47 - i)*nch, _mm_shuffle_ps(a, a, _MM_SHUFFLE(3, 3, 3, 3)));
  1393. _mm_store_ss(dstr + (49 + i)*nch, _mm_shuffle_ps(b, b, _MM_SHUFFLE(3, 3, 3, 3)));
  1394. _mm_store_ss(dstl + (47 - i)*nch, _mm_shuffle_ps(a, a, _MM_SHUFFLE(2, 2, 2, 2)));
  1395. _mm_store_ss(dstl + (49 + i)*nch, _mm_shuffle_ps(b, b, _MM_SHUFFLE(2, 2, 2, 2)));
  1396. #else /* HAVE_SSE */
  1397. vst1q_lane_f32(dstr + (15 - i)*nch, a, 1);
  1398. vst1q_lane_f32(dstr + (17 + i)*nch, b, 1);
  1399. vst1q_lane_f32(dstl + (15 - i)*nch, a, 0);
  1400. vst1q_lane_f32(dstl + (17 + i)*nch, b, 0);
  1401. vst1q_lane_f32(dstr + (47 - i)*nch, a, 3);
  1402. vst1q_lane_f32(dstr + (49 + i)*nch, b, 3);
  1403. vst1q_lane_f32(dstl + (47 - i)*nch, a, 2);
  1404. vst1q_lane_f32(dstl + (49 + i)*nch, b, 2);
  1405. #endif /* HAVE_SSE */
  1406. #endif /* MINIMP3_FLOAT_OUTPUT */
  1407. }
  1408. } else
  1409. #endif /* HAVE_SIMD */
  1410. #ifdef MINIMP3_ONLY_SIMD
  1411. {}
  1412. #else /* MINIMP3_ONLY_SIMD */
  1413. for (i = 14; i >= 0; i--)
  1414. {
  1415. #define LOAD(k) float w0 = *w++; float w1 = *w++; float *vz = &zlin[4*i - k*64]; float *vy = &zlin[4*i - (15 - k)*64];
  1416. #define S0(k) { int j; LOAD(k); for (j = 0; j < 4; j++) b[j] = vz[j]*w1 + vy[j]*w0, a[j] = vz[j]*w0 - vy[j]*w1; }
  1417. #define S1(k) { int j; LOAD(k); for (j = 0; j < 4; j++) b[j] += vz[j]*w1 + vy[j]*w0, a[j] += vz[j]*w0 - vy[j]*w1; }
  1418. #define S2(k) { int j; LOAD(k); for (j = 0; j < 4; j++) b[j] += vz[j]*w1 + vy[j]*w0, a[j] += vy[j]*w1 - vz[j]*w0; }
  1419. float a[4], b[4];
  1420. zlin[4*i] = xl[18*(31 - i)];
  1421. zlin[4*i + 1] = xr[18*(31 - i)];
  1422. zlin[4*i + 2] = xl[1 + 18*(31 - i)];
  1423. zlin[4*i + 3] = xr[1 + 18*(31 - i)];
  1424. zlin[4*(i + 16)] = xl[1 + 18*(1 + i)];
  1425. zlin[4*(i + 16) + 1] = xr[1 + 18*(1 + i)];
  1426. zlin[4*(i - 16) + 2] = xl[18*(1 + i)];
  1427. zlin[4*(i - 16) + 3] = xr[18*(1 + i)];
  1428. S0(0) S2(1) S1(2) S2(3) S1(4) S2(5) S1(6) S2(7)
  1429. dstr[(15 - i)*nch] = mp3d_scale_pcm(a[1]);
  1430. dstr[(17 + i)*nch] = mp3d_scale_pcm(b[1]);
  1431. dstl[(15 - i)*nch] = mp3d_scale_pcm(a[0]);
  1432. dstl[(17 + i)*nch] = mp3d_scale_pcm(b[0]);
  1433. dstr[(47 - i)*nch] = mp3d_scale_pcm(a[3]);
  1434. dstr[(49 + i)*nch] = mp3d_scale_pcm(b[3]);
  1435. dstl[(47 - i)*nch] = mp3d_scale_pcm(a[2]);
  1436. dstl[(49 + i)*nch] = mp3d_scale_pcm(b[2]);
  1437. }
  1438. #endif /* MINIMP3_ONLY_SIMD */
  1439. }
  1440. static void mp3d_synth_granule(float *qmf_state, float *grbuf, int nbands, int nch, mp3d_sample_t *pcm, float *lins)
  1441. {
  1442. int i;
  1443. for (i = 0; i < nch; i++)
  1444. {
  1445. mp3d_DCT_II(grbuf + 576*i, nbands);
  1446. }
  1447. memcpy(lins, qmf_state, sizeof(float)*15*64);
  1448. for (i = 0; i < nbands; i += 2)
  1449. {
  1450. mp3d_synth(grbuf + i, pcm + 32*nch*i, nch, lins + i*64);
  1451. }
  1452. #ifndef MINIMP3_NONSTANDARD_BUT_LOGICAL
  1453. if (nch == 1)
  1454. {
  1455. for (i = 0; i < 15*64; i += 2)
  1456. {
  1457. qmf_state[i] = lins[nbands*64 + i];
  1458. }
  1459. } else
  1460. #endif /* MINIMP3_NONSTANDARD_BUT_LOGICAL */
  1461. {
  1462. memcpy(qmf_state, lins + nbands*64, sizeof(float)*15*64);
  1463. }
  1464. }
  1465. static int mp3d_match_frame(const uint8_t *hdr, int mp3_bytes, int frame_bytes)
  1466. {
  1467. int i, nmatch;
  1468. for (i = 0, nmatch = 0; nmatch < MAX_FRAME_SYNC_MATCHES; nmatch++)
  1469. {
  1470. i += hdr_frame_bytes(hdr + i, frame_bytes) + hdr_padding(hdr + i);
  1471. if (i + HDR_SIZE > mp3_bytes)
  1472. return nmatch > 0;
  1473. if (!hdr_compare(hdr, hdr + i))
  1474. return 0;
  1475. }
  1476. return 1;
  1477. }
  1478. static int mp3d_find_frame(const uint8_t *mp3, int mp3_bytes, int *free_format_bytes, int *ptr_frame_bytes)
  1479. {
  1480. int i, k;
  1481. for (i = 0; i < mp3_bytes - HDR_SIZE; i++, mp3++)
  1482. {
  1483. if (hdr_valid(mp3))
  1484. {
  1485. int frame_bytes = hdr_frame_bytes(mp3, *free_format_bytes);
  1486. int frame_and_padding = frame_bytes + hdr_padding(mp3);
  1487. for (k = HDR_SIZE; !frame_bytes && k < MAX_FREE_FORMAT_FRAME_SIZE && i + 2*k < mp3_bytes - HDR_SIZE; k++)
  1488. {
  1489. if (hdr_compare(mp3, mp3 + k))
  1490. {
  1491. int fb = k - hdr_padding(mp3);
  1492. int nextfb = fb + hdr_padding(mp3 + k);
  1493. if (i + k + nextfb + HDR_SIZE > mp3_bytes || !hdr_compare(mp3, mp3 + k + nextfb))
  1494. continue;
  1495. frame_and_padding = k;
  1496. frame_bytes = fb;
  1497. *free_format_bytes = fb;
  1498. }
  1499. }
  1500. if ((frame_bytes && i + frame_and_padding <= mp3_bytes &&
  1501. mp3d_match_frame(mp3, mp3_bytes - i, frame_bytes)) ||
  1502. (!i && frame_and_padding == mp3_bytes))
  1503. {
  1504. *ptr_frame_bytes = frame_and_padding;
  1505. return i;
  1506. }
  1507. *free_format_bytes = 0;
  1508. }
  1509. }
  1510. *ptr_frame_bytes = 0;
  1511. return i;
  1512. }
  1513. void mp3dec_init(mp3dec_t *dec)
  1514. {
  1515. dec->header[0] = 0;
  1516. }
  1517. int mp3dec_decode_frame(mp3dec_t *dec, const uint8_t *mp3, int mp3_bytes, mp3d_sample_t *pcm, mp3dec_frame_info_t *info)
  1518. {
  1519. int i = 0, igr, frame_size = 0, success = 1;
  1520. const uint8_t *hdr;
  1521. bs_t bs_frame[1];
  1522. mp3dec_scratch_t scratch;
  1523. if (mp3_bytes > 4 && dec->header[0] == 0xff && hdr_compare(dec->header, mp3))
  1524. {
  1525. frame_size = hdr_frame_bytes(mp3, dec->free_format_bytes) + hdr_padding(mp3);
  1526. if (frame_size != mp3_bytes && (frame_size + HDR_SIZE > mp3_bytes || !hdr_compare(mp3, mp3 + frame_size)))
  1527. {
  1528. frame_size = 0;
  1529. }
  1530. }
  1531. if (!frame_size)
  1532. {
  1533. memset(dec, 0, sizeof(mp3dec_t));
  1534. i = mp3d_find_frame(mp3, mp3_bytes, &dec->free_format_bytes, &frame_size);
  1535. if (!frame_size || i + frame_size > mp3_bytes)
  1536. {
  1537. info->frame_offset = i; // ESENTHEL CHANGED
  1538. info->frame_size = 0; // ESENTHEL CHANGED
  1539. return 0;
  1540. }
  1541. }
  1542. hdr = mp3 + i;
  1543. memcpy(dec->header, hdr, HDR_SIZE);
  1544. info->frame_offset = i; // ESENTHEL CHANGED
  1545. info->frame_size = frame_size; // ESENTHEL CHANGED
  1546. info->channels = HDR_IS_MONO(hdr) ? 1 : 2;
  1547. info->hz = hdr_sample_rate_hz(hdr);
  1548. info->layer = 4 - HDR_GET_LAYER(hdr);
  1549. info->bitrate_kbps = hdr_bitrate_kbps(hdr);
  1550. if (!pcm)
  1551. {
  1552. return hdr_frame_samples(hdr);
  1553. }
  1554. bs_init(bs_frame, hdr + HDR_SIZE, frame_size - HDR_SIZE);
  1555. if (HDR_IS_CRC(hdr))
  1556. {
  1557. get_bits(bs_frame, 16);
  1558. }
  1559. if (info->layer == 3)
  1560. {
  1561. int main_data_begin = L3_read_side_info(bs_frame, scratch.gr_info, hdr);
  1562. if (main_data_begin < 0 || bs_frame->pos > bs_frame->limit)
  1563. {
  1564. mp3dec_init(dec);
  1565. return 0;
  1566. }
  1567. success = L3_restore_reservoir(dec, bs_frame, &scratch, main_data_begin);
  1568. if (success)
  1569. {
  1570. for (igr = 0; igr < (HDR_TEST_MPEG1(hdr) ? 2 : 1); igr++, pcm += 576*info->channels)
  1571. {
  1572. memset(scratch.grbuf[0], 0, 576*2*sizeof(float));
  1573. L3_decode(dec, &scratch, scratch.gr_info + igr*info->channels, info->channels);
  1574. mp3d_synth_granule(dec->qmf_state, scratch.grbuf[0], 18, info->channels, pcm, scratch.syn[0]);
  1575. }
  1576. }
  1577. L3_save_reservoir(dec, &scratch);
  1578. } else
  1579. {
  1580. #ifdef MINIMP3_ONLY_MP3
  1581. return 0;
  1582. #else /* MINIMP3_ONLY_MP3 */
  1583. L12_scale_info sci[1];
  1584. L12_read_scale_info(hdr, bs_frame, sci);
  1585. memset(scratch.grbuf[0], 0, 576*2*sizeof(float));
  1586. for (i = 0, igr = 0; igr < 3; igr++)
  1587. {
  1588. if (12 == (i += L12_dequantize_granule(scratch.grbuf[0] + i, bs_frame, sci, info->layer | 1)))
  1589. {
  1590. i = 0;
  1591. L12_apply_scf_384(sci, sci->scf + igr, scratch.grbuf[0]);
  1592. mp3d_synth_granule(dec->qmf_state, scratch.grbuf[0], 12, info->channels, pcm, scratch.syn[0]);
  1593. memset(scratch.grbuf[0], 0, 576*2*sizeof(float));
  1594. pcm += 384*info->channels;
  1595. }
  1596. if (bs_frame->pos > bs_frame->limit)
  1597. {
  1598. mp3dec_init(dec);
  1599. return 0;
  1600. }
  1601. }
  1602. #endif /* MINIMP3_ONLY_MP3 */
  1603. }
  1604. return success ? hdr_frame_samples(dec->header) : -1; // return -1 only if reservoir failed ESENTHEL CHANGED
  1605. }
  1606. #ifdef MINIMP3_FLOAT_OUTPUT
  1607. static const f4 g_scale = { 32768.0f, 32768.0f, 32768.0f, 32768.0f };
  1608. static const f4 g_max = { 32767.0f, 32767.0f, 32767.0f, 32767.0f };
  1609. static const f4 g_min = { -32768.0f, -32768.0f, -32768.0f, -32768.0f };
  1610. void mp3dec_f32_to_s16(const float *in, int16_t *out, int num_samples)
  1611. {
  1612. if(num_samples > 0)
  1613. {
  1614. int i = 0;
  1615. #if HAVE_SIMD
  1616. int aligned_count = num_samples & ~7;
  1617. for(;i < aligned_count;i+=8)
  1618. {
  1619. f4 a = VMUL(VLD(&in[i ]), g_scale);
  1620. f4 b = VMUL(VLD(&in[i+4]), g_scale);
  1621. #if HAVE_SSE
  1622. __m128i pcm8 = _mm_packs_epi32(_mm_cvtps_epi32(_mm_max_ps(_mm_min_ps(a, g_max), g_min)),
  1623. _mm_cvtps_epi32(_mm_max_ps(_mm_min_ps(b, g_max), g_min)));
  1624. out[i ] = _mm_extract_epi16(pcm8, 0);
  1625. out[i+1] = _mm_extract_epi16(pcm8, 1);
  1626. out[i+2] = _mm_extract_epi16(pcm8, 2);
  1627. out[i+3] = _mm_extract_epi16(pcm8, 3);
  1628. out[i+4] = _mm_extract_epi16(pcm8, 4);
  1629. out[i+5] = _mm_extract_epi16(pcm8, 5);
  1630. out[i+6] = _mm_extract_epi16(pcm8, 6);
  1631. out[i+7] = _mm_extract_epi16(pcm8, 7);
  1632. #else /* HAVE_SSE */
  1633. int16x4_t pcma, pcmb;
  1634. a = VADD(a, VSET(0.5f));
  1635. b = VADD(b, VSET(0.5f));
  1636. pcma = vqmovn_s32(vqaddq_s32(vcvtq_s32_f32(a), vreinterpretq_s32_u32(vcltq_f32(a, VSET(0)))));
  1637. pcmb = vqmovn_s32(vqaddq_s32(vcvtq_s32_f32(b), vreinterpretq_s32_u32(vcltq_f32(b, VSET(0)))));
  1638. vst1_lane_s16(out+i , pcma, 0);
  1639. vst1_lane_s16(out+i+1, pcma, 1);
  1640. vst1_lane_s16(out+i+2, pcma, 2);
  1641. vst1_lane_s16(out+i+3, pcma, 3);
  1642. vst1_lane_s16(out+i+4, pcmb, 0);
  1643. vst1_lane_s16(out+i+5, pcmb, 1);
  1644. vst1_lane_s16(out+i+6, pcmb, 2);
  1645. vst1_lane_s16(out+i+7, pcmb, 3);
  1646. #endif /* HAVE_SSE */
  1647. }
  1648. #endif /* HAVE_SIMD */
  1649. for(; i < num_samples; i++)
  1650. {
  1651. float sample = in[i] * 32768.0f;
  1652. if (sample >= 32766.5)
  1653. out[i] = (int16_t) 32767;
  1654. else if (sample <= -32767.5)
  1655. out[i] = (int16_t)-32768;
  1656. else
  1657. {
  1658. int16_t s = (int16_t)(sample + .5f);
  1659. s -= (s < 0); /* away from zero, to be compliant */
  1660. out[i] = s;
  1661. }
  1662. }
  1663. }
  1664. }
  1665. #endif /* MINIMP3_FLOAT_OUTPUT */
  1666. #endif /* MINIMP3_IMPLEMENTATION && !_MINIMP3_IMPLEMENTATION_GUARD */