annotate Plugins/Input/mpg123/tabinit.c @ 790:8f437afc4f4a trunk

[svn] - more sanity checking
author nenolod
date Fri, 03 Mar 2006 20:09:52 -0800
parents d71f938ff725
children 0f294f2b0a9b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
61
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
1
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
2 #include <stdlib.h>
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
3 #include <math.h>
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
4
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
5 #include "mpg123.h"
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
6
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
7 real mpg123_decwin[512 + 32];
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
8 static real cos64[16], cos32[8], cos16[4], cos8[2], cos4[1];
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
9 real *mpg123_pnts[] = { cos64, cos32, cos16, cos8, cos4 };
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
10
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
11 static unsigned char *mpg123_conv16to8_buf = NULL;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
12 unsigned char *mpg123_conv16to8;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
13
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
14 static long intwinbase[] = {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
15 0, -1, -1, -1, -1, -1, -1, -2, -2, -2,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
16 -2, -3, -3, -4, -4, -5, -5, -6, -7, -7,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
17 -8, -9, -10, -11, -13, -14, -16, -17, -19, -21,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
18 -24, -26, -29, -31, -35, -38, -41, -45, -49, -53,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
19 -58, -63, -68, -73, -79, -85, -91, -97, -104, -111,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
20 -117, -125, -132, -139, -147, -154, -161, -169, -176, -183,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
21 -190, -196, -202, -208, -213, -218, -222, -225, -227, -228,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
22 -228, -227, -224, -221, -215, -208, -200, -189, -177, -163,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
23 -146, -127, -106, -83, -57, -29, 2, 36, 72, 111,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
24 153, 197, 244, 294, 347, 401, 459, 519, 581, 645,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
25 711, 779, 848, 919, 991, 1064, 1137, 1210, 1283, 1356,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
26 1428, 1498, 1567, 1634, 1698, 1759, 1817, 1870, 1919, 1962,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
27 2001, 2032, 2057, 2075, 2085, 2087, 2080, 2063, 2037, 2000,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
28 1952, 1893, 1822, 1739, 1644, 1535, 1414, 1280, 1131, 970,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
29 794, 605, 402, 185, -45, -288, -545, -814, -1095, -1388,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
30 -1692, -2006, -2330, -2663, -3004, -3351, -3705, -4063, -4425, -4788,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
31 -5153, -5517, -5879, -6237, -6589, -6935, -7271, -7597, -7910, -8209,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
32 -8491, -8755, -8998, -9219, -9416, -9585, -9727, -9838, -9916, -9959,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
33 -9966, -9935, -9863, -9750, -9592, -9389, -9139, -8840, -8492, -8092,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
34 -7640, -7134, -6574, -5959, -5288, -4561, -3776, -2935, -2037, -1082,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
35 -70, 998, 2122, 3300, 4533, 5818, 7154, 8540, 9975, 11455,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
36 12980, 14548, 16155, 17799, 19478, 21189, 22929, 24694, 26482, 28289,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
37 30112, 31947, 33791, 35640, 37489, 39336, 41176, 43006, 44821, 46617,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
38 48390, 50137, 51853, 53534, 55178, 56778, 58333, 59838, 61289, 62684,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
39 64019, 65290, 66494, 67629, 68692, 69679, 70590, 71420, 72169, 72835,
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
40 73415, 73908, 74313, 74630, 74856, 74992, 75038
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
41 };
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
42
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
43 void mpg123_make_decode_tables_fpu(long scaleval);
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
44 void mpg123_make_decode_tables_mmx(long scaleval);
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
45
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
46 void
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
47 mpg123_make_decode_tables_fpu(long scaleval)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
48 {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
49 int i, j;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
50 real *table, *costab;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
51
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
52 for (i = 0; i < 5; i++) {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
53 int kr = 0x10 >> i;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
54 int divv = 0x40 >> i;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
55 costab = mpg123_pnts[i];
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
56 for (j = 0; j < kr; j++)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
57 costab[j] =
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
58 1.0 / (2.0 *
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
59 cos(M_PI * ((double) j * 2.0 + 1.0) / (double) divv));
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
60 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
61
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
62 table = mpg123_decwin;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
63 scaleval = -scaleval;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
64 for (i = 0, j = 0; i < 256; i++, j++, table += 32) {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
65 if (table < mpg123_decwin + 512 + 16)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
66 table[16] = table[0] =
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
67 (double) intwinbase[j] / 65536.0 * (double) scaleval;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
68 if (i % 32 == 31)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
69 table -= 1023;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
70 if (i % 64 == 63)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
71 scaleval = -scaleval;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
72 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
73
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
74 for ( /* i=256 */ ; i < 512; i++, j--, table += 32) {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
75 if (table < mpg123_decwin + 512 + 16)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
76 table[16] = table[0] =
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
77 (double) intwinbase[j] / 65536.0 * (double) scaleval;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
78 if (i % 32 == 31)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
79 table -= 1023;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
80 if (i % 64 == 63)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
81 scaleval = -scaleval;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
82 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
83 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
84
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
85 void
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
86 mpg123_make_decode_tables_mmx(long scaleval)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
87 {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
88 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
89
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
90 void
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
91 mpg123_make_decode_tables(long scaleval)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
92 {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
93 mpg123_make_decode_tables_fpu(scaleval);
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
94 mpg123_make_decode_tables_mmx(scaleval);
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
95 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
96
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
97
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
98
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
99
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
100 void
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
101 mpg123_make_conv16to8_table(void)
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
102 {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
103 int i;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
104
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
105 /*
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
106 * ????: 8.0 is right but on SB cards '2.0' is a better value ???
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
107 */
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
108
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
109 if (!mpg123_conv16to8_buf) {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
110 mpg123_conv16to8_buf = g_malloc(8192);
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
111 mpg123_conv16to8 = mpg123_conv16to8_buf + 4096;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
112 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
113
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
114 for (i = -4096; i < 4096; i++) {
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
115 mpg123_conv16to8[i] = (i >> 5) + 128;
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
116 }
fa848bd484d8 [svn] Move plugins to Plugins/
nenolod
parents:
diff changeset
117 }