sys/cam/scsi/scsi_xpt.c

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