~ubuntu-branches/ubuntu/karmic/fltk1.1/karmic

« back to all changes in this revision

Viewing changes to jpeg/jfdctflt.c

  • Committer: Bazaar Package Importer
  • Author(s): Aaron M. Ucko
  • Date: 2005-05-22 13:57:06 UTC
  • mfrom: (2.1.1 hoary)
  • Revision ID: james.westby@ubuntu.com-20050522135706-mchag24yf42lu7bu
Tags: 1.1.6-5
* Revert previous change, which seems to have been ineffective for some
  reason, in favor of commenting out the problematic Makefile rule
  altogether.  (Closes: #310151.)
* debian/control: Go back to specifying the URL as part of the
  description rather than via a non-standard field that doesn't seem to
  have caught on.  (Closes: #310240.)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/*
 
2
 * jfdctflt.c
 
3
 *
 
4
 * Copyright (C) 1994-1996, Thomas G. Lane.
 
5
 * This file is part of the Independent JPEG Group's software.
 
6
 * For conditions of distribution and use, see the accompanying README file.
 
7
 *
 
8
 * This file contains a floating-point implementation of the
 
9
 * forward DCT (Discrete Cosine Transform).
 
10
 *
 
11
 * This implementation should be more accurate than either of the integer
 
12
 * DCT implementations.  However, it may not give the same results on all
 
13
 * machines because of differences in roundoff behavior.  Speed will depend
 
14
 * on the hardware's floating point capacity.
 
15
 *
 
16
 * A 2-D DCT can be done by 1-D DCT on each row followed by 1-D DCT
 
17
 * on each column.  Direct algorithms are also available, but they are
 
18
 * much more complex and seem not to be any faster when reduced to code.
 
19
 *
 
20
 * This implementation is based on Arai, Agui, and Nakajima's algorithm for
 
21
 * scaled DCT.  Their original paper (Trans. IEICE E-71(11):1095) is in
 
22
 * Japanese, but the algorithm is described in the Pennebaker & Mitchell
 
23
 * JPEG textbook (see REFERENCES section in file README).  The following code
 
24
 * is based directly on figure 4-8 in P&M.
 
25
 * While an 8-point DCT cannot be done in less than 11 multiplies, it is
 
26
 * possible to arrange the computation so that many of the multiplies are
 
27
 * simple scalings of the final outputs.  These multiplies can then be
 
28
 * folded into the multiplications or divisions by the JPEG quantization
 
29
 * table entries.  The AA&N method leaves only 5 multiplies and 29 adds
 
30
 * to be done in the DCT itself.
 
31
 * The primary disadvantage of this method is that with a fixed-point
 
32
 * implementation, accuracy is lost due to imprecise representation of the
 
33
 * scaled quantization values.  However, that problem does not arise if
 
34
 * we use floating point arithmetic.
 
35
 */
 
36
 
 
37
#define JPEG_INTERNALS
 
38
#include "jinclude.h"
 
39
#include "jpeglib.h"
 
40
#include "jdct.h"               /* Private declarations for DCT subsystem */
 
41
 
 
42
#ifdef DCT_FLOAT_SUPPORTED
 
43
 
 
44
 
 
45
/*
 
46
 * This module is specialized to the case DCTSIZE = 8.
 
47
 */
 
48
 
 
49
#if DCTSIZE != 8
 
50
  Sorry, this code only copes with 8x8 DCTs. /* deliberate syntax err */
 
51
#endif
 
52
 
 
53
 
 
54
/*
 
55
 * Perform the forward DCT on one block of samples.
 
56
 */
 
57
 
 
58
GLOBAL(void)
 
59
jpeg_fdct_float (FAST_FLOAT * data)
 
60
{
 
61
  FAST_FLOAT tmp0, tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7;
 
62
  FAST_FLOAT tmp10, tmp11, tmp12, tmp13;
 
63
  FAST_FLOAT z1, z2, z3, z4, z5, z11, z13;
 
64
  FAST_FLOAT *dataptr;
 
65
  int ctr;
 
66
 
 
67
  /* Pass 1: process rows. */
 
68
 
 
69
  dataptr = data;
 
70
  for (ctr = DCTSIZE-1; ctr >= 0; ctr--) {
 
71
    tmp0 = dataptr[0] + dataptr[7];
 
72
    tmp7 = dataptr[0] - dataptr[7];
 
73
    tmp1 = dataptr[1] + dataptr[6];
 
74
    tmp6 = dataptr[1] - dataptr[6];
 
75
    tmp2 = dataptr[2] + dataptr[5];
 
76
    tmp5 = dataptr[2] - dataptr[5];
 
77
    tmp3 = dataptr[3] + dataptr[4];
 
78
    tmp4 = dataptr[3] - dataptr[4];
 
79
    
 
80
    /* Even part */
 
81
    
 
82
    tmp10 = tmp0 + tmp3;        /* phase 2 */
 
83
    tmp13 = tmp0 - tmp3;
 
84
    tmp11 = tmp1 + tmp2;
 
85
    tmp12 = tmp1 - tmp2;
 
86
    
 
87
    dataptr[0] = tmp10 + tmp11; /* phase 3 */
 
88
    dataptr[4] = tmp10 - tmp11;
 
89
    
 
90
    z1 = (tmp12 + tmp13) * ((FAST_FLOAT) 0.707106781); /* c4 */
 
91
    dataptr[2] = tmp13 + z1;    /* phase 5 */
 
92
    dataptr[6] = tmp13 - z1;
 
93
    
 
94
    /* Odd part */
 
95
 
 
96
    tmp10 = tmp4 + tmp5;        /* phase 2 */
 
97
    tmp11 = tmp5 + tmp6;
 
98
    tmp12 = tmp6 + tmp7;
 
99
 
 
100
    /* The rotator is modified from fig 4-8 to avoid extra negations. */
 
101
    z5 = (tmp10 - tmp12) * ((FAST_FLOAT) 0.382683433); /* c6 */
 
102
    z2 = ((FAST_FLOAT) 0.541196100) * tmp10 + z5; /* c2-c6 */
 
103
    z4 = ((FAST_FLOAT) 1.306562965) * tmp12 + z5; /* c2+c6 */
 
104
    z3 = tmp11 * ((FAST_FLOAT) 0.707106781); /* c4 */
 
105
 
 
106
    z11 = tmp7 + z3;            /* phase 5 */
 
107
    z13 = tmp7 - z3;
 
108
 
 
109
    dataptr[5] = z13 + z2;      /* phase 6 */
 
110
    dataptr[3] = z13 - z2;
 
111
    dataptr[1] = z11 + z4;
 
112
    dataptr[7] = z11 - z4;
 
113
 
 
114
    dataptr += DCTSIZE;         /* advance pointer to next row */
 
115
  }
 
116
 
 
117
  /* Pass 2: process columns. */
 
118
 
 
119
  dataptr = data;
 
120
  for (ctr = DCTSIZE-1; ctr >= 0; ctr--) {
 
121
    tmp0 = dataptr[DCTSIZE*0] + dataptr[DCTSIZE*7];
 
122
    tmp7 = dataptr[DCTSIZE*0] - dataptr[DCTSIZE*7];
 
123
    tmp1 = dataptr[DCTSIZE*1] + dataptr[DCTSIZE*6];
 
124
    tmp6 = dataptr[DCTSIZE*1] - dataptr[DCTSIZE*6];
 
125
    tmp2 = dataptr[DCTSIZE*2] + dataptr[DCTSIZE*5];
 
126
    tmp5 = dataptr[DCTSIZE*2] - dataptr[DCTSIZE*5];
 
127
    tmp3 = dataptr[DCTSIZE*3] + dataptr[DCTSIZE*4];
 
128
    tmp4 = dataptr[DCTSIZE*3] - dataptr[DCTSIZE*4];
 
129
    
 
130
    /* Even part */
 
131
    
 
132
    tmp10 = tmp0 + tmp3;        /* phase 2 */
 
133
    tmp13 = tmp0 - tmp3;
 
134
    tmp11 = tmp1 + tmp2;
 
135
    tmp12 = tmp1 - tmp2;
 
136
    
 
137
    dataptr[DCTSIZE*0] = tmp10 + tmp11; /* phase 3 */
 
138
    dataptr[DCTSIZE*4] = tmp10 - tmp11;
 
139
    
 
140
    z1 = (tmp12 + tmp13) * ((FAST_FLOAT) 0.707106781); /* c4 */
 
141
    dataptr[DCTSIZE*2] = tmp13 + z1; /* phase 5 */
 
142
    dataptr[DCTSIZE*6] = tmp13 - z1;
 
143
    
 
144
    /* Odd part */
 
145
 
 
146
    tmp10 = tmp4 + tmp5;        /* phase 2 */
 
147
    tmp11 = tmp5 + tmp6;
 
148
    tmp12 = tmp6 + tmp7;
 
149
 
 
150
    /* The rotator is modified from fig 4-8 to avoid extra negations. */
 
151
    z5 = (tmp10 - tmp12) * ((FAST_FLOAT) 0.382683433); /* c6 */
 
152
    z2 = ((FAST_FLOAT) 0.541196100) * tmp10 + z5; /* c2-c6 */
 
153
    z4 = ((FAST_FLOAT) 1.306562965) * tmp12 + z5; /* c2+c6 */
 
154
    z3 = tmp11 * ((FAST_FLOAT) 0.707106781); /* c4 */
 
155
 
 
156
    z11 = tmp7 + z3;            /* phase 5 */
 
157
    z13 = tmp7 - z3;
 
158
 
 
159
    dataptr[DCTSIZE*5] = z13 + z2; /* phase 6 */
 
160
    dataptr[DCTSIZE*3] = z13 - z2;
 
161
    dataptr[DCTSIZE*1] = z11 + z4;
 
162
    dataptr[DCTSIZE*7] = z11 - z4;
 
163
 
 
164
    dataptr++;                  /* advance pointer to next column */
 
165
  }
 
166
}
 
167
 
 
168
#endif /* DCT_FLOAT_SUPPORTED */