← Back to branch summary

~reviczky/luatex/luatex-svn

« back to all changes in this revision

Viewing changes to source/libs/zlib/zlib-1.2.8/contrib/masmx86/inffas32.asm

  • Committer: Adam Reviczky
  • Date: 2015-03-29 18:56:26 UTC
  • Revision ID: adam.reviczky@kclalumni.net-20150329185626-7j7tmwyfpa69lqwo
Revision 5213

Show diffs side-by-side

added added

removed removed

Lines of Context:
source/libs/zlib/zlib-1.2.8/contrib/masmx86/inffas32.asm
 
1
;/* inffas32.asm is a hand tuned assembler version of inffast.c -- fast decoding
 
2
; *
 
3
; * inffas32.asm is derivated from inffas86.c, with translation of assembly code
 
4
; *
 
5
; * Copyright (C) 1995-2003 Mark Adler
 
6
; * For conditions of distribution and use, see copyright notice in zlib.h
 
7
; *
 
8
; * Copyright (C) 2003 Chris Anderson <christop@charm.net>
 
9
; * Please use the copyright conditions above.
 
10
; *
 
11
; * Mar-13-2003 -- Most of this is derived from inffast.S which is derived from
 
12
; * the gcc -S output of zlib-1.2.0/inffast.c.  Zlib-1.2.0 is in beta release at
 
13
; * the moment.  I have successfully compiled and tested this code with gcc2.96,
 
14
; * gcc3.2, icc5.0, msvc6.0.  It is very close to the speed of inffast.S
 
15
; * compiled with gcc -DNO_MMX, but inffast.S is still faster on the P3 with MMX
 
16
; * enabled.  I will attempt to merge the MMX code into this version.  Newer
 
17
; * versions of this and inffast.S can be found at
 
18
; * http://www.eetbeetee.com/zlib/ and http://www.charm.net/~christop/zlib/
 
19
; *
 
20
; * 2005 : modification by Gilles Vollant
 
21
; */
 
22
; For Visual C++ 4.x and higher and ML 6.x and higher
 
23
;   ml.exe is in directory \MASM611C of Win95 DDK
 
24
;   ml.exe is also distributed in http://www.masm32.com/masmdl.htm
 
25
;    and in VC++2003 toolkit at http://msdn.microsoft.com/visualc/vctoolkit2003/
 
26
;
 
27
;
 
28
;   compile with command line option
 
29
;   ml  /coff /Zi /c /Flinffas32.lst inffas32.asm
 
30
 
 
31
;   if you define NO_GZIP (see inflate.h), compile with
 
32
;   ml  /coff /Zi /c /Flinffas32.lst /DNO_GUNZIP inffas32.asm
 
33
 
 
34
 
 
35
; zlib122sup is 0 fort zlib 1.2.2.1 and lower
 
36
; zlib122sup is 8 fort zlib 1.2.2.2 and more (with addition of dmax and head
 
37
;        in inflate_state in inflate.h)
 
38
zlib1222sup      equ    8
 
39
 
 
40
 
 
41
IFDEF GUNZIP
 
42
  INFLATE_MODE_TYPE    equ 11
 
43
  INFLATE_MODE_BAD     equ 26
 
44
ELSE
 
45
  IFNDEF NO_GUNZIP
 
46
    INFLATE_MODE_TYPE    equ 11
 
47
    INFLATE_MODE_BAD     equ 26
 
48
  ELSE
 
49
    INFLATE_MODE_TYPE    equ 3
 
50
    INFLATE_MODE_BAD     equ 17
 
51
  ENDIF
 
52
ENDIF
 
53
 
 
54
 
 
55
; 75 "inffast.S"
 
56
;FILE "inffast.S"
 
57
 
 
58
;;;GLOBAL _inflate_fast
 
59
 
 
60
;;;SECTION .text
 
61
 
 
62
 
 
63
 
 
64
        .586p
 
65
        .mmx
 
66
 
 
67
        name    inflate_fast_x86
 
68
        .MODEL  FLAT
 
69
 
 
70
_DATA                   segment
 
71
inflate_fast_use_mmx:
 
72
        dd      1
 
73
 
 
74
 
 
75
_TEXT                   segment
 
76
 
 
77
 
 
78
 
 
79
ALIGN 4
 
80
        db      'Fast decoding Code from Chris Anderson'
 
81
        db      0
 
82
 
 
83
ALIGN 4
 
84
invalid_literal_length_code_msg:
 
85
        db      'invalid literal/length code'
 
86
        db      0
 
87
 
 
88
ALIGN 4
 
89
invalid_distance_code_msg:
 
90
        db      'invalid distance code'
 
91
        db      0
 
92
 
 
93
ALIGN 4
 
94
invalid_distance_too_far_msg:
 
95
        db      'invalid distance too far back'
 
96
        db      0
 
97
 
 
98
 
 
99
ALIGN 4
 
100
inflate_fast_mask:
 
101
dd      0
 
102
dd      1
 
103
dd      3
 
104
dd      7
 
105
dd      15
 
106
dd      31
 
107
dd      63
 
108
dd      127
 
109
dd      255
 
110
dd      511
 
111
dd      1023
 
112
dd      2047
 
113
dd      4095
 
114
dd      8191
 
115
dd      16383
 
116
dd      32767
 
117
dd      65535
 
118
dd      131071
 
119
dd      262143
 
120
dd      524287
 
121
dd      1048575
 
122
dd      2097151
 
123
dd      4194303
 
124
dd      8388607
 
125
dd      16777215
 
126
dd      33554431
 
127
dd      67108863
 
128
dd      134217727
 
129
dd      268435455
 
130
dd      536870911
 
131
dd      1073741823
 
132
dd      2147483647
 
133
dd      4294967295
 
134
 
 
135
 
 
136
mode_state       equ    0       ;/* state->mode */
 
137
wsize_state      equ    (32+zlib1222sup)        ;/* state->wsize */
 
138
write_state      equ    (36+4+zlib1222sup)      ;/* state->write */
 
139
window_state     equ    (40+4+zlib1222sup)      ;/* state->window */
 
140
hold_state       equ    (44+4+zlib1222sup)      ;/* state->hold */
 
141
bits_state       equ    (48+4+zlib1222sup)      ;/* state->bits */
 
142
lencode_state    equ    (64+4+zlib1222sup)      ;/* state->lencode */
 
143
distcode_state   equ    (68+4+zlib1222sup)      ;/* state->distcode */
 
144
lenbits_state    equ    (72+4+zlib1222sup)      ;/* state->lenbits */
 
145
distbits_state   equ    (76+4+zlib1222sup)      ;/* state->distbits */
 
146
 
 
147
 
 
148
;;SECTION .text
 
149
; 205 "inffast.S"
 
150
;GLOBAL inflate_fast_use_mmx
 
151
 
 
152
;SECTION .data
 
153
 
 
154
 
 
155
; GLOBAL inflate_fast_use_mmx:object
 
156
;.size inflate_fast_use_mmx, 4
 
157
; 226 "inffast.S"
 
158
;SECTION .text
 
159
 
 
160
ALIGN 4
 
161
_inflate_fast proc near
 
162
.FPO (16, 4, 0, 0, 1, 0)
 
163
        push  edi
 
164
        push  esi
 
165
        push  ebp
 
166
        push  ebx
 
167
        pushfd
 
168
        sub  esp,64
 
169
        cld
 
170
 
 
171
 
 
172
 
 
173
 
 
174
        mov  esi, [esp+88]
 
175
        mov  edi, [esi+28]
 
176
 
 
177
 
 
178
 
 
179
 
 
180
 
 
181
 
 
182
 
 
183
        mov  edx, [esi+4]
 
184
        mov  eax, [esi+0]
 
185
 
 
186
        add  edx,eax
 
187
        sub  edx,11
 
188
 
 
189
        mov  [esp+44],eax
 
190
        mov  [esp+20],edx
 
191
 
 
192
        mov  ebp, [esp+92]
 
193
        mov  ecx, [esi+16]
 
194
        mov  ebx, [esi+12]
 
195
 
 
196
        sub  ebp,ecx
 
197
        neg  ebp
 
198
        add  ebp,ebx
 
199
 
 
200
        sub  ecx,257
 
201
        add  ecx,ebx
 
202
 
 
203
        mov  [esp+60],ebx
 
204
        mov  [esp+40],ebp
 
205
        mov  [esp+16],ecx
 
206
; 285 "inffast.S"
 
207
        mov  eax, [edi+lencode_state]
 
208
        mov  ecx, [edi+distcode_state]
 
209
 
 
210
        mov  [esp+8],eax
 
211
        mov  [esp+12],ecx
 
212
 
 
213
        mov  eax,1
 
214
        mov  ecx, [edi+lenbits_state]
 
215
        shl  eax,cl
 
216
        dec  eax
 
217
        mov  [esp+0],eax
 
218
 
 
219
        mov  eax,1
 
220
        mov  ecx, [edi+distbits_state]
 
221
        shl  eax,cl
 
222
        dec  eax
 
223
        mov  [esp+4],eax
 
224
 
 
225
        mov  eax, [edi+wsize_state]
 
226
        mov  ecx, [edi+write_state]
 
227
        mov  edx, [edi+window_state]
 
228
 
 
229
        mov  [esp+52],eax
 
230
        mov  [esp+48],ecx
 
231
        mov  [esp+56],edx
 
232
 
 
233
        mov  ebp, [edi+hold_state]
 
234
        mov  ebx, [edi+bits_state]
 
235
; 321 "inffast.S"
 
236
        mov  esi, [esp+44]
 
237
        mov  ecx, [esp+20]
 
238
        cmp  ecx,esi
 
239
        ja   L_align_long
 
240
 
 
241
        add  ecx,11
 
242
        sub  ecx,esi
 
243
        mov  eax,12
 
244
        sub  eax,ecx
 
245
        lea  edi, [esp+28]
 
246
        rep movsb
 
247
        mov  ecx,eax
 
248
        xor  eax,eax
 
249
        rep stosb
 
250
        lea  esi, [esp+28]
 
251
        mov  [esp+20],esi
 
252
        jmp  L_is_aligned
 
253
 
 
254
 
 
255
L_align_long:
 
256
        test  esi,3
 
257
        jz   L_is_aligned
 
258
        xor  eax,eax
 
259
        mov  al, [esi]
 
260
        inc  esi
 
261
        mov  ecx,ebx
 
262
        add  ebx,8
 
263
        shl  eax,cl
 
264
        or  ebp,eax
 
265
        jmp L_align_long
 
266
 
 
267
L_is_aligned:
 
268
        mov  edi, [esp+60]
 
269
; 366 "inffast.S"
 
270
L_check_mmx:
 
271
        cmp  dword ptr [inflate_fast_use_mmx],2
 
272
        je   L_init_mmx
 
273
        ja   L_do_loop
 
274
 
 
275
        push  eax
 
276
        push  ebx
 
277
        push  ecx
 
278
        push  edx
 
279
        pushfd
 
280
        mov  eax, [esp]
 
281
        xor  dword ptr [esp],0200000h
 
282
 
 
283
 
 
284
 
 
285
 
 
286
        popfd
 
287
        pushfd
 
288
        pop  edx
 
289
        xor  edx,eax
 
290
        jz   L_dont_use_mmx
 
291
        xor  eax,eax
 
292
        cpuid
 
293
        cmp  ebx,0756e6547h
 
294
        jne  L_dont_use_mmx
 
295
        cmp  ecx,06c65746eh
 
296
        jne  L_dont_use_mmx
 
297
        cmp  edx,049656e69h
 
298
        jne  L_dont_use_mmx
 
299
        mov  eax,1
 
300
        cpuid
 
301
        shr  eax,8
 
302
        and  eax,15
 
303
        cmp  eax,6
 
304
        jne  L_dont_use_mmx
 
305
        test  edx,0800000h
 
306
        jnz  L_use_mmx
 
307
        jmp  L_dont_use_mmx
 
308
L_use_mmx:
 
309
        mov  dword ptr [inflate_fast_use_mmx],2
 
310
        jmp  L_check_mmx_pop
 
311
L_dont_use_mmx:
 
312
        mov  dword ptr [inflate_fast_use_mmx],3
 
313
L_check_mmx_pop:
 
314
        pop  edx
 
315
        pop  ecx
 
316
        pop  ebx
 
317
        pop  eax
 
318
        jmp  L_check_mmx
 
319
; 426 "inffast.S"
 
320
ALIGN 4
 
321
L_do_loop:
 
322
; 437 "inffast.S"
 
323
        cmp  bl,15
 
324
        ja   L_get_length_code
 
325
 
 
326
        xor  eax,eax
 
327
        lodsw
 
328
        mov  cl,bl
 
329
        add  bl,16
 
330
        shl  eax,cl
 
331
        or  ebp,eax
 
332
 
 
333
L_get_length_code:
 
334
        mov  edx, [esp+0]
 
335
        mov  ecx, [esp+8]
 
336
        and  edx,ebp
 
337
        mov  eax, [ecx+edx*4]
 
338
 
 
339
L_dolen:
 
340
 
 
341
 
 
342
 
 
343
 
 
344
 
 
345
 
 
346
        mov  cl,ah
 
347
        sub  bl,ah
 
348
        shr  ebp,cl
 
349
 
 
350
 
 
351
 
 
352
 
 
353
 
 
354
 
 
355
        test  al,al
 
356
        jnz   L_test_for_length_base
 
357
 
 
358
        shr  eax,16
 
359
        stosb
 
360
 
 
361
L_while_test:
 
362
 
 
363
 
 
364
        cmp  [esp+16],edi
 
365
        jbe  L_break_loop
 
366
 
 
367
        cmp  [esp+20],esi
 
368
        ja   L_do_loop
 
369
        jmp  L_break_loop
 
370
 
 
371
L_test_for_length_base:
 
372
; 502 "inffast.S"
 
373
        mov  edx,eax
 
374
        shr  edx,16
 
375
        mov  cl,al
 
376
 
 
377
        test  al,16
 
378
        jz   L_test_for_second_level_length
 
379
        and  cl,15
 
380
        jz   L_save_len
 
381
        cmp  bl,cl
 
382
        jae  L_add_bits_to_len
 
383
 
 
384
        mov  ch,cl
 
385
        xor  eax,eax
 
386
        lodsw
 
387
        mov  cl,bl
 
388
        add  bl,16
 
389
        shl  eax,cl
 
390
        or  ebp,eax
 
391
        mov  cl,ch
 
392
 
 
393
L_add_bits_to_len:
 
394
        mov  eax,1
 
395
        shl  eax,cl
 
396
        dec  eax
 
397
        sub  bl,cl
 
398
        and  eax,ebp
 
399
        shr  ebp,cl
 
400
        add  edx,eax
 
401
 
 
402
L_save_len:
 
403
        mov  [esp+24],edx
 
404
 
 
405
 
 
406
L_decode_distance:
 
407
; 549 "inffast.S"
 
408
        cmp  bl,15
 
409
        ja   L_get_distance_code
 
410
 
 
411
        xor  eax,eax
 
412
        lodsw
 
413
        mov  cl,bl
 
414
        add  bl,16
 
415
        shl  eax,cl
 
416
        or  ebp,eax
 
417
 
 
418
L_get_distance_code:
 
419
        mov  edx, [esp+4]
 
420
        mov  ecx, [esp+12]
 
421
        and  edx,ebp
 
422
        mov  eax, [ecx+edx*4]
 
423
 
 
424
 
 
425
L_dodist:
 
426
        mov  edx,eax
 
427
        shr  edx,16
 
428
        mov  cl,ah
 
429
        sub  bl,ah
 
430
        shr  ebp,cl
 
431
; 584 "inffast.S"
 
432
        mov  cl,al
 
433
 
 
434
        test  al,16
 
435
        jz  L_test_for_second_level_dist
 
436
        and  cl,15
 
437
        jz  L_check_dist_one
 
438
        cmp  bl,cl
 
439
        jae  L_add_bits_to_dist
 
440
 
 
441
        mov  ch,cl
 
442
        xor  eax,eax
 
443
        lodsw
 
444
        mov  cl,bl
 
445
        add  bl,16
 
446
        shl  eax,cl
 
447
        or  ebp,eax
 
448
        mov  cl,ch
 
449
 
 
450
L_add_bits_to_dist:
 
451
        mov  eax,1
 
452
        shl  eax,cl
 
453
        dec  eax
 
454
        sub  bl,cl
 
455
        and  eax,ebp
 
456
        shr  ebp,cl
 
457
        add  edx,eax
 
458
        jmp  L_check_window
 
459
 
 
460
L_check_window:
 
461
; 625 "inffast.S"
 
462
        mov  [esp+44],esi
 
463
        mov  eax,edi
 
464
        sub  eax, [esp+40]
 
465
 
 
466
        cmp  eax,edx
 
467
        jb   L_clip_window
 
468
 
 
469
        mov  ecx, [esp+24]
 
470
        mov  esi,edi
 
471
        sub  esi,edx
 
472
 
 
473
        sub  ecx,3
 
474
        mov  al, [esi]
 
475
        mov  [edi],al
 
476
        mov  al, [esi+1]
 
477
        mov  dl, [esi+2]
 
478
        add  esi,3
 
479
        mov  [edi+1],al
 
480
        mov  [edi+2],dl
 
481
        add  edi,3
 
482
        rep movsb
 
483
 
 
484
        mov  esi, [esp+44]
 
485
        jmp  L_while_test
 
486
 
 
487
ALIGN 4
 
488
L_check_dist_one:
 
489
        cmp  edx,1
 
490
        jne  L_check_window
 
491
        cmp  [esp+40],edi
 
492
        je  L_check_window
 
493
 
 
494
        dec  edi
 
495
        mov  ecx, [esp+24]
 
496
        mov  al, [edi]
 
497
        sub  ecx,3
 
498
 
 
499
        mov  [edi+1],al
 
500
        mov  [edi+2],al
 
501
        mov  [edi+3],al
 
502
        add  edi,4
 
503
        rep stosb
 
504
 
 
505
        jmp  L_while_test
 
506
 
 
507
ALIGN 4
 
508
L_test_for_second_level_length:
 
509
 
 
510
 
 
511
 
 
512
 
 
513
        test  al,64
 
514
        jnz   L_test_for_end_of_block
 
515
 
 
516
        mov  eax,1
 
517
        shl  eax,cl
 
518
        dec  eax
 
519
        and  eax,ebp
 
520
        add  eax,edx
 
521
        mov  edx, [esp+8]
 
522
        mov  eax, [edx+eax*4]
 
523
        jmp  L_dolen
 
524
 
 
525
ALIGN 4
 
526
L_test_for_second_level_dist:
 
527
 
 
528
 
 
529
 
 
530
 
 
531
        test  al,64
 
532
        jnz   L_invalid_distance_code
 
533
 
 
534
        mov  eax,1
 
535
        shl  eax,cl
 
536
        dec  eax
 
537
        and  eax,ebp
 
538
        add  eax,edx
 
539
        mov  edx, [esp+12]
 
540
        mov  eax, [edx+eax*4]
 
541
        jmp  L_dodist
 
542
 
 
543
ALIGN 4
 
544
L_clip_window:
 
545
; 721 "inffast.S"
 
546
        mov  ecx,eax
 
547
        mov  eax, [esp+52]
 
548
        neg  ecx
 
549
        mov  esi, [esp+56]
 
550
 
 
551
        cmp  eax,edx
 
552
        jb   L_invalid_distance_too_far
 
553
 
 
554
        add  ecx,edx
 
555
        cmp  dword ptr [esp+48],0
 
556
        jne  L_wrap_around_window
 
557
 
 
558
        sub  eax,ecx
 
559
        add  esi,eax
 
560
; 749 "inffast.S"
 
561
        mov  eax, [esp+24]
 
562
        cmp  eax,ecx
 
563
        jbe  L_do_copy1
 
564
 
 
565
        sub  eax,ecx
 
566
        rep movsb
 
567
        mov  esi,edi
 
568
        sub  esi,edx
 
569
        jmp  L_do_copy1
 
570
 
 
571
        cmp  eax,ecx
 
572
        jbe  L_do_copy1
 
573
 
 
574
        sub  eax,ecx
 
575
        rep movsb
 
576
        mov  esi,edi
 
577
        sub  esi,edx
 
578
        jmp  L_do_copy1
 
579
 
 
580
L_wrap_around_window:
 
581
; 793 "inffast.S"
 
582
        mov  eax, [esp+48]
 
583
        cmp  ecx,eax
 
584
        jbe  L_contiguous_in_window
 
585
 
 
586
        add  esi, [esp+52]
 
587
        add  esi,eax
 
588
        sub  esi,ecx
 
589
        sub  ecx,eax
 
590
 
 
591
 
 
592
        mov  eax, [esp+24]
 
593
        cmp  eax,ecx
 
594
        jbe  L_do_copy1
 
595
 
 
596
        sub  eax,ecx
 
597
        rep movsb
 
598
        mov  esi, [esp+56]
 
599
        mov  ecx, [esp+48]
 
600
        cmp  eax,ecx
 
601
        jbe  L_do_copy1
 
602
 
 
603
        sub  eax,ecx
 
604
        rep movsb
 
605
        mov  esi,edi
 
606
        sub  esi,edx
 
607
        jmp  L_do_copy1
 
608
 
 
609
L_contiguous_in_window:
 
610
; 836 "inffast.S"
 
611
        add  esi,eax
 
612
        sub  esi,ecx
 
613
 
 
614
 
 
615
        mov  eax, [esp+24]
 
616
        cmp  eax,ecx
 
617
        jbe  L_do_copy1
 
618
 
 
619
        sub  eax,ecx
 
620
        rep movsb
 
621
        mov  esi,edi
 
622
        sub  esi,edx
 
623
 
 
624
L_do_copy1:
 
625
; 862 "inffast.S"
 
626
        mov  ecx,eax
 
627
        rep movsb
 
628
 
 
629
        mov  esi, [esp+44]
 
630
        jmp  L_while_test
 
631
; 878 "inffast.S"
 
632
ALIGN 4
 
633
L_init_mmx:
 
634
        emms
 
635
 
 
636
 
 
637
 
 
638
 
 
639
 
 
640
        movd mm0,ebp
 
641
        mov  ebp,ebx
 
642
; 896 "inffast.S"
 
643
        movd mm4,dword ptr [esp+0]
 
644
        movq mm3,mm4
 
645
        movd mm5,dword ptr [esp+4]
 
646
        movq mm2,mm5
 
647
        pxor mm1,mm1
 
648
        mov  ebx, [esp+8]
 
649
        jmp  L_do_loop_mmx
 
650
 
 
651
ALIGN 4
 
652
L_do_loop_mmx:
 
653
        psrlq mm0,mm1
 
654
 
 
655
        cmp  ebp,32
 
656
        ja  L_get_length_code_mmx
 
657
 
 
658
        movd mm6,ebp
 
659
        movd mm7,dword ptr [esi]
 
660
        add  esi,4
 
661
        psllq mm7,mm6
 
662
        add  ebp,32
 
663
        por mm0,mm7
 
664
 
 
665
L_get_length_code_mmx:
 
666
        pand mm4,mm0
 
667
        movd eax,mm4
 
668
        movq mm4,mm3
 
669
        mov  eax, [ebx+eax*4]
 
670
 
 
671
L_dolen_mmx:
 
672
        movzx  ecx,ah
 
673
        movd mm1,ecx
 
674
        sub  ebp,ecx
 
675
 
 
676
        test  al,al
 
677
        jnz L_test_for_length_base_mmx
 
678
 
 
679
        shr  eax,16
 
680
        stosb
 
681
 
 
682
L_while_test_mmx:
 
683
 
 
684
 
 
685
        cmp  [esp+16],edi
 
686
        jbe L_break_loop
 
687
 
 
688
        cmp  [esp+20],esi
 
689
        ja L_do_loop_mmx
 
690
        jmp L_break_loop
 
691
 
 
692
L_test_for_length_base_mmx:
 
693
 
 
694
        mov  edx,eax
 
695
        shr  edx,16
 
696
 
 
697
        test  al,16
 
698
        jz  L_test_for_second_level_length_mmx
 
699
        and  eax,15
 
700
        jz L_decode_distance_mmx
 
701
 
 
702
        psrlq mm0,mm1
 
703
        movd mm1,eax
 
704
        movd ecx,mm0
 
705
        sub  ebp,eax
 
706
        and  ecx, [inflate_fast_mask+eax*4]
 
707
        add  edx,ecx
 
708
 
 
709
L_decode_distance_mmx:
 
710
        psrlq mm0,mm1
 
711
 
 
712
        cmp  ebp,32
 
713
        ja L_get_dist_code_mmx
 
714
 
 
715
        movd mm6,ebp
 
716
        movd mm7,dword ptr [esi]
 
717
        add  esi,4
 
718
        psllq mm7,mm6
 
719
        add  ebp,32
 
720
        por mm0,mm7
 
721
 
 
722
L_get_dist_code_mmx:
 
723
        mov  ebx, [esp+12]
 
724
        pand mm5,mm0
 
725
        movd eax,mm5
 
726
        movq mm5,mm2
 
727
        mov  eax, [ebx+eax*4]
 
728
 
 
729
L_dodist_mmx:
 
730
 
 
731
        movzx  ecx,ah
 
732
        mov  ebx,eax
 
733
        shr  ebx,16
 
734
        sub  ebp,ecx
 
735
        movd mm1,ecx
 
736
 
 
737
        test  al,16
 
738
        jz L_test_for_second_level_dist_mmx
 
739
        and  eax,15
 
740
        jz L_check_dist_one_mmx
 
741
 
 
742
L_add_bits_to_dist_mmx:
 
743
        psrlq mm0,mm1
 
744
        movd mm1,eax
 
745
        movd ecx,mm0
 
746
        sub  ebp,eax
 
747
        and  ecx, [inflate_fast_mask+eax*4]
 
748
        add  ebx,ecx
 
749
 
 
750
L_check_window_mmx:
 
751
        mov  [esp+44],esi
 
752
        mov  eax,edi
 
753
        sub  eax, [esp+40]
 
754
 
 
755
        cmp  eax,ebx
 
756
        jb L_clip_window_mmx
 
757
 
 
758
        mov  ecx,edx
 
759
        mov  esi,edi
 
760
        sub  esi,ebx
 
761
 
 
762
        sub  ecx,3
 
763
        mov  al, [esi]
 
764
        mov  [edi],al
 
765
        mov  al, [esi+1]
 
766
        mov  dl, [esi+2]
 
767
        add  esi,3
 
768
        mov  [edi+1],al
 
769
        mov  [edi+2],dl
 
770
        add  edi,3
 
771
        rep movsb
 
772
 
 
773
        mov  esi, [esp+44]
 
774
        mov  ebx, [esp+8]
 
775
        jmp  L_while_test_mmx
 
776
 
 
777
ALIGN 4
 
778
L_check_dist_one_mmx:
 
779
        cmp  ebx,1
 
780
        jne  L_check_window_mmx
 
781
        cmp  [esp+40],edi
 
782
        je   L_check_window_mmx
 
783
 
 
784
        dec  edi
 
785
        mov  ecx,edx
 
786
        mov  al, [edi]
 
787
        sub  ecx,3
 
788
 
 
789
        mov  [edi+1],al
 
790
        mov  [edi+2],al
 
791
        mov  [edi+3],al
 
792
        add  edi,4
 
793
        rep stosb
 
794
 
 
795
        mov  ebx, [esp+8]
 
796
        jmp  L_while_test_mmx
 
797
 
 
798
ALIGN 4
 
799
L_test_for_second_level_length_mmx:
 
800
        test  al,64
 
801
        jnz L_test_for_end_of_block
 
802
 
 
803
        and  eax,15
 
804
        psrlq mm0,mm1
 
805
        movd ecx,mm0
 
806
        and  ecx, [inflate_fast_mask+eax*4]
 
807
        add  ecx,edx
 
808
        mov  eax, [ebx+ecx*4]
 
809
        jmp L_dolen_mmx
 
810
 
 
811
ALIGN 4
 
812
L_test_for_second_level_dist_mmx:
 
813
        test  al,64
 
814
        jnz L_invalid_distance_code
 
815
 
 
816
        and  eax,15
 
817
        psrlq mm0,mm1
 
818
        movd ecx,mm0
 
819
        and  ecx, [inflate_fast_mask+eax*4]
 
820
        mov  eax, [esp+12]
 
821
        add  ecx,ebx
 
822
        mov  eax, [eax+ecx*4]
 
823
        jmp  L_dodist_mmx
 
824
 
 
825
ALIGN 4
 
826
L_clip_window_mmx:
 
827
 
 
828
        mov  ecx,eax
 
829
        mov  eax, [esp+52]
 
830
        neg  ecx
 
831
        mov  esi, [esp+56]
 
832
 
 
833
        cmp  eax,ebx
 
834
        jb  L_invalid_distance_too_far
 
835
 
 
836
        add  ecx,ebx
 
837
        cmp  dword ptr [esp+48],0
 
838
        jne  L_wrap_around_window_mmx
 
839
 
 
840
        sub  eax,ecx
 
841
        add  esi,eax
 
842
 
 
843
        cmp  edx,ecx
 
844
        jbe  L_do_copy1_mmx
 
845
 
 
846
        sub  edx,ecx
 
847
        rep movsb
 
848
        mov  esi,edi
 
849
        sub  esi,ebx
 
850
        jmp  L_do_copy1_mmx
 
851
 
 
852
        cmp  edx,ecx
 
853
        jbe  L_do_copy1_mmx
 
854
 
 
855
        sub  edx,ecx
 
856
        rep movsb
 
857
        mov  esi,edi
 
858
        sub  esi,ebx
 
859
        jmp  L_do_copy1_mmx
 
860
 
 
861
L_wrap_around_window_mmx:
 
862
 
 
863
        mov  eax, [esp+48]
 
864
        cmp  ecx,eax
 
865
        jbe  L_contiguous_in_window_mmx
 
866
 
 
867
        add  esi, [esp+52]
 
868
        add  esi,eax
 
869
        sub  esi,ecx
 
870
        sub  ecx,eax
 
871
 
 
872
 
 
873
        cmp  edx,ecx
 
874
        jbe  L_do_copy1_mmx
 
875
 
 
876
        sub  edx,ecx
 
877
        rep movsb
 
878
        mov  esi, [esp+56]
 
879
        mov  ecx, [esp+48]
 
880
        cmp  edx,ecx
 
881
        jbe  L_do_copy1_mmx
 
882
 
 
883
        sub  edx,ecx
 
884
        rep movsb
 
885
        mov  esi,edi
 
886
        sub  esi,ebx
 
887
        jmp  L_do_copy1_mmx
 
888
 
 
889
L_contiguous_in_window_mmx:
 
890
 
 
891
        add  esi,eax
 
892
        sub  esi,ecx
 
893
 
 
894
 
 
895
        cmp  edx,ecx
 
896
        jbe  L_do_copy1_mmx
 
897
 
 
898
        sub  edx,ecx
 
899
        rep movsb
 
900
        mov  esi,edi
 
901
        sub  esi,ebx
 
902
 
 
903
L_do_copy1_mmx:
 
904
 
 
905
 
 
906
        mov  ecx,edx
 
907
        rep movsb
 
908
 
 
909
        mov  esi, [esp+44]
 
910
        mov  ebx, [esp+8]
 
911
        jmp  L_while_test_mmx
 
912
; 1174 "inffast.S"
 
913
L_invalid_distance_code:
 
914
 
 
915
 
 
916
 
 
917
 
 
918
 
 
919
        mov  ecx, invalid_distance_code_msg
 
920
        mov  edx,INFLATE_MODE_BAD
 
921
        jmp  L_update_stream_state
 
922
 
 
923
L_test_for_end_of_block:
 
924
 
 
925
 
 
926
 
 
927
 
 
928
 
 
929
        test  al,32
 
930
        jz  L_invalid_literal_length_code
 
931
 
 
932
        mov  ecx,0
 
933
        mov  edx,INFLATE_MODE_TYPE
 
934
        jmp  L_update_stream_state
 
935
 
 
936
L_invalid_literal_length_code:
 
937
 
 
938
 
 
939
 
 
940
 
 
941
 
 
942
        mov  ecx, invalid_literal_length_code_msg
 
943
        mov  edx,INFLATE_MODE_BAD
 
944
        jmp  L_update_stream_state
 
945
 
 
946
L_invalid_distance_too_far:
 
947
 
 
948
 
 
949
 
 
950
        mov  esi, [esp+44]
 
951
        mov  ecx, invalid_distance_too_far_msg
 
952
        mov  edx,INFLATE_MODE_BAD
 
953
        jmp  L_update_stream_state
 
954
 
 
955
L_update_stream_state:
 
956
 
 
957
        mov  eax, [esp+88]
 
958
        test  ecx,ecx
 
959
        jz  L_skip_msg
 
960
        mov  [eax+24],ecx
 
961
L_skip_msg:
 
962
        mov  eax, [eax+28]
 
963
        mov  [eax+mode_state],edx
 
964
        jmp  L_break_loop
 
965
 
 
966
ALIGN 4
 
967
L_break_loop:
 
968
; 1243 "inffast.S"
 
969
        cmp  dword ptr [inflate_fast_use_mmx],2
 
970
        jne  L_update_next_in
 
971
 
 
972
 
 
973
 
 
974
        mov  ebx,ebp
 
975
 
 
976
L_update_next_in:
 
977
; 1266 "inffast.S"
 
978
        mov  eax, [esp+88]
 
979
        mov  ecx,ebx
 
980
        mov  edx, [eax+28]
 
981
        shr  ecx,3
 
982
        sub  esi,ecx
 
983
        shl  ecx,3
 
984
        sub  ebx,ecx
 
985
        mov  [eax+12],edi
 
986
        mov  [edx+bits_state],ebx
 
987
        mov  ecx,ebx
 
988
 
 
989
        lea  ebx, [esp+28]
 
990
        cmp  [esp+20],ebx
 
991
        jne  L_buf_not_used
 
992
 
 
993
        sub  esi,ebx
 
994
        mov  ebx, [eax+0]
 
995
        mov  [esp+20],ebx
 
996
        add  esi,ebx
 
997
        mov  ebx, [eax+4]
 
998
        sub  ebx,11
 
999
        add  [esp+20],ebx
 
1000
 
 
1001
L_buf_not_used:
 
1002
        mov  [eax+0],esi
 
1003
 
 
1004
        mov  ebx,1
 
1005
        shl  ebx,cl
 
1006
        dec  ebx
 
1007
 
 
1008
 
 
1009
 
 
1010
 
 
1011
 
 
1012
        cmp  dword ptr [inflate_fast_use_mmx],2
 
1013
        jne  L_update_hold
 
1014
 
 
1015
 
 
1016
 
 
1017
        psrlq mm0,mm1
 
1018
        movd ebp,mm0
 
1019
 
 
1020
        emms
 
1021
 
 
1022
L_update_hold:
 
1023
 
 
1024
 
 
1025
 
 
1026
        and  ebp,ebx
 
1027
        mov  [edx+hold_state],ebp
 
1028
 
 
1029
 
 
1030
 
 
1031
 
 
1032
        mov  ebx, [esp+20]
 
1033
        cmp  ebx,esi
 
1034
        jbe  L_last_is_smaller
 
1035
 
 
1036
        sub  ebx,esi
 
1037
        add  ebx,11
 
1038
        mov  [eax+4],ebx
 
1039
        jmp  L_fixup_out
 
1040
L_last_is_smaller:
 
1041
        sub  esi,ebx
 
1042
        neg  esi
 
1043
        add  esi,11
 
1044
        mov  [eax+4],esi
 
1045
 
 
1046
 
 
1047
 
 
1048
 
 
1049
L_fixup_out:
 
1050
 
 
1051
        mov  ebx, [esp+16]
 
1052
        cmp  ebx,edi
 
1053
        jbe  L_end_is_smaller
 
1054
 
 
1055
        sub  ebx,edi
 
1056
        add  ebx,257
 
1057
        mov  [eax+16],ebx
 
1058
        jmp  L_done
 
1059
L_end_is_smaller:
 
1060
        sub  edi,ebx
 
1061
        neg  edi
 
1062
        add  edi,257
 
1063
        mov  [eax+16],edi
 
1064
 
 
1065
 
 
1066
 
 
1067
 
 
1068
 
 
1069
L_done:
 
1070
        add  esp,64
 
1071
        popfd
 
1072
        pop  ebx
 
1073
        pop  ebp
 
1074
        pop  esi
 
1075
        pop  edi
 
1076
        ret
 
1077
_inflate_fast endp
 
1078
 
 
1079
_TEXT   ends
 
1080
end