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