diff options
Diffstat (limited to 'apps/codecs/demac/libdemac/vector_math16_armv5te.h')
-rw-r--r-- | apps/codecs/demac/libdemac/vector_math16_armv5te.h | 202 |
1 files changed, 202 insertions, 0 deletions
diff --git a/apps/codecs/demac/libdemac/vector_math16_armv5te.h b/apps/codecs/demac/libdemac/vector_math16_armv5te.h new file mode 100644 index 0000000000..fef99d9061 --- /dev/null +++ b/apps/codecs/demac/libdemac/vector_math16_armv5te.h | |||
@@ -0,0 +1,202 @@ | |||
1 | /* | ||
2 | |||
3 | libdemac - A Monkey's Audio decoder | ||
4 | |||
5 | $Id$ | ||
6 | |||
7 | Copyright (C) Dave Chapman 2007 | ||
8 | |||
9 | ARMv5te vector math copyright (C) 2008 Jens Arnold | ||
10 | |||
11 | This program is free software; you can redistribute it and/or modify | ||
12 | it under the terms of the GNU General Public License as published by | ||
13 | the Free Software Foundation; either version 2 of the License, or | ||
14 | (at your option) any later version. | ||
15 | |||
16 | This program is distributed in the hope that it will be useful, | ||
17 | but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
18 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
19 | GNU General Public License for more details. | ||
20 | |||
21 | You should have received a copy of the GNU General Public License | ||
22 | along with this program; if not, write to the Free Software | ||
23 | Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110, USA | ||
24 | |||
25 | */ | ||
26 | |||
27 | static inline void vector_add(int16_t* v1, int16_t* v2) | ||
28 | { | ||
29 | #if ORDER > 32 | ||
30 | int order = (ORDER >> 5); | ||
31 | while (order--) | ||
32 | #endif | ||
33 | { | ||
34 | *v1++ += *v2++; | ||
35 | *v1++ += *v2++; | ||
36 | *v1++ += *v2++; | ||
37 | *v1++ += *v2++; | ||
38 | *v1++ += *v2++; | ||
39 | *v1++ += *v2++; | ||
40 | *v1++ += *v2++; | ||
41 | *v1++ += *v2++; | ||
42 | *v1++ += *v2++; | ||
43 | *v1++ += *v2++; | ||
44 | *v1++ += *v2++; | ||
45 | *v1++ += *v2++; | ||
46 | *v1++ += *v2++; | ||
47 | *v1++ += *v2++; | ||
48 | *v1++ += *v2++; | ||
49 | *v1++ += *v2++; | ||
50 | #if ORDER > 16 | ||
51 | *v1++ += *v2++; | ||
52 | *v1++ += *v2++; | ||
53 | *v1++ += *v2++; | ||
54 | *v1++ += *v2++; | ||
55 | *v1++ += *v2++; | ||
56 | *v1++ += *v2++; | ||
57 | *v1++ += *v2++; | ||
58 | *v1++ += *v2++; | ||
59 | *v1++ += *v2++; | ||
60 | *v1++ += *v2++; | ||
61 | *v1++ += *v2++; | ||
62 | *v1++ += *v2++; | ||
63 | *v1++ += *v2++; | ||
64 | *v1++ += *v2++; | ||
65 | *v1++ += *v2++; | ||
66 | *v1++ += *v2++; | ||
67 | #endif | ||
68 | } | ||
69 | } | ||
70 | |||
71 | static inline void vector_sub(int16_t* v1, int16_t* v2) | ||
72 | { | ||
73 | #if ORDER > 32 | ||
74 | int order = (ORDER >> 5); | ||
75 | while (order--) | ||
76 | #endif | ||
77 | { | ||
78 | *v1++ -= *v2++; | ||
79 | *v1++ -= *v2++; | ||
80 | *v1++ -= *v2++; | ||
81 | *v1++ -= *v2++; | ||
82 | *v1++ -= *v2++; | ||
83 | *v1++ -= *v2++; | ||
84 | *v1++ -= *v2++; | ||
85 | *v1++ -= *v2++; | ||
86 | *v1++ -= *v2++; | ||
87 | *v1++ -= *v2++; | ||
88 | *v1++ -= *v2++; | ||
89 | *v1++ -= *v2++; | ||
90 | *v1++ -= *v2++; | ||
91 | *v1++ -= *v2++; | ||
92 | *v1++ -= *v2++; | ||
93 | *v1++ -= *v2++; | ||
94 | #if ORDER > 16 | ||
95 | *v1++ -= *v2++; | ||
96 | *v1++ -= *v2++; | ||
97 | *v1++ -= *v2++; | ||
98 | *v1++ -= *v2++; | ||
99 | *v1++ -= *v2++; | ||
100 | *v1++ -= *v2++; | ||
101 | *v1++ -= *v2++; | ||
102 | *v1++ -= *v2++; | ||
103 | *v1++ -= *v2++; | ||
104 | *v1++ -= *v2++; | ||
105 | *v1++ -= *v2++; | ||
106 | *v1++ -= *v2++; | ||
107 | *v1++ -= *v2++; | ||
108 | *v1++ -= *v2++; | ||
109 | *v1++ -= *v2++; | ||
110 | *v1++ -= *v2++; | ||
111 | #endif | ||
112 | } | ||
113 | } | ||
114 | |||
115 | /* This version fetches data as 32 bit words, and *requires* v1 to be | ||
116 | * 32 bit aligned, otherwise it will result either in a data abort, or | ||
117 | * incorrect results (if ARM aligncheck is disabled). */ | ||
118 | static inline int32_t scalarproduct(int16_t* v1, int16_t* v2) | ||
119 | { | ||
120 | int res = 0; | ||
121 | #if ORDER > 16 | ||
122 | int cnt = ORDER>>4; | ||
123 | #endif | ||
124 | |||
125 | asm volatile ( | ||
126 | "tst %[v2], #2 \n" | ||
127 | "beq 20f \n" | ||
128 | |||
129 | "10: \n" | ||
130 | "ldrh r4, [%[v2]], #2 \n" | ||
131 | "mov r4, r4, lsl #16 \n" | ||
132 | "1: \n" | ||
133 | "ldmia %[v1]!, {r0-r3} \n" | ||
134 | "ldmia %[v2]!, {r5-r8} \n" | ||
135 | "smlabt %[res], r0, r4, %[res] \n" | ||
136 | "smlatb %[res], r0, r5, %[res] \n" | ||
137 | "smlabt %[res], r1, r5, %[res] \n" | ||
138 | "smlatb %[res], r1, r6, %[res] \n" | ||
139 | "smlabt %[res], r2, r6, %[res] \n" | ||
140 | "smlatb %[res], r2, r7, %[res] \n" | ||
141 | "smlabt %[res], r3, r7, %[res] \n" | ||
142 | "smlatb %[res], r3, r8, %[res] \n" | ||
143 | "mov r4, r8 \n" | ||
144 | "ldmia %[v1]!, {r0-r3} \n" | ||
145 | "ldmia %[v2]!, {r5-r8} \n" | ||
146 | "smlabt %[res], r0, r4, %[res] \n" | ||
147 | "smlatb %[res], r0, r5, %[res] \n" | ||
148 | "smlabt %[res], r1, r5, %[res] \n" | ||
149 | "smlatb %[res], r1, r6, %[res] \n" | ||
150 | "smlabt %[res], r2, r6, %[res] \n" | ||
151 | "smlatb %[res], r2, r7, %[res] \n" | ||
152 | "smlabt %[res], r3, r7, %[res] \n" | ||
153 | "smlatb %[res], r3, r8, %[res] \n" | ||
154 | #if ORDER > 16 | ||
155 | "mov r4, r8 \n" | ||
156 | "subs %[cnt], %[cnt], #1 \n" | ||
157 | "bne 1b \n" | ||
158 | #endif | ||
159 | "b 99f \n" | ||
160 | |||
161 | "20: \n" | ||
162 | "1: \n" | ||
163 | "ldmia %[v1]!, {r0-r3} \n" | ||
164 | "ldmia %[v2]!, {r4-r7} \n" | ||
165 | "smlabb %[res], r0, r4, %[res] \n" | ||
166 | "smlatt %[res], r0, r4, %[res] \n" | ||
167 | "smlabb %[res], r1, r5, %[res] \n" | ||
168 | "smlatt %[res], r1, r5, %[res] \n" | ||
169 | "smlabb %[res], r2, r6, %[res] \n" | ||
170 | "smlatt %[res], r2, r6, %[res] \n" | ||
171 | "smlabb %[res], r3, r7, %[res] \n" | ||
172 | "smlatt %[res], r3, r7, %[res] \n" | ||
173 | "ldmia %[v1]!, {r0-r3} \n" | ||
174 | "ldmia %[v2]!, {r4-r7} \n" | ||
175 | "smlabb %[res], r0, r4, %[res] \n" | ||
176 | "smlatt %[res], r0, r4, %[res] \n" | ||
177 | "smlabb %[res], r1, r5, %[res] \n" | ||
178 | "smlatt %[res], r1, r5, %[res] \n" | ||
179 | "smlabb %[res], r2, r6, %[res] \n" | ||
180 | "smlatt %[res], r2, r6, %[res] \n" | ||
181 | "smlabb %[res], r3, r7, %[res] \n" | ||
182 | "smlatt %[res], r3, r7, %[res] \n" | ||
183 | #if ORDER > 16 | ||
184 | "subs %[cnt], %[cnt], #1 \n" | ||
185 | "bne 1b \n" | ||
186 | #endif | ||
187 | |||
188 | "99: \n" | ||
189 | : /* outputs */ | ||
190 | #if ORDER > 16 | ||
191 | [cnt]"+r"(cnt), | ||
192 | #endif | ||
193 | [v1] "+r"(v1), | ||
194 | [v2] "+r"(v2), | ||
195 | [res]"+r"(res) | ||
196 | : /* inputs */ | ||
197 | : /* clobbers */ | ||
198 | "r0", "r1", "r2", "r3", "r4", | ||
199 | "r5", "r6", "r7", "r8" | ||
200 | ); | ||
201 | return res; | ||
202 | } | ||