drivers/acpi/tables.c

   1 /*
   2  *  acpi_tables.c - ACPI Boot-Time Table Parsing
   3  *
   4  *  Copyright (C) 2001 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
   5  *
   6  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License as published by
  10  *  the Free Software Foundation; either version 2 of the License, or
  11  *  (at your option) any later version.
  12  *
  13  *  This program is distributed in the hope that it will be useful,
  14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  *  GNU General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License
  19  *  along with this program; if not, write to the Free Software
  20  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  *
  22  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  23  *
  24  */
  25
  26 #include <linux/init.h>
  27 #include <linux/kernel.h>
  28 #include <linux/sched.h>
  29 #include <linux/smp.h>
  30 #include <linux/string.h>
  31 #include <linux/types.h>
  32 #include <linux/irq.h>
  33 #include <linux/errno.h>
  34 #include <linux/acpi.h>
  35 #include <linux/bootmem.h>
  36
  37 #define PREFIX                  "ACPI: "
  38
  39 #define ACPI_MAX_TABLES         128
  40
  41 static char *acpi_table_signatures[ACPI_TABLE_COUNT] = {
  42         [ACPI_TABLE_UNKNOWN] = "????",
  43         [ACPI_APIC] = "APIC",
  44         [ACPI_BOOT] = "BOOT",
  45         [ACPI_DBGP] = "DBGP",
  46         [ACPI_DSDT] = "DSDT",
  47         [ACPI_ECDT] = "ECDT",
  48         [ACPI_ETDT] = "ETDT",
  49         [ACPI_FADT] = "FACP",
  50         [ACPI_FACS] = "FACS",
  51         [ACPI_OEMX] = "OEM",
  52         [ACPI_PSDT] = "PSDT",
  53         [ACPI_SBST] = "SBST",
  54         [ACPI_SLIT] = "SLIT",
  55         [ACPI_SPCR] = "SPCR",
  56         [ACPI_SRAT] = "SRAT",
  57         [ACPI_SSDT] = "SSDT",
  58         [ACPI_SPMI] = "SPMI",
  59         [ACPI_HPET] = "HPET",
  60         [ACPI_MCFG] = "MCFG",
  61 };
  62
  63 static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
  64 static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };
  65
  66 /* System Description Table (RSDT/XSDT) */
  67 struct acpi_table_sdt {
  68         unsigned long pa;
  69         enum acpi_table_id id;
  70         unsigned long size;
  71 } __attribute__ ((packed));
  72
  73 static unsigned long sdt_pa;    /* Physical Address */
  74 static unsigned long sdt_count; /* Table count */
  75
  76 static struct acpi_table_sdt sdt_entry[ACPI_MAX_TABLES] __initdata;
  77
  78 void acpi_table_print(struct acpi_table_header *header, unsigned long phys_addr)
  79 {
  80         char *name = NULL;
  81
  82         if (!header)
  83                 return;
  84
  85         /* Some table signatures aren't good table names */
  86
  87         if (!strncmp((char *)&header->signature,
  88                      acpi_table_signatures[ACPI_APIC],
  89                      sizeof(header->signature))) {
  90                 name = "MADT";
  91         } else if (!strncmp((char *)&header->signature,
  92                             acpi_table_signatures[ACPI_FADT],
  93                             sizeof(header->signature))) {
  94                 name = "FADT";
  95         } else
  96                 name = header->signature;
  97
  98         printk(KERN_DEBUG PREFIX
  99                "%.4s (v%3.3d %6.6s %8.8s 0x%08x %.4s 0x%08x) @ 0x%p\n", name,
 100                header->revision, header->oem_id, header->oem_table_id,
 101                header->oem_revision, header->asl_compiler_id,
 102                header->asl_compiler_revision, (void *)phys_addr);
 103 }
 104
 105 void acpi_table_print_madt_entry(acpi_table_entry_header * header)
 106 {
 107         if (!header)
 108                 return;
 109
 110         switch (header->type) {
 111
 112         case ACPI_MADT_LAPIC:
 113                 {
 114                         struct acpi_table_lapic *p =
 115                             (struct acpi_table_lapic *)header;
 116                         printk(KERN_INFO PREFIX
 117                                "LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
 118                                p->acpi_id, p->id,
 119                                p->flags.enabled ? "enabled" : "disabled");
 120                 }
 121                 break;
 122
 123         case ACPI_MADT_IOAPIC:
 124                 {
 125                         struct acpi_table_ioapic *p =
 126                             (struct acpi_table_ioapic *)header;
 127                         printk(KERN_INFO PREFIX
 128                                "IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
 129                                p->id, p->address, p->global_irq_base);
 130                 }
 131                 break;
 132
 133         case ACPI_MADT_INT_SRC_OVR:
 134                 {
 135                         struct acpi_table_int_src_ovr *p =
 136                             (struct acpi_table_int_src_ovr *)header;
 137                         printk(KERN_INFO PREFIX
 138                                "INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
 139                                p->bus, p->bus_irq, p->global_irq,
 140                                mps_inti_flags_polarity[p->flags.polarity],
 141                                mps_inti_flags_trigger[p->flags.trigger]);
 142                         if (p->flags.reserved)
 143                                 printk(KERN_INFO PREFIX
 144                                        "INT_SRC_OVR unexpected reserved flags: 0x%x\n",
 145                                        p->flags.reserved);
 146
 147                 }
 148                 break;
 149
 150         case ACPI_MADT_NMI_SRC:
 151                 {
 152                         struct acpi_table_nmi_src *p =
 153                             (struct acpi_table_nmi_src *)header;
 154                         printk(KERN_INFO PREFIX
 155                                "NMI_SRC (%s %s global_irq %d)\n",
 156                                mps_inti_flags_polarity[p->flags.polarity],
 157                                mps_inti_flags_trigger[p->flags.trigger],
 158                                p->global_irq);
 159                 }
 160                 break;
 161
 162         case ACPI_MADT_LAPIC_NMI:
 163                 {
 164                         struct acpi_table_lapic_nmi *p =
 165                             (struct acpi_table_lapic_nmi *)header;
 166                         printk(KERN_INFO PREFIX
 167                                "LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
 168                                p->acpi_id,
 169                                mps_inti_flags_polarity[p->flags.polarity],
 170                                mps_inti_flags_trigger[p->flags.trigger],
 171                                p->lint);
 172                 }
 173                 break;
 174
 175         case ACPI_MADT_LAPIC_ADDR_OVR:
 176                 {
 177                         struct acpi_table_lapic_addr_ovr *p =
 178                             (struct acpi_table_lapic_addr_ovr *)header;
 179                         printk(KERN_INFO PREFIX
 180                                "LAPIC_ADDR_OVR (address[%p])\n",
 181                                (void *)(unsigned long)p->address);
 182                 }
 183                 break;
 184
 185         case ACPI_MADT_IOSAPIC:
 186                 {
 187                         struct acpi_table_iosapic *p =
 188                             (struct acpi_table_iosapic *)header;
 189                         printk(KERN_INFO PREFIX
 190                                "IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
 191                                p->id, (void *)(unsigned long)p->address,
 192                                p->global_irq_base);
 193                 }
 194                 break;
 195
 196         case ACPI_MADT_LSAPIC:
 197                 {
 198                         struct acpi_table_lsapic *p =
 199                             (struct acpi_table_lsapic *)header;
 200                         printk(KERN_INFO PREFIX
 201                                "LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
 202                                p->acpi_id, p->id, p->eid,
 203                                p->flags.enabled ? "enabled" : "disabled");
 204                 }
 205                 break;
 206
 207         case ACPI_MADT_PLAT_INT_SRC:
 208                 {
 209                         struct acpi_table_plat_int_src *p =
 210                             (struct acpi_table_plat_int_src *)header;
 211                         printk(KERN_INFO PREFIX
 212                                "PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
 213                                mps_inti_flags_polarity[p->flags.polarity],
 214                                mps_inti_flags_trigger[p->flags.trigger],
 215                                p->type, p->id, p->eid, p->iosapic_vector,
 216                                p->global_irq);
 217                 }
 218                 break;
 219
 220         default:
 221                 printk(KERN_WARNING PREFIX
 222                        "Found unsupported MADT entry (type = 0x%x)\n",
 223                        header->type);
 224                 break;
 225         }
 226 }
 227
 228 static int
 229 acpi_table_compute_checksum(void *table_pointer, unsigned long length)
 230 {
 231         u8 *p = table_pointer;
 232         unsigned long remains = length;
 233         unsigned long sum = 0;
 234
 235         if (!p || !length)
 236                 return -EINVAL;
 237
 238         while (remains--)
 239                 sum += *p++;
 240
 241         return (sum & 0xFF);
 242 }
 243
 244 /*
 245  * acpi_get_table_header_early()
 246  * for acpi_blacklisted(), acpi_table_get_sdt()
 247  */
 248 int __init
 249 acpi_get_table_header_early(enum acpi_table_id id,
 250                             struct acpi_table_header **header)
 251 {
 252         unsigned int i;
 253         enum acpi_table_id temp_id;
 254
 255         /* DSDT is different from the rest */
 256         if (id == ACPI_DSDT)
 257                 temp_id = ACPI_FADT;
 258         else
 259                 temp_id = id;
 260
 261         /* Locate the table. */
 262
 263         for (i = 0; i < sdt_count; i++) {
 264                 if (sdt_entry[i].id != temp_id)
 265                         continue;
 266                 *header = (void *)
 267                     __acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
 268                 if (!*header) {
 269                         printk(KERN_WARNING PREFIX "Unable to map %s\n",
 270                                acpi_table_signatures[temp_id]);
 271                         return -ENODEV;
 272                 }
 273                 break;
 274         }
 275
 276         if (!*header) {
 277                 printk(KERN_WARNING PREFIX "%s not present\n",
 278                        acpi_table_signatures[id]);
 279                 return -ENODEV;
 280         }
 281
 282         /* Map the DSDT header via the pointer in the FADT */
 283         if (id == ACPI_DSDT) {
 284                 struct fadt_descriptor *fadt =
 285                     (struct fadt_descriptor *)*header;
 286
 287                 if (fadt->revision == 3 && fadt->Xdsdt) {
 288                         *header = (void *)__acpi_map_table(fadt->Xdsdt,
 289                                                            sizeof(struct
 290                                                                   acpi_table_header));
 291                 } else if (fadt->V1_dsdt) {
 292                         *header = (void *)__acpi_map_table(fadt->V1_dsdt,
 293                                                            sizeof(struct
 294                                                                   acpi_table_header));
 295                 } else
 296                         *header = NULL;
 297
 298                 if (!*header) {
 299                         printk(KERN_WARNING PREFIX "Unable to map DSDT\n");
 300                         return -ENODEV;
 301                 }
 302         }
 303
 304         return 0;
 305 }
 306
 307 int __init
 308 acpi_table_parse_madt_family(enum acpi_table_id id,
 309                              unsigned long madt_size,
 310                              int entry_id,
 311                              acpi_madt_entry_handler handler,
 312                              unsigned int max_entries)
 313 {
 314         void *madt = NULL;
 315         acpi_table_entry_header *entry;
 316         unsigned int count = 0;
 317         unsigned long madt_end;
 318         unsigned int i;
 319
 320         if (!handler)
 321                 return -EINVAL;
 322
 323         /* Locate the MADT (if exists). There should only be one. */
 324
 325         for (i = 0; i < sdt_count; i++) {
 326                 if (sdt_entry[i].id != id)
 327                         continue;
 328                 madt = (void *)
 329                     __acpi_map_table(sdt_entry[i].pa, sdt_entry[i].size);
 330                 if (!madt) {
 331                         printk(KERN_WARNING PREFIX "Unable to map %s\n",
 332                                acpi_table_signatures[id]);
 333                         return -ENODEV;
 334                 }
 335                 break;
 336         }
 337
 338         if (!madt) {
 339                 printk(KERN_WARNING PREFIX "%s not present\n",
 340                        acpi_table_signatures[id]);
 341                 return -ENODEV;
 342         }
 343
 344         madt_end = (unsigned long)madt + sdt_entry[i].size;
 345
 346         /* Parse all entries looking for a match. */
 347
 348         entry = (acpi_table_entry_header *)
 349             ((unsigned long)madt + madt_size);
 350
 351         while (((unsigned long)entry) + sizeof(acpi_table_entry_header) <
 352                madt_end) {
 353                 if (entry->type == entry_id
 354                     && (!max_entries || count++ < max_entries))
 355                         if (handler(entry, madt_end))
 356                                 return -EINVAL;
 357
 358                 entry = (acpi_table_entry_header *)
 359                     ((unsigned long)entry + entry->length);
 360         }
 361         if (max_entries && count > max_entries) {
 362                 printk(KERN_WARNING PREFIX "[%s:0x%02x] ignored %i entries of "
 363                        "%i found\n", acpi_table_signatures[id], entry_id,
 364                        count - max_entries, count);
 365         }
 366
 367         return count;
 368 }
 369
 370 int __init
 371 acpi_table_parse_madt(enum acpi_madt_entry_id id,
 372                       acpi_madt_entry_handler handler, unsigned int max_entries)
 373 {
 374         return acpi_table_parse_madt_family(ACPI_APIC,
 375                                             sizeof(struct acpi_table_madt), id,
 376                                             handler, max_entries);
 377 }
 378
 379 int __init acpi_table_parse(enum acpi_table_id id, acpi_table_handler handler)
 380 {
 381         int count = 0;
 382         unsigned int i = 0;
 383
 384         if (!handler)
 385                 return -EINVAL;
 386
 387         for (i = 0; i < sdt_count; i++) {
 388                 if (sdt_entry[i].id != id)
 389                         continue;
 390                 count++;
 391                 if (count == 1)
 392                         handler(sdt_entry[i].pa, sdt_entry[i].size);
 393
 394                 else
 395                         printk(KERN_WARNING PREFIX
 396                                "%d duplicate %s table ignored.\n", count,
 397                                acpi_table_signatures[id]);
 398         }
 399
 400         return count;
 401 }
 402
 403 static int __init acpi_table_get_sdt(struct acpi_table_rsdp *rsdp)
 404 {
 405         struct acpi_table_header *header = NULL;
 406         unsigned int i, id = 0;
 407
 408         if (!rsdp)
 409                 return -EINVAL;
 410
 411         /* First check XSDT (but only on ACPI 2.0-compatible systems) */
 412
 413         if ((rsdp->revision >= 2) &&
 414             (((struct acpi20_table_rsdp *)rsdp)->xsdt_address)) {
 415
 416                 struct acpi_table_xsdt *mapped_xsdt = NULL;
 417
 418                 sdt_pa = ((struct acpi20_table_rsdp *)rsdp)->xsdt_address;
 419
 420                 /* map in just the header */
 421                 header = (struct acpi_table_header *)
 422                     __acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));
 423
 424                 if (!header) {
 425                         printk(KERN_WARNING PREFIX
 426                                "Unable to map XSDT header\n");
 427                         return -ENODEV;
 428                 }
 429
 430                 /* remap in the entire table before processing */
 431                 mapped_xsdt = (struct acpi_table_xsdt *)
 432                     __acpi_map_table(sdt_pa, header->length);
 433                 if (!mapped_xsdt) {
 434                         printk(KERN_WARNING PREFIX "Unable to map XSDT\n");
 435                         return -ENODEV;
 436                 }
 437                 header = &mapped_xsdt->header;
 438
 439                 if (strncmp(header->signature, "XSDT", 4)) {
 440                         printk(KERN_WARNING PREFIX
 441                                "XSDT signature incorrect\n");
 442                         return -ENODEV;
 443                 }
 444
 445                 if (acpi_table_compute_checksum(header, header->length)) {
 446                         printk(KERN_WARNING PREFIX "Invalid XSDT checksum\n");
 447                         return -ENODEV;
 448                 }
 449
 450                 sdt_count =
 451                     (header->length - sizeof(struct acpi_table_header)) >> 3;
 452                 if (sdt_count > ACPI_MAX_TABLES) {
 453                         printk(KERN_WARNING PREFIX
 454                                "Truncated %lu XSDT entries\n",
 455                                (sdt_count - ACPI_MAX_TABLES));
 456                         sdt_count = ACPI_MAX_TABLES;
 457                 }
 458
 459                 for (i = 0; i < sdt_count; i++)
 460                         sdt_entry[i].pa = (unsigned long)mapped_xsdt->entry[i];
 461         }
 462
 463         /* Then check RSDT */
 464
 465         else if (rsdp->rsdt_address) {
 466
 467                 struct acpi_table_rsdt *mapped_rsdt = NULL;
 468
 469                 sdt_pa = rsdp->rsdt_address;
 470
 471                 /* map in just the header */
 472                 header = (struct acpi_table_header *)
 473                     __acpi_map_table(sdt_pa, sizeof(struct acpi_table_header));
 474                 if (!header) {
 475                         printk(KERN_WARNING PREFIX
 476                                "Unable to map RSDT header\n");
 477                         return -ENODEV;
 478                 }
 479
 480                 /* remap in the entire table before processing */
 481                 mapped_rsdt = (struct acpi_table_rsdt *)
 482                     __acpi_map_table(sdt_pa, header->length);
 483                 if (!mapped_rsdt) {
 484                         printk(KERN_WARNING PREFIX "Unable to map RSDT\n");
 485                         return -ENODEV;
 486                 }
 487                 header = &mapped_rsdt->header;
 488
 489                 if (strncmp(header->signature, "RSDT", 4)) {
 490                         printk(KERN_WARNING PREFIX
 491                                "RSDT signature incorrect\n");
 492                         return -ENODEV;
 493                 }
 494
 495                 if (acpi_table_compute_checksum(header, header->length)) {
 496                         printk(KERN_WARNING PREFIX "Invalid RSDT checksum\n");
 497                         return -ENODEV;
 498                 }
 499
 500                 sdt_count =
 501                     (header->length - sizeof(struct acpi_table_header)) >> 2;
 502                 if (sdt_count > ACPI_MAX_TABLES) {
 503                         printk(KERN_WARNING PREFIX
 504                                "Truncated %lu RSDT entries\n",
 505                                (sdt_count - ACPI_MAX_TABLES));
 506                         sdt_count = ACPI_MAX_TABLES;
 507                 }
 508
 509                 for (i = 0; i < sdt_count; i++)
 510                         sdt_entry[i].pa = (unsigned long)mapped_rsdt->entry[i];
 511         }
 512
 513         else {
 514                 printk(KERN_WARNING PREFIX
 515                        "No System Description Table (RSDT/XSDT) specified in RSDP\n");
 516                 return -ENODEV;
 517         }
 518
 519         acpi_table_print(header, sdt_pa);
 520
 521         for (i = 0; i < sdt_count; i++) {
 522
 523                 /* map in just the header */
 524                 header = (struct acpi_table_header *)
 525                     __acpi_map_table(sdt_entry[i].pa,
 526                                      sizeof(struct acpi_table_header));
 527                 if (!header)
 528                         continue;
 529
 530                 /* remap in the entire table before processing */
 531                 header = (struct acpi_table_header *)
 532                     __acpi_map_table(sdt_entry[i].pa, header->length);
 533                 if (!header)
 534                         continue;
 535
 536                 acpi_table_print(header, sdt_entry[i].pa);
 537
 538                 if (acpi_table_compute_checksum(header, header->length)) {
 539                         printk(KERN_WARNING "  >>> ERROR: Invalid checksum\n");
 540                         continue;
 541                 }
 542
 543                 sdt_entry[i].size = header->length;
 544
 545                 for (id = 0; id < ACPI_TABLE_COUNT; id++) {
 546                         if (!strncmp((char *)&header->signature,
 547                                      acpi_table_signatures[id],
 548                                      sizeof(header->signature))) {
 549                                 sdt_entry[i].id = id;
 550                         }
 551                 }
 552         }
 553
 554         /*
 555          * The DSDT is *not* in the RSDT (why not? no idea.) but we want
 556          * to print its info, because this is what people usually blacklist
 557          * against. Unfortunately, we don't know the phys_addr, so just
 558          * print 0. Maybe no one will notice.
 559          */
 560         if (!acpi_get_table_header_early(ACPI_DSDT, &header))
 561                 acpi_table_print(header, 0);
 562
 563         return 0;
 564 }
 565
 566 /*
 567  * acpi_table_init()
 568  *
 569  * find RSDP, find and checksum SDT/XSDT.
 570  * checksum all tables, print SDT/XSDT
 571  *
 572  * result: sdt_entry[] is initialized
 573  */
 574
 575 int __init acpi_table_init(void)
 576 {
 577         struct acpi_table_rsdp *rsdp = NULL;
 578         unsigned long rsdp_phys = 0;
 579         int result = 0;
 580
 581         /* Locate and map the Root System Description Table (RSDP) */
 582
 583         rsdp_phys = acpi_find_rsdp();
 584         if (!rsdp_phys) {
 585                 printk(KERN_ERR PREFIX "Unable to locate RSDP\n");
 586                 return -ENODEV;
 587         }
 588
 589         rsdp = (struct acpi_table_rsdp *)__acpi_map_table(rsdp_phys,
 590                 sizeof(struct acpi_table_rsdp));
 591         if (!rsdp) {
 592                 printk(KERN_WARNING PREFIX "Unable to map RSDP\n");
 593                 return -ENODEV;
 594         }
 595
 596         printk(KERN_DEBUG PREFIX
 597                "RSDP (v%3.3d %6.6s                                ) @ 0x%p\n",
 598                rsdp->revision, rsdp->oem_id, (void *)rsdp_phys);
 599
 600         if (rsdp->revision < 2)
 601                 result =
 602                     acpi_table_compute_checksum(rsdp,
 603                                                 sizeof(struct acpi_table_rsdp));
 604         else
 605                 result =
 606                     acpi_table_compute_checksum(rsdp,
 607                                                 ((struct acpi20_table_rsdp *)
 608                                                  rsdp)->length);
 609
 610         if (result) {
 611                 printk(KERN_WARNING "  >>> ERROR: Invalid checksum\n");
 612                 return -ENODEV;
 613         }
 614
 615         /* Locate and map the System Description table (RSDT/XSDT) */
 616
 617         if (acpi_table_get_sdt(rsdp))
 618                 return -ENODEV;
 619
 620         return 0;
 621 }