arch/ia64/kernel/efi.c

   1 /*
   2  * Extensible Firmware Interface
   3  *
   4  * Based on Extensible Firmware Interface Specification version 0.9 April 30, 1999
   5  *
   6  * Copyright (C) 1999 VA Linux Systems
   7  * Copyright (C) 1999 Walt Drummond <drummond@valinux.com>
   8  * Copyright (C) 1999-2003 Hewlett-Packard Co.
   9  *      David Mosberger-Tang <davidm@hpl.hp.com>
  10  *      Stephane Eranian <eranian@hpl.hp.com>
  11  *
  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
  15  *
  16  * Implemented EFI runtime services and virtual mode calls.  --davidm
  17  *
  18  * Goutham Rao: <goutham.rao@intel.com>
  19  *      Skip non-WB memory and ignore empty memory ranges.
  20  */
  21 #include <linux/config.h>
  22 #include <linux/module.h>
  23 #include <linux/kernel.h>
  24 #include <linux/init.h>
  25 #include <linux/types.h>
  26 #include <linux/time.h>
  27 #include <linux/efi.h>
  28
  29 #include <asm/io.h>
  30 #include <asm/kregs.h>
  31 #include <asm/pgtable.h>
  32 #include <asm/processor.h>
  33 #include <asm/mca.h>
  34
  35 #define EFI_DEBUG       0
  36
  37 extern efi_status_t efi_call_phys (void *, ...);
  38
  39 struct efi efi;
  40 EXPORT_SYMBOL(efi);
  41 static efi_runtime_services_t *runtime;
  42 static unsigned long mem_limit = ~0UL;
  43
  44 #define efi_call_virt(f, args...)       (*(f))(args)
  45
  46 #define STUB_GET_TIME(prefix, adjust_arg)                                                       \
  47 static efi_status_t                                                                             \
  48 prefix##_get_time (efi_time_t *tm, efi_time_cap_t *tc)                                          \
  49 {                                                                                               \
  50         struct ia64_fpreg fr[6];                                                                \
  51         efi_status_t ret;                                                                       \
  52                                                                                                 \
  53         ia64_save_scratch_fpregs(fr);                                                           \
  54         ret = efi_call_##prefix((efi_get_time_t *) __va(runtime->get_time), adjust_arg(tm),     \
  55                                 adjust_arg(tc));                                                \
  56         ia64_load_scratch_fpregs(fr);                                                           \
  57         return ret;                                                                             \
  58 }
  59
  60 #define STUB_SET_TIME(prefix, adjust_arg)                                                       \
  61 static efi_status_t                                                                             \
  62 prefix##_set_time (efi_time_t *tm)                                                              \
  63 {                                                                                               \
  64         struct ia64_fpreg fr[6];                                                                \
  65         efi_status_t ret;                                                                       \
  66                                                                                                 \
  67         ia64_save_scratch_fpregs(fr);                                                           \
  68         ret = efi_call_##prefix((efi_set_time_t *) __va(runtime->set_time), adjust_arg(tm));    \
  69         ia64_load_scratch_fpregs(fr);                                                           \
  70         return ret;                                                                             \
  71 }
  72
  73 #define STUB_GET_WAKEUP_TIME(prefix, adjust_arg)                                                \
  74 static efi_status_t                                                                             \
  75 prefix##_get_wakeup_time (efi_bool_t *enabled, efi_bool_t *pending, efi_time_t *tm)             \
  76 {                                                                                               \
  77         struct ia64_fpreg fr[6];                                                                \
  78         efi_status_t ret;                                                                       \
  79                                                                                                 \
  80         ia64_save_scratch_fpregs(fr);                                                           \
  81         ret = efi_call_##prefix((efi_get_wakeup_time_t *) __va(runtime->get_wakeup_time),       \
  82                                 adjust_arg(enabled), adjust_arg(pending), adjust_arg(tm));      \
  83         ia64_load_scratch_fpregs(fr);                                                           \
  84         return ret;                                                                             \
  85 }
  86
  87 #define STUB_SET_WAKEUP_TIME(prefix, adjust_arg)                                                \
  88 static efi_status_t                                                                             \
  89 prefix##_set_wakeup_time (efi_bool_t enabled, efi_time_t *tm)                                   \
  90 {                                                                                               \
  91         struct ia64_fpreg fr[6];                                                                \
  92         efi_status_t ret;                                                                       \
  93                                                                                                 \
  94         ia64_save_scratch_fpregs(fr);                                                           \
  95         ret = efi_call_##prefix((efi_set_wakeup_time_t *) __va(runtime->set_wakeup_time),       \
  96                                 enabled, adjust_arg(tm));                                       \
  97         ia64_load_scratch_fpregs(fr);                                                           \
  98         return ret;                                                                             \
  99 }
 100
 101 #define STUB_GET_VARIABLE(prefix, adjust_arg)                                           \
 102 static efi_status_t                                                                     \
 103 prefix##_get_variable (efi_char16_t *name, efi_guid_t *vendor, u32 *attr,               \
 104                        unsigned long *data_size, void *data)                            \
 105 {                                                                                       \
 106         struct ia64_fpreg fr[6];                                                        \
 107         efi_status_t ret;                                                               \
 108                                                                                         \
 109         ia64_save_scratch_fpregs(fr);                                                   \
 110         ret = efi_call_##prefix((efi_get_variable_t *) __va(runtime->get_variable),     \
 111                                 adjust_arg(name), adjust_arg(vendor), adjust_arg(attr), \
 112                                 adjust_arg(data_size), adjust_arg(data));               \
 113         ia64_load_scratch_fpregs(fr);                                                   \
 114         return ret;                                                                     \
 115 }
 116
 117 #define STUB_GET_NEXT_VARIABLE(prefix, adjust_arg)                                              \
 118 static efi_status_t                                                                             \
 119 prefix##_get_next_variable (unsigned long *name_size, efi_char16_t *name, efi_guid_t *vendor)   \
 120 {                                                                                               \
 121         struct ia64_fpreg fr[6];                                                                \
 122         efi_status_t ret;                                                                       \
 123                                                                                                 \
 124         ia64_save_scratch_fpregs(fr);                                                           \
 125         ret = efi_call_##prefix((efi_get_next_variable_t *) __va(runtime->get_next_variable),   \
 126                                 adjust_arg(name_size), adjust_arg(name), adjust_arg(vendor));   \
 127         ia64_load_scratch_fpregs(fr);                                                           \
 128         return ret;                                                                             \
 129 }
 130
 131 #define STUB_SET_VARIABLE(prefix, adjust_arg)                                           \
 132 static efi_status_t                                                                     \
 133 prefix##_set_variable (efi_char16_t *name, efi_guid_t *vendor, unsigned long attr,      \
 134                        unsigned long data_size, void *data)                             \
 135 {                                                                                       \
 136         struct ia64_fpreg fr[6];                                                        \
 137         efi_status_t ret;                                                               \
 138                                                                                         \
 139         ia64_save_scratch_fpregs(fr);                                                   \
 140         ret = efi_call_##prefix((efi_set_variable_t *) __va(runtime->set_variable),     \
 141                                 adjust_arg(name), adjust_arg(vendor), attr, data_size,  \
 142                                 adjust_arg(data));                                      \
 143         ia64_load_scratch_fpregs(fr);                                                   \
 144         return ret;                                                                     \
 145 }
 146
 147 #define STUB_GET_NEXT_HIGH_MONO_COUNT(prefix, adjust_arg)                                       \
 148 static efi_status_t                                                                             \
 149 prefix##_get_next_high_mono_count (u32 *count)                                                  \
 150 {                                                                                               \
 151         struct ia64_fpreg fr[6];                                                                \
 152         efi_status_t ret;                                                                       \
 153                                                                                                 \
 154         ia64_save_scratch_fpregs(fr);                                                           \
 155         ret = efi_call_##prefix((efi_get_next_high_mono_count_t *)                              \
 156                                 __va(runtime->get_next_high_mono_count), adjust_arg(count));    \
 157         ia64_load_scratch_fpregs(fr);                                                           \
 158         return ret;                                                                             \
 159 }
 160
 161 #define STUB_RESET_SYSTEM(prefix, adjust_arg)                                   \
 162 static void                                                                     \
 163 prefix##_reset_system (int reset_type, efi_status_t status,                     \
 164                        unsigned long data_size, efi_char16_t *data)             \
 165 {                                                                               \
 166         struct ia64_fpreg fr[6];                                                \
 167                                                                                 \
 168         ia64_save_scratch_fpregs(fr);                                           \
 169         efi_call_##prefix((efi_reset_system_t *) __va(runtime->reset_system),   \
 170                           reset_type, status, data_size, adjust_arg(data));     \
 171         /* should not return, but just in case... */                            \
 172         ia64_load_scratch_fpregs(fr);                                           \
 173 }
 174
 175 STUB_GET_TIME(phys, __pa)
 176 STUB_SET_TIME(phys, __pa)
 177 STUB_GET_WAKEUP_TIME(phys, __pa)
 178 STUB_SET_WAKEUP_TIME(phys, __pa)
 179 STUB_GET_VARIABLE(phys, __pa)
 180 STUB_GET_NEXT_VARIABLE(phys, __pa)
 181 STUB_SET_VARIABLE(phys, __pa)
 182 STUB_GET_NEXT_HIGH_MONO_COUNT(phys, __pa)
 183 STUB_RESET_SYSTEM(phys, __pa)
 184
 185 STUB_GET_TIME(virt, )
 186 STUB_SET_TIME(virt, )
 187 STUB_GET_WAKEUP_TIME(virt, )
 188 STUB_SET_WAKEUP_TIME(virt, )
 189 STUB_GET_VARIABLE(virt, )
 190 STUB_GET_NEXT_VARIABLE(virt, )
 191 STUB_SET_VARIABLE(virt, )
 192 STUB_GET_NEXT_HIGH_MONO_COUNT(virt, )
 193 STUB_RESET_SYSTEM(virt, )
 194
 195 void
 196 efi_gettimeofday (struct timespec *ts)
 197 {
 198         efi_time_t tm;
 199
 200         memset(ts, 0, sizeof(ts));
 201         if ((*efi.get_time)(&tm, 0) != EFI_SUCCESS)
 202                 return;
 203
 204         ts->tv_sec = mktime(tm.year, tm.month, tm.day, tm.hour, tm.minute, tm.second);
 205         ts->tv_nsec = tm.nanosecond;
 206 }
 207
 208 static int
 209 is_available_memory (efi_memory_desc_t *md)
 210 {
 211         if (!(md->attribute & EFI_MEMORY_WB))
 212                 return 0;
 213
 214         switch (md->type) {
 215               case EFI_LOADER_CODE:
 216               case EFI_LOADER_DATA:
 217               case EFI_BOOT_SERVICES_CODE:
 218               case EFI_BOOT_SERVICES_DATA:
 219               case EFI_CONVENTIONAL_MEMORY:
 220                 return 1;
 221         }
 222         return 0;
 223 }
 224
 225 /*
 226  * Trim descriptor MD so its starts at address START_ADDR.  If the descriptor covers
 227  * memory that is normally available to the kernel, issue a warning that some memory
 228  * is being ignored.
 229  */
 230 static void
 231 trim_bottom (efi_memory_desc_t *md, u64 start_addr)
 232 {
 233         u64 num_skipped_pages;
 234
 235         if (md->phys_addr >= start_addr || !md->num_pages)
 236                 return;
 237
 238         num_skipped_pages = (start_addr - md->phys_addr) >> EFI_PAGE_SHIFT;
 239         if (num_skipped_pages > md->num_pages)
 240                 num_skipped_pages = md->num_pages;
 241
 242         if (is_available_memory(md))
 243                 printk(KERN_NOTICE "efi.%s: ignoring %luKB of memory at 0x%lx due to granule hole "
 244                        "at 0x%lx\n", __FUNCTION__,
 245                        (num_skipped_pages << EFI_PAGE_SHIFT) >> 10,
 246                        md->phys_addr, start_addr - IA64_GRANULE_SIZE);
 247         /*
 248          * NOTE: Don't set md->phys_addr to START_ADDR because that could cause the memory
 249          * descriptor list to become unsorted.  In such a case, md->num_pages will be
 250          * zero, so the Right Thing will happen.
 251          */
 252         md->phys_addr += num_skipped_pages << EFI_PAGE_SHIFT;
 253         md->num_pages -= num_skipped_pages;
 254 }
 255
 256 static void
 257 trim_top (efi_memory_desc_t *md, u64 end_addr)
 258 {
 259         u64 num_dropped_pages, md_end_addr;
 260
 261         md_end_addr = md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT);
 262
 263         if (md_end_addr <= end_addr || !md->num_pages)
 264                 return;
 265
 266         num_dropped_pages = (md_end_addr - end_addr) >> EFI_PAGE_SHIFT;
 267         if (num_dropped_pages > md->num_pages)
 268                 num_dropped_pages = md->num_pages;
 269
 270         if (is_available_memory(md))
 271                 printk(KERN_NOTICE "efi.%s: ignoring %luKB of memory at 0x%lx due to granule hole "
 272                        "at 0x%lx\n", __FUNCTION__,
 273                        (num_dropped_pages << EFI_PAGE_SHIFT) >> 10,
 274                        md->phys_addr, end_addr);
 275         md->num_pages -= num_dropped_pages;
 276 }
 277
 278 /*
 279  * Walks the EFI memory map and calls CALLBACK once for each EFI memory descriptor that
 280  * has memory that is available for OS use.
 281  */
 282 void
 283 efi_memmap_walk (efi_freemem_callback_t callback, void *arg)
 284 {
 285         int prev_valid = 0;
 286         struct range {
 287                 u64 start;
 288                 u64 end;
 289         } prev, curr;
 290         void *efi_map_start, *efi_map_end, *p, *q;
 291         efi_memory_desc_t *md, *check_md;
 292         u64 efi_desc_size, start, end, granule_addr, last_granule_addr, first_non_wb_addr = 0;
 293
 294         efi_map_start = __va(ia64_boot_param->efi_memmap);
 295         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 296         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 297
 298         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 299                 md = p;
 300
 301                 /* skip over non-WB memory descriptors; that's all we're interested in... */
 302                 if (!(md->attribute & EFI_MEMORY_WB))
 303                         continue;
 304
 305                 /*
 306                  * granule_addr is the base of md's first granule.
 307                  * [granule_addr - first_non_wb_addr) is guaranteed to
 308                  * be contiguous WB memory.
 309                  */
 310                 granule_addr = md->phys_addr & ~(IA64_GRANULE_SIZE - 1);
 311                 first_non_wb_addr = max(first_non_wb_addr, granule_addr);
 312
 313                 if (first_non_wb_addr < md->phys_addr) {
 314                         trim_bottom(md, granule_addr + IA64_GRANULE_SIZE);
 315                         granule_addr = md->phys_addr & ~(IA64_GRANULE_SIZE - 1);
 316                         first_non_wb_addr = max(first_non_wb_addr, granule_addr);
 317                 }
 318
 319                 for (q = p; q < efi_map_end; q += efi_desc_size) {
 320                         check_md = q;
 321
 322                         if ((check_md->attribute & EFI_MEMORY_WB) &&
 323                             (check_md->phys_addr == first_non_wb_addr))
 324                                 first_non_wb_addr += check_md->num_pages << EFI_PAGE_SHIFT;
 325                         else
 326                                 break;          /* non-WB or hole */
 327                 }
 328
 329                 last_granule_addr = first_non_wb_addr & ~(IA64_GRANULE_SIZE - 1);
 330                 if (last_granule_addr < md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT))
 331                         trim_top(md, last_granule_addr);
 332
 333                 if (is_available_memory(md)) {
 334                         if (md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) > mem_limit) {
 335                                 if (md->phys_addr > mem_limit)
 336                                         continue;
 337                                 md->num_pages = (mem_limit - md->phys_addr) >> EFI_PAGE_SHIFT;
 338                         }
 339
 340                         if (md->num_pages == 0)
 341                                 continue;
 342
 343                         curr.start = PAGE_OFFSET + md->phys_addr;
 344                         curr.end   = curr.start + (md->num_pages << EFI_PAGE_SHIFT);
 345
 346                         if (!prev_valid) {
 347                                 prev = curr;
 348                                 prev_valid = 1;
 349                         } else {
 350                                 if (curr.start < prev.start)
 351                                         printk(KERN_ERR "Oops: EFI memory table not ordered!\n");
 352
 353                                 if (prev.end == curr.start) {
 354                                         /* merge two consecutive memory ranges */
 355                                         prev.end = curr.end;
 356                                 } else {
 357                                         start = PAGE_ALIGN(prev.start);
 358                                         end = prev.end & PAGE_MASK;
 359                                         if ((end > start) && (*callback)(start, end, arg) < 0)
 360                                                 return;
 361                                         prev = curr;
 362                                 }
 363                         }
 364                 }
 365         }
 366         if (prev_valid) {
 367                 start = PAGE_ALIGN(prev.start);
 368                 end = prev.end & PAGE_MASK;
 369                 if (end > start)
 370                         (*callback)(start, end, arg);
 371         }
 372 }
 373
 374 /*
 375  * Look for the PAL_CODE region reported by EFI and maps it using an
 376  * ITR to enable safe PAL calls in virtual mode.  See IA-64 Processor
 377  * Abstraction Layer chapter 11 in ADAG
 378  */
 379 void
 380 efi_map_pal_code (void)
 381 {
 382         void *efi_map_start, *efi_map_end, *p;
 383         efi_memory_desc_t *md;
 384         u64 efi_desc_size;
 385         int pal_code_count = 0;
 386         u64 mask, psr;
 387         u64 vaddr;
 388         int cpu;
 389
 390         efi_map_start = __va(ia64_boot_param->efi_memmap);
 391         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 392         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 393
 394         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 395                 md = p;
 396                 if (md->type != EFI_PAL_CODE)
 397                         continue;
 398
 399                 if (++pal_code_count > 1) {
 400                         printk(KERN_ERR "Too many EFI Pal Code memory ranges, dropped @ %lx\n",
 401                                md->phys_addr);
 402                         continue;
 403                 }
 404                 /*
 405                  * The only ITLB entry in region 7 that is used is the one installed by
 406                  * __start().  That entry covers a 64MB range.
 407                  */
 408                 mask  = ~((1 << KERNEL_TR_PAGE_SHIFT) - 1);
 409                 vaddr = PAGE_OFFSET + md->phys_addr;
 410
 411                 /*
 412                  * We must check that the PAL mapping won't overlap with the kernel
 413                  * mapping.
 414                  *
 415                  * PAL code is guaranteed to be aligned on a power of 2 between 4k and
 416                  * 256KB and that only one ITR is needed to map it. This implies that the
 417                  * PAL code is always aligned on its size, i.e., the closest matching page
 418                  * size supported by the TLB. Therefore PAL code is guaranteed never to
 419                  * cross a 64MB unless it is bigger than 64MB (very unlikely!).  So for
 420                  * now the following test is enough to determine whether or not we need a
 421                  * dedicated ITR for the PAL code.
 422                  */
 423                 if ((vaddr & mask) == (KERNEL_START & mask)) {
 424                         printk(KERN_INFO "%s: no need to install ITR for PAL code\n",
 425                                __FUNCTION__);
 426                         continue;
 427                 }
 428
 429                 if (md->num_pages << EFI_PAGE_SHIFT > IA64_GRANULE_SIZE)
 430                         panic("Woah!  PAL code size bigger than a granule!");
 431
 432                 mask  = ~((1 << IA64_GRANULE_SHIFT) - 1);
 433 #if EFI_DEBUG
 434                 printk(KERN_INFO "CPU %d: mapping PAL code [0x%lx-0x%lx) into [0x%lx-0x%lx)\n",
 435                        smp_processor_id(), md->phys_addr,
 436                        md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT),
 437                        vaddr & mask, (vaddr & mask) + IA64_GRANULE_SIZE);
 438 #endif
 439
 440                 /*
 441                  * Cannot write to CRx with PSR.ic=1
 442                  */
 443                 psr = ia64_clear_ic();
 444                 ia64_itr(0x1, IA64_TR_PALCODE, vaddr & mask,
 445                          pte_val(pfn_pte(md->phys_addr >> PAGE_SHIFT, PAGE_KERNEL)),
 446                          IA64_GRANULE_SHIFT);
 447                 ia64_set_psr(psr);              /* restore psr */
 448                 ia64_srlz_i();
 449
 450                 cpu = smp_processor_id();
 451
 452                 /* insert this TR into our list for MCA recovery purposes */
 453                 ia64_mca_tlb_list[cpu].pal_base = vaddr & mask;
 454                 ia64_mca_tlb_list[cpu].pal_paddr = pte_val(mk_pte_phys(md->phys_addr, PAGE_KERNEL));
 455         }
 456 }
 457
 458 void __init
 459 efi_init (void)
 460 {
 461         void *efi_map_start, *efi_map_end;
 462         efi_config_table_t *config_tables;
 463         efi_char16_t *c16;
 464         u64 efi_desc_size;
 465         char *cp, *end, vendor[100] = "unknown";
 466         extern char saved_command_line[];
 467         int i;
 468
 469         /* it's too early to be able to use the standard kernel command line support... */
 470         for (cp = saved_command_line; *cp; ) {
 471                 if (memcmp(cp, "mem=", 4) == 0) {
 472                         cp += 4;
 473                         mem_limit = memparse(cp, &end) - 1;
 474                         if (end != cp)
 475                                 break;
 476                         cp = end;
 477                 } else {
 478                         while (*cp != ' ' && *cp)
 479                                 ++cp;
 480                         while (*cp == ' ')
 481                                 ++cp;
 482                 }
 483         }
 484         if (mem_limit != ~0UL)
 485                 printk(KERN_INFO "Ignoring memory above %luMB\n", mem_limit >> 20);
 486
 487         efi.systab = __va(ia64_boot_param->efi_systab);
 488
 489         /*
 490          * Verify the EFI Table
 491          */
 492         if (efi.systab == NULL)
 493                 panic("Woah! Can't find EFI system table.\n");
 494         if (efi.systab->hdr.signature != EFI_SYSTEM_TABLE_SIGNATURE)
 495                 panic("Woah! EFI system table signature incorrect\n");
 496         if ((efi.systab->hdr.revision ^ EFI_SYSTEM_TABLE_REVISION) >> 16 != 0)
 497                 printk(KERN_WARNING "Warning: EFI system table major version mismatch: "
 498                        "got %d.%02d, expected %d.%02d\n",
 499                        efi.systab->hdr.revision >> 16, efi.systab->hdr.revision & 0xffff,
 500                        EFI_SYSTEM_TABLE_REVISION >> 16, EFI_SYSTEM_TABLE_REVISION & 0xffff);
 501
 502         config_tables = __va(efi.systab->tables);
 503
 504         /* Show what we know for posterity */
 505         c16 = __va(efi.systab->fw_vendor);
 506         if (c16) {
 507                 for (i = 0;i < (int) sizeof(vendor) && *c16; ++i)
 508                         vendor[i] = *c16++;
 509                 vendor[i] = '\0';
 510         }
 511
 512         printk(KERN_INFO "EFI v%u.%.02u by %s:",
 513                efi.systab->hdr.revision >> 16, efi.systab->hdr.revision & 0xffff, vendor);
 514
 515         for (i = 0; i < (int) efi.systab->nr_tables; i++) {
 516                 if (efi_guidcmp(config_tables[i].guid, MPS_TABLE_GUID) == 0) {
 517                         efi.mps = __va(config_tables[i].table);
 518                         printk(" MPS=0x%lx", config_tables[i].table);
 519                 } else if (efi_guidcmp(config_tables[i].guid, ACPI_20_TABLE_GUID) == 0) {
 520                         efi.acpi20 = __va(config_tables[i].table);
 521                         printk(" ACPI 2.0=0x%lx", config_tables[i].table);
 522                 } else if (efi_guidcmp(config_tables[i].guid, ACPI_TABLE_GUID) == 0) {
 523                         efi.acpi = __va(config_tables[i].table);
 524                         printk(" ACPI=0x%lx", config_tables[i].table);
 525                 } else if (efi_guidcmp(config_tables[i].guid, SMBIOS_TABLE_GUID) == 0) {
 526                         efi.smbios = __va(config_tables[i].table);
 527                         printk(" SMBIOS=0x%lx", config_tables[i].table);
 528                 } else if (efi_guidcmp(config_tables[i].guid, SAL_SYSTEM_TABLE_GUID) == 0) {
 529                         efi.sal_systab = __va(config_tables[i].table);
 530                         printk(" SALsystab=0x%lx", config_tables[i].table);
 531                 } else if (efi_guidcmp(config_tables[i].guid, HCDP_TABLE_GUID) == 0) {
 532                         efi.hcdp = __va(config_tables[i].table);
 533                         printk(" HCDP=0x%lx", config_tables[i].table);
 534                 }
 535         }
 536         printk("\n");
 537
 538         runtime = __va(efi.systab->runtime);
 539         efi.get_time = phys_get_time;
 540         efi.set_time = phys_set_time;
 541         efi.get_wakeup_time = phys_get_wakeup_time;
 542         efi.set_wakeup_time = phys_set_wakeup_time;
 543         efi.get_variable = phys_get_variable;
 544         efi.get_next_variable = phys_get_next_variable;
 545         efi.set_variable = phys_set_variable;
 546         efi.get_next_high_mono_count = phys_get_next_high_mono_count;
 547         efi.reset_system = phys_reset_system;
 548
 549         efi_map_start = __va(ia64_boot_param->efi_memmap);
 550         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 551         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 552
 553 #if EFI_DEBUG
 554         /* print EFI memory map: */
 555         {
 556                 efi_memory_desc_t *md;
 557                 void *p;
 558
 559                 for (i = 0, p = efi_map_start; p < efi_map_end; ++i, p += efi_desc_size) {
 560                         md = p;
 561                         printk("mem%02u: type=%u, attr=0x%lx, range=[0x%016lx-0x%016lx) (%luMB)\n",
 562                                i, md->type, md->attribute, md->phys_addr,
 563                                md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT),
 564                                md->num_pages >> (20 - EFI_PAGE_SHIFT));
 565                 }
 566         }
 567 #endif
 568
 569         efi_map_pal_code();
 570         efi_enter_virtual_mode();
 571 }
 572
 573 void
 574 efi_enter_virtual_mode (void)
 575 {
 576         void *efi_map_start, *efi_map_end, *p;
 577         efi_memory_desc_t *md;
 578         efi_status_t status;
 579         u64 efi_desc_size;
 580
 581         efi_map_start = __va(ia64_boot_param->efi_memmap);
 582         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 583         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 584
 585         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 586                 md = p;
 587                 if (md->attribute & EFI_MEMORY_RUNTIME) {
 588                         /*
 589                          * Some descriptors have multiple bits set, so the order of
 590                          * the tests is relevant.
 591                          */
 592                         if (md->attribute & EFI_MEMORY_WB) {
 593                                 md->virt_addr = (u64) __va(md->phys_addr);
 594                         } else if (md->attribute & EFI_MEMORY_UC) {
 595                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 596                         } else if (md->attribute & EFI_MEMORY_WC) {
 597 #if 0
 598                                 md->virt_addr = ia64_remap(md->phys_addr, (_PAGE_A | _PAGE_P
 599                                                                            | _PAGE_D
 600                                                                            | _PAGE_MA_WC
 601                                                                            | _PAGE_PL_0
 602                                                                            | _PAGE_AR_RW));
 603 #else
 604                                 printk(KERN_INFO "EFI_MEMORY_WC mapping\n");
 605                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 606 #endif
 607                         } else if (md->attribute & EFI_MEMORY_WT) {
 608 #if 0
 609                                 md->virt_addr = ia64_remap(md->phys_addr, (_PAGE_A | _PAGE_P
 610                                                                            | _PAGE_D | _PAGE_MA_WT
 611                                                                            | _PAGE_PL_0
 612                                                                            | _PAGE_AR_RW));
 613 #else
 614                                 printk(KERN_INFO "EFI_MEMORY_WT mapping\n");
 615                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 616 #endif
 617                         }
 618                 }
 619         }
 620
 621         status = efi_call_phys(__va(runtime->set_virtual_address_map),
 622                                ia64_boot_param->efi_memmap_size,
 623                                efi_desc_size, ia64_boot_param->efi_memdesc_version,
 624                                ia64_boot_param->efi_memmap);
 625         if (status != EFI_SUCCESS) {
 626                 printk(KERN_WARNING "warning: unable to switch EFI into virtual mode "
 627                        "(status=%lu)\n", status);
 628                 return;
 629         }
 630
 631         /*
 632          * Now that EFI is in virtual mode, we call the EFI functions more efficiently:
 633          */
 634         efi.get_time = virt_get_time;
 635         efi.set_time = virt_set_time;
 636         efi.get_wakeup_time = virt_get_wakeup_time;
 637         efi.set_wakeup_time = virt_set_wakeup_time;
 638         efi.get_variable = virt_get_variable;
 639         efi.get_next_variable = virt_get_next_variable;
 640         efi.set_variable = virt_set_variable;
 641         efi.get_next_high_mono_count = virt_get_next_high_mono_count;
 642         efi.reset_system = virt_reset_system;
 643 }
 644
 645 /*
 646  * Walk the EFI memory map looking for the I/O port range.  There can only be one entry of
 647  * this type, other I/O port ranges should be described via ACPI.
 648  */
 649 u64
 650 efi_get_iobase (void)
 651 {
 652         void *efi_map_start, *efi_map_end, *p;
 653         efi_memory_desc_t *md;
 654         u64 efi_desc_size;
 655
 656         efi_map_start = __va(ia64_boot_param->efi_memmap);
 657         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 658         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 659
 660         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 661                 md = p;
 662                 if (md->type == EFI_MEMORY_MAPPED_IO_PORT_SPACE) {
 663                         if (md->attribute & EFI_MEMORY_UC)
 664                                 return md->phys_addr;
 665                 }
 666         }
 667         return 0;
 668 }
 669
 670 u32
 671 efi_mem_type (unsigned long phys_addr)
 672 {
 673         void *efi_map_start, *efi_map_end, *p;
 674         efi_memory_desc_t *md;
 675         u64 efi_desc_size;
 676
 677         efi_map_start = __va(ia64_boot_param->efi_memmap);
 678         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 679         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 680
 681         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 682                 md = p;
 683
 684                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT))
 685                          return md->type;
 686         }
 687         return 0;
 688 }
 689
 690 u64
 691 efi_mem_attributes (unsigned long phys_addr)
 692 {
 693         void *efi_map_start, *efi_map_end, *p;
 694         efi_memory_desc_t *md;
 695         u64 efi_desc_size;
 696
 697         efi_map_start = __va(ia64_boot_param->efi_memmap);
 698         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 699         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 700
 701         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 702                 md = p;
 703
 704                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT))
 705                         return md->attribute;
 706         }
 707         return 0;
 708 }
 709
 710 int
 711 valid_phys_addr_range (unsigned long phys_addr, unsigned long *size)
 712 {
 713         void *efi_map_start, *efi_map_end, *p;
 714         efi_memory_desc_t *md;
 715         u64 efi_desc_size;
 716
 717         efi_map_start = __va(ia64_boot_param->efi_memmap);
 718         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 719         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 720
 721         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 722                 md = p;
 723
 724                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT)) {
 725                         if (!(md->attribute & EFI_MEMORY_WB))
 726                                 return 0;
 727
 728                         if (*size > md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) - phys_addr)
 729                                 *size = md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) - phys_addr;
 730                         return 1;
 731                 }
 732         }
 733         return 0;
 734 }
 735
 736 int __init
 737 efi_uart_console_only(void)
 738 {
 739         efi_status_t status;
 740         char *s, name[] = "ConOut";
 741         efi_guid_t guid = EFI_GLOBAL_VARIABLE_GUID;
 742         efi_char16_t *utf16, name_utf16[32];
 743         unsigned char data[1024];
 744         unsigned long size = sizeof(data);
 745         struct efi_generic_dev_path *hdr, *end_addr;
 746         int uart = 0;
 747
 748         /* Convert to UTF-16 */
 749         utf16 = name_utf16;
 750         s = name;
 751         while (*s)
 752                 *utf16++ = *s++ & 0x7f;
 753         *utf16 = 0;
 754
 755         status = efi.get_variable(name_utf16, &guid, NULL, &size, data);
 756         if (status != EFI_SUCCESS) {
 757                 printk(KERN_ERR "No EFI %s variable?\n", name);
 758                 return 0;
 759         }
 760
 761         hdr = (struct efi_generic_dev_path *) data;
 762         end_addr = (struct efi_generic_dev_path *) ((u8 *) data + size);
 763         while (hdr < end_addr) {
 764                 if (hdr->type == EFI_DEV_MSG &&
 765                     hdr->sub_type == EFI_DEV_MSG_UART)
 766                         uart = 1;
 767                 else if (hdr->type == EFI_DEV_END_PATH ||
 768                           hdr->type == EFI_DEV_END_PATH2) {
 769                         if (!uart)
 770                                 return 0;
 771                         if (hdr->sub_type == EFI_DEV_END_ENTIRE)
 772                                 return 1;
 773                         uart = 0;
 774                 }
 775                 hdr = (struct efi_generic_dev_path *) ((u8 *) hdr + hdr->length);
 776         }
 777         printk(KERN_ERR "Malformed %s value\n", name);
 778         return 0;
 779 }