1/* $NetBSD: dec_3000_500.c,v 1.45 2011/06/14 15:34:21 matt Exp $ */ 2 3/* 4 * Copyright (c) 1994, 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 * Additional Copyright (c) 1997 by Matthew Jacob for NASA/Ames Research Center 31 */ 32 33#include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 34 35__KERNEL_RCSID(0, "$NetBSD: dec_3000_500.c,v 1.45 2011/06/14 15:34:21 matt Exp $"); 36 37#include <sys/param.h> 38#include <sys/systm.h> 39#include <sys/device.h> 40#include <sys/termios.h> 41#include <sys/conf.h> 42#include <dev/cons.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_500.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_500_init(void); 62static void dec_3000_500_cons_init(void); 63static void dec_3000_500_device_register(device_t, void *); 64 65static const char dec_3000_500_sp[] = "DEC 3000/400 (\"Sandpiper\")"; 66static const char dec_3000_500_sf[] = "DEC 3000/500 (\"Flamingo\")"; 67 68const struct alpha_variation_table dec_3000_500_variations[] = { 69 { SV_ST_SANDPIPER, dec_3000_500_sp }, 70 { SV_ST_FLAMINGO, dec_3000_500_sf }, 71 { SV_ST_HOTPINK, "DEC 3000/500X (\"Hot Pink\")" }, 72 { SV_ST_FLAMINGOPLUS, "DEC 3000/800 (\"Flamingo+\")" }, 73 { SV_ST_SANDPLUS, "DEC 3000/600 (\"Sandpiper+\")" }, 74 { SV_ST_SANDPIPER45, "DEC 3000/700 (\"Sandpiper45\")" }, 75 { SV_ST_FLAMINGO45, "DEC 3000/900 (\"Flamingo45\")" }, 76 { 0, NULL }, 77}; 78 79void 80dec_3000_500_init(void) 81{ 82 uint64_t variation; 83 84 platform.family = "DEC 3000/500 (\"Flamingo\")"; 85 86 if ((platform.model = alpha_dsr_sysname()) == NULL) { 87 variation = hwrpb->rpb_variation & SV_ST_MASK; 88 if (variation == SV_ST_ULTRA) { 89 /* These are really the same. */ 90 variation = SV_ST_FLAMINGOPLUS; 91 } 92 if ((platform.model = alpha_variation_name(variation, 93 dec_3000_500_variations)) == NULL) { 94 /* 95 * This is how things used to be done. 96 */ 97 if (variation == SV_ST_RESERVED) { 98 if (hwrpb->rpb_variation & SV_GRAPHICS) 99 platform.model = dec_3000_500_sf; 100 else 101 platform.model = dec_3000_500_sp; 102 } else 103 platform.model = alpha_unknown_sysname(); 104 } 105 } 106 107 platform.iobus = "tcasic"; 108 platform.cons_init = dec_3000_500_cons_init; 109 platform.device_register = dec_3000_500_device_register; 110} 111 112static void 113dec_3000_500_cons_init(void) 114{ 115 struct ctb *ctb; 116 117 ctb = (struct ctb *)(((char *)hwrpb) + hwrpb->rpb_ctb_off); 118 119 switch (ctb->ctb_term_type) { 120 case CTB_GRAPHICS: 121#if NWSDISPLAY > 0 122 /* display console ... */ 123 if (zs_ioasic_lk201_cnattach(0x1e0000000, 0x00180000, 0) == 0 && 124 tc_3000_500_fb_cnattach( 125 CTB_TURBOSLOT_SLOT(ctb->ctb_turboslot)) == 0) { 126 break; 127 } 128#endif 129 printf("consinit: Unable to init console on keyboard and "); 130 printf("TURBOchannel slot 0x%lx.\n", ctb->ctb_turboslot); 131 printf("Using serial console.\n"); 132 /* FALLTHROUGH */ 133 134 case CTB_PRINTERPORT: 135 /* serial console ... */ 136 /* 137 * XXX This could stand some cleanup... 138 */ 139 { 140 /* 141 * Delay to allow PROM putchars to complete. 142 * FIFO depth * character time, 143 * character time = (1000000 / (defaultrate / 10)) 144 */ 145 DELAY(160000000 / 9600); /* XXX */ 146 147 /* 148 * Console is channel B of the second SCC. 149 * XXX Should use ctb_line_off to get the 150 * XXX line parameters--these are the defaults. 151 */ 152 zs_ioasic_cnattach(0x1e0000000, 0x00180000, 1); 153 break; 154 } 155 156 default: 157 printf("ctb->ctb_term_type = 0x%lx\n", ctb->ctb_term_type); 158 printf("ctb->ctb_turboslot = 0x%lx\n", ctb->ctb_turboslot); 159 panic("consinit: unknown console type %lu", 160 ctb->ctb_term_type); 161 /* NOTREACHED */ 162 } 163} 164 165static void 166dec_3000_500_device_register(device_t dev, void *aux) 167{ 168 static int found, initted, scsiboot, netboot; 169 static device_t scsidev; 170 static device_t tcdsdev; 171 struct bootdev_data *b = bootdev_data; 172 device_t parent = device_parent(dev); 173 174 if (found) 175 return; 176 177 if (!initted) { 178 scsiboot = (strcmp(b->protocol, "SCSI") == 0); 179 netboot = (strcmp(b->protocol, "BOOTP") == 0) || 180 (strcmp(b->protocol, "MOP") == 0); 181#if 0 182 printf("scsiboot = %d, netboot = %d\n", scsiboot, netboot); 183#endif 184 initted = 1; 185 } 186 187 /* 188 * for scsi boot, we look for "tcds", make sure it has the 189 * right slot number, then find the "asc" on this tcds that 190 * as the right channel. then we find the actual scsi 191 * device we came from. note: no SCSI LUN support (yet). 192 */ 193 if (scsiboot && device_is_a(dev, "tcds")) { 194 struct tc_attach_args *tcargs = aux; 195 196 if (b->slot != tcargs->ta_slot) 197 return; 198 199 tcdsdev = dev; 200#if 0 201 printf("\ntcdsdev = %s\n", device_xname(dev)); 202#endif 203 } 204 if (scsiboot && tcdsdev && 205 device_is_a(dev, "asc")) { 206 struct tcdsdev_attach_args *ta = aux; 207 208 if (parent != (device_t)tcdsdev) 209 return; 210 211 if (ta->tcdsda_chip != b->channel) 212 return; 213 214 scsidev = dev; 215#if 0 216 printf("\nscsidev = %s\n", device_xname(dev)); 217#endif 218 } 219 220 if (scsiboot && scsidev && 221 (device_is_a(dev, "sd") || 222 device_is_a(dev, "st") || 223 device_is_a(dev, "cd"))) { 224 struct scsipibus_attach_args *sa = aux; 225 226 if (device_parent(parent) != scsidev) 227 return; 228 229 if (b->unit / 100 != sa->sa_periph->periph_target) 230 return; 231 232 /* XXX LUN! */ 233 234 switch (b->boot_dev_type) { 235 case 0: 236 if (!device_is_a(dev, "sd") && 237 !device_is_a(dev, "cd")) 238 return; 239 break; 240 case 1: 241 if (!device_is_a(dev, "st")) 242 return; 243 break; 244 default: 245 return; 246 } 247 248 /* we've found it! */ 249 booted_device = dev; 250#if 0 251 printf("\nbooted_device = %s\n", device_xname(booted_device)); 252#endif 253 found = 1; 254 } 255 256 if (netboot) { 257 if (b->slot == 7 && device_is_a(dev, "le") && 258 device_is_a(parent, "ioasic")) { 259 /* 260 * no need to check ioasic_attach_args, since only 261 * one le on ioasic. 262 */ 263 264 booted_device = dev; 265#if 0 266 printf("\nbooted_device = %s\n", device_xname(booted_device)); 267#endif 268 found = 1; 269 return; 270 } 271 272 /* 273 * XXX GENERIC SUPPORT FOR TC NETWORK BOARDS 274 */ 275 } 276} 277