Linux-2.6.12-rc2
[linux-2.6.git] / arch / i386 / kernel / reboot.c
1 /*
2  *  linux/arch/i386/kernel/reboot.c
3  */
4
5 #include <linux/mm.h>
6 #include <linux/module.h>
7 #include <linux/delay.h>
8 #include <linux/init.h>
9 #include <linux/interrupt.h>
10 #include <linux/mc146818rtc.h>
11 #include <linux/efi.h>
12 #include <linux/dmi.h>
13 #include <asm/uaccess.h>
14 #include <asm/apic.h>
15 #include "mach_reboot.h"
16
17 /*
18  * Power off function, if any
19  */
20 void (*pm_power_off)(void);
21
22 static int reboot_mode;
23 static int reboot_thru_bios;
24
25 #ifdef CONFIG_SMP
26 int reboot_smp = 0;
27 static int reboot_cpu = -1;
28 /* shamelessly grabbed from lib/vsprintf.c for readability */
29 #define is_digit(c)     ((c) >= '0' && (c) <= '9')
30 #endif
31 static int __init reboot_setup(char *str)
32 {
33         while(1) {
34                 switch (*str) {
35                 case 'w': /* "warm" reboot (no memory testing etc) */
36                         reboot_mode = 0x1234;
37                         break;
38                 case 'c': /* "cold" reboot (with memory testing etc) */
39                         reboot_mode = 0x0;
40                         break;
41                 case 'b': /* "bios" reboot by jumping through the BIOS */
42                         reboot_thru_bios = 1;
43                         break;
44                 case 'h': /* "hard" reboot by toggling RESET and/or crashing the CPU */
45                         reboot_thru_bios = 0;
46                         break;
47 #ifdef CONFIG_SMP
48                 case 's': /* "smp" reboot by executing reset on BSP or other CPU*/
49                         reboot_smp = 1;
50                         if (is_digit(*(str+1))) {
51                                 reboot_cpu = (int) (*(str+1) - '0');
52                                 if (is_digit(*(str+2))) 
53                                         reboot_cpu = reboot_cpu*10 + (int)(*(str+2) - '0');
54                         }
55                                 /* we will leave sorting out the final value 
56                                 when we are ready to reboot, since we might not
57                                 have set up boot_cpu_id or smp_num_cpu */
58                         break;
59 #endif
60                 }
61                 if((str = strchr(str,',')) != NULL)
62                         str++;
63                 else
64                         break;
65         }
66         return 1;
67 }
68
69 __setup("reboot=", reboot_setup);
70
71 /*
72  * Reboot options and system auto-detection code provided by
73  * Dell Inc. so their systems "just work". :-)
74  */
75
76 /*
77  * Some machines require the "reboot=b"  commandline option, this quirk makes that automatic.
78  */
79 static int __init set_bios_reboot(struct dmi_system_id *d)
80 {
81         if (!reboot_thru_bios) {
82                 reboot_thru_bios = 1;
83                 printk(KERN_INFO "%s series board detected. Selecting BIOS-method for reboots.\n", d->ident);
84         }
85         return 0;
86 }
87
88 /*
89  * Some machines require the "reboot=s"  commandline option, this quirk makes that automatic.
90  */
91 static int __init set_smp_reboot(struct dmi_system_id *d)
92 {
93 #ifdef CONFIG_SMP
94         if (!reboot_smp) {
95                 reboot_smp = 1;
96                 printk(KERN_INFO "%s series board detected. Selecting SMP-method for reboots.\n", d->ident);
97         }
98 #endif
99         return 0;
100 }
101
102 /*
103  * Some machines require the "reboot=b,s"  commandline option, this quirk makes that automatic.
104  */
105 static int __init set_smp_bios_reboot(struct dmi_system_id *d)
106 {
107         set_smp_reboot(d);
108         set_bios_reboot(d);
109         return 0;
110 }
111
112 static struct dmi_system_id __initdata reboot_dmi_table[] = {
113         {       /* Handle problems with rebooting on Dell 1300's */
114                 .callback = set_smp_bios_reboot,
115                 .ident = "Dell PowerEdge 1300",
116                 .matches = {
117                         DMI_MATCH(DMI_SYS_VENDOR, "Dell Computer Corporation"),
118                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 1300/"),
119                 },
120         },
121         {       /* Handle problems with rebooting on Dell 300's */
122                 .callback = set_bios_reboot,
123                 .ident = "Dell PowerEdge 300",
124                 .matches = {
125                         DMI_MATCH(DMI_SYS_VENDOR, "Dell Computer Corporation"),
126                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 300/"),
127                 },
128         },
129         {       /* Handle problems with rebooting on Dell 2400's */
130                 .callback = set_bios_reboot,
131                 .ident = "Dell PowerEdge 2400",
132                 .matches = {
133                         DMI_MATCH(DMI_SYS_VENDOR, "Dell Computer Corporation"),
134                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 2400"),
135                 },
136         },
137         { }
138 };
139
140 static int __init reboot_init(void)
141 {
142         dmi_check_system(reboot_dmi_table);
143         return 0;
144 }
145
146 core_initcall(reboot_init);
147
148 /* The following code and data reboots the machine by switching to real
149    mode and jumping to the BIOS reset entry point, as if the CPU has
150    really been reset.  The previous version asked the keyboard
151    controller to pulse the CPU reset line, which is more thorough, but
152    doesn't work with at least one type of 486 motherboard.  It is easy
153    to stop this code working; hence the copious comments. */
154
155 static unsigned long long
156 real_mode_gdt_entries [3] =
157 {
158         0x0000000000000000ULL,  /* Null descriptor */
159         0x00009a000000ffffULL,  /* 16-bit real-mode 64k code at 0x00000000 */
160         0x000092000100ffffULL   /* 16-bit real-mode 64k data at 0x00000100 */
161 };
162
163 static struct
164 {
165         unsigned short       size __attribute__ ((packed));
166         unsigned long long * base __attribute__ ((packed));
167 }
168 real_mode_gdt = { sizeof (real_mode_gdt_entries) - 1, real_mode_gdt_entries },
169 real_mode_idt = { 0x3ff, NULL },
170 no_idt = { 0, NULL };
171
172
173 /* This is 16-bit protected mode code to disable paging and the cache,
174    switch to real mode and jump to the BIOS reset code.
175
176    The instruction that switches to real mode by writing to CR0 must be
177    followed immediately by a far jump instruction, which set CS to a
178    valid value for real mode, and flushes the prefetch queue to avoid
179    running instructions that have already been decoded in protected
180    mode.
181
182    Clears all the flags except ET, especially PG (paging), PE
183    (protected-mode enable) and TS (task switch for coprocessor state
184    save).  Flushes the TLB after paging has been disabled.  Sets CD and
185    NW, to disable the cache on a 486, and invalidates the cache.  This
186    is more like the state of a 486 after reset.  I don't know if
187    something else should be done for other chips.
188
189    More could be done here to set up the registers as if a CPU reset had
190    occurred; hopefully real BIOSs don't assume much. */
191
192 static unsigned char real_mode_switch [] =
193 {
194         0x66, 0x0f, 0x20, 0xc0,                 /*    movl  %cr0,%eax        */
195         0x66, 0x83, 0xe0, 0x11,                 /*    andl  $0x00000011,%eax */
196         0x66, 0x0d, 0x00, 0x00, 0x00, 0x60,     /*    orl   $0x60000000,%eax */
197         0x66, 0x0f, 0x22, 0xc0,                 /*    movl  %eax,%cr0        */
198         0x66, 0x0f, 0x22, 0xd8,                 /*    movl  %eax,%cr3        */
199         0x66, 0x0f, 0x20, 0xc3,                 /*    movl  %cr0,%ebx        */
200         0x66, 0x81, 0xe3, 0x00, 0x00, 0x00, 0x60,       /*    andl  $0x60000000,%ebx */
201         0x74, 0x02,                             /*    jz    f                */
202         0x0f, 0x09,                             /*    wbinvd                 */
203         0x24, 0x10,                             /* f: andb  $0x10,al         */
204         0x66, 0x0f, 0x22, 0xc0                  /*    movl  %eax,%cr0        */
205 };
206 static unsigned char jump_to_bios [] =
207 {
208         0xea, 0x00, 0x00, 0xff, 0xff            /*    ljmp  $0xffff,$0x0000  */
209 };
210
211 /*
212  * Switch to real mode and then execute the code
213  * specified by the code and length parameters.
214  * We assume that length will aways be less that 100!
215  */
216 void machine_real_restart(unsigned char *code, int length)
217 {
218         unsigned long flags;
219
220         local_irq_disable();
221
222         /* Write zero to CMOS register number 0x0f, which the BIOS POST
223            routine will recognize as telling it to do a proper reboot.  (Well
224            that's what this book in front of me says -- it may only apply to
225            the Phoenix BIOS though, it's not clear).  At the same time,
226            disable NMIs by setting the top bit in the CMOS address register,
227            as we're about to do peculiar things to the CPU.  I'm not sure if
228            `outb_p' is needed instead of just `outb'.  Use it to be on the
229            safe side.  (Yes, CMOS_WRITE does outb_p's. -  Paul G.)
230          */
231
232         spin_lock_irqsave(&rtc_lock, flags);
233         CMOS_WRITE(0x00, 0x8f);
234         spin_unlock_irqrestore(&rtc_lock, flags);
235
236         /* Remap the kernel at virtual address zero, as well as offset zero
237            from the kernel segment.  This assumes the kernel segment starts at
238            virtual address PAGE_OFFSET. */
239
240         memcpy (swapper_pg_dir, swapper_pg_dir + USER_PGD_PTRS,
241                 sizeof (swapper_pg_dir [0]) * KERNEL_PGD_PTRS);
242
243         /*
244          * Use `swapper_pg_dir' as our page directory.
245          */
246         load_cr3(swapper_pg_dir);
247
248         /* Write 0x1234 to absolute memory location 0x472.  The BIOS reads
249            this on booting to tell it to "Bypass memory test (also warm
250            boot)".  This seems like a fairly standard thing that gets set by
251            REBOOT.COM programs, and the previous reset routine did this
252            too. */
253
254         *((unsigned short *)0x472) = reboot_mode;
255
256         /* For the switch to real mode, copy some code to low memory.  It has
257            to be in the first 64k because it is running in 16-bit mode, and it
258            has to have the same physical and virtual address, because it turns
259            off paging.  Copy it near the end of the first page, out of the way
260            of BIOS variables. */
261
262         memcpy ((void *) (0x1000 - sizeof (real_mode_switch) - 100),
263                 real_mode_switch, sizeof (real_mode_switch));
264         memcpy ((void *) (0x1000 - 100), code, length);
265
266         /* Set up the IDT for real mode. */
267
268         __asm__ __volatile__ ("lidt %0" : : "m" (real_mode_idt));
269
270         /* Set up a GDT from which we can load segment descriptors for real
271            mode.  The GDT is not used in real mode; it is just needed here to
272            prepare the descriptors. */
273
274         __asm__ __volatile__ ("lgdt %0" : : "m" (real_mode_gdt));
275
276         /* Load the data segment registers, and thus the descriptors ready for
277            real mode.  The base address of each segment is 0x100, 16 times the
278            selector value being loaded here.  This is so that the segment
279            registers don't have to be reloaded after switching to real mode:
280            the values are consistent for real mode operation already. */
281
282         __asm__ __volatile__ ("movl $0x0010,%%eax\n"
283                                 "\tmovl %%eax,%%ds\n"
284                                 "\tmovl %%eax,%%es\n"
285                                 "\tmovl %%eax,%%fs\n"
286                                 "\tmovl %%eax,%%gs\n"
287                                 "\tmovl %%eax,%%ss" : : : "eax");
288
289         /* Jump to the 16-bit code that we copied earlier.  It disables paging
290            and the cache, switches to real mode, and jumps to the BIOS reset
291            entry point. */
292
293         __asm__ __volatile__ ("ljmp $0x0008,%0"
294                                 :
295                                 : "i" ((void *) (0x1000 - sizeof (real_mode_switch) - 100)));
296 }
297
298 void machine_restart(char * __unused)
299 {
300 #ifdef CONFIG_SMP
301         int cpuid;
302         
303         cpuid = GET_APIC_ID(apic_read(APIC_ID));
304
305         if (reboot_smp) {
306
307                 /* check to see if reboot_cpu is valid 
308                    if its not, default to the BSP */
309                 if ((reboot_cpu == -1) ||  
310                       (reboot_cpu > (NR_CPUS -1))  || 
311                       !physid_isset(cpuid, phys_cpu_present_map))
312                         reboot_cpu = boot_cpu_physical_apicid;
313
314                 reboot_smp = 0;  /* use this as a flag to only go through this once*/
315                 /* re-run this function on the other CPUs
316                    it will fall though this section since we have 
317                    cleared reboot_smp, and do the reboot if it is the
318                    correct CPU, otherwise it halts. */
319                 if (reboot_cpu != cpuid)
320                         smp_call_function((void *)machine_restart , NULL, 1, 0);
321         }
322
323         /* if reboot_cpu is still -1, then we want a tradional reboot, 
324            and if we are not running on the reboot_cpu,, halt */
325         if ((reboot_cpu != -1) && (cpuid != reboot_cpu)) {
326                 for (;;)
327                 __asm__ __volatile__ ("hlt");
328         }
329         /*
330          * Stop all CPUs and turn off local APICs and the IO-APIC, so
331          * other OSs see a clean IRQ state.
332          */
333         smp_send_stop();
334 #endif /* CONFIG_SMP */
335
336         lapic_shutdown();
337
338 #ifdef CONFIG_X86_IO_APIC
339         disable_IO_APIC();
340 #endif
341
342         if (!reboot_thru_bios) {
343                 if (efi_enabled) {
344                         efi.reset_system(EFI_RESET_COLD, EFI_SUCCESS, 0, NULL);
345                         __asm__ __volatile__("lidt %0": :"m" (no_idt));
346                         __asm__ __volatile__("int3");
347                 }
348                 /* rebooting needs to touch the page at absolute addr 0 */
349                 *((unsigned short *)__va(0x472)) = reboot_mode;
350                 for (;;) {
351                         mach_reboot();
352                         /* That didn't work - force a triple fault.. */
353                         __asm__ __volatile__("lidt %0": :"m" (no_idt));
354                         __asm__ __volatile__("int3");
355                 }
356         }
357         if (efi_enabled)
358                 efi.reset_system(EFI_RESET_WARM, EFI_SUCCESS, 0, NULL);
359
360         machine_real_restart(jump_to_bios, sizeof(jump_to_bios));
361 }
362
363 EXPORT_SYMBOL(machine_restart);
364
365 void machine_halt(void)
366 {
367 }
368
369 EXPORT_SYMBOL(machine_halt);
370
371 void machine_power_off(void)
372 {
373         lapic_shutdown();
374
375         if (efi_enabled)
376                 efi.reset_system(EFI_RESET_SHUTDOWN, EFI_SUCCESS, 0, NULL);
377         if (pm_power_off)
378                 pm_power_off();
379 }
380
381 EXPORT_SYMBOL(machine_power_off);
382