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, max_addr = ~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         unsigned long total_mem = 0;
 294
 295         efi_map_start = __va(ia64_boot_param->efi_memmap);
 296         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 297         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 298
 299         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 300                 md = p;
 301
 302                 /* skip over non-WB memory descriptors; that's all we're interested in... */
 303                 if (!(md->attribute & EFI_MEMORY_WB))
 304                         continue;
 305
 306                 /*
 307                  * granule_addr is the base of md's first granule.
 308                  * [granule_addr - first_non_wb_addr) is guaranteed to
 309                  * be contiguous WB memory.
 310                  */
 311                 granule_addr = md->phys_addr & ~(IA64_GRANULE_SIZE - 1);
 312                 first_non_wb_addr = max(first_non_wb_addr, granule_addr);
 313
 314                 if (first_non_wb_addr < md->phys_addr) {
 315                         trim_bottom(md, granule_addr + IA64_GRANULE_SIZE);
 316                         granule_addr = md->phys_addr & ~(IA64_GRANULE_SIZE - 1);
 317                         first_non_wb_addr = max(first_non_wb_addr, granule_addr);
 318                 }
 319
 320                 for (q = p; q < efi_map_end; q += efi_desc_size) {
 321                         check_md = q;
 322
 323                         if ((check_md->attribute & EFI_MEMORY_WB) &&
 324                             (check_md->phys_addr == first_non_wb_addr))
 325                                 first_non_wb_addr += check_md->num_pages << EFI_PAGE_SHIFT;
 326                         else
 327                                 break;          /* non-WB or hole */
 328                 }
 329
 330                 last_granule_addr = first_non_wb_addr & ~(IA64_GRANULE_SIZE - 1);
 331                 if (last_granule_addr < md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT))
 332                         trim_top(md, last_granule_addr);
 333
 334                 if (is_available_memory(md)) {
 335                         if (md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) > max_addr) {
 336                                 if (md->phys_addr > max_addr)
 337                                         continue;
 338                                 md->num_pages = (max_addr - md->phys_addr) >> EFI_PAGE_SHIFT;
 339                         }
 340
 341                         if (total_mem >= mem_limit)
 342                                 continue;
 343                         total_mem += (md->num_pages << EFI_PAGE_SHIFT);
 344                         if (total_mem > mem_limit)
 345                                 md->num_pages -= ((total_mem - mem_limit) >> EFI_PAGE_SHIFT);
 346
 347                         if (md->num_pages == 0)
 348                                 continue;
 349
 350                         curr.start = PAGE_OFFSET + md->phys_addr;
 351                         curr.end   = curr.start + (md->num_pages << EFI_PAGE_SHIFT);
 352
 353                         if (!prev_valid) {
 354                                 prev = curr;
 355                                 prev_valid = 1;
 356                         } else {
 357                                 if (curr.start < prev.start)
 358                                         printk(KERN_ERR "Oops: EFI memory table not ordered!\n");
 359
 360                                 if (prev.end == curr.start) {
 361                                         /* merge two consecutive memory ranges */
 362                                         prev.end = curr.end;
 363                                 } else {
 364                                         start = PAGE_ALIGN(prev.start);
 365                                         end = prev.end & PAGE_MASK;
 366                                         if ((end > start) && (*callback)(start, end, arg) < 0)
 367                                                 return;
 368                                         prev = curr;
 369                                 }
 370                         }
 371                 }
 372         }
 373         if (prev_valid) {
 374                 start = PAGE_ALIGN(prev.start);
 375                 end = prev.end & PAGE_MASK;
 376                 if (end > start)
 377                         (*callback)(start, end, arg);
 378         }
 379 }
 380
 381 /*
 382  * Look for the PAL_CODE region reported by EFI and maps it using an
 383  * ITR to enable safe PAL calls in virtual mode.  See IA-64 Processor
 384  * Abstraction Layer chapter 11 in ADAG
 385  */
 386 void
 387 efi_map_pal_code (void)
 388 {
 389         void *efi_map_start, *efi_map_end, *p;
 390         efi_memory_desc_t *md;
 391         u64 efi_desc_size;
 392         int pal_code_count = 0;
 393         u64 mask, psr;
 394         u64 vaddr;
 395         int cpu;
 396
 397         efi_map_start = __va(ia64_boot_param->efi_memmap);
 398         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 399         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 400
 401         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 402                 md = p;
 403                 if (md->type != EFI_PAL_CODE)
 404                         continue;
 405
 406                 if (++pal_code_count > 1) {
 407                         printk(KERN_ERR "Too many EFI Pal Code memory ranges, dropped @ %lx\n",
 408                                md->phys_addr);
 409                         continue;
 410                 }
 411                 /*
 412                  * The only ITLB entry in region 7 that is used is the one installed by
 413                  * __start().  That entry covers a 64MB range.
 414                  */
 415                 mask  = ~((1 << KERNEL_TR_PAGE_SHIFT) - 1);
 416                 vaddr = PAGE_OFFSET + md->phys_addr;
 417
 418                 /*
 419                  * We must check that the PAL mapping won't overlap with the kernel
 420                  * mapping.
 421                  *
 422                  * PAL code is guaranteed to be aligned on a power of 2 between 4k and
 423                  * 256KB and that only one ITR is needed to map it. This implies that the
 424                  * PAL code is always aligned on its size, i.e., the closest matching page
 425                  * size supported by the TLB. Therefore PAL code is guaranteed never to
 426                  * cross a 64MB unless it is bigger than 64MB (very unlikely!).  So for
 427                  * now the following test is enough to determine whether or not we need a
 428                  * dedicated ITR for the PAL code.
 429                  */
 430                 if ((vaddr & mask) == (KERNEL_START & mask)) {
 431                         printk(KERN_INFO "%s: no need to install ITR for PAL code\n",
 432                                __FUNCTION__);
 433                         continue;
 434                 }
 435
 436                 if (md->num_pages << EFI_PAGE_SHIFT > IA64_GRANULE_SIZE)
 437                         panic("Woah!  PAL code size bigger than a granule!");
 438
 439                 mask  = ~((1 << IA64_GRANULE_SHIFT) - 1);
 440 #if EFI_DEBUG
 441                 printk(KERN_INFO "CPU %d: mapping PAL code [0x%lx-0x%lx) into [0x%lx-0x%lx)\n",
 442                        smp_processor_id(), md->phys_addr,
 443                        md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT),
 444                        vaddr & mask, (vaddr & mask) + IA64_GRANULE_SIZE);
 445 #endif
 446
 447                 /*
 448                  * Cannot write to CRx with PSR.ic=1
 449                  */
 450                 psr = ia64_clear_ic();
 451                 ia64_itr(0x1, IA64_TR_PALCODE, vaddr & mask,
 452                          pte_val(pfn_pte(md->phys_addr >> PAGE_SHIFT, PAGE_KERNEL)),
 453                          IA64_GRANULE_SHIFT);
 454                 ia64_set_psr(psr);              /* restore psr */
 455                 ia64_srlz_i();
 456
 457                 cpu = smp_processor_id();
 458
 459                 /* insert this TR into our list for MCA recovery purposes */
 460                 ia64_mca_tlb_list[cpu].pal_base = vaddr & mask;
 461                 ia64_mca_tlb_list[cpu].pal_paddr = pte_val(mk_pte_phys(md->phys_addr, PAGE_KERNEL));
 462         }
 463 }
 464
 465 void __init
 466 efi_init (void)
 467 {
 468         void *efi_map_start, *efi_map_end;
 469         efi_config_table_t *config_tables;
 470         efi_char16_t *c16;
 471         u64 efi_desc_size;
 472         char *cp, *end, vendor[100] = "unknown";
 473         extern char saved_command_line[];
 474         int i;
 475
 476         /* it's too early to be able to use the standard kernel command line support... */
 477         for (cp = saved_command_line; *cp; ) {
 478                 if (memcmp(cp, "mem=", 4) == 0) {
 479                         cp += 4;
 480                         mem_limit = memparse(cp, &end) - 2;
 481                         if (end != cp)
 482                                 break;
 483                         cp = end;
 484                 } else if (memcmp(cp, "max_addr=", 9) == 0) {
 485                         cp += 9;
 486                         max_addr = memparse(cp, &end) - 1;
 487                         if (end != cp)
 488                                 break;
 489                         cp = end;
 490                 } else {
 491                         while (*cp != ' ' && *cp)
 492                                 ++cp;
 493                         while (*cp == ' ')
 494                                 ++cp;
 495                 }
 496         }
 497         if (max_addr != ~0UL)
 498                 printk(KERN_INFO "Ignoring memory above %luMB\n", max_addr >> 20);
 499
 500         efi.systab = __va(ia64_boot_param->efi_systab);
 501
 502         /*
 503          * Verify the EFI Table
 504          */
 505         if (efi.systab == NULL)
 506                 panic("Woah! Can't find EFI system table.\n");
 507         if (efi.systab->hdr.signature != EFI_SYSTEM_TABLE_SIGNATURE)
 508                 panic("Woah! EFI system table signature incorrect\n");
 509         if ((efi.systab->hdr.revision ^ EFI_SYSTEM_TABLE_REVISION) >> 16 != 0)
 510                 printk(KERN_WARNING "Warning: EFI system table major version mismatch: "
 511                        "got %d.%02d, expected %d.%02d\n",
 512                        efi.systab->hdr.revision >> 16, efi.systab->hdr.revision & 0xffff,
 513                        EFI_SYSTEM_TABLE_REVISION >> 16, EFI_SYSTEM_TABLE_REVISION & 0xffff);
 514
 515         config_tables = __va(efi.systab->tables);
 516
 517         /* Show what we know for posterity */
 518         c16 = __va(efi.systab->fw_vendor);
 519         if (c16) {
 520                 for (i = 0;i < (int) sizeof(vendor) && *c16; ++i)
 521                         vendor[i] = *c16++;
 522                 vendor[i] = '\0';
 523         }
 524
 525         printk(KERN_INFO "EFI v%u.%.02u by %s:",
 526                efi.systab->hdr.revision >> 16, efi.systab->hdr.revision & 0xffff, vendor);
 527
 528         for (i = 0; i < (int) efi.systab->nr_tables; i++) {
 529                 if (efi_guidcmp(config_tables[i].guid, MPS_TABLE_GUID) == 0) {
 530                         efi.mps = __va(config_tables[i].table);
 531                         printk(" MPS=0x%lx", config_tables[i].table);
 532                 } else if (efi_guidcmp(config_tables[i].guid, ACPI_20_TABLE_GUID) == 0) {
 533                         efi.acpi20 = __va(config_tables[i].table);
 534                         printk(" ACPI 2.0=0x%lx", config_tables[i].table);
 535                 } else if (efi_guidcmp(config_tables[i].guid, ACPI_TABLE_GUID) == 0) {
 536                         efi.acpi = __va(config_tables[i].table);
 537                         printk(" ACPI=0x%lx", config_tables[i].table);
 538                 } else if (efi_guidcmp(config_tables[i].guid, SMBIOS_TABLE_GUID) == 0) {
 539                         efi.smbios = __va(config_tables[i].table);
 540                         printk(" SMBIOS=0x%lx", config_tables[i].table);
 541                 } else if (efi_guidcmp(config_tables[i].guid, SAL_SYSTEM_TABLE_GUID) == 0) {
 542                         efi.sal_systab = __va(config_tables[i].table);
 543                         printk(" SALsystab=0x%lx", config_tables[i].table);
 544                 } else if (efi_guidcmp(config_tables[i].guid, HCDP_TABLE_GUID) == 0) {
 545                         efi.hcdp = __va(config_tables[i].table);
 546                         printk(" HCDP=0x%lx", config_tables[i].table);
 547                 }
 548         }
 549         printk("\n");
 550
 551         runtime = __va(efi.systab->runtime);
 552         efi.get_time = phys_get_time;
 553         efi.set_time = phys_set_time;
 554         efi.get_wakeup_time = phys_get_wakeup_time;
 555         efi.set_wakeup_time = phys_set_wakeup_time;
 556         efi.get_variable = phys_get_variable;
 557         efi.get_next_variable = phys_get_next_variable;
 558         efi.set_variable = phys_set_variable;
 559         efi.get_next_high_mono_count = phys_get_next_high_mono_count;
 560         efi.reset_system = phys_reset_system;
 561
 562         efi_map_start = __va(ia64_boot_param->efi_memmap);
 563         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 564         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 565
 566 #if EFI_DEBUG
 567         /* print EFI memory map: */
 568         {
 569                 efi_memory_desc_t *md;
 570                 void *p;
 571
 572                 for (i = 0, p = efi_map_start; p < efi_map_end; ++i, p += efi_desc_size) {
 573                         md = p;
 574                         printk("mem%02u: type=%u, attr=0x%lx, range=[0x%016lx-0x%016lx) (%luMB)\n",
 575                                i, md->type, md->attribute, md->phys_addr,
 576                                md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT),
 577                                md->num_pages >> (20 - EFI_PAGE_SHIFT));
 578                 }
 579         }
 580 #endif
 581
 582         efi_map_pal_code();
 583         efi_enter_virtual_mode();
 584 }
 585
 586 void
 587 efi_enter_virtual_mode (void)
 588 {
 589         void *efi_map_start, *efi_map_end, *p;
 590         efi_memory_desc_t *md;
 591         efi_status_t status;
 592         u64 efi_desc_size;
 593
 594         efi_map_start = __va(ia64_boot_param->efi_memmap);
 595         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 596         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 597
 598         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 599                 md = p;
 600                 if (md->attribute & EFI_MEMORY_RUNTIME) {
 601                         /*
 602                          * Some descriptors have multiple bits set, so the order of
 603                          * the tests is relevant.
 604                          */
 605                         if (md->attribute & EFI_MEMORY_WB) {
 606                                 md->virt_addr = (u64) __va(md->phys_addr);
 607                         } else if (md->attribute & EFI_MEMORY_UC) {
 608                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 609                         } else if (md->attribute & EFI_MEMORY_WC) {
 610 #if 0
 611                                 md->virt_addr = ia64_remap(md->phys_addr, (_PAGE_A | _PAGE_P
 612                                                                            | _PAGE_D
 613                                                                            | _PAGE_MA_WC
 614                                                                            | _PAGE_PL_0
 615                                                                            | _PAGE_AR_RW));
 616 #else
 617                                 printk(KERN_INFO "EFI_MEMORY_WC mapping\n");
 618                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 619 #endif
 620                         } else if (md->attribute & EFI_MEMORY_WT) {
 621 #if 0
 622                                 md->virt_addr = ia64_remap(md->phys_addr, (_PAGE_A | _PAGE_P
 623                                                                            | _PAGE_D | _PAGE_MA_WT
 624                                                                            | _PAGE_PL_0
 625                                                                            | _PAGE_AR_RW));
 626 #else
 627                                 printk(KERN_INFO "EFI_MEMORY_WT mapping\n");
 628                                 md->virt_addr = (u64) ioremap(md->phys_addr, 0);
 629 #endif
 630                         }
 631                 }
 632         }
 633
 634         status = efi_call_phys(__va(runtime->set_virtual_address_map),
 635                                ia64_boot_param->efi_memmap_size,
 636                                efi_desc_size, ia64_boot_param->efi_memdesc_version,
 637                                ia64_boot_param->efi_memmap);
 638         if (status != EFI_SUCCESS) {
 639                 printk(KERN_WARNING "warning: unable to switch EFI into virtual mode "
 640                        "(status=%lu)\n", status);
 641                 return;
 642         }
 643
 644         /*
 645          * Now that EFI is in virtual mode, we call the EFI functions more efficiently:
 646          */
 647         efi.get_time = virt_get_time;
 648         efi.set_time = virt_set_time;
 649         efi.get_wakeup_time = virt_get_wakeup_time;
 650         efi.set_wakeup_time = virt_set_wakeup_time;
 651         efi.get_variable = virt_get_variable;
 652         efi.get_next_variable = virt_get_next_variable;
 653         efi.set_variable = virt_set_variable;
 654         efi.get_next_high_mono_count = virt_get_next_high_mono_count;
 655         efi.reset_system = virt_reset_system;
 656 }
 657
 658 /*
 659  * Walk the EFI memory map looking for the I/O port range.  There can only be one entry of
 660  * this type, other I/O port ranges should be described via ACPI.
 661  */
 662 u64
 663 efi_get_iobase (void)
 664 {
 665         void *efi_map_start, *efi_map_end, *p;
 666         efi_memory_desc_t *md;
 667         u64 efi_desc_size;
 668
 669         efi_map_start = __va(ia64_boot_param->efi_memmap);
 670         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 671         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 672
 673         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 674                 md = p;
 675                 if (md->type == EFI_MEMORY_MAPPED_IO_PORT_SPACE) {
 676                         if (md->attribute & EFI_MEMORY_UC)
 677                                 return md->phys_addr;
 678                 }
 679         }
 680         return 0;
 681 }
 682
 683 u32
 684 efi_mem_type (unsigned long phys_addr)
 685 {
 686         void *efi_map_start, *efi_map_end, *p;
 687         efi_memory_desc_t *md;
 688         u64 efi_desc_size;
 689
 690         efi_map_start = __va(ia64_boot_param->efi_memmap);
 691         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 692         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 693
 694         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 695                 md = p;
 696
 697                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT))
 698                          return md->type;
 699         }
 700         return 0;
 701 }
 702
 703 u64
 704 efi_mem_attributes (unsigned long phys_addr)
 705 {
 706         void *efi_map_start, *efi_map_end, *p;
 707         efi_memory_desc_t *md;
 708         u64 efi_desc_size;
 709
 710         efi_map_start = __va(ia64_boot_param->efi_memmap);
 711         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 712         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 713
 714         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 715                 md = p;
 716
 717                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT))
 718                         return md->attribute;
 719         }
 720         return 0;
 721 }
 722
 723 int
 724 valid_phys_addr_range (unsigned long phys_addr, unsigned long *size)
 725 {
 726         void *efi_map_start, *efi_map_end, *p;
 727         efi_memory_desc_t *md;
 728         u64 efi_desc_size;
 729
 730         efi_map_start = __va(ia64_boot_param->efi_memmap);
 731         efi_map_end   = efi_map_start + ia64_boot_param->efi_memmap_size;
 732         efi_desc_size = ia64_boot_param->efi_memdesc_size;
 733
 734         for (p = efi_map_start; p < efi_map_end; p += efi_desc_size) {
 735                 md = p;
 736
 737                 if (phys_addr - md->phys_addr < (md->num_pages << EFI_PAGE_SHIFT)) {
 738                         if (!(md->attribute & EFI_MEMORY_WB))
 739                                 return 0;
 740
 741                         if (*size > md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) - phys_addr)
 742                                 *size = md->phys_addr + (md->num_pages << EFI_PAGE_SHIFT) - phys_addr;
 743                         return 1;
 744                 }
 745         }
 746         return 0;
 747 }
 748
 749 int __init
 750 efi_uart_console_only(void)
 751 {
 752         efi_status_t status;
 753         char *s, name[] = "ConOut";
 754         efi_guid_t guid = EFI_GLOBAL_VARIABLE_GUID;
 755         efi_char16_t *utf16, name_utf16[32];
 756         unsigned char data[1024];
 757         unsigned long size = sizeof(data);
 758         struct efi_generic_dev_path *hdr, *end_addr;
 759         int uart = 0;
 760
 761         /* Convert to UTF-16 */
 762         utf16 = name_utf16;
 763         s = name;
 764         while (*s)
 765                 *utf16++ = *s++ & 0x7f;
 766         *utf16 = 0;
 767
 768         status = efi.get_variable(name_utf16, &guid, NULL, &size, data);
 769         if (status != EFI_SUCCESS) {
 770                 printk(KERN_ERR "No EFI %s variable?\n", name);
 771                 return 0;
 772         }
 773
 774         hdr = (struct efi_generic_dev_path *) data;
 775         end_addr = (struct efi_generic_dev_path *) ((u8 *) data + size);
 776         while (hdr < end_addr) {
 777                 if (hdr->type == EFI_DEV_MSG &&
 778                     hdr->sub_type == EFI_DEV_MSG_UART)
 779                         uart = 1;
 780                 else if (hdr->type == EFI_DEV_END_PATH ||
 781                           hdr->type == EFI_DEV_END_PATH2) {
 782                         if (!uart)
 783                                 return 0;
 784                         if (hdr->sub_type == EFI_DEV_END_ENTIRE)
 785                                 return 1;
 786                         uart = 0;
 787                 }
 788                 hdr = (struct efi_generic_dev_path *) ((u8 *) hdr + hdr->length);
 789         }
 790         printk(KERN_ERR "Malformed %s value\n", name);
 791         return 0;
 792 }