1 /* $NetBSD: scsiconf.c,v 1.28 1995/04/04 05:44:32 mycroft Exp $ */ 2 3 /* 4 * Copyright (c) 1994 Charles Hannum. 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 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Charles Hannum. 17 * 4. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Originally written by Julian Elischer (julian@tfs.com) 34 * for TRW Financial Systems for use under the MACH(2.5) operating system. 35 * 36 * TRW Financial Systems, in accordance with their agreement with Carnegie 37 * Mellon University, makes this software available to CMU to distribute 38 * or use in any manner that they see fit as long as this message is kept with 39 * the software. For this reason TFS also grants any other persons or 40 * organisations permission to use or modify this software. 41 * 42 * TFS supplies this software to be publicly redistributed 43 * on the understanding that TFS is not responsible for the correct 44 * functioning of this software in any circumstances. 45 * 46 * Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992 47 */ 48 49 #include <sys/types.h> 50 #include <sys/param.h> 51 #include <sys/systm.h> 52 #include <sys/malloc.h> 53 #include <sys/device.h> 54 55 #include <scsi/scsi_all.h> 56 #include <scsi/scsiconf.h> 57 58 #if 0 59 #if NCALS > 0 60 { T_PROCESSOR, T_FIXED, 1, 61 0, 0, 0 }, 62 #endif /* NCALS */ 63 #if NBLL > 0 64 { T_PROCESSOR, T_FIXED, 1, 65 "AEG ", "READER ", "V1.0" }, 66 #endif /* NBLL */ 67 #if NKIL > 0 68 { T_SCANNER, T_FIXED, 0, 69 "KODAK ", "IL Scanner 900 ", 0 }, 70 #endif /* NKIL */ 71 #endif 72 73 /* 74 * Declarations 75 */ 76 void scsi_probedev __P((struct scsibus_softc *, int, int)); 77 int scsi_probe_bus __P((int bus, int target, int lun)); 78 79 struct scsi_device probe_switch = { 80 NULL, 81 NULL, 82 NULL, 83 NULL, 84 }; 85 86 int scsibusmatch __P((struct device *, void *, void *)); 87 void scsibusattach __P((struct device *, struct device *, void *)); 88 89 struct cfdriver scsibuscd = { 90 NULL, "scsibus", scsibusmatch, scsibusattach, DV_DULL, 91 sizeof(struct scsibus_softc) 92 }; 93 94 int 95 scsibusmatch(parent, match, aux) 96 struct device *parent; 97 void *match, *aux; 98 { 99 100 return 1; 101 } 102 103 /* 104 * The routine called by the adapter boards to get all their 105 * devices configured in. 106 */ 107 void 108 scsibusattach(parent, self, aux) 109 struct device *parent, *self; 110 void *aux; 111 { 112 struct scsibus_softc *sb = (struct scsibus_softc *)self; 113 struct scsi_link *sc_link_proto = aux; 114 115 sc_link_proto->scsibus = sb->sc_dev.dv_unit; 116 sb->adapter_link = sc_link_proto; 117 printf("\n"); 118 119 #if defined(SCSI_DELAY) && SCSI_DELAY > 2 120 printf("%s: waiting for scsi devices to settle\n", 121 sb->sc_dev.dv_xname); 122 #else /* SCSI_DELAY > 2 */ 123 #undef SCSI_DELAY 124 #define SCSI_DELAY 2 125 #endif /* SCSI_DELAY */ 126 delay(1000000 * SCSI_DELAY); 127 128 scsi_probe_bus(sb->sc_dev.dv_unit, -1, -1); 129 } 130 131 int 132 scsibussubmatch(parent, match, aux) 133 struct device *parent; 134 void *match, *aux; 135 { 136 struct cfdata *cf = match; 137 struct scsibus_attach_args *sa = aux; 138 struct scsi_link *sc_link = sa->sa_sc_link; 139 140 if (cf->cf_loc[0] != -1 && cf->cf_loc[0] != sc_link->target) 141 return 0; 142 if (cf->cf_loc[1] != -1 && cf->cf_loc[1] != sc_link->lun) 143 return 0; 144 return ((*cf->cf_driver->cd_match)(parent, match, aux)); 145 } 146 147 /* 148 * Probe the requested scsi bus. It must be already set up. 149 * -1 requests all set up scsi busses. 150 * target and lun optionally narrow the search if not -1 151 */ 152 int 153 scsi_probe_busses(bus, target, lun) 154 int bus, target, lun; 155 { 156 157 if (bus == -1) { 158 for (bus = 0; bus < scsibuscd.cd_ndevs; bus++) 159 if (scsibuscd.cd_devs[bus]) 160 scsi_probe_bus(bus, target, lun); 161 return 0; 162 } else { 163 return scsi_probe_bus(bus, target, lun); 164 } 165 } 166 167 /* 168 * Probe the requested scsi bus. It must be already set up. 169 * target and lun optionally narrow the search if not -1 170 */ 171 int 172 scsi_probe_bus(bus, target, lun) 173 int bus, target, lun; 174 { 175 struct scsibus_softc *scsi; 176 int maxtarget, mintarget, maxlun, minlun; 177 u_int8_t scsi_addr; 178 179 if (bus < 0 || bus >= scsibuscd.cd_ndevs) 180 return ENXIO; 181 scsi = scsibuscd.cd_devs[bus]; 182 if (!scsi) 183 return ENXIO; 184 185 scsi_addr = scsi->adapter_link->adapter_target; 186 187 if (target == -1) { 188 maxtarget = 7; 189 mintarget = 0; 190 } else { 191 if (target < 0 || target > 7) 192 return EINVAL; 193 maxtarget = mintarget = target; 194 } 195 196 if (lun == -1) { 197 maxlun = 7; 198 minlun = 0; 199 } else { 200 if (lun < 0 || lun > 7) 201 return EINVAL; 202 maxlun = minlun = lun; 203 } 204 205 for (target = mintarget; target <= maxtarget; target++) { 206 if (target == scsi_addr) 207 continue; 208 for (lun = minlun; lun <= maxlun; lun++) { 209 /* 210 * See if there's a device present, and configure it. 211 */ 212 scsi_probedev(scsi, target, lun); 213 if ((scsi->moreluns & (1 << target)) == 0) 214 break; 215 /* otherwise something says we should look further */ 216 } 217 } 218 return 0; 219 } 220 221 void 222 scsi_strvis(dst, src, len) 223 u_char *dst, *src; 224 int len; 225 { 226 227 /* Trim leading and trailing blanks. */ 228 while (len > 0 && src[0] == ' ') 229 ++src, --len; 230 while (len > 0 && src[len-1] == ' ') 231 --len; 232 233 while (len > 0) { 234 if (*src < 0x20 || *src >= 0x80) { 235 /* non-printable characters */ 236 *dst++ = '\\'; 237 *dst++ = ((*src & 0300) >> 6) + '0'; 238 *dst++ = ((*src & 0070) >> 3) + '0'; 239 *dst++ = ((*src & 0007) >> 0) + '0'; 240 } else if (*src == '\\') { 241 /* quote characters */ 242 *dst++ = '\\'; 243 *dst++ = '\\'; 244 } else { 245 /* normal characters */ 246 *dst++ = *src; 247 } 248 ++src, --len; 249 } 250 251 *dst++ = 0; 252 } 253 254 struct scsi_quirk_inquiry_pattern { 255 struct scsi_inquiry_pattern pattern; 256 u_int8_t quirks; 257 }; 258 259 struct scsi_quirk_inquiry_pattern scsi_quirk_patterns[] = { 260 {T_CDROM, T_REMOV, 261 "CHINON ", "CD-ROM CDS-431 ", "H42", SDEV_NOLUNS}, 262 {T_CDROM, T_REMOV, 263 "CHINON ", "CD-ROM CDS-535 ", "Q14", SDEV_NOLUNS}, 264 {T_CDROM, T_REMOV, 265 "DENON ", "DRD-25X ", "V", SDEV_NOLUNS}, 266 {T_CDROM, T_REMOV, 267 "IMS ", "CDD521/10 ", "2.06", SDEV_NOLUNS}, 268 {T_CDROM, T_REMOV, 269 "NEC ", "CD-ROM DRIVE:55 ", "", SDEV_NOLUNS}, 270 {T_CDROM, T_REMOV, 271 "NEC ", "CD-ROM DRIVE:83 ", "", SDEV_NOLUNS}, 272 {T_CDROM, T_REMOV, 273 "NEC ", "CD-ROM DRIVE:841", "", SDEV_NOLUNS}, 274 {T_CDROM, T_REMOV, 275 "SONY ", "CD-ROM CDU-541 ", "", SDEV_NOLUNS}, 276 {T_CDROM, T_REMOV, 277 "SONY ", "CD-ROM CDU-55S ", "", SDEV_NOLUNS}, 278 {T_CDROM, T_REMOV, 279 "TEAC ", "CD-ROM ", "1.06", SDEV_NOLUNS}, 280 {T_CDROM, T_REMOV, 281 "TEXEL ", "CD-ROM ", "1.06", SDEV_NOLUNS}, 282 {T_CDROM, T_REMOV, 283 "MEDIAVIS", "CDR-H93MV ", "1.31", SDEV_NOLUNS}, 284 285 {T_DIRECT, T_FIXED, 286 "MAXTOR ", "XT-3280 ", "", SDEV_NOLUNS}, 287 {T_DIRECT, T_FIXED, 288 "MAXTOR ", "XT-4380S ", "", SDEV_NOLUNS}, 289 {T_DIRECT, T_FIXED, 290 "MAXTOR ", "MXT-1240S ", "", SDEV_NOLUNS}, 291 {T_DIRECT, T_FIXED, 292 "MAXTOR ", "XT-4170S ", "", SDEV_NOLUNS}, 293 {T_DIRECT, T_FIXED, 294 "MAXTOR ", "XT-8760S ", "", SDEV_NOLUNS}, 295 {T_DIRECT, T_FIXED, 296 "MAXTOR ", "LXT-213S SUN0207", "", SDEV_NOLUNS}, 297 {T_DIRECT, T_FIXED, 298 "RODIME ", "RO3000S ", "2.33", SDEV_NOLUNS}, 299 {T_DIRECT, T_FIXED, 300 "SEAGATE ", "ST157N ", "\004|j", SDEV_NOLUNS}, 301 {T_DIRECT, T_FIXED, 302 "SEAGATE ", "ST296 ", "921", SDEV_NOLUNS}, 303 {T_DIRECT, T_FIXED, 304 "QUANTUM ", "LPS525S ", "3110", SDEV_NOLUNS}, 305 {T_DIRECT, T_FIXED, 306 "QUANTUM ", "PD1225S ", "3110", SDEV_NOLUNS}, 307 308 {T_SEQUENTIAL, T_REMOV, 309 "EXABYTE ", "EXB-8200 ", "", SDEV_NOLUNS}, 310 {T_SEQUENTIAL, T_REMOV, 311 "SONY ", "SDT-2000 ", "2.09", SDEV_NOLUNS}, 312 {T_SEQUENTIAL, T_REMOV, 313 "TANDBERG", " TDC 3600 ", "", SDEV_NOLUNS}, 314 315 {T_SEQUENTIAL, T_REMOV, 316 "SONY ", "SDT-5000 ", "3.17", SDEV_NOSYNCWIDE}, 317 {T_SEQUENTIAL, T_REMOV, 318 "WangDAT ", "Model 1300 ", "02.4", SDEV_NOSYNCWIDE}, 319 {T_SEQUENTIAL, T_REMOV, 320 "WangDAT ", "Model 2600 ", "01.7", SDEV_NOSYNCWIDE}, 321 {T_SEQUENTIAL, T_REMOV, 322 "WangDAT ", "Model 3200 ", "02.2", SDEV_NOSYNCWIDE}, 323 }; 324 325 /* 326 * given a target and lu, ask the device what 327 * it is, and find the correct driver table 328 * entry. 329 */ 330 void 331 scsi_probedev(scsi, target, lun) 332 struct scsibus_softc *scsi; 333 int target, lun; 334 { 335 struct scsi_link *sc_link; 336 static struct scsi_inquiry_data inqbuf; 337 struct scsi_quirk_inquiry_pattern *finger; 338 int priority; 339 u_int8_t type; 340 boolean removable; 341 char *dtype, *qtype; 342 char vendor[33], product[65], revision[17]; 343 struct scsibus_attach_args sa; 344 struct cfdata *cf; 345 346 /* Skip this slot if it is already attached. */ 347 if (scsi->sc_link[target][lun]) 348 return; 349 350 sc_link = malloc(sizeof(*sc_link), M_DEVBUF, M_NOWAIT); 351 *sc_link = *scsi->adapter_link; 352 sc_link->target = target; 353 sc_link->lun = lun; 354 sc_link->device = &probe_switch; 355 356 /* 357 * Ask the device what it is 358 */ 359 #ifdef SCSIDEBUG 360 if (target == DEBUGTARGET && lun == DEBUGLUN) 361 sc_link->flags |= DEBUGLEVEL; 362 #endif /* SCSIDEBUG */ 363 364 (void) scsi_test_unit_ready(sc_link, 365 SCSI_AUTOCONF | SCSI_IGNORE_ILLEGAL_REQUEST | SCSI_IGNORE_NOT_READY | SCSI_IGNORE_MEDIA_CHANGE); 366 367 #ifdef SCSI_2_DEF 368 /* some devices need to be told to go to SCSI2 */ 369 /* However some just explode if you tell them this.. leave it out */ 370 scsi_change_def(sc_link, SCSI_AUTOCONF | SCSI_SILENT); 371 #endif /* SCSI_2_DEF */ 372 373 /* Now go ask the device all about itself. */ 374 bzero(&inqbuf, sizeof(inqbuf)); 375 if (scsi_inquire(sc_link, &inqbuf, SCSI_AUTOCONF) != 0) 376 goto bad; 377 378 { 379 int len = inqbuf.additional_length; 380 while (len < 3) 381 inqbuf.unused[len++] = '\0'; 382 while (len < 3 + 28) 383 inqbuf.unused[len++] = ' '; 384 } 385 386 finger = (struct scsi_quirk_inquiry_pattern *)scsi_inqmatch(&inqbuf, 387 (caddr_t)scsi_quirk_patterns, 388 sizeof(scsi_quirk_patterns)/sizeof(scsi_quirk_patterns[0]), 389 sizeof(scsi_quirk_patterns[0]), &priority); 390 if (priority != 0) 391 sc_link->quirks |= finger->quirks; 392 if ((inqbuf.version & SID_ANSII) == 0) 393 sc_link->quirks |= SDEV_NOLUNS; 394 395 if ((sc_link->quirks & SDEV_NOLUNS) == 0) 396 scsi->moreluns |= (1 << target); 397 398 /* 399 * note what BASIC type of device it is 400 */ 401 type = inqbuf.device & SID_TYPE; 402 removable = inqbuf.dev_qual2 & SID_REMOVABLE ? 1 : 0; 403 404 if (removable) 405 sc_link->flags |= SDEV_REMOVABLE; 406 407 /* 408 * Any device qualifier that has the top bit set (qualifier&4 != 0) 409 * is vendor specific and won't match in this switch. 410 */ 411 dtype = 0; 412 switch (inqbuf.device & SID_QUAL) { 413 case SID_QUAL_LU_OK: 414 qtype = ""; 415 break; 416 417 case SID_QUAL_LU_OFFLINE: 418 qtype = " offline"; 419 break; 420 421 case SID_QUAL_RSVD: 422 case SID_QUAL_BAD_LU: 423 goto bad; 424 425 default: 426 qtype = ""; 427 dtype = "vendor-unique"; 428 break; 429 } 430 if (dtype == 0) { 431 switch (type) { 432 case T_DIRECT: 433 dtype = "direct"; 434 break; 435 case T_SEQUENTIAL: 436 dtype = "sequential"; 437 break; 438 case T_PRINTER: 439 dtype = "printer"; 440 break; 441 case T_PROCESSOR: 442 dtype = "processor"; 443 break; 444 case T_CDROM: 445 dtype = "cdrom"; 446 break; 447 case T_WORM: 448 dtype = "worm"; 449 break; 450 case T_SCANNER: 451 dtype = "scanner"; 452 break; 453 case T_OPTICAL: 454 dtype = "optical"; 455 break; 456 case T_CHANGER: 457 dtype = "changer"; 458 break; 459 case T_COMM: 460 dtype = "communication"; 461 break; 462 case T_NODEVICE: 463 goto bad; 464 default: 465 dtype = "unknown"; 466 break; 467 } 468 } 469 470 scsi_strvis(vendor, inqbuf.vendor, 8); 471 scsi_strvis(product, inqbuf.product, 16); 472 scsi_strvis(revision, inqbuf.revision, 4); 473 474 printf("%s targ %d lun %d: <%s, %s, %s> SCSI%d %d/%s %s%s\n", 475 ((struct device *)sc_link->adapter_softc)->dv_xname, 476 target, lun, vendor, product, revision, 477 inqbuf.version & SID_ANSII, type, dtype, 478 removable ? "removable" : "fixed", qtype); 479 480 sa.sa_sc_link = sc_link; 481 sa.sa_inqbuf = &inqbuf; 482 483 if ((cf = config_search(scsibussubmatch, (struct device *)scsi, &sa)) != 0) { 484 config_attach((struct device *)scsi, cf, &sa, NULL); 485 scsi->sc_link[target][lun] = sc_link; 486 } else 487 goto bad; 488 489 return; 490 491 bad: 492 free(sc_link, M_DEVBUF); 493 return; 494 } 495 496 /* 497 * Return a priority based on how much of the inquiry data matches 498 * the patterns for the particular driver. 499 */ 500 caddr_t 501 scsi_inqmatch(inqbuf, base, nmatches, matchsize, bestpriority) 502 struct scsi_inquiry_data *inqbuf; 503 caddr_t base; 504 int nmatches, matchsize; 505 int *bestpriority; 506 { 507 u_int8_t type; 508 boolean removable; 509 caddr_t bestmatch; 510 511 /* Include the qualifier to catch vendor-unique types. */ 512 type = inqbuf->device; 513 removable = inqbuf->dev_qual2 & SID_REMOVABLE ? T_REMOV : T_FIXED; 514 515 for (*bestpriority = 0, bestmatch = 0; nmatches--; base += matchsize) { 516 struct scsi_inquiry_pattern *match = (void *)base; 517 int priority, len; 518 519 if (type != match->type) 520 continue; 521 if (removable != match->removable) 522 continue; 523 priority = 2; 524 len = strlen(match->vendor); 525 if (bcmp(inqbuf->vendor, match->vendor, len)) 526 continue; 527 priority += len; 528 len = strlen(match->product); 529 if (bcmp(inqbuf->product, match->product, len)) 530 continue; 531 priority += len; 532 len = strlen(match->revision); 533 if (bcmp(inqbuf->revision, match->revision, len)) 534 continue; 535 priority += len; 536 537 #if 0 538 printf("scsi_inqmatch: %d/%d/%d <%s, %s, %s>\n", 539 priority, match->type, match->removable, 540 match->vendor, match->product, match->revision); 541 #endif 542 if (priority > *bestpriority) { 543 *bestpriority = priority; 544 bestmatch = base; 545 } 546 } 547 548 return (bestmatch); 549 } 550