ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Video-Capture-V4l/RTjpeg/codec/modules/RTdct_std.c
Revision: 1.1
Committed: Fri May 5 20:21:52 2000 UTC (26 years, 6 months ago) by pcg
Content type: text/plain
Branch: MAIN
CVS Tags: rel-0_9, rel-0_902, HEAD
Log Message:
Initial check-in

File Contents

# Content
1 #define FIX_0_298631336 ((s32) 2446) /* FIX(0.298631336) */
2 #define FIX_0_390180644 ((s32) 3196) /* FIX(0.390180644) */
3 #define FIX_0_541196100 ((s32) 4433) /* FIX(0.541196100) */
4 #define FIX_0_765366865 ((s32) 6270) /* FIX(0.765366865) */
5 #define FIX_0_899976223 ((s32) 7373) /* FIX(0.899976223) */
6 #define FIX_1_175875602 ((s32) 9633) /* FIX(1.175875602) */
7 #define FIX_1_501321110 ((s32) 12299) /* FIX(1.501321110) */
8 #define FIX_1_847759065 ((s32) 15137) /* FIX(1.847759065) */
9 #define FIX_1_961570560 ((s32) 16069) /* FIX(1.961570560) */
10 #define FIX_2_053119869 ((s32) 16819) /* FIX(2.053119869) */
11 #define FIX_2_562915447 ((s32) 20995) /* FIX(2.562915447) */
12 #define FIX_3_072711026 ((s32) 25172) /* FIX(3.072711026) */
13
14 #define MULTIPLY(var,const) ( (s32) ((var)*(const)) )
15 #define DESCALE(x,n) ((x)>>(n))
16
17 void RTjpeg_dct_init(void)
18 {
19 }
20
21 void RTjpeg_dct(u8 *idata, s16 *odata, int rskip)
22 {
23 s32 tmp0, tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7;
24 s32 tmp10, tmp11, tmp12, tmp13;
25 s32 z1, z2, z3, z4, z5;
26 u8 *idataptr;
27 s16 * odataptr;
28 int ctr;
29
30 idataptr = idata;
31 odataptr = odata;
32 for (ctr = 7; ctr >= 0; ctr--) {
33 tmp0 = idataptr[0] + idataptr[7];
34 tmp7 = idataptr[0] - idataptr[7];
35 tmp1 = idataptr[1] + idataptr[6];
36 tmp6 = idataptr[1] - idataptr[6];
37 tmp2 = idataptr[2] + idataptr[5];
38 tmp5 = idataptr[2] - idataptr[5];
39 tmp3 = idataptr[3] + idataptr[4];
40 tmp4 = idataptr[3] - idataptr[4];
41
42 tmp10 = tmp0 + tmp3;
43 tmp13 = tmp0 - tmp3;
44 tmp11 = tmp1 + tmp2;
45 tmp12 = tmp1 - tmp2;
46
47 odataptr[0] = (s32) ((tmp10 + tmp11) << 2);
48 odataptr[4] = (s32) ((tmp10 - tmp11) << 2);
49
50 z1 = MULTIPLY(tmp12 + tmp13, FIX_0_541196100);
51 odataptr[2] = (s32) DESCALE(z1 + MULTIPLY(tmp13, FIX_0_765366865), 11);
52 odataptr[6] = (s32) DESCALE(z1 + MULTIPLY(tmp12, - FIX_1_847759065), 11);
53
54 z1 = tmp4 + tmp7;
55 z2 = tmp5 + tmp6;
56 z3 = tmp4 + tmp6;
57 z4 = tmp5 + tmp7;
58 z5 = MULTIPLY(z3 + z4, FIX_1_175875602); /* sqrt(2) * c3 */
59
60 tmp4 = MULTIPLY(tmp4, FIX_0_298631336); /* sqrt(2) * (-c1+c3+c5-c7) */
61 tmp5 = MULTIPLY(tmp5, FIX_2_053119869); /* sqrt(2) * ( c1+c3-c5+c7) */
62 tmp6 = MULTIPLY(tmp6, FIX_3_072711026); /* sqrt(2) * ( c1+c3+c5-c7) */
63 tmp7 = MULTIPLY(tmp7, FIX_1_501321110); /* sqrt(2) * ( c1+c3-c5-c7) */
64 z1 = MULTIPLY(z1, - FIX_0_899976223); /* sqrt(2) * (c7-c3) */
65 z2 = MULTIPLY(z2, - FIX_2_562915447); /* sqrt(2) * (-c1-c3) */
66 z3 = MULTIPLY(z3, - FIX_1_961570560); /* sqrt(2) * (-c3-c5) */
67 z4 = MULTIPLY(z4, - FIX_0_390180644); /* sqrt(2) * (c5-c3) */
68
69 z3 += z5;
70 z4 += z5;
71
72 odataptr[7] = (s32) DESCALE(tmp4 + z1 + z3, 11);
73 odataptr[5] = (s32) DESCALE(tmp5 + z2 + z4, 11);
74 odataptr[3] = (s32) DESCALE(tmp6 + z2 + z3, 11);
75 odataptr[1] = (s32) DESCALE(tmp7 + z1 + z4, 11);
76
77 odataptr += 8; /* advance pointer to next row */
78 idataptr += rskip;
79 }
80
81 odataptr = odata;
82 for (ctr = 7; ctr >= 0; ctr--) {
83 tmp0 = odataptr[0] + odataptr[56];
84 tmp7 = odataptr[0] - odataptr[56];
85 tmp1 = odataptr[8] + odataptr[48];
86 tmp6 = odataptr[8] - odataptr[48];
87 tmp2 = odataptr[16] + odataptr[40];
88 tmp5 = odataptr[16] - odataptr[40];
89 tmp3 = odataptr[24] + odataptr[32];
90 tmp4 = odataptr[24] - odataptr[32];
91
92 tmp10 = tmp0 + tmp3;
93 tmp13 = tmp0 - tmp3;
94 tmp11 = tmp1 + tmp2;
95 tmp12 = tmp1 - tmp2;
96
97 odataptr[0] = (s32) DESCALE(tmp10 + tmp11, 2);
98 odataptr[32] = (s32) DESCALE(tmp10 - tmp11, 2);
99
100 z1 = MULTIPLY(tmp12 + tmp13, FIX_0_541196100);
101 odataptr[16] = (s32) DESCALE(z1 + MULTIPLY(tmp13, FIX_0_765366865), 15);
102 odataptr[48] = (s32) DESCALE(z1 + MULTIPLY(tmp12, - FIX_1_847759065), 15);
103
104 z1 = tmp4 + tmp7;
105 z2 = tmp5 + tmp6;
106 z3 = tmp4 + tmp6;
107 z4 = tmp5 + tmp7;
108 z5 = MULTIPLY(z3 + z4, FIX_1_175875602); /* sqrt(2) * c3 */
109
110 tmp4 = MULTIPLY(tmp4, FIX_0_298631336); /* sqrt(2) * (-c1+c3+c5-c7) */
111 tmp5 = MULTIPLY(tmp5, FIX_2_053119869); /* sqrt(2) * ( c1+c3-c5+c7) */
112 tmp6 = MULTIPLY(tmp6, FIX_3_072711026); /* sqrt(2) * ( c1+c3+c5-c7) */
113 tmp7 = MULTIPLY(tmp7, FIX_1_501321110); /* sqrt(2) * ( c1+c3-c5-c7) */
114 z1 = MULTIPLY(z1, - FIX_0_899976223); /* sqrt(2) * (c7-c3) */
115 z2 = MULTIPLY(z2, - FIX_2_562915447); /* sqrt(2) * (-c1-c3) */
116 z3 = MULTIPLY(z3, - FIX_1_961570560); /* sqrt(2) * (-c3-c5) */
117 z4 = MULTIPLY(z4, - FIX_0_390180644); /* sqrt(2) * (c5-c3) */
118
119 z3 += z5;
120 z4 += z5;
121
122 odataptr[56] = (s32) DESCALE(tmp4 + z1 + z3, 15);
123 odataptr[40] = (s32) DESCALE(tmp5 + z2 + z4, 15);
124 odataptr[24] = (s32) DESCALE(tmp6 + z2 + z3, 15);
125 odataptr[8] = (s32) DESCALE(tmp7 + z1 + z4, 15);
126
127 odataptr++; /* advance pointer to next column */
128 }
129 }