[PATCH] x86_64: Clean up double fault handling
[linux-2.6] / arch / x86_64 / kernel / traps.c
1 /*
2  *  linux/arch/x86-64/traps.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  *  Copyright (C) 2000, 2001, 2002 Andi Kleen, SuSE Labs
6  *
7  *  Pentium III FXSR, SSE support
8  *      Gareth Hughes <gareth@valinux.com>, May 2000
9  *
10  *  $Id: traps.c,v 1.36 2002/03/24 11:09:10 ak Exp $
11  */
12
13 /*
14  * 'Traps.c' handles hardware traps and faults after we have saved some
15  * state in 'entry.S'.
16  */
17 #include <linux/config.h>
18 #include <linux/sched.h>
19 #include <linux/kernel.h>
20 #include <linux/string.h>
21 #include <linux/errno.h>
22 #include <linux/ptrace.h>
23 #include <linux/timer.h>
24 #include <linux/mm.h>
25 #include <linux/init.h>
26 #include <linux/delay.h>
27 #include <linux/spinlock.h>
28 #include <linux/interrupt.h>
29 #include <linux/module.h>
30 #include <linux/moduleparam.h>
31 #include <linux/nmi.h>
32 #include <linux/kprobes.h>
33
34 #include <asm/system.h>
35 #include <asm/uaccess.h>
36 #include <asm/io.h>
37 #include <asm/atomic.h>
38 #include <asm/debugreg.h>
39 #include <asm/desc.h>
40 #include <asm/i387.h>
41 #include <asm/kdebug.h>
42 #include <asm/processor.h>
43
44 #include <asm/smp.h>
45 #include <asm/pgalloc.h>
46 #include <asm/pda.h>
47 #include <asm/proto.h>
48 #include <asm/nmi.h>
49
50 extern struct gate_struct idt_table[256]; 
51
52 asmlinkage void divide_error(void);
53 asmlinkage void debug(void);
54 asmlinkage void nmi(void);
55 asmlinkage void int3(void);
56 asmlinkage void overflow(void);
57 asmlinkage void bounds(void);
58 asmlinkage void invalid_op(void);
59 asmlinkage void device_not_available(void);
60 asmlinkage void double_fault(void);
61 asmlinkage void coprocessor_segment_overrun(void);
62 asmlinkage void invalid_TSS(void);
63 asmlinkage void segment_not_present(void);
64 asmlinkage void stack_segment(void);
65 asmlinkage void general_protection(void);
66 asmlinkage void page_fault(void);
67 asmlinkage void coprocessor_error(void);
68 asmlinkage void simd_coprocessor_error(void);
69 asmlinkage void reserved(void);
70 asmlinkage void alignment_check(void);
71 asmlinkage void machine_check(void);
72 asmlinkage void spurious_interrupt_bug(void);
73 asmlinkage void call_debug(void);
74
75 struct notifier_block *die_chain;
76 static DEFINE_SPINLOCK(die_notifier_lock);
77
78 int register_die_notifier(struct notifier_block *nb)
79 {
80         int err = 0;
81         unsigned long flags;
82         spin_lock_irqsave(&die_notifier_lock, flags);
83         err = notifier_chain_register(&die_chain, nb);
84         spin_unlock_irqrestore(&die_notifier_lock, flags);
85         return err;
86 }
87
88 static inline void conditional_sti(struct pt_regs *regs)
89 {
90         if (regs->eflags & X86_EFLAGS_IF)
91                 local_irq_enable();
92 }
93
94 static int kstack_depth_to_print = 10;
95
96 #ifdef CONFIG_KALLSYMS
97 #include <linux/kallsyms.h> 
98 int printk_address(unsigned long address)
99
100         unsigned long offset = 0, symsize;
101         const char *symname;
102         char *modname;
103         char *delim = ":"; 
104         char namebuf[128];
105
106         symname = kallsyms_lookup(address, &symsize, &offset, &modname, namebuf); 
107         if (!symname) 
108                 return printk("[<%016lx>]", address);
109         if (!modname) 
110                 modname = delim = "";           
111         return printk("<%016lx>{%s%s%s%s%+ld}",
112                       address,delim,modname,delim,symname,offset); 
113
114 #else
115 int printk_address(unsigned long address)
116
117         return printk("[<%016lx>]", address);
118
119 #endif
120
121 static unsigned long *in_exception_stack(unsigned cpu, unsigned long stack,
122                                         unsigned *usedp, const char **idp)
123 {
124         static const char ids[N_EXCEPTION_STACKS][8] = {
125                 [DEBUG_STACK - 1] = "#DB",
126                 [NMI_STACK - 1] = "NMI",
127                 [DOUBLEFAULT_STACK - 1] = "#DF",
128                 [STACKFAULT_STACK - 1] = "#SS",
129                 [MCE_STACK - 1] = "#MC",
130         };
131         unsigned k;
132
133         for (k = 0; k < N_EXCEPTION_STACKS; k++) {
134                 unsigned long end;
135
136                 end = per_cpu(init_tss, cpu).ist[k];
137                 if (stack >= end)
138                         continue;
139                 if (stack >= end - EXCEPTION_STKSZ) {
140                         if (*usedp & (1U << k))
141                                 break;
142                         *usedp |= 1U << k;
143                         *idp = ids[k];
144                         return (unsigned long *)end;
145                 }
146         }
147         return NULL;
148 }
149
150 /*
151  * x86-64 can have upto three kernel stacks: 
152  * process stack
153  * interrupt stack
154  * severe exception (double fault, nmi, stack fault, debug, mce) hardware stack
155  */
156
157 void show_trace(unsigned long *stack)
158 {
159         unsigned long addr;
160         const unsigned cpu = safe_smp_processor_id();
161         unsigned long *irqstack_end = (unsigned long *)cpu_pda[cpu].irqstackptr;
162         int i;
163         unsigned used = 0;
164
165         printk("\nCall Trace:");
166
167 #define HANDLE_STACK(cond) \
168         do while (cond) { \
169                 addr = *stack++; \
170                 if (kernel_text_address(addr)) { \
171                         /* \
172                          * If the address is either in the text segment of the \
173                          * kernel, or in the region which contains vmalloc'ed \
174                          * memory, it *may* be the address of a calling \
175                          * routine; if so, print it so that someone tracing \
176                          * down the cause of the crash will be able to figure \
177                          * out the call path that was taken. \
178                          */ \
179                         i += printk_address(addr); \
180                         if (i > 50) { \
181                                 printk("\n       "); \
182                                 i = 0; \
183                         } \
184                         else \
185                                 i += printk(" "); \
186                 } \
187         } while (0)
188
189         for(i = 0; ; ) {
190                 const char *id;
191                 unsigned long *estack_end;
192                 estack_end = in_exception_stack(cpu, (unsigned long)stack,
193                                                 &used, &id);
194
195                 if (estack_end) {
196                         i += printk(" <%s> ", id);
197                         HANDLE_STACK (stack < estack_end);
198                         i += printk(" <EOE> ");
199                         stack = (unsigned long *) estack_end[-2];
200                         continue;
201                 }
202                 if (irqstack_end) {
203                         unsigned long *irqstack;
204                         irqstack = irqstack_end -
205                                 (IRQSTACKSIZE - 64) / sizeof(*irqstack);
206
207                         if (stack >= irqstack && stack < irqstack_end) {
208                                 i += printk(" <IRQ> ");
209                                 HANDLE_STACK (stack < irqstack_end);
210                                 stack = (unsigned long *) (irqstack_end[-1]);
211                                 irqstack_end = NULL;
212                                 i += printk(" <EOI> ");
213                                 continue;
214                         }
215                 }
216                 break;
217         }
218
219         HANDLE_STACK (((long) stack & (THREAD_SIZE-1)) != 0);
220 #undef HANDLE_STACK
221         printk("\n");
222 }
223
224 void show_stack(struct task_struct *tsk, unsigned long * rsp)
225 {
226         unsigned long *stack;
227         int i;
228         const int cpu = safe_smp_processor_id();
229         unsigned long *irqstack_end = (unsigned long *) (cpu_pda[cpu].irqstackptr);
230         unsigned long *irqstack = (unsigned long *) (cpu_pda[cpu].irqstackptr - IRQSTACKSIZE);    
231
232         // debugging aid: "show_stack(NULL, NULL);" prints the
233         // back trace for this cpu.
234
235         if (rsp == NULL) {
236                 if (tsk)
237                         rsp = (unsigned long *)tsk->thread.rsp;
238                 else
239                         rsp = (unsigned long *)&rsp;
240         }
241
242         stack = rsp;
243         for(i=0; i < kstack_depth_to_print; i++) {
244                 if (stack >= irqstack && stack <= irqstack_end) {
245                         if (stack == irqstack_end) {
246                                 stack = (unsigned long *) (irqstack_end[-1]);
247                                 printk(" <EOI> ");
248                         }
249                 } else {
250                 if (((long) stack & (THREAD_SIZE-1)) == 0)
251                         break;
252                 }
253                 if (i && ((i % 4) == 0))
254                         printk("\n       ");
255                 printk("%016lx ", *stack++);
256                 touch_nmi_watchdog();
257         }
258         show_trace((unsigned long *)rsp);
259 }
260
261 /*
262  * The architecture-independent dump_stack generator
263  */
264 void dump_stack(void)
265 {
266         unsigned long dummy;
267         show_trace(&dummy);
268 }
269
270 EXPORT_SYMBOL(dump_stack);
271
272 void show_registers(struct pt_regs *regs)
273 {
274         int i;
275         int in_kernel = !user_mode(regs);
276         unsigned long rsp;
277         const int cpu = safe_smp_processor_id(); 
278         struct task_struct *cur = cpu_pda[cpu].pcurrent; 
279
280                 rsp = regs->rsp;
281
282         printk("CPU %d ", cpu);
283         __show_regs(regs);
284         printk("Process %s (pid: %d, threadinfo %p, task %p)\n",
285                 cur->comm, cur->pid, cur->thread_info, cur);
286
287         /*
288          * When in-kernel, we also print out the stack and code at the
289          * time of the fault..
290          */
291         if (in_kernel) {
292
293                 printk("Stack: ");
294                 show_stack(NULL, (unsigned long*)rsp);
295
296                 printk("\nCode: ");
297                 if(regs->rip < PAGE_OFFSET)
298                         goto bad;
299
300                 for(i=0;i<20;i++)
301                 {
302                         unsigned char c;
303                         if(__get_user(c, &((unsigned char*)regs->rip)[i])) {
304 bad:
305                                 printk(" Bad RIP value.");
306                                 break;
307                         }
308                         printk("%02x ", c);
309                 }
310         }
311         printk("\n");
312 }       
313
314 void handle_BUG(struct pt_regs *regs)
315
316         struct bug_frame f;
317         char tmp;
318
319         if (user_mode(regs))
320                 return; 
321         if (__copy_from_user(&f, (struct bug_frame *) regs->rip, 
322                              sizeof(struct bug_frame)))
323                 return; 
324         if (f.filename >= 0 ||
325             f.ud2[0] != 0x0f || f.ud2[1] != 0x0b) 
326                 return;
327         if (__get_user(tmp, (char *)(long)f.filename))
328                 f.filename = (int)(long)"unmapped filename";
329         printk("----------- [cut here ] --------- [please bite here ] ---------\n");
330         printk(KERN_ALERT "Kernel BUG at %.50s:%d\n", (char *)(long)f.filename, f.line);
331
332
333 #ifdef CONFIG_BUG
334 void out_of_line_bug(void)
335
336         BUG(); 
337
338 #endif
339
340 static DEFINE_SPINLOCK(die_lock);
341 static int die_owner = -1;
342
343 unsigned long oops_begin(void)
344 {
345         int cpu = safe_smp_processor_id();
346         unsigned long flags;
347
348         /* racy, but better than risking deadlock. */
349         local_irq_save(flags);
350         if (!spin_trylock(&die_lock)) { 
351                 if (cpu == die_owner) 
352                         /* nested oops. should stop eventually */;
353                 else
354                         spin_lock(&die_lock);
355         }
356         die_owner = cpu;
357         console_verbose();
358         bust_spinlocks(1);
359         return flags;
360 }
361
362 void oops_end(unsigned long flags)
363
364         die_owner = -1;
365         bust_spinlocks(0);
366         spin_unlock_irqrestore(&die_lock, flags);
367         if (panic_on_oops)
368                 panic("Oops");
369 }
370
371 void __die(const char * str, struct pt_regs * regs, long err)
372 {
373         static int die_counter;
374         printk(KERN_EMERG "%s: %04lx [%u] ", str, err & 0xffff,++die_counter);
375 #ifdef CONFIG_PREEMPT
376         printk("PREEMPT ");
377 #endif
378 #ifdef CONFIG_SMP
379         printk("SMP ");
380 #endif
381 #ifdef CONFIG_DEBUG_PAGEALLOC
382         printk("DEBUG_PAGEALLOC");
383 #endif
384         printk("\n");
385         notify_die(DIE_OOPS, str, regs, err, current->thread.trap_no, SIGSEGV);
386         show_registers(regs);
387         /* Executive summary in case the oops scrolled away */
388         printk(KERN_ALERT "RIP ");
389         printk_address(regs->rip); 
390         printk(" RSP <%016lx>\n", regs->rsp); 
391 }
392
393 void die(const char * str, struct pt_regs * regs, long err)
394 {
395         unsigned long flags = oops_begin();
396
397         handle_BUG(regs);
398         __die(str, regs, err);
399         oops_end(flags);
400         do_exit(SIGSEGV); 
401 }
402
403 void die_nmi(char *str, struct pt_regs *regs)
404 {
405         unsigned long flags = oops_begin();
406
407         /*
408          * We are in trouble anyway, lets at least try
409          * to get a message out.
410          */
411         printk(str, safe_smp_processor_id());
412         show_registers(regs);
413         if (panic_on_timeout || panic_on_oops)
414                 panic("nmi watchdog");
415         printk("console shuts up ...\n");
416         oops_end(flags);
417         do_exit(SIGSEGV);
418 }
419
420 static void __kprobes do_trap(int trapnr, int signr, char *str,
421                               struct pt_regs * regs, long error_code,
422                               siginfo_t *info)
423 {
424         struct task_struct *tsk = current;
425
426         conditional_sti(regs);
427
428         tsk->thread.error_code = error_code;
429         tsk->thread.trap_no = trapnr;
430
431         if (user_mode(regs)) {
432                 if (exception_trace && unhandled_signal(tsk, signr))
433                         printk(KERN_INFO
434                                "%s[%d] trap %s rip:%lx rsp:%lx error:%lx\n",
435                                tsk->comm, tsk->pid, str,
436                                regs->rip,regs->rsp,error_code); 
437
438                 if (info)
439                         force_sig_info(signr, info, tsk);
440                 else
441                         force_sig(signr, tsk);
442                 return;
443         }
444
445
446         /* kernel trap */ 
447         {            
448                 const struct exception_table_entry *fixup;
449                 fixup = search_exception_tables(regs->rip);
450                 if (fixup) {
451                         regs->rip = fixup->fixup;
452                 } else  
453                         die(str, regs, error_code);
454                 return;
455         }
456 }
457
458 #define DO_ERROR(trapnr, signr, str, name) \
459 asmlinkage void do_##name(struct pt_regs * regs, long error_code) \
460 { \
461         if (notify_die(DIE_TRAP, str, regs, error_code, trapnr, signr) \
462                                                         == NOTIFY_STOP) \
463                 return; \
464         do_trap(trapnr, signr, str, regs, error_code, NULL); \
465 }
466
467 #define DO_ERROR_INFO(trapnr, signr, str, name, sicode, siaddr) \
468 asmlinkage void do_##name(struct pt_regs * regs, long error_code) \
469 { \
470         siginfo_t info; \
471         info.si_signo = signr; \
472         info.si_errno = 0; \
473         info.si_code = sicode; \
474         info.si_addr = (void __user *)siaddr; \
475         if (notify_die(DIE_TRAP, str, regs, error_code, trapnr, signr) \
476                                                         == NOTIFY_STOP) \
477                 return; \
478         do_trap(trapnr, signr, str, regs, error_code, &info); \
479 }
480
481 DO_ERROR_INFO( 0, SIGFPE,  "divide error", divide_error, FPE_INTDIV, regs->rip)
482 DO_ERROR( 4, SIGSEGV, "overflow", overflow)
483 DO_ERROR( 5, SIGSEGV, "bounds", bounds)
484 DO_ERROR_INFO( 6, SIGILL,  "invalid operand", invalid_op, ILL_ILLOPN, regs->rip)
485 DO_ERROR( 7, SIGSEGV, "device not available", device_not_available)
486 DO_ERROR( 9, SIGFPE,  "coprocessor segment overrun", coprocessor_segment_overrun)
487 DO_ERROR(10, SIGSEGV, "invalid TSS", invalid_TSS)
488 DO_ERROR(11, SIGBUS,  "segment not present", segment_not_present)
489 DO_ERROR_INFO(17, SIGBUS, "alignment check", alignment_check, BUS_ADRALN, 0)
490 DO_ERROR(18, SIGSEGV, "reserved", reserved)
491 DO_ERROR(12, SIGBUS,  "stack segment", stack_segment)
492
493 asmlinkage void do_double_fault(struct pt_regs * regs, long error_code)
494 {
495         static const char str[] = "double fault";
496         struct task_struct *tsk = current;
497
498         /* Return not checked because double check cannot be ignored */
499         notify_die(DIE_TRAP, str, regs, error_code, 8, SIGSEGV);
500
501         tsk->thread.error_code = error_code;
502         tsk->thread.trap_no = 8;
503
504         /* This is always a kernel trap and never fixable (and thus must
505            never return). */
506         for (;;)
507                 die(str, regs, error_code);
508 }
509
510 asmlinkage void __kprobes do_general_protection(struct pt_regs * regs,
511                                                 long error_code)
512 {
513         struct task_struct *tsk = current;
514
515         conditional_sti(regs);
516
517         tsk->thread.error_code = error_code;
518         tsk->thread.trap_no = 13;
519
520         if (user_mode(regs)) {
521                 if (exception_trace && unhandled_signal(tsk, SIGSEGV))
522                         printk(KERN_INFO
523                        "%s[%d] general protection rip:%lx rsp:%lx error:%lx\n",
524                                tsk->comm, tsk->pid,
525                                regs->rip,regs->rsp,error_code); 
526
527                 force_sig(SIGSEGV, tsk);
528                 return;
529         } 
530
531         /* kernel gp */
532         {
533                 const struct exception_table_entry *fixup;
534                 fixup = search_exception_tables(regs->rip);
535                 if (fixup) {
536                         regs->rip = fixup->fixup;
537                         return;
538                 }
539                 if (notify_die(DIE_GPF, "general protection fault", regs,
540                                         error_code, 13, SIGSEGV) == NOTIFY_STOP)
541                         return;
542                 die("general protection fault", regs, error_code);
543         }
544 }
545
546 static void mem_parity_error(unsigned char reason, struct pt_regs * regs)
547 {
548         printk("Uhhuh. NMI received. Dazed and confused, but trying to continue\n");
549         printk("You probably have a hardware problem with your RAM chips\n");
550
551         /* Clear and disable the memory parity error line. */
552         reason = (reason & 0xf) | 4;
553         outb(reason, 0x61);
554 }
555
556 static void io_check_error(unsigned char reason, struct pt_regs * regs)
557 {
558         printk("NMI: IOCK error (debug interrupt?)\n");
559         show_registers(regs);
560
561         /* Re-enable the IOCK line, wait for a few seconds */
562         reason = (reason & 0xf) | 8;
563         outb(reason, 0x61);
564         mdelay(2000);
565         reason &= ~8;
566         outb(reason, 0x61);
567 }
568
569 static void unknown_nmi_error(unsigned char reason, struct pt_regs * regs)
570 {       printk("Uhhuh. NMI received for unknown reason %02x.\n", reason);
571         printk("Dazed and confused, but trying to continue\n");
572         printk("Do you have a strange power saving mode enabled?\n");
573 }
574
575 /* Runs on IST stack. This code must keep interrupts off all the time.
576    Nested NMIs are prevented by the CPU. */
577 asmlinkage void default_do_nmi(struct pt_regs *regs)
578 {
579         unsigned char reason = 0;
580         int cpu;
581
582         cpu = smp_processor_id();
583
584         /* Only the BSP gets external NMIs from the system.  */
585         if (!cpu)
586                 reason = get_nmi_reason();
587
588         if (!(reason & 0xc0)) {
589                 if (notify_die(DIE_NMI_IPI, "nmi_ipi", regs, reason, 2, SIGINT)
590                                                                 == NOTIFY_STOP)
591                         return;
592 #ifdef CONFIG_X86_LOCAL_APIC
593                 /*
594                  * Ok, so this is none of the documented NMI sources,
595                  * so it must be the NMI watchdog.
596                  */
597                 if (nmi_watchdog > 0) {
598                         nmi_watchdog_tick(regs,reason);
599                         return;
600                 }
601 #endif
602                 unknown_nmi_error(reason, regs);
603                 return;
604         }
605         if (notify_die(DIE_NMI, "nmi", regs, reason, 2, SIGINT) == NOTIFY_STOP)
606                 return; 
607
608         /* AK: following checks seem to be broken on modern chipsets. FIXME */
609
610         if (reason & 0x80)
611                 mem_parity_error(reason, regs);
612         if (reason & 0x40)
613                 io_check_error(reason, regs);
614 }
615
616 asmlinkage void __kprobes do_int3(struct pt_regs * regs, long error_code)
617 {
618         if (notify_die(DIE_INT3, "int3", regs, error_code, 3, SIGTRAP) == NOTIFY_STOP) {
619                 return;
620         }
621         do_trap(3, SIGTRAP, "int3", regs, error_code, NULL);
622         return;
623 }
624
625 /* Help handler running on IST stack to switch back to user stack
626    for scheduling or signal handling. The actual stack switch is done in
627    entry.S */
628 asmlinkage struct pt_regs *sync_regs(struct pt_regs *eregs)
629 {
630         struct pt_regs *regs = eregs;
631         /* Did already sync */
632         if (eregs == (struct pt_regs *)eregs->rsp)
633                 ;
634         /* Exception from user space */
635         else if (user_mode(eregs))
636                 regs = ((struct pt_regs *)current->thread.rsp0) - 1;
637         /* Exception from kernel and interrupts are enabled. Move to
638            kernel process stack. */
639         else if (eregs->eflags & X86_EFLAGS_IF)
640                 regs = (struct pt_regs *)(eregs->rsp -= sizeof(struct pt_regs));
641         if (eregs != regs)
642                 *regs = *eregs;
643         return regs;
644 }
645
646 /* runs on IST stack. */
647 asmlinkage void __kprobes do_debug(struct pt_regs * regs,
648                                    unsigned long error_code)
649 {
650         unsigned long condition;
651         struct task_struct *tsk = current;
652         siginfo_t info;
653
654         get_debugreg(condition, 6);
655
656         if (notify_die(DIE_DEBUG, "debug", regs, condition, error_code,
657                                                 SIGTRAP) == NOTIFY_STOP)
658                 return;
659
660         conditional_sti(regs);
661
662         /* Mask out spurious debug traps due to lazy DR7 setting */
663         if (condition & (DR_TRAP0|DR_TRAP1|DR_TRAP2|DR_TRAP3)) {
664                 if (!tsk->thread.debugreg7) { 
665                         goto clear_dr7;
666                 }
667         }
668
669         tsk->thread.debugreg6 = condition;
670
671         /* Mask out spurious TF errors due to lazy TF clearing */
672         if (condition & DR_STEP) {
673                 /*
674                  * The TF error should be masked out only if the current
675                  * process is not traced and if the TRAP flag has been set
676                  * previously by a tracing process (condition detected by
677                  * the PT_DTRACE flag); remember that the i386 TRAP flag
678                  * can be modified by the process itself in user mode,
679                  * allowing programs to debug themselves without the ptrace()
680                  * interface.
681                  */
682                 if (!user_mode(regs))
683                        goto clear_TF_reenable;
684                 /*
685                  * Was the TF flag set by a debugger? If so, clear it now,
686                  * so that register information is correct.
687                  */
688                 if (tsk->ptrace & PT_DTRACE) {
689                         regs->eflags &= ~TF_MASK;
690                         tsk->ptrace &= ~PT_DTRACE;
691                 }
692         }
693
694         /* Ok, finally something we can handle */
695         tsk->thread.trap_no = 1;
696         tsk->thread.error_code = error_code;
697         info.si_signo = SIGTRAP;
698         info.si_errno = 0;
699         info.si_code = TRAP_BRKPT;
700         if (!user_mode(regs))
701                 goto clear_dr7; 
702
703         info.si_addr = (void __user *)regs->rip;
704         force_sig_info(SIGTRAP, &info, tsk);    
705 clear_dr7:
706         set_debugreg(0UL, 7);
707         return;
708
709 clear_TF_reenable:
710         set_tsk_thread_flag(tsk, TIF_SINGLESTEP);
711         regs->eflags &= ~TF_MASK;
712 }
713
714 static int kernel_math_error(struct pt_regs *regs, const char *str, int trapnr)
715 {
716         const struct exception_table_entry *fixup;
717         fixup = search_exception_tables(regs->rip);
718         if (fixup) {
719                 regs->rip = fixup->fixup;
720                 return 1;
721         }
722         notify_die(DIE_GPF, str, regs, 0, trapnr, SIGFPE);
723         /* Illegal floating point operation in the kernel */
724         current->thread.trap_no = trapnr;
725         die(str, regs, 0);
726         return 0;
727 }
728
729 /*
730  * Note that we play around with the 'TS' bit in an attempt to get
731  * the correct behaviour even in the presence of the asynchronous
732  * IRQ13 behaviour
733  */
734 asmlinkage void do_coprocessor_error(struct pt_regs *regs)
735 {
736         void __user *rip = (void __user *)(regs->rip);
737         struct task_struct * task;
738         siginfo_t info;
739         unsigned short cwd, swd;
740
741         conditional_sti(regs);
742         if (!user_mode(regs) &&
743             kernel_math_error(regs, "kernel x87 math error", 16))
744                 return;
745
746         /*
747          * Save the info for the exception handler and clear the error.
748          */
749         task = current;
750         save_init_fpu(task);
751         task->thread.trap_no = 16;
752         task->thread.error_code = 0;
753         info.si_signo = SIGFPE;
754         info.si_errno = 0;
755         info.si_code = __SI_FAULT;
756         info.si_addr = rip;
757         /*
758          * (~cwd & swd) will mask out exceptions that are not set to unmasked
759          * status.  0x3f is the exception bits in these regs, 0x200 is the
760          * C1 reg you need in case of a stack fault, 0x040 is the stack
761          * fault bit.  We should only be taking one exception at a time,
762          * so if this combination doesn't produce any single exception,
763          * then we have a bad program that isn't synchronizing its FPU usage
764          * and it will suffer the consequences since we won't be able to
765          * fully reproduce the context of the exception
766          */
767         cwd = get_fpu_cwd(task);
768         swd = get_fpu_swd(task);
769         switch (swd & ~cwd & 0x3f) {
770                 case 0x000:
771                 default:
772                         break;
773                 case 0x001: /* Invalid Op */
774                         /*
775                          * swd & 0x240 == 0x040: Stack Underflow
776                          * swd & 0x240 == 0x240: Stack Overflow
777                          * User must clear the SF bit (0x40) if set
778                          */
779                         info.si_code = FPE_FLTINV;
780                         break;
781                 case 0x002: /* Denormalize */
782                 case 0x010: /* Underflow */
783                         info.si_code = FPE_FLTUND;
784                         break;
785                 case 0x004: /* Zero Divide */
786                         info.si_code = FPE_FLTDIV;
787                         break;
788                 case 0x008: /* Overflow */
789                         info.si_code = FPE_FLTOVF;
790                         break;
791                 case 0x020: /* Precision */
792                         info.si_code = FPE_FLTRES;
793                         break;
794         }
795         force_sig_info(SIGFPE, &info, task);
796 }
797
798 asmlinkage void bad_intr(void)
799 {
800         printk("bad interrupt"); 
801 }
802
803 asmlinkage void do_simd_coprocessor_error(struct pt_regs *regs)
804 {
805         void __user *rip = (void __user *)(regs->rip);
806         struct task_struct * task;
807         siginfo_t info;
808         unsigned short mxcsr;
809
810         conditional_sti(regs);
811         if (!user_mode(regs) &&
812                 kernel_math_error(regs, "kernel simd math error", 19))
813                 return;
814
815         /*
816          * Save the info for the exception handler and clear the error.
817          */
818         task = current;
819         save_init_fpu(task);
820         task->thread.trap_no = 19;
821         task->thread.error_code = 0;
822         info.si_signo = SIGFPE;
823         info.si_errno = 0;
824         info.si_code = __SI_FAULT;
825         info.si_addr = rip;
826         /*
827          * The SIMD FPU exceptions are handled a little differently, as there
828          * is only a single status/control register.  Thus, to determine which
829          * unmasked exception was caught we must mask the exception mask bits
830          * at 0x1f80, and then use these to mask the exception bits at 0x3f.
831          */
832         mxcsr = get_fpu_mxcsr(task);
833         switch (~((mxcsr & 0x1f80) >> 7) & (mxcsr & 0x3f)) {
834                 case 0x000:
835                 default:
836                         break;
837                 case 0x001: /* Invalid Op */
838                         info.si_code = FPE_FLTINV;
839                         break;
840                 case 0x002: /* Denormalize */
841                 case 0x010: /* Underflow */
842                         info.si_code = FPE_FLTUND;
843                         break;
844                 case 0x004: /* Zero Divide */
845                         info.si_code = FPE_FLTDIV;
846                         break;
847                 case 0x008: /* Overflow */
848                         info.si_code = FPE_FLTOVF;
849                         break;
850                 case 0x020: /* Precision */
851                         info.si_code = FPE_FLTRES;
852                         break;
853         }
854         force_sig_info(SIGFPE, &info, task);
855 }
856
857 asmlinkage void do_spurious_interrupt_bug(struct pt_regs * regs)
858 {
859 }
860
861 asmlinkage void __attribute__((weak)) smp_thermal_interrupt(void)
862 {
863 }
864
865 asmlinkage void __attribute__((weak)) mce_threshold_interrupt(void)
866 {
867 }
868
869 /*
870  *  'math_state_restore()' saves the current math information in the
871  * old math state array, and gets the new ones from the current task
872  *
873  * Careful.. There are problems with IBM-designed IRQ13 behaviour.
874  * Don't touch unless you *really* know how it works.
875  */
876 asmlinkage void math_state_restore(void)
877 {
878         struct task_struct *me = current;
879         clts();                 /* Allow maths ops (or we recurse) */
880
881         if (!used_math())
882                 init_fpu(me);
883         restore_fpu_checking(&me->thread.i387.fxsave);
884         me->thread_info->status |= TS_USEDFPU;
885 }
886
887 void do_call_debug(struct pt_regs *regs) 
888
889         notify_die(DIE_CALL, "debug call", regs, 0, 255, SIGINT); 
890 }
891
892 void __init trap_init(void)
893 {
894         set_intr_gate(0,&divide_error);
895         set_intr_gate_ist(1,&debug,DEBUG_STACK);
896         set_intr_gate_ist(2,&nmi,NMI_STACK);
897         set_system_gate(3,&int3);
898         set_system_gate(4,&overflow);   /* int4 can be called from all */
899         set_intr_gate(5,&bounds);
900         set_intr_gate(6,&invalid_op);
901         set_intr_gate(7,&device_not_available);
902         set_intr_gate_ist(8,&double_fault, DOUBLEFAULT_STACK);
903         set_intr_gate(9,&coprocessor_segment_overrun);
904         set_intr_gate(10,&invalid_TSS);
905         set_intr_gate(11,&segment_not_present);
906         set_intr_gate_ist(12,&stack_segment,STACKFAULT_STACK);
907         set_intr_gate(13,&general_protection);
908         set_intr_gate(14,&page_fault);
909         set_intr_gate(15,&spurious_interrupt_bug);
910         set_intr_gate(16,&coprocessor_error);
911         set_intr_gate(17,&alignment_check);
912 #ifdef CONFIG_X86_MCE
913         set_intr_gate_ist(18,&machine_check, MCE_STACK); 
914 #endif
915         set_intr_gate(19,&simd_coprocessor_error);
916
917 #ifdef CONFIG_IA32_EMULATION
918         set_system_gate(IA32_SYSCALL_VECTOR, ia32_syscall);
919 #endif
920        
921         set_intr_gate(KDB_VECTOR, call_debug);
922        
923         /*
924          * Should be a barrier for any external CPU state.
925          */
926         cpu_init();
927 }
928
929
930 /* Actual parsing is done early in setup.c. */
931 static int __init oops_dummy(char *s)
932
933         panic_on_oops = 1;
934         return -1; 
935
936 __setup("oops=", oops_dummy); 
937
938 static int __init kstack_setup(char *s)
939 {
940         kstack_depth_to_print = simple_strtoul(s,NULL,0);
941         return 0;
942 }
943 __setup("kstack=", kstack_setup);
944