1 /*- 2 * Copyright (c) 2000 Benno Rice <benno@jeamland.net> 3 * Copyright (c) 2000 Stephane Potvin <sepotvin@videotron.ca> 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND 16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25 * SUCH DAMAGE. 26 */ 27 28 #include <sys/cdefs.h> 29 __FBSDID("$FreeBSD$"); 30 31 #include <stand.h> 32 #include "openfirm.h" 33 #include "libofw.h" 34 #include "bootstrap.h" 35 36 #include <machine/psl.h> 37 38 struct arch_switch archsw; /* MI/MD interface boundary */ 39 40 extern char end[]; 41 42 uint32_t acells, scells; 43 44 static char bootargs[128]; 45 46 #define HEAP_SIZE 0x800000 47 static char heap[HEAP_SIZE]; // In BSS, so uses no space 48 49 #define OF_puts(fd, text) OF_write(fd, text, strlen(text)) 50 51 static __inline register_t 52 mfmsr(void) 53 { 54 register_t value; 55 56 __asm __volatile ("mfmsr %0" : "=r"(value)); 57 58 return (value); 59 } 60 61 void 62 init_heap(void) 63 { 64 bzero(heap, HEAP_SIZE); 65 66 setheap(heap, (void *)((uintptr_t)heap + HEAP_SIZE)); 67 } 68 69 uint64_t 70 memsize(void) 71 { 72 phandle_t memoryp; 73 cell_t reg[24]; 74 int i, sz; 75 uint64_t memsz; 76 77 memsz = 0; 78 memoryp = OF_instance_to_package(memory); 79 80 sz = OF_getprop(memoryp, "reg", ®, sizeof(reg)); 81 sz /= sizeof(reg[0]); 82 83 for (i = 0; i < sz; i += (acells + scells)) { 84 if (scells > 1) 85 memsz += (uint64_t)reg[i + acells] << 32; 86 memsz += reg[i + acells + scells - 1]; 87 } 88 89 return (memsz); 90 } 91 92 #ifdef CAS 93 extern int ppc64_cas(void); 94 95 static int 96 ppc64_autoload(void) 97 { 98 const char *cas; 99 100 if ((cas = getenv("cas")) && cas[0] == '1') 101 if (ppc64_cas() != 0) 102 return (-1); 103 return (ofw_autoload()); 104 } 105 #endif 106 107 int 108 main(int (*openfirm)(void *)) 109 { 110 phandle_t root; 111 int i; 112 char bootpath[64]; 113 char *ch; 114 int bargc; 115 char **bargv; 116 117 /* 118 * Initialise the Open Firmware routines by giving them the entry point. 119 */ 120 OF_init(openfirm); 121 122 root = OF_finddevice("/"); 123 124 scells = acells = 1; 125 OF_getprop(root, "#address-cells", &acells, sizeof(acells)); 126 OF_getprop(root, "#size-cells", &scells, sizeof(scells)); 127 128 /* 129 * Initialise the heap as early as possible. Once this is done, 130 * alloc() is usable. The stack is buried inside us, so this is 131 * safe. 132 */ 133 init_heap(); 134 135 /* 136 * Set up console. 137 */ 138 cons_probe(); 139 140 archsw.arch_getdev = ofw_getdev; 141 archsw.arch_copyin = ofw_copyin; 142 archsw.arch_copyout = ofw_copyout; 143 archsw.arch_readin = ofw_readin; 144 #ifdef CAS 145 setenv("cas", "1", 0); 146 archsw.arch_autoload = ppc64_autoload; 147 #else 148 archsw.arch_autoload = ofw_autoload; 149 #endif 150 151 /* Set up currdev variable to have hooks in place. */ 152 env_setenv("currdev", EV_VOLATILE, "", ofw_setcurrdev, env_nounset); 153 154 /* 155 * March through the device switch probing for things. 156 */ 157 for (i = 0; devsw[i] != NULL; i++) 158 if (devsw[i]->dv_init != NULL) 159 (devsw[i]->dv_init)(); 160 161 printf("\n%s", bootprog_info); 162 printf("Memory: %lldKB\n", memsize() / 1024); 163 164 OF_getprop(chosen, "bootpath", bootpath, 64); 165 ch = strchr(bootpath, ':'); 166 *ch = '\0'; 167 printf("Booted from: %s\n", bootpath); 168 169 printf("\n"); 170 171 /* 172 * Only parse the first bootarg if present. It should 173 * be simple to handle extra arguments 174 */ 175 OF_getprop(chosen, "bootargs", bootargs, sizeof(bootargs)); 176 bargc = 0; 177 parse(&bargc, &bargv, bootargs); 178 if (bargc == 1) 179 env_setenv("currdev", EV_VOLATILE, bargv[0], ofw_setcurrdev, 180 env_nounset); 181 else 182 env_setenv("currdev", EV_VOLATILE, bootpath, 183 ofw_setcurrdev, env_nounset); 184 env_setenv("loaddev", EV_VOLATILE, bootpath, env_noset, 185 env_nounset); 186 setenv("LINES", "24", 1); /* optional */ 187 188 /* 189 * On non-Apple hardware, where it works reliably, pass flattened 190 * device trees to the kernel by default instead of OF CI pointers. 191 * Apple hardware is the only virtual-mode OF implementation in 192 * existence, so far as I am aware, so use that as a flag. 193 */ 194 if (!(mfmsr() & PSL_DR)) 195 setenv("usefdt", "1", 1); 196 197 interact(); /* doesn't return */ 198 199 OF_exit(); 200 201 return 0; 202 } 203 204 COMMAND_SET(halt, "halt", "halt the system", command_halt); 205 206 static int 207 command_halt(int argc, char *argv[]) 208 { 209 210 OF_exit(); 211 return (CMD_OK); 212 } 213 214 COMMAND_SET(memmap, "memmap", "print memory map", command_memmap); 215 216 int 217 command_memmap(int argc, char **argv) 218 { 219 220 ofw_memmap(acells); 221 return (CMD_OK); 222 } 223