00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019 #include <stdint.h>
00020 #include "libavutil/avutil.h"
00021 #include "mathops.h"
00022
00023 #undef FUNC
00024 #undef sum_type
00025 #undef MUL
00026 #undef CLIP
00027 #undef FSUF
00028
00029 #define FUNC(n) AV_JOIN(n ## _, SAMPLE_SIZE)
00030
00031 #if SAMPLE_SIZE == 32
00032 # define sum_type int64_t
00033 # define MUL(a, b) MUL64(a, b)
00034 # define CLIP(x) av_clipl_int32(x)
00035 #else
00036 # define sum_type int32_t
00037 # define MUL(a, b) ((a) * (b))
00038 # define CLIP(x) (x)
00039 #endif
00040
00041 #define LPC1(x) { \
00042 int c = coefs[(x)-1]; \
00043 p0 += MUL(c, s); \
00044 s = smp[i-(x)+1]; \
00045 p1 += MUL(c, s); \
00046 }
00047
00048 static av_always_inline void FUNC(lpc_encode_unrolled)(int32_t *res,
00049 const int32_t *smp, int len, int order,
00050 const int32_t *coefs, int shift, int big)
00051 {
00052 int i;
00053 for (i = order; i < len; i += 2) {
00054 int s = smp[i-order];
00055 sum_type p0 = 0, p1 = 0;
00056 if (big) {
00057 switch (order) {
00058 case 32: LPC1(32)
00059 case 31: LPC1(31)
00060 case 30: LPC1(30)
00061 case 29: LPC1(29)
00062 case 28: LPC1(28)
00063 case 27: LPC1(27)
00064 case 26: LPC1(26)
00065 case 25: LPC1(25)
00066 case 24: LPC1(24)
00067 case 23: LPC1(23)
00068 case 22: LPC1(22)
00069 case 21: LPC1(21)
00070 case 20: LPC1(20)
00071 case 19: LPC1(19)
00072 case 18: LPC1(18)
00073 case 17: LPC1(17)
00074 case 16: LPC1(16)
00075 case 15: LPC1(15)
00076 case 14: LPC1(14)
00077 case 13: LPC1(13)
00078 case 12: LPC1(12)
00079 case 11: LPC1(11)
00080 case 10: LPC1(10)
00081 case 9: LPC1( 9)
00082 LPC1( 8)
00083 LPC1( 7)
00084 LPC1( 6)
00085 LPC1( 5)
00086 LPC1( 4)
00087 LPC1( 3)
00088 LPC1( 2)
00089 LPC1( 1)
00090 }
00091 } else {
00092 switch (order) {
00093 case 8: LPC1( 8)
00094 case 7: LPC1( 7)
00095 case 6: LPC1( 6)
00096 case 5: LPC1( 5)
00097 case 4: LPC1( 4)
00098 case 3: LPC1( 3)
00099 case 2: LPC1( 2)
00100 case 1: LPC1( 1)
00101 }
00102 }
00103 res[i ] = smp[i ] - CLIP(p0 >> shift);
00104 res[i+1] = smp[i+1] - CLIP(p1 >> shift);
00105 }
00106 }
00107
00108 static void FUNC(flac_lpc_encode_c)(int32_t *res, const int32_t *smp, int len,
00109 int order, const int32_t *coefs, int shift)
00110 {
00111 int i;
00112 for (i = 0; i < order; i++)
00113 res[i] = smp[i];
00114 #if CONFIG_SMALL
00115 for (i = order; i < len; i += 2) {
00116 int j;
00117 int s = smp[i];
00118 sum_type p0 = 0, p1 = 0;
00119 for (j = 0; j < order; j++) {
00120 int c = coefs[j];
00121 p1 += MUL(c, s);
00122 s = smp[i-j-1];
00123 p0 += MUL(c, s);
00124 }
00125 res[i ] = smp[i ] - CLIP(p0 >> shift);
00126 res[i+1] = smp[i+1] - CLIP(p1 >> shift);
00127 }
00128 #else
00129 switch (order) {
00130 case 1: FUNC(lpc_encode_unrolled)(res, smp, len, 1, coefs, shift, 0); break;
00131 case 2: FUNC(lpc_encode_unrolled)(res, smp, len, 2, coefs, shift, 0); break;
00132 case 3: FUNC(lpc_encode_unrolled)(res, smp, len, 3, coefs, shift, 0); break;
00133 case 4: FUNC(lpc_encode_unrolled)(res, smp, len, 4, coefs, shift, 0); break;
00134 case 5: FUNC(lpc_encode_unrolled)(res, smp, len, 5, coefs, shift, 0); break;
00135 case 6: FUNC(lpc_encode_unrolled)(res, smp, len, 6, coefs, shift, 0); break;
00136 case 7: FUNC(lpc_encode_unrolled)(res, smp, len, 7, coefs, shift, 0); break;
00137 case 8: FUNC(lpc_encode_unrolled)(res, smp, len, 8, coefs, shift, 0); break;
00138 default: FUNC(lpc_encode_unrolled)(res, smp, len, order, coefs, shift, 1); break;
00139 }
00140 #endif
00141 }