sys/arch/ia64/stand/efi/libefi/exec.c

   1 /* $NetBSD: exec.c,v 1.4 2009/03/18 10:22:31 cegger Exp $ */
   2
   3 /*-
   4  * Copyright (c) 1997 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
   9  * NASA Ames Research Center.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  30  * POSSIBILITY OF SUCH DAMAGE.
  31  */
  32 /*
  33  * Copyright (c) 1992, 1993
  34  *      The Regents of the University of California.  All rights reserved.
  35  *
  36  * This code is derived from software contributed to Berkeley by
  37  * Ralph Campbell.
  38  *
  39  * Redistribution and use in source and binary forms, with or without
  40  * modification, are permitted provided that the following conditions
  41  * are met:
  42  * 1. Redistributions of source code must retain the above copyright
  43  *    notice, this list of conditions and the following disclaimer.
  44  * 2. Redistributions in binary form must reproduce the above copyright
  45  *    notice, this list of conditions and the following disclaimer in the
  46  *    documentation and/or other materials provided with the distribution.
  47  * 4. Neither the name of the University nor the names of its contributors
  48  *    may be used to endorse or promote products derived from this software
  49  *    without specific prior written permission.
  50  *
  51  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  52  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  53  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  54  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  55  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  56  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  57  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  58  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  59  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  60  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  61  * SUCH DAMAGE.
  62  *
  63  *      @(#)boot.c      8.1 (Berkeley) 6/10/93
  64  */
  65
  66 #include <sys/cdefs.h>
  67 /* __FBSDID("$FreeBSD: src/sys/boot/efi/libefi/elf_freebsd.c,v 1.13 2004/04/05 23:41:28 imp Exp $"); */
  68
  69 #include <lib/libsa/stand.h>
  70 #include <lib/libsa/loadfile.h>
  71
  72 #include <sys/param.h>
  73 #include <sys/lock.h>
  74
  75 #include <machine/elf_machdep.h>
  76 #include <machine/bootinfo.h>
  77 #include <machine/ia64_cpu.h>
  78 #include <machine/pte.h>
  79 #include <machine/vmparam.h>
  80
  81 #include <efi.h>
  82 #include <efilib.h>
  83
  84 #include "bootstrap.h"
  85
  86 #define _KERNEL
  87
  88 static int      elf64_exec(struct preloaded_file *amp);
  89
  90 struct file_format ia64_elf = { elf64_loadfile, elf64_exec };
  91
  92 static __inline u_int64_t
  93 disable_ic(void)
  94 {
  95         u_int64_t psr;
  96         __asm __volatile("mov %0=psr;;" : "=r" (psr));
  97         __asm __volatile("rsm psr.ic|psr.i;; srlz.i;;");
  98         return psr;
  99 }
 100
 101 static __inline void
 102 restore_ic(u_int64_t psr)
 103 {
 104         __asm __volatile("mov psr.l=%0;; srlz.i" :: "r" (psr));
 105 }
 106
 107 /*
 108  * Entered with psr.ic and psr.i both zero.
 109  */
 110 void
 111 enter_kernel(u_int64_t start, struct bootinfo *bi)
 112 {
 113         u_int64_t               psr;
 114
 115         __asm __volatile("srlz.i;;");
 116         __asm __volatile("mov cr.ipsr=%0"
 117                          :: "r"(IA64_PSR_IC
 118                                 | IA64_PSR_DT
 119                                 | IA64_PSR_RT
 120                                 | IA64_PSR_IT
 121                                 | IA64_PSR_BN));
 122         __asm __volatile("mov cr.iip=%0" :: "r"(start));
 123         __asm __volatile("mov cr.ifs=r0;;");
 124         __asm __volatile("mov ar.rsc=0;; flushrs;;");
 125         __asm __volatile("mov r8=%0" :: "r" (bi));
 126         __asm __volatile("rfi;;");
 127 }
 128
 129 static int
 130 elf64_exec(struct preloaded_file *fp)
 131 {
 132         pt_entry_t              pte;
 133         struct bootinfo         *bi;
 134         u_int64_t               psr;
 135         UINTN                   mapkey, pages, size;
 136         UINTN                   descsz;
 137         UINT32                  descver;
 138         EFI_STATUS              status;
 139
 140         if (strcmp(fp->f_type, ELF64_KERNELTYPE)) return(EFTYPE);
 141
 142         /*
 143          * Allocate enough pages to hold the bootinfo block and the memory
 144          * map EFI will return to us. The memory map has an unknown size,
 145          * so we have to determine that first. Note that the AllocatePages
 146          * call can itself modify the memory map, so we have to take that
 147          * into account as well. The changes to the memory map are caused
 148          * by splitting a range of free memory into two (AFAICT), so that
 149          * one is marked as being loader data.
 150          */
 151         size = 0;
 152         descsz = sizeof(EFI_MEMORY_DESCRIPTOR);
 153         BS->GetMemoryMap(&size, NULL, &mapkey, &descsz, &descver);
 154         size += descsz + ((sizeof(struct bootinfo) + 0x0f) & ~0x0f);
 155         pages = EFI_SIZE_TO_PAGES(size);
 156         status = BS->AllocatePages(AllocateAnyPages, EfiLoaderData, pages,
 157             (void*)&bi);
 158         if (EFI_ERROR(status)) {
 159                 printf("unable to create bootinfo block (status=0x%lx)\n",
 160                     (long)status);
 161                 return (ENOMEM);
 162         }
 163
 164         memset(bi, 0, sizeof(struct bootinfo));
 165         bi_load(bi, fp, &mapkey, pages);
 166
 167         printf("Entering %s at 0x%lx...\n", fp->f_name, fp->marks[MARK_ENTRY]);
 168
 169         status = BS->ExitBootServices(IH, mapkey);
 170         if (EFI_ERROR(status)) {
 171                 printf("ExitBootServices returned 0x%lx\n", status);
 172                 return (EINVAL);
 173         }
 174
 175         psr = disable_ic();
 176
 177         /*
 178          * Region 6 is direct mapped UC and region 7 is direct mapped
 179          * WC. The details of this is controlled by the Alt {I,D}TLB
 180          * handlers. Here we just make sure that they have the largest
 181          * possible page size to minimise TLB usage.
 182          */
 183         ia64_set_rr(IA64_RR_BASE(6), (6 << 8) | (28 << 2));
 184         ia64_set_rr(IA64_RR_BASE(7), (7 << 8) | (28 << 2));
 185
 186         pte = PTE_PRESENT | PTE_MA_WB | PTE_ACCESSED | PTE_DIRTY |
 187             PTE_PL_KERN | PTE_AR_RWX;
 188
 189         __asm __volatile("mov cr.ifa=%0" :: "r"(IA64_RR_BASE(7)));
 190         __asm __volatile("mov cr.itir=%0" :: "r"(28 << 2));
 191         __asm __volatile("ptr.i %0,%1" :: "r"(IA64_RR_BASE(7)), "r"(28<<2));
 192         __asm __volatile("ptr.d %0,%1" :: "r"(IA64_RR_BASE(7)), "r"(28<<2));
 193         __asm __volatile("srlz.i;;");
 194         __asm __volatile("itr.i itr[%0]=%1;;" :: "r"(0), "r"(pte));
 195         __asm __volatile("srlz.i;;");
 196         __asm __volatile("itr.d dtr[%0]=%1;;" :: "r"(0), "r"(pte));
 197         __asm __volatile("srlz.i;;");
 198
 199         enter_kernel(fp->marks[MARK_ENTRY], bi);
 200
 201         restore_ic(psr);
 202 }