hw/sysbus.c

   1 /*
   2  *  System (CPU) Bus device support code
   3  *
   4  *  Copyright (c) 2009 CodeSourcery
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "sysbus.h"
  21 #include "monitor.h"
  22 #include "exec-memory.h"
  23
  24 static void sysbus_dev_print(Monitor *mon, DeviceState *dev, int indent);
  25 static char *sysbus_get_fw_dev_path(DeviceState *dev);
  26
  27 struct BusInfo system_bus_info = {
  28     .name       = "System",
  29     .size       = sizeof(BusState),
  30     .print_dev  = sysbus_dev_print,
  31     .get_fw_dev_path = sysbus_get_fw_dev_path,
  32 };
  33
  34 void sysbus_connect_irq(SysBusDevice *dev, int n, qemu_irq irq)
  35 {
  36     assert(n >= 0 && n < dev->num_irq);
  37     dev->irqs[n] = NULL;
  38     if (dev->irqp[n]) {
  39         *dev->irqp[n] = irq;
  40     }
  41 }
  42
  43 void sysbus_mmio_map(SysBusDevice *dev, int n, target_phys_addr_t addr)
  44 {
  45     assert(n >= 0 && n < dev->num_mmio);
  46
  47     if (dev->mmio[n].addr == addr) {
  48         /* ??? region already mapped here.  */
  49         return;
  50     }
  51     if (dev->mmio[n].addr != (target_phys_addr_t)-1) {
  52         /* Unregister previous mapping.  */
  53         if (dev->mmio[n].memory) {
  54             memory_region_del_subregion(get_system_memory(),
  55                                         dev->mmio[n].memory);
  56         } else if (dev->mmio[n].unmap) {
  57             dev->mmio[n].unmap(dev, dev->mmio[n].addr);
  58         } else {
  59             cpu_register_physical_memory(dev->mmio[n].addr, dev->mmio[n].size,
  60                                          IO_MEM_UNASSIGNED);
  61         }
  62     }
  63     dev->mmio[n].addr = addr;
  64     if (dev->mmio[n].memory) {
  65         memory_region_add_subregion(get_system_memory(),
  66                                     addr,
  67                                     dev->mmio[n].memory);
  68     } else if (dev->mmio[n].cb) {
  69         dev->mmio[n].cb(dev, addr);
  70     } else {
  71         cpu_register_physical_memory(addr, dev->mmio[n].size,
  72                                      dev->mmio[n].iofunc);
  73     }
  74 }
  75
  76
  77 /* Request an IRQ source.  The actual IRQ object may be populated later.  */
  78 void sysbus_init_irq(SysBusDevice *dev, qemu_irq *p)
  79 {
  80     int n;
  81
  82     assert(dev->num_irq < QDEV_MAX_IRQ);
  83     n = dev->num_irq++;
  84     dev->irqp[n] = p;
  85 }
  86
  87 /* Pass IRQs from a target device.  */
  88 void sysbus_pass_irq(SysBusDevice *dev, SysBusDevice *target)
  89 {
  90     int i;
  91     assert(dev->num_irq == 0);
  92     dev->num_irq = target->num_irq;
  93     for (i = 0; i < dev->num_irq; i++) {
  94         dev->irqp[i] = target->irqp[i];
  95     }
  96 }
  97
  98 void sysbus_init_mmio(SysBusDevice *dev, target_phys_addr_t size,
  99                       ram_addr_t iofunc)
 100 {
 101     int n;
 102
 103     assert(dev->num_mmio < QDEV_MAX_MMIO);
 104     n = dev->num_mmio++;
 105     dev->mmio[n].addr = -1;
 106     dev->mmio[n].size = size;
 107     dev->mmio[n].iofunc = iofunc;
 108 }
 109
 110 void sysbus_init_mmio_cb(SysBusDevice *dev, target_phys_addr_t size,
 111                          mmio_mapfunc cb)
 112 {
 113     int n;
 114
 115     assert(dev->num_mmio < QDEV_MAX_MMIO);
 116     n = dev->num_mmio++;
 117     dev->mmio[n].addr = -1;
 118     dev->mmio[n].size = size;
 119     dev->mmio[n].cb = cb;
 120 }
 121
 122 void sysbus_init_mmio_cb2(SysBusDevice *dev,
 123                           mmio_mapfunc cb, mmio_mapfunc unmap)
 124 {
 125     int n;
 126
 127     assert(dev->num_mmio < QDEV_MAX_MMIO);
 128     n = dev->num_mmio++;
 129     dev->mmio[n].addr = -1;
 130     dev->mmio[n].size = 0;
 131     dev->mmio[n].cb = cb;
 132     dev->mmio[n].unmap = unmap;
 133 }
 134
 135 void sysbus_init_mmio_region(SysBusDevice *dev, MemoryRegion *memory)
 136 {
 137     int n;
 138
 139     assert(dev->num_mmio < QDEV_MAX_MMIO);
 140     n = dev->num_mmio++;
 141     dev->mmio[n].addr = -1;
 142     dev->mmio[n].size = memory_region_size(memory);
 143     dev->mmio[n].memory = memory;
 144 }
 145
 146 void sysbus_init_ioports(SysBusDevice *dev, pio_addr_t ioport, pio_addr_t size)
 147 {
 148     pio_addr_t i;
 149
 150     for (i = 0; i < size; i++) {
 151         assert(dev->num_pio < QDEV_MAX_PIO);
 152         dev->pio[dev->num_pio++] = ioport++;
 153     }
 154 }
 155
 156 static int sysbus_device_init(DeviceState *dev, DeviceInfo *base)
 157 {
 158     SysBusDeviceInfo *info = container_of(base, SysBusDeviceInfo, qdev);
 159
 160     return info->init(sysbus_from_qdev(dev));
 161 }
 162
 163 void sysbus_register_withprop(SysBusDeviceInfo *info)
 164 {
 165     info->qdev.init = sysbus_device_init;
 166     info->qdev.bus_info = &system_bus_info;
 167
 168     assert(info->qdev.size >= sizeof(SysBusDevice));
 169     qdev_register(&info->qdev);
 170 }
 171
 172 void sysbus_register_dev(const char *name, size_t size, sysbus_initfn init)
 173 {
 174     SysBusDeviceInfo *info;
 175
 176     info = g_malloc0(sizeof(*info));
 177     info->qdev.name = g_strdup(name);
 178     info->qdev.size = size;
 179     info->init = init;
 180     sysbus_register_withprop(info);
 181 }
 182
 183 DeviceState *sysbus_create_varargs(const char *name,
 184                                    target_phys_addr_t addr, ...)
 185 {
 186     DeviceState *dev;
 187     SysBusDevice *s;
 188     va_list va;
 189     qemu_irq irq;
 190     int n;
 191
 192     dev = qdev_create(NULL, name);
 193     s = sysbus_from_qdev(dev);
 194     qdev_init_nofail(dev);
 195     if (addr != (target_phys_addr_t)-1) {
 196         sysbus_mmio_map(s, 0, addr);
 197     }
 198     va_start(va, addr);
 199     n = 0;
 200     while (1) {
 201         irq = va_arg(va, qemu_irq);
 202         if (!irq) {
 203             break;
 204         }
 205         sysbus_connect_irq(s, n, irq);
 206         n++;
 207     }
 208     return dev;
 209 }
 210
 211 DeviceState *sysbus_try_create_varargs(const char *name,
 212                                        target_phys_addr_t addr, ...)
 213 {
 214     DeviceState *dev;
 215     SysBusDevice *s;
 216     va_list va;
 217     qemu_irq irq;
 218     int n;
 219
 220     dev = qdev_try_create(NULL, name);
 221     if (!dev) {
 222         return NULL;
 223     }
 224     s = sysbus_from_qdev(dev);
 225     qdev_init_nofail(dev);
 226     if (addr != (target_phys_addr_t)-1) {
 227         sysbus_mmio_map(s, 0, addr);
 228     }
 229     va_start(va, addr);
 230     n = 0;
 231     while (1) {
 232         irq = va_arg(va, qemu_irq);
 233         if (!irq) {
 234             break;
 235         }
 236         sysbus_connect_irq(s, n, irq);
 237         n++;
 238     }
 239     return dev;
 240 }
 241
 242 static void sysbus_dev_print(Monitor *mon, DeviceState *dev, int indent)
 243 {
 244     SysBusDevice *s = sysbus_from_qdev(dev);
 245     int i;
 246
 247     monitor_printf(mon, "%*sirq %d\n", indent, "", s->num_irq);
 248     for (i = 0; i < s->num_mmio; i++) {
 249         monitor_printf(mon, "%*smmio " TARGET_FMT_plx "/" TARGET_FMT_plx "\n",
 250                        indent, "", s->mmio[i].addr, s->mmio[i].size);
 251     }
 252 }
 253
 254 static char *sysbus_get_fw_dev_path(DeviceState *dev)
 255 {
 256     SysBusDevice *s = sysbus_from_qdev(dev);
 257     char path[40];
 258     int off;
 259
 260     off = snprintf(path, sizeof(path), "%s", qdev_fw_name(dev));
 261
 262     if (s->num_mmio) {
 263         snprintf(path + off, sizeof(path) - off, "@"TARGET_FMT_plx,
 264                  s->mmio[0].addr);
 265     } else if (s->num_pio) {
 266         snprintf(path + off, sizeof(path) - off, "@i%04x", s->pio[0]);
 267     }
 268
 269     return strdup(path);
 270 }