1 /*****************************************************************************
3 *****************************************************************************
4 * Copyright (C) 1999, 2000 VideoLAN
5 * $Id: idct.c,v 1.4 2001/01/16 05:04:25 sam Exp $
7 * Authors: Gaƫl Hendryckx <jimmy@via.ecp.fr>
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
22 *****************************************************************************/
24 #define MODULE_NAME idct
26 /*****************************************************************************
28 *****************************************************************************/
40 #include "video_output.h"
42 #include "video_decoder.h"
45 #include "modules_inner.h"
49 /*****************************************************************************
50 * Local and extern prototypes.
51 *****************************************************************************/
52 static void idct_getfunctions( function_list_t * p_function_list );
54 static int idct_Probe ( probedata_t *p_data );
55 static void vdec_InitIDCT ( vdec_thread_t * p_vdec);
56 void vdec_SparseIDCT ( vdec_thread_t * p_vdec, dctelem_t * p_block,
58 static void vdec_IDCT ( vdec_thread_t * p_vdec, dctelem_t * p_block,
62 /*****************************************************************************
63 * Build configuration tree.
64 *****************************************************************************/
66 ADD_WINDOW( "Configuration for IDCT module" )
67 ADD_COMMENT( "Ha, ha -- nothing to configure yet" )
70 /*****************************************************************************
71 * InitModule: get the module structure and configuration.
72 *****************************************************************************
73 * We have to fill psz_name, psz_longname and psz_version. These variables
74 * will be strdup()ed later by the main application because the module can
75 * be unloaded later to save memory, and we want to be able to access this
76 * data even after the module has been unloaded.
77 *****************************************************************************/
78 int InitModule( module_t * p_module )
80 p_module->psz_name = MODULE_STRING;
81 p_module->psz_longname = "C IDCT module";
82 p_module->psz_version = VERSION;
84 p_module->i_capabilities = MODULE_CAPABILITY_NULL
85 | MODULE_CAPABILITY_IDCT;
90 /*****************************************************************************
91 * ActivateModule: set the module to an usable state.
92 *****************************************************************************
93 * This function fills the capability functions and the configuration
94 * structure. Once ActivateModule() has been called, the i_usage can
95 * be set to 0 and calls to NeedModule() be made to increment it. To unload
96 * the module, one has to wait until i_usage == 0 and call DeactivateModule().
97 *****************************************************************************/
98 int ActivateModule( module_t * p_module )
100 p_module->p_functions = malloc( sizeof( module_functions_t ) );
101 if( p_module->p_functions == NULL )
106 idct_getfunctions( &p_module->p_functions->idct );
108 p_module->p_config = p_config;
113 /*****************************************************************************
114 * DeactivateModule: make sure the module can be unloaded.
115 *****************************************************************************
116 * This function must only be called when i_usage == 0. If it successfully
117 * returns, i_usage can be set to -1 and the module unloaded. Be careful to
118 * lock usage_lock during the whole process.
119 *****************************************************************************/
120 int DeactivateModule( module_t * p_module )
122 free( p_module->p_functions );
127 /* Following functions are local */
129 /*****************************************************************************
130 * Functions exported as capabilities. They are declared as static so that
131 * we don't pollute the namespace too much.
132 *****************************************************************************/
133 static void idct_getfunctions( function_list_t * p_function_list )
135 p_function_list->pf_probe = idct_Probe;
136 p_function_list->functions.idct.pf_init = vdec_InitIDCT;
137 p_function_list->functions.idct.pf_sparse_idct = vdec_SparseIDCT;
138 p_function_list->functions.idct.pf_idct = vdec_IDCT;
141 /*****************************************************************************
142 * idct_Probe: returns a preference score
143 *****************************************************************************/
144 static int idct_Probe( probedata_t *p_data )
146 if( TestMethod( IDCT_METHOD_VAR, "idct" ) )
151 /* This plugin always works */
155 /*****************************************************************************
156 * vdec_InitIDCT : initialize datas for vdec_SparseIDCT
157 *****************************************************************************/
158 static void vdec_InitIDCT (vdec_thread_t * p_vdec)
162 dctelem_t * p_pre = p_vdec->p_pre_idct;
163 memset( p_pre, 0, 64*64*sizeof(dctelem_t) );
165 for( i=0 ; i < 64 ; i++ )
167 p_pre[i*64+i] = 1 << SPARSE_SCALE_FACTOR;
168 vdec_IDCT( p_vdec, &p_pre[i*64], 0) ;
173 /*****************************************************************************
174 * vdec_IDCT : IDCT function for normal matrices
175 *****************************************************************************/
176 static void vdec_IDCT( vdec_thread_t * p_vdec, dctelem_t * p_block,
179 s32 tmp0, tmp1, tmp2, tmp3;
180 s32 tmp10, tmp11, tmp12, tmp13;
181 s32 z1, z2, z3, z4, z5;
182 s32 d0, d1, d2, d3, d4, d5, d6, d7;
188 /* Pass 1: process rows. */
189 /* Note results are scaled up by sqrt(8) compared to a true IDCT; */
190 /* furthermore, we scale the results by 2**PASS1_BITS. */
194 for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--)
196 /* Due to quantization, we will usually find that many of the input
197 * coefficients are zero, especially the AC terms. We can exploit this
198 * by short-circuiting the IDCT calculation for any row in which all
199 * the AC terms are zero. In that case each output is equal to the
200 * DC coefficient (with scale factor as needed).
201 * With typical images and quantization tables, half or more of the
202 * row DCT calculations can be simplified this way.
205 register int * idataptr = (int*)dataptr;
208 if ( (d1 == 0) && ((idataptr[1] | idataptr[2] | idataptr[3]) == 0) )
210 /* AC terms all zero */
213 /* Compute a 32 bit value to assign. */
214 dctelem_t dcval = (dctelem_t) (d0 << PASS1_BITS);
215 register int v = (dcval & 0xffff) | (dcval << 16);
223 dataptr += DCTSIZE; /* advance pointer to next row */
233 /* Even part: reverse the even part of the forward DCT. */
234 /* The rotator is sqrt(2)*c(-6). */
243 /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
244 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
245 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
246 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
248 tmp0 = (d0 + d4) << CONST_BITS;
249 tmp1 = (d0 - d4) << CONST_BITS;
258 /* d0 == 0, d2 != 0, d4 != 0, d6 != 0 */
259 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
260 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
261 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
263 tmp0 = d4 << CONST_BITS;
268 tmp12 = -(tmp0 + tmp2);
275 /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
276 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
277 tmp3 = MULTIPLY(d6, FIX(0.541196100));
279 tmp0 = (d0 + d4) << CONST_BITS;
280 tmp1 = (d0 - d4) << CONST_BITS;
289 /* d0 == 0, d2 == 0, d4 != 0, d6 != 0 */
290 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
291 tmp3 = MULTIPLY(d6, FIX(0.541196100));
293 tmp0 = d4 << CONST_BITS;
298 tmp12 = -(tmp0 + tmp2);
308 /* d0 != 0, d2 != 0, d4 == 0, d6 != 0 */
309 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
310 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
311 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
313 tmp0 = d0 << CONST_BITS;
322 /* d0 == 0, d2 != 0, d4 == 0, d6 != 0 */
323 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
324 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
325 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
337 /* d0 != 0, d2 == 0, d4 == 0, d6 != 0 */
338 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
339 tmp3 = MULTIPLY(d6, FIX(0.541196100));
341 tmp0 = d0 << CONST_BITS;
350 /* d0 == 0, d2 == 0, d4 == 0, d6 != 0 */
351 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
352 tmp3 = MULTIPLY(d6, FIX(0.541196100));
370 /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
371 tmp2 = MULTIPLY(d2, FIX(0.541196100));
372 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
374 tmp0 = (d0 + d4) << CONST_BITS;
375 tmp1 = (d0 - d4) << CONST_BITS;
384 /* d0 == 0, d2 != 0, d4 != 0, d6 == 0 */
385 tmp2 = MULTIPLY(d2, FIX(0.541196100));
386 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
388 tmp0 = d4 << CONST_BITS;
393 tmp12 = -(tmp0 + tmp2);
400 /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
401 tmp10 = tmp13 = (d0 + d4) << CONST_BITS;
402 tmp11 = tmp12 = (d0 - d4) << CONST_BITS;
406 /* d0 == 0, d2 == 0, d4 != 0, d6 == 0 */
407 tmp10 = tmp13 = d4 << CONST_BITS;
408 tmp11 = tmp12 = -tmp10;
418 /* d0 != 0, d2 != 0, d4 == 0, d6 == 0 */
419 tmp2 = MULTIPLY(d2, FIX(0.541196100));
420 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
422 tmp0 = d0 << CONST_BITS;
431 /* d0 == 0, d2 != 0, d4 == 0, d6 == 0 */
432 tmp2 = MULTIPLY(d2, FIX(0.541196100));
433 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
445 /* d0 != 0, d2 == 0, d4 == 0, d6 == 0 */
446 tmp10 = tmp13 = tmp11 = tmp12 = d0 << CONST_BITS;
450 /* d0 == 0, d2 == 0, d4 == 0, d6 == 0 */
451 tmp10 = tmp13 = tmp11 = tmp12 = 0;
458 /* Odd part per figure 8; the matrix is unitary and hence its
459 * transpose is its inverse. i0..i3 are y7,y5,y3,y1 respectively.
470 /* d1 != 0, d3 != 0, d5 != 0, d7 != 0 */
475 z5 = MULTIPLY(z3 + z4, FIX(1.175875602));
477 tmp0 = MULTIPLY(d7, FIX(0.298631336));
478 tmp1 = MULTIPLY(d5, FIX(2.053119869));
479 tmp2 = MULTIPLY(d3, FIX(3.072711026));
480 tmp3 = MULTIPLY(d1, FIX(1.501321110));
481 z1 = MULTIPLY(z1, - FIX(0.899976223));
482 z2 = MULTIPLY(z2, - FIX(2.562915447));
483 z3 = MULTIPLY(z3, - FIX(1.961570560));
484 z4 = MULTIPLY(z4, - FIX(0.390180644));
496 /* d1 == 0, d3 != 0, d5 != 0, d7 != 0 */
499 z5 = MULTIPLY(z3 + d5, FIX(1.175875602));
501 tmp0 = MULTIPLY(d7, FIX(0.298631336));
502 tmp1 = MULTIPLY(d5, FIX(2.053119869));
503 tmp2 = MULTIPLY(d3, FIX(3.072711026));
504 z1 = MULTIPLY(d7, - FIX(0.899976223));
505 z2 = MULTIPLY(z2, - FIX(2.562915447));
506 z3 = MULTIPLY(z3, - FIX(1.961570560));
507 z4 = MULTIPLY(d5, - FIX(0.390180644));
522 /* d1 != 0, d3 == 0, d5 != 0, d7 != 0 */
525 z5 = MULTIPLY(d7 + z4, FIX(1.175875602));
527 tmp0 = MULTIPLY(d7, FIX(0.298631336));
528 tmp1 = MULTIPLY(d5, FIX(2.053119869));
529 tmp3 = MULTIPLY(d1, FIX(1.501321110));
530 z1 = MULTIPLY(z1, - FIX(0.899976223));
531 z2 = MULTIPLY(d5, - FIX(2.562915447));
532 z3 = MULTIPLY(d7, - FIX(1.961570560));
533 z4 = MULTIPLY(z4, - FIX(0.390180644));
545 /* d1 == 0, d3 == 0, d5 != 0, d7 != 0 */
546 z5 = MULTIPLY(d7 + d5, FIX(1.175875602));
548 tmp0 = MULTIPLY(d7, - FIX2(0.601344887));
549 tmp1 = MULTIPLY(d5, - FIX2(0.509795578));
550 z1 = MULTIPLY(d7, - FIX(0.899976223));
551 z3 = MULTIPLY(d7, - FIX(1.961570560));
552 z2 = MULTIPLY(d5, - FIX(2.562915447));
553 z4 = MULTIPLY(d5, - FIX(0.390180644));
571 /* d1 != 0, d3 != 0, d5 == 0, d7 != 0 */
574 z5 = MULTIPLY(z3 + d1, FIX(1.175875602));
576 tmp0 = MULTIPLY(d7, FIX(0.298631336));
577 tmp2 = MULTIPLY(d3, FIX(3.072711026));
578 tmp3 = MULTIPLY(d1, FIX(1.501321110));
579 z1 = MULTIPLY(z1, - FIX(0.899976223));
580 z2 = MULTIPLY(d3, - FIX(2.562915447));
581 z3 = MULTIPLY(z3, - FIX(1.961570560));
582 z4 = MULTIPLY(d1, - FIX(0.390180644));
594 /* d1 == 0, d3 != 0, d5 == 0, d7 != 0 */
596 z5 = MULTIPLY(z3, FIX(1.175875602));
598 tmp0 = MULTIPLY(d7, - FIX2(0.601344887));
599 tmp2 = MULTIPLY(d3, FIX(0.509795579));
600 z1 = MULTIPLY(d7, - FIX(0.899976223));
601 z2 = MULTIPLY(d3, - FIX(2.562915447));
602 z3 = MULTIPLY(z3, - FIX2(0.785694958));
614 /* d1 != 0, d3 == 0, d5 == 0, d7 != 0 */
616 z5 = MULTIPLY(z1, FIX(1.175875602));
618 tmp0 = MULTIPLY(d7, - FIX2(1.662939224));
619 tmp3 = MULTIPLY(d1, FIX2(1.111140466));
620 z1 = MULTIPLY(z1, FIX2(0.275899379));
621 z3 = MULTIPLY(d7, - FIX(1.961570560));
622 z4 = MULTIPLY(d1, - FIX(0.390180644));
631 /* d1 == 0, d3 == 0, d5 == 0, d7 != 0 */
632 tmp0 = MULTIPLY(d7, - FIX2(1.387039845));
633 tmp1 = MULTIPLY(d7, FIX(1.175875602));
634 tmp2 = MULTIPLY(d7, - FIX2(0.785694958));
635 tmp3 = MULTIPLY(d7, FIX2(0.275899379));
648 /* d1 != 0, d3 != 0, d5 != 0, d7 == 0 */
651 z5 = MULTIPLY(d3 + z4, FIX(1.175875602));
653 tmp1 = MULTIPLY(d5, FIX(2.053119869));
654 tmp2 = MULTIPLY(d3, FIX(3.072711026));
655 tmp3 = MULTIPLY(d1, FIX(1.501321110));
656 z1 = MULTIPLY(d1, - FIX(0.899976223));
657 z2 = MULTIPLY(z2, - FIX(2.562915447));
658 z3 = MULTIPLY(d3, - FIX(1.961570560));
659 z4 = MULTIPLY(z4, - FIX(0.390180644));
671 /* d1 == 0, d3 != 0, d5 != 0, d7 == 0 */
673 z5 = MULTIPLY(z2, FIX(1.175875602));
675 tmp1 = MULTIPLY(d5, FIX2(1.662939225));
676 tmp2 = MULTIPLY(d3, FIX2(1.111140466));
677 z2 = MULTIPLY(z2, - FIX2(1.387039845));
678 z3 = MULTIPLY(d3, - FIX(1.961570560));
679 z4 = MULTIPLY(d5, - FIX(0.390180644));
691 /* d1 != 0, d3 == 0, d5 != 0, d7 == 0 */
693 z5 = MULTIPLY(z4, FIX(1.175875602));
695 tmp1 = MULTIPLY(d5, - FIX2(0.509795578));
696 tmp3 = MULTIPLY(d1, FIX2(0.601344887));
697 z1 = MULTIPLY(d1, - FIX(0.899976223));
698 z2 = MULTIPLY(d5, - FIX(2.562915447));
699 z4 = MULTIPLY(z4, FIX2(0.785694958));
708 /* d1 == 0, d3 == 0, d5 != 0, d7 == 0 */
709 tmp0 = MULTIPLY(d5, FIX(1.175875602));
710 tmp1 = MULTIPLY(d5, FIX2(0.275899380));
711 tmp2 = MULTIPLY(d5, - FIX2(1.387039845));
712 tmp3 = MULTIPLY(d5, FIX2(0.785694958));
722 /* d1 != 0, d3 != 0, d5 == 0, d7 == 0 */
725 tmp2 = MULTIPLY(d3, - FIX(1.451774981));
726 tmp3 = MULTIPLY(d1, (FIX(0.211164243) - 1));
727 z1 = MULTIPLY(d1, FIX(1.061594337));
728 z2 = MULTIPLY(d3, - FIX(2.172734803));
729 z4 = MULTIPLY(z5, FIX(0.785694958));
730 z5 = MULTIPLY(z5, FIX(1.175875602));
739 /* d1 == 0, d3 != 0, d5 == 0, d7 == 0 */
740 tmp0 = MULTIPLY(d3, - FIX2(0.785694958));
741 tmp1 = MULTIPLY(d3, - FIX2(1.387039845));
742 tmp2 = MULTIPLY(d3, - FIX2(0.275899379));
743 tmp3 = MULTIPLY(d3, FIX(1.175875602));
750 /* d1 != 0, d3 == 0, d5 == 0, d7 == 0 */
751 tmp0 = MULTIPLY(d1, FIX2(0.275899379));
752 tmp1 = MULTIPLY(d1, FIX2(0.785694958));
753 tmp2 = MULTIPLY(d1, FIX(1.175875602));
754 tmp3 = MULTIPLY(d1, FIX2(1.387039845));
758 /* d1 == 0, d3 == 0, d5 == 0, d7 == 0 */
759 tmp0 = tmp1 = tmp2 = tmp3 = 0;
765 /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
767 dataptr[0] = (dctelem_t) DESCALE(tmp10 + tmp3, CONST_BITS-PASS1_BITS);
768 dataptr[7] = (dctelem_t) DESCALE(tmp10 - tmp3, CONST_BITS-PASS1_BITS);
769 dataptr[1] = (dctelem_t) DESCALE(tmp11 + tmp2, CONST_BITS-PASS1_BITS);
770 dataptr[6] = (dctelem_t) DESCALE(tmp11 - tmp2, CONST_BITS-PASS1_BITS);
771 dataptr[2] = (dctelem_t) DESCALE(tmp12 + tmp1, CONST_BITS-PASS1_BITS);
772 dataptr[5] = (dctelem_t) DESCALE(tmp12 - tmp1, CONST_BITS-PASS1_BITS);
773 dataptr[3] = (dctelem_t) DESCALE(tmp13 + tmp0, CONST_BITS-PASS1_BITS);
774 dataptr[4] = (dctelem_t) DESCALE(tmp13 - tmp0, CONST_BITS-PASS1_BITS);
776 dataptr += DCTSIZE; /* advance pointer to next row */
779 /* Pass 2: process columns. */
780 /* Note that we must descale the results by a factor of 8 == 2**3, */
781 /* and also undo the PASS1_BITS scaling. */
784 for (rowctr = DCTSIZE-1; rowctr >= 0; rowctr--)
786 /* Columns of zeroes can be exploited in the same way as we did with rows.
787 * However, the row calculation has created many nonzero AC terms, so the
788 * simplification applies less often (typically 5% to 10% of the time).
789 * On machines with very fast multiplication, it's possible that the
790 * test takes more time than it's worth. In that case this section
791 * may be commented out.
794 d0 = dataptr[DCTSIZE*0];
795 d1 = dataptr[DCTSIZE*1];
796 d2 = dataptr[DCTSIZE*2];
797 d3 = dataptr[DCTSIZE*3];
798 d4 = dataptr[DCTSIZE*4];
799 d5 = dataptr[DCTSIZE*5];
800 d6 = dataptr[DCTSIZE*6];
801 d7 = dataptr[DCTSIZE*7];
803 /* Even part: reverse the even part of the forward DCT. */
804 /* The rotator is sqrt(2)*c(-6). */
813 /* d0 != 0, d2 != 0, d4 != 0, d6 != 0 */
814 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
815 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
816 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
818 tmp0 = (d0 + d4) << CONST_BITS;
819 tmp1 = (d0 - d4) << CONST_BITS;
828 /* d0 == 0, d2 != 0, d4 != 0, d6 != 0 */
829 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
830 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
831 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
833 tmp0 = d4 << CONST_BITS;
838 tmp12 = -(tmp0 + tmp2);
845 /* d0 != 0, d2 == 0, d4 != 0, d6 != 0 */
846 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
847 tmp3 = MULTIPLY(d6, FIX(0.541196100));
849 tmp0 = (d0 + d4) << CONST_BITS;
850 tmp1 = (d0 - d4) << CONST_BITS;
859 /* d0 == 0, d2 == 0, d4 != 0, d6 != 0 */
860 tmp2 = MULTIPLY(d6, -FIX2(1.306562965));
861 tmp3 = MULTIPLY(d6, FIX(0.541196100));
863 tmp0 = d4 << CONST_BITS;
868 tmp12 = -(tmp0 + tmp2);
878 /* d0 != 0, d2 != 0, d4 == 0, d6 != 0 */
879 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
880 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
881 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
883 tmp0 = d0 << CONST_BITS;
892 /* d0 == 0, d2 != 0, d4 == 0, d6 != 0 */
893 z1 = MULTIPLY(d2 + d6, FIX(0.541196100));
894 tmp2 = z1 + MULTIPLY(d6, - FIX(1.847759065));
895 tmp3 = z1 + MULTIPLY(d2, FIX(0.765366865));
907 /* d0 != 0, d2 == 0, d4 == 0, d6 != 0 */
908 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
909 tmp3 = MULTIPLY(d6, FIX(0.541196100));
911 tmp0 = d0 << CONST_BITS;
920 /* d0 == 0, d2 == 0, d4 == 0, d6 != 0 */
921 tmp2 = MULTIPLY(d6, - FIX2(1.306562965));
922 tmp3 = MULTIPLY(d6, FIX(0.541196100));
939 /* d0 != 0, d2 != 0, d4 != 0, d6 == 0 */
940 tmp2 = MULTIPLY(d2, FIX(0.541196100));
941 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
943 tmp0 = (d0 + d4) << CONST_BITS;
944 tmp1 = (d0 - d4) << CONST_BITS;
953 /* d0 == 0, d2 != 0, d4 != 0, d6 == 0 */
954 tmp2 = MULTIPLY(d2, FIX(0.541196100));
955 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
957 tmp0 = d4 << CONST_BITS;
962 tmp12 = -(tmp0 + tmp2);
969 /* d0 != 0, d2 == 0, d4 != 0, d6 == 0 */
970 tmp10 = tmp13 = (d0 + d4) << CONST_BITS;
971 tmp11 = tmp12 = (d0 - d4) << CONST_BITS;
975 /* d0 == 0, d2 == 0, d4 != 0, d6 == 0 */
976 tmp10 = tmp13 = d4 << CONST_BITS;
977 tmp11 = tmp12 = -tmp10;
987 /* d0 != 0, d2 != 0, d4 == 0, d6 == 0 */
988 tmp2 = MULTIPLY(d2, FIX(0.541196100));
989 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
991 tmp0 = d0 << CONST_BITS;
1000 /* d0 == 0, d2 != 0, d4 == 0, d6 == 0 */
1001 tmp2 = MULTIPLY(d2, FIX(0.541196100));
1002 tmp3 = MULTIPLY(d2, (FIX(1.306562965) + .5));
1014 /* d0 != 0, d2 == 0, d4 == 0, d6 == 0 */
1015 tmp10 = tmp13 = tmp11 = tmp12 = d0 << CONST_BITS;
1019 /* d0 == 0, d2 == 0, d4 == 0, d6 == 0 */
1020 tmp10 = tmp13 = tmp11 = tmp12 = 0;
1026 /* Odd part per figure 8; the matrix is unitary and hence its
1027 * transpose is its inverse. i0..i3 are y7,y5,y3,y1 respectively.
1037 /* d1 != 0, d3 != 0, d5 != 0, d7 != 0 */
1042 z5 = MULTIPLY(z3 + z4, FIX(1.175875602));
1044 tmp0 = MULTIPLY(d7, FIX(0.298631336));
1045 tmp1 = MULTIPLY(d5, FIX(2.053119869));
1046 tmp2 = MULTIPLY(d3, FIX(3.072711026));
1047 tmp3 = MULTIPLY(d1, FIX(1.501321110));
1048 z1 = MULTIPLY(z1, - FIX(0.899976223));
1049 z2 = MULTIPLY(z2, - FIX(2.562915447));
1050 z3 = MULTIPLY(z3, - FIX(1.961570560));
1051 z4 = MULTIPLY(z4, - FIX(0.390180644));
1063 /* d1 == 0, d3 != 0, d5 != 0, d7 != 0 */
1066 z5 = MULTIPLY(z3 + d5, FIX(1.175875602));
1068 tmp0 = MULTIPLY(d7, FIX(0.298631336));
1069 tmp1 = MULTIPLY(d5, FIX(2.053119869));
1070 tmp2 = MULTIPLY(d3, FIX(3.072711026));
1071 z1 = MULTIPLY(d7, - FIX(0.899976223));
1072 z2 = MULTIPLY(z2, - FIX(2.562915447));
1073 z3 = MULTIPLY(z3, - FIX(1.961570560));
1074 z4 = MULTIPLY(d5, - FIX(0.390180644));
1089 /* d1 != 0, d3 == 0, d5 != 0, d7 != 0 */
1092 z5 = MULTIPLY(d7 + z4, FIX(1.175875602));
1094 tmp0 = MULTIPLY(d7, FIX(0.298631336));
1095 tmp1 = MULTIPLY(d5, FIX(2.053119869));
1096 tmp3 = MULTIPLY(d1, FIX(1.501321110));
1097 z1 = MULTIPLY(z1, - FIX(0.899976223));
1098 z2 = MULTIPLY(d5, - FIX(2.562915447));
1099 z3 = MULTIPLY(d7, - FIX(1.961570560));
1100 z4 = MULTIPLY(z4, - FIX(0.390180644));
1112 /* d1 == 0, d3 == 0, d5 != 0, d7 != 0 */
1113 z5 = MULTIPLY(d5 + d7, FIX(1.175875602));
1115 tmp0 = MULTIPLY(d7, - FIX2(0.601344887));
1116 tmp1 = MULTIPLY(d5, - FIX2(0.509795578));
1117 z1 = MULTIPLY(d7, - FIX(0.899976223));
1118 z3 = MULTIPLY(d7, - FIX(1.961570560));
1119 z2 = MULTIPLY(d5, - FIX(2.562915447));
1120 z4 = MULTIPLY(d5, - FIX(0.390180644));
1138 /* d1 != 0, d3 != 0, d5 == 0, d7 != 0 */
1141 z5 = MULTIPLY(z3 + d1, FIX(1.175875602));
1143 tmp0 = MULTIPLY(d7, FIX(0.298631336));
1144 tmp2 = MULTIPLY(d3, FIX(3.072711026));
1145 tmp3 = MULTIPLY(d1, FIX(1.501321110));
1146 z1 = MULTIPLY(z1, - FIX(0.899976223));
1147 z2 = MULTIPLY(d3, - FIX(2.562915447));
1148 z3 = MULTIPLY(z3, - FIX(1.961570560));
1149 z4 = MULTIPLY(d1, - FIX(0.390180644));
1161 /* d1 == 0, d3 != 0, d5 == 0, d7 != 0 */
1163 z5 = MULTIPLY(z3, FIX(1.175875602));
1165 tmp0 = MULTIPLY(d7, - FIX2(0.601344887));
1166 z1 = MULTIPLY(d7, - FIX(0.899976223));
1167 tmp2 = MULTIPLY(d3, FIX(0.509795579));
1168 z2 = MULTIPLY(d3, - FIX(2.562915447));
1169 z3 = MULTIPLY(z3, - FIX2(0.785694958));
1181 /* d1 != 0, d3 == 0, d5 == 0, d7 != 0 */
1183 z5 = MULTIPLY(z1, FIX(1.175875602));
1185 tmp0 = MULTIPLY(d7, - FIX2(1.662939224));
1186 tmp3 = MULTIPLY(d1, FIX2(1.111140466));
1187 z1 = MULTIPLY(z1, FIX2(0.275899379));
1188 z3 = MULTIPLY(d7, - FIX(1.961570560));
1189 z4 = MULTIPLY(d1, - FIX(0.390180644));
1198 /* d1 == 0, d3 == 0, d5 == 0, d7 != 0 */
1199 tmp0 = MULTIPLY(d7, - FIX2(1.387039845));
1200 tmp1 = MULTIPLY(d7, FIX(1.175875602));
1201 tmp2 = MULTIPLY(d7, - FIX2(0.785694958));
1202 tmp3 = MULTIPLY(d7, FIX2(0.275899379));
1215 /* d1 != 0, d3 != 0, d5 != 0, d7 == 0 */
1218 z5 = MULTIPLY(d3 + z4, FIX(1.175875602));
1220 tmp1 = MULTIPLY(d5, FIX(2.053119869));
1221 tmp2 = MULTIPLY(d3, FIX(3.072711026));
1222 tmp3 = MULTIPLY(d1, FIX(1.501321110));
1223 z1 = MULTIPLY(d1, - FIX(0.899976223));
1224 z2 = MULTIPLY(z2, - FIX(2.562915447));
1225 z3 = MULTIPLY(d3, - FIX(1.961570560));
1226 z4 = MULTIPLY(z4, - FIX(0.390180644));
1238 /* d1 == 0, d3 != 0, d5 != 0, d7 == 0 */
1240 z5 = MULTIPLY(z2, FIX(1.175875602));
1242 tmp1 = MULTIPLY(d5, FIX2(1.662939225));
1243 tmp2 = MULTIPLY(d3, FIX2(1.111140466));
1244 z2 = MULTIPLY(z2, - FIX2(1.387039845));
1245 z3 = MULTIPLY(d3, - FIX(1.961570560));
1246 z4 = MULTIPLY(d5, - FIX(0.390180644));
1258 /* d1 != 0, d3 == 0, d5 != 0, d7 == 0 */
1260 z5 = MULTIPLY(z4, FIX(1.175875602));
1262 tmp1 = MULTIPLY(d5, - FIX2(0.509795578));
1263 tmp3 = MULTIPLY(d1, FIX2(0.601344887));
1264 z1 = MULTIPLY(d1, - FIX(0.899976223));
1265 z2 = MULTIPLY(d5, - FIX(2.562915447));
1266 z4 = MULTIPLY(z4, FIX2(0.785694958));
1275 /* d1 == 0, d3 == 0, d5 != 0, d7 == 0 */
1276 tmp0 = MULTIPLY(d5, FIX(1.175875602));
1277 tmp1 = MULTIPLY(d5, FIX2(0.275899380));
1278 tmp2 = MULTIPLY(d5, - FIX2(1.387039845));
1279 tmp3 = MULTIPLY(d5, FIX2(0.785694958));
1289 /* d1 != 0, d3 != 0, d5 == 0, d7 == 0 */
1292 tmp2 = MULTIPLY(d3, - FIX(1.451774981));
1293 tmp3 = MULTIPLY(d1, (FIX(0.211164243) - 1));
1294 z1 = MULTIPLY(d1, FIX(1.061594337));
1295 z2 = MULTIPLY(d3, - FIX(2.172734803));
1296 z4 = MULTIPLY(z5, FIX(0.785694958));
1297 z5 = MULTIPLY(z5, FIX(1.175875602));
1306 /* d1 == 0, d3 != 0, d5 == 0, d7 == 0 */
1307 tmp0 = MULTIPLY(d3, - FIX2(0.785694958));
1308 tmp1 = MULTIPLY(d3, - FIX2(1.387039845));
1309 tmp2 = MULTIPLY(d3, - FIX2(0.275899379));
1310 tmp3 = MULTIPLY(d3, FIX(1.175875602));
1317 /* d1 != 0, d3 == 0, d5 == 0, d7 == 0 */
1318 tmp0 = MULTIPLY(d1, FIX2(0.275899379));
1319 tmp1 = MULTIPLY(d1, FIX2(0.785694958));
1320 tmp2 = MULTIPLY(d1, FIX(1.175875602));
1321 tmp3 = MULTIPLY(d1, FIX2(1.387039845));
1325 /* d1 == 0, d3 == 0, d5 == 0, d7 == 0 */
1326 tmp0 = tmp1 = tmp2 = tmp3 = 0;
1332 /* Final output stage: inputs are tmp10..tmp13, tmp0..tmp3 */
1334 dataptr[DCTSIZE*0] = (dctelem_t) DESCALE(tmp10 + tmp3,
1335 CONST_BITS+PASS1_BITS+3);
1336 dataptr[DCTSIZE*7] = (dctelem_t) DESCALE(tmp10 - tmp3,
1337 CONST_BITS+PASS1_BITS+3);
1338 dataptr[DCTSIZE*1] = (dctelem_t) DESCALE(tmp11 + tmp2,
1339 CONST_BITS+PASS1_BITS+3);
1340 dataptr[DCTSIZE*6] = (dctelem_t) DESCALE(tmp11 - tmp2,
1341 CONST_BITS+PASS1_BITS+3);
1342 dataptr[DCTSIZE*2] = (dctelem_t) DESCALE(tmp12 + tmp1,
1343 CONST_BITS+PASS1_BITS+3);
1344 dataptr[DCTSIZE*5] = (dctelem_t) DESCALE(tmp12 - tmp1,
1345 CONST_BITS+PASS1_BITS+3);
1346 dataptr[DCTSIZE*3] = (dctelem_t) DESCALE(tmp13 + tmp0,
1347 CONST_BITS+PASS1_BITS+3);
1348 dataptr[DCTSIZE*4] = (dctelem_t) DESCALE(tmp13 - tmp0,
1349 CONST_BITS+PASS1_BITS+3);
1351 dataptr++; /* advance pointer to next column */