3 * MIPS Technologies, Inc., California.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the MIPS Technologies, Inc., nor the names of its
14 * contributors may be used to endorse or promote products derived from
15 * this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE MIPS TECHNOLOGIES, INC. ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE MIPS TECHNOLOGIES, INC. BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * Author: Bojan Zivkovic (bojan@mips.com)
31 * IIR filter optimized for MIPS floating-point architecture
33 * This file is part of FFmpeg.
35 * FFmpeg is free software; you can redistribute it and/or
36 * modify it under the terms of the GNU Lesser General Public
37 * License as published by the Free Software Foundation; either
38 * version 2.1 of the License, or (at your option) any later version.
40 * FFmpeg is distributed in the hope that it will be useful,
41 * but WITHOUT ANY WARRANTY; without even the implied warranty of
42 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
43 * Lesser General Public License for more details.
45 * You should have received a copy of the GNU Lesser General Public
46 * License along with FFmpeg; if not, write to the Free Software
47 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
52 * Reference: libavcodec/iirfilter.c
55 #include "libavcodec/iirfilter.h"
58 typedef struct FFIIRFilterCoeffs
{
65 typedef struct FFIIRFilterState
{
69 static void ff_iir_filter_flt_mips(const struct FFIIRFilterCoeffs
*c
,
70 struct FFIIRFilterState
*s
, int size
,
71 const float *src
, int sstep
, float *dst
, int dstep
)
75 const float *src0
= src
;
77 for (i
= 0; i
< size
; i
++) {
78 float in
= *src0
* c
->gain
+ s
->x
[0] * c
->cy
[0] + s
->x
[1] * c
->cy
[1];
79 *dst0
= s
->x
[0] + in
+ s
->x
[1] * c
->cx
[1];
85 } else if (c
->order
== 4) {
87 const float *src0
= src
;
91 for (i
= 0; i
< size
; i
+= 4) {
92 float in1
, in2
, in3
, in4
;
93 float res1
, res2
, res3
, res4
;
97 float src0_0
= src0
[0 ];
98 float src0_1
= src0
[sstep
];
99 float src0_2
= src0
[2*sstep
];
100 float src0_3
= src0
[3*sstep
];
103 "lwc1 $f0, 0(%[cy]) \n\t"
104 "lwc1 $f4, 0(%[x]) \n\t"
105 "lwc1 $f5, 4(%[x]) \n\t"
106 "lwc1 $f6, 8(%[x]) \n\t"
107 "lwc1 $f7, 12(%[x]) \n\t"
108 "mul.s %[in1], %[src0_0], %[gain] \n\t"
109 "mul.s %[in2], %[src0_1], %[gain] \n\t"
110 "mul.s %[in3], %[src0_2], %[gain] \n\t"
111 "mul.s %[in4], %[src0_3], %[gain] \n\t"
112 "lwc1 $f1, 4(%[cy]) \n\t"
113 "madd.s %[in1], %[in1], $f0, $f4 \n\t"
114 "madd.s %[in2], %[in2], $f0, $f5 \n\t"
115 "madd.s %[in3], %[in3], $f0, $f6 \n\t"
116 "madd.s %[in4], %[in4], $f0, $f7 \n\t"
117 "lwc1 $f2, 8(%[cy]) \n\t"
118 "madd.s %[in1], %[in1], $f1, $f5 \n\t"
119 "madd.s %[in2], %[in2], $f1, $f6 \n\t"
120 "madd.s %[in3], %[in3], $f1, $f7 \n\t"
121 "lwc1 $f3, 12(%[cy]) \n\t"
122 "add.s $f8, $f5, $f7 \n\t"
123 "madd.s %[in1], %[in1], $f2, $f6 \n\t"
124 "madd.s %[in2], %[in2], $f2, $f7 \n\t"
125 "mul.s $f9, $f6, %[six] \n\t"
126 "mul.s $f10, $f7, %[six] \n\t"
127 "madd.s %[in1], %[in1], $f3, $f7 \n\t"
128 "madd.s %[in2], %[in2], $f3, %[in1] \n\t"
129 "madd.s %[in3], %[in3], $f2, %[in1] \n\t"
130 "madd.s %[in4], %[in4], $f1, %[in1] \n\t"
131 "add.s %[res1], $f4, %[in1] \n\t"
132 "swc1 %[in1], 0(%[x]) \n\t"
133 "add.s $f0, $f6, %[in1] \n\t"
134 "madd.s %[in3], %[in3], $f3, %[in2] \n\t"
135 "madd.s %[in4], %[in4], $f2, %[in2] \n\t"
136 "add.s %[res2], $f5, %[in2] \n\t"
137 "madd.s %[res1], %[res1], $f8, %[four] \n\t"
138 "add.s $f8, $f7, %[in2] \n\t"
139 "swc1 %[in2], 4(%[x]) \n\t"
140 "madd.s %[in4], %[in4], $f3, %[in3] \n\t"
141 "add.s %[res3], $f6, %[in3] \n\t"
142 "add.s %[res1], %[res1], $f9 \n\t"
143 "madd.s %[res2], %[res2], $f0, %[four] \n\t"
144 "swc1 %[in3], 8(%[x]) \n\t"
145 "add.s %[res4], $f7, %[in4] \n\t"
146 "madd.s %[res3], %[res3], $f8, %[four] \n\t"
147 "swc1 %[in4], 12(%[x]) \n\t"
148 "add.s %[res2], %[res2], $f10 \n\t"
149 "add.s $f8, %[in1], %[in3] \n\t"
150 "madd.s %[res3], %[res3], %[in1], %[six] \n\t"
151 "madd.s %[res4], %[res4], $f8, %[four] \n\t"
152 "madd.s %[res4], %[res4], %[in2], %[six] \n\t"
154 : [in1
]"=&f"(in1
), [in2
]"=&f"(in2
),
155 [in3
]"=&f"(in3
), [in4
]"=&f"(in4
),
156 [res1
]"=&f"(res1
), [res2
]"=&f"(res2
),
157 [res3
]"=&f"(res3
), [res4
]"=&f"(res4
)
158 : [src0_0
]"f"(src0_0
), [src0_1
]"f"(src0_1
),
159 [src0_2
]"f"(src0_2
), [src0_3
]"f"(src0_3
),
160 [gain
]"f"(gain
), [x
]"r"(x
), [cy
]"r"(cy
),
161 [four
]"f"(four
), [six
]"f"(six
)
162 : "$f0", "$f1", "$f2", "$f3",
163 "$f4", "$f5", "$f6", "$f7",
164 "$f8", "$f9", "$f10",
170 dst0
[2*sstep
] = res3
;
171 dst0
[3*sstep
] = res4
;
178 const float *src0
= src
;
180 for (i
= 0; i
< size
; i
++) {
183 in
= *src0
* c
->gain
;
184 for(j
= 0; j
< c
->order
; j
++)
185 in
+= c
->cy
[j
] * s
->x
[j
];
186 res
= s
->x
[0] + in
+ s
->x
[c
->order
>> 1] * c
->cx
[c
->order
>> 1];
187 for(j
= 1; j
< c
->order
>> 1; j
++)
188 res
+= (s
->x
[j
] + s
->x
[c
->order
- j
]) * c
->cx
[j
];
189 for(j
= 0; j
< c
->order
- 1; j
++)
190 s
->x
[j
] = s
->x
[j
+ 1];
192 s
->x
[c
->order
- 1] = in
;
198 #endif /* HAVE_INLINE_ASM */
200 void ff_iir_filter_init_mips(FFIIRFilterContext
*f
) {
202 f
->filter_flt
= ff_iir_filter_flt_mips
;
203 #endif /* HAVE_INLINE_ASM */