1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
;; -----------------------------------------------------------------------
;;
;; Copyright 1994-2008 H. Peter Anvin - All Rights Reserved
;;
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, Inc., 53 Temple Place Ste 330,
;; Boston MA 02111-1307, USA; either version 2 of the License, or
;; (at your option) any later version; incorporated herein by reference.
;;
;; -----------------------------------------------------------------------
;;
;; loadhigh.inc
;;
;; Load a file into high memory
;;
section .text
;
; load_high: loads (the remainder of) a file into high memory.
; This routine prints dots for each 64K transferred, and
; calls abort_check periodically.
;
; The xfer_buf_seg is used as a bounce buffer.
;
; The input address (EDI) should be dword aligned, and the final
; stretch is padded with zeroes if necessary.
;
; Inputs: SI = file handle/cluster pointer
; EDI = target address in high memory
; EAX = size of remaining file in bytes
; DX = zero-padding mask (e.g. 0003h for pad to dword)
; BX = subroutine to call at the top of each loop
; (to print status and check for abort)
;
; Outputs: SI = file handle/cluster pointer
; EDI = first untouched address (not including padding)
;
load_high:
push es ; <AAA> ES
mov cx,xfer_buf_seg
mov es,cx
.read_loop:
and si,si ; If SI == 0 then we have end of file
jz .eof
call bx
push bx ; <AA> Pausebird function
push eax ; <A> Total bytes to transfer
cmp eax,(1 << 16) ; Max 64K in one transfer
jna .size_ok
mov eax,(1 << 16)
.size_ok:
push eax ; <B> Bytes transferred this chunk
add eax,SECTOR_SIZE-1
shr eax,SECTOR_SHIFT ; Convert to sectors
; Now (e)ax contains the number of sectors to get
push edi ; <C> Target buffer
mov cx,ax
xor bx,bx ; ES:0
call getfssec ; Load the data into xfer_buf_seg
pop edi ; <C> Target buffer
pop ecx ; <B> Byte count this round
push ecx ; <B> Byte count this round
push edi ; <C> Target buffer
.fix_slop:
test cx,dx
jz .noslop
; The last dword fractional - pad with zeroes
; Zero-padding is critical for multi-file initramfs.
mov byte [es:ecx],0
inc ecx
jmp short .fix_slop
.noslop:
push esi ; <D> File handle/cluster pointer
mov esi,(xfer_buf_seg << 4) ; Source address
call bcopy ; Copy to high memory
pop esi ; <D> File handle/cluster pointer
pop edi ; <C> Target buffer
pop ecx ; <B> Byte count this round
pop eax ; <A> Total bytes to transfer
add edi,ecx
sub eax,ecx
pop bx ; <AA> Pausebird function
jnz .read_loop ; More to read...
.eof:
pop es ; <AAA> ES
ret
dot_pause:
push ax
mov al,'.'
call writechr
pop ax
jmp abort_check ; Handles the return
|