522 lines
10 KiB
PHP
522 lines
10 KiB
PHP
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|||
|
|
;;
|
|||
|
|
;; Shutdown for Menuet
|
|||
|
|
;;
|
|||
|
|
;; Distributed under General Public License
|
|||
|
|
;; See file COPYING for details.
|
|||
|
|
;; Copyright 2003 Ville Turjanmaa
|
|||
|
|
;;
|
|||
|
|
|
|||
|
|
|
|||
|
|
system_shutdown: ; shut down the system
|
|||
|
|
|
|||
|
|
push 3 ; stop playing cd
|
|||
|
|
pop eax
|
|||
|
|
call sys_cd_audio
|
|||
|
|
cld
|
|||
|
|
|
|||
|
|
mov al,[0x2f0000+0x9030]
|
|||
|
|
cmp al,1
|
|||
|
|
jl no_shutdown_parameter
|
|||
|
|
cmp al,4
|
|||
|
|
jle yes_shutdown_param
|
|||
|
|
no_shutdown_parameter:
|
|||
|
|
|
|||
|
|
; movzx ecx,word [0x2f0000+0x900A]
|
|||
|
|
; movzx esi,word [0x2f0000+0x900C]
|
|||
|
|
; imul ecx,esi ;[0xfe04]
|
|||
|
|
;; mov ecx,0x500000/4 ;3fff00/4 ; darken screen
|
|||
|
|
; push ecx
|
|||
|
|
; mov esi,[0xfe80]
|
|||
|
|
; cmp esi,32*0x100000
|
|||
|
|
; jbe no_darken_screen
|
|||
|
|
; mov edi,16*0x100000
|
|||
|
|
; push esi edi
|
|||
|
|
; sdnewpix:
|
|||
|
|
; lodsd
|
|||
|
|
; shr eax,1
|
|||
|
|
; and eax,0x7f7f7f7f
|
|||
|
|
; stosd
|
|||
|
|
; loop sdnewpix
|
|||
|
|
; pop ecx
|
|||
|
|
; pop esi edi
|
|||
|
|
; rep movsd
|
|||
|
|
; no_darken_screen:
|
|||
|
|
|
|||
|
|
; read shutdown code:
|
|||
|
|
; 1) display shutdown "window"
|
|||
|
|
|
|||
|
|
mov eax,[0xfe00]
|
|||
|
|
shr eax,1
|
|||
|
|
lea esi,[eax+220] ; x end
|
|||
|
|
sub eax,220 ; x start
|
|||
|
|
|
|||
|
|
mov ebx,[0xfe04]
|
|||
|
|
shr ebx,1
|
|||
|
|
mov [shutdownpos],ebx
|
|||
|
|
lea ebp,[ebx+105] ; y end
|
|||
|
|
sub ebx,120 ; y start
|
|||
|
|
|
|||
|
|
xor edi,edi
|
|||
|
|
inc edi ; force putpixel & dtext
|
|||
|
|
mov ecx,0x0000ff
|
|||
|
|
|
|||
|
|
; vertical loop begin
|
|||
|
|
sdnewpix1:
|
|||
|
|
push eax ; save x start
|
|||
|
|
|
|||
|
|
; horizontal loop begin
|
|||
|
|
sdnewpix2:
|
|||
|
|
|
|||
|
|
call [putpixel]
|
|||
|
|
|
|||
|
|
inc eax
|
|||
|
|
cmp eax,esi
|
|||
|
|
jnz sdnewpix2
|
|||
|
|
; horizontal loop end
|
|||
|
|
|
|||
|
|
dec ecx ; color
|
|||
|
|
pop eax ; restore x start
|
|||
|
|
|
|||
|
|
inc ebx ; advance y pos
|
|||
|
|
cmp ebx,ebp
|
|||
|
|
jnz sdnewpix1
|
|||
|
|
; vertical loop end
|
|||
|
|
|
|||
|
|
; 2) display text strings
|
|||
|
|
; a) version
|
|||
|
|
mov eax,[0xfe00]
|
|||
|
|
shr eax,1
|
|||
|
|
shl eax,16
|
|||
|
|
mov ax,word [shutdownpos]
|
|||
|
|
push eax
|
|||
|
|
sub eax,(220-27)*10000h + 105
|
|||
|
|
mov ebx,0xffff00
|
|||
|
|
mov ecx,version
|
|||
|
|
push 34
|
|||
|
|
pop edx
|
|||
|
|
call dtext
|
|||
|
|
|
|||
|
|
; b) variants
|
|||
|
|
add eax,105+33
|
|||
|
|
push 6
|
|||
|
|
pop esi
|
|||
|
|
; mov ebx,0xffffff
|
|||
|
|
mov bl,0xFF
|
|||
|
|
mov ecx,shutdowntext
|
|||
|
|
mov dl,40
|
|||
|
|
newsdt:
|
|||
|
|
call dtext
|
|||
|
|
add eax,10
|
|||
|
|
add ecx,edx
|
|||
|
|
dec esi
|
|||
|
|
jnz newsdt
|
|||
|
|
|
|||
|
|
; 3) load & display rose.txt
|
|||
|
|
mov eax,rosef ; load rose.txt
|
|||
|
|
xor ebx,ebx
|
|||
|
|
push 2
|
|||
|
|
pop ecx
|
|||
|
|
mov edx,0x90000
|
|||
|
|
push edx
|
|||
|
|
push 12
|
|||
|
|
pop esi
|
|||
|
|
push edi ; may be destroyed
|
|||
|
|
call fileread
|
|||
|
|
pop edi
|
|||
|
|
|
|||
|
|
pop ecx
|
|||
|
|
inc ecx ; do not display stars from rose.txt
|
|||
|
|
pop eax
|
|||
|
|
add eax,20*10000h - 110
|
|||
|
|
|
|||
|
|
mov ebx,0x00ff00
|
|||
|
|
push 27
|
|||
|
|
pop edx
|
|||
|
|
|
|||
|
|
nrl:
|
|||
|
|
call dtext
|
|||
|
|
sub ebx,0x050000
|
|||
|
|
add eax,8
|
|||
|
|
add ecx,31
|
|||
|
|
cmp cx,word 0x0001+25*31
|
|||
|
|
jnz nrl
|
|||
|
|
|
|||
|
|
call checkVga_N13
|
|||
|
|
|
|||
|
|
yes_shutdown_param:
|
|||
|
|
cli
|
|||
|
|
|
|||
|
|
mov eax,kernel ; load kernel.mnt to 0x8000:0
|
|||
|
|
push 12
|
|||
|
|
pop esi
|
|||
|
|
xor ebx,ebx
|
|||
|
|
or ecx,-1
|
|||
|
|
mov edx,0x80000
|
|||
|
|
call fileread
|
|||
|
|
|
|||
|
|
mov esi,restart_kernel_4000+0x10000 ; move kernel re-starter to 0x4000:0
|
|||
|
|
mov edi,0x40000
|
|||
|
|
mov ecx,1000
|
|||
|
|
rep movsb
|
|||
|
|
|
|||
|
|
mov eax,0x2F0000 ; restore 0x0 - 0xffff
|
|||
|
|
xor ebx,ebx
|
|||
|
|
mov ecx,0x10000
|
|||
|
|
call memmove
|
|||
|
|
|
|||
|
|
call restorefatchain
|
|||
|
|
|
|||
|
|
mov word [0x467+0],pr_mode_exit-0x10000
|
|||
|
|
mov word [0x467+2],0x1000
|
|||
|
|
|
|||
|
|
mov al,0x0F
|
|||
|
|
out 0x70,al
|
|||
|
|
mov al,0x05
|
|||
|
|
out 0x71,al
|
|||
|
|
|
|||
|
|
mov al,0xFE
|
|||
|
|
out 0x64,al
|
|||
|
|
hlt
|
|||
|
|
|
|||
|
|
use16
|
|||
|
|
|
|||
|
|
pr_mode_exit:
|
|||
|
|
org $-0x10000
|
|||
|
|
|
|||
|
|
; setup stack
|
|||
|
|
mov ax, 3000h
|
|||
|
|
mov ss, ax
|
|||
|
|
mov esp, 0EC00h
|
|||
|
|
; setup ds
|
|||
|
|
push cs
|
|||
|
|
pop ds
|
|||
|
|
|
|||
|
|
lidt [old_ints_h-0x10000]
|
|||
|
|
;remap IRQs
|
|||
|
|
mov al,0x11
|
|||
|
|
out 0x20,al
|
|||
|
|
call rdelay
|
|||
|
|
out 0xA0,al
|
|||
|
|
call rdelay
|
|||
|
|
|
|||
|
|
mov al,0x08
|
|||
|
|
out 0x21,al
|
|||
|
|
call rdelay
|
|||
|
|
mov al,0x70
|
|||
|
|
out 0xA1,al
|
|||
|
|
call rdelay
|
|||
|
|
|
|||
|
|
mov al,0x04
|
|||
|
|
out 0x21,al
|
|||
|
|
call rdelay
|
|||
|
|
mov al,0x02
|
|||
|
|
out 0xA1,al
|
|||
|
|
call rdelay
|
|||
|
|
|
|||
|
|
mov al,0x01
|
|||
|
|
out 0x21,al
|
|||
|
|
call rdelay
|
|||
|
|
out 0xA1,al
|
|||
|
|
call rdelay
|
|||
|
|
|
|||
|
|
mov al,0
|
|||
|
|
out 0x21,al
|
|||
|
|
call rdelay
|
|||
|
|
out 0xA1,al
|
|||
|
|
sti
|
|||
|
|
|
|||
|
|
temp_3456:
|
|||
|
|
xor ax,ax
|
|||
|
|
mov es,ax
|
|||
|
|
mov al,byte [es:0x9030]
|
|||
|
|
cmp al,1
|
|||
|
|
jl nbw
|
|||
|
|
cmp al,4
|
|||
|
|
jle nbw32
|
|||
|
|
|
|||
|
|
nbw:
|
|||
|
|
in al,0x60
|
|||
|
|
call pause_key
|
|||
|
|
cmp al,6
|
|||
|
|
jae nbw
|
|||
|
|
mov bl,al
|
|||
|
|
nbw2:
|
|||
|
|
in al,0x60
|
|||
|
|
call pause_key
|
|||
|
|
cmp al,bl
|
|||
|
|
je nbw2
|
|||
|
|
cmp al,240 ;ax,240
|
|||
|
|
jne nbw31
|
|||
|
|
mov al,bl
|
|||
|
|
dec ax
|
|||
|
|
jmp nbw32
|
|||
|
|
nbw31:
|
|||
|
|
add bl,128
|
|||
|
|
cmp al,bl
|
|||
|
|
jne nbw
|
|||
|
|
sub al,129
|
|||
|
|
|
|||
|
|
nbw32:
|
|||
|
|
|
|||
|
|
dec ax ; 1 = write floppy
|
|||
|
|
js nbw
|
|||
|
|
jnz no_floppy_write
|
|||
|
|
call floppy_write
|
|||
|
|
jmp temp_3456 ;nbw
|
|||
|
|
no_floppy_write:
|
|||
|
|
|
|||
|
|
dec ax ; 2 = power off
|
|||
|
|
jnz no_apm_off
|
|||
|
|
call APM_PowerOff
|
|||
|
|
jmp $
|
|||
|
|
no_apm_off:
|
|||
|
|
|
|||
|
|
dec ax ; 3 = reboot
|
|||
|
|
jnz restart_kernel ; 4 = restart kernel
|
|||
|
|
push 0x40
|
|||
|
|
pop ds
|
|||
|
|
mov word[0x0072],0x1234
|
|||
|
|
jmp 0xF000:0xFFF0
|
|||
|
|
|
|||
|
|
pause_key:
|
|||
|
|
mov cx,100
|
|||
|
|
pause_key_1:
|
|||
|
|
loop pause_key_1
|
|||
|
|
ret
|
|||
|
|
org $+0x10000
|
|||
|
|
old_ints_h:
|
|||
|
|
dw 0x400
|
|||
|
|
dd 0
|
|||
|
|
dw 0
|
|||
|
|
org $-0x10000
|
|||
|
|
|
|||
|
|
rdelay:
|
|||
|
|
ret
|
|||
|
|
|
|||
|
|
iglobal
|
|||
|
|
kernel db 'KERNEL MNT'
|
|||
|
|
; shutdown_parameter db 0
|
|||
|
|
endg
|
|||
|
|
|
|||
|
|
restart_kernel:
|
|||
|
|
|
|||
|
|
mov ax,0x0003 ; set text mode for screen
|
|||
|
|
int 0x10
|
|||
|
|
|
|||
|
|
jmp 0x4000:0000
|
|||
|
|
|
|||
|
|
|
|||
|
|
restart_kernel_4000:
|
|||
|
|
cli
|
|||
|
|
|
|||
|
|
; mov di,0x1000 ; load kernel image from 0x8000:0 -> 0x1000:0
|
|||
|
|
;
|
|||
|
|
; new_kernel_block_move:
|
|||
|
|
;
|
|||
|
|
; mov ebx,0
|
|||
|
|
;
|
|||
|
|
; new_kernel_byte_move:
|
|||
|
|
;
|
|||
|
|
; mov ax,di
|
|||
|
|
; add ax,0x7000
|
|||
|
|
; mov es,ax
|
|||
|
|
; mov dl,[es:bx]
|
|||
|
|
; mov es,di
|
|||
|
|
; mov [es:bx],dl
|
|||
|
|
;
|
|||
|
|
; inc ebx
|
|||
|
|
; cmp ebx,65536
|
|||
|
|
; jbe new_kernel_byte_move
|
|||
|
|
;
|
|||
|
|
; add di,0x1000
|
|||
|
|
; cmp di,0x2000
|
|||
|
|
; jbe new_kernel_block_move
|
|||
|
|
push ds
|
|||
|
|
pop es
|
|||
|
|
mov cx, 0x8000
|
|||
|
|
push cx
|
|||
|
|
mov ds, cx
|
|||
|
|
xor si, si
|
|||
|
|
xor di, di
|
|||
|
|
rep movsw
|
|||
|
|
push 0x9000
|
|||
|
|
pop ds
|
|||
|
|
push 0x2000
|
|||
|
|
pop es
|
|||
|
|
pop cx
|
|||
|
|
rep movsw
|
|||
|
|
|
|||
|
|
wbinvd ; write and invalidate cache
|
|||
|
|
|
|||
|
|
; mov ax,0x1000
|
|||
|
|
; mov es,ax
|
|||
|
|
; mov ax,0x3000
|
|||
|
|
; mov ss,ax
|
|||
|
|
; mov sp,0xec00
|
|||
|
|
; restore timer
|
|||
|
|
mov al, 00110100b
|
|||
|
|
out 43h, al
|
|||
|
|
jcxz $+2
|
|||
|
|
mov al, 0xFF
|
|||
|
|
out 40h, al
|
|||
|
|
jcxz $+2
|
|||
|
|
out 40h, al
|
|||
|
|
jcxz $+2
|
|||
|
|
sti
|
|||
|
|
|
|||
|
|
; bootloader interface
|
|||
|
|
push 0x1000
|
|||
|
|
pop ds
|
|||
|
|
mov si, .bootloader_block;-0x10000
|
|||
|
|
mov ax, 'KL'
|
|||
|
|
jmp 0x1000:0000
|
|||
|
|
|
|||
|
|
.bootloader_block:
|
|||
|
|
db 1 ; version
|
|||
|
|
dw 1 ; floppy image is in memory
|
|||
|
|
dd 0 ; cannot save parameters
|
|||
|
|
|
|||
|
|
APM_PowerOff:
|
|||
|
|
mov ax, 5304h
|
|||
|
|
xor bx, bx
|
|||
|
|
int 15h
|
|||
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!
|
|||
|
|
mov ax,0x5300
|
|||
|
|
xor bx,bx
|
|||
|
|
int 0x15
|
|||
|
|
push ax
|
|||
|
|
|
|||
|
|
mov ax,0x5301
|
|||
|
|
xor bx,bx
|
|||
|
|
int 0x15
|
|||
|
|
|
|||
|
|
mov ax,0x5308
|
|||
|
|
mov bx,1
|
|||
|
|
mov cx,bx
|
|||
|
|
int 0x15
|
|||
|
|
|
|||
|
|
mov ax,0x530E
|
|||
|
|
xor bx,bx
|
|||
|
|
pop cx
|
|||
|
|
int 0x15
|
|||
|
|
|
|||
|
|
mov ax,0x530D
|
|||
|
|
mov bx,1
|
|||
|
|
mov cx,bx
|
|||
|
|
int 0x15
|
|||
|
|
|
|||
|
|
mov ax,0x530F
|
|||
|
|
mov bx,1
|
|||
|
|
mov cx,bx
|
|||
|
|
int 0x15
|
|||
|
|
|
|||
|
|
mov ax,0x5307
|
|||
|
|
mov bx,1
|
|||
|
|
mov cx,3
|
|||
|
|
int 0x15
|
|||
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!
|
|||
|
|
fwwritedone:
|
|||
|
|
ret
|
|||
|
|
org $+0x10000
|
|||
|
|
flm db 0
|
|||
|
|
org $-0x10000
|
|||
|
|
|
|||
|
|
floppy_write: ; write diskette image to physical floppy
|
|||
|
|
|
|||
|
|
cmp [flm-0x10000],byte 1
|
|||
|
|
je fwwritedone
|
|||
|
|
mov [flm-0x10000],byte 1
|
|||
|
|
|
|||
|
|
xor ax, ax ; reset drive
|
|||
|
|
xor dx, dx
|
|||
|
|
int 0x13
|
|||
|
|
|
|||
|
|
mov cx,0x0001 ; startcyl,startsector
|
|||
|
|
; mov dx,0x0000 ; starthead,drive
|
|||
|
|
xor dx, dx
|
|||
|
|
mov ax, 80*2 ; read no of sect
|
|||
|
|
|
|||
|
|
fwwrites:
|
|||
|
|
push ax
|
|||
|
|
|
|||
|
|
; move 1mb+ -> 0:a000
|
|||
|
|
|
|||
|
|
pusha
|
|||
|
|
mov si,fwmovedesc -0x10000
|
|||
|
|
mov cx,256*18
|
|||
|
|
mov ah,0x87
|
|||
|
|
push ds
|
|||
|
|
pop es
|
|||
|
|
int 0x15
|
|||
|
|
add dword [fwmovedesc-0x10000+0x12], 512*18
|
|||
|
|
popa
|
|||
|
|
|
|||
|
|
xor si,si
|
|||
|
|
mov es,si
|
|||
|
|
fwnewwrite:
|
|||
|
|
mov bx,0xa000 ; es:bx -> data area
|
|||
|
|
mov ax,0x0300+18 ; read, no of sectors to read
|
|||
|
|
int 0x13
|
|||
|
|
|
|||
|
|
test ah, ah
|
|||
|
|
jz fwgoodwrite
|
|||
|
|
|
|||
|
|
inc si
|
|||
|
|
cmp si,10
|
|||
|
|
jnz fwnewwrite
|
|||
|
|
|
|||
|
|
; can't access diskette - return
|
|||
|
|
pop ax
|
|||
|
|
ret
|
|||
|
|
|
|||
|
|
fwgoodwrite:
|
|||
|
|
inc dh
|
|||
|
|
cmp dh,2
|
|||
|
|
jnz fwbb2
|
|||
|
|
mov dh,0
|
|||
|
|
inc ch
|
|||
|
|
fwbb2:
|
|||
|
|
pop ax
|
|||
|
|
dec ax
|
|||
|
|
jnz fwwrites
|
|||
|
|
ret
|
|||
|
|
org $+0x10000
|
|||
|
|
fwmovedesc:
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
db 0xff,0xff,0x0,0x00,0x10,0x93,0x0,0x0
|
|||
|
|
db 0xff,0xff,0x0,0xa0,0x00,0x93,0x0,0x0
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
db 0x00,0x00,0x0,0x00,0x00,0x00,0x0,0x0
|
|||
|
|
org $-0x10000
|
|||
|
|
use32
|
|||
|
|
org $+0x10000
|
|||
|
|
uglobal
|
|||
|
|
shutdownpos dd 0x0
|
|||
|
|
endg
|
|||
|
|
|
|||
|
|
iglobal
|
|||
|
|
if lang eq en
|
|||
|
|
shutdowntext:
|
|||
|
|
db "IT'S SAFE TO POWER OFF COMPUTER OR "
|
|||
|
|
db ' '
|
|||
|
|
db '1) SAVE RAMDISK TO FLOPPY '
|
|||
|
|
db '2) APM - POWEROFF '
|
|||
|
|
db '3) REBOOT '
|
|||
|
|
db '4) RESTART KERNEL '
|
|||
|
|
else
|
|||
|
|
shutdowntext:
|
|||
|
|
db "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>᭮<EFBFBD> <20>몫<EFBFBD>祭<EFBFBD><E7A5AD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> "
|
|||
|
|
db ' '
|
|||
|
|
db '1) <20><><EFBFBD>࠭<EFBFBD><E0A0AD><EFBFBD> ࠬ<><E0A0AC><EFBFBD><EFBFBD> <20><> <20><>᪥<EFBFBD><E1AAA5> '
|
|||
|
|
db '2) APM - <20>몫<EFBFBD>祭<EFBFBD><E7A5AD> <20><>⠭<EFBFBD><E2A0AD> '
|
|||
|
|
db '3) <20><>१<EFBFBD><E0A5A7><EFBFBD>㧪<EFBFBD> <20><><EFBFBD>⥬<EFBFBD> '
|
|||
|
|
db '4) <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD> '
|
|||
|
|
end if
|
|||
|
|
rosef:
|
|||
|
|
db 'ROSE TXT'
|
|||
|
|
endg
|