1/* $NetBSD: dec_3000_300.c,v 1.46 2011/06/14 15:34:21 matt Exp $ */ 2 3/* 4 * Copyright (c) 1995, 1996 Carnegie-Mellon University. 5 * All rights reserved. 6 * 7 * Author: Chris G. Demetriou 8 * 9 * Permission to use, copy, modify and distribute this software and 10 * its documentation is hereby granted, provided that both the copyright 11 * notice and this permission notice appear in all copies of the 12 * software, derivative works or modified versions, and any portions 13 * thereof, and that both notices appear in supporting documentation. 14 * 15 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" 16 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND 17 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 18 * 19 * Carnegie Mellon requests users of this software to return to 20 * 21 * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU 22 * School of Computer Science 23 * Carnegie Mellon University 24 * Pittsburgh PA 15213-3890 25 * 26 * any improvements or extensions that they make and grant Carnegie the 27 * rights to redistribute these changes. 28 */ 29 30/* 31 * Additional Copyright (c) 1997 by Matthew Jacob for NASA/Ames Research Center 32 */ 33 34#include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 35 36__KERNEL_RCSID(0, "$NetBSD: dec_3000_300.c,v 1.46 2011/06/14 15:34:21 matt Exp $"); 37 38#include <sys/param.h> 39#include <sys/systm.h> 40#include <sys/device.h> 41#include <sys/termios.h> 42#include <sys/conf.h> 43 44#include <machine/rpb.h> 45#include <machine/autoconf.h> 46#include <machine/cpuconf.h> 47 48#include <dev/tc/tcvar.h> 49#include <dev/tc/tcdsvar.h> 50#include <alpha/tc/tc_3000_300.h> 51 52#include <machine/z8530var.h> 53#include <dev/tc/zs_ioasicvar.h> 54 55#include <dev/scsipi/scsi_all.h> 56#include <dev/scsipi/scsipi_all.h> 57#include <dev/scsipi/scsiconf.h> 58 59#include "wsdisplay.h" 60 61void dec_3000_300_init(void); 62static void dec_3000_300_cons_init(void); 63static void dec_3000_300_device_register(device_t, void *); 64 65const struct alpha_variation_table dec_3000_300_variations[] = { 66 { SV_ST_PELICAN, "DEC 3000/300 (\"Pelican\")" }, 67 { SV_ST_PELICA, "DEC 3000/300L (\"Pelica\")" }, 68 { SV_ST_PELICANPLUS, "DEC 3000/300X (\"Pelican+\")" }, 69 { SV_ST_PELICAPLUS, "DEC 3000/300LX (\"Pelica+\")" }, 70 { 0, NULL }, 71}; 72 73void 74dec_3000_300_init(void) 75{ 76 uint64_t variation; 77 78 platform.family = "DEC 3000/300 (\"Pelican\")"; 79 80 if ((platform.model = alpha_dsr_sysname()) == NULL) { 81 variation = hwrpb->rpb_variation & SV_ST_MASK; 82 if ((platform.model = alpha_variation_name(variation, 83 dec_3000_300_variations)) == NULL) 84 platform.model = alpha_unknown_sysname(); 85 } 86 87 platform.iobus = "tcasic"; 88 platform.cons_init = dec_3000_300_cons_init; 89 platform.device_register = dec_3000_300_device_register; 90} 91 92static void 93dec_3000_300_cons_init(void) 94{ 95 struct ctb *ctb; 96 97 ctb = (struct ctb *)(((char *)hwrpb) + hwrpb->rpb_ctb_off); 98 99 switch (ctb->ctb_term_type) { 100 case CTB_GRAPHICS: 101#if NWSDISPLAY > 0 102 /* display console ... */ 103 if (zs_ioasic_lk201_cnattach(0x1a0000000, 0x00180000, 0) == 0 && 104 tc_3000_300_fb_cnattach( 105 CTB_TURBOSLOT_SLOT(ctb->ctb_turboslot)) == 0) { 106 break; 107 } 108#endif 109 printf("consinit: Unable to init console on keyboard and "); 110 printf("TURBOchannel slot 0x%lx.\n", ctb->ctb_turboslot); 111 printf("Using serial console.\n"); 112 /* FALLTHROUGH */ 113 114 case CTB_PRINTERPORT: 115 /* serial console ... */ 116 /* 117 * XXX This could stand some cleanup... 118 */ 119 { 120 /* 121 * Delay to allow PROM putchars to complete. 122 * FIFO depth * character time. 123 * character time = (1000000 / (defaultrate / 10)) 124 */ 125 DELAY(160000000 / 9600); /* XXX */ 126 127 /* 128 * Console is channel B of the first SCC. 129 * XXX Should use ctb_line_off to get the 130 * XXX line parameters. 131 */ 132 zs_ioasic_cnattach(0x1a0000000, 0x00100000, 1); 133 break; 134 } 135 136 default: 137 printf("ctb->ctb_term_type = 0x%lx\n", ctb->ctb_term_type); 138 printf("ctb->ctb_turboslot = 0x%lx\n", ctb->ctb_turboslot); 139 panic("consinit: unknown console type %lu", 140 ctb->ctb_term_type); 141 /* NOTREACHED */ 142 } 143} 144 145static void 146dec_3000_300_device_register(device_t dev, void *aux) 147{ 148 static int found, initted, scsiboot, netboot; 149 static device_t scsidev; 150 static device_t tcdsdev; 151 struct bootdev_data *b = bootdev_data; 152 device_t parent = device_parent(dev); 153 154 if (found) 155 return; 156 157 if (!initted) { 158 scsiboot = (strcmp(b->protocol, "SCSI") == 0); 159 netboot = (strcmp(b->protocol, "BOOTP") == 0) || 160 (strcmp(b->protocol, "MOP") == 0); 161#if 0 162 printf("scsiboot = %d, netboot = %d\n", scsiboot, netboot); 163#endif 164 initted = 1; 165 } 166 167 /* 168 * for scsi boot, we look for "tcds", make sure it has the 169 * right slot number, then find the "asc" on this tcds that 170 * as the right channel. then we find the actual scsi 171 * device we came from. note: no SCSI LUN support (yet). 172 */ 173 if (scsiboot && device_is_a(dev, "tcds")) { 174 struct tc_attach_args *tcargs = aux; 175 176 if (b->slot != tcargs->ta_slot) 177 return; 178 179 tcdsdev = dev; 180#if 0 181 printf("\ntcdsdev = %s\n", device_xname(dev)); 182#endif 183 } 184 if (scsiboot && tcdsdev && 185 device_is_a(dev, "asc")) { 186 struct tcdsdev_attach_args *ta = aux; 187 188 if (parent != (device_t)tcdsdev) 189 return; 190 191 if (ta->tcdsda_chip != b->channel) 192 return; 193 194 scsidev = dev; 195#if 0 196 printf("\nscsidev = %s\n", device_xname(dev)); 197#endif 198 } 199 200 if (scsiboot && scsidev && 201 (device_is_a(dev, "sd") || 202 device_is_a(dev, "st") || 203 device_is_a(dev, "cd"))) { 204 struct scsipibus_attach_args *sa = aux; 205 206 if (device_parent(parent) != scsidev) 207 return; 208 209 if (b->unit / 100 != sa->sa_periph->periph_target) 210 return; 211 212 /* XXX LUN! */ 213 214 switch (b->boot_dev_type) { 215 case 0: 216 if (!device_is_a(dev, "sd") && 217 !device_is_a(dev, "cd")) 218 return; 219 break; 220 case 1: 221 if (!device_is_a(dev, "st")) 222 return; 223 break; 224 default: 225 return; 226 } 227 228 /* we've found it! */ 229 booted_device = dev; 230#if 0 231 printf("\nbooted_device = %s\n", device_xname(booted_device)); 232#endif 233 found = 1; 234 } 235 236 if (netboot) { 237 if (b->slot == 5 && device_is_a(dev, "le") && 238 device_is_a(parent, "ioasic")) { 239 /* 240 * no need to check ioasic_attach_args, since only 241 * one le on ioasic. 242 */ 243 244 booted_device = dev; 245#if 0 246 printf("\nbooted_device = %s\n", device_xname(booted_device)); 247#endif 248 found = 1; 249 return; 250 } 251 252 /* 253 * XXX GENERIC SUPPORT FOR TC NETWORK BOARDS 254 */ 255 } 256} 257