Mercurial > hg > Members > kono > nitros9-code
view lib/kreiderclib/dirutil.as @ 2833:0f3030598435 lwtools-port
Really fix level 1 builds: Do not use os9 dcopy
Bugs in os9 dcopy make it run into infinite recursion before it
eventually dies of buffer overflow.
Instead use os9 makdir and copy, which was already used some places.
| author | Tormod Volden <debian.tormod@gmail.com> |
|---|---|
| date | Wed, 10 Jul 2013 19:09:05 +0200 |
| parents | 1647f1874cdf |
| children |
line wrap: on
line source
* Disassembly by Os9disasm of dirutil.r * class D external label equates D001d equ $001d D001e equ $001e section bss * Uninitialized data (class B) B0000 rmb 4 B0004 rmb 30 * Initialized Data (class G) endsect section code closedir: ldx 2,s ldd ,x pshs d,x lbsr close leas 2,s lbsr free puls x,pc opendir: pshs u ldd #$0022 pshs d lbsr malloc std ,s beq L0037 ldx #$0081 ldd 6,s pshs d,x lbsr open leas 4,s std [,s] bge L0037 ldd ,s lbsr free clra clrb std ,s L0037 puls d,u,pc readdir: pshs u ldu 4,s leau 2,u L003f ldd #$0020 pshs d ldd -2,u pshs d,u lbsr read leas 6,s std -2,s bgt L0055 clra clrb puls u,pc L0055 ldb ,u beq L003f leax B0004,y pshs x,u lbsr strhcpy leas 4,s leax B0000,y clra ldb D001d,u std ,x ldd D001e,u std 2,x tfr x,d puls u,pc seekdir: clra clrb pshs d ldd 8,s pshs d ldd 8,s bra L008b telldir: ldd #1 pshs d clrb pshs d L008b pshs d ldd [8,s] pshs d lbsr lseek leas 8,s rts endsect