Annotation of /trunk/xvidcore/examples/xvid_bench.c

Revision 1743 - (view) (download)

1 :	edgomez	1382	/*****************************************************************************
2 :	Isibaar	225	*
3 :	edgomez	1382	* XVID MPEG-4 VIDEO CODEC
4 :			* - Unit tests and benches -
5 :	Isibaar	225	*
6 :	edgomez	1382	* Copyright(C) 2002 Pascal Massimino <skal@planet-d.net>
7 :	Isibaar	225	*
8 :	edgomez	1382	* This program is free software; you can redistribute it and/or modify
9 :			* it under the terms of the GNU General Public License as published by
10 :			* the Free Software Foundation; either version 2 of the License, or
11 :			* (at your option) any later version.
12 :	Isibaar	225	*
13 :	edgomez	1382	* This program is distributed in the hope that it will be useful,
14 :			* but WITHOUT ANY WARRANTY; without even the implied warranty of
15 :			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 :			* GNU General Public License for more details.
17 :	Isibaar	225	*
18 :	edgomez	1382	* You should have received a copy of the GNU General Public License
19 :			* along with this program; if not, write to the Free Software
20 :			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 :			*
22 :	Skal	1743	* $Id: xvid_bench.c,v 1.33 2006-10-30 11:21:42 Skal Exp $
23 :	edgomez	1382	*
24 :			****************************************************************************/
25 :	Isibaar	225
26 :	edgomez	1382	/*****************************************************************************
27 :	Isibaar	225	*
28 :			* 'Reference' output is at the end of file.
29 :			*
30 :	edgomez	1382	* compiles with something like:
31 :			* gcc -o xvid_bench xvid_bench.c -I../src/ -lxvidcore -lm
32 :	Isibaar	225	*
33 :	edgomez	1382	****************************************************************************/
34 :	Isibaar	225
35 :			#include <stdio.h>
36 :			#include <stdlib.h>
37 :	edgomez	1382	#include <string.h> /* for memset */
38 :	Isibaar	225	#include <assert.h>
39 :
40 :	suxen_drol	860	#ifndef WIN32
41 :	edgomez	1382	#include <sys/time.h> /* for gettimeofday */
42 :	suxen_drol	860	#else
43 :			#include <time.h>
44 :			#endif
45 :
46 :
47 :	Isibaar	225	#include "xvid.h"
48 :
49 :	edgomez	851	// inner guts
50 :	Isibaar	225	#include "dct/idct.h"
51 :			#include "dct/fdct.h"
52 :			#include "image/colorspace.h"
53 :			#include "image/interpolate8x8.h"
54 :			#include "utils/mem_transfer.h"
55 :	edgomez	1382	#include "quant/quant.h"
56 :	Isibaar	225	#include "motion/sad.h"
57 :			#include "utils/emms.h"
58 :			#include "utils/timer.h"
59 :			#include "quant/quant_matrix.c"
60 :			#include "bitstream/cbp.h"
61 :
62 :	Isibaar	262	#include <math.h>
63 :	suxen_drol	860
64 :			#ifndef M_PI
65 :			#define M_PI 3.14159265358979323846
66 :			#endif
67 :
68 :	Skal	1614	int speed_ref = 100; /* on slow machines, decrease this value */
69 :			int verbose = 0;
70 :			unsigned int cpu_mask;
71 :	Isibaar	225
72 :			/*********************************************************************
73 :			* misc
74 :			*********************************************************************/
75 :
76 :	edgomez	1382	/* returns time in micro-s*/
77 :	Isibaar	225	double gettime_usec()
78 :			{
79 :	suxen_drol	860	#ifndef WIN32
80 :	edgomez	1382	struct timeval tv;
81 :			gettimeofday(&tv, 0);
82 :			return tv.tv_sec*1.0e6 + tv.tv_usec;
83 :	suxen_drol	860	#else
84 :			clock_t clk;
85 :			clk = clock();
86 :	Skal	1613	return clk * 1000. / CLOCKS_PER_SEC; /* clock() returns time in Milliseconds */
87 :	suxen_drol	860	#endif
88 :	Isibaar	225	}
89 :
90 :	edgomez	1382	/* returns squared deviates (mean(vv)-mean(v)^2) of a 8x8 block /
91 :	Isibaar	225	double sqr_dev(uint8_t v[8*8])
92 :			{
93 :	edgomez	1382	double sum=0.;
94 :			double sum2=0.;
95 :			int n;
96 :			for (n=0;n<8*8;n++)
97 :			{
98 :			sum += v[n];
99 :			sum2 += v[n]*v[n];
100 :			}
101 :			sum2 /= n;
102 :			sum /= n;
103 :			return sum2-sum*sum;
104 :	Isibaar	225	}
105 :
106 :			/*********************************************************************
107 :			* cpu init
108 :			*********************************************************************/
109 :
110 :			typedef struct {
111 :	edgomez	1382	const char *name;
112 :			unsigned int cpu;
113 :	Isibaar	225	} CPU;
114 :
115 :	Skal	1621	CPU cpu_list[] = {
116 :			{ "PLAINC ", 0 },
117 :	edgomez	1382	#ifdef ARCH_IS_IA32
118 :	Skal	1621	{ "MMX ", XVID_CPU_MMX },
119 :			{ "MMXEXT ", XVID_CPU_MMXEXT \| XVID_CPU_MMX },
120 :			{ "SSE2 ", XVID_CPU_SSE2 \| XVID_CPU_MMX },
121 :			{ "3DNOW ", XVID_CPU_3DNOW },
122 :			{ "3DNOWE ", XVID_CPU_3DNOW \| XVID_CPU_3DNOWEXT },
123 :	edgomez	1382	#endif
124 :	edgomez	1412	#ifdef ARCH_IS_PPC
125 :	Skal	1621	{ "ALTIVEC", XVID_CPU_ALTIVEC },
126 :	edgomez	1412	#endif
127 :	edgomez	1586	#ifdef ARCH_IS_X86_64
128 :	Skal	1621	{ "X86_64 ", XVID_CPU_ASM},
129 :	edgomez	1586	#endif
130 :	Skal	1621	#ifdef ARCH_IS_IA64
131 :			// { "IA64 ", XVID_CPU_IA64 },
132 :	edgomez	1382	#endif
133 :	Skal	1621	// { "TSC ", XVID_CPU_TSC },
134 :			{ 0, 0 }
135 :			};
136 :	Isibaar	225
137 :
138 :			int init_cpu(CPU *cpu)
139 :			{
140 :	edgomez	1382	xvid_gbl_info_t xinfo;
141 :	Isibaar	225
142 :	edgomez	1382	/* Get the available CPU flags */
143 :			memset(&xinfo, 0, sizeof(xinfo));
144 :			xinfo.version = XVID_VERSION;
145 :			xvid_global(NULL, XVID_GBL_INFO, &xinfo, NULL);
146 :
147 :			/* Are we trying to test a subset of the host CPU features */
148 :			if ((xinfo.cpu_flags & cpu->cpu) == cpu->cpu) {
149 :			int xerr;
150 :			xvid_gbl_init_t xinit;
151 :			memset(&xinit, 0, sizeof(xinit));
152 :			xinit.cpu_flags = cpu->cpu \| XVID_CPU_FORCE;
153 :			xinit.version = XVID_VERSION;
154 :			xerr = xvid_global(NULL, XVID_GBL_INIT, &xinit, NULL);
155 :			if (xerr==XVID_ERR_FAIL) {
156 :			/* libxvidcore failed to init */
157 :			return 0;
158 :			}
159 :			} else {
160 :			/* The host CPU doesn't support some required feature for this test */
161 :			return(0);
162 :			}
163 :			return 1;
164 :	Isibaar	225	}
165 :
166 :	edgomez	1382	#define CRC32_REMAINDER 0xCBF43926
167 :			#define CRC32_INITIAL 0xffffffff
168 :
169 :			#define DO1(c, crc) ((crc) = crc32tab[((unsigned int)((crc)>>24) ^ (*c++)) & 0xff] ^ ((crc) << 8))
170 :			#define DO2(c, crc) DO1(c, crc); DO1(c, crc);
171 :			#define DO4(c, crc) DO2(c, crc); DO2(c, crc);
172 :			#define DO8(c, crc) DO4(c, crc); DO4(c, crc);
173 :
174 :			/******************************************************************************
175 :			* Precomputed AAL5 CRC32 lookup table
176 :			******************************************************************************/
177 :
178 :			static unsigned long crc32tab[256] = {
179 :
180 :			0x00000000L, 0x04C11DB7L, 0x09823B6EL, 0x0D4326D9L,
181 :			0x130476DCL, 0x17C56B6BL, 0x1A864DB2L, 0x1E475005L,
182 :			0x2608EDB8L, 0x22C9F00FL, 0x2F8AD6D6L, 0x2B4BCB61L,
183 :			0x350C9B64L, 0x31CD86D3L, 0x3C8EA00AL, 0x384FBDBDL,
184 :			0x4C11DB70L, 0x48D0C6C7L, 0x4593E01EL, 0x4152FDA9L,
185 :			0x5F15ADACL, 0x5BD4B01BL, 0x569796C2L, 0x52568B75L,
186 :			0x6A1936C8L, 0x6ED82B7FL, 0x639B0DA6L, 0x675A1011L,
187 :			0x791D4014L, 0x7DDC5DA3L, 0x709F7B7AL, 0x745E66CDL,
188 :			0x9823B6E0L, 0x9CE2AB57L, 0x91A18D8EL, 0x95609039L,
189 :			0x8B27C03CL, 0x8FE6DD8BL, 0x82A5FB52L, 0x8664E6E5L,
190 :			0xBE2B5B58L, 0xBAEA46EFL, 0xB7A96036L, 0xB3687D81L,
191 :			0xAD2F2D84L, 0xA9EE3033L, 0xA4AD16EAL, 0xA06C0B5DL,
192 :			0xD4326D90L, 0xD0F37027L, 0xDDB056FEL, 0xD9714B49L,
193 :			0xC7361B4CL, 0xC3F706FBL, 0xCEB42022L, 0xCA753D95L,
194 :			0xF23A8028L, 0xF6FB9D9FL, 0xFBB8BB46L, 0xFF79A6F1L,
195 :			0xE13EF6F4L, 0xE5FFEB43L, 0xE8BCCD9AL, 0xEC7DD02DL,
196 :			0x34867077L, 0x30476DC0L, 0x3D044B19L, 0x39C556AEL,
197 :			0x278206ABL, 0x23431B1CL, 0x2E003DC5L, 0x2AC12072L,
198 :			0x128E9DCFL, 0x164F8078L, 0x1B0CA6A1L, 0x1FCDBB16L,
199 :			0x018AEB13L, 0x054BF6A4L, 0x0808D07DL, 0x0CC9CDCAL,
200 :			0x7897AB07L, 0x7C56B6B0L, 0x71159069L, 0x75D48DDEL,
201 :			0x6B93DDDBL, 0x6F52C06CL, 0x6211E6B5L, 0x66D0FB02L,
202 :			0x5E9F46BFL, 0x5A5E5B08L, 0x571D7DD1L, 0x53DC6066L,
203 :			0x4D9B3063L, 0x495A2DD4L, 0x44190B0DL, 0x40D816BAL,
204 :			0xACA5C697L, 0xA864DB20L, 0xA527FDF9L, 0xA1E6E04EL,
205 :			0xBFA1B04BL, 0xBB60ADFCL, 0xB6238B25L, 0xB2E29692L,
206 :			0x8AAD2B2FL, 0x8E6C3698L, 0x832F1041L, 0x87EE0DF6L,
207 :			0x99A95DF3L, 0x9D684044L, 0x902B669DL, 0x94EA7B2AL,
208 :			0xE0B41DE7L, 0xE4750050L, 0xE9362689L, 0xEDF73B3EL,
209 :			0xF3B06B3BL, 0xF771768CL, 0xFA325055L, 0xFEF34DE2L,
210 :			0xC6BCF05FL, 0xC27DEDE8L, 0xCF3ECB31L, 0xCBFFD686L,
211 :			0xD5B88683L, 0xD1799B34L, 0xDC3ABDEDL, 0xD8FBA05AL,
212 :			0x690CE0EEL, 0x6DCDFD59L, 0x608EDB80L, 0x644FC637L,
213 :			0x7A089632L, 0x7EC98B85L, 0x738AAD5CL, 0x774BB0EBL,
214 :			0x4F040D56L, 0x4BC510E1L, 0x46863638L, 0x42472B8FL,
215 :			0x5C007B8AL, 0x58C1663DL, 0x558240E4L, 0x51435D53L,
216 :			0x251D3B9EL, 0x21DC2629L, 0x2C9F00F0L, 0x285E1D47L,
217 :			0x36194D42L, 0x32D850F5L, 0x3F9B762CL, 0x3B5A6B9BL,
218 :			0x0315D626L, 0x07D4CB91L, 0x0A97ED48L, 0x0E56F0FFL,
219 :			0x1011A0FAL, 0x14D0BD4DL, 0x19939B94L, 0x1D528623L,
220 :			0xF12F560EL, 0xF5EE4BB9L, 0xF8AD6D60L, 0xFC6C70D7L,
221 :			0xE22B20D2L, 0xE6EA3D65L, 0xEBA91BBCL, 0xEF68060BL,
222 :			0xD727BBB6L, 0xD3E6A601L, 0xDEA580D8L, 0xDA649D6FL,
223 :			0xC423CD6AL, 0xC0E2D0DDL, 0xCDA1F604L, 0xC960EBB3L,
224 :			0xBD3E8D7EL, 0xB9FF90C9L, 0xB4BCB610L, 0xB07DABA7L,
225 :			0xAE3AFBA2L, 0xAAFBE615L, 0xA7B8C0CCL, 0xA379DD7BL,
226 :			0x9B3660C6L, 0x9FF77D71L, 0x92B45BA8L, 0x9675461FL,
227 :			0x8832161AL, 0x8CF30BADL, 0x81B02D74L, 0x857130C3L,
228 :			0x5D8A9099L, 0x594B8D2EL, 0x5408ABF7L, 0x50C9B640L,
229 :			0x4E8EE645L, 0x4A4FFBF2L, 0x470CDD2BL, 0x43CDC09CL,
230 :			0x7B827D21L, 0x7F436096L, 0x7200464FL, 0x76C15BF8L,
231 :			0x68860BFDL, 0x6C47164AL, 0x61043093L, 0x65C52D24L,
232 :			0x119B4BE9L, 0x155A565EL, 0x18197087L, 0x1CD86D30L,
233 :			0x029F3D35L, 0x065E2082L, 0x0B1D065BL, 0x0FDC1BECL,
234 :			0x3793A651L, 0x3352BBE6L, 0x3E119D3FL, 0x3AD08088L,
235 :			0x2497D08DL, 0x2056CD3AL, 0x2D15EBE3L, 0x29D4F654L,
236 :			0xC5A92679L, 0xC1683BCEL, 0xCC2B1D17L, 0xC8EA00A0L,
237 :			0xD6AD50A5L, 0xD26C4D12L, 0xDF2F6BCBL, 0xDBEE767CL,
238 :			0xE3A1CBC1L, 0xE760D676L, 0xEA23F0AFL, 0xEEE2ED18L,
239 :			0xF0A5BD1DL, 0xF464A0AAL, 0xF9278673L, 0xFDE69BC4L,
240 :			0x89B8FD09L, 0x8D79E0BEL, 0x803AC667L, 0x84FBDBD0L,
241 :			0x9ABC8BD5L, 0x9E7D9662L, 0x933EB0BBL, 0x97FFAD0CL,
242 :			0xAFB010B1L, 0xAB710D06L, 0xA6322BDFL, 0xA2F33668L,
243 :			0xBCB4666DL, 0xB8757BDAL, 0xB5365D03L, 0xB1F740B4L
244 :
245 :			};
246 :
247 :			uint32_t
248 :	Skal	1614	calc_crc(uint8_t *mem, int len, uint32_t crc)
249 :	edgomez	1382	{
250 :			while( len >= 8) {
251 :			DO8(mem, crc);
252 :			len -= 8;
253 :			}
254 :
255 :			while( len ) {
256 :			DO1(mem, crc);
257 :			len--;
258 :			}
259 :
260 :	Skal	1614	return crc;
261 :	edgomez	1382	}
262 :
263 :	Skal	1621	void byte_swap(uint8_t *mem, int len, int element_size) {
264 :			#ifdef ARCH_IS_BIG_ENDIAN
265 :			int i;
266 :
267 :			if(element_size == 1) {
268 :			/* No need to swap */
269 :			} else if(element_size == 2) {
270 :			uint8_t temp[2];
271 :
272 :			for(i=0; i < (len/2); i++ ) {
273 :			temp[0] = mem[0];
274 :			temp[1] = mem[1];
275 :			mem[0] = temp[1];
276 :			mem[1] = temp[0];
277 :
278 :			mem += 2;
279 :			}
280 :			} else if(element_size == 4) {
281 :			uint8_t temp[4];
282 :
283 :			for(i=0; i < (len/4); i++ ) {
284 :			temp[0] = mem[0];
285 :			temp[1] = mem[1];
286 :			temp[2] = mem[2];
287 :			temp[3] = mem[3];
288 :			mem[0] = temp[3];
289 :			mem[1] = temp[2];
290 :			mem[2] = temp[1];
291 :			mem[3] = temp[0];
292 :
293 :			mem += 4;
294 :			}
295 :			} else {
296 :			printf("ERROR: byte_swap unsupported element_size(%u)\n", element_size);
297 :			}
298 :			#endif
299 :			}
300 :
301 :	Isibaar	225	/*********************************************************************
302 :			* test DCT
303 :			*********************************************************************/
304 :
305 :			#define ABS(X) ((X)<0 ? -(X) : (X))
306 :
307 :			void test_dct()
308 :			{
309 :	edgomez	1382	const int nb_tests = 300*speed_ref;
310 :			int tst;
311 :			CPU *cpu;
312 :			int i;
313 :			DECLARE_ALIGNED_MATRIX(iDst0, 8, 8, short, 16);
314 :			DECLARE_ALIGNED_MATRIX(iDst, 8, 8, short, 16);
315 :			DECLARE_ALIGNED_MATRIX(fDst, 8, 8, short, 16);
316 :			double overhead;
317 :	Isibaar	225
318 :	edgomez	1382	printf( "\n ===== test fdct/idct =====\n" );
319 :	Isibaar	225
320 :	edgomez	1382	for(i=0; i<88; ++i) iDst0[i] = (i7-i*i) & 0x7f;
321 :			overhead = gettime_usec();
322 :			for(tst=0; tst<nb_tests; ++tst)
323 :			{
324 :			for(i=0; i<8*8; ++i) fDst[i] = iDst0[i];
325 :			for(i=0; i<8*8; ++i) iDst[i] = fDst[i];
326 :			}
327 :			overhead = gettime_usec() - overhead;
328 :	Isibaar	225
329 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
330 :			{
331 :			double t, PSNR, MSE;
332 :	Isibaar	225
333 :	edgomez	1382	if (!init_cpu(cpu))
334 :			continue;
335 :	Isibaar	225
336 :	edgomez	1382	t = gettime_usec();
337 :			emms();
338 :			for(tst=0; tst<nb_tests; ++tst)
339 :			{
340 :			for(i=0; i<8*8; ++i) fDst[i] = iDst0[i];
341 :			fdct(fDst);
342 :			for(i=0; i<8*8; ++i) iDst[i] = fDst[i];
343 :			idct(iDst);
344 :			}
345 :			emms();
346 :			t = (gettime_usec() - t - overhead) / nb_tests;
347 :			MSE = 0.;
348 :			for(i=0; i<8*8; ++i) {
349 :			double delta = 1.0*(iDst[i] - iDst0[i]);
350 :			MSE += delta*delta;
351 :			}
352 :			PSNR = (MSE==0.) ? 1.e6 : -4.3429448*log( MSE/64. );
353 :			printf( "%s - %.3f usec PSNR=%.3f MSE=%.3f %s\n",
354 :			cpu->name, t, PSNR, MSE,
355 :			(ABS(MSE)>=64)? "\| ERROR" :"");
356 :			}
357 :	Isibaar	225	}
358 :
359 :			/*********************************************************************
360 :			* test SAD
361 :			*********************************************************************/
362 :
363 :			void test_sad()
364 :			{
365 :	edgomez	1382	const int nb_tests = 2000*speed_ref;
366 :			int tst;
367 :			CPU *cpu;
368 :			int i;
369 :			DECLARE_ALIGNED_MATRIX(Cur, 16, 16, uint8_t, 16);
370 :			DECLARE_ALIGNED_MATRIX(Ref1, 16, 16, uint8_t, 16);
371 :			DECLARE_ALIGNED_MATRIX(Ref2, 16, 16, uint8_t, 16);
372 :	Isibaar	225
373 :	edgomez	1382	printf( "\n ====== test SAD ======\n" );
374 :			for(i=0; i<16*16;++i) {
375 :			Cur[i] = (i/5) ^ 0x05;
376 :			Ref1[i] = (i + 0x0b) & 0xff;
377 :			Ref2[i] = i ^ 0x76;
378 :			}
379 :	Isibaar	225
380 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
381 :			{
382 :			double t;
383 :			uint32_t s;
384 :			if (!init_cpu(cpu))
385 :			continue;
386 :	Isibaar	225
387 :	edgomez	1382	t = gettime_usec();
388 :			emms();
389 :			for(tst=0; tst<nb_tests; ++tst) s = sad8(Cur, Ref1, 16);
390 :			emms();
391 :			t = (gettime_usec() - t) / nb_tests;
392 :			printf("%s - sad8 %.3f usec sad=%d %s\n",
393 :			cpu->name, t, s,
394 :			(s!=3776)?"\| ERROR": "" );
395 :	Isibaar	225
396 :	edgomez	1382	t = gettime_usec();
397 :			emms();
398 :			for(tst=0; tst<nb_tests; ++tst) s = sad16(Cur, Ref1, 16, -1);
399 :			emms();
400 :			t = (gettime_usec() - t) / nb_tests;
401 :			printf("%s - sad16 %.3f usec sad=%d %s\n",
402 :			cpu->name, t, s,
403 :			(s!=27214)?"\| ERROR": "" );
404 :	Isibaar	225
405 :	edgomez	1382	t = gettime_usec();
406 :			emms();
407 :			for(tst=0; tst<nb_tests; ++tst) s = sad16bi(Cur, Ref1, Ref2, 16);
408 :			emms();
409 :			t = (gettime_usec() - t) / nb_tests;
410 :			printf( "%s - sad16bi %.3f usec sad=%d %s\n",
411 :			cpu->name, t, s,
412 :			(s!=26274)?"\| ERROR": "" );
413 :	chl	898
414 :	edgomez	1382	t = gettime_usec();
415 :			emms();
416 :			for(tst=0; tst<nb_tests; ++tst) s = dev16(Cur, 16);
417 :			emms();
418 :			t = (gettime_usec() - t) / nb_tests;
419 :			printf( "%s - dev16 %.3f usec sad=%d %s\n",
420 :			cpu->name, t, s,
421 :			(s!=3344)?"\| ERROR": "" );
422 :	Isibaar	225
423 :	edgomez	1382	printf( " --- \n" );
424 :			}
425 :	Isibaar	225	}
426 :
427 :			/*********************************************************************
428 :			* test interpolation
429 :			*********************************************************************/
430 :
431 :			#define ENTER \
432 :	edgomez	1382	for(i=0; i<16*8; ++i) Dst[i] = 0; \
433 :			t = gettime_usec(); \
434 :			emms();
435 :	Isibaar	225
436 :			#define LEAVE \
437 :	edgomez	1382	emms(); \
438 :			t = (gettime_usec() - t) / nb_tests; \
439 :			iCrc = calc_crc((uint8_t*)Dst, sizeof(Dst), CRC32_INITIAL)
440 :	Isibaar	225
441 :			#define TEST_MB(FUNC, R) \
442 :	edgomez	1382	ENTER \
443 :			for(tst=0; tst<nb_tests; ++tst) (FUNC)(Dst, Src0, 16, (R)); \
444 :			LEAVE
445 :	Isibaar	225
446 :			#define TEST_MB2(FUNC) \
447 :	edgomez	1382	ENTER \
448 :			for(tst=0; tst<nb_tests; ++tst) (FUNC)(Dst, Src0, 16); \
449 :			LEAVE
450 :	Isibaar	225
451 :
452 :			void test_mb()
453 :			{
454 :	edgomez	1382	const int nb_tests = 2000*speed_ref;
455 :			CPU *cpu;
456 :			const uint8_t Src0[16*9] = {
457 :			/* try to have every possible combinaison of rounding... */
458 :			0, 0, 1, 0, 2, 0, 3, 0, 4 ,0,0,0, 0,0,0,0,
459 :			0, 1, 1, 1, 2, 1, 3, 1, 3 ,0,0,0, 0,0,0,0,
460 :			0, 2, 1, 2, 2, 2, 3, 2, 2 ,0,0,0, 0,0,0,0,
461 :			0, 3, 1, 3, 2, 3, 3, 3, 1 ,0,0,0, 0,0,0,0,
462 :			1, 3, 0, 2, 1, 0, 2, 3, 4 ,0,0,0, 0,0,0,0,
463 :			2, 2, 1, 2, 0, 1, 3, 5, 3 ,0,0,0, 0,0,0,0,
464 :			3, 1, 2, 3, 1, 2, 2, 6, 2 ,0,0,0, 0,0,0,0,
465 :			1, 0, 1, 3, 0, 3, 1, 6, 1 ,0,0,0, 0,0,0,0,
466 :			4, 3, 2, 1, 2, 3, 4, 0, 3 ,0,0,0, 0,0,0,0
467 :			};
468 :			uint8_t Dst[16*8] = {0};
469 :	Isibaar	225
470 :	edgomez	1382	printf( "\n === test block motion ===\n" );
471 :	Isibaar	225
472 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
473 :			{
474 :			double t;
475 :			int tst, i, iCrc;
476 :	Isibaar	225
477 :	edgomez	1382	if (!init_cpu(cpu))
478 :			continue;
479 :	Isibaar	225
480 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_h, 0);
481 :			printf("%s - interp- h-round0 %.3f usec crc32=0x%08x %s\n",
482 :			cpu->name, t, iCrc,
483 :			(iCrc!=0x115381ba)?"\| ERROR": "" );
484 :	Isibaar	225
485 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_h, 1);
486 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
487 :			cpu->name, t, iCrc,
488 :			(iCrc!=0x2b1f528f)?"\| ERROR": "" );
489 :	Isibaar	225
490 :
491 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_v, 0);
492 :			printf("%s - interp- v-round0 %.3f usec crc32=0x%08x %s\n",
493 :			cpu->name, t, iCrc,
494 :			(iCrc!=0x423cdcc7)?"\| ERROR": "" );
495 :	Isibaar	225
496 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_v, 1);
497 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
498 :			cpu->name, t, iCrc,
499 :			(iCrc!=0x42202efe)?"\| ERROR": "" );
500 :	Isibaar	225
501 :
502 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_hv, 0);
503 :			printf("%s - interp-hv-round0 %.3f usec crc32=0x%08x %s\n",
504 :			cpu->name, t, iCrc,
505 :			(iCrc!=0xd198d387)?"\| ERROR": "" );
506 :	Isibaar	225
507 :	edgomez	1382	TEST_MB(interpolate8x8_halfpel_hv, 1);
508 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
509 :			cpu->name, t, iCrc,
510 :			(iCrc!=0x9ecfd921)?"\| ERROR": "" );
511 :	Isibaar	225
512 :	Isibaar	262
513 :	edgomez	1382	/* this is a new function, as of 06.06.2002 */
514 :	Isibaar	262	#if 0
515 :	edgomez	1382	TEST_MB2(interpolate8x8_avrg);
516 :			printf("%s - interpolate8x8_c %.3f usec crc32=0x%08x %s\n",
517 :			cpu->name, t, iCrc,
518 :			(iCrc!=8107)?"\| ERROR": "" );
519 :	Isibaar	262	#endif
520 :
521 :	Skal	1651	/* New functions for field prediction by CK 1.10.2005 */
522 :			#pragma NEW8X4
523 :			TEST_MB(interpolate8x4_halfpel_h, 0);
524 :			printf("%s - interpfield-h -round0 %.3f usec crc32=0x%08x %s\n",
525 :			cpu->name, t, iCrc,
526 :			(iCrc!=0x9538d6df)?"\| ERROR": "" );
527 :
528 :			TEST_MB(interpolate8x4_halfpel_h, 1);
529 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
530 :			cpu->name, t, iCrc,
531 :			(iCrc!=0xde5f1db4)?"\| ERROR": "" );
532 :
533 :
534 :			TEST_MB(interpolate8x4_halfpel_v, 0);
535 :			printf("%s - interpfield- v-round0 %.3f usec crc32=0x%08x %s\n",
536 :			cpu->name, t, iCrc,
537 :			(iCrc!=0xea5a69ef)?"\| ERROR": "" );
538 :
539 :			TEST_MB(interpolate8x4_halfpel_v, 1);
540 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
541 :			cpu->name, t, iCrc,
542 :			(iCrc!=0x4f10ec0f)?"\| ERROR": "" );
543 :
544 :
545 :			TEST_MB(interpolate8x4_halfpel_hv, 0);
546 :			printf("%s - interpfield-hv-round0 %.3f usec crc32=0x%08x %s\n",
547 :			cpu->name, t, iCrc,
548 :			(iCrc!=0xf97ee367)?"\| ERROR": "" );
549 :
550 :			TEST_MB(interpolate8x4_halfpel_hv, 1);
551 :			printf("%s - round1 %.3f usec crc32=0x%08x %s\n",
552 :			cpu->name, t, iCrc,
553 :			(iCrc!=0xb6a9f581)?"\| ERROR": "" );
554 :			/* End of 8x4 functions */
555 :
556 :	edgomez	1382	printf( " --- \n" );
557 :			}
558 :	Isibaar	225	}
559 :
560 :	Skal	1707	#undef ENTER
561 :			#undef LEAVE
562 :			#undef TEST_MB
563 :			#undef TEST_MB2
564 :
565 :	Isibaar	225	/*********************************************************************
566 :			* test transfer
567 :			*********************************************************************/
568 :
569 :			#define INIT_TRANSFER \
570 :	edgomez	1382	for(i=0; i<8*32; ++i) { \
571 :			Src8[i] = i; Src16[i] = i; \
572 :			Dst8[i] = 0; Dst16[i] = 0; \
573 :			Ref1[i] = i^0x27; \
574 :			Ref2[i] = i^0x51; \
575 :			}
576 :	Isibaar	225
577 :			#define TEST_TRANSFER_BEGIN(DST) \
578 :	edgomez	1382	INIT_TRANSFER \
579 :			overhead = -gettime_usec(); \
580 :			for(tst=0; tst<nb_tests; ++tst) { \
581 :			for(i=0; i<8*32; ++i) (DST)[i] = i^0x6a;\
582 :			} \
583 :			overhead += gettime_usec(); \
584 :			t = gettime_usec(); \
585 :			emms(); \
586 :			for(tst=0; tst<nb_tests; ++tst) { \
587 :			for(i=0; i<8*32; ++i) (DST)[i] = i^0x6a;
588 :	Isibaar	225
589 :
590 :			#define TEST_TRANSFER_END(DST) \
591 :	edgomez	1382	} \
592 :			emms(); \
593 :			t = (gettime_usec()-t -overhead) / nb_tests;\
594 :	Skal	1621	byte_swap((uint8_t)(DST), 832*sizeof((DST)[0]), sizeof((DST)[0])); \
595 :	Skal	1620	s = calc_crc((uint8_t)(DST), 832*sizeof((DST)[0]), CRC32_INITIAL)
596 :	Isibaar	225
597 :			#define TEST_TRANSFER(FUNC, DST, SRC) \
598 :	edgomez	1382	TEST_TRANSFER_BEGIN(DST); \
599 :			(FUNC)((DST), (SRC), 32); \
600 :			TEST_TRANSFER_END(DST)
601 :	Isibaar	225
602 :
603 :			#define TEST_TRANSFER2_BEGIN(DST, SRC) \
604 :	edgomez	1382	INIT_TRANSFER \
605 :			overhead = -gettime_usec(); \
606 :			for(tst=0; tst<nb_tests; ++tst) { \
607 :			for(i=0; i<8*32; ++i) (DST)[i] = i^0x6a;\
608 :			for(i=0; i<8*32; ++i) (SRC)[i] = i^0x3e;\
609 :			} \
610 :			overhead += gettime_usec(); \
611 :			t = gettime_usec(); \
612 :			emms(); \
613 :			for(tst=0; tst<nb_tests; ++tst) { \
614 :			for(i=0; i<8*32; ++i) (DST)[i] = i^0x6a;\
615 :			for(i=0; i<8*32; ++i) (SRC)[i] = i^0x3e;
616 :	Isibaar	225
617 :			#define TEST_TRANSFER2_END(DST) \
618 :	edgomez	1382	} \
619 :			emms(); \
620 :			t = (gettime_usec()-t -overhead) / nb_tests;\
621 :	Skal	1621	byte_swap((uint8_t)(DST), 832*sizeof((DST)[0]), sizeof((DST)[0])); \
622 :	Skal	1620	s = calc_crc((uint8_t)(DST), 832*sizeof((DST)[0]), CRC32_INITIAL)
623 :	Isibaar	225
624 :			#define TEST_TRANSFER2(FUNC, DST, SRC, R1) \
625 :	edgomez	1382	TEST_TRANSFER2_BEGIN(DST,SRC); \
626 :			(FUNC)((DST), (SRC), (R1), 32); \
627 :			TEST_TRANSFER2_END(DST)
628 :	Isibaar	225
629 :			#define TEST_TRANSFER3(FUNC, DST, SRC, R1, R2)\
630 :	edgomez	1382	TEST_TRANSFER_BEGIN(DST); \
631 :			(FUNC)((DST), (SRC), (R1), (R2), 32); \
632 :			TEST_TRANSFER_END(DST)
633 :	Isibaar	225
634 :			void test_transfer()
635 :			{
636 :	edgomez	1382	const int nb_tests = 4000*speed_ref;
637 :			int i;
638 :			CPU *cpu;
639 :	Skal	1620	// uint8_t Src8[832], Dst8[832], Ref1[832], Ref2[832];
640 :			// int16_t Src16[832], Dst16[832];
641 :			DECLARE_ALIGNED_MATRIX(Src8, 8, 32, uint8_t, CACHE_LINE);
642 :			DECLARE_ALIGNED_MATRIX(Dst8, 8, 32, uint8_t, CACHE_LINE);
643 :			DECLARE_ALIGNED_MATRIX(Ref1, 8, 32, uint8_t, CACHE_LINE);
644 :			DECLARE_ALIGNED_MATRIX(Ref2, 8, 32, uint8_t, CACHE_LINE);
645 :			DECLARE_ALIGNED_MATRIX(Src16, 8, 32, uint16_t, CACHE_LINE);
646 :			DECLARE_ALIGNED_MATRIX(Dst16, 8, 32, uint16_t, CACHE_LINE);
647 :	Isibaar	225
648 :	edgomez	1382	printf( "\n === test transfer ===\n" );
649 :	Isibaar	225
650 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
651 :			{
652 :			double t, overhead;
653 :			int tst, s;
654 :	Isibaar	225
655 :	edgomez	1382	if (!init_cpu(cpu))
656 :			continue;
657 :	Isibaar	225
658 :	edgomez	1382	TEST_TRANSFER(transfer_8to16copy, Dst16, Src8);
659 :			printf("%s - 8to16 %.3f usec crc32=0x%08x %s\n",
660 :			cpu->name, t, s,
661 :			(s!=0x115814bb)?"\| ERROR": "");
662 :	Isibaar	225
663 :	edgomez	1382	TEST_TRANSFER(transfer_16to8copy, Dst8, Src16);
664 :			printf( "%s - 16to8 %.3f usec crc32=0x%08x %s\n",
665 :			cpu->name, t, s,
666 :			(s!=0xee7ccbb4)?"\| ERROR": "");
667 :	Isibaar	225
668 :	Skal	1651	/* New functions for field prediction by CK 1.10.2005 */
669 :			#pragma NEW8X4
670 :			TEST_TRANSFER(transfer8x4_copy, Dst8, Src8);
671 :			printf("%s - 8to4 %.3f usec crc32=0x%08x %s\n",
672 :			cpu->name, t, s,
673 :			(s!=0xbb9c3db5)?"\| ERROR": "");
674 :			/* End of new functions */
675 :
676 :	edgomez	1382	TEST_TRANSFER(transfer8x8_copy, Dst8, Src8);
677 :			printf("%s - 8to8 %.3f usec crc32=0x%08x %s\n",
678 :			cpu->name, t, s,
679 :			(s!=0xd37b3295)?"\| ERROR": "");
680 :	Isibaar	225
681 :	edgomez	1382	TEST_TRANSFER(transfer_16to8add, Dst8, Src16);
682 :			printf("%s - 16to8add %.3f usec crc32=0x%08x %s\n",
683 :			cpu->name, t, s,
684 :			(s!=0xdd817bf4)?"\| ERROR": "" );
685 :	Isibaar	225
686 :	edgomez	1382	TEST_TRANSFER2(transfer_8to16sub, Dst16, Src8, Ref1);
687 :			{
688 :			int s1, s2;
689 :	Skal	1620	s1 = calc_crc((uint8_t)Dst16, 832*sizeof(Dst16[0]), CRC32_INITIAL);
690 :			s2 = calc_crc((uint8_t)Src8, 832*sizeof(Src8[0]), CRC32_INITIAL);
691 :	edgomez	1382	printf("%s - 8to16sub %.3f usec crc32(1)=0x%08x crc32(2)=0x%08x %s %s\n",
692 :			cpu->name, t, s1, s2,
693 :			(s1!=0xa1e07163)?"\| ERROR1": "",
694 :			(s2!=0xd86c5d23)?"\| ERROR2": "" );
695 :			}
696 :
697 :			TEST_TRANSFER3(transfer_8to16sub2, Dst16, Src8, Ref1, Ref2);
698 :			printf("%s - 8to16sub2 %.3f usec crc32=0x%08x %s\n",
699 :			cpu->name, t, s,
700 :			(s!=0x99b6c4c7)?"\| ERROR": "" );
701 :
702 :			printf( " --- \n" );
703 :			}
704 :	Isibaar	225	}
705 :
706 :			/*********************************************************************
707 :			* test quantization
708 :			*********************************************************************/
709 :
710 :	Isibaar	262	#define TEST_QUANT(FUNC, DST, SRC) \
711 :	edgomez	1382	t = gettime_usec(); \
712 :			for(s=CRC32_INITIAL,qm=1; qm<=255; ++qm) { \
713 :			for(i=0; i<8*8; ++i) Quant[i] = qm; \
714 :			set_inter_matrix( mpeg_quant_matrices, Quant ); \
715 :			emms(); \
716 :			for(q=1; q<=max_Q; ++q) { \
717 :			for(tst=0; tst<nb_tests; ++tst) \
718 :			(FUNC)((DST), (SRC), q, mpeg_quant_matrices); \
719 :	Skal	1621	byte_swap((uint8_t)(DST), 64sizeof((DST)[0]), sizeof((DST)[0])); \
720 :			s = calc_crc((uint8_t)(DST), 64sizeof((DST)[0]), s); \
721 :	edgomez	1382	} \
722 :			emms(); \
723 :			} \
724 :			t = (gettime_usec()-t-overhead)/nb_tests/qm
725 :	Isibaar	225
726 :	Isibaar	262	#define TEST_QUANT2(FUNC, DST, SRC) \
727 :	edgomez	1382	t = gettime_usec(); \
728 :			for(s=CRC32_INITIAL,qm=1; qm<=255; ++qm) { \
729 :			for(i=0; i<8*8; ++i) Quant[i] = qm; \
730 :			set_intra_matrix( mpeg_quant_matrices, Quant ); \
731 :			emms(); \
732 :			for(q=1; q<=max_Q; ++q) { \
733 :			for(tst=0; tst<nb_tests; ++tst) \
734 :			(FUNC)((DST), (SRC), q, q, mpeg_quant_matrices); \
735 :	Skal	1621	byte_swap((uint8_t)(DST), 64sizeof((DST)[0]), sizeof((DST)[0])); \
736 :			s = calc_crc((uint8_t)(DST), 64sizeof((DST)[0]), s); \
737 :	edgomez	1382	} \
738 :			emms(); \
739 :			} \
740 :			t = (gettime_usec()-t-overhead)/nb_tests/qm
741 :	Isibaar	225
742 :	edgomez	1398	#define TEST_INTRA(REFFUNC, NEWFUNC, RANGE) \
743 :			{ int i,q,s;\
744 :			DECLARE_ALIGNED_MATRIX(Src, 8, 8, int16_t, 16); \
745 :			DECLARE_ALIGNED_MATRIX(Dst, 8, 8, int16_t, 16); \
746 :			DECLARE_ALIGNED_MATRIX(Dst2,8, 8, int16_t, 16); \
747 :			for(q=1;q<=max_Q;q++) \
748 :			for(s=-RANGE;s<RANGE;s++) { \
749 :			for(i=0;i<64;i++) Src[i]=s; \
750 :			(REFFUNC)((Dst),(Src),q,q,mpeg_quant_matrices); \
751 :			(NEWFUNC)((Dst2),(Src),q,q,mpeg_quant_matrices); \
752 :			for(i=0;i<64;i++) \
753 :			if(Dst[i]!=Dst2[i]) printf("ERROR : " #NEWFUNC " i%d quant:%d input:%d C_result:%d ASM_result:%d\n",i,q,s,Dst[i],Dst2[i]); \
754 :			} \
755 :			}
756 :
757 :			#define TEST_INTER(REFFUNC, NEWFUNC, RANGE) \
758 :			{ int i,q,s; \
759 :			DECLARE_ALIGNED_MATRIX(Src, 8, 8, int16_t, 16); \
760 :			DECLARE_ALIGNED_MATRIX(Dst, 8, 8, int16_t, 16); \
761 :			DECLARE_ALIGNED_MATRIX(Dst2,8, 8, int16_t, 16); \
762 :			for(q=1;q<=max_Q;q++) \
763 :			for(s=-RANGE;s<RANGE;s++) { \
764 :			for(i=0;i<64;i++) Src[i]=s; \
765 :			(REFFUNC)((Dst),(Src),q,mpeg_quant_matrices); \
766 :			(NEWFUNC)((Dst2),(Src),q,mpeg_quant_matrices); \
767 :			emms(); \
768 :			for(i=0;i<64;i++) \
769 :			if(Dst[i]!=Dst2[i]) printf("ERROR : " #NEWFUNC " i%d quant:%d input:%d C_result:%d ASM_result:%d\n",i,q,s,Dst[i],Dst2[i]); \
770 :			} \
771 :			}
772 :
773 :	Isibaar	225	void test_quant()
774 :			{
775 :	edgomez	1382	const int nb_tests = 1*speed_ref;
776 :			const int max_Q = 31;
777 :			DECLARE_ALIGNED_MATRIX(mpeg_quant_matrices, 8, 64, uint16_t, 16);
778 :	Isibaar	225
779 :	edgomez	1382	int i, qm;
780 :			CPU *cpu;
781 :			DECLARE_ALIGNED_MATRIX(Src, 8, 8, int16_t, 16);
782 :			DECLARE_ALIGNED_MATRIX(Dst, 8, 8, int16_t, 16);
783 :	edgomez	1398	DECLARE_ALIGNED_MATRIX(Dst2,8, 8, int16_t, 16);
784 :	edgomez	1382	uint8_t Quant[8*8];
785 :	Isibaar	225
786 :	edgomez	1382	printf( "\n ===== test quant =====\n" );
787 :	Isibaar	225
788 :	edgomez	1382	/* we deliberately enfringe the norm's specified range [-127,127], */
789 :			/* to test the robustness of the iquant module */
790 :			for(i=0; i<64; ++i) {
791 :			Src[i] = 1 + (i-32) * (i&6);
792 :			Dst[i] = 0;
793 :			}
794 :	Isibaar	225
795 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
796 :			{
797 :			double t, overhead;
798 :			int tst, q;
799 :			uint32_t s;
800 :	Isibaar	225
801 :	edgomez	1382	if (!init_cpu(cpu))
802 :	edgomez	1398	continue;
803 :	Isibaar	225
804 :	edgomez	1398	// exhaustive tests to compare against the (ref) C-version
805 :			TEST_INTRA(quant_h263_intra_c, quant_h263_intra, 2048);
806 :			TEST_INTRA(dequant_h263_intra_c, dequant_h263_intra , 512 );
807 :			TEST_INTER(quant_h263_inter_c, quant_h263_inter , 2048);
808 :			TEST_INTER(dequant_h263_inter_c, dequant_h263_inter , 512 );
809 :
810 :	edgomez	1382	overhead = -gettime_usec();
811 :			for(s=0,qm=1; qm<=255; ++qm) {
812 :			for(i=0; i<8*8; ++i) Quant[i] = qm;
813 :			set_inter_matrix(mpeg_quant_matrices, Quant );
814 :			for(q=1; q<=max_Q; ++q)
815 :			for(i=0; i<64; ++i) s+=Dst[i]^i^qm;
816 :			}
817 :			overhead += gettime_usec();
818 :	Isibaar	225
819 :	edgomez	1382	TEST_QUANT2(quant_mpeg_intra, Dst, Src);
820 :			printf("%s - quant_mpeg_intra %.3f usec crc32=0x%08x %s\n",
821 :			cpu->name, t, s,
822 :			(s!=0xfd6a21a4)? "\| ERROR": "");
823 :	Isibaar	225
824 :	edgomez	1382	TEST_QUANT(quant_mpeg_inter, Dst, Src);
825 :			printf("%s - quant_mpeg_inter %.3f usec crc32=0x%08x %s\n",
826 :			cpu->name, t, s,
827 :			(s!=0xf6de7757)?"\| ERROR": "");
828 :	Isibaar	225
829 :	edgomez	1382	TEST_QUANT2(dequant_mpeg_intra, Dst, Src);
830 :			printf("%s - dequant_mpeg_intra %.3f usec crc32=0x%08x %s\n",
831 :			cpu->name, t, s,
832 :			(s!=0x2def7bc7)?"\| ERROR": "");
833 :	Isibaar	225
834 :	edgomez	1382	TEST_QUANT(dequant_mpeg_inter, Dst, Src);
835 :			printf("%s - dequant_mpeg_inter %.3f usec crc32=0x%08x %s\n",
836 :			cpu->name, t, s,
837 :			(s!=0xd878c722)?"\| ERROR": "");
838 :
839 :			TEST_QUANT2(quant_h263_intra, Dst, Src);
840 :			printf("%s - quant_h263_intra %.3f usec crc32=0x%08x %s\n",
841 :			cpu->name, t, s,
842 :			(s!=0x2eba9d43)?"\| ERROR": "");
843 :
844 :			TEST_QUANT(quant_h263_inter, Dst, Src);
845 :			printf("%s - quant_h263_inter %.3f usec crc32=0x%08x %s\n",
846 :			cpu->name, t, s,
847 :			(s!=0xbd315a7e)?"\| ERROR": "");
848 :
849 :			TEST_QUANT2(dequant_h263_intra, Dst, Src);
850 :			printf("%s - dequant_h263_intra %.3f usec crc32=0x%08x %s\n",
851 :			cpu->name, t, s,
852 :			(s!=0x9841212a)?"\| ERROR": "");
853 :
854 :			TEST_QUANT(dequant_h263_inter, Dst, Src);
855 :			printf("%s - dequant_h263_inter %.3f usec crc32=0x%08x %s\n",
856 :			cpu->name, t, s,
857 :			(s!=0xe7df8fba)?"\| ERROR": "");
858 :
859 :			printf( " --- \n" );
860 :			}
861 :	Isibaar	225	}
862 :
863 :			/*********************************************************************
864 :	edgomez	1424	* test distortion operators
865 :			*********************************************************************/
866 :
867 :			static void ieee_reseed(long s);
868 :			static long ieee_rand(int Min, int Max);
869 :
870 :			#define TEST_SSE(FUNCTION, SRC1, SRC2, STRIDE) \
871 :			do { \
872 :			t = gettime_usec(); \
873 :			tst = nb_tests; \
874 :			while((tst--)>0) sse = (FUNCTION)((SRC1), (SRC2), (STRIDE)); \
875 :			emms(); \
876 :			t = (gettime_usec() - t)/(double)nb_tests; \
877 :			} while(0)
878 :
879 :
880 :			void test_sse()
881 :			{
882 :			const int nb_tests = 100000*speed_ref;
883 :			int i;
884 :			CPU *cpu;
885 :			DECLARE_ALIGNED_MATRIX(Src1, 8, 8, int16_t, 16);
886 :			DECLARE_ALIGNED_MATRIX(Src2, 8, 8, int16_t, 16);
887 :			DECLARE_ALIGNED_MATRIX(Src3, 8, 8, int16_t, 16);
888 :			DECLARE_ALIGNED_MATRIX(Src4, 8, 8, int16_t, 16);
889 :
890 :			printf( "\n ===== test sse =====\n" );
891 :
892 :			ieee_reseed(1);
893 :			for(i=0; i<64; ++i) {
894 :			Src1[i] = ieee_rand(-2048, 2047);
895 :			Src2[i] = ieee_rand(-2048, 2047);
896 :			Src3[i] = ieee_rand(-2048, 2047);
897 :			Src4[i] = ieee_rand(-2048, 2047);
898 :			}
899 :
900 :			for(cpu = cpu_list; cpu->name!=0; ++cpu)
901 :			{
902 :			double t;
903 :			int tst, sse;
904 :
905 :			if (!init_cpu(cpu))
906 :			continue;
907 :
908 :			/* 16 bit element blocks */
909 :			TEST_SSE(sse8_16bit, Src1, Src2, 16);
910 :			printf("%s - sse8_16bit#1 %.3f usec sse=%d %s\n",
911 :			cpu->name, t, sse, (sse!=182013834)?"\| ERROR": "");
912 :			TEST_SSE(sse8_16bit, Src1, Src3, 16);
913 :			printf("%s - sse8_16bit#2 %.3f usec sse=%d %s\n",
914 :			cpu->name, t, sse, (sse!=142545203)?"\| ERROR": "");
915 :			TEST_SSE(sse8_16bit, Src1, Src4, 16);
916 :			printf("%s - sse8_16bit#3 %.3f usec sse=%d %s\n",
917 :			cpu->name, t, sse, (sse!=146340935)?"\| ERROR": "");
918 :			TEST_SSE(sse8_16bit, Src2, Src3, 16);
919 :			printf("%s - sse8_16bit#4 %.3f usec sse=%d %s\n",
920 :			cpu->name, t, sse, (sse!=130136661)?"\| ERROR": "");
921 :			TEST_SSE(sse8_16bit, Src2, Src4, 16);
922 :			printf("%s - sse8_16bit#5 %.3f usec sse=%d %s\n",
923 :			cpu->name, t, sse, (sse!=136870353)?"\| ERROR": "");
924 :			TEST_SSE(sse8_16bit, Src3, Src4, 16);
925 :			printf("%s - sse8_16bit#6 %.3f usec sse=%d %s\n",
926 :			cpu->name, t, sse, (sse!=164107772)?"\| ERROR": "");
927 :
928 :			/* 8 bit element blocks */
929 :			TEST_SSE(sse8_8bit, (int8_t)Src1, (int8_t)Src2, 8);
930 :			printf("%s - sse8_8bit#1 %.3f usec sse=%d %s\n",
931 :			cpu->name, t, sse, (sse!=1356423)?"\| ERROR": "");
932 :			TEST_SSE(sse8_8bit, (int8_t)Src1, (int8_t)Src3, 8);
933 :			printf("%s - sse8_8bit#2 %.3f usec sse=%d %s\n",
934 :			cpu->name, t, sse, (sse!=1173074)?"\| ERROR": "");
935 :			TEST_SSE(sse8_8bit, (int8_t)Src1, (int8_t)Src4, 8);
936 :			printf("%s - sse8_8bit#3 %.3f usec sse=%d %s\n",
937 :			cpu->name, t, sse, (sse!=1092357)?"\| ERROR": "");
938 :			TEST_SSE(sse8_8bit, (int8_t)Src2, (int8_t)Src3, 8);
939 :			printf("%s - sse8_8bit#4 %.3f usec sse=%d %s\n",
940 :			cpu->name, t, sse, (sse!=1360239)?"\| ERROR": "");
941 :			TEST_SSE(sse8_8bit, (int8_t)Src2, (int8_t)Src4, 8);
942 :			printf("%s - sse8_8bit#5 %.3f usec sse=%d %s\n",
943 :			cpu->name, t, sse, (sse!=1208414)?"\| ERROR": "");
944 :			TEST_SSE(sse8_8bit, (int8_t)Src3, (int8_t)Src4, 8);
945 :			printf("%s - sse8_8bit#6 %.3f usec sse=%d %s\n",
946 :			cpu->name, t, sse, (sse!=1099285)?"\| ERROR": "");
947 :
948 :			printf(" ---\n");
949 :			}
950 :			}
951 :
952 :			/*********************************************************************
953 :	Isibaar	225	* test non-zero AC counting
954 :			*********************************************************************/
955 :
956 :	Skal	1629	#define TEST_CBP(FUNC, SRC, NB) \
957 :	edgomez	1382	t = gettime_usec(); \
958 :			emms(); \
959 :	Skal	1629	for(tst=0; tst<NB; ++tst) { \
960 :	edgomez	1382	cbp = (FUNC)((SRC)); \
961 :			} \
962 :			emms(); \
963 :			t = (gettime_usec()-t ) / nb_tests;
964 :	Isibaar	225
965 :			void test_cbp()
966 :			{
967 :	edgomez	1382	const int nb_tests = 10000*speed_ref;
968 :	Skal	1629	int i, n, m;
969 :	edgomez	1382	CPU *cpu;
970 :			DECLARE_ALIGNED_MATRIX(Src1, 6, 64, int16_t, 16);
971 :			DECLARE_ALIGNED_MATRIX(Src2, 6, 64, int16_t, 16);
972 :			DECLARE_ALIGNED_MATRIX(Src3, 6, 64, int16_t, 16);
973 :			DECLARE_ALIGNED_MATRIX(Src4, 6, 64, int16_t, 16);
974 :	suxen_drol	1641	DECLARE_ALIGNED_MATRIX(Src5, 6, 64, int16_t, 16);
975 :	Isibaar	225
976 :	edgomez	1382	printf( "\n ===== test cbp =====\n" );
977 :	Isibaar	225
978 :	edgomez	1382	for(i=0; i<6*64; ++i) {
979 :			Src1[i] = (ii3/8192)&(i/64)&1; /* 'random' */
980 :			Src2[i] = (i<364); / half-full */
981 :			Src3[i] = ((i+32)>3*64);
982 :			Src4[i] = (i==(364+2) \|\| i==(564+9));
983 :	suxen_drol	1641	Src5[i] = ieee_rand(0,1) ? -1 : 1; /* +/- test */
984 :	edgomez	1382	}
985 :	Isibaar	225
986 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
987 :			{
988 :			double t;
989 :			int tst, cbp;
990 :	Isibaar	225
991 :	edgomez	1382	if (!init_cpu(cpu))
992 :			continue;
993 :
994 :	Skal	1629	TEST_CBP(calc_cbp, Src1, nb_tests);
995 :	edgomez	1424	printf("%s - calc_cbp#1 %.3f usec cbp=0x%02x %s\n",
996 :	edgomez	1382	cpu->name, t, cbp, (cbp!=0x15)?"\| ERROR": "");
997 :	Skal	1629	TEST_CBP(calc_cbp, Src2, nb_tests);
998 :	edgomez	1424	printf("%s - calc_cbp#2 %.3f usec cbp=0x%02x %s\n",
999 :	edgomez	1382	cpu->name, t, cbp, (cbp!=0x38)?"\| ERROR": "");
1000 :	Skal	1629	TEST_CBP(calc_cbp, Src3, nb_tests);
1001 :	edgomez	1424	printf("%s - calc_cbp#3 %.3f usec cbp=0x%02x %s\n",
1002 :	edgomez	1382	cpu->name, t, cbp, (cbp!=0x0f)?"\| ERROR": "" );
1003 :	Skal	1629	TEST_CBP(calc_cbp, Src4, nb_tests);
1004 :	edgomez	1424	printf("%s - calc_cbp#4 %.3f usec cbp=0x%02x %s\n",
1005 :	edgomez	1382	cpu->name, t, cbp, (cbp!=0x05)?"\| ERROR": "" );
1006 :	suxen_drol	1641	TEST_CBP(calc_cbp, Src5, nb_tests);
1007 :			printf("%s - calc_cbp#4 %.3f usec cbp=0x%02x %s\n",
1008 :			cpu->name, t, cbp, (cbp!=0x3f)?"\| ERROR": "" );
1009 :	edgomez	1382	printf( " --- \n" );
1010 :			}
1011 :	Skal	1629
1012 :			for(cpu = cpu_list; cpu->name!=0; ++cpu) /* bench suggested by Carlo (carlo dot bramix at libero dot it) */
1013 :			{
1014 :			double t;
1015 :			int tst, cbp, err;
1016 :
1017 :			if (!init_cpu(cpu))
1018 :			continue;
1019 :
1020 :			err = 0;
1021 :			for(n=0; n<6; ++n)
1022 :			{
1023 :			for(m=0; m<64; ++m)
1024 :			{
1025 :			for(i=0; i<6*64; ++i)
1026 :			Src1[i] = (i== (m + n*64));
1027 :
1028 :			TEST_CBP(calc_cbp, Src1, 1);
1029 :			if (cbp!= (((m!=0)<<(5-n))))
1030 :			{
1031 :			printf( "%s - calc_cbp#5: ERROR at pos %d / %d!\n", cpu->name, n, m);
1032 :			err = 1;
1033 :			break;
1034 :			}
1035 :			}
1036 :			}
1037 :			if (!err)
1038 :			printf( " %s - calc_cbp#5 : OK\n", cpu->name );
1039 :
1040 :			}
1041 :	Isibaar	225	}
1042 :
1043 :			/*********************************************************************
1044 :	Isibaar	262	* fdct/idct IEEE1180 compliance
1045 :			*********************************************************************/
1046 :
1047 :			typedef struct {
1048 :	edgomez	1382	long Errors[64];
1049 :			long Sqr_Errors[64];
1050 :			long Max_Errors[64];
1051 :			long Nb;
1052 :	Isibaar	262	} STATS_8x8;
1053 :
1054 :			void init_stats(STATS_8x8 *S)
1055 :			{
1056 :	edgomez	1382	int i;
1057 :			for(i=0; i<64; ++i) {
1058 :			S->Errors[i] = 0;
1059 :			S->Sqr_Errors[i] = 0;
1060 :			S->Max_Errors[i] = 0;
1061 :			}
1062 :			S->Nb = 0;
1063 :	Isibaar	262	}
1064 :
1065 :			void store_stats(STATS_8x8 *S, short Blk[64], short Ref[64])
1066 :			{
1067 :	edgomez	1382	int i;
1068 :			for(i=0; i<64; ++i)
1069 :			{
1070 :			short Err = Blk[i] - Ref[i];
1071 :			S->Errors[i] += Err;
1072 :			S->Sqr_Errors[i] += Err * Err;
1073 :			if (Err<0) Err = -Err;
1074 :			if (S->Max_Errors[i]<Err)
1075 :			S->Max_Errors[i] = Err;
1076 :			}
1077 :			S->Nb++;
1078 :	Isibaar	262	}
1079 :
1080 :			void print_stats(STATS_8x8 *S)
1081 :			{
1082 :	edgomez	1382	int i;
1083 :			double Norm;
1084 :	Isibaar	262
1085 :	edgomez	1382	assert(S->Nb>0);
1086 :			Norm = 1. / (double)S->Nb;
1087 :			printf("\n== Max absolute values of errors ==\n");
1088 :			for(i=0; i<64; i++) {
1089 :			printf(" %4ld", S->Max_Errors[i]);
1090 :			if ((i&7)==7) printf("\n");
1091 :			}
1092 :	Isibaar	262
1093 :	edgomez	1382	printf("\n== Mean square errors ==\n");
1094 :			for(i=0; i<64; i++)
1095 :			{
1096 :			double Err = Norm * (double)S->Sqr_Errors[i];
1097 :			printf(" %.3f", Err);
1098 :			if ((i&7)==7) printf("\n");
1099 :			}
1100 :	Isibaar	262
1101 :	edgomez	1382	printf("\n== Mean errors ==\n");
1102 :			for(i=0; i<64; i++)
1103 :			{
1104 :			double Err = Norm * (double)S->Errors[i];
1105 :			printf(" %.3f", Err);
1106 :			if ((i&7)==7) printf("\n");
1107 :			}
1108 :			printf("\n");
1109 :	Isibaar	262	}
1110 :
1111 :			static const char *CHECK(double v, double l) {
1112 :	edgomez	1382	if (fabs(v)<=l) return "ok";
1113 :			else return "FAIL!";
1114 :	Isibaar	262	}
1115 :
1116 :			void report_stats(STATS_8x8 S, const double Limits)
1117 :			{
1118 :	edgomez	1382	int i;
1119 :			double Norm, PE, PMSE, OMSE, PME, OME;
1120 :	Isibaar	262
1121 :	edgomez	1382	assert(S->Nb>0);
1122 :			Norm = 1. / (double)S->Nb;
1123 :			PE = 0.;
1124 :			for(i=0; i<64; i++) {
1125 :			if (PE<S->Max_Errors[i])
1126 :			PE = S->Max_Errors[i];
1127 :			}
1128 :	Isibaar	262
1129 :	edgomez	1382	PMSE = 0.;
1130 :			OMSE = 0.;
1131 :			for(i=0; i<64; i++)
1132 :			{
1133 :			double Err = Norm * (double)S->Sqr_Errors[i];
1134 :			OMSE += Err;
1135 :			if (PMSE < Err) PMSE = Err;
1136 :			}
1137 :			OMSE /= 64.;
1138 :	Isibaar	262
1139 :	edgomez	1382	PME = 0.;
1140 :			OME = 0.;
1141 :			for(i=0; i<64; i++)
1142 :			{
1143 :			double Err = Norm * (double)S->Errors[i];
1144 :			OME += Err;
1145 :			Err = fabs(Err);
1146 :			if (PME < Err) PME = Err;
1147 :			}
1148 :			OME /= 64.;
1149 :	Isibaar	262
1150 :	edgomez	1382	printf( "Peak error: %4.4f\n", PE );
1151 :			printf( "Peak MSE: %4.4f\n", PMSE );
1152 :			printf( "Overall MSE: %4.4f\n", OMSE );
1153 :			printf( "Peak ME: %4.4f\n", PME );
1154 :			printf( "Overall ME: %4.4f\n", OME );
1155 :
1156 :			if (Limits!=0)
1157 :			{
1158 :			printf( "[PE<=%.4f %s] ", Limits[0], CHECK(PE, Limits[0]) );
1159 :			printf( "\n" );
1160 :			printf( "[PMSE<=%.4f %s]", Limits[1], CHECK(PMSE, Limits[1]) );
1161 :			printf( "[OMSE<=%.4f %s]", Limits[2], CHECK(OMSE, Limits[2]) );
1162 :			printf( "\n" );
1163 :			printf( "[PME<=%.4f %s] ", Limits[3], CHECK(PME , Limits[3]) );
1164 :			printf( "[OME<=%.4f %s] ", Limits[4], CHECK(OME , Limits[4]) );
1165 :			printf( "\n" );
1166 :			}
1167 :	Isibaar	262	}
1168 :
1169 :	edgomez	1382	///* ////////////////////////////////////////////////////// */
1170 :	Isibaar	262	/* Pseudo-random generator specified by IEEE 1180 */
1171 :
1172 :			static long ieee_seed = 1;
1173 :			static void ieee_reseed(long s) {
1174 :	edgomez	1382	ieee_seed = s;
1175 :	Isibaar	262	}
1176 :			static long ieee_rand(int Min, int Max)
1177 :			{
1178 :	edgomez	1382	static double z = (double) 0x7fffffff;
1179 :	Isibaar	262
1180 :	edgomez	1382	long i,j;
1181 :			double x;
1182 :	Isibaar	262
1183 :	edgomez	1382	ieee_seed = (ieee_seed * 1103515245) + 12345;
1184 :			i = ieee_seed & 0x7ffffffe;
1185 :			x = ((double) i) / z;
1186 :			x *= (Max-Min+1);
1187 :			j = (long)x;
1188 :			j = j + Min;
1189 :			assert(j>=Min && j<=Max);
1190 :			return (short)j;
1191 :	Isibaar	262	}
1192 :
1193 :			#define CLAMP(x, M) (x) = ((x)<-(M)) ? (-(M)) : ((x)>=(M) ? ((M)-1) : (x))
1194 :
1195 :			static double Cos[8][8];
1196 :			static void init_ref_dct()
1197 :			{
1198 :	edgomez	1382	int i, j;
1199 :			for(i=0; i<8; i++)
1200 :			{
1201 :			double scale = (i == 0) ? sqrt(0.125) : 0.5;
1202 :			for (j=0; j<8; j++)
1203 :			Cos[i][j] = scalecos( (M_PI/8.0)i*(j + 0.5) );
1204 :			}
1205 :	Isibaar	262	}
1206 :
1207 :			void ref_idct(short *M)
1208 :			{
1209 :	edgomez	1382	int i, j, k;
1210 :			double Tmp[8][8];
1211 :	Isibaar	262
1212 :	edgomez	1382	for(i=0; i<8; i++) {
1213 :			for(j=0; j<8; j++)
1214 :			{
1215 :			double Sum = 0.0;
1216 :			for (k=0; k<8; k++) Sum += Cos[k][j]M[8i+k];
1217 :			Tmp[i][j] = Sum;
1218 :			}
1219 :			}
1220 :			for(i=0; i<8; i++) {
1221 :			for(j=0; j<8; j++) {
1222 :			double Sum = 0.0;
1223 :			for (k=0; k<8; k++) Sum += Cos[k][i]*Tmp[k][j];
1224 :			M[8*i+j] = (short)floor(Sum + .5);
1225 :			}
1226 :			}
1227 :	Isibaar	262	}
1228 :
1229 :			void ref_fdct(short *M)
1230 :			{
1231 :	edgomez	1382	int i, j, k;
1232 :			double Tmp[8][8];
1233 :	Isibaar	262
1234 :	edgomez	1382	for(i=0; i<8; i++) {
1235 :			for(j=0; j<8; j++)
1236 :			{
1237 :			double Sum = 0.0;
1238 :			for (k=0; k<8; k++) Sum += Cos[j][k]M[8i+k];
1239 :			Tmp[i][j] = Sum;
1240 :			}
1241 :			}
1242 :			for(i=0; i<8; i++) {
1243 :			for(j=0; j<8; j++) {
1244 :			double Sum = 0.0;
1245 :			for (k=0; k<8; k++) Sum += Cos[i][k]*Tmp[k][j];
1246 :			M[8*i+j] = (short)floor(Sum + 0.5);
1247 :			}
1248 :			}
1249 :	Isibaar	262	}
1250 :
1251 :			void test_IEEE1180_compliance(int Min, int Max, int Sign)
1252 :			{
1253 :	edgomez	1382	static const double ILimits[5] = { 1., 0.06, 0.02, 0.015, 0.0015 };
1254 :			int Loops = 10000;
1255 :			int i, m, n;
1256 :			DECLARE_ALIGNED_MATRIX(Blk0, 8, 8, short, 16); /* reference */
1257 :			DECLARE_ALIGNED_MATRIX(Blk, 8, 8, short, 16);
1258 :			DECLARE_ALIGNED_MATRIX(iBlk, 8, 8, short, 16);
1259 :			DECLARE_ALIGNED_MATRIX(Ref_FDCT, 8, 8, short, 16);
1260 :			DECLARE_ALIGNED_MATRIX(Ref_IDCT, 8, 8, short, 16);
1261 :	Isibaar	262
1262 :	edgomez	1382	STATS_8x8 FStats; /* forward dct stats */
1263 :			STATS_8x8 IStats; /* inverse dct stats */
1264 :	Isibaar	262
1265 :	edgomez	1382	CPU *cpu;
1266 :	Isibaar	262
1267 :	edgomez	1382	init_ref_dct();
1268 :	Isibaar	262
1269 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
1270 :			{
1271 :			if (!init_cpu(cpu))
1272 :			continue;
1273 :	Isibaar	262
1274 :	edgomez	1382	printf( "\n===== IEEE test for %s ==== (Min=%d Max=%d Sign=%d Loops=%d)\n",
1275 :			cpu->name, Min, Max, Sign, Loops);
1276 :	Isibaar	262
1277 :	edgomez	1382	init_stats(&IStats);
1278 :			init_stats(&FStats);
1279 :	Isibaar	262
1280 :	edgomez	1382	ieee_reseed(1);
1281 :			for(n=0; n<Loops; ++n)
1282 :			{
1283 :			for(i=0; i<64; ++i)
1284 :			Blk0[i] = (short)ieee_rand(Min,Max) * Sign;
1285 :	Isibaar	262
1286 :	edgomez	1382	/* hmm, I'm not quite sure this is exactly */
1287 :			/* the tests described in the norm. check... */
1288 :	Isibaar	262
1289 :	edgomez	1382	memcpy(Ref_FDCT, Blk0, 64*sizeof(short));
1290 :			ref_fdct(Ref_FDCT);
1291 :			for(i=0; i<64; i++) CLAMP( Ref_FDCT[i], 2048 );
1292 :	Isibaar	262
1293 :	edgomez	1382	memcpy(Blk, Blk0, 64*sizeof(short));
1294 :			emms(); fdct(Blk); emms();
1295 :			for(i=0; i<64; i++) CLAMP( Blk[i], 2048 );
1296 :	Isibaar	262
1297 :	edgomez	1382	store_stats(&FStats, Blk, Ref_FDCT);
1298 :	Isibaar	262
1299 :
1300 :	edgomez	1382	memcpy(Ref_IDCT, Ref_FDCT, 64*sizeof(short));
1301 :			ref_idct(Ref_IDCT);
1302 :			for (i=0; i<64; i++) CLAMP( Ref_IDCT[i], 256 );
1303 :	Isibaar	262
1304 :	edgomez	1382	memcpy(iBlk, Ref_FDCT, 64*sizeof(short));
1305 :			emms(); idct(iBlk); emms();
1306 :			for(i=0; i<64; i++) CLAMP( iBlk[i], 256 );
1307 :	Isibaar	262
1308 :	edgomez	1382	store_stats(&IStats, iBlk, Ref_IDCT);
1309 :			}
1310 :	Isibaar	262
1311 :
1312 :	edgomez	1382	printf( "\n -- FDCT report --\n" );
1313 :	edgomez	851	// print_stats(&FStats);
1314 :	edgomez	1382	report_stats(&FStats, 0); /* so far I know, IEEE1180 says nothing for fdct */
1315 :	Isibaar	262
1316 :	edgomez	1382	for(i=0; i<64; i++) Blk[i] = 0;
1317 :			emms(); fdct(Blk); emms();
1318 :			for(m=i=0; i<64; i++) if (Blk[i]!=0) m++;
1319 :			printf( "FDCT(0) == 0 ? %s\n", (m!=0) ? "NOPE!" : "yup." );
1320 :	Isibaar	262
1321 :	edgomez	1382	printf( "\n -- IDCT report --\n" );
1322 :	edgomez	851	// print_stats(&IStats);
1323 :	edgomez	1382	report_stats(&IStats, ILimits);
1324 :	Isibaar	262
1325 :
1326 :	edgomez	1382	for(i=0; i<64; i++) Blk[i] = 0;
1327 :			emms(); idct(Blk); emms();
1328 :			for(m=i=0; i<64; i++) if (Blk[i]!=0) m++;
1329 :			printf( "IDCT(0) == 0 ? %s\n", (m!=0) ? "NOPE!" : "yup." );
1330 :			}
1331 :	Isibaar	262	}
1332 :
1333 :
1334 :			void test_dct_saturation(int Min, int Max)
1335 :			{
1336 :	edgomez	1382	/* test behaviour on input range fringe */
1337 :	Isibaar	262
1338 :	edgomez	1382	int i, n, p;
1339 :			CPU *cpu;
1340 :			// const short IDCT_MAX = 2047; /* 12bits input */
1341 :	edgomez	851	// const short IDCT_MIN = -2048;
1342 :	edgomez	1382	// const short IDCT_OUT = 256; /* 9bits ouput */
1343 :			const int Partitions = 4;
1344 :			const int Loops = 10000 / Partitions;
1345 :	Isibaar	262
1346 :	edgomez	1382	init_ref_dct();
1347 :	Isibaar	262
1348 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
1349 :			{
1350 :			short Blk0[64], Blk[64];
1351 :			STATS_8x8 Stats;
1352 :	Isibaar	262
1353 :	edgomez	1382	if (!init_cpu(cpu))
1354 :			continue;
1355 :	Isibaar	262
1356 :	edgomez	1382	printf( "\n===== IEEE test for %s Min=%d Max=%d =====\n",
1357 :			cpu->name, Min, Max );
1358 :	Isibaar	262
1359 :	edgomez	1382	/* FDCT tests // */
1360 :	Isibaar	262
1361 :	edgomez	1382	init_stats(&Stats);
1362 :	Isibaar	262
1363 :	edgomez	1382	/* test each computation channels separately */
1364 :			for(i=0; i<64; i++) Blk[i] = Blk0[i] = ((i/8)==(i%8)) ? Max : 0;
1365 :			ref_fdct(Blk0);
1366 :			emms(); fdct(Blk); emms();
1367 :			store_stats(&Stats, Blk, Blk0);
1368 :	Isibaar	262
1369 :	edgomez	1382	for(i=0; i<64; i++) Blk[i] = Blk0[i] = ((i/8)==(i%8)) ? Min : 0;
1370 :			ref_fdct(Blk0);
1371 :			emms(); fdct(Blk); emms();
1372 :			store_stats(&Stats, Blk, Blk0);
1373 :	Isibaar	262
1374 :	edgomez	1382	/* randomly saturated inputs */
1375 :			for(p=0; p<Partitions; ++p)
1376 :			{
1377 :			for(n=0; n<Loops; ++n)
1378 :			{
1379 :			for(i=0; i<64; ++i)
1380 :			Blk0[i] = Blk[i] = (ieee_rand(0,Partitions)>=p)? Max : Min;
1381 :			ref_fdct(Blk0);
1382 :			emms(); fdct(Blk); emms();
1383 :			store_stats(&Stats, Blk, Blk0);
1384 :			}
1385 :			}
1386 :			printf( "\n -- FDCT saturation report --\n" );
1387 :			report_stats(&Stats, 0);
1388 :	Isibaar	262
1389 :
1390 :	edgomez	1382	/* IDCT tests // */
1391 :	Isibaar	262	#if 0
1392 :	edgomez	1382	/* no finished yet */
1393 :	Isibaar	262
1394 :	edgomez	1382	init_stats(&Stats);
1395 :	Isibaar	262
1396 :	edgomez	1382	/* test each computation channel separately */
1397 :			for(i=0; i<64; i++) Blk[i] = Blk0[i] = ((i/8)==(i%8)) ? IDCT_MAX : 0;
1398 :			ref_idct(Blk0);
1399 :			emms(); idct(Blk); emms();
1400 :			for(i=0; i<64; i++) { CLAMP(Blk0[i], IDCT_OUT); CLAMP(Blk[i], IDCT_OUT); }
1401 :			store_stats(&Stats, Blk, Blk0);
1402 :	Isibaar	262
1403 :	edgomez	1382	for(i=0; i<64; i++) Blk[i] = Blk0[i] = ((i/8)==(i%8)) ? IDCT_MIN : 0;
1404 :			ref_idct(Blk0);
1405 :			emms(); idct(Blk); emms();
1406 :			for(i=0; i<64; i++) { CLAMP(Blk0[i], IDCT_OUT); CLAMP(Blk[i], IDCT_OUT); }
1407 :			store_stats(&Stats, Blk, Blk0);
1408 :	Isibaar	262
1409 :	edgomez	1382	/* randomly saturated inputs */
1410 :			for(p=0; p<Partitions; ++p)
1411 :			{
1412 :			for(n=0; n<Loops; ++n)
1413 :			{
1414 :			for(i=0; i<64; ++i)
1415 :			Blk0[i] = Blk[i] = (ieee_rand(0,Partitions)>=p)? IDCT_MAX : IDCT_MIN;
1416 :			ref_idct(Blk0);
1417 :			emms(); idct(Blk); emms();
1418 :			for(i=0; i<64; i++) { CLAMP(Blk0[i],IDCT_OUT); CLAMP(Blk[i],IDCT_OUT); }
1419 :			store_stats(&Stats, Blk, Blk0);
1420 :			}
1421 :			}
1422 :	Isibaar	262
1423 :	edgomez	1382	printf( "\n -- IDCT saturation report --\n" );
1424 :			print_stats(&Stats);
1425 :			report_stats(&Stats, 0);
1426 :	Isibaar	262	#endif
1427 :	edgomez	1382	}
1428 :	Isibaar	262	}
1429 :
1430 :			/*********************************************************************
1431 :	Isibaar	225	* measure raw decoding speed
1432 :			*********************************************************************/
1433 :
1434 :	Skal	1614	void test_dec(const char *name, int width, int height, int ref_chksum)
1435 :	Isibaar	225	{
1436 :	edgomez	1382	FILE *f = 0;
1437 :			void *dechandle = 0;
1438 :			int xerr;
1439 :			xvid_gbl_init_t xinit;
1440 :			xvid_dec_create_t xparam;
1441 :			xvid_dec_frame_t xframe;
1442 :	Isibaar	225	double t = 0.;
1443 :			int nb = 0;
1444 :	edgomez	1382	uint8_t *buf = 0;
1445 :	Skal	1614	uint8_t *yuv_out = 0;
1446 :	edgomez	1382	int buf_size, pos;
1447 :			uint32_t chksum = 0;
1448 :	Skal	1614	int bps = (width+31) & ~31;
1449 :	Isibaar	225
1450 :	edgomez	1382	memset(&xinit, 0, sizeof(xinit));
1451 :	Skal	1614	xinit.cpu_flags = cpu_mask;
1452 :	edgomez	1382	xinit.version = XVID_VERSION;
1453 :			xvid_global(NULL, 0, &xinit, NULL);
1454 :	Isibaar	225
1455 :	edgomez	1382	memset(&xparam, 0, sizeof(xparam));
1456 :	Skal	1614	xparam.width = width;
1457 :	Isibaar	225	xparam.height = height;
1458 :	edgomez	1382	xparam.version = XVID_VERSION;
1459 :	Isibaar	225	xerr = xvid_decore(NULL, XVID_DEC_CREATE, &xparam, NULL);
1460 :	edgomez	1382	if (xerr==XVID_ERR_FAIL) {
1461 :	Skal	1614	printf("ERROR: can't init decoder (err=%d)\n", xerr);
1462 :	edgomez	1382	return;
1463 :	Isibaar	225	}
1464 :			dechandle = xparam.handle;
1465 :
1466 :
1467 :			f = fopen(name, "rb");
1468 :	edgomez	1382	if (f==0) {
1469 :	Skal	1614	printf( "ERROR: can't open file '%s'\n", name);
1470 :	edgomez	1382	return;
1471 :			}
1472 :			fseek(f, 0, SEEK_END);
1473 :			buf_size = ftell(f);
1474 :			fseek(f, 0, SEEK_SET);
1475 :			if (buf_size<=0) {
1476 :	Skal	1614	printf("ERROR: error while stating file\n");
1477 :	edgomez	1382	goto End;
1478 :			}
1479 :	Isibaar	225
1480 :	Skal	1614	buf = malloc(buf_size);
1481 :			yuv_out = calloc(1, bpsheight3/2 + 15);
1482 :			if (buf==0 \|\| yuv_out==0) {
1483 :			printf( "ERROR: malloc failed!\n" );
1484 :	edgomez	1382	goto End;
1485 :			}
1486 :	Isibaar	225
1487 :	edgomez	1382	if (fread(buf, buf_size, 1, f)!=1) {
1488 :	Skal	1614	printf( "ERROR: file-read failed\n" );
1489 :	edgomez	1382	goto End;
1490 :			}
1491 :	Isibaar	225
1492 :	edgomez	1382	nb = 0;
1493 :			pos = 0;
1494 :			t = -gettime_usec();
1495 :			while(1) {
1496 :	Skal	1614	int y;
1497 :
1498 :	edgomez	1382	memset(&xframe, 0, sizeof(xframe));
1499 :			xframe.version = XVID_VERSION;
1500 :			xframe.bitstream = buf + pos;
1501 :			xframe.length = buf_size - pos;
1502 :	Skal	1614	xframe.output.plane[0] = (uint8_t*)(((size_t)yuv_out + 15) & ~15);
1503 :	suxen_drol	1638	xframe.output.plane[1] = (uint8_t)xframe.output.plane[0] + bpsheight;
1504 :			xframe.output.plane[2] = (uint8_t*)xframe.output.plane[1] + bps/2;
1505 :	Skal	1614	xframe.output.stride[0] = bps;
1506 :			xframe.output.stride[1] = bps;
1507 :			xframe.output.stride[2] = bps;
1508 :			xframe.output.csp = XVID_CSP_I420;
1509 :	edgomez	1382	xerr = xvid_decore(dechandle, XVID_DEC_DECODE, &xframe, 0);
1510 :	Skal	1614	if (xerr<0) {
1511 :			printf("ERROR: decoding failed for frame #%d (err=%d)!\n", nb, xerr);
1512 :			break;
1513 :			}
1514 :			else if (xerr==0)
1515 :			break;
1516 :			else if (verbose>0) printf("#%d %d\n", nb, xerr );
1517 :
1518 :			pos += xerr;
1519 :	edgomez	1382	nb++;
1520 :	Skal	1614
1521 :			for(y=0; y<height/2; ++y) {
1522 :	suxen_drol	1638	chksum = calc_crc((uint8_t)xframe.output.plane[0] + (2y+0)*bps, width, chksum);
1523 :			chksum = calc_crc((uint8_t)xframe.output.plane[0] + (2y+1)*bps, width, chksum);
1524 :			chksum = calc_crc((uint8_t)xframe.output.plane[1] + ybps, width/2, chksum);
1525 :			chksum = calc_crc((uint8_t)xframe.output.plane[2] + ybps, width/2, chksum);
1526 :	edgomez	1382	}
1527 :			if (pos==buf_size)
1528 :			break;
1529 :			}
1530 :			t += gettime_usec();
1531 :	Skal	1614	if (ref_chksum==0) {
1532 :			if (t>0.)
1533 :			printf( "%d frames decoded in %.3f s -> %.1f FPS Checksum:0x%.8x\n", nb, t1.e-6f, (float)(nb1.e6f/t), chksum );
1534 :			}
1535 :			else {
1536 :			printf("FPS:%.1f Checksum: 0x%.8x Expected:0x%.8x \| %s\n",
1537 :			t>0. ? (float)(nb*1.e6f/t) : 0.f, chksum, ref_chksum, (chksum==ref_chksum) ? "OK" : "ERROR");
1538 :			}
1539 :	Isibaar	225
1540 :	edgomez	1382	End:
1541 :	Skal	1614	if (yuv_out!=0) free(yuv_out);
1542 :	edgomez	1382	if (buf!=0) free(buf);
1543 :			if (dechandle!=0) {
1544 :			xerr= xvid_decore(dechandle, XVID_DEC_DESTROY, NULL, NULL);
1545 :			if (xerr==XVID_ERR_FAIL)
1546 :	Skal	1614	printf("ERROR: destroy-decoder failed (err=%d)!\n", xerr);
1547 :	edgomez	1382	}
1548 :			if (f!=0) fclose(f);
1549 :	Isibaar	225	}
1550 :
1551 :			/*********************************************************************
1552 :			* non-regression tests
1553 :			*********************************************************************/
1554 :
1555 :			void test_bugs1()
1556 :			{
1557 :	edgomez	1382	CPU *cpu;
1558 :			uint16_t mpeg_quant_matrices[64*8];
1559 :	Isibaar	225
1560 :	edgomez	1382	printf( "\n ===== (de)quant4_intra saturation bug? =====\n" );
1561 :	Isibaar	225
1562 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
1563 :			{
1564 :			int i;
1565 :			int16_t Src[88], Dst[88];
1566 :	Isibaar	225
1567 :	edgomez	1382	if (!init_cpu(cpu))
1568 :			continue;
1569 :	Isibaar	225
1570 :	edgomez	1382	for(i=0; i<64; ++i) Src[i] = i-32;
1571 :			set_intra_matrix( mpeg_quant_matrices, get_default_intra_matrix() );
1572 :			dequant_mpeg_intra(Dst, Src, 31, 5, mpeg_quant_matrices);
1573 :			printf( "dequant_mpeg_intra with CPU=%s: ", cpu->name);
1574 :			printf( " Out[]= " );
1575 :			for(i=0; i<64; ++i) printf( "[%d]", Dst[i]);
1576 :			printf( "\n" );
1577 :			}
1578 :	Isibaar	225
1579 :	edgomez	1382	printf( "\n ===== (de)quant4_inter saturation bug? =====\n" );
1580 :	Isibaar	225
1581 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
1582 :			{
1583 :			int i;
1584 :			int16_t Src[88], Dst[88];
1585 :	Isibaar	225
1586 :	edgomez	1382	if (!init_cpu(cpu))
1587 :			continue;
1588 :	Isibaar	225
1589 :	edgomez	1382	for(i=0; i<64; ++i) Src[i] = i-32;
1590 :			set_inter_matrix( mpeg_quant_matrices, get_default_inter_matrix() );
1591 :			dequant_mpeg_inter(Dst, Src, 31, mpeg_quant_matrices);
1592 :			printf( "dequant_mpeg_inter with CPU=%s: ", cpu->name);
1593 :			printf( " Out[]= " );
1594 :			for(i=0; i<64; ++i) printf( "[%d]", Dst[i]);
1595 :			printf( "\n" );
1596 :			}
1597 :	Isibaar	225	}
1598 :
1599 :			void test_dct_precision_diffs()
1600 :			{
1601 :	edgomez	1382	CPU *cpu;
1602 :			DECLARE_ALIGNED_MATRIX(Blk, 8, 8, int16_t, 16);
1603 :			DECLARE_ALIGNED_MATRIX(Blk0, 8, 8, int16_t, 16);
1604 :	Isibaar	225
1605 :	edgomez	1382	printf( "\n ===== fdct/idct precision diffs =====\n" );
1606 :	Isibaar	225
1607 :	edgomez	1382	for(cpu = cpu_list; cpu->name!=0; ++cpu)
1608 :			{
1609 :			int i;
1610 :	Isibaar	225
1611 :	edgomez	1382	if (!init_cpu(cpu))
1612 :			continue;
1613 :	Isibaar	225
1614 :	edgomez	1382	for(i=0; i<8*8; ++i) {
1615 :			Blk0[i] = (i7-ii) & 0x7f;
1616 :			Blk[i] = Blk0[i];
1617 :			}
1618 :	Isibaar	225
1619 :	edgomez	1382	fdct(Blk);
1620 :			idct(Blk);
1621 :			printf( " fdct+idct diffs with CPU=%s: \n", cpu->name );
1622 :			for(i=0; i<8; ++i) {
1623 :			int j;
1624 :			for(j=0; j<8; ++j) printf( " %d ", Blk[i8+j]-Blk0[i8+j]);
1625 :			printf("\n");
1626 :			}
1627 :			printf("\n");
1628 :			}
1629 :	Isibaar	225	}
1630 :
1631 :	Isibaar	262	void test_quant_bug()
1632 :			{
1633 :	edgomez	1382	const int max_Q = 31;
1634 :			int i, n, qm, q;
1635 :			CPU *cpu;
1636 :			DECLARE_ALIGNED_MATRIX(Src, 8, 8, int16_t, 16);
1637 :			DECLARE_ALIGNED_MATRIX(Dst, 8, 8, int16_t, 16);
1638 :			uint8_t Quant[8*8];
1639 :			CPU cpu_bug_list[] = { { "PLAINC", 0 }, { "MMX ", XVID_CPU_MMX }, {0,0} };
1640 :			uint16_t Crcs_Inter[2][32];
1641 :			uint16_t Crcs_Intra[2][32];
1642 :			DECLARE_ALIGNED_MATRIX(mpeg_quant_matrices, 8, 64, uint16_t, 16);
1643 :	Isibaar	225
1644 :	edgomez	1382	printf( "\n ===== test MPEG4-quantize bug =====\n" );
1645 :	Isibaar	262
1646 :	edgomez	1382	for(i=0; i<64; ++i) Src[i] = 2048*(i-32)/32;
1647 :
1648 :	Isibaar	262	#if 1
1649 :	edgomez	1382	for(qm=1; qm<=255; ++qm)
1650 :			{
1651 :			for(i=0; i<8*8; ++i) Quant[i] = qm;
1652 :			set_inter_matrix( mpeg_quant_matrices, Quant );
1653 :	Isibaar	262
1654 :	edgomez	1382	for(n=0, cpu = cpu_bug_list; cpu->name!=0; ++cpu, ++n)
1655 :			{
1656 :			uint16_t s;
1657 :	Isibaar	262
1658 :	edgomez	1382	if (!init_cpu(cpu))
1659 :			continue;
1660 :	Isibaar	262
1661 :	edgomez	1382	for(q=1; q<=max_Q; ++q) {
1662 :			emms();
1663 :			quant_mpeg_inter( Dst, Src, q, mpeg_quant_matrices );
1664 :			emms();
1665 :			for(s=0, i=0; i<64; ++i) s+=((uint16_t)Dst[i])^i;
1666 :			Crcs_Inter[n][q] = s;
1667 :			}
1668 :			}
1669 :	Isibaar	262
1670 :	edgomez	1382	for(q=1; q<=max_Q; ++q)
1671 :			for(i=0; i<n-1; ++i)
1672 :			if (Crcs_Inter[i][q]!=Crcs_Inter[i+1][q])
1673 :			printf( "Discrepancy Inter: qm=%d, q=%d -> %d/%d !\n",
1674 :			qm, q, Crcs_Inter[i][q], Crcs_Inter[i+1][q]);
1675 :			}
1676 :	Isibaar	262	#endif
1677 :
1678 :			#if 1
1679 :	edgomez	1382	for(qm=1; qm<=255; ++qm)
1680 :			{
1681 :			for(i=0; i<8*8; ++i) Quant[i] = qm;
1682 :			set_intra_matrix( mpeg_quant_matrices, Quant );
1683 :	Isibaar	262
1684 :	edgomez	1382	for(n=0, cpu = cpu_bug_list; cpu->name!=0; ++cpu, ++n)
1685 :			{
1686 :			uint16_t s;
1687 :	Isibaar	262
1688 :	edgomez	1382	if (!init_cpu(cpu))
1689 :			continue;
1690 :	Isibaar	262
1691 :	edgomez	1382	for(q=1; q<=max_Q; ++q) {
1692 :			emms();
1693 :			quant_mpeg_intra( Dst, Src, q, q, mpeg_quant_matrices);
1694 :			emms();
1695 :			for(s=0, i=0; i<64; ++i) s+=((uint16_t)Dst[i])^i;
1696 :			Crcs_Intra[n][q] = s;
1697 :			}
1698 :			}
1699 :	Isibaar	262
1700 :	edgomez	1382	for(q=1; q<=max_Q; ++q)
1701 :			for(i=0; i<n-1; ++i)
1702 :			if (Crcs_Intra[i][q]!=Crcs_Intra[i+1][q])
1703 :			printf( "Discrepancy Intra: qm=%d, q=%d -> %d/%d!\n",
1704 :			qm, q, Crcs_Inter[i][q], Crcs_Inter[i+1][q]);
1705 :			}
1706 :	Isibaar	262	#endif
1707 :			}
1708 :	Skal	1707
1709 :			/*********************************************************************
1710 :			* test some YUV func
1711 :			*********************************************************************/
1712 :
1713 :			#define ENTER \
1714 :			for(i=0; i<(int)sizeof(Dst0); ++i) Dst0[0][i] = 0; \
1715 :			t = gettime_usec(); \
1716 :			emms();
1717 :
1718 :			#define LEAVE \
1719 :			emms(); \
1720 :			t = (gettime_usec() - t) / nb_tests; \
1721 :			iCrc = calc_crc((uint8_t*)Dst0, sizeof(Dst0), CRC32_INITIAL)
1722 :
1723 :			#define TEST_YUYV(FUNC, S) \
1724 :			ENTER \
1725 :			for(tst=0; tst<nb_tests; ++tst) (FUNC)(Dst0[0], S*WIDTH, Src0[0], Src0[1], Src0[2], WIDTH, WIDTH/2, WIDTH, HEIGHT, 0); \
1726 :			LEAVE
1727 :
1728 :	Skal	1742	#define WIDTH 128
1729 :			#define HEIGHT 32
1730 :	Skal	1707	void test_yuv()
1731 :			{
1732 :			const int nb_tests = 200*speed_ref;
1733 :			CPU *cpu;
1734 :			uint8_t Src0[3][WIDTH*HEIGHT];
1735 :			uint8_t Dst0[4][WIDTH*HEIGHT];
1736 :			int i, j;
1737 :			double t;
1738 :			int tst, iCrc;
1739 :
1740 :			colorspace_init();
1741 :			ieee_reseed(1);
1742 :			for(i=0; i<(int)sizeof(Src0); ++i) Src0[0][i] = ieee_rand(0,255);
1743 :	Skal	1742	for(i=0; i<(int)sizeof(Dst0); ++i) Dst0[0][i] = 0x5a;
1744 :	Skal	1707
1745 :			printf( "\n === test YUV ===\n" );
1746 :
1747 :			init_cpu(&cpu_list[0]);
1748 :			TEST_YUYV(yv12_to_yuyv_c, 4);
1749 :			printf(" yv12_to_yuyv_c %.3f usec crc32=0x%08x %s\n",
1750 :			t, iCrc, (iCrc!=0xeb1a0b0a)?"\| ERROR": "" );
1751 :			TEST_YUYV(yv12_to_uyvy_c, 4);
1752 :			printf(" yv12_to_uyvy_c %.3f usec crc32=0x%08x %s\n",
1753 :			t, iCrc, (iCrc!=0x6e82f55b)?"\| ERROR": "" );
1754 :
1755 :			#ifdef ARCH_IS_IA32
1756 :			init_cpu(&cpu_list[1]);
1757 :			TEST_YUYV(yv12_to_yuyv_mmx, 4);
1758 :			printf(" yv12_to_yuyv_mmx %.3f usec crc32=0x%08x %s\n",
1759 :			t, iCrc, (iCrc!=0xeb1a0b0a)?"\| ERROR": "" );
1760 :
1761 :			TEST_YUYV(yv12_to_uyvy_mmx, 4);
1762 :			printf(" yv12_to_uyvy_mmx %.3f usec crc32=0x%08x %s\n",
1763 :			t, iCrc, (iCrc!=0x6e82f55b)?"\| ERROR": "" );
1764 :			#endif
1765 :
1766 :			#ifdef ARCH_IS_PPC
1767 :			init_cpu(&cpu_list[1]);
1768 :			TEST_YUYV(yv12_to_yuyv_altivec_c, 4);
1769 :			printf(" yv12_to_yuyv_altivec_c %.3f usec crc32=0x%08x %s\n",
1770 :			t, iCrc, (iCrc!=0xeb1a0b0a)?"\| ERROR": "" );
1771 :
1772 :			TEST_YUYV(yv12_to_uyvy_altivec_c, 4);
1773 :			printf(" yv12_to_uyvy_altivec_c %.3f usec crc32=0x%08x %s\n",
1774 :			t, iCrc, (iCrc!=0x6e82f55b)?"\| ERROR": "" );
1775 :			#endif
1776 :			printf( " --- \n" );
1777 :			}
1778 :	Skal	1742
1779 :			#define TEST_YV2(FUNC, WITH_UV, WITH_FLIP) \
1780 :			ENTER \
1781 :			for(tst=0; tst<nb_tests; ++tst) (FUNC)(Dst0[0], Dst0[1], Dst0[2], WIDTH, WIDTH, \
1782 :			Src0[0], (WITH_UV) ? Src0[1] : 0, (WITH_UV) ? Src0[2] : 0, WIDTH, WIDTH, \
1783 :			WIDTH-2, HEIGHT-2, WITH_FLIP); \
1784 :			LEAVE
1785 :
1786 :			#define PRINT_NxN(DATA,W,H,STR) { \
1787 :			int i,j; \
1788 :			for(j=0; j<(H); ++j) { \
1789 :			for(i=0; i<(W); ++i) printf( "0x%.2x ", (DATA)[i+j*(STR)] );\
1790 :			printf("\n"); \
1791 :			} \
1792 :			printf("---\n"); \
1793 :			}
1794 :
1795 :			static const int yv12_CRCs[2][2] = {
1796 :			{0x5cab7cf0,0xdab46541}
1797 :			, {0xe8bae865,0x1faf77b7}
1798 :			};
1799 :
1800 :			void test_yuv2()
1801 :			{
1802 :			const int nb_tests = 800*speed_ref;
1803 :			CPU *cpu;
1804 :			uint8_t Src0[3][WIDTH*HEIGHT];
1805 :			uint8_t Dst0[3][WIDTH*HEIGHT];
1806 :			int with_uv, with_flip;
1807 :			int i, j;
1808 :			double t;
1809 :			int tst, iCrc;
1810 :
1811 :			colorspace_init();
1812 :			ieee_reseed(1);
1813 :			for(i=0; i<(int)sizeof(Src0); ++i) Src0[0][i] = ieee_rand(0,255);
1814 :
1815 :			printf( "\n === test YV2 ===\n" );
1816 :			for(with_flip=0; with_flip<=1; ++with_flip) {
1817 :			for(with_uv=0; with_uv<=1; ++with_uv) {
1818 :			init_cpu(&cpu_list[0]);
1819 :			TEST_YV2(yv12_to_yv12_c, with_uv, with_flip);
1820 :			printf(" yv12_to_yv12_c %.3f usec \tcrc32=0x%08x %s\n",
1821 :			t, iCrc, (iCrc!=yv12_CRCs[with_flip][with_uv])?"\| ERROR": "" );
1822 :			/* if (!with_uv) PRINT_NxN(Dst0[1], WIDTH/2, HEIGHT/2, WIDTH ); */
1823 :
1824 :			#ifdef ARCH_IS_IA32
1825 :			init_cpu(&cpu_list[1]);
1826 :			TEST_YV2(yv12_to_yv12_mmx, with_uv, with_flip);
1827 :			printf(" yv12_to_yv12_mmx %.3f usec \tcrc32=0x%08x %s\n",
1828 :			t, iCrc, (iCrc!=yv12_CRCs[with_flip][with_uv])?"\| ERROR": "" );
1829 :			/* if (!with_uv) PRINT_NxN(Dst0[1], WIDTH/2, HEIGHT/2, WIDTH ); */
1830 :
1831 :			TEST_YV2(yv12_to_yv12_xmm, with_uv, with_flip);
1832 :			printf(" yv12_to_yv12_xmm %.3f usec \tcrc32=0x%08x %s\n",
1833 :			t, iCrc, (iCrc!=yv12_CRCs[with_flip][with_uv])?"\| ERROR": "" );
1834 :			#endif
1835 :			}
1836 :
1837 :			printf( " --- \n" );
1838 :			}
1839 :			printf( " ===== \n" );
1840 :			}
1841 :
1842 :	Skal	1707	#undef WIDTH
1843 :			#undef HEIGHT
1844 :			#undef ENTER
1845 :			#undef LEAVE
1846 :
1847 :	Skal	1616	/*********************************************************************/
1848 :	Isibaar	262
1849 :	Skal	1616	static uint32_t __inline log2bin_v1(uint32_t value)
1850 :			{
1851 :			int n = 0;
1852 :			while (value) {
1853 :			value >>= 1;
1854 :			n++;
1855 :			}
1856 :			return n;
1857 :			}
1858 :
1859 :	Skal	1617	static const uint8_t log2_tab_16[16] = { 0, 1, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4 };
1860 :	Skal	1616
1861 :			static uint32_t __inline log2bin_v2(uint32_t value)
1862 :			{
1863 :			int n = 0;
1864 :			if (value & 0xffff0000) {
1865 :			value >>= 16;
1866 :			n += 16;
1867 :			}
1868 :			if (value & 0xff00) {
1869 :			value >>= 8;
1870 :			n += 8;
1871 :			}
1872 :			if (value & 0xf0) {
1873 :			value >>= 4;
1874 :			n += 4;
1875 :			}
1876 :			return n + log2_tab_16[value];
1877 :			}
1878 :
1879 :			void test_log2bin()
1880 :			{
1881 :			const int nb_tests = 3000*speed_ref;
1882 :			int n, crc1=0, crc2=0;
1883 :			uint32_t s, s0;
1884 :			double t1, t2;
1885 :
1886 :			t1 = gettime_usec();
1887 :			s0 = (int)(t1*31.241);
1888 :			for(s=s0, n=0; n<nb_tests; ++n, s=(s*12363+31)&0x7fffffff)
1889 :			crc1 += log2bin_v1(s);
1890 :			t1 = (gettime_usec()-t1) / nb_tests;
1891 :
1892 :			t2 = gettime_usec();
1893 :			for(s=s0, n=0; n<nb_tests; ++n, s=(s*12363+31)&0x7fffffff)
1894 :			crc2 += log2bin_v2(s);
1895 :			t2 = (gettime_usec() - t2) / nb_tests;
1896 :	Skal	1617
1897 :	Skal	1616	printf( "log2bin_v1: %.3f sec crc=%d\n", t1, crc1 );
1898 :			printf( "log2bin_v2: %.3f sec crc=%d\n", t2, crc2 );
1899 :			if (crc1!=crc2) printf( " CRC ERROR !\n" );
1900 :			}
1901 :
1902 :	Skal	1617	/*********************************************************************/
1903 :
1904 :			static void __inline old_gcd(int num, int den)
1905 :			{
1906 :			int i = *num;
1907 :			while (i > 1) {
1908 :			if (num % i == 0 && den % i == 0) {
1909 :			*num /= i;
1910 :			*den /= i;
1911 :			i = *num;
1912 :			continue;
1913 :			}
1914 :			i--;
1915 :			}
1916 :			}
1917 :
1918 :			static uint32_t gcd(int num, int den)
1919 :			{
1920 :			int tmp;
1921 :			while( (tmp=num%den) ) { num = den; den = tmp; }
1922 :			return den;
1923 :			}
1924 :			static void __inline new_gcd(int num, int den)
1925 :			{
1926 :			const int div = gcd(num, den);
1927 :			if (num) {
1928 :			*num /= div;
1929 :			*den /= div;
1930 :			}
1931 :			}
1932 :
1933 :			void test_gcd()
1934 :			{
1935 :			const int nb_tests = 10*speed_ref;
1936 :			int i;
1937 :			uint32_t crc1=0, crc2=0;
1938 :			uint32_t n0, n, d0, d;
1939 :			double t1, t2;
1940 :
1941 :			t1 = gettime_usec();
1942 :			n0 = 0xfffff & (int)(t1*31.241);
1943 :			d0 = 0xfffff & (int)( ((n0*4123)%17) \| 1 );
1944 :			for(n=n0, d=d0, i=0; i<nb_tests; ++i) {
1945 :			old_gcd(&n, &d);
1946 :			crc1 = (((crc1>>4)^d) + ((crc1<<2)^n) ) & 0xffffff;
1947 :			n = d;
1948 :			d = (d*12363+31) & 0xffff;
1949 :			d \|= !d;
1950 :			}
1951 :			t1 = (gettime_usec()-t1) / nb_tests;
1952 :
1953 :			t2 = gettime_usec();
1954 :			for(n=n0, d=d0, i=0; i<nb_tests; ++i) {
1955 :			new_gcd(&n, &d);
1956 :			crc2 = (((crc2>>4)^d) + ((crc2<<2)^n) ) & 0xffffff;
1957 :			n = d;
1958 :			d = (d*12363+31) & 0xffff;
1959 :			d \|= !d;
1960 :			}
1961 :			t2 = (gettime_usec() - t2) / nb_tests;
1962 :
1963 :			printf( "old_gcd: %.3f sec crc=%d\n", t1, crc1 );
1964 :			printf( "new_gcd: %.3f sec crc=%d\n", t2, crc2 );
1965 :			if (crc1!=crc2) printf( " CRC ERROR !\n" );
1966 :			}
1967 :
1968 :	Isibaar	225	/*********************************************************************
1969 :	Skal	1651	* test compiler
1970 :			*********************************************************************/
1971 :
1972 :			void test_compiler() {
1973 :			int nb_err = 0;
1974 :			int32_t v;
1975 :			if (sizeof(uint16_t)<2) {
1976 :	Skal	1652	printf( "ERROR: sizeof(uint16_t)<2 !!\n" );
1977 :	Skal	1651	nb_err++;
1978 :			}
1979 :			if (sizeof(int16_t)<2) {
1980 :	Skal	1652	printf( "ERROR: sizeof(int16_t)<2 !!\n" );
1981 :	Skal	1651	nb_err++;
1982 :			}
1983 :			if (sizeof(uint8_t)!=1) {
1984 :	Skal	1652	printf( "ERROR: sizeof(uint8_t)!=1 !!\n" );
1985 :	Skal	1651	nb_err++;
1986 :			}
1987 :			if (sizeof(int8_t)!=1) {
1988 :	Skal	1652	printf( "ERROR: sizeof(int8_t)!=1 !!\n" );
1989 :	Skal	1651	nb_err++;
1990 :			}
1991 :			if (sizeof(uint32_t)<4) {
1992 :	Skal	1652	printf( "ERROR: sizeof(uint32_t)<4 !!\n" );
1993 :	Skal	1651	nb_err++;
1994 :			}
1995 :			if (sizeof(int32_t)<4) {
1996 :	Skal	1652	printf( "ERROR: sizeof(int32_t)<4 !!\n" );
1997 :	Skal	1651	nb_err++;
1998 :			}
1999 :			/* yes, i know, this test is silly. But better be safe than sorry. :) */
2000 :			for(v=1000; v>=0; v--) {
2001 :			if ( (v>>2) != v/4)
2002 :			nb_err++;
2003 :			}
2004 :			for(v=-1000; v!=-1; v++) {
2005 :			if ( (v>>2) != (v/4)-!!(v%4))
2006 :			nb_err++;
2007 :			}
2008 :			if (nb_err!=0) {
2009 :			printf( "ERROR! please post your platform/compiler specs to xvid-devel@xvid.org !\n" );
2010 :			}
2011 :			}
2012 :	Skal	1731	/*********************************************************************
2013 :			* test SSIM functions
2014 :			*********************************************************************/
2015 :	Skal	1651
2016 :	Skal	1731	typedef int (lumfunc)(uint8_t ptr, int stride);
2017 :			typedef void (csfunc)(uint8_t ptro, uint8_t* ptrc, int stride, int lumo, int lumc, int* pdevo, int* pdevc, int* pcorr);
2018 :
2019 :			extern int lum_8x8_c(uint8_t* ptr, int stride);
2020 :			extern int lum_8x8_mmx(uint8_t* ptr, int stride);
2021 :			extern int lum_2x8_c(uint8_t* ptr, int stride);
2022 :	Skal	1743	extern void consim_c(uint8_t* ptro, uint8_t* ptrc, int stride, int lumo, int lumc, int* pdevo, int* pdevc, int* pcorr);
2023 :	Skal	1731	extern void consim_mmx(uint8_t* ptro, uint8_t* ptrc, int stride, int lumo, int lumc, int* pdevo, int* pdevc, int* pcorr);
2024 :			extern void consim_sse2(uint8_t* ptro, uint8_t* ptrc, int stride, int lumo, int lumc, int* pdevo, int* pdevc, int* pcorr);
2025 :
2026 :			void test_SSIM()
2027 :			{
2028 :			const int nb_tests = 3000*speed_ref;
2029 :			int tst;
2030 :			CPU *cpu;
2031 :			int i;
2032 :			int devs[3];
2033 :			long lumo, lumc;
2034 :			DECLARE_ALIGNED_MATRIX(Ref1, 16, 16, uint8_t, 16);
2035 :			DECLARE_ALIGNED_MATRIX(Ref2, 16, 16, uint8_t, 16);
2036 :			lumfunc lum8x8;
2037 :			lumfunc lum2x8;
2038 :			csfunc csim;
2039 :
2040 :			ieee_reseed(1);
2041 :			printf( "\n ====== test SSIM ======\n" );
2042 :			for(i=0; i<16*16;++i) {
2043 :			long v1, v2;
2044 :			v1 = ieee_rand(-256, 511);
2045 :			v2 = ieee_rand(-256, 511);
2046 :			Ref1[i] = (v1<0) ? 0 : (v1>255) ? 255 : v1;
2047 :			Ref2[i] = (v2<0) ? 0 : (v2>255) ? 255 : v2;
2048 :			}
2049 :			lumc = ieee_rand(0, 255);
2050 :			lumo = ieee_rand(0, 255);
2051 :
2052 :			for(cpu = cpu_list; cpu->name!=0; ++cpu)
2053 :			{
2054 :			double t;
2055 :			int m;
2056 :			if (!init_cpu(cpu))
2057 :			continue;
2058 :			lum8x8 = lum_8x8_c;
2059 :			lum2x8 = lum_2x8_c;
2060 :	Skal	1743	csim = consim_c;
2061 :	Skal	1731	if (cpu->cpu & XVID_CPU_MMX){
2062 :			lum8x8 = lum_8x8_mmx;
2063 :			csim = consim_mmx;
2064 :			}
2065 :			if (cpu->cpu & XVID_CPU_MMX){
2066 :			csim = consim_sse2;
2067 :			}
2068 :
2069 :			t = gettime_usec();
2070 :			emms();
2071 :			for(tst=0; tst<nb_tests; ++tst) m = lum8x8(Ref1, 16);
2072 :			emms();
2073 :			t = (gettime_usec() - t) / nb_tests;
2074 :			printf("%s - ssim-lum8x8 %.3f usec m=%d %s\n",
2075 :			cpu->name, t, m,
2076 :			(m!=8230)?"\| ERROR": "" );
2077 :
2078 :			t = gettime_usec();
2079 :			emms();
2080 :	Skal	1738	for(tst=0; tst<nb_tests; ++tst) m = lum2x8(Ref1+8, 16);
2081 :	Skal	1731	emms();
2082 :			t = (gettime_usec() - t) / nb_tests;
2083 :			printf("%s - ssim-lum2x8 %.3f usec m=%d %s\n",
2084 :			cpu->name, t, m,
2085 :	Skal	1738	(m!=681)?"\| ERROR": "" );
2086 :	Skal	1731
2087 :			t = gettime_usec();
2088 :			emms();
2089 :			for(tst=0; tst<nb_tests; ++tst) csim(Ref1, Ref2, 16, lumo, lumc, devs+0, devs+1, devs+2);
2090 :			emms();
2091 :			t = (gettime_usec() - t) / nb_tests;
2092 :	Skal	1737	printf("%s - ssim-consim %.3f usec devs=[0x%x 0x%x 0x%x] %s\n",
2093 :	Skal	1731	cpu->name, t, devs[0], devs[1], devs[2],
2094 :	Skal	1743	(devs[0]!=0x1bdf0f \|\| devs[1]!=0x137258 \|\| devs[2]!=0xcdb13)?"\| ERROR": "" );
2095 :	Skal	1731	printf( " --- \n" );
2096 :			}
2097 :			}
2098 :
2099 :	Skal	1651	/*********************************************************************
2100 :	Isibaar	225	* main
2101 :			*********************************************************************/
2102 :
2103 :	Skal	1614	static void arg_missing(const char *opt)
2104 :	Isibaar	225	{
2105 :	Skal	1614	printf( "missing argument after option '%s'\n", opt);
2106 :			exit(-1);
2107 :			}
2108 :
2109 :			int main(int argc, const char *argv[])
2110 :			{
2111 :			int c, what = 0;
2112 :			int width, height;
2113 :			uint32_t chksum = 0;
2114 :			const char * test_bitstream = 0;
2115 :
2116 :			cpu_mask = 0; // default => will use autodectect
2117 :			for(c=1; c<argc; ++c)
2118 :			{
2119 :			if (!strcmp(argv[c], "-v")) verbose++;
2120 :			else if (!strcmp(argv[c], "-c")) cpu_mask = 0 /* PLAIN_C */ \| XVID_CPU_FORCE;
2121 :			else if (!strcmp(argv[c], "-mmx")) cpu_mask = XVID_CPU_MMX \| XVID_CPU_FORCE;
2122 :			else if (!strcmp(argv[c], "-mmxext")) cpu_mask = XVID_CPU_MMXEXT \| XVID_CPU_MMX \| XVID_CPU_FORCE;
2123 :	Skal	1618	else if (!strcmp(argv[c], "-sse2")) cpu_mask = XVID_CPU_SSE2 \| XVID_CPU_MMXEXT \| XVID_CPU_MMX \| XVID_CPU_FORCE;
2124 :	Skal	1614	else if (!strcmp(argv[c], "-3dnow")) cpu_mask = XVID_CPU_3DNOW \| XVID_CPU_FORCE;
2125 :			else if (!strcmp(argv[c], "-3dnowe")) cpu_mask = XVID_CPU_3DNOW \| XVID_CPU_3DNOWEXT \| XVID_CPU_FORCE;
2126 :			else if (!strcmp(argv[c], "-altivec")) cpu_mask = XVID_CPU_ALTIVEC \| XVID_CPU_FORCE;
2127 :			else if (!strcmp(argv[c], "-spd")) {
2128 :			if (++c==argc) arg_missing( argv[argc-1] );
2129 :			speed_ref = atoi(argv[c]);
2130 :			}
2131 :			else if (argv[c][0]!='-') {
2132 :			what = atoi(argv[c]);
2133 :			if (what==9) {
2134 :			if (c+4>argc) {
2135 :			printf("usage: %s %d bitstream width height (checksum)\n", argv[0], what);
2136 :			exit(-1);
2137 :			}
2138 :			test_bitstream = argv[++c];
2139 :			width = atoi(argv[++c]);
2140 :			height = atoi(argv[++c]);
2141 :			if (c+1<argc && argv[c+1][0]!='-') {
2142 :			if (sscanf(argv[c+1], "0x%x", &chksum)!=1) {
2143 :			printf( "can't read checksum value.\n" );
2144 :			exit(-1);
2145 :			}
2146 :			else c++;
2147 :			}
2148 :			// printf( "[%s] %dx%d (0x%.8x)\n", test_bitstream, width, height, chksum);
2149 :			}
2150 :			}
2151 :			else {
2152 :			printf( "unrecognized option '%s'\n", argv[c]);
2153 :			exit(-1);
2154 :			}
2155 :			}
2156 :
2157 :
2158 :	edgomez	1382	if (what==0 \|\| what==1) test_dct();
2159 :			if (what==0 \|\| what==2) test_mb();
2160 :			if (what==0 \|\| what==3) test_sad();
2161 :			if (what==0 \|\| what==4) test_transfer();
2162 :			if (what==0 \|\| what==5) test_quant();
2163 :			if (what==0 \|\| what==6) test_cbp();
2164 :	edgomez	1424	if (what==0 \|\| what==10) test_sse();
2165 :	Skal	1616	if (what==0 \|\| what==11) test_log2bin();
2166 :	Skal	1617	if (what==0 \|\| what==12) test_gcd();
2167 :	Skal	1651	if (what==0 \|\| what==13) test_compiler();
2168 :	Skal	1707	if (what==0 \|\| what==14) test_yuv();
2169 :	Skal	1731	if (what==0 \|\| what==15) test_SSIM();
2170 :	Skal	1742	if (what==0 \|\| what==16) test_yuv2();
2171 :	Isibaar	225
2172 :	Skal	1616
2173 :	edgomez	1382	if (what==7) {
2174 :			test_IEEE1180_compliance(-256, 255, 1);
2175 :			test_IEEE1180_compliance(-256, 255,-1);
2176 :			test_IEEE1180_compliance( -5, 5, 1);
2177 :			test_IEEE1180_compliance( -5, 5,-1);
2178 :			test_IEEE1180_compliance(-300, 300, 1);
2179 :			test_IEEE1180_compliance(-300, 300,-1);
2180 :			}
2181 :			if (what==8) test_dct_saturation(-256, 255);
2182 :	Isibaar	262
2183 :	Skal	1614	if (test_bitstream)
2184 :			test_dec(test_bitstream, width, height, chksum);
2185 :	edgomez	1382	if (what==-1) {
2186 :			test_dct_precision_diffs();
2187 :			test_bugs1();
2188 :			}
2189 :			if (what==-2)
2190 :			test_quant_bug();
2191 :	Isibaar	262
2192 :	edgomez	1424	if ((what >= 0 && what <= 6) \|\| what == 10) {
2193 :	edgomez	1382	printf("\n\n"
2194 :			"NB: If a function isn't optimised for a specific set of intructions,\n"
2195 :			" a C function is used instead. So don't panic if some functions\n"
2196 :			" may appear to be slow.\n");
2197 :			}
2198 :
2199 :			#ifdef ARCH_IS_IA32
2200 :			if (what == 0 \|\| what == 5) {
2201 :			printf("\n"
2202 :			"NB: MMX mpeg4 quantization is known to have very small errors (+/-1 magnitude)\n"
2203 :			" for 1 or 2 coefficients a block. This is mainly caused by the fact the unit\n"
2204 :			" test goes far behind the usual limits of real encoding. Please do not report\n"
2205 :			" this error to the developers.\n");
2206 :			}
2207 :			#endif
2208 :
2209 :			return 0;
2210 :	Isibaar	225	}
2211 :
2212 :	Skal	1617	/*********************************************************************/

No admin address has been configured	ViewVC Help
Powered by ViewVC 1.0.4