sys/cam/scsi/scsi_xpt.c

   1 /*-
   2  * Implementation of the SCSI Transport
   3  *
   4  * Copyright (c) 1997, 1998, 1999 Justin T. Gibbs.
   5  * Copyright (c) 1997, 1998, 1999 Kenneth D. Merry.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions, and the following disclaimer,
  13  *    without modification, immediately at the beginning of the file.
  14  * 2. The name of the author may not be used to endorse or promote products
  15  *    derived from this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
  21  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  */
  29
  30 #include <sys/cdefs.h>
  31 __FBSDID("$FreeBSD$");
  32
  33 #include <sys/param.h>
  34 #include <sys/bus.h>
  35 #include <sys/systm.h>
  36 #include <sys/types.h>
  37 #include <sys/malloc.h>
  38 #include <sys/kernel.h>
  39 #include <sys/time.h>
  40 #include <sys/conf.h>
  41 #include <sys/fcntl.h>
  42 #include <sys/md5.h>
  43 #include <sys/interrupt.h>
  44 #include <sys/sbuf.h>
  45
  46 #include <sys/lock.h>
  47 #include <sys/mutex.h>
  48 #include <sys/sysctl.h>
  49
  50 #include <cam/cam.h>
  51 #include <cam/cam_ccb.h>
  52 #include <cam/cam_queue.h>
  53 #include <cam/cam_periph.h>
  54 #include <cam/cam_sim.h>
  55 #include <cam/cam_xpt.h>
  56 #include <cam/cam_xpt_sim.h>
  57 #include <cam/cam_xpt_periph.h>
  58 #include <cam/cam_xpt_internal.h>
  59 #include <cam/cam_debug.h>
  60
  61 #include <cam/scsi/scsi_all.h>
  62 #include <cam/scsi/scsi_message.h>
  63 #include <cam/scsi/scsi_pass.h>
  64 #include <machine/stdarg.h>     /* for xpt_print below */
  65 #include "opt_cam.h"
  66
  67 struct scsi_quirk_entry {
  68         struct scsi_inquiry_pattern inq_pat;
  69         u_int8_t quirks;
  70 #define CAM_QUIRK_NOLUNS        0x01
  71 #define CAM_QUIRK_NOVPDS        0x02
  72 #define CAM_QUIRK_HILUNS        0x04
  73 #define CAM_QUIRK_NOHILUNS      0x08
  74 #define CAM_QUIRK_NORPTLUNS     0x10
  75         u_int mintags;
  76         u_int maxtags;
  77 };
  78 #define SCSI_QUIRK(dev) ((struct scsi_quirk_entry *)((dev)->quirk))
  79
  80 static int cam_srch_hi = 0;
  81 TUNABLE_INT("kern.cam.cam_srch_hi", &cam_srch_hi);
  82 static int sysctl_cam_search_luns(SYSCTL_HANDLER_ARGS);
  83 SYSCTL_PROC(_kern_cam, OID_AUTO, cam_srch_hi, CTLTYPE_INT|CTLFLAG_RW, 0, 0,
  84     sysctl_cam_search_luns, "I",
  85     "allow search above LUN 7 for SCSI3 and greater devices");
  86
  87 #define CAM_SCSI2_MAXLUN        8
  88 #define CAM_CAN_GET_SIMPLE_LUN(x, i)                            \
  89         ((((x)->luns[i].lundata[0] & RPL_LUNDATA_ATYP_MASK) ==  \
  90         RPL_LUNDATA_ATYP_PERIPH) ||                             \
  91         (((x)->luns[i].lundata[0] & RPL_LUNDATA_ATYP_MASK) ==   \
  92         RPL_LUNDATA_ATYP_FLAT))
  93 #define CAM_GET_SIMPLE_LUN(lp, i, lval)                                 \
  94         if (((lp)->luns[(i)].lundata[0] & RPL_LUNDATA_ATYP_MASK) ==     \
  95             RPL_LUNDATA_ATYP_PERIPH) {                                  \
  96                 (lval) = (lp)->luns[(i)].lundata[1];                    \
  97         } else {                                                        \
  98                 (lval) = (lp)->luns[(i)].lundata[0];                    \
  99                 (lval) &= RPL_LUNDATA_FLAT_LUN_MASK;                    \
 100                 (lval) <<= 8;                                           \
 101                 (lval) |=  (lp)->luns[(i)].lundata[1];                  \
 102         }
 103 #define CAM_GET_LUN(lp, i, lval)                                        \
 104         (lval) = scsi_4btoul((lp)->luns[(i)].lundata);                  \
 105         (lval) = ((lval) >> 16) | ((lval) << 16);
 106 #define CAM_LUN_ONLY_32BITS(lp, i)                              \
 107         (scsi_4btoul(&((lp)->luns[(i)].lundata[4])) == 0)
 108
 109 /*
 110  * If we're not quirked to search <= the first 8 luns
 111  * and we are either quirked to search above lun 8,
 112  * or we're > SCSI-2 and we've enabled hilun searching,
 113  * or we're > SCSI-2 and the last lun was a success,
 114  * we can look for luns above lun 8.
 115  */
 116 #define CAN_SRCH_HI_SPARSE(dv)                                  \
 117   (((SCSI_QUIRK(dv)->quirks & CAM_QUIRK_NOHILUNS) == 0)         \
 118   && ((SCSI_QUIRK(dv)->quirks & CAM_QUIRK_HILUNS)               \
 119   || (SID_ANSI_REV(&dv->inq_data) > SCSI_REV_2 && cam_srch_hi)))
 120
 121 #define CAN_SRCH_HI_DENSE(dv)                                   \
 122   (((SCSI_QUIRK(dv)->quirks & CAM_QUIRK_NOHILUNS) == 0)         \
 123   && ((SCSI_QUIRK(dv)->quirks & CAM_QUIRK_HILUNS)               \
 124   || (SID_ANSI_REV(&dv->inq_data) > SCSI_REV_2)))
 125
 126 static periph_init_t probe_periph_init;
 127
 128 static struct periph_driver probe_driver =
 129 {
 130         probe_periph_init, "probe",
 131         TAILQ_HEAD_INITIALIZER(probe_driver.units), /* generation */ 0,
 132         CAM_PERIPH_DRV_EARLY
 133 };
 134
 135 PERIPHDRIVER_DECLARE(probe, probe_driver);
 136
 137 typedef enum {
 138         PROBE_TUR,
 139         PROBE_INQUIRY,  /* this counts as DV0 for Basic Domain Validation */
 140         PROBE_FULL_INQUIRY,
 141         PROBE_REPORT_LUNS,
 142         PROBE_MODE_SENSE,
 143         PROBE_SUPPORTED_VPD_LIST,
 144         PROBE_DEVICE_ID,
 145         PROBE_EXTENDED_INQUIRY,
 146         PROBE_SERIAL_NUM,
 147         PROBE_TUR_FOR_NEGOTIATION,
 148         PROBE_INQUIRY_BASIC_DV1,
 149         PROBE_INQUIRY_BASIC_DV2,
 150         PROBE_DV_EXIT,
 151         PROBE_DONE,
 152         PROBE_INVALID
 153 } probe_action;
 154
 155 static char *probe_action_text[] = {
 156         "PROBE_TUR",
 157         "PROBE_INQUIRY",
 158         "PROBE_FULL_INQUIRY",
 159         "PROBE_REPORT_LUNS",
 160         "PROBE_MODE_SENSE",
 161         "PROBE_SUPPORTED_VPD_LIST",
 162         "PROBE_DEVICE_ID",
 163         "PROBE_EXTENDED_INQUIRY",
 164         "PROBE_SERIAL_NUM",
 165         "PROBE_TUR_FOR_NEGOTIATION",
 166         "PROBE_INQUIRY_BASIC_DV1",
 167         "PROBE_INQUIRY_BASIC_DV2",
 168         "PROBE_DV_EXIT",
 169         "PROBE_DONE",
 170         "PROBE_INVALID"
 171 };
 172
 173 #define PROBE_SET_ACTION(softc, newaction)      \
 174 do {                                                                    \
 175         char **text;                                                    \
 176         text = probe_action_text;                                       \
 177         CAM_DEBUG((softc)->periph->path, CAM_DEBUG_PROBE,               \
 178             ("Probe %s to %s\n", text[(softc)->action],                 \
 179             text[(newaction)]));                                        \
 180         (softc)->action = (newaction);                                  \
 181 } while(0)
 182
 183 typedef enum {
 184         PROBE_INQUIRY_CKSUM     = 0x01,
 185         PROBE_SERIAL_CKSUM      = 0x02,
 186         PROBE_NO_ANNOUNCE       = 0x04,
 187         PROBE_EXTLUN            = 0x08
 188 } probe_flags;
 189
 190 typedef struct {
 191         TAILQ_HEAD(, ccb_hdr) request_ccbs;
 192         probe_action    action;
 193         union ccb       saved_ccb;
 194         probe_flags     flags;
 195         MD5_CTX         context;
 196         u_int8_t        digest[16];
 197         struct cam_periph *periph;
 198 } probe_softc;
 199
 200 static const char quantum[] = "QUANTUM";
 201 static const char sony[] = "SONY";
 202 static const char west_digital[] = "WDIGTL";
 203 static const char samsung[] = "SAMSUNG";
 204 static const char seagate[] = "SEAGATE";
 205 static const char microp[] = "MICROP";
 206
 207 static struct scsi_quirk_entry scsi_quirk_table[] =
 208 {
 209         {
 210                 /* Reports QUEUE FULL for temporary resource shortages */
 211                 { T_DIRECT, SIP_MEDIA_FIXED, quantum, "XP39100*", "*" },
 212                 /*quirks*/0, /*mintags*/24, /*maxtags*/32
 213         },
 214         {
 215                 /* Reports QUEUE FULL for temporary resource shortages */
 216                 { T_DIRECT, SIP_MEDIA_FIXED, quantum, "XP34550*", "*" },
 217                 /*quirks*/0, /*mintags*/24, /*maxtags*/32
 218         },
 219         {
 220                 /* Reports QUEUE FULL for temporary resource shortages */
 221                 { T_DIRECT, SIP_MEDIA_FIXED, quantum, "XP32275*", "*" },
 222                 /*quirks*/0, /*mintags*/24, /*maxtags*/32
 223         },
 224         {
 225                 /* Broken tagged queuing drive */
 226                 { T_DIRECT, SIP_MEDIA_FIXED, microp, "4421-07*", "*" },
 227                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 228         },
 229         {
 230                 /* Broken tagged queuing drive */
 231                 { T_DIRECT, SIP_MEDIA_FIXED, "HP", "C372*", "*" },
 232                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 233         },
 234         {
 235                 /* Broken tagged queuing drive */
 236                 { T_DIRECT, SIP_MEDIA_FIXED, microp, "3391*", "x43h" },
 237                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 238         },
 239         {
 240                 /*
 241                  * Unfortunately, the Quantum Atlas III has the same
 242                  * problem as the Atlas II drives above.
 243                  * Reported by: "Johan Granlund" <johan@granlund.nu>
 244                  *
 245                  * For future reference, the drive with the problem was:
 246                  * QUANTUM QM39100TD-SW N1B0
 247                  *
 248                  * It's possible that Quantum will fix the problem in later
 249                  * firmware revisions.  If that happens, the quirk entry
 250                  * will need to be made specific to the firmware revisions
 251                  * with the problem.
 252                  *
 253                  */
 254                 /* Reports QUEUE FULL for temporary resource shortages */
 255                 { T_DIRECT, SIP_MEDIA_FIXED, quantum, "QM39100*", "*" },
 256                 /*quirks*/0, /*mintags*/24, /*maxtags*/32
 257         },
 258         {
 259                 /*
 260                  * 18 Gig Atlas III, same problem as the 9G version.
 261                  * Reported by: Andre Albsmeier
 262                  *              <andre.albsmeier@mchp.siemens.de>
 263                  *
 264                  * For future reference, the drive with the problem was:
 265                  * QUANTUM QM318000TD-S N491
 266                  */
 267                 /* Reports QUEUE FULL for temporary resource shortages */
 268                 { T_DIRECT, SIP_MEDIA_FIXED, quantum, "QM318000*", "*" },
 269                 /*quirks*/0, /*mintags*/24, /*maxtags*/32
 270         },
 271         {
 272                 /*
 273                  * Broken tagged queuing drive
 274                  * Reported by: Bret Ford <bford@uop.cs.uop.edu>
 275                  *         and: Martin Renters <martin@tdc.on.ca>
 276                  */
 277                 { T_DIRECT, SIP_MEDIA_FIXED, seagate, "ST410800*", "71*" },
 278                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 279         },
 280                 /*
 281                  * The Seagate Medalist Pro drives have very poor write
 282                  * performance with anything more than 2 tags.
 283                  *
 284                  * Reported by:  Paul van der Zwan <paulz@trantor.xs4all.nl>
 285                  * Drive:  <SEAGATE ST36530N 1444>
 286                  *
 287                  * Reported by:  Jeremy Lea <reg@shale.csir.co.za>
 288                  * Drive:  <SEAGATE ST34520W 1281>
 289                  *
 290                  * No one has actually reported that the 9G version
 291                  * (ST39140*) of the Medalist Pro has the same problem, but
 292                  * we're assuming that it does because the 4G and 6.5G
 293                  * versions of the drive are broken.
 294                  */
 295         {
 296                 { T_DIRECT, SIP_MEDIA_FIXED, seagate, "ST34520*", "*"},
 297                 /*quirks*/0, /*mintags*/2, /*maxtags*/2
 298         },
 299         {
 300                 { T_DIRECT, SIP_MEDIA_FIXED, seagate, "ST36530*", "*"},
 301                 /*quirks*/0, /*mintags*/2, /*maxtags*/2
 302         },
 303         {
 304                 { T_DIRECT, SIP_MEDIA_FIXED, seagate, "ST39140*", "*"},
 305                 /*quirks*/0, /*mintags*/2, /*maxtags*/2
 306         },
 307         {
 308                 /*
 309                  * Experiences command timeouts under load with a
 310                  * tag count higher than 55.
 311                  */
 312                 { T_DIRECT, SIP_MEDIA_FIXED, seagate, "ST3146855LW", "*"},
 313                 /*quirks*/0, /*mintags*/2, /*maxtags*/55
 314         },
 315         {
 316                 /*
 317                  * Slow when tagged queueing is enabled.  Write performance
 318                  * steadily drops off with more and more concurrent
 319                  * transactions.  Best sequential write performance with
 320                  * tagged queueing turned off and write caching turned on.
 321                  *
 322                  * PR:  kern/10398
 323                  * Submitted by:  Hideaki Okada <hokada@isl.melco.co.jp>
 324                  * Drive:  DCAS-34330 w/ "S65A" firmware.
 325                  *
 326                  * The drive with the problem had the "S65A" firmware
 327                  * revision, and has also been reported (by Stephen J.
 328                  * Roznowski <sjr@home.net>) for a drive with the "S61A"
 329                  * firmware revision.
 330                  *
 331                  * Although no one has reported problems with the 2 gig
 332                  * version of the DCAS drive, the assumption is that it
 333                  * has the same problems as the 4 gig version.  Therefore
 334                  * this quirk entries disables tagged queueing for all
 335                  * DCAS drives.
 336                  */
 337                 { T_DIRECT, SIP_MEDIA_FIXED, "IBM", "DCAS*", "*" },
 338                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 339         },
 340         {
 341                 /* Broken tagged queuing drive */
 342                 { T_DIRECT, SIP_MEDIA_REMOVABLE, "iomega", "jaz*", "*" },
 343                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 344         },
 345         {
 346                 /* Broken tagged queuing drive */
 347                 { T_DIRECT, SIP_MEDIA_FIXED, "CONNER", "CFP2107*", "*" },
 348                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 349         },
 350         {
 351                 /* This does not support other than LUN 0 */
 352                 { T_DIRECT, SIP_MEDIA_FIXED, "VMware*", "*", "*" },
 353                 CAM_QUIRK_NOLUNS, /*mintags*/2, /*maxtags*/255
 354         },
 355         {
 356                 /*
 357                  * Broken tagged queuing drive.
 358                  * Submitted by:
 359                  * NAKAJI Hiroyuki <nakaji@zeisei.dpri.kyoto-u.ac.jp>
 360                  * in PR kern/9535
 361                  */
 362                 { T_DIRECT, SIP_MEDIA_FIXED, samsung, "WN34324U*", "*" },
 363                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 364         },
 365         {
 366                 /*
 367                  * Slow when tagged queueing is enabled. (1.5MB/sec versus
 368                  * 8MB/sec.)
 369                  * Submitted by: Andrew Gallatin <gallatin@cs.duke.edu>
 370                  * Best performance with these drives is achieved with
 371                  * tagged queueing turned off, and write caching turned on.
 372                  */
 373                 { T_DIRECT, SIP_MEDIA_FIXED, west_digital, "WDE*", "*" },
 374                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 375         },
 376         {
 377                 /*
 378                  * Slow when tagged queueing is enabled. (1.5MB/sec versus
 379                  * 8MB/sec.)
 380                  * Submitted by: Andrew Gallatin <gallatin@cs.duke.edu>
 381                  * Best performance with these drives is achieved with
 382                  * tagged queueing turned off, and write caching turned on.
 383                  */
 384                 { T_DIRECT, SIP_MEDIA_FIXED, west_digital, "ENTERPRISE", "*" },
 385                 /*quirks*/0, /*mintags*/0, /*maxtags*/0
 386         },
 387         {
 388                 /*
 389                  * Doesn't handle queue full condition correctly,
 390                  * so we need to limit maxtags to what the device
 391                  * can handle instead of determining this automatically.
 392                  */
 393                 { T_DIRECT, SIP_MEDIA_FIXED, samsung, "WN321010S*", "*" },
 394                 /*quirks*/0, /*mintags*/2, /*maxtags*/32
 395         },
 396         {
 397                 /* Really only one LUN */
 398                 { T_ENCLOSURE, SIP_MEDIA_FIXED, "SUN", "SENA", "*" },
 399                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 400         },
 401         {
 402                 /* I can't believe we need a quirk for DPT volumes. */
 403                 { T_ANY, SIP_MEDIA_FIXED|SIP_MEDIA_REMOVABLE, "DPT", "*", "*" },
 404                 CAM_QUIRK_NOLUNS,
 405                 /*mintags*/0, /*maxtags*/255
 406         },
 407         {
 408                 /*
 409                  * Many Sony CDROM drives don't like multi-LUN probing.
 410                  */
 411                 { T_CDROM, SIP_MEDIA_REMOVABLE, sony, "CD-ROM CDU*", "*" },
 412                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 413         },
 414         {
 415                 /*
 416                  * This drive doesn't like multiple LUN probing.
 417                  * Submitted by:  Parag Patel <parag@cgt.com>
 418                  */
 419                 { T_WORM, SIP_MEDIA_REMOVABLE, sony, "CD-R   CDU9*", "*" },
 420                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 421         },
 422         {
 423                 { T_WORM, SIP_MEDIA_REMOVABLE, "YAMAHA", "CDR100*", "*" },
 424                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 425         },
 426         {
 427                 /*
 428                  * The 8200 doesn't like multi-lun probing, and probably
 429                  * don't like serial number requests either.
 430                  */
 431                 {
 432                         T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "EXABYTE",
 433                         "EXB-8200*", "*"
 434                 },
 435                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 436         },
 437         {
 438                 /*
 439                  * Let's try the same as above, but for a drive that says
 440                  * it's an IPL-6860 but is actually an EXB 8200.
 441                  */
 442                 {
 443                         T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "EXABYTE",
 444                         "IPL-6860*", "*"
 445                 },
 446                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 447         },
 448         {
 449                 /*
 450                  * These Hitachi drives don't like multi-lun probing.
 451                  * The PR submitter has a DK319H, but says that the Linux
 452                  * kernel has a similar work-around for the DK312 and DK314,
 453                  * so all DK31* drives are quirked here.
 454                  * PR:            misc/18793
 455                  * Submitted by:  Paul Haddad <paul@pth.com>
 456                  */
 457                 { T_DIRECT, SIP_MEDIA_FIXED, "HITACHI", "DK31*", "*" },
 458                 CAM_QUIRK_NOLUNS, /*mintags*/2, /*maxtags*/255
 459         },
 460         {
 461                 /*
 462                  * The Hitachi CJ series with J8A8 firmware apparantly has
 463                  * problems with tagged commands.
 464                  * PR: 23536
 465                  * Reported by: amagai@nue.org
 466                  */
 467                 { T_DIRECT, SIP_MEDIA_FIXED, "HITACHI", "DK32CJ*", "J8A8" },
 468                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 469         },
 470         {
 471                 /*
 472                  * These are the large storage arrays.
 473                  * Submitted by:  William Carrel <william.carrel@infospace.com>
 474                  */
 475                 { T_DIRECT, SIP_MEDIA_FIXED, "HITACHI", "OPEN*", "*" },
 476                 CAM_QUIRK_HILUNS, 2, 1024
 477         },
 478         {
 479                 /*
 480                  * This old revision of the TDC3600 is also SCSI-1, and
 481                  * hangs upon serial number probing.
 482                  */
 483                 {
 484                         T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "TANDBERG",
 485                         " TDC 3600", "U07:"
 486                 },
 487                 CAM_QUIRK_NOVPDS, /*mintags*/0, /*maxtags*/0
 488         },
 489         {
 490                 /*
 491                  * Would repond to all LUNs if asked for.
 492                  */
 493                 {
 494                         T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "CALIPER",
 495                         "CP150", "*"
 496                 },
 497                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 498         },
 499         {
 500                 /*
 501                  * Would repond to all LUNs if asked for.
 502                  */
 503                 {
 504                         T_SEQUENTIAL, SIP_MEDIA_REMOVABLE, "KENNEDY",
 505                         "96X2*", "*"
 506                 },
 507                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 508         },
 509         {
 510                 /* Submitted by: Matthew Dodd <winter@jurai.net> */
 511                 { T_PROCESSOR, SIP_MEDIA_FIXED, "Cabletrn", "EA41*", "*" },
 512                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 513         },
 514         {
 515                 /* Submitted by: Matthew Dodd <winter@jurai.net> */
 516                 { T_PROCESSOR, SIP_MEDIA_FIXED, "CABLETRN", "EA41*", "*" },
 517                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 518         },
 519         {
 520                 /* TeraSolutions special settings for TRC-22 RAID */
 521                 { T_DIRECT, SIP_MEDIA_FIXED, "TERASOLU", "TRC-22", "*" },
 522                   /*quirks*/0, /*mintags*/55, /*maxtags*/255
 523         },
 524         {
 525                 /* Veritas Storage Appliance */
 526                 { T_DIRECT, SIP_MEDIA_FIXED, "VERITAS", "*", "*" },
 527                   CAM_QUIRK_HILUNS, /*mintags*/2, /*maxtags*/1024
 528         },
 529         {
 530                 /*
 531                  * Would respond to all LUNs.  Device type and removable
 532                  * flag are jumper-selectable.
 533                  */
 534                 { T_ANY, SIP_MEDIA_REMOVABLE|SIP_MEDIA_FIXED, "MaxOptix",
 535                   "Tahiti 1", "*"
 536                 },
 537                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 538         },
 539         {
 540                 /* EasyRAID E5A aka. areca ARC-6010 */
 541                 { T_DIRECT, SIP_MEDIA_FIXED, "easyRAID", "*", "*" },
 542                   CAM_QUIRK_NOHILUNS, /*mintags*/2, /*maxtags*/255
 543         },
 544         {
 545                 { T_ENCLOSURE, SIP_MEDIA_FIXED, "DP", "BACKPLANE", "*" },
 546                 CAM_QUIRK_NOLUNS, /*mintags*/0, /*maxtags*/0
 547         },
 548         {
 549                 { T_DIRECT, SIP_MEDIA_REMOVABLE, "Garmin", "*", "*" },
 550                 CAM_QUIRK_NORPTLUNS, /*mintags*/2, /*maxtags*/255
 551         },
 552         {
 553                 /* Default tagged queuing parameters for all devices */
 554                 {
 555                   T_ANY, SIP_MEDIA_REMOVABLE|SIP_MEDIA_FIXED,
 556                   /*vendor*/"*", /*product*/"*", /*revision*/"*"
 557                 },
 558                 /*quirks*/0, /*mintags*/2, /*maxtags*/255
 559         },
 560 };
 561
 562 static const int scsi_quirk_table_size =
 563         sizeof(scsi_quirk_table) / sizeof(*scsi_quirk_table);
 564
 565 static cam_status       proberegister(struct cam_periph *periph,
 566                                       void *arg);
 567 static void      probeschedule(struct cam_periph *probe_periph);
 568 static void      probestart(struct cam_periph *periph, union ccb *start_ccb);
 569 static void      proberequestdefaultnegotiation(struct cam_periph *periph);
 570 static int       proberequestbackoff(struct cam_periph *periph,
 571                                      struct cam_ed *device);
 572 static void      probedone(struct cam_periph *periph, union ccb *done_ccb);
 573 static void      probe_purge_old(struct cam_path *path,
 574                                  struct scsi_report_luns_data *new,
 575                                  probe_flags flags);
 576 static void      probecleanup(struct cam_periph *periph);
 577 static void      scsi_find_quirk(struct cam_ed *device);
 578 static void      scsi_scan_bus(struct cam_periph *periph, union ccb *ccb);
 579 static void      scsi_scan_lun(struct cam_periph *periph,
 580                                struct cam_path *path, cam_flags flags,
 581                                union ccb *ccb);
 582 static void      xptscandone(struct cam_periph *periph, union ccb *done_ccb);
 583 static struct cam_ed *
 584                  scsi_alloc_device(struct cam_eb *bus, struct cam_et *target,
 585                                    lun_id_t lun_id);
 586 static void      scsi_devise_transport(struct cam_path *path);
 587 static void      scsi_set_transfer_settings(struct ccb_trans_settings *cts,
 588                                             struct cam_path *path,
 589                                             int async_update);
 590 static void      scsi_toggle_tags(struct cam_path *path);
 591 static void      scsi_dev_async(u_int32_t async_code,
 592                                 struct cam_eb *bus,
 593                                 struct cam_et *target,
 594                                 struct cam_ed *device,
 595                                 void *async_arg);
 596 static void      scsi_action(union ccb *start_ccb);
 597 static void      scsi_announce_periph(struct cam_periph *periph);
 598
 599 static struct xpt_xport scsi_xport = {
 600         .alloc_device = scsi_alloc_device,
 601         .action = scsi_action,
 602         .async = scsi_dev_async,
 603         .announce = scsi_announce_periph,
 604 };
 605
 606 struct xpt_xport *
 607 scsi_get_xport(void)
 608 {
 609         return (&scsi_xport);
 610 }
 611
 612 static void
 613 probe_periph_init()
 614 {
 615 }
 616
 617 static cam_status
 618 proberegister(struct cam_periph *periph, void *arg)
 619 {
 620         union ccb *request_ccb; /* CCB representing the probe request */
 621         cam_status status;
 622         probe_softc *softc;
 623
 624         request_ccb = (union ccb *)arg;
 625         if (request_ccb == NULL) {
 626                 printf("proberegister: no probe CCB, "
 627                        "can't register device\n");
 628                 return(CAM_REQ_CMP_ERR);
 629         }
 630
 631         softc = (probe_softc *)malloc(sizeof(*softc), M_CAMXPT, M_NOWAIT);
 632
 633         if (softc == NULL) {
 634                 printf("proberegister: Unable to probe new device. "
 635                        "Unable to allocate softc\n");
 636                 return(CAM_REQ_CMP_ERR);
 637         }
 638         TAILQ_INIT(&softc->request_ccbs);
 639         TAILQ_INSERT_TAIL(&softc->request_ccbs, &request_ccb->ccb_h,
 640                           periph_links.tqe);
 641         softc->flags = 0;
 642         periph->softc = softc;
 643         softc->periph = periph;
 644         softc->action = PROBE_INVALID;
 645         status = cam_periph_acquire(periph);
 646         if (status != CAM_REQ_CMP) {
 647                 return (status);
 648         }
 649         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE, ("Probe started\n"));
 650         scsi_devise_transport(periph->path);
 651
 652         /*
 653          * Ensure we've waited at least a bus settle
 654          * delay before attempting to probe the device.
 655          * For HBAs that don't do bus resets, this won't make a difference.
 656          */
 657         cam_periph_freeze_after_event(periph, &periph->path->bus->last_reset,
 658                                       scsi_delay);
 659         probeschedule(periph);
 660         return(CAM_REQ_CMP);
 661 }
 662
 663 static void
 664 probeschedule(struct cam_periph *periph)
 665 {
 666         struct ccb_pathinq cpi;
 667         union ccb *ccb;
 668         probe_softc *softc;
 669
 670         softc = (probe_softc *)periph->softc;
 671         ccb = (union ccb *)TAILQ_FIRST(&softc->request_ccbs);
 672
 673         xpt_setup_ccb(&cpi.ccb_h, periph->path, CAM_PRIORITY_NONE);
 674         cpi.ccb_h.func_code = XPT_PATH_INQ;
 675         xpt_action((union ccb *)&cpi);
 676
 677         /*
 678          * If a device has gone away and another device, or the same one,
 679          * is back in the same place, it should have a unit attention
 680          * condition pending.  It will not report the unit attention in
 681          * response to an inquiry, which may leave invalid transfer
 682          * negotiations in effect.  The TUR will reveal the unit attention
 683          * condition.  Only send the TUR for lun 0, since some devices
 684          * will get confused by commands other than inquiry to non-existent
 685          * luns.  If you think a device has gone away start your scan from
 686          * lun 0.  This will insure that any bogus transfer settings are
 687          * invalidated.
 688          *
 689          * If we haven't seen the device before and the controller supports
 690          * some kind of transfer negotiation, negotiate with the first
 691          * sent command if no bus reset was performed at startup.  This
 692          * ensures that the device is not confused by transfer negotiation
 693          * settings left over by loader or BIOS action.
 694          */
 695         if (((ccb->ccb_h.path->device->flags & CAM_DEV_UNCONFIGURED) == 0)
 696          && (ccb->ccb_h.target_lun == 0)) {
 697                 PROBE_SET_ACTION(softc, PROBE_TUR);
 698         } else if ((cpi.hba_inquiry & (PI_WIDE_32|PI_WIDE_16|PI_SDTR_ABLE)) != 0
 699               && (cpi.hba_misc & PIM_NOBUSRESET) != 0) {
 700                 proberequestdefaultnegotiation(periph);
 701                 PROBE_SET_ACTION(softc, PROBE_INQUIRY);
 702         } else {
 703                 PROBE_SET_ACTION(softc, PROBE_INQUIRY);
 704         }
 705
 706         if (ccb->crcn.flags & CAM_EXPECT_INQ_CHANGE)
 707                 softc->flags |= PROBE_NO_ANNOUNCE;
 708         else
 709                 softc->flags &= ~PROBE_NO_ANNOUNCE;
 710
 711         if (cpi.hba_misc & PIM_EXTLUNS)
 712                 softc->flags |= PROBE_EXTLUN;
 713         else
 714                 softc->flags &= ~PROBE_EXTLUN;
 715
 716         xpt_schedule(periph, CAM_PRIORITY_XPT);
 717 }
 718
 719 static void
 720 probestart(struct cam_periph *periph, union ccb *start_ccb)
 721 {
 722         /* Probe the device that our peripheral driver points to */
 723         struct ccb_scsiio *csio;
 724         probe_softc *softc;
 725
 726         CAM_DEBUG(start_ccb->ccb_h.path, CAM_DEBUG_TRACE, ("probestart\n"));
 727
 728         softc = (probe_softc *)periph->softc;
 729         csio = &start_ccb->csio;
 730 again:
 731
 732         switch (softc->action) {
 733         case PROBE_TUR:
 734         case PROBE_TUR_FOR_NEGOTIATION:
 735         case PROBE_DV_EXIT:
 736         {
 737                 scsi_test_unit_ready(csio,
 738                                      /*retries*/4,
 739                                      probedone,
 740                                      MSG_SIMPLE_Q_TAG,
 741                                      SSD_FULL_SIZE,
 742                                      /*timeout*/60000);
 743                 break;
 744         }
 745         case PROBE_INQUIRY:
 746         case PROBE_FULL_INQUIRY:
 747         case PROBE_INQUIRY_BASIC_DV1:
 748         case PROBE_INQUIRY_BASIC_DV2:
 749         {
 750                 u_int inquiry_len;
 751                 struct scsi_inquiry_data *inq_buf;
 752
 753                 inq_buf = &periph->path->device->inq_data;
 754
 755                 /*
 756                  * If the device is currently configured, we calculate an
 757                  * MD5 checksum of the inquiry data, and if the serial number
 758                  * length is greater than 0, add the serial number data
 759                  * into the checksum as well.  Once the inquiry and the
 760                  * serial number check finish, we attempt to figure out
 761                  * whether we still have the same device.
 762                  */
 763                 if (((periph->path->device->flags & CAM_DEV_UNCONFIGURED) == 0)
 764                  && ((softc->flags & PROBE_INQUIRY_CKSUM) == 0)) {
 765
 766                         MD5Init(&softc->context);
 767                         MD5Update(&softc->context, (unsigned char *)inq_buf,
 768                                   sizeof(struct scsi_inquiry_data));
 769                         softc->flags |= PROBE_INQUIRY_CKSUM;
 770                         if (periph->path->device->serial_num_len > 0) {
 771                                 MD5Update(&softc->context,
 772                                           periph->path->device->serial_num,
 773                                           periph->path->device->serial_num_len);
 774                                 softc->flags |= PROBE_SERIAL_CKSUM;
 775                         }
 776                         MD5Final(softc->digest, &softc->context);
 777                 }
 778
 779                 if (softc->action == PROBE_INQUIRY)
 780                         inquiry_len = SHORT_INQUIRY_LENGTH;
 781                 else
 782                         inquiry_len = SID_ADDITIONAL_LENGTH(inq_buf);
 783
 784                 /*
 785                  * Some parallel SCSI devices fail to send an
 786                  * ignore wide residue message when dealing with
 787                  * odd length inquiry requests.  Round up to be
 788                  * safe.
 789                  */
 790                 inquiry_len = roundup2(inquiry_len, 2);
 791
 792                 if (softc->action == PROBE_INQUIRY_BASIC_DV1
 793                  || softc->action == PROBE_INQUIRY_BASIC_DV2) {
 794                         inq_buf = malloc(inquiry_len, M_CAMXPT, M_NOWAIT);
 795                 }
 796                 if (inq_buf == NULL) {
 797                         xpt_print(periph->path, "malloc failure- skipping Basic"
 798                             "Domain Validation\n");
 799                         PROBE_SET_ACTION(softc, PROBE_DV_EXIT);
 800                         scsi_test_unit_ready(csio,
 801                                              /*retries*/4,
 802                                              probedone,
 803                                              MSG_SIMPLE_Q_TAG,
 804                                              SSD_FULL_SIZE,
 805                                              /*timeout*/60000);
 806                         break;
 807                 }
 808                 scsi_inquiry(csio,
 809                              /*retries*/4,
 810                              probedone,
 811                              MSG_SIMPLE_Q_TAG,
 812                              (u_int8_t *)inq_buf,
 813                              inquiry_len,
 814                              /*evpd*/FALSE,
 815                              /*page_code*/0,
 816                              SSD_MIN_SIZE,
 817                              /*timeout*/60 * 1000);
 818                 break;
 819         }
 820         case PROBE_REPORT_LUNS:
 821         {
 822                 void *rp;
 823
 824                 rp = malloc(periph->path->target->rpl_size,
 825                     M_CAMXPT, M_NOWAIT | M_ZERO);
 826                 if (rp == NULL) {
 827                         struct scsi_inquiry_data *inq_buf;
 828                         inq_buf = &periph->path->device->inq_data;
 829                         xpt_print(periph->path,
 830                             "Unable to alloc report luns storage\n");
 831                         if (INQ_DATA_TQ_ENABLED(inq_buf))
 832                                 PROBE_SET_ACTION(softc, PROBE_MODE_SENSE);
 833                         else
 834                                 PROBE_SET_ACTION(softc,
 835                                     PROBE_SUPPORTED_VPD_LIST);
 836                         goto again;
 837                 }
 838                 scsi_report_luns(csio, 5, probedone, MSG_SIMPLE_Q_TAG,
 839                     RPL_REPORT_DEFAULT, rp, periph->path->target->rpl_size,
 840                     SSD_FULL_SIZE, 60000); break;
 841                 break;
 842         }
 843         case PROBE_MODE_SENSE:
 844         {
 845                 void  *mode_buf;
 846                 int    mode_buf_len;
 847
 848                 mode_buf_len = sizeof(struct scsi_mode_header_6)
 849                              + sizeof(struct scsi_mode_blk_desc)
 850                              + sizeof(struct scsi_control_page);
 851                 mode_buf = malloc(mode_buf_len, M_CAMXPT, M_NOWAIT);
 852                 if (mode_buf != NULL) {
 853                         scsi_mode_sense(csio,
 854                                         /*retries*/4,
 855                                         probedone,
 856                                         MSG_SIMPLE_Q_TAG,
 857                                         /*dbd*/FALSE,
 858                                         SMS_PAGE_CTRL_CURRENT,
 859                                         SMS_CONTROL_MODE_PAGE,
 860                                         mode_buf,
 861                                         mode_buf_len,
 862                                         SSD_FULL_SIZE,
 863                                         /*timeout*/60000);
 864                         break;
 865                 }
 866                 xpt_print(periph->path, "Unable to mode sense control page - "
 867                     "malloc failure\n");
 868                 PROBE_SET_ACTION(softc, PROBE_SUPPORTED_VPD_LIST);
 869         }
 870         /* FALLTHROUGH */
 871         case PROBE_SUPPORTED_VPD_LIST:
 872         {
 873                 struct scsi_vpd_supported_page_list *vpd_list;
 874                 struct cam_ed *device;
 875
 876                 vpd_list = NULL;
 877                 device = periph->path->device;
 878
 879                 if ((SCSI_QUIRK(device)->quirks & CAM_QUIRK_NOVPDS) == 0)
 880                         vpd_list = malloc(sizeof(*vpd_list), M_CAMXPT,
 881                             M_NOWAIT | M_ZERO);
 882
 883                 if (vpd_list != NULL) {
 884                         scsi_inquiry(csio,
 885                                      /*retries*/4,
 886                                      probedone,
 887                                      MSG_SIMPLE_Q_TAG,
 888                                      (u_int8_t *)vpd_list,
 889                                      sizeof(*vpd_list),
 890                                      /*evpd*/TRUE,
 891                                      SVPD_SUPPORTED_PAGE_LIST,
 892                                      SSD_MIN_SIZE,
 893                                      /*timeout*/60 * 1000);
 894                         break;
 895                 }
 896 done:
 897                 /*
 898                  * We'll have to do without, let our probedone
 899                  * routine finish up for us.
 900                  */
 901                 start_ccb->csio.data_ptr = NULL;
 902                 cam_freeze_devq(periph->path);
 903                 cam_periph_doacquire(periph);
 904                 probedone(periph, start_ccb);
 905                 return;
 906         }
 907         case PROBE_DEVICE_ID:
 908         {
 909                 struct scsi_vpd_device_id *devid;
 910
 911                 devid = NULL;
 912                 if (scsi_vpd_supported_page(periph, SVPD_DEVICE_ID))
 913                         devid = malloc(SVPD_DEVICE_ID_MAX_SIZE, M_CAMXPT,
 914                             M_NOWAIT | M_ZERO);
 915
 916                 if (devid != NULL) {
 917                         scsi_inquiry(csio,
 918                                      /*retries*/4,
 919                                      probedone,
 920                                      MSG_SIMPLE_Q_TAG,
 921                                      (uint8_t *)devid,
 922                                      SVPD_DEVICE_ID_MAX_SIZE,
 923                                      /*evpd*/TRUE,
 924                                      SVPD_DEVICE_ID,
 925                                      SSD_MIN_SIZE,
 926                                      /*timeout*/60 * 1000);
 927                         break;
 928                 }
 929                 goto done;
 930         }
 931         case PROBE_EXTENDED_INQUIRY:
 932         {
 933                 struct scsi_vpd_extended_inquiry_data *ext_inq;
 934
 935                 ext_inq = NULL;
 936                 if (scsi_vpd_supported_page(periph, SVPD_EXTENDED_INQUIRY_DATA))
 937                         ext_inq = malloc(sizeof(*ext_inq), M_CAMXPT,
 938                             M_NOWAIT | M_ZERO);
 939
 940                 if (ext_inq != NULL) {
 941                         scsi_inquiry(csio,
 942                                      /*retries*/4,
 943                                      probedone,
 944                                      MSG_SIMPLE_Q_TAG,
 945                                      (uint8_t *)ext_inq,
 946                                      sizeof(*ext_inq),
 947                                      /*evpd*/TRUE,
 948                                      SVPD_EXTENDED_INQUIRY_DATA,
 949                                      SSD_MIN_SIZE,
 950                                      /*timeout*/60 * 1000);
 951                         break;
 952                 }
 953                 /*
 954                  * We'll have to do without, let our probedone
 955                  * routine finish up for us.
 956                  */
 957                 goto done;
 958         }
 959         case PROBE_SERIAL_NUM:
 960         {
 961                 struct scsi_vpd_unit_serial_number *serial_buf;
 962                 struct cam_ed* device;
 963
 964                 serial_buf = NULL;
 965                 device = periph->path->device;
 966                 if (device->serial_num != NULL) {
 967                         free(device->serial_num, M_CAMXPT);
 968                         device->serial_num = NULL;
 969                         device->serial_num_len = 0;
 970                 }
 971
 972                 if (scsi_vpd_supported_page(periph, SVPD_UNIT_SERIAL_NUMBER))
 973                         serial_buf = (struct scsi_vpd_unit_serial_number *)
 974                                 malloc(sizeof(*serial_buf), M_CAMXPT,
 975                                     M_NOWAIT|M_ZERO);
 976
 977                 if (serial_buf != NULL) {
 978                         scsi_inquiry(csio,
 979                                      /*retries*/4,
 980                                      probedone,
 981                                      MSG_SIMPLE_Q_TAG,
 982                                      (u_int8_t *)serial_buf,
 983                                      sizeof(*serial_buf),
 984                                      /*evpd*/TRUE,
 985                                      SVPD_UNIT_SERIAL_NUMBER,
 986                                      SSD_MIN_SIZE,
 987                                      /*timeout*/60 * 1000);
 988                         break;
 989                 }
 990                 goto done;
 991         }
 992         default:
 993                 panic("probestart: invalid action state 0x%x\n", softc->action);
 994         }
 995         start_ccb->ccb_h.flags |= CAM_DEV_QFREEZE;
 996         cam_periph_doacquire(periph);
 997         xpt_action(start_ccb);
 998 }
 999
1000 static void
1001 proberequestdefaultnegotiation(struct cam_periph *periph)
1002 {
1003         struct ccb_trans_settings cts;
1004
1005         xpt_setup_ccb(&cts.ccb_h, periph->path, CAM_PRIORITY_NONE);
1006         cts.ccb_h.func_code = XPT_GET_TRAN_SETTINGS;
1007         cts.type = CTS_TYPE_USER_SETTINGS;
1008         xpt_action((union ccb *)&cts);
1009         if (cam_ccb_status((union ccb *)&cts) != CAM_REQ_CMP) {
1010                 return;
1011         }
1012         cts.ccb_h.func_code = XPT_SET_TRAN_SETTINGS;
1013         cts.type = CTS_TYPE_CURRENT_SETTINGS;
1014         xpt_action((union ccb *)&cts);
1015 }
1016
1017 /*
1018  * Backoff Negotiation Code- only pertinent for SPI devices.
1019  */
1020 static int
1021 proberequestbackoff(struct cam_periph *periph, struct cam_ed *device)
1022 {
1023         struct ccb_trans_settings cts;
1024         struct ccb_trans_settings_spi *spi;
1025
1026         memset(&cts, 0, sizeof (cts));
1027         xpt_setup_ccb(&cts.ccb_h, periph->path, CAM_PRIORITY_NONE);
1028         cts.ccb_h.func_code = XPT_GET_TRAN_SETTINGS;
1029         cts.type = CTS_TYPE_CURRENT_SETTINGS;
1030         xpt_action((union ccb *)&cts);
1031         if (cam_ccb_status((union ccb *)&cts) != CAM_REQ_CMP) {
1032                 if (bootverbose) {
1033                         xpt_print(periph->path,
1034                             "failed to get current device settings\n");
1035                 }
1036                 return (0);
1037         }
1038         if (cts.transport != XPORT_SPI) {
1039                 if (bootverbose) {
1040                         xpt_print(periph->path, "not SPI transport\n");
1041                 }
1042                 return (0);
1043         }
1044         spi = &cts.xport_specific.spi;
1045
1046         /*
1047          * We cannot renegotiate sync rate if we don't have one.
1048          */
1049         if ((spi->valid & CTS_SPI_VALID_SYNC_RATE) == 0) {
1050                 if (bootverbose) {
1051                         xpt_print(periph->path, "no sync rate known\n");
1052                 }
1053                 return (0);
1054         }
1055
1056         /*
1057          * We'll assert that we don't have to touch PPR options- the
1058          * SIM will see what we do with period and offset and adjust
1059          * the PPR options as appropriate.
1060          */
1061
1062         /*
1063          * A sync rate with unknown or zero offset is nonsensical.
1064          * A sync period of zero means Async.
1065          */
1066         if ((spi->valid & CTS_SPI_VALID_SYNC_OFFSET) == 0
1067          || spi->sync_offset == 0 || spi->sync_period == 0) {
1068                 if (bootverbose) {
1069                         xpt_print(periph->path, "no sync rate available\n");
1070                 }
1071                 return (0);
1072         }
1073
1074         if (device->flags & CAM_DEV_DV_HIT_BOTTOM) {
1075                 CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1076                     ("hit async: giving up on DV\n"));
1077                 return (0);
1078         }
1079
1080
1081         /*
1082          * Jump sync_period up by one, but stop at 5MHz and fall back to Async.
1083          * We don't try to remember 'last' settings to see if the SIM actually
1084          * gets into the speed we want to set. We check on the SIM telling
1085          * us that a requested speed is bad, but otherwise don't try and
1086          * check the speed due to the asynchronous and handshake nature
1087          * of speed setting.
1088          */
1089         spi->valid = CTS_SPI_VALID_SYNC_RATE | CTS_SPI_VALID_SYNC_OFFSET;
1090         for (;;) {
1091                 spi->sync_period++;
1092                 if (spi->sync_period >= 0xf) {
1093                         spi->sync_period = 0;
1094                         spi->sync_offset = 0;
1095                         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1096                             ("setting to async for DV\n"));
1097                         /*
1098                          * Once we hit async, we don't want to try
1099                          * any more settings.
1100                          */
1101                         device->flags |= CAM_DEV_DV_HIT_BOTTOM;
1102                 } else if (bootverbose) {
1103                         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1104                             ("DV: period 0x%x\n", spi->sync_period));
1105                         printf("setting period to 0x%x\n", spi->sync_period);
1106                 }
1107                 cts.ccb_h.func_code = XPT_SET_TRAN_SETTINGS;
1108                 cts.type = CTS_TYPE_CURRENT_SETTINGS;
1109                 xpt_action((union ccb *)&cts);
1110                 if (cam_ccb_status((union ccb *)&cts) != CAM_REQ_CMP) {
1111                         break;
1112                 }
1113                 CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1114                     ("DV: failed to set period 0x%x\n", spi->sync_period));
1115                 if (spi->sync_period == 0) {
1116                         return (0);
1117                 }
1118         }
1119         return (1);
1120 }
1121
1122 #define CCB_COMPLETED_OK(ccb) (((ccb).status & CAM_STATUS_MASK) == CAM_REQ_CMP)
1123
1124 static void
1125 probedone(struct cam_periph *periph, union ccb *done_ccb)
1126 {
1127         probe_softc *softc;
1128         struct cam_path *path;
1129         u_int32_t  priority;
1130
1131         CAM_DEBUG(done_ccb->ccb_h.path, CAM_DEBUG_TRACE, ("probedone\n"));
1132
1133         softc = (probe_softc *)periph->softc;
1134         path = done_ccb->ccb_h.path;
1135         priority = done_ccb->ccb_h.pinfo.priority;
1136
1137         switch (softc->action) {
1138         case PROBE_TUR:
1139         {
1140                 if (cam_ccb_status(done_ccb) != CAM_REQ_CMP) {
1141
1142                         if (cam_periph_error(done_ccb, 0,
1143                                              SF_NO_PRINT, NULL) == ERESTART) {
1144 outr:
1145                                 /* Drop freeze taken due to CAM_DEV_QFREEZE */
1146                                 cam_release_devq(path, 0, 0, 0, FALSE);
1147                                 return;
1148                         }
1149                         else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0)
1150                                 /* Don't wedge the queue */
1151                                 xpt_release_devq(done_ccb->ccb_h.path,
1152                                                  /*count*/1,
1153                                                  /*run_queue*/TRUE);
1154                 }
1155                 PROBE_SET_ACTION(softc, PROBE_INQUIRY);
1156                 xpt_release_ccb(done_ccb);
1157                 xpt_schedule(periph, priority);
1158 out:
1159                 /* Drop freeze taken due to CAM_DEV_QFREEZE and release. */
1160                 cam_release_devq(path, 0, 0, 0, FALSE);
1161                 cam_periph_release_locked(periph);
1162                 return;
1163         }
1164         case PROBE_INQUIRY:
1165         case PROBE_FULL_INQUIRY:
1166         {
1167                 if (cam_ccb_status(done_ccb) == CAM_REQ_CMP) {
1168                         struct scsi_inquiry_data *inq_buf;
1169                         u_int8_t periph_qual;
1170
1171                         path->device->flags |= CAM_DEV_INQUIRY_DATA_VALID;
1172                         scsi_find_quirk(path->device);
1173                         inq_buf = &path->device->inq_data;
1174
1175                         periph_qual = SID_QUAL(inq_buf);
1176
1177                         if (periph_qual == SID_QUAL_LU_CONNECTED) {
1178                                 u_int8_t len;
1179
1180                                 /*
1181                                  * We conservatively request only
1182                                  * SHORT_INQUIRY_LEN bytes of inquiry
1183                                  * information during our first try
1184                                  * at sending an INQUIRY. If the device
1185                                  * has more information to give,
1186                                  * perform a second request specifying
1187                                  * the amount of information the device
1188                                  * is willing to give.
1189                                  */
1190                                 len = inq_buf->additional_length
1191                                     + offsetof(struct scsi_inquiry_data,
1192                                                additional_length) + 1;
1193                                 if (softc->action == PROBE_INQUIRY
1194                                     && len > SHORT_INQUIRY_LENGTH) {
1195                                         PROBE_SET_ACTION(softc, PROBE_FULL_INQUIRY);
1196                                         xpt_release_ccb(done_ccb);
1197                                         xpt_schedule(periph, priority);
1198                                         goto out;
1199                                 }
1200
1201                                 scsi_devise_transport(path);
1202
1203                                 if (path->device->lun_id == 0 &&
1204                                     SID_ANSI_REV(inq_buf) > SCSI_REV_SPC2 &&
1205                                     (SCSI_QUIRK(path->device)->quirks &
1206                                      CAM_QUIRK_NORPTLUNS) == 0) {
1207                                         PROBE_SET_ACTION(softc,
1208                                             PROBE_REPORT_LUNS);
1209                                         /*
1210                                          * Start with room for *one* lun.
1211                                          */
1212                                         periph->path->target->rpl_size = 16;
1213                                 } else if (INQ_DATA_TQ_ENABLED(inq_buf))
1214                                         PROBE_SET_ACTION(softc,
1215                                             PROBE_MODE_SENSE);
1216                                 else
1217                                         PROBE_SET_ACTION(softc,
1218                                             PROBE_SUPPORTED_VPD_LIST);
1219
1220                                 if (path->device->flags & CAM_DEV_UNCONFIGURED) {
1221                                         path->device->flags &= ~CAM_DEV_UNCONFIGURED;
1222                                         xpt_acquire_device(path->device);
1223                                 }
1224                                 xpt_release_ccb(done_ccb);
1225                                 xpt_schedule(periph, priority);
1226                                 goto out;
1227                         } else if (path->device->lun_id == 0 &&
1228                             SID_ANSI_REV(inq_buf) >= SCSI_REV_SPC2 &&
1229                             (SCSI_QUIRK(path->device)->quirks &
1230                              CAM_QUIRK_NORPTLUNS) == 0) {
1231                                 PROBE_SET_ACTION(softc, PROBE_REPORT_LUNS);
1232                                 periph->path->target->rpl_size = 16;
1233                                 xpt_release_ccb(done_ccb);
1234                                 xpt_schedule(periph, priority);
1235                                 goto out;
1236                         }
1237                 } else if (cam_periph_error(done_ccb, 0,
1238                                             done_ccb->ccb_h.target_lun > 0
1239                                             ? SF_RETRY_UA|SF_QUIET_IR
1240                                             : SF_RETRY_UA,
1241                                             &softc->saved_ccb) == ERESTART) {
1242                         goto outr;
1243                 } else {
1244                         if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1245                                 /* Don't wedge the queue */
1246                                 xpt_release_devq(done_ccb->ccb_h.path,
1247                                     /*count*/1, /*run_queue*/TRUE);
1248                         }
1249                         path->device->flags &= ~CAM_DEV_INQUIRY_DATA_VALID;
1250                 }
1251                 /*
1252                  * If we get to this point, we got an error status back
1253                  * from the inquiry and the error status doesn't require
1254                  * automatically retrying the command.  Therefore, the
1255                  * inquiry failed.  If we had inquiry information before
1256                  * for this device, but this latest inquiry command failed,
1257                  * the device has probably gone away.  If this device isn't
1258                  * already marked unconfigured, notify the peripheral
1259                  * drivers that this device is no more.
1260                  */
1261                 if ((path->device->flags & CAM_DEV_UNCONFIGURED) == 0)
1262                         /* Send the async notification. */
1263                         xpt_async(AC_LOST_DEVICE, path, NULL);
1264                 PROBE_SET_ACTION(softc, PROBE_INVALID);
1265
1266                 xpt_release_ccb(done_ccb);
1267                 break;
1268         }
1269         case PROBE_REPORT_LUNS:
1270         {
1271                 struct ccb_scsiio *csio;
1272                 struct scsi_report_luns_data *lp;
1273                 u_int nlun, maxlun;
1274
1275                 csio = &done_ccb->csio;
1276
1277                 lp = (struct scsi_report_luns_data *)csio->data_ptr;
1278                 nlun = scsi_4btoul(lp->length) / 8;
1279                 maxlun = (csio->dxfer_len / 8) - 1;
1280
1281                 if (cam_ccb_status(done_ccb) != CAM_REQ_CMP) {
1282                         if (cam_periph_error(done_ccb, 0,
1283                             done_ccb->ccb_h.target_lun > 0 ?
1284                             SF_RETRY_UA|SF_QUIET_IR : SF_RETRY_UA,
1285                             &softc->saved_ccb) == ERESTART) {
1286                                 goto outr;
1287                         }
1288                         if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1289                                 xpt_release_devq(done_ccb->ccb_h.path, 1,
1290                                     TRUE);
1291                         }
1292                         free(lp, M_CAMXPT);
1293                         lp = NULL;
1294                 } else if (nlun > maxlun) {
1295                         /*
1296                          * Reallocate and retry to cover all luns
1297                          */
1298                         CAM_DEBUG(path, CAM_DEBUG_PROBE,
1299                             ("Probe: reallocating REPORT_LUNS for %u luns\n",
1300                              nlun));
1301                         free(lp, M_CAMXPT);
1302                         path->target->rpl_size = (nlun << 3) + 8;
1303                         xpt_release_ccb(done_ccb);
1304                         xpt_schedule(periph, priority);
1305                         goto out;
1306                 } else if (nlun == 0) {
1307                         /*
1308                          * If there don't appear to be any luns, bail.
1309                          */
1310                         free(lp, M_CAMXPT);
1311                         lp = NULL;
1312                 } else {
1313                         lun_id_t lun;
1314                         int idx;
1315
1316                         CAM_DEBUG(path, CAM_DEBUG_PROBE,
1317                            ("Probe: %u lun(s) reported\n", nlun));
1318
1319                         CAM_GET_LUN(lp, 0, lun);
1320                         /*
1321                          * If the first lun is not lun 0, then either there
1322                          * is no lun 0 in the list, or the list is unsorted.
1323                          */
1324                         if (lun != 0) {
1325                                 for (idx = 0; idx < nlun; idx++) {
1326                                         CAM_GET_LUN(lp, idx, lun);
1327                                         if (lun == 0) {
1328                                                 break;
1329                                         }
1330                                 }
1331                                 if (idx != nlun) {
1332                                         uint8_t tlun[8];
1333                                         memcpy(tlun,
1334                                             lp->luns[0].lundata, 8);
1335                                         memcpy(lp->luns[0].lundata,
1336                                             lp->luns[idx].lundata, 8);
1337                                         memcpy(lp->luns[idx].lundata,
1338                                             tlun, 8);
1339                                         CAM_DEBUG(path, CAM_DEBUG_PROBE,
1340                                             ("lun 0 in position %u\n", idx));
1341                                 }
1342                         }
1343                         /*
1344                          * If we have an old lun list, We can either
1345                          * retest luns that appear to have been dropped,
1346                          * or just nuke them.  We'll opt for the latter.
1347                          * This function will also install the new list
1348                          * in the target structure.
1349                          */
1350                         probe_purge_old(path, lp, softc->flags);
1351                         lp = NULL;
1352                 }
1353                 if (path->device->flags & CAM_DEV_INQUIRY_DATA_VALID &&
1354                     SID_QUAL(&path->device->inq_data) == SID_QUAL_LU_CONNECTED) {
1355                         struct scsi_inquiry_data *inq_buf;
1356                         inq_buf = &path->device->inq_data;
1357                         if (INQ_DATA_TQ_ENABLED(inq_buf))
1358                                 PROBE_SET_ACTION(softc, PROBE_MODE_SENSE);
1359                         else
1360                                 PROBE_SET_ACTION(softc,
1361                                     PROBE_SUPPORTED_VPD_LIST);
1362                         xpt_release_ccb(done_ccb);
1363                         xpt_schedule(periph, priority);
1364                         goto out;
1365                 }
1366                 if (lp) {
1367                         free(lp, M_CAMXPT);
1368                 }
1369                 PROBE_SET_ACTION(softc, PROBE_INVALID);
1370                 xpt_release_ccb(done_ccb);
1371                 break;
1372         }
1373         case PROBE_MODE_SENSE:
1374         {
1375                 struct ccb_scsiio *csio;
1376                 struct scsi_mode_header_6 *mode_hdr;
1377
1378                 csio = &done_ccb->csio;
1379                 mode_hdr = (struct scsi_mode_header_6 *)csio->data_ptr;
1380                 if (cam_ccb_status(done_ccb) == CAM_REQ_CMP) {
1381                         struct scsi_control_page *page;
1382                         u_int8_t *offset;
1383
1384                         offset = ((u_int8_t *)&mode_hdr[1])
1385                             + mode_hdr->blk_desc_len;
1386                         page = (struct scsi_control_page *)offset;
1387                         path->device->queue_flags = page->queue_flags;
1388                 } else if (cam_periph_error(done_ccb, 0,
1389                                             SF_RETRY_UA|SF_NO_PRINT,
1390                                             &softc->saved_ccb) == ERESTART) {
1391                         goto outr;
1392                 } else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1393                         /* Don't wedge the queue */
1394                         xpt_release_devq(done_ccb->ccb_h.path,
1395                                          /*count*/1, /*run_queue*/TRUE);
1396                 }
1397                 xpt_release_ccb(done_ccb);
1398                 free(mode_hdr, M_CAMXPT);
1399                 PROBE_SET_ACTION(softc, PROBE_SUPPORTED_VPD_LIST);
1400                 xpt_schedule(periph, priority);
1401                 goto out;
1402         }
1403         case PROBE_SUPPORTED_VPD_LIST:
1404         {
1405                 struct ccb_scsiio *csio;
1406                 struct scsi_vpd_supported_page_list *page_list;
1407
1408                 csio = &done_ccb->csio;
1409                 page_list =
1410                     (struct scsi_vpd_supported_page_list *)csio->data_ptr;
1411
1412                 if (path->device->supported_vpds != NULL) {
1413                         free(path->device->supported_vpds, M_CAMXPT);
1414                         path->device->supported_vpds = NULL;
1415                         path->device->supported_vpds_len = 0;
1416                 }
1417
1418                 if (page_list == NULL) {
1419                         /*
1420                          * Don't process the command as it was never sent
1421                          */
1422                 } else if (CCB_COMPLETED_OK(csio->ccb_h)) {
1423                         /* Got vpd list */
1424                         path->device->supported_vpds_len = page_list->length +
1425                             SVPD_SUPPORTED_PAGES_HDR_LEN;
1426                         path->device->supported_vpds = (uint8_t *)page_list;
1427                         xpt_release_ccb(done_ccb);
1428                         PROBE_SET_ACTION(softc, PROBE_DEVICE_ID);
1429                         xpt_schedule(periph, priority);
1430                         goto out;
1431                 } else if (cam_periph_error(done_ccb, 0,
1432                                             SF_RETRY_UA|SF_NO_PRINT,
1433                                             &softc->saved_ccb) == ERESTART) {
1434                         goto outr;
1435                 } else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1436                         /* Don't wedge the queue */
1437                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1438                                          /*run_queue*/TRUE);
1439                 }
1440
1441                 if (page_list)
1442                         free(page_list, M_CAMXPT);
1443                 /* No VPDs available, skip to device check. */
1444                 csio->data_ptr = NULL;
1445                 goto probe_device_check;
1446         }
1447         case PROBE_DEVICE_ID:
1448         {
1449                 struct scsi_vpd_device_id *devid;
1450                 struct ccb_scsiio *csio;
1451                 uint32_t length = 0;
1452
1453                 csio = &done_ccb->csio;
1454                 devid = (struct scsi_vpd_device_id *)csio->data_ptr;
1455
1456                 /* Clean up from previous instance of this device */
1457                 if (path->device->device_id != NULL) {
1458                         path->device->device_id_len = 0;
1459                         free(path->device->device_id, M_CAMXPT);
1460                         path->device->device_id = NULL;
1461                 }
1462
1463                 if (devid == NULL) {
1464                         /* Don't process the command as it was never sent */
1465                 } else if (CCB_COMPLETED_OK(csio->ccb_h)) {
1466                         length = scsi_2btoul(devid->length);
1467                         if (length != 0) {
1468                                 /*
1469                                  * NB: device_id_len is actual response
1470                                  * size, not buffer size.
1471                                  */
1472                                 path->device->device_id_len = length +
1473                                     SVPD_DEVICE_ID_HDR_LEN;
1474                                 path->device->device_id = (uint8_t *)devid;
1475                         }
1476                 } else if (cam_periph_error(done_ccb, 0,
1477                                             SF_RETRY_UA,
1478                                             &softc->saved_ccb) == ERESTART) {
1479                         goto outr;
1480                 } else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1481                         /* Don't wedge the queue */
1482                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1483                                          /*run_queue*/TRUE);
1484                 }
1485
1486                 /* Free the device id space if we don't use it */
1487                 if (devid && length == 0)
1488                         free(devid, M_CAMXPT);
1489                 xpt_release_ccb(done_ccb);
1490                 PROBE_SET_ACTION(softc, PROBE_EXTENDED_INQUIRY);
1491                 xpt_schedule(periph, priority);
1492                 goto out;
1493         }
1494         case PROBE_EXTENDED_INQUIRY: {
1495                 struct scsi_vpd_extended_inquiry_data *ext_inq;
1496                 struct ccb_scsiio *csio;
1497                 int32_t length = 0;
1498
1499                 csio = &done_ccb->csio;
1500                 ext_inq = (struct scsi_vpd_extended_inquiry_data *)
1501                     csio->data_ptr;
1502                 if (path->device->ext_inq != NULL) {
1503                         path->device->ext_inq_len = 0;
1504                         free(path->device->ext_inq, M_CAMXPT);
1505                         path->device->ext_inq = NULL;
1506                 }
1507
1508                 if (ext_inq == NULL) {
1509                         /* Don't process the command as it was never sent */
1510                 } else if (CCB_COMPLETED_OK(csio->ccb_h)) {
1511                         length = scsi_2btoul(ext_inq->page_length) +
1512                             __offsetof(struct scsi_vpd_extended_inquiry_data,
1513                             flags1);
1514                         length = min(length, sizeof(*ext_inq));
1515                         length -= csio->resid;
1516                         if (length > 0) {
1517                                 path->device->ext_inq_len = length;
1518                                 path->device->ext_inq = (uint8_t *)ext_inq;
1519                         }
1520                 } else if (cam_periph_error(done_ccb, 0,
1521                                             SF_RETRY_UA,
1522                                             &softc->saved_ccb) == ERESTART) {
1523                         return;
1524                 } else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1525                         /* Don't wedge the queue */
1526                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1527                                          /*run_queue*/TRUE);
1528                 }
1529
1530                 /* Free the device id space if we don't use it */
1531                 if (ext_inq && length <= 0)
1532                         free(ext_inq, M_CAMXPT);
1533                 xpt_release_ccb(done_ccb);
1534                 PROBE_SET_ACTION(softc, PROBE_SERIAL_NUM);
1535                 xpt_schedule(periph, priority);
1536                 goto out;
1537         }
1538
1539 probe_device_check:
1540         case PROBE_SERIAL_NUM:
1541         {
1542                 struct ccb_scsiio *csio;
1543                 struct scsi_vpd_unit_serial_number *serial_buf;
1544                 u_int32_t  priority;
1545                 int changed;
1546                 int have_serialnum;
1547
1548                 changed = 1;
1549                 have_serialnum = 0;
1550                 csio = &done_ccb->csio;
1551                 priority = done_ccb->ccb_h.pinfo.priority;
1552                 serial_buf =
1553                     (struct scsi_vpd_unit_serial_number *)csio->data_ptr;
1554
1555                 if (serial_buf == NULL) {
1556                         /*
1557                          * Don't process the command as it was never sent
1558                          */
1559                 } else if (cam_ccb_status(done_ccb) == CAM_REQ_CMP
1560                         && (serial_buf->length > 0)) {
1561
1562                         have_serialnum = 1;
1563                         path->device->serial_num =
1564                                 (u_int8_t *)malloc((serial_buf->length + 1),
1565                                                    M_CAMXPT, M_NOWAIT);
1566                         if (path->device->serial_num != NULL) {
1567                                 memcpy(path->device->serial_num,
1568                                        serial_buf->serial_num,
1569                                        serial_buf->length);
1570                                 path->device->serial_num_len =
1571                                     serial_buf->length;
1572                                 path->device->serial_num[serial_buf->length]
1573                                     = '\0';
1574                         }
1575                 } else if (cam_periph_error(done_ccb, 0,
1576                                             SF_RETRY_UA|SF_NO_PRINT,
1577                                             &softc->saved_ccb) == ERESTART) {
1578                         goto outr;
1579                 } else if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1580                         /* Don't wedge the queue */
1581                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1582                                          /*run_queue*/TRUE);
1583                 }
1584
1585                 /*
1586                  * Let's see if we have seen this device before.
1587                  */
1588                 if ((softc->flags & PROBE_INQUIRY_CKSUM) != 0) {
1589                         MD5_CTX context;
1590                         u_int8_t digest[16];
1591
1592                         MD5Init(&context);
1593
1594                         MD5Update(&context,
1595                                   (unsigned char *)&path->device->inq_data,
1596                                   sizeof(struct scsi_inquiry_data));
1597
1598                         if (have_serialnum)
1599                                 MD5Update(&context, serial_buf->serial_num,
1600                                           serial_buf->length);
1601
1602                         MD5Final(digest, &context);
1603                         if (bcmp(softc->digest, digest, 16) == 0)
1604                                 changed = 0;
1605
1606                         /*
1607                          * XXX Do we need to do a TUR in order to ensure
1608                          *     that the device really hasn't changed???
1609                          */
1610                         if ((changed != 0)
1611                          && ((softc->flags & PROBE_NO_ANNOUNCE) == 0))
1612                                 xpt_async(AC_LOST_DEVICE, path, NULL);
1613                 }
1614                 if (serial_buf != NULL)
1615                         free(serial_buf, M_CAMXPT);
1616
1617                 if (changed != 0) {
1618                         /*
1619                          * Now that we have all the necessary
1620                          * information to safely perform transfer
1621                          * negotiations... Controllers don't perform
1622                          * any negotiation or tagged queuing until
1623                          * after the first XPT_SET_TRAN_SETTINGS ccb is
1624                          * received.  So, on a new device, just retrieve
1625                          * the user settings, and set them as the current
1626                          * settings to set the device up.
1627                          */
1628                         proberequestdefaultnegotiation(periph);
1629                         xpt_release_ccb(done_ccb);
1630
1631                         /*
1632                          * Perform a TUR to allow the controller to
1633                          * perform any necessary transfer negotiation.
1634                          */
1635                         PROBE_SET_ACTION(softc, PROBE_TUR_FOR_NEGOTIATION);
1636                         xpt_schedule(periph, priority);
1637                         goto out;
1638                 }
1639                 xpt_release_ccb(done_ccb);
1640                 break;
1641         }
1642         case PROBE_TUR_FOR_NEGOTIATION:
1643         case PROBE_DV_EXIT:
1644                 if (cam_ccb_status(done_ccb) != CAM_REQ_CMP) {
1645                         cam_periph_error(done_ccb, 0,
1646                             SF_NO_PRINT | SF_NO_RECOVERY | SF_NO_RETRY, NULL);
1647                 }
1648                 if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1649                         /* Don't wedge the queue */
1650                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1651                                          /*run_queue*/TRUE);
1652                 }
1653                 /*
1654                  * Do Domain Validation for lun 0 on devices that claim
1655                  * to support Synchronous Transfer modes.
1656                  */
1657                 if (softc->action == PROBE_TUR_FOR_NEGOTIATION
1658                  && done_ccb->ccb_h.target_lun == 0
1659                  && (path->device->inq_data.flags & SID_Sync) != 0
1660                  && (path->device->flags & CAM_DEV_IN_DV) == 0) {
1661                         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1662                             ("Begin Domain Validation\n"));
1663                         path->device->flags |= CAM_DEV_IN_DV;
1664                         xpt_release_ccb(done_ccb);
1665                         PROBE_SET_ACTION(softc, PROBE_INQUIRY_BASIC_DV1);
1666                         xpt_schedule(periph, priority);
1667                         goto out;
1668                 }
1669                 if (softc->action == PROBE_DV_EXIT) {
1670                         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1671                             ("Leave Domain Validation\n"));
1672                 }
1673                 if (path->device->flags & CAM_DEV_UNCONFIGURED) {
1674                         path->device->flags &= ~CAM_DEV_UNCONFIGURED;
1675                         xpt_acquire_device(path->device);
1676                 }
1677                 path->device->flags &=
1678                     ~(CAM_DEV_IN_DV|CAM_DEV_DV_HIT_BOTTOM);
1679                 if ((softc->flags & PROBE_NO_ANNOUNCE) == 0) {
1680                         /* Inform the XPT that a new device has been found */
1681                         done_ccb->ccb_h.func_code = XPT_GDEV_TYPE;
1682                         xpt_action(done_ccb);
1683                         xpt_async(AC_FOUND_DEVICE, done_ccb->ccb_h.path,
1684                                   done_ccb);
1685                 }
1686                 PROBE_SET_ACTION(softc, PROBE_DONE);
1687                 xpt_release_ccb(done_ccb);
1688                 break;
1689         case PROBE_INQUIRY_BASIC_DV1:
1690         case PROBE_INQUIRY_BASIC_DV2:
1691         {
1692                 struct scsi_inquiry_data *nbuf;
1693                 struct ccb_scsiio *csio;
1694
1695                 if (cam_ccb_status(done_ccb) != CAM_REQ_CMP) {
1696                         cam_periph_error(done_ccb, 0,
1697                             SF_NO_PRINT | SF_NO_RECOVERY | SF_NO_RETRY, NULL);
1698                 }
1699                 if ((done_ccb->ccb_h.status & CAM_DEV_QFRZN) != 0) {
1700                         /* Don't wedge the queue */
1701                         xpt_release_devq(done_ccb->ccb_h.path, /*count*/1,
1702                                          /*run_queue*/TRUE);
1703                 }
1704                 csio = &done_ccb->csio;
1705                 nbuf = (struct scsi_inquiry_data *)csio->data_ptr;
1706                 if (bcmp(nbuf, &path->device->inq_data, SHORT_INQUIRY_LENGTH)) {
1707                         xpt_print(path,
1708                             "inquiry data fails comparison at DV%d step\n",
1709                             softc->action == PROBE_INQUIRY_BASIC_DV1 ? 1 : 2);
1710                         if (proberequestbackoff(periph, path->device)) {
1711                                 path->device->flags &= ~CAM_DEV_IN_DV;
1712                                 PROBE_SET_ACTION(softc, PROBE_TUR_FOR_NEGOTIATION);
1713                         } else {
1714                                 /* give up */
1715                                 PROBE_SET_ACTION(softc, PROBE_DV_EXIT);
1716                         }
1717                         free(nbuf, M_CAMXPT);
1718                         xpt_release_ccb(done_ccb);
1719                         xpt_schedule(periph, priority);
1720                         goto out;
1721                 }
1722                 free(nbuf, M_CAMXPT);
1723                 if (softc->action == PROBE_INQUIRY_BASIC_DV1) {
1724                         PROBE_SET_ACTION(softc, PROBE_INQUIRY_BASIC_DV2);
1725                         xpt_release_ccb(done_ccb);
1726                         xpt_schedule(periph, priority);
1727                         goto out;
1728                 }
1729                 if (softc->action == PROBE_INQUIRY_BASIC_DV2) {
1730                         CAM_DEBUG(periph->path, CAM_DEBUG_PROBE,
1731                             ("Leave Domain Validation Successfully\n"));
1732                 }
1733                 if (path->device->flags & CAM_DEV_UNCONFIGURED) {
1734                         path->device->flags &= ~CAM_DEV_UNCONFIGURED;
1735                         xpt_acquire_device(path->device);
1736                 }
1737                 path->device->flags &=
1738                     ~(CAM_DEV_IN_DV|CAM_DEV_DV_HIT_BOTTOM);
1739                 if ((softc->flags & PROBE_NO_ANNOUNCE) == 0) {
1740                         /* Inform the XPT that a new device has been found */
1741                         done_ccb->ccb_h.func_code = XPT_GDEV_TYPE;
1742                         xpt_action(done_ccb);
1743                         xpt_async(AC_FOUND_DEVICE, done_ccb->ccb_h.path,
1744                                   done_ccb);
1745                 }
1746                 PROBE_SET_ACTION(softc, PROBE_DONE);
1747                 xpt_release_ccb(done_ccb);
1748                 break;
1749         }
1750         default:
1751                 panic("probedone: invalid action state 0x%x\n", softc->action);
1752         }
1753         done_ccb = (union ccb *)TAILQ_FIRST(&softc->request_ccbs);
1754         TAILQ_REMOVE(&softc->request_ccbs, &done_ccb->ccb_h, periph_links.tqe);
1755         done_ccb->ccb_h.status = CAM_REQ_CMP;
1756         xpt_done(done_ccb);
1757         if (TAILQ_FIRST(&softc->request_ccbs) == NULL) {
1758                 CAM_DEBUG(periph->path, CAM_DEBUG_PROBE, ("Probe completed\n"));
1759                 /* Drop freeze taken due to CAM_DEV_QFREEZE flag set. */
1760                 cam_release_devq(path, 0, 0, 0, FALSE);
1761                 cam_periph_release_locked(periph);
1762                 cam_periph_invalidate(periph);
1763                 cam_periph_release_locked(periph);
1764         } else {
1765                 probeschedule(periph);
1766                 goto out;
1767         }
1768 }
1769
1770 static void
1771 probe_purge_old(struct cam_path *path, struct scsi_report_luns_data *new,
1772     probe_flags flags)
1773 {
1774         struct cam_path *tp;
1775         struct scsi_report_luns_data *old;
1776         u_int idx1, idx2, nlun_old, nlun_new;
1777         lun_id_t this_lun;
1778         u_int8_t *ol, *nl;
1779
1780         if (path->target == NULL) {
1781                 return;
1782         }
1783         mtx_lock(&path->target->luns_mtx);
1784         old = path->target->luns;
1785         path->target->luns = new;
1786         mtx_unlock(&path->target->luns_mtx);
1787         if (old == NULL)
1788                 return;
1789         nlun_old = scsi_4btoul(old->length) / 8;
1790         nlun_new = scsi_4btoul(new->length) / 8;
1791
1792         /*
1793          * We are not going to assume sorted lists. Deal.
1794          */
1795         for (idx1 = 0; idx1 < nlun_old; idx1++) {
1796                 ol = old->luns[idx1].lundata;
1797                 for (idx2 = 0; idx2 < nlun_new; idx2++) {
1798                         nl = new->luns[idx2].lundata;
1799                         if (memcmp(nl, ol, 8) == 0) {
1800                                 break;
1801                         }
1802                 }
1803                 if (idx2 < nlun_new) {
1804                         continue;
1805                 }
1806                 /*
1807                  * An 'old' item not in the 'new' list.
1808                  * Nuke it. Except that if it is lun 0,
1809                  * that would be what the probe state
1810                  * machine is currently working on,
1811                  * so we won't do that.
1812                  */
1813                 CAM_GET_LUN(old, idx1, this_lun);
1814                 if (this_lun == 0) {
1815                         continue;
1816                 }
1817
1818                 /*
1819                  * We also cannot nuke it if it is
1820                  * not in a lun format we understand
1821                  * and replace the LUN with a "simple" LUN
1822                  * if that is all the HBA supports.
1823                  */
1824                 if (!(flags & PROBE_EXTLUN)) {
1825                         if (!CAM_CAN_GET_SIMPLE_LUN(old, idx1))
1826                                 continue;
1827                         CAM_GET_SIMPLE_LUN(old, idx1, this_lun);
1828                 }
1829                 if (!CAM_LUN_ONLY_32BITS(old, idx1))
1830                         continue;
1831
1832                 if (xpt_create_path(&tp, NULL, xpt_path_path_id(path),
1833                     xpt_path_target_id(path), this_lun) == CAM_REQ_CMP) {
1834                         xpt_async(AC_LOST_DEVICE, tp, NULL);
1835                         xpt_free_path(tp);
1836                 }
1837         }
1838         free(old, M_CAMXPT);
1839 }
1840
1841 static void
1842 probecleanup(struct cam_periph *periph)
1843 {
1844         free(periph->softc, M_CAMXPT);
1845 }
1846
1847 static void
1848 scsi_find_quirk(struct cam_ed *device)
1849 {
1850         struct scsi_quirk_entry *quirk;
1851         caddr_t match;
1852
1853         match = cam_quirkmatch((caddr_t)&device->inq_data,
1854                                (caddr_t)scsi_quirk_table,
1855                                sizeof(scsi_quirk_table) /
1856                                sizeof(*scsi_quirk_table),
1857                                sizeof(*scsi_quirk_table), scsi_inquiry_match);
1858
1859         if (match == NULL)
1860                 panic("xpt_find_quirk: device didn't match wildcard entry!!");
1861
1862         quirk = (struct scsi_quirk_entry *)match;
1863         device->quirk = quirk;
1864         device->mintags = quirk->mintags;
1865         device->maxtags = quirk->maxtags;
1866 }
1867
1868 static int
1869 sysctl_cam_search_luns(SYSCTL_HANDLER_ARGS)
1870 {
1871         int error, val;
1872
1873         val = cam_srch_hi;
1874         error = sysctl_handle_int(oidp, &val, 0, req);
1875         if (error != 0 || req->newptr == NULL)
1876                 return (error);
1877         if (val == 0 || val == 1) {
1878                 cam_srch_hi = val;
1879                 return (0);
1880         } else {
1881                 return (EINVAL);
1882         }
1883 }
1884
1885 typedef struct {
1886         union   ccb *request_ccb;
1887         struct  ccb_pathinq *cpi;
1888         int     counter;
1889         int     lunindex[0];
1890 } scsi_scan_bus_info;
1891
1892 /*
1893  * To start a scan, request_ccb is an XPT_SCAN_BUS ccb.
1894  * As the scan progresses, scsi_scan_bus is used as the
1895  * callback on completion function.
1896  */
1897 static void
1898 scsi_scan_bus(struct cam_periph *periph, union ccb *request_ccb)
1899 {
1900         struct mtx *mtx;
1901
1902         CAM_DEBUG(request_ccb->ccb_h.path, CAM_DEBUG_TRACE,
1903                   ("scsi_scan_bus\n"));
1904         switch (request_ccb->ccb_h.func_code) {
1905         case XPT_SCAN_BUS:
1906         case XPT_SCAN_TGT:
1907         {
1908                 scsi_scan_bus_info *scan_info;
1909                 union   ccb *work_ccb, *reset_ccb;
1910                 struct  cam_path *path;
1911                 u_int   i;
1912                 u_int   low_target, max_target;
1913                 u_int   initiator_id;
1914
1915                 /* Find out the characteristics of the bus */
1916                 work_ccb = xpt_alloc_ccb_nowait();
1917                 if (work_ccb == NULL) {
1918                         request_ccb->ccb_h.status = CAM_RESRC_UNAVAIL;
1919                         xpt_done(request_ccb);
1920                         return;
1921                 }
1922                 xpt_setup_ccb(&work_ccb->ccb_h, request_ccb->ccb_h.path,
1923                               request_ccb->ccb_h.pinfo.priority);
1924                 work_ccb->ccb_h.func_code = XPT_PATH_INQ;
1925                 xpt_action(work_ccb);
1926                 if (work_ccb->ccb_h.status != CAM_REQ_CMP) {
1927                         request_ccb->ccb_h.status = work_ccb->ccb_h.status;
1928                         xpt_free_ccb(work_ccb);
1929                         xpt_done(request_ccb);
1930                         return;
1931                 }
1932
1933                 if ((work_ccb->cpi.hba_misc & PIM_NOINITIATOR) != 0) {
1934                         /*
1935                          * Can't scan the bus on an adapter that
1936                          * cannot perform the initiator role.
1937                          */
1938                         request_ccb->ccb_h.status = CAM_REQ_CMP;
1939                         xpt_free_ccb(work_ccb);
1940                         xpt_done(request_ccb);
1941                         return;
1942                 }
1943
1944                 /* We may need to reset bus first, if we haven't done it yet. */
1945                 if ((work_ccb->cpi.hba_inquiry &
1946                     (PI_WIDE_32|PI_WIDE_16|PI_SDTR_ABLE)) &&
1947                     !(work_ccb->cpi.hba_misc & PIM_NOBUSRESET) &&
1948                     !timevalisset(&request_ccb->ccb_h.path->bus->last_reset) &&
1949                     (reset_ccb = xpt_alloc_ccb_nowait()) != NULL) {
1950                         xpt_setup_ccb(&reset_ccb->ccb_h, request_ccb->ccb_h.path,
1951                               CAM_PRIORITY_NONE);
1952                         reset_ccb->ccb_h.func_code = XPT_RESET_BUS;
1953                         xpt_action(reset_ccb);
1954                         if (reset_ccb->ccb_h.status != CAM_REQ_CMP) {
1955                                 request_ccb->ccb_h.status = reset_ccb->ccb_h.status;
1956                                 xpt_free_ccb(reset_ccb);
1957                                 xpt_free_ccb(work_ccb);
1958                                 xpt_done(request_ccb);
1959                                 return;
1960                         }
1961                         xpt_free_ccb(reset_ccb);
1962                 }
1963
1964                 /* Save some state for use while we probe for devices */
1965                 scan_info = (scsi_scan_bus_info *) malloc(sizeof(scsi_scan_bus_info) +
1966                     (work_ccb->cpi.max_target * sizeof (u_int)), M_CAMXPT, M_ZERO|M_NOWAIT);
1967                 if (scan_info == NULL) {
1968                         request_ccb->ccb_h.status = CAM_RESRC_UNAVAIL;
1969                         xpt_free_ccb(work_ccb);
1970                         xpt_done(request_ccb);
1971                         return;
1972                 }
1973                 CAM_DEBUG(request_ccb->ccb_h.path, CAM_DEBUG_TRACE,
1974                    ("SCAN start for %p\n", scan_info));
1975                 scan_info->request_ccb = request_ccb;
1976                 scan_info->cpi = &work_ccb->cpi;
1977
1978                 /* Cache on our stack so we can work asynchronously */
1979                 max_target = scan_info->cpi->max_target;
1980                 low_target = 0;
1981                 initiator_id = scan_info->cpi->initiator_id;
1982
1983
1984                 /*
1985                  * We can scan all targets in parallel, or do it sequentially.
1986                  */
1987
1988                 if (request_ccb->ccb_h.func_code == XPT_SCAN_TGT) {
1989                         max_target = low_target = request_ccb->ccb_h.target_id;
1990                         scan_info->counter = 0;
1991                 } else if (scan_info->cpi->hba_misc & PIM_SEQSCAN) {
1992                         max_target = 0;
1993                         scan_info->counter = 0;
1994                 } else {
1995                         scan_info->counter = scan_info->cpi->max_target + 1;
1996                         if (scan_info->cpi->initiator_id < scan_info->counter) {
1997                                 scan_info->counter--;
1998                         }
1999                 }
2000                 mtx = xpt_path_mtx(scan_info->request_ccb->ccb_h.path);
2001                 mtx_unlock(mtx);
2002
2003                 for (i = low_target; i <= max_target; i++) {
2004                         cam_status status;
2005                         if (i == initiator_id)
2006                                 continue;
2007
2008                         status = xpt_create_path(&path, NULL,
2009                                                  request_ccb->ccb_h.path_id,
2010                                                  i, 0);
2011                         if (status != CAM_REQ_CMP) {
2012                                 printf("scsi_scan_bus: xpt_create_path failed"
2013                                        " with status %#x, bus scan halted\n",
2014                                        status);
2015                                 free(scan_info, M_CAMXPT);
2016                                 request_ccb->ccb_h.status = status;
2017                                 xpt_free_ccb(work_ccb);
2018                                 xpt_done(request_ccb);
2019                                 break;
2020                         }
2021                         work_ccb = xpt_alloc_ccb_nowait();
2022                         if (work_ccb == NULL) {
2023                                 xpt_free_ccb((union ccb *)scan_info->cpi);
2024                                 free(scan_info, M_CAMXPT);
2025                                 xpt_free_path(path);
2026                                 request_ccb->ccb_h.status = CAM_RESRC_UNAVAIL;
2027                                 xpt_done(request_ccb);
2028                                 break;
2029                         }
2030                         xpt_setup_ccb(&work_ccb->ccb_h, path,
2031                                       request_ccb->ccb_h.pinfo.priority);
2032                         work_ccb->ccb_h.func_code = XPT_SCAN_LUN;
2033                         work_ccb->ccb_h.cbfcnp = scsi_scan_bus;
2034                         work_ccb->ccb_h.flags |= CAM_UNLOCKED;
2035                         work_ccb->ccb_h.ppriv_ptr0 = scan_info;
2036                         work_ccb->crcn.flags = request_ccb->crcn.flags;
2037                         xpt_action(work_ccb);
2038                 }
2039
2040                 mtx_lock(mtx);
2041                 break;
2042         }
2043         case XPT_SCAN_LUN:
2044         {
2045                 cam_status status;
2046                 struct cam_path *path, *oldpath;
2047                 scsi_scan_bus_info *scan_info;
2048                 struct cam_et *target;
2049                 struct cam_ed *device, *nextdev;
2050                 int next_target;
2051                 path_id_t path_id;
2052                 target_id_t target_id;
2053                 lun_id_t lun_id;
2054
2055                 oldpath = request_ccb->ccb_h.path;
2056
2057                 status = cam_ccb_status(request_ccb);
2058                 scan_info = (scsi_scan_bus_info *)request_ccb->ccb_h.ppriv_ptr0;
2059                 path_id = request_ccb->ccb_h.path_id;
2060                 target_id = request_ccb->ccb_h.target_id;
2061                 lun_id = request_ccb->ccb_h.target_lun;
2062                 target = request_ccb->ccb_h.path->target;
2063                 next_target = 1;
2064
2065                 mtx = xpt_path_mtx(scan_info->request_ccb->ccb_h.path);
2066                 mtx_lock(mtx);
2067                 mtx_lock(&target->luns_mtx);
2068                 if (target->luns) {
2069                         lun_id_t first;
2070                         u_int nluns = scsi_4btoul(target->luns->length) / 8;
2071
2072                         /*
2073                          * Make sure we skip over lun 0 if it's the first member
2074                          * of the list as we've actually just finished probing
2075                          * it.
2076                          */
2077                         CAM_GET_LUN(target->luns, 0, first);
2078                         if (first == 0 && scan_info->lunindex[target_id] == 0) {
2079                                 scan_info->lunindex[target_id]++;
2080                         }
2081
2082                         /*
2083                          * Skip any LUNs that the HBA can't deal with.
2084                          */
2085                         while (scan_info->lunindex[target_id] < nluns) {
2086                                 if (scan_info->cpi->hba_misc & PIM_EXTLUNS) {
2087                                         CAM_GET_LUN(target->luns,
2088                                             scan_info->lunindex[target_id],
2089                                             lun_id);
2090                                         break;
2091                                 }
2092
2093                                 /* XXX print warning? */
2094                                 if (!CAM_LUN_ONLY_32BITS(target->luns,
2095                                     scan_info->lunindex[target_id]))
2096                                         continue;
2097                                 if (CAM_CAN_GET_SIMPLE_LUN(target->luns,
2098                                     scan_info->lunindex[target_id])) {
2099                                         CAM_GET_SIMPLE_LUN(target->luns,
2100                                             scan_info->lunindex[target_id],
2101                                             lun_id);
2102                                         break;
2103                                 }
2104
2105                                 scan_info->lunindex[target_id]++;
2106                         }
2107
2108                         if (scan_info->lunindex[target_id] < nluns) {
2109                                 mtx_unlock(&target->luns_mtx);
2110                                 next_target = 0;
2111                                 CAM_DEBUG(request_ccb->ccb_h.path,
2112                                     CAM_DEBUG_PROBE,
2113                                    ("next lun to try at index %u is %jx\n",
2114                                    scan_info->lunindex[target_id],
2115                                    (uintmax_t)lun_id));
2116                                 scan_info->lunindex[target_id]++;
2117                         } else {
2118                                 mtx_unlock(&target->luns_mtx);
2119                                 /* We're done with scanning all luns. */
2120                         }
2121                 } else {
2122                         mtx_unlock(&target->luns_mtx);
2123                         device = request_ccb->ccb_h.path->device;
2124                         /* Continue sequential LUN scan if: */
2125                         /*  -- we have more LUNs that need recheck */
2126                         mtx_lock(&target->bus->eb_mtx);
2127                         nextdev = device;
2128                         while ((nextdev = TAILQ_NEXT(nextdev, links)) != NULL)
2129                                 if ((nextdev->flags & CAM_DEV_UNCONFIGURED) == 0)
2130                                         break;
2131                         mtx_unlock(&target->bus->eb_mtx);
2132                         if (nextdev != NULL) {
2133                                 next_target = 0;
2134                         /*  -- stop if CAM_QUIRK_NOLUNS is set. */
2135                         } else if (SCSI_QUIRK(device)->quirks & CAM_QUIRK_NOLUNS) {
2136                                 next_target = 1;
2137                         /*  -- this LUN is connected and its SCSI version
2138                          *     allows more LUNs. */
2139                         } else if ((device->flags & CAM_DEV_UNCONFIGURED) == 0) {
2140                                 if (lun_id < (CAM_SCSI2_MAXLUN-1) ||
2141                                     CAN_SRCH_HI_DENSE(device))
2142                                         next_target = 0;
2143                         /*  -- this LUN is disconnected, its SCSI version
2144                          *     allows more LUNs and we guess they may be. */
2145                         } else if ((device->flags & CAM_DEV_INQUIRY_DATA_VALID) != 0) {
2146                                 if (lun_id < (CAM_SCSI2_MAXLUN-1) ||
2147                                     CAN_SRCH_HI_SPARSE(device))
2148                                         next_target = 0;
2149                         }
2150                         if (next_target == 0) {
2151                                 lun_id++;
2152                                 if (lun_id > scan_info->cpi->max_lun)
2153                                         next_target = 1;
2154                         }
2155                 }
2156
2157                 /*
2158                  * Check to see if we scan any further luns.
2159                  */
2160                 if (next_target) {
2161                         int done;
2162
2163                         /*
2164                          * Free the current request path- we're done with it.
2165                          */
2166                         xpt_free_path(oldpath);
2167  hop_again:
2168                         done = 0;
2169                         if (scan_info->request_ccb->ccb_h.func_code == XPT_SCAN_TGT) {
2170                                 done = 1;
2171                         } else if (scan_info->cpi->hba_misc & PIM_SEQSCAN) {
2172                                 scan_info->counter++;
2173                                 if (scan_info->counter ==
2174                                     scan_info->cpi->initiator_id) {
2175                                         scan_info->counter++;
2176                                 }
2177                                 if (scan_info->counter >=
2178                                     scan_info->cpi->max_target+1) {
2179                                         done = 1;
2180                                 }
2181                         } else {
2182                                 scan_info->counter--;
2183                                 if (scan_info->counter == 0) {
2184                                         done = 1;
2185                                 }
2186                         }
2187                         if (done) {
2188                                 mtx_unlock(mtx);
2189                                 xpt_free_ccb(request_ccb);
2190                                 xpt_free_ccb((union ccb *)scan_info->cpi);
2191                                 request_ccb = scan_info->request_ccb;
2192                                 CAM_DEBUG(request_ccb->ccb_h.path,
2193                                     CAM_DEBUG_TRACE,
2194                                    ("SCAN done for %p\n", scan_info));
2195                                 free(scan_info, M_CAMXPT);
2196                                 request_ccb->ccb_h.status = CAM_REQ_CMP;
2197                                 xpt_done(request_ccb);
2198                                 break;
2199                         }
2200
2201                         if ((scan_info->cpi->hba_misc & PIM_SEQSCAN) == 0) {
2202                                 mtx_unlock(mtx);
2203                                 xpt_free_ccb(request_ccb);
2204                                 break;
2205                         }
2206                         status = xpt_create_path(&path, NULL,
2207                             scan_info->request_ccb->ccb_h.path_id,
2208                             scan_info->counter, 0);
2209                         if (status != CAM_REQ_CMP) {
2210                                 mtx_unlock(mtx);
2211                                 printf("scsi_scan_bus: xpt_create_path failed"
2212                                     " with status %#x, bus scan halted\n",
2213                                     status);
2214                                 xpt_free_ccb(request_ccb);
2215                                 xpt_free_ccb((union ccb *)scan_info->cpi);
2216                                 request_ccb = scan_info->request_ccb;
2217                                 free(scan_info, M_CAMXPT);
2218                                 request_ccb->ccb_h.status = status;
2219                                 xpt_done(request_ccb);
2220                                 break;
2221                         }
2222                         xpt_setup_ccb(&request_ccb->ccb_h, path,
2223                             request_ccb->ccb_h.pinfo.priority);
2224                         request_ccb->ccb_h.func_code = XPT_SCAN_LUN;
2225                         request_ccb->ccb_h.cbfcnp = scsi_scan_bus;
2226                         request_ccb->ccb_h.flags |= CAM_UNLOCKED;
2227                         request_ccb->ccb_h.ppriv_ptr0 = scan_info;
2228                         request_ccb->crcn.flags =
2229                             scan_info->request_ccb->crcn.flags;
2230                 } else {
2231                         status = xpt_create_path(&path, NULL,
2232                                                  path_id, target_id, lun_id);
2233                         /*
2234                          * Free the old request path- we're done with it. We
2235                          * do this *after* creating the new path so that
2236                          * we don't remove a target that has our lun list
2237                          * in the case that lun 0 is not present.
2238                          */
2239                         xpt_free_path(oldpath);
2240                         if (status != CAM_REQ_CMP) {
2241                                 printf("scsi_scan_bus: xpt_create_path failed "
2242                                        "with status %#x, halting LUN scan\n",
2243                                        status);
2244                                 goto hop_again;
2245                         }
2246                         xpt_setup_ccb(&request_ccb->ccb_h, path,
2247                                       request_ccb->ccb_h.pinfo.priority);
2248                         request_ccb->ccb_h.func_code = XPT_SCAN_LUN;
2249                         request_ccb->ccb_h.cbfcnp = scsi_scan_bus;
2250                         request_ccb->ccb_h.flags |= CAM_UNLOCKED;
2251                         request_ccb->ccb_h.ppriv_ptr0 = scan_info;
2252                         request_ccb->crcn.flags =
2253                                 scan_info->request_ccb->crcn.flags;
2254                 }
2255                 mtx_unlock(mtx);
2256                 xpt_action(request_ccb);
2257                 break;
2258         }
2259         default:
2260                 break;
2261         }
2262 }
2263
2264 static void
2265 scsi_scan_lun(struct cam_periph *periph, struct cam_path *path,
2266              cam_flags flags, union ccb *request_ccb)
2267 {
2268         struct ccb_pathinq cpi;
2269         cam_status status;
2270         struct cam_path *new_path;
2271         struct cam_periph *old_periph;
2272         int lock;
2273
2274         CAM_DEBUG(path, CAM_DEBUG_TRACE, ("scsi_scan_lun\n"));
2275
2276         xpt_setup_ccb(&cpi.ccb_h, path, CAM_PRIORITY_NONE);
2277         cpi.ccb_h.func_code = XPT_PATH_INQ;
2278         xpt_action((union ccb *)&cpi);
2279
2280         if (cpi.ccb_h.status != CAM_REQ_CMP) {
2281                 if (request_ccb != NULL) {
2282                         request_ccb->ccb_h.status = cpi.ccb_h.status;
2283                         xpt_done(request_ccb);
2284                 }
2285                 return;
2286         }
2287
2288         if ((cpi.hba_misc & PIM_NOINITIATOR) != 0) {
2289                 /*
2290                  * Can't scan the bus on an adapter that
2291                  * cannot perform the initiator role.
2292                  */
2293                 if (request_ccb != NULL) {
2294                         request_ccb->ccb_h.status = CAM_REQ_CMP;
2295                         xpt_done(request_ccb);
2296                 }
2297                 return;
2298         }
2299
2300         if (request_ccb == NULL) {
2301                 request_ccb = xpt_alloc_ccb_nowait();
2302                 if (request_ccb == NULL) {
2303                         xpt_print(path, "scsi_scan_lun: can't allocate CCB, "
2304                             "can't continue\n");
2305                         return;
2306                 }
2307                 status = xpt_create_path(&new_path, NULL,
2308                                           path->bus->path_id,
2309                                           path->target->target_id,
2310                                           path->device->lun_id);
2311                 if (status != CAM_REQ_CMP) {
2312                         xpt_print(path, "scsi_scan_lun: can't create path, "
2313                             "can't continue\n");
2314                         xpt_free_ccb(request_ccb);
2315                         return;
2316                 }
2317                 xpt_setup_ccb(&request_ccb->ccb_h, new_path, CAM_PRIORITY_XPT);
2318                 request_ccb->ccb_h.cbfcnp = xptscandone;
2319                 request_ccb->ccb_h.func_code = XPT_SCAN_LUN;
2320                 request_ccb->ccb_h.flags |= CAM_UNLOCKED;
2321                 request_ccb->crcn.flags = flags;
2322         }
2323
2324         lock = (xpt_path_owned(path) == 0);
2325         if (lock)
2326                 xpt_path_lock(path);
2327         if ((old_periph = cam_periph_find(path, "probe")) != NULL) {
2328                 if ((old_periph->flags & CAM_PERIPH_INVALID) == 0) {
2329                         probe_softc *softc;
2330
2331                         softc = (probe_softc *)old_periph->softc;
2332                         TAILQ_INSERT_TAIL(&softc->request_ccbs,
2333                             &request_ccb->ccb_h, periph_links.tqe);
2334                 } else {
2335                         request_ccb->ccb_h.status = CAM_REQ_CMP_ERR;
2336                         xpt_done(request_ccb);
2337                 }
2338         } else {
2339                 status = cam_periph_alloc(proberegister, NULL, probecleanup,
2340                                           probestart, "probe",
2341                                           CAM_PERIPH_BIO,
2342                                           request_ccb->ccb_h.path, NULL, 0,
2343                                           request_ccb);
2344
2345                 if (status != CAM_REQ_CMP) {
2346                         xpt_print(path, "scsi_scan_lun: cam_alloc_periph "
2347                             "returned an error, can't continue probe\n");
2348                         request_ccb->ccb_h.status = status;
2349                         xpt_done(request_ccb);
2350                 }
2351         }
2352         if (lock)
2353                 xpt_path_unlock(path);
2354 }
2355
2356 static void
2357 xptscandone(struct cam_periph *periph, union ccb *done_ccb)
2358 {
2359
2360         xpt_free_path(done_ccb->ccb_h.path);
2361         xpt_free_ccb(done_ccb);
2362 }
2363
2364 static struct cam_ed *
2365 scsi_alloc_device(struct cam_eb *bus, struct cam_et *target, lun_id_t lun_id)
2366 {
2367         struct scsi_quirk_entry *quirk;
2368         struct cam_ed *device;
2369
2370         device = xpt_alloc_device(bus, target, lun_id);
2371         if (device == NULL)
2372                 return (NULL);
2373
2374         /*
2375          * Take the default quirk entry until we have inquiry
2376          * data and can determine a better quirk to use.
2377          */
2378         quirk = &scsi_quirk_table[scsi_quirk_table_size - 1];
2379         device->quirk = (void *)quirk;
2380         device->mintags = quirk->mintags;
2381         device->maxtags = quirk->maxtags;
2382         bzero(&device->inq_data, sizeof(device->inq_data));
2383         device->inq_flags = 0;
2384         device->queue_flags = 0;
2385         device->serial_num = NULL;
2386         device->serial_num_len = 0;
2387         device->device_id = NULL;
2388         device->device_id_len = 0;
2389         device->supported_vpds = NULL;
2390         device->supported_vpds_len = 0;
2391         return (device);
2392 }
2393
2394 static void
2395 scsi_devise_transport(struct cam_path *path)
2396 {
2397         struct ccb_pathinq cpi;
2398         struct ccb_trans_settings cts;
2399         struct scsi_inquiry_data *inq_buf;
2400
2401         /* Get transport information from the SIM */
2402         xpt_setup_ccb(&cpi.ccb_h, path, CAM_PRIORITY_NONE);
2403         cpi.ccb_h.func_code = XPT_PATH_INQ;
2404         xpt_action((union ccb *)&cpi);
2405
2406         inq_buf = NULL;
2407         if ((path->device->flags & CAM_DEV_INQUIRY_DATA_VALID) != 0)
2408                 inq_buf = &path->device->inq_data;
2409         path->device->protocol = PROTO_SCSI;
2410         path->device->protocol_version =
2411             inq_buf != NULL ? SID_ANSI_REV(inq_buf) : cpi.protocol_version;
2412         path->device->transport = cpi.transport;
2413         path->device->transport_version = cpi.transport_version;
2414
2415         /*
2416          * Any device not using SPI3 features should
2417          * be considered SPI2 or lower.
2418          */
2419         if (inq_buf != NULL) {
2420                 if (path->device->transport == XPORT_SPI
2421                  && (inq_buf->spi3data & SID_SPI_MASK) == 0
2422                  && path->device->transport_version > 2)
2423                         path->device->transport_version = 2;
2424         } else {
2425                 struct cam_ed* otherdev;
2426
2427                 for (otherdev = TAILQ_FIRST(&path->target->ed_entries);
2428                      otherdev != NULL;
2429                      otherdev = TAILQ_NEXT(otherdev, links)) {
2430                         if (otherdev != path->device)
2431                                 break;
2432                 }
2433
2434                 if (otherdev != NULL) {
2435                         /*
2436                          * Initially assume the same versioning as
2437                          * prior luns for this target.
2438                          */
2439                         path->device->protocol_version =
2440                             otherdev->protocol_version;
2441                         path->device->transport_version =
2442                             otherdev->transport_version;
2443                 } else {
2444                         /* Until we know better, opt for safty */
2445                         path->device->protocol_version = 2;
2446                         if (path->device->transport == XPORT_SPI)
2447                                 path->device->transport_version = 2;
2448                         else
2449                                 path->device->transport_version = 0;
2450                 }
2451         }
2452
2453         /*
2454          * XXX
2455          * For a device compliant with SPC-2 we should be able
2456          * to determine the transport version supported by
2457          * scrutinizing the version descriptors in the
2458          * inquiry buffer.
2459          */
2460
2461         /* Tell the controller what we think */
2462         xpt_setup_ccb(&cts.ccb_h, path, CAM_PRIORITY_NONE);
2463         cts.ccb_h.func_code = XPT_SET_TRAN_SETTINGS;
2464         cts.type = CTS_TYPE_CURRENT_SETTINGS;
2465         cts.transport = path->device->transport;
2466         cts.transport_version = path->device->transport_version;
2467         cts.protocol = path->device->protocol;
2468         cts.protocol_version = path->device->protocol_version;
2469         cts.proto_specific.valid = 0;
2470         cts.xport_specific.valid = 0;
2471         xpt_action((union ccb *)&cts);
2472 }
2473
2474 static void
2475 scsi_dev_advinfo(union ccb *start_ccb)
2476 {
2477         struct cam_ed *device;
2478         struct ccb_dev_advinfo *cdai;
2479         off_t amt;
2480
2481         start_ccb->ccb_h.status = CAM_REQ_INVALID;
2482         device = start_ccb->ccb_h.path->device;
2483         cdai = &start_ccb->cdai;
2484         switch(cdai->buftype) {
2485         case CDAI_TYPE_SCSI_DEVID:
2486                 if (cdai->flags & CDAI_FLAG_STORE)
2487                         return;
2488                 cdai->provsiz = device->device_id_len;
2489                 if (device->device_id_len == 0)
2490                         break;
2491                 amt = device->device_id_len;
2492                 if (cdai->provsiz > cdai->bufsiz)
2493                         amt = cdai->bufsiz;
2494                 memcpy(cdai->buf, device->device_id, amt);
2495                 break;
2496         case CDAI_TYPE_SERIAL_NUM:
2497                 if (cdai->flags & CDAI_FLAG_STORE)
2498                         return;
2499                 cdai->provsiz = device->serial_num_len;
2500                 if (device->serial_num_len == 0)
2501                         break;
2502                 amt = device->serial_num_len;
2503                 if (cdai->provsiz > cdai->bufsiz)
2504                         amt = cdai->bufsiz;
2505                 memcpy(cdai->buf, device->serial_num, amt);
2506                 break;
2507         case CDAI_TYPE_PHYS_PATH:
2508                 if (cdai->flags & CDAI_FLAG_STORE) {
2509                         if (device->physpath != NULL) {
2510                                 free(device->physpath, M_CAMXPT);
2511                                 device->physpath = NULL;
2512                         }
2513                         device->physpath_len = cdai->bufsiz;
2514                         /* Clear existing buffer if zero length */
2515                         if (cdai->bufsiz == 0)
2516                                 break;
2517                         device->physpath = malloc(cdai->bufsiz, M_CAMXPT, M_NOWAIT);
2518                         if (device->physpath == NULL) {
2519                                 start_ccb->ccb_h.status = CAM_REQ_ABORTED;
2520                                 return;
2521                         }
2522                         memcpy(device->physpath, cdai->buf, cdai->bufsiz);
2523                 } else {
2524                         cdai->provsiz = device->physpath_len;
2525                         if (device->physpath_len == 0)
2526                                 break;
2527                         amt = device->physpath_len;
2528                         if (cdai->provsiz > cdai->bufsiz)
2529                                 amt = cdai->bufsiz;
2530                         memcpy(cdai->buf, device->physpath, amt);
2531                 }
2532                 break;
2533         case CDAI_TYPE_RCAPLONG:
2534                 if (cdai->flags & CDAI_FLAG_STORE) {
2535                         if (device->rcap_buf != NULL) {
2536                                 free(device->rcap_buf, M_CAMXPT);
2537                                 device->rcap_buf = NULL;
2538                         }
2539
2540                         device->rcap_len = cdai->bufsiz;
2541                         /* Clear existing buffer if zero length */
2542                         if (cdai->bufsiz == 0)
2543                                 break;
2544
2545                         device->rcap_buf = malloc(cdai->bufsiz, M_CAMXPT,
2546                                                   M_NOWAIT);
2547                         if (device->rcap_buf == NULL) {
2548                                 start_ccb->ccb_h.status = CAM_REQ_ABORTED;
2549                                 return;
2550                         }
2551
2552                         memcpy(device->rcap_buf, cdai->buf, cdai->bufsiz);
2553                 } else {
2554                         cdai->provsiz = device->rcap_len;
2555                         if (device->rcap_len == 0)
2556                                 break;
2557                         amt = device->rcap_len;
2558                         if (cdai->provsiz > cdai->bufsiz)
2559                                 amt = cdai->bufsiz;
2560                         memcpy(cdai->buf, device->rcap_buf, amt);
2561                 }
2562                 break;
2563         case CDAI_TYPE_EXT_INQ:
2564                 /*
2565                  * We fetch extended inquiry data during probe, if
2566                  * available.  We don't allow changing it.
2567                  */
2568                 if (cdai->flags & CDAI_FLAG_STORE)
2569                         return;
2570                 cdai->provsiz = device->ext_inq_len;
2571                 if (device->ext_inq_len == 0)
2572                         break;
2573                 amt = device->ext_inq_len;
2574                 if (cdai->provsiz > cdai->bufsiz)
2575                         amt = cdai->bufsiz;
2576                 memcpy(cdai->buf, device->ext_inq, amt);
2577                 break;
2578         default:
2579                 return;
2580         }
2581         start_ccb->ccb_h.status = CAM_REQ_CMP;
2582
2583         if (cdai->flags & CDAI_FLAG_STORE) {
2584                 xpt_async(AC_ADVINFO_CHANGED, start_ccb->ccb_h.path,
2585                           (void *)(uintptr_t)cdai->buftype);
2586         }
2587 }
2588
2589 static void
2590 scsi_action(union ccb *start_ccb)
2591 {
2592
2593         switch (start_ccb->ccb_h.func_code) {
2594         case XPT_SET_TRAN_SETTINGS:
2595         {
2596                 scsi_set_transfer_settings(&start_ccb->cts,
2597                                            start_ccb->ccb_h.path,
2598                                            /*async_update*/FALSE);
2599                 break;
2600         }
2601         case XPT_SCAN_BUS:
2602         case XPT_SCAN_TGT:
2603                 scsi_scan_bus(start_ccb->ccb_h.path->periph, start_ccb);
2604                 break;
2605         case XPT_SCAN_LUN:
2606                 scsi_scan_lun(start_ccb->ccb_h.path->periph,
2607                               start_ccb->ccb_h.path, start_ccb->crcn.flags,
2608                               start_ccb);
2609                 break;
2610         case XPT_DEV_ADVINFO:
2611         {
2612                 scsi_dev_advinfo(start_ccb);
2613                 break;
2614         }
2615         default:
2616                 xpt_action_default(start_ccb);
2617                 break;
2618         }
2619 }
2620
2621 static void
2622 scsi_set_transfer_settings(struct ccb_trans_settings *cts, struct cam_path *path,
2623                            int async_update)
2624 {
2625         struct  ccb_pathinq cpi;
2626         struct  ccb_trans_settings cur_cts;
2627         struct  ccb_trans_settings_scsi *scsi;
2628         struct  ccb_trans_settings_scsi *cur_scsi;
2629         struct  scsi_inquiry_data *inq_data;
2630         struct  cam_ed *device;
2631
2632         if (path == NULL || (device = path->device) == NULL) {
2633                 cts->ccb_h.status = CAM_PATH_INVALID;
2634                 xpt_done((union ccb *)cts);
2635                 return;
2636         }
2637
2638         if (cts->protocol == PROTO_UNKNOWN
2639          || cts->protocol == PROTO_UNSPECIFIED) {
2640                 cts->protocol = device->protocol;
2641                 cts->protocol_version = device->protocol_version;
2642         }
2643
2644         if (cts->protocol_version == PROTO_VERSION_UNKNOWN
2645          || cts->protocol_version == PROTO_VERSION_UNSPECIFIED)
2646                 cts->protocol_version = device->protocol_version;
2647
2648         if (cts->protocol != device->protocol) {
2649                 xpt_print(path, "Uninitialized Protocol %x:%x?\n",
2650                        cts->protocol, device->protocol);
2651                 cts->protocol = device->protocol;
2652         }
2653
2654         if (cts->protocol_version > device->protocol_version) {
2655                 if (bootverbose) {
2656                         xpt_print(path, "Down reving Protocol "
2657                             "Version from %d to %d?\n", cts->protocol_version,
2658                             device->protocol_version);
2659                 }
2660                 cts->protocol_version = device->protocol_version;
2661         }
2662
2663         if (cts->transport == XPORT_UNKNOWN
2664          || cts->transport == XPORT_UNSPECIFIED) {
2665                 cts->transport = device->transport;
2666                 cts->transport_version = device->transport_version;
2667         }
2668
2669         if (cts->transport_version == XPORT_VERSION_UNKNOWN
2670          || cts->transport_version == XPORT_VERSION_UNSPECIFIED)
2671                 cts->transport_version = device->transport_version;
2672
2673         if (cts->transport != device->transport) {
2674                 xpt_print(path, "Uninitialized Transport %x:%x?\n",
2675                     cts->transport, device->transport);
2676                 cts->transport = device->transport;
2677         }
2678
2679         if (cts->transport_version > device->transport_version) {
2680                 if (bootverbose) {
2681                         xpt_print(path, "Down reving Transport "
2682                             "Version from %d to %d?\n", cts->transport_version,
2683                             device->transport_version);
2684                 }
2685                 cts->transport_version = device->transport_version;
2686         }
2687
2688         /*
2689          * Nothing more of interest to do unless
2690          * this is a device connected via the
2691          * SCSI protocol.
2692          */
2693         if (cts->protocol != PROTO_SCSI) {
2694                 if (async_update == FALSE)
2695                         xpt_action_default((union ccb *)cts);
2696                 return;
2697         }
2698
2699         inq_data = &device->inq_data;
2700         scsi = &cts->proto_specific.scsi;
2701         xpt_setup_ccb(&cpi.ccb_h, path, CAM_PRIORITY_NONE);
2702         cpi.ccb_h.func_code = XPT_PATH_INQ;
2703         xpt_action((union ccb *)&cpi);
2704
2705         /* SCSI specific sanity checking */
2706         if ((cpi.hba_inquiry & PI_TAG_ABLE) == 0
2707          || (INQ_DATA_TQ_ENABLED(inq_data)) == 0
2708          || (device->queue_flags & SCP_QUEUE_DQUE) != 0
2709          || (device->mintags == 0)) {
2710                 /*
2711                  * Can't tag on hardware that doesn't support tags,
2712                  * doesn't have it enabled, or has broken tag support.
2713                  */
2714                 scsi->flags &= ~CTS_SCSI_FLAGS_TAG_ENB;
2715         }
2716
2717         if (async_update == FALSE) {
2718                 /*
2719                  * Perform sanity checking against what the
2720                  * controller and device can do.
2721                  */
2722                 xpt_setup_ccb(&cur_cts.ccb_h, path, CAM_PRIORITY_NONE);
2723                 cur_cts.ccb_h.func_code = XPT_GET_TRAN_SETTINGS;
2724                 cur_cts.type = cts->type;
2725                 xpt_action((union ccb *)&cur_cts);
2726                 if (cam_ccb_status((union ccb *)&cur_cts) != CAM_REQ_CMP) {
2727                         return;
2728                 }
2729                 cur_scsi = &cur_cts.proto_specific.scsi;
2730                 if ((scsi->valid & CTS_SCSI_VALID_TQ) == 0) {
2731                         scsi->flags &= ~CTS_SCSI_FLAGS_TAG_ENB;
2732                         scsi->flags |= cur_scsi->flags & CTS_SCSI_FLAGS_TAG_ENB;
2733                 }
2734                 if ((cur_scsi->valid & CTS_SCSI_VALID_TQ) == 0)
2735                         scsi->flags &= ~CTS_SCSI_FLAGS_TAG_ENB;
2736         }
2737
2738         /* SPI specific sanity checking */
2739         if (cts->transport == XPORT_SPI && async_update == FALSE) {
2740                 u_int spi3caps;
2741                 struct ccb_trans_settings_spi *spi;
2742                 struct ccb_trans_settings_spi *cur_spi;
2743
2744                 spi = &cts->xport_specific.spi;
2745
2746                 cur_spi = &cur_cts.xport_specific.spi;
2747
2748                 /* Fill in any gaps in what the user gave us */
2749                 if ((spi->valid & CTS_SPI_VALID_SYNC_RATE) == 0)
2750                         spi->sync_period = cur_spi->sync_period;
2751                 if ((cur_spi->valid & CTS_SPI_VALID_SYNC_RATE) == 0)
2752                         spi->sync_period = 0;
2753                 if ((spi->valid & CTS_SPI_VALID_SYNC_OFFSET) == 0)
2754                         spi->sync_offset = cur_spi->sync_offset;
2755                 if ((cur_spi->valid & CTS_SPI_VALID_SYNC_OFFSET) == 0)
2756                         spi->sync_offset = 0;
2757                 if ((spi->valid & CTS_SPI_VALID_PPR_OPTIONS) == 0)
2758                         spi->ppr_options = cur_spi->ppr_options;
2759                 if ((cur_spi->valid & CTS_SPI_VALID_PPR_OPTIONS) == 0)
2760                         spi->ppr_options = 0;
2761                 if ((spi->valid & CTS_SPI_VALID_BUS_WIDTH) == 0)
2762                         spi->bus_width = cur_spi->bus_width;
2763                 if ((cur_spi->valid & CTS_SPI_VALID_BUS_WIDTH) == 0)
2764                         spi->bus_width = 0;
2765                 if ((spi->valid & CTS_SPI_VALID_DISC) == 0) {
2766                         spi->flags &= ~CTS_SPI_FLAGS_DISC_ENB;
2767                         spi->flags |= cur_spi->flags & CTS_SPI_FLAGS_DISC_ENB;
2768                 }
2769                 if ((cur_spi->valid & CTS_SPI_VALID_DISC) == 0)
2770                         spi->flags &= ~CTS_SPI_FLAGS_DISC_ENB;
2771                 if (((device->flags & CAM_DEV_INQUIRY_DATA_VALID) != 0
2772                   && (inq_data->flags & SID_Sync) == 0
2773                   && cts->type == CTS_TYPE_CURRENT_SETTINGS)
2774                  || ((cpi.hba_inquiry & PI_SDTR_ABLE) == 0)) {
2775                         /* Force async */
2776                         spi->sync_period = 0;
2777                         spi->sync_offset = 0;
2778                 }
2779
2780                 switch (spi->bus_width) {
2781                 case MSG_EXT_WDTR_BUS_32_BIT:
2782                         if (((device->flags & CAM_DEV_INQUIRY_DATA_VALID) == 0
2783                           || (inq_data->flags & SID_WBus32) != 0
2784                           || cts->type == CTS_TYPE_USER_SETTINGS)
2785                          && (cpi.hba_inquiry & PI_WIDE_32) != 0)
2786                                 break;
2787                         /* Fall Through to 16-bit */
2788                 case MSG_EXT_WDTR_BUS_16_BIT:
2789                         if (((device->flags & CAM_DEV_INQUIRY_DATA_VALID) == 0
2790                           || (inq_data->flags & SID_WBus16) != 0
2791                           || cts->type == CTS_TYPE_USER_SETTINGS)
2792                          && (cpi.hba_inquiry & PI_WIDE_16) != 0) {
2793                                 spi->bus_width = MSG_EXT_WDTR_BUS_16_BIT;
2794                                 break;
2795                         }
2796                         /* Fall Through to 8-bit */
2797                 default: /* New bus width?? */
2798                 case MSG_EXT_WDTR_BUS_8_BIT:
2799                         /* All targets can do this */
2800                         spi->bus_width = MSG_EXT_WDTR_BUS_8_BIT;
2801                         break;
2802                 }
2803
2804                 spi3caps = cpi.xport_specific.spi.ppr_options;
2805                 if ((device->flags & CAM_DEV_INQUIRY_DATA_VALID) != 0
2806                  && cts->type == CTS_TYPE_CURRENT_SETTINGS)
2807                         spi3caps &= inq_data->spi3data;
2808
2809                 if ((spi3caps & SID_SPI_CLOCK_DT) == 0)
2810                         spi->ppr_options &= ~MSG_EXT_PPR_DT_REQ;
2811
2812                 if ((spi3caps & SID_SPI_IUS) == 0)
2813                         spi->ppr_options &= ~MSG_EXT_PPR_IU_REQ;
2814
2815                 if ((spi3caps & SID_SPI_QAS) == 0)
2816                         spi->ppr_options &= ~MSG_EXT_PPR_QAS_REQ;
2817
2818                 /* No SPI Transfer settings are allowed unless we are wide */
2819                 if (spi->bus_width == 0)
2820                         spi->ppr_options = 0;
2821
2822                 if ((spi->valid & CTS_SPI_VALID_DISC)
2823                  && ((spi->flags & CTS_SPI_FLAGS_DISC_ENB) == 0)) {
2824                         /*
2825                          * Can't tag queue without disconnection.
2826                          */
2827                         scsi->flags &= ~CTS_SCSI_FLAGS_TAG_ENB;
2828                         scsi->valid |= CTS_SCSI_VALID_TQ;
2829                 }
2830
2831                 /*
2832                  * If we are currently performing tagged transactions to
2833                  * this device and want to change its negotiation parameters,
2834                  * go non-tagged for a bit to give the controller a chance to
2835                  * negotiate unhampered by tag messages.
2836                  */
2837                 if (cts->type == CTS_TYPE_CURRENT_SETTINGS
2838                  && (device->inq_flags & SID_CmdQue) != 0
2839                  && (scsi->flags & CTS_SCSI_FLAGS_TAG_ENB) != 0
2840                  && (spi->flags & (CTS_SPI_VALID_SYNC_RATE|
2841                                    CTS_SPI_VALID_SYNC_OFFSET|
2842                                    CTS_SPI_VALID_BUS_WIDTH)) != 0)
2843                         scsi_toggle_tags(path);
2844         }
2845
2846         if (cts->type == CTS_TYPE_CURRENT_SETTINGS
2847          && (scsi->valid & CTS_SCSI_VALID_TQ) != 0) {
2848                 int device_tagenb;
2849
2850                 /*
2851                  * If we are transitioning from tags to no-tags or
2852                  * vice-versa, we need to carefully freeze and restart
2853                  * the queue so that we don't overlap tagged and non-tagged
2854                  * commands.  We also temporarily stop tags if there is
2855                  * a change in transfer negotiation settings to allow
2856                  * "tag-less" negotiation.
2857                  */
2858                 if ((device->flags & CAM_DEV_TAG_AFTER_COUNT) != 0
2859                  || (device->inq_flags & SID_CmdQue) != 0)
2860                         device_tagenb = TRUE;
2861                 else
2862                         device_tagenb = FALSE;
2863
2864                 if (((scsi->flags & CTS_SCSI_FLAGS_TAG_ENB) != 0
2865                   && device_tagenb == FALSE)
2866                  || ((scsi->flags & CTS_SCSI_FLAGS_TAG_ENB) == 0
2867                   && device_tagenb == TRUE)) {
2868
2869                         if ((scsi->flags & CTS_SCSI_FLAGS_TAG_ENB) != 0) {
2870                                 /*
2871                                  * Delay change to use tags until after a
2872                                  * few commands have gone to this device so
2873                                  * the controller has time to perform transfer
2874                                  * negotiations without tagged messages getting
2875                                  * in the way.
2876                                  */
2877                                 device->tag_delay_count = CAM_TAG_DELAY_COUNT;
2878                                 device->flags |= CAM_DEV_TAG_AFTER_COUNT;
2879                         } else {
2880                                 xpt_stop_tags(path);
2881                         }
2882                 }
2883         }
2884         if (async_update == FALSE)
2885                 xpt_action_default((union ccb *)cts);
2886 }
2887
2888 static void
2889 scsi_toggle_tags(struct cam_path *path)
2890 {
2891         struct cam_ed *dev;
2892
2893         /*
2894          * Give controllers a chance to renegotiate
2895          * before starting tag operations.  We
2896          * "toggle" tagged queuing off then on
2897          * which causes the tag enable command delay
2898          * counter to come into effect.
2899          */
2900         dev = path->device;
2901         if ((dev->flags & CAM_DEV_TAG_AFTER_COUNT) != 0
2902          || ((dev->inq_flags & SID_CmdQue) != 0
2903           && (dev->inq_flags & (SID_Sync|SID_WBus16|SID_WBus32)) != 0)) {
2904                 struct ccb_trans_settings cts;
2905
2906                 xpt_setup_ccb(&cts.ccb_h, path, CAM_PRIORITY_NONE);
2907                 cts.protocol = PROTO_SCSI;
2908                 cts.protocol_version = PROTO_VERSION_UNSPECIFIED;
2909                 cts.transport = XPORT_UNSPECIFIED;
2910                 cts.transport_version = XPORT_VERSION_UNSPECIFIED;
2911                 cts.proto_specific.scsi.flags = 0;
2912                 cts.proto_specific.scsi.valid = CTS_SCSI_VALID_TQ;
2913                 scsi_set_transfer_settings(&cts, path,
2914                                           /*async_update*/TRUE);
2915                 cts.proto_specific.scsi.flags = CTS_SCSI_FLAGS_TAG_ENB;
2916                 scsi_set_transfer_settings(&cts, path,
2917                                           /*async_update*/TRUE);
2918         }
2919 }
2920
2921 /*
2922  * Handle any per-device event notifications that require action by the XPT.
2923  */
2924 static void
2925 scsi_dev_async(u_int32_t async_code, struct cam_eb *bus, struct cam_et *target,
2926               struct cam_ed *device, void *async_arg)
2927 {
2928         cam_status status;
2929         struct cam_path newpath;
2930
2931         /*
2932          * We only need to handle events for real devices.
2933          */
2934         if (target->target_id == CAM_TARGET_WILDCARD
2935          || device->lun_id == CAM_LUN_WILDCARD)
2936                 return;
2937
2938         /*
2939          * We need our own path with wildcards expanded to
2940          * handle certain types of events.
2941          */
2942         if ((async_code == AC_SENT_BDR)
2943          || (async_code == AC_BUS_RESET)
2944          || (async_code == AC_INQ_CHANGED))
2945                 status = xpt_compile_path(&newpath, NULL,
2946                                           bus->path_id,
2947                                           target->target_id,
2948                                           device->lun_id);
2949         else
2950                 status = CAM_REQ_CMP_ERR;
2951
2952         if (status == CAM_REQ_CMP) {
2953
2954                 /*
2955                  * Allow transfer negotiation to occur in a
2956                  * tag free environment and after settle delay.
2957                  */
2958                 if (async_code == AC_SENT_BDR
2959                  || async_code == AC_BUS_RESET) {
2960                         cam_freeze_devq(&newpath);
2961                         cam_release_devq(&newpath,
2962                                 RELSIM_RELEASE_AFTER_TIMEOUT,
2963                                 /*reduction*/0,
2964                                 /*timeout*/scsi_delay,
2965                                 /*getcount_only*/0);
2966                         scsi_toggle_tags(&newpath);
2967                 }
2968
2969                 if (async_code == AC_INQ_CHANGED) {
2970                         /*
2971                          * We've sent a start unit command, or
2972                          * something similar to a device that
2973                          * may have caused its inquiry data to
2974                          * change. So we re-scan the device to
2975                          * refresh the inquiry data for it.
2976                          */
2977                         scsi_scan_lun(newpath.periph, &newpath,
2978                                      CAM_EXPECT_INQ_CHANGE, NULL);
2979                 }
2980                 xpt_release_path(&newpath);
2981         } else if (async_code == AC_LOST_DEVICE &&
2982             (device->flags & CAM_DEV_UNCONFIGURED) == 0) {
2983                 device->flags |= CAM_DEV_UNCONFIGURED;
2984                 xpt_release_device(device);
2985         } else if (async_code == AC_TRANSFER_NEG) {
2986                 struct ccb_trans_settings *settings;
2987                 struct cam_path path;
2988
2989                 settings = (struct ccb_trans_settings *)async_arg;
2990                 xpt_compile_path(&path, NULL, bus->path_id, target->target_id,
2991                                  device->lun_id);
2992                 scsi_set_transfer_settings(settings, &path,
2993                                           /*async_update*/TRUE);
2994                 xpt_release_path(&path);
2995         }
2996 }
2997
2998 static void
2999 scsi_announce_periph(struct cam_periph *periph)
3000 {
3001         struct  ccb_pathinq cpi;
3002         struct  ccb_trans_settings cts;
3003         struct  cam_path *path = periph->path;
3004         u_int   speed;
3005         u_int   freq;
3006         u_int   mb;
3007
3008         cam_periph_assert(periph, MA_OWNED);
3009
3010         xpt_setup_ccb(&cts.ccb_h, path, CAM_PRIORITY_NORMAL);
3011         cts.ccb_h.func_code = XPT_GET_TRAN_SETTINGS;
3012         cts.type = CTS_TYPE_CURRENT_SETTINGS;
3013         xpt_action((union ccb*)&cts);
3014         if (cam_ccb_status((union ccb *)&cts) != CAM_REQ_CMP)
3015                 return;
3016         /* Ask the SIM for its base transfer speed */
3017         xpt_setup_ccb(&cpi.ccb_h, path, CAM_PRIORITY_NORMAL);
3018         cpi.ccb_h.func_code = XPT_PATH_INQ;
3019         xpt_action((union ccb *)&cpi);
3020         /* Report connection speed */
3021         speed = cpi.base_transfer_speed;
3022         freq = 0;
3023         if (cts.ccb_h.status == CAM_REQ_CMP && cts.transport == XPORT_SPI) {
3024                 struct  ccb_trans_settings_spi *spi =
3025                     &cts.xport_specific.spi;
3026
3027                 if ((spi->valid & CTS_SPI_VALID_SYNC_OFFSET) != 0
3028                   && spi->sync_offset != 0) {
3029                         freq = scsi_calc_syncsrate(spi->sync_period);
3030                         speed = freq;
3031                 }
3032                 if ((spi->valid & CTS_SPI_VALID_BUS_WIDTH) != 0)
3033                         speed *= (0x01 << spi->bus_width);
3034         }
3035         if (cts.ccb_h.status == CAM_REQ_CMP && cts.transport == XPORT_FC) {
3036                 struct  ccb_trans_settings_fc *fc =
3037                     &cts.xport_specific.fc;
3038
3039                 if (fc->valid & CTS_FC_VALID_SPEED)
3040                         speed = fc->bitrate;
3041         }
3042         if (cts.ccb_h.status == CAM_REQ_CMP && cts.transport == XPORT_SAS) {
3043                 struct  ccb_trans_settings_sas *sas =
3044                     &cts.xport_specific.sas;
3045
3046                 if (sas->valid & CTS_SAS_VALID_SPEED)
3047                         speed = sas->bitrate;
3048         }
3049         mb = speed / 1000;
3050         if (mb > 0)
3051                 printf("%s%d: %d.%03dMB/s transfers",
3052                        periph->periph_name, periph->unit_number,
3053                        mb, speed % 1000);
3054         else
3055                 printf("%s%d: %dKB/s transfers", periph->periph_name,
3056                        periph->unit_number, speed);
3057         /* Report additional information about SPI connections */
3058         if (cts.ccb_h.status == CAM_REQ_CMP && cts.transport == XPORT_SPI) {
3059                 struct  ccb_trans_settings_spi *spi;
3060
3061                 spi = &cts.xport_specific.spi;
3062                 if (freq != 0) {
3063                         printf(" (%d.%03dMHz%s, offset %d", freq / 1000,
3064                                freq % 1000,
3065                                (spi->ppr_options & MSG_EXT_PPR_DT_REQ) != 0
3066                              ? " DT" : "",
3067                                spi->sync_offset);
3068                 }
3069                 if ((spi->valid & CTS_SPI_VALID_BUS_WIDTH) != 0
3070                  && spi->bus_width > 0) {
3071                         if (freq != 0) {
3072                                 printf(", ");
3073                         } else {
3074                                 printf(" (");
3075                         }
3076                         printf("%dbit)", 8 * (0x01 << spi->bus_width));
3077                 } else if (freq != 0) {
3078                         printf(")");
3079                 }
3080         }
3081         if (cts.ccb_h.status == CAM_REQ_CMP && cts.transport == XPORT_FC) {
3082                 struct  ccb_trans_settings_fc *fc;
3083
3084                 fc = &cts.xport_specific.fc;
3085                 if (fc->valid & CTS_FC_VALID_WWNN)
3086                         printf(" WWNN 0x%llx", (long long) fc->wwnn);
3087                 if (fc->valid & CTS_FC_VALID_WWPN)
3088                         printf(" WWPN 0x%llx", (long long) fc->wwpn);
3089                 if (fc->valid & CTS_FC_VALID_PORT)
3090                         printf(" PortID 0x%x", fc->port);
3091         }
3092         printf("\n");
3093 }
3094