#NO_APP gcc2_compiled.: ___gnu_compiled_c: .data .even _boardresetdb: .word 2145 .word 33 .long LC0 .long _reset_rb3 .word 2195 .word 6 .long LC1 .long _reset_piccolo .word 2195 .word 11 .long LC2 .long _reset_sd64 .word 2167 .word 201 .long LC3 .long _reset_ariadne .word 2121 .word 1 .long LC4 .long _reset_hydra .text LC4: .ascii "Hydra\0" LC3: .ascii "Ariadne\0" LC2: .ascii "SD64\0" LC1: .ascii "Piccolo\0" LC0: .ascii "Rainbow 3\0" .globl _amiga_models .data .even _amiga_models: .long LC5 .long LC6 .long LC7 .long LC8 .long LC9 .long LC10 .long LC11 .long LC12 .long LC13 .long LC14 .long LC15 .long LC16 .long LC17 .long LC18 .long LC19 .text LC19: .ascii "Draco\0" LC18: .ascii "CD32\0" LC17: .ascii "CDTV\0" LC16: .ascii "Amiga 4000T\0" LC15: .ascii "Amiga 4000\0" LC14: .ascii "Amiga 3000+\0" LC13: .ascii "Amiga 3000T\0" LC12: .ascii "Amiga 3000\0" LC11: .ascii "Amiga 2500\0" LC10: .ascii "Amiga 2000\0" LC9: .ascii "Amiga 1200\0" LC8: .ascii "Amiga 1000\0" LC7: .ascii "Amiga 600\0" LC6: .ascii "Amiga 500+\0" LC5: .ascii "Amiga 500\0" .globl _first_amiga_model .even _first_amiga_model: .long 1 .globl _last_amiga_model .even _last_amiga_model: .long 15 LC20: .ascii "\12Linux/m68k Amiga Bootstrap version 5.5\12\0" LC21: .ascii "Copyright 1993,1994 by Hamish Macdonald and Greg Harp\12\12\0" LC22: .ascii "Warning: too many AutoConfig devices. Ignoring device at 0x%08lx\12\0" LC23: .ascii "A3640 MapROM detected.\12\0" LC24: .ascii "A3000 shadowed Kickstart detected.\12\0" LC25: .ascii "ZKick detected.\12\0" LC26: .ascii "Warning: too many memory blocks. Ignoring block of %ldK at 0x%08x\12\0" LC27: .ascii "%s \0" LC28: .ascii "Amiga \0" LC29: .ascii "CPU: \0" LC30: .ascii "68020 (Do you have an MMU?)\0" LC31: .ascii "68030\0" LC32: .ascii "68040\0" LC33: .ascii "68060\0" LC34: .ascii "Insufficient for Linux. Aborting...\12\0" LC35: .ascii "SysBase->AttnFlags = 0x%08lx\12\0" LC36: .ascii " with 68881 FPU\0" LC37: .ascii " with 68882 FPU\0" LC38: .ascii " with internal FPU\0" LC39: .ascii " without FPU\0" LC40: .ascii ", old or unknown chipset\0" LC41: .ascii ", OCS\0" LC42: .ascii ", ECS\0" LC43: .ascii ", AGA chipset\0" LC44: .ascii "\12\12\0" LC45: .ascii "Command line is '%s'\12\0" LC46: .ascii "Vertical Blank Frequency: %ldHz\12\0" LC47: .ascii "Power Supply Frequency: %ldHz\12\0" LC48: .ascii "EClock Frequency: %ldHz\12\12\0" LC49: .ascii "s\0" LC50: .ascii "\0" LC51: .ascii "Found %ld AutoConfig Device%s\12\0" LC52: .ascii "Device %ld: addr = 0x%08lx\0" LC53: .ascii " [%s - will be reset at kernel boot time]\0" LC54: .ascii "No AutoConfig Devices Found\12\0" LC55: .ascii "s \0" LC56: .ascii " \0" LC57: .ascii "\12Found %ld Block%sof Memory\12\0" LC58: .ascii "Block %ld: 0x%08lx to 0x%08lx (%ldK)\12\0" LC59: .ascii "No memory found?! Aborting...\12\0" LC60: .ascii "%ldK of CHIP memory\12\0" LC61: .ascii "\12The kernel will be located at 0x%08lx\12\0" LC62: .ascii "Not enough Chip RAM in this system. Aborting...\12\0" LC63: .ascii "Not enough Fast RAM in this system. Aborting...\12\0" LC64: .ascii "Unable to find size of ramdisk file `%s'\12\0" LC65: .ascii "Unable to open kernel file `%s'\12\0" LC66: .ascii "Unable to read exec header from kernel file\12\0" LC67: .ascii "Kernel is compressed\12\0" LC68: .ascii "Decompression error -- aborting\12\0" LC69: .ascii "\12Loading a.out (ZMAGIC) Linux/m68k kernel...\12\0" LC70: .ascii "\12Loading a.out (QMAGIC) Linux/m68k kernel...\12\0" LC71: .ascii "\177ELF\0" LC72: .ascii "\12Loading ELF Linux/m68k kernel...\12\0" LC73: .ascii "Invalid ELF header contents in kernel\12\0" LC74: .ascii "Unable to allocate memory for program headers\12\0" LC75: .ascii "Unable to read program headers from kernel file\12\0" LC76: .ascii "Wrong magic number 0x%08lx in kernel header\12\0" LC77: .ascii "Unable to allocate memory\12\0" LC78: .ascii "Failed to seek to segment %ld\12\0" LC79: .ascii "Failed to read segment %ld\12\0" LC80: .ascii "Failed to seek to text\12\0" LC81: .ascii "Failed to read text\12\0" LC82: .ascii "Failed to read data\12\0" LC83: .ascii "Unable to open ramdisk file `%s'\12\0" LC84: .ascii "Failed to read ramdisk file\12\0" LC85: .ascii "Unable to allocate memory for stack\12\0" LC86: .ascii "Unable to allocate memory for startcode\12\0" LC87: .ascii "RAM disk at 0x%08lx, size is %ldK\12\0" LC88: .ascii "Kernel segment %ld at 0x%08lx, size %ld\12\0" LC89: .ascii "Boot info at 0x%08lx\12\0" LC90: .ascii "\12Kernel text at 0x%08lx, code size 0x%08lx\12\0" LC91: .ascii "Kernel data at 0x%08lx, data size 0x%08lx\12\0" LC92: .ascii "Kernel bss at 0x%08lx, bss size 0x%08lx\12\0" LC93: .ascii "Boot info at 0x%08lx\12\0" LC94: .ascii "\12Kernel entry is 0x%08lx\12\0" LC95: .ascii "ramdisk dest top is 0x%08lx\12\0" LC96: .ascii "ramdisk lower limit is 0x%08lx\12\0" LC97: .ascii "ramdisk src top is 0x%08lx\12\0" LC98: .ascii "\12Type a key to continue the Linux/m68k boot...\0" .even .globl _linuxboot _linuxboot: link a5,#-144 moveml #0x3820,sp@- moveq #-1,d4 movel d4,a5@(-4) moveq #-1,d4 movel d4,a5@(-8) clrl a5@(-12) clrl a5@(-36) clrl a5@(-40) clrl a5@(-44) clrl a5@(-80) clrl a5@(-84) clrl a5@(-88) movel a5@(8),_linuxboot_args movel _linuxboot_args,a0 pea LC20 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 pea LC21 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel a5@(8),d0 pea 1428:w pea _bi movel d0,sp@- jbsr _bcopy addqw #8,sp addqw #4,sp moveq #1,d4 movel d4,_bi tstl _bi+1422 jne L20 jbsr _get_chipset movel d0,_bi+1422 L20: tstl _bi+4 jne L21 pea _bi+12 pea _bi+8 pea _bi+4 jbsr _get_processor addqw #8,sp addqw #4,sp L21: tstl _bi+316 jne L22 movel _bi+1422,sp@- jbsr _get_model addqw #4,sp movel d0,_bi+316 L22: tstl _bi+316 jeq L23 moveq #1,d1 movel d1,d0 movel _bi+316,d4 asll d4,d0 jra L24 L23: clrl d0 L24: movel d0,a5@(-52) tstl _bi+320 jne L25 clrl a5@(-24) L26: pea -1:w pea -1:w movel a5@(-36),sp@- jbsr _FindConfigDev addqw #8,sp addqw #4,sp movel d0,a5@(-36) tstl a5@(-36) jne L29 jra L27 L29: moveq #15,d4 cmpl _bi+320,d4 jlt L30 pea 68:w movel a5@(-36),sp@- movel _bi+320,d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel d0,d1 addl #_bi+324,d1 movel d1,sp@- addql #1,_bi+320 jbsr _memcpy addqw #8,sp addqw #4,sp jra L31 L30: movel _linuxboot_args,a0 movel a5@(-36),a1 movel a1@(32),sp@- pea LC22 movel a0@(1464),a2 jbsr a2@ addqw #8,sp L31: L28: addql #1,a5@(-24) jra L26 L27: L25: tstl _bi+16 seq d0 moveb d0,d4 extbl d4 movel d4,a5@(-16) movel a5@(-16),d0 negl d0 movel d0,a5@(-16) tstl _bi+1412 seq d0 moveb d0,d4 extbl d4 movel d4,a5@(-20) movel a5@(-20),d0 negl d0 movel d0,a5@(-20) movel _SysBase,a0 movel a0@(322),a5@(-32) L32: movel a5@(-32),a0 tstl a0@ jne L35 jra L33 L35: movel a5@(-32),d0 movel d0,a0 lea a5@(-132),a1 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movel a0@,a1@ addqw #4,a1 addqw #4,a0 movew a5@(-118),d0 andw #1,d0 tstw d0 jne L36 jra L34 L36: cmpl #133693440,a5@(-108) jne L37 movel a5@(-52),d0 andl #6912,d0 tstl d0 jeq L37 moveq #4,d0 andl _bi+4,d0 tstl d0 jeq L38 pea __maprommed jbsr _Supervisor addqw #4,sp tstl d0 jeq L38 movel _linuxboot_args,a0 pea LC23 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L39 L38: movel a5@(-52),d0 andl #768,d0 tstl d0 jeq L40 movel #134217728,a5@(-108) movel _linuxboot_args,a0 pea LC24 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L40: L39: L37: cmpl #2621472,a5@(-112) jne L41 moveb a5@(-49),d0 andb #210,d0 tstb d0 jeq L41 movel #2097152,a5@(-112) movel _linuxboot_args,a0 pea LC25 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L41: andw #61440,a5@(-106) andw #61440,a5@(-110) tstl a5@(-16) jeq L42 movew a5@(-118),d0 andw #4,d0 tstw d0 jeq L42 movel a5@(-108),d0 subl a5@(-112),d0 movel d0,d4 andl #-262144,d4 movel d4,a5@(-136) tstl a5@(-136) jeq L43 moveq #3,d4 cmpl _bi+16,d4 jlt L44 movel _bi+16,d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a0 movel a5@(-112),a0@(20,d0:l) movel _bi+16,d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a0 movel a5@(-136),a0@(24,d0:l) addql #1,_bi+16 jra L45 L44: movel _linuxboot_args,a0 movel a5@(-112),sp@- movel a5@(-136),d1 movel d1,d0 moveq #10,d4 lsrl d4,d0 movel d0,sp@- pea LC26 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp L45: L43: jra L46 L42: tstl a5@(-20) jeq L47 movew a5@(-118),d0 andw #2,d0 tstw d0 jeq L47 movel a5@(-108),_bi+1412 L47: L46: L34: movel a5@(-32),a0 movel a0@,a5@(-32) jra L32 L33: tstb _bi+1416 jne L48 movel _SysBase,a0 moveb a0@(530),_bi+1416 L48: tstb _bi+1417 jne L49 movel _SysBase,a0 moveb a0@(531),_bi+1417 L49: tstl _bi+1418 jne L50 movel _SysBase,a0 movel a0@(568),_bi+1418 L50: tstw _bi+1426 jne L51 movel _linuxboot_args,a0 movel a0@(1448),d0 movel _linuxboot_args,a0 tstl a0@(1448) jne L52 movel #9600,d0 L52: movel d0,a5@(-76) movel _bi+1418,d1 movel d1,d2 movel d2,d0 asll #2,d0 addl d1,d0 movel a5@(-76),d2 movel d2,d1 lsrl #1,d1 movel d0,d2 addl d1,d2 movel d2,d1 divull a5@(-76),d0:d1 movew d1,d4 subqw #1,d4 movew d4,_bi+1426 L51: movel _bi+316,d4 cmpl _first_amiga_model,d4 jcs L53 movel _bi+316,d4 cmpl _last_amiga_model,d4 jhi L53 movel _linuxboot_args,a0 movel _bi+316,d0 subl _first_amiga_model,d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _amiga_models,a1 movel a1@(d0:l),sp@- pea LC27 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L54 L53: movel _linuxboot_args,a0 pea LC28 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L54: movel _linuxboot_args,a0 pea LC29 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _bi+4,d0 moveq #2,d4 cmpl d0,d4 jeq L57 moveq #2,d4 cmpl d0,d4 jcs L63 moveq #1,d4 cmpl d0,d4 jeq L56 jra L60 L63: moveq #4,d4 cmpl d0,d4 jeq L58 moveq #8,d4 cmpl d0,d4 jeq L59 jra L60 L56: movel _linuxboot_args,a0 pea LC30 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L55 L57: movel _linuxboot_args,a0 pea LC31 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L55 L58: movel _linuxboot_args,a0 pea LC32 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L55 L59: movel _linuxboot_args,a0 pea LC33 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L55 L60: movel _linuxboot_args,a0 pea LC34 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 movel _SysBase,a1 clrl d0 movew a1@(296),d0 movel d0,sp@- pea LC35 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L55: movel _bi+8,d0 moveq #2,d4 cmpl d0,d4 jeq L66 moveq #2,d4 cmpl d0,d4 jcs L71 moveq #1,d4 cmpl d0,d4 jeq L65 jra L69 L71: moveq #4,d4 cmpl d0,d4 jeq L67 moveq #8,d4 cmpl d0,d4 jeq L68 jra L69 L65: movel _linuxboot_args,a0 pea LC36 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L64 L66: movel _linuxboot_args,a0 pea LC37 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L64 L67: L68: movel _linuxboot_args,a0 pea LC38 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L64 L69: movel _linuxboot_args,a0 pea LC39 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L64 L64: movel _bi+1422,d0 moveq #1,d4 cmpl d0,d4 jeq L74 moveq #1,d4 cmpl d0,d4 jhi L73 moveq #2,d4 cmpl d0,d4 jeq L75 moveq #3,d4 cmpl d0,d4 jeq L76 jra L78 L73: movel _linuxboot_args,a0 pea LC40 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L72 L74: movel _linuxboot_args,a0 pea LC41 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L72 L75: movel _linuxboot_args,a0 pea LC42 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L72 L76: movel _linuxboot_args,a0 pea LC43 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L72 L78: L72: movel _linuxboot_args,a0 pea LC44 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 pea _bi+60 pea LC45 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 clrl d0 moveb _bi+1416,d0 movel d0,sp@- pea LC46 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 clrl d0 moveb _bi+1417,d0 movel d0,sp@- pea LC47 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 movel _bi+1418,sp@- pea LC48 movel a0@(1464),a2 jbsr a2@ addqw #8,sp tstl _bi+320 jeq L79 movel _linuxboot_args,a0 moveq #1,d4 cmpl _bi+320,d4 jge L80 movel #LC49,d0 jra L81 L80: movel #LC50,d0 L81: movel d0,sp@- movel _bi+320,sp@- pea LC51 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp clrl a5@(-24) L82: movel a5@(-24),d4 cmpl _bi+320,d4 jlt L85 jra L83 L85: movel _linuxboot_args,a0 movel a5@(-24),d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel #_bi,d1 movel d1,a1 addl d0,a1 movel a1@(356),sp@- movel a5@(-24),sp@- pea LC52 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _boardresetfuncs,a0 clrl a0@(d0:l) movel _linuxboot_args,a0 tstl a0@(1444) jeq L86 movel a5@(-24),d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel #_bi,d1 movel d1,a0 addl d0,a0 movew a0@(344),a5@(-94) movel a5@(-24),d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel #_bi,d1 movel d1,a0 addl d0,a0 moveb a0@(341),a5@(-95) clrl a5@(-28) L87: moveq #4,d4 cmpl a5@(-28),d4 jcc L90 jra L88 L90: movel a5@(-28),d0 movel d0,d2 movel d2,d1 addl d1,d1 addl d0,d1 movel d1,d0 asll #2,d0 lea _boardresetdb,a0 movew a0@(d0:l),d4 cmpw a5@(-94),d4 jne L91 clrw d0 moveb a5@(-95),d0 movel a5@(-28),d1 movel d1,d3 movel d3,d2 addl d2,d2 addl d1,d2 movel d2,d1 asll #2,d1 lea _boardresetdb,a0 cmpw a0@(2,d1:l),d0 jne L91 movel _linuxboot_args,a0 movel a5@(-28),d0 movel d0,d2 movel d2,d1 addl d1,d1 addl d0,d1 movel d1,d0 asll #2,d0 lea _boardresetdb,a1 movel a1@(4,d0:l),sp@- pea LC53 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _boardresetfuncs,a0 movel a5@(-28),d1 movel d1,d3 movel d3,d2 addl d2,d2 addl d1,d2 movel d2,d1 asll #2,d1 lea _boardresetdb,a1 movel a1@(8,d1:l),a0@(d0:l) jra L88 L91: L89: addql #1,a5@(-28) jra L87 L88: L86: movel _linuxboot_args,a0 pea 10:w movel a0@(1460),a2 jbsr a2@ addqw #4,sp L84: addql #1,a5@(-24) jra L82 L83: jra L92 L79: movel _linuxboot_args,a0 pea LC54 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L92: tstl _bi+16 jeq L93 movel _linuxboot_args,a0 moveq #1,d4 cmpl _bi+16,d4 jge L94 movel #LC55,d0 jra L95 L94: movel #LC56,d0 L95: movel d0,sp@- movel _bi+16,sp@- pea LC57 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp clrl a5@(-24) L96: movel a5@(-24),d4 cmpl _bi+16,d4 jlt L99 jra L97 L99: movel _linuxboot_args,a0 movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a1 movel a1@(24,d0:l),d1 movel d1,d0 moveq #10,d4 lsrl d4,d0 movel d0,sp@- movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a1 movel a5@(-24),d1 movel d1,d2 movel d2,d1 asll #3,d1 lea _bi,a2 movel a1@(20,d0:l),d0 addl a2@(24,d1:l),d0 movel d0,sp@- movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a1 movel a1@(20,d0:l),sp@- movel a5@(-24),sp@- pea LC58 movel a0@(1464),a2 jbsr a2@ addw #20,sp L98: addql #1,a5@(-24) jra L96 L97: jra L100 L93: movel _linuxboot_args,a0 pea LC59 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L100: movel _linuxboot_args,a0 movel _bi+1412,d1 movel d1,d0 moveq #10,d4 lsrl d4,d0 movel d0,sp@- pea LC60 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _bi+20,a5@(-60) movel _bi+24,a5@(-64) movel _linuxboot_args,a0 movel a5@(-60),sp@- pea LC61 movel a0@(1464),a2 jbsr a2@ addqw #8,sp cmpl #524287,_bi+1412 jhi L101 movel _linuxboot_args,a0 pea LC62 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L101: nop clrl a5@(-48) clrl a5@(-24) L102: movel a5@(-24),d4 cmpl _bi+16,d4 jlt L105 jra L103 L105: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _bi,a0 movel a0@(24,d0:l),d4 addl d4,a5@(-48) L104: addql #1,a5@(-24) jra L102 L103: cmpl #2097151,a5@(-48) jhi L106 movel _linuxboot_args,a0 pea LC63 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L106: movel _linuxboot_args,a0 tstl a0@(1432) jeq L107 movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1432),sp@- movel a0@(1484),a2 jbsr a2@ addqw #4,sp movel d0,a5@(-136) moveq #-1,d4 cmpl a5@(-136),d4 jne L108 movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1432),sp@- pea LC64 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L108: movel a5@(-136),_bi+56 jra L109 L107: clrl _bi+56 L109: movel _bi+56,a5@(-68) movel a5@(-60),d0 addl a5@(-64),d0 movel d0,d4 subl a5@(-68),d4 movel d4,_bi+52 jbsr _create_bootinfo tstl d0 jne L110 jra L61 L110: movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1428),sp@- movel a0@(1468),a2 jbsr a2@ addqw #4,sp movel d0,a5@(-4) moveq #-1,d4 cmpl a5@(-4),d4 jne L111 movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1428),sp@- pea LC65 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L111: pea 32:w pea _kexec movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp moveq #32,d4 cmpl d0,d4 jeq L112 movel _linuxboot_args,a0 pea LC66 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L112: cmpb #31,_kexec jne L113 cmpb #139,_kexec+1 jeq L114 cmpb #158,_kexec+1 jeq L114 jra L113 L114: movel _linuxboot_args,a0 pea LC67 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel a5@(-4),sp@- jbsr _load_zkernel addqw #4,sp tstl d0 jeq L115 movel _linuxboot_args,a0 pea LC68 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L115: L113: movel _kexec,d0 andl #65535,d0 cmpl #204,d0 jeq L123 cmpl #267,d0 jeq L117 jra L125 L117: movel _linuxboot_args,a0 tstl a0@(1436) jeq L118 movel _linuxboot_args,a0 pea LC69 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L118: movel _kexec,d0 andl #65535,d0 cmpl #267,d0 jeq L119 movel _kexec,d0 andl #65535,d0 cmpl #204,d0 jeq L121 moveq #32,d0 jra L122 L121: clrl d0 L122: jra L120 L119: movel #1024,d0 L120: movel d0,a5@(-84) jra L116 L123: movel _linuxboot_args,a0 tstl a0@(1436) jeq L124 movel _linuxboot_args,a0 pea LC70 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L124: moveq #32,d4 movel d4,a5@(-84) moveq #-32,d4 addl d4,_kexec+4 jra L116 L125: clrl sp@- movel a5@(-4),sp@- jbsr _KSeek addqw #8,sp pea 52:w pea _kexec_elf movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp moveq #52,d4 cmpl d0,d4 jne L126 pea 4:w pea LC71 pea _kexec_elf jbsr _memcmp addqw #8,sp addqw #4,sp tstl d0 jne L126 moveq #1,d4 movel d4,a5@(-12) movel _linuxboot_args,a0 tstl a0@(1436) jeq L127 movel _linuxboot_args,a0 pea LC72 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L127: cmpw #2,_kexec_elf+16 jne L129 cmpw #4,_kexec_elf+18 jne L129 moveq #1,d4 cmpl _kexec_elf+20,d4 jne L129 jra L128 L129: movel _linuxboot_args,a0 pea LC73 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L128: movel #65541,sp@- clrl d0 movew _kexec_elf+44,d0 movel d0,d1 asll #5,d1 movel d1,sp@- jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,a5@(-88) tstl d1 jne L130 movel _linuxboot_args,a0 pea LC74 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L130: movel _kexec_elf+28,sp@- movel a5@(-4),sp@- jbsr _KSeek addqw #8,sp clrl d0 movew _kexec_elf+44,d0 movel d0,d1 asll #5,d1 movel d1,sp@- movel a5@(-88),sp@- movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp clrl d1 movew _kexec_elf+44,d1 movel d1,d2 asll #5,d2 cmpl d0,d2 jeq L131 movel _linuxboot_args,a0 pea LC75 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L131: jra L116 L126: movel _linuxboot_args,a0 movel _kexec,d0 andl #65535,d0 movel d0,sp@- pea LC76 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L116: addl #4096,a5@(-60) addl #-4096,a5@(-64) tstl a5@(-12) jne L133 movel _kexec+12,d0 addql #3,d0 moveq #-4,d4 andl d0,d4 movel d4,_kexec+12 L133: tstl a5@(-12) jeq L134 moveq #-1,d4 movel d4,a5@(-140) clrl a5@(-144) clrl a5@(-24) L135: clrl d0 movew _kexec_elf+44,d0 cmpl a5@(-24),d0 jgt L138 jra L136 L138: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a5@(-140),d4 cmpl a0@(8,d0:l),d4 jls L139 movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a0@(8,d0:l),a5@(-140) L139: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a5@(-24),d1 movel d1,d2 movel d2,d1 asll #5,d1 movel a5@(-88),a1 movel a0@(8,d0:l),d0 addl a1@(20,d1:l),d0 cmpl a5@(-144),d0 jls L140 movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a5@(-24),d1 movel d1,d2 movel d2,d1 asll #5,d1 movel a5@(-88),a1 movel a0@(8,d0:l),d4 addl a1@(20,d1:l),d4 movel d4,a5@(-144) L140: L137: addql #1,a5@(-24) jra L135 L136: tstl a5@(-140) jne L141 movel #4096,a5@(-140) movel a5@(-88),a0 movel a5@(-88),a1 movel a1@(8),d4 addl #4096,d4 movel d4,a0@(8) movel a5@(-88),a0 movel a5@(-88),a1 movel a1@(4),d4 addl #4096,d4 movel d4,a0@(4) movel a5@(-88),a0 movel a5@(-88),a1 movel a1@(16),d4 addl #-4096,d4 movel d4,a0@(16) movel a5@(-88),a0 movel a5@(-88),a1 movel a1@(20),d4 addl #-4096,d4 movel d4,a0@(20) L141: movel a5@(-144),d4 subl a5@(-140),d4 movel d4,a5@(-72) jra L142 L134: movel _kexec+4,d0 addl _kexec+8,d0 movel d0,d4 addl _kexec+12,d4 movel d4,a5@(-72) L142: movel a5@(-72),d0 addl _bi_size,d0 movel d0,d4 addl a5@(-68),d4 movel d4,a5@(-80) cmpl #1421,_bi_size jhi L143 movel a5@(-68),d0 addl #1422,d0 movel a5@(-72),d4 addl d0,d4 movel d4,a5@(-80) L143: movel #65541,sp@- movel a5@(-80),sp@- jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,a5@(-40) tstl d1 jne L144 movel _linuxboot_args,a0 pea LC77 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L144: tstl a5@(-12) jeq L145 clrl a5@(-24) L146: clrl d0 movew _kexec_elf+44,d0 cmpl a5@(-24),d0 jgt L149 jra L147 L149: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a0@(4,d0:l),sp@- movel a5@(-4),sp@- jbsr _KSeek addqw #8,sp moveq #-1,d4 cmpl d0,d4 jne L150 movel _linuxboot_args,a0 movel a5@(-24),sp@- pea LC78 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L150: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a0@(16,d0:l),sp@- movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a0 movel a5@(-40),a1 addl a0@(8,d0:l),a1 lea a1@(-4096),a0 movel a0,sp@- movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp movel a5@(-24),d1 movel d1,d2 movel d2,d1 asll #5,d1 movel a5@(-88),a0 cmpl a0@(16,d1:l),d0 jeq L151 movel _linuxboot_args,a0 movel a5@(-24),sp@- pea LC79 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L151: L148: addql #1,a5@(-24) jra L146 L147: jra L152 L145: movel a5@(-84),sp@- movel a5@(-4),sp@- jbsr _KSeek addqw #8,sp moveq #-1,d4 cmpl d0,d4 jne L153 movel _linuxboot_args,a0 pea LC80 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L153: movel _kexec+4,sp@- movel a5@(-40),sp@- movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp cmpl _kexec+4,d0 jeq L154 movel _linuxboot_args,a0 pea LC81 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L154: movel _kexec+8,sp@- movel a5@(-40),d0 addl _kexec+4,d0 movel d0,sp@- movel a5@(-4),sp@- jbsr _KRead addqw #8,sp addqw #4,sp cmpl _kexec+8,d0 jeq L155 movel _linuxboot_args,a0 pea LC82 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L155: L152: movel a5@(-4),sp@- jbsr _KClose addqw #4,sp moveq #-1,d4 movel d4,a5@(-4) movel a5@(-40),sp@- jbsr _check_bootinfo_version addqw #4,sp moveq #1,d4 cmpl d0,d4 jeq L158 moveq #2,d4 cmpl d0,d4 jeq L157 jra L160 L157: movel #_bi_union,a5@(-100) jra L156 L158: jbsr _create_compat_bootinfo tstl d0 jne L159 jra L61 L159: movel #_compat_bootinfo,a5@(-100) movel #1422,_bi_size jra L156 L160: jra L61 L156: movel _bi_size,sp@- movel a5@(-100),sp@- movel a5@(-40),d0 addl a5@(-72),d0 movel d0,sp@- jbsr _memcpy addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 tstl a0@(1432) jeq L162 movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1432),sp@- movel a0@(1468),a2 jbsr a2@ addqw #4,sp movel d0,a5@(-8) moveq #-1,d4 cmpl a5@(-8),d4 jne L163 movel _linuxboot_args,a0 movel _linuxboot_args,a1 movel a1@(1432),sp@- pea LC83 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L61 L163: movel _linuxboot_args,a0 movel a5@(-68),sp@- movel a5@(-40),d0 addl a5@(-72),d0 movel d0,d1 addl _bi_size,d1 movel d1,sp@- movel a5@(-8),sp@- movel a0@(1476),a2 jbsr a2@ addqw #8,sp addqw #4,sp cmpl a5@(-68),d0 jeq L164 movel _linuxboot_args,a0 pea LC84 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L164: movel _linuxboot_args,a0 movel a5@(-8),sp@- movel a0@(1480),a2 jbsr a2@ addqw #4,sp moveq #-1,d4 movel d4,a5@(-8) L162: movel #65538,sp@- pea 256:w jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,a5@(-44) tstl d1 jne L165 movel _linuxboot_args,a0 pea LC85 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L165: movel #_copyallend,d4 subl #_copyall,d4 movel d4,a5@(-56) movel #65538,sp@- movel a5@(-56),sp@- jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,a5@(-92) tstl d1 jne L166 movel _linuxboot_args,a0 pea LC86 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L61 L166: movel a5@(-56),sp@- pea _copyall movel a5@(-92),sp@- jbsr _memcpy addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 tstl a0@(1436) jeq L167 tstl _bi+56 jeq L168 movel _linuxboot_args,a0 movel _bi+56,d1 movel d1,d0 moveq #10,d4 lsrl d4,d0 movel d0,sp@- movel a5@(-40),d0 addl a5@(-72),d0 movel d0,sp@- pea LC87 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp L168: tstl a5@(-12) jeq L169 movel _linuxboot_args,a0 pea 10:w movel a0@(1460),a2 jbsr a2@ addqw #4,sp clrl a5@(-24) L170: clrl d0 movew _kexec_elf+44,d0 cmpl a5@(-24),d0 jgt L173 jra L171 L173: movel _linuxboot_args,a0 movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a1 movel a1@(20,d0:l),sp@- movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #5,d0 movel a5@(-88),a1 movel a5@(-60),a2 addl a1@(8,d0:l),a2 lea a2@(-4096),a1 movel a1,sp@- movel a5@(-24),sp@- pea LC88 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #8,sp L172: addql #1,a5@(-24) jra L170 L171: movel _linuxboot_args,a0 movel a5@(-60),d0 addl a5@(-72),d0 movel d0,sp@- pea LC89 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L174 L169: movel _linuxboot_args,a0 movel _kexec+4,sp@- movel a5@(-60),sp@- pea LC90 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 movel _kexec+8,sp@- movel a5@(-60),d0 addl _kexec+4,d0 movel d0,sp@- pea LC91 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 movel _kexec+12,sp@- movel a5@(-60),d0 addl _kexec+4,d0 movel d0,d1 addl _kexec+8,d1 movel d1,sp@- pea LC92 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 movel a5@(-60),d0 addl a5@(-72),d0 movel d0,sp@- pea LC93 movel a0@(1464),a2 jbsr a2@ addqw #8,sp L174: movel _linuxboot_args,a0 tstl a5@(-12) jeq L175 movel _kexec_elf+24,d0 jra L176 L175: movel _kexec+20,d0 L176: movel d0,sp@- pea LC94 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 movel a5@(-60),d0 addl a5@(-64),d0 movel d0,sp@- pea LC95 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 movel a5@(-40),d0 addl a5@(-72),d0 movel d0,sp@- pea LC96 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 movel a5@(-40),d0 addl a5@(-72),d0 movel d0,d1 addl a5@(-68),d1 movel d1,sp@- pea LC97 movel a0@(1464),a2 jbsr a2@ addqw #8,sp movel _linuxboot_args,a0 pea LC98 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 movel a0@(1456),a2 jbsr a2@ movel _linuxboot_args,a0 pea 10:w movel a0@(1460),a2 jbsr a2@ addqw #4,sp L167: movel _linuxboot_args,a0 movel #1000000,sp@- movel a0@(1488),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 tstl a0@(1440) jne L177 clrl sp@- jbsr _LoadView addqw #4,sp L177: jbsr _Disable movel _linuxboot_args,a0 tstl a0@(1444) jeq L178 clrl a5@(-24) L179: movel a5@(-24),d4 cmpl _bi+320,d4 jlt L182 jra L180 L182: movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _boardresetfuncs,a0 tstl a0@(d0:l) jeq L183 movel a5@(-24),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _boardresetfuncs,a0 movel a5@(-24),d1 movel d1,d3 movel d3,d2 asll #4,d2 addl d1,d2 movel d2,d1 asll #2,d1 movel d1,d2 addl #_bi+324,d2 movel d2,sp@- movel a0@(d0:l),a2 jbsr a2@ addqw #4,sp L183: L181: addql #1,a5@(-24) jra L179 L180: L178: movew #1023,14676118 pea -1:w clrl sp@- jbsr _CacheControl addqw #8,sp jbsr _SuperState jbsr _disable_mmu movel a5@(-72),sp@- movel a5@(-68),sp@- movel a5@(-64),sp@- movel a5@(-60),sp@- movel a5@(-40),sp@- movel a5@(-44),d0 addl #256,d0 movel d0,sp@- movel a5@(-92),sp@- jbsr _start_kernel addw #28,sp L61: moveq #-1,d4 cmpl a5@(-4),d4 jeq L184 movel a5@(-4),sp@- jbsr _KClose addqw #4,sp L184: moveq #-1,d4 cmpl a5@(-8),d4 jeq L185 movel _linuxboot_args,a0 movel a5@(-8),sp@- movel a0@(1480),a2 jbsr a2@ addqw #4,sp L185: tstl a5@(-40) jeq L186 movel a5@(-80),sp@- movel a5@(-40),sp@- jbsr _FreeMem addqw #8,sp L186: tstl a5@(-44) jeq L187 pea 256:w movel a5@(-44),sp@- jbsr _FreeMem addqw #8,sp L187: tstl a5@(-88) jeq L188 clrl d0 movew _kexec_elf+44,d0 movel d0,d1 asll #5,d1 movel d1,sp@- movel a5@(-88),sp@- jbsr _FreeMem addqw #8,sp L188: clrl d0 jra L19 L19: moveml a5@(-160),#0x41c unlk a5 rts .even _get_chipset: link a5,#-8 movel _GfxBase,a0 cmpw #38,a0@(20) jls L190 pea -1:w jbsr _SetChipRev addqw #4,sp moveb d0,a5@(-1) jra L191 L190: movel _GfxBase,a0 moveb a0@(236),a5@(-1) L191: moveb a5@(-1),d0 andb #12,d0 cmpb #12,d0 jne L192 moveq #3,d1 movel d1,a5@(-6) jra L193 L192: moveb a5@(-1),d0 andb #3,d0 cmpb #3,d0 jne L194 moveq #2,d1 movel d1,a5@(-6) jra L195 L194: moveb a5@(-1),d0 andb #1,d0 tstb d0 jeq L196 moveq #1,d1 movel d1,a5@(-6) jra L197 L196: clrl a5@(-6) L197: L195: L193: movel a5@(-6),d0 jra L189 L189: unlk a5 rts .even _get_processor: link a5,#0 movel a5@(8),a0 movel a5@(12),a1 clrl a1@ clrl a0@ movel _SysBase,a0 moveb a0@(297),d0 andb #128,d0 tstb d0 jeq L199 movel a5@(8),a0 moveq #8,d1 movel d1,a0@ jra L200 L199: movel _SysBase,a0 movew a0@(296),d0 andw #8,d0 tstw d0 jeq L201 movel a5@(8),a0 moveq #4,d1 movel d1,a0@ jra L202 L201: movel _SysBase,a0 movew a0@(296),d0 andw #4,d0 tstw d0 jeq L203 movel a5@(8),a0 moveq #2,d1 movel d1,a0@ jra L204 L203: movel _SysBase,a0 movew a0@(296),d0 andw #2,d0 tstw d0 jeq L205 movel a5@(8),a0 moveq #1,d1 movel d1,a0@ L205: L204: L202: L200: movel a5@(8),a0 moveq #4,d1 cmpl a0@,d1 jeq L207 movel a5@(8),a0 moveq #8,d1 cmpl a0@,d1 jeq L207 jra L206 L207: movel _SysBase,a0 movew a0@(296),d0 andw #64,d0 tstw d0 jeq L208 movel a5@(12),a0 movel a5@(8),a1 movel a1@,a0@ L208: jra L209 L206: movel _SysBase,a0 movew a0@(296),d0 andw #32,d0 tstw d0 jeq L210 movel a5@(12),a0 moveq #2,d1 movel d1,a0@ jra L211 L210: movel _SysBase,a0 movew a0@(296),d0 andw #16,d0 tstw d0 jeq L212 movel a5@(12),a0 moveq #1,d1 movel d1,a0@ L212: L211: L209: movel a5@(16),a0 movel a5@(8),a1 movel a1@,a0@ L198: unlk a5 rts LC99: .ascii "Amiga model identification:\12\0" LC100: .ascii "draco.resource\0" LC101: .ascii " Chipset: \0" LC102: .ascii "Old or unknown\12\0" LC103: .ascii "OCS\12\0" LC104: .ascii "cd.device\0" LC105: .ascii "ECS\12\0" LC106: .ascii "Magic 36.7\0" LC107: .ascii "kickad 36.57\0" LC108: .ascii "A3000 Bonus\0" LC109: .ascii "A3000 bonus\0" LC110: .ascii "card.resource\0" LC111: .ascii "AGA\12\0" LC112: .ascii "A1000 Bonus\0" LC113: .ascii "A4000 bonus\0" LC114: .ascii "NCR scsi.device\0" LC115: .ascii "\12Type a key to continue...\0" .even _get_model: link a5,#-4 movel a2,sp@- clrl a5@(-4) movel _linuxboot_args,a0 tstl a0@(1436) jeq L214 movel _linuxboot_args,a0 pea LC99 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L214: pea LC100 jbsr _probe_resource addqw #4,sp tstl d0 jeq L215 moveq #15,d1 movel d1,a5@(-4) jra L216 L215: movel _linuxboot_args,a0 tstl a0@(1436) jeq L217 movel _linuxboot_args,a0 pea LC101 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L217: movel a5@(8),d0 moveq #1,d1 cmpl d0,d1 jeq L222 moveq #1,d1 cmpl d0,d1 jhi L219 moveq #2,d1 cmpl d0,d1 jeq L226 moveq #3,d1 cmpl d0,d1 jeq L233 jra L245 L219: movel _linuxboot_args,a0 tstl a0@(1436) jeq L220 movel _linuxboot_args,a0 pea LC102 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L220: jra L221 jra L218 L222: movel _linuxboot_args,a0 tstl a0@(1436) jeq L223 movel _linuxboot_args,a0 pea LC103 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L223: nop L221: pea LC104 jbsr _probe_resident addqw #4,sp tstl d0 jeq L224 moveq #13,d1 movel d1,a5@(-4) jra L225 L224: moveq #6,d1 movel d1,a5@(-4) L225: jra L218 L226: movel _linuxboot_args,a0 tstl a0@(1436) jeq L227 movel _linuxboot_args,a0 pea LC105 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L227: pea LC106 jbsr _probe_resident addqw #4,sp tstl d0 jne L229 pea LC107 jbsr _probe_resident addqw #4,sp tstl d0 jne L229 pea LC108 jbsr _probe_resident addqw #4,sp tstl d0 jne L229 pea LC109 jbsr _probe_resident addqw #4,sp tstl d0 jne L229 jra L228 L229: moveq #8,d1 movel d1,a5@(-4) jra L230 L228: pea LC110 jbsr _probe_resource addqw #4,sp tstl d0 jeq L231 moveq #3,d1 movel d1,a5@(-4) jra L232 L231: moveq #6,d1 movel d1,a5@(-4) L232: L230: jra L218 L233: movel _linuxboot_args,a0 tstl a0@(1436) jeq L234 movel _linuxboot_args,a0 pea LC111 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L234: pea LC112 jbsr _probe_resident addqw #4,sp tstl d0 jne L236 pea LC113 jbsr _probe_resident addqw #4,sp tstl d0 jne L236 jra L235 L236: pea LC114 jbsr _probe_resident addqw #4,sp tstl d0 jeq L237 moveq #12,d0 jra L238 L237: moveq #11,d0 L238: movel d0,a5@(-4) jra L239 L235: pea LC110 jbsr _probe_resource addqw #4,sp tstl d0 jeq L240 moveq #5,d1 movel d1,a5@(-4) jra L241 L240: pea LC104 jbsr _probe_resident addqw #4,sp tstl d0 jeq L242 moveq #14,d1 movel d1,a5@(-4) jra L243 L242: moveq #10,d1 movel d1,a5@(-4) L243: L241: L239: jra L218 L245: L218: L216: movel _linuxboot_args,a0 tstl a0@(1436) jeq L246 movel _linuxboot_args,a0 pea LC115 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 movel a0@(1456),a2 jbsr a2@ movel _linuxboot_args,a0 pea LC44 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L246: movel a5@(-4),d0 jra L213 L213: movel a5@(-8),a2 unlk a5 rts LC116: .ascii " Module `%s': \0" LC117: .ascii "0x%08lx\12\0" LC118: .ascii "not present\12\0" .even _probe_resident: link a5,#-4 movel a2,sp@- movel _linuxboot_args,a0 tstl a0@(1436) jeq L248 movel _linuxboot_args,a0 movel a5@(8),sp@- pea LC116 movel a0@(1464),a2 jbsr a2@ addqw #8,sp L248: movel a5@(8),sp@- jbsr _FindResident addqw #4,sp movel d0,a5@(-4) movel _linuxboot_args,a0 tstl a0@(1436) jeq L249 tstl a5@(-4) jeq L250 movel _linuxboot_args,a0 movel a5@(-4),sp@- pea LC117 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L251 L250: movel _linuxboot_args,a0 pea LC118 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L251: L249: tstl a5@(-4) sne d1 moveb d1,d0 extbl d0 movel d0,d1 negl d1 movel d1,d0 jra L247 L247: movel a5@(-8),a2 unlk a5 rts LC119: .ascii " Resource `%s': \0" .even _probe_resource: link a5,#-4 movel a2,sp@- movel _linuxboot_args,a0 tstl a0@(1436) jeq L253 movel _linuxboot_args,a0 movel a5@(8),sp@- pea LC119 movel a0@(1464),a2 jbsr a2@ addqw #8,sp L253: movel a5@(8),sp@- jbsr _OpenResource addqw #4,sp movel d0,a5@(-4) movel _linuxboot_args,a0 tstl a0@(1436) jeq L254 tstl a5@(-4) jeq L255 movel _linuxboot_args,a0 movel a5@(-4),sp@- pea LC117 movel a0@(1464),a2 jbsr a2@ addqw #8,sp jra L256 L255: movel _linuxboot_args,a0 pea LC118 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L256: L254: tstl a5@(-4) sne d1 moveb d1,d0 extbl d0 movel d0,d1 negl d1 movel d1,d0 jra L252 L252: movel a5@(-8),a2 unlk a5 rts .even _create_bootinfo: link a5,#-8 movel d2,sp@- clrl _bi_size pea _bi pea 4:w pea 1:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L258 clrl d0 jra L257 L258: pea _bi+4 pea 4:w pea 2:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L259 clrl d0 jra L257 L259: pea _bi+8 pea 4:w pea 3:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L260 clrl d0 jra L257 L260: pea _bi+12 pea 4:w pea 4:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L261 clrl d0 jra L257 L261: nop clrl a5@(-4) L262: movel a5@(-4),a1 cmpl _bi+16,a1 jlt L265 jra L263 L265: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #3,d0 movel d0,d1 addl #_bi+20,d1 movel d1,sp@- pea 8:w pea 5:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L266 clrl d0 jra L257 L266: L264: addql #1,a5@(-4) jra L262 L263: tstl _bi+56 jeq L267 pea _bi+52 pea 8:w pea 6:w jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L268 clrl d0 jra L257 L268: L267: pea _bi+60 pea 7:w jbsr _add_bi_string addqw #8,sp tstl d0 jne L269 clrl d0 jra L257 L269: pea _bi+316 pea 4:w movel #32768,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L270 clrl d0 jra L257 L270: nop clrl a5@(-4) L271: movel a5@(-4),a1 cmpl _bi+320,a1 jlt L274 jra L272 L274: movel a5@(-4),d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel d0,d1 addl #_bi+324,d1 movel d1,sp@- pea 68:w movel #32769,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L275 clrl d0 jra L257 L275: L273: addql #1,a5@(-4) jra L271 L272: pea _bi+1412 pea 4:w movel #32770,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L276 clrl d0 jra L257 L276: pea _bi+1416 pea 1:w movel #32771,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L277 clrl d0 jra L257 L277: pea _bi+1417 pea 1:w movel #32772,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L278 clrl d0 jra L257 L278: pea _bi+1418 pea 4:w movel #32773,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L279 clrl d0 jra L257 L279: pea _bi+1422 pea 4:w movel #32774,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L280 clrl d0 jra L257 L280: pea _bi+1426 pea 2:w movel #32775,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp tstl d0 jne L281 clrl d0 jra L257 L281: lea _bi_union,a1 addl _bi_size,a1 movel a1,a5@(-8) movel a5@(-8),a0 clrw a0@ addql #2,_bi_size moveq #1,d0 jra L257 L257: movel a5@(-12),d2 unlk a5 rts LC120: .ascii "Can't add bootinfo record. Ask a wizard to enlarge me.\12\0" .even _add_bi_record: link a5,#-12 moveml #0x3020,sp@- movel a5@(8),d2 movel a5@(12),d3 movew d2,a5@(-2) movew d3,a5@(-4) clrl d0 movew a5@(-4),d0 addql #7,d0 moveq #-4,d1 andl d0,d1 movel d1,a5@(-12) movel _bi_size,a0 addl a5@(-12),a0 lea a0@(2),a1 cmpl #4096,a1 jls L283 movel _linuxboot_args,a0 pea LC120 movel a0@(1452),a2 jbsr a2@ addqw #4,sp clrl d0 jra L282 L283: movel #_bi_union,d1 addl _bi_size,d1 movel d1,a5@(-8) movel a5@(-8),a0 movew a5@(-2),a0@ movel a5@(-8),a0 movew a5@(-10),a0@(2) clrl d0 movew a5@(-4),d0 movel d0,sp@- movel a5@(16),sp@- movel a5@(-8),d0 addql #4,d0 movel d0,sp@- jbsr _memcpy addqw #8,sp addqw #4,sp movel a5@(-12),d1 addl d1,_bi_size moveq #1,d0 jra L282 L282: moveml a5@(-24),#0x40c unlk a5 rts .even _add_bi_string: link a5,#-4 movel d2,sp@- movel a5@(8),d2 movew d2,a5@(-2) movel a5@(12),sp@- movel a5@(12),sp@- jbsr _strlen addqw #4,sp movew d0,d1 addqw #1,d1 clrl d0 movew d1,d0 movel d0,sp@- clrl d0 movew a5@(-2),d0 movel d0,sp@- jbsr _add_bi_record addqw #8,sp addqw #4,sp movel d0,d1 movel d1,d0 jra L284 L284: movel a5@(-8),d2 unlk a5 rts LC121: .ascii "CPU type 0x%08lx not supported by kernel\12\0" LC122: .ascii "FPU type 0x%08lx not supported by kernel\12\0" LC123: .ascii "Warning: using only %ld blocks of memory\12\0" LC124: .ascii "Warning: using only %ld AutoConfig devices\12\0" .even _create_compat_bootinfo: link a5,#-4 moveml #0x3c20,sp@- movel _bi,_compat_bootinfo moveq #1,d0 andl _bi+4,d0 tstl d0 jeq L286 moveq #1,d5 movel d5,_compat_bootinfo+4 jra L287 L286: moveq #2,d0 andl _bi+4,d0 tstl d0 jeq L288 moveq #2,d5 movel d5,_compat_bootinfo+4 jra L289 L288: moveq #4,d0 andl _bi+4,d0 tstl d0 jeq L290 moveq #4,d5 movel d5,_compat_bootinfo+4 jra L291 L290: moveq #8,d0 andl _bi+4,d0 tstl d0 jeq L292 moveq #8,d5 movel d5,_compat_bootinfo+4 jra L293 L292: movel _linuxboot_args,a0 movel _bi+4,sp@- pea LC121 movel a0@(1464),a2 jbsr a2@ addqw #8,sp clrl d0 jra L285 L293: L291: L289: L287: moveq #1,d0 andl _bi+8,d0 tstl d0 jeq L294 moveq #32,d5 orl d5,_compat_bootinfo+4 jra L295 L294: moveq #2,d0 andl _bi+8,d0 tstl d0 jeq L296 moveq #64,d5 orl d5,_compat_bootinfo+4 jra L297 L296: moveq #4,d0 andl _bi+8,d0 tstl d0 jeq L298 orw #128,_compat_bootinfo+6 jra L299 L298: moveq #8,d0 andl _bi+8,d0 tstl d0 jeq L300 orw #256,_compat_bootinfo+6 jra L301 L300: tstl _bi+8 jeq L302 movel _linuxboot_args,a0 movel _bi+8,sp@- pea LC122 movel a0@(1464),a2 jbsr a2@ addqw #8,sp clrl d0 jra L285 L302: L301: L299: L297: L295: movel _bi+16,_compat_bootinfo+40 moveq #4,d5 cmpl _compat_bootinfo+40,d5 jge L303 movel _linuxboot_args,a0 pea 4:w pea LC123 movel a0@(1464),a2 jbsr a2@ addqw #8,sp moveq #4,d5 movel d5,_compat_bootinfo+40 L303: nop clrl a5@(-4) L304: movel a5@(-4),d5 cmpl _compat_bootinfo+40,d5 jcs L307 jra L305 L307: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _compat_bootinfo,a0 movel a5@(-4),d1 movel d1,d2 movel d2,d1 asll #3,d1 lea _bi,a1 movel a1@(20,d1:l),a0@(8,d0:l) movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #3,d0 lea _compat_bootinfo,a0 movel a5@(-4),d1 movel d1,d2 movel d2,d1 asll #3,d1 lea _bi,a1 movel a1@(24,d1:l),a0@(12,d0:l) L306: addql #1,a5@(-4) jra L304 L305: tstl _bi+56 jeq L308 movel _bi+56,d0 addl #1023,d0 movel d0,d1 moveq #10,d5 lsrl d5,d1 movel d1,_compat_bootinfo+44 movel _bi+52,_compat_bootinfo+48 jra L309 L308: clrl _compat_bootinfo+44 clrl _compat_bootinfo+48 L309: pea 256:w pea _bi+60 pea _compat_bootinfo+52 jbsr _strncpy addqw #8,sp addqw #4,sp clrb _compat_bootinfo+307 movel _bi+316,_compat_bootinfo+308 movel _bi+320,_compat_bootinfo+312 moveq #16,d5 cmpl _compat_bootinfo+312,d5 jge L310 movel _linuxboot_args,a0 pea 16:w pea LC124 movel a0@(1464),a2 jbsr a2@ addqw #8,sp moveq #16,d5 movel d5,_compat_bootinfo+312 L310: nop clrl a5@(-4) L311: movel a5@(-4),d5 cmpl _compat_bootinfo+312,d5 jcs L314 jra L312 L314: movel a5@(-4),d0 movel d0,d2 movel d2,d1 asll #4,d1 addl d0,d1 movel d1,d0 asll #2,d0 movel #_compat_bootinfo+316,d1 movel a5@(-4),d2 movel d2,d4 movel d4,d3 asll #4,d3 addl d2,d3 movel d3,d2 asll #2,d2 movel #_bi+324,d3 movel d2,a0 addl d3,a0 movel d0,a1 addl d1,a1 pea 68:w movel a1,sp@- movel a0,sp@- jbsr _bcopy addqw #8,sp addqw #4,sp L313: addql #1,a5@(-4) jra L311 L312: movel _bi+1412,_compat_bootinfo+1404 moveb _bi+1416,_compat_bootinfo+1408 moveb _bi+1417,_compat_bootinfo+1409 movel _bi+1418,_compat_bootinfo+1410 movel _bi+1422,_compat_bootinfo+1414 clrl _compat_bootinfo+1418 moveq #1,d0 jra L285 L285: moveml a5@(-24),#0x43c unlk a5 rts LC125: .ascii "Kernel has no bootinfo version info, assuming 0.0\12\0" LC126: .ascii "Bootstrap's bootinfo version: %ld.%ld\12\0" LC127: .ascii "Kernel's bootinfo version : %ld.%ld\12\0" LC128: .ascii "Warning: Bootinfo version of bootstrap and kernel differ!\12\0" LC129: .ascii " Certain features may not work.\12\0" LC130: .ascii "(using backwards compatibility mode)\12\0" LC131: .ascii "old\0" LC132: .ascii "new\0" LC133: .ascii "\12This bootstrap is too %s for this kernel!\12\0" .even _check_bootinfo_version: link a5,#-28 movel a2,sp@- movel d2,sp@- movel a5@(8),a5@(-4) clrl a5@(-8) movel a5@(-4),a0 cmpl #1112102426,a0@(2) jne L316 clrl a5@(-12) L317: movel a5@(-4),a0 movel a5@(-12),d0 movel d0,d1 movel d1,d0 asll #3,d0 tstl a0@(6,d0:l) jne L320 jra L318 L320: movel a5@(-4),a0 movel a5@(-12),d0 movel d0,d1 movel d1,d0 asll #3,d0 moveq #1,d2 cmpl a0@(6,d0:l),d2 jne L321 movel a5@(-4),a0 movel a5@(-12),d0 movel d0,d1 movel d1,d0 asll #3,d0 movel a0@(10,d0:l),a5@(-8) jra L318 L321: L319: addql #1,a5@(-12) jra L317 L318: L316: tstl a5@(-8) jne L322 movel _linuxboot_args,a0 pea LC125 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L322: movel a5@(-8),d1 movel d1,d0 clrw d0 swap d0 movel d0,d2 andl #65535,d2 movel d2,a5@(-16) movel a5@(-8),d2 andl #65535,d2 movel d2,a5@(-20) moveq #2,d2 movel d2,a5@(-24) clrl a5@(-28) movel _linuxboot_args,a0 movel a5@(-28),sp@- movel a5@(-24),sp@- pea LC126 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel _linuxboot_args,a0 movel a5@(-20),sp@- movel a5@(-16),sp@- pea LC127 movel a0@(1464),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel a5@(-16),d0 moveq #1,d2 cmpl d0,d2 jeq L326 moveq #2,d2 cmpl d0,d2 jeq L324 jra L327 L324: movel a5@(-20),d2 cmpl a5@(-28),d2 jle L325 movel _linuxboot_args,a0 pea LC128 movel a0@(1452),a2 jbsr a2@ addqw #4,sp movel _linuxboot_args,a0 pea LC129 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L325: jra L323 L326: movel _linuxboot_args,a0 pea LC130 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L323 L327: movel _linuxboot_args,a0 movel a5@(-24),d2 cmpl a5@(-16),d2 jge L328 movel #LC131,d0 jra L329 L328: movel #LC132,d0 L329: movel d0,sp@- pea LC133 movel a0@(1464),a2 jbsr a2@ addqw #8,sp clrl d0 jra L315 L323: movel a5@(-16),d0 jra L315 L315: movel a5@(-36),d2 movel a5@(-32),a2 unlk a5 rts .even _start_kernel: link a5,#0 moveml #0x3038,sp@- movel a5@(8),a0 movel a5@(12),a2 movel a5@(16),a3 movel a5@(20),a4 movel a5@(24),d0 movel a5@(28),d1 movel a5@(32),d2 movel _bi_size,d3 #APP movel a2,sp;jmp a0@ #NO_APP L332: L334: jra L334 L333: L331: moveml a5@(-20),#0x1c0c unlk a5 rts #APP .text .align 4 copyall: | /* copy kernel text and data */ movel a3,a0 | src = (u_long *)memptr; movel a0,a2 | limit = (u_long *)(memptr+kernel_size); addl d2,a2 movel a4,a1 | dest = (u_long *)start_mem; 1: cmpl a0,a2 jeq 2f | while (src < limit) moveb a0@+,a1@+ | *dest++ = *src++; jra 1b 2: | /* copy bootinfo to end of bss */ movel a3,a0 | src = (u_long *)(memptr+kernel_size); addl d2,a0 | dest = end of bss (already in a1) movel d3,d7 | count = bi_size subql #1,d7 1: moveb a0@+,a1@+ | while (--count > -1) dbra d7,1b | *dest++ = *src++ | /* copy the ramdisk to the top of memory */ | /* (from back to front) */ movel a4,a1 | dest = (u_long *)(start_mem+mem_size); addl d0,a1 movel a3,a2 | limit = (u_long *)(memptr+kernel_size + addl d2,a2 | bi_size); addl d3,a2 movel a2,a0 | src = (u_long *)((u_long)limit+rd_size); addl d1,a0 1: cmpl a0,a2 beqs 2f | while (src > limit) moveb a0@-,a1@- | *--dest = *--src; bras 1b 2: | /* jump to start of kernel */ movel a4,a0 | jump_to (start_mem); jmp a0@ copyallend: .text .align 4 maprommed: oriw #0x0700,sr moveml #0x3f20,sp@- | /* Save cache settings */ .long 0x4e7a1002 | movec cacr,d1 */ | /* Save MMU settings */ .long 0x4e7a2003 | movec tc,d2 .long 0x4e7a3004 | movec itt0,d3 .long 0x4e7a4005 | movec itt1,d4 .long 0x4e7a5006 | movec dtt0,d5 .long 0x4e7a6007 | movec dtt1,d6 moveq #0,d0 movel d0,a2 | /* Disable caches */ .long 0x4e7b0002 | movec d0,cacr | /* Disable MMU */ .long 0x4e7b0003 | movec d0,tc .long 0x4e7b0004 | movec d0,itt0 .long 0x4e7b0005 | movec d0,itt1 .long 0x4e7b0006 | movec d0,dtt0 .long 0x4e7b0007 | movec d0,dtt1 lea 0x07f80000,a0 lea 0x00f80000,a1 movel a0@,d7 cmpl a1@,d7 jne 1f movel d7,d0 notl d0 movel d0,a0@ nop | /* Thanks to Jörg Mayer! */ cmpl a1@,d0 jne 1f moveq #-1,d0 | /* MapROMmed A3640 present */ movel d0,a2 1: movel d7,a0@ | /* Restore MMU settings */ .long 0x4e7b2003 | movec d2,tc .long 0x4e7b3004 | movec d3,itt0 .long 0x4e7b4005 | movec d4,itt1 .long 0x4e7b5006 | movec d5,dtt0 .long 0x4e7b6007 | movec d6,dtt1 | /* Restore cache settings */ .long 0x4e7b1002 | movec d1,cacr movel a2,d0 moveml sp@+,#0x04fc rte #NO_APP .even _reset_rb3: link a5,#-4 movel a2,sp@- movel a5@(8),a0 movel a0@(32),d0 addl #16785408,d0 movel d0,a5@(-4) movel a5@(-4),a0 moveb #1,a0@ movel _linuxboot_args,a0 movel #1000000,sp@- movel a0@(1488),a2 jbsr a2@ addqw #4,sp movel a5@(-4),a0 clrb a0@ L335: movel a5@(-8),a2 unlk a5 rts .even _reset_piccolo: link a5,#-4 movel a2,sp@- movel a5@(8),a0 movel a0@(32),d0 addl #32768,d0 movel d0,a5@(-4) movel a5@(-4),a0 moveb #1,a0@ movel _linuxboot_args,a0 movel #1000000,sp@- movel a0@(1488),a2 jbsr a2@ addqw #4,sp movel a5@(-4),a0 moveb #81,a0@ L336: movel a5@(-8),a2 unlk a5 rts .even _reset_sd64: link a5,#-4 movel a2,sp@- movel a5@(8),a0 movel a0@(32),d0 addl #32768,d0 movel d0,a5@(-4) movel a5@(-4),a0 moveb #31,a0@ movel _linuxboot_args,a0 movel #1000000,sp@- movel a0@(1488),a2 jbsr a2@ addqw #4,sp movel a5@(-4),a0 moveb #79,a0@ L337: movel a5@(-8),a2 unlk a5 rts .even _reset_ariadne: link a5,#-36 movel d2,sp@- movel a5@(8),a0 movel a0@(32),d2 addl #880,d2 movel d2,a5@(-4) movel a5@(8),a0 movel a0@(32),d2 addl #882,d2 movel d2,a5@(-8) movel a5@(8),a0 movel a0@(32),d2 addl #884,d2 movel d2,a5@(-12) movel a5@(8),a0 movel a0@(32),d2 addl #4100,d2 movel d2,a5@(-16) movel a5@(8),a0 movel a0@(32),d2 addl #4102,d2 movel d2,a5@(-20) movel a5@(8),a0 movel a0@(32),d2 addl #4107,d2 movel d2,a5@(-24) movel a5@(8),a0 movel a0@(32),d2 addl #4110,d2 movel d2,a5@(-28) movel a5@(8),a0 movel a0@(32),d2 addl #4122,d2 movel d2,a5@(-32) jbsr _Disable movel a5@(-12),a0 movew a0@,a5@(-34) movel a5@(-8),a0 clrw a0@ movel a5@(-4),a0 movew #1024,a0@ movel a5@(-24),a0 movel a5@(-24),a1 moveb a1@,d0 moveb d0,d1 andb #253,d1 moveb d1,a0@ movel a5@(-28),a0 movel a5@(-28),a1 moveb a1@,d0 moveb d0,d1 andb #253,d1 moveb d1,a0@ movel a5@(-32),a0 moveb #5,a0@ movel a5@(-16),a0 clrb a0@ movel a5@(-20),a0 clrb a0@ jbsr _Enable L338: movel a5@(-40),d2 unlk a5 rts .even _reset_hydra: link a5,#-12 movel a5@(8),a0 movel a0@(32),a1 addl #65505,a1 movel a1,a5@(-4) movel a5@(8),a0 movel a0@(32),a1 addl #65519,a1 movel a1,a5@(-8) movel #5000,a5@(-12) jbsr _Disable movel a5@(-4),a0 moveb #33,a0@ L340: movel a5@(-8),a0 moveb a0@,d1 moveb d1,d0 andb #128,d0 tstb d0 jne L343 subql #1,a5@(-12) tstl a5@(-12) jne L342 jra L343 L343: jra L341 L342: jra L340 L341: jbsr _Enable L339: unlk a5 rts .data .even _ZFileSize: .long 0 .even _ZFpos: .long 0 .even _Zwpos: .long 0 .even _Zinfd: .long 0 .even _insize: .long 0 .even _inptr: .long 0 .even _outcnt: .long 0 .even _exit_code: .long 0 .even _bytes_out: .long 0 .even _border: .long 16 .long 17 .long 18 .long 0 .long 8 .long 7 .long 9 .long 6 .long 10 .long 5 .long 11 .long 4 .long 12 .long 3 .long 13 .long 2 .long 14 .long 1 .long 15 .even _cplens: .word 3 .word 4 .word 5 .word 6 .word 7 .word 8 .word 9 .word 10 .word 11 .word 13 .word 15 .word 17 .word 19 .word 23 .word 27 .word 31 .word 35 .word 43 .word 51 .word 59 .word 67 .word 83 .word 99 .word 115 .word 131 .word 163 .word 195 .word 227 .word 258 .word 0 .word 0 .even _cplext: .word 0 .word 0 .word 0 .word 0 .word 0 .word 0 .word 0 .word 0 .word 1 .word 1 .word 1 .word 1 .word 2 .word 2 .word 2 .word 2 .word 3 .word 3 .word 3 .word 3 .word 4 .word 4 .word 4 .word 4 .word 5 .word 5 .word 5 .word 5 .word 0 .word 99 .word 99 .even _cpdist: .word 1 .word 2 .word 3 .word 4 .word 5 .word 7 .word 9 .word 13 .word 17 .word 25 .word 33 .word 49 .word 65 .word 97 .word 129 .word 193 .word 257 .word 385 .word 513 .word 769 .word 1025 .word 1537 .word 2049 .word 3073 .word 4097 .word 6145 .word 8193 .word 12289 .word 16385 .word 24577 .even _cpdext: .word 0 .word 0 .word 0 .word 0 .word 1 .word 1 .word 2 .word 2 .word 3 .word 3 .word 4 .word 4 .word 5 .word 5 .word 6 .word 6 .word 7 .word 7 .word 8 .word 8 .word 9 .word 9 .word 10 .word 10 .word 11 .word 11 .word 12 .word 12 .word 13 .word 13 .even _mask_bits: .word 0 .word 1 .word 3 .word 7 .word 15 .word 31 .word 63 .word 127 .word 255 .word 511 .word 1023 .word 2047 .word 4095 .word 8191 .word 16383 .word 32767 .word 65535 .even _lbits: .long 9 .even _dbits: .long 6 .text .even _huft_build: link a5,#-1392 moveml #0x3e3a,sp@- pea 68:w clrl sp@- lea a5@(-72),a0 movel a0,sp@- jbsr _memset addqw #8,sp addqw #4,sp movel a5@(8),a3 movel a5@(12),d2 L345: movel a3@,d0 addql #1,a5@(-72,d0:l:4) addqw #4,a3 L347: subql #1,d2 tstl d2 jne L348 jra L346 L348: jra L345 L346: movel a5@(-72),d6 cmpl a5@(12),d6 jne L349 movel a5@(28),a0 clrl a0@ movel a5@(32),a0 clrl a0@ clrl d0 jra L344 L349: movel a5@(32),a0 movel a0@,a5@(-88) moveq #1,d3 L350: moveq #16,d6 cmpl d3,d6 jcc L353 jra L351 L353: tstl a5@(-72,d3:l:4) jeq L354 jra L351 L354: L352: addql #1,d3 jra L350 L351: movel d3,a2 cmpl a5@(-88),d3 jls L355 movel d3,a5@(-88) L355: nop moveq #16,d2 L356: tstl d2 jne L359 jra L357 L359: tstl a5@(-72,d2:l:4) jeq L360 jra L357 L360: L358: subql #1,d2 jra L356 L357: movel d2,a5@(-80) cmpl a5@(-88),d2 jcc L361 movel d2,a5@(-88) L361: movel a5@(32),a0 movel a5@(-88),a0@ moveq #1,d0 movel d0,d1 asll d3,d1 movel d1,a5@(-1386) L362: cmpl d3,d2 jhi L365 jra L363 L365: movel a5@(-1386),d0 subl a5@(-72,d3:l:4),d0 movel d0,d1 movel d1,a5@(-1386) tstl d1 jge L366 moveq #2,d0 jra L344 L366: L364: addql #1,d3 movel a5@(-1386),d0 movel d0,d1 addl d1,d1 movel d1,a5@(-1386) jra L362 L363: movel a5@(-1386),d0 subl a5@(-72,d2:l:4),d0 movel d0,d1 movel d1,a5@(-1386) tstl d1 jge L367 moveq #2,d0 jra L344 L367: movel a5@(-1386),d6 addl d6,a5@(-72,d2:l:4) clrl d3 clrl a5@(-1374) lea a5@(-72),a3 addqw #4,a3 lea a5@(-1378),a0 lea a0@(8),a6 movel a6,a5@(-1382) L368: subql #1,d2 tstl d2 jne L370 jra L369 L370: movel a5@(-1382),a0 addl a3@,d3 movel d3,d0 movel d0,a0@ addqw #4,a3 addql #4,a5@(-1382) jra L368 L369: movel a5@(8),a3 clrl d2 L371: movel a3@,d3 movel d3,d0 addqw #4,a3 tstl d0 jeq L374 movel d3,d0 movel d0,d1 asll #2,d1 lea a5@(0,d1:l),a0 movel a0@(-1378),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a1 movel d2,a1@(-1310) addql #1,a0@(-1378) L374: L373: addql #1,d2 cmpl a5@(12),d2 jcs L375 jra L372 L375: jra L371 L372: clrl d2 clrl a5@(-1378) lea a5@(-1310),a3 moveq #-1,d6 movel d6,a5@(-84) movel a5@(-88),d4 negl d4 clrl a5@(-158) subl a4,a4 clrl a5@(-1390) L376: cmpl a5@(-80),a2 jle L379 jra L377 L379: movel a5@(-72,a2:l:4),a5@(-4) L380: subql #1,a5@(-4) moveq #-1,d6 cmpl a5@(-4),d6 jne L382 jra L381 L382: L383: movel d4,d0 addl a5@(-88),d0 cmpl a2,d0 jlt L385 jra L384 L385: addql #1,a5@(-84) addl a5@(-88),d4 movel a5@(-80),d0 subl d4,d0 movel d0,d1 movel d1,a5@(-1390) cmpl a5@(-88),d1 jls L386 movel a5@(-88),d0 jra L387 L386: movel a5@(-1390),d0 L387: movel d0,a5@(-1390) movel a2,d3 subl d4,d3 movel d3,d0 moveq #1,d5 movel d5,d1 asll d0,d1 movel d1,d0 movel d0,a5@(-76) movel a5@(-4),d1 addql #1,d1 cmpl d0,d1 jcc L388 movel a5@(-76),d0 subql #1,d0 movel d0,a6 subl a5@(-4),a6 movel a6,a5@(-76) lea a5@(-72),a0 movel a2,d0 movel d0,d1 asll #2,d1 lea a0@(0,d1:l),a6 movel a6,a5@(-1382) L389: addql #1,d3 cmpl a5@(-1390),d3 jcs L391 jra L390 L391: movel a5@(-76),d0 movel d0,d1 addl d1,d1 movel d1,d0 movel d0,a5@(-76) addql #4,a5@(-1382) movel a5@(-1382),a0 cmpl a0@,d0 jhi L392 jra L390 L392: movel a5@(-1382),a0 movel a0@,d6 subl d6,a5@(-76) jra L389 L390: L388: moveq #1,d0 movel d0,d1 asll d3,d1 movel d1,a5@(-1390) pea 5:w movel a5@(-1390),d0 addql #1,d0 movel d0,d5 movel d5,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,sp@- jbsr _AllocVec addqw #8,sp movel d0,a4 movel a4,d0 tstl d0 jne L393 tstl a5@(-84) jeq L394 movel a5@(-158),sp@- jbsr _huft_free addqw #4,sp L394: moveq #3,d0 jra L344 L393: movel _hufts,d0 addql #1,d0 movel d0,a6 addl a5@(-1390),a6 movel a6,_hufts movel a5@(28),a0 lea a4@(6),a6 movel a6,a0@ lea a4@(2),a0 movel a0,a1 movel a1,a5@(28) clrl a1@ movel a5@(-84),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 addqw #6,a4 movel a4,a0@(-158) tstl a5@(-84) jeq L395 movel a5@(-84),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 movel d2,a0@(-1378) moveb a5@(-85),a5@(-93) moveb d3,d6 addb #16,d6 moveb d6,a5@(-94) movel a4,a5@(-92) movel d4,d0 subl a5@(-88),d0 movel d2,d3 lsrl d0,d3 lea a5@(-162),a0 movel a5@(-84),d0 movel d0,d1 movel d1,d0 asll #2,d0 addl d0,a0 movel d3,d0 movel d0,d1 addl d1,d1 addl d3,d1 movel d1,d0 addl d0,d0 movel a0@,a0 movel a5@(-94),a0@(d0:l) movew a5@(-90),a0@(4,d0:l) L395: jra L383 L384: movew a2,d6 subb d4,d6 moveb d6,a5@(-93) lea a5@(-1310),a0 movel a5@(12),d0 movel d0,d1 movel d1,d0 asll #2,d0 addl d0,a0 cmpl a3,a0 jhi L396 moveb #99,a5@(-94) jra L397 L396: movel a3@,a6 cmpl a5@(16),a6 jcc L398 cmpl #255,a3@ jhi L399 moveb #16,d0 jra L400 L399: moveb #15,d0 L400: moveb d0,a5@(-94) movew a3@(2),a5@(-92) addqw #4,a3 jra L401 L398: movel a3@,d0 subl a5@(16),d0 movel d0,d1 movel d1,d0 addl d0,d0 movel a5@(24),a0 moveb a0@(1,d0:l),a5@(-94) movel a3@,d0 subl a5@(16),d0 movel d0,d1 movel d1,d0 addl d0,d0 movel a5@(20),a0 movew a0@(d0:l),a5@(-92) addqw #4,a3 L401: L397: movel a2,d0 subl d4,d0 moveq #1,d1 movel d1,d6 asll d0,d6 movel d6,d0 movel d0,a5@(-76) movel d2,d3 lsrl d4,d3 L402: cmpl a5@(-1390),d3 jcs L405 jra L403 L405: movel d3,d1 movel d1,d0 addl d0,d0 addl d3,d0 movel d0,d1 addl d1,d1 movel a5@(-94),a4@(d1:l) movew a5@(-90),a4@(4,d1:l) L404: addl a5@(-76),d3 jra L402 L403: nop movel a2,d0 subql #1,d0 moveq #1,d1 movel d1,d3 asll d0,d3 L406: movel d2,d0 andl d3,d0 tstl d0 jne L409 jra L407 L409: eorl d3,d2 L408: lsrl #1,d3 jra L406 L407: eorl d3,d2 L410: moveq #1,d1 movel d1,d0 asll d4,d0 movel d0,d1 subql #1,d1 movel d2,d0 andl d1,d0 movel a5@(-84),d1 movel d1,d5 movel d5,d1 asll #2,d1 lea a5@(0,d1:l),a0 cmpl a0@(-1378),d0 jne L412 jra L411 L412: subql #1,a5@(-84) subl a5@(-88),d4 jra L410 L411: jra L380 L381: L378: addqw #1,a2 jra L376 L377: clrl d0 tstl a5@(-1386) jeq L413 moveq #1,d6 cmpl a5@(-80),d6 jeq L413 moveq #1,d0 L413: jra L344 L344: moveml a5@(-1428),#0x5c7c unlk a5 rts .even _huft_free: link a5,#0 movel a2,sp@- movel d2,sp@- movel a5@(8),a2 L415: tstl a2 jne L417 jra L416 L417: subqw #6,a2 movel a2@(2),d2 movel a2,sp@- jbsr _FreeVec addqw #4,sp movel d2,a2 jra L415 L416: clrl d0 jra L414 L414: movel a5@(-8),d2 movel a5@(-4),a2 unlk a5 rts .even _inflate_codes: link a5,#-24 moveml #0x3e00,sp@- movel _bb,d3 movel _bk,d4 movel _outcnt,a5@(-12) movel a5@(16),d0 movel d0,d1 movel d1,d0 addl d0,d0 lea _mask_bits,a0 clrl d1 movew a0@(d0:l),d1 movel d1,a5@(-20) movel a5@(20),d0 movel d0,d1 movel d1,d0 addl d0,d0 lea _mask_bits,a0 clrl d1 movew a0@(d0:l),d1 movel d1,a5@(-24) L419: L422: cmpl a5@(16),d4 jcs L424 jra L423 L424: movel _inptr,d6 cmpl _insize,d6 jcc L425 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L426 L425: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L426: addql #8,d4 jra L422 L423: movel d3,d0 andl a5@(-20),d0 movel d0,d5 movel d5,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,d1 addl a5@(8),d1 movel d1,a0 movel a0,a5@(-16) clrl d2 moveb a0@,d2 movel d2,d0 moveq #16,d6 cmpl d0,d6 jcc L427 L428: moveq #99,d6 cmpl d2,d6 jne L431 moveq #1,d0 jra L418 L431: movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 lsrl d0,d3 movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 subl d0,d4 moveq #-16,d6 addl d6,d2 L432: cmpl d4,d2 jhi L434 jra L433 L434: movel _inptr,d6 cmpl _insize,d6 jcc L435 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L436 L435: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L436: addql #8,d4 jra L432 L433: L430: movel a5@(-16),a0 movel d2,d1 movel d1,d0 addl d0,d0 lea _mask_bits,a1 clrl d1 movew a1@(d0:l),d1 movel d3,d0 andl d1,d0 movel d0,d5 movel d5,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,d1 addl a0@(2),d1 movel d1,a0 movel a0,a5@(-16) clrl d2 moveb a0@,d2 movel d2,d0 moveq #16,d6 cmpl d0,d6 jcs L437 jra L429 L437: jra L428 L429: L427: movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 lsrl d0,d3 movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 subl d0,d4 moveq #16,d6 cmpl d2,d6 jne L438 movel _window,a0 addl a5@(-12),a0 movel a5@(-16),a1 moveb a1@(3),a0@ addql #1,a5@(-12) cmpl #32768,a5@(-12) jne L439 movel a5@(-12),_outcnt jbsr _flush_window clrl a5@(-12) L439: jra L440 L438: moveq #15,d6 cmpl d2,d6 jne L441 jra L420 L441: L442: cmpl d4,d2 jhi L444 jra L443 L444: movel _inptr,d6 cmpl _insize,d6 jcc L445 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L446 L445: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L446: addql #8,d4 jra L442 L443: movel a5@(-16),a0 clrl d0 movew a0@(2),d0 movel d2,d5 movel d5,d1 addl d1,d1 lea _mask_bits,a0 clrl d5 movew a0@(d1:l),d5 movel d3,d1 andl d5,d1 movel d0,d6 addl d1,d6 movel d6,a5@(-4) lsrl d2,d3 subl d2,d4 L447: cmpl a5@(20),d4 jcs L449 jra L448 L449: movel _inptr,d6 cmpl _insize,d6 jcc L450 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L451 L450: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L451: addql #8,d4 jra L447 L448: movel d3,d0 andl a5@(-24),d0 movel d0,d5 movel d5,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,d1 addl a5@(12),d1 movel d1,a0 movel a0,a5@(-16) clrl d2 moveb a0@,d2 movel d2,d0 moveq #16,d6 cmpl d0,d6 jcc L452 L453: moveq #99,d6 cmpl d2,d6 jne L456 moveq #1,d0 jra L418 L456: movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 lsrl d0,d3 movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 subl d0,d4 moveq #-16,d6 addl d6,d2 L457: cmpl d4,d2 jhi L459 jra L458 L459: movel _inptr,d6 cmpl _insize,d6 jcc L460 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L461 L460: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L461: addql #8,d4 jra L457 L458: L455: movel a5@(-16),a0 movel d2,d1 movel d1,d0 addl d0,d0 lea _mask_bits,a1 clrl d1 movew a1@(d0:l),d1 movel d3,d0 andl d1,d0 movel d0,d5 movel d5,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,d1 addl a0@(2),d1 movel d1,a0 movel a0,a5@(-16) clrl d2 moveb a0@,d2 movel d2,d0 moveq #16,d6 cmpl d0,d6 jcs L462 jra L454 L462: jra L453 L454: L452: movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 lsrl d0,d3 movel a5@(-16),a0 clrl d0 moveb a0@(1),d0 subl d0,d4 L463: cmpl d4,d2 jhi L465 jra L464 L465: movel _inptr,d6 cmpl _insize,d6 jcc L466 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d4,d0 orl d0,d3 addql #1,_inptr jra L467 L466: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d4,d0 orl d0,d3 L467: addql #8,d4 jra L463 L464: movel a5@(-16),a0 clrl d0 movew a0@(2),d0 movel a5@(-12),d6 subl d0,d6 movel d6,d0 movel d2,d5 movel d5,d1 addl d1,d1 lea _mask_bits,a0 clrl d5 movew a0@(d1:l),d5 movel d3,d1 andl d5,d1 movel d0,d6 subl d1,d6 movel d6,a5@(-8) lsrl d2,d3 subl d2,d4 L468: movel a5@(-8),d0 andl #32767,d0 movel d0,d1 movel d1,a5@(-8) cmpl a5@(-12),d1 jls L473 movel #32768,d2 subl a5@(-8),d2 jra L474 L473: movel #32768,d2 subl a5@(-12),d2 L474: movel d2,d0 cmpl a5@(-4),d0 jls L471 movel a5@(-4),d0 jra L472 L471: movel d2,d0 L472: movel d0,d2 subl d0,a5@(-4) movel a5@(-12),d0 subl a5@(-8),d0 cmpl d0,d2 jhi L475 movel d2,sp@- movel _window,d0 addl a5@(-8),d0 movel d0,sp@- movel _window,d0 addl a5@(-12),d0 movel d0,sp@- jbsr _memcpy addqw #8,sp addqw #4,sp addl d2,a5@(-12) addl d2,a5@(-8) jra L476 L475: nop L477: movel _window,a0 addl a5@(-12),a0 movel _window,a1 addl a5@(-8),a1 moveb a1@,a0@ addql #1,a5@(-8) addql #1,a5@(-12) L479: subql #1,d2 tstl d2 jne L480 jra L478 L480: jra L477 L478: L476: cmpl #32768,a5@(-12) jne L481 movel a5@(-12),_outcnt jbsr _flush_window clrl a5@(-12) L481: L470: tstl a5@(-4) jne L482 jra L469 L482: jra L468 L469: L440: L421: jra L419 L420: movel a5@(-12),_outcnt movel d3,_bb movel d4,_bk clrl d0 jra L418 L418: moveml a5@(-44),#0x7c unlk a5 rts .even _inflate_stored: link a5,#-8 moveml #0x3800,sp@- movel _bb,d2 movel _bk,d3 movel _outcnt,a5@(-8) moveq #7,d4 andl d3,d4 movel d4,a5@(-4) movel a5@(-4),d4 lsrl d4,d2 subl a5@(-4),d3 L484: moveq #15,d4 cmpl d3,d4 jcc L486 jra L485 L486: movel _inptr,d4 cmpl _insize,d4 jcc L487 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L488 L487: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L488: addql #8,d3 jra L484 L485: movel d2,d4 andl #65535,d4 movel d4,a5@(-4) clrw d2 swap d2 moveq #-16,d4 addl d4,d3 L489: moveq #15,d4 cmpl d3,d4 jcc L491 jra L490 L491: movel _inptr,d4 cmpl _insize,d4 jcc L492 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L493 L492: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L493: addql #8,d3 jra L489 L490: movel d2,d0 notl d0 movel d0,d1 andl #65535,d1 cmpl a5@(-4),d1 jeq L494 moveq #1,d0 jra L483 L494: clrw d2 swap d2 moveq #-16,d4 addl d4,d3 L495: subql #1,a5@(-4) moveq #-1,d4 cmpl a5@(-4),d4 jne L497 jra L496 L497: L498: moveq #7,d4 cmpl d3,d4 jcc L500 jra L499 L500: movel _inptr,d4 cmpl _insize,d4 jcc L501 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L502 L501: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L502: addql #8,d3 jra L498 L499: movel _window,a0 addl a5@(-8),a0 moveb d2,a0@ addql #1,a5@(-8) cmpl #32768,a5@(-8) jne L503 movel a5@(-8),_outcnt jbsr _flush_window clrl a5@(-8) L503: lsrl #8,d2 subql #8,d3 jra L495 L496: movel a5@(-8),_outcnt movel d2,_bb movel d3,_bk clrl d0 jra L483 L483: moveml a5@(-20),#0x1c unlk a5 rts .even _inflate_fixed: link a5,#-1172 movel d2,sp@- nop clrl a5@(-4) L505: cmpl #143,a5@(-4) jle L508 jra L506 L508: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #8,d2 movel d2,a0@(-1172) L507: addql #1,a5@(-4) jra L505 L506: nop L509: cmpl #255,a5@(-4) jle L512 jra L510 L512: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #9,d2 movel d2,a0@(-1172) L511: addql #1,a5@(-4) jra L509 L510: nop L513: cmpl #279,a5@(-4) jle L516 jra L514 L516: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #7,d2 movel d2,a0@(-1172) L515: addql #1,a5@(-4) jra L513 L514: nop L517: cmpl #287,a5@(-4) jle L520 jra L518 L520: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #8,d2 movel d2,a0@(-1172) L519: addql #1,a5@(-4) jra L517 L518: moveq #7,d2 movel d2,a5@(-16) lea a5@(-16),a0 movel a0,sp@- lea a5@(-8),a0 movel a0,sp@- pea _cplext pea _cplens pea 257:w pea 288:w lea a5@(-1172),a0 movel a0,sp@- jbsr _huft_build addw #28,sp movel d0,a5@(-4) tstl a5@(-4) jeq L521 movel a5@(-4),d0 jra L504 L521: nop clrl a5@(-4) L522: moveq #29,d2 cmpl a5@(-4),d2 jge L525 jra L523 L525: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #5,d2 movel d2,a0@(-1172) L524: addql #1,a5@(-4) jra L522 L523: moveq #5,d2 movel d2,a5@(-20) lea a5@(-20),a0 movel a0,sp@- lea a5@(-12),a0 movel a0,sp@- pea _cpdext pea _cpdist clrl sp@- pea 30:w lea a5@(-1172),a0 movel a0,sp@- jbsr _huft_build addw #28,sp movel d0,a5@(-4) moveq #1,d2 cmpl a5@(-4),d2 jge L526 movel a5@(-8),sp@- jbsr _huft_free addqw #4,sp movel a5@(-4),d0 jra L504 L526: movel a5@(-20),sp@- movel a5@(-16),sp@- movel a5@(-12),sp@- movel a5@(-8),sp@- jbsr _inflate_codes addqw #8,sp addqw #8,sp tstl d0 jeq L527 moveq #1,d0 jra L504 L527: movel a5@(-8),sp@- jbsr _huft_free addqw #4,sp movel a5@(-12),sp@- jbsr _huft_free addqw #4,sp clrl d0 jra L504 L504: movel a5@(-1176),d2 unlk a5 rts LC134: .ascii " incomplete literal tree\12\0" LC135: .ascii " incomplete distance tree\12\0" .even _inflate_dynamic: link a5,#-1312 moveml #0x3c00,sp@- movel _bb,d2 movel _bk,d3 L529: moveq #4,d5 cmpl d3,d5 jcc L531 jra L530 L531: movel _inptr,d5 cmpl _insize,d5 jcc L532 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L533 L532: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L533: addql #8,d3 jra L529 L530: moveq #31,d0 andl d2,d0 movel d0,d5 addl #257,d5 movel d5,a5@(-44) lsrl #5,d2 subql #5,d3 L534: moveq #4,d5 cmpl d3,d5 jcc L536 jra L535 L536: movel _inptr,d5 cmpl _insize,d5 jcc L537 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L538 L537: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L538: addql #8,d3 jra L534 L535: moveq #31,d0 andl d2,d0 movel d0,d5 addql #1,d5 movel d5,a5@(-48) lsrl #5,d2 subql #5,d3 L539: moveq #3,d5 cmpl d3,d5 jcc L541 jra L540 L541: movel _inptr,d5 cmpl _insize,d5 jcc L542 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L543 L542: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L543: addql #8,d3 jra L539 L540: moveq #15,d0 andl d2,d0 movel d0,d5 addql #4,d5 movel d5,a5@(-40) lsrl #4,d2 subql #4,d3 cmpl #286,a5@(-44) jhi L545 moveq #30,d5 cmpl a5@(-48),d5 jcs L545 jra L544 L545: moveq #1,d0 jra L528 L544: nop clrl a5@(-8) L546: movel a5@(-8),d5 cmpl a5@(-40),d5 jcs L549 jra L547 L549: L550: moveq #2,d5 cmpl d3,d5 jcc L552 jra L551 L552: movel _inptr,d5 cmpl _insize,d5 jcc L553 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L554 L553: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L554: addql #8,d3 jra L550 L551: movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _border,a0 movel a0@(d0:l),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 moveq #7,d5 andl d2,d5 movel d5,a0@(-1312) lsrl #3,d2 subql #3,d3 L548: addql #1,a5@(-8) jra L546 L547: nop L555: moveq #18,d5 cmpl a5@(-8),d5 jcc L558 jra L556 L558: movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _border,a0 movel a0@(d0:l),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 clrl a0@(-1312) L557: addql #1,a5@(-8) jra L555 L556: moveq #7,d5 movel d5,a5@(-32) lea a5@(-32),a0 movel a0,sp@- lea a5@(-24),a0 movel a0,sp@- clrl sp@- clrl sp@- pea 19:w pea 19:w lea a5@(-1312),a0 movel a0,sp@- jbsr _huft_build addw #28,sp movel d0,a5@(-4) tstl a5@(-4) jeq L559 moveq #1,d5 cmpl a5@(-4),d5 jne L560 movel a5@(-24),sp@- jbsr _huft_free addqw #4,sp L560: movel a5@(-4),d0 jra L528 L559: movel a5@(-44),d5 addl a5@(-48),d5 movel d5,a5@(-20) movel a5@(-32),d0 movel d0,d1 movel d1,d0 addl d0,d0 lea _mask_bits,a0 clrl d1 movew a0@(d0:l),d1 movel d1,a5@(-16) clrl a5@(-12) clrl a5@(-4) L561: movel a5@(-4),d5 cmpl a5@(-20),d5 jcs L563 jra L562 L563: L564: cmpl a5@(-32),d3 jcs L566 jra L565 L566: movel _inptr,d5 cmpl _insize,d5 jcc L567 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L568 L567: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L568: addql #8,d3 jra L564 L565: movel d2,d0 andl a5@(-16),d0 movel d0,d4 movel d4,d1 addl d1,d1 addl d0,d1 movel d1,d0 addl d0,d0 movel d0,d1 addl a5@(-24),d1 movel d1,a0 movel a0,a5@(-28) clrl d0 moveb a0@(1),d0 movel d0,a5@(-8) movel a5@(-8),d5 lsrl d5,d2 subl a5@(-8),d3 movel a5@(-28),a0 clrl d0 movew a0@(2),d0 movel d0,a5@(-8) moveq #15,d5 cmpl a5@(-8),d5 jcs L569 movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 movel a5@(-8),d0 movel d0,a5@(-12) movel d0,a0@(-1312) addql #1,a5@(-4) jra L570 L569: moveq #16,d5 cmpl a5@(-8),d5 jne L571 L572: moveq #1,d5 cmpl d3,d5 jcc L574 jra L573 L574: movel _inptr,d5 cmpl _insize,d5 jcc L575 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L576 L575: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L576: addql #8,d3 jra L572 L573: moveq #3,d0 andl d2,d0 movel d0,d5 addql #3,d5 movel d5,a5@(-8) lsrl #2,d2 subql #2,d3 movel a5@(-4),d0 addl a5@(-8),d0 cmpl a5@(-20),d0 jls L577 moveq #1,d0 jra L528 L577: nop L578: subql #1,a5@(-8) moveq #-1,d5 cmpl a5@(-8),d5 jne L580 jra L579 L580: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 movel a5@(-12),a0@(-1312) addql #1,a5@(-4) jra L578 L579: jra L581 L571: moveq #17,d5 cmpl a5@(-8),d5 jne L582 L583: moveq #2,d5 cmpl d3,d5 jcc L585 jra L584 L585: movel _inptr,d5 cmpl _insize,d5 jcc L586 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L587 L586: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L587: addql #8,d3 jra L583 L584: moveq #7,d0 andl d2,d0 movel d0,d5 addql #3,d5 movel d5,a5@(-8) lsrl #3,d2 subql #3,d3 movel a5@(-4),d0 addl a5@(-8),d0 cmpl a5@(-20),d0 jls L588 moveq #1,d0 jra L528 L588: nop L589: subql #1,a5@(-8) moveq #-1,d5 cmpl a5@(-8),d5 jne L591 jra L590 L591: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 clrl a0@(-1312) addql #1,a5@(-4) jra L589 L590: clrl a5@(-12) jra L592 L582: L593: moveq #6,d5 cmpl d3,d5 jcc L595 jra L594 L595: movel _inptr,d5 cmpl _insize,d5 jcc L596 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L597 L596: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L597: addql #8,d3 jra L593 L594: moveq #127,d0 andl d2,d0 moveq #11,d5 addl d0,d5 movel d5,a5@(-8) lsrl #7,d2 subql #7,d3 movel a5@(-4),d0 addl a5@(-8),d0 cmpl a5@(-20),d0 jls L598 moveq #1,d0 jra L528 L598: nop L599: subql #1,a5@(-8) moveq #-1,d5 cmpl a5@(-8),d5 jne L601 jra L600 L601: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea a5@(0,d0:l),a0 clrl a0@(-1312) addql #1,a5@(-4) jra L599 L600: clrl a5@(-12) L592: L581: L570: jra L561 L562: movel a5@(-24),sp@- jbsr _huft_free addqw #4,sp movel d2,_bb movel d3,_bk movel _lbits,a5@(-32) lea a5@(-32),a0 movel a0,sp@- lea a5@(-24),a0 movel a0,sp@- pea _cplext pea _cplens pea 257:w movel a5@(-44),sp@- lea a5@(-1312),a0 movel a0,sp@- jbsr _huft_build addw #28,sp movel d0,a5@(-4) tstl a5@(-4) jeq L602 moveq #1,d5 cmpl a5@(-4),d5 jne L603 pea LC134 jbsr _error addqw #4,sp movel a5@(-24),sp@- jbsr _huft_free addqw #4,sp L603: movel a5@(-4),d0 jra L528 L602: movel _dbits,a5@(-36) lea a5@(-36),a0 movel a0,sp@- lea a5@(-28),a0 movel a0,sp@- pea _cpdext pea _cpdist clrl sp@- movel a5@(-48),sp@- lea a5@(-1312),a0 movel a5@(-44),d0 movel d0,d1 movel d1,d0 asll #2,d0 addl d0,a0 movel a0,sp@- jbsr _huft_build addw #28,sp movel d0,a5@(-4) tstl a5@(-4) jeq L604 moveq #1,d5 cmpl a5@(-4),d5 jne L605 pea LC135 jbsr _error addqw #4,sp movel a5@(-28),sp@- jbsr _huft_free addqw #4,sp L605: movel a5@(-24),sp@- jbsr _huft_free addqw #4,sp movel a5@(-4),d0 jra L528 L604: movel a5@(-36),sp@- movel a5@(-32),sp@- movel a5@(-28),sp@- movel a5@(-24),sp@- jbsr _inflate_codes addqw #8,sp addqw #8,sp tstl d0 jeq L606 moveq #1,d0 jra L528 L606: movel a5@(-24),sp@- jbsr _huft_free addqw #4,sp movel a5@(-28),sp@- jbsr _huft_free addqw #4,sp clrl d0 jra L528 L528: moveml a5@(-1328),#0x3c unlk a5 rts .even _inflate_block: link a5,#-4 moveml #0x3800,sp@- movel _bb,d2 movel _bk,d3 L608: tstl d3 jeq L610 jra L609 L610: movel _inptr,d4 cmpl _insize,d4 jcc L611 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L612 L611: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L612: addql #8,d3 jra L608 L609: movel a5@(8),a0 moveq #1,d4 andl d2,d4 movel d4,a0@ lsrl #1,d2 subql #1,d3 L613: moveq #1,d4 cmpl d3,d4 jcc L615 jra L614 L615: movel _inptr,d4 cmpl _insize,d4 jcc L616 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll d3,d0 orl d0,d2 addql #1,_inptr jra L617 L616: jbsr _fill_inbuf clrl d1 moveb d0,d1 movel d1,d0 asll d3,d0 orl d0,d2 L617: addql #8,d3 jra L613 L614: moveq #3,d4 andl d2,d4 movel d4,a5@(-4) lsrl #2,d2 subql #2,d3 movel d2,_bb movel d3,_bk moveq #2,d4 cmpl a5@(-4),d4 jne L618 jbsr _inflate_dynamic movel d0,d1 movel d1,d0 jra L607 L618: tstl a5@(-4) jne L619 jbsr _inflate_stored movel d0,d1 movel d1,d0 jra L607 L619: moveq #1,d4 cmpl a5@(-4),d4 jne L620 jbsr _inflate_fixed movel d0,d1 movel d1,d0 jra L607 L620: moveq #2,d0 jra L607 L607: moveml a5@(-16),#0x1c unlk a5 rts .even _inflate: link a5,#-16 clrl _outcnt clrl _bk clrl _bb clrl a5@(-12) L622: clrl _hufts lea a5@(-16),a0 movel a0,sp@- jbsr _gzip_mark addqw #4,sp lea a5@(-4),a0 movel a0,sp@- jbsr _inflate_block addqw #4,sp movel d0,a5@(-8) tstl a5@(-8) jeq L625 lea a5@(-16),a0 movel a0,sp@- jbsr _gzip_release addqw #4,sp movel a5@(-8),d0 jra L621 L625: lea a5@(-16),a0 movel a0,sp@- jbsr _gzip_release addqw #4,sp movel _hufts,d1 cmpl a5@(-12),d1 jls L626 movel _hufts,a5@(-12) L626: L624: tstl a5@(-4) jeq L627 jra L623 L627: jra L622 L623: nop L628: moveq #7,d1 cmpl _bk,d1 jcs L630 jra L629 L630: subql #8,_bk subql #1,_inptr jra L628 L629: jbsr _flush_window clrl d0 jra L621 L621: unlk a5 rts .data .even _crc: .long -1 .even _p.82: .long 0 .long 1 .long 2 .long 4 .long 5 .long 7 .long 8 .long 10 .long 11 .long 12 .long 16 .long 22 .long 23 .long 26 .text .even _makecrc: link a5,#-16 movel d2,sp@- clrl a5@(-8) clrl a5@(-12) L632: moveq #13,d2 cmpl a5@(-12),d2 jcc L635 jra L633 L635: movel a5@(-12),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _p.82,a0 moveq #31,d2 subl a0@(d0:l),d2 movel d2,d0 moveq #1,d1 movel d1,d2 asll d0,d2 movel d2,d0 orl d0,a5@(-8) L634: addql #1,a5@(-12) jra L632 L633: clrl _crc_32_tab moveq #1,d2 movel d2,a5@(-12) L636: cmpl #255,a5@(-12) jle L639 jra L637 L639: clrl a5@(-4) movel a5@(-12),d2 orw #256,d2 movel d2,a5@(-16) L640: moveq #1,d2 cmpl a5@(-16),d2 jne L643 jra L641 L643: movel a5@(-4),d1 movel d1,d0 lsrl #1,d0 moveq #1,d1 andl a5@(-4),d1 tstl d1 jeq L644 movel a5@(-8),d2 eorl d2,d0 L644: movel d0,a5@(-4) moveq #1,d0 andl a5@(-16),d0 tstl d0 jeq L645 movel a5@(-8),d2 eorl d2,a5@(-4) L645: L642: movel a5@(-16),d0 movel d0,d1 asrl #1,d1 movel d1,a5@(-16) jra L640 L641: movel a5@(-12),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _crc_32_tab,a0 movel a5@(-4),a0@(d0:l) L638: addql #1,a5@(-12) jra L636 L637: L631: movel a5@(-20),d2 unlk a5 rts LC136: .ascii "bad gzip magic numbers\0" LC137: .ascii "internal error, invalid method\0" LC138: .ascii "Input is encrypted\12\0" LC139: .ascii "Multi part input\12\0" LC140: .ascii "Input has invalid flags\12\0" LC141: .ascii "invalid compressed format (err=1)\0" LC142: .ascii "invalid compressed format (err=2)\0" LC143: .ascii "out of memory\0" LC144: .ascii "invalid compressed format (other)\0" LC145: .ascii "crc error\0" LC146: .ascii "length error\0" .even _gunzip: link a5,#-24 movel d3,sp@- movel d2,sp@- clrl a5@(-10) clrl a5@(-14) movel _inptr,d3 cmpl _insize,d3 jcc L647 movel _inbuf,a0 addl _inptr,a0 moveb a0@,d2 addql #1,_inptr jra L648 L647: jbsr _fill_inbuf moveb d0,d2 L648: moveb d2,a5@(-4) movel _inptr,d3 cmpl _insize,d3 jcc L649 movel _inbuf,a0 addl _inptr,a0 moveb a0@,d2 addql #1,_inptr jra L650 L649: jbsr _fill_inbuf moveb d0,d2 L650: moveb d2,a5@(-3) movel _inptr,d3 cmpl _insize,d3 jcc L651 movel _inbuf,a0 addl _inptr,a0 moveb a0@,d2 addql #1,_inptr jra L652 L651: jbsr _fill_inbuf moveb d0,d2 L652: moveb d2,a5@(-5) cmpb #31,a5@(-4) jne L654 cmpb #139,a5@(-3) jeq L653 cmpb #158,a5@(-3) jne L654 jra L653 L654: pea LC136 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L653: cmpb #8,a5@(-5) jeq L655 pea LC137 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L655: movel _inptr,d3 cmpl _insize,d3 jcc L656 movel _inbuf,a0 addl _inptr,a0 moveb a0@,d2 addql #1,_inptr jra L657 L656: jbsr _fill_inbuf moveb d0,d2 L657: moveb d2,a5@(-1) moveb a5@(-1),d0 andb #32,d0 tstb d0 jeq L658 pea LC138 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L658: moveb a5@(-1),d0 andb #2,d0 tstb d0 jeq L659 pea LC139 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L659: moveb a5@(-1),d0 andb #192,d0 tstb d0 jeq L660 pea LC140 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L660: movel _inptr,d3 cmpl _insize,d3 jcc L661 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L662 L661: jbsr _fill_inbuf L662: movel _inptr,d3 cmpl _insize,d3 jcc L663 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L664 L663: jbsr _fill_inbuf L664: movel _inptr,d3 cmpl _insize,d3 jcc L665 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L666 L665: jbsr _fill_inbuf L666: movel _inptr,d3 cmpl _insize,d3 jcc L667 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L668 L667: jbsr _fill_inbuf L668: movel _inptr,d3 cmpl _insize,d3 jcc L669 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L670 L669: jbsr _fill_inbuf L670: movel _inptr,d3 cmpl _insize,d3 jcc L671 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L672 L671: jbsr _fill_inbuf L672: moveb a5@(-1),d0 andb #4,d0 tstb d0 jeq L673 movel _inptr,d3 cmpl _insize,d3 jcc L674 movel _inbuf,a0 addl _inptr,a0 clrl d2 moveb a0@,d2 addql #1,_inptr jra L675 L674: jbsr _fill_inbuf movel d0,d2 L675: movel d2,a5@(-22) movel _inptr,d3 cmpl _insize,d3 jcc L676 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll #8,d0 movel d0,d2 orl a5@(-22),d2 addql #1,_inptr jra L677 L676: jbsr _fill_inbuf movel d0,d1 asll #8,d1 movel d1,d2 orl a5@(-22),d2 L677: movel d2,a5@(-22) L678: subql #1,a5@(-22) moveq #-1,d3 cmpl a5@(-22),d3 jne L680 jra L679 L680: movel _inptr,d3 cmpl _insize,d3 jcc L681 movel _inbuf,d0 addl _inptr,d0 addql #1,_inptr jra L682 L681: jbsr _fill_inbuf L682: jra L678 L679: L673: moveb a5@(-1),d0 andb #8,d0 tstb d0 jeq L683 L684: movel _inptr,d3 cmpl _insize,d3 jcc L687 movel _inbuf,a0 addl _inptr,a0 addql #1,_inptr tstb a0@ jne L686 jra L688 L687: jbsr _fill_inbuf tstl d0 jne L686 jra L688 L688: jra L685 L686: jra L684 L685: L683: moveb a5@(-1),d0 andb #16,d0 tstb d0 jeq L689 L690: movel _inptr,d3 cmpl _insize,d3 jcc L693 movel _inbuf,a0 addl _inptr,a0 addql #1,_inptr tstb a0@ jne L692 jra L694 L693: jbsr _fill_inbuf tstl d0 jne L692 jra L694 L694: jra L691 L692: jra L690 L691: L689: jbsr _inflate movel d0,a5@(-18) tstl a5@(-18) jeq L695 movel a5@(-18),d0 moveq #1,d3 cmpl d0,d3 jeq L698 moveq #1,d3 cmpl d0,d3 jlt L703 tstl d0 jeq L697 jra L701 L703: moveq #2,d3 cmpl d0,d3 jeq L699 moveq #3,d3 cmpl d0,d3 jeq L700 jra L701 L697: jra L696 L698: pea LC141 jbsr _error addqw #4,sp jra L696 L699: pea LC142 jbsr _error addqw #4,sp jra L696 L700: pea LC143 jbsr _error addqw #4,sp jra L696 L701: pea LC144 jbsr _error addqw #4,sp L696: moveq #-1,d0 jra L646 L695: movel _inptr,d3 cmpl _insize,d3 jcc L704 movel _inbuf,a0 addl _inptr,a0 clrl d2 moveb a0@,d2 addql #1,_inptr jra L705 L704: jbsr _fill_inbuf movel d0,d2 L705: movel d2,a5@(-10) movel _inptr,d3 cmpl _insize,d3 jcc L706 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll #8,d0 movel d0,d2 orl a5@(-10),d2 addql #1,_inptr jra L707 L706: jbsr _fill_inbuf movel d0,d1 asll #8,d1 movel d1,d2 orl a5@(-10),d2 L707: movel d2,a5@(-10) movel _inptr,d3 cmpl _insize,d3 jcc L708 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 swap d0 clrw d0 movel d0,d2 orl a5@(-10),d2 addql #1,_inptr jra L709 L708: jbsr _fill_inbuf movel d0,d1 swap d1 clrw d1 movel d1,d2 orl a5@(-10),d2 L709: movel d2,a5@(-10) movel _inptr,d3 cmpl _insize,d3 jcc L710 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 moveq #24,d3 asll d3,d0 movel d0,d2 orl a5@(-10),d2 addql #1,_inptr jra L711 L710: jbsr _fill_inbuf movel d0,d1 moveq #24,d3 asll d3,d1 movel d1,d2 orl a5@(-10),d2 L711: movel d2,a5@(-10) movel _inptr,d3 cmpl _insize,d3 jcc L712 movel _inbuf,a0 addl _inptr,a0 clrl d2 moveb a0@,d2 addql #1,_inptr jra L713 L712: jbsr _fill_inbuf movel d0,d2 L713: movel d2,a5@(-14) movel _inptr,d3 cmpl _insize,d3 jcc L714 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 asll #8,d0 movel d0,d2 orl a5@(-14),d2 addql #1,_inptr jra L715 L714: jbsr _fill_inbuf movel d0,d1 asll #8,d1 movel d1,d2 orl a5@(-14),d2 L715: movel d2,a5@(-14) movel _inptr,d3 cmpl _insize,d3 jcc L716 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 swap d0 clrw d0 movel d0,d2 orl a5@(-14),d2 addql #1,_inptr jra L717 L716: jbsr _fill_inbuf movel d0,d1 swap d1 clrw d1 movel d1,d2 orl a5@(-14),d2 L717: movel d2,a5@(-14) movel _inptr,d3 cmpl _insize,d3 jcc L718 movel _inbuf,a0 addl _inptr,a0 clrl d0 moveb a0@,d0 moveq #24,d3 asll d3,d0 movel d0,d2 orl a5@(-14),d2 addql #1,_inptr jra L719 L718: jbsr _fill_inbuf movel d0,d1 moveq #24,d3 asll d3,d1 movel d1,d2 orl a5@(-14),d2 L719: movel d2,a5@(-14) movel _crc,d0 notl d0 cmpl a5@(-10),d0 jeq L720 pea LC145 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L720: movel a5@(-14),d3 cmpl _bytes_out,d3 jeq L721 pea LC146 jbsr _error addqw #4,sp moveq #-1,d0 jra L646 L721: clrl d0 jra L646 L646: movel a5@(-32),d2 movel a5@(-28),d3 unlk a5 rts .even _gzip_mark: link a5,#0 L722: unlk a5 rts .even _gzip_release: link a5,#0 L723: unlk a5 rts .even _fill_inbuf: link a5,#0 movel a2,sp@- tstl _exit_code jeq L725 moveq #-1,d0 jra L724 L725: movel _linuxboot_args,a0 pea 4096:w movel _inbuf,sp@- movel _Zinfd,sp@- movel a0@(1476),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel d0,_insize tstl _insize jne L726 moveq #-1,d0 jra L724 L726: moveq #1,d1 movel d1,_inptr movel _inbuf,a0 clrl d0 moveb a0@,d0 jra L724 L724: movel a5@(-4),a2 unlk a5 rts LC147: .ascii "Compressed image too large! Aborting.\12\0" LC148: .ascii "Out of memory for decompresing kernel image\12\0" .even _flush_window: link a5,#-20 moveml #0x3020,sp@- movel _crc,a5@(-4) movel _Zwpos,d0 movel d0,d1 swap d1 extl d1 movel d1,a5@(-18) tstl _exit_code jeq L728 jra L727 L728: moveq #31,d3 cmpl a5@(-18),d3 jge L729 pea LC147 jbsr _error addqw #4,sp jra L727 L729: movel a5@(-18),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 tstl a0@(d0:l) jne L730 pea 5:w movel #65536,sp@- jbsr _AllocMem addqw #8,sp movel a5@(-18),d1 movel d1,d2 movel d2,d1 asll #2,d1 lea _ZFile,a0 movel d0,a0@(d1:l) tstl d0 jne L731 pea LC148 jbsr _error addqw #4,sp jra L727 L731: L730: movel _outcnt,sp@- movel _window,sp@- movel a5@(-18),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 movel _Zwpos,d1 andl #65535,d1 movel d1,d3 addl a0@(d0:l),d3 movel d3,d0 movel d0,sp@- jbsr _memcpy addqw #8,sp addqw #4,sp movel _outcnt,d3 addl d3,_Zwpos movel _Zwpos,d0 andl #1023,d0 tstl d0 jne L732 movel _linuxboot_args,a0 pea 46:w movel a0@(1460),a2 jbsr a2@ addqw #4,sp L732: movel _window,a5@(-12) clrl a5@(-8) L733: movel a5@(-8),d3 cmpl _outcnt,d3 jcs L736 jra L734 L736: movel a5@(-12),a0 moveb a0@,a5@(-13) addql #1,a5@(-12) clrl d0 moveb a5@(-13),d0 movel a5@(-4),d3 eorl d3,d0 movel d0,d1 andl #255,d1 movel d1,d2 movel d2,d0 asll #2,d0 lea _crc_32_tab,a0 movel a5@(-4),d2 movel d2,d1 lsrl #8,d1 movel a0@(d0:l),d3 eorl d1,d3 movel d3,a5@(-4) L735: addql #1,a5@(-8) jra L733 L734: movel a5@(-4),_crc movel _outcnt,d3 addl d3,_bytes_out clrl _outcnt L727: moveml a5@(-32),#0x40c unlk a5 rts LC149: .ascii "\12%s\0" .even _error: link a5,#0 movel a2,sp@- movel _linuxboot_args,a0 movel a5@(8),sp@- pea LC149 movel a0@(1464),a2 jbsr a2@ addqw #8,sp moveq #1,d0 movel d0,_exit_code L737: movel a5@(-4),a2 unlk a5 rts LC150: .ascii "Couldn't allocate gunzip buffer\12\0" LC151: .ascii "Couldn't allocate gunzip window\12\0" LC152: .ascii "Couldn't allocate gunzip stack\12\0" LC153: .ascii "Uncompressing kernel image \0" LC154: .ascii "done\12\0" .even _load_zkernel: link a5,#-12 movel a2,sp@- movel d2,sp@- moveq #-1,d2 movel d2,a5@(-8) clrl a5@(-4) L740: moveq #31,d2 cmpl a5@(-4),d2 jge L743 jra L741 L743: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 clrl a0@(d0:l) L742: addql #1,a5@(-4) jra L740 L741: movel a5@(8),_Zinfd movel _linuxboot_args,a0 clrl sp@- movel a5@(8),sp@- movel a0@(1472),a2 jbsr a2@ addqw #8,sp pea 5:w pea 4096:w jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,_inbuf tstl d1 jne L744 movel _linuxboot_args,a0 pea LC150 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L745 L744: pea 5:w movel #32768,sp@- jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,_window tstl d1 jne L746 movel _linuxboot_args,a0 pea LC151 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L747 L746: pea 5:w pea 16384:w jbsr _AllocMem addqw #8,sp movel d0,d1 movel d1,a5@(-12) tstl d1 jne L748 movel _linuxboot_args,a0 pea LC152 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jra L749 L748: movel _linuxboot_args,a0 pea LC153 movel a0@(1452),a2 jbsr a2@ addqw #4,sp jbsr _makecrc movel a5@(-12),d0 addl #16384,d0 movel d0,sp@- pea _gunzip jbsr _call_sub addqw #8,sp movel d0,a5@(-8) tstl a5@(-8) jne L750 movel _linuxboot_args,a0 pea LC154 movel a0@(1452),a2 jbsr a2@ addqw #4,sp L750: movel _Zwpos,_ZFileSize pea 16384:w movel a5@(-12),sp@- jbsr _FreeMem addqw #8,sp L749: movel #32768,sp@- movel _window,sp@- jbsr _FreeMem addqw #8,sp clrl _window L747: pea 4096:w movel _inbuf,sp@- jbsr _FreeMem addqw #8,sp clrl _inbuf L745: movel _linuxboot_args,a0 movel _Zinfd,sp@- movel a0@(1480),a2 jbsr a2@ addqw #4,sp movel a5@(-8),d0 jra L739 L739: movel a5@(-20),d2 movel a5@(-16),a2 unlk a5 rts .even _KRead: link a5,#-16 movel a2,sp@- movel d2,sp@- clrl a5@(-4) tstl _ZFileSize jne L752 movel _linuxboot_args,a0 movel a5@(16),sp@- movel a5@(12),sp@- movel a5@(8),sp@- movel a0@(1476),a2 jbsr a2@ addqw #8,sp addqw #4,sp movel d0,d1 movel d1,d0 jra L751 L752: movel _ZFpos,d0 addl a5@(16),d0 cmpl _ZFileSize,d0 jle L753 movel _ZFileSize,d2 subl _ZFpos,d2 movel d2,a5@(16) L753: nop L754: tstl a5@(16) jgt L756 jra L755 L756: movel _ZFpos,d0 movel d0,d1 swap d1 extl d1 movel d1,a5@(-8) movel a5@(-8),d0 addql #1,d0 movel d0,d1 swap d1 clrw d1 movel d1,a5@(-12) movel a5@(16),a5@(-16) movel _ZFpos,d0 addl a5@(-16),d0 cmpl a5@(-12),d0 jls L757 movel a5@(-12),d2 subl _ZFpos,d2 movel d2,a5@(-16) L757: movel a5@(-16),sp@- movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 movel _ZFpos,d1 andl #65535,d1 movel d1,d2 addl a0@(d0:l),d2 movel d2,d0 movel d0,sp@- movel a5@(12),sp@- jbsr _memcpy addqw #8,sp addqw #4,sp movel a5@(-16),d2 subl d2,a5@(16) movel a5@(-16),d2 addl d2,a5@(12) movel a5@(-16),d2 addl d2,a5@(-4) movel a5@(-16),d2 addl d2,_ZFpos movel _ZFpos,d2 cmpl a5@(-12),d2 jne L758 movel #65536,sp@- movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 movel a0@(d0:l),sp@- jbsr _FreeMem addqw #8,sp movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 clrl a0@(d0:l) L758: jra L754 L755: movel a5@(-4),d0 jra L751 L751: movel a5@(-24),d2 movel a5@(-20),a2 unlk a5 rts .even _KSeek: link a5,#-12 movel a2,sp@- tstl _ZFileSize jne L760 movel _linuxboot_args,a0 movel a5@(12),sp@- movel a5@(8),sp@- movel a0@(1472),a2 jbsr a2@ addqw #8,sp movel d0,d1 movel d1,d0 jra L759 L760: movel _ZFpos,a5@(-4) movel a5@(12),_ZFpos tstl _ZFpos jge L761 clrl _ZFpos moveq #-1,d0 jra L759 jra L762 L761: movel _ZFpos,a1 cmpl _ZFileSize,a1 jle L763 movel _ZFileSize,_ZFpos moveq #-1,d0 jra L759 L763: L762: movel a5@(-4),d0 movel d0,d1 clrw d1 swap d1 movel d1,a5@(-8) movel _ZFpos,d0 movel d0,d1 swap d1 extl d1 movel d1,a5@(-12) L764: movel a5@(-8),a1 cmpl a5@(-12),a1 jcs L766 jra L765 L766: movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 tstl a0@(d0:l) jeq L767 movel #65536,sp@- movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 movel a0@(d0:l),sp@- jbsr _FreeMem addqw #8,sp movel a5@(-8),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 clrl a0@(d0:l) L767: addql #1,a5@(-8) jra L764 L765: movel _ZFpos,d0 jra L759 L759: movel a5@(-16),a2 unlk a5 rts .even _free_zfile: link a5,#-4 movel d2,sp@- nop clrl a5@(-4) L769: moveq #31,d2 cmpl a5@(-4),d2 jge L772 jra L770 L772: movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 tstl a0@(d0:l) jeq L773 movel #65536,sp@- movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 movel a0@(d0:l),sp@- jbsr _FreeMem addqw #8,sp movel a5@(-4),d0 movel d0,d1 movel d1,d0 asll #2,d0 lea _ZFile,a0 clrl a0@(d0:l) L773: L771: addql #1,a5@(-4) jra L769 L770: L768: movel a5@(-8),d2 unlk a5 rts .even _KClose: link a5,#0 movel a2,sp@- tstl _ZFileSize jeq L775 jbsr _free_zfile clrl _ZFileSize jra L776 L775: movel _linuxboot_args,a0 movel a5@(8),sp@- movel a0@(1480),a2 jbsr a2@ addqw #4,sp L776: clrl d0 jra L774 L774: movel a5@(-4),a2 unlk a5 rts .even _AllocMem: link a5,#0 moveml #0x3002,sp@- movel a5@(8),d2 movel a5@(12),d3 movel _SysBase,a6 movel d2,d0 movel d3,d1 #APP jsr a6@(-0xc6) #NO_APP jra L1 L1: moveml a5@(-12),#0x400c unlk a5 rts .even _AllocVec: link a5,#0 moveml #0x3002,sp@- movel a5@(8),d2 movel a5@(12),d3 movel _SysBase,a6 movel d2,d0 movel d3,d1 #APP jsr a6@(-0x2ac) #NO_APP jra L2 L2: moveml a5@(-12),#0x400c unlk a5 rts .even _CacheControl: link a5,#0 moveml #0x3002,sp@- movel a5@(8),d2 movel a5@(12),d3 movel _SysBase,a6 movel d2,d0 movel d3,d1 #APP jsr a6@(-0x288) #NO_APP jra L3 L3: moveml a5@(-12),#0x400c unlk a5 rts .even _Disable: link a5,#0 movel a6,sp@- movel _SysBase,a6 #APP jsr a6@(-0x78) #NO_APP L4: movel a5@(-4),a6 unlk a5 rts .even _Enable: link a5,#0 movel a6,sp@- movel _SysBase,a6 #APP jsr a6@(-0x7e) #NO_APP L5: movel a5@(-4),a6 unlk a5 rts .even _FindResident: link a5,#0 movel a6,sp@- movel d2,sp@- movel a5@(8),d2 movel _SysBase,a6 movel d2,a1 #APP jsr a6@(-0x60) #NO_APP jra L6 L6: movel a5@(-8),d2 movel a5@(-4),a6 unlk a5 rts .even _FreeMem: link a5,#0 moveml #0x3002,sp@- movel a5@(8),d2 movel a5@(12),d3 movel _SysBase,a6 movel d2,a1 movel d3,d0 #APP jsr a6@(-0xd2) #NO_APP L7: moveml a5@(-12),#0x400c unlk a5 rts .even _FreeVec: link a5,#0 movel a6,sp@- movel d2,sp@- movel a5@(8),d2 movel _SysBase,a6 movel d2,a1 #APP jsr a6@(-0x2b2) #NO_APP L8: movel a5@(-8),d2 movel a5@(-4),a6 unlk a5 rts .even _OpenResource: link a5,#0 movel a6,sp@- movel d2,sp@- movel a5@(8),d2 movel _SysBase,a6 movel d2,a1 #APP jsr a6@(-0x1f2) #NO_APP jra L9 L9: movel a5@(-8),d2 movel a5@(-4),a6 unlk a5 rts .even _SuperState: link a5,#0 movel a6,sp@- movel _SysBase,a6 #APP jsr a6@(-0x96) #NO_APP jra L10 L10: movel a5@(-4),a6 unlk a5 rts .even _Supervisor: link a5,#0 moveml #0x2102,sp@- movel a5@(8),d2 movel _SysBase,a6 movel d2,d7 #APP exg d7,a5;jsr a6@(-0x1e);exg d7,a5 #NO_APP jra L11 L11: moveml a5@(-12),#0x4084 unlk a5 rts .even _FindConfigDev: link a5,#0 moveml #0x3802,sp@- movel a5@(8),d2 movel a5@(12),d3 movel a5@(16),d4 movel _ExpansionBase,a6 movel d2,a0 movel d3,d0 movel d4,d1 #APP jsr a6@(-0x48) #NO_APP jra L12 L12: moveml a5@(-16),#0x401c unlk a5 rts .even _LoadView: link a5,#0 movel a6,sp@- movel d2,sp@- movel a5@(8),d2 movel _GfxBase,a6 movel d2,a1 #APP jsr a6@(-0xde) #NO_APP L13: movel a5@(-8),d2 movel a5@(-4),a6 unlk a5 rts .even _SetChipRev: link a5,#0 movel a6,sp@- movel d2,sp@- movel a5@(8),d2 movel _GfxBase,a6 movel d2,d0 #APP jsr a6@(-0x378) #NO_APP jra L14 L14: movel a5@(-8),d2 movel a5@(-4),a6 unlk a5 rts .even _disable_mmu: link a5,#0 movel _SysBase,a0 movew a0@(296),d0 andw #8,d0 tstw d0 jeq L16 #APP moveq #0,d0;.long 0x4e7b0003;.long 0x4e7b0004;.long 0x4e7b0005;.long 0x4e7b0006;.long 0x4e7b0007 #NO_APP jra L17 L16: #APP subl #4,sp;pmove tc,sp@;bclr #7,sp@;pmove sp@,tc;addl #4,sp #NO_APP movel _SysBase,a0 movew a0@(296),d0 andw #4,d0 tstw d0 jeq L18 #APP clrl sp@-;.long 0xf0170800;.long 0xf0170c00;addql #4,sp #NO_APP L18: L17: L15: unlk a5 rts .lcomm _kexec,32 .lcomm _kexec_elf,52 .lcomm _linuxboot_args,4 .comm _bi,1428 .lcomm _compat_bootinfo,1422 .lcomm _bi_size,4 .lcomm _bi_union,4096 .lcomm _boardresetfuncs,64 .lcomm _ZFile,128 .lcomm _inbuf,4 .lcomm _window,4 .lcomm _bb,4 .lcomm _bk,4 .lcomm _hufts,4 .lcomm _crc_32_tab,1024 .even _call_sub: link a5,#0 moveml #0x3020,sp@- movel a5@(8),d2 movel a5@(12),d3 movel d2,a0 movel d3,a1 #APP movel sp,a2;movel a1,sp;jsr a0@;movel a2,sp #NO_APP jra L738 L738: moveml a5@(-12),#0x40c unlk a5 rts