hw/acpi/erst.c

   1 /*
   2  * ACPI Error Record Serialization Table, ERST, Implementation
   3  *
   4  * ACPI ERST introduced in ACPI 4.0, June 16, 2009.
   5  * ACPI Platform Error Interfaces : Error Serialization
   6  *
   7  * Copyright (c) 2021 Oracle and/or its affiliates.
   8  *
   9  * SPDX-License-Identifier: GPL-2.0-or-later
  10  */
  11
  12 #include "qemu/osdep.h"
  13 #include "qapi/error.h"
  14 #include "hw/qdev-core.h"
  15 #include "exec/memory.h"
  16 #include "qom/object.h"
  17 #include "hw/pci/pci_device.h"
  18 #include "qom/object_interfaces.h"
  19 #include "qemu/error-report.h"
  20 #include "migration/vmstate.h"
  21 #include "hw/qdev-properties.h"
  22 #include "hw/acpi/acpi.h"
  23 #include "hw/acpi/acpi-defs.h"
  24 #include "hw/acpi/aml-build.h"
  25 #include "hw/acpi/bios-linker-loader.h"
  26 #include "exec/address-spaces.h"
  27 #include "sysemu/hostmem.h"
  28 #include "hw/acpi/erst.h"
  29 #include "trace.h"
  30
  31 /* ACPI 4.0: Table 17-16 Serialization Actions */
  32 #define ACTION_BEGIN_WRITE_OPERATION         0x0
  33 #define ACTION_BEGIN_READ_OPERATION          0x1
  34 #define ACTION_BEGIN_CLEAR_OPERATION         0x2
  35 #define ACTION_END_OPERATION                 0x3
  36 #define ACTION_SET_RECORD_OFFSET             0x4
  37 #define ACTION_EXECUTE_OPERATION             0x5
  38 #define ACTION_CHECK_BUSY_STATUS             0x6
  39 #define ACTION_GET_COMMAND_STATUS            0x7
  40 #define ACTION_GET_RECORD_IDENTIFIER         0x8
  41 #define ACTION_SET_RECORD_IDENTIFIER         0x9
  42 #define ACTION_GET_RECORD_COUNT              0xA
  43 #define ACTION_BEGIN_DUMMY_WRITE_OPERATION   0xB
  44 #define ACTION_RESERVED                      0xC
  45 #define ACTION_GET_ERROR_LOG_ADDRESS_RANGE   0xD
  46 #define ACTION_GET_ERROR_LOG_ADDRESS_LENGTH  0xE
  47 #define ACTION_GET_ERROR_LOG_ADDRESS_RANGE_ATTRIBUTES 0xF
  48 #define ACTION_GET_EXECUTE_OPERATION_TIMINGS 0x10 /* ACPI 6.3 */
  49
  50 /* ACPI 4.0: Table 17-17 Command Status Definitions */
  51 #define STATUS_SUCCESS                0x00
  52 #define STATUS_NOT_ENOUGH_SPACE       0x01
  53 #define STATUS_HARDWARE_NOT_AVAILABLE 0x02
  54 #define STATUS_FAILED                 0x03
  55 #define STATUS_RECORD_STORE_EMPTY     0x04
  56 #define STATUS_RECORD_NOT_FOUND       0x05
  57
  58 /* ACPI 4.0: Table 17-19 Serialization Instructions */
  59 #define INST_READ_REGISTER                 0x00
  60 #define INST_READ_REGISTER_VALUE           0x01
  61 #define INST_WRITE_REGISTER                0x02
  62 #define INST_WRITE_REGISTER_VALUE          0x03
  63 #define INST_NOOP                          0x04
  64 #define INST_LOAD_VAR1                     0x05
  65 #define INST_LOAD_VAR2                     0x06
  66 #define INST_STORE_VAR1                    0x07
  67 #define INST_ADD                           0x08
  68 #define INST_SUBTRACT                      0x09
  69 #define INST_ADD_VALUE                     0x0A
  70 #define INST_SUBTRACT_VALUE                0x0B
  71 #define INST_STALL                         0x0C
  72 #define INST_STALL_WHILE_TRUE              0x0D
  73 #define INST_SKIP_NEXT_INSTRUCTION_IF_TRUE 0x0E
  74 #define INST_GOTO                          0x0F
  75 #define INST_SET_SRC_ADDRESS_BASE          0x10
  76 #define INST_SET_DST_ADDRESS_BASE          0x11
  77 #define INST_MOVE_DATA                     0x12
  78
  79 /* UEFI 2.1: Appendix N Common Platform Error Record */
  80 #define UEFI_CPER_RECORD_MIN_SIZE 128U
  81 #define UEFI_CPER_RECORD_LENGTH_OFFSET 20U
  82 #define UEFI_CPER_RECORD_ID_OFFSET 96U
  83
  84 /*
  85  * NOTE that when accessing CPER fields within a record, memcpy()
  86  * is utilized to avoid a possible misaligned access on the host.
  87  */
  88
  89 /*
  90  * This implementation is an ACTION (cmd) and VALUE (data)
  91  * interface consisting of just two 64-bit registers.
  92  */
  93 #define ERST_REG_SIZE (16UL)
  94 #define ERST_ACTION_OFFSET (0UL) /* action (cmd) */
  95 #define ERST_VALUE_OFFSET  (8UL) /* argument/value (data) */
  96
  97 /*
  98  * ERST_RECORD_SIZE is the buffer size for exchanging ERST
  99  * record contents. Thus, it defines the maximum record size.
 100  * As this is mapped through a PCI BAR, it must be a power of
 101  * two and larger than UEFI_CPER_RECORD_MIN_SIZE.
 102  * The backing storage is divided into fixed size "slots",
 103  * each ERST_RECORD_SIZE in length, and each "slot"
 104  * storing a single record. No attempt at optimizing storage
 105  * through compression, compaction, etc is attempted.
 106  * NOTE that slot 0 is reserved for the backing storage header.
 107  * Depending upon the size of the backing storage, additional
 108  * slots will be part of the slot 0 header in order to account
 109  * for a record_id for each available remaining slot.
 110  */
 111 /* 8KiB records, not too small, not too big */
 112 #define ERST_RECORD_SIZE (8192UL)
 113
 114 #define ACPI_ERST_MEMDEV_PROP "memdev"
 115 #define ACPI_ERST_RECORD_SIZE_PROP "record_size"
 116
 117 /*
 118  * From the ACPI ERST spec sections:
 119  * A record id of all 0s is used to indicate 'unspecified' record id.
 120  * A record id of all 1s is used to indicate empty or end.
 121  */
 122 #define ERST_UNSPECIFIED_RECORD_ID (0UL)
 123 #define ERST_EMPTY_END_RECORD_ID (~0UL)
 124
 125 #define ERST_IS_VALID_RECORD_ID(rid) \
 126     ((rid != ERST_UNSPECIFIED_RECORD_ID) && \
 127      (rid != ERST_EMPTY_END_RECORD_ID))
 128
 129 /*
 130  * Implementation-specific definitions and types.
 131  * Values are arbitrary and chosen for this implementation.
 132  * See erst.rst documentation for details.
 133  */
 134 #define ERST_EXECUTE_OPERATION_MAGIC 0x9CUL
 135 #define ERST_STORE_MAGIC 0x524F545354535245UL /* ERSTSTOR */
 136 typedef struct {
 137     uint64_t magic;
 138     uint32_t record_size;
 139     uint32_t storage_offset; /* offset to record storage beyond header */
 140     uint16_t version;
 141     uint16_t reserved;
 142     uint32_t record_count;
 143     uint64_t map[]; /* contains record_ids, and position indicates index */
 144 } __attribute__((packed)) ERSTStorageHeader;
 145
 146 /*
 147  * Object cast macro
 148  */
 149 #define ACPIERST(obj) \
 150     OBJECT_CHECK(ERSTDeviceState, (obj), TYPE_ACPI_ERST)
 151
 152 /*
 153  * Main ERST device state structure
 154  */
 155 typedef struct {
 156     PCIDevice parent_obj;
 157
 158     /* Backend storage */
 159     HostMemoryBackend *hostmem;
 160     MemoryRegion *hostmem_mr;
 161     uint32_t storage_size;
 162     uint32_t default_record_size;
 163
 164     /* Programming registers */
 165     MemoryRegion iomem_mr;
 166
 167     /* Exchange buffer */
 168     MemoryRegion exchange_mr;
 169
 170     /* Interface state */
 171     uint8_t operation;
 172     uint8_t busy_status;
 173     uint8_t command_status;
 174     uint32_t record_offset;
 175     uint64_t reg_action;
 176     uint64_t reg_value;
 177     uint64_t record_identifier;
 178     ERSTStorageHeader *header;
 179     unsigned first_record_index;
 180     unsigned last_record_index;
 181     unsigned next_record_index;
 182
 183 } ERSTDeviceState;
 184
 185 /*******************************************************************/
 186 /*******************************************************************/
 187 typedef struct {
 188     GArray *table_data;
 189     pcibus_t bar;
 190     uint8_t instruction;
 191     uint8_t flags;
 192     uint8_t register_bit_width;
 193     pcibus_t register_offset;
 194 } BuildSerializationInstructionEntry;
 195
 196 /* ACPI 4.0: 17.4.1.2 Serialization Instruction Entries */
 197 static void build_serialization_instruction(
 198     BuildSerializationInstructionEntry *e,
 199     uint8_t serialization_action,
 200     uint64_t value)
 201 {
 202     /* ACPI 4.0: Table 17-18 Serialization Instruction Entry */
 203     struct AcpiGenericAddress gas;
 204     uint64_t mask;
 205
 206     /* Serialization Action */
 207     build_append_int_noprefix(e->table_data, serialization_action, 1);
 208     /* Instruction */
 209     build_append_int_noprefix(e->table_data, e->instruction, 1);
 210     /* Flags */
 211     build_append_int_noprefix(e->table_data, e->flags, 1);
 212     /* Reserved */
 213     build_append_int_noprefix(e->table_data, 0, 1);
 214     /* Register Region */
 215     gas.space_id = AML_SYSTEM_MEMORY;
 216     gas.bit_width = e->register_bit_width;
 217     gas.bit_offset = 0;
 218     gas.access_width = (uint8_t)ctz32(e->register_bit_width) - 2;
 219     gas.address = (uint64_t)(e->bar + e->register_offset);
 220     build_append_gas_from_struct(e->table_data, &gas);
 221     /* Value */
 222     build_append_int_noprefix(e->table_data, value, 8);
 223     /* Mask */
 224     mask = (1ULL << (e->register_bit_width - 1) << 1) - 1;
 225     build_append_int_noprefix(e->table_data, mask, 8);
 226 }
 227
 228 /* ACPI 4.0: 17.4.1 Serialization Action Table */
 229 void build_erst(GArray *table_data, BIOSLinker *linker, Object *erst_dev,
 230     const char *oem_id, const char *oem_table_id)
 231 {
 232     /*
 233      * Serialization Action Table
 234      * The serialization action table must be generated first
 235      * so that its size can be known in order to populate the
 236      * Instruction Entry Count field.
 237      */
 238     unsigned action;
 239     GArray *table_instruction_data = g_array_new(FALSE, FALSE, sizeof(char));
 240     pcibus_t bar0 = pci_get_bar_addr(PCI_DEVICE(erst_dev), 0);
 241     AcpiTable table = { .sig = "ERST", .rev = 1, .oem_id = oem_id,
 242                         .oem_table_id = oem_table_id };
 243     /* Contexts for the different ways ACTION and VALUE are accessed */
 244     BuildSerializationInstructionEntry rd_value_32_val = {
 245         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 246         .instruction = INST_READ_REGISTER_VALUE,
 247         .register_bit_width = 32,
 248         .register_offset = ERST_VALUE_OFFSET,
 249     };
 250     BuildSerializationInstructionEntry rd_value_32 = {
 251         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 252         .instruction = INST_READ_REGISTER,
 253         .register_bit_width = 32,
 254         .register_offset = ERST_VALUE_OFFSET,
 255     };
 256     BuildSerializationInstructionEntry rd_value_64 = {
 257         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 258         .instruction = INST_READ_REGISTER,
 259         .register_bit_width = 64,
 260         .register_offset = ERST_VALUE_OFFSET,
 261     };
 262     BuildSerializationInstructionEntry wr_value_32_val = {
 263         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 264         .instruction = INST_WRITE_REGISTER_VALUE,
 265         .register_bit_width = 32,
 266         .register_offset = ERST_VALUE_OFFSET,
 267     };
 268     BuildSerializationInstructionEntry wr_value_32 = {
 269         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 270         .instruction = INST_WRITE_REGISTER,
 271         .register_bit_width = 32,
 272         .register_offset = ERST_VALUE_OFFSET,
 273     };
 274     BuildSerializationInstructionEntry wr_value_64 = {
 275         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 276         .instruction = INST_WRITE_REGISTER,
 277         .register_bit_width = 64,
 278         .register_offset = ERST_VALUE_OFFSET,
 279     };
 280     BuildSerializationInstructionEntry wr_action = {
 281         .table_data = table_instruction_data, .bar = bar0, .flags = 0,
 282         .instruction = INST_WRITE_REGISTER_VALUE,
 283         .register_bit_width = 32,
 284         .register_offset = ERST_ACTION_OFFSET,
 285     };
 286
 287     trace_acpi_erst_pci_bar_0(bar0);
 288
 289     /* Serialization Instruction Entries */
 290     action = ACTION_BEGIN_WRITE_OPERATION;
 291     build_serialization_instruction(&wr_action, action, action);
 292
 293     action = ACTION_BEGIN_READ_OPERATION;
 294     build_serialization_instruction(&wr_action, action, action);
 295
 296     action = ACTION_BEGIN_CLEAR_OPERATION;
 297     build_serialization_instruction(&wr_action, action, action);
 298
 299     action = ACTION_END_OPERATION;
 300     build_serialization_instruction(&wr_action, action, action);
 301
 302     action = ACTION_SET_RECORD_OFFSET;
 303     build_serialization_instruction(&wr_value_32, action, 0);
 304     build_serialization_instruction(&wr_action, action, action);
 305
 306     action = ACTION_EXECUTE_OPERATION;
 307     build_serialization_instruction(&wr_value_32_val, action,
 308         ERST_EXECUTE_OPERATION_MAGIC);
 309     build_serialization_instruction(&wr_action, action, action);
 310
 311     action = ACTION_CHECK_BUSY_STATUS;
 312     build_serialization_instruction(&wr_action, action, action);
 313     build_serialization_instruction(&rd_value_32_val, action, 0x01);
 314
 315     action = ACTION_GET_COMMAND_STATUS;
 316     build_serialization_instruction(&wr_action, action, action);
 317     build_serialization_instruction(&rd_value_32, action, 0);
 318
 319     action = ACTION_GET_RECORD_IDENTIFIER;
 320     build_serialization_instruction(&wr_action, action, action);
 321     build_serialization_instruction(&rd_value_64, action, 0);
 322
 323     action = ACTION_SET_RECORD_IDENTIFIER;
 324     build_serialization_instruction(&wr_value_64, action, 0);
 325     build_serialization_instruction(&wr_action, action, action);
 326
 327     action = ACTION_GET_RECORD_COUNT;
 328     build_serialization_instruction(&wr_action, action, action);
 329     build_serialization_instruction(&rd_value_32, action, 0);
 330
 331     action = ACTION_BEGIN_DUMMY_WRITE_OPERATION;
 332     build_serialization_instruction(&wr_action, action, action);
 333
 334     action = ACTION_GET_ERROR_LOG_ADDRESS_RANGE;
 335     build_serialization_instruction(&wr_action, action, action);
 336     build_serialization_instruction(&rd_value_64, action, 0);
 337
 338     action = ACTION_GET_ERROR_LOG_ADDRESS_LENGTH;
 339     build_serialization_instruction(&wr_action, action, action);
 340     build_serialization_instruction(&rd_value_64, action, 0);
 341
 342     action = ACTION_GET_ERROR_LOG_ADDRESS_RANGE_ATTRIBUTES;
 343     build_serialization_instruction(&wr_action, action, action);
 344     build_serialization_instruction(&rd_value_32, action, 0);
 345
 346     action = ACTION_GET_EXECUTE_OPERATION_TIMINGS;
 347     build_serialization_instruction(&wr_action, action, action);
 348     build_serialization_instruction(&rd_value_64, action, 0);
 349
 350     /* Serialization Header */
 351     acpi_table_begin(&table, table_data);
 352
 353     /* Serialization Header Size */
 354     build_append_int_noprefix(table_data, 48, 4);
 355
 356     /* Reserved */
 357     build_append_int_noprefix(table_data,  0, 4);
 358
 359     /*
 360      * Instruction Entry Count
 361      * Each instruction entry is 32 bytes
 362      */
 363     g_assert((table_instruction_data->len) % 32 == 0);
 364     build_append_int_noprefix(table_data,
 365         (table_instruction_data->len / 32), 4);
 366
 367     /* Serialization Instruction Entries */
 368     g_array_append_vals(table_data, table_instruction_data->data,
 369         table_instruction_data->len);
 370     g_array_free(table_instruction_data, TRUE);
 371
 372     acpi_table_end(linker, &table);
 373 }
 374
 375 /*******************************************************************/
 376 /*******************************************************************/
 377 static uint8_t *get_nvram_ptr_by_index(ERSTDeviceState *s, unsigned index)
 378 {
 379     uint8_t *rc = NULL;
 380     off_t offset = (index * le32_to_cpu(s->header->record_size));
 381
 382     g_assert(offset < s->storage_size);
 383
 384     rc = memory_region_get_ram_ptr(s->hostmem_mr);
 385     rc += offset;
 386
 387     return rc;
 388 }
 389
 390 static void make_erst_storage_header(ERSTDeviceState *s)
 391 {
 392     ERSTStorageHeader *header = s->header;
 393     unsigned mapsz, headersz;
 394
 395     header->magic = cpu_to_le64(ERST_STORE_MAGIC);
 396     header->record_size = cpu_to_le32(s->default_record_size);
 397     header->version = cpu_to_le16(0x0100);
 398     header->reserved = cpu_to_le16(0x0000);
 399
 400     /* Compute mapsize */
 401     mapsz = s->storage_size / s->default_record_size;
 402     mapsz *= sizeof(uint64_t);
 403     /* Compute header+map size */
 404     headersz = sizeof(ERSTStorageHeader) + mapsz;
 405     /* Round up to nearest integer multiple of ERST_RECORD_SIZE */
 406     headersz = QEMU_ALIGN_UP(headersz, s->default_record_size);
 407     header->storage_offset = cpu_to_le32(headersz);
 408
 409     /*
 410      * The HostMemoryBackend initializes contents to zero,
 411      * so all record_ids stashed in the map are zero'd.
 412      * As well the record_count is zero. Properly initialized.
 413      */
 414 }
 415
 416 static void check_erst_backend_storage(ERSTDeviceState *s, Error **errp)
 417 {
 418     ERSTStorageHeader *header;
 419     uint32_t record_size;
 420
 421     header = memory_region_get_ram_ptr(s->hostmem_mr);
 422     s->header = header;
 423
 424     /* Ensure pointer to header is 64-bit aligned */
 425     g_assert(QEMU_PTR_IS_ALIGNED(header, sizeof(uint64_t)));
 426
 427     /*
 428      * Check if header is uninitialized; HostMemoryBackend inits to 0
 429      */
 430     if (le64_to_cpu(header->magic) == 0UL) {
 431         make_erst_storage_header(s);
 432     }
 433
 434     /* Validity check record_size */
 435     record_size = le32_to_cpu(header->record_size);
 436     if (!(
 437         (record_size) && /* non zero */
 438         (record_size >= UEFI_CPER_RECORD_MIN_SIZE) &&
 439         (((record_size - 1) & record_size) == 0) && /* is power of 2 */
 440         (record_size >= 4096) /* PAGE_SIZE */
 441         )) {
 442         error_setg(errp, "ERST record_size %u is invalid", record_size);
 443         return;
 444     }
 445
 446     /* Validity check header */
 447     if (!(
 448         (le64_to_cpu(header->magic) == ERST_STORE_MAGIC) &&
 449         ((le32_to_cpu(header->storage_offset) % record_size) == 0) &&
 450         (le16_to_cpu(header->version) == 0x0100) &&
 451         (le16_to_cpu(header->reserved) == 0)
 452         )) {
 453         error_setg(errp, "ERST backend storage header is invalid");
 454         return;
 455     }
 456
 457     /* Check storage_size against record_size */
 458     if (((s->storage_size % record_size) != 0) ||
 459          (record_size > s->storage_size)) {
 460         error_setg(errp, "ACPI ERST requires storage size be multiple of "
 461             "record size (%uKiB)", record_size);
 462         return;
 463     }
 464
 465     /* Compute offset of first and last record storage slot */
 466     s->first_record_index = le32_to_cpu(header->storage_offset)
 467         / record_size;
 468     s->last_record_index = (s->storage_size / record_size);
 469 }
 470
 471 static void update_map_entry(ERSTDeviceState *s, unsigned index,
 472     uint64_t record_id)
 473 {
 474     if (index < s->last_record_index) {
 475         s->header->map[index] = cpu_to_le64(record_id);
 476     }
 477 }
 478
 479 static unsigned find_next_empty_record_index(ERSTDeviceState *s)
 480 {
 481     unsigned rc = 0; /* 0 not a valid index */
 482     unsigned index = s->first_record_index;
 483
 484     for (; index < s->last_record_index; ++index) {
 485         if (le64_to_cpu(s->header->map[index]) == ERST_UNSPECIFIED_RECORD_ID) {
 486             rc = index;
 487             break;
 488         }
 489     }
 490
 491     return rc;
 492 }
 493
 494 static unsigned lookup_erst_record(ERSTDeviceState *s,
 495     uint64_t record_identifier)
 496 {
 497     unsigned rc = 0; /* 0 not a valid index */
 498
 499     /* Find the record_identifier in the map */
 500     if (record_identifier != ERST_UNSPECIFIED_RECORD_ID) {
 501         /*
 502          * Count number of valid records encountered, and
 503          * short-circuit the loop if identifier not found
 504          */
 505         uint32_t record_count = le32_to_cpu(s->header->record_count);
 506         unsigned count = 0;
 507         unsigned index;
 508         for (index = s->first_record_index; index < s->last_record_index &&
 509                 count < record_count; ++index) {
 510             if (le64_to_cpu(s->header->map[index]) == record_identifier) {
 511                 rc = index;
 512                 break;
 513             }
 514             if (le64_to_cpu(s->header->map[index]) !=
 515                 ERST_UNSPECIFIED_RECORD_ID) {
 516                 ++count;
 517             }
 518         }
 519     }
 520
 521     return rc;
 522 }
 523
 524 /*
 525  * ACPI 4.0: 17.4.1.1 Serialization Actions, also see
 526  * ACPI 4.0: 17.4.2.2 Operations - Reading 6.c and 2.c
 527  */
 528 static unsigned get_next_record_identifier(ERSTDeviceState *s,
 529     uint64_t *record_identifier, bool first)
 530 {
 531     unsigned found = 0;
 532     unsigned index;
 533
 534     /* For operations needing to return 'first' record identifier */
 535     if (first) {
 536         /* Reset initial index to beginning */
 537         s->next_record_index = s->first_record_index;
 538     }
 539     index = s->next_record_index;
 540
 541     *record_identifier = ERST_EMPTY_END_RECORD_ID;
 542
 543     if (le32_to_cpu(s->header->record_count)) {
 544         for (; index < s->last_record_index; ++index) {
 545             if (le64_to_cpu(s->header->map[index]) !=
 546                     ERST_UNSPECIFIED_RECORD_ID) {
 547                     /* where to start next time */
 548                     s->next_record_index = index + 1;
 549                     *record_identifier = le64_to_cpu(s->header->map[index]);
 550                     found = 1;
 551                     break;
 552             }
 553         }
 554     }
 555     if (!found) {
 556         /* at end (ie scan complete), reset */
 557         s->next_record_index = s->first_record_index;
 558     }
 559
 560     return STATUS_SUCCESS;
 561 }
 562
 563 /* ACPI 4.0: 17.4.2.3 Operations - Clearing */
 564 static unsigned clear_erst_record(ERSTDeviceState *s)
 565 {
 566     unsigned rc = STATUS_RECORD_NOT_FOUND;
 567     unsigned index;
 568
 569     /* Check for valid record identifier */
 570     if (!ERST_IS_VALID_RECORD_ID(s->record_identifier)) {
 571         return STATUS_FAILED;
 572     }
 573
 574     index = lookup_erst_record(s, s->record_identifier);
 575     if (index) {
 576         /* No need to wipe record, just invalidate its map entry */
 577         uint32_t record_count;
 578         update_map_entry(s, index, ERST_UNSPECIFIED_RECORD_ID);
 579         record_count = le32_to_cpu(s->header->record_count);
 580         record_count -= 1;
 581         s->header->record_count = cpu_to_le32(record_count);
 582         rc = STATUS_SUCCESS;
 583     }
 584
 585     return rc;
 586 }
 587
 588 /* ACPI 4.0: 17.4.2.2 Operations - Reading */
 589 static unsigned read_erst_record(ERSTDeviceState *s)
 590 {
 591     unsigned rc = STATUS_RECORD_NOT_FOUND;
 592     unsigned exchange_length;
 593     unsigned index;
 594
 595     /* Check if backend storage is empty */
 596     if (le32_to_cpu(s->header->record_count) == 0) {
 597         return STATUS_RECORD_STORE_EMPTY;
 598     }
 599
 600     exchange_length = memory_region_size(&s->exchange_mr);
 601
 602     /* Check for record identifier of all 0s */
 603     if (s->record_identifier == ERST_UNSPECIFIED_RECORD_ID) {
 604         /* Set to 'first' record in storage */
 605         get_next_record_identifier(s, &s->record_identifier, true);
 606         /* record_identifier is now a valid id, or all 1s */
 607     }
 608
 609     /* Check for record identifier of all 1s */
 610     if (s->record_identifier == ERST_EMPTY_END_RECORD_ID) {
 611         return STATUS_FAILED;
 612     }
 613
 614     /* Validate record_offset */
 615     if (s->record_offset > (exchange_length - UEFI_CPER_RECORD_MIN_SIZE)) {
 616         return STATUS_FAILED;
 617     }
 618
 619     index = lookup_erst_record(s, s->record_identifier);
 620     if (index) {
 621         uint8_t *nvram;
 622         uint8_t *exchange;
 623         uint32_t record_length;
 624
 625         /* Obtain pointer to the exchange buffer */
 626         exchange = memory_region_get_ram_ptr(&s->exchange_mr);
 627         exchange += s->record_offset;
 628         /* Obtain pointer to slot in storage */
 629         nvram = get_nvram_ptr_by_index(s, index);
 630         /* Validate CPER record_length */
 631         memcpy((uint8_t *)&record_length,
 632             &nvram[UEFI_CPER_RECORD_LENGTH_OFFSET],
 633             sizeof(uint32_t));
 634         record_length = le32_to_cpu(record_length);
 635         if (record_length < UEFI_CPER_RECORD_MIN_SIZE) {
 636             rc = STATUS_FAILED;
 637         }
 638         if (record_length > exchange_length - s->record_offset) {
 639             rc = STATUS_FAILED;
 640         }
 641         /* If all is ok, copy the record to the exchange buffer */
 642         if (rc != STATUS_FAILED) {
 643             memcpy(exchange, nvram, record_length);
 644             rc = STATUS_SUCCESS;
 645         }
 646     } else {
 647         /*
 648          * See "Reading : 'The steps performed by the platform ...' 2.c"
 649          * Set to 'first' record in storage
 650          */
 651         get_next_record_identifier(s, &s->record_identifier, true);
 652     }
 653
 654     return rc;
 655 }
 656
 657 /* ACPI 4.0: 17.4.2.1 Operations - Writing */
 658 static unsigned write_erst_record(ERSTDeviceState *s)
 659 {
 660     unsigned rc = STATUS_FAILED;
 661     unsigned exchange_length;
 662     unsigned index;
 663     uint64_t record_identifier;
 664     uint32_t record_length;
 665     uint8_t *exchange;
 666     uint8_t *nvram = NULL;
 667     bool record_found = false;
 668
 669     exchange_length = memory_region_size(&s->exchange_mr);
 670
 671     /* Validate record_offset */
 672     if (s->record_offset > (exchange_length - UEFI_CPER_RECORD_MIN_SIZE)) {
 673         return STATUS_FAILED;
 674     }
 675
 676     /* Obtain pointer to record in the exchange buffer */
 677     exchange = memory_region_get_ram_ptr(&s->exchange_mr);
 678     exchange += s->record_offset;
 679
 680     /* Validate CPER record_length */
 681     memcpy((uint8_t *)&record_length, &exchange[UEFI_CPER_RECORD_LENGTH_OFFSET],
 682         sizeof(uint32_t));
 683     record_length = le32_to_cpu(record_length);
 684     if (record_length < UEFI_CPER_RECORD_MIN_SIZE) {
 685         return STATUS_FAILED;
 686     }
 687     if (record_length > exchange_length - s->record_offset) {
 688         return STATUS_FAILED;
 689     }
 690
 691     /* Extract record identifier */
 692     memcpy((uint8_t *)&record_identifier, &exchange[UEFI_CPER_RECORD_ID_OFFSET],
 693         sizeof(uint64_t));
 694     record_identifier = le64_to_cpu(record_identifier);
 695
 696     /* Check for valid record identifier */
 697     if (!ERST_IS_VALID_RECORD_ID(record_identifier)) {
 698         return STATUS_FAILED;
 699     }
 700
 701     index = lookup_erst_record(s, record_identifier);
 702     if (index) {
 703         /* Record found, overwrite existing record */
 704         nvram = get_nvram_ptr_by_index(s, index);
 705         record_found = true;
 706     } else {
 707         /* Record not found, not an overwrite, allocate for write */
 708         index = find_next_empty_record_index(s);
 709         if (index) {
 710             nvram = get_nvram_ptr_by_index(s, index);
 711         } else {
 712             /* All slots are occupied */
 713             rc = STATUS_NOT_ENOUGH_SPACE;
 714         }
 715     }
 716     if (nvram) {
 717         /* Write the record into the slot */
 718         memcpy(nvram, exchange, record_length);
 719         memset(nvram + record_length, 0xFF, exchange_length - record_length);
 720         /* If a new record, increment the record_count */
 721         if (!record_found) {
 722             uint32_t record_count;
 723             record_count = le32_to_cpu(s->header->record_count);
 724             record_count += 1; /* writing new record */
 725             s->header->record_count = cpu_to_le32(record_count);
 726         }
 727         update_map_entry(s, index, record_identifier);
 728         rc = STATUS_SUCCESS;
 729     }
 730
 731     return rc;
 732 }
 733
 734 /*******************************************************************/
 735
 736 static uint64_t erst_rd_reg64(hwaddr addr,
 737     uint64_t reg, unsigned size)
 738 {
 739     uint64_t rdval;
 740     uint64_t mask;
 741     unsigned shift;
 742
 743     if (size == sizeof(uint64_t)) {
 744         /* 64b access */
 745         mask = 0xFFFFFFFFFFFFFFFFUL;
 746         shift = 0;
 747     } else {
 748         /* 32b access */
 749         mask = 0x00000000FFFFFFFFUL;
 750         shift = ((addr & 0x4) == 0x4) ? 32 : 0;
 751     }
 752
 753     rdval = reg;
 754     rdval >>= shift;
 755     rdval &= mask;
 756
 757     return rdval;
 758 }
 759
 760 static uint64_t erst_wr_reg64(hwaddr addr,
 761     uint64_t reg, uint64_t val, unsigned size)
 762 {
 763     uint64_t wrval;
 764     uint64_t mask;
 765     unsigned shift;
 766
 767     if (size == sizeof(uint64_t)) {
 768         /* 64b access */
 769         mask = 0xFFFFFFFFFFFFFFFFUL;
 770         shift = 0;
 771     } else {
 772         /* 32b access */
 773         mask = 0x00000000FFFFFFFFUL;
 774         shift = ((addr & 0x4) == 0x4) ? 32 : 0;
 775     }
 776
 777     val &= mask;
 778     val <<= shift;
 779     mask <<= shift;
 780     wrval = reg;
 781     wrval &= ~mask;
 782     wrval |= val;
 783
 784     return wrval;
 785 }
 786
 787 static void erst_reg_write(void *opaque, hwaddr addr,
 788     uint64_t val, unsigned size)
 789 {
 790     ERSTDeviceState *s = (ERSTDeviceState *)opaque;
 791
 792     /*
 793      * NOTE: All actions/operations/side effects happen on the WRITE,
 794      * by this implementation's design. The READs simply return the
 795      * reg_value contents.
 796      */
 797     trace_acpi_erst_reg_write(addr, val, size);
 798
 799     switch (addr) {
 800     case ERST_VALUE_OFFSET + 0:
 801     case ERST_VALUE_OFFSET + 4:
 802         s->reg_value = erst_wr_reg64(addr, s->reg_value, val, size);
 803         break;
 804     case ERST_ACTION_OFFSET + 0:
 805         /*
 806          * NOTE: all valid values written to this register are of the
 807          * ACTION_* variety. Thus there is no need to make this a 64-bit
 808          * register, 32-bits is appropriate. As such ERST_ACTION_OFFSET+4
 809          * is not needed.
 810          */
 811         switch (val) {
 812         case ACTION_BEGIN_WRITE_OPERATION:
 813         case ACTION_BEGIN_READ_OPERATION:
 814         case ACTION_BEGIN_CLEAR_OPERATION:
 815         case ACTION_BEGIN_DUMMY_WRITE_OPERATION:
 816         case ACTION_END_OPERATION:
 817             s->operation = val;
 818             break;
 819         case ACTION_SET_RECORD_OFFSET:
 820             s->record_offset = s->reg_value;
 821             break;
 822         case ACTION_EXECUTE_OPERATION:
 823             if ((uint8_t)s->reg_value == ERST_EXECUTE_OPERATION_MAGIC) {
 824                 s->busy_status = 1;
 825                 switch (s->operation) {
 826                 case ACTION_BEGIN_WRITE_OPERATION:
 827                     s->command_status = write_erst_record(s);
 828                     break;
 829                 case ACTION_BEGIN_READ_OPERATION:
 830                     s->command_status = read_erst_record(s);
 831                     break;
 832                 case ACTION_BEGIN_CLEAR_OPERATION:
 833                     s->command_status = clear_erst_record(s);
 834                     break;
 835                 case ACTION_BEGIN_DUMMY_WRITE_OPERATION:
 836                     s->command_status = STATUS_SUCCESS;
 837                     break;
 838                 case ACTION_END_OPERATION:
 839                     s->command_status = STATUS_SUCCESS;
 840                     break;
 841                 default:
 842                     s->command_status = STATUS_FAILED;
 843                     break;
 844                 }
 845                 s->busy_status = 0;
 846             }
 847             break;
 848         case ACTION_CHECK_BUSY_STATUS:
 849             s->reg_value = s->busy_status;
 850             break;
 851         case ACTION_GET_COMMAND_STATUS:
 852             s->reg_value = s->command_status;
 853             break;
 854         case ACTION_GET_RECORD_IDENTIFIER:
 855             s->command_status = get_next_record_identifier(s,
 856                                     &s->reg_value, false);
 857             break;
 858         case ACTION_SET_RECORD_IDENTIFIER:
 859             s->record_identifier = s->reg_value;
 860             break;
 861         case ACTION_GET_RECORD_COUNT:
 862             s->reg_value = le32_to_cpu(s->header->record_count);
 863             break;
 864         case ACTION_GET_ERROR_LOG_ADDRESS_RANGE:
 865             s->reg_value = (hwaddr)pci_get_bar_addr(PCI_DEVICE(s), 1);
 866             break;
 867         case ACTION_GET_ERROR_LOG_ADDRESS_LENGTH:
 868             s->reg_value = le32_to_cpu(s->header->record_size);
 869             break;
 870         case ACTION_GET_ERROR_LOG_ADDRESS_RANGE_ATTRIBUTES:
 871             s->reg_value = 0x0; /* intentional, not NVRAM mode */
 872             break;
 873         case ACTION_GET_EXECUTE_OPERATION_TIMINGS:
 874             s->reg_value =
 875                 (100ULL << 32) | /* 100us max time */
 876                 (10ULL  <<  0) ; /*  10us min time */
 877             break;
 878         default:
 879             /* Unknown action/command, NOP */
 880             break;
 881         }
 882         break;
 883     default:
 884         /* This should not happen, but if it does, NOP */
 885         break;
 886     }
 887 }
 888
 889 static uint64_t erst_reg_read(void *opaque, hwaddr addr,
 890                                 unsigned size)
 891 {
 892     ERSTDeviceState *s = (ERSTDeviceState *)opaque;
 893     uint64_t val = 0;
 894
 895     switch (addr) {
 896     case ERST_ACTION_OFFSET + 0:
 897     case ERST_ACTION_OFFSET + 4:
 898         val = erst_rd_reg64(addr, s->reg_action, size);
 899         break;
 900     case ERST_VALUE_OFFSET + 0:
 901     case ERST_VALUE_OFFSET + 4:
 902         val = erst_rd_reg64(addr, s->reg_value, size);
 903         break;
 904     default:
 905         break;
 906     }
 907     trace_acpi_erst_reg_read(addr, val, size);
 908     return val;
 909 }
 910
 911 static const MemoryRegionOps erst_reg_ops = {
 912     .read = erst_reg_read,
 913     .write = erst_reg_write,
 914     .endianness = DEVICE_NATIVE_ENDIAN,
 915 };
 916
 917 /*******************************************************************/
 918 /*******************************************************************/
 919 static int erst_post_load(void *opaque, int version_id)
 920 {
 921     ERSTDeviceState *s = opaque;
 922
 923     /* Recompute pointer to header */
 924     s->header = (ERSTStorageHeader *)get_nvram_ptr_by_index(s, 0);
 925     trace_acpi_erst_post_load(s->header, le32_to_cpu(s->header->record_size));
 926
 927     return 0;
 928 }
 929
 930 static const VMStateDescription erst_vmstate  = {
 931     .name = "acpi-erst",
 932     .version_id = 1,
 933     .minimum_version_id = 1,
 934     .post_load = erst_post_load,
 935     .fields = (VMStateField[]) {
 936         VMSTATE_UINT8(operation, ERSTDeviceState),
 937         VMSTATE_UINT8(busy_status, ERSTDeviceState),
 938         VMSTATE_UINT8(command_status, ERSTDeviceState),
 939         VMSTATE_UINT32(record_offset, ERSTDeviceState),
 940         VMSTATE_UINT64(reg_action, ERSTDeviceState),
 941         VMSTATE_UINT64(reg_value, ERSTDeviceState),
 942         VMSTATE_UINT64(record_identifier, ERSTDeviceState),
 943         VMSTATE_UINT32(next_record_index, ERSTDeviceState),
 944         VMSTATE_END_OF_LIST()
 945     }
 946 };
 947
 948 static void erst_realizefn(PCIDevice *pci_dev, Error **errp)
 949 {
 950     ERSTDeviceState *s = ACPIERST(pci_dev);
 951
 952     trace_acpi_erst_realizefn_in();
 953
 954     if (!s->hostmem) {
 955         error_setg(errp, "'" ACPI_ERST_MEMDEV_PROP "' property is not set");
 956         return;
 957     } else if (host_memory_backend_is_mapped(s->hostmem)) {
 958         error_setg(errp, "can't use already busy memdev: %s",
 959                    object_get_canonical_path_component(OBJECT(s->hostmem)));
 960         return;
 961     }
 962
 963     s->hostmem_mr = host_memory_backend_get_memory(s->hostmem);
 964
 965     /* HostMemoryBackend size will be multiple of PAGE_SIZE */
 966     s->storage_size = object_property_get_int(OBJECT(s->hostmem), "size", errp);
 967
 968     /* Initialize backend storage and record_count */
 969     check_erst_backend_storage(s, errp);
 970
 971     /* BAR 0: Programming registers */
 972     memory_region_init_io(&s->iomem_mr, OBJECT(pci_dev), &erst_reg_ops, s,
 973                           TYPE_ACPI_ERST, ERST_REG_SIZE);
 974     pci_register_bar(pci_dev, 0, PCI_BASE_ADDRESS_SPACE_MEMORY, &s->iomem_mr);
 975
 976     /* BAR 1: Exchange buffer memory */
 977     memory_region_init_ram(&s->exchange_mr, OBJECT(pci_dev),
 978                             "erst.exchange",
 979                             le32_to_cpu(s->header->record_size), errp);
 980     pci_register_bar(pci_dev, 1, PCI_BASE_ADDRESS_SPACE_MEMORY,
 981                         &s->exchange_mr);
 982
 983     /* Include the backend storage in the migration stream */
 984     vmstate_register_ram_global(s->hostmem_mr);
 985
 986     trace_acpi_erst_realizefn_out(s->storage_size);
 987 }
 988
 989 static void erst_reset(DeviceState *dev)
 990 {
 991     ERSTDeviceState *s = ACPIERST(dev);
 992
 993     trace_acpi_erst_reset_in(le32_to_cpu(s->header->record_count));
 994     s->operation = 0;
 995     s->busy_status = 0;
 996     s->command_status = STATUS_SUCCESS;
 997     s->record_identifier = ERST_UNSPECIFIED_RECORD_ID;
 998     s->record_offset = 0;
 999     s->next_record_index = s->first_record_index;
1000     /* NOTE: first/last_record_index are computed only once */
1001     trace_acpi_erst_reset_out(le32_to_cpu(s->header->record_count));
1002 }
1003
1004 static Property erst_properties[] = {
1005     DEFINE_PROP_LINK(ACPI_ERST_MEMDEV_PROP, ERSTDeviceState, hostmem,
1006                      TYPE_MEMORY_BACKEND, HostMemoryBackend *),
1007     DEFINE_PROP_UINT32(ACPI_ERST_RECORD_SIZE_PROP, ERSTDeviceState,
1008                      default_record_size, ERST_RECORD_SIZE),
1009     DEFINE_PROP_END_OF_LIST(),
1010 };
1011
1012 static void erst_class_init(ObjectClass *klass, void *data)
1013 {
1014     DeviceClass *dc = DEVICE_CLASS(klass);
1015     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
1016
1017     trace_acpi_erst_class_init_in();
1018     k->realize = erst_realizefn;
1019     k->vendor_id = PCI_VENDOR_ID_REDHAT;
1020     k->device_id = PCI_DEVICE_ID_REDHAT_ACPI_ERST;
1021     k->revision = 0x00;
1022     k->class_id = PCI_CLASS_OTHERS;
1023     dc->reset = erst_reset;
1024     dc->vmsd = &erst_vmstate;
1025     dc->user_creatable = true;
1026     dc->hotpluggable = false;
1027     device_class_set_props(dc, erst_properties);
1028     dc->desc = "ACPI Error Record Serialization Table (ERST) device";
1029     set_bit(DEVICE_CATEGORY_MISC, dc->categories);
1030     trace_acpi_erst_class_init_out();
1031 }
1032
1033 static const TypeInfo erst_type_info = {
1034     .name          = TYPE_ACPI_ERST,
1035     .parent        = TYPE_PCI_DEVICE,
1036     .class_init    = erst_class_init,
1037     .instance_size = sizeof(ERSTDeviceState),
1038     .interfaces = (InterfaceInfo[]) {
1039         { INTERFACE_CONVENTIONAL_PCI_DEVICE },
1040         { }
1041     }
1042 };
1043
1044 static void erst_register_types(void)
1045 {
1046     type_register_static(&erst_type_info);
1047 }
1048
1049 type_init(erst_register_types)