cvsroot/liblzf/bench.c

#include <stdio.h>
#include <unistd.h>
#include <assert.h>
#include <string.h>
#include <time.h>
#include <sys/time.h>
#include <sys/times.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <sys/mman.h>
#include <sys/ioctl.h>
#include <sys/stat.h>
#include <sys/resource.h>
#include <math.h>
#include <signal.h>
#include <X11/Xlib.h>

#include "lzf.h"
//#include "fastlz.c"

typedef unsigned long tval;
typedef unsigned long long stamp64;

extern inline tval stamp(void)
{
        tval tsc;
        asm volatile("rdtsc" : "=a" (tsc) : : "edx");
        return tsc;
}

extern inline tval measure(tval t)
{
        tval tsc;
        asm volatile("rdtsc" : "=a" (tsc) : : "edx");
        if (tsc>t)
                return tsc-t;
        else
                return t-tsc;
}

static void sigu (int signum)
{
}

#define DSIZE 17318440
//#define DSIZE 32768

#include "lzf_c_slow.c"

unsigned char data[DSIZE], data2[DSIZE*2], data3[DSIZE*2];

int main(void)
{
   tval s;
   tval si[1000];
   int i, j, k, l;
   int min = 1<<30;
   int lp;
   char buf[8192];
   int p[2];
   long ctr = 1;
   struct stat sbuf;

   pipe (p);

   FILE *f = fopen ("data", "r");
   fread (data, DSIZE, 1, f);
   fclose (f);

   signal (SIGURG, sigu);

   for (lp = 0; lp < 1000000; lp++) {
      s=stamp();

      //struct timespec ts; clock_gettime (CLOCK_THREAD_CPUTIME_ID, &ts);
      //printf ("%9ld\n", ts.tv_nsec);//D
      //struct rusage usage; getrusage (RUSAGE_SELF, &usage);
      //struct tms tms; times (&tms);

      //kill (0, SIGURG);
      //write (evfd, &ctr, 8);
      //read (evfd, &ctr, 8);
      //write (p[1], &buf, 1);
      //read (p[0], &buf, 4);
      //stat ("/etc/passwd", &sbuf);
      //struct timeval tv; gettimeofday (&tv, 0);
      //void *x = mmap (0, 16384, PROT_READ|PROT_WRITE, MAP_ANONYMOUS|MAP_PRIVATE,-1,0);

      l = lzf_compress_slow (data, DSIZE, data2, DSIZE*2);
      //for (k = 0; k < l; ++k)
        //printf ("1 %2d: %02x\n", k, data2[k]);
      assert(l);

      j = lzf_decompress (data2, l, data3, DSIZE*2);
      //for (k = 0; k < j; ++k)
        //printf ("2 %2d: %02x\n", k, data3[k]);
      assert (j == DSIZE);

      si[0]=measure(s);

      assert (!memcmp (data, data3, DSIZE));

      printf ("\r%10d (%d) ", si[0], l);
      if (si[0] < min && si[0] > 0)
        {
          printf ("\n");
          min = si[0];
        }

      fflush (stdout);

      //assert (memcmp (data, data3, DSIZE) == 0);
   }
   return 0;
}


Revision:	1.15
Committed:	Thu Feb 16 05:43:19 2012 UTC (14 years, 7 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.14:	+10 -4 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.1	#include <stdio.h>
2	root	1.13	#include <unistd.h>
3	root	1.1	#include <assert.h>
4			#include <string.h>
5	root	1.7	#include <time.h>
6			#include <sys/time.h>
7	root	1.11	#include <sys/times.h>
8	root	1.7	#include <sys/types.h>
9			#include <sys/socket.h>
10	root	1.12	#include <sys/mman.h>
11	root	1.7	#include <sys/ioctl.h>
12	root	1.9	#include <sys/stat.h>
13	root	1.11	#include <sys/resource.h>
14	root	1.7	#include <math.h>
15	root	1.8	#include <signal.h>
16	root	1.7	#include <X11/Xlib.h>
17	root	1.1
18			#include "lzf.h"
19	root	1.4	//#include "fastlz.c"
20	root	1.1
21			typedef unsigned long tval;
22			typedef unsigned long long stamp64;
23
24			extern inline tval stamp(void)
25			{
26			tval tsc;
27			asm volatile("rdtsc" : "=a" (tsc) : : "edx");
28			return tsc;
29			}
30
31			extern inline tval measure(tval t)
32			{
33			tval tsc;
34			asm volatile("rdtsc" : "=a" (tsc) : : "edx");
35			if (tsc>t)
36			return tsc-t;
37			else
38			return t-tsc;
39			}
40
41	root	1.8	static void sigu (int signum)
42			{
43			}
44
45	root	1.15	#define DSIZE 17318440
46			//#define DSIZE 32768
47
48			#include "lzf_c_slow.c"
49	root	1.1
50			unsigned char data[DSIZE], data2[DSIZE2], data3[DSIZE2];
51
52			int main(void)
53			{
54			tval s;
55			tval si[1000];
56	root	1.15	int i, j, k, l;
57	root	1.1	int min = 1<<30;
58	root	1.2	int lp;
59	root	1.7	char buf[8192];
60			int p[2];
61	root	1.8	long ctr = 1;
62	root	1.9	struct stat sbuf;
63	root	1.7
64			pipe (p);
65	root	1.1
66			FILE *f = fopen ("data", "r");
67			fread (data, DSIZE, 1, f);
68			fclose (f);
69	root	1.7
70	root	1.8	signal (SIGURG, sigu);
71
72	root	1.11	for (lp = 0; lp < 1000000; lp++) {
73	root	1.6	s=stamp();
74	root	1.7
75	root	1.12	//struct timespec ts; clock_gettime (CLOCK_THREAD_CPUTIME_ID, &ts);
76	root	1.11	//printf ("%9ld\n", ts.tv_nsec);//D
77			//struct rusage usage; getrusage (RUSAGE_SELF, &usage);
78			//struct tms tms; times (&tms);
79
80	root	1.8	//kill (0, SIGURG);
81			//write (evfd, &ctr, 8);
82			//read (evfd, &ctr, 8);
83	root	1.9	//write (p[1], &buf, 1);
84			//read (p[0], &buf, 4);
85			//stat ("/etc/passwd", &sbuf);
86	root	1.11	//struct timeval tv; gettimeofday (&tv, 0);
87	root	1.12	//void *x = mmap (0, 16384, PROT_READ\|PROT_WRITE, MAP_ANONYMOUS\|MAP_PRIVATE,-1,0);
88	root	1.10
89	root	1.15	l = lzf_compress_slow (data, DSIZE, data2, DSIZE*2);
90			//for (k = 0; k < l; ++k)
91			//printf ("1 %2d: %02x\n", k, data2[k]);
92	root	1.12	assert(l);
93
94			j = lzf_decompress (data2, l, data3, DSIZE*2);
95	root	1.15	//for (k = 0; k < j; ++k)
96			//printf ("2 %2d: %02x\n", k, data3[k]);
97	root	1.12	assert (j == DSIZE);
98	root	1.7
99	root	1.6	si[0]=measure(s);
100	root	1.7
101	root	1.12	assert (!memcmp (data, data3, DSIZE));
102	root	1.1
103			printf ("\r%10d (%d) ", si[0], l);
104			if (si[0] < min && si[0] > 0)
105			{
106			printf ("\n");
107			min = si[0];
108			}
109
110			fflush (stdout);
111
112	root	1.7	//assert (memcmp (data, data3, DSIZE) == 0);
113	root	1.1	}
114			return 0;
115			}
116
117
118