28c9f16b38cf0b0f43027f5d81967063aeb103d3
[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(x86_get_hwtf_pc(hw_tf), x86_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         if ((err = handle_page_fault(current, fault_va, prot))) {
257                 if ((hw_tf->tf_cs & 3) == 0) {
258                         print_trapframe(hw_tf);
259                         backtrace_kframe(hw_tf);
260                         panic("Proc-ful Page Fault in the Kernel at %p!", fault_va);
261                         /* if we want to do something like kill a process or other code, be
262                          * aware we are in a sort of irq-like context, meaning the main
263                          * kernel code we 'interrupted' could be holding locks - even
264                          * irqsave locks. */
265                 }
266
267                 if (err == -EAGAIN)
268                         hw_tf->tf_err |= PF_VMR_BACKED;
269                 *aux = fault_va;
270                 return FALSE;
271                 /* useful debugging */
272                 printk("[%08x] user %s fault va %p ip %p on core %d with err %d\n",
273                        current->pid, prot & PROT_READ ? "READ" : "WRITE", fault_va,
274                        hw_tf->tf_rip, core_id(), err);
275                 print_trapframe(hw_tf);
276                 /* Turn this on to help debug bad function pointers */
277 #ifdef CONFIG_X86_64
278                 printd("rsp %p\n\t 0(rsp): %p\n\t 8(rsp): %p\n\t 16(rsp): %p\n"
279                        "\t24(rsp): %p\n", hw_tf->tf_rsp,
280                        *(uintptr_t*)(hw_tf->tf_rsp +  0),
281                        *(uintptr_t*)(hw_tf->tf_rsp +  8),
282                        *(uintptr_t*)(hw_tf->tf_rsp + 16),
283                        *(uintptr_t*)(hw_tf->tf_rsp + 24));
284 #else
285                 printd("esp %p\n\t 0(esp): %p\n\t 4(esp): %p\n\t 8(esp): %p\n"
286                        "\t12(esp): %p\n", hw_tf->tf_esp,
287                        *(uintptr_t*)(hw_tf->tf_esp +  0),
288                        *(uintptr_t*)(hw_tf->tf_esp +  4),
289                        *(uintptr_t*)(hw_tf->tf_esp +  8),
290                        *(uintptr_t*)(hw_tf->tf_esp + 12));
291 #endif
292         }
293         return TRUE;
294 }
295
296 /* Certain traps want IRQs enabled, such as the syscall.  Others can't handle
297  * it, like the page fault handler.  Turn them on on a case-by-case basis. */
298 static void trap_dispatch(struct hw_trapframe *hw_tf)
299 {
300         struct per_cpu_info *pcpui;
301         bool handled = TRUE;
302         unsigned long aux = 0;
303         // Handle processor exceptions.
304         switch(hw_tf->tf_trapno) {
305                 case T_NMI:
306                         /* Temporarily disable deadlock detection when we print.  We could
307                          * deadlock if we were printing when we NMIed. */
308                         pcpui = &per_cpu_info[core_id()];
309                         pcpui->__lock_checking_enabled--;
310                         /* This is a bit hacky, but we don't have a decent API yet */
311                         extern bool mon_verbose_trace;
312                         if (mon_verbose_trace) {
313                                 print_trapframe(hw_tf);
314                                 backtrace_kframe(hw_tf);
315                         }
316                         char *fn_name = get_fn_name(x86_get_ip_hw(hw_tf));
317                         printk("Core %d is at %p (%s)\n", core_id(), x86_get_ip_hw(hw_tf),
318                                fn_name);
319                         kfree(fn_name);
320                         print_kmsgs(core_id());
321                         pcpui->__lock_checking_enabled++;
322                         break;
323                 case T_BRKPT:
324                         enable_irq();
325                         monitor(hw_tf);
326                         break;
327                 case T_ILLOP:
328                 {
329                         /* TODO: this can PF if there is a concurrent unmap/PM removal. */
330                         uintptr_t ip = x86_get_ip_hw(hw_tf);
331                         pcpui = &per_cpu_info[core_id()];
332                         pcpui->__lock_checking_enabled--;               /* for print debugging */
333                         /* We will muck with the actual TF.  If we're dealing with
334                          * userspace, we need to make sure we edit the actual TF that will
335                          * get restarted (pcpui), and not the TF on the kstack (which aren't
336                          * the same).  See set_current_ctx() for more info. */
337                         if (!in_kernel(hw_tf))
338                                 hw_tf = &pcpui->cur_ctx->tf.hw_tf;
339                         printd("bad opcode, eip: %p, next 3 bytes: %x %x %x\n", ip, 
340                                *(uint8_t*)(ip + 0), 
341                                *(uint8_t*)(ip + 1), 
342                                *(uint8_t*)(ip + 2)); 
343                         /* rdtscp: 0f 01 f9 */
344                         if (*(uint8_t*)(ip + 0) == 0x0f, 
345                             *(uint8_t*)(ip + 1) == 0x01, 
346                             *(uint8_t*)(ip + 2) == 0xf9) {
347                                 x86_fake_rdtscp(hw_tf);
348                                 pcpui->__lock_checking_enabled++;       /* for print debugging */
349                                 return;
350                         }
351                         enable_irq();
352                         monitor(hw_tf);
353                         pcpui->__lock_checking_enabled++;               /* for print debugging */
354                         break;
355                 }
356                 case T_PGFLT:
357                         handled = __handle_page_fault(hw_tf, &aux);
358                         break;
359                 case T_FPERR:
360                         handle_fperr(hw_tf);
361                         break;
362                 case T_SYSCALL:
363                         enable_irq();
364                         // check for userspace, for now
365                         assert(hw_tf->tf_cs != GD_KT);
366                         /* Set up and run the async calls */
367                         /* TODO: this is using the wrong reg1 for traps for 32 bit */
368                         prep_syscalls(current,
369                                       (struct syscall*)x86_get_systrap_arg0(hw_tf),
370                                                   (unsigned int)x86_get_systrap_arg1(hw_tf));
371                         break;
372                 default:
373                         if (hw_tf->tf_cs == GD_KT) {
374                                 print_trapframe(hw_tf);
375                                 panic("Damn Damn!  Unhandled trap in the kernel!");
376                         } else {
377                                 handled = FALSE;
378                         }
379         }
380         if (!handled)
381                 reflect_unhandled_trap(hw_tf->tf_trapno, hw_tf->tf_err, aux);
382 }
383
384 /* Helper.  For now, this copies out the TF to pcpui.  Eventually, we should
385  * consider doing this in trapentry.S
386  *
387  * TODO: consider having this return the tf used, so we can set tf in trap and
388  * irq handlers to edit the TF that will get restarted.  Right now, the kernel
389  * uses and restarts tf, but userspace restarts the old pcpui tf.  It is
390  * tempting to do this, but note that tf stays on the stack of the kthread,
391  * while pcpui->cur_ctx is for the core we trapped in on.  Meaning if we ever
392  * block, suddenly cur_ctx is pointing to some old clobbered state that was
393  * already returned to and can't be trusted.  Meanwhile tf can always be trusted
394  * (like with an in_kernel() check).  The only types of traps from the user that
395  * can be expected to have editable trapframes are ones that don't block. */
396 static void set_current_ctx_hw(struct per_cpu_info *pcpui,
397                                struct hw_trapframe *hw_tf)
398 {
399         assert(!irq_is_enabled());
400         assert(!pcpui->cur_ctx);
401         pcpui->actual_ctx.type = ROS_HW_CTX;
402         pcpui->actual_ctx.tf.hw_tf = *hw_tf;
403         pcpui->cur_ctx = &pcpui->actual_ctx;
404 }
405
406 static void set_current_ctx_sw(struct per_cpu_info *pcpui,
407                                struct sw_trapframe *sw_tf)
408 {
409         assert(!irq_is_enabled());
410         assert(!pcpui->cur_ctx);
411         pcpui->actual_ctx.type = ROS_SW_CTX;
412         pcpui->actual_ctx.tf.sw_tf = *sw_tf;
413         pcpui->cur_ctx = &pcpui->actual_ctx;
414 }
415
416 /* If the interrupt interrupted a halt, we advance past it.  Made to work with
417  * x86's custom cpu_halt() in arch/arch.h.  Note this nearly never gets called.
418  * I needed to insert exactly one 'nop' in cpu_halt() (that isn't there now) to
419  * get the interrupt to trip on the hlt, o/w the hlt will execute before the
420  * interrupt arrives (even with a pending interrupt that should hit right after
421  * an interrupt_enable (sti)).  This was on the i7. */
422 static void abort_halt(struct hw_trapframe *hw_tf)
423 {
424         /* Don't care about user TFs.  Incidentally, dereferencing user EIPs is
425          * reading userspace memory, which can be dangerous.  It can page fault,
426          * like immediately after a fork (which doesn't populate the pages). */
427         if (!in_kernel(hw_tf))
428                 return;
429         /* the halt instruction in is 0xf4, and it's size is 1 byte */
430         if (*(uint8_t*)x86_get_ip_hw(hw_tf) == 0xf4)
431                 x86_advance_ip(hw_tf, 1);
432 }
433
434 void trap(struct hw_trapframe *hw_tf)
435 {
436         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
437         /* Copy out the TF for now */
438         if (!in_kernel(hw_tf))
439                 set_current_ctx_hw(pcpui, hw_tf);
440         else
441                 inc_ktrap_depth(pcpui);
442
443         printd("Incoming TRAP %d on core %d, TF at %p\n", hw_tf->tf_trapno,
444                core_id(), hw_tf);
445         if ((hw_tf->tf_cs & ~3) != GD_UT && (hw_tf->tf_cs & ~3) != GD_KT) {
446                 print_trapframe(hw_tf);
447                 panic("Trapframe with invalid CS!");
448         }
449         trap_dispatch(hw_tf);
450         /* Return to the current process, which should be runnable.  If we're the
451          * kernel, we should just return naturally.  Note that current and tf need
452          * to still be okay (might not be after blocking) */
453         if (in_kernel(hw_tf)) {
454                 dec_ktrap_depth(pcpui);
455                 return;
456         }
457         proc_restartcore();
458         assert(0);
459 }
460
461 static bool vector_is_irq(int apic_vec)
462 {
463         /* arguably, we could limit them to MaxIdtIOAPIC */
464         return (IdtPIC <= apic_vec) && (apic_vec <= IdtMAX);
465 }
466
467 /* Note IRQs are disabled unless explicitly turned on.
468  *
469  * In general, we should only get trapno's >= PIC1_OFFSET (32).  Anything else
470  * should be a trap.  Even if we don't use the PIC, that should be the standard.
471  * It is possible to get a spurious LAPIC IRQ with vector 15 (or similar), but
472  * the spurious check should catch that.
473  *
474  * Note that from hardware's perspective (PIC, etc), IRQs start from 0, but they
475  * are all mapped up at PIC1_OFFSET for the cpu / irq_handler. */
476 void handle_irq(struct hw_trapframe *hw_tf)
477 {
478         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
479         struct irq_handler *irq_h;
480         /* Copy out the TF for now */
481         if (!in_kernel(hw_tf))
482                 set_current_ctx_hw(pcpui, hw_tf);
483         inc_irq_depth(pcpui);
484         /* Coupled with cpu_halt() and smp_idle() */
485         abort_halt(hw_tf);
486         //if (core_id())
487         if (hw_tf->tf_trapno != IdtLAPIC_TIMER) /* timer irq */
488         if (hw_tf->tf_trapno != I_KERNEL_MSG)
489         if (hw_tf->tf_trapno != 65)     /* qemu serial tends to get this one */
490                 printd("Incoming IRQ, ISR: %d on core %d\n", hw_tf->tf_trapno,
491                        core_id());
492         /* TODO: RCU read lock */
493         irq_h = irq_handlers[hw_tf->tf_trapno];
494         if (!irq_h || irq_h->check_spurious(hw_tf->tf_trapno))
495                 goto out_no_eoi;
496         while (irq_h) {
497                 irq_h->isr(hw_tf, irq_h->data);
498                 irq_h = irq_h->next;
499         }
500         // if we're a general purpose IPI function call, down the cpu_list
501         extern handler_wrapper_t handler_wrappers[NUM_HANDLER_WRAPPERS];
502         if ((I_SMP_CALL0 <= hw_tf->tf_trapno) &&
503             (hw_tf->tf_trapno <= I_SMP_CALL_LAST))
504                 down_checklist(handler_wrappers[hw_tf->tf_trapno & 0x0f].cpu_list);
505         /* Keep in sync with ipi_is_pending */
506         irq_handlers[hw_tf->tf_trapno]->eoi(hw_tf->tf_trapno);
507         /* Fall-through */
508 out_no_eoi:
509         dec_irq_depth(pcpui);
510         /* Return to the current process, which should be runnable.  If we're the
511          * kernel, we should just return naturally.  Note that current and tf need
512          * to still be okay (might not be after blocking) */
513         if (in_kernel(hw_tf))
514                 return;
515         proc_restartcore();
516         assert(0);
517 }
518
519 int register_irq(int irq, isr_t handler, void *irq_arg, uint32_t tbdf)
520 {
521         struct irq_handler *irq_h;
522         int vector;
523         irq_h = kzmalloc(sizeof(struct irq_handler), 0);
524         assert(irq_h);
525         irq_h->dev_irq = irq;
526         irq_h->tbdf = tbdf;
527         vector = bus_irq_setup(irq_h);
528         if (vector == -1) {
529                 kfree(irq_h);
530                 return -1;
531         }
532         printk("IRQ %d, vector %d (0x%x), type %s\n", irq, vector, vector,
533                irq_h->type);
534         assert(irq_h->check_spurious && irq_h->eoi);
535         irq_h->isr = handler;
536         irq_h->data = irq_arg;
537         irq_h->apic_vector = vector;
538         /* RCU write lock */
539         spin_lock_irqsave(&irq_handler_wlock);
540         irq_h->next = irq_handlers[vector];
541         wmb();  /* make sure irq_h is done before publishing to readers */
542         irq_handlers[vector] = irq_h;
543         spin_unlock_irqsave(&irq_handler_wlock);
544         /* Most IRQs other than the BusIPI should need their irq unmasked.
545          * Might need to pass the irq_h, in case unmask needs more info.
546          * The lapic IRQs need to be unmasked on a per-core basis */
547         if (irq_h->unmask && strcmp(irq_h->type, "lapic"))
548                 irq_h->unmask(irq_h, vector);
549         return 0;
550 }
551
552 /* These routing functions only allow the routing of an irq to a single core.
553  * If we want to route to multiple cores, we'll probably need to set up logical
554  * groups or something and take some additional parameters. */
555 static int route_irq_h(struct irq_handler *irq_h, int os_coreid)
556 {
557         int hw_coreid;
558         if (!irq_h->route_irq) {
559                 printk("[kernel] apic_vec %d, type %s cannot be routed\n",
560                        irq_h->apic_vector, irq_h->type);
561                 return -1;
562         }
563         if (os_coreid >= MAX_NUM_CPUS) {
564                 printk("[kernel] os_coreid %d out of range!\n", os_coreid);
565                 return -1;
566         }
567         hw_coreid = get_hw_coreid(os_coreid);
568         if (hw_coreid == -1) {
569                 printk("[kernel] os_coreid %d not a valid hw core!\n", os_coreid);
570                 return -1;
571         }
572         irq_h->route_irq(irq_h, irq_h->apic_vector, hw_coreid);
573         return 0;
574 }
575
576 /* Routes all irqs for a given apic_vector to os_coreid.  Returns 0 if all of
577  * them succeeded.  -1 if there were none or if any of them failed.  We don't
578  * share IRQs often (if ever anymore), so this shouldn't be an issue. */
579 int route_irqs(int apic_vec, int os_coreid)
580 {
581         struct irq_handler *irq_h;
582         int ret = -1;
583         if (!vector_is_irq(apic_vec)) {
584                 printk("[kernel] vector %d is not an IRQ vector!\n", apic_vec);
585                 return -1;
586         }
587         irq_h = irq_handlers[apic_vec];
588         while (irq_h) {
589                 assert(irq_h->apic_vector == apic_vec);
590                 ret = route_irq_h(irq_h, os_coreid);
591                 irq_h = irq_h->next;
592         }
593         return ret;
594 }
595
596 /* It's a moderate pain in the ass to put these in bit-specific files (header
597  * hell with the set_current_ helpers) */
598 #ifdef CONFIG_X86_64
599 void sysenter_callwrapper(struct syscall *sysc, unsigned long count,
600                           struct sw_trapframe *sw_tf)
601 {
602         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
603         set_current_ctx_sw(pcpui, sw_tf);
604         /* Once we've set_current_ctx, we can enable interrupts.  This used to be
605          * mandatory (we had immediate KMSGs that would muck with cur_ctx).  Now it
606          * should only help for sanity/debugging. */
607         enable_irq();
608         /* Set up and run the async calls */
609         prep_syscalls(current, sysc, count);
610         /* If you use pcpui again, reread it, since you might have migrated */
611         proc_restartcore();
612 }
613
614 #else
615
616 /* This is called from sysenter's asm, with the tf on the kernel stack. */
617 /* TODO: use a sw_tf for sysenter */
618 void sysenter_callwrapper(struct hw_trapframe *hw_tf)
619 {
620         struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
621         assert(!in_kernel(hw_tf));
622         set_current_ctx_hw(pcpui, hw_tf);
623         /* Once we've set_current_ctx, we can enable interrupts.  This used to be
624          * mandatory (we had immediate KMSGs that would muck with cur_ctx).  Now it
625          * should only help for sanity/debugging. */
626         enable_irq();
627
628         /* Set up and run the async calls */
629         prep_syscalls(current,
630                                   (struct syscall*)x86_get_sysenter_arg0(hw_tf),
631                                   (unsigned int)x86_get_sysenter_arg1(hw_tf));
632         /* If you use pcpui again, reread it, since you might have migrated */
633         proc_restartcore();
634 }
635 #endif
636
637 /* Declared in x86/arch.h */
638 void send_ipi(uint32_t os_coreid, uint8_t vector)
639 {
640         int hw_coreid = get_hw_coreid(os_coreid);
641         if (hw_coreid == -1) {
642                 panic("Unmapped OS coreid (OS %d)!\n", os_coreid);
643                 return;
644         }
645         __send_ipi(hw_coreid, vector);
646 }