drivers/acpi/osl.c

   1 /*
   2  *  acpi_osl.c - OS-dependent functions ($Revision: 83 $)
   3  *
   4  *  Copyright (C) 2000       Andrew Henroid
   5  *  Copyright (C) 2001, 2002 Andy Grover <andrew.grover@intel.com>
   6  *  Copyright (C) 2001, 2002 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
   7  *  Copyright (c) 2008 Intel Corporation
   8  *   Author: Matthew Wilcox <willy@linux.intel.com>
   9  *
  10  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  11  *
  12  *  This program is free software; you can redistribute it and/or modify
  13  *  it under the terms of the GNU General Public License as published by
  14  *  the Free Software Foundation; either version 2 of the License, or
  15  *  (at your option) any later version.
  16  *
  17  *  This program is distributed in the hope that it will be useful,
  18  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  *  GNU General Public License for more details.
  21  *
  22  *  You should have received a copy of the GNU General Public License
  23  *  along with this program; if not, write to the Free Software
  24  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  25  *
  26  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  27  *
  28  */
  29
  30 #include <linux/module.h>
  31 #include <linux/kernel.h>
  32 #include <linux/slab.h>
  33 #include <linux/mm.h>
  34 #include <linux/highmem.h>
  35 #include <linux/pci.h>
  36 #include <linux/interrupt.h>
  37 #include <linux/kmod.h>
  38 #include <linux/delay.h>
  39 #include <linux/workqueue.h>
  40 #include <linux/nmi.h>
  41 #include <linux/acpi.h>
  42 #include <linux/acpi_io.h>
  43 #include <linux/efi.h>
  44 #include <linux/ioport.h>
  45 #include <linux/list.h>
  46 #include <linux/jiffies.h>
  47 #include <linux/semaphore.h>
  48
  49 #include <asm/io.h>
  50 #include <asm/uaccess.h>
  51
  52 #include <acpi/acpi.h>
  53 #include <acpi/acpi_bus.h>
  54 #include <acpi/processor.h>
  55
  56 #define _COMPONENT              ACPI_OS_SERVICES
  57 ACPI_MODULE_NAME("osl");
  58 #define PREFIX          "ACPI: "
  59 struct acpi_os_dpc {
  60         acpi_osd_exec_callback function;
  61         void *context;
  62         struct work_struct work;
  63         int wait;
  64 };
  65
  66 #ifdef CONFIG_ACPI_CUSTOM_DSDT
  67 #include CONFIG_ACPI_CUSTOM_DSDT_FILE
  68 #endif
  69
  70 #ifdef ENABLE_DEBUGGER
  71 #include <linux/kdb.h>
  72
  73 /* stuff for debugger support */
  74 int acpi_in_debugger;
  75 EXPORT_SYMBOL(acpi_in_debugger);
  76
  77 extern char line_buf[80];
  78 #endif                          /*ENABLE_DEBUGGER */
  79
  80 static int (*__acpi_os_prepare_sleep)(u8 sleep_state, u32 pm1a_ctrl,
  81                                       u32 pm1b_ctrl);
  82
  83 static acpi_osd_handler acpi_irq_handler;
  84 static void *acpi_irq_context;
  85 static struct workqueue_struct *kacpid_wq;
  86 static struct workqueue_struct *kacpi_notify_wq;
  87 static struct workqueue_struct *kacpi_hotplug_wq;
  88
  89 /*
  90  * This list of permanent mappings is for memory that may be accessed from
  91  * interrupt context, where we can't do the ioremap().
  92  */
  93 struct acpi_ioremap {
  94         struct list_head list;
  95         void __iomem *virt;
  96         acpi_physical_address phys;
  97         acpi_size size;
  98         unsigned long refcount;
  99 };
 100
 101 static LIST_HEAD(acpi_ioremaps);
 102 static DEFINE_MUTEX(acpi_ioremap_lock);
 103
 104 static void __init acpi_osi_setup_late(void);
 105
 106 /*
 107  * The story of _OSI(Linux)
 108  *
 109  * From pre-history through Linux-2.6.22,
 110  * Linux responded TRUE upon a BIOS OSI(Linux) query.
 111  *
 112  * Unfortunately, reference BIOS writers got wind of this
 113  * and put OSI(Linux) in their example code, quickly exposing
 114  * this string as ill-conceived and opening the door to
 115  * an un-bounded number of BIOS incompatibilities.
 116  *
 117  * For example, OSI(Linux) was used on resume to re-POST a
 118  * video card on one system, because Linux at that time
 119  * could not do a speedy restore in its native driver.
 120  * But then upon gaining quick native restore capability,
 121  * Linux has no way to tell the BIOS to skip the time-consuming
 122  * POST -- putting Linux at a permanent performance disadvantage.
 123  * On another system, the BIOS writer used OSI(Linux)
 124  * to infer native OS support for IPMI!  On other systems,
 125  * OSI(Linux) simply got in the way of Linux claiming to
 126  * be compatible with other operating systems, exposing
 127  * BIOS issues such as skipped device initialization.
 128  *
 129  * So "Linux" turned out to be a really poor chose of
 130  * OSI string, and from Linux-2.6.23 onward we respond FALSE.
 131  *
 132  * BIOS writers should NOT query _OSI(Linux) on future systems.
 133  * Linux will complain on the console when it sees it, and return FALSE.
 134  * To get Linux to return TRUE for your system  will require
 135  * a kernel source update to add a DMI entry,
 136  * or boot with "acpi_osi=Linux"
 137  */
 138
 139 static struct osi_linux {
 140         unsigned int    enable:1;
 141         unsigned int    dmi:1;
 142         unsigned int    cmdline:1;
 143 } osi_linux = {0, 0, 0};
 144
 145 static u32 acpi_osi_handler(acpi_string interface, u32 supported)
 146 {
 147         if (!strcmp("Linux", interface)) {
 148
 149                 printk_once(KERN_NOTICE FW_BUG PREFIX
 150                         "BIOS _OSI(Linux) query %s%s\n",
 151                         osi_linux.enable ? "honored" : "ignored",
 152                         osi_linux.cmdline ? " via cmdline" :
 153                         osi_linux.dmi ? " via DMI" : "");
 154         }
 155
 156         return supported;
 157 }
 158
 159 static void __init acpi_request_region (struct acpi_generic_address *gas,
 160         unsigned int length, char *desc)
 161 {
 162         u64 addr;
 163
 164         /* Handle possible alignment issues */
 165         memcpy(&addr, &gas->address, sizeof(addr));
 166         if (!addr || !length)
 167                 return;
 168
 169         /* Resources are never freed */
 170         if (gas->space_id == ACPI_ADR_SPACE_SYSTEM_IO)
 171                 request_region(addr, length, desc);
 172         else if (gas->space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY)
 173                 request_mem_region(addr, length, desc);
 174 }
 175
 176 static int __init acpi_reserve_resources(void)
 177 {
 178         acpi_request_region(&acpi_gbl_FADT.xpm1a_event_block, acpi_gbl_FADT.pm1_event_length,
 179                 "ACPI PM1a_EVT_BLK");
 180
 181         acpi_request_region(&acpi_gbl_FADT.xpm1b_event_block, acpi_gbl_FADT.pm1_event_length,
 182                 "ACPI PM1b_EVT_BLK");
 183
 184         acpi_request_region(&acpi_gbl_FADT.xpm1a_control_block, acpi_gbl_FADT.pm1_control_length,
 185                 "ACPI PM1a_CNT_BLK");
 186
 187         acpi_request_region(&acpi_gbl_FADT.xpm1b_control_block, acpi_gbl_FADT.pm1_control_length,
 188                 "ACPI PM1b_CNT_BLK");
 189
 190         if (acpi_gbl_FADT.pm_timer_length == 4)
 191                 acpi_request_region(&acpi_gbl_FADT.xpm_timer_block, 4, "ACPI PM_TMR");
 192
 193         acpi_request_region(&acpi_gbl_FADT.xpm2_control_block, acpi_gbl_FADT.pm2_control_length,
 194                 "ACPI PM2_CNT_BLK");
 195
 196         /* Length of GPE blocks must be a non-negative multiple of 2 */
 197
 198         if (!(acpi_gbl_FADT.gpe0_block_length & 0x1))
 199                 acpi_request_region(&acpi_gbl_FADT.xgpe0_block,
 200                                acpi_gbl_FADT.gpe0_block_length, "ACPI GPE0_BLK");
 201
 202         if (!(acpi_gbl_FADT.gpe1_block_length & 0x1))
 203                 acpi_request_region(&acpi_gbl_FADT.xgpe1_block,
 204                                acpi_gbl_FADT.gpe1_block_length, "ACPI GPE1_BLK");
 205
 206         return 0;
 207 }
 208 device_initcall(acpi_reserve_resources);
 209
 210 void acpi_os_printf(const char *fmt, ...)
 211 {
 212         va_list args;
 213         va_start(args, fmt);
 214         acpi_os_vprintf(fmt, args);
 215         va_end(args);
 216 }
 217
 218 void acpi_os_vprintf(const char *fmt, va_list args)
 219 {
 220         static char buffer[512];
 221
 222         vsprintf(buffer, fmt, args);
 223
 224 #ifdef ENABLE_DEBUGGER
 225         if (acpi_in_debugger) {
 226                 kdb_printf("%s", buffer);
 227         } else {
 228                 printk(KERN_CONT "%s", buffer);
 229         }
 230 #else
 231         printk(KERN_CONT "%s", buffer);
 232 #endif
 233 }
 234
 235 #ifdef CONFIG_KEXEC
 236 static unsigned long acpi_rsdp;
 237 static int __init setup_acpi_rsdp(char *arg)
 238 {
 239         acpi_rsdp = simple_strtoul(arg, NULL, 16);
 240         return 0;
 241 }
 242 early_param("acpi_rsdp", setup_acpi_rsdp);
 243 #endif
 244
 245 acpi_physical_address __init acpi_os_get_root_pointer(void)
 246 {
 247 #ifdef CONFIG_KEXEC
 248         if (acpi_rsdp)
 249                 return acpi_rsdp;
 250 #endif
 251
 252         if (efi_enabled(EFI_CONFIG_TABLES)) {
 253                 if (efi.acpi20 != EFI_INVALID_TABLE_ADDR)
 254                         return efi.acpi20;
 255                 else if (efi.acpi != EFI_INVALID_TABLE_ADDR)
 256                         return efi.acpi;
 257                 else {
 258                         printk(KERN_ERR PREFIX
 259                                "System description tables not found\n");
 260                         return 0;
 261                 }
 262         } else {
 263                 acpi_physical_address pa = 0;
 264
 265                 acpi_find_root_pointer(&pa);
 266                 return pa;
 267         }
 268 }
 269
 270 /* Must be called with 'acpi_ioremap_lock' or RCU read lock held. */
 271 static struct acpi_ioremap *
 272 acpi_map_lookup(acpi_physical_address phys, acpi_size size)
 273 {
 274         struct acpi_ioremap *map;
 275
 276         list_for_each_entry_rcu(map, &acpi_ioremaps, list)
 277                 if (map->phys <= phys &&
 278                     phys + size <= map->phys + map->size)
 279                         return map;
 280
 281         return NULL;
 282 }
 283
 284 /* Must be called with 'acpi_ioremap_lock' or RCU read lock held. */
 285 static void __iomem *
 286 acpi_map_vaddr_lookup(acpi_physical_address phys, unsigned int size)
 287 {
 288         struct acpi_ioremap *map;
 289
 290         map = acpi_map_lookup(phys, size);
 291         if (map)
 292                 return map->virt + (phys - map->phys);
 293
 294         return NULL;
 295 }
 296
 297 void __iomem *acpi_os_get_iomem(acpi_physical_address phys, unsigned int size)
 298 {
 299         struct acpi_ioremap *map;
 300         void __iomem *virt = NULL;
 301
 302         mutex_lock(&acpi_ioremap_lock);
 303         map = acpi_map_lookup(phys, size);
 304         if (map) {
 305                 virt = map->virt + (phys - map->phys);
 306                 map->refcount++;
 307         }
 308         mutex_unlock(&acpi_ioremap_lock);
 309         return virt;
 310 }
 311 EXPORT_SYMBOL_GPL(acpi_os_get_iomem);
 312
 313 /* Must be called with 'acpi_ioremap_lock' or RCU read lock held. */
 314 static struct acpi_ioremap *
 315 acpi_map_lookup_virt(void __iomem *virt, acpi_size size)
 316 {
 317         struct acpi_ioremap *map;
 318
 319         list_for_each_entry_rcu(map, &acpi_ioremaps, list)
 320                 if (map->virt <= virt &&
 321                     virt + size <= map->virt + map->size)
 322                         return map;
 323
 324         return NULL;
 325 }
 326
 327 #ifndef CONFIG_IA64
 328 #define should_use_kmap(pfn)   page_is_ram(pfn)
 329 #else
 330 /* ioremap will take care of cache attributes */
 331 #define should_use_kmap(pfn)   0
 332 #endif
 333
 334 static void __iomem *acpi_map(acpi_physical_address pg_off, unsigned long pg_sz)
 335 {
 336         unsigned long pfn;
 337
 338         pfn = pg_off >> PAGE_SHIFT;
 339         if (should_use_kmap(pfn)) {
 340                 if (pg_sz > PAGE_SIZE)
 341                         return NULL;
 342                 return (void __iomem __force *)kmap(pfn_to_page(pfn));
 343         } else
 344                 return acpi_os_ioremap(pg_off, pg_sz);
 345 }
 346
 347 static void acpi_unmap(acpi_physical_address pg_off, void __iomem *vaddr)
 348 {
 349         unsigned long pfn;
 350
 351         pfn = pg_off >> PAGE_SHIFT;
 352         if (should_use_kmap(pfn))
 353                 kunmap(pfn_to_page(pfn));
 354         else
 355                 iounmap(vaddr);
 356 }
 357
 358 void __iomem *__init_refok
 359 acpi_os_map_memory(acpi_physical_address phys, acpi_size size)
 360 {
 361         struct acpi_ioremap *map;
 362         void __iomem *virt;
 363         acpi_physical_address pg_off;
 364         acpi_size pg_sz;
 365
 366         if (phys > ULONG_MAX) {
 367                 printk(KERN_ERR PREFIX "Cannot map memory that high\n");
 368                 return NULL;
 369         }
 370
 371         if (!acpi_gbl_permanent_mmap)
 372                 return __acpi_map_table((unsigned long)phys, size);
 373
 374         mutex_lock(&acpi_ioremap_lock);
 375         /* Check if there's a suitable mapping already. */
 376         map = acpi_map_lookup(phys, size);
 377         if (map) {
 378                 map->refcount++;
 379                 goto out;
 380         }
 381
 382         map = kzalloc(sizeof(*map), GFP_KERNEL);
 383         if (!map) {
 384                 mutex_unlock(&acpi_ioremap_lock);
 385                 return NULL;
 386         }
 387
 388         pg_off = round_down(phys, PAGE_SIZE);
 389         pg_sz = round_up(phys + size, PAGE_SIZE) - pg_off;
 390         virt = acpi_map(pg_off, pg_sz);
 391         if (!virt) {
 392                 mutex_unlock(&acpi_ioremap_lock);
 393                 kfree(map);
 394                 return NULL;
 395         }
 396
 397         INIT_LIST_HEAD(&map->list);
 398         map->virt = virt;
 399         map->phys = pg_off;
 400         map->size = pg_sz;
 401         map->refcount = 1;
 402
 403         list_add_tail_rcu(&map->list, &acpi_ioremaps);
 404
 405  out:
 406         mutex_unlock(&acpi_ioremap_lock);
 407         return map->virt + (phys - map->phys);
 408 }
 409 EXPORT_SYMBOL_GPL(acpi_os_map_memory);
 410
 411 static void acpi_os_drop_map_ref(struct acpi_ioremap *map)
 412 {
 413         if (!--map->refcount)
 414                 list_del_rcu(&map->list);
 415 }
 416
 417 static void acpi_os_map_cleanup(struct acpi_ioremap *map)
 418 {
 419         if (!map->refcount) {
 420                 synchronize_rcu();
 421                 acpi_unmap(map->phys, map->virt);
 422                 kfree(map);
 423         }
 424 }
 425
 426 void __ref acpi_os_unmap_memory(void __iomem *virt, acpi_size size)
 427 {
 428         struct acpi_ioremap *map;
 429
 430         if (!acpi_gbl_permanent_mmap) {
 431                 __acpi_unmap_table(virt, size);
 432                 return;
 433         }
 434
 435         mutex_lock(&acpi_ioremap_lock);
 436         map = acpi_map_lookup_virt(virt, size);
 437         if (!map) {
 438                 mutex_unlock(&acpi_ioremap_lock);
 439                 WARN(true, PREFIX "%s: bad address %p\n", __func__, virt);
 440                 return;
 441         }
 442         acpi_os_drop_map_ref(map);
 443         mutex_unlock(&acpi_ioremap_lock);
 444
 445         acpi_os_map_cleanup(map);
 446 }
 447 EXPORT_SYMBOL_GPL(acpi_os_unmap_memory);
 448
 449 void __init early_acpi_os_unmap_memory(void __iomem *virt, acpi_size size)
 450 {
 451         if (!acpi_gbl_permanent_mmap)
 452                 __acpi_unmap_table(virt, size);
 453 }
 454
 455 int acpi_os_map_generic_address(struct acpi_generic_address *gas)
 456 {
 457         u64 addr;
 458         void __iomem *virt;
 459
 460         if (gas->space_id != ACPI_ADR_SPACE_SYSTEM_MEMORY)
 461                 return 0;
 462
 463         /* Handle possible alignment issues */
 464         memcpy(&addr, &gas->address, sizeof(addr));
 465         if (!addr || !gas->bit_width)
 466                 return -EINVAL;
 467
 468         virt = acpi_os_map_memory(addr, gas->bit_width / 8);
 469         if (!virt)
 470                 return -EIO;
 471
 472         return 0;
 473 }
 474 EXPORT_SYMBOL(acpi_os_map_generic_address);
 475
 476 void acpi_os_unmap_generic_address(struct acpi_generic_address *gas)
 477 {
 478         u64 addr;
 479         struct acpi_ioremap *map;
 480
 481         if (gas->space_id != ACPI_ADR_SPACE_SYSTEM_MEMORY)
 482                 return;
 483
 484         /* Handle possible alignment issues */
 485         memcpy(&addr, &gas->address, sizeof(addr));
 486         if (!addr || !gas->bit_width)
 487                 return;
 488
 489         mutex_lock(&acpi_ioremap_lock);
 490         map = acpi_map_lookup(addr, gas->bit_width / 8);
 491         if (!map) {
 492                 mutex_unlock(&acpi_ioremap_lock);
 493                 return;
 494         }
 495         acpi_os_drop_map_ref(map);
 496         mutex_unlock(&acpi_ioremap_lock);
 497
 498         acpi_os_map_cleanup(map);
 499 }
 500 EXPORT_SYMBOL(acpi_os_unmap_generic_address);
 501
 502 #ifdef ACPI_FUTURE_USAGE
 503 acpi_status
 504 acpi_os_get_physical_address(void *virt, acpi_physical_address * phys)
 505 {
 506         if (!phys || !virt)
 507                 return AE_BAD_PARAMETER;
 508
 509         *phys = virt_to_phys(virt);
 510
 511         return AE_OK;
 512 }
 513 #endif
 514
 515 #define ACPI_MAX_OVERRIDE_LEN 100
 516
 517 static char acpi_os_name[ACPI_MAX_OVERRIDE_LEN];
 518
 519 acpi_status
 520 acpi_os_predefined_override(const struct acpi_predefined_names *init_val,
 521                             acpi_string * new_val)
 522 {
 523         if (!init_val || !new_val)
 524                 return AE_BAD_PARAMETER;
 525
 526         *new_val = NULL;
 527         if (!memcmp(init_val->name, "_OS_", 4) && strlen(acpi_os_name)) {
 528                 printk(KERN_INFO PREFIX "Overriding _OS definition to '%s'\n",
 529                        acpi_os_name);
 530                 *new_val = acpi_os_name;
 531         }
 532
 533         return AE_OK;
 534 }
 535
 536 #ifdef CONFIG_ACPI_INITRD_TABLE_OVERRIDE
 537 #include <linux/earlycpio.h>
 538 #include <linux/memblock.h>
 539
 540 static u64 acpi_tables_addr;
 541 static int all_tables_size;
 542
 543 /* Copied from acpica/tbutils.c:acpi_tb_checksum() */
 544 u8 __init acpi_table_checksum(u8 *buffer, u32 length)
 545 {
 546         u8 sum = 0;
 547         u8 *end = buffer + length;
 548
 549         while (buffer < end)
 550                 sum = (u8) (sum + *(buffer++));
 551         return sum;
 552 }
 553
 554 /* All but ACPI_SIG_RSDP and ACPI_SIG_FACS: */
 555 static const char * const table_sigs[] = {
 556         ACPI_SIG_BERT, ACPI_SIG_CPEP, ACPI_SIG_ECDT, ACPI_SIG_EINJ,
 557         ACPI_SIG_ERST, ACPI_SIG_HEST, ACPI_SIG_MADT, ACPI_SIG_MSCT,
 558         ACPI_SIG_SBST, ACPI_SIG_SLIT, ACPI_SIG_SRAT, ACPI_SIG_ASF,
 559         ACPI_SIG_BOOT, ACPI_SIG_DBGP, ACPI_SIG_DMAR, ACPI_SIG_HPET,
 560         ACPI_SIG_IBFT, ACPI_SIG_IVRS, ACPI_SIG_MCFG, ACPI_SIG_MCHI,
 561         ACPI_SIG_SLIC, ACPI_SIG_SPCR, ACPI_SIG_SPMI, ACPI_SIG_TCPA,
 562         ACPI_SIG_UEFI, ACPI_SIG_WAET, ACPI_SIG_WDAT, ACPI_SIG_WDDT,
 563         ACPI_SIG_WDRT, ACPI_SIG_DSDT, ACPI_SIG_FADT, ACPI_SIG_PSDT,
 564         ACPI_SIG_RSDT, ACPI_SIG_XSDT, ACPI_SIG_SSDT, NULL };
 565
 566 /* Non-fatal errors: Affected tables/files are ignored */
 567 #define INVALID_TABLE(x, path, name)                                    \
 568         { pr_err("ACPI OVERRIDE: " x " [%s%s]\n", path, name); continue; }
 569
 570 #define ACPI_HEADER_SIZE sizeof(struct acpi_table_header)
 571
 572 /* Must not increase 10 or needs code modification below */
 573 #define ACPI_OVERRIDE_TABLES 10
 574
 575 void __init acpi_initrd_override(void *data, size_t size)
 576 {
 577         int sig, no, table_nr = 0, total_offset = 0;
 578         long offset = 0;
 579         struct acpi_table_header *table;
 580         char cpio_path[32] = "kernel/firmware/acpi/";
 581         struct cpio_data file;
 582         struct cpio_data early_initrd_files[ACPI_OVERRIDE_TABLES];
 583         char *p;
 584
 585         if (data == NULL || size == 0)
 586                 return;
 587
 588         for (no = 0; no < ACPI_OVERRIDE_TABLES; no++) {
 589                 file = find_cpio_data(cpio_path, data, size, &offset);
 590                 if (!file.data)
 591                         break;
 592
 593                 data += offset;
 594                 size -= offset;
 595
 596                 if (file.size < sizeof(struct acpi_table_header))
 597                         INVALID_TABLE("Table smaller than ACPI header",
 598                                       cpio_path, file.name);
 599
 600                 table = file.data;
 601
 602                 for (sig = 0; table_sigs[sig]; sig++)
 603                         if (!memcmp(table->signature, table_sigs[sig], 4))
 604                                 break;
 605
 606                 if (!table_sigs[sig])
 607                         INVALID_TABLE("Unknown signature",
 608                                       cpio_path, file.name);
 609                 if (file.size != table->length)
 610                         INVALID_TABLE("File length does not match table length",
 611                                       cpio_path, file.name);
 612                 if (acpi_table_checksum(file.data, table->length))
 613                         INVALID_TABLE("Bad table checksum",
 614                                       cpio_path, file.name);
 615
 616                 pr_info("%4.4s ACPI table found in initrd [%s%s][0x%x]\n",
 617                         table->signature, cpio_path, file.name, table->length);
 618
 619                 all_tables_size += table->length;
 620                 early_initrd_files[table_nr].data = file.data;
 621                 early_initrd_files[table_nr].size = file.size;
 622                 table_nr++;
 623         }
 624         if (table_nr == 0)
 625                 return;
 626
 627         acpi_tables_addr =
 628                 memblock_find_in_range(0, max_low_pfn_mapped << PAGE_SHIFT,
 629                                        all_tables_size, PAGE_SIZE);
 630         if (!acpi_tables_addr) {
 631                 WARN_ON(1);
 632                 return;
 633         }
 634         /*
 635          * Only calling e820_add_reserve does not work and the
 636          * tables are invalid (memory got used) later.
 637          * memblock_reserve works as expected and the tables won't get modified.
 638          * But it's not enough on X86 because ioremap will
 639          * complain later (used by acpi_os_map_memory) that the pages
 640          * that should get mapped are not marked "reserved".
 641          * Both memblock_reserve and e820_add_region (via arch_reserve_mem_area)
 642          * works fine.
 643          */
 644         memblock_reserve(acpi_tables_addr, acpi_tables_addr + all_tables_size);
 645         arch_reserve_mem_area(acpi_tables_addr, all_tables_size);
 646
 647         p = early_ioremap(acpi_tables_addr, all_tables_size);
 648
 649         for (no = 0; no < table_nr; no++) {
 650                 memcpy(p + total_offset, early_initrd_files[no].data,
 651                        early_initrd_files[no].size);
 652                 total_offset += early_initrd_files[no].size;
 653         }
 654         early_iounmap(p, all_tables_size);
 655 }
 656 #endif /* CONFIG_ACPI_INITRD_TABLE_OVERRIDE */
 657
 658 static void acpi_table_taint(struct acpi_table_header *table)
 659 {
 660         pr_warn(PREFIX
 661                 "Override [%4.4s-%8.8s], this is unsafe: tainting kernel\n",
 662                 table->signature, table->oem_table_id);
 663         add_taint(TAINT_OVERRIDDEN_ACPI_TABLE, LOCKDEP_NOW_UNRELIABLE);
 664 }
 665
 666
 667 acpi_status
 668 acpi_os_table_override(struct acpi_table_header * existing_table,
 669                        struct acpi_table_header ** new_table)
 670 {
 671         if (!existing_table || !new_table)
 672                 return AE_BAD_PARAMETER;
 673
 674         *new_table = NULL;
 675
 676 #ifdef CONFIG_ACPI_CUSTOM_DSDT
 677         if (strncmp(existing_table->signature, "DSDT", 4) == 0)
 678                 *new_table = (struct acpi_table_header *)AmlCode;
 679 #endif
 680         if (*new_table != NULL)
 681                 acpi_table_taint(existing_table);
 682         return AE_OK;
 683 }
 684
 685 acpi_status
 686 acpi_os_physical_table_override(struct acpi_table_header *existing_table,
 687                                 acpi_physical_address *address,
 688                                 u32 *table_length)
 689 {
 690 #ifndef CONFIG_ACPI_INITRD_TABLE_OVERRIDE
 691         *table_length = 0;
 692         *address = 0;
 693         return AE_OK;
 694 #else
 695         int table_offset = 0;
 696         struct acpi_table_header *table;
 697
 698         *table_length = 0;
 699         *address = 0;
 700
 701         if (!acpi_tables_addr)
 702                 return AE_OK;
 703
 704         do {
 705                 if (table_offset + ACPI_HEADER_SIZE > all_tables_size) {
 706                         WARN_ON(1);
 707                         return AE_OK;
 708                 }
 709
 710                 table = acpi_os_map_memory(acpi_tables_addr + table_offset,
 711                                            ACPI_HEADER_SIZE);
 712
 713                 if (table_offset + table->length > all_tables_size) {
 714                         acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
 715                         WARN_ON(1);
 716                         return AE_OK;
 717                 }
 718
 719                 table_offset += table->length;
 720
 721                 if (memcmp(existing_table->signature, table->signature, 4)) {
 722                         acpi_os_unmap_memory(table,
 723                                      ACPI_HEADER_SIZE);
 724                         continue;
 725                 }
 726
 727                 /* Only override tables with matching oem id */
 728                 if (memcmp(table->oem_table_id, existing_table->oem_table_id,
 729                            ACPI_OEM_TABLE_ID_SIZE)) {
 730                         acpi_os_unmap_memory(table,
 731                                      ACPI_HEADER_SIZE);
 732                         continue;
 733                 }
 734
 735                 table_offset -= table->length;
 736                 *table_length = table->length;
 737                 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
 738                 *address = acpi_tables_addr + table_offset;
 739                 break;
 740         } while (table_offset + ACPI_HEADER_SIZE < all_tables_size);
 741
 742         if (*address != 0)
 743                 acpi_table_taint(existing_table);
 744         return AE_OK;
 745 #endif
 746 }
 747
 748 static irqreturn_t acpi_irq(int irq, void *dev_id)
 749 {
 750         u32 handled;
 751
 752         handled = (*acpi_irq_handler) (acpi_irq_context);
 753
 754         if (handled) {
 755                 acpi_irq_handled++;
 756                 return IRQ_HANDLED;
 757         } else {
 758                 acpi_irq_not_handled++;
 759                 return IRQ_NONE;
 760         }
 761 }
 762
 763 acpi_status
 764 acpi_os_install_interrupt_handler(u32 gsi, acpi_osd_handler handler,
 765                                   void *context)
 766 {
 767         unsigned int irq;
 768
 769         acpi_irq_stats_init();
 770
 771         /*
 772          * ACPI interrupts different from the SCI in our copy of the FADT are
 773          * not supported.
 774          */
 775         if (gsi != acpi_gbl_FADT.sci_interrupt)
 776                 return AE_BAD_PARAMETER;
 777
 778         if (acpi_irq_handler)
 779                 return AE_ALREADY_ACQUIRED;
 780
 781         if (acpi_gsi_to_irq(gsi, &irq) < 0) {
 782                 printk(KERN_ERR PREFIX "SCI (ACPI GSI %d) not registered\n",
 783                        gsi);
 784                 return AE_OK;
 785         }
 786
 787         acpi_irq_handler = handler;
 788         acpi_irq_context = context;
 789         if (request_irq(irq, acpi_irq, IRQF_SHARED | IRQF_NO_SUSPEND, "acpi", acpi_irq)) {
 790                 printk(KERN_ERR PREFIX "SCI (IRQ%d) allocation failed\n", irq);
 791                 acpi_irq_handler = NULL;
 792                 return AE_NOT_ACQUIRED;
 793         }
 794
 795         return AE_OK;
 796 }
 797
 798 acpi_status acpi_os_remove_interrupt_handler(u32 irq, acpi_osd_handler handler)
 799 {
 800         if (irq != acpi_gbl_FADT.sci_interrupt)
 801                 return AE_BAD_PARAMETER;
 802
 803         free_irq(irq, acpi_irq);
 804         acpi_irq_handler = NULL;
 805
 806         return AE_OK;
 807 }
 808
 809 /*
 810  * Running in interpreter thread context, safe to sleep
 811  */
 812
 813 void acpi_os_sleep(u64 ms)
 814 {
 815         schedule_timeout_interruptible(msecs_to_jiffies(ms));
 816 }
 817
 818 void acpi_os_stall(u32 us)
 819 {
 820         while (us) {
 821                 u32 delay = 1000;
 822
 823                 if (delay > us)
 824                         delay = us;
 825                 udelay(delay);
 826                 touch_nmi_watchdog();
 827                 us -= delay;
 828         }
 829 }
 830
 831 /*
 832  * Support ACPI 3.0 AML Timer operand
 833  * Returns 64-bit free-running, monotonically increasing timer
 834  * with 100ns granularity
 835  */
 836 u64 acpi_os_get_timer(void)
 837 {
 838         static u64 t;
 839
 840 #ifdef  CONFIG_HPET
 841         /* TBD: use HPET if available */
 842 #endif
 843
 844 #ifdef  CONFIG_X86_PM_TIMER
 845         /* TBD: default to PM timer if HPET was not available */
 846 #endif
 847         if (!t)
 848                 printk(KERN_ERR PREFIX "acpi_os_get_timer() TBD\n");
 849
 850         return ++t;
 851 }
 852
 853 acpi_status acpi_os_read_port(acpi_io_address port, u32 * value, u32 width)
 854 {
 855         u32 dummy;
 856
 857         if (!value)
 858                 value = &dummy;
 859
 860         *value = 0;
 861         if (width <= 8) {
 862                 *(u8 *) value = inb(port);
 863         } else if (width <= 16) {
 864                 *(u16 *) value = inw(port);
 865         } else if (width <= 32) {
 866                 *(u32 *) value = inl(port);
 867         } else {
 868                 BUG();
 869         }
 870
 871         return AE_OK;
 872 }
 873
 874 EXPORT_SYMBOL(acpi_os_read_port);
 875
 876 acpi_status acpi_os_write_port(acpi_io_address port, u32 value, u32 width)
 877 {
 878         if (width <= 8) {
 879                 outb(value, port);
 880         } else if (width <= 16) {
 881                 outw(value, port);
 882         } else if (width <= 32) {
 883                 outl(value, port);
 884         } else {
 885                 BUG();
 886         }
 887
 888         return AE_OK;
 889 }
 890
 891 EXPORT_SYMBOL(acpi_os_write_port);
 892
 893 #ifdef readq
 894 static inline u64 read64(const volatile void __iomem *addr)
 895 {
 896         return readq(addr);
 897 }
 898 #else
 899 static inline u64 read64(const volatile void __iomem *addr)
 900 {
 901         u64 l, h;
 902         l = readl(addr);
 903         h = readl(addr+4);
 904         return l | (h << 32);
 905 }
 906 #endif
 907
 908 acpi_status
 909 acpi_os_read_memory(acpi_physical_address phys_addr, u64 *value, u32 width)
 910 {
 911         void __iomem *virt_addr;
 912         unsigned int size = width / 8;
 913         bool unmap = false;
 914         u64 dummy;
 915
 916         rcu_read_lock();
 917         virt_addr = acpi_map_vaddr_lookup(phys_addr, size);
 918         if (!virt_addr) {
 919                 rcu_read_unlock();
 920                 virt_addr = acpi_os_ioremap(phys_addr, size);
 921                 if (!virt_addr)
 922                         return AE_BAD_ADDRESS;
 923                 unmap = true;
 924         }
 925
 926         if (!value)
 927                 value = &dummy;
 928
 929         switch (width) {
 930         case 8:
 931                 *(u8 *) value = readb(virt_addr);
 932                 break;
 933         case 16:
 934                 *(u16 *) value = readw(virt_addr);
 935                 break;
 936         case 32:
 937                 *(u32 *) value = readl(virt_addr);
 938                 break;
 939         case 64:
 940                 *(u64 *) value = read64(virt_addr);
 941                 break;
 942         default:
 943                 BUG();
 944         }
 945
 946         if (unmap)
 947                 iounmap(virt_addr);
 948         else
 949                 rcu_read_unlock();
 950
 951         return AE_OK;
 952 }
 953
 954 #ifdef writeq
 955 static inline void write64(u64 val, volatile void __iomem *addr)
 956 {
 957         writeq(val, addr);
 958 }
 959 #else
 960 static inline void write64(u64 val, volatile void __iomem *addr)
 961 {
 962         writel(val, addr);
 963         writel(val>>32, addr+4);
 964 }
 965 #endif
 966
 967 acpi_status
 968 acpi_os_write_memory(acpi_physical_address phys_addr, u64 value, u32 width)
 969 {
 970         void __iomem *virt_addr;
 971         unsigned int size = width / 8;
 972         bool unmap = false;
 973
 974         rcu_read_lock();
 975         virt_addr = acpi_map_vaddr_lookup(phys_addr, size);
 976         if (!virt_addr) {
 977                 rcu_read_unlock();
 978                 virt_addr = acpi_os_ioremap(phys_addr, size);
 979                 if (!virt_addr)
 980                         return AE_BAD_ADDRESS;
 981                 unmap = true;
 982         }
 983
 984         switch (width) {
 985         case 8:
 986                 writeb(value, virt_addr);
 987                 break;
 988         case 16:
 989                 writew(value, virt_addr);
 990                 break;
 991         case 32:
 992                 writel(value, virt_addr);
 993                 break;
 994         case 64:
 995                 write64(value, virt_addr);
 996                 break;
 997         default:
 998                 BUG();
 999         }
1000
1001         if (unmap)
1002                 iounmap(virt_addr);
1003         else
1004                 rcu_read_unlock();
1005
1006         return AE_OK;
1007 }
1008
1009 acpi_status
1010 acpi_os_read_pci_configuration(struct acpi_pci_id * pci_id, u32 reg,
1011                                u64 *value, u32 width)
1012 {
1013         int result, size;
1014         u32 value32;
1015
1016         if (!value)
1017                 return AE_BAD_PARAMETER;
1018
1019         switch (width) {
1020         case 8:
1021                 size = 1;
1022                 break;
1023         case 16:
1024                 size = 2;
1025                 break;
1026         case 32:
1027                 size = 4;
1028                 break;
1029         default:
1030                 return AE_ERROR;
1031         }
1032
1033         result = raw_pci_read(pci_id->segment, pci_id->bus,
1034                                 PCI_DEVFN(pci_id->device, pci_id->function),
1035                                 reg, size, &value32);
1036         *value = value32;
1037
1038         return (result ? AE_ERROR : AE_OK);
1039 }
1040
1041 acpi_status
1042 acpi_os_write_pci_configuration(struct acpi_pci_id * pci_id, u32 reg,
1043                                 u64 value, u32 width)
1044 {
1045         int result, size;
1046
1047         switch (width) {
1048         case 8:
1049                 size = 1;
1050                 break;
1051         case 16:
1052                 size = 2;
1053                 break;
1054         case 32:
1055                 size = 4;
1056                 break;
1057         default:
1058                 return AE_ERROR;
1059         }
1060
1061         result = raw_pci_write(pci_id->segment, pci_id->bus,
1062                                 PCI_DEVFN(pci_id->device, pci_id->function),
1063                                 reg, size, value);
1064
1065         return (result ? AE_ERROR : AE_OK);
1066 }
1067
1068 static void acpi_os_execute_deferred(struct work_struct *work)
1069 {
1070         struct acpi_os_dpc *dpc = container_of(work, struct acpi_os_dpc, work);
1071
1072         if (dpc->wait)
1073                 acpi_os_wait_events_complete();
1074
1075         dpc->function(dpc->context);
1076         kfree(dpc);
1077 }
1078
1079 /*******************************************************************************
1080  *
1081  * FUNCTION:    acpi_os_execute
1082  *
1083  * PARAMETERS:  Type               - Type of the callback
1084  *              Function           - Function to be executed
1085  *              Context            - Function parameters
1086  *
1087  * RETURN:      Status
1088  *
1089  * DESCRIPTION: Depending on type, either queues function for deferred execution or
1090  *              immediately executes function on a separate thread.
1091  *
1092  ******************************************************************************/
1093
1094 static acpi_status __acpi_os_execute(acpi_execute_type type,
1095         acpi_osd_exec_callback function, void *context, int hp)
1096 {
1097         acpi_status status = AE_OK;
1098         struct acpi_os_dpc *dpc;
1099         struct workqueue_struct *queue;
1100         int ret;
1101         ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
1102                           "Scheduling function [%p(%p)] for deferred execution.\n",
1103                           function, context));
1104
1105         /*
1106          * Allocate/initialize DPC structure.  Note that this memory will be
1107          * freed by the callee.  The kernel handles the work_struct list  in a
1108          * way that allows us to also free its memory inside the callee.
1109          * Because we may want to schedule several tasks with different
1110          * parameters we can't use the approach some kernel code uses of
1111          * having a static work_struct.
1112          */
1113
1114         dpc = kzalloc(sizeof(struct acpi_os_dpc), GFP_ATOMIC);
1115         if (!dpc)
1116                 return AE_NO_MEMORY;
1117
1118         dpc->function = function;
1119         dpc->context = context;
1120
1121         /*
1122          * We can't run hotplug code in keventd_wq/kacpid_wq/kacpid_notify_wq
1123          * because the hotplug code may call driver .remove() functions,
1124          * which invoke flush_scheduled_work/acpi_os_wait_events_complete
1125          * to flush these workqueues.
1126          *
1127          * To prevent lockdep from complaining unnecessarily, make sure that
1128          * there is a different static lockdep key for each workqueue by using
1129          * INIT_WORK() for each of them separately.
1130          */
1131         if (hp) {
1132                 queue = kacpi_hotplug_wq;
1133                 dpc->wait = 1;
1134                 INIT_WORK(&dpc->work, acpi_os_execute_deferred);
1135         } else if (type == OSL_NOTIFY_HANDLER) {
1136                 queue = kacpi_notify_wq;
1137                 INIT_WORK(&dpc->work, acpi_os_execute_deferred);
1138         } else {
1139                 queue = kacpid_wq;
1140                 INIT_WORK(&dpc->work, acpi_os_execute_deferred);
1141         }
1142
1143         /*
1144          * On some machines, a software-initiated SMI causes corruption unless
1145          * the SMI runs on CPU 0.  An SMI can be initiated by any AML, but
1146          * typically it's done in GPE-related methods that are run via
1147          * workqueues, so we can avoid the known corruption cases by always
1148          * queueing on CPU 0.
1149          */
1150         ret = queue_work_on(0, queue, &dpc->work);
1151
1152         if (!ret) {
1153                 printk(KERN_ERR PREFIX
1154                           "Call to queue_work() failed.\n");
1155                 status = AE_ERROR;
1156                 kfree(dpc);
1157         }
1158         return status;
1159 }
1160
1161 acpi_status acpi_os_execute(acpi_execute_type type,
1162                             acpi_osd_exec_callback function, void *context)
1163 {
1164         return __acpi_os_execute(type, function, context, 0);
1165 }
1166 EXPORT_SYMBOL(acpi_os_execute);
1167
1168 acpi_status acpi_os_hotplug_execute(acpi_osd_exec_callback function,
1169         void *context)
1170 {
1171         return __acpi_os_execute(0, function, context, 1);
1172 }
1173 EXPORT_SYMBOL(acpi_os_hotplug_execute);
1174
1175 void acpi_os_wait_events_complete(void)
1176 {
1177         flush_workqueue(kacpid_wq);
1178         flush_workqueue(kacpi_notify_wq);
1179 }
1180
1181 EXPORT_SYMBOL(acpi_os_wait_events_complete);
1182
1183 acpi_status
1184 acpi_os_create_semaphore(u32 max_units, u32 initial_units, acpi_handle * handle)
1185 {
1186         struct semaphore *sem = NULL;
1187
1188         sem = acpi_os_allocate(sizeof(struct semaphore));
1189         if (!sem)
1190                 return AE_NO_MEMORY;
1191         memset(sem, 0, sizeof(struct semaphore));
1192
1193         sema_init(sem, initial_units);
1194
1195         *handle = (acpi_handle *) sem;
1196
1197         ACPI_DEBUG_PRINT((ACPI_DB_MUTEX, "Creating semaphore[%p|%d].\n",
1198                           *handle, initial_units));
1199
1200         return AE_OK;
1201 }
1202
1203 /*
1204  * TODO: A better way to delete semaphores?  Linux doesn't have a
1205  * 'delete_semaphore()' function -- may result in an invalid
1206  * pointer dereference for non-synchronized consumers.  Should
1207  * we at least check for blocked threads and signal/cancel them?
1208  */
1209
1210 acpi_status acpi_os_delete_semaphore(acpi_handle handle)
1211 {
1212         struct semaphore *sem = (struct semaphore *)handle;
1213
1214         if (!sem)
1215                 return AE_BAD_PARAMETER;
1216
1217         ACPI_DEBUG_PRINT((ACPI_DB_MUTEX, "Deleting semaphore[%p].\n", handle));
1218
1219         BUG_ON(!list_empty(&sem->wait_list));
1220         kfree(sem);
1221         sem = NULL;
1222
1223         return AE_OK;
1224 }
1225
1226 /*
1227  * TODO: Support for units > 1?
1228  */
1229 acpi_status acpi_os_wait_semaphore(acpi_handle handle, u32 units, u16 timeout)
1230 {
1231         acpi_status status = AE_OK;
1232         struct semaphore *sem = (struct semaphore *)handle;
1233         long jiffies;
1234         int ret = 0;
1235
1236         if (!sem || (units < 1))
1237                 return AE_BAD_PARAMETER;
1238
1239         if (units > 1)
1240                 return AE_SUPPORT;
1241
1242         ACPI_DEBUG_PRINT((ACPI_DB_MUTEX, "Waiting for semaphore[%p|%d|%d]\n",
1243                           handle, units, timeout));
1244
1245         if (timeout == ACPI_WAIT_FOREVER)
1246                 jiffies = MAX_SCHEDULE_TIMEOUT;
1247         else
1248                 jiffies = msecs_to_jiffies(timeout);
1249
1250         ret = down_timeout(sem, jiffies);
1251         if (ret)
1252                 status = AE_TIME;
1253
1254         if (ACPI_FAILURE(status)) {
1255                 ACPI_DEBUG_PRINT((ACPI_DB_MUTEX,
1256                                   "Failed to acquire semaphore[%p|%d|%d], %s",
1257                                   handle, units, timeout,
1258                                   acpi_format_exception(status)));
1259         } else {
1260                 ACPI_DEBUG_PRINT((ACPI_DB_MUTEX,
1261                                   "Acquired semaphore[%p|%d|%d]", handle,
1262                                   units, timeout));
1263         }
1264
1265         return status;
1266 }
1267
1268 /*
1269  * TODO: Support for units > 1?
1270  */
1271 acpi_status acpi_os_signal_semaphore(acpi_handle handle, u32 units)
1272 {
1273         struct semaphore *sem = (struct semaphore *)handle;
1274
1275         if (!sem || (units < 1))
1276                 return AE_BAD_PARAMETER;
1277
1278         if (units > 1)
1279                 return AE_SUPPORT;
1280
1281         ACPI_DEBUG_PRINT((ACPI_DB_MUTEX, "Signaling semaphore[%p|%d]\n", handle,
1282                           units));
1283
1284         up(sem);
1285
1286         return AE_OK;
1287 }
1288
1289 #ifdef ACPI_FUTURE_USAGE
1290 u32 acpi_os_get_line(char *buffer)
1291 {
1292
1293 #ifdef ENABLE_DEBUGGER
1294         if (acpi_in_debugger) {
1295                 u32 chars;
1296
1297                 kdb_read(buffer, sizeof(line_buf));
1298
1299                 /* remove the CR kdb includes */
1300                 chars = strlen(buffer) - 1;
1301                 buffer[chars] = '\0';
1302         }
1303 #endif
1304
1305         return 0;
1306 }
1307 #endif                          /*  ACPI_FUTURE_USAGE  */
1308
1309 acpi_status acpi_os_signal(u32 function, void *info)
1310 {
1311         switch (function) {
1312         case ACPI_SIGNAL_FATAL:
1313                 printk(KERN_ERR PREFIX "Fatal opcode executed\n");
1314                 break;
1315         case ACPI_SIGNAL_BREAKPOINT:
1316                 /*
1317                  * AML Breakpoint
1318                  * ACPI spec. says to treat it as a NOP unless
1319                  * you are debugging.  So if/when we integrate
1320                  * AML debugger into the kernel debugger its
1321                  * hook will go here.  But until then it is
1322                  * not useful to print anything on breakpoints.
1323                  */
1324                 break;
1325         default:
1326                 break;
1327         }
1328
1329         return AE_OK;
1330 }
1331
1332 static int __init acpi_os_name_setup(char *str)
1333 {
1334         char *p = acpi_os_name;
1335         int count = ACPI_MAX_OVERRIDE_LEN - 1;
1336
1337         if (!str || !*str)
1338                 return 0;
1339
1340         for (; count-- && str && *str; str++) {
1341                 if (isalnum(*str) || *str == ' ' || *str == ':')
1342                         *p++ = *str;
1343                 else if (*str == '\'' || *str == '"')
1344                         continue;
1345                 else
1346                         break;
1347         }
1348         *p = 0;
1349
1350         return 1;
1351
1352 }
1353
1354 __setup("acpi_os_name=", acpi_os_name_setup);
1355
1356 #define OSI_STRING_LENGTH_MAX 64        /* arbitrary */
1357 #define OSI_STRING_ENTRIES_MAX 16       /* arbitrary */
1358
1359 struct osi_setup_entry {
1360         char string[OSI_STRING_LENGTH_MAX];
1361         bool enable;
1362 };
1363
1364 static struct osi_setup_entry __initdata
1365                 osi_setup_entries[OSI_STRING_ENTRIES_MAX] = {
1366         {"Module Device", true},
1367         {"Processor Device", true},
1368         {"3.0 _SCP Extensions", true},
1369         {"Processor Aggregator Device", true},
1370 };
1371
1372 void __init acpi_osi_setup(char *str)
1373 {
1374         struct osi_setup_entry *osi;
1375         bool enable = true;
1376         int i;
1377
1378         if (!acpi_gbl_create_osi_method)
1379                 return;
1380
1381         if (str == NULL || *str == '\0') {
1382                 printk(KERN_INFO PREFIX "_OSI method disabled\n");
1383                 acpi_gbl_create_osi_method = FALSE;
1384                 return;
1385         }
1386
1387         if (*str == '!') {
1388                 str++;
1389                 enable = false;
1390         }
1391
1392         for (i = 0; i < OSI_STRING_ENTRIES_MAX; i++) {
1393                 osi = &osi_setup_entries[i];
1394                 if (!strcmp(osi->string, str)) {
1395                         osi->enable = enable;
1396                         break;
1397                 } else if (osi->string[0] == '\0') {
1398                         osi->enable = enable;
1399                         strncpy(osi->string, str, OSI_STRING_LENGTH_MAX);
1400                         break;
1401                 }
1402         }
1403 }
1404
1405 static void __init set_osi_linux(unsigned int enable)
1406 {
1407         if (osi_linux.enable != enable)
1408                 osi_linux.enable = enable;
1409
1410         if (osi_linux.enable)
1411                 acpi_osi_setup("Linux");
1412         else
1413                 acpi_osi_setup("!Linux");
1414
1415         return;
1416 }
1417
1418 static void __init acpi_cmdline_osi_linux(unsigned int enable)
1419 {
1420         osi_linux.cmdline = 1;  /* cmdline set the default and override DMI */
1421         osi_linux.dmi = 0;
1422         set_osi_linux(enable);
1423
1424         return;
1425 }
1426
1427 void __init acpi_dmi_osi_linux(int enable, const struct dmi_system_id *d)
1428 {
1429         printk(KERN_NOTICE PREFIX "DMI detected: %s\n", d->ident);
1430
1431         if (enable == -1)
1432                 return;
1433
1434         osi_linux.dmi = 1;      /* DMI knows that this box asks OSI(Linux) */
1435         set_osi_linux(enable);
1436
1437         return;
1438 }
1439
1440 /*
1441  * Modify the list of "OS Interfaces" reported to BIOS via _OSI
1442  *
1443  * empty string disables _OSI
1444  * string starting with '!' disables that string
1445  * otherwise string is added to list, augmenting built-in strings
1446  */
1447 static void __init acpi_osi_setup_late(void)
1448 {
1449         struct osi_setup_entry *osi;
1450         char *str;
1451         int i;
1452         acpi_status status;
1453
1454         for (i = 0; i < OSI_STRING_ENTRIES_MAX; i++) {
1455                 osi = &osi_setup_entries[i];
1456                 str = osi->string;
1457
1458                 if (*str == '\0')
1459                         break;
1460                 if (osi->enable) {
1461                         status = acpi_install_interface(str);
1462
1463                         if (ACPI_SUCCESS(status))
1464                                 printk(KERN_INFO PREFIX "Added _OSI(%s)\n", str);
1465                 } else {
1466                         status = acpi_remove_interface(str);
1467
1468                         if (ACPI_SUCCESS(status))
1469                                 printk(KERN_INFO PREFIX "Deleted _OSI(%s)\n", str);
1470                 }
1471         }
1472 }
1473
1474 static int __init osi_setup(char *str)
1475 {
1476         if (str && !strcmp("Linux", str))
1477                 acpi_cmdline_osi_linux(1);
1478         else if (str && !strcmp("!Linux", str))
1479                 acpi_cmdline_osi_linux(0);
1480         else
1481                 acpi_osi_setup(str);
1482
1483         return 1;
1484 }
1485
1486 __setup("acpi_osi=", osi_setup);
1487
1488 /* enable serialization to combat AE_ALREADY_EXISTS errors */
1489 static int __init acpi_serialize_setup(char *str)
1490 {
1491         printk(KERN_INFO PREFIX "serialize enabled\n");
1492
1493         acpi_gbl_all_methods_serialized = TRUE;
1494
1495         return 1;
1496 }
1497
1498 __setup("acpi_serialize", acpi_serialize_setup);
1499
1500 /* Check of resource interference between native drivers and ACPI
1501  * OperationRegions (SystemIO and System Memory only).
1502  * IO ports and memory declared in ACPI might be used by the ACPI subsystem
1503  * in arbitrary AML code and can interfere with legacy drivers.
1504  * acpi_enforce_resources= can be set to:
1505  *
1506  *   - strict (default) (2)
1507  *     -> further driver trying to access the resources will not load
1508  *   - lax              (1)
1509  *     -> further driver trying to access the resources will load, but you
1510  *     get a system message that something might go wrong...
1511  *
1512  *   - no               (0)
1513  *     -> ACPI Operation Region resources will not be registered
1514  *
1515  */
1516 #define ENFORCE_RESOURCES_STRICT 2
1517 #define ENFORCE_RESOURCES_LAX    1
1518 #define ENFORCE_RESOURCES_NO     0
1519
1520 static unsigned int acpi_enforce_resources = ENFORCE_RESOURCES_STRICT;
1521
1522 static int __init acpi_enforce_resources_setup(char *str)
1523 {
1524         if (str == NULL || *str == '\0')
1525                 return 0;
1526
1527         if (!strcmp("strict", str))
1528                 acpi_enforce_resources = ENFORCE_RESOURCES_STRICT;
1529         else if (!strcmp("lax", str))
1530                 acpi_enforce_resources = ENFORCE_RESOURCES_LAX;
1531         else if (!strcmp("no", str))
1532                 acpi_enforce_resources = ENFORCE_RESOURCES_NO;
1533
1534         return 1;
1535 }
1536
1537 __setup("acpi_enforce_resources=", acpi_enforce_resources_setup);
1538
1539 /* Check for resource conflicts between ACPI OperationRegions and native
1540  * drivers */
1541 int acpi_check_resource_conflict(const struct resource *res)
1542 {
1543         acpi_adr_space_type space_id;
1544         acpi_size length;
1545         u8 warn = 0;
1546         int clash = 0;
1547
1548         if (acpi_enforce_resources == ENFORCE_RESOURCES_NO)
1549                 return 0;
1550         if (!(res->flags & IORESOURCE_IO) && !(res->flags & IORESOURCE_MEM))
1551                 return 0;
1552
1553         if (res->flags & IORESOURCE_IO)
1554                 space_id = ACPI_ADR_SPACE_SYSTEM_IO;
1555         else
1556                 space_id = ACPI_ADR_SPACE_SYSTEM_MEMORY;
1557
1558         length = res->end - res->start + 1;
1559         if (acpi_enforce_resources != ENFORCE_RESOURCES_NO)
1560                 warn = 1;
1561         clash = acpi_check_address_range(space_id, res->start, length, warn);
1562
1563         if (clash) {
1564                 if (acpi_enforce_resources != ENFORCE_RESOURCES_NO) {
1565                         if (acpi_enforce_resources == ENFORCE_RESOURCES_LAX)
1566                                 printk(KERN_NOTICE "ACPI: This conflict may"
1567                                        " cause random problems and system"
1568                                        " instability\n");
1569                         printk(KERN_INFO "ACPI: If an ACPI driver is available"
1570                                " for this device, you should use it instead of"
1571                                " the native driver\n");
1572                 }
1573                 if (acpi_enforce_resources == ENFORCE_RESOURCES_STRICT)
1574                         return -EBUSY;
1575         }
1576         return 0;
1577 }
1578 EXPORT_SYMBOL(acpi_check_resource_conflict);
1579
1580 int acpi_check_region(resource_size_t start, resource_size_t n,
1581                       const char *name)
1582 {
1583         struct resource res = {
1584                 .start = start,
1585                 .end   = start + n - 1,
1586                 .name  = name,
1587                 .flags = IORESOURCE_IO,
1588         };
1589
1590         return acpi_check_resource_conflict(&res);
1591 }
1592 EXPORT_SYMBOL(acpi_check_region);
1593
1594 /*
1595  * Let drivers know whether the resource checks are effective
1596  */
1597 int acpi_resources_are_enforced(void)
1598 {
1599         return acpi_enforce_resources == ENFORCE_RESOURCES_STRICT;
1600 }
1601 EXPORT_SYMBOL(acpi_resources_are_enforced);
1602
1603 /*
1604  * Deallocate the memory for a spinlock.
1605  */
1606 void acpi_os_delete_lock(acpi_spinlock handle)
1607 {
1608         ACPI_FREE(handle);
1609 }
1610
1611 /*
1612  * Acquire a spinlock.
1613  *
1614  * handle is a pointer to the spinlock_t.
1615  */
1616
1617 acpi_cpu_flags acpi_os_acquire_lock(acpi_spinlock lockp)
1618 {
1619         acpi_cpu_flags flags;
1620         spin_lock_irqsave(lockp, flags);
1621         return flags;
1622 }
1623
1624 /*
1625  * Release a spinlock. See above.
1626  */
1627
1628 void acpi_os_release_lock(acpi_spinlock lockp, acpi_cpu_flags flags)
1629 {
1630         spin_unlock_irqrestore(lockp, flags);
1631 }
1632
1633 #ifndef ACPI_USE_LOCAL_CACHE
1634
1635 /*******************************************************************************
1636  *
1637  * FUNCTION:    acpi_os_create_cache
1638  *
1639  * PARAMETERS:  name      - Ascii name for the cache
1640  *              size      - Size of each cached object
1641  *              depth     - Maximum depth of the cache (in objects) <ignored>
1642  *              cache     - Where the new cache object is returned
1643  *
1644  * RETURN:      status
1645  *
1646  * DESCRIPTION: Create a cache object
1647  *
1648  ******************************************************************************/
1649
1650 acpi_status
1651 acpi_os_create_cache(char *name, u16 size, u16 depth, acpi_cache_t ** cache)
1652 {
1653         *cache = kmem_cache_create(name, size, 0, 0, NULL);
1654         if (*cache == NULL)
1655                 return AE_ERROR;
1656         else
1657                 return AE_OK;
1658 }
1659
1660 /*******************************************************************************
1661  *
1662  * FUNCTION:    acpi_os_purge_cache
1663  *
1664  * PARAMETERS:  Cache           - Handle to cache object
1665  *
1666  * RETURN:      Status
1667  *
1668  * DESCRIPTION: Free all objects within the requested cache.
1669  *
1670  ******************************************************************************/
1671
1672 acpi_status acpi_os_purge_cache(acpi_cache_t * cache)
1673 {
1674         kmem_cache_shrink(cache);
1675         return (AE_OK);
1676 }
1677
1678 /*******************************************************************************
1679  *
1680  * FUNCTION:    acpi_os_delete_cache
1681  *
1682  * PARAMETERS:  Cache           - Handle to cache object
1683  *
1684  * RETURN:      Status
1685  *
1686  * DESCRIPTION: Free all objects within the requested cache and delete the
1687  *              cache object.
1688  *
1689  ******************************************************************************/
1690
1691 acpi_status acpi_os_delete_cache(acpi_cache_t * cache)
1692 {
1693         kmem_cache_destroy(cache);
1694         return (AE_OK);
1695 }
1696
1697 /*******************************************************************************
1698  *
1699  * FUNCTION:    acpi_os_release_object
1700  *
1701  * PARAMETERS:  Cache       - Handle to cache object
1702  *              Object      - The object to be released
1703  *
1704  * RETURN:      None
1705  *
1706  * DESCRIPTION: Release an object to the specified cache.  If cache is full,
1707  *              the object is deleted.
1708  *
1709  ******************************************************************************/
1710
1711 acpi_status acpi_os_release_object(acpi_cache_t * cache, void *object)
1712 {
1713         kmem_cache_free(cache, object);
1714         return (AE_OK);
1715 }
1716 #endif
1717
1718 acpi_status __init acpi_os_initialize(void)
1719 {
1720         acpi_os_map_generic_address(&acpi_gbl_FADT.xpm1a_event_block);
1721         acpi_os_map_generic_address(&acpi_gbl_FADT.xpm1b_event_block);
1722         acpi_os_map_generic_address(&acpi_gbl_FADT.xgpe0_block);
1723         acpi_os_map_generic_address(&acpi_gbl_FADT.xgpe1_block);
1724
1725         return AE_OK;
1726 }
1727
1728 acpi_status __init acpi_os_initialize1(void)
1729 {
1730         kacpid_wq = alloc_workqueue("kacpid", 0, 1);
1731         kacpi_notify_wq = alloc_workqueue("kacpi_notify", 0, 1);
1732         kacpi_hotplug_wq = alloc_workqueue("kacpi_hotplug", 0, 1);
1733         BUG_ON(!kacpid_wq);
1734         BUG_ON(!kacpi_notify_wq);
1735         BUG_ON(!kacpi_hotplug_wq);
1736         acpi_install_interface_handler(acpi_osi_handler);
1737         acpi_osi_setup_late();
1738         return AE_OK;
1739 }
1740
1741 acpi_status acpi_os_terminate(void)
1742 {
1743         if (acpi_irq_handler) {
1744                 acpi_os_remove_interrupt_handler(acpi_gbl_FADT.sci_interrupt,
1745                                                  acpi_irq_handler);
1746         }
1747
1748         acpi_os_unmap_generic_address(&acpi_gbl_FADT.xgpe1_block);
1749         acpi_os_unmap_generic_address(&acpi_gbl_FADT.xgpe0_block);
1750         acpi_os_unmap_generic_address(&acpi_gbl_FADT.xpm1b_event_block);
1751         acpi_os_unmap_generic_address(&acpi_gbl_FADT.xpm1a_event_block);
1752
1753         destroy_workqueue(kacpid_wq);
1754         destroy_workqueue(kacpi_notify_wq);
1755         destroy_workqueue(kacpi_hotplug_wq);
1756
1757         return AE_OK;
1758 }
1759
1760 acpi_status acpi_os_prepare_sleep(u8 sleep_state, u32 pm1a_control,
1761                                   u32 pm1b_control)
1762 {
1763         int rc = 0;
1764         if (__acpi_os_prepare_sleep)
1765                 rc = __acpi_os_prepare_sleep(sleep_state,
1766                                              pm1a_control, pm1b_control);
1767         if (rc < 0)
1768                 return AE_ERROR;
1769         else if (rc > 0)
1770                 return AE_CTRL_SKIP;
1771
1772         return AE_OK;
1773 }
1774
1775 void acpi_os_set_prepare_sleep(int (*func)(u8 sleep_state,
1776                                u32 pm1a_ctrl, u32 pm1b_ctrl))
1777 {
1778         __acpi_os_prepare_sleep = func;
1779 }
1780
1781 void alloc_acpi_hp_work(acpi_handle handle, u32 type, void *context,
1782                         void (*func)(struct work_struct *work))
1783 {
1784         struct acpi_hp_work *hp_work;
1785         int ret;
1786
1787         hp_work = kmalloc(sizeof(*hp_work), GFP_KERNEL);
1788         if (!hp_work)
1789                 return;
1790
1791         hp_work->handle = handle;
1792         hp_work->type = type;
1793         hp_work->context = context;
1794
1795         INIT_WORK(&hp_work->work, func);
1796         ret = queue_work(kacpi_hotplug_wq, &hp_work->work);
1797         if (!ret)
1798                 kfree(hp_work);
1799 }
1800 EXPORT_SYMBOL_GPL(alloc_acpi_hp_work);