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