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