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