piix4.c 20.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
/*
 * ACPI implementation
 *
 * Copyright (c) 2006 Fabrice Bellard
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License version 2 as published by the Free Software Foundation.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, see <http://www.gnu.org/licenses/>
17 18 19
 *
 * Contributions after 2012-01-13 are licensed under the terms of the
 * GNU GPL, version 2 or (at your option) any later version.
20
 */
21
#include "hw/hw.h"
P
Paolo Bonzini 已提交
22 23 24
#include "hw/i386/pc.h"
#include "hw/isa/apm.h"
#include "hw/i2c/pm_smbus.h"
25
#include "hw/pci/pci.h"
P
Paolo Bonzini 已提交
26
#include "hw/acpi/acpi.h"
27
#include "sysemu/sysemu.h"
28
#include "qemu/range.h"
29
#include "exec/ioport.h"
P
Paolo Bonzini 已提交
30
#include "hw/nvram/fw_cfg.h"
31
#include "exec/address-spaces.h"
32 33 34

//#define DEBUG

35 36 37 38 39 40
#ifdef DEBUG
# define PIIX4_DPRINTF(format, ...)     printf(format, ## __VA_ARGS__)
#else
# define PIIX4_DPRINTF(format, ...)     do { } while (0)
#endif

41
#define GPE_BASE 0xafe0
42
#define GPE_LEN 4
43 44 45

#define PCI_HOTPLUG_ADDR 0xae00
#define PCI_HOTPLUG_SIZE 0x000f
46 47
#define PCI_UP_BASE 0xae00
#define PCI_DOWN_BASE 0xae04
48
#define PCI_EJ_BASE 0xae08
49
#define PCI_RMV_BASE 0xae0c
50

51 52 53
#define PIIX4_PROC_BASE 0xaf00
#define PIIX4_PROC_LEN 32

54
#define PIIX4_PCI_HOTPLUG_STATUS 2
55
#define PIIX4_CPU_HOTPLUG_STATUS 4
56

57
struct pci_status {
58
    uint32_t up; /* deprecated, maintained for migration compatibility */
59 60 61
    uint32_t down;
};

62 63 64 65
typedef struct CPUStatus {
    uint8_t sts[PIIX4_PROC_LEN];
} CPUStatus;

66 67
typedef struct PIIX4PMState {
    PCIDevice dev;
68

G
Gerd Hoffmann 已提交
69
    MemoryRegion io;
70
    MemoryRegion io_gpe;
71
    MemoryRegion io_pci;
72
    MemoryRegion io_cpu;
G
Gerd Hoffmann 已提交
73
    ACPIREGS ar;
74 75 76 77

    APMState apm;

    PMSMBus smb;
I
Isaku Yamahata 已提交
78
    uint32_t smb_io_base;
79 80 81 82

    qemu_irq irq;
    qemu_irq smi_irq;
    int kvm_enabled;
83
    Notifier machine_ready;
84
    Notifier powerdown_notifier;
85 86 87

    /* for pci hotplug */
    struct pci_status pci0_status;
88
    uint32_t pci0_hotplug_enable;
89
    uint32_t pci0_slot_device_present;
90 91 92 93

    uint8_t disable_s3;
    uint8_t disable_s4;
    uint8_t s4_val;
94 95 96

    CPUStatus gpe_cpu;
    Notifier cpu_added_notifier;
97 98
} PIIX4PMState;

99 100
static void piix4_acpi_system_hot_add_init(MemoryRegion *parent,
                                           PCIBus *bus, PIIX4PMState *s);
101

102 103 104 105 106 107 108
#define ACPI_ENABLE 0xf1
#define ACPI_DISABLE 0xf0

static void pm_update_sci(PIIX4PMState *s)
{
    int sci_level, pmsts;

109
    pmsts = acpi_pm1_evt_get_sts(&s->ar);
G
Gerd Hoffmann 已提交
110
    sci_level = (((pmsts & s->ar.pm1.evt.en) &
111 112 113
                  (ACPI_BITMASK_RT_CLOCK_ENABLE |
                   ACPI_BITMASK_POWER_BUTTON_ENABLE |
                   ACPI_BITMASK_GLOBAL_LOCK_ENABLE |
114
                   ACPI_BITMASK_TIMER_ENABLE)) != 0) ||
115 116
        (((s->ar.gpe.sts[0] & s->ar.gpe.en[0]) &
          (PIIX4_PCI_HOTPLUG_STATUS | PIIX4_CPU_HOTPLUG_STATUS)) != 0);
117

118 119
    qemu_set_irq(s->irq, sci_level);
    /* schedule a timer interruption if needed */
G
Gerd Hoffmann 已提交
120
    acpi_pm_tmr_update(&s->ar, (s->ar.pm1.evt.en & ACPI_BITMASK_TIMER_ENABLE) &&
121
                       !(pmsts & ACPI_BITMASK_TIMER_STATUS));
122 123
}

G
Gerd Hoffmann 已提交
124
static void pm_tmr_timer(ACPIREGS *ar)
125
{
G
Gerd Hoffmann 已提交
126
    PIIX4PMState *s = container_of(ar, PIIX4PMState, ar);
127 128 129 130 131 132 133 134
    pm_update_sci(s);
}

static void apm_ctrl_changed(uint32_t val, void *arg)
{
    PIIX4PMState *s = arg;

    /* ACPI specs 3.0, 4.7.2.5 */
G
Gerd Hoffmann 已提交
135
    acpi_pm1_cnt_update(&s->ar, val == ACPI_ENABLE, val == ACPI_DISABLE);
136 137 138 139 140 141 142 143 144 145 146 147

    if (s->dev.config[0x5b] & (1 << 1)) {
        if (s->smi_irq) {
            qemu_irq_raise(s->smi_irq);
        }
    }
}

static void pm_io_space_update(PIIX4PMState *s)
{
    uint32_t pm_io_base;

G
Gerd Hoffmann 已提交
148 149
    pm_io_base = le32_to_cpu(*(uint32_t *)(s->dev.config + 0x40));
    pm_io_base &= 0xffc0;
150

G
Gerd Hoffmann 已提交
151 152 153 154
    memory_region_transaction_begin();
    memory_region_set_enabled(&s->io, s->dev.config[0x80] & 1);
    memory_region_set_address(&s->io, pm_io_base);
    memory_region_transaction_commit();
155 156
}

G
Gerd Hoffmann 已提交
157 158 159 160 161 162 163 164 165
static void smbus_io_space_update(PIIX4PMState *s)
{
    s->smb_io_base = le32_to_cpu(*(uint32_t *)(s->dev.config + 0x90));
    s->smb_io_base &= 0xffc0;

    memory_region_transaction_begin();
    memory_region_set_enabled(&s->smb.io, s->dev.config[0xd2] & 1);
    memory_region_set_address(&s->smb.io, s->smb_io_base);
    memory_region_transaction_commit();
166 167 168 169 170 171
}

static void pm_write_config(PCIDevice *d,
                            uint32_t address, uint32_t val, int len)
{
    pci_default_write_config(d, address, val, len);
G
Gerd Hoffmann 已提交
172 173
    if (range_covers_byte(address, len, 0x80) ||
        ranges_overlap(address, len, 0x40, 4)) {
174
        pm_io_space_update((PIIX4PMState *)d);
G
Gerd Hoffmann 已提交
175 176 177 178 179
    }
    if (range_covers_byte(address, len, 0xd2) ||
        ranges_overlap(address, len, 0x90, 4)) {
        smbus_io_space_update((PIIX4PMState *)d);
    }
180 181
}

182 183 184 185 186 187 188 189 190 191 192
static void vmstate_pci_status_pre_save(void *opaque)
{
    struct pci_status *pci0_status = opaque;
    PIIX4PMState *s = container_of(pci0_status, PIIX4PMState, pci0_status);

    /* We no longer track up, so build a safe value for migrating
     * to a version that still does... of course these might get lost
     * by an old buggy implementation, but we try. */
    pci0_status->up = s->pci0_slot_device_present & s->pci0_hotplug_enable;
}

193 194 195 196 197 198 199 200
static int vmstate_acpi_post_load(void *opaque, int version_id)
{
    PIIX4PMState *s = opaque;

    pm_io_space_update(s);
    return 0;
}

201 202 203 204 205 206
#define VMSTATE_GPE_ARRAY(_field, _state)                            \
 {                                                                   \
     .name       = (stringify(_field)),                              \
     .version_id = 0,                                                \
     .info       = &vmstate_info_uint16,                             \
     .size       = sizeof(uint16_t),                                 \
207
     .flags      = VMS_SINGLE | VMS_POINTER,                         \
208 209 210
     .offset     = vmstate_offset_pointer(_state, _field, uint8_t),  \
 }

211 212 213 214 215 216
static const VMStateDescription vmstate_gpe = {
    .name = "gpe",
    .version_id = 1,
    .minimum_version_id = 1,
    .minimum_version_id_old = 1,
    .fields      = (VMStateField []) {
217 218
        VMSTATE_GPE_ARRAY(sts, ACPIGPE),
        VMSTATE_GPE_ARRAY(en, ACPIGPE),
219 220 221 222 223 224 225 226 227
        VMSTATE_END_OF_LIST()
    }
};

static const VMStateDescription vmstate_pci_status = {
    .name = "pci_status",
    .version_id = 1,
    .minimum_version_id = 1,
    .minimum_version_id_old = 1,
228
    .pre_save = vmstate_pci_status_pre_save,
229 230 231 232 233 234 235
    .fields      = (VMStateField []) {
        VMSTATE_UINT32(up, struct pci_status),
        VMSTATE_UINT32(down, struct pci_status),
        VMSTATE_END_OF_LIST()
    }
};

236 237 238 239 240 241 242 243 244 245 246 247 248 249
static int acpi_load_old(QEMUFile *f, void *opaque, int version_id)
{
    PIIX4PMState *s = opaque;
    int ret, i;
    uint16_t temp;

    ret = pci_device_load(&s->dev, f);
    if (ret < 0) {
        return ret;
    }
    qemu_get_be16s(f, &s->ar.pm1.evt.sts);
    qemu_get_be16s(f, &s->ar.pm1.evt.en);
    qemu_get_be16s(f, &s->ar.pm1.cnt.cnt);

250
    ret = vmstate_load_state(f, &vmstate_apm, &s->apm, 1);
251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267
    if (ret) {
        return ret;
    }

    qemu_get_timer(f, s->ar.tmr.timer);
    qemu_get_sbe64s(f, &s->ar.tmr.overflow_time);

    qemu_get_be16s(f, (uint16_t *)s->ar.gpe.sts);
    for (i = 0; i < 3; i++) {
        qemu_get_be16s(f, &temp);
    }

    qemu_get_be16s(f, (uint16_t *)s->ar.gpe.en);
    for (i = 0; i < 3; i++) {
        qemu_get_be16s(f, &temp);
    }

268
    ret = vmstate_load_state(f, &vmstate_pci_status, &s->pci0_status, 1);
269 270 271 272 273 274 275 276 277
    return ret;
}

/* qemu-kvm 1.2 uses version 3 but advertised as 2
 * To support incoming qemu-kvm 1.2 migration, change version_id
 * and minimum_version_id to 2 below (which breaks migration from
 * qemu 1.2).
 *
 */
278 279
static const VMStateDescription vmstate_acpi = {
    .name = "piix4_pm",
280 281
    .version_id = 3,
    .minimum_version_id = 3,
282
    .minimum_version_id_old = 1,
283
    .load_state_old = acpi_load_old,
284 285 286
    .post_load = vmstate_acpi_post_load,
    .fields      = (VMStateField []) {
        VMSTATE_PCI_DEVICE(dev, PIIX4PMState),
G
Gerd Hoffmann 已提交
287 288 289
        VMSTATE_UINT16(ar.pm1.evt.sts, PIIX4PMState),
        VMSTATE_UINT16(ar.pm1.evt.en, PIIX4PMState),
        VMSTATE_UINT16(ar.pm1.cnt.cnt, PIIX4PMState),
290
        VMSTATE_STRUCT(apm, PIIX4PMState, 0, vmstate_apm, APMState),
G
Gerd Hoffmann 已提交
291 292 293
        VMSTATE_TIMER(ar.tmr.timer, PIIX4PMState),
        VMSTATE_INT64(ar.tmr.overflow_time, PIIX4PMState),
        VMSTATE_STRUCT(ar.gpe, PIIX4PMState, 2, vmstate_gpe, ACPIGPE),
294 295
        VMSTATE_STRUCT(pci0_status, PIIX4PMState, 2, vmstate_pci_status,
                       struct pci_status),
296 297 298 299
        VMSTATE_END_OF_LIST()
    }
};

300 301
static void acpi_piix_eject_slot(PIIX4PMState *s, unsigned slots)
{
A
Anthony Liguori 已提交
302
    BusChild *kid, *next;
303 304
    BusState *bus = qdev_get_parent_bus(&s->dev.qdev);
    int slot = ffs(slots) - 1;
305
    bool slot_free = true;
306 307 308 309

    /* Mark request as complete */
    s->pci0_status.down &= ~(1U << slot);

A
Anthony Liguori 已提交
310 311
    QTAILQ_FOREACH_SAFE(kid, &bus->children, sibling, next) {
        DeviceState *qdev = kid->child;
312 313
        PCIDevice *dev = PCI_DEVICE(qdev);
        PCIDeviceClass *pc = PCI_DEVICE_GET_CLASS(dev);
314 315 316 317 318 319
        if (PCI_SLOT(dev->devfn) == slot) {
            if (pc->no_hotplug) {
                slot_free = false;
            } else {
                qdev_free(qdev);
            }
320 321
        }
    }
322 323 324
    if (slot_free) {
        s->pci0_slot_device_present &= ~(1U << slot);
    }
325 326
}

327 328 329 330
static void piix4_update_hotplug(PIIX4PMState *s)
{
    PCIDevice *dev = &s->dev;
    BusState *bus = qdev_get_parent_bus(&dev->qdev);
A
Anthony Liguori 已提交
331
    BusChild *kid, *next;
332

333 334 335 336 337
    /* Execute any pending removes during reset */
    while (s->pci0_status.down) {
        acpi_piix_eject_slot(s, s->pci0_status.down);
    }

338
    s->pci0_hotplug_enable = ~0;
339
    s->pci0_slot_device_present = 0;
340

A
Anthony Liguori 已提交
341 342
    QTAILQ_FOREACH_SAFE(kid, &bus->children, sibling, next) {
        DeviceState *qdev = kid->child;
343 344
        PCIDevice *pdev = PCI_DEVICE(qdev);
        PCIDeviceClass *pc = PCI_DEVICE_GET_CLASS(pdev);
345 346
        int slot = PCI_SLOT(pdev->devfn);

347
        if (pc->no_hotplug) {
348
            s->pci0_hotplug_enable &= ~(1U << slot);
349
        }
350 351

        s->pci0_slot_device_present |= (1U << slot);
352 353 354
    }
}

355 356 357 358 359 360 361 362 363 364
static void piix4_reset(void *opaque)
{
    PIIX4PMState *s = opaque;
    uint8_t *pci_conf = s->dev.config;

    pci_conf[0x58] = 0;
    pci_conf[0x59] = 0;
    pci_conf[0x5a] = 0;
    pci_conf[0x5b] = 0;

365 366 367
    pci_conf[0x40] = 0x01; /* PM io base read only bit */
    pci_conf[0x80] = 0;

368 369 370 371
    if (s->kvm_enabled) {
        /* Mark SMM as already inited (until KVM supports SMM). */
        pci_conf[0x5B] = 0x02;
    }
372
    piix4_update_hotplug(s);
373 374
}

375
static void piix4_pm_powerdown_req(Notifier *n, void *opaque)
376
{
377
    PIIX4PMState *s = container_of(n, PIIX4PMState, powerdown_notifier);
378

G
Gerd Hoffmann 已提交
379 380
    assert(s != NULL);
    acpi_pm1_evt_power_down(&s->ar);
381 382
}

383
static void piix4_pm_machine_ready(Notifier *n, void *opaque)
384 385 386 387 388 389 390 391 392 393 394 395
{
    PIIX4PMState *s = container_of(n, PIIX4PMState, machine_ready);
    uint8_t *pci_conf;

    pci_conf = s->dev.config;
    pci_conf[0x5f] = (isa_is_ioport_assigned(0x378) ? 0x80 : 0) | 0x10;
    pci_conf[0x63] = 0x60;
    pci_conf[0x67] = (isa_is_ioport_assigned(0x3f8) ? 0x08 : 0) |
	(isa_is_ioport_assigned(0x2f8) ? 0x90 : 0);

}

I
Isaku Yamahata 已提交
396
static int piix4_pm_initfn(PCIDevice *dev)
397
{
I
Isaku Yamahata 已提交
398
    PIIX4PMState *s = DO_UPCAST(PIIX4PMState, dev, dev);
399 400 401 402 403 404 405 406 407
    uint8_t *pci_conf;

    pci_conf = s->dev.config;
    pci_conf[0x06] = 0x80;
    pci_conf[0x07] = 0x02;
    pci_conf[0x09] = 0x00;
    pci_conf[0x3d] = 0x01; // interrupt pin 1

    /* APM */
J
Julien Grall 已提交
408
    apm_init(dev, &s->apm, apm_ctrl_changed, s);
409 410 411 412 413 414 415 416 417

    if (s->kvm_enabled) {
        /* Mark SMM as already inited to prevent SMM from running.  KVM does not
         * support SMM mode. */
        pci_conf[0x5B] = 0x02;
    }

    /* XXX: which specification is used ? The i82731AB has different
       mappings */
I
Isaku Yamahata 已提交
418 419
    pci_conf[0x90] = s->smb_io_base | 1;
    pci_conf[0x91] = s->smb_io_base >> 8;
420
    pci_conf[0xd2] = 0x09;
G
Gerd Hoffmann 已提交
421
    pm_smbus_init(&s->dev.qdev, &s->smb);
G
Gerd Hoffmann 已提交
422
    memory_region_set_enabled(&s->smb.io, pci_conf[0xd2] & 1);
423 424
    memory_region_add_subregion(pci_address_space_io(dev),
                                s->smb_io_base, &s->smb.io);
425

G
Gerd Hoffmann 已提交
426
    memory_region_init(&s->io, "piix4-pm", 64);
G
Gerd Hoffmann 已提交
427
    memory_region_set_enabled(&s->io, false);
428 429
    memory_region_add_subregion(pci_address_space_io(dev),
                                0, &s->io);
430

G
Gerd Hoffmann 已提交
431
    acpi_pm_tmr_init(&s->ar, pm_tmr_timer, &s->io);
G
Gerd Hoffmann 已提交
432
    acpi_pm1_evt_init(&s->ar, pm_tmr_timer, &s->io);
433
    acpi_pm1_cnt_init(&s->ar, &s->io, s->s4_val);
G
Gerd Hoffmann 已提交
434
    acpi_gpe_init(&s->ar, GPE_LEN);
435

436 437
    s->powerdown_notifier.notify = piix4_pm_powerdown_req;
    qemu_register_powerdown_notifier(&s->powerdown_notifier);
438

439 440
    s->machine_ready.notify = piix4_pm_machine_ready;
    qemu_add_machine_init_done_notifier(&s->machine_ready);
I
Isaku Yamahata 已提交
441
    qemu_register_reset(piix4_reset, s);
442 443

    piix4_acpi_system_hot_add_init(pci_address_space_io(dev), dev->bus, s);
I
Isaku Yamahata 已提交
444 445 446 447 448

    return 0;
}

i2c_bus *piix4_pm_init(PCIBus *bus, int devfn, uint32_t smb_io_base,
449
                       qemu_irq sci_irq, qemu_irq smi_irq,
L
Laszlo Ersek 已提交
450
                       int kvm_enabled, FWCfgState *fw_cfg)
I
Isaku Yamahata 已提交
451 452 453 454 455 456
{
    PCIDevice *dev;
    PIIX4PMState *s;

    dev = pci_create(bus, devfn, "PIIX4_PM");
    qdev_prop_set_uint32(&dev->qdev, "smb_io_base", smb_io_base);
457

I
Isaku Yamahata 已提交
458
    s = DO_UPCAST(PIIX4PMState, dev, dev);
459 460
    s->irq = sci_irq;
    s->smi_irq = smi_irq;
I
Isaku Yamahata 已提交
461 462 463
    s->kvm_enabled = kvm_enabled;

    qdev_init_nofail(&dev->qdev);
464

465 466 467 468 469 470 471 472
    if (fw_cfg) {
        uint8_t suspend[6] = {128, 0, 0, 129, 128, 128};
        suspend[3] = 1 | ((!s->disable_s3) << 7);
        suspend[4] = s->s4_val | ((!s->disable_s4) << 7);

        fw_cfg_add_file(fw_cfg, "etc/system-states", g_memdup(suspend, 6), 6);
    }

473 474 475
    return s->smb.smbus;
}

476 477
static Property piix4_pm_properties[] = {
    DEFINE_PROP_UINT32("smb_io_base", PIIX4PMState, smb_io_base, 0),
478 479 480
    DEFINE_PROP_UINT8("disable_s3", PIIX4PMState, disable_s3, 0),
    DEFINE_PROP_UINT8("disable_s4", PIIX4PMState, disable_s4, 0),
    DEFINE_PROP_UINT8("s4_val", PIIX4PMState, s4_val, 2),
481 482 483 484 485
    DEFINE_PROP_END_OF_LIST(),
};

static void piix4_pm_class_init(ObjectClass *klass, void *data)
{
486
    DeviceClass *dc = DEVICE_CLASS(klass);
487 488 489 490 491 492 493 494 495
    PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);

    k->no_hotplug = 1;
    k->init = piix4_pm_initfn;
    k->config_write = pm_write_config;
    k->vendor_id = PCI_VENDOR_ID_INTEL;
    k->device_id = PCI_DEVICE_ID_INTEL_82371AB_3;
    k->revision = 0x03;
    k->class_id = PCI_CLASS_BRIDGE_OTHER;
496 497 498 499
    dc->desc = "PM";
    dc->no_user = 1;
    dc->vmsd = &vmstate_acpi;
    dc->props = piix4_pm_properties;
500 501
}

502
static const TypeInfo piix4_pm_info = {
503 504 505 506
    .name          = "PIIX4_PM",
    .parent        = TYPE_PCI_DEVICE,
    .instance_size = sizeof(PIIX4PMState),
    .class_init    = piix4_pm_class_init,
I
Isaku Yamahata 已提交
507 508
};

A
Andreas Färber 已提交
509
static void piix4_pm_register_types(void)
I
Isaku Yamahata 已提交
510
{
511
    type_register_static(&piix4_pm_info);
I
Isaku Yamahata 已提交
512 513
}

A
Andreas Färber 已提交
514
type_init(piix4_pm_register_types)
I
Isaku Yamahata 已提交
515

516
static uint64_t gpe_readb(void *opaque, hwaddr addr, unsigned width)
517
{
518
    PIIX4PMState *s = opaque;
G
Gerd Hoffmann 已提交
519
    uint32_t val = acpi_gpe_ioport_readb(&s->ar, addr);
520

521
    PIIX4_DPRINTF("gpe read %x == %x\n", addr, val);
522 523 524
    return val;
}

525 526
static void gpe_writeb(void *opaque, hwaddr addr, uint64_t val,
                       unsigned width)
527
{
528 529
    PIIX4PMState *s = opaque;

G
Gerd Hoffmann 已提交
530
    acpi_gpe_ioport_writeb(&s->ar, addr, val);
531
    pm_update_sci(s);
532

533
    PIIX4_DPRINTF("gpe write %x <== %d\n", addr, val);
534 535
}

536 537 538 539 540 541 542 543 544 545
static const MemoryRegionOps piix4_gpe_ops = {
    .read = gpe_readb,
    .write = gpe_writeb,
    .valid.min_access_size = 1,
    .valid.max_access_size = 4,
    .impl.min_access_size = 1,
    .impl.max_access_size = 1,
    .endianness = DEVICE_LITTLE_ENDIAN,
};

546
static uint64_t pci_read(void *opaque, hwaddr addr, unsigned int size)
547
{
548
    PIIX4PMState *s = opaque;
549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571
    uint32_t val = 0;

    switch (addr) {
    case PCI_UP_BASE - PCI_HOTPLUG_ADDR:
        /* Manufacture an "up" value to cause a device check on any hotplug
         * slot with a device.  Extra device checks are harmless. */
        val = s->pci0_slot_device_present & s->pci0_hotplug_enable;
        PIIX4_DPRINTF("pci_up_read %x\n", val);
        break;
    case PCI_DOWN_BASE - PCI_HOTPLUG_ADDR:
        val = s->pci0_status.down;
        PIIX4_DPRINTF("pci_down_read %x\n", val);
        break;
    case PCI_EJ_BASE - PCI_HOTPLUG_ADDR:
        /* No feature defined yet */
        PIIX4_DPRINTF("pci_features_read %x\n", val);
        break;
    case PCI_RMV_BASE - PCI_HOTPLUG_ADDR:
        val = s->pci0_hotplug_enable;
        break;
    default:
        break;
    }
572 573

    return val;
574 575
}

576 577
static void pci_write(void *opaque, hwaddr addr, uint64_t data,
                      unsigned int size)
578
{
579 580 581 582 583 584 585 586 587
    switch (addr) {
    case PCI_EJ_BASE - PCI_HOTPLUG_ADDR:
        acpi_piix_eject_slot(opaque, (uint32_t)data);
        PIIX4_DPRINTF("pciej write %" HWADDR_PRIx " <== % " PRIu64 "\n",
                      addr, data);
        break;
    default:
        break;
    }
588 589
}

590
static const MemoryRegionOps piix4_pci_ops = {
591 592
    .read = pci_read,
    .write = pci_write,
593
    .endianness = DEVICE_LITTLE_ENDIAN,
594 595 596 597
    .valid = {
        .min_access_size = 4,
        .max_access_size = 4,
    },
598 599
};

600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666
static uint64_t cpu_status_read(void *opaque, hwaddr addr, unsigned int size)
{
    PIIX4PMState *s = opaque;
    CPUStatus *cpus = &s->gpe_cpu;
    uint64_t val = cpus->sts[addr];

    return val;
}

static void cpu_status_write(void *opaque, hwaddr addr, uint64_t data,
                             unsigned int size)
{
    /* TODO: implement VCPU removal on guest signal that CPU can be removed */
}

static const MemoryRegionOps cpu_hotplug_ops = {
    .read = cpu_status_read,
    .write = cpu_status_write,
    .endianness = DEVICE_LITTLE_ENDIAN,
    .valid = {
        .min_access_size = 1,
        .max_access_size = 1,
    },
};

typedef enum {
    PLUG,
    UNPLUG,
} HotplugEventType;

static void piix4_cpu_hotplug_req(PIIX4PMState *s, CPUState *cpu,
                                  HotplugEventType action)
{
    CPUStatus *g = &s->gpe_cpu;
    ACPIGPE *gpe = &s->ar.gpe;
    CPUClass *k = CPU_GET_CLASS(cpu);
    int64_t cpu_id;

    assert(s != NULL);

    *gpe->sts = *gpe->sts | PIIX4_CPU_HOTPLUG_STATUS;
    cpu_id = k->get_arch_id(CPU(cpu));
    if (action == PLUG) {
        g->sts[cpu_id / 8] |= (1 << (cpu_id % 8));
    } else {
        g->sts[cpu_id / 8] &= ~(1 << (cpu_id % 8));
    }
    pm_update_sci(s);
}

static void piix4_cpu_added_req(Notifier *n, void *opaque)
{
    PIIX4PMState *s = container_of(n, PIIX4PMState, cpu_added_notifier);

    piix4_cpu_hotplug_req(s, CPU(opaque), PLUG);
}

static void piix4_init_cpu_status(CPUState *cpu, void *data)
{
    CPUStatus *g = (CPUStatus *)data;
    CPUClass *k = CPU_GET_CLASS(cpu);
    int64_t id = k->get_arch_id(cpu);

    g_assert((id / 8) < PIIX4_PROC_LEN);
    g->sts[id / 8] |= (1 << (id % 8));
}

667 668
static int piix4_device_hotplug(DeviceState *qdev, PCIDevice *dev,
                                PCIHotplugState state);
669

670 671
static void piix4_acpi_system_hot_add_init(MemoryRegion *parent,
                                           PCIBus *bus, PIIX4PMState *s)
672
{
673 674
    memory_region_init_io(&s->io_gpe, &piix4_gpe_ops, s, "apci-gpe0",
                          GPE_LEN);
675
    memory_region_add_subregion(parent, GPE_BASE, &s->io_gpe);
676

677 678
    memory_region_init_io(&s->io_pci, &piix4_pci_ops, s, "apci-pci-hotplug",
                          PCI_HOTPLUG_SIZE);
679
    memory_region_add_subregion(parent, PCI_HOTPLUG_ADDR,
680
                                &s->io_pci);
681
    pci_bus_hotplug(bus, piix4_device_hotplug, &s->dev.qdev);
682 683 684 685 686 687 688

    qemu_for_each_cpu(piix4_init_cpu_status, &s->gpe_cpu);
    memory_region_init_io(&s->io_cpu, &cpu_hotplug_ops, s, "apci-cpu-hotplug",
                          PIIX4_PROC_LEN);
    memory_region_add_subregion(parent, PIIX4_PROC_BASE, &s->io_cpu);
    s->cpu_added_notifier.notify = piix4_cpu_added_req;
    qemu_register_cpu_added_notifier(&s->cpu_added_notifier);
689 690
}

691
static void enable_device(PIIX4PMState *s, int slot)
692
{
G
Gerd Hoffmann 已提交
693
    s->ar.gpe.sts[0] |= PIIX4_PCI_HOTPLUG_STATUS;
694
    s->pci0_slot_device_present |= (1U << slot);
695 696
}

697
static void disable_device(PIIX4PMState *s, int slot)
698
{
G
Gerd Hoffmann 已提交
699
    s->ar.gpe.sts[0] |= PIIX4_PCI_HOTPLUG_STATUS;
700
    s->pci0_status.down |= (1U << slot);
701 702
}

703 704
static int piix4_device_hotplug(DeviceState *qdev, PCIDevice *dev,
				PCIHotplugState state)
705 706
{
    int slot = PCI_SLOT(dev->devfn);
707
    PIIX4PMState *s = DO_UPCAST(PIIX4PMState, dev,
708
                                PCI_DEVICE(qdev));
709

710 711 712 713
    /* Don't send event when device is enabled during qemu machine creation:
     * it is present on boot, no hotplug event is necessary. We do send an
     * event when the device is disabled later. */
    if (state == PCI_COLDPLUG_ENABLED) {
714
        s->pci0_slot_device_present |= (1U << slot);
715
        return 0;
716
    }
717

718
    if (state == PCI_HOTPLUG_ENABLED) {
719 720 721 722
        enable_device(s, slot);
    } else {
        disable_device(s, slot);
    }
723 724 725

    pm_update_sci(s);

726 727
    return 0;
}