FFmpeg  4.0
jrevdct.c
Go to the documentation of this file.
1 /*
2  * This file is part of the Independent JPEG Group's software.
3  *
4  * The authors make NO WARRANTY or representation, either express or implied,
5  * with respect to this software, its quality, accuracy, merchantability, or
6  * fitness for a particular purpose. This software is provided "AS IS", and
7  * you, its user, assume the entire risk as to its quality and accuracy.
8  *
9  * This software is copyright (C) 1991, 1992, Thomas G. Lane.
10  * All Rights Reserved except as specified below.
11  *
12  * Permission is hereby granted to use, copy, modify, and distribute this
13  * software (or portions thereof) for any purpose, without fee, subject to
14  * these conditions:
15  * (1) If any part of the source code for this software is distributed, then
16  * this README file must be included, with this copyright and no-warranty
17  * notice unaltered; and any additions, deletions, or changes to the original
18  * files must be clearly indicated in accompanying documentation.
19  * (2) If only executable code is distributed, then the accompanying
20  * documentation must state that "this software is based in part on the work
21  * of the Independent JPEG Group".
22  * (3) Permission for use of this software is granted only if the user accepts
23  * full responsibility for any undesirable consequences; the authors accept
24  * NO LIABILITY for damages of any kind.
25  *
26  * These conditions apply to any software derived from or based on the IJG
27  * code, not just to the unmodified library. If you use our work, you ought
28  * to acknowledge us.
29  *
30  * Permission is NOT granted for the use of any IJG author's name or company
31  * name in advertising or publicity relating to this software or products
32  * derived from it. This software may be referred to only as "the Independent
33  * JPEG Group's software".
34  *
35  * We specifically permit and encourage the use of this software as the basis
36  * of commercial products, provided that all warranty or liability claims are
37  * assumed by the product vendor.
38  *
39  * This file contains the basic inverse-DCT transformation subroutine.
40  *
41  * This implementation is based on an algorithm described in
42  * C. Loeffler, A. Ligtenberg and G. Moschytz, "Practical Fast 1-D DCT
43  * Algorithms with 11 Multiplications", Proc. Int'l. Conf. on Acoustics,
44  * Speech, and Signal Processing 1989 (ICASSP '89), pp. 988-991.
45  * The primary algorithm described there uses 11 multiplies and 29 adds.
46  * We use their alternate method with 12 multiplies and 32 adds.
47  * The advantage of this method is that no data path contains more than one
48  * multiplication; this allows a very simple and accurate implementation in
49  * scaled fixed-point arithmetic, with a minimal number of shifts.
50  *
51  * I've made lots of modifications to attempt to take advantage of the
52  * sparse nature of the DCT matrices we're getting. Although the logic
53  * is cumbersome, it's straightforward and the resulting code is much
54  * faster.
55  *
56  * A better way to do this would be to pass in the DCT block as a sparse
57  * matrix, perhaps with the difference cases encoded.
58  */
59 
60 /**
61  * @file
62  * Independent JPEG Group's LLM idct.
63  */
64 
65 #include "libavutil/common.h"
66 
67 #include "dct.h"
68 #include "idctdsp.h"
69 
70 #define EIGHT_BIT_SAMPLES
71 
72 #define DCTSIZE 8
73 #define DCTSIZE2 64
74 
75 #define GLOBAL
76 
77 #define RIGHT_SHIFT(x, n) ((x) >> (n))
78 
79 typedef int16_t DCTBLOCK[DCTSIZE2];
80 
81 #define CONST_BITS 13
82 
83 /*
84  * This routine is specialized to the case DCTSIZE = 8.
85  */
86 
87 #if DCTSIZE != 8
88  Sorry, this code only copes with 8x8 DCTs. /* deliberate syntax err */
89 #endif
90 
91 
92 /*
93  * A 2-D IDCT can be done by 1-D IDCT on each row followed by 1-D IDCT
94  * on each column. Direct algorithms are also available, but they are
95  * much more complex and seem not to be any faster when reduced to code.
96  *
97  * The poop on this scaling stuff is as follows:
98  *
99  * Each 1-D IDCT step produces outputs which are a factor of sqrt(N)
100  * larger than the true IDCT outputs. The final outputs are therefore
101  * a factor of N larger than desired; since N=8 this can be cured by
102  * a simple right shift at the end of the algorithm. The advantage of
103  * this arrangement is that we save two multiplications per 1-D IDCT,
104  * because the y0 and y4 inputs need not be divided by sqrt(N).
105  *
106  * We have to do addition and subtraction of the integer inputs, which
107  * is no problem, and multiplication by fractional constants, which is
108  * a problem to do in integer arithmetic. We multiply all the constants
109  * by CONST_SCALE and convert them to integer constants (thus retaining
110  * CONST_BITS bits of precision in the constants). After doing a
111  * multiplication we have to divide the product by CONST_SCALE, with proper
112  * rounding, to produce the correct output. This division can be done
113  * cheaply as a right shift of CONST_BITS bits. We postpone shifting
114  * as long as possible so that partial sums can be added together with
115  * full fractional precision.
116  *
117  * The outputs of the first pass are scaled up by PASS1_BITS bits so that
118  * they are represented to better-than-integral precision. These outputs
119  * require BITS_IN_JSAMPLE + PASS1_BITS + 3 bits; this fits in a 16-bit word
120  * with the recommended scaling. (To scale up 12-bit sample data further, an
121  * intermediate int32 array would be needed.)
122  *
123  * To avoid overflow of the 32-bit intermediate results in pass 2, we must
124  * have BITS_IN_JSAMPLE + CONST_BITS + PASS1_BITS <= 26. Error analysis
125  * shows that the values given below are the most effective.
126  */
127 
128 #ifdef EIGHT_BIT_SAMPLES
129 #define PASS1_BITS 2
130 #else
131 #define PASS1_BITS 1 /* lose a little precision to avoid overflow */
132 #endif
133 
134 #define ONE ((int32_t) 1)
135 
136 #define CONST_SCALE (ONE << CONST_BITS)
137 
138 /* Convert a positive real constant to an integer scaled by CONST_SCALE.
139  * IMPORTANT: if your compiler doesn't do this arithmetic at compile time,
140  * you will pay a significant penalty in run time. In that case, figure
141  * the correct integer constant values and insert them by hand.
142  */
143 
144 /* Actually FIX is no longer used, we precomputed them all */
145 #define FIX(x) ((int32_t) ((x) * CONST_SCALE + 0.5))
146 
147 /* Descale and correctly round an int32_t value that's scaled by N bits.
148  * We assume RIGHT_SHIFT rounds towards minus infinity, so adding
149  * the fudge factor is correct for either sign of X.
150  */
151 
152 #define DESCALE(x,n) RIGHT_SHIFT((x) + (ONE << ((n)-1)), n)
153 
154 /* Multiply an int32_t variable by an int32_t constant to yield an int32_t result.
155  * For 8-bit samples with the recommended scaling, all the variable
156  * and constant values involved are no more than 16 bits wide, so a
157  * 16x16->32 bit multiply can be used instead of a full 32x32 multiply;
158  * this provides a useful speedup on many machines.
159  * There is no way to specify a 16x16->32 multiply in portable C, but
160  * some C compilers will do the right thing if you provide the correct
161  * combination of casts.
162  * NB: for 12-bit samples, a full 32-bit multiplication will be needed.
163  */
164 
165 #ifdef EIGHT_BIT_SAMPLES
166 #ifdef SHORTxSHORT_32 /* may work if 'int' is 32 bits */
167 #define MULTIPLY(var,const) (((int16_t) (var)) * ((int16_t) (const)))
168 #endif
169 #ifdef SHORTxLCONST_32 /* known to work with Microsoft C 6.0 */
170 #define MULTIPLY(var,const) (((int16_t) (var)) * ((int32_t) (const)))
171 #endif
172 #endif
173 
174 #ifndef MULTIPLY /* default definition */
175 #define MULTIPLY(var,const) ((var) * (const))
176 #endif
177 
178 
179 /*
180  Unlike our decoder where we approximate the FIXes, we need to use exact
181 ones here or successive P-frames will drift too much with Reference frame coding
182 */
183 #define FIX_0_211164243 1730
184 #define FIX_0_275899380 2260
185 #define FIX_0_298631336 2446
186 #define FIX_0_390180644 3196
187 #define FIX_0_509795579 4176
188 #define FIX_0_541196100 4433
189 #define FIX_0_601344887 4926
190 #define FIX_0_765366865 6270
191 #define FIX_0_785694958 6436
192 #define FIX_0_899976223 7373
193 #define FIX_1_061594337 8697
194 #define FIX_1_111140466 9102
195 #define FIX_1_175875602 9633
196 #define FIX_1_306562965 10703
197 #define FIX_1_387039845 11363
198 #define FIX_1_451774981 11893
199 #define FIX_1_501321110 12299
200 #define FIX_1_662939225 13623
201 #define FIX_1_847759065 15137
202 #define FIX_1_961570560 16069
203 #define FIX_2_053119869 16819
204 #define FIX_2_172734803 17799
205 #define FIX_2_562915447 20995
206 #define FIX_3_072711026 25172
207 
208 /*
209  * Perform the inverse DCT on one block of coefficients.
210  */
211 
213 {
214  int32_t tmp0, tmp1, tmp2, tmp3;
215  int32_t tmp10, tmp11, tmp12, tmp13;
216  int32_t z1, z2, z3, z4, z5;
217  int32_t d0, d1, d2, d3, d4, d5, d6, d7;
218  register int16_t *dataptr;
219  int rowctr;
220 
221  /* Pass 1: process rows. */
222  /* Note results are scaled up by sqrt(8) compared to a true IDCT; */
223  /* furthermore, we scale the results by 2**PASS1_BITS. */
224 
225  dataptr = data;
226 
227  for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--) {
228  /* Due to quantization, we will usually find that many of the input
229  * coefficients are zero, especially the AC terms. We can exploit this
230  * by short-circuiting the IDCT calculation for any row in which all
231  * the AC terms are zero. In that case each output is equal to the
232  * DC coefficient (with scale factor as needed).
233  * With typical images and quantization tables, half or more of the
234  * row DCT calculations can be simplified this way.
235  */
236 
237  register int *idataptr = (int*)dataptr;
238 
239  /* WARNING: we do the same permutation as MMX idct to simplify the
240  video core */
241  d0 = dataptr[0];
242  d2 = dataptr[1];
243  d4 = dataptr[2];
244  d6 = dataptr[3];
245  d1 = dataptr[4];
246  d3 = dataptr[5];
247  d5 = dataptr[6];
248  d7 = dataptr[7];
249 
250  if ((d1 | d2 | d3 | d4 | d5 | d6 | d7) == 0) {
251  /* AC terms all zero */
252  if (d0) {
253  /* Compute a 32 bit value to assign. */
254  int16_t dcval = (int16_t) (d0 * (1 << PASS1_BITS));
255  register int v = (dcval & 0xffff) | ((dcval * (1 << 16)) & 0xffff0000);
256 
257  idataptr[0] = v;
258  idataptr[1] = v;
259  idataptr[2] = v;
260  idataptr[3] = v;
261  }
262 
263  dataptr += DCTSIZE; /* advance pointer to next row */
264  continue;
265  }
266 
267  /* Even part: reverse the even part of the forward DCT. */
268  /* The rotator is sqrt(2)*c(-6). */
269 {
270  if (d6) {
271  if (d2) {
272  /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
273  z1 = MULTIPLY(d2 + d6, FIX_0_541196100);
274  tmp2 = z1 + MULTIPLY(-d6, FIX_1_847759065);
275  tmp3 = z1 + MULTIPLY(d2, FIX_0_765366865);
276 
277  tmp0 = (d0 + d4) * CONST_SCALE;
278  tmp1 = (d0 - d4) * CONST_SCALE;
279 
280  tmp10 = tmp0 + tmp3;
281  tmp13 = tmp0 - tmp3;
282  tmp11 = tmp1 + tmp2;
283  tmp12 = tmp1 - tmp2;
284  } else {
285  /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
286  tmp2 = MULTIPLY(-d6, FIX_1_306562965);
287  tmp3 = MULTIPLY(d6, FIX_0_541196100);
288 
289  tmp0 = (d0 + d4) * CONST_SCALE;
290  tmp1 = (d0 - d4) * CONST_SCALE;
291 
292  tmp10 = tmp0 + tmp3;
293  tmp13 = tmp0 - tmp3;
294  tmp11 = tmp1 + tmp2;
295  tmp12 = tmp1 - tmp2;
296  }
297  } else {
298  if (d2) {
299  /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
300  tmp2 = MULTIPLY(d2, FIX_0_541196100);
301  tmp3 = MULTIPLY(d2, FIX_1_306562965);
302 
303  tmp0 = (d0 + d4) * CONST_SCALE;
304  tmp1 = (d0 - d4) * CONST_SCALE;
305 
306  tmp10 = tmp0 + tmp3;
307  tmp13 = tmp0 - tmp3;
308  tmp11 = tmp1 + tmp2;
309  tmp12 = tmp1 - tmp2;
310  } else {
311  /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
312  tmp10 = tmp13 = (d0 + d4) * CONST_SCALE;
313  tmp11 = tmp12 = (d0 - d4) * CONST_SCALE;
314  }
315  }
316 
317  /* Odd part per figure 8; the matrix is unitary and hence its
318  * transpose is its inverse. i0..i3 are y7,y5,y3,y1 respectively.
319  */
320 
321  if (d7) {
322  if (d5) {
323  if (d3) {
324  if (d1) {
325  /* d1 != 0, d3 != 0, d5 != 0, d7 != 0 */
326  z1 = d7 + d1;
327  z2 = d5 + d3;
328  z3 = d7 + d3;
329  z4 = d5 + d1;
330  z5 = MULTIPLY(z3 + z4, FIX_1_175875602);
331 
332  tmp0 = MULTIPLY(d7, FIX_0_298631336);
333  tmp1 = MULTIPLY(d5, FIX_2_053119869);
334  tmp2 = MULTIPLY(d3, FIX_3_072711026);
335  tmp3 = MULTIPLY(d1, FIX_1_501321110);
336  z1 = MULTIPLY(-z1, FIX_0_899976223);
337  z2 = MULTIPLY(-z2, FIX_2_562915447);
338  z3 = MULTIPLY(-z3, FIX_1_961570560);
339  z4 = MULTIPLY(-z4, FIX_0_390180644);
340 
341  z3 += z5;
342  z4 += z5;
343 
344  tmp0 += z1 + z3;
345  tmp1 += z2 + z4;
346  tmp2 += z2 + z3;
347  tmp3 += z1 + z4;
348  } else {
349  /* d1 == 0, d3 != 0, d5 != 0, d7 != 0 */
350  z2 = d5 + d3;
351  z3 = d7 + d3;
352  z5 = MULTIPLY(z3 + d5, FIX_1_175875602);
353 
354  tmp0 = MULTIPLY(d7, FIX_0_298631336);
355  tmp1 = MULTIPLY(d5, FIX_2_053119869);
356  tmp2 = MULTIPLY(d3, FIX_3_072711026);
357  z1 = MULTIPLY(-d7, FIX_0_899976223);
358  z2 = MULTIPLY(-z2, FIX_2_562915447);
359  z3 = MULTIPLY(-z3, FIX_1_961570560);
360  z4 = MULTIPLY(-d5, FIX_0_390180644);
361 
362  z3 += z5;
363  z4 += z5;
364 
365  tmp0 += z1 + z3;
366  tmp1 += z2 + z4;
367  tmp2 += z2 + z3;
368  tmp3 = z1 + z4;
369  }
370  } else {
371  if (d1) {
372  /* d1 != 0, d3 == 0, d5 != 0, d7 != 0 */
373  z1 = d7 + d1;
374  z4 = d5 + d1;
375  z5 = MULTIPLY(d7 + z4, FIX_1_175875602);
376 
377  tmp0 = MULTIPLY(d7, FIX_0_298631336);
378  tmp1 = MULTIPLY(d5, FIX_2_053119869);
379  tmp3 = MULTIPLY(d1, FIX_1_501321110);
380  z1 = MULTIPLY(-z1, FIX_0_899976223);
381  z2 = MULTIPLY(-d5, FIX_2_562915447);
382  z3 = MULTIPLY(-d7, FIX_1_961570560);
383  z4 = MULTIPLY(-z4, FIX_0_390180644);
384 
385  z3 += z5;
386  z4 += z5;
387 
388  tmp0 += z1 + z3;
389  tmp1 += z2 + z4;
390  tmp2 = z2 + z3;
391  tmp3 += z1 + z4;
392  } else {
393  /* d1 == 0, d3 == 0, d5 != 0, d7 != 0 */
394  tmp0 = MULTIPLY(-d7, FIX_0_601344887);
395  z1 = MULTIPLY(-d7, FIX_0_899976223);
396  z3 = MULTIPLY(-d7, FIX_1_961570560);
397  tmp1 = MULTIPLY(-d5, FIX_0_509795579);
398  z2 = MULTIPLY(-d5, FIX_2_562915447);
399  z4 = MULTIPLY(-d5, FIX_0_390180644);
400  z5 = MULTIPLY(d5 + d7, FIX_1_175875602);
401 
402  z3 += z5;
403  z4 += z5;
404 
405  tmp0 += z3;
406  tmp1 += z4;
407  tmp2 = z2 + z3;
408  tmp3 = z1 + z4;
409  }
410  }
411  } else {
412  if (d3) {
413  if (d1) {
414  /* d1 != 0, d3 != 0, d5 == 0, d7 != 0 */
415  z1 = d7 + d1;
416  z3 = d7 + d3;
417  z5 = MULTIPLY(z3 + d1, FIX_1_175875602);
418 
419  tmp0 = MULTIPLY(d7, FIX_0_298631336);
420  tmp2 = MULTIPLY(d3, FIX_3_072711026);
421  tmp3 = MULTIPLY(d1, FIX_1_501321110);
422  z1 = MULTIPLY(-z1, FIX_0_899976223);
423  z2 = MULTIPLY(-d3, FIX_2_562915447);
424  z3 = MULTIPLY(-z3, FIX_1_961570560);
425  z4 = MULTIPLY(-d1, FIX_0_390180644);
426 
427  z3 += z5;
428  z4 += z5;
429 
430  tmp0 += z1 + z3;
431  tmp1 = z2 + z4;
432  tmp2 += z2 + z3;
433  tmp3 += z1 + z4;
434  } else {
435  /* d1 == 0, d3 != 0, d5 == 0, d7 != 0 */
436  z3 = d7 + d3;
437 
438  tmp0 = MULTIPLY(-d7, FIX_0_601344887);
439  z1 = MULTIPLY(-d7, FIX_0_899976223);
440  tmp2 = MULTIPLY(d3, FIX_0_509795579);
441  z2 = MULTIPLY(-d3, FIX_2_562915447);
442  z5 = MULTIPLY(z3, FIX_1_175875602);
443  z3 = MULTIPLY(-z3, FIX_0_785694958);
444 
445  tmp0 += z3;
446  tmp1 = z2 + z5;
447  tmp2 += z3;
448  tmp3 = z1 + z5;
449  }
450  } else {
451  if (d1) {
452  /* d1 != 0, d3 == 0, d5 == 0, d7 != 0 */
453  z1 = d7 + d1;
454  z5 = MULTIPLY(z1, FIX_1_175875602);
455 
456  z1 = MULTIPLY(z1, FIX_0_275899380);
457  z3 = MULTIPLY(-d7, FIX_1_961570560);
458  tmp0 = MULTIPLY(-d7, FIX_1_662939225);
459  z4 = MULTIPLY(-d1, FIX_0_390180644);
460  tmp3 = MULTIPLY(d1, FIX_1_111140466);
461 
462  tmp0 += z1;
463  tmp1 = z4 + z5;
464  tmp2 = z3 + z5;
465  tmp3 += z1;
466  } else {
467  /* d1 == 0, d3 == 0, d5 == 0, d7 != 0 */
468  tmp0 = MULTIPLY(-d7, FIX_1_387039845);
469  tmp1 = MULTIPLY(d7, FIX_1_175875602);
470  tmp2 = MULTIPLY(-d7, FIX_0_785694958);
471  tmp3 = MULTIPLY(d7, FIX_0_275899380);
472  }
473  }
474  }
475  } else {
476  if (d5) {
477  if (d3) {
478  if (d1) {
479  /* d1 != 0, d3 != 0, d5 != 0, d7 == 0 */
480  z2 = d5 + d3;
481  z4 = d5 + d1;
482  z5 = MULTIPLY(d3 + z4, FIX_1_175875602);
483 
484  tmp1 = MULTIPLY(d5, FIX_2_053119869);
485  tmp2 = MULTIPLY(d3, FIX_3_072711026);
486  tmp3 = MULTIPLY(d1, FIX_1_501321110);
487  z1 = MULTIPLY(-d1, FIX_0_899976223);
488  z2 = MULTIPLY(-z2, FIX_2_562915447);
489  z3 = MULTIPLY(-d3, FIX_1_961570560);
490  z4 = MULTIPLY(-z4, FIX_0_390180644);
491 
492  z3 += z5;
493  z4 += z5;
494 
495  tmp0 = z1 + z3;
496  tmp1 += z2 + z4;
497  tmp2 += z2 + z3;
498  tmp3 += z1 + z4;
499  } else {
500  /* d1 == 0, d3 != 0, d5 != 0, d7 == 0 */
501  z2 = d5 + d3;
502 
503  z5 = MULTIPLY(z2, FIX_1_175875602);
504  tmp1 = MULTIPLY(d5, FIX_1_662939225);
505  z4 = MULTIPLY(-d5, FIX_0_390180644);
506  z2 = MULTIPLY(-z2, FIX_1_387039845);
507  tmp2 = MULTIPLY(d3, FIX_1_111140466);
508  z3 = MULTIPLY(-d3, FIX_1_961570560);
509 
510  tmp0 = z3 + z5;
511  tmp1 += z2;
512  tmp2 += z2;
513  tmp3 = z4 + z5;
514  }
515  } else {
516  if (d1) {
517  /* d1 != 0, d3 == 0, d5 != 0, d7 == 0 */
518  z4 = d5 + d1;
519 
520  z5 = MULTIPLY(z4, FIX_1_175875602);
521  z1 = MULTIPLY(-d1, FIX_0_899976223);
522  tmp3 = MULTIPLY(d1, FIX_0_601344887);
523  tmp1 = MULTIPLY(-d5, FIX_0_509795579);
524  z2 = MULTIPLY(-d5, FIX_2_562915447);
525  z4 = MULTIPLY(z4, FIX_0_785694958);
526 
527  tmp0 = z1 + z5;
528  tmp1 += z4;
529  tmp2 = z2 + z5;
530  tmp3 += z4;
531  } else {
532  /* d1 == 0, d3 == 0, d5 != 0, d7 == 0 */
533  tmp0 = MULTIPLY(d5, FIX_1_175875602);
534  tmp1 = MULTIPLY(d5, FIX_0_275899380);
535  tmp2 = MULTIPLY(-d5, FIX_1_387039845);
536  tmp3 = MULTIPLY(d5, FIX_0_785694958);
537  }
538  }
539  } else {
540  if (d3) {
541  if (d1) {
542  /* d1 != 0, d3 != 0, d5 == 0, d7 == 0 */
543  z5 = d1 + d3;
544  tmp3 = MULTIPLY(d1, FIX_0_211164243);
545  tmp2 = MULTIPLY(-d3, FIX_1_451774981);
546  z1 = MULTIPLY(d1, FIX_1_061594337);
547  z2 = MULTIPLY(-d3, FIX_2_172734803);
548  z4 = MULTIPLY(z5, FIX_0_785694958);
549  z5 = MULTIPLY(z5, FIX_1_175875602);
550 
551  tmp0 = z1 - z4;
552  tmp1 = z2 + z4;
553  tmp2 += z5;
554  tmp3 += z5;
555  } else {
556  /* d1 == 0, d3 != 0, d5 == 0, d7 == 0 */
557  tmp0 = MULTIPLY(-d3, FIX_0_785694958);
558  tmp1 = MULTIPLY(-d3, FIX_1_387039845);
559  tmp2 = MULTIPLY(-d3, FIX_0_275899380);
560  tmp3 = MULTIPLY(d3, FIX_1_175875602);
561  }
562  } else {
563  if (d1) {
564  /* d1 != 0, d3 == 0, d5 == 0, d7 == 0 */
565  tmp0 = MULTIPLY(d1, FIX_0_275899380);
566  tmp1 = MULTIPLY(d1, FIX_0_785694958);
567  tmp2 = MULTIPLY(d1, FIX_1_175875602);
568  tmp3 = MULTIPLY(d1, FIX_1_387039845);
569  } else {
570  /* d1 == 0, d3 == 0, d5 == 0, d7 == 0 */
571  tmp0 = tmp1 = tmp2 = tmp3 = 0;
572  }
573  }
574  }
575  }
576 }
577  /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
578 
579  dataptr[0] = (int16_t) DESCALE(tmp10 + tmp3, CONST_BITS-PASS1_BITS);
580  dataptr[7] = (int16_t) DESCALE(tmp10 - tmp3, CONST_BITS-PASS1_BITS);
581  dataptr[1] = (int16_t) DESCALE(tmp11 + tmp2, CONST_BITS-PASS1_BITS);
582  dataptr[6] = (int16_t) DESCALE(tmp11 - tmp2, CONST_BITS-PASS1_BITS);
583  dataptr[2] = (int16_t) DESCALE(tmp12 + tmp1, CONST_BITS-PASS1_BITS);
584  dataptr[5] = (int16_t) DESCALE(tmp12 - tmp1, CONST_BITS-PASS1_BITS);
585  dataptr[3] = (int16_t) DESCALE(tmp13 + tmp0, CONST_BITS-PASS1_BITS);
586  dataptr[4] = (int16_t) DESCALE(tmp13 - tmp0, CONST_BITS-PASS1_BITS);
587 
588  dataptr += DCTSIZE; /* advance pointer to next row */
589  }
590 
591  /* Pass 2: process columns. */
592  /* Note that we must descale the results by a factor of 8 == 2**3, */
593  /* and also undo the PASS1_BITS scaling. */
594 
595  dataptr = data;
596  for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--) {
597  /* Columns of zeroes can be exploited in the same way as we did with rows.
598  * However, the row calculation has created many nonzero AC terms, so the
599  * simplification applies less often (typically 5% to 10% of the time).
600  * On machines with very fast multiplication, it's possible that the
601  * test takes more time than it's worth. In that case this section
602  * may be commented out.
603  */
604 
605  d0 = dataptr[DCTSIZE*0];
606  d1 = dataptr[DCTSIZE*1];
607  d2 = dataptr[DCTSIZE*2];
608  d3 = dataptr[DCTSIZE*3];
609  d4 = dataptr[DCTSIZE*4];
610  d5 = dataptr[DCTSIZE*5];
611  d6 = dataptr[DCTSIZE*6];
612  d7 = dataptr[DCTSIZE*7];
613 
614  /* Even part: reverse the even part of the forward DCT. */
615  /* The rotator is sqrt(2)*c(-6). */
616  if (d6) {
617  if (d2) {
618  /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
619  z1 = MULTIPLY(d2 + d6, FIX_0_541196100);
620  tmp2 = z1 + MULTIPLY(-d6, FIX_1_847759065);
621  tmp3 = z1 + MULTIPLY(d2, FIX_0_765366865);
622 
623  tmp0 = (d0 + d4) * CONST_SCALE;
624  tmp1 = (d0 - d4) * CONST_SCALE;
625 
626  tmp10 = tmp0 + tmp3;
627  tmp13 = tmp0 - tmp3;
628  tmp11 = tmp1 + tmp2;
629  tmp12 = tmp1 - tmp2;
630  } else {
631  /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
632  tmp2 = MULTIPLY(-d6, FIX_1_306562965);
633  tmp3 = MULTIPLY(d6, FIX_0_541196100);
634 
635  tmp0 = (d0 + d4) * CONST_SCALE;
636  tmp1 = (d0 - d4) * CONST_SCALE;
637 
638  tmp10 = tmp0 + tmp3;
639  tmp13 = tmp0 - tmp3;
640  tmp11 = tmp1 + tmp2;
641  tmp12 = tmp1 - tmp2;
642  }
643  } else {
644  if (d2) {
645  /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
646  tmp2 = MULTIPLY(d2, FIX_0_541196100);
647  tmp3 = MULTIPLY(d2, FIX_1_306562965);
648 
649  tmp0 = (d0 + d4) * CONST_SCALE;
650  tmp1 = (d0 - d4) * CONST_SCALE;
651 
652  tmp10 = tmp0 + tmp3;
653  tmp13 = tmp0 - tmp3;
654  tmp11 = tmp1 + tmp2;
655  tmp12 = tmp1 - tmp2;
656  } else {
657  /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
658  tmp10 = tmp13 = (d0 + d4) * CONST_SCALE;
659  tmp11 = tmp12 = (d0 - d4) * CONST_SCALE;
660  }
661  }
662 
663  /* Odd part per figure 8; the matrix is unitary and hence its
664  * transpose is its inverse. i0..i3 are y7,y5,y3,y1 respectively.
665  */
666  if (d7) {
667  if (d5) {
668  if (d3) {
669  if (d1) {
670  /* d1 != 0, d3 != 0, d5 != 0, d7 != 0 */
671  z1 = d7 + d1;
672  z2 = d5 + d3;
673  z3 = d7 + d3;
674  z4 = d5 + d1;
675  z5 = MULTIPLY(z3 + z4, FIX_1_175875602);
676 
677  tmp0 = MULTIPLY(d7, FIX_0_298631336);
678  tmp1 = MULTIPLY(d5, FIX_2_053119869);
679  tmp2 = MULTIPLY(d3, FIX_3_072711026);
680  tmp3 = MULTIPLY(d1, FIX_1_501321110);
681  z1 = MULTIPLY(-z1, FIX_0_899976223);
682  z2 = MULTIPLY(-z2, FIX_2_562915447);
683  z3 = MULTIPLY(-z3, FIX_1_961570560);
684  z4 = MULTIPLY(-z4, FIX_0_390180644);
685 
686  z3 += z5;
687  z4 += z5;
688 
689  tmp0 += z1 + z3;
690  tmp1 += z2 + z4;
691  tmp2 += z2 + z3;
692  tmp3 += z1 + z4;
693  } else {
694  /* d1 == 0, d3 != 0, d5 != 0, d7 != 0 */
695  z2 = d5 + d3;
696  z3 = d7 + d3;
697  z5 = MULTIPLY(z3 + d5, FIX_1_175875602);
698 
699  tmp0 = MULTIPLY(d7, FIX_0_298631336);
700  tmp1 = MULTIPLY(d5, FIX_2_053119869);
701  tmp2 = MULTIPLY(d3, FIX_3_072711026);
702  z1 = MULTIPLY(-d7, FIX_0_899976223);
703  z2 = MULTIPLY(-z2, FIX_2_562915447);
704  z3 = MULTIPLY(-z3, FIX_1_961570560);
705  z4 = MULTIPLY(-d5, FIX_0_390180644);
706 
707  z3 += z5;
708  z4 += z5;
709 
710  tmp0 += z1 + z3;
711  tmp1 += z2 + z4;
712  tmp2 += z2 + z3;
713  tmp3 = z1 + z4;
714  }
715  } else {
716  if (d1) {
717  /* d1 != 0, d3 == 0, d5 != 0, d7 != 0 */
718  z1 = d7 + d1;
719  z3 = d7;
720  z4 = d5 + d1;
721  z5 = MULTIPLY(z3 + z4, FIX_1_175875602);
722 
723  tmp0 = MULTIPLY(d7, FIX_0_298631336);
724  tmp1 = MULTIPLY(d5, FIX_2_053119869);
725  tmp3 = MULTIPLY(d1, FIX_1_501321110);
726  z1 = MULTIPLY(-z1, FIX_0_899976223);
727  z2 = MULTIPLY(-d5, FIX_2_562915447);
728  z3 = MULTIPLY(-d7, FIX_1_961570560);
729  z4 = MULTIPLY(-z4, FIX_0_390180644);
730 
731  z3 += z5;
732  z4 += z5;
733 
734  tmp0 += z1 + z3;
735  tmp1 += z2 + z4;
736  tmp2 = z2 + z3;
737  tmp3 += z1 + z4;
738  } else {
739  /* d1 == 0, d3 == 0, d5 != 0, d7 != 0 */
740  tmp0 = MULTIPLY(-d7, FIX_0_601344887);
741  z1 = MULTIPLY(-d7, FIX_0_899976223);
742  z3 = MULTIPLY(-d7, FIX_1_961570560);
743  tmp1 = MULTIPLY(-d5, FIX_0_509795579);
744  z2 = MULTIPLY(-d5, FIX_2_562915447);
745  z4 = MULTIPLY(-d5, FIX_0_390180644);
746  z5 = MULTIPLY(d5 + d7, FIX_1_175875602);
747 
748  z3 += z5;
749  z4 += z5;
750 
751  tmp0 += z3;
752  tmp1 += z4;
753  tmp2 = z2 + z3;
754  tmp3 = z1 + z4;
755  }
756  }
757  } else {
758  if (d3) {
759  if (d1) {
760  /* d1 != 0, d3 != 0, d5 == 0, d7 != 0 */
761  z1 = d7 + d1;
762  z3 = d7 + d3;
763  z5 = MULTIPLY(z3 + d1, FIX_1_175875602);
764 
765  tmp0 = MULTIPLY(d7, FIX_0_298631336);
766  tmp2 = MULTIPLY(d3, FIX_3_072711026);
767  tmp3 = MULTIPLY(d1, FIX_1_501321110);
768  z1 = MULTIPLY(-z1, FIX_0_899976223);
769  z2 = MULTIPLY(-d3, FIX_2_562915447);
770  z3 = MULTIPLY(-z3, FIX_1_961570560);
771  z4 = MULTIPLY(-d1, FIX_0_390180644);
772 
773  z3 += z5;
774  z4 += z5;
775 
776  tmp0 += z1 + z3;
777  tmp1 = z2 + z4;
778  tmp2 += z2 + z3;
779  tmp3 += z1 + z4;
780  } else {
781  /* d1 == 0, d3 != 0, d5 == 0, d7 != 0 */
782  z3 = d7 + d3;
783 
784  tmp0 = MULTIPLY(-d7, FIX_0_601344887);
785  z1 = MULTIPLY(-d7, FIX_0_899976223);
786  tmp2 = MULTIPLY(d3, FIX_0_509795579);
787  z2 = MULTIPLY(-d3, FIX_2_562915447);
788  z5 = MULTIPLY(z3, FIX_1_175875602);
789  z3 = MULTIPLY(-z3, FIX_0_785694958);
790 
791  tmp0 += z3;
792  tmp1 = z2 + z5;
793  tmp2 += z3;
794  tmp3 = z1 + z5;
795  }
796  } else {
797  if (d1) {
798  /* d1 != 0, d3 == 0, d5 == 0, d7 != 0 */
799  z1 = d7 + d1;
800  z5 = MULTIPLY(z1, FIX_1_175875602);
801 
802  z1 = MULTIPLY(z1, FIX_0_275899380);
803  z3 = MULTIPLY(-d7, FIX_1_961570560);
804  tmp0 = MULTIPLY(-d7, FIX_1_662939225);
805  z4 = MULTIPLY(-d1, FIX_0_390180644);
806  tmp3 = MULTIPLY(d1, FIX_1_111140466);
807 
808  tmp0 += z1;
809  tmp1 = z4 + z5;
810  tmp2 = z3 + z5;
811  tmp3 += z1;
812  } else {
813  /* d1 == 0, d3 == 0, d5 == 0, d7 != 0 */
814  tmp0 = MULTIPLY(-d7, FIX_1_387039845);
815  tmp1 = MULTIPLY(d7, FIX_1_175875602);
816  tmp2 = MULTIPLY(-d7, FIX_0_785694958);
817  tmp3 = MULTIPLY(d7, FIX_0_275899380);
818  }
819  }
820  }
821  } else {
822  if (d5) {
823  if (d3) {
824  if (d1) {
825  /* d1 != 0, d3 != 0, d5 != 0, d7 == 0 */
826  z2 = d5 + d3;
827  z4 = d5 + d1;
828  z5 = MULTIPLY(d3 + z4, FIX_1_175875602);
829 
830  tmp1 = MULTIPLY(d5, FIX_2_053119869);
831  tmp2 = MULTIPLY(d3, FIX_3_072711026);
832  tmp3 = MULTIPLY(d1, FIX_1_501321110);
833  z1 = MULTIPLY(-d1, FIX_0_899976223);
834  z2 = MULTIPLY(-z2, FIX_2_562915447);
835  z3 = MULTIPLY(-d3, FIX_1_961570560);
836  z4 = MULTIPLY(-z4, FIX_0_390180644);
837 
838  z3 += z5;
839  z4 += z5;
840 
841  tmp0 = z1 + z3;
842  tmp1 += z2 + z4;
843  tmp2 += z2 + z3;
844  tmp3 += z1 + z4;
845  } else {
846  /* d1 == 0, d3 != 0, d5 != 0, d7 == 0 */
847  z2 = d5 + d3;
848 
849  z5 = MULTIPLY(z2, FIX_1_175875602);
850  tmp1 = MULTIPLY(d5, FIX_1_662939225);
851  z4 = MULTIPLY(-d5, FIX_0_390180644);
852  z2 = MULTIPLY(-z2, FIX_1_387039845);
853  tmp2 = MULTIPLY(d3, FIX_1_111140466);
854  z3 = MULTIPLY(-d3, FIX_1_961570560);
855 
856  tmp0 = z3 + z5;
857  tmp1 += z2;
858  tmp2 += z2;
859  tmp3 = z4 + z5;
860  }
861  } else {
862  if (d1) {
863  /* d1 != 0, d3 == 0, d5 != 0, d7 == 0 */
864  z4 = d5 + d1;
865 
866  z5 = MULTIPLY(z4, FIX_1_175875602);
867  z1 = MULTIPLY(-d1, FIX_0_899976223);
868  tmp3 = MULTIPLY(d1, FIX_0_601344887);
869  tmp1 = MULTIPLY(-d5, FIX_0_509795579);
870  z2 = MULTIPLY(-d5, FIX_2_562915447);
871  z4 = MULTIPLY(z4, FIX_0_785694958);
872 
873  tmp0 = z1 + z5;
874  tmp1 += z4;
875  tmp2 = z2 + z5;
876  tmp3 += z4;
877  } else {
878  /* d1 == 0, d3 == 0, d5 != 0, d7 == 0 */
879  tmp0 = MULTIPLY(d5, FIX_1_175875602);
880  tmp1 = MULTIPLY(d5, FIX_0_275899380);
881  tmp2 = MULTIPLY(-d5, FIX_1_387039845);
882  tmp3 = MULTIPLY(d5, FIX_0_785694958);
883  }
884  }
885  } else {
886  if (d3) {
887  if (d1) {
888  /* d1 != 0, d3 != 0, d5 == 0, d7 == 0 */
889  z5 = d1 + d3;
890  tmp3 = MULTIPLY(d1, FIX_0_211164243);
891  tmp2 = MULTIPLY(-d3, FIX_1_451774981);
892  z1 = MULTIPLY(d1, FIX_1_061594337);
893  z2 = MULTIPLY(-d3, FIX_2_172734803);
894  z4 = MULTIPLY(z5, FIX_0_785694958);
895  z5 = MULTIPLY(z5, FIX_1_175875602);
896 
897  tmp0 = z1 - z4;
898  tmp1 = z2 + z4;
899  tmp2 += z5;
900  tmp3 += z5;
901  } else {
902  /* d1 == 0, d3 != 0, d5 == 0, d7 == 0 */
903  tmp0 = MULTIPLY(-d3, FIX_0_785694958);
904  tmp1 = MULTIPLY(-d3, FIX_1_387039845);
905  tmp2 = MULTIPLY(-d3, FIX_0_275899380);
906  tmp3 = MULTIPLY(d3, FIX_1_175875602);
907  }
908  } else {
909  if (d1) {
910  /* d1 != 0, d3 == 0, d5 == 0, d7 == 0 */
911  tmp0 = MULTIPLY(d1, FIX_0_275899380);
912  tmp1 = MULTIPLY(d1, FIX_0_785694958);
913  tmp2 = MULTIPLY(d1, FIX_1_175875602);
914  tmp3 = MULTIPLY(d1, FIX_1_387039845);
915  } else {
916  /* d1 == 0, d3 == 0, d5 == 0, d7 == 0 */
917  tmp0 = tmp1 = tmp2 = tmp3 = 0;
918  }
919  }
920  }
921  }
922 
923  /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
924 
925  dataptr[DCTSIZE*0] = (int16_t) DESCALE(tmp10 + tmp3,
927  dataptr[DCTSIZE*7] = (int16_t) DESCALE(tmp10 - tmp3,
929  dataptr[DCTSIZE*1] = (int16_t) DESCALE(tmp11 + tmp2,
931  dataptr[DCTSIZE*6] = (int16_t) DESCALE(tmp11 - tmp2,
933  dataptr[DCTSIZE*2] = (int16_t) DESCALE(tmp12 + tmp1,
935  dataptr[DCTSIZE*5] = (int16_t) DESCALE(tmp12 - tmp1,
937  dataptr[DCTSIZE*3] = (int16_t) DESCALE(tmp13 + tmp0,
939  dataptr[DCTSIZE*4] = (int16_t) DESCALE(tmp13 - tmp0,
941 
942  dataptr++; /* advance pointer to next column */
943  }
944 }
945 
946 #undef DCTSIZE
947 #define DCTSIZE 4
948 #define DCTSTRIDE 8
949 
951 {
952  int32_t tmp0, tmp1, tmp2, tmp3;
953  int32_t tmp10, tmp11, tmp12, tmp13;
954  int32_t z1;
955  int32_t d0, d2, d4, d6;
956  register int16_t *dataptr;
957  int rowctr;
958 
959  /* Pass 1: process rows. */
960  /* Note results are scaled up by sqrt(8) compared to a true IDCT; */
961  /* furthermore, we scale the results by 2**PASS1_BITS. */
962 
963  data[0] += 4;
964 
965  dataptr = data;
966 
967  for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--) {
968  /* Due to quantization, we will usually find that many of the input
969  * coefficients are zero, especially the AC terms. We can exploit this
970  * by short-circuiting the IDCT calculation for any row in which all
971  * the AC terms are zero. In that case each output is equal to the
972  * DC coefficient (with scale factor as needed).
973  * With typical images and quantization tables, half or more of the
974  * row DCT calculations can be simplified this way.
975  */
976 
977  register int *idataptr = (int*)dataptr;
978 
979  d0 = dataptr[0];
980  d2 = dataptr[1];
981  d4 = dataptr[2];
982  d6 = dataptr[3];
983 
984  if ((d2 | d4 | d6) == 0) {
985  /* AC terms all zero */
986  if (d0) {
987  /* Compute a 32 bit value to assign. */
988  int16_t dcval = (int16_t) (d0 << PASS1_BITS);
989  register int v = (dcval & 0xffff) | ((dcval << 16) & 0xffff0000);
990 
991  idataptr[0] = v;
992  idataptr[1] = v;
993  }
994 
995  dataptr += DCTSTRIDE; /* advance pointer to next row */
996  continue;
997  }
998 
999  /* Even part: reverse the even part of the forward DCT. */
1000  /* The rotator is sqrt(2)*c(-6). */
1001  if (d6) {
1002  if (d2) {
1003  /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
1004  z1 = MULTIPLY(d2 + d6, FIX_0_541196100);
1005  tmp2 = z1 + MULTIPLY(-d6, FIX_1_847759065);
1006  tmp3 = z1 + MULTIPLY(d2, FIX_0_765366865);
1007 
1008  tmp0 = (d0 + d4) << CONST_BITS;
1009  tmp1 = (d0 - d4) << CONST_BITS;
1010 
1011  tmp10 = tmp0 + tmp3;
1012  tmp13 = tmp0 - tmp3;
1013  tmp11 = tmp1 + tmp2;
1014  tmp12 = tmp1 - tmp2;
1015  } else {
1016  /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
1017  tmp2 = MULTIPLY(-d6, FIX_1_306562965);
1018  tmp3 = MULTIPLY(d6, FIX_0_541196100);
1019 
1020  tmp0 = (d0 + d4) << CONST_BITS;
1021  tmp1 = (d0 - d4) << CONST_BITS;
1022 
1023  tmp10 = tmp0 + tmp3;
1024  tmp13 = tmp0 - tmp3;
1025  tmp11 = tmp1 + tmp2;
1026  tmp12 = tmp1 - tmp2;
1027  }
1028  } else {
1029  if (d2) {
1030  /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
1031  tmp2 = MULTIPLY(d2, FIX_0_541196100);
1032  tmp3 = MULTIPLY(d2, FIX_1_306562965);
1033 
1034  tmp0 = (d0 + d4) << CONST_BITS;
1035  tmp1 = (d0 - d4) << CONST_BITS;
1036 
1037  tmp10 = tmp0 + tmp3;
1038  tmp13 = tmp0 - tmp3;
1039  tmp11 = tmp1 + tmp2;
1040  tmp12 = tmp1 - tmp2;
1041  } else {
1042  /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
1043  tmp10 = tmp13 = (d0 + d4) << CONST_BITS;
1044  tmp11 = tmp12 = (d0 - d4) << CONST_BITS;
1045  }
1046  }
1047 
1048  /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
1049 
1050  dataptr[0] = (int16_t) DESCALE(tmp10, CONST_BITS-PASS1_BITS);
1051  dataptr[1] = (int16_t) DESCALE(tmp11, CONST_BITS-PASS1_BITS);
1052  dataptr[2] = (int16_t) DESCALE(tmp12, CONST_BITS-PASS1_BITS);
1053  dataptr[3] = (int16_t) DESCALE(tmp13, CONST_BITS-PASS1_BITS);
1054 
1055  dataptr += DCTSTRIDE; /* advance pointer to next row */
1056  }
1057 
1058  /* Pass 2: process columns. */
1059  /* Note that we must descale the results by a factor of 8 == 2**3, */
1060  /* and also undo the PASS1_BITS scaling. */
1061 
1062  dataptr = data;
1063  for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--) {
1064  /* Columns of zeroes can be exploited in the same way as we did with rows.
1065  * However, the row calculation has created many nonzero AC terms, so the
1066  * simplification applies less often (typically 5% to 10% of the time).
1067  * On machines with very fast multiplication, it's possible that the
1068  * test takes more time than it's worth. In that case this section
1069  * may be commented out.
1070  */
1071 
1072  d0 = dataptr[DCTSTRIDE*0];
1073  d2 = dataptr[DCTSTRIDE*1];
1074  d4 = dataptr[DCTSTRIDE*2];
1075  d6 = dataptr[DCTSTRIDE*3];
1076 
1077  /* Even part: reverse the even part of the forward DCT. */
1078  /* The rotator is sqrt(2)*c(-6). */
1079  if (d6) {
1080  if (d2) {
1081  /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
1082  z1 = MULTIPLY(d2 + d6, FIX_0_541196100);
1083  tmp2 = z1 + MULTIPLY(-d6, FIX_1_847759065);
1084  tmp3 = z1 + MULTIPLY(d2, FIX_0_765366865);
1085 
1086  tmp0 = (d0 + d4) << CONST_BITS;
1087  tmp1 = (d0 - d4) << CONST_BITS;
1088 
1089  tmp10 = tmp0 + tmp3;
1090  tmp13 = tmp0 - tmp3;
1091  tmp11 = tmp1 + tmp2;
1092  tmp12 = tmp1 - tmp2;
1093  } else {
1094  /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
1095  tmp2 = MULTIPLY(-d6, FIX_1_306562965);
1096  tmp3 = MULTIPLY(d6, FIX_0_541196100);
1097 
1098  tmp0 = (d0 + d4) << CONST_BITS;
1099  tmp1 = (d0 - d4) << CONST_BITS;
1100 
1101  tmp10 = tmp0 + tmp3;
1102  tmp13 = tmp0 - tmp3;
1103  tmp11 = tmp1 + tmp2;
1104  tmp12 = tmp1 - tmp2;
1105  }
1106  } else {
1107  if (d2) {
1108  /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
1109  tmp2 = MULTIPLY(d2, FIX_0_541196100);
1110  tmp3 = MULTIPLY(d2, FIX_1_306562965);
1111 
1112  tmp0 = (d0 + d4) << CONST_BITS;
1113  tmp1 = (d0 - d4) << CONST_BITS;
1114 
1115  tmp10 = tmp0 + tmp3;
1116  tmp13 = tmp0 - tmp3;
1117  tmp11 = tmp1 + tmp2;
1118  tmp12 = tmp1 - tmp2;
1119  } else {
1120  /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
1121  tmp10 = tmp13 = (d0 + d4) << CONST_BITS;
1122  tmp11 = tmp12 = (d0 - d4) << CONST_BITS;
1123  }
1124  }
1125 
1126  /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
1127 
1128  dataptr[DCTSTRIDE*0] = tmp10 >> (CONST_BITS+PASS1_BITS+3);
1129  dataptr[DCTSTRIDE*1] = tmp11 >> (CONST_BITS+PASS1_BITS+3);
1130  dataptr[DCTSTRIDE*2] = tmp12 >> (CONST_BITS+PASS1_BITS+3);
1131  dataptr[DCTSTRIDE*3] = tmp13 >> (CONST_BITS+PASS1_BITS+3);
1132 
1133  dataptr++; /* advance pointer to next column */
1134  }
1135 }
1136 
1138  int d00, d01, d10, d11;
1139 
1140  data[0] += 4;
1141  d00 = data[0+0*DCTSTRIDE] + data[1+0*DCTSTRIDE];
1142  d01 = data[0+0*DCTSTRIDE] - data[1+0*DCTSTRIDE];
1143  d10 = data[0+1*DCTSTRIDE] + data[1+1*DCTSTRIDE];
1144  d11 = data[0+1*DCTSTRIDE] - data[1+1*DCTSTRIDE];
1145 
1146  data[0+0*DCTSTRIDE]= (d00 + d10)>>3;
1147  data[1+0*DCTSTRIDE]= (d01 + d11)>>3;
1148  data[0+1*DCTSTRIDE]= (d00 - d10)>>3;
1149  data[1+1*DCTSTRIDE]= (d01 - d11)>>3;
1150 }
1151 
1153  data[0] = (data[0] + 4)>>3;
1154 }
1155 
1156 #undef FIX
1157 #undef CONST_BITS
1158 
1159 void ff_jref_idct_put(uint8_t *dest, ptrdiff_t line_size, int16_t *block)
1160 {
1161  ff_j_rev_dct(block);
1162  ff_put_pixels_clamped_c(block, dest, line_size);
1163 }
1164 
1165 void ff_jref_idct_add(uint8_t *dest, ptrdiff_t line_size, int16_t *block)
1166 {
1167  ff_j_rev_dct(block);
1168  ff_add_pixels_clamped_c(block, dest, line_size);
1169 }
void ff_j_rev_dct1(DCTBLOCK data)
Definition: jrevdct.c:1152
#define FIX_0_899976223
Definition: jrevdct.c:192
#define DCTSIZE
Definition: jrevdct.c:947
#define FIX_1_501321110
Definition: jrevdct.c:199
#define FIX_1_847759065
Definition: jrevdct.c:201
void ff_j_rev_dct4(DCTBLOCK data)
Definition: jrevdct.c:950
#define DESCALE(x, n)
Definition: jrevdct.c:152
#define CONST_SCALE
Definition: jrevdct.c:136
#define FIX_0_541196100
Definition: jrevdct.c:188
#define FIX_0_765366865
Definition: jrevdct.c:190
static int16_t block[64]
Definition: dct.c:115
uint8_t
#define FIX_2_562915447
Definition: jrevdct.c:205
const char data[16]
Definition: mxf.c:90
#define FIX_2_172734803
Definition: jrevdct.c:204
int16_t DCTBLOCK[DCTSIZE2]
Definition: jrevdct.c:79
void ff_add_pixels_clamped_c(const int16_t *block, uint8_t *av_restrict pixels, ptrdiff_t line_size)
Definition: idctdsp.c:157
#define FIX_1_451774981
Definition: jrevdct.c:198
#define DCTSIZE2
Definition: jrevdct.c:73
#define CONST_BITS
Definition: jrevdct.c:81
#define FIX_1_662939225
Definition: jrevdct.c:200
void ff_j_rev_dct2(DCTBLOCK data)
Definition: jrevdct.c:1137
int32_t
#define FIX_0_390180644
Definition: jrevdct.c:186
void ff_put_pixels_clamped_c(const int16_t *block, uint8_t *av_restrict pixels, ptrdiff_t line_size)
Definition: idctdsp.c:83
#define FIX_0_298631336
Definition: jrevdct.c:185
#define FIX_0_509795579
Definition: jrevdct.c:187
#define FIX_1_175875602
Definition: jrevdct.c:195
#define FIX_1_306562965
Definition: jrevdct.c:196
#define PASS1_BITS
Definition: jrevdct.c:129
void ff_j_rev_dct(DCTBLOCK data)
Definition: jrevdct.c:212
#define FIX_0_211164243
Definition: jrevdct.c:183
#define FIX_1_387039845
Definition: jrevdct.c:197
void ff_jref_idct_put(uint8_t *dest, ptrdiff_t line_size, int16_t *block)
Definition: jrevdct.c:1159
#define FIX_2_053119869
Definition: jrevdct.c:203
#define FIX_0_275899380
Definition: jrevdct.c:184
#define FIX_0_785694958
Definition: jrevdct.c:191
#define FIX_1_961570560
Definition: jrevdct.c:202
common internal and external API header
#define FIX_3_072711026
Definition: jrevdct.c:206
#define DCTSTRIDE
Definition: jrevdct.c:948
#define FIX_1_111140466
Definition: jrevdct.c:194
void ff_jref_idct_add(uint8_t *dest, ptrdiff_t line_size, int16_t *block)
Definition: jrevdct.c:1165
#define MULTIPLY(var, const)
Definition: jrevdct.c:175
#define FIX_0_601344887
Definition: jrevdct.c:189
#define FIX_1_061594337
Definition: jrevdct.c:193