bf5bd351820d34f6a48334d59fe4919ef28171b1
[akaros.git] / kern / arch / x86 / trap.c
1 #ifdef __SHARC__
2 #pragma nosharc
3 #define SINIT(x) x
4 #endif
5
6 #include <arch/mmu.h>
7 #include <arch/x86.h>
8 #include <arch/arch.h>
9 #include <arch/console.h>
10 #include <arch/apic.h>
11 #include <ros/common.h>
12 #include <smp.h>
13 #include <assert.h>
14 #include <pmap.h>
15 #include <trap.h>
16 #include <monitor.h>
17 #include <process.h>
18 #include <mm.h>
19 #include <stdio.h>
20 #include <slab.h>
21 #include <syscall.h>
22 #include <kdebug.h>
23 #include <kmalloc.h>
24 #include <arch/mptables.h>
25
26 taskstate_t RO ts;
27
28 /* Interrupt descriptor table.  64 bit needs 16 byte alignment (i think). */
29 gatedesc_t __attribute__((aligned (16))) idt[256] = { { 0 } };
30 pseudodesc_t idt_pd;
31
32 /* interrupt handler table, each element is a linked list of handlers for a
33  * given IRQ.  Modification requires holding the lock (TODO: RCU) */
34 struct irq_handler *irq_handlers[NUM_IRQS];
35 spinlock_t irq_handler_wlock = SPINLOCK_INITIALIZER_IRQSAVE;
36
37 const char *x86_trapname(int trapno)
38 {
39     // zra: excnames is SREADONLY because Ivy doesn't trust const
40         static const char *NT const (RO excnames)[] = {
41                 "Divide error",
42                 "Debug",
43                 "Non-Maskable Interrupt",
44                 "Breakpoint",
45                 "Overflow",
46                 "BOUND Range Exceeded",
47                 "Invalid Opcode",
48                 "Device Not Available",
49                 "Double Fault",
50                 "Coprocessor Segment Overrun",
51                 "Invalid TSS",
52                 "Segment Not Present",
53                 "Stack Fault",
54                 "General Protection",
55                 "Page Fault",
56                 "(unknown trap)",
57                 "x87 FPU Floating-Point Error",
58                 "Alignment Check",
59                 "Machine-Check",
60                 "SIMD Floating-Point Exception"
61         };
62
63         if (trapno < sizeof(excnames)/sizeof(excnames[0]))
64                 return excnames[trapno];
65         if (trapno == T_SYSCALL)
66                 return "System call";
67         return "(unknown trap)";
68 }
69
70 /* Set stacktop for the current core to be the stack the kernel will start on
71  * when trapping/interrupting from userspace.  Don't use this til after
72  * smp_percpu_init().  We can probably get the TSS by reading the task register
73  * and then the GDT.  Still, it's a pain. */
74 void set_stack_top(uintptr_t stacktop)
75 {
76         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
77         /* No need to reload the task register, this takes effect immediately */
78         x86_set_stacktop_tss(pcpui->tss, stacktop);
79         /* Also need to make sure sysenters come in correctly */
80         x86_set_sysenter_stacktop(stacktop);
81 }
82
83 /* Note the check implies we only are on a one page stack (or the first page) */
84 uintptr_t get_stack_top(void)
85 {
86         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
87         uintptr_t stacktop;
88         /* so we can check this in interrupt handlers (before smp_boot()) */
89         /* TODO: These are dangerous - it assumes we're on a one-page stack.  If we
90          * change it to KSTKSIZE, then we assume stacks are KSTKSIZE-aligned */
91         if (!pcpui->tss)
92                 return ROUNDUP(read_sp(), PGSIZE);
93         stacktop = x86_get_stacktop_tss(pcpui->tss);
94         if (stacktop != ROUNDUP(read_sp(), PGSIZE))
95                 panic("Bad stacktop: %p esp one is %p\n", stacktop,
96                       ROUNDUP(read_sp(), PGSIZE));
97         return stacktop;
98 }
99
100 /* Sends a non-maskable interrupt; the handler will print a trapframe. */
101 void send_nmi(uint32_t os_coreid)
102 {
103         /* NMI / IPI for x86 are limited to 8 bits */
104         uint8_t hw_core = (uint8_t)get_hw_coreid(os_coreid);
105         __send_nmi(hw_core);
106 }
107
108 void idt_init(void)
109 {
110         /* This table is made in trapentry$BITS.S by each macro in that file.
111          * It is layed out such that the ith entry is the ith's traphandler's
112          * (uintptr_t) trap addr, then (uint32_t) trap number. */
113         struct trapinfo { uintptr_t trapaddr; uint32_t trapnumber; }
114                __attribute__((packed));
115         extern struct trapinfo trap_tbl[];
116         extern struct trapinfo trap_tbl_end[];
117         int i, trap_tbl_size = trap_tbl_end - trap_tbl;
118         extern void ISR_default(void);
119         extern void ISR_syscall(void);
120
121         /* set all to default, to catch everything */
122         for (i = 0; i < 256; i++)
123                 SETGATE(idt[i], 0, GD_KT, &ISR_default, 0);
124
125         /* set all entries that have real trap handlers
126          * we need to stop short of the last one, since the last is the default
127          * handler with a fake interrupt number (500) that is out of bounds of
128          * the idt[] */
129         for (i = 0; i < trap_tbl_size - 1; i++)
130                 SETGATE(idt[trap_tbl[i].trapnumber], 0, GD_KT, trap_tbl[i].trapaddr, 0);
131         /* Sanity check */
132         assert((uintptr_t)ISR_syscall ==
133                ((uintptr_t)idt[T_SYSCALL].gd_off_63_32 << 32 |
134                 (uintptr_t)idt[T_SYSCALL].gd_off_31_16 << 16 |
135                 (uintptr_t)idt[T_SYSCALL].gd_off_15_0));
136         /* turn on trap-based syscall handling and other user-accessible ints
137          * DPL 3 means this can be triggered by the int instruction */
138         idt[T_SYSCALL].gd_dpl = SINIT(3);
139         idt[T_BRKPT].gd_dpl = SINIT(3);
140
141         /* Set up our kernel stack when changing rings */
142         /* Note: we want 16 byte aligned kernel stack frames (AMD 2:8.9.3) */
143         x86_set_stacktop_tss(&ts, (uintptr_t)bootstacktop);
144         x86_sysenter_init((uintptr_t)bootstacktop);
145
146 #ifdef CONFIG_KTHREAD_POISON
147         *kstack_bottom_addr((uintptr_t)bootstacktop) = 0xdeadbeef;
148 #endif /* CONFIG_KTHREAD_POISON */
149
150         /* Initialize the TSS field of the gdt.  The size of the TSS desc differs
151          * between 64 and 32 bit, hence the pointer acrobatics */
152         syssegdesc_t *ts_slot = (syssegdesc_t*)&gdt[GD_TSS >> 3];
153         *ts_slot = (syssegdesc_t)SEG_SYS_SMALL(STS_T32A, (uintptr_t)&ts,
154                                                sizeof(taskstate_t), 0);
155
156         /* Init the IDT PD.  Need to do this before ltr for some reason.  (Doing
157          * this between ltr and lidt causes the machine to reboot... */
158         idt_pd.pd_lim = sizeof(idt) - 1;
159         idt_pd.pd_base = (uintptr_t)idt;
160
161         ltr(GD_TSS);
162
163         asm volatile("lidt %0" : : "m"(idt_pd));
164
165         pic_remap();
166         pic_mask_all();
167
168 #ifdef CONFIG_ENABLE_MPTABLES
169         int ncleft = MAX_NUM_CPUS;
170
171         ncleft = mpsinit(ncleft);
172         ncleft = mpacpi(ncleft);
173         printk("MP and ACPI found %d cores\n", MAX_NUM_CPUS - ncleft);
174
175         apiconline();
176         ioapiconline();
177 #else
178         // set LINT0 to receive ExtINTs (KVM's default).  At reset they are 0x1000.
179         write_mmreg32(LAPIC_LVT_LINT0, 0x700);
180         lapic_enable();
181         unmask_lapic_lvt(LAPIC_LVT_LINT0);
182 #endif
183
184         /* the lapic IRQs need to be unmasked on a per-core basis */
185         register_irq(IdtLAPIC_TIMER, timer_interrupt, NULL,
186                      MKBUS(BusLAPIC, 0, 0, 0));
187         register_irq(IdtLAPIC_ERROR, handle_lapic_error, NULL,
188                      MKBUS(BusLAPIC, 0, 0, 0));
189         register_irq(I_KERNEL_MSG, handle_kmsg_ipi, NULL, MKBUS(BusIPI, 0, 0, 0));
190 }
191
192 static void handle_fperr(struct hw_trapframe *hw_tf)
193 {
194         uint16_t fpcw, fpsw;
195         uint32_t mxcsr;
196         asm volatile ("fnstcw %0" : "=m"(fpcw));
197         asm volatile ("fnstsw %0" : "=m"(fpsw));
198         asm volatile ("stmxcsr %0" : "=m"(mxcsr));
199         print_trapframe(hw_tf);
200         printk("Core %d: FP ERR, CW: 0x%04x, SW: 0x%04x, MXCSR 0x%08x\n", core_id(),
201                fpcw, fpsw, mxcsr);
202         printk("Core %d: The following faults are unmasked:\n", core_id());
203         if (fpsw & ~fpcw & FP_EXCP_IE) {
204                 printk("\tInvalid Operation: ");
205                 if (fpsw & FP_SW_SF) {
206                         if (fpsw & FP_SW_C1)
207                                 printk("Stack overflow\n");
208                         else
209                                 printk("Stack underflow\n");
210                 } else {
211                         printk("invalid arithmetic operand\n");
212                 }
213         }
214         if (fpsw & ~fpcw & FP_EXCP_DE)
215                 printk("\tDenormalized operand\n");
216         if (fpsw & ~fpcw & FP_EXCP_ZE)
217                 printk("\tDivide by zero\n");
218         if (fpsw & ~fpcw & FP_EXCP_OE)
219                 printk("\tNumeric Overflow\n");
220         if (fpsw & ~fpcw & FP_EXCP_UE)
221                 printk("\tNumeric Underflow\n");
222         if (fpsw & ~fpcw & FP_EXCP_PE)
223                 printk("\tInexact result (precision)\n");
224         printk("Killing the process.\n");
225         enable_irq();
226         proc_destroy(current);
227 }
228
229 void backtrace_kframe(struct hw_trapframe *hw_tf)
230 {
231         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
232         pcpui->__lock_checking_enabled--;
233         printk("\nBacktrace of faulting kernel context on Core %d:\n", core_id());
234         backtrace_frame(get_hwtf_pc(hw_tf), get_hwtf_fp(hw_tf));
235         pcpui->__lock_checking_enabled++;
236 }
237
238 static bool __handle_page_fault(struct hw_trapframe *hw_tf, unsigned long *aux)
239 {
240         uintptr_t fault_va = rcr2();
241         int prot = hw_tf->tf_err & PF_ERROR_WRITE ? PROT_WRITE : PROT_READ;
242         int err;
243
244         /* safe to reenable after rcr2 */
245         enable_irq();
246
247         if (!current) {
248                 /* still catch KPFs */
249                 assert((hw_tf->tf_cs & 3) == 0);
250                 print_trapframe(hw_tf);
251                 backtrace_kframe(hw_tf);
252                 panic("Proc-less Page Fault in the Kernel at %p!", fault_va);
253         }
254         /* TODO - handle kernel page faults.  This is dangerous, since we might be
255          * holding locks in the kernel and could deadlock when we HPF.
256          *
257          * Also consider turning on IRQs globally while we call HPF. */
258         if ((err = handle_page_fault(current, fault_va, prot))) {
259                 if ((hw_tf->tf_cs & 3) == 0) {
260                         print_trapframe(hw_tf);
261                         backtrace_kframe(hw_tf);
262                         panic("Proc-ful Page Fault in the Kernel at %p!", fault_va);
263                         /* if we want to do something like kill a process or other code, be
264                          * aware we are in a sort of irq-like context, meaning the main
265                          * kernel code we 'interrupted' could be holding locks - even
266                          * irqsave locks. */
267                 }
268
269                 if (err == -EAGAIN)
270                         hw_tf->tf_err |= PF_VMR_BACKED;
271                 *aux = fault_va;
272                 return FALSE;
273                 /* useful debugging */
274                 printk("[%08x] user %s fault va %p ip %p on core %d with err %d\n",
275                        current->pid, prot & PROT_READ ? "READ" : "WRITE", fault_va,
276                        hw_tf->tf_rip, core_id(), err);
277                 print_trapframe(hw_tf);
278                 /* Turn this on to help debug bad function pointers */
279 #ifdef CONFIG_X86_64
280                 printd("rsp %p\n\t 0(rsp): %p\n\t 8(rsp): %p\n\t 16(rsp): %p\n"
281                        "\t24(rsp): %p\n", hw_tf->tf_rsp,
282                        *(uintptr_t*)(hw_tf->tf_rsp +  0),
283                        *(uintptr_t*)(hw_tf->tf_rsp +  8),
284                        *(uintptr_t*)(hw_tf->tf_rsp + 16),
285                        *(uintptr_t*)(hw_tf->tf_rsp + 24));
286 #else
287                 printd("esp %p\n\t 0(esp): %p\n\t 4(esp): %p\n\t 8(esp): %p\n"
288                        "\t12(esp): %p\n", hw_tf->tf_esp,
289                        *(uintptr_t*)(hw_tf->tf_esp +  0),
290                        *(uintptr_t*)(hw_tf->tf_esp +  4),
291                        *(uintptr_t*)(hw_tf->tf_esp +  8),
292                        *(uintptr_t*)(hw_tf->tf_esp + 12));
293 #endif
294         }
295         return TRUE;
296 }
297
298 /* Certain traps want IRQs enabled, such as the syscall.  Others can't handle
299  * it, like the page fault handler.  Turn them on on a case-by-case basis. */
300 static void trap_dispatch(struct hw_trapframe *hw_tf)
301 {
302         struct per_cpu_info *pcpui;
303         bool handled = TRUE;
304         unsigned long aux = 0;
305         // Handle processor exceptions.
306         switch(hw_tf->tf_trapno) {
307                 case T_NMI:
308                         /* Temporarily disable deadlock detection when we print.  We could
309                          * deadlock if we were printing when we NMIed. */
310                         pcpui = &per_cpu_info[core_id()];
311                         pcpui->__lock_checking_enabled--;
312                         /* This is a bit hacky, but we don't have a decent API yet */
313                         extern bool mon_verbose_trace;
314                         if (mon_verbose_trace) {
315                                 print_trapframe(hw_tf);
316                                 backtrace_kframe(hw_tf);
317                         }
318                         char *fn_name = get_fn_name(x86_get_ip_hw(hw_tf));
319                         printk("Core %d is at %p (%s)\n", core_id(), x86_get_ip_hw(hw_tf),
320                                fn_name);
321                         kfree(fn_name);
322                         print_kmsgs(core_id());
323                         pcpui->__lock_checking_enabled++;
324                         break;
325                 case T_BRKPT:
326                         enable_irq();
327                         monitor(hw_tf);
328                         break;
329                 case T_ILLOP:
330                 {
331                         /* TODO: this can PF if there is a concurrent unmap/PM removal. */
332                         uintptr_t ip = x86_get_ip_hw(hw_tf);
333                         pcpui = &per_cpu_info[core_id()];
334                         pcpui->__lock_checking_enabled--;               /* for print debugging */
335                         /* We will muck with the actual TF.  If we're dealing with
336                          * userspace, we need to make sure we edit the actual TF that will
337                          * get restarted (pcpui), and not the TF on the kstack (which aren't
338                          * the same).  See set_current_ctx() for more info. */
339                         if (!in_kernel(hw_tf))
340                                 hw_tf = &pcpui->cur_ctx->tf.hw_tf;
341                         printd("bad opcode, eip: %p, next 3 bytes: %x %x %x\n", ip, 
342                                *(uint8_t*)(ip + 0), 
343                                *(uint8_t*)(ip + 1), 
344                                *(uint8_t*)(ip + 2)); 
345                         /* rdtscp: 0f 01 f9 */
346                         if (*(uint8_t*)(ip + 0) == 0x0f, 
347                             *(uint8_t*)(ip + 1) == 0x01, 
348                             *(uint8_t*)(ip + 2) == 0xf9) {
349                                 x86_fake_rdtscp(hw_tf);
350                                 pcpui->__lock_checking_enabled++;       /* for print debugging */
351                                 return;
352                         }
353                         enable_irq();
354                         monitor(hw_tf);
355                         pcpui->__lock_checking_enabled++;               /* for print debugging */
356                         break;
357                 }
358                 case T_PGFLT:
359                         handled = __handle_page_fault(hw_tf, &aux);
360                         break;
361                 case T_FPERR:
362                         handle_fperr(hw_tf);
363                         break;
364                 case T_SYSCALL:
365                         enable_irq();
366                         // check for userspace, for now
367                         assert(hw_tf->tf_cs != GD_KT);
368                         /* Set up and run the async calls */
369                         /* TODO: this is using the wrong reg1 for traps for 32 bit */
370                         prep_syscalls(current,
371                                       (struct syscall*)x86_get_systrap_arg0(hw_tf),
372                                                   (unsigned int)x86_get_systrap_arg1(hw_tf));
373                         break;
374                 default:
375                         if (hw_tf->tf_cs == GD_KT) {
376                                 print_trapframe(hw_tf);
377                                 panic("Damn Damn!  Unhandled trap in the kernel!");
378                         } else {
379                                 handled = FALSE;
380                         }
381         }
382         if (!handled)
383                 reflect_unhandled_trap(hw_tf->tf_trapno, hw_tf->tf_err, aux);
384 }
385
386 /* Helper.  For now, this copies out the TF to pcpui.  Eventually, we should
387  * consider doing this in trapentry.S
388  *
389  * TODO: consider having this return the tf used, so we can set tf in trap and
390  * irq handlers to edit the TF that will get restarted.  Right now, the kernel
391  * uses and restarts tf, but userspace restarts the old pcpui tf.  It is
392  * tempting to do this, but note that tf stays on the stack of the kthread,
393  * while pcpui->cur_ctx is for the core we trapped in on.  Meaning if we ever
394  * block, suddenly cur_ctx is pointing to some old clobbered state that was
395  * already returned to and can't be trusted.  Meanwhile tf can always be trusted
396  * (like with an in_kernel() check).  The only types of traps from the user that
397  * can be expected to have editable trapframes are ones that don't block. */
398 static void set_current_ctx_hw(struct per_cpu_info *pcpui,
399                                struct hw_trapframe *hw_tf)
400 {
401         assert(!irq_is_enabled());
402         assert(!pcpui->cur_ctx);
403         pcpui->actual_ctx.type = ROS_HW_CTX;
404         pcpui->actual_ctx.tf.hw_tf = *hw_tf;
405         pcpui->cur_ctx = &pcpui->actual_ctx;
406 }
407
408 static void set_current_ctx_sw(struct per_cpu_info *pcpui,
409                                struct sw_trapframe *sw_tf)
410 {
411         assert(!irq_is_enabled());
412         assert(!pcpui->cur_ctx);
413         pcpui->actual_ctx.type = ROS_SW_CTX;
414         pcpui->actual_ctx.tf.sw_tf = *sw_tf;
415         pcpui->cur_ctx = &pcpui->actual_ctx;
416 }
417
418 /* If the interrupt interrupted a halt, we advance past it.  Made to work with
419  * x86's custom cpu_halt() in arch/arch.h.  Note this nearly never gets called.
420  * I needed to insert exactly one 'nop' in cpu_halt() (that isn't there now) to
421  * get the interrupt to trip on the hlt, o/w the hlt will execute before the
422  * interrupt arrives (even with a pending interrupt that should hit right after
423  * an interrupt_enable (sti)).  This was on the i7. */
424 static void abort_halt(struct hw_trapframe *hw_tf)
425 {
426         /* Don't care about user TFs.  Incidentally, dereferencing user EIPs is
427          * reading userspace memory, which can be dangerous.  It can page fault,
428          * like immediately after a fork (which doesn't populate the pages). */
429         if (!in_kernel(hw_tf))
430                 return;
431         /* the halt instruction in is 0xf4, and it's size is 1 byte */
432         if (*(uint8_t*)x86_get_ip_hw(hw_tf) == 0xf4)
433                 x86_advance_ip(hw_tf, 1);
434 }
435
436 void trap(struct hw_trapframe *hw_tf)
437 {
438         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
439         /* Copy out the TF for now */
440         if (!in_kernel(hw_tf))
441                 set_current_ctx_hw(pcpui, hw_tf);
442         else
443                 inc_ktrap_depth(pcpui);
444
445         printd("Incoming TRAP %d on core %d, TF at %p\n", hw_tf->tf_trapno,
446                core_id(), hw_tf);
447         if ((hw_tf->tf_cs & ~3) != GD_UT && (hw_tf->tf_cs & ~3) != GD_KT) {
448                 print_trapframe(hw_tf);
449                 panic("Trapframe with invalid CS!");
450         }
451         trap_dispatch(hw_tf);
452         /* Return to the current process, which should be runnable.  If we're the
453          * kernel, we should just return naturally.  Note that current and tf need
454          * to still be okay (might not be after blocking) */
455         if (in_kernel(hw_tf)) {
456                 dec_ktrap_depth(pcpui);
457                 return;
458         }
459         proc_restartcore();
460         assert(0);
461 }
462
463 static bool vector_is_irq(int apic_vec)
464 {
465         /* arguably, we could limit them to MaxIdtIOAPIC */
466         return (IdtPIC <= apic_vec) && (apic_vec <= IdtMAX);
467 }
468
469 /* Note IRQs are disabled unless explicitly turned on.
470  *
471  * In general, we should only get trapno's >= PIC1_OFFSET (32).  Anything else
472  * should be a trap.  Even if we don't use the PIC, that should be the standard.
473  * It is possible to get a spurious LAPIC IRQ with vector 15 (or similar), but
474  * the spurious check should catch that.
475  *
476  * Note that from hardware's perspective (PIC, etc), IRQs start from 0, but they
477  * are all mapped up at PIC1_OFFSET for the cpu / irq_handler. */
478 void handle_irq(struct hw_trapframe *hw_tf)
479 {
480         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
481         struct irq_handler *irq_h;
482         /* Copy out the TF for now */
483         if (!in_kernel(hw_tf))
484                 set_current_ctx_hw(pcpui, hw_tf);
485         inc_irq_depth(pcpui);
486         /* Coupled with cpu_halt() and smp_idle() */
487         abort_halt(hw_tf);
488         //if (core_id())
489         if (hw_tf->tf_trapno != IdtLAPIC_TIMER) /* timer irq */
490         if (hw_tf->tf_trapno != I_KERNEL_MSG)
491         if (hw_tf->tf_trapno != 65)     /* qemu serial tends to get this one */
492                 printd("Incoming IRQ, ISR: %d on core %d\n", hw_tf->tf_trapno,
493                        core_id());
494         /* TODO: RCU read lock */
495         irq_h = irq_handlers[hw_tf->tf_trapno];
496         if (!irq_h || irq_h->check_spurious(hw_tf->tf_trapno))
497                 goto out_no_eoi;
498         /* Can now be interrupted/nested by higher priority IRQs, but not by our
499          * current IRQ vector, til we EOI. */
500         enable_irq();
501         while (irq_h) {
502                 irq_h->isr(hw_tf, irq_h->data);
503                 irq_h = irq_h->next;
504         }
505         // if we're a general purpose IPI function call, down the cpu_list
506         extern handler_wrapper_t handler_wrappers[NUM_HANDLER_WRAPPERS];
507         if ((I_SMP_CALL0 <= hw_tf->tf_trapno) &&
508             (hw_tf->tf_trapno <= I_SMP_CALL_LAST))
509                 down_checklist(handler_wrappers[hw_tf->tf_trapno & 0x0f].cpu_list);
510         disable_irq();
511         /* Keep in sync with ipi_is_pending */
512         irq_handlers[hw_tf->tf_trapno]->eoi(hw_tf->tf_trapno);
513         /* Fall-through */
514 out_no_eoi:
515         dec_irq_depth(pcpui);
516         /* Return to the current process, which should be runnable.  If we're the
517          * kernel, we should just return naturally.  Note that current and tf need
518          * to still be okay (might not be after blocking) */
519         if (in_kernel(hw_tf))
520                 return;
521         proc_restartcore();
522         assert(0);
523 }
524
525 int register_irq(int irq, isr_t handler, void *irq_arg, uint32_t tbdf)
526 {
527         struct irq_handler *irq_h;
528         int vector;
529         irq_h = kzmalloc(sizeof(struct irq_handler), 0);
530         assert(irq_h);
531         irq_h->dev_irq = irq;
532         irq_h->tbdf = tbdf;
533         vector = bus_irq_setup(irq_h);
534         if (vector == -1) {
535                 kfree(irq_h);
536                 return -1;
537         }
538         printk("IRQ %d, vector %d (0x%x), type %s\n", irq, vector, vector,
539                irq_h->type);
540         assert(irq_h->check_spurious && irq_h->eoi);
541         irq_h->isr = handler;
542         irq_h->data = irq_arg;
543         irq_h->apic_vector = vector;
544         /* RCU write lock */
545         spin_lock_irqsave(&irq_handler_wlock);
546         irq_h->next = irq_handlers[vector];
547         wmb();  /* make sure irq_h is done before publishing to readers */
548         irq_handlers[vector] = irq_h;
549         spin_unlock_irqsave(&irq_handler_wlock);
550         /* Most IRQs other than the BusIPI should need their irq unmasked.
551          * Might need to pass the irq_h, in case unmask needs more info.
552          * The lapic IRQs need to be unmasked on a per-core basis */
553         if (irq_h->unmask && strcmp(irq_h->type, "lapic"))
554                 irq_h->unmask(irq_h, vector);
555         return 0;
556 }
557
558 /* These routing functions only allow the routing of an irq to a single core.
559  * If we want to route to multiple cores, we'll probably need to set up logical
560  * groups or something and take some additional parameters. */
561 static int route_irq_h(struct irq_handler *irq_h, int os_coreid)
562 {
563         int hw_coreid;
564         if (!irq_h->route_irq) {
565                 printk("[kernel] apic_vec %d, type %s cannot be routed\n",
566                        irq_h->apic_vector, irq_h->type);
567                 return -1;
568         }
569         if (os_coreid >= MAX_NUM_CPUS) {
570                 printk("[kernel] os_coreid %d out of range!\n", os_coreid);
571                 return -1;
572         }
573         hw_coreid = get_hw_coreid(os_coreid);
574         if (hw_coreid == -1) {
575                 printk("[kernel] os_coreid %d not a valid hw core!\n", os_coreid);
576                 return -1;
577         }
578         irq_h->route_irq(irq_h, irq_h->apic_vector, hw_coreid);
579         return 0;
580 }
581
582 /* Routes all irqs for a given apic_vector to os_coreid.  Returns 0 if all of
583  * them succeeded.  -1 if there were none or if any of them failed.  We don't
584  * share IRQs often (if ever anymore), so this shouldn't be an issue. */
585 int route_irqs(int apic_vec, int os_coreid)
586 {
587         struct irq_handler *irq_h;
588         int ret = -1;
589         if (!vector_is_irq(apic_vec)) {
590                 printk("[kernel] vector %d is not an IRQ vector!\n", apic_vec);
591                 return -1;
592         }
593         irq_h = irq_handlers[apic_vec];
594         while (irq_h) {
595                 assert(irq_h->apic_vector == apic_vec);
596                 ret = route_irq_h(irq_h, os_coreid);
597                 irq_h = irq_h->next;
598         }
599         return ret;
600 }
601
602 /* It's a moderate pain in the ass to put these in bit-specific files (header
603  * hell with the set_current_ helpers) */
604 #ifdef CONFIG_X86_64
605 void sysenter_callwrapper(struct syscall *sysc, unsigned long count,
606                           struct sw_trapframe *sw_tf)
607 {
608         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
609         set_current_ctx_sw(pcpui, sw_tf);
610         /* Once we've set_current_ctx, we can enable interrupts.  This used to be
611          * mandatory (we had immediate KMSGs that would muck with cur_ctx).  Now it
612          * should only help for sanity/debugging. */
613         enable_irq();
614         /* Set up and run the async calls */
615         prep_syscalls(current, sysc, count);
616         /* If you use pcpui again, reread it, since you might have migrated */
617         proc_restartcore();
618 }
619
620 #else
621
622 /* This is called from sysenter's asm, with the tf on the kernel stack. */
623 /* TODO: use a sw_tf for sysenter */
624 void sysenter_callwrapper(struct hw_trapframe *hw_tf)
625 {
626         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
627         assert(!in_kernel(hw_tf));
628         set_current_ctx_hw(pcpui, hw_tf);
629         /* Once we've set_current_ctx, we can enable interrupts.  This used to be
630          * mandatory (we had immediate KMSGs that would muck with cur_ctx).  Now it
631          * should only help for sanity/debugging. */
632         enable_irq();
633
634         /* Set up and run the async calls */
635         prep_syscalls(current,
636                                   (struct syscall*)x86_get_sysenter_arg0(hw_tf),
637                                   (unsigned int)x86_get_sysenter_arg1(hw_tf));
638         /* If you use pcpui again, reread it, since you might have migrated */
639         proc_restartcore();
640 }
641 #endif
642
643 /* Declared in x86/arch.h */
644 void send_ipi(uint32_t os_coreid, uint8_t vector)
645 {
646         int hw_coreid = get_hw_coreid(os_coreid);
647         if (hw_coreid == -1) {
648                 panic("Unmapped OS coreid (OS %d)!\n", os_coreid);
649                 return;
650         }
651         __send_ipi(hw_coreid, vector);
652 }