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