xref: /openbmc/qemu/hw/i386/xen/xen_platform.c (revision f764718d)
1 /*
2  * XEN platform pci device, formerly known as the event channel device
3  *
4  * Copyright (c) 2003-2004 Intel Corp.
5  * Copyright (c) 2006 XenSource
6  *
7  * Permission is hereby granted, free of charge, to any person obtaining a copy
8  * of this software and associated documentation files (the "Software"), to deal
9  * in the Software without restriction, including without limitation the rights
10  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11  * copies of the Software, and to permit persons to whom the Software is
12  * furnished to do so, subject to the following conditions:
13  *
14  * The above copyright notice and this permission notice shall be included in
15  * all copies or substantial portions of the Software.
16  *
17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
23  * THE SOFTWARE.
24  */
25 
26 #include "qemu/osdep.h"
27 #include "qapi/error.h"
28 #include "hw/hw.h"
29 #include "hw/ide.h"
30 #include "hw/pci/pci.h"
31 #include "hw/irq.h"
32 #include "hw/xen/xen_common.h"
33 #include "hw/xen/xen_backend.h"
34 #include "trace.h"
35 #include "exec/address-spaces.h"
36 #include "sysemu/block-backend.h"
37 #include "qemu/error-report.h"
38 
39 #include <xenguest.h>
40 
41 //#define DEBUG_PLATFORM
42 
43 #ifdef DEBUG_PLATFORM
44 #define DPRINTF(fmt, ...) do { \
45     fprintf(stderr, "xen_platform: " fmt, ## __VA_ARGS__); \
46 } while (0)
47 #else
48 #define DPRINTF(fmt, ...) do { } while (0)
49 #endif
50 
51 #define PFFLAG_ROM_LOCK 1 /* Sets whether ROM memory area is RW or RO */
52 
53 typedef struct PCIXenPlatformState {
54     /*< private >*/
55     PCIDevice parent_obj;
56     /*< public >*/
57 
58     MemoryRegion fixed_io;
59     MemoryRegion bar;
60     MemoryRegion mmio_bar;
61     uint8_t flags; /* used only for version_id == 2 */
62     int drivers_blacklisted;
63     uint16_t driver_product_version;
64 
65     /* Log from guest drivers */
66     char log_buffer[4096];
67     int log_buffer_off;
68 } PCIXenPlatformState;
69 
70 #define TYPE_XEN_PLATFORM "xen-platform"
71 #define XEN_PLATFORM(obj) \
72     OBJECT_CHECK(PCIXenPlatformState, (obj), TYPE_XEN_PLATFORM)
73 
74 #define XEN_PLATFORM_IOPORT 0x10
75 
76 /* Send bytes to syslog */
77 static void log_writeb(PCIXenPlatformState *s, char val)
78 {
79     if (val == '\n' || s->log_buffer_off == sizeof(s->log_buffer) - 1) {
80         /* Flush buffer */
81         s->log_buffer[s->log_buffer_off] = 0;
82         trace_xen_platform_log(s->log_buffer);
83         s->log_buffer_off = 0;
84     } else {
85         s->log_buffer[s->log_buffer_off++] = val;
86     }
87 }
88 
89 /*
90  * Unplug device flags.
91  *
92  * The logic got a little confused at some point in the past but this is
93  * what they do now.
94  *
95  * bit 0: Unplug all IDE and SCSI disks.
96  * bit 1: Unplug all NICs.
97  * bit 2: Unplug IDE disks except primary master. This is overridden if
98  *        bit 0 is also present in the mask.
99  * bit 3: Unplug all NVMe disks.
100  *
101  */
102 #define _UNPLUG_IDE_SCSI_DISKS 0
103 #define UNPLUG_IDE_SCSI_DISKS (1u << _UNPLUG_IDE_SCSI_DISKS)
104 
105 #define _UNPLUG_ALL_NICS 1
106 #define UNPLUG_ALL_NICS (1u << _UNPLUG_ALL_NICS)
107 
108 #define _UNPLUG_AUX_IDE_DISKS 2
109 #define UNPLUG_AUX_IDE_DISKS (1u << _UNPLUG_AUX_IDE_DISKS)
110 
111 #define _UNPLUG_NVME_DISKS 3
112 #define UNPLUG_NVME_DISKS (1u << _UNPLUG_NVME_DISKS)
113 
114 static void unplug_nic(PCIBus *b, PCIDevice *d, void *o)
115 {
116     /* We have to ignore passthrough devices */
117     if (pci_get_word(d->config + PCI_CLASS_DEVICE) ==
118             PCI_CLASS_NETWORK_ETHERNET
119             && strcmp(d->name, "xen-pci-passthrough") != 0) {
120         object_unparent(OBJECT(d));
121     }
122 }
123 
124 /* Remove the peer of the NIC device. Normally, this would be a tap device. */
125 static void del_nic_peer(NICState *nic, void *opaque)
126 {
127     NetClientState *nc;
128 
129     nc = qemu_get_queue(nic);
130     if (nc->peer)
131         qemu_del_net_client(nc->peer);
132 }
133 
134 static void pci_unplug_nics(PCIBus *bus)
135 {
136     qemu_foreach_nic(del_nic_peer, NULL);
137     pci_for_each_device(bus, 0, unplug_nic, NULL);
138 }
139 
140 static void unplug_disks(PCIBus *b, PCIDevice *d, void *opaque)
141 {
142     uint32_t flags = *(uint32_t *)opaque;
143     bool aux = (flags & UNPLUG_AUX_IDE_DISKS) &&
144         !(flags & UNPLUG_IDE_SCSI_DISKS);
145 
146     /* We have to ignore passthrough devices */
147     if (!strcmp(d->name, "xen-pci-passthrough")) {
148         return;
149     }
150 
151     switch (pci_get_word(d->config + PCI_CLASS_DEVICE)) {
152     case PCI_CLASS_STORAGE_IDE:
153         pci_piix3_xen_ide_unplug(DEVICE(d), aux);
154         break;
155 
156     case PCI_CLASS_STORAGE_SCSI:
157         if (!aux) {
158             object_unparent(OBJECT(d));
159         }
160         break;
161 
162     case PCI_CLASS_STORAGE_EXPRESS:
163         if (flags & UNPLUG_NVME_DISKS) {
164             object_unparent(OBJECT(d));
165         }
166 
167     default:
168         break;
169     }
170 }
171 
172 static void pci_unplug_disks(PCIBus *bus, uint32_t flags)
173 {
174     pci_for_each_device(bus, 0, unplug_disks, &flags);
175 }
176 
177 static void platform_fixed_ioport_writew(void *opaque, uint32_t addr, uint32_t val)
178 {
179     PCIXenPlatformState *s = opaque;
180 
181     switch (addr) {
182     case 0: {
183         PCIDevice *pci_dev = PCI_DEVICE(s);
184         /* Unplug devices. See comment above flag definitions */
185         if (val & (UNPLUG_IDE_SCSI_DISKS | UNPLUG_AUX_IDE_DISKS |
186                    UNPLUG_NVME_DISKS)) {
187             DPRINTF("unplug disks\n");
188             pci_unplug_disks(pci_dev->bus, val);
189         }
190         if (val & UNPLUG_ALL_NICS) {
191             DPRINTF("unplug nics\n");
192             pci_unplug_nics(pci_dev->bus);
193         }
194         break;
195     }
196     case 2:
197         switch (val) {
198         case 1:
199             DPRINTF("Citrix Windows PV drivers loaded in guest\n");
200             break;
201         case 0:
202             DPRINTF("Guest claimed to be running PV product 0?\n");
203             break;
204         default:
205             DPRINTF("Unknown PV product %d loaded in guest\n", val);
206             break;
207         }
208         s->driver_product_version = val;
209         break;
210     }
211 }
212 
213 static void platform_fixed_ioport_writel(void *opaque, uint32_t addr,
214                                          uint32_t val)
215 {
216     switch (addr) {
217     case 0:
218         /* PV driver version */
219         break;
220     }
221 }
222 
223 static void platform_fixed_ioport_writeb(void *opaque, uint32_t addr, uint32_t val)
224 {
225     PCIXenPlatformState *s = opaque;
226 
227     switch (addr) {
228     case 0: /* Platform flags */ {
229         hvmmem_type_t mem_type = (val & PFFLAG_ROM_LOCK) ?
230             HVMMEM_ram_ro : HVMMEM_ram_rw;
231         if (xen_set_mem_type(xen_domid, mem_type, 0xc0, 0x40)) {
232             DPRINTF("unable to change ro/rw state of ROM memory area!\n");
233         } else {
234             s->flags = val & PFFLAG_ROM_LOCK;
235             DPRINTF("changed ro/rw state of ROM memory area. now is %s state.\n",
236                     (mem_type == HVMMEM_ram_ro ? "ro":"rw"));
237         }
238         break;
239     }
240     case 2:
241         log_writeb(s, val);
242         break;
243     }
244 }
245 
246 static uint32_t platform_fixed_ioport_readw(void *opaque, uint32_t addr)
247 {
248     PCIXenPlatformState *s = opaque;
249 
250     switch (addr) {
251     case 0:
252         if (s->drivers_blacklisted) {
253             /* The drivers will recognise this magic number and refuse
254              * to do anything. */
255             return 0xd249;
256         } else {
257             /* Magic value so that you can identify the interface. */
258             return 0x49d2;
259         }
260     default:
261         return 0xffff;
262     }
263 }
264 
265 static uint32_t platform_fixed_ioport_readb(void *opaque, uint32_t addr)
266 {
267     PCIXenPlatformState *s = opaque;
268 
269     switch (addr) {
270     case 0:
271         /* Platform flags */
272         return s->flags;
273     case 2:
274         /* Version number */
275         return 1;
276     default:
277         return 0xff;
278     }
279 }
280 
281 static void platform_fixed_ioport_reset(void *opaque)
282 {
283     PCIXenPlatformState *s = opaque;
284 
285     platform_fixed_ioport_writeb(s, 0, 0);
286 }
287 
288 static uint64_t platform_fixed_ioport_read(void *opaque,
289                                            hwaddr addr,
290                                            unsigned size)
291 {
292     switch (size) {
293     case 1:
294         return platform_fixed_ioport_readb(opaque, addr);
295     case 2:
296         return platform_fixed_ioport_readw(opaque, addr);
297     default:
298         return -1;
299     }
300 }
301 
302 static void platform_fixed_ioport_write(void *opaque, hwaddr addr,
303 
304                                         uint64_t val, unsigned size)
305 {
306     switch (size) {
307     case 1:
308         platform_fixed_ioport_writeb(opaque, addr, val);
309         break;
310     case 2:
311         platform_fixed_ioport_writew(opaque, addr, val);
312         break;
313     case 4:
314         platform_fixed_ioport_writel(opaque, addr, val);
315         break;
316     }
317 }
318 
319 
320 static const MemoryRegionOps platform_fixed_io_ops = {
321     .read = platform_fixed_ioport_read,
322     .write = platform_fixed_ioport_write,
323     .valid = {
324         .unaligned = true,
325     },
326     .impl = {
327         .min_access_size = 1,
328         .max_access_size = 4,
329         .unaligned = true,
330     },
331     .endianness = DEVICE_LITTLE_ENDIAN,
332 };
333 
334 static void platform_fixed_ioport_init(PCIXenPlatformState* s)
335 {
336     memory_region_init_io(&s->fixed_io, OBJECT(s), &platform_fixed_io_ops, s,
337                           "xen-fixed", 16);
338     memory_region_add_subregion(get_system_io(), XEN_PLATFORM_IOPORT,
339                                 &s->fixed_io);
340 }
341 
342 /* Xen Platform PCI Device */
343 
344 static uint64_t xen_platform_ioport_readb(void *opaque, hwaddr addr,
345                                           unsigned int size)
346 {
347     if (addr == 0) {
348         return platform_fixed_ioport_readb(opaque, 0);
349     } else {
350         return ~0u;
351     }
352 }
353 
354 static void xen_platform_ioport_writeb(void *opaque, hwaddr addr,
355                                        uint64_t val, unsigned int size)
356 {
357     PCIXenPlatformState *s = opaque;
358     PCIDevice *pci_dev = PCI_DEVICE(s);
359 
360     switch (addr) {
361     case 0: /* Platform flags */
362         platform_fixed_ioport_writeb(opaque, 0, (uint32_t)val);
363         break;
364     case 4:
365         if (val == 1) {
366             /*
367              * SUSE unplug for Xenlinux
368              * xen-kmp used this since xen-3.0.4, instead the official protocol
369              * from xen-3.3+ It did an unconditional "outl(1, (ioaddr + 4));"
370              * Pre VMDP 1.7 used 4 and 8 depending on how VMDP was configured.
371              * If VMDP was to control both disk and LAN it would use 4.
372              * If it controlled just disk or just LAN, it would use 8 below.
373              */
374             pci_unplug_disks(pci_dev->bus, UNPLUG_IDE_SCSI_DISKS);
375             pci_unplug_nics(pci_dev->bus);
376         }
377         break;
378     case 8:
379         switch (val) {
380         case 1:
381             pci_unplug_disks(pci_dev->bus, UNPLUG_IDE_SCSI_DISKS);
382             break;
383         case 2:
384             pci_unplug_nics(pci_dev->bus);
385             break;
386         default:
387             log_writeb(s, (uint32_t)val);
388             break;
389         }
390         break;
391     default:
392         break;
393     }
394 }
395 
396 static const MemoryRegionOps xen_pci_io_ops = {
397     .read  = xen_platform_ioport_readb,
398     .write = xen_platform_ioport_writeb,
399     .impl.min_access_size = 1,
400     .impl.max_access_size = 1,
401 };
402 
403 static void platform_ioport_bar_setup(PCIXenPlatformState *d)
404 {
405     memory_region_init_io(&d->bar, OBJECT(d), &xen_pci_io_ops, d,
406                           "xen-pci", 0x100);
407 }
408 
409 static uint64_t platform_mmio_read(void *opaque, hwaddr addr,
410                                    unsigned size)
411 {
412     DPRINTF("Warning: attempted read from physical address "
413             "0x" TARGET_FMT_plx " in xen platform mmio space\n", addr);
414 
415     return 0;
416 }
417 
418 static void platform_mmio_write(void *opaque, hwaddr addr,
419                                 uint64_t val, unsigned size)
420 {
421     DPRINTF("Warning: attempted write of 0x%"PRIx64" to physical "
422             "address 0x" TARGET_FMT_plx " in xen platform mmio space\n",
423             val, addr);
424 }
425 
426 static const MemoryRegionOps platform_mmio_handler = {
427     .read = &platform_mmio_read,
428     .write = &platform_mmio_write,
429     .endianness = DEVICE_NATIVE_ENDIAN,
430 };
431 
432 static void platform_mmio_setup(PCIXenPlatformState *d)
433 {
434     memory_region_init_io(&d->mmio_bar, OBJECT(d), &platform_mmio_handler, d,
435                           "xen-mmio", 0x1000000);
436 }
437 
438 static int xen_platform_post_load(void *opaque, int version_id)
439 {
440     PCIXenPlatformState *s = opaque;
441 
442     platform_fixed_ioport_writeb(s, 0, s->flags);
443 
444     return 0;
445 }
446 
447 static const VMStateDescription vmstate_xen_platform = {
448     .name = "platform",
449     .version_id = 4,
450     .minimum_version_id = 4,
451     .post_load = xen_platform_post_load,
452     .fields = (VMStateField[]) {
453         VMSTATE_PCI_DEVICE(parent_obj, PCIXenPlatformState),
454         VMSTATE_UINT8(flags, PCIXenPlatformState),
455         VMSTATE_END_OF_LIST()
456     }
457 };
458 
459 static void xen_platform_realize(PCIDevice *dev, Error **errp)
460 {
461     PCIXenPlatformState *d = XEN_PLATFORM(dev);
462     uint8_t *pci_conf;
463 
464     /* Device will crash on reset if xen is not initialized */
465     if (!xen_enabled()) {
466         error_setg(errp, "xen-platform device requires the Xen accelerator");
467         return;
468     }
469 
470     pci_conf = dev->config;
471 
472     pci_set_word(pci_conf + PCI_COMMAND, PCI_COMMAND_IO | PCI_COMMAND_MEMORY);
473 
474     pci_config_set_prog_interface(pci_conf, 0);
475 
476     pci_conf[PCI_INTERRUPT_PIN] = 1;
477 
478     platform_ioport_bar_setup(d);
479     pci_register_bar(dev, 0, PCI_BASE_ADDRESS_SPACE_IO, &d->bar);
480 
481     /* reserve 16MB mmio address for share memory*/
482     platform_mmio_setup(d);
483     pci_register_bar(dev, 1, PCI_BASE_ADDRESS_MEM_PREFETCH,
484                      &d->mmio_bar);
485 
486     platform_fixed_ioport_init(d);
487 }
488 
489 static void platform_reset(DeviceState *dev)
490 {
491     PCIXenPlatformState *s = XEN_PLATFORM(dev);
492 
493     platform_fixed_ioport_reset(s);
494 }
495 
496 static void xen_platform_class_init(ObjectClass *klass, void *data)
497 {
498     DeviceClass *dc = DEVICE_CLASS(klass);
499     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
500 
501     k->realize = xen_platform_realize;
502     k->vendor_id = PCI_VENDOR_ID_XEN;
503     k->device_id = PCI_DEVICE_ID_XEN_PLATFORM;
504     k->class_id = PCI_CLASS_OTHERS << 8 | 0x80;
505     k->subsystem_vendor_id = PCI_VENDOR_ID_XEN;
506     k->subsystem_id = PCI_DEVICE_ID_XEN_PLATFORM;
507     k->revision = 1;
508     set_bit(DEVICE_CATEGORY_MISC, dc->categories);
509     dc->desc = "XEN platform pci device";
510     dc->reset = platform_reset;
511     dc->vmsd = &vmstate_xen_platform;
512 }
513 
514 static const TypeInfo xen_platform_info = {
515     .name          = TYPE_XEN_PLATFORM,
516     .parent        = TYPE_PCI_DEVICE,
517     .instance_size = sizeof(PCIXenPlatformState),
518     .class_init    = xen_platform_class_init,
519     .interfaces = (InterfaceInfo[]) {
520         { INTERFACE_CONVENTIONAL_PCI_DEVICE },
521         { },
522     },
523 };
524 
525 static void xen_platform_register_types(void)
526 {
527     type_register_static(&xen_platform_info);
528 }
529 
530 type_init(xen_platform_register_types)
531