Move ros/vmx.h to an arch-specific location (XCC)
[akaros.git] / user / vmm / ioapic.c
1 /*
2  * IOAPIC emulation
3  *
4  * Copyright 2015 Google Inc.
5  *
6  * See LICENSE for details.
7  */
8
9 #include <stdio.h>
10 #include <sys/types.h>
11 #include <pthread.h>
12 #include <sys/stat.h>
13 #include <fcntl.h>
14 #include <parlib/arch/arch.h>
15 #include <parlib/ros_debug.h>
16 #include <unistd.h>
17 #include <errno.h>
18 #include <stdlib.h>
19 #include <string.h>
20 #include <sys/uio.h>
21 #include <stdint.h>
22 #include <err.h>
23 #include <sys/mman.h>
24 #include <vmm/vmm.h>
25 #include <vmm/virtio.h>
26 #include <vmm/virtio_mmio.h>
27 #include <vmm/virtio_ids.h>
28 #include <vmm/virtio_config.h>
29
30 #define IOAPIC_CONFIG 0x100
31 #define IOAPIC_NUM_PINS 24
32
33 int debug_ioapic = 1;
34 int apic_id_mask = 0xf0;
35
36 #define DPRINTF(fmt, ...) \
37         if (debug_ioapic) { fprintf(stderr, "ioapic: " fmt , ## __VA_ARGS__); }
38
39
40 struct ioapic {
41         int id;
42         int reg;
43         uint32_t arbid;
44         uint32_t value[256];
45 };
46
47 static struct ioapic ioapic[1];
48
49 static uint32_t ioapic_read(int ix, uint64_t offset)
50 {
51         uint32_t ret = (uint32_t)-1;
52         uint32_t reg = ioapic[ix].reg;
53
54
55         if (offset == 0) {
56                 DPRINTF("ioapic_read ix %x return 0x%x\n", ix, reg);
57                 return reg;
58         }
59
60         DPRINTF("ioapic_read %x 0x%x\n", ix, (int)reg);
61         switch (reg) {
62         case 0:
63                 return ioapic[ix].id;
64                 break;
65         case 1:
66                 return 0x170011;
67                 break;
68         case 2:
69                 return ioapic[ix].arbid;
70                 break;
71         default:
72                 if (reg >= 0 && reg < (IOAPIC_NUM_PINS*2 + 0x10)) {
73                         //bx_io_redirect_entry_t *entry = ioredtbl + index;
74                         //data = (ioregsel&1) ? entry->get_hi_part() : entry->get_lo_part();
75                         ret = ioapic[ix].value[reg];
76                         DPRINTF("IOAPIC_READ %x: %x return %08x\n", ix, reg, ret);
77                         return ret;
78                 } else {
79                         DPRINTF("IOAPIC READ: %x BAD INDEX 0x%x\n", ix, reg);
80                 }
81                 return ret;
82                 break;
83         }
84         return 0;
85 }
86
87 static void ioapic_write(int ix, uint64_t offset, uint32_t value)
88 {
89         uint32_t ret;
90         uint32_t reg = ioapic[ix].reg;
91
92         if (offset == 0) {
93                 DPRINTF("ioapic_write ix %x set reg 0x%x\n", ix, value);
94                 ioapic[ix].reg = value;
95                 return;
96         }
97
98         switch (reg) {
99         case 0:
100                 DPRINTF("IOAPIC_WRITE: Set %d ID to %d\n", ix, value);
101                 ioapic[ix].id = value;
102                 break;
103         case 1:
104         case 2:
105                 DPRINTF("IOAPIC_WRITE: Can't write %d\n", reg);
106         default:
107                 if (reg >= 0 && reg < (IOAPIC_NUM_PINS*2 + 0x10)) {
108                         ioapic[ix].value[reg] = value;
109                         DPRINTF("IOAPIC %x: set %08x to %016x\n", ix, reg, value);
110                 } else {
111                         DPRINTF("IOAPIC WRITE: %x BAD INDEX 0x%x\n", ix, reg);
112                 }
113                 break;
114         }
115
116 }
117
118 int do_ioapic(struct vmctl *v, uint64_t gpa, int destreg, uint64_t *regp, int store)
119 {
120         // TODO: compute an index for the ioapic array. 
121         int ix = 0;
122         uint32_t offset = gpa & 0xfffff;
123         /* basic sanity tests. */
124         DPRINTF("%s: %p 0x%x %p %s\n", __func__, (void *)gpa, destreg, regp, store ? "write" : "read");
125
126         if ((offset != 0) && (offset != 0x10)) {
127                 DPRINTF("Bad register offset: 0x%x and has to be 0x0 or 0x10\n", offset);
128                 return -1;
129         }
130
131         if (store) {
132                 ioapic_write(ix, offset, *regp);
133         } else {
134                 *regp = ioapic_read(ix, offset);
135         }
136
137 }