1 /* $NetBSD: autoconf.c,v 1.60 2025/03/09 01:06:41 thorpej Exp $ */ 2 3 /* 4 * Copyright (c) 1992, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * This software was developed by the Computer Systems Engineering group 8 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and 9 * contributed to Berkeley. 10 * 11 * All advertising materials mentioning features or use of this software 12 * must display the following acknowledgement: 13 * This product includes software developed by the University of 14 * California, Lawrence Berkeley Laboratory. 15 * 16 * Redistribution and use in source and binary forms, with or without 17 * modification, are permitted provided that the following conditions 18 * are met: 19 * 1. Redistributions of source code must retain the above copyright 20 * notice, this list of conditions and the following disclaimer. 21 * 2. Redistributions in binary form must reproduce the above copyright 22 * notice, this list of conditions and the following disclaimer in the 23 * documentation and/or other materials provided with the distribution. 24 * 3. Neither the name of the University nor the names of its contributors 25 * may be used to endorse or promote products derived from this software 26 * without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 38 * SUCH DAMAGE. 39 * 40 * @(#)autoconf.c 8.4 (Berkeley) 10/1/93 41 */ 42 43 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 44 45 __KERNEL_RCSID(0, "$NetBSD: autoconf.c,v 1.60 2025/03/09 01:06:41 thorpej Exp $"); 46 47 #include "pci.h" 48 49 #include <sys/param.h> 50 #include <sys/systm.h> 51 #include <sys/buf.h> 52 #include <sys/disklabel.h> 53 #include <sys/reboot.h> 54 #include <sys/device.h> 55 #include <sys/conf.h> 56 #include <dev/cons.h> 57 58 #include <dev/pci/pcivar.h> 59 60 #include <net/if.h> 61 #include <net/if_ether.h> 62 63 #include <machine/autoconf.h> 64 #include <machine/alpha.h> 65 #include <machine/cpu.h> 66 #include <machine/prom.h> 67 #include <machine/cpuconf.h> 68 #include <machine/intr.h> 69 70 struct bootdev_data *bootdev_data; 71 bool bootdev_is_disk; 72 bool bootdev_is_net; 73 74 static void parse_prom_bootdev(void); 75 76 /* 77 * cpu_configure: 78 * called at boot time, configure all devices on system 79 */ 80 void 81 cpu_configure(void) 82 { 83 84 parse_prom_bootdev(); 85 86 /* 87 * Disable interrupts during autoconfiguration. splhigh() won't 88 * work, because it simply _raises_ the IPL, so if machine checks 89 * are disabled, they'll stay disabled. Machine checks are needed 90 * during autoconfig. 91 */ 92 (void)alpha_pal_swpipl(ALPHA_PSL_IPL_HIGH); 93 if (config_rootfound("mainbus", NULL) == NULL) 94 panic("no mainbus found"); 95 (void)spl0(); 96 97 /* 98 * Note that bootstrapping is finished, and set the HWRPB up 99 * to do restarts. 100 */ 101 hwrpb_restart_setup(); 102 } 103 104 static void 105 qemu_find_rootdev(void) 106 { 107 char buf[32] = { 0 }; 108 109 /* 110 * Check for "rootdev=wd0". 111 */ 112 if (! prom_qemu_getenv("rootdev", buf, sizeof(buf))) { 113 /* 114 * Check "root=/dev/wd0a", "root=/dev/hda1", etc. 115 */ 116 if (! prom_qemu_getenv("root", buf, sizeof(buf))) { 117 printf("WARNING: no rootdev= or root= arguments " 118 "provided by Qemu\n"); 119 return; 120 } 121 } 122 123 const size_t devlen = strlen("/dev/"); 124 const char *cp = buf; 125 char *ecp = &buf[sizeof(buf) - 1]; 126 127 /* Find the start of the device xname. */ 128 if (strlen(cp) > devlen && strncmp(cp, "/dev/", devlen) == 0) { 129 cp += devlen; 130 } 131 132 /* Now strip any partition letter off the end. */ 133 while (ecp != cp) { 134 if (*ecp >= '0' && *ecp <= '9') { 135 break; 136 } 137 *ecp-- = '\0'; 138 } 139 140 snprintf(bootinfo.booted_dev, sizeof(bootinfo.booted_dev), 141 "root=%s", cp); 142 booted_device = device_find_by_xname(cp); 143 } 144 145 static bool 146 parse_dec_macaddr(const char *str, uint8_t enaddr[ETHER_ADDR_LEN]) 147 { 148 char *cp; 149 long long l; 150 int i; 151 152 /* 153 * DEC Ethernet address strings are formatted like so: 154 * 155 * XX-XX-XX-XX-XX-XX 156 */ 157 158 for (i = 0; i < ETHER_ADDR_LEN; i++) { 159 l = strtoll(str, &cp, 16); 160 if (l < 0 || l > 0xff) { 161 /* Not a valid MAC address. */ 162 return false; 163 } 164 if (*cp == '-') { 165 /* Octet separator. */ 166 enaddr[i] = (uint8_t)l; 167 str = cp + 1; 168 continue; 169 } 170 if (*cp == ' ' || *cp == '\0') { 171 /* End of the string. */ 172 enaddr[i] = (uint8_t)l; 173 return i == ETHER_ADDR_LEN - 1; 174 } 175 /* Bogus character. */ 176 break; 177 } 178 179 /* Encountered bogus character or didn't reach end of string. */ 180 return false; 181 } 182 183 static void 184 netboot_find_rootdev_planb(void) 185 { 186 struct psref psref; 187 uint8_t enaddr[ETHER_ADDR_LEN]; 188 char ifname[IFNAMSIZ]; 189 int i; 190 191 if (!bootdev_is_net) { 192 /* We weren't netbooted. */ 193 return; 194 } 195 196 for (i = 2; bootinfo.booted_dev[i] != '\0'; i++) { 197 if (bootinfo.booted_dev[i] == '-') { 198 if (parse_dec_macaddr(&bootinfo.booted_dev[i - 2], 199 enaddr)) { 200 /* Found it! */ 201 break; 202 } 203 } 204 } 205 if (bootinfo.booted_dev[i] == '\0') { 206 /* No MAC address in string. */ 207 return; 208 } 209 210 /* Now try to look up the interface by the link address. */ 211 struct ifnet *ifp = if_get_bylla(enaddr, ETHER_ADDR_LEN, &psref); 212 if (ifp == NULL) { 213 /* No interface attached with that MAC address. */ 214 return; 215 } 216 217 strlcpy(ifname, if_name(ifp), sizeof(ifname)); 218 if_put(ifp, &psref); 219 220 /* Ok! Now look up the device_t by name! */ 221 booted_device = device_find_by_xname(ifname); 222 } 223 224 void 225 cpu_rootconf(void) 226 { 227 228 if (booted_device == NULL && alpha_is_qemu) { 229 qemu_find_rootdev(); 230 } 231 232 if (booted_device == NULL) { 233 /* 234 * It's possible that we netbooted from an Ethernet 235 * interface that can't be matched via the usual 236 * logic in device_register() (a DE204 in an ISA slot, 237 * for example). In these cases, the console may have 238 * provided us with a MAC address that we can use to 239 * try and find the interface, * e.g.: 240 * 241 * BOOTP 1 1 0 0 0 5 0 08-00-2B-xx-xx-xx 1 242 */ 243 netboot_find_rootdev_planb(); 244 } 245 246 if (booted_device == NULL) { 247 printf("WARNING: can't figure what device matches \"%s\"\n", 248 bootinfo.booted_dev); 249 } 250 rootconf(); 251 } 252 253 static inline int 254 atoi(const char *s) 255 { 256 return (int)strtoll(s, NULL, 10); 257 } 258 259 static void 260 parse_prom_bootdev(void) 261 { 262 static char hacked_boot_dev[128]; 263 static struct bootdev_data bd; 264 char *cp, *scp, *boot_fields[8]; 265 int i, done; 266 267 booted_device = NULL; 268 booted_partition = 0; 269 bootdev_data = NULL; 270 271 memcpy(hacked_boot_dev, bootinfo.booted_dev, 272 uimin(sizeof bootinfo.booted_dev, sizeof hacked_boot_dev)); 273 #if 0 274 printf("parse_prom_bootdev: boot dev = \"%s\"\n", hacked_boot_dev); 275 #endif 276 277 i = 0; 278 scp = cp = hacked_boot_dev; 279 for (done = 0; !done; cp++) { 280 if (*cp != ' ' && *cp != '\0') 281 continue; 282 if (*cp == '\0') 283 done = 1; 284 285 *cp = '\0'; 286 boot_fields[i++] = scp; 287 scp = cp + 1; 288 if (i == 8) 289 done = 1; 290 } 291 if (i != 8) 292 return; /* doesn't look like anything we know! */ 293 294 #if 0 295 printf("i = %d, done = %d\n", i, done); 296 for (i--; i >= 0; i--) 297 printf("%d = %s\n", i, boot_fields[i]); 298 #endif 299 300 bd.protocol = boot_fields[0]; 301 bd.bus = atoi(boot_fields[1]); 302 bd.slot = atoi(boot_fields[2]); 303 bd.channel = atoi(boot_fields[3]); 304 bd.remote_address = boot_fields[4]; 305 bd.unit = atoi(boot_fields[5]); 306 bd.boot_dev_type = atoi(boot_fields[6]); 307 bd.ctrl_dev_type = boot_fields[7]; 308 309 #if 0 310 printf("parsed: proto = %s, bus = %d, slot = %d, channel = %d,\n", 311 bd.protocol, bd.bus, bd.slot, bd.channel); 312 printf("\tremote = %s, unit = %d, dev_type = %d, ctrl_type = %s\n", 313 bd.remote_address, bd.unit, bd.boot_dev_type, bd.ctrl_dev_type); 314 #endif 315 316 bootdev_data = &bd; 317 318 bootdev_is_disk = (strcasecmp(bd.protocol, "SCSI") == 0) || 319 (strcasecmp(bd.protocol, "RAID") == 0) || 320 (strcasecmp(bd.protocol, "I2O") == 0) || 321 (strcasecmp(bd.protocol, "IDE") == 0); 322 323 bootdev_is_net = (strcasecmp(bd.protocol, "BOOTP") == 0) || 324 (strcasecmp(bd.protocol, "MOP") == 0); 325 #if 0 326 printf("bootdev_is_disk = %d, bootdev_is_net = %d\n", 327 bootdev_is_disk, bootdev_is_net); 328 #endif 329 } 330 331 void 332 device_register(device_t dev, void *aux) 333 { 334 #if NPCI > 0 335 device_t parent = device_parent(dev); 336 337 if (parent != NULL && device_is_a(parent, "pci")) 338 device_pci_register(dev, aux); 339 #endif 340 if (platform.device_register) 341 (*platform.device_register)(dev, aux); 342 } 343