Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
31 halyavin 1 
; @RCHER data area
2 
; Written in pure assembler by Ivushkin Andrey aka Willow
3 
 
4 
if  SYS eq win
5 
  dumpfile:
6 
            db 'D:\Ivushkin\projects\zip\output.dmp',0
7 
  dumpf_len=$-dumpfile
8 
end if
9 
outfile:
10 
if SYS eq win
11 
            db 'D:\Ivushkin\projects\zip\output.raw',0
12 
end if
13 
            dd 1
14 
            dd 0
15 
  .size     dd 0
16 
  .out      dd output
17 
            dd os_work
18 
if ~SYS eq win
19 
  dumpfile:
20 
            db DUMPFILE,0
21 
  dumpf_len=$-dumpfile
22 
end if
23 
Finfo:
24 
            dd 0
25 
    .block  dd 0
26 
    .count  dd BUFSIZE*2
27 
    .ptr    dd BUFPTR
28 
            dd os_work
29 
 
30 
filename:
31 
if SYS eq win
32 
db 'png\absolut0.png',0
33 
;db  'fasm-1.54.tgz',0
34 
;include 'testsu~1.inc'
35 
;      db  'pngsuite\pngsuite.tar.gz',0  ; OK
36 
;      db  'pngsuite\basn4a08.png',0  ; OK
37 
;      db  'goldhill.png',0  ; beeping
38 
;      db  'arl_logo.png',0  ; wrong out
39 
;      db  'tech.png',0  ; wrong out
40 
;     db  'png\lena0000.png',0
41 
;      db 'arcs\'
42 
;      db 'NTOSKRNL.gz'
43 
;      db 'msg_enc.zip'
44 
      ;db 'msgplain.zip'
45 
;      db 'c_866.gz'
46 
;     db 'zalman_2.png' ;OK
47 
;     db 'arcs\headerbar.png',0 ;OK
48 
;     db 'fonts1.png' ;OK
49 
;     db 'fonts.png' ;
50 
;     db 'skin.png' ;OK
51 
;     db 'JavaPowered8.png'; OK
52 
;     db 'opr008S8.png'
53 
;    db  'goldhill.png'
54 
;     db 'k3b.png',0
55 
;      db 'image0051.png'
56 
;     db 'window-elements.png',0
57 
;    db 'WWW.zip',0
58 
;     db 'png.zip',0
59 
;    db 'zlib09.zip',0
60 
 
61 
else
62 
  if ~ FNAME eq
63 
     db FNAME
64 
  end if
65 
;    db '/hd/1/zip/png.zip',0
66 
;    db '/hd/1/zip/files/opossum.png'
67 
;    db '/rd/1/www.zip',0
68 
;    db '/hd/1/zip/test2.zip',0
69 
end if
70 
 db 0
71 
rb 256-($-filename)
72 
I_END:
73 
 
74 
if SYS eq win
75 
    cr_lf db 0xa,0xd
76 
    hnd dd ?
77 
    cons  dd ?
78 
    cons_in dd ?
79 
    cparam1 dd ?
80 
    cparam2 dd ?
81 
end if
82 
 
83 
DKeys rd 3
84 
Dheader rb 12
85 
Dpassword rb PASSW_LEN
86 
 
87 
png_bpp  dd ?
88 
sline_len dd ?
89 
IDATcount  dd ?
90 
IDATsize  dd ?
91 
PNG_info:
92 
            .Width dd ?
93 
            .Height dd ?
94 
            .Bit_depth db ?
95 
            .Color_type db ?
96 
            .Compression_method db ?
97 
            .Filter_method db ?
98 
            .Interlace_method db ?
99 
            .Palette rb 3*256
100 
gpbf dw ?
101 
file_count dd ?
102 
filters rd 6
103 
arc_base dd ?
104 
outp  dd ?
105 
unp_size  dd ?
106 
CRC_check dd ?
107 
CRC32 dd ?
108 
CRC32table rd 256
109 
Adler32 dd ?
110 
child dd ?
111 
clientPID dd ?
112 
 
113 
filesize dd ?
114 
bits db ?
115 
cur_byte dd ?
116 
lastblk db ?
117 
Flags dd ?
118 
tblCount dw ?
119 
tblLen dw ?
120 
hclen db ?
121 
max_len dw ?
122 
 
123 
bl_count rb BITS
124 
 
125 
next_code rw BITS
126 
tmp_clit:
127 
    rw 20
128 
calph:
129 
    rw 20
130 
sorted_clit rw 20
131 
 
132 
seql_c db ?
133 
seql rb BITS
134 
 
135 
seqd_c db ?
136 
seqd rb BITS
137 
 
138 
hlit dw ?
139 
Literal rw 286
140 
Lit_c rw 286
141 
 
142 
hdist db ?
143 
Distance rw 32
144 
Dist_c rw 32
145 
 
146 
 
147 
area:
148 
 rb INBUF
149 
 
150 
os_work rb 4*1024
151 
 
152 
output:
153 
rb OUTBUF
154 
 
155 
png_image:
156 
if SYS eq win
157 
  rb OUTBUF
158 
end if