2 * Extensible Firmware Interface
4 * Based on Extensible Firmware Interface Specification version 1.0
6 * Copyright (C) 1999 VA Linux Systems
7 * Copyright (C) 1999 Walt Drummond <drummond@valinux.com>
8 * Copyright (C) 1999-2002 Hewlett-Packard Co.
9 * David Mosberger-Tang <davidm@hpl.hp.com>
10 * Stephane Eranian <eranian@hpl.hp.com>
12 * All EFI Runtime Services are not implemented yet as EFI only
13 * supports physical mode addressing on SoftSDV. This is to be fixed
14 * in a future version. --drummond 1999-07-20
16 * Implemented EFI runtime services and virtual mode calls. --davidm
18 * Goutham Rao: <goutham.rao@intel.com>
19 * Skip non-WB memory and ignore empty memory ranges.
22 #include <linux/kernel.h>
23 #include <linux/init.h>
25 #include <linux/types.h>
26 #include <linux/time.h>
27 #include <linux/spinlock.h>
28 #include <linux/bootmem.h>
29 #include <linux/ioport.h>
30 #include <linux/module.h>
31 #include <linux/efi.h>
32 #include <linux/kexec.h>
34 #include <asm/setup.h>
37 #include <asm/pgtable.h>
38 #include <asm/processor.h>
40 #include <asm/tlbflush.h>
45 extern efi_status_t asmlinkage efi_call_phys(void *, ...);
49 static struct efi efi_phys;
50 struct efi_memory_map memmap;
53 * We require an early boot_ioremap mapping mechanism initially
55 extern void * boot_ioremap(unsigned long, unsigned long);
58 * To make EFI call EFI runtime service in physical addressing mode we need
59 * prelog/epilog before/after the invocation to disable interrupt, to
60 * claim EFI runtime service handler exclusively and to duplicate a memory in
61 * low memory space say 0 - 3G.
64 static unsigned long efi_rt_eflags;
65 static DEFINE_SPINLOCK(efi_rt_lock);
66 static pgd_t efi_bak_pg_dir_pointer[2];
68 static void efi_call_phys_prelog(void) __acquires(efi_rt_lock)
72 struct Xgt_desc_struct *cpu_gdt_descr;
74 spin_lock(&efi_rt_lock);
75 local_irq_save(efi_rt_eflags);
77 cpu_gdt_descr = &per_cpu(cpu_gdt_descr, 0);
80 * If I don't have PSE, I should just duplicate two entries in page
81 * directory. If I have PSE, I just need to duplicate one entry in
86 if (cr4 & X86_CR4_PSE) {
87 efi_bak_pg_dir_pointer[0].pgd =
88 swapper_pg_dir[pgd_index(0)].pgd;
89 swapper_pg_dir[0].pgd =
90 swapper_pg_dir[pgd_index(PAGE_OFFSET)].pgd;
92 efi_bak_pg_dir_pointer[0].pgd =
93 swapper_pg_dir[pgd_index(0)].pgd;
94 efi_bak_pg_dir_pointer[1].pgd =
95 swapper_pg_dir[pgd_index(0x400000)].pgd;
96 swapper_pg_dir[pgd_index(0)].pgd =
97 swapper_pg_dir[pgd_index(PAGE_OFFSET)].pgd;
98 temp = PAGE_OFFSET + 0x400000;
99 swapper_pg_dir[pgd_index(0x400000)].pgd =
100 swapper_pg_dir[pgd_index(temp)].pgd;
104 * After the lock is released, the original page table is restored.
108 cpu_gdt_descr->address = __pa(cpu_gdt_descr->address);
109 load_gdt(cpu_gdt_descr);
112 static void efi_call_phys_epilog(void) __releases(efi_rt_lock)
115 struct Xgt_desc_struct *cpu_gdt_descr = &per_cpu(cpu_gdt_descr, 0);
117 cpu_gdt_descr->address = (unsigned long)__va(cpu_gdt_descr->address);
118 load_gdt(cpu_gdt_descr);
122 if (cr4 & X86_CR4_PSE) {
123 swapper_pg_dir[pgd_index(0)].pgd =
124 efi_bak_pg_dir_pointer[0].pgd;
126 swapper_pg_dir[pgd_index(0)].pgd =
127 efi_bak_pg_dir_pointer[0].pgd;
128 swapper_pg_dir[pgd_index(0x400000)].pgd =
129 efi_bak_pg_dir_pointer[1].pgd;
133 * After the lock is released, the original page table is restored.
137 local_irq_restore(efi_rt_eflags);
138 spin_unlock(&efi_rt_lock);
142 phys_efi_set_virtual_address_map(unsigned long memory_map_size,
143 unsigned long descriptor_size,
144 u32 descriptor_version,
145 efi_memory_desc_t *virtual_map)
149 efi_call_phys_prelog();
150 status = efi_call_phys(efi_phys.set_virtual_address_map,
151 memory_map_size, descriptor_size,
152 descriptor_version, virtual_map);
153 efi_call_phys_epilog();
158 phys_efi_get_time(efi_time_t *tm, efi_time_cap_t *tc)
162 efi_call_phys_prelog();
163 status = efi_call_phys(efi_phys.get_time, tm, tc);
164 efi_call_phys_epilog();
168 inline int efi_set_rtc_mmss(unsigned long nowtime)
170 int real_seconds, real_minutes;
175 spin_lock(&efi_rt_lock);
176 status = efi.get_time(&eft, &cap);
177 spin_unlock(&efi_rt_lock);
178 if (status != EFI_SUCCESS)
179 panic("Ooops, efitime: can't read time!\n");
180 real_seconds = nowtime % 60;
181 real_minutes = nowtime / 60;
183 if (((abs(real_minutes - eft.minute) + 15)/30) & 1)
187 eft.minute = real_minutes;
188 eft.second = real_seconds;
190 if (status != EFI_SUCCESS) {
191 printk("Ooops: efitime: can't read time!\n");
197 * This is used during kernel init before runtime
198 * services have been remapped and also during suspend, therefore,
199 * we'll need to call both in physical and virtual modes.
201 inline unsigned long efi_get_time(void)
208 /* if we are in virtual mode use remapped function */
209 status = efi.get_time(&eft, &cap);
211 /* we are in physical mode */
212 status = phys_efi_get_time(&eft, &cap);
215 if (status != EFI_SUCCESS)
216 printk("Oops: efitime: can't read time status: 0x%lx\n",status);
218 return mktime(eft.year, eft.month, eft.day, eft.hour,
219 eft.minute, eft.second);
222 int is_available_memory(efi_memory_desc_t * md)
224 if (!(md->attribute & EFI_MEMORY_WB))
228 case EFI_LOADER_CODE:
229 case EFI_LOADER_DATA:
230 case EFI_BOOT_SERVICES_CODE:
231 case EFI_BOOT_SERVICES_DATA:
232 case EFI_CONVENTIONAL_MEMORY:
239 * We need to map the EFI memory map again after paging_init().
241 void __init efi_map_memmap(void)
245 memmap.map = bt_ioremap((unsigned long) memmap.phys_map,
246 (memmap.nr_map * memmap.desc_size));
247 if (memmap.map == NULL)
248 printk(KERN_ERR PFX "Could not remap the EFI memmap!\n");
250 memmap.map_end = memmap.map + (memmap.nr_map * memmap.desc_size);
254 static void __init print_efi_memmap(void)
256 efi_memory_desc_t *md;
260 for (p = memmap.map, i = 0; p < memmap.map_end; p += memmap.desc_size, i++) {
262 printk(KERN_INFO "mem%02u: type=%u, attr=0x%llx, "
263 "range=[0x%016llx-0x%016llx) (%lluMB)\n",
264 i, md->type, md->attribute, md->phys_addr,
265 md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT),
266 (md->num_pages >> (20 - EFI_PAGE_SHIFT)));
269 #endif /* EFI_DEBUG */
272 * Walks the EFI memory map and calls CALLBACK once for each EFI
273 * memory descriptor that has memory that is available for kernel use.
275 void efi_memmap_walk(efi_freemem_callback_t callback, void *arg)
282 efi_memory_desc_t *md;
283 unsigned long start, end;
286 for (p = memmap.map; p < memmap.map_end; p += memmap.desc_size) {
289 if ((md->num_pages == 0) || (!is_available_memory(md)))
292 curr.start = md->phys_addr;
293 curr.end = curr.start + (md->num_pages << EFI_PAGE_SHIFT);
299 if (curr.start < prev.start)
300 printk(KERN_INFO PFX "Unordered memory map\n");
301 if (prev.end == curr.start)
305 (unsigned long) (PAGE_ALIGN(prev.start));
306 end = (unsigned long) (prev.end & PAGE_MASK);
308 && (*callback) (start, end, arg) < 0)
315 start = (unsigned long) PAGE_ALIGN(prev.start);
316 end = (unsigned long) (prev.end & PAGE_MASK);
318 (*callback) (start, end, arg);
322 void __init efi_init(void)
324 efi_config_table_t *config_tables;
325 efi_runtime_services_t *runtime;
327 char vendor[100] = "unknown";
328 unsigned long num_config_tables;
331 memset(&efi, 0, sizeof(efi) );
332 memset(&efi_phys, 0, sizeof(efi_phys));
334 efi_phys.systab = EFI_SYSTAB;
335 memmap.phys_map = EFI_MEMMAP;
336 memmap.nr_map = EFI_MEMMAP_SIZE/EFI_MEMDESC_SIZE;
337 memmap.desc_version = EFI_MEMDESC_VERSION;
338 memmap.desc_size = EFI_MEMDESC_SIZE;
340 efi.systab = (efi_system_table_t *)
341 boot_ioremap((unsigned long) efi_phys.systab,
342 sizeof(efi_system_table_t));
344 * Verify the EFI Table
346 if (efi.systab == NULL)
347 printk(KERN_ERR PFX "Woah! Couldn't map the EFI system table.\n");
348 if (efi.systab->hdr.signature != EFI_SYSTEM_TABLE_SIGNATURE)
349 printk(KERN_ERR PFX "Woah! EFI system table signature incorrect\n");
350 if ((efi.systab->hdr.revision ^ EFI_SYSTEM_TABLE_REVISION) >> 16 != 0)
352 "Warning: EFI system table major version mismatch: "
353 "got %d.%02d, expected %d.%02d\n",
354 efi.systab->hdr.revision >> 16,
355 efi.systab->hdr.revision & 0xffff,
356 EFI_SYSTEM_TABLE_REVISION >> 16,
357 EFI_SYSTEM_TABLE_REVISION & 0xffff);
359 * Grab some details from the system table
361 num_config_tables = efi.systab->nr_tables;
362 config_tables = (efi_config_table_t *)efi.systab->tables;
363 runtime = efi.systab->runtime;
366 * Show what we know for posterity
368 c16 = (efi_char16_t *) boot_ioremap(efi.systab->fw_vendor, 2);
370 for (i = 0; i < (sizeof(vendor) - 1) && *c16; ++i)
374 printk(KERN_ERR PFX "Could not map the firmware vendor!\n");
376 printk(KERN_INFO PFX "EFI v%u.%.02u by %s \n",
377 efi.systab->hdr.revision >> 16,
378 efi.systab->hdr.revision & 0xffff, vendor);
381 * Let's see what config tables the firmware passed to us.
383 config_tables = (efi_config_table_t *)
384 boot_ioremap((unsigned long) config_tables,
385 num_config_tables * sizeof(efi_config_table_t));
387 if (config_tables == NULL)
388 printk(KERN_ERR PFX "Could not map EFI Configuration Table!\n");
390 efi.mps = EFI_INVALID_TABLE_ADDR;
391 efi.acpi = EFI_INVALID_TABLE_ADDR;
392 efi.acpi20 = EFI_INVALID_TABLE_ADDR;
393 efi.smbios = EFI_INVALID_TABLE_ADDR;
394 efi.sal_systab = EFI_INVALID_TABLE_ADDR;
395 efi.boot_info = EFI_INVALID_TABLE_ADDR;
396 efi.hcdp = EFI_INVALID_TABLE_ADDR;
397 efi.uga = EFI_INVALID_TABLE_ADDR;
399 for (i = 0; i < num_config_tables; i++) {
400 if (efi_guidcmp(config_tables[i].guid, MPS_TABLE_GUID) == 0) {
401 efi.mps = config_tables[i].table;
402 printk(KERN_INFO " MPS=0x%lx ", config_tables[i].table);
404 if (efi_guidcmp(config_tables[i].guid, ACPI_20_TABLE_GUID) == 0) {
405 efi.acpi20 = config_tables[i].table;
406 printk(KERN_INFO " ACPI 2.0=0x%lx ", config_tables[i].table);
408 if (efi_guidcmp(config_tables[i].guid, ACPI_TABLE_GUID) == 0) {
409 efi.acpi = config_tables[i].table;
410 printk(KERN_INFO " ACPI=0x%lx ", config_tables[i].table);
412 if (efi_guidcmp(config_tables[i].guid, SMBIOS_TABLE_GUID) == 0) {
413 efi.smbios = config_tables[i].table;
414 printk(KERN_INFO " SMBIOS=0x%lx ", config_tables[i].table);
416 if (efi_guidcmp(config_tables[i].guid, HCDP_TABLE_GUID) == 0) {
417 efi.hcdp = config_tables[i].table;
418 printk(KERN_INFO " HCDP=0x%lx ", config_tables[i].table);
420 if (efi_guidcmp(config_tables[i].guid, UGA_IO_PROTOCOL_GUID) == 0) {
421 efi.uga = config_tables[i].table;
422 printk(KERN_INFO " UGA=0x%lx ", config_tables[i].table);
428 * Check out the runtime services table. We need to map
429 * the runtime services table so that we can grab the physical
430 * address of several of the EFI runtime functions, needed to
431 * set the firmware into virtual mode.
434 runtime = (efi_runtime_services_t *) boot_ioremap((unsigned long)
436 sizeof(efi_runtime_services_t));
437 if (runtime != NULL) {
439 * We will only need *early* access to the following
440 * two EFI runtime services before set_virtual_address_map
443 efi_phys.get_time = (efi_get_time_t *) runtime->get_time;
444 efi_phys.set_virtual_address_map =
445 (efi_set_virtual_address_map_t *)
446 runtime->set_virtual_address_map;
448 printk(KERN_ERR PFX "Could not map the runtime service table!\n");
450 /* Map the EFI memory map for use until paging_init() */
451 memmap.map = boot_ioremap((unsigned long) EFI_MEMMAP, EFI_MEMMAP_SIZE);
452 if (memmap.map == NULL)
453 printk(KERN_ERR PFX "Could not map the EFI memory map!\n");
455 memmap.map_end = memmap.map + (memmap.nr_map * memmap.desc_size);
462 static inline void __init check_range_for_systab(efi_memory_desc_t *md)
464 if (((unsigned long)md->phys_addr <= (unsigned long)efi_phys.systab) &&
465 ((unsigned long)efi_phys.systab < md->phys_addr +
466 ((unsigned long)md->num_pages << EFI_PAGE_SHIFT))) {
469 addr = md->virt_addr - md->phys_addr +
470 (unsigned long)efi_phys.systab;
471 efi.systab = (efi_system_table_t *)addr;
476 * Wrap all the virtual calls in a way that forces the parameters on the stack.
479 #define efi_call_virt(f, args...) \
480 ((efi_##f##_t __attribute__((regparm(0)))*)efi.systab->runtime->f)(args)
482 static efi_status_t virt_efi_get_time(efi_time_t *tm, efi_time_cap_t *tc)
484 return efi_call_virt(get_time, tm, tc);
487 static efi_status_t virt_efi_set_time (efi_time_t *tm)
489 return efi_call_virt(set_time, tm);
492 static efi_status_t virt_efi_get_wakeup_time (efi_bool_t *enabled,
496 return efi_call_virt(get_wakeup_time, enabled, pending, tm);
499 static efi_status_t virt_efi_set_wakeup_time (efi_bool_t enabled,
502 return efi_call_virt(set_wakeup_time, enabled, tm);
505 static efi_status_t virt_efi_get_variable (efi_char16_t *name,
506 efi_guid_t *vendor, u32 *attr,
507 unsigned long *data_size, void *data)
509 return efi_call_virt(get_variable, name, vendor, attr, data_size, data);
512 static efi_status_t virt_efi_get_next_variable (unsigned long *name_size,
516 return efi_call_virt(get_next_variable, name_size, name, vendor);
519 static efi_status_t virt_efi_set_variable (efi_char16_t *name,
522 unsigned long data_size, void *data)
524 return efi_call_virt(set_variable, name, vendor, attr, data_size, data);
527 static efi_status_t virt_efi_get_next_high_mono_count (u32 *count)
529 return efi_call_virt(get_next_high_mono_count, count);
532 static void virt_efi_reset_system (int reset_type, efi_status_t status,
533 unsigned long data_size,
536 efi_call_virt(reset_system, reset_type, status, data_size, data);
540 * This function will switch the EFI runtime services to virtual mode.
541 * Essentially, look through the EFI memmap and map every region that
542 * has the runtime attribute bit set in its memory descriptor and update
543 * that memory descriptor with the virtual address obtained from ioremap().
544 * This enables the runtime services to be called without having to
545 * thunk back into physical mode for every invocation.
548 void __init efi_enter_virtual_mode(void)
550 efi_memory_desc_t *md;
556 for (p = memmap.map; p < memmap.map_end; p += memmap.desc_size) {
559 if (!(md->attribute & EFI_MEMORY_RUNTIME))
562 md->virt_addr = (unsigned long)ioremap(md->phys_addr,
563 md->num_pages << EFI_PAGE_SHIFT);
564 if (!(unsigned long)md->virt_addr) {
565 printk(KERN_ERR PFX "ioremap of 0x%lX failed\n",
566 (unsigned long)md->phys_addr);
568 /* update the virtual address of the EFI system table */
569 check_range_for_systab(md);
574 status = phys_efi_set_virtual_address_map(
575 memmap.desc_size * memmap.nr_map,
580 if (status != EFI_SUCCESS) {
581 printk (KERN_ALERT "You are screwed! "
582 "Unable to switch EFI into virtual mode "
583 "(status=%lx)\n", status);
584 panic("EFI call to SetVirtualAddressMap() failed!");
588 * Now that EFI is in virtual mode, update the function
589 * pointers in the runtime service table to the new virtual addresses.
592 efi.get_time = virt_efi_get_time;
593 efi.set_time = virt_efi_set_time;
594 efi.get_wakeup_time = virt_efi_get_wakeup_time;
595 efi.set_wakeup_time = virt_efi_set_wakeup_time;
596 efi.get_variable = virt_efi_get_variable;
597 efi.get_next_variable = virt_efi_get_next_variable;
598 efi.set_variable = virt_efi_set_variable;
599 efi.get_next_high_mono_count = virt_efi_get_next_high_mono_count;
600 efi.reset_system = virt_efi_reset_system;
604 efi_initialize_iomem_resources(struct resource *code_resource,
605 struct resource *data_resource)
607 struct resource *res;
608 efi_memory_desc_t *md;
611 for (p = memmap.map; p < memmap.map_end; p += memmap.desc_size) {
614 if ((md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT)) >
617 res = kzalloc(sizeof(struct resource), GFP_ATOMIC);
619 case EFI_RESERVED_TYPE:
620 res->name = "Reserved Memory";
622 case EFI_LOADER_CODE:
623 res->name = "Loader Code";
625 case EFI_LOADER_DATA:
626 res->name = "Loader Data";
628 case EFI_BOOT_SERVICES_DATA:
629 res->name = "BootServices Data";
631 case EFI_BOOT_SERVICES_CODE:
632 res->name = "BootServices Code";
634 case EFI_RUNTIME_SERVICES_CODE:
635 res->name = "Runtime Service Code";
637 case EFI_RUNTIME_SERVICES_DATA:
638 res->name = "Runtime Service Data";
640 case EFI_CONVENTIONAL_MEMORY:
641 res->name = "Conventional Memory";
643 case EFI_UNUSABLE_MEMORY:
644 res->name = "Unusable Memory";
646 case EFI_ACPI_RECLAIM_MEMORY:
647 res->name = "ACPI Reclaim";
649 case EFI_ACPI_MEMORY_NVS:
650 res->name = "ACPI NVS";
652 case EFI_MEMORY_MAPPED_IO:
653 res->name = "Memory Mapped IO";
655 case EFI_MEMORY_MAPPED_IO_PORT_SPACE:
656 res->name = "Memory Mapped IO Port Space";
659 res->name = "Reserved";
662 res->start = md->phys_addr;
663 res->end = res->start + ((md->num_pages << EFI_PAGE_SHIFT) - 1);
664 res->flags = IORESOURCE_MEM | IORESOURCE_BUSY;
665 if (request_resource(&iomem_resource, res) < 0)
666 printk(KERN_ERR PFX "Failed to allocate res %s : "
667 "0x%llx-0x%llx\n", res->name,
668 (unsigned long long)res->start,
669 (unsigned long long)res->end);
671 * We don't know which region contains kernel data so we try
672 * it repeatedly and let the resource manager test it.
674 if (md->type == EFI_CONVENTIONAL_MEMORY) {
675 request_resource(res, code_resource);
676 request_resource(res, data_resource);
678 request_resource(res, &crashk_res);
685 * Convenience functions to obtain memory types and attributes
688 u32 efi_mem_type(unsigned long phys_addr)
690 efi_memory_desc_t *md;
693 for (p = memmap.map; p < memmap.map_end; p += memmap.desc_size) {
695 if ((md->phys_addr <= phys_addr) && (phys_addr <
696 (md->phys_addr + (md-> num_pages << EFI_PAGE_SHIFT)) ))
702 u64 efi_mem_attributes(unsigned long phys_addr)
704 efi_memory_desc_t *md;
707 for (p = memmap.map; p < memmap.map_end; p += memmap.desc_size) {
709 if ((md->phys_addr <= phys_addr) && (phys_addr <
710 (md->phys_addr + (md-> num_pages << EFI_PAGE_SHIFT)) ))
711 return md->attribute;