mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-22 22:56:53 +03:00
159 lines
2.6 KiB
PHP
159 lines
2.6 KiB
PHP
|
; @RCHER data area
|
||
|
; Written in pure assembler by Ivushkin Andrey aka Willow
|
||
|
|
||
|
if SYS eq win
|
||
|
dumpfile:
|
||
|
db 'D:\Ivushkin\projects\zip\output.dmp',0
|
||
|
dumpf_len=$-dumpfile
|
||
|
end if
|
||
|
outfile:
|
||
|
if SYS eq win
|
||
|
db 'D:\Ivushkin\projects\zip\output.raw',0
|
||
|
end if
|
||
|
dd 1
|
||
|
dd 0
|
||
|
.size dd 0
|
||
|
.out dd output
|
||
|
dd os_work
|
||
|
if ~SYS eq win
|
||
|
dumpfile:
|
||
|
db DUMPFILE,0
|
||
|
dumpf_len=$-dumpfile
|
||
|
end if
|
||
|
Finfo:
|
||
|
dd 0
|
||
|
.block dd 0
|
||
|
.count dd BUFSIZE*2
|
||
|
.ptr dd BUFPTR
|
||
|
dd os_work
|
||
|
|
||
|
filename:
|
||
|
if SYS eq win
|
||
|
db 'png\absolut0.png',0
|
||
|
;db 'fasm-1.54.tgz',0
|
||
|
;include 'testsu~1.inc'
|
||
|
; db 'pngsuite\pngsuite.tar.gz',0 ; OK
|
||
|
; db 'pngsuite\basn4a08.png',0 ; OK
|
||
|
; db 'goldhill.png',0 ; beeping
|
||
|
; db 'arl_logo.png',0 ; wrong out
|
||
|
; db 'tech.png',0 ; wrong out
|
||
|
; db 'png\lena0000.png',0
|
||
|
; db 'arcs\'
|
||
|
; db 'NTOSKRNL.gz'
|
||
|
; db 'msg_enc.zip'
|
||
|
;db 'msgplain.zip'
|
||
|
; db 'c_866.gz'
|
||
|
; db 'zalman_2.png' ;OK
|
||
|
; db 'arcs\headerbar.png',0 ;OK
|
||
|
; db 'fonts1.png' ;OK
|
||
|
; db 'fonts.png' ;
|
||
|
; db 'skin.png' ;OK
|
||
|
; db 'JavaPowered8.png'; OK
|
||
|
; db 'opr008S8.png'
|
||
|
; db 'goldhill.png'
|
||
|
; db 'k3b.png',0
|
||
|
; db 'image0051.png'
|
||
|
; db 'window-elements.png',0
|
||
|
; db 'WWW.zip',0
|
||
|
; db 'png.zip',0
|
||
|
; db 'zlib09.zip',0
|
||
|
|
||
|
else
|
||
|
if ~ FNAME eq
|
||
|
db FNAME
|
||
|
end if
|
||
|
; db '/hd/1/zip/png.zip',0
|
||
|
; db '/hd/1/zip/files/opossum.png'
|
||
|
; db '/rd/1/www.zip',0
|
||
|
; db '/hd/1/zip/test2.zip',0
|
||
|
end if
|
||
|
db 0
|
||
|
rb 256-($-filename)
|
||
|
I_END:
|
||
|
|
||
|
if SYS eq win
|
||
|
cr_lf db 0xa,0xd
|
||
|
hnd dd ?
|
||
|
cons dd ?
|
||
|
cons_in dd ?
|
||
|
cparam1 dd ?
|
||
|
cparam2 dd ?
|
||
|
end if
|
||
|
|
||
|
DKeys rd 3
|
||
|
Dheader rb 12
|
||
|
Dpassword rb PASSW_LEN
|
||
|
|
||
|
png_bpp dd ?
|
||
|
sline_len dd ?
|
||
|
IDATcount dd ?
|
||
|
IDATsize dd ?
|
||
|
PNG_info:
|
||
|
.Width dd ?
|
||
|
.Height dd ?
|
||
|
.Bit_depth db ?
|
||
|
.Color_type db ?
|
||
|
.Compression_method db ?
|
||
|
.Filter_method db ?
|
||
|
.Interlace_method db ?
|
||
|
.Palette rb 3*256
|
||
|
gpbf dw ?
|
||
|
file_count dd ?
|
||
|
filters rd 6
|
||
|
arc_base dd ?
|
||
|
outp dd ?
|
||
|
unp_size dd ?
|
||
|
CRC_check dd ?
|
||
|
CRC32 dd ?
|
||
|
CRC32table rd 256
|
||
|
Adler32 dd ?
|
||
|
child dd ?
|
||
|
clientPID dd ?
|
||
|
|
||
|
filesize dd ?
|
||
|
bits db ?
|
||
|
cur_byte dd ?
|
||
|
lastblk db ?
|
||
|
Flags dd ?
|
||
|
tblCount dw ?
|
||
|
tblLen dw ?
|
||
|
hclen db ?
|
||
|
max_len dw ?
|
||
|
|
||
|
bl_count rb BITS
|
||
|
|
||
|
next_code rw BITS
|
||
|
tmp_clit:
|
||
|
rw 20
|
||
|
calph:
|
||
|
rw 20
|
||
|
sorted_clit rw 20
|
||
|
|
||
|
seql_c db ?
|
||
|
seql rb BITS
|
||
|
|
||
|
seqd_c db ?
|
||
|
seqd rb BITS
|
||
|
|
||
|
hlit dw ?
|
||
|
Literal rw 286
|
||
|
Lit_c rw 286
|
||
|
|
||
|
hdist db ?
|
||
|
Distance rw 32
|
||
|
Dist_c rw 32
|
||
|
|
||
|
|
||
|
area:
|
||
|
rb INBUF
|
||
|
|
||
|
os_work rb 4*1024
|
||
|
|
||
|
output:
|
||
|
rb OUTBUF
|
||
|
|
||
|
png_image:
|
||
|
if SYS eq win
|
||
|
rb OUTBUF
|
||
|
end if
|