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