OpenCores
URL https://opencores.org/ocsvn/mb-jpeg/mb-jpeg/trunk

Subversion Repositories mb-jpeg

[/] [mb-jpeg/] [tags/] [STEP2_2b/] [bmp2jpg_mb/] [huffman.c] - Blame information for rev 37

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 37 quickwayne
#pragma argsused
2
/*
3
Only encoder
4
This version works correctly, it is tested with testcase.jpg
5
The translation into real huffman codes works.
6
Changed: If huffman wants to send 0xFFxx (FF in one byte) than there must be 0x00 inserted between FF and xx
7
possible fault in finish send:
8
-must it be filled up with zeros?          YES
9
-must it be filled up to one bye? or 2 byte? --> in this code there is filled up to 2 bytes, but I (joris) thinks this must be filled up to 1 byte.
10
 still dont know
11
- 24-11-05 code clean up
12
- 24-11-05 tables added for color
13
 
14
 
15
 
16
Block numbers:
17
Y = 0
18
cb =1
19
cr= 2
20
*/
21
//---------------------------------------------------------------------------
22
#include <stdio.h>
23
 
24
static unsigned int vlc_remaining;
25
static unsigned char vlc_amount_remaining;
26
static unsigned char dcvalue[4];   // 3 is enough
27
 
28
int vlc_init_start() {
29
 
30
       vlc_remaining=0x00;
31
       vlc_amount_remaining=0x00;
32
        memset(dcvalue, 0, 4);
33
        return 0;
34
 
35
}
36
 
37
#define vlc_output_byte(c)             put_char(c)
38
 
39
#ifdef __MULTI_TASK
40
 
41
void vlc_task() {
42
 
43
 
44
}
45
 
46
#endif
47
 
48
#ifdef __MULTI_PROCESSOR
49
 
50
int main() {
51
 
52
        for (;;) {
53
 
54
 
55
                }
56
 
57
}
58
 
59
#endif
60
 
61
void ConvertDCMagnitudeC(unsigned char magnitude,unsigned short int *out, unsigned short int *lenght)
62
{
63
        switch (magnitude) {
64
                case 0x00 : *out=0x0000; *lenght=2; break;
65
                case 0x01 : *out=0x0001; *lenght=2; break;
66
                case 0x02 : *out=0x0002; *lenght=2; break;
67
                case 0x03 : *out=0x0006; *lenght=3; break;
68
                case 0x04 : *out=0x000e; *lenght=4; break;
69
                case 0x05 : *out=0x001e; *lenght=5; break;
70
                case 0x06 : *out=0x003e; *lenght=6; break;
71
                case 0x07 : *out=0x007e; *lenght=7; break;
72
                case 0x08 : *out=0x00fe; *lenght=8; break;
73
                case 0x09 : *out=0x01fe; *lenght=9; break;
74
                case 0x0a : *out=0x03fe; *lenght=10; break;
75
                case 0x0b : *out=0x07fe; *lenght=11; break;
76
        }
77
}
78
 
79
//===========================================================================
80
void ConvertACMagnitudeC(unsigned char magnitude,unsigned short int *out, unsigned short int *lenght)
81
{
82
        switch (magnitude) {
83
case 0x00 :  *lenght=0x02; *out=0x0000; break; //1010
84
case 0x01 :  *lenght=0x02; *out=0x0001; break; //00
85
case 0x02 :  *lenght=0x03; *out=0x0004; break; //01
86
case 0x03 :  *lenght=0x04; *out=0x000a; break; //100
87
case 0x04 :  *lenght=0x05; *out=0x0018; break; //1011
88
case 0x05 :  *lenght=0x05; *out=0x0019; break; //11010
89
case 0x06 :  *lenght=0x06; *out=0x0038; break; //1111000
90
case 0x07 :  *lenght=0x07; *out=0x0078; break; //11111000
91
case 0x08 :  *lenght=0x09; *out=0x01f4; break; //1111110110
92
case 0x09 :  *lenght=0x0a; *out=0x03f6; break; //1111111110000010
93
case 0x0A :  *lenght=0x0c; *out=0x0ff4; break; //1111111110000011
94
case 0x11 :  *lenght=0x04; *out=0x000b; break; //1100
95
case 0x12 :  *lenght=0x06; *out=0x0039; break; //11011
96
case 0x13 :  *lenght=0x08; *out=0x00f6; break; //1111001
97
case 0x14 :  *lenght=0x09; *out=0x01f5; break; //111110110
98
case 0x15 :  *lenght=0x0b; *out=0x07f6; break; //11111110110
99
case 0x16 :  *lenght=0x0c; *out=0x0ff5; break; //1111111110000100
100
case 0x17 :  *lenght=0x10; *out=0xff88; break; //1111111110000101
101
case 0x18 :  *lenght=0x10; *out=0xff89; break; //1111111110000110
102
case 0x19 :  *lenght=0x10; *out=0xff8a; break; //1111111110000111
103
case 0x1A :  *lenght=0x10; *out=0xff8b; break; //1111111110001000
104
case 0x21 :  *lenght=0x05; *out=0x001a; break; //11100
105
case 0x22 :  *lenght=0x08; *out=0x00f7; break; //11111001
106
case 0x23 :  *lenght=0x0a; *out=0x03f7; break; //1111110111
107
case 0x24 :  *lenght=0x0c; *out=0x0ff6; break; //111111110100
108
case 0x25 :  *lenght=0x0f; *out=0x7fc2; break; //1111111110001001
109
case 0x26 :  *lenght=0x10; *out=0xff8c; break; //1111111110001010
110
case 0x27 :  *lenght=0x10; *out=0xff8d; break; //1111111110001011
111
case 0x28 :  *lenght=0x10; *out=0xff8e; break; //1111111110001100
112
case 0x29 :  *lenght=0x10; *out=0xff8f; break; //1111111110001101
113
case 0x2A :  *lenght=0x10; *out=0xff90; break; //1111111110001110
114
case 0x31 :  *lenght=0x05; *out=0x001b; break; //111010
115
case 0x32 :  *lenght=0x08; *out=0x00f8; break; //111110111
116
case 0x33 :  *lenght=0x0a; *out=0x03f8; break; //111111110101
117
case 0x34 :  *lenght=0x0c; *out=0x0ff7; break; //1111111110001111
118
case 0x35 :  *lenght=0x10; *out=0xff91; break; //1111111110010000
119
case 0x36 :  *lenght=0x10; *out=0xff92; break; //1111111110010001
120
case 0x37 :  *lenght=0x10; *out=0xff93; break; //1111111110010010
121
case 0x38 :  *lenght=0x10; *out=0xff94; break; //1111111110010011
122
case 0x39 :  *lenght=0x10; *out=0xff95; break; //1111111110010100
123
case 0x3A :  *lenght=0x10; *out=0xff96; break; //1111111110010101
124
case 0x41 :  *lenght=0x06; *out=0x003a; break; //111011
125
case 0x42 :  *lenght=0x09; *out=0x01f6; break; //1111111000
126
case 0x43 :  *lenght=0x10; *out=0xff97; break; //1111111110010110
127
case 0x44 :  *lenght=0x10; *out=0xff98; break; //1111111110010111
128
case 0x45 :  *lenght=0x10; *out=0xff99; break; //1111111110011000
129
case 0x46 :  *lenght=0x10; *out=0xff9a; break; //1111111110011001
130
case 0x47 :  *lenght=0x10; *out=0xff9b; break; //1111111110011010
131
case 0x48 :  *lenght=0x10; *out=0xff9c; break; //1111111110011011
132
case 0x49 :  *lenght=0x10; *out=0xff9d; break; //1111111110011100
133
case 0x4A :  *lenght=0x10; *out=0xff9e; break; //1111111110011101
134
case 0x51 :  *lenght=0x06; *out=0x003b; break; //1111010
135
case 0x52 :  *lenght=0x0a; *out=0x03f9; break; //11111110111
136
case 0x53 :  *lenght=0x10; *out=0xff9f; break; //1111111110011110
137
case 0x54 :  *lenght=0x10; *out=0xffa0; break; //1111111110011111
138
case 0x55 :  *lenght=0x10; *out=0xffa1; break; //1111111110100000
139
case 0x56 :  *lenght=0x10; *out=0xFFA2; break; //1111111110100001
140
case 0x57 :  *lenght=0x10; *out=0xFFA3; break; //1111111110100010
141
case 0x58 :  *lenght=0x10; *out=0xFFA4; break; //1111111110100011
142
case 0x59 :  *lenght=0x10; *out=0xFFA5; break; //1111111110100100
143
case 0x5A :  *lenght=0x10; *out=0xFFA6; break; //1111111110100101
144
case 0x61 :  *lenght=0x07; *out=0x0079; break; //1111011
145
case 0x62 :  *lenght=0x0b; *out=0x07f7; break; //111111110110
146
case 0x63 :  *lenght=0x10; *out=0xffa7; break; //1111111110100110
147
case 0x64 :  *lenght=0x10; *out=0xffa8; break; //1111111110100111
148
case 0x65 :  *lenght=0x10; *out=0xffa9; break; //1111111110101000
149
case 0x66 :  *lenght=0x10; *out=0xffaa; break; //1111111110101001
150
case 0x67 :  *lenght=0x10; *out=0xffab; break; //1111111110101010
151
case 0x68 :  *lenght=0x10; *out=0xFFAc; break; //1111111110101011
152
case 0x69 :  *lenght=0x10; *out=0xFFAf; break; //1111111110101100
153
case 0x6A :  *lenght=0x10; *out=0xFFAe; break; //1111111110101101
154
case 0x71 :  *lenght=0x07; *out=0x007a; break; //11111010
155
case 0x72 :  *lenght=0x0b; *out=0x07f8; break; //111111110111
156
case 0x73 :  *lenght=0x10; *out=0xffaf; break; //1111111110101110
157
case 0x74 :  *lenght=0x10; *out=0xffb0; break; //1111111110101111
158
case 0x75 :  *lenght=0x10; *out=0xFFB1; break; //1111111110110000
159
case 0x76 :  *lenght=0x10; *out=0xFFB2; break; //111111110110001
160
case 0x77 :  *lenght=0x10; *out=0xFFB3; break; //111111110110010
161
case 0x78 :  *lenght=0x10; *out=0xFFB4; break; //111111110110011
162
case 0x79 :  *lenght=0x10; *out=0xFFB5; break; //1111111110110100
163
case 0x7A :  *lenght=0x10; *out=0xFFB6; break; //1111111110110101
164
case 0x81 :  *lenght=0x08; *out=0x00f9; break; //111111000
165
case 0x82 :  *lenght=0x10; *out=0xffb7; break; //111111111000000
166
case 0x83 :  *lenght=0x10; *out=0xFFB8; break; //1111111110110110
167
case 0x84 :  *lenght=0x10; *out=0xFFB9; break; //1111111110110111
168
case 0x85 :  *lenght=0x10; *out=0xFFBa; break; //1111111110111000
169
case 0x86 :  *lenght=0x10; *out=0xFFBb; break; //1111111110111001
170
case 0x87 :  *lenght=0x10; *out=0xFFBc; break; //1111111110111010
171
case 0x88 :  *lenght=0x10; *out=0xFFBd; break; //1111111110111011
172
case 0x89 :  *lenght=0x10; *out=0xFFBe; break; //1111111110111100
173
case 0x8A :  *lenght=0x10; *out=0xFFBf; break; //1111111110111101
174
case 0x91 :  *lenght=0x09; *out=0x01f7; break; //111111001
175
case 0x92 :  *lenght=0x10; *out=0xffc0; break; //1111111110111110
176
case 0x93 :  *lenght=0x10; *out=0xffc1; break; //1111111110111111
177
case 0x94 :  *lenght=0x10; *out=0xFFC2; break; //1111111111000000
178
case 0x95 :  *lenght=0x10; *out=0xFFC3; break; //1111111111000001
179
case 0x96 :  *lenght=0x10; *out=0xFFC4; break; //1111111111000010
180
case 0x97 :  *lenght=0x10; *out=0xFFC5; break; //1111111111000011
181
case 0x98 :  *lenght=0x10; *out=0xFFC6; break; //1111111111000100
182
case 0x99 :  *lenght=0x10; *out=0xFFC7; break; //1111111111000101
183
case 0x9A :  *lenght=0x10; *out=0xFFC8; break; //1111111111000110
184
case 0xA1 :  *lenght=0x09; *out=0x01f8; break; //111111010
185
case 0xA2 :  *lenght=0x10; *out=0xffc9; break; //1111111111000111
186
case 0xA3 :  *lenght=0x10; *out=0xFFCa; break; //1111111111001000
187
case 0xA4 :  *lenght=0x10; *out=0xFFCb; break; //1111111111001001
188
case 0xA5 :  *lenght=0x10; *out=0xFFCc; break; //1111111111001010
189
case 0xA6 :  *lenght=0x10; *out=0xFFCd; break; //1111111111001011
190
case 0xA7 :  *lenght=0x10; *out=0xFFCe; break; //1111111111001100
191
case 0xA8 :  *lenght=0x10; *out=0xFFCf; break; //1111111111001101
192
case 0xA9 :  *lenght=0x10; *out=0xFFd0; break; //1111111111001110
193
case 0xAA :  *lenght=0x10; *out=0xFFd1; break; //1111111111001111
194
case 0xB1 :  *lenght=0x09; *out=0x01f9; break; //1111111001
195
case 0xB2 :  *lenght=0x10; *out=0xFFD2; break; //1111111111010000
196
case 0xB3 :  *lenght=0x10; *out=0xFFD3; break; //1111111111010001
197
case 0xB4 :  *lenght=0x10; *out=0xFFD4; break; //1111111111010010
198
case 0xB5 :  *lenght=0x10; *out=0xFFD5; break; //1111111111010011
199
case 0xB6 :  *lenght=0x10; *out=0xFFD6; break; //1111111111010100
200
case 0xB7 :  *lenght=0x10; *out=0xFFD7; break; //1111111111010101
201
case 0xB8 :  *lenght=0x10; *out=0xFFD8; break; //1111111111010110
202
case 0xB9 :  *lenght=0x10; *out=0xFFD9; break; //1111111111010111
203
case 0xBA :  *lenght=0x10; *out=0xFFDa; break; //1111111111011000
204
case 0xC1 :  *lenght=0x09; *out=0x01fa; break; //1111111010
205
case 0xC2 :  *lenght=0x10; *out=0xFFDb; break; //1111111111011001
206
case 0xC3 :  *lenght=0x10; *out=0xFFDc; break; //1111111111011010
207
case 0xC4 :  *lenght=0x10; *out=0xFFDd; break; //1111111111011011
208
case 0xC5 :  *lenght=0x10; *out=0xFFDe; break; //1111111111011100
209
case 0xC6 :  *lenght=0x10; *out=0xFFDf; break; //1111111111011101
210
case 0xC7 :  *lenght=0x10; *out=0xFFe0; break; //1111111111011110
211
case 0xC8 :  *lenght=0x10; *out=0xFFe1; break; //1111111111011111
212
case 0xC9 :  *lenght=0x10; *out=0xFFe2; break; //1111111111100000
213
case 0xCA :  *lenght=0x10; *out=0xFFe3; break; //1111111111100001
214
case 0xD1 :  *lenght=0x0b; *out=0x07f9; break; //11111111000
215
case 0xD2 :  *lenght=0x10; *out=0xFFE4; break; //1111111111100010
216
case 0xD3 :  *lenght=0x10; *out=0xFFE5; break; //1111111111100011
217
case 0xD4 :  *lenght=0x10; *out=0xFFE6; break; //1111111111100100
218
case 0xD5 :  *lenght=0x10; *out=0xFFE7; break; //1111111111100101
219
case 0xD6 :  *lenght=0x10; *out=0xFFE8; break; //1111111111100110
220
case 0xD7 :  *lenght=0x10; *out=0xFFE9; break; //1111111111100111
221
case 0xD8 :  *lenght=0x10; *out=0xFFEa; break; //1111111111101000
222
case 0xD9 :  *lenght=0x10; *out=0xFFEb; break; //1111111111101001
223
case 0xDA :  *lenght=0x10; *out=0xFFEc; break; //1111111111101010
224
case 0xE1 :  *lenght=0x0e; *out=0x3fe0; break; //1111111111101011
225
case 0xE2 :  *lenght=0x10; *out=0xffed; break; //1111111111101100
226
case 0xE3 :  *lenght=0x10; *out=0xFFEe; break; //1111111111101101
227
case 0xE4 :  *lenght=0x10; *out=0xFFEf; break; //1111111111101110
228
case 0xE5 :  *lenght=0x10; *out=0xFFf0; break; //1111111111101111
229
case 0xE6 :  *lenght=0x10; *out=0xFFF1; break; //1111111111110000
230
case 0xE7 :  *lenght=0x10; *out=0xFFF2; break; //1111111111110001
231
case 0xE8 :  *lenght=0x10; *out=0xFFF3; break; //1111111111110010
232
case 0xE9 :  *lenght=0x10; *out=0xFFF4; break; //1111111111110011
233
case 0xEA :  *lenght=0x10; *out=0xFFF5; break; //1111111111110100
234
case 0xF0 :  *lenght=0x0a; *out=0x03fa; break; //11111111001
235
case 0xF1 :  *lenght=0x0f; *out=0x7fc3; break; //1111111111110101
236
case 0xF2 :  *lenght=0x10; *out=0xFFF6; break; //1111111111110110
237
case 0xF3 :  *lenght=0x10; *out=0xFFF7; break; //1111111111110111
238
case 0xF4 :  *lenght=0x10; *out=0xFFF8; break; //1111111111111000
239
case 0xF5 :  *lenght=0x10; *out=0xFFF9; break; //1111111111111001
240
case 0xF6 :  *lenght=0x10; *out=0xFFFA; break; //1111111111111010
241
case 0xF7 :  *lenght=0x10; *out=0xFFFB; break; //1111111111111011
242
case 0xF8 :  *lenght=0x10; *out=0xFFFC; break; //1111111111111100
243
case 0xF9 :  *lenght=0x10; *out=0xFFFD; break; //1111111111111101
244
case 0xFA :  *lenght=0x10; *out=0xFFFE; break; //1111111111111110
245
#ifndef __MICROBLAZE
246
default : printf("WAARDE STAAT NIET IN TABEL!!!!!!!!!!!!!!!!!!!!\n");break;
247
#endif
248
        }
249
  //      printf("magnitude= %x out= %x lenght= %d \n",magnitude,*out,*lenght);
250
        return;
251
}
252
//===========================================================================
253
void ConvertDCMagnitudeY(unsigned char magnitude,unsigned short int *out, unsigned short int *lenght)
254
{
255
        switch (magnitude) {
256
                case 0x00 : *out=0x0000; *lenght=2; break;
257
                case 0x01 : *out=0x0002; *lenght=3; break;
258
                case 0x02 : *out=0x0003; *lenght=3; break;
259
                case 0x03 : *out=0x0004; *lenght=3; break;
260
                case 0x04 : *out=0x0005; *lenght=3; break;
261
                case 0x05 : *out=0x0006; *lenght=3; break;
262
                case 0x06 : *out=0x000e; *lenght=4; break;
263
                case 0x07 : *out=0x001e; *lenght=5; break;
264
                case 0x08 : *out=0x003e; *lenght=6; break;
265
                case 0x09 : *out=0x007e; *lenght=7; break;
266
                case 0x0a : *out=0x00fe; *lenght=8; break;
267
                case 0x0b : *out=0x01fe; *lenght=9; break;
268
        }
269
}
270
//===========================================================================
271
void ConvertACMagnitudeY(unsigned char magnitude,unsigned short int *out, unsigned short int *lenght)
272
{
273
        switch (magnitude) {
274
case 0x00 :  *lenght=4;  *out=0xFFFA; break; //1010
275
case 0x01 :  *lenght=2;  *out=0xFFF0; break; //00
276
case 0x02 :  *lenght=2;  *out=0xFFF1; break; //01
277
case 0x03 :  *lenght=3;  *out=0xFFF4; break; //100
278
case 0x04 :  *lenght=4;  *out=0xFFFB; break; //1011
279
case 0x05 :  *lenght=5;  *out=0xFFFA; break; //11010
280
case 0x06 :  *lenght=7;  *out=0xFFF8; break; //1111000
281
case 0x07 :  *lenght=8;  *out=0xFFF8; break; //11111000
282
case 0x08 :  *lenght=10; *out=0xFFF6; break; //1111110110
283
case 0x09 :  *lenght=16; *out=0xFF82; break; //1111111110000010
284
case 0x0A :  *lenght=16; *out=0xFF83; break; //1111111110000011
285
case 0x11 :  *lenght=4;  *out=0xFFFC; break; //1100
286
case 0x12 :  *lenght=5;  *out=0xFFFB; break; //11011
287
case 0x13 :  *lenght=7;  *out=0xFFF9; break; //1111001
288
case 0x14 :  *lenght=9;  *out=0xFFF6; break; //111110110
289
case 0x15 :  *lenght=11; *out=0xFFF6; break; //11111110110
290
case 0x16 :  *lenght=16; *out=0xFF84; break; //1111111110000100
291
case 0x17 :  *lenght=16; *out=0xFF85; break; //1111111110000101
292
case 0x18 :  *lenght=16; *out=0xFF86; break; //1111111110000110
293
case 0x19 :  *lenght=16; *out=0xFF87; break; //1111111110000111
294
case 0x1A :  *lenght=16; *out=0xFF88; break; //1111111110001000
295
case 0x21 :  *lenght=5;  *out=0xFFFC; break; //11100
296
case 0x22 :  *lenght=8;  *out=0xFFF9; break; //11111001
297
case 0x23 :  *lenght=10; *out=0xFFF7; break; //1111110111
298
case 0x24 :  *lenght=12; *out=0xFFF4; break; //111111110100
299
case 0x25 :  *lenght=16; *out=0xFF89; break; //1111111110001001
300
case 0x26 :  *lenght=16; *out=0xFF8A; break; //1111111110001010
301
case 0x27 :  *lenght=16; *out=0xFF8B; break; //1111111110001011
302
case 0x28 :  *lenght=16; *out=0xFF8C; break; //1111111110001100
303
case 0x29 :  *lenght=16; *out=0xFF8D; break; //1111111110001101
304
case 0x2A :  *lenght=16; *out=0xFF8E; break; //1111111110001110
305
case 0x31 :  *lenght=6;  *out=0xFFFA; break; //111010
306
case 0x32 :  *lenght=9;  *out=0xFFF7; break; //111110111
307
case 0x33 :  *lenght=12; *out=0xFFF5; break; //111111110101
308
case 0x34 :  *lenght=16; *out=0xFF8F; break; //1111111110001111
309
case 0x35 :  *lenght=16; *out=0xFF90; break; //1111111110010000
310
case 0x36 :  *lenght=16; *out=0xFF91; break; //1111111110010001
311
case 0x37 :  *lenght=16; *out=0xFF92; break; //1111111110010010
312
case 0x38 :  *lenght=16; *out=0xFF93; break; //1111111110010011
313
case 0x39 :  *lenght=16; *out=0xFF94; break; //1111111110010100
314
case 0x3A :  *lenght=16; *out=0xFF95; break; //1111111110010101
315
case 0x41 :  *lenght=6;  *out=0xFFFB; break; //111011
316
case 0x42 :  *lenght=10; *out=0xFFF8; break; //1111111000
317
case 0x43 :  *lenght=16; *out=0xFF96; break; //1111111110010110
318
case 0x44 :  *lenght=16; *out=0xFF97; break; //1111111110010111
319
case 0x45 :  *lenght=16; *out=0xFF98; break; //1111111110011000
320
case 0x46 :  *lenght=16; *out=0xFF99; break; //1111111110011001
321
case 0x47 :  *lenght=16; *out=0xFF9A; break; //1111111110011010
322
case 0x48 :  *lenght=16; *out=0xFF9B; break; //1111111110011011
323
case 0x49 :  *lenght=16; *out=0xFF9C; break; //1111111110011100
324
case 0x4A :  *lenght=16; *out=0xFF9D; break; //1111111110011101
325
case 0x51 :  *lenght=7;  *out=0xFFFA; break; //1111010
326
case 0x52 :  *lenght=11; *out=0xFFF7; break; //11111110111
327
case 0x53 :  *lenght=16; *out=0xFF9E; break; //1111111110011110
328
case 0x54 :  *lenght=16; *out=0xFF9F; break; //1111111110011111
329
case 0x55 :  *lenght=16; *out=0xFFA0; break; //1111111110100000
330
case 0x56 :  *lenght=16; *out=0xFFA1; break; //1111111110100001
331
case 0x57 :  *lenght=16; *out=0xFFA2; break; //1111111110100010
332
case 0x58 :  *lenght=16; *out=0xFFA3; break; //1111111110100011
333
case 0x59 :  *lenght=16; *out=0xFFA4; break; //1111111110100100
334
case 0x5A :  *lenght=16; *out=0xFFA5; break; //1111111110100101
335
case 0x61 :  *lenght=7;  *out=0xFFFB; break; //1111011
336
case 0x62 :  *lenght=12; *out=0xFFF6; break; //111111110110
337
case 0x63 :  *lenght=16; *out=0xFFA6; break; //1111111110100110
338
case 0x64 :  *lenght=16; *out=0xFFA7; break; //1111111110100111
339
case 0x65 :  *lenght=16; *out=0xFFA8; break; //1111111110101000
340
case 0x66 :  *lenght=16; *out=0xFFA9; break; //1111111110101001
341
case 0x67 :  *lenght=16; *out=0xFFAA; break; //1111111110101010
342
case 0x68 :  *lenght=16; *out=0xFFAB; break; //1111111110101011
343
case 0x69 :  *lenght=16; *out=0xFFAC; break; //1111111110101100
344
case 0x6A :  *lenght=16; *out=0xFFAD; break; //1111111110101101
345
case 0x71 :  *lenght=8;  *out=0xFFFA; break; //11111010
346
case 0x72 :  *lenght=12; *out=0xFFF7; break; //111111110111
347
case 0x73 :  *lenght=16; *out=0xFFAE; break; //1111111110101110
348
case 0x74 :  *lenght=16; *out=0xFFAF; break; //1111111110101111
349
case 0x75 :  *lenght=16; *out=0xFFB0; break; //1111111110110000
350
case 0x76 :  *lenght=16; *out=0xFFB1; break; //111111110110001
351
case 0x77 :  *lenght=16; *out=0xFFB2; break; //111111110110010
352
case 0x78 :  *lenght=16; *out=0xFFB3; break; //111111110110011
353
case 0x79 :  *lenght=16; *out=0xFFB4; break; //1111111110110100
354
case 0x7A :  *lenght=16; *out=0xFFB5; break; //1111111110110101
355
case 0x81 :  *lenght=9;  *out=0xFFF8; break; //111111000
356
case 0x82 :  *lenght=15; *out=0xFFC0; break; //111111111000000
357
case 0x83 :  *lenght=16; *out=0xFFB6; break; //1111111110110110
358
case 0x84 :  *lenght=16; *out=0xFFB7; break; //1111111110110111
359
case 0x85 :  *lenght=16; *out=0xFFB8; break; //1111111110111000
360
case 0x86 :  *lenght=16; *out=0xFFB9; break; //1111111110111001
361
case 0x87 :  *lenght=16; *out=0xFFBA; break; //1111111110111010
362
case 0x88 :  *lenght=16; *out=0xFFBB; break; //1111111110111011
363
case 0x89 :  *lenght=16; *out=0xFFBC; break; //1111111110111100
364
case 0x8A :  *lenght=16; *out=0xFFBD; break; //1111111110111101
365
case 0x91 :  *lenght=9;  *out=0xFFF9; break; //111111001
366
case 0x92 :  *lenght=16; *out=0xFFBE; break; //1111111110111110
367
case 0x93 :  *lenght=16; *out=0xFFBF; break; //1111111110111111
368
case 0x94 :  *lenght=16; *out=0xFFC0; break; //1111111111000000
369
case 0x95 :  *lenght=16; *out=0xFFC1; break; //1111111111000001
370
case 0x96 :  *lenght=16; *out=0xFFC2; break; //1111111111000010
371
case 0x97 :  *lenght=16; *out=0xFFC3; break; //1111111111000011
372
case 0x98 :  *lenght=16; *out=0xFFC4; break; //1111111111000100
373
case 0x99 :  *lenght=16; *out=0xFFC5; break; //1111111111000101
374
case 0x9A :  *lenght=16; *out=0xFFC6; break; //1111111111000110
375
case 0xA1 :  *lenght=9;  *out=0xFFFA; break; //111111010
376
case 0xA2 :  *lenght=16; *out=0xFFC7; break; //1111111111000111
377
case 0xA3 :  *lenght=16; *out=0xFFC8; break; //1111111111001000
378
case 0xA4 :  *lenght=16; *out=0xFFC9; break; //1111111111001001
379
case 0xA5 :  *lenght=16; *out=0xFFCA; break; //1111111111001010
380
case 0xA6 :  *lenght=16; *out=0xFFCB; break; //1111111111001011
381
case 0xA7 :  *lenght=16; *out=0xFFCC; break; //1111111111001100
382
case 0xA8 :  *lenght=16; *out=0xFFCD; break; //1111111111001101
383
case 0xA9 :  *lenght=16; *out=0xFFCE; break; //1111111111001110
384
case 0xAA :  *lenght=16; *out=0xFFCF; break; //1111111111001111
385
case 0xB1 :  *lenght=10; *out=0xFFF9; break; //1111111001
386
case 0xB2 :  *lenght=16; *out=0xFFD0; break; //1111111111010000
387
case 0xB3 :  *lenght=16; *out=0xFFD1; break; //1111111111010001
388
case 0xB4 :  *lenght=16; *out=0xFFD2; break; //1111111111010010
389
case 0xB5 :  *lenght=16; *out=0xFFD3; break; //1111111111010011
390
case 0xB6 :  *lenght=16; *out=0xFFD4; break; //1111111111010100
391
case 0xB7 :  *lenght=16; *out=0xFFD5; break; //1111111111010101
392
case 0xB8 :  *lenght=16; *out=0xFFD6; break; //1111111111010110
393
case 0xB9 :  *lenght=16; *out=0xFFD7; break; //1111111111010111
394
case 0xBA :  *lenght=16; *out=0xFFD8; break; //1111111111011000
395
case 0xC1 :  *lenght=10; *out=0xFFFA; break; //1111111010
396
case 0xC2 :  *lenght=16; *out=0xFFD9; break; //1111111111011001
397
case 0xC3 :  *lenght=16; *out=0xFFDA; break; //1111111111011010
398
case 0xC4 :  *lenght=16; *out=0xFFDB; break; //1111111111011011
399
case 0xC5 :  *lenght=16; *out=0xFFDC; break; //1111111111011100
400
case 0xC6 :  *lenght=16; *out=0xFFDD; break; //1111111111011101
401
case 0xC7 :  *lenght=16; *out=0xFFDE; break; //1111111111011110
402
case 0xC8 :  *lenght=16; *out=0xFFDF; break; //1111111111011111
403
case 0xC9 :  *lenght=16; *out=0xFFE0; break; //1111111111100000
404
case 0xCA :  *lenght=16; *out=0xFFE1; break; //1111111111100001
405
case 0xD1 :  *lenght=11; *out=0xFFF8; break; //11111111000
406
case 0xD2 :  *lenght=16; *out=0xFFE2; break; //1111111111100010
407
case 0xD3 :  *lenght=16; *out=0xFFE3; break; //1111111111100011
408
case 0xD4 :  *lenght=16; *out=0xFFE4; break; //1111111111100100
409
case 0xD5 :  *lenght=16; *out=0xFFE5; break; //1111111111100101
410
case 0xD6 :  *lenght=16; *out=0xFFE6; break; //1111111111100110
411
case 0xD7 :  *lenght=16; *out=0xFFE7; break; //1111111111100111
412
case 0xD8 :  *lenght=16; *out=0xFFE8; break; //1111111111101000
413
case 0xD9 :  *lenght=16; *out=0xFFE9; break; //1111111111101001
414
case 0xDA :  *lenght=16; *out=0xFFEA; break; //1111111111101010
415
case 0xE1 :  *lenght=16; *out=0xFFEB; break; //1111111111101011
416
case 0xE2 :  *lenght=16; *out=0xFFEC; break; //1111111111101100
417
case 0xE3 :  *lenght=16; *out=0xFFED; break; //1111111111101101
418
case 0xE4 :  *lenght=16; *out=0xFFEE; break; //1111111111101110
419
case 0xE5 :  *lenght=16; *out=0xFFEF; break; //1111111111101111
420
case 0xE6 :  *lenght=16; *out=0xFFF0; break; //1111111111110000
421
case 0xE7 :  *lenght=16; *out=0xFFF1; break; //1111111111110001
422
case 0xE8 :  *lenght=16; *out=0xFFF2; break; //1111111111110010
423
case 0xE9 :  *lenght=16; *out=0xFFF3; break; //1111111111110011
424
case 0xEA :  *lenght=16; *out=0xFFF4; break; //1111111111110100
425
case 0xF0 :  *lenght=11; *out=0xFFF9; break; //11111111001
426
case 0xF1 :  *lenght=16; *out=0xFFF5; break; //1111111111110101
427
case 0xF2 :  *lenght=16; *out=0xFFF6; break; //1111111111110110
428
case 0xF3 :  *lenght=16; *out=0xFFF7; break; //1111111111110111
429
case 0xF4 :  *lenght=16; *out=0xFFF8; break; //1111111111111000
430
case 0xF5 :  *lenght=16; *out=0xFFF9; break; //1111111111111001
431
case 0xF6 :  *lenght=16; *out=0xFFFA; break; //1111111111111010
432
case 0xF7 :  *lenght=16; *out=0xFFFB; break; //1111111111111011
433
case 0xF8 :  *lenght=16; *out=0xFFFC; break; //1111111111111100
434
case 0xF9 :  *lenght=16; *out=0xFFFD; break; //1111111111111101
435
case 0xFA :  *lenght=16; *out=0xFFFE; break; //1111111111111110
436
#ifndef __MICROBLAZE
437
default : printf("WAARDE STAAT NIET IN TABEL!!!!!!!!!!!!!!!!!!!!\n");break;
438
#endif
439
        }
440
  //      printf("magnitude= %x out= %x lenght= %d \n",magnitude,*out,*lenght);
441
        return;
442
}
443
//===========================================================================
444
char Extend (char additional, unsigned char magnitude)
445
{
446
        int vt= 1 << (magnitude-1);
447
        if ( additional < vt ) return (additional + (-1 << magnitude) + 1);
448
        else return additional;
449
}
450
//===========================================================================
451
void ReverseExtend (char value, unsigned char *magnitude, unsigned char *bits)
452
{
453
 //     printf("reverseextend value= %d\n",*magnitude);
454
        if (value >=0)
455
        {
456
                *bits=value;
457
        }
458
        else
459
        {
460
                value=-value;
461
                *bits=~value;
462
        }
463
        *magnitude=0;
464
        while (value !=0)
465
        {
466
                value>>=1;
467
                ++*magnitude;
468
        }
469
 //     printf("reverseextend magnitude= %d bits= %d",magnitude,bits);
470
        return;
471
}
472
//===========================================================================
473
void WriteRawBits16(unsigned char amount_bits, unsigned int bits)     //*remaining needs bo be more than 8 bits because 8 bits could be added and ther ecould already be up ot 7 bits in *remaining
474
// this function collects bits to send
475
// if there less than 16 bits collected, nothing is send and these bits are stored in *remaining. In *amount_remaining there is stated how much bits are stored in *remaining
476
// if more than 16 bits are collected, 16 bits are send and the remaining bits are stored again
477
{
478
        unsigned short int send;
479
        unsigned int mask;
480
        unsigned char send2;
481
        int count;
482
        mask=0x00;                                                              //init mask
483
        vlc_remaining=(vlc_remaining<<amount_bits);                                   //shift to make place for the new bits
484
        for (count=amount_bits; count>0; count--) mask=(mask<<1)|0x01;          //create mask for adding bit
485
        vlc_remaining=vlc_remaining | (bits&mask);                                    //add bits
486
        vlc_amount_remaining=vlc_amount_remaining + amount_bits;                      //change *amount_remaining to the correct new value
487
        if (vlc_amount_remaining >= 16)                                            //are there more than 16 bits in buffer, send 16 bits
488
        {
489
#ifndef __MICROBLAZE        
490
if (vlc_amount_remaining >= 32 ) printf("ERROR, more bits to send %d",vlc_amount_remaining);
491
#endif
492
                send=vlc_remaining>>(vlc_amount_remaining-16);                        //this value can be send/stored (in art this can be dony by selecting bits)
493
                send2=(send & 0xFF00) >>8;
494
                  vlc_output_byte(send2);
495
//                fwrite(&send2,1,1,file);
496
                if (send2==0xFF)
497
                {
498
                        send2=0x00;
499
                  vlc_output_byte(send2);
500
//                        fwrite(&send2,1,1,file);
501
                }
502
                send2=send & 0xFF;
503
                  vlc_output_byte(send2);
504
//                fwrite(&send2,1,1,file);
505
                if (send2==0xFF)
506
                {
507
                        send2=0x00;
508
                           vlc_output_byte(send2);
509
//                        fwrite(&send2,1,1,file);
510
                }
511
                vlc_amount_remaining=vlc_amount_remaining-16;                         //descrease by 16 because these are send
512
        }
513
        return;
514
}
515
//===========================================================================
516
void HuffmanEncodeFinishSend()
517
// There are still some bits left to send at the end of the 8x8 matrix (or maybe the file),
518
// the remaining bits are filled up with ones and send
519
// possible fault: -must it be filled up with ones?
520
{
521
        unsigned short int send;
522
        unsigned int mask;
523
        int  count;
524
        mask=0x00;                                                              //init mask
525
        if (vlc_amount_remaining >= 8)                                             //2 bytes to send, send first byte
526
        {
527
                send=vlc_remaining>>(vlc_amount_remaining-8);                         //shift so that first byte is ready to send
528
                  vlc_output_byte(send);
529
//                fwrite(&send,1,1,file);
530
                if (send==0xFF)                                                 //is this still needed????
531
                {
532
                        send=0x00;
533
                           vlc_output_byte(send);
534
//                        fwrite(&send,1,1,file);
535
                }
536
                vlc_amount_remaining=vlc_amount_remaining -8;                         // lower the value to the amount of bits that still needs to be send
537
        }
538
        if (vlc_amount_remaining >= 0)                                             //there is a last byte to send
539
        {
540
                send=vlc_remaining<<(8-vlc_amount_remaining);                         //shift the last bits to send to the front of the byte
541
                mask=0x00;                                                      //init mask
542
                for (count=(8-vlc_amount_remaining); count>0; count--) mask=(mask<<1)|0x01; //create mask to fill byte up with ones
543
                send=send | mask;                                               //add the ones to the byte
544
                vlc_output_byte(send);
545
//                fwrite(&send,1,1,file);
546
                vlc_amount_remaining=0x00;                                         //is this needed?
547
        }
548
        return;
549
}
550
//===========================================================================
551
void HuffmanEncodeUsingDCTable(unsigned char magnitude)
552
// Translate magnitude into needed data (from table) and send it
553
{
554
        unsigned char send;
555
        unsigned short int huffmancode, huffmanlengt;
556
        ConvertDCMagnitudeY(magnitude, &huffmancode, &huffmanlengt);
557
        WriteRawBits16(huffmanlengt,huffmancode);
558
        //printf("Write DC magnitude= %2x \n",magnitude);
559
        //WriteRawBits16(0x08,magnitude,remaining,amount_remaining, file);
560
        return;
561
}
562
//===========================================================================
563
void HuffmanEncodeUsingACTable(unsigned char mag)
564
// Translate magnitude into needed data (from table) and send it
565
{
566
        unsigned char send;
567
        unsigned short int huffmancode, huffmanlengt;
568
        ConvertACMagnitudeY(mag, &huffmancode, &huffmanlengt);
569
        WriteRawBits16(huffmanlengt,huffmancode);
570
        return;
571
}
572
//===========================================================================
573
char EncodeDataUnit(char dataunit[64], unsigned int color)
574
{
575
        char difference;
576
        unsigned char magnitude,zerorun,ii,ert;
577
        unsigned int bits;
578
         char last_dc_value;
579
                                         //init
580
  //    PrintMatrix(dataunit) ;
581
        last_dc_value = dcvalue[color];
582
        difference = dataunit[0] - last_dc_value;
583
        last_dc_value=dataunit[0];
584
        ReverseExtend(difference, &magnitude,&bits);
585
        HuffmanEncodeUsingDCTable(magnitude);
586
        WriteRawBits16(magnitude,bits);
587
        zerorun=0;
588
        ii=1;
589
        while ( ii < 64 )
590
        {
591
                if (dataunit[ii] != 0 )
592
                {
593
                        while ( zerorun >= 16 )
594
                        {
595
                                HuffmanEncodeUsingACTable(0xF0);
596
                                zerorun=zerorun-16;
597
                            //    printf("16 zeros:  %d\n",zerorun);
598
                        }
599
                        ReverseExtend(dataunit[ii],&magnitude,&bits);
600
                        ert= ((int)zerorun *16);                                     //ERROR !!!!!!!!!!!
601
                        ert=ert + magnitude;
602
                        HuffmanEncodeUsingACTable(ert);
603
                        WriteRawBits16(magnitude,bits);
604
                        zerorun=0;
605
                }
606
                else zerorun=zerorun+1;
607
                ii++;
608
        }
609
        if ( zerorun != 0 )
610
        {
611
                HuffmanEncodeUsingACTable(0x00);
612
//                printf("NUL DE REST IS NUL\n");
613
        }
614
 //       HuffmanEncodeFinishSend(remaining,amount_remaining,file);
615
        dcvalue[color] = last_dc_value;
616
        return 0;
617
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.