home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / system / linux_bo / netboot.zoo / floboot.asm < prev    next >
Encoding:
Assembly Source File  |  1993-05-06  |  4.7 KB  |  261 lines
  1. ; 
  2. ;
  3. ; ideas - snippets of this were lifted from bootsect.s by Linus
  4. ; these consist of - patching the drive parameter table
  5. ;                  - trying to read sectors 18, 15 and 9 to determine
  6. ;                    the number of sectors per track
  7. ; The rest is pretty well mine.
  8. ;
  9. ; Don't be tempted to replace all those ugly [BASE+...] operands.
  10. ; you'll find exe2bin won't like it
  11. ;
  12. ;
  13. BOOT_TEXT     SEGMENT BYTE PUBLIC 'BOOTT'
  14. BOOT_TEXT              ENDS
  15.  
  16. Loaded          segment at 9800h
  17.  
  18.                 assume cs:Loaded
  19.                 assume ds:Loaded
  20.  
  21.                 org 0
  22. JMP_HERE    label far
  23. Loaded          ends
  24.  
  25. BOOT_TEXT     SEGMENT BYTE PUBLIC 'BOOTT'
  26.     ASSUME  CS:BOOT_TEXT
  27.     ASSUME    DS:BOOT_TEXT
  28.  
  29.     org 0h
  30.  
  31. BASE EQU    7c00h
  32.  
  33. go:
  34. ;    mov    dx, BASE + offset BOOT_TEXT:go
  35. ;    sub    dx,200h
  36. ;    mov    cl,4
  37. ;    shr    dx,cl
  38.     mov    dx,cs
  39.  
  40.     mov    ax, 100h
  41.     mov    dx, 6200h
  42.     mov    ss,ax        ; put stack at 100:6200 -> 7200
  43.     mov    sp,dx
  44.  
  45.     xor    ax,ax
  46.     mov    es,ax
  47.  
  48.     lds    si,es:[078h]        ; ds:si is source
  49.  
  50.     mov    es,dx            ; our data segment
  51.  
  52.     mov    di,BASE + offset dt_table        ; es:di is destination
  53.     mov    cx,6            ; copy 12 bytes
  54.     cld
  55.     rep
  56.     movsw
  57.  
  58.     mov    ds,dx
  59.  
  60.     mov    [BASE+dt_sec_trak], 18        ; patch sector count
  61.  
  62.     xor    ax,ax
  63.     mov    es,ax
  64.     mov    bx, BASE + offset dt_table        ; es:di is destination
  65.     mov    es:[078h],bx
  66.     mov    ax,ds
  67.     mov    es:[07ah],ax
  68.  
  69.     xor    ah,ah            ; reset FDC 
  70.     xor    dl,dl
  71.     int     13h    
  72.  
  73.     mov    si, BASE + offset BOOT_TEXT:booting
  74.     call    outs_cs_si
  75.  
  76.     mov    ax,seg Loaded        ; convenient place
  77.     mov    es,ax
  78.     xor    bx,bx
  79.  
  80. ; pinched this bit from linux - simply determine which
  81. ; is the last sector    
  82.  
  83.     xor    dx, dx            ; drive 0, head 0
  84.     mov    cx,18            ; sector 18, track 0
  85.     mov    ax,201h            ; read one sector
  86.     int    13h
  87.     jnc    sectors_known
  88.     mov    cx,15            ; sector 15
  89.     mov    ax,201h            ; read one sector
  90.     int    13h
  91.     jnc    sectors_known
  92.     mov    cx,9
  93.  
  94. sectors_known:
  95.     mov    [BASE+sectors], cx        ; 
  96.     
  97.     ; for (ax = 2, cx = numsects; cx > 0 ; cx--, ax++)
  98.     ;    read sector ax
  99.     ;    es:bx += sector size
  100.  
  101.                     ; going to read 32k
  102.     mov    cx, 32 * 2        ; number of sectors
  103.  
  104.     mov    ax,seg Loaded        ; convenient place
  105.     mov    es,ax
  106.     xor    bx,bx
  107.  
  108.     mov    ax,1            ;  starting sector
  109.                     ; our numbers start at 0, theirs at 1
  110. rd_loop:
  111.     cmp    cx,0
  112.     jle    finito
  113.     push    cx
  114.     push    ax
  115.     
  116.     call    convertsect
  117.                     ; es:bx points to buffer
  118.     mov    ax,0201h
  119.     int    13h
  120.  
  121.     pop    ax
  122.     pop    cx
  123.     jc    bad_read
  124.     
  125.     dec    cx
  126.     inc    ax
  127.     add    bx,512
  128.     jmp    rd_loop
  129.  
  130. finito:
  131. ifdef TESTING
  132.     mov    si, BASE + offset BOOT_TEXT:bootok
  133.     call    outs_cs_si
  134. endif
  135.     call far ptr JMP_HERE
  136.     mov    si, BASE + offset BOOT_TEXT:pank
  137.     call    outs_cs_si
  138.     jmp    bad_exit
  139.  
  140. bad_read:
  141.     mov    si, BASE + offset BOOT_TEXT:diskerror
  142.     call    outs_cs_si
  143. bad_exit:
  144.     xor    ah,ah        ; wait for user press key
  145.     int    16h
  146.                 ; try to boot the system again
  147.     int    19h
  148.  
  149.  
  150. convertsect:
  151.             ; convert absolute sector to track head sector
  152.             ; sector in ax (assume small)
  153.             
  154.     xor    dx,dx        ; assume high word zero
  155.     div     [BASE+sectors]        ; sectors per track
  156.     inc     dl            ; my 486 book says the remainder is in ax!
  157.                     ; remainder is really in dx
  158.     xor    dh,dh
  159.     push    dx        ; keep secno handy
  160.     mov    dx,ax        ; copy remainder
  161.     shr    ax,1        ; divide by number of heads -> track no
  162.     and    dx,1        ; mask all but head number
  163.     xchg    dh,dl        ; HEAD DH
  164.                 ; ax is the track number
  165.                 ; top two bits of track should be
  166.                 ; placed in the sector number -  we ignore
  167.     
  168.     mov    ch, al        ; track no
  169.     pop    ax        ; sector number
  170.     mov    cl,al        ; sector
  171.  
  172.     ret
  173.  
  174. outch:
  175.     mov     ah,0eh
  176.     mov     bx,0007h
  177.     int     10h
  178.  
  179. outs_cs_si:
  180.     mov    al,cs:[si]
  181.     inc    si
  182.     or     al,al    ; end of string
  183.     jnz     outch
  184.     ret
  185.  
  186. diskerror:
  187.     db 0Dh, 0Ah, 'Disk controller error ...', 0
  188.  
  189. booting:
  190.     db 0Dh, 0Ah, 'Loading net boot ...', 0
  191. pank:
  192.     db 0Dh, 0Ah, 'Press any key...', 0
  193. ifdef TESTING
  194. bootok:
  195.     db 0Dh, 0Ah, 'read all, now jumping..', 0
  196. endif
  197.  
  198. dt_table        label    byte
  199. dt_spec1    db    0
  200. dt_spec2    db    0
  201. dt_moffc    db    0
  202. dt_byt_sec    db    0    ; bytes per sector
  203. dt_sec_trak    db    0    ; sectors per track
  204. dt_gap        db    0    ;
  205. dt_dtl        db    0
  206. dt_gap3        db    0
  207. dt_fil_byt    db    0
  208. dt_hd_tim    db    0
  209. dt_most        db    0
  210. dt_maxtrak    db    0
  211. dt_other    db    0
  212.  
  213. sectors        dw    0
  214.  
  215.  
  216. fill:    db (512-(offset BOOT_TEXT:fill-offset BOOT_TEXT:go)-2) dup (0)
  217.  
  218. signature    dw 0AA55h
  219.  
  220.  
  221. BOOT_TEXT              ENDS
  222.  
  223. ifdef TESTING
  224.  
  225. FUNNY_TEXT     SEGMENT BYTE PUBLIC 'BOOTF'
  226.     ASSUME  CS:FUNNY_TEXT
  227.     ASSUME    DS:FUNNY_TEXT
  228.  
  229.     org 0
  230.  
  231.     mov    si, offset xbooted
  232.     call    xouts_cs_si
  233.  
  234.     xor     ah,ah        ; wait for user press key
  235.     int     16h
  236.                 ; try to boot the system again
  237.     int     19h
  238.  
  239.     
  240. xoutch:
  241.     mov     ah,0eh
  242.     mov     bx,0007h
  243.     int     10h
  244.  
  245. xouts_cs_si:
  246.     mov    al,cs:[si]
  247.     inc    si
  248.     or     al,al    ; end of string
  249.     jnz     xoutch
  250.     ret
  251.  
  252. xbooted:
  253.     db 0Dh, 0Ah, 'I booted... press key', 0
  254.  
  255. ;    db 32768 dup (?)
  256.  
  257. FUNNY_TEXT              ENDS
  258. endif
  259.  
  260.     END    go
  261.