Rev 5201 | Rev 6240 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
431 | serge | 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
2 | ;; ;; |
||
5565 | serge | 3 | ;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;; |
431 | serge | 4 | ;; Distributed under terms of the GNU General Public License ;; |
5 | ;; ;; |
||
6 | ;; Shutdown for Menuet ;; |
||
7 | ;; ;; |
||
8 | ;; Distributed under General Public License ;; |
||
9 | ;; See file COPYING for details. ;; |
||
10 | ;; Copyright 2003 Ville Turjanmaa ;; |
||
11 | ;; ;; |
||
12 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
||
1 | ha | 13 | |
593 | mikedld | 14 | $Revision: 5565 $ |
15 | |||
5201 | serge | 16 | use32 |
17 | become_real: |
||
18 | cli |
||
19 | lgdt [realmode_gdt-OS_BASE] |
||
20 | jmp 8:@f |
||
21 | use16 |
||
22 | @@: |
||
23 | mov ax, 10h |
||
24 | mov ds, ax |
||
25 | mov es, ax |
||
26 | mov fs, ax |
||
27 | mov gs, ax |
||
28 | mov ss, ax |
||
29 | mov eax, cr0 |
||
30 | and eax, not 80000001h |
||
31 | mov cr0, eax |
||
32 | jmp 0x1000:pr_mode_exit |
||
593 | mikedld | 33 | |
1 | ha | 34 | pr_mode_exit: |
35 | |||
46 | halyavin | 36 | ; setup stack |
2434 | Serge | 37 | mov ax, 0x3000 |
38 | mov ss, ax |
||
39 | mov esp, 0x0EC00 |
||
46 | halyavin | 40 | ; setup ds |
465 | serge | 41 | push cs |
2434 | Serge | 42 | pop ds |
1 | ha | 43 | |
2434 | Serge | 44 | lidt [old_ints_h] |
27 | halyavin | 45 | ;remap IRQs |
2434 | Serge | 46 | mov al, 0x11 |
47 | out 0x20, al |
||
48 | call rdelay |
||
49 | out 0xA0, al |
||
50 | call rdelay |
||
227 | serge | 51 | |
2434 | Serge | 52 | mov al, 0x08 |
53 | out 0x21, al |
||
54 | call rdelay |
||
55 | mov al, 0x70 |
||
56 | out 0xA1, al |
||
57 | call rdelay |
||
227 | serge | 58 | |
2434 | Serge | 59 | mov al, 0x04 |
60 | out 0x21, al |
||
61 | call rdelay |
||
62 | mov al, 0x02 |
||
63 | out 0xA1, al |
||
64 | call rdelay |
||
227 | serge | 65 | |
2434 | Serge | 66 | mov al, 0x01 |
67 | out 0x21, al |
||
68 | call rdelay |
||
69 | out 0xA1, al |
||
70 | call rdelay |
||
227 | serge | 71 | |
2434 | Serge | 72 | mov al, 0xB8 |
73 | out 0x21, al |
||
74 | call rdelay |
||
75 | mov al, 0xBD |
||
76 | out 0xA1, al |
||
465 | serge | 77 | sti |
1 | ha | 78 | |
465 | serge | 79 | temp_3456: |
2434 | Serge | 80 | xor ax, ax |
81 | mov es, ax |
||
82 | mov al, byte [es:0x9030] |
||
83 | cmp al, 1 |
||
84 | jl nbw |
||
85 | cmp al, 4 |
||
86 | jle nbw32 |
||
227 | serge | 87 | |
465 | serge | 88 | nbw: |
2434 | Serge | 89 | in al, 0x60 |
90 | cmp al, 6 |
||
91 | jae nbw |
||
92 | mov bl, al |
||
465 | serge | 93 | nbw2: |
2434 | Serge | 94 | in al, 0x60 |
95 | cmp al, bl |
||
96 | je nbw2 |
||
97 | cmp al, 240;ax,240 |
||
98 | jne nbw31 |
||
99 | mov al, bl |
||
100 | dec ax |
||
101 | jmp nbw32 |
||
465 | serge | 102 | nbw31: |
2434 | Serge | 103 | add bl, 128 |
104 | cmp al, bl |
||
105 | jne nbw |
||
106 | sub al, 129 |
||
1 | ha | 107 | |
465 | serge | 108 | nbw32: |
61 | halyavin | 109 | |
2434 | Serge | 110 | dec ax |
111 | dec ax ; 2 = power off |
||
112 | jnz no_apm_off |
||
113 | call APM_PowerOff |
||
114 | jmp $ |
||
465 | serge | 115 | no_apm_off: |
1 | ha | 116 | |
2010 | serge | 117 | if ~ defined extended_primary_loader ; kernel restarting is not supported |
2434 | Serge | 118 | dec ax ; 3 = reboot |
119 | jnz restart_kernel ; 4 = restart kernel |
||
2010 | serge | 120 | end if |
2434 | Serge | 121 | push 0x40 |
122 | pop ds |
||
123 | mov word[0x0072], 0x1234 |
||
124 | jmp 0xF000:0xFFF0 |
||
1 | ha | 125 | |
61 | halyavin | 126 | |
127 | rdelay: |
||
1 | ha | 128 | ret |
61 | halyavin | 129 | |
465 | serge | 130 | APM_PowerOff: |
131 | mov ax, 5304h |
||
132 | xor bx, bx |
||
133 | int 15h |
||
134 | ;!!!!!!!!!!!!!!!!!!!!!!!! |
||
2434 | Serge | 135 | mov ax, 0x5300 |
136 | xor bx, bx |
||
137 | int 0x15 |
||
138 | push ax |
||
465 | serge | 139 | |
2434 | Serge | 140 | mov ax, 0x5301 |
141 | xor bx, bx |
||
142 | int 0x15 |
||
465 | serge | 143 | |
2434 | Serge | 144 | mov ax, 0x5308 |
145 | mov bx, 1 |
||
146 | mov cx, bx |
||
147 | int 0x15 |
||
465 | serge | 148 | |
2434 | Serge | 149 | mov ax, 0x530E |
150 | xor bx, bx |
||
151 | pop cx |
||
152 | int 0x15 |
||
465 | serge | 153 | |
2434 | Serge | 154 | mov ax, 0x530D |
155 | mov bx, 1 |
||
156 | mov cx, bx |
||
157 | int 0x15 |
||
465 | serge | 158 | |
2434 | Serge | 159 | mov ax, 0x530F |
160 | mov bx, 1 |
||
161 | mov cx, bx |
||
162 | int 0x15 |
||
465 | serge | 163 | |
2434 | Serge | 164 | mov ax, 0x5307 |
165 | mov bx, 1 |
||
166 | mov cx, 3 |
||
167 | int 0x15 |
||
465 | serge | 168 | ;!!!!!!!!!!!!!!!!!!!!!!!! |
169 | ret |
||
170 | |||
2010 | serge | 171 | if ~ defined extended_primary_loader |
465 | serge | 172 | restart_kernel: |
173 | |||
2434 | Serge | 174 | mov ax, 0x0003 ; set text mode for screen |
465 | serge | 175 | int 0x10 |
176 | jmp 0x4000:0000 |
||
177 | |||
178 | restart_kernel_4000: |
||
179 | cli |
||
180 | |||
181 | push ds |
||
681 | diamond | 182 | pop es |
183 | mov cx, 0x8000 |
||
465 | serge | 184 | push cx |
5201 | serge | 185 | push 0x7100 |
681 | diamond | 186 | pop ds |
187 | xor si, si |
||
188 | xor di, di |
||
2434 | Serge | 189 | rep movsw |
681 | diamond | 190 | pop cx |
191 | mov ds, cx |
||
192 | push 0x2000 |
||
193 | pop es |
||
2434 | Serge | 194 | rep movsw |
465 | serge | 195 | push 0x9000 |
681 | diamond | 196 | pop ds |
197 | push 0x3000 |
||
198 | pop es |
||
199 | mov cx, 0xE000/2 |
||
2434 | Serge | 200 | rep movsw |
465 | serge | 201 | |
202 | wbinvd ; write and invalidate cache |
||
203 | |||
2434 | Serge | 204 | mov al, 00110100b |
205 | out 43h, al |
||
465 | serge | 206 | jcxz $+2 |
2434 | Serge | 207 | mov al, 0xFF |
208 | out 40h, al |
||
465 | serge | 209 | jcxz $+2 |
2434 | Serge | 210 | out 40h, al |
465 | serge | 211 | jcxz $+2 |
212 | sti |
||
213 | |||
214 | ; (hint by Black_mirror) |
||
215 | ; We must read data from keyboard port, |
||
216 | ; because there may be situation when previous keyboard interrupt is lost |
||
217 | ; (due to return to real mode and IRQ reprogramming) |
||
218 | ; and next interrupt will not be generated (as keyboard waits for handling) |
||
219 | in al, 0x60 |
||
220 | |||
221 | ; bootloader interface |
||
222 | push 0x1000 |
||
2434 | Serge | 223 | pop ds |
224 | mov si, kernel_restart_bootblock |
||
225 | mov ax, 'KL' |
||
465 | serge | 226 | jmp 0x1000:0000 |
2010 | serge | 227 | end if |
465 | serge | 228 |