| 1 |
#include <stdio.h> |
| 2 |
#include <stdlib.h> |
| 3 |
#include <windows.h> |
| 4 |
|
| 5 |
#include "zlib.h" |
| 6 |
|
| 7 |
|
| 8 |
void MyDoMinus64(LARGE_INTEGER *R,LARGE_INTEGER A,LARGE_INTEGER B) |
| 9 |
{ |
| 10 |
R->HighPart = A.HighPart - B.HighPart; |
| 11 |
if (A.LowPart >= B.LowPart) |
| 12 |
R->LowPart = A.LowPart - B.LowPart; |
| 13 |
else |
| 14 |
{ |
| 15 |
R->LowPart = A.LowPart - B.LowPart; |
| 16 |
R->HighPart --; |
| 17 |
} |
| 18 |
} |
| 19 |
|
| 20 |
#ifdef _M_X64 |
| 21 |
// see http://msdn2.microsoft.com/library/twchhe95(en-us,vs.80).aspx for __rdtsc |
| 22 |
unsigned __int64 __rdtsc(void); |
| 23 |
void BeginCountRdtsc(LARGE_INTEGER * pbeginTime64) |
| 24 |
{ |
| 25 |
// printf("rdtsc = %I64x\n",__rdtsc()); |
| 26 |
pbeginTime64->QuadPart=__rdtsc(); |
| 27 |
} |
| 28 |
|
| 29 |
LARGE_INTEGER GetResRdtsc(LARGE_INTEGER beginTime64,BOOL fComputeTimeQueryPerf) |
| 30 |
{ |
| 31 |
LARGE_INTEGER LIres; |
| 32 |
unsigned _int64 res=__rdtsc()-((unsigned _int64)(beginTime64.QuadPart)); |
| 33 |
LIres.QuadPart=res; |
| 34 |
// printf("rdtsc = %I64x\n",__rdtsc()); |
| 35 |
return LIres; |
| 36 |
} |
| 37 |
#else |
| 38 |
#ifdef _M_IX86 |
| 39 |
void myGetRDTSC32(LARGE_INTEGER * pbeginTime64) |
| 40 |
{ |
| 41 |
DWORD dwEdx,dwEax; |
| 42 |
_asm |
| 43 |
{ |
| 44 |
rdtsc |
| 45 |
mov dwEax,eax |
| 46 |
mov dwEdx,edx |
| 47 |
} |
| 48 |
pbeginTime64->LowPart=dwEax; |
| 49 |
pbeginTime64->HighPart=dwEdx; |
| 50 |
} |
| 51 |
|
| 52 |
void BeginCountRdtsc(LARGE_INTEGER * pbeginTime64) |
| 53 |
{ |
| 54 |
myGetRDTSC32(pbeginTime64); |
| 55 |
} |
| 56 |
|
| 57 |
LARGE_INTEGER GetResRdtsc(LARGE_INTEGER beginTime64,BOOL fComputeTimeQueryPerf) |
| 58 |
{ |
| 59 |
LARGE_INTEGER LIres,endTime64; |
| 60 |
myGetRDTSC32(&endTime64); |
| 61 |
|
| 62 |
LIres.LowPart=LIres.HighPart=0; |
| 63 |
MyDoMinus64(&LIres,endTime64,beginTime64); |
| 64 |
return LIres; |
| 65 |
} |
| 66 |
#else |
| 67 |
void myGetRDTSC32(LARGE_INTEGER * pbeginTime64) |
| 68 |
{ |
| 69 |
} |
| 70 |
|
| 71 |
void BeginCountRdtsc(LARGE_INTEGER * pbeginTime64) |
| 72 |
{ |
| 73 |
} |
| 74 |
|
| 75 |
LARGE_INTEGER GetResRdtsc(LARGE_INTEGER beginTime64,BOOL fComputeTimeQueryPerf) |
| 76 |
{ |
| 77 |
LARGE_INTEGER lr; |
| 78 |
lr.QuadPart=0; |
| 79 |
return lr; |
| 80 |
} |
| 81 |
#endif |
| 82 |
#endif |
| 83 |
|
| 84 |
void BeginCountPerfCounter(LARGE_INTEGER * pbeginTime64,BOOL fComputeTimeQueryPerf) |
| 85 |
{ |
| 86 |
if ((!fComputeTimeQueryPerf) || (!QueryPerformanceCounter(pbeginTime64))) |
| 87 |
{ |
| 88 |
pbeginTime64->LowPart = GetTickCount(); |
| 89 |
pbeginTime64->HighPart = 0; |
| 90 |
} |
| 91 |
} |
| 92 |
|
| 93 |
DWORD GetMsecSincePerfCounter(LARGE_INTEGER beginTime64,BOOL fComputeTimeQueryPerf) |
| 94 |
{ |
| 95 |
LARGE_INTEGER endTime64,ticksPerSecond,ticks; |
| 96 |
DWORDLONG ticksShifted,tickSecShifted; |
| 97 |
DWORD dwLog=16+0; |
| 98 |
DWORD dwRet; |
| 99 |
if ((!fComputeTimeQueryPerf) || (!QueryPerformanceCounter(&endTime64))) |
| 100 |
dwRet = (GetTickCount() - beginTime64.LowPart)*1; |
| 101 |
else |
| 102 |
{ |
| 103 |
MyDoMinus64(&ticks,endTime64,beginTime64); |
| 104 |
QueryPerformanceFrequency(&ticksPerSecond); |
| 105 |
|
| 106 |
|
| 107 |
{ |
| 108 |
ticksShifted = Int64ShrlMod32(*(DWORDLONG*)&ticks,dwLog); |
| 109 |
tickSecShifted = Int64ShrlMod32(*(DWORDLONG*)&ticksPerSecond,dwLog); |
| 110 |
|
| 111 |
} |
| 112 |
|
| 113 |
dwRet = (DWORD)((((DWORD)ticksShifted)*1000)/(DWORD)(tickSecShifted)); |
| 114 |
dwRet *=1; |
| 115 |
} |
| 116 |
return dwRet; |
| 117 |
} |
| 118 |
|
| 119 |
int ReadFileMemory(const char* filename,long* plFileSize,unsigned char** pFilePtr) |
| 120 |
{ |
| 121 |
FILE* stream; |
| 122 |
unsigned char* ptr; |
| 123 |
int retVal=1; |
| 124 |
stream=fopen(filename, "rb"); |
| 125 |
if (stream==NULL) |
| 126 |
return 0; |
| 127 |
|
| 128 |
fseek(stream,0,SEEK_END); |
| 129 |
|
| 130 |
*plFileSize=ftell(stream); |
| 131 |
fseek(stream,0,SEEK_SET); |
| 132 |
ptr=malloc((*plFileSize)+1); |
| 133 |
if (ptr==NULL) |
| 134 |
retVal=0; |
| 135 |
else |
| 136 |
{ |
| 137 |
if (fread(ptr, 1, *plFileSize,stream) != (*plFileSize)) |
| 138 |
retVal=0; |
| 139 |
} |
| 140 |
fclose(stream); |
| 141 |
*pFilePtr=ptr; |
| 142 |
return retVal; |
| 143 |
} |
| 144 |
|
| 145 |
int main(int argc, char *argv[]) |
| 146 |
{ |
| 147 |
int BlockSizeCompress=0x8000; |
| 148 |
int BlockSizeUncompress=0x8000; |
| 149 |
int cprLevel=Z_DEFAULT_COMPRESSION ; |
| 150 |
long lFileSize; |
| 151 |
unsigned char* FilePtr; |
| 152 |
long lBufferSizeCpr; |
| 153 |
long lBufferSizeUncpr; |
| 154 |
long lCompressedSize=0; |
| 155 |
unsigned char* CprPtr; |
| 156 |
unsigned char* UncprPtr; |
| 157 |
long lSizeCpr,lSizeUncpr; |
| 158 |
DWORD dwGetTick,dwMsecQP; |
| 159 |
LARGE_INTEGER li_qp,li_rdtsc,dwResRdtsc; |
| 160 |
|
| 161 |
if (argc<=1) |
| 162 |
{ |
| 163 |
printf("run TestZlib <File> [BlockSizeCompress] [BlockSizeUncompress] [compres. level]\n"); |
| 164 |
return 0; |
| 165 |
} |
| 166 |
|
| 167 |
if (ReadFileMemory(argv[1],&lFileSize,&FilePtr)==0) |
| 168 |
{ |
| 169 |
printf("error reading %s\n",argv[1]); |
| 170 |
return 1; |
| 171 |
} |
| 172 |
else printf("file %s read, %u bytes\n",argv[1],lFileSize); |
| 173 |
|
| 174 |
if (argc>=3) |
| 175 |
BlockSizeCompress=atol(argv[2]); |
| 176 |
|
| 177 |
if (argc>=4) |
| 178 |
BlockSizeUncompress=atol(argv[3]); |
| 179 |
|
| 180 |
if (argc>=5) |
| 181 |
cprLevel=(int)atol(argv[4]); |
| 182 |
|
| 183 |
lBufferSizeCpr = lFileSize + (lFileSize/0x10) + 0x200; |
| 184 |
lBufferSizeUncpr = lBufferSizeCpr; |
| 185 |
|
| 186 |
CprPtr=(unsigned char*)malloc(lBufferSizeCpr + BlockSizeCompress); |
| 187 |
|
| 188 |
BeginCountPerfCounter(&li_qp,TRUE); |
| 189 |
dwGetTick=GetTickCount(); |
| 190 |
BeginCountRdtsc(&li_rdtsc); |
| 191 |
{ |
| 192 |
z_stream zcpr; |
| 193 |
int ret=Z_OK; |
| 194 |
long lOrigToDo = lFileSize; |
| 195 |
long lOrigDone = 0; |
| 196 |
int step=0; |
| 197 |
memset(&zcpr,0,sizeof(z_stream)); |
| 198 |
deflateInit(&zcpr,cprLevel); |
| 199 |
|
| 200 |
zcpr.next_in = FilePtr; |
| 201 |
zcpr.next_out = CprPtr; |
| 202 |
|
| 203 |
|
| 204 |
do |
| 205 |
{ |
| 206 |
long all_read_before = zcpr.total_in; |
| 207 |
zcpr.avail_in = min(lOrigToDo,BlockSizeCompress); |
| 208 |
zcpr.avail_out = BlockSizeCompress; |
| 209 |
ret=deflate(&zcpr,(zcpr.avail_in==lOrigToDo) ? Z_FINISH : Z_SYNC_FLUSH); |
| 210 |
lOrigDone += (zcpr.total_in-all_read_before); |
| 211 |
lOrigToDo -= (zcpr.total_in-all_read_before); |
| 212 |
step++; |
| 213 |
} while (ret==Z_OK); |
| 214 |
|
| 215 |
lSizeCpr=zcpr.total_out; |
| 216 |
deflateEnd(&zcpr); |
| 217 |
dwGetTick=GetTickCount()-dwGetTick; |
| 218 |
dwMsecQP=GetMsecSincePerfCounter(li_qp,TRUE); |
| 219 |
dwResRdtsc=GetResRdtsc(li_rdtsc,TRUE); |
| 220 |
printf("total compress size = %u, in %u step\n",lSizeCpr,step); |
| 221 |
printf("time = %u msec = %f sec\n",dwGetTick,dwGetTick/(double)1000.); |
| 222 |
printf("defcpr time QP = %u msec = %f sec\n",dwMsecQP,dwMsecQP/(double)1000.); |
| 223 |
printf("defcpr result rdtsc = %I64x\n\n",dwResRdtsc.QuadPart); |
| 224 |
} |
| 225 |
|
| 226 |
CprPtr=(unsigned char*)realloc(CprPtr,lSizeCpr); |
| 227 |
UncprPtr=(unsigned char*)malloc(lBufferSizeUncpr + BlockSizeUncompress); |
| 228 |
|
| 229 |
BeginCountPerfCounter(&li_qp,TRUE); |
| 230 |
dwGetTick=GetTickCount(); |
| 231 |
BeginCountRdtsc(&li_rdtsc); |
| 232 |
{ |
| 233 |
z_stream zcpr; |
| 234 |
int ret=Z_OK; |
| 235 |
long lOrigToDo = lSizeCpr; |
| 236 |
long lOrigDone = 0; |
| 237 |
int step=0; |
| 238 |
memset(&zcpr,0,sizeof(z_stream)); |
| 239 |
inflateInit(&zcpr); |
| 240 |
|
| 241 |
zcpr.next_in = CprPtr; |
| 242 |
zcpr.next_out = UncprPtr; |
| 243 |
|
| 244 |
|
| 245 |
do |
| 246 |
{ |
| 247 |
long all_read_before = zcpr.total_in; |
| 248 |
zcpr.avail_in = min(lOrigToDo,BlockSizeUncompress); |
| 249 |
zcpr.avail_out = BlockSizeUncompress; |
| 250 |
ret=inflate(&zcpr,Z_SYNC_FLUSH); |
| 251 |
lOrigDone += (zcpr.total_in-all_read_before); |
| 252 |
lOrigToDo -= (zcpr.total_in-all_read_before); |
| 253 |
step++; |
| 254 |
} while (ret==Z_OK); |
| 255 |
|
| 256 |
lSizeUncpr=zcpr.total_out; |
| 257 |
inflateEnd(&zcpr); |
| 258 |
dwGetTick=GetTickCount()-dwGetTick; |
| 259 |
dwMsecQP=GetMsecSincePerfCounter(li_qp,TRUE); |
| 260 |
dwResRdtsc=GetResRdtsc(li_rdtsc,TRUE); |
| 261 |
printf("total uncompress size = %u, in %u step\n",lSizeUncpr,step); |
| 262 |
printf("time = %u msec = %f sec\n",dwGetTick,dwGetTick/(double)1000.); |
| 263 |
printf("uncpr time QP = %u msec = %f sec\n",dwMsecQP,dwMsecQP/(double)1000.); |
| 264 |
printf("uncpr result rdtsc = %I64x\n\n",dwResRdtsc.QuadPart); |
| 265 |
} |
| 266 |
|
| 267 |
if (lSizeUncpr==lFileSize) |
| 268 |
{ |
| 269 |
if (memcmp(FilePtr,UncprPtr,lFileSize)==0) |
| 270 |
printf("compare ok\n"); |
| 271 |
|
| 272 |
} |
| 273 |
|
| 274 |
return 0; |
| 275 |
} |
