1/*-
2 * FreeBSD/CAM specific routines for LSI '909 FC  adapters.
3 * FreeBSD Version.
4 *
5 * Copyright (c)  2000, 2001 by Greg Ansley
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 *    notice immediately at the beginning of the file, without modification,
12 *    this list of conditions, and the following disclaimer.
13 * 2. The name of the author may not be used to endorse or promote products
14 *    derived from this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
20 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28/*-
29 * Copyright (c) 2002, 2006 by Matthew Jacob
30 * All rights reserved.
31 *
32 * Redistribution and use in source and binary forms, with or without
33 * modification, are permitted provided that the following conditions are
34 * met:
35 * 1. Redistributions of source code must retain the above copyright
36 *    notice, this list of conditions and the following disclaimer.
37 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
38 *    substantially similar to the "NO WARRANTY" disclaimer below
39 *    ("Disclaimer") and any redistribution must be conditioned upon including
40 *    a substantially similar Disclaimer requirement for further binary
41 *    redistribution.
42 * 3. Neither the names of the above listed copyright holders nor the names
43 *    of any contributors may be used to endorse or promote products derived
44 *    from this software without specific prior written permission.
45 *
46 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
47 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
48 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
49 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
50 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
51 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
52 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
53 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
54 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
55 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF THE COPYRIGHT
56 * OWNER OR CONTRIBUTOR IS ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
57 *
58 * Support from Chris Ellsworth in order to make SAS adapters work
59 * is gratefully acknowledged.
60 *
61 * Support from LSI-Logic has also gone a great deal toward making this a
62 * workable subsystem and is gratefully acknowledged.
63 */
64/*-
65 * Copyright (c) 2004, Avid Technology, Inc. and its contributors.
66 * Copyright (c) 2005, WHEEL Sp. z o.o.
67 * Copyright (c) 2004, 2005 Justin T. Gibbs
68 * All rights reserved.
69 *
70 * Redistribution and use in source and binary forms, with or without
71 * modification, are permitted provided that the following conditions are
72 * met:
73 * 1. Redistributions of source code must retain the above copyright
74 *    notice, this list of conditions and the following disclaimer.
75 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
76 *    substantially similar to the "NO WARRANTY" disclaimer below
77 *    ("Disclaimer") and any redistribution must be conditioned upon including
78 *    a substantially similar Disclaimer requirement for further binary
79 *    redistribution.
80 * 3. Neither the names of the above listed copyright holders nor the names
81 *    of any contributors may be used to endorse or promote products derived
82 *    from this software without specific prior written permission.
83 *
84 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
85 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
86 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
87 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
88 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
89 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
90 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
91 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
92 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
93 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF THE COPYRIGHT
94 * OWNER OR CONTRIBUTOR IS ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
95 */
96#include <sys/cdefs.h>
97__FBSDID("$FreeBSD$");
98
99#include <dev/mpt/mpt.h>
100#include <dev/mpt/mpt_cam.h>
101#include <dev/mpt/mpt_raid.h>
102
103#include "dev/mpt/mpilib/mpi_ioc.h" /* XXX Fix Event Handling!!! */
104#include "dev/mpt/mpilib/mpi_init.h"
105#include "dev/mpt/mpilib/mpi_targ.h"
106#include "dev/mpt/mpilib/mpi_fc.h"
107#include "dev/mpt/mpilib/mpi_sas.h"
108
109#include <sys/callout.h>
110#include <sys/kthread.h>
111#include <sys/sysctl.h>
112
113static void mpt_poll(struct cam_sim *);
114static timeout_t mpt_timeout;
115static void mpt_action(struct cam_sim *, union ccb *);
116static int
117mpt_get_spi_settings(struct mpt_softc *, struct ccb_trans_settings *);
118static void mpt_setwidth(struct mpt_softc *, int, int);
119static void mpt_setsync(struct mpt_softc *, int, int, int);
120static int mpt_update_spi_config(struct mpt_softc *, int);
121
122static mpt_reply_handler_t mpt_scsi_reply_handler;
123static mpt_reply_handler_t mpt_scsi_tmf_reply_handler;
124static mpt_reply_handler_t mpt_fc_els_reply_handler;
125static int mpt_scsi_reply_frame_handler(struct mpt_softc *, request_t *,
126					MSG_DEFAULT_REPLY *);
127static int mpt_bus_reset(struct mpt_softc *, target_id_t, lun_id_t, int);
128static int mpt_fc_reset_link(struct mpt_softc *, int);
129
130static int mpt_spawn_recovery_thread(struct mpt_softc *mpt);
131static void mpt_terminate_recovery_thread(struct mpt_softc *mpt);
132static void mpt_recovery_thread(void *arg);
133static void mpt_recover_commands(struct mpt_softc *mpt);
134
135static int mpt_scsi_send_tmf(struct mpt_softc *, u_int, u_int, u_int,
136    u_int, u_int, u_int, int);
137
138static void mpt_fc_post_els(struct mpt_softc *mpt, request_t *, int);
139static void mpt_post_target_command(struct mpt_softc *, request_t *, int);
140static int mpt_add_els_buffers(struct mpt_softc *mpt);
141static int mpt_add_target_commands(struct mpt_softc *mpt);
142static int mpt_enable_lun(struct mpt_softc *, target_id_t, lun_id_t);
143static int mpt_disable_lun(struct mpt_softc *, target_id_t, lun_id_t);
144static void mpt_target_start_io(struct mpt_softc *, union ccb *);
145static cam_status mpt_abort_target_ccb(struct mpt_softc *, union ccb *);
146static int mpt_abort_target_cmd(struct mpt_softc *, request_t *);
147static void mpt_scsi_tgt_status(struct mpt_softc *, union ccb *, request_t *,
148    uint8_t, uint8_t const *);
149static void
150mpt_scsi_tgt_tsk_mgmt(struct mpt_softc *, request_t *, mpt_task_mgmt_t,
151    tgt_resource_t *, int);
152static void mpt_tgt_dump_tgt_state(struct mpt_softc *, request_t *);
153static void mpt_tgt_dump_req_state(struct mpt_softc *, request_t *);
154static mpt_reply_handler_t mpt_scsi_tgt_reply_handler;
155static mpt_reply_handler_t mpt_sata_pass_reply_handler;
156
157static uint32_t scsi_io_handler_id = MPT_HANDLER_ID_NONE;
158static uint32_t scsi_tmf_handler_id = MPT_HANDLER_ID_NONE;
159static uint32_t fc_els_handler_id = MPT_HANDLER_ID_NONE;
160static uint32_t sata_pass_handler_id = MPT_HANDLER_ID_NONE;
161
162static mpt_probe_handler_t	mpt_cam_probe;
163static mpt_attach_handler_t	mpt_cam_attach;
164static mpt_enable_handler_t	mpt_cam_enable;
165static mpt_ready_handler_t	mpt_cam_ready;
166static mpt_event_handler_t	mpt_cam_event;
167static mpt_reset_handler_t	mpt_cam_ioc_reset;
168static mpt_detach_handler_t	mpt_cam_detach;
169
170static struct mpt_personality mpt_cam_personality =
171{
172	.name		= "mpt_cam",
173	.probe		= mpt_cam_probe,
174	.attach		= mpt_cam_attach,
175	.enable		= mpt_cam_enable,
176	.ready		= mpt_cam_ready,
177	.event		= mpt_cam_event,
178	.reset		= mpt_cam_ioc_reset,
179	.detach		= mpt_cam_detach,
180};
181
182DECLARE_MPT_PERSONALITY(mpt_cam, SI_ORDER_SECOND);
183MODULE_DEPEND(mpt_cam, cam, 1, 1, 1);
184
185int mpt_enable_sata_wc = -1;
186TUNABLE_INT("hw.mpt.enable_sata_wc", &mpt_enable_sata_wc);
187
188static int
189mpt_cam_probe(struct mpt_softc *mpt)
190{
191	int role;
192
193	/*
194	 * Only attach to nodes that support the initiator or target role
195	 * (or want to) or have RAID physical devices that need CAM pass-thru
196	 * support.
197	 */
198	if (mpt->do_cfg_role) {
199		role = mpt->cfg_role;
200	} else {
201		role = mpt->role;
202	}
203	if ((role & (MPT_ROLE_TARGET|MPT_ROLE_INITIATOR)) != 0 ||
204	    (mpt->ioc_page2 != NULL && mpt->ioc_page2->MaxPhysDisks != 0)) {
205		return (0);
206	}
207	return (ENODEV);
208}
209
210static int
211mpt_cam_attach(struct mpt_softc *mpt)
212{
213	struct cam_devq *devq;
214	mpt_handler_t	 handler;
215	int		 maxq;
216	int		 error;
217
218	MPT_LOCK(mpt);
219	TAILQ_INIT(&mpt->request_timeout_list);
220	maxq = (mpt->ioc_facts.GlobalCredits < MPT_MAX_REQUESTS(mpt))?
221	    mpt->ioc_facts.GlobalCredits : MPT_MAX_REQUESTS(mpt);
222
223	handler.reply_handler = mpt_scsi_reply_handler;
224	error = mpt_register_handler(mpt, MPT_HANDLER_REPLY, handler,
225				     &scsi_io_handler_id);
226	if (error != 0) {
227		MPT_UNLOCK(mpt);
228		goto cleanup;
229	}
230
231	handler.reply_handler = mpt_scsi_tmf_reply_handler;
232	error = mpt_register_handler(mpt, MPT_HANDLER_REPLY, handler,
233				     &scsi_tmf_handler_id);
234	if (error != 0) {
235		MPT_UNLOCK(mpt);
236		goto cleanup;
237	}
238
239	/*
240	 * If we're fibre channel and could support target mode, we register
241	 * an ELS reply handler and give it resources.
242	 */
243	if (mpt->is_fc && (mpt->role & MPT_ROLE_TARGET) != 0) {
244		handler.reply_handler = mpt_fc_els_reply_handler;
245		error = mpt_register_handler(mpt, MPT_HANDLER_REPLY, handler,
246		    &fc_els_handler_id);
247		if (error != 0) {
248			MPT_UNLOCK(mpt);
249			goto cleanup;
250		}
251		if (mpt_add_els_buffers(mpt) == FALSE) {
252			error = ENOMEM;
253			MPT_UNLOCK(mpt);
254			goto cleanup;
255		}
256		maxq -= mpt->els_cmds_allocated;
257	}
258
259	/*
260	 * If we support target mode, we register a reply handler for it,
261	 * but don't add command resources until we actually enable target
262	 * mode.
263	 */
264	if (mpt->is_fc && (mpt->role & MPT_ROLE_TARGET) != 0) {
265		handler.reply_handler = mpt_scsi_tgt_reply_handler;
266		error = mpt_register_handler(mpt, MPT_HANDLER_REPLY, handler,
267		    &mpt->scsi_tgt_handler_id);
268		if (error != 0) {
269			MPT_UNLOCK(mpt);
270			goto cleanup;
271		}
272	}
273
274	if (mpt->is_sas) {
275		handler.reply_handler = mpt_sata_pass_reply_handler;
276		error = mpt_register_handler(mpt, MPT_HANDLER_REPLY, handler,
277		    &sata_pass_handler_id);
278		if (error != 0) {
279			MPT_UNLOCK(mpt);
280			goto cleanup;
281		}
282	}
283
284	/*
285	 * We keep one request reserved for timeout TMF requests.
286	 */
287	mpt->tmf_req = mpt_get_request(mpt, FALSE);
288	if (mpt->tmf_req == NULL) {
289		mpt_prt(mpt, "Unable to allocate dedicated TMF request!\n");
290		error = ENOMEM;
291		MPT_UNLOCK(mpt);
292		goto cleanup;
293	}
294
295	/*
296	 * Mark the request as free even though not on the free list.
297	 * There is only one TMF request allowed to be outstanding at
298	 * a time and the TMF routines perform their own allocation
299	 * tracking using the standard state flags.
300	 */
301	mpt->tmf_req->state = REQ_STATE_FREE;
302	maxq--;
303
304	/*
305	 * The rest of this is CAM foo, for which we need to drop our lock
306	 */
307	MPT_UNLOCK(mpt);
308
309	if (mpt_spawn_recovery_thread(mpt) != 0) {
310		mpt_prt(mpt, "Unable to spawn recovery thread!\n");
311		error = ENOMEM;
312		goto cleanup;
313	}
314
315	/*
316	 * Create the device queue for our SIM(s).
317	 */
318	devq = cam_simq_alloc(maxq);
319	if (devq == NULL) {
320		mpt_prt(mpt, "Unable to allocate CAM SIMQ!\n");
321		error = ENOMEM;
322		goto cleanup;
323	}
324
325	/*
326	 * Construct our SIM entry.
327	 */
328	mpt->sim =
329	    mpt_sim_alloc(mpt_action, mpt_poll, "mpt", mpt, 1, maxq, devq);
330	if (mpt->sim == NULL) {
331		mpt_prt(mpt, "Unable to allocate CAM SIM!\n");
332		cam_simq_free(devq);
333		error = ENOMEM;
334		goto cleanup;
335	}
336
337	/*
338	 * Register exactly this bus.
339	 */
340	MPT_LOCK(mpt);
341	if (xpt_bus_register(mpt->sim, mpt->dev, 0) != CAM_SUCCESS) {
342		mpt_prt(mpt, "Bus registration Failed!\n");
343		error = ENOMEM;
344		MPT_UNLOCK(mpt);
345		goto cleanup;
346	}
347
348	if (xpt_create_path(&mpt->path, NULL, cam_sim_path(mpt->sim),
349	    CAM_TARGET_WILDCARD, CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
350		mpt_prt(mpt, "Unable to allocate Path!\n");
351		error = ENOMEM;
352		MPT_UNLOCK(mpt);
353		goto cleanup;
354	}
355	MPT_UNLOCK(mpt);
356
357	/*
358	 * Only register a second bus for RAID physical
359	 * devices if the controller supports RAID.
360	 */
361	if (mpt->ioc_page2 == NULL || mpt->ioc_page2->MaxPhysDisks == 0) {
362		return (0);
363	}
364
365	/*
366	 * Create a "bus" to export all hidden disks to CAM.
367	 */
368	mpt->phydisk_sim =
369	    mpt_sim_alloc(mpt_action, mpt_poll, "mpt", mpt, 1, maxq, devq);
370	if (mpt->phydisk_sim == NULL) {
371		mpt_prt(mpt, "Unable to allocate Physical Disk CAM SIM!\n");
372		error = ENOMEM;
373		goto cleanup;
374	}
375
376	/*
377	 * Register this bus.
378	 */
379	MPT_LOCK(mpt);
380	if (xpt_bus_register(mpt->phydisk_sim, mpt->dev, 1) !=
381	    CAM_SUCCESS) {
382		mpt_prt(mpt, "Physical Disk Bus registration Failed!\n");
383		error = ENOMEM;
384		MPT_UNLOCK(mpt);
385		goto cleanup;
386	}
387
388	if (xpt_create_path(&mpt->phydisk_path, NULL,
389	    cam_sim_path(mpt->phydisk_sim),
390	    CAM_TARGET_WILDCARD, CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
391		mpt_prt(mpt, "Unable to allocate Physical Disk Path!\n");
392		error = ENOMEM;
393		MPT_UNLOCK(mpt);
394		goto cleanup;
395	}
396	MPT_UNLOCK(mpt);
397	mpt_lprt(mpt, MPT_PRT_DEBUG, "attached cam\n");
398	return (0);
399
400cleanup:
401	mpt_cam_detach(mpt);
402	return (error);
403}
404
405/*
406 * Read FC configuration information
407 */
408static int
409mpt_read_config_info_fc(struct mpt_softc *mpt)
410{
411	struct sysctl_ctx_list *ctx;
412	struct sysctl_oid *tree;
413	char *topology = NULL;
414	int rv;
415
416	rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_FC_PORT, 0,
417	    0, &mpt->mpt_fcport_page0.Header, FALSE, 5000);
418	if (rv) {
419		return (-1);
420	}
421	mpt_lprt(mpt, MPT_PRT_DEBUG, "FC Port Page 0 Header: %x %x %x %x\n",
422		 mpt->mpt_fcport_page0.Header.PageVersion,
423		 mpt->mpt_fcport_page0.Header.PageLength,
424		 mpt->mpt_fcport_page0.Header.PageNumber,
425		 mpt->mpt_fcport_page0.Header.PageType);
426
427
428	rv = mpt_read_cur_cfg_page(mpt, 0, &mpt->mpt_fcport_page0.Header,
429	    sizeof(mpt->mpt_fcport_page0), FALSE, 5000);
430	if (rv) {
431		mpt_prt(mpt, "failed to read FC Port Page 0\n");
432		return (-1);
433	}
434	mpt2host_config_page_fc_port_0(&mpt->mpt_fcport_page0);
435
436	mpt->mpt_fcport_speed = mpt->mpt_fcport_page0.CurrentSpeed;
437
438	switch (mpt->mpt_fcport_page0.Flags &
439	    MPI_FCPORTPAGE0_FLAGS_ATTACH_TYPE_MASK) {
440	case MPI_FCPORTPAGE0_FLAGS_ATTACH_NO_INIT:
441		mpt->mpt_fcport_speed = 0;
442		topology = "<NO LOOP>";
443		break;
444	case MPI_FCPORTPAGE0_FLAGS_ATTACH_POINT_TO_POINT:
445		topology = "N-Port";
446		break;
447	case MPI_FCPORTPAGE0_FLAGS_ATTACH_PRIVATE_LOOP:
448		topology = "NL-Port";
449		break;
450	case MPI_FCPORTPAGE0_FLAGS_ATTACH_FABRIC_DIRECT:
451		topology = "F-Port";
452		break;
453	case MPI_FCPORTPAGE0_FLAGS_ATTACH_PUBLIC_LOOP:
454		topology = "FL-Port";
455		break;
456	default:
457		mpt->mpt_fcport_speed = 0;
458		topology = "?";
459		break;
460	}
461
462	mpt_lprt(mpt, MPT_PRT_INFO,
463	    "FC Port Page 0: Topology <%s> WWNN 0x%08x%08x WWPN 0x%08x%08x "
464	    "Speed %u-Gbit\n", topology,
465	    mpt->mpt_fcport_page0.WWNN.High,
466	    mpt->mpt_fcport_page0.WWNN.Low,
467	    mpt->mpt_fcport_page0.WWPN.High,
468	    mpt->mpt_fcport_page0.WWPN.Low,
469	    mpt->mpt_fcport_speed);
470	MPT_UNLOCK(mpt);
471	ctx = device_get_sysctl_ctx(mpt->dev);
472	tree = device_get_sysctl_tree(mpt->dev);
473
474	snprintf(mpt->scinfo.fc.wwnn, sizeof (mpt->scinfo.fc.wwnn),
475	    "0x%08x%08x", mpt->mpt_fcport_page0.WWNN.High,
476	    mpt->mpt_fcport_page0.WWNN.Low);
477
478	snprintf(mpt->scinfo.fc.wwpn, sizeof (mpt->scinfo.fc.wwpn),
479	    "0x%08x%08x", mpt->mpt_fcport_page0.WWPN.High,
480	    mpt->mpt_fcport_page0.WWPN.Low);
481
482	SYSCTL_ADD_STRING(ctx, SYSCTL_CHILDREN(tree), OID_AUTO,
483	    "wwnn", CTLFLAG_RD, mpt->scinfo.fc.wwnn, 0,
484	    "World Wide Node Name");
485
486	SYSCTL_ADD_STRING(ctx, SYSCTL_CHILDREN(tree), OID_AUTO,
487	     "wwpn", CTLFLAG_RD, mpt->scinfo.fc.wwpn, 0,
488	     "World Wide Port Name");
489
490	MPT_LOCK(mpt);
491	return (0);
492}
493
494/*
495 * Set FC configuration information.
496 */
497static int
498mpt_set_initial_config_fc(struct mpt_softc *mpt)
499{
500	CONFIG_PAGE_FC_PORT_1 fc;
501	U32 fl;
502	int r, doit = 0;
503	int role;
504
505	r = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_FC_PORT, 1, 0,
506	    &fc.Header, FALSE, 5000);
507	if (r) {
508		mpt_prt(mpt, "failed to read FC page 1 header\n");
509		return (mpt_fc_reset_link(mpt, 1));
510	}
511
512	r = mpt_read_cfg_page(mpt, MPI_CONFIG_ACTION_PAGE_READ_NVRAM, 0,
513	    &fc.Header, sizeof (fc), FALSE, 5000);
514	if (r) {
515		mpt_prt(mpt, "failed to read FC page 1\n");
516		return (mpt_fc_reset_link(mpt, 1));
517	}
518	mpt2host_config_page_fc_port_1(&fc);
519
520	/*
521	 * Check our flags to make sure we support the role we want.
522	 */
523	doit = 0;
524	role = 0;
525	fl = fc.Flags;
526
527	if (fl & MPI_FCPORTPAGE1_FLAGS_PROT_FCP_INIT) {
528		role |= MPT_ROLE_INITIATOR;
529	}
530	if (fl & MPI_FCPORTPAGE1_FLAGS_PROT_FCP_TARG) {
531		role |= MPT_ROLE_TARGET;
532	}
533
534	fl &= ~MPI_FCPORTPAGE1_FLAGS_PROT_MASK;
535
536	if (mpt->do_cfg_role == 0) {
537		role = mpt->cfg_role;
538	} else {
539		mpt->do_cfg_role = 0;
540	}
541
542	if (role != mpt->cfg_role) {
543		if (mpt->cfg_role & MPT_ROLE_INITIATOR) {
544			if ((role & MPT_ROLE_INITIATOR) == 0) {
545				mpt_prt(mpt, "adding initiator role\n");
546				fl |= MPI_FCPORTPAGE1_FLAGS_PROT_FCP_INIT;
547				doit++;
548			} else {
549				mpt_prt(mpt, "keeping initiator role\n");
550			}
551		} else if (role & MPT_ROLE_INITIATOR) {
552			mpt_prt(mpt, "removing initiator role\n");
553			doit++;
554		}
555		if (mpt->cfg_role & MPT_ROLE_TARGET) {
556			if ((role & MPT_ROLE_TARGET) == 0) {
557				mpt_prt(mpt, "adding target role\n");
558				fl |= MPI_FCPORTPAGE1_FLAGS_PROT_FCP_TARG;
559				doit++;
560			} else {
561				mpt_prt(mpt, "keeping target role\n");
562			}
563		} else if (role & MPT_ROLE_TARGET) {
564			mpt_prt(mpt, "removing target role\n");
565			doit++;
566		}
567		mpt->role = mpt->cfg_role;
568	}
569
570	if (fl & MPI_FCPORTPAGE1_FLAGS_PROT_FCP_TARG) {
571		if ((fl & MPI_FCPORTPAGE1_FLAGS_TARGET_MODE_OXID) == 0) {
572			mpt_prt(mpt, "adding OXID option\n");
573			fl |= MPI_FCPORTPAGE1_FLAGS_TARGET_MODE_OXID;
574			doit++;
575		}
576	}
577
578	if (doit) {
579		fc.Flags = fl;
580		host2mpt_config_page_fc_port_1(&fc);
581		r = mpt_write_cfg_page(mpt,
582		    MPI_CONFIG_ACTION_PAGE_WRITE_NVRAM, 0, &fc.Header,
583		    sizeof(fc), FALSE, 5000);
584		if (r != 0) {
585			mpt_prt(mpt, "failed to update NVRAM with changes\n");
586			return (0);
587		}
588		mpt_prt(mpt, "NOTE: NVRAM changes will not take "
589		    "effect until next reboot or IOC reset\n");
590	}
591	return (0);
592}
593
594static int
595mptsas_sas_io_unit_pg0(struct mpt_softc *mpt, struct mptsas_portinfo *portinfo)
596{
597	ConfigExtendedPageHeader_t hdr;
598	struct mptsas_phyinfo *phyinfo;
599	SasIOUnitPage0_t *buffer;
600	int error, len, i;
601
602	error = mpt_read_extcfg_header(mpt, MPI_SASIOUNITPAGE0_PAGEVERSION,
603				       0, 0, MPI_CONFIG_EXTPAGETYPE_SAS_IO_UNIT,
604				       &hdr, 0, 10000);
605	if (error)
606		goto out;
607	if (hdr.ExtPageLength == 0) {
608		error = ENXIO;
609		goto out;
610	}
611
612	len = hdr.ExtPageLength * 4;
613	buffer = malloc(len, M_DEVBUF, M_NOWAIT|M_ZERO);
614	if (buffer == NULL) {
615		error = ENOMEM;
616		goto out;
617	}
618
619	error = mpt_read_extcfg_page(mpt, MPI_CONFIG_ACTION_PAGE_READ_CURRENT,
620				     0, &hdr, buffer, len, 0, 10000);
621	if (error) {
622		free(buffer, M_DEVBUF);
623		goto out;
624	}
625
626	portinfo->num_phys = buffer->NumPhys;
627	portinfo->phy_info = malloc(sizeof(*portinfo->phy_info) *
628	    portinfo->num_phys, M_DEVBUF, M_NOWAIT|M_ZERO);
629	if (portinfo->phy_info == NULL) {
630		free(buffer, M_DEVBUF);
631		error = ENOMEM;
632		goto out;
633	}
634
635	for (i = 0; i < portinfo->num_phys; i++) {
636		phyinfo = &portinfo->phy_info[i];
637		phyinfo->phy_num = i;
638		phyinfo->port_id = buffer->PhyData[i].Port;
639		phyinfo->negotiated_link_rate =
640		    buffer->PhyData[i].NegotiatedLinkRate;
641		phyinfo->handle =
642		    le16toh(buffer->PhyData[i].ControllerDevHandle);
643	}
644
645	free(buffer, M_DEVBUF);
646out:
647	return (error);
648}
649
650static int
651mptsas_sas_phy_pg0(struct mpt_softc *mpt, struct mptsas_phyinfo *phy_info,
652	uint32_t form, uint32_t form_specific)
653{
654	ConfigExtendedPageHeader_t hdr;
655	SasPhyPage0_t *buffer;
656	int error;
657
658	error = mpt_read_extcfg_header(mpt, MPI_SASPHY0_PAGEVERSION, 0, 0,
659				       MPI_CONFIG_EXTPAGETYPE_SAS_PHY, &hdr,
660				       0, 10000);
661	if (error)
662		goto out;
663	if (hdr.ExtPageLength == 0) {
664		error = ENXIO;
665		goto out;
666	}
667
668	buffer = malloc(sizeof(SasPhyPage0_t), M_DEVBUF, M_NOWAIT|M_ZERO);
669	if (buffer == NULL) {
670		error = ENOMEM;
671		goto out;
672	}
673
674	error = mpt_read_extcfg_page(mpt, MPI_CONFIG_ACTION_PAGE_READ_CURRENT,
675				     form + form_specific, &hdr, buffer,
676				     sizeof(SasPhyPage0_t), 0, 10000);
677	if (error) {
678		free(buffer, M_DEVBUF);
679		goto out;
680	}
681
682	phy_info->hw_link_rate = buffer->HwLinkRate;
683	phy_info->programmed_link_rate = buffer->ProgrammedLinkRate;
684	phy_info->identify.dev_handle = le16toh(buffer->OwnerDevHandle);
685	phy_info->attached.dev_handle = le16toh(buffer->AttachedDevHandle);
686
687	free(buffer, M_DEVBUF);
688out:
689	return (error);
690}
691
692static int
693mptsas_sas_device_pg0(struct mpt_softc *mpt, struct mptsas_devinfo *device_info,
694	uint32_t form, uint32_t form_specific)
695{
696	ConfigExtendedPageHeader_t hdr;
697	SasDevicePage0_t *buffer;
698	uint64_t sas_address;
699	int error = 0;
700
701	bzero(device_info, sizeof(*device_info));
702	error = mpt_read_extcfg_header(mpt, MPI_SASDEVICE0_PAGEVERSION, 0, 0,
703				       MPI_CONFIG_EXTPAGETYPE_SAS_DEVICE,
704				       &hdr, 0, 10000);
705	if (error)
706		goto out;
707	if (hdr.ExtPageLength == 0) {
708		error = ENXIO;
709		goto out;
710	}
711
712	buffer = malloc(sizeof(SasDevicePage0_t), M_DEVBUF, M_NOWAIT|M_ZERO);
713	if (buffer == NULL) {
714		error = ENOMEM;
715		goto out;
716	}
717
718	error = mpt_read_extcfg_page(mpt, MPI_CONFIG_ACTION_PAGE_READ_CURRENT,
719				     form + form_specific, &hdr, buffer,
720				     sizeof(SasDevicePage0_t), 0, 10000);
721	if (error) {
722		free(buffer, M_DEVBUF);
723		goto out;
724	}
725
726	device_info->dev_handle = le16toh(buffer->DevHandle);
727	device_info->parent_dev_handle = le16toh(buffer->ParentDevHandle);
728	device_info->enclosure_handle = le16toh(buffer->EnclosureHandle);
729	device_info->slot = le16toh(buffer->Slot);
730	device_info->phy_num = buffer->PhyNum;
731	device_info->physical_port = buffer->PhysicalPort;
732	device_info->target_id = buffer->TargetID;
733	device_info->bus = buffer->Bus;
734	bcopy(&buffer->SASAddress, &sas_address, sizeof(uint64_t));
735	device_info->sas_address = le64toh(sas_address);
736	device_info->device_info = le32toh(buffer->DeviceInfo);
737
738	free(buffer, M_DEVBUF);
739out:
740	return (error);
741}
742
743/*
744 * Read SAS configuration information. Nothing to do yet.
745 */
746static int
747mpt_read_config_info_sas(struct mpt_softc *mpt)
748{
749	struct mptsas_portinfo *portinfo;
750	struct mptsas_phyinfo *phyinfo;
751	int error, i;
752
753	portinfo = malloc(sizeof(*portinfo), M_DEVBUF, M_NOWAIT|M_ZERO);
754	if (portinfo == NULL)
755		return (ENOMEM);
756
757	error = mptsas_sas_io_unit_pg0(mpt, portinfo);
758	if (error) {
759		free(portinfo, M_DEVBUF);
760		return (0);
761	}
762
763	for (i = 0; i < portinfo->num_phys; i++) {
764		phyinfo = &portinfo->phy_info[i];
765		error = mptsas_sas_phy_pg0(mpt, phyinfo,
766		    (MPI_SAS_PHY_PGAD_FORM_PHY_NUMBER <<
767		    MPI_SAS_PHY_PGAD_FORM_SHIFT), i);
768		if (error)
769			break;
770		error = mptsas_sas_device_pg0(mpt, &phyinfo->identify,
771		    (MPI_SAS_DEVICE_PGAD_FORM_HANDLE <<
772		    MPI_SAS_DEVICE_PGAD_FORM_SHIFT),
773		    phyinfo->handle);
774		if (error)
775			break;
776		phyinfo->identify.phy_num = phyinfo->phy_num = i;
777		if (phyinfo->attached.dev_handle)
778			error = mptsas_sas_device_pg0(mpt,
779			    &phyinfo->attached,
780			    (MPI_SAS_DEVICE_PGAD_FORM_HANDLE <<
781			    MPI_SAS_DEVICE_PGAD_FORM_SHIFT),
782			    phyinfo->attached.dev_handle);
783		if (error)
784			break;
785	}
786	mpt->sas_portinfo = portinfo;
787	return (0);
788}
789
790static void
791mptsas_set_sata_wc(struct mpt_softc *mpt, struct mptsas_devinfo *devinfo,
792	int enabled)
793{
794	SataPassthroughRequest_t	*pass;
795	request_t *req;
796	int error, status;
797
798	req = mpt_get_request(mpt, 0);
799	if (req == NULL)
800		return;
801
802	pass = req->req_vbuf;
803	bzero(pass, sizeof(SataPassthroughRequest_t));
804	pass->Function = MPI_FUNCTION_SATA_PASSTHROUGH;
805	pass->TargetID = devinfo->target_id;
806	pass->Bus = devinfo->bus;
807	pass->PassthroughFlags = 0;
808	pass->ConnectionRate = MPI_SATA_PT_REQ_CONNECT_RATE_NEGOTIATED;
809	pass->DataLength = 0;
810	pass->MsgContext = htole32(req->index | sata_pass_handler_id);
811	pass->CommandFIS[0] = 0x27;
812	pass->CommandFIS[1] = 0x80;
813	pass->CommandFIS[2] = 0xef;
814	pass->CommandFIS[3] = (enabled) ? 0x02 : 0x82;
815	pass->CommandFIS[7] = 0x40;
816	pass->CommandFIS[15] = 0x08;
817
818	mpt_check_doorbell(mpt);
819	mpt_send_cmd(mpt, req);
820	error = mpt_wait_req(mpt, req, REQ_STATE_DONE, REQ_STATE_DONE, 0,
821			     10 * 1000);
822	if (error) {
823		mpt_free_request(mpt, req);
824		printf("error %d sending passthrough\n", error);
825		return;
826	}
827
828	status = le16toh(req->IOCStatus);
829	if (status != MPI_IOCSTATUS_SUCCESS) {
830		mpt_free_request(mpt, req);
831		printf("IOCSTATUS %d\n", status);
832		return;
833	}
834
835	mpt_free_request(mpt, req);
836}
837
838/*
839 * Set SAS configuration information. Nothing to do yet.
840 */
841static int
842mpt_set_initial_config_sas(struct mpt_softc *mpt)
843{
844	struct mptsas_phyinfo *phyinfo;
845	int i;
846
847	if ((mpt_enable_sata_wc != -1) && (mpt->sas_portinfo != NULL)) {
848		for (i = 0; i < mpt->sas_portinfo->num_phys; i++) {
849			phyinfo = &mpt->sas_portinfo->phy_info[i];
850			if (phyinfo->attached.dev_handle == 0)
851				continue;
852			if ((phyinfo->attached.device_info &
853			    MPI_SAS_DEVICE_INFO_SATA_DEVICE) == 0)
854				continue;
855			if (bootverbose)
856				device_printf(mpt->dev,
857				    "%sabling SATA WC on phy %d\n",
858				    (mpt_enable_sata_wc) ? "En" : "Dis", i);
859			mptsas_set_sata_wc(mpt, &phyinfo->attached,
860					   mpt_enable_sata_wc);
861		}
862	}
863
864	return (0);
865}
866
867static int
868mpt_sata_pass_reply_handler(struct mpt_softc *mpt, request_t *req,
869 uint32_t reply_desc, MSG_DEFAULT_REPLY *reply_frame)
870{
871
872	if (req != NULL) {
873		if (reply_frame != NULL) {
874			req->IOCStatus = le16toh(reply_frame->IOCStatus);
875		}
876		req->state &= ~REQ_STATE_QUEUED;
877		req->state |= REQ_STATE_DONE;
878		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
879		if ((req->state & REQ_STATE_NEED_WAKEUP) != 0) {
880			wakeup(req);
881		} else if ((req->state & REQ_STATE_TIMEDOUT) != 0) {
882			/*
883			 * Whew- we can free this request (late completion)
884			 */
885			mpt_free_request(mpt, req);
886		}
887	}
888
889	return (TRUE);
890}
891
892/*
893 * Read SCSI configuration information
894 */
895static int
896mpt_read_config_info_spi(struct mpt_softc *mpt)
897{
898	int rv, i;
899
900	rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_SCSI_PORT, 0, 0,
901	    &mpt->mpt_port_page0.Header, FALSE, 5000);
902	if (rv) {
903		return (-1);
904	}
905	mpt_lprt(mpt, MPT_PRT_DEBUG, "SPI Port Page 0 Header: %x %x %x %x\n",
906	    mpt->mpt_port_page0.Header.PageVersion,
907	    mpt->mpt_port_page0.Header.PageLength,
908	    mpt->mpt_port_page0.Header.PageNumber,
909	    mpt->mpt_port_page0.Header.PageType);
910
911	rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_SCSI_PORT, 1, 0,
912	    &mpt->mpt_port_page1.Header, FALSE, 5000);
913	if (rv) {
914		return (-1);
915	}
916	mpt_lprt(mpt, MPT_PRT_DEBUG, "SPI Port Page 1 Header: %x %x %x %x\n",
917	    mpt->mpt_port_page1.Header.PageVersion,
918	    mpt->mpt_port_page1.Header.PageLength,
919	    mpt->mpt_port_page1.Header.PageNumber,
920	    mpt->mpt_port_page1.Header.PageType);
921
922	rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_SCSI_PORT, 2, 0,
923	    &mpt->mpt_port_page2.Header, FALSE, 5000);
924	if (rv) {
925		return (-1);
926	}
927	mpt_lprt(mpt, MPT_PRT_DEBUG, "SPI Port Page 2 Header: %x %x %x %x\n",
928	    mpt->mpt_port_page2.Header.PageVersion,
929	    mpt->mpt_port_page2.Header.PageLength,
930	    mpt->mpt_port_page2.Header.PageNumber,
931	    mpt->mpt_port_page2.Header.PageType);
932
933	for (i = 0; i < 16; i++) {
934		rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_SCSI_DEVICE,
935		    0, i, &mpt->mpt_dev_page0[i].Header, FALSE, 5000);
936		if (rv) {
937			return (-1);
938		}
939		mpt_lprt(mpt, MPT_PRT_DEBUG,
940		    "SPI Target %d Device Page 0 Header: %x %x %x %x\n", i,
941		    mpt->mpt_dev_page0[i].Header.PageVersion,
942		    mpt->mpt_dev_page0[i].Header.PageLength,
943		    mpt->mpt_dev_page0[i].Header.PageNumber,
944		    mpt->mpt_dev_page0[i].Header.PageType);
945
946		rv = mpt_read_cfg_header(mpt, MPI_CONFIG_PAGETYPE_SCSI_DEVICE,
947		    1, i, &mpt->mpt_dev_page1[i].Header, FALSE, 5000);
948		if (rv) {
949			return (-1);
950		}
951		mpt_lprt(mpt, MPT_PRT_DEBUG,
952		    "SPI Target %d Device Page 1 Header: %x %x %x %x\n", i,
953		    mpt->mpt_dev_page1[i].Header.PageVersion,
954		    mpt->mpt_dev_page1[i].Header.PageLength,
955		    mpt->mpt_dev_page1[i].Header.PageNumber,
956		    mpt->mpt_dev_page1[i].Header.PageType);
957	}
958
959	/*
960	 * At this point, we don't *have* to fail. As long as we have
961	 * valid config header information, we can (barely) lurch
962	 * along.
963	 */
964
965	rv = mpt_read_cur_cfg_page(mpt, 0, &mpt->mpt_port_page0.Header,
966	    sizeof(mpt->mpt_port_page0), FALSE, 5000);
967	if (rv) {
968		mpt_prt(mpt, "failed to read SPI Port Page 0\n");
969	} else {
970		mpt2host_config_page_scsi_port_0(&mpt->mpt_port_page0);
971		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
972		    "SPI Port Page 0: Capabilities %x PhysicalInterface %x\n",
973		    mpt->mpt_port_page0.Capabilities,
974		    mpt->mpt_port_page0.PhysicalInterface);
975	}
976
977	rv = mpt_read_cur_cfg_page(mpt, 0, &mpt->mpt_port_page1.Header,
978	    sizeof(mpt->mpt_port_page1), FALSE, 5000);
979	if (rv) {
980		mpt_prt(mpt, "failed to read SPI Port Page 1\n");
981	} else {
982		mpt2host_config_page_scsi_port_1(&mpt->mpt_port_page1);
983		mpt_lprt(mpt, MPT_PRT_DEBUG,
984		    "SPI Port Page 1: Configuration %x OnBusTimerValue %x\n",
985		    mpt->mpt_port_page1.Configuration,
986		    mpt->mpt_port_page1.OnBusTimerValue);
987	}
988
989	rv = mpt_read_cur_cfg_page(mpt, 0, &mpt->mpt_port_page2.Header,
990	    sizeof(mpt->mpt_port_page2), FALSE, 5000);
991	if (rv) {
992		mpt_prt(mpt, "failed to read SPI Port Page 2\n");
993	} else {
994		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
995		    "Port Page 2: Flags %x Settings %x\n",
996		    mpt->mpt_port_page2.PortFlags,
997		    mpt->mpt_port_page2.PortSettings);
998		mpt2host_config_page_scsi_port_2(&mpt->mpt_port_page2);
999		for (i = 0; i < 16; i++) {
1000			mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
1001		  	    " Port Page 2 Tgt %d: timo %x SF %x Flags %x\n",
1002			    i, mpt->mpt_port_page2.DeviceSettings[i].Timeout,
1003			    mpt->mpt_port_page2.DeviceSettings[i].SyncFactor,
1004			    mpt->mpt_port_page2.DeviceSettings[i].DeviceFlags);
1005		}
1006	}
1007
1008	for (i = 0; i < 16; i++) {
1009		rv = mpt_read_cur_cfg_page(mpt, i,
1010		    &mpt->mpt_dev_page0[i].Header, sizeof(*mpt->mpt_dev_page0),
1011		    FALSE, 5000);
1012		if (rv) {
1013			mpt_prt(mpt,
1014			    "cannot read SPI Target %d Device Page 0\n", i);
1015			continue;
1016		}
1017		mpt2host_config_page_scsi_device_0(&mpt->mpt_dev_page0[i]);
1018		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
1019		    "target %d page 0: Negotiated Params %x Information %x\n",
1020		    i, mpt->mpt_dev_page0[i].NegotiatedParameters,
1021		    mpt->mpt_dev_page0[i].Information);
1022
1023		rv = mpt_read_cur_cfg_page(mpt, i,
1024		    &mpt->mpt_dev_page1[i].Header, sizeof(*mpt->mpt_dev_page1),
1025		    FALSE, 5000);
1026		if (rv) {
1027			mpt_prt(mpt,
1028			    "cannot read SPI Target %d Device Page 1\n", i);
1029			continue;
1030		}
1031		mpt2host_config_page_scsi_device_1(&mpt->mpt_dev_page1[i]);
1032		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
1033		    "target %d page 1: Requested Params %x Configuration %x\n",
1034		    i, mpt->mpt_dev_page1[i].RequestedParameters,
1035		    mpt->mpt_dev_page1[i].Configuration);
1036	}
1037	return (0);
1038}
1039
1040/*
1041 * Validate SPI configuration information.
1042 *
1043 * In particular, validate SPI Port Page 1.
1044 */
1045static int
1046mpt_set_initial_config_spi(struct mpt_softc *mpt)
1047{
1048	int error, i, pp1val;
1049
1050	mpt->mpt_disc_enable = 0xff;
1051	mpt->mpt_tag_enable = 0;
1052
1053	pp1val = ((1 << mpt->mpt_ini_id) <<
1054	    MPI_SCSIPORTPAGE1_CFG_SHIFT_PORT_RESPONSE_ID) | mpt->mpt_ini_id;
1055	if (mpt->mpt_port_page1.Configuration != pp1val) {
1056		CONFIG_PAGE_SCSI_PORT_1 tmp;
1057
1058		mpt_prt(mpt, "SPI Port Page 1 Config value bad (%x)- should "
1059		    "be %x\n", mpt->mpt_port_page1.Configuration, pp1val);
1060		tmp = mpt->mpt_port_page1;
1061		tmp.Configuration = pp1val;
1062		host2mpt_config_page_scsi_port_1(&tmp);
1063		error = mpt_write_cur_cfg_page(mpt, 0,
1064		    &tmp.Header, sizeof(tmp), FALSE, 5000);
1065		if (error) {
1066			return (-1);
1067		}
1068		error = mpt_read_cur_cfg_page(mpt, 0,
1069		    &tmp.Header, sizeof(tmp), FALSE, 5000);
1070		if (error) {
1071			return (-1);
1072		}
1073		mpt2host_config_page_scsi_port_1(&tmp);
1074		if (tmp.Configuration != pp1val) {
1075			mpt_prt(mpt,
1076			    "failed to reset SPI Port Page 1 Config value\n");
1077			return (-1);
1078		}
1079		mpt->mpt_port_page1 = tmp;
1080	}
1081
1082	/*
1083	 * The purpose of this exercise is to get
1084	 * all targets back to async/narrow.
1085	 *
1086	 * We skip this step if the BIOS has already negotiated
1087	 * speeds with the targets.
1088	 */
1089	i = mpt->mpt_port_page2.PortSettings &
1090	    MPI_SCSIPORTPAGE2_PORT_MASK_NEGO_MASTER_SETTINGS;
1091	if (i == MPI_SCSIPORTPAGE2_PORT_ALL_MASTER_SETTINGS) {
1092		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
1093		    "honoring BIOS transfer negotiations\n");
1094	} else {
1095		for (i = 0; i < 16; i++) {
1096			mpt->mpt_dev_page1[i].RequestedParameters = 0;
1097			mpt->mpt_dev_page1[i].Configuration = 0;
1098			(void) mpt_update_spi_config(mpt, i);
1099		}
1100	}
1101	return (0);
1102}
1103
1104static int
1105mpt_cam_enable(struct mpt_softc *mpt)
1106{
1107	int error;
1108
1109	MPT_LOCK(mpt);
1110
1111	error = EIO;
1112	if (mpt->is_fc) {
1113		if (mpt_read_config_info_fc(mpt)) {
1114			goto out;
1115		}
1116		if (mpt_set_initial_config_fc(mpt)) {
1117			goto out;
1118		}
1119	} else if (mpt->is_sas) {
1120		if (mpt_read_config_info_sas(mpt)) {
1121			goto out;
1122		}
1123		if (mpt_set_initial_config_sas(mpt)) {
1124			goto out;
1125		}
1126	} else if (mpt->is_spi) {
1127		if (mpt_read_config_info_spi(mpt)) {
1128			goto out;
1129		}
1130		if (mpt_set_initial_config_spi(mpt)) {
1131			goto out;
1132		}
1133	}
1134	error = 0;
1135
1136out:
1137	MPT_UNLOCK(mpt);
1138	return (error);
1139}
1140
1141static void
1142mpt_cam_ready(struct mpt_softc *mpt)
1143{
1144
1145	/*
1146	 * If we're in target mode, hang out resources now
1147	 * so we don't cause the world to hang talking to us.
1148	 */
1149	if (mpt->is_fc && (mpt->role & MPT_ROLE_TARGET)) {
1150		/*
1151		 * Try to add some target command resources
1152		 */
1153		MPT_LOCK(mpt);
1154		if (mpt_add_target_commands(mpt) == FALSE) {
1155			mpt_prt(mpt, "failed to add target commands\n");
1156		}
1157		MPT_UNLOCK(mpt);
1158	}
1159	mpt->ready = 1;
1160}
1161
1162static void
1163mpt_cam_detach(struct mpt_softc *mpt)
1164{
1165	mpt_handler_t handler;
1166
1167	MPT_LOCK(mpt);
1168	mpt->ready = 0;
1169	mpt_terminate_recovery_thread(mpt);
1170
1171	handler.reply_handler = mpt_scsi_reply_handler;
1172	mpt_deregister_handler(mpt, MPT_HANDLER_REPLY, handler,
1173			       scsi_io_handler_id);
1174	handler.reply_handler = mpt_scsi_tmf_reply_handler;
1175	mpt_deregister_handler(mpt, MPT_HANDLER_REPLY, handler,
1176			       scsi_tmf_handler_id);
1177	handler.reply_handler = mpt_fc_els_reply_handler;
1178	mpt_deregister_handler(mpt, MPT_HANDLER_REPLY, handler,
1179			       fc_els_handler_id);
1180	handler.reply_handler = mpt_scsi_tgt_reply_handler;
1181	mpt_deregister_handler(mpt, MPT_HANDLER_REPLY, handler,
1182			       mpt->scsi_tgt_handler_id);
1183	handler.reply_handler = mpt_sata_pass_reply_handler;
1184	mpt_deregister_handler(mpt, MPT_HANDLER_REPLY, handler,
1185			       sata_pass_handler_id);
1186
1187	if (mpt->tmf_req != NULL) {
1188		mpt->tmf_req->state = REQ_STATE_ALLOCATED;
1189		mpt_free_request(mpt, mpt->tmf_req);
1190		mpt->tmf_req = NULL;
1191	}
1192	if (mpt->sas_portinfo != NULL) {
1193		free(mpt->sas_portinfo, M_DEVBUF);
1194		mpt->sas_portinfo = NULL;
1195	}
1196
1197	if (mpt->sim != NULL) {
1198		xpt_free_path(mpt->path);
1199		xpt_bus_deregister(cam_sim_path(mpt->sim));
1200		cam_sim_free(mpt->sim, TRUE);
1201		mpt->sim = NULL;
1202	}
1203
1204	if (mpt->phydisk_sim != NULL) {
1205		xpt_free_path(mpt->phydisk_path);
1206		xpt_bus_deregister(cam_sim_path(mpt->phydisk_sim));
1207		cam_sim_free(mpt->phydisk_sim, TRUE);
1208		mpt->phydisk_sim = NULL;
1209	}
1210	MPT_UNLOCK(mpt);
1211}
1212
1213/* This routine is used after a system crash to dump core onto the swap device.
1214 */
1215static void
1216mpt_poll(struct cam_sim *sim)
1217{
1218	struct mpt_softc *mpt;
1219
1220	mpt = (struct mpt_softc *)cam_sim_softc(sim);
1221	mpt_intr(mpt);
1222}
1223
1224/*
1225 * Watchdog timeout routine for SCSI requests.
1226 */
1227static void
1228mpt_timeout(void *arg)
1229{
1230	union ccb	 *ccb;
1231	struct mpt_softc *mpt;
1232	request_t	 *req;
1233
1234	ccb = (union ccb *)arg;
1235	mpt = ccb->ccb_h.ccb_mpt_ptr;
1236
1237	MPT_LOCK_ASSERT(mpt);
1238	req = ccb->ccb_h.ccb_req_ptr;
1239	mpt_prt(mpt, "request %p:%u timed out for ccb %p (req->ccb %p)\n", req,
1240	    req->serno, ccb, req->ccb);
1241/* XXX: WHAT ARE WE TRYING TO DO HERE? */
1242	if ((req->state & REQ_STATE_QUEUED) == REQ_STATE_QUEUED) {
1243		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
1244		TAILQ_INSERT_TAIL(&mpt->request_timeout_list, req, links);
1245		req->state |= REQ_STATE_TIMEDOUT;
1246		mpt_wakeup_recovery_thread(mpt);
1247	}
1248}
1249
1250/*
1251 * Callback routine from bus_dmamap_load_ccb(9) or, in simple cases, called
1252 * directly.
1253 *
1254 * Takes a list of physical segments and builds the SGL for SCSI IO command
1255 * and forwards the commard to the IOC after one last check that CAM has not
1256 * aborted the transaction.
1257 */
1258static void
1259mpt_execute_req_a64(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error)
1260{
1261	request_t *req, *trq;
1262	char *mpt_off;
1263	union ccb *ccb;
1264	struct mpt_softc *mpt;
1265	bus_addr_t chain_list_addr;
1266	int first_lim, seg, this_seg_lim;
1267	uint32_t addr, cur_off, flags, nxt_off, tf;
1268	void *sglp = NULL;
1269	MSG_REQUEST_HEADER *hdrp;
1270	SGE_SIMPLE64 *se;
1271	SGE_CHAIN64 *ce;
1272	int istgt = 0;
1273
1274	req = (request_t *)arg;
1275	ccb = req->ccb;
1276
1277	mpt = ccb->ccb_h.ccb_mpt_ptr;
1278	req = ccb->ccb_h.ccb_req_ptr;
1279
1280	hdrp = req->req_vbuf;
1281	mpt_off = req->req_vbuf;
1282
1283	if (error == 0 && ((uint32_t)nseg) >= mpt->max_seg_cnt) {
1284		error = EFBIG;
1285	}
1286
1287	if (error == 0) {
1288		switch (hdrp->Function) {
1289		case MPI_FUNCTION_SCSI_IO_REQUEST:
1290		case MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH:
1291			istgt = 0;
1292			sglp = &((PTR_MSG_SCSI_IO_REQUEST)hdrp)->SGL;
1293			break;
1294		case MPI_FUNCTION_TARGET_ASSIST:
1295			istgt = 1;
1296			sglp = &((PTR_MSG_TARGET_ASSIST_REQUEST)hdrp)->SGL;
1297			break;
1298		default:
1299			mpt_prt(mpt, "bad fct 0x%x in mpt_execute_req_a64\n",
1300			    hdrp->Function);
1301			error = EINVAL;
1302			break;
1303		}
1304	}
1305
1306	if (error == 0 && ((uint32_t)nseg) >= mpt->max_seg_cnt) {
1307		error = EFBIG;
1308		mpt_prt(mpt, "segment count %d too large (max %u)\n",
1309		    nseg, mpt->max_seg_cnt);
1310	}
1311
1312bad:
1313	if (error != 0) {
1314		if (error != EFBIG && error != ENOMEM) {
1315			mpt_prt(mpt, "mpt_execute_req_a64: err %d\n", error);
1316		}
1317		if ((ccb->ccb_h.status & CAM_STATUS_MASK) == CAM_REQ_INPROG) {
1318			cam_status status;
1319			mpt_freeze_ccb(ccb);
1320			if (error == EFBIG) {
1321				status = CAM_REQ_TOO_BIG;
1322			} else if (error == ENOMEM) {
1323				if (mpt->outofbeer == 0) {
1324					mpt->outofbeer = 1;
1325					xpt_freeze_simq(mpt->sim, 1);
1326					mpt_lprt(mpt, MPT_PRT_DEBUG,
1327					    "FREEZEQ\n");
1328				}
1329				status = CAM_REQUEUE_REQ;
1330			} else {
1331				status = CAM_REQ_CMP_ERR;
1332			}
1333			mpt_set_ccb_status(ccb, status);
1334		}
1335		if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
1336			request_t *cmd_req =
1337				MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
1338			MPT_TGT_STATE(mpt, cmd_req)->state = TGT_STATE_IN_CAM;
1339			MPT_TGT_STATE(mpt, cmd_req)->ccb = NULL;
1340			MPT_TGT_STATE(mpt, cmd_req)->req = NULL;
1341		}
1342		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
1343		KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
1344		xpt_done(ccb);
1345		mpt_free_request(mpt, req);
1346		return;
1347	}
1348
1349	/*
1350	 * No data to transfer?
1351	 * Just make a single simple SGL with zero length.
1352	 */
1353
1354	if (mpt->verbose >= MPT_PRT_DEBUG) {
1355		int tidx = ((char *)sglp) - mpt_off;
1356		memset(&mpt_off[tidx], 0xff, MPT_REQUEST_AREA - tidx);
1357	}
1358
1359	if (nseg == 0) {
1360		SGE_SIMPLE32 *se1 = (SGE_SIMPLE32 *) sglp;
1361		MPI_pSGE_SET_FLAGS(se1,
1362		    (MPI_SGE_FLAGS_LAST_ELEMENT | MPI_SGE_FLAGS_END_OF_BUFFER |
1363		    MPI_SGE_FLAGS_SIMPLE_ELEMENT | MPI_SGE_FLAGS_END_OF_LIST));
1364		se1->FlagsLength = htole32(se1->FlagsLength);
1365		goto out;
1366	}
1367
1368
1369	flags = MPI_SGE_FLAGS_SIMPLE_ELEMENT | MPI_SGE_FLAGS_64_BIT_ADDRESSING;
1370	if (istgt == 0) {
1371		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_OUT) {
1372			flags |= MPI_SGE_FLAGS_HOST_TO_IOC;
1373		}
1374	} else {
1375		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1376			flags |= MPI_SGE_FLAGS_HOST_TO_IOC;
1377		}
1378	}
1379
1380	if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) {
1381		bus_dmasync_op_t op;
1382		if (istgt == 0) {
1383			if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1384				op = BUS_DMASYNC_PREREAD;
1385			} else {
1386				op = BUS_DMASYNC_PREWRITE;
1387			}
1388		} else {
1389			if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1390				op = BUS_DMASYNC_PREWRITE;
1391			} else {
1392				op = BUS_DMASYNC_PREREAD;
1393			}
1394		}
1395		bus_dmamap_sync(mpt->buffer_dmat, req->dmap, op);
1396	}
1397
1398	/*
1399	 * Okay, fill in what we can at the end of the command frame.
1400	 * If we have up to MPT_NSGL_FIRST, we can fit them all into
1401	 * the command frame.
1402	 *
1403	 * Otherwise, we fill up through MPT_NSGL_FIRST less one
1404	 * SIMPLE64 pointers and start doing CHAIN64 entries after
1405	 * that.
1406	 */
1407
1408	if (nseg < MPT_NSGL_FIRST(mpt)) {
1409		first_lim = nseg;
1410	} else {
1411		/*
1412		 * Leave room for CHAIN element
1413		 */
1414		first_lim = MPT_NSGL_FIRST(mpt) - 1;
1415	}
1416
1417	se = (SGE_SIMPLE64 *) sglp;
1418	for (seg = 0; seg < first_lim; seg++, se++, dm_segs++) {
1419		tf = flags;
1420		memset(se, 0, sizeof (*se));
1421		MPI_pSGE_SET_LENGTH(se, dm_segs->ds_len);
1422		se->Address.Low = htole32(dm_segs->ds_addr & 0xffffffff);
1423		if (sizeof(bus_addr_t) > 4) {
1424			addr = ((uint64_t)dm_segs->ds_addr) >> 32;
1425			/* SAS1078 36GB limitation WAR */
1426			if (mpt->is_1078 && (((uint64_t)dm_segs->ds_addr +
1427			    MPI_SGE_LENGTH(se->FlagsLength)) >> 32) == 9) {
1428				addr |= (1 << 31);
1429				tf |= MPI_SGE_FLAGS_LOCAL_ADDRESS;
1430			}
1431			se->Address.High = htole32(addr);
1432		}
1433		if (seg == first_lim - 1) {
1434			tf |= MPI_SGE_FLAGS_LAST_ELEMENT;
1435		}
1436		if (seg == nseg - 1) {
1437			tf |=	MPI_SGE_FLAGS_END_OF_LIST |
1438				MPI_SGE_FLAGS_END_OF_BUFFER;
1439		}
1440		MPI_pSGE_SET_FLAGS(se, tf);
1441		se->FlagsLength = htole32(se->FlagsLength);
1442	}
1443
1444	if (seg == nseg) {
1445		goto out;
1446	}
1447
1448	/*
1449	 * Tell the IOC where to find the first chain element.
1450	 */
1451	hdrp->ChainOffset = ((char *)se - (char *)hdrp) >> 2;
1452	nxt_off = MPT_RQSL(mpt);
1453	trq = req;
1454
1455	/*
1456	 * Make up the rest of the data segments out of a chain element
1457	 * (contained in the current request frame) which points to
1458	 * SIMPLE64 elements in the next request frame, possibly ending
1459	 * with *another* chain element (if there's more).
1460	 */
1461	while (seg < nseg) {
1462		/*
1463		 * Point to the chain descriptor. Note that the chain
1464		 * descriptor is at the end of the *previous* list (whether
1465		 * chain or simple).
1466		 */
1467		ce = (SGE_CHAIN64 *) se;
1468
1469		/*
1470		 * Before we change our current pointer, make  sure we won't
1471		 * overflow the request area with this frame. Note that we
1472		 * test against 'greater than' here as it's okay in this case
1473		 * to have next offset be just outside the request area.
1474		 */
1475		if ((nxt_off + MPT_RQSL(mpt)) > MPT_REQUEST_AREA) {
1476			nxt_off = MPT_REQUEST_AREA;
1477			goto next_chain;
1478		}
1479
1480		/*
1481		 * Set our SGE element pointer to the beginning of the chain
1482		 * list and update our next chain list offset.
1483		 */
1484		se = (SGE_SIMPLE64 *) &mpt_off[nxt_off];
1485		cur_off = nxt_off;
1486		nxt_off += MPT_RQSL(mpt);
1487
1488		/*
1489		 * Now initialize the chain descriptor.
1490		 */
1491		memset(ce, 0, sizeof (*ce));
1492
1493		/*
1494		 * Get the physical address of the chain list.
1495		 */
1496		chain_list_addr = trq->req_pbuf;
1497		chain_list_addr += cur_off;
1498		if (sizeof (bus_addr_t) > 4) {
1499			ce->Address.High =
1500			    htole32(((uint64_t)chain_list_addr) >> 32);
1501		}
1502		ce->Address.Low = htole32(chain_list_addr & 0xffffffff);
1503		ce->Flags = MPI_SGE_FLAGS_CHAIN_ELEMENT |
1504			    MPI_SGE_FLAGS_64_BIT_ADDRESSING;
1505
1506		/*
1507		 * If we have more than a frame's worth of segments left,
1508		 * set up the chain list to have the last element be another
1509		 * chain descriptor.
1510		 */
1511		if ((nseg - seg) > MPT_NSGL(mpt)) {
1512			this_seg_lim = seg + MPT_NSGL(mpt) - 1;
1513			/*
1514			 * The length of the chain is the length in bytes of the
1515			 * number of segments plus the next chain element.
1516			 *
1517			 * The next chain descriptor offset is the length,
1518			 * in words, of the number of segments.
1519			 */
1520			ce->Length = (this_seg_lim - seg) *
1521			    sizeof (SGE_SIMPLE64);
1522			ce->NextChainOffset = ce->Length >> 2;
1523			ce->Length += sizeof (SGE_CHAIN64);
1524		} else {
1525			this_seg_lim = nseg;
1526			ce->Length = (this_seg_lim - seg) *
1527			    sizeof (SGE_SIMPLE64);
1528		}
1529		ce->Length = htole16(ce->Length);
1530
1531		/*
1532		 * Fill in the chain list SGE elements with our segment data.
1533		 *
1534		 * If we're the last element in this chain list, set the last
1535		 * element flag. If we're the completely last element period,
1536		 * set the end of list and end of buffer flags.
1537		 */
1538		while (seg < this_seg_lim) {
1539			tf = flags;
1540			memset(se, 0, sizeof (*se));
1541			MPI_pSGE_SET_LENGTH(se, dm_segs->ds_len);
1542			se->Address.Low = htole32(dm_segs->ds_addr &
1543			    0xffffffff);
1544			if (sizeof (bus_addr_t) > 4) {
1545				addr = ((uint64_t)dm_segs->ds_addr) >> 32;
1546				/* SAS1078 36GB limitation WAR */
1547				if (mpt->is_1078 &&
1548				    (((uint64_t)dm_segs->ds_addr +
1549				    MPI_SGE_LENGTH(se->FlagsLength)) >>
1550				    32) == 9) {
1551					addr |= (1 << 31);
1552					tf |= MPI_SGE_FLAGS_LOCAL_ADDRESS;
1553				}
1554				se->Address.High = htole32(addr);
1555			}
1556			if (seg == this_seg_lim - 1) {
1557				tf |=	MPI_SGE_FLAGS_LAST_ELEMENT;
1558			}
1559			if (seg == nseg - 1) {
1560				tf |=	MPI_SGE_FLAGS_END_OF_LIST |
1561					MPI_SGE_FLAGS_END_OF_BUFFER;
1562			}
1563			MPI_pSGE_SET_FLAGS(se, tf);
1564			se->FlagsLength = htole32(se->FlagsLength);
1565			se++;
1566			seg++;
1567			dm_segs++;
1568		}
1569
1570    next_chain:
1571		/*
1572		 * If we have more segments to do and we've used up all of
1573		 * the space in a request area, go allocate another one
1574		 * and chain to that.
1575		 */
1576		if (seg < nseg && nxt_off >= MPT_REQUEST_AREA) {
1577			request_t *nrq;
1578
1579			nrq = mpt_get_request(mpt, FALSE);
1580
1581			if (nrq == NULL) {
1582				error = ENOMEM;
1583				goto bad;
1584			}
1585
1586			/*
1587			 * Append the new request area on the tail of our list.
1588			 */
1589			if ((trq = req->chain) == NULL) {
1590				req->chain = nrq;
1591			} else {
1592				while (trq->chain != NULL) {
1593					trq = trq->chain;
1594				}
1595				trq->chain = nrq;
1596			}
1597			trq = nrq;
1598			mpt_off = trq->req_vbuf;
1599			if (mpt->verbose >= MPT_PRT_DEBUG) {
1600				memset(mpt_off, 0xff, MPT_REQUEST_AREA);
1601			}
1602			nxt_off = 0;
1603		}
1604	}
1605out:
1606
1607	/*
1608	 * Last time we need to check if this CCB needs to be aborted.
1609	 */
1610	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_INPROG) {
1611		if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
1612			request_t *cmd_req =
1613				MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
1614			MPT_TGT_STATE(mpt, cmd_req)->state = TGT_STATE_IN_CAM;
1615			MPT_TGT_STATE(mpt, cmd_req)->ccb = NULL;
1616			MPT_TGT_STATE(mpt, cmd_req)->req = NULL;
1617		}
1618		mpt_prt(mpt,
1619		    "mpt_execute_req_a64: I/O cancelled (status 0x%x)\n",
1620		    ccb->ccb_h.status & CAM_STATUS_MASK);
1621		if (nseg) {
1622			bus_dmamap_unload(mpt->buffer_dmat, req->dmap);
1623		}
1624		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
1625		KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
1626		xpt_done(ccb);
1627		mpt_free_request(mpt, req);
1628		return;
1629	}
1630
1631	ccb->ccb_h.status |= CAM_SIM_QUEUED;
1632	if (ccb->ccb_h.timeout != CAM_TIME_INFINITY) {
1633		mpt_req_timeout(req, (ccb->ccb_h.timeout * hz) / 1000,
1634		    mpt_timeout, ccb);
1635	}
1636	if (mpt->verbose > MPT_PRT_DEBUG) {
1637		int nc = 0;
1638		mpt_print_request(req->req_vbuf);
1639		for (trq = req->chain; trq; trq = trq->chain) {
1640			printf("  Additional Chain Area %d\n", nc++);
1641			mpt_dump_sgl(trq->req_vbuf, 0);
1642		}
1643	}
1644
1645	if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
1646		request_t *cmd_req = MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
1647		mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, cmd_req);
1648#ifdef	WE_TRUST_AUTO_GOOD_STATUS
1649		if ((ccb->ccb_h.flags & CAM_SEND_STATUS) &&
1650		    csio->scsi_status == SCSI_STATUS_OK && tgt->resid == 0) {
1651			tgt->state = TGT_STATE_MOVING_DATA_AND_STATUS;
1652		} else {
1653			tgt->state = TGT_STATE_MOVING_DATA;
1654		}
1655#else
1656		tgt->state = TGT_STATE_MOVING_DATA;
1657#endif
1658	}
1659	mpt_send_cmd(mpt, req);
1660}
1661
1662static void
1663mpt_execute_req(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error)
1664{
1665	request_t *req, *trq;
1666	char *mpt_off;
1667	union ccb *ccb;
1668	struct mpt_softc *mpt;
1669	int seg, first_lim;
1670	uint32_t flags, nxt_off;
1671	void *sglp = NULL;
1672	MSG_REQUEST_HEADER *hdrp;
1673	SGE_SIMPLE32 *se;
1674	SGE_CHAIN32 *ce;
1675	int istgt = 0;
1676
1677	req = (request_t *)arg;
1678	ccb = req->ccb;
1679
1680	mpt = ccb->ccb_h.ccb_mpt_ptr;
1681	req = ccb->ccb_h.ccb_req_ptr;
1682
1683	hdrp = req->req_vbuf;
1684	mpt_off = req->req_vbuf;
1685
1686	if (error == 0 && ((uint32_t)nseg) >= mpt->max_seg_cnt) {
1687		error = EFBIG;
1688	}
1689
1690	if (error == 0) {
1691		switch (hdrp->Function) {
1692		case MPI_FUNCTION_SCSI_IO_REQUEST:
1693		case MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH:
1694			sglp = &((PTR_MSG_SCSI_IO_REQUEST)hdrp)->SGL;
1695			break;
1696		case MPI_FUNCTION_TARGET_ASSIST:
1697			istgt = 1;
1698			sglp = &((PTR_MSG_TARGET_ASSIST_REQUEST)hdrp)->SGL;
1699			break;
1700		default:
1701			mpt_prt(mpt, "bad fct 0x%x in mpt_execute_req\n",
1702			    hdrp->Function);
1703			error = EINVAL;
1704			break;
1705		}
1706	}
1707
1708	if (error == 0 && ((uint32_t)nseg) >= mpt->max_seg_cnt) {
1709		error = EFBIG;
1710		mpt_prt(mpt, "segment count %d too large (max %u)\n",
1711		    nseg, mpt->max_seg_cnt);
1712	}
1713
1714bad:
1715	if (error != 0) {
1716		if (error != EFBIG && error != ENOMEM) {
1717			mpt_prt(mpt, "mpt_execute_req: err %d\n", error);
1718		}
1719		if ((ccb->ccb_h.status & CAM_STATUS_MASK) == CAM_REQ_INPROG) {
1720			cam_status status;
1721			mpt_freeze_ccb(ccb);
1722			if (error == EFBIG) {
1723				status = CAM_REQ_TOO_BIG;
1724			} else if (error == ENOMEM) {
1725				if (mpt->outofbeer == 0) {
1726					mpt->outofbeer = 1;
1727					xpt_freeze_simq(mpt->sim, 1);
1728					mpt_lprt(mpt, MPT_PRT_DEBUG,
1729					    "FREEZEQ\n");
1730				}
1731				status = CAM_REQUEUE_REQ;
1732			} else {
1733				status = CAM_REQ_CMP_ERR;
1734			}
1735			mpt_set_ccb_status(ccb, status);
1736		}
1737		if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
1738			request_t *cmd_req =
1739				MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
1740			MPT_TGT_STATE(mpt, cmd_req)->state = TGT_STATE_IN_CAM;
1741			MPT_TGT_STATE(mpt, cmd_req)->ccb = NULL;
1742			MPT_TGT_STATE(mpt, cmd_req)->req = NULL;
1743		}
1744		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
1745		KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
1746		xpt_done(ccb);
1747		mpt_free_request(mpt, req);
1748		return;
1749	}
1750
1751	/*
1752	 * No data to transfer?
1753	 * Just make a single simple SGL with zero length.
1754	 */
1755
1756	if (mpt->verbose >= MPT_PRT_DEBUG) {
1757		int tidx = ((char *)sglp) - mpt_off;
1758		memset(&mpt_off[tidx], 0xff, MPT_REQUEST_AREA - tidx);
1759	}
1760
1761	if (nseg == 0) {
1762		SGE_SIMPLE32 *se1 = (SGE_SIMPLE32 *) sglp;
1763		MPI_pSGE_SET_FLAGS(se1,
1764		    (MPI_SGE_FLAGS_LAST_ELEMENT | MPI_SGE_FLAGS_END_OF_BUFFER |
1765		    MPI_SGE_FLAGS_SIMPLE_ELEMENT | MPI_SGE_FLAGS_END_OF_LIST));
1766		se1->FlagsLength = htole32(se1->FlagsLength);
1767		goto out;
1768	}
1769
1770
1771	flags = MPI_SGE_FLAGS_SIMPLE_ELEMENT;
1772	if (istgt == 0) {
1773		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_OUT) {
1774			flags |= MPI_SGE_FLAGS_HOST_TO_IOC;
1775		}
1776	} else {
1777		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1778			flags |= MPI_SGE_FLAGS_HOST_TO_IOC;
1779		}
1780	}
1781
1782	if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) {
1783		bus_dmasync_op_t op;
1784		if (istgt) {
1785			if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1786				op = BUS_DMASYNC_PREREAD;
1787			} else {
1788				op = BUS_DMASYNC_PREWRITE;
1789			}
1790		} else {
1791			if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
1792				op = BUS_DMASYNC_PREWRITE;
1793			} else {
1794				op = BUS_DMASYNC_PREREAD;
1795			}
1796		}
1797		bus_dmamap_sync(mpt->buffer_dmat, req->dmap, op);
1798	}
1799
1800	/*
1801	 * Okay, fill in what we can at the end of the command frame.
1802	 * If we have up to MPT_NSGL_FIRST, we can fit them all into
1803	 * the command frame.
1804	 *
1805	 * Otherwise, we fill up through MPT_NSGL_FIRST less one
1806	 * SIMPLE32 pointers and start doing CHAIN32 entries after
1807	 * that.
1808	 */
1809
1810	if (nseg < MPT_NSGL_FIRST(mpt)) {
1811		first_lim = nseg;
1812	} else {
1813		/*
1814		 * Leave room for CHAIN element
1815		 */
1816		first_lim = MPT_NSGL_FIRST(mpt) - 1;
1817	}
1818
1819	se = (SGE_SIMPLE32 *) sglp;
1820	for (seg = 0; seg < first_lim; seg++, se++, dm_segs++) {
1821		uint32_t tf;
1822
1823		memset(se, 0,sizeof (*se));
1824		se->Address = htole32(dm_segs->ds_addr);
1825
1826		MPI_pSGE_SET_LENGTH(se, dm_segs->ds_len);
1827		tf = flags;
1828		if (seg == first_lim - 1) {
1829			tf |= MPI_SGE_FLAGS_LAST_ELEMENT;
1830		}
1831		if (seg == nseg - 1) {
1832			tf |=	MPI_SGE_FLAGS_END_OF_LIST |
1833				MPI_SGE_FLAGS_END_OF_BUFFER;
1834		}
1835		MPI_pSGE_SET_FLAGS(se, tf);
1836		se->FlagsLength = htole32(se->FlagsLength);
1837	}
1838
1839	if (seg == nseg) {
1840		goto out;
1841	}
1842
1843	/*
1844	 * Tell the IOC where to find the first chain element.
1845	 */
1846	hdrp->ChainOffset = ((char *)se - (char *)hdrp) >> 2;
1847	nxt_off = MPT_RQSL(mpt);
1848	trq = req;
1849
1850	/*
1851	 * Make up the rest of the data segments out of a chain element
1852	 * (contained in the current request frame) which points to
1853	 * SIMPLE32 elements in the next request frame, possibly ending
1854	 * with *another* chain element (if there's more).
1855	 */
1856	while (seg < nseg) {
1857		int this_seg_lim;
1858		uint32_t tf, cur_off;
1859		bus_addr_t chain_list_addr;
1860
1861		/*
1862		 * Point to the chain descriptor. Note that the chain
1863		 * descriptor is at the end of the *previous* list (whether
1864		 * chain or simple).
1865		 */
1866		ce = (SGE_CHAIN32 *) se;
1867
1868		/*
1869		 * Before we change our current pointer, make  sure we won't
1870		 * overflow the request area with this frame. Note that we
1871		 * test against 'greater than' here as it's okay in this case
1872		 * to have next offset be just outside the request area.
1873		 */
1874		if ((nxt_off + MPT_RQSL(mpt)) > MPT_REQUEST_AREA) {
1875			nxt_off = MPT_REQUEST_AREA;
1876			goto next_chain;
1877		}
1878
1879		/*
1880		 * Set our SGE element pointer to the beginning of the chain
1881		 * list and update our next chain list offset.
1882		 */
1883		se = (SGE_SIMPLE32 *) &mpt_off[nxt_off];
1884		cur_off = nxt_off;
1885		nxt_off += MPT_RQSL(mpt);
1886
1887		/*
1888		 * Now initialize the chain descriptor.
1889		 */
1890		memset(ce, 0, sizeof (*ce));
1891
1892		/*
1893		 * Get the physical address of the chain list.
1894		 */
1895		chain_list_addr = trq->req_pbuf;
1896		chain_list_addr += cur_off;
1897
1898
1899
1900		ce->Address = htole32(chain_list_addr);
1901		ce->Flags = MPI_SGE_FLAGS_CHAIN_ELEMENT;
1902
1903
1904		/*
1905		 * If we have more than a frame's worth of segments left,
1906		 * set up the chain list to have the last element be another
1907		 * chain descriptor.
1908		 */
1909		if ((nseg - seg) > MPT_NSGL(mpt)) {
1910			this_seg_lim = seg + MPT_NSGL(mpt) - 1;
1911			/*
1912			 * The length of the chain is the length in bytes of the
1913			 * number of segments plus the next chain element.
1914			 *
1915			 * The next chain descriptor offset is the length,
1916			 * in words, of the number of segments.
1917			 */
1918			ce->Length = (this_seg_lim - seg) *
1919			    sizeof (SGE_SIMPLE32);
1920			ce->NextChainOffset = ce->Length >> 2;
1921			ce->Length += sizeof (SGE_CHAIN32);
1922		} else {
1923			this_seg_lim = nseg;
1924			ce->Length = (this_seg_lim - seg) *
1925			    sizeof (SGE_SIMPLE32);
1926		}
1927		ce->Length = htole16(ce->Length);
1928
1929		/*
1930		 * Fill in the chain list SGE elements with our segment data.
1931		 *
1932		 * If we're the last element in this chain list, set the last
1933		 * element flag. If we're the completely last element period,
1934		 * set the end of list and end of buffer flags.
1935		 */
1936		while (seg < this_seg_lim) {
1937			memset(se, 0, sizeof (*se));
1938			se->Address = htole32(dm_segs->ds_addr);
1939
1940			MPI_pSGE_SET_LENGTH(se, dm_segs->ds_len);
1941			tf = flags;
1942			if (seg == this_seg_lim - 1) {
1943				tf |=	MPI_SGE_FLAGS_LAST_ELEMENT;
1944			}
1945			if (seg == nseg - 1) {
1946				tf |=	MPI_SGE_FLAGS_END_OF_LIST |
1947					MPI_SGE_FLAGS_END_OF_BUFFER;
1948			}
1949			MPI_pSGE_SET_FLAGS(se, tf);
1950			se->FlagsLength = htole32(se->FlagsLength);
1951			se++;
1952			seg++;
1953			dm_segs++;
1954		}
1955
1956    next_chain:
1957		/*
1958		 * If we have more segments to do and we've used up all of
1959		 * the space in a request area, go allocate another one
1960		 * and chain to that.
1961		 */
1962		if (seg < nseg && nxt_off >= MPT_REQUEST_AREA) {
1963			request_t *nrq;
1964
1965			nrq = mpt_get_request(mpt, FALSE);
1966
1967			if (nrq == NULL) {
1968				error = ENOMEM;
1969				goto bad;
1970			}
1971
1972			/*
1973			 * Append the new request area on the tail of our list.
1974			 */
1975			if ((trq = req->chain) == NULL) {
1976				req->chain = nrq;
1977			} else {
1978				while (trq->chain != NULL) {
1979					trq = trq->chain;
1980				}
1981				trq->chain = nrq;
1982			}
1983			trq = nrq;
1984			mpt_off = trq->req_vbuf;
1985			if (mpt->verbose >= MPT_PRT_DEBUG) {
1986				memset(mpt_off, 0xff, MPT_REQUEST_AREA);
1987			}
1988			nxt_off = 0;
1989		}
1990	}
1991out:
1992
1993	/*
1994	 * Last time we need to check if this CCB needs to be aborted.
1995	 */
1996	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_INPROG) {
1997		if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
1998			request_t *cmd_req =
1999				MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
2000			MPT_TGT_STATE(mpt, cmd_req)->state = TGT_STATE_IN_CAM;
2001			MPT_TGT_STATE(mpt, cmd_req)->ccb = NULL;
2002			MPT_TGT_STATE(mpt, cmd_req)->req = NULL;
2003		}
2004		mpt_prt(mpt,
2005		    "mpt_execute_req: I/O cancelled (status 0x%x)\n",
2006		    ccb->ccb_h.status & CAM_STATUS_MASK);
2007		if (nseg) {
2008			bus_dmamap_unload(mpt->buffer_dmat, req->dmap);
2009		}
2010		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
2011		KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
2012		xpt_done(ccb);
2013		mpt_free_request(mpt, req);
2014		return;
2015	}
2016
2017	ccb->ccb_h.status |= CAM_SIM_QUEUED;
2018	if (ccb->ccb_h.timeout != CAM_TIME_INFINITY) {
2019		mpt_req_timeout(req, (ccb->ccb_h.timeout * hz) / 1000,
2020		    mpt_timeout, ccb);
2021	}
2022	if (mpt->verbose > MPT_PRT_DEBUG) {
2023		int nc = 0;
2024		mpt_print_request(req->req_vbuf);
2025		for (trq = req->chain; trq; trq = trq->chain) {
2026			printf("  Additional Chain Area %d\n", nc++);
2027			mpt_dump_sgl(trq->req_vbuf, 0);
2028		}
2029	}
2030
2031	if (hdrp->Function == MPI_FUNCTION_TARGET_ASSIST) {
2032		request_t *cmd_req = MPT_TAG_2_REQ(mpt, ccb->csio.tag_id);
2033		mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, cmd_req);
2034#ifdef	WE_TRUST_AUTO_GOOD_STATUS
2035		if ((ccb->ccb_h.flags & CAM_SEND_STATUS) &&
2036		    csio->scsi_status == SCSI_STATUS_OK && tgt->resid == 0) {
2037			tgt->state = TGT_STATE_MOVING_DATA_AND_STATUS;
2038		} else {
2039			tgt->state = TGT_STATE_MOVING_DATA;
2040		}
2041#else
2042		tgt->state = TGT_STATE_MOVING_DATA;
2043#endif
2044	}
2045	mpt_send_cmd(mpt, req);
2046}
2047
2048static void
2049mpt_start(struct cam_sim *sim, union ccb *ccb)
2050{
2051	request_t *req;
2052	struct mpt_softc *mpt;
2053	MSG_SCSI_IO_REQUEST *mpt_req;
2054	struct ccb_scsiio *csio = &ccb->csio;
2055	struct ccb_hdr *ccbh = &ccb->ccb_h;
2056	bus_dmamap_callback_t *cb;
2057	target_id_t tgt;
2058	int raid_passthru;
2059	int error;
2060
2061	/* Get the pointer for the physical addapter */
2062	mpt = ccb->ccb_h.ccb_mpt_ptr;
2063	raid_passthru = (sim == mpt->phydisk_sim);
2064
2065	if ((req = mpt_get_request(mpt, FALSE)) == NULL) {
2066		if (mpt->outofbeer == 0) {
2067			mpt->outofbeer = 1;
2068			xpt_freeze_simq(mpt->sim, 1);
2069			mpt_lprt(mpt, MPT_PRT_DEBUG, "FREEZEQ\n");
2070		}
2071		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
2072		mpt_set_ccb_status(ccb, CAM_REQUEUE_REQ);
2073		xpt_done(ccb);
2074		return;
2075	}
2076#ifdef	INVARIANTS
2077	mpt_req_not_spcl(mpt, req, "mpt_start", __LINE__);
2078#endif
2079
2080	if (sizeof (bus_addr_t) > 4) {
2081		cb = mpt_execute_req_a64;
2082	} else {
2083		cb = mpt_execute_req;
2084	}
2085
2086	/*
2087	 * Link the ccb and the request structure so we can find
2088	 * the other knowing either the request or the ccb
2089	 */
2090	req->ccb = ccb;
2091	ccb->ccb_h.ccb_req_ptr = req;
2092
2093	/* Now we build the command for the IOC */
2094	mpt_req = req->req_vbuf;
2095	memset(mpt_req, 0, sizeof (MSG_SCSI_IO_REQUEST));
2096
2097	mpt_req->Function = MPI_FUNCTION_SCSI_IO_REQUEST;
2098	if (raid_passthru) {
2099		mpt_req->Function = MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH;
2100		if (mpt_map_physdisk(mpt, ccb, &tgt) != 0) {
2101			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
2102			mpt_set_ccb_status(ccb, CAM_DEV_NOT_THERE);
2103			xpt_done(ccb);
2104			return;
2105		}
2106		mpt_req->Bus = 0;	/* we never set bus here */
2107	} else {
2108		tgt = ccb->ccb_h.target_id;
2109		mpt_req->Bus = 0;	/* XXX */
2110
2111	}
2112	mpt_req->SenseBufferLength =
2113		(csio->sense_len < MPT_SENSE_SIZE) ?
2114		 csio->sense_len : MPT_SENSE_SIZE;
2115
2116	/*
2117	 * We use the message context to find the request structure when we
2118	 * Get the command completion interrupt from the IOC.
2119	 */
2120	mpt_req->MsgContext = htole32(req->index | scsi_io_handler_id);
2121
2122	/* Which physical device to do the I/O on */
2123	mpt_req->TargetID = tgt;
2124
2125	/* We assume a single level LUN type */
2126	if (ccb->ccb_h.target_lun >= MPT_MAX_LUNS) {
2127		mpt_req->LUN[0] = 0x40 | ((ccb->ccb_h.target_lun >> 8) & 0x3f);
2128		mpt_req->LUN[1] = ccb->ccb_h.target_lun & 0xff;
2129	} else {
2130		mpt_req->LUN[1] = ccb->ccb_h.target_lun;
2131	}
2132
2133	/* Set the direction of the transfer */
2134	if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
2135		mpt_req->Control = MPI_SCSIIO_CONTROL_READ;
2136	} else if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_OUT) {
2137		mpt_req->Control = MPI_SCSIIO_CONTROL_WRITE;
2138	} else {
2139		mpt_req->Control = MPI_SCSIIO_CONTROL_NODATATRANSFER;
2140	}
2141
2142	if ((ccb->ccb_h.flags & CAM_TAG_ACTION_VALID) != 0) {
2143		switch(ccb->csio.tag_action) {
2144		case MSG_HEAD_OF_Q_TAG:
2145			mpt_req->Control |= MPI_SCSIIO_CONTROL_HEADOFQ;
2146			break;
2147		case MSG_ACA_TASK:
2148			mpt_req->Control |= MPI_SCSIIO_CONTROL_ACAQ;
2149			break;
2150		case MSG_ORDERED_Q_TAG:
2151			mpt_req->Control |= MPI_SCSIIO_CONTROL_ORDEREDQ;
2152			break;
2153		case MSG_SIMPLE_Q_TAG:
2154		default:
2155			mpt_req->Control |= MPI_SCSIIO_CONTROL_SIMPLEQ;
2156			break;
2157		}
2158	} else {
2159		if (mpt->is_fc || mpt->is_sas) {
2160			mpt_req->Control |= MPI_SCSIIO_CONTROL_SIMPLEQ;
2161		} else {
2162			/* XXX No such thing for a target doing packetized. */
2163			mpt_req->Control |= MPI_SCSIIO_CONTROL_UNTAGGED;
2164		}
2165	}
2166
2167	if (mpt->is_spi) {
2168		if (ccb->ccb_h.flags & CAM_DIS_DISCONNECT) {
2169			mpt_req->Control |= MPI_SCSIIO_CONTROL_NO_DISCONNECT;
2170		}
2171	}
2172	mpt_req->Control = htole32(mpt_req->Control);
2173
2174	/* Copy the scsi command block into place */
2175	if ((ccb->ccb_h.flags & CAM_CDB_POINTER) != 0) {
2176		bcopy(csio->cdb_io.cdb_ptr, mpt_req->CDB, csio->cdb_len);
2177	} else {
2178		bcopy(csio->cdb_io.cdb_bytes, mpt_req->CDB, csio->cdb_len);
2179	}
2180
2181	mpt_req->CDBLength = csio->cdb_len;
2182	mpt_req->DataLength = htole32(csio->dxfer_len);
2183	mpt_req->SenseBufferLowAddr = htole32(req->sense_pbuf);
2184
2185	/*
2186	 * Do a *short* print here if we're set to MPT_PRT_DEBUG
2187	 */
2188	if (mpt->verbose == MPT_PRT_DEBUG) {
2189		U32 df;
2190		mpt_prt(mpt, "mpt_start: %s op 0x%x ",
2191		    (mpt_req->Function == MPI_FUNCTION_SCSI_IO_REQUEST)?
2192		    "SCSI_IO_REQUEST" : "SCSI_IO_PASSTHRU", mpt_req->CDB[0]);
2193		df = mpt_req->Control & MPI_SCSIIO_CONTROL_DATADIRECTION_MASK;
2194		if (df != MPI_SCSIIO_CONTROL_NODATATRANSFER) {
2195			mpt_prtc(mpt, "(%s %u byte%s ",
2196			    (df == MPI_SCSIIO_CONTROL_READ)?
2197			    "read" : "write",  csio->dxfer_len,
2198			    (csio->dxfer_len == 1)? ")" : "s)");
2199		}
2200		mpt_prtc(mpt, "tgt %u lun %u req %p:%u\n", tgt,
2201		    ccb->ccb_h.target_lun, req, req->serno);
2202	}
2203
2204	error = bus_dmamap_load_ccb(mpt->buffer_dmat, req->dmap, ccb, cb,
2205	    req, 0);
2206	if (error == EINPROGRESS) {
2207		/*
2208		 * So as to maintain ordering, freeze the controller queue
2209		 * until our mapping is returned.
2210		 */
2211		xpt_freeze_simq(mpt->sim, 1);
2212		ccbh->status |= CAM_RELEASE_SIMQ;
2213	}
2214}
2215
2216static int
2217mpt_bus_reset(struct mpt_softc *mpt, target_id_t tgt, lun_id_t lun,
2218    int sleep_ok)
2219{
2220	int   error;
2221	uint16_t status;
2222	uint8_t response;
2223
2224	error = mpt_scsi_send_tmf(mpt,
2225	    (tgt != CAM_TARGET_WILDCARD || lun != CAM_LUN_WILDCARD) ?
2226	    MPI_SCSITASKMGMT_TASKTYPE_TARGET_RESET :
2227	    MPI_SCSITASKMGMT_TASKTYPE_RESET_BUS,
2228	    mpt->is_fc ? MPI_SCSITASKMGMT_MSGFLAGS_LIP_RESET_OPTION : 0,
2229	    0,	/* XXX How do I get the channel ID? */
2230	    tgt != CAM_TARGET_WILDCARD ? tgt : 0,
2231	    lun != CAM_LUN_WILDCARD ? lun : 0,
2232	    0, sleep_ok);
2233
2234	if (error != 0) {
2235		/*
2236		 * mpt_scsi_send_tmf hard resets on failure, so no
2237		 * need to do so here.
2238		 */
2239		mpt_prt(mpt,
2240		    "mpt_bus_reset: mpt_scsi_send_tmf returned %d\n", error);
2241		return (EIO);
2242	}
2243
2244	/* Wait for bus reset to be processed by the IOC. */
2245	error = mpt_wait_req(mpt, mpt->tmf_req, REQ_STATE_DONE,
2246	    REQ_STATE_DONE, sleep_ok, 5000);
2247
2248	status = le16toh(mpt->tmf_req->IOCStatus);
2249	response = mpt->tmf_req->ResponseCode;
2250	mpt->tmf_req->state = REQ_STATE_FREE;
2251
2252	if (error) {
2253		mpt_prt(mpt, "mpt_bus_reset: Reset timed-out. "
2254		    "Resetting controller.\n");
2255		mpt_reset(mpt, TRUE);
2256		return (ETIMEDOUT);
2257	}
2258
2259	if ((status & MPI_IOCSTATUS_MASK) != MPI_IOCSTATUS_SUCCESS) {
2260		mpt_prt(mpt, "mpt_bus_reset: TMF IOC Status 0x%x. "
2261		    "Resetting controller.\n", status);
2262		mpt_reset(mpt, TRUE);
2263		return (EIO);
2264	}
2265
2266	if (response != MPI_SCSITASKMGMT_RSP_TM_SUCCEEDED &&
2267	    response != MPI_SCSITASKMGMT_RSP_TM_COMPLETE) {
2268		mpt_prt(mpt, "mpt_bus_reset: TMF Response 0x%x. "
2269		    "Resetting controller.\n", response);
2270		mpt_reset(mpt, TRUE);
2271		return (EIO);
2272	}
2273	return (0);
2274}
2275
2276static int
2277mpt_fc_reset_link(struct mpt_softc *mpt, int dowait)
2278{
2279	int r = 0;
2280	request_t *req;
2281	PTR_MSG_FC_PRIMITIVE_SEND_REQUEST fc;
2282
2283 	req = mpt_get_request(mpt, FALSE);
2284	if (req == NULL) {
2285		return (ENOMEM);
2286	}
2287	fc = req->req_vbuf;
2288	memset(fc, 0, sizeof(*fc));
2289	fc->SendFlags = MPI_FC_PRIM_SEND_FLAGS_RESET_LINK;
2290	fc->Function = MPI_FUNCTION_FC_PRIMITIVE_SEND;
2291	fc->MsgContext = htole32(req->index | fc_els_handler_id);
2292	mpt_send_cmd(mpt, req);
2293	if (dowait) {
2294		r = mpt_wait_req(mpt, req, REQ_STATE_DONE,
2295		    REQ_STATE_DONE, FALSE, 60 * 1000);
2296		if (r == 0) {
2297			mpt_free_request(mpt, req);
2298		}
2299	}
2300	return (r);
2301}
2302
2303static int
2304mpt_cam_event(struct mpt_softc *mpt, request_t *req,
2305	      MSG_EVENT_NOTIFY_REPLY *msg)
2306{
2307	uint32_t data0, data1;
2308
2309	data0 = le32toh(msg->Data[0]);
2310	data1 = le32toh(msg->Data[1]);
2311	switch(msg->Event & 0xFF) {
2312	case MPI_EVENT_UNIT_ATTENTION:
2313		mpt_prt(mpt, "UNIT ATTENTION: Bus: 0x%02x TargetID: 0x%02x\n",
2314		    (data0 >> 8) & 0xff, data0 & 0xff);
2315		break;
2316
2317	case MPI_EVENT_IOC_BUS_RESET:
2318		/* We generated a bus reset */
2319		mpt_prt(mpt, "IOC Generated Bus Reset Port: %d\n",
2320		    (data0 >> 8) & 0xff);
2321		xpt_async(AC_BUS_RESET, mpt->path, NULL);
2322		break;
2323
2324	case MPI_EVENT_EXT_BUS_RESET:
2325		/* Someone else generated a bus reset */
2326		mpt_prt(mpt, "External Bus Reset Detected\n");
2327		/*
2328		 * These replies don't return EventData like the MPI
2329		 * spec says they do
2330		 */
2331		xpt_async(AC_BUS_RESET, mpt->path, NULL);
2332		break;
2333
2334	case MPI_EVENT_RESCAN:
2335	{
2336		union ccb *ccb;
2337		uint32_t pathid;
2338		/*
2339		 * In general this means a device has been added to the loop.
2340		 */
2341		mpt_prt(mpt, "Rescan Port: %d\n", (data0 >> 8) & 0xff);
2342		if (mpt->ready == 0) {
2343			break;
2344		}
2345		if (mpt->phydisk_sim) {
2346			pathid = cam_sim_path(mpt->phydisk_sim);
2347		} else {
2348			pathid = cam_sim_path(mpt->sim);
2349		}
2350		/*
2351		 * Allocate a CCB, create a wildcard path for this bus,
2352		 * and schedule a rescan.
2353		 */
2354		ccb = xpt_alloc_ccb_nowait();
2355		if (ccb == NULL) {
2356			mpt_prt(mpt, "unable to alloc CCB for rescan\n");
2357			break;
2358		}
2359
2360		if (xpt_create_path(&ccb->ccb_h.path, NULL, pathid,
2361		    CAM_TARGET_WILDCARD, CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
2362			mpt_prt(mpt, "unable to create path for rescan\n");
2363			xpt_free_ccb(ccb);
2364			break;
2365		}
2366		xpt_rescan(ccb);
2367		break;
2368	}
2369
2370	case MPI_EVENT_LINK_STATUS_CHANGE:
2371		mpt_prt(mpt, "Port %d: LinkState: %s\n",
2372		    (data1 >> 8) & 0xff,
2373		    ((data0 & 0xff) == 0)?  "Failed" : "Active");
2374		break;
2375
2376	case MPI_EVENT_LOOP_STATE_CHANGE:
2377		switch ((data0 >> 16) & 0xff) {
2378		case 0x01:
2379			mpt_prt(mpt,
2380			    "Port 0x%x: FC LinkEvent: LIP(%02x,%02x) "
2381			    "(Loop Initialization)\n",
2382			    (data1 >> 8) & 0xff,
2383			    (data0 >> 8) & 0xff,
2384			    (data0     ) & 0xff);
2385			switch ((data0 >> 8) & 0xff) {
2386			case 0xF7:
2387				if ((data0 & 0xff) == 0xF7) {
2388					mpt_prt(mpt, "Device needs AL_PA\n");
2389				} else {
2390					mpt_prt(mpt, "Device %02x doesn't like "
2391					    "FC performance\n",
2392					    data0 & 0xFF);
2393				}
2394				break;
2395			case 0xF8:
2396				if ((data0 & 0xff) == 0xF7) {
2397					mpt_prt(mpt, "Device had loop failure "
2398					    "at its receiver prior to acquiring"
2399					    " AL_PA\n");
2400				} else {
2401					mpt_prt(mpt, "Device %02x detected loop"
2402					    " failure at its receiver\n",
2403					    data0 & 0xFF);
2404				}
2405				break;
2406			default:
2407				mpt_prt(mpt, "Device %02x requests that device "
2408				    "%02x reset itself\n",
2409				    data0 & 0xFF,
2410				    (data0 >> 8) & 0xFF);
2411				break;
2412			}
2413			break;
2414		case 0x02:
2415			mpt_prt(mpt, "Port 0x%x: FC LinkEvent: "
2416			    "LPE(%02x,%02x) (Loop Port Enable)\n",
2417			    (data1 >> 8) & 0xff, /* Port */
2418			    (data0 >>  8) & 0xff, /* Character 3 */
2419			    (data0      ) & 0xff  /* Character 4 */);
2420			break;
2421		case 0x03:
2422			mpt_prt(mpt, "Port 0x%x: FC LinkEvent: "
2423			    "LPB(%02x,%02x) (Loop Port Bypass)\n",
2424			    (data1 >> 8) & 0xff, /* Port */
2425			    (data0 >> 8) & 0xff, /* Character 3 */
2426			    (data0     ) & 0xff  /* Character 4 */);
2427			break;
2428		default:
2429			mpt_prt(mpt, "Port 0x%x: FC LinkEvent: Unknown "
2430			    "FC event (%02x %02x %02x)\n",
2431			    (data1 >> 8) & 0xff, /* Port */
2432			    (data0 >> 16) & 0xff, /* Event */
2433			    (data0 >>  8) & 0xff, /* Character 3 */
2434			    (data0      ) & 0xff  /* Character 4 */);
2435		}
2436		break;
2437
2438	case MPI_EVENT_LOGOUT:
2439		mpt_prt(mpt, "FC Logout Port: %d N_PortID: %02x\n",
2440		    (data1 >> 8) & 0xff, data0);
2441		break;
2442	case MPI_EVENT_QUEUE_FULL:
2443	{
2444		struct cam_sim *sim;
2445		struct cam_path *tmppath;
2446		struct ccb_relsim crs;
2447		PTR_EVENT_DATA_QUEUE_FULL pqf;
2448		lun_id_t lun_id;
2449
2450		pqf = (PTR_EVENT_DATA_QUEUE_FULL)msg->Data;
2451		pqf->CurrentDepth = le16toh(pqf->CurrentDepth);
2452		mpt_prt(mpt, "QUEUE FULL EVENT: Bus 0x%02x Target 0x%02x Depth "
2453		    "%d\n", pqf->Bus, pqf->TargetID, pqf->CurrentDepth);
2454		if (mpt->phydisk_sim && mpt_is_raid_member(mpt,
2455		    pqf->TargetID) != 0) {
2456			sim = mpt->phydisk_sim;
2457		} else {
2458			sim = mpt->sim;
2459		}
2460		for (lun_id = 0; lun_id < MPT_MAX_LUNS; lun_id++) {
2461			if (xpt_create_path(&tmppath, NULL, cam_sim_path(sim),
2462			    pqf->TargetID, lun_id) != CAM_REQ_CMP) {
2463				mpt_prt(mpt, "unable to create a path to send "
2464				    "XPT_REL_SIMQ");
2465				break;
2466			}
2467			xpt_setup_ccb(&crs.ccb_h, tmppath, 5);
2468			crs.ccb_h.func_code = XPT_REL_SIMQ;
2469			crs.ccb_h.flags = CAM_DEV_QFREEZE;
2470			crs.release_flags = RELSIM_ADJUST_OPENINGS;
2471			crs.openings = pqf->CurrentDepth - 1;
2472			xpt_action((union ccb *)&crs);
2473			if (crs.ccb_h.status != CAM_REQ_CMP) {
2474				mpt_prt(mpt, "XPT_REL_SIMQ failed\n");
2475			}
2476			xpt_free_path(tmppath);
2477		}
2478		break;
2479	}
2480	case MPI_EVENT_IR_RESYNC_UPDATE:
2481		mpt_prt(mpt, "IR resync update %d completed\n",
2482		    (data0 >> 16) & 0xff);
2483		break;
2484	case MPI_EVENT_SAS_DEVICE_STATUS_CHANGE:
2485	{
2486		union ccb *ccb;
2487		struct cam_sim *sim;
2488		struct cam_path *tmppath;
2489		PTR_EVENT_DATA_SAS_DEVICE_STATUS_CHANGE psdsc;
2490
2491		psdsc = (PTR_EVENT_DATA_SAS_DEVICE_STATUS_CHANGE)msg->Data;
2492		if (mpt->phydisk_sim && mpt_is_raid_member(mpt,
2493		    psdsc->TargetID) != 0)
2494			sim = mpt->phydisk_sim;
2495		else
2496			sim = mpt->sim;
2497		switch(psdsc->ReasonCode) {
2498		case MPI_EVENT_SAS_DEV_STAT_RC_ADDED:
2499			ccb = xpt_alloc_ccb_nowait();
2500			if (ccb == NULL) {
2501				mpt_prt(mpt,
2502				    "unable to alloc CCB for rescan\n");
2503				break;
2504			}
2505			if (xpt_create_path(&ccb->ccb_h.path, NULL,
2506			    cam_sim_path(sim), psdsc->TargetID,
2507			    CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
2508				mpt_prt(mpt,
2509				    "unable to create path for rescan\n");
2510				xpt_free_ccb(ccb);
2511				break;
2512			}
2513			xpt_rescan(ccb);
2514			break;
2515		case MPI_EVENT_SAS_DEV_STAT_RC_NOT_RESPONDING:
2516			if (xpt_create_path(&tmppath, NULL, cam_sim_path(sim),
2517			    psdsc->TargetID, CAM_LUN_WILDCARD) !=
2518			    CAM_REQ_CMP) {
2519				mpt_prt(mpt,
2520				    "unable to create path for async event");
2521				break;
2522			}
2523			xpt_async(AC_LOST_DEVICE, tmppath, NULL);
2524			xpt_free_path(tmppath);
2525			break;
2526		case MPI_EVENT_SAS_DEV_STAT_RC_CMPL_INTERNAL_DEV_RESET:
2527		case MPI_EVENT_SAS_DEV_STAT_RC_CMPL_TASK_ABORT_INTERNAL:
2528		case MPI_EVENT_SAS_DEV_STAT_RC_INTERNAL_DEVICE_RESET:
2529			break;
2530		default:
2531			mpt_lprt(mpt, MPT_PRT_WARN,
2532			    "SAS device status change: Bus: 0x%02x TargetID: "
2533			    "0x%02x ReasonCode: 0x%02x\n", psdsc->Bus,
2534			    psdsc->TargetID, psdsc->ReasonCode);
2535			break;
2536		}
2537		break;
2538	}
2539	case MPI_EVENT_SAS_DISCOVERY_ERROR:
2540	{
2541		PTR_EVENT_DATA_DISCOVERY_ERROR pde;
2542
2543		pde = (PTR_EVENT_DATA_DISCOVERY_ERROR)msg->Data;
2544		pde->DiscoveryStatus = le32toh(pde->DiscoveryStatus);
2545		mpt_lprt(mpt, MPT_PRT_WARN,
2546		    "SAS discovery error: Port: 0x%02x Status: 0x%08x\n",
2547		    pde->Port, pde->DiscoveryStatus);
2548		break;
2549	}
2550	case MPI_EVENT_EVENT_CHANGE:
2551	case MPI_EVENT_INTEGRATED_RAID:
2552	case MPI_EVENT_IR2:
2553	case MPI_EVENT_LOG_ENTRY_ADDED:
2554	case MPI_EVENT_SAS_DISCOVERY:
2555	case MPI_EVENT_SAS_PHY_LINK_STATUS:
2556	case MPI_EVENT_SAS_SES:
2557		break;
2558	default:
2559		mpt_lprt(mpt, MPT_PRT_WARN, "mpt_cam_event: 0x%x\n",
2560		    msg->Event & 0xFF);
2561		return (0);
2562	}
2563	return (1);
2564}
2565
2566/*
2567 * Reply path for all SCSI I/O requests, called from our
2568 * interrupt handler by extracting our handler index from
2569 * the MsgContext field of the reply from the IOC.
2570 *
2571 * This routine is optimized for the common case of a
2572 * completion without error.  All exception handling is
2573 * offloaded to non-inlined helper routines to minimize
2574 * cache footprint.
2575 */
2576static int
2577mpt_scsi_reply_handler(struct mpt_softc *mpt, request_t *req,
2578    uint32_t reply_desc, MSG_DEFAULT_REPLY *reply_frame)
2579{
2580	MSG_SCSI_IO_REQUEST *scsi_req;
2581	union ccb *ccb;
2582
2583	if (req->state == REQ_STATE_FREE) {
2584		mpt_prt(mpt, "mpt_scsi_reply_handler: req already free\n");
2585		return (TRUE);
2586	}
2587
2588	scsi_req = (MSG_SCSI_IO_REQUEST *)req->req_vbuf;
2589	ccb = req->ccb;
2590	if (ccb == NULL) {
2591		mpt_prt(mpt, "mpt_scsi_reply_handler: req %p:%u with no ccb\n",
2592		    req, req->serno);
2593		return (TRUE);
2594	}
2595
2596	mpt_req_untimeout(req, mpt_timeout, ccb);
2597	ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
2598
2599	if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) {
2600		bus_dmasync_op_t op;
2601
2602		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN)
2603			op = BUS_DMASYNC_POSTREAD;
2604		else
2605			op = BUS_DMASYNC_POSTWRITE;
2606		bus_dmamap_sync(mpt->buffer_dmat, req->dmap, op);
2607		bus_dmamap_unload(mpt->buffer_dmat, req->dmap);
2608	}
2609
2610	if (reply_frame == NULL) {
2611		/*
2612		 * Context only reply, completion without error status.
2613		 */
2614		ccb->csio.resid = 0;
2615		mpt_set_ccb_status(ccb, CAM_REQ_CMP);
2616		ccb->csio.scsi_status = SCSI_STATUS_OK;
2617	} else {
2618		mpt_scsi_reply_frame_handler(mpt, req, reply_frame);
2619	}
2620
2621	if (mpt->outofbeer) {
2622		ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
2623		mpt->outofbeer = 0;
2624		mpt_lprt(mpt, MPT_PRT_DEBUG, "THAWQ\n");
2625	}
2626	if (scsi_req->CDB[0] == INQUIRY && (scsi_req->CDB[1] & SI_EVPD) == 0) {
2627		struct scsi_inquiry_data *iq =
2628		    (struct scsi_inquiry_data *)ccb->csio.data_ptr;
2629		if (scsi_req->Function ==
2630		    MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH) {
2631			/*
2632			 * Fake out the device type so that only the
2633			 * pass-thru device will attach.
2634			 */
2635			iq->device &= ~0x1F;
2636			iq->device |= T_NODEVICE;
2637		}
2638	}
2639	if (mpt->verbose == MPT_PRT_DEBUG) {
2640		mpt_prt(mpt, "mpt_scsi_reply_handler: %p:%u complete\n",
2641		    req, req->serno);
2642	}
2643	KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
2644	xpt_done(ccb);
2645	if ((req->state & REQ_STATE_TIMEDOUT) == 0) {
2646		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2647	} else {
2648		mpt_prt(mpt, "completing timedout/aborted req %p:%u\n",
2649		    req, req->serno);
2650		TAILQ_REMOVE(&mpt->request_timeout_list, req, links);
2651	}
2652	KASSERT((req->state & REQ_STATE_NEED_WAKEUP) == 0,
2653	    ("CCB req needed wakeup"));
2654#ifdef	INVARIANTS
2655	mpt_req_not_spcl(mpt, req, "mpt_scsi_reply_handler", __LINE__);
2656#endif
2657	mpt_free_request(mpt, req);
2658	return (TRUE);
2659}
2660
2661static int
2662mpt_scsi_tmf_reply_handler(struct mpt_softc *mpt, request_t *req,
2663    uint32_t reply_desc, MSG_DEFAULT_REPLY *reply_frame)
2664{
2665	MSG_SCSI_TASK_MGMT_REPLY *tmf_reply;
2666
2667	KASSERT(req == mpt->tmf_req, ("TMF Reply not using mpt->tmf_req"));
2668#ifdef	INVARIANTS
2669	mpt_req_not_spcl(mpt, req, "mpt_scsi_tmf_reply_handler", __LINE__);
2670#endif
2671	tmf_reply = (MSG_SCSI_TASK_MGMT_REPLY *)reply_frame;
2672	/* Record IOC Status and Response Code of TMF for any waiters. */
2673	req->IOCStatus = le16toh(tmf_reply->IOCStatus);
2674	req->ResponseCode = tmf_reply->ResponseCode;
2675
2676	mpt_lprt(mpt, MPT_PRT_DEBUG, "TMF complete: req %p:%u status 0x%x\n",
2677	    req, req->serno, le16toh(tmf_reply->IOCStatus));
2678	TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2679	if ((req->state & REQ_STATE_NEED_WAKEUP) != 0) {
2680		req->state |= REQ_STATE_DONE;
2681		wakeup(req);
2682	} else {
2683		mpt->tmf_req->state = REQ_STATE_FREE;
2684	}
2685	return (TRUE);
2686}
2687
2688/*
2689 * XXX: Move to definitions file
2690 */
2691#define	ELS	0x22
2692#define	FC4LS	0x32
2693#define	ABTS	0x81
2694#define	BA_ACC	0x84
2695
2696#define	LS_RJT	0x01
2697#define	LS_ACC	0x02
2698#define	PLOGI	0x03
2699#define	LOGO	0x05
2700#define SRR	0x14
2701#define PRLI	0x20
2702#define PRLO	0x21
2703#define ADISC	0x52
2704#define RSCN	0x61
2705
2706static void
2707mpt_fc_els_send_response(struct mpt_softc *mpt, request_t *req,
2708    PTR_MSG_LINK_SERVICE_BUFFER_POST_REPLY rp, U8 length)
2709{
2710	uint32_t fl;
2711	MSG_LINK_SERVICE_RSP_REQUEST tmp;
2712	PTR_MSG_LINK_SERVICE_RSP_REQUEST rsp;
2713
2714	/*
2715	 * We are going to reuse the ELS request to send this response back.
2716	 */
2717	rsp = &tmp;
2718	memset(rsp, 0, sizeof(*rsp));
2719
2720#ifdef	USE_IMMEDIATE_LINK_DATA
2721	/*
2722	 * Apparently the IMMEDIATE stuff doesn't seem to work.
2723	 */
2724	rsp->RspFlags = LINK_SERVICE_RSP_FLAGS_IMMEDIATE;
2725#endif
2726	rsp->RspLength = length;
2727	rsp->Function = MPI_FUNCTION_FC_LINK_SRVC_RSP;
2728	rsp->MsgContext = htole32(req->index | fc_els_handler_id);
2729
2730	/*
2731	 * Copy over information from the original reply frame to
2732	 * it's correct place in the response.
2733	 */
2734	memcpy((U8 *)rsp + 0x0c, (U8 *)rp + 0x1c, 24);
2735
2736	/*
2737	 * And now copy back the temporary area to the original frame.
2738	 */
2739	memcpy(req->req_vbuf, rsp, sizeof (MSG_LINK_SERVICE_RSP_REQUEST));
2740	rsp = req->req_vbuf;
2741
2742#ifdef	USE_IMMEDIATE_LINK_DATA
2743	memcpy((U8 *)&rsp->SGL, &((U8 *)req->req_vbuf)[MPT_RQSL(mpt)], length);
2744#else
2745{
2746	PTR_SGE_SIMPLE32 se = (PTR_SGE_SIMPLE32) &rsp->SGL;
2747	bus_addr_t paddr = req->req_pbuf;
2748	paddr += MPT_RQSL(mpt);
2749
2750	fl =
2751		MPI_SGE_FLAGS_HOST_TO_IOC	|
2752		MPI_SGE_FLAGS_SIMPLE_ELEMENT	|
2753		MPI_SGE_FLAGS_LAST_ELEMENT	|
2754		MPI_SGE_FLAGS_END_OF_LIST	|
2755		MPI_SGE_FLAGS_END_OF_BUFFER;
2756	fl <<= MPI_SGE_FLAGS_SHIFT;
2757	fl |= (length);
2758	se->FlagsLength = htole32(fl);
2759	se->Address = htole32((uint32_t) paddr);
2760}
2761#endif
2762
2763	/*
2764	 * Send it on...
2765	 */
2766	mpt_send_cmd(mpt, req);
2767}
2768
2769static int
2770mpt_fc_els_reply_handler(struct mpt_softc *mpt, request_t *req,
2771    uint32_t reply_desc, MSG_DEFAULT_REPLY *reply_frame)
2772{
2773	PTR_MSG_LINK_SERVICE_BUFFER_POST_REPLY rp =
2774	    (PTR_MSG_LINK_SERVICE_BUFFER_POST_REPLY) reply_frame;
2775	U8 rctl;
2776	U8 type;
2777	U8 cmd;
2778	U16 status = le16toh(reply_frame->IOCStatus);
2779	U32 *elsbuf;
2780	int ioindex;
2781	int do_refresh = TRUE;
2782
2783#ifdef	INVARIANTS
2784	KASSERT(mpt_req_on_free_list(mpt, req) == 0,
2785	    ("fc_els_reply_handler: req %p:%u for function %x on freelist!",
2786	    req, req->serno, rp->Function));
2787	if (rp->Function != MPI_FUNCTION_FC_PRIMITIVE_SEND) {
2788		mpt_req_spcl(mpt, req, "fc_els_reply_handler", __LINE__);
2789	} else {
2790		mpt_req_not_spcl(mpt, req, "fc_els_reply_handler", __LINE__);
2791	}
2792#endif
2793	mpt_lprt(mpt, MPT_PRT_DEBUG,
2794	    "FC_ELS Complete: req %p:%u, reply %p function %x\n",
2795	    req, req->serno, reply_frame, reply_frame->Function);
2796
2797	if  (status != MPI_IOCSTATUS_SUCCESS) {
2798		mpt_prt(mpt, "ELS REPLY STATUS 0x%x for Function %x\n",
2799		    status, reply_frame->Function);
2800		if (status == MPI_IOCSTATUS_INVALID_STATE) {
2801			/*
2802			 * XXX: to get around shutdown issue
2803			 */
2804			mpt->disabled = 1;
2805			return (TRUE);
2806		}
2807		return (TRUE);
2808	}
2809
2810	/*
2811	 * If the function of a link service response, we recycle the
2812	 * response to be a refresh for a new link service request.
2813	 *
2814	 * The request pointer is bogus in this case and we have to fetch
2815	 * it based upon the TransactionContext.
2816	 */
2817	if (rp->Function == MPI_FUNCTION_FC_LINK_SRVC_RSP) {
2818		/* Freddie Uncle Charlie Katie */
2819		/* We don't get the IOINDEX as part of the Link Svc Rsp */
2820		for (ioindex = 0; ioindex < mpt->els_cmds_allocated; ioindex++)
2821			if (mpt->els_cmd_ptrs[ioindex] == req) {
2822				break;
2823			}
2824
2825		KASSERT(ioindex < mpt->els_cmds_allocated,
2826		    ("can't find my mommie!"));
2827
2828		/* remove from active list as we're going to re-post it */
2829		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2830		req->state &= ~REQ_STATE_QUEUED;
2831		req->state |= REQ_STATE_DONE;
2832		mpt_fc_post_els(mpt, req, ioindex);
2833		return (TRUE);
2834	}
2835
2836	if (rp->Function == MPI_FUNCTION_FC_PRIMITIVE_SEND) {
2837		/* remove from active list as we're done */
2838		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2839		req->state &= ~REQ_STATE_QUEUED;
2840		req->state |= REQ_STATE_DONE;
2841		if (req->state & REQ_STATE_TIMEDOUT) {
2842			mpt_lprt(mpt, MPT_PRT_DEBUG,
2843			    "Sync Primitive Send Completed After Timeout\n");
2844			mpt_free_request(mpt, req);
2845		} else if ((req->state & REQ_STATE_NEED_WAKEUP) == 0) {
2846			mpt_lprt(mpt, MPT_PRT_DEBUG,
2847			    "Async Primitive Send Complete\n");
2848			mpt_free_request(mpt, req);
2849		} else {
2850			mpt_lprt(mpt, MPT_PRT_DEBUG,
2851			    "Sync Primitive Send Complete- Waking Waiter\n");
2852			wakeup(req);
2853		}
2854		return (TRUE);
2855	}
2856
2857	if (rp->Function != MPI_FUNCTION_FC_LINK_SRVC_BUF_POST) {
2858		mpt_prt(mpt, "unexpected ELS_REPLY: Function 0x%x Flags %x "
2859		    "Length %d Message Flags %x\n", rp->Function, rp->Flags,
2860		    rp->MsgLength, rp->MsgFlags);
2861		return (TRUE);
2862	}
2863
2864	if (rp->MsgLength <= 5) {
2865		/*
2866		 * This is just a ack of an original ELS buffer post
2867		 */
2868		mpt_lprt(mpt, MPT_PRT_DEBUG,
2869		    "RECV'd ACK of FC_ELS buf post %p:%u\n", req, req->serno);
2870		return (TRUE);
2871	}
2872
2873
2874	rctl = (le32toh(rp->Rctl_Did) & MPI_FC_RCTL_MASK) >> MPI_FC_RCTL_SHIFT;
2875	type = (le32toh(rp->Type_Fctl) & MPI_FC_TYPE_MASK) >> MPI_FC_TYPE_SHIFT;
2876
2877	elsbuf = &((U32 *)req->req_vbuf)[MPT_RQSL(mpt)/sizeof (U32)];
2878	cmd = be32toh(elsbuf[0]) >> 24;
2879
2880	if (rp->Flags & MPI_LS_BUF_POST_REPLY_FLAG_NO_RSP_NEEDED) {
2881		mpt_lprt(mpt, MPT_PRT_ALWAYS, "ELS_REPLY: response unneeded\n");
2882		return (TRUE);
2883	}
2884
2885	ioindex = le32toh(rp->TransactionContext);
2886	req = mpt->els_cmd_ptrs[ioindex];
2887
2888	if (rctl == ELS && type == 1) {
2889		switch (cmd) {
2890		case PRLI:
2891			/*
2892			 * Send back a PRLI ACC
2893			 */
2894			mpt_prt(mpt, "PRLI from 0x%08x%08x\n",
2895			    le32toh(rp->Wwn.PortNameHigh),
2896			    le32toh(rp->Wwn.PortNameLow));
2897			elsbuf[0] = htobe32(0x02100014);
2898			elsbuf[1] |= htobe32(0x00000100);
2899			elsbuf[4] = htobe32(0x00000002);
2900			if (mpt->role & MPT_ROLE_TARGET)
2901				elsbuf[4] |= htobe32(0x00000010);
2902			if (mpt->role & MPT_ROLE_INITIATOR)
2903				elsbuf[4] |= htobe32(0x00000020);
2904			/* remove from active list as we're done */
2905			TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2906			req->state &= ~REQ_STATE_QUEUED;
2907			req->state |= REQ_STATE_DONE;
2908			mpt_fc_els_send_response(mpt, req, rp, 20);
2909			do_refresh = FALSE;
2910			break;
2911		case PRLO:
2912			memset(elsbuf, 0, 5 * (sizeof (U32)));
2913			elsbuf[0] = htobe32(0x02100014);
2914			elsbuf[1] = htobe32(0x08000100);
2915			mpt_prt(mpt, "PRLO from 0x%08x%08x\n",
2916			    le32toh(rp->Wwn.PortNameHigh),
2917			    le32toh(rp->Wwn.PortNameLow));
2918			/* remove from active list as we're done */
2919			TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2920			req->state &= ~REQ_STATE_QUEUED;
2921			req->state |= REQ_STATE_DONE;
2922			mpt_fc_els_send_response(mpt, req, rp, 20);
2923			do_refresh = FALSE;
2924			break;
2925		default:
2926			mpt_prt(mpt, "ELS TYPE 1 COMMAND: %x\n", cmd);
2927			break;
2928		}
2929	} else if (rctl == ABTS && type == 0) {
2930		uint16_t rx_id = le16toh(rp->Rxid);
2931		uint16_t ox_id = le16toh(rp->Oxid);
2932		request_t *tgt_req = NULL;
2933
2934		mpt_prt(mpt,
2935		    "ELS: ABTS OX_ID 0x%x RX_ID 0x%x from 0x%08x%08x\n",
2936		    ox_id, rx_id, le32toh(rp->Wwn.PortNameHigh),
2937		    le32toh(rp->Wwn.PortNameLow));
2938		if (rx_id >= mpt->mpt_max_tgtcmds) {
2939			mpt_prt(mpt, "Bad RX_ID 0x%x\n", rx_id);
2940		} else if (mpt->tgt_cmd_ptrs == NULL) {
2941			mpt_prt(mpt, "No TGT CMD PTRS\n");
2942		} else {
2943			tgt_req = mpt->tgt_cmd_ptrs[rx_id];
2944		}
2945		if (tgt_req) {
2946			mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, tgt_req);
2947			union ccb *ccb;
2948			uint32_t ct_id;
2949
2950			/*
2951			 * Check to make sure we have the correct command
2952			 * The reply descriptor in the target state should
2953			 * should contain an IoIndex that should match the
2954			 * RX_ID.
2955			 *
2956			 * It'd be nice to have OX_ID to crosscheck with
2957			 * as well.
2958			 */
2959			ct_id = GET_IO_INDEX(tgt->reply_desc);
2960
2961			if (ct_id != rx_id) {
2962				mpt_lprt(mpt, MPT_PRT_ERROR, "ABORT Mismatch: "
2963				    "RX_ID received=0x%x; RX_ID in cmd=0x%x\n",
2964				    rx_id, ct_id);
2965				goto skip;
2966			}
2967
2968			ccb = tgt->ccb;
2969			if (ccb) {
2970				mpt_prt(mpt,
2971				    "CCB (%p): lun %u flags %x status %x\n",
2972				    ccb, ccb->ccb_h.target_lun,
2973				    ccb->ccb_h.flags, ccb->ccb_h.status);
2974			}
2975			mpt_prt(mpt, "target state 0x%x resid %u xfrd %u rpwrd "
2976			    "%x nxfers %x\n", tgt->state,
2977			    tgt->resid, tgt->bytes_xfered, tgt->reply_desc,
2978			    tgt->nxfers);
2979  skip:
2980			if (mpt_abort_target_cmd(mpt, tgt_req)) {
2981				mpt_prt(mpt, "unable to start TargetAbort\n");
2982			}
2983		} else {
2984			mpt_prt(mpt, "no back pointer for RX_ID 0x%x\n", rx_id);
2985		}
2986		memset(elsbuf, 0, 5 * (sizeof (U32)));
2987		elsbuf[0] = htobe32(0);
2988		elsbuf[1] = htobe32((ox_id << 16) | rx_id);
2989		elsbuf[2] = htobe32(0x000ffff);
2990		/*
2991		 * Dork with the reply frame so that the response to it
2992		 * will be correct.
2993		 */
2994		rp->Rctl_Did += ((BA_ACC - ABTS) << MPI_FC_RCTL_SHIFT);
2995		/* remove from active list as we're done */
2996		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
2997		req->state &= ~REQ_STATE_QUEUED;
2998		req->state |= REQ_STATE_DONE;
2999		mpt_fc_els_send_response(mpt, req, rp, 12);
3000		do_refresh = FALSE;
3001	} else {
3002		mpt_prt(mpt, "ELS: RCTL %x TYPE %x CMD %x\n", rctl, type, cmd);
3003	}
3004	if (do_refresh == TRUE) {
3005		/* remove from active list as we're done */
3006		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
3007		req->state &= ~REQ_STATE_QUEUED;
3008		req->state |= REQ_STATE_DONE;
3009		mpt_fc_post_els(mpt, req, ioindex);
3010	}
3011	return (TRUE);
3012}
3013
3014/*
3015 * Clean up all SCSI Initiator personality state in response
3016 * to a controller reset.
3017 */
3018static void
3019mpt_cam_ioc_reset(struct mpt_softc *mpt, int type)
3020{
3021
3022	/*
3023	 * The pending list is already run down by
3024	 * the generic handler.  Perform the same
3025	 * operation on the timed out request list.
3026	 */
3027	mpt_complete_request_chain(mpt, &mpt->request_timeout_list,
3028				   MPI_IOCSTATUS_INVALID_STATE);
3029
3030	/*
3031	 * XXX: We need to repost ELS and Target Command Buffers?
3032	 */
3033
3034	/*
3035	 * Inform the XPT that a bus reset has occurred.
3036	 */
3037	xpt_async(AC_BUS_RESET, mpt->path, NULL);
3038}
3039
3040/*
3041 * Parse additional completion information in the reply
3042 * frame for SCSI I/O requests.
3043 */
3044static int
3045mpt_scsi_reply_frame_handler(struct mpt_softc *mpt, request_t *req,
3046			     MSG_DEFAULT_REPLY *reply_frame)
3047{
3048	union ccb *ccb;
3049	MSG_SCSI_IO_REPLY *scsi_io_reply;
3050	u_int ioc_status;
3051	u_int sstate;
3052
3053	MPT_DUMP_REPLY_FRAME(mpt, reply_frame);
3054	KASSERT(reply_frame->Function == MPI_FUNCTION_SCSI_IO_REQUEST
3055	     || reply_frame->Function == MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH,
3056		("MPT SCSI I/O Handler called with incorrect reply type"));
3057	KASSERT((reply_frame->MsgFlags & MPI_MSGFLAGS_CONTINUATION_REPLY) == 0,
3058		("MPT SCSI I/O Handler called with continuation reply"));
3059
3060	scsi_io_reply = (MSG_SCSI_IO_REPLY *)reply_frame;
3061	ioc_status = le16toh(scsi_io_reply->IOCStatus);
3062	ioc_status &= MPI_IOCSTATUS_MASK;
3063	sstate = scsi_io_reply->SCSIState;
3064
3065	ccb = req->ccb;
3066	ccb->csio.resid =
3067	    ccb->csio.dxfer_len - le32toh(scsi_io_reply->TransferCount);
3068
3069	if ((sstate & MPI_SCSI_STATE_AUTOSENSE_VALID) != 0
3070	 && (ccb->ccb_h.flags & (CAM_SENSE_PHYS | CAM_SENSE_PTR)) == 0) {
3071		uint32_t sense_returned;
3072
3073		ccb->ccb_h.status |= CAM_AUTOSNS_VALID;
3074
3075		sense_returned = le32toh(scsi_io_reply->SenseCount);
3076		if (sense_returned < ccb->csio.sense_len)
3077			ccb->csio.sense_resid = ccb->csio.sense_len -
3078						sense_returned;
3079		else
3080			ccb->csio.sense_resid = 0;
3081
3082		bzero(&ccb->csio.sense_data, sizeof(ccb->csio.sense_data));
3083		bcopy(req->sense_vbuf, &ccb->csio.sense_data,
3084		    min(ccb->csio.sense_len, sense_returned));
3085	}
3086
3087	if ((sstate & MPI_SCSI_STATE_QUEUE_TAG_REJECTED) != 0) {
3088		/*
3089		 * Tag messages rejected, but non-tagged retry
3090		 * was successful.
3091XXXX
3092		mpt_set_tags(mpt, devinfo, MPT_QUEUE_NONE);
3093		 */
3094	}
3095
3096	switch(ioc_status) {
3097	case MPI_IOCSTATUS_SCSI_RESIDUAL_MISMATCH:
3098		/*
3099		 * XXX
3100		 * Linux driver indicates that a zero
3101		 * transfer length with this error code
3102		 * indicates a CRC error.
3103		 *
3104		 * No need to swap the bytes for checking
3105		 * against zero.
3106		 */
3107		if (scsi_io_reply->TransferCount == 0) {
3108			mpt_set_ccb_status(ccb, CAM_UNCOR_PARITY);
3109			break;
3110		}
3111		/* FALLTHROUGH */
3112	case MPI_IOCSTATUS_SCSI_DATA_UNDERRUN:
3113	case MPI_IOCSTATUS_SUCCESS:
3114	case MPI_IOCSTATUS_SCSI_RECOVERED_ERROR:
3115		if ((sstate & MPI_SCSI_STATE_NO_SCSI_STATUS) != 0) {
3116			/*
3117			 * Status was never returned for this transaction.
3118			 */
3119			mpt_set_ccb_status(ccb, CAM_UNEXP_BUSFREE);
3120		} else if (scsi_io_reply->SCSIStatus != SCSI_STATUS_OK) {
3121			ccb->csio.scsi_status = scsi_io_reply->SCSIStatus;
3122			mpt_set_ccb_status(ccb, CAM_SCSI_STATUS_ERROR);
3123			if ((sstate & MPI_SCSI_STATE_AUTOSENSE_FAILED) != 0)
3124				mpt_set_ccb_status(ccb, CAM_AUTOSENSE_FAIL);
3125		} else if ((sstate & MPI_SCSI_STATE_RESPONSE_INFO_VALID) != 0) {
3126
3127			/* XXX Handle SPI-Packet and FCP-2 response info. */
3128			mpt_set_ccb_status(ccb, CAM_REQ_CMP_ERR);
3129		} else
3130			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3131		break;
3132	case MPI_IOCSTATUS_SCSI_DATA_OVERRUN:
3133		mpt_set_ccb_status(ccb, CAM_DATA_RUN_ERR);
3134		break;
3135	case MPI_IOCSTATUS_SCSI_IO_DATA_ERROR:
3136		mpt_set_ccb_status(ccb, CAM_UNCOR_PARITY);
3137		break;
3138	case MPI_IOCSTATUS_SCSI_DEVICE_NOT_THERE:
3139		/*
3140		 * Since selection timeouts and "device really not
3141		 * there" are grouped into this error code, report
3142		 * selection timeout.  Selection timeouts are
3143		 * typically retried before giving up on the device
3144		 * whereas "device not there" errors are considered
3145		 * unretryable.
3146		 */
3147		mpt_set_ccb_status(ccb, CAM_SEL_TIMEOUT);
3148		break;
3149	case MPI_IOCSTATUS_SCSI_PROTOCOL_ERROR:
3150		mpt_set_ccb_status(ccb, CAM_SEQUENCE_FAIL);
3151		break;
3152	case MPI_IOCSTATUS_SCSI_INVALID_BUS:
3153		mpt_set_ccb_status(ccb, CAM_PATH_INVALID);
3154		break;
3155	case MPI_IOCSTATUS_SCSI_INVALID_TARGETID:
3156		mpt_set_ccb_status(ccb, CAM_TID_INVALID);
3157		break;
3158	case MPI_IOCSTATUS_SCSI_TASK_MGMT_FAILED:
3159		ccb->ccb_h.status = CAM_UA_TERMIO;
3160		break;
3161	case MPI_IOCSTATUS_INVALID_STATE:
3162		/*
3163		 * The IOC has been reset.  Emulate a bus reset.
3164		 */
3165		/* FALLTHROUGH */
3166	case MPI_IOCSTATUS_SCSI_EXT_TERMINATED:
3167		ccb->ccb_h.status = CAM_SCSI_BUS_RESET;
3168		break;
3169	case MPI_IOCSTATUS_SCSI_TASK_TERMINATED:
3170	case MPI_IOCSTATUS_SCSI_IOC_TERMINATED:
3171		/*
3172		 * Don't clobber any timeout status that has
3173		 * already been set for this transaction.  We
3174		 * want the SCSI layer to be able to differentiate
3175		 * between the command we aborted due to timeout
3176		 * and any innocent bystanders.
3177		 */
3178		if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_INPROG)
3179			break;
3180		mpt_set_ccb_status(ccb, CAM_REQ_TERMIO);
3181		break;
3182
3183	case MPI_IOCSTATUS_INSUFFICIENT_RESOURCES:
3184		mpt_set_ccb_status(ccb, CAM_RESRC_UNAVAIL);
3185		break;
3186	case MPI_IOCSTATUS_BUSY:
3187		mpt_set_ccb_status(ccb, CAM_BUSY);
3188		break;
3189	case MPI_IOCSTATUS_INVALID_FUNCTION:
3190	case MPI_IOCSTATUS_INVALID_SGL:
3191	case MPI_IOCSTATUS_INTERNAL_ERROR:
3192	case MPI_IOCSTATUS_INVALID_FIELD:
3193	default:
3194		/* XXX
3195		 * Some of the above may need to kick
3196		 * of a recovery action!!!!
3197		 */
3198		ccb->ccb_h.status = CAM_UNREC_HBA_ERROR;
3199		break;
3200	}
3201
3202	if ((ccb->ccb_h.status & CAM_STATUS_MASK) != CAM_REQ_CMP) {
3203		mpt_freeze_ccb(ccb);
3204	}
3205
3206	return (TRUE);
3207}
3208
3209static void
3210mpt_action(struct cam_sim *sim, union ccb *ccb)
3211{
3212	struct mpt_softc *mpt;
3213	struct ccb_trans_settings *cts;
3214	target_id_t tgt;
3215	lun_id_t lun;
3216	int raid_passthru;
3217
3218	CAM_DEBUG(ccb->ccb_h.path, CAM_DEBUG_TRACE, ("mpt_action\n"));
3219
3220	mpt = (struct mpt_softc *)cam_sim_softc(sim);
3221	raid_passthru = (sim == mpt->phydisk_sim);
3222	MPT_LOCK_ASSERT(mpt);
3223
3224	tgt = ccb->ccb_h.target_id;
3225	lun = ccb->ccb_h.target_lun;
3226	if (raid_passthru &&
3227	    ccb->ccb_h.func_code != XPT_PATH_INQ &&
3228	    ccb->ccb_h.func_code != XPT_RESET_BUS &&
3229	    ccb->ccb_h.func_code != XPT_RESET_DEV) {
3230		if (mpt_map_physdisk(mpt, ccb, &tgt) != 0) {
3231			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3232			mpt_set_ccb_status(ccb, CAM_DEV_NOT_THERE);
3233			xpt_done(ccb);
3234			return;
3235		}
3236	}
3237	ccb->ccb_h.ccb_mpt_ptr = mpt;
3238
3239	switch (ccb->ccb_h.func_code) {
3240	case XPT_SCSI_IO:	/* Execute the requested I/O operation */
3241		/*
3242		 * Do a couple of preliminary checks...
3243		 */
3244		if ((ccb->ccb_h.flags & CAM_CDB_POINTER) != 0) {
3245			if ((ccb->ccb_h.flags & CAM_CDB_PHYS) != 0) {
3246				ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3247				mpt_set_ccb_status(ccb, CAM_REQ_INVALID);
3248				break;
3249			}
3250		}
3251		/* Max supported CDB length is 16 bytes */
3252		/* XXX Unless we implement the new 32byte message type */
3253		if (ccb->csio.cdb_len >
3254		    sizeof (((PTR_MSG_SCSI_IO_REQUEST)0)->CDB)) {
3255			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3256			mpt_set_ccb_status(ccb, CAM_REQ_INVALID);
3257			break;
3258		}
3259#ifdef	MPT_TEST_MULTIPATH
3260		if (mpt->failure_id == ccb->ccb_h.target_id) {
3261			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3262			mpt_set_ccb_status(ccb, CAM_SEL_TIMEOUT);
3263			break;
3264		}
3265#endif
3266		ccb->csio.scsi_status = SCSI_STATUS_OK;
3267		mpt_start(sim, ccb);
3268		return;
3269
3270	case XPT_RESET_BUS:
3271		if (raid_passthru) {
3272			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3273			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3274			break;
3275		}
3276	case XPT_RESET_DEV:
3277		if (ccb->ccb_h.func_code == XPT_RESET_BUS) {
3278			if (bootverbose) {
3279				xpt_print(ccb->ccb_h.path, "reset bus\n");
3280			}
3281		} else {
3282			xpt_print(ccb->ccb_h.path, "reset device\n");
3283		}
3284		(void) mpt_bus_reset(mpt, tgt, lun, FALSE);
3285
3286		/*
3287		 * mpt_bus_reset is always successful in that it
3288		 * will fall back to a hard reset should a bus
3289		 * reset attempt fail.
3290		 */
3291		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3292		mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3293		break;
3294
3295	case XPT_ABORT:
3296	{
3297		union ccb *accb = ccb->cab.abort_ccb;
3298		switch (accb->ccb_h.func_code) {
3299		case XPT_ACCEPT_TARGET_IO:
3300		case XPT_IMMEDIATE_NOTIFY:
3301			ccb->ccb_h.status = mpt_abort_target_ccb(mpt, ccb);
3302			break;
3303		case XPT_CONT_TARGET_IO:
3304			mpt_prt(mpt, "cannot abort active CTIOs yet\n");
3305			ccb->ccb_h.status = CAM_UA_ABORT;
3306			break;
3307		case XPT_SCSI_IO:
3308			ccb->ccb_h.status = CAM_UA_ABORT;
3309			break;
3310		default:
3311			ccb->ccb_h.status = CAM_REQ_INVALID;
3312			break;
3313		}
3314		break;
3315	}
3316
3317#define	IS_CURRENT_SETTINGS(c)	((c)->type == CTS_TYPE_CURRENT_SETTINGS)
3318
3319#define	DP_DISC_ENABLE	0x1
3320#define	DP_DISC_DISABL	0x2
3321#define	DP_DISC		(DP_DISC_ENABLE|DP_DISC_DISABL)
3322
3323#define	DP_TQING_ENABLE	0x4
3324#define	DP_TQING_DISABL	0x8
3325#define	DP_TQING	(DP_TQING_ENABLE|DP_TQING_DISABL)
3326
3327#define	DP_WIDE		0x10
3328#define	DP_NARROW	0x20
3329#define	DP_WIDTH	(DP_WIDE|DP_NARROW)
3330
3331#define	DP_SYNC		0x40
3332
3333	case XPT_SET_TRAN_SETTINGS:	/* Nexus Settings */
3334	{
3335		struct ccb_trans_settings_scsi *scsi;
3336		struct ccb_trans_settings_spi *spi;
3337		uint8_t dval;
3338		u_int period;
3339		u_int offset;
3340		int i, j;
3341
3342		cts = &ccb->cts;
3343
3344		if (mpt->is_fc || mpt->is_sas) {
3345			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3346			break;
3347		}
3348
3349		scsi = &cts->proto_specific.scsi;
3350		spi = &cts->xport_specific.spi;
3351
3352		/*
3353		 * We can be called just to valid transport and proto versions
3354		 */
3355		if (scsi->valid == 0 && spi->valid == 0) {
3356			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3357			break;
3358		}
3359
3360		/*
3361		 * Skip attempting settings on RAID volume disks.
3362		 * Other devices on the bus get the normal treatment.
3363		 */
3364		if (mpt->phydisk_sim && raid_passthru == 0 &&
3365		    mpt_is_raid_volume(mpt, tgt) != 0) {
3366			mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
3367			    "no transfer settings for RAID vols\n");
3368			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3369			break;
3370		}
3371
3372		i = mpt->mpt_port_page2.PortSettings &
3373		    MPI_SCSIPORTPAGE2_PORT_MASK_NEGO_MASTER_SETTINGS;
3374		j = mpt->mpt_port_page2.PortFlags &
3375		    MPI_SCSIPORTPAGE2_PORT_FLAGS_DV_MASK;
3376		if (i == MPI_SCSIPORTPAGE2_PORT_ALL_MASTER_SETTINGS &&
3377		    j == MPI_SCSIPORTPAGE2_PORT_FLAGS_OFF_DV) {
3378			mpt_lprt(mpt, MPT_PRT_ALWAYS,
3379			    "honoring BIOS transfer negotiations\n");
3380			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3381			break;
3382		}
3383
3384		dval = 0;
3385		period = 0;
3386		offset = 0;
3387
3388		if ((spi->valid & CTS_SPI_VALID_DISC) != 0) {
3389			dval |= ((spi->flags & CTS_SPI_FLAGS_DISC_ENB) != 0) ?
3390			    DP_DISC_ENABLE : DP_DISC_DISABL;
3391		}
3392
3393		if ((scsi->valid & CTS_SCSI_VALID_TQ) != 0) {
3394			dval |= ((scsi->flags & CTS_SCSI_FLAGS_TAG_ENB) != 0) ?
3395			    DP_TQING_ENABLE : DP_TQING_DISABL;
3396		}
3397
3398		if ((spi->valid & CTS_SPI_VALID_BUS_WIDTH) != 0) {
3399			dval |= (spi->bus_width == MSG_EXT_WDTR_BUS_16_BIT) ?
3400			    DP_WIDE : DP_NARROW;
3401		}
3402
3403		if (spi->valid & CTS_SPI_VALID_SYNC_OFFSET) {
3404			dval |= DP_SYNC;
3405			offset = spi->sync_offset;
3406		} else {
3407			PTR_CONFIG_PAGE_SCSI_DEVICE_1 ptr =
3408			    &mpt->mpt_dev_page1[tgt];
3409			offset = ptr->RequestedParameters;
3410			offset &= MPI_SCSIDEVPAGE1_RP_MAX_SYNC_OFFSET_MASK;
3411	    		offset >>= MPI_SCSIDEVPAGE1_RP_SHIFT_MAX_SYNC_OFFSET;
3412		}
3413		if (spi->valid & CTS_SPI_VALID_SYNC_RATE) {
3414			dval |= DP_SYNC;
3415			period = spi->sync_period;
3416		} else {
3417			PTR_CONFIG_PAGE_SCSI_DEVICE_1 ptr =
3418			    &mpt->mpt_dev_page1[tgt];
3419			period = ptr->RequestedParameters;
3420			period &= MPI_SCSIDEVPAGE1_RP_MIN_SYNC_PERIOD_MASK;
3421	    		period >>= MPI_SCSIDEVPAGE1_RP_SHIFT_MIN_SYNC_PERIOD;
3422		}
3423
3424		if (dval & DP_DISC_ENABLE) {
3425			mpt->mpt_disc_enable |= (1 << tgt);
3426		} else if (dval & DP_DISC_DISABL) {
3427			mpt->mpt_disc_enable &= ~(1 << tgt);
3428		}
3429		if (dval & DP_TQING_ENABLE) {
3430			mpt->mpt_tag_enable |= (1 << tgt);
3431		} else if (dval & DP_TQING_DISABL) {
3432			mpt->mpt_tag_enable &= ~(1 << tgt);
3433		}
3434		if (dval & DP_WIDTH) {
3435			mpt_setwidth(mpt, tgt, 1);
3436		}
3437		if (dval & DP_SYNC) {
3438			mpt_setsync(mpt, tgt, period, offset);
3439		}
3440		if (dval == 0) {
3441			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3442			break;
3443		}
3444		mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
3445		    "set [%d]: 0x%x period 0x%x offset %d\n",
3446		    tgt, dval, period, offset);
3447		if (mpt_update_spi_config(mpt, tgt)) {
3448			mpt_set_ccb_status(ccb, CAM_REQ_CMP_ERR);
3449		} else {
3450			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3451		}
3452		break;
3453	}
3454	case XPT_GET_TRAN_SETTINGS:
3455	{
3456		struct ccb_trans_settings_scsi *scsi;
3457		cts = &ccb->cts;
3458		cts->protocol = PROTO_SCSI;
3459		if (mpt->is_fc) {
3460			struct ccb_trans_settings_fc *fc =
3461			    &cts->xport_specific.fc;
3462			cts->protocol_version = SCSI_REV_SPC;
3463			cts->transport = XPORT_FC;
3464			cts->transport_version = 0;
3465			fc->valid = CTS_FC_VALID_SPEED;
3466			fc->bitrate = 100000;
3467		} else if (mpt->is_sas) {
3468			struct ccb_trans_settings_sas *sas =
3469			    &cts->xport_specific.sas;
3470			cts->protocol_version = SCSI_REV_SPC2;
3471			cts->transport = XPORT_SAS;
3472			cts->transport_version = 0;
3473			sas->valid = CTS_SAS_VALID_SPEED;
3474			sas->bitrate = 300000;
3475		} else {
3476			cts->protocol_version = SCSI_REV_2;
3477			cts->transport = XPORT_SPI;
3478			cts->transport_version = 2;
3479			if (mpt_get_spi_settings(mpt, cts) != 0) {
3480				mpt_set_ccb_status(ccb, CAM_REQ_CMP_ERR);
3481				break;
3482			}
3483		}
3484		scsi = &cts->proto_specific.scsi;
3485		scsi->valid = CTS_SCSI_VALID_TQ;
3486		scsi->flags = CTS_SCSI_FLAGS_TAG_ENB;
3487		mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3488		break;
3489	}
3490	case XPT_CALC_GEOMETRY:
3491	{
3492		struct ccb_calc_geometry *ccg;
3493
3494		ccg = &ccb->ccg;
3495		if (ccg->block_size == 0) {
3496			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
3497			mpt_set_ccb_status(ccb, CAM_REQ_INVALID);
3498			break;
3499		}
3500		cam_calc_geometry(ccg, /* extended */ 1);
3501		KASSERT(ccb->ccb_h.status, ("zero ccb sts at %d", __LINE__));
3502		break;
3503	}
3504	case XPT_PATH_INQ:		/* Path routing inquiry */
3505	{
3506		struct ccb_pathinq *cpi = &ccb->cpi;
3507
3508		cpi->version_num = 1;
3509		cpi->target_sprt = 0;
3510		cpi->hba_eng_cnt = 0;
3511		cpi->max_target = mpt->port_facts[0].MaxDevices - 1;
3512		cpi->maxio = (mpt->max_cam_seg_cnt - 1) * PAGE_SIZE;
3513		/*
3514		 * FC cards report MAX_DEVICES of 512, but
3515		 * the MSG_SCSI_IO_REQUEST target id field
3516		 * is only 8 bits. Until we fix the driver
3517		 * to support 'channels' for bus overflow,
3518		 * just limit it.
3519		 */
3520		if (cpi->max_target > 255) {
3521			cpi->max_target = 255;
3522		}
3523
3524		/*
3525		 * VMware ESX reports > 16 devices and then dies when we probe.
3526		 */
3527		if (mpt->is_spi && cpi->max_target > 15) {
3528			cpi->max_target = 15;
3529		}
3530		if (mpt->is_spi)
3531			cpi->max_lun = 7;
3532		else
3533			cpi->max_lun = MPT_MAX_LUNS;
3534		cpi->initiator_id = mpt->mpt_ini_id;
3535		cpi->bus_id = cam_sim_bus(sim);
3536
3537		/*
3538		 * The base speed is the speed of the underlying connection.
3539		 */
3540		cpi->protocol = PROTO_SCSI;
3541		if (mpt->is_fc) {
3542			cpi->hba_misc = PIM_NOBUSRESET | PIM_UNMAPPED;
3543			cpi->base_transfer_speed = 100000;
3544			cpi->hba_inquiry = PI_TAG_ABLE;
3545			cpi->transport = XPORT_FC;
3546			cpi->transport_version = 0;
3547			cpi->protocol_version = SCSI_REV_SPC;
3548		} else if (mpt->is_sas) {
3549			cpi->hba_misc = PIM_NOBUSRESET | PIM_UNMAPPED;
3550			cpi->base_transfer_speed = 300000;
3551			cpi->hba_inquiry = PI_TAG_ABLE;
3552			cpi->transport = XPORT_SAS;
3553			cpi->transport_version = 0;
3554			cpi->protocol_version = SCSI_REV_SPC2;
3555		} else {
3556			cpi->hba_misc = PIM_SEQSCAN | PIM_UNMAPPED;
3557			cpi->base_transfer_speed = 3300;
3558			cpi->hba_inquiry = PI_SDTR_ABLE|PI_TAG_ABLE|PI_WIDE_16;
3559			cpi->transport = XPORT_SPI;
3560			cpi->transport_version = 2;
3561			cpi->protocol_version = SCSI_REV_2;
3562		}
3563
3564		/*
3565		 * We give our fake RAID passhtru bus a width that is MaxVolumes
3566		 * wide and restrict it to one lun.
3567		 */
3568		if (raid_passthru) {
3569			cpi->max_target = mpt->ioc_page2->MaxPhysDisks - 1;
3570			cpi->initiator_id = cpi->max_target + 1;
3571			cpi->max_lun = 0;
3572		}
3573
3574		if ((mpt->role & MPT_ROLE_INITIATOR) == 0) {
3575			cpi->hba_misc |= PIM_NOINITIATOR;
3576		}
3577		if (mpt->is_fc && (mpt->role & MPT_ROLE_TARGET)) {
3578			cpi->target_sprt =
3579			    PIT_PROCESSOR | PIT_DISCONNECT | PIT_TERM_IO;
3580		} else {
3581			cpi->target_sprt = 0;
3582		}
3583		strncpy(cpi->sim_vid, "FreeBSD", SIM_IDLEN);
3584		strncpy(cpi->hba_vid, "LSI", HBA_IDLEN);
3585		strncpy(cpi->dev_name, cam_sim_name(sim), DEV_IDLEN);
3586		cpi->unit_number = cam_sim_unit(sim);
3587		cpi->ccb_h.status = CAM_REQ_CMP;
3588		break;
3589	}
3590	case XPT_EN_LUN:		/* Enable LUN as a target */
3591	{
3592		int result;
3593
3594		if (ccb->cel.enable)
3595			result = mpt_enable_lun(mpt,
3596			    ccb->ccb_h.target_id, ccb->ccb_h.target_lun);
3597		else
3598			result = mpt_disable_lun(mpt,
3599			    ccb->ccb_h.target_id, ccb->ccb_h.target_lun);
3600		if (result == 0) {
3601			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
3602		} else {
3603			mpt_set_ccb_status(ccb, CAM_REQ_CMP_ERR);
3604		}
3605		break;
3606	}
3607	case XPT_NOTIFY_ACKNOWLEDGE:	/* recycle notify ack */
3608	case XPT_IMMEDIATE_NOTIFY:	/* Add Immediate Notify Resource */
3609	case XPT_ACCEPT_TARGET_IO:	/* Add Accept Target IO Resource */
3610	{
3611		tgt_resource_t *trtp;
3612		lun_id_t lun = ccb->ccb_h.target_lun;
3613		ccb->ccb_h.sim_priv.entries[0].field = 0;
3614		ccb->ccb_h.sim_priv.entries[1].ptr = mpt;
3615		ccb->ccb_h.flags = 0;
3616
3617		if (lun == CAM_LUN_WILDCARD) {
3618			if (ccb->ccb_h.target_id != CAM_TARGET_WILDCARD) {
3619				mpt_set_ccb_status(ccb, CAM_REQ_INVALID);
3620				break;
3621			}
3622			trtp = &mpt->trt_wildcard;
3623		} else if (lun >= MPT_MAX_LUNS) {
3624			mpt_set_ccb_status(ccb, CAM_REQ_INVALID);
3625			break;
3626		} else {
3627			trtp = &mpt->trt[lun];
3628		}
3629		if (ccb->ccb_h.func_code == XPT_ACCEPT_TARGET_IO) {
3630			mpt_lprt(mpt, MPT_PRT_DEBUG1,
3631			    "Put FREE ATIO %p lun %d\n", ccb, lun);
3632			STAILQ_INSERT_TAIL(&trtp->atios, &ccb->ccb_h,
3633			    sim_links.stqe);
3634		} else if (ccb->ccb_h.func_code == XPT_IMMEDIATE_NOTIFY) {
3635			mpt_lprt(mpt, MPT_PRT_DEBUG1,
3636			    "Put FREE INOT lun %d\n", lun);
3637			STAILQ_INSERT_TAIL(&trtp->inots, &ccb->ccb_h,
3638			    sim_links.stqe);
3639		} else {
3640			mpt_lprt(mpt, MPT_PRT_ALWAYS, "Got Notify ACK\n");
3641		}
3642		mpt_set_ccb_status(ccb, CAM_REQ_INPROG);
3643		return;
3644	}
3645	case XPT_CONT_TARGET_IO:
3646		mpt_target_start_io(mpt, ccb);
3647		return;
3648
3649	default:
3650		ccb->ccb_h.status = CAM_REQ_INVALID;
3651		break;
3652	}
3653	xpt_done(ccb);
3654}
3655
3656static int
3657mpt_get_spi_settings(struct mpt_softc *mpt, struct ccb_trans_settings *cts)
3658{
3659	struct ccb_trans_settings_scsi *scsi = &cts->proto_specific.scsi;
3660	struct ccb_trans_settings_spi *spi = &cts->xport_specific.spi;
3661	target_id_t tgt;
3662	uint32_t dval, pval, oval;
3663	int rv;
3664
3665	if (IS_CURRENT_SETTINGS(cts) == 0) {
3666		tgt = cts->ccb_h.target_id;
3667	} else if (xpt_path_sim(cts->ccb_h.path) == mpt->phydisk_sim) {
3668		if (mpt_map_physdisk(mpt, (union ccb *)cts, &tgt)) {
3669			return (-1);
3670		}
3671	} else {
3672		tgt = cts->ccb_h.target_id;
3673	}
3674
3675	/*
3676	 * We aren't looking at Port Page 2 BIOS settings here-
3677	 * sometimes these have been known to be bogus XXX.
3678	 *
3679	 * For user settings, we pick the max from port page 0
3680	 *
3681	 * For current settings we read the current settings out from
3682	 * device page 0 for that target.
3683	 */
3684	if (IS_CURRENT_SETTINGS(cts)) {
3685		CONFIG_PAGE_SCSI_DEVICE_0 tmp;
3686		dval = 0;
3687
3688		tmp = mpt->mpt_dev_page0[tgt];
3689		rv = mpt_read_cur_cfg_page(mpt, tgt, &tmp.Header,
3690		    sizeof(tmp), FALSE, 5000);
3691		if (rv) {
3692			mpt_prt(mpt, "can't get tgt %d config page 0\n", tgt);
3693			return (rv);
3694		}
3695		mpt2host_config_page_scsi_device_0(&tmp);
3696
3697		mpt_lprt(mpt, MPT_PRT_DEBUG,
3698		    "mpt_get_spi_settings[%d]: current NP %x Info %x\n", tgt,
3699		    tmp.NegotiatedParameters, tmp.Information);
3700		dval |= (tmp.NegotiatedParameters & MPI_SCSIDEVPAGE0_NP_WIDE) ?
3701		    DP_WIDE : DP_NARROW;
3702		dval |= (mpt->mpt_disc_enable & (1 << tgt)) ?
3703		    DP_DISC_ENABLE : DP_DISC_DISABL;
3704		dval |= (mpt->mpt_tag_enable & (1 << tgt)) ?
3705		    DP_TQING_ENABLE : DP_TQING_DISABL;
3706		oval = tmp.NegotiatedParameters;
3707		oval &= MPI_SCSIDEVPAGE0_NP_NEG_SYNC_OFFSET_MASK;
3708		oval >>= MPI_SCSIDEVPAGE0_NP_SHIFT_SYNC_OFFSET;
3709		pval = tmp.NegotiatedParameters;
3710		pval &= MPI_SCSIDEVPAGE0_NP_NEG_SYNC_PERIOD_MASK;
3711		pval >>= MPI_SCSIDEVPAGE0_NP_SHIFT_SYNC_PERIOD;
3712		mpt->mpt_dev_page0[tgt] = tmp;
3713	} else {
3714		dval = DP_WIDE|DP_DISC_ENABLE|DP_TQING_ENABLE|DP_SYNC;
3715		oval = mpt->mpt_port_page0.Capabilities;
3716		oval = MPI_SCSIPORTPAGE0_CAP_GET_MAX_SYNC_OFFSET(oval);
3717		pval = mpt->mpt_port_page0.Capabilities;
3718		pval = MPI_SCSIPORTPAGE0_CAP_GET_MIN_SYNC_PERIOD(pval);
3719	}
3720
3721	spi->valid = 0;
3722	scsi->valid = 0;
3723	spi->flags = 0;
3724	scsi->flags = 0;
3725	spi->sync_offset = oval;
3726	spi->sync_period = pval;
3727	spi->valid |= CTS_SPI_VALID_SYNC_OFFSET;
3728	spi->valid |= CTS_SPI_VALID_SYNC_RATE;
3729	spi->valid |= CTS_SPI_VALID_BUS_WIDTH;
3730	if (dval & DP_WIDE) {
3731		spi->bus_width = MSG_EXT_WDTR_BUS_16_BIT;
3732	} else {
3733		spi->bus_width = MSG_EXT_WDTR_BUS_8_BIT;
3734	}
3735	if (cts->ccb_h.target_lun != CAM_LUN_WILDCARD) {
3736		scsi->valid = CTS_SCSI_VALID_TQ;
3737		if (dval & DP_TQING_ENABLE) {
3738			scsi->flags |= CTS_SCSI_FLAGS_TAG_ENB;
3739		}
3740		spi->valid |= CTS_SPI_VALID_DISC;
3741		if (dval & DP_DISC_ENABLE) {
3742			spi->flags |= CTS_SPI_FLAGS_DISC_ENB;
3743		}
3744	}
3745
3746	mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
3747	    "mpt_get_spi_settings[%d]: %s flags 0x%x per 0x%x off=%d\n", tgt,
3748	    IS_CURRENT_SETTINGS(cts) ? "ACTIVE" : "NVRAM ", dval, pval, oval);
3749	return (0);
3750}
3751
3752static void
3753mpt_setwidth(struct mpt_softc *mpt, int tgt, int onoff)
3754{
3755	PTR_CONFIG_PAGE_SCSI_DEVICE_1 ptr;
3756
3757	ptr = &mpt->mpt_dev_page1[tgt];
3758	if (onoff) {
3759		ptr->RequestedParameters |= MPI_SCSIDEVPAGE1_RP_WIDE;
3760	} else {
3761		ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_WIDE;
3762	}
3763}
3764
3765static void
3766mpt_setsync(struct mpt_softc *mpt, int tgt, int period, int offset)
3767{
3768	PTR_CONFIG_PAGE_SCSI_DEVICE_1 ptr;
3769
3770	ptr = &mpt->mpt_dev_page1[tgt];
3771	ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_MIN_SYNC_PERIOD_MASK;
3772	ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_MAX_SYNC_OFFSET_MASK;
3773	ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_DT;
3774	ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_QAS;
3775	ptr->RequestedParameters &= ~MPI_SCSIDEVPAGE1_RP_IU;
3776	if (period == 0) {
3777		return;
3778	}
3779	ptr->RequestedParameters |=
3780	    period << MPI_SCSIDEVPAGE1_RP_SHIFT_MIN_SYNC_PERIOD;
3781	ptr->RequestedParameters |=
3782	    offset << MPI_SCSIDEVPAGE1_RP_SHIFT_MAX_SYNC_OFFSET;
3783	if (period < 0xa) {
3784		ptr->RequestedParameters |= MPI_SCSIDEVPAGE1_RP_DT;
3785	}
3786	if (period < 0x9) {
3787		ptr->RequestedParameters |= MPI_SCSIDEVPAGE1_RP_QAS;
3788		ptr->RequestedParameters |= MPI_SCSIDEVPAGE1_RP_IU;
3789	}
3790}
3791
3792static int
3793mpt_update_spi_config(struct mpt_softc *mpt, int tgt)
3794{
3795	CONFIG_PAGE_SCSI_DEVICE_1 tmp;
3796	int rv;
3797
3798	mpt_lprt(mpt, MPT_PRT_NEGOTIATION,
3799	    "mpt_update_spi_config[%d].page1: Requested Params 0x%08x\n",
3800	    tgt, mpt->mpt_dev_page1[tgt].RequestedParameters);
3801	tmp = mpt->mpt_dev_page1[tgt];
3802	host2mpt_config_page_scsi_device_1(&tmp);
3803	rv = mpt_write_cur_cfg_page(mpt, tgt,
3804	    &tmp.Header, sizeof(tmp), FALSE, 5000);
3805	if (rv) {
3806		mpt_prt(mpt, "mpt_update_spi_config: write cur page failed\n");
3807		return (-1);
3808	}
3809	return (0);
3810}
3811
3812/****************************** Timeout Recovery ******************************/
3813static int
3814mpt_spawn_recovery_thread(struct mpt_softc *mpt)
3815{
3816	int error;
3817
3818	error = kproc_create(mpt_recovery_thread, mpt,
3819	    &mpt->recovery_thread, /*flags*/0,
3820	    /*altstack*/0, "mpt_recovery%d", mpt->unit);
3821	return (error);
3822}
3823
3824static void
3825mpt_terminate_recovery_thread(struct mpt_softc *mpt)
3826{
3827
3828	if (mpt->recovery_thread == NULL) {
3829		return;
3830	}
3831	mpt->shutdwn_recovery = 1;
3832	wakeup(mpt);
3833	/*
3834	 * Sleep on a slightly different location
3835	 * for this interlock just for added safety.
3836	 */
3837	mpt_sleep(mpt, &mpt->recovery_thread, PUSER, "thtrm", 0);
3838}
3839
3840static void
3841mpt_recovery_thread(void *arg)
3842{
3843	struct mpt_softc *mpt;
3844
3845	mpt = (struct mpt_softc *)arg;
3846	MPT_LOCK(mpt);
3847	for (;;) {
3848		if (TAILQ_EMPTY(&mpt->request_timeout_list) != 0) {
3849			if (mpt->shutdwn_recovery == 0) {
3850				mpt_sleep(mpt, mpt, PUSER, "idle", 0);
3851			}
3852		}
3853		if (mpt->shutdwn_recovery != 0) {
3854			break;
3855		}
3856		mpt_recover_commands(mpt);
3857	}
3858	mpt->recovery_thread = NULL;
3859	wakeup(&mpt->recovery_thread);
3860	MPT_UNLOCK(mpt);
3861	kproc_exit(0);
3862}
3863
3864static int
3865mpt_scsi_send_tmf(struct mpt_softc *mpt, u_int type, u_int flags,
3866    u_int channel, u_int target, u_int lun, u_int abort_ctx, int sleep_ok)
3867{
3868	MSG_SCSI_TASK_MGMT *tmf_req;
3869	int		    error;
3870
3871	/*
3872	 * Wait for any current TMF request to complete.
3873	 * We're only allowed to issue one TMF at a time.
3874	 */
3875	error = mpt_wait_req(mpt, mpt->tmf_req, REQ_STATE_FREE, REQ_STATE_FREE,
3876	    sleep_ok, MPT_TMF_MAX_TIMEOUT);
3877	if (error != 0) {
3878		mpt_reset(mpt, TRUE);
3879		return (ETIMEDOUT);
3880	}
3881
3882	mpt_assign_serno(mpt, mpt->tmf_req);
3883	mpt->tmf_req->state = REQ_STATE_ALLOCATED|REQ_STATE_QUEUED;
3884
3885	tmf_req = (MSG_SCSI_TASK_MGMT *)mpt->tmf_req->req_vbuf;
3886	memset(tmf_req, 0, sizeof(*tmf_req));
3887	tmf_req->TargetID = target;
3888	tmf_req->Bus = channel;
3889	tmf_req->Function = MPI_FUNCTION_SCSI_TASK_MGMT;
3890	tmf_req->TaskType = type;
3891	tmf_req->MsgFlags = flags;
3892	tmf_req->MsgContext =
3893	    htole32(mpt->tmf_req->index | scsi_tmf_handler_id);
3894	if (lun > MPT_MAX_LUNS) {
3895		tmf_req->LUN[0] = 0x40 | ((lun >> 8) & 0x3f);
3896		tmf_req->LUN[1] = lun & 0xff;
3897	} else {
3898		tmf_req->LUN[1] = lun;
3899	}
3900	tmf_req->TaskMsgContext = abort_ctx;
3901
3902	mpt_lprt(mpt, MPT_PRT_DEBUG,
3903	    "Issuing TMF %p:%u with MsgContext of 0x%x\n", mpt->tmf_req,
3904	    mpt->tmf_req->serno, tmf_req->MsgContext);
3905	if (mpt->verbose > MPT_PRT_DEBUG) {
3906		mpt_print_request(tmf_req);
3907	}
3908
3909	KASSERT(mpt_req_on_pending_list(mpt, mpt->tmf_req) == 0,
3910	    ("mpt_scsi_send_tmf: tmf_req already on pending list"));
3911	TAILQ_INSERT_HEAD(&mpt->request_pending_list, mpt->tmf_req, links);
3912	error = mpt_send_handshake_cmd(mpt, sizeof(*tmf_req), tmf_req);
3913	if (error != MPT_OK) {
3914		TAILQ_REMOVE(&mpt->request_pending_list, mpt->tmf_req, links);
3915		mpt->tmf_req->state = REQ_STATE_FREE;
3916		mpt_reset(mpt, TRUE);
3917	}
3918	return (error);
3919}
3920
3921/*
3922 * When a command times out, it is placed on the requeust_timeout_list
3923 * and we wake our recovery thread.  The MPT-Fusion architecture supports
3924 * only a single TMF operation at a time, so we serially abort/bdr, etc,
3925 * the timedout transactions.  The next TMF is issued either by the
3926 * completion handler of the current TMF waking our recovery thread,
3927 * or the TMF timeout handler causing a hard reset sequence.
3928 */
3929static void
3930mpt_recover_commands(struct mpt_softc *mpt)
3931{
3932	request_t	   *req;
3933	union ccb	   *ccb;
3934	int		    error;
3935
3936	if (TAILQ_EMPTY(&mpt->request_timeout_list) != 0) {
3937		/*
3938		 * No work to do- leave.
3939		 */
3940		mpt_prt(mpt, "mpt_recover_commands: no requests.\n");
3941		return;
3942	}
3943
3944	/*
3945	 * Flush any commands whose completion coincides with their timeout.
3946	 */
3947	mpt_intr(mpt);
3948
3949	if (TAILQ_EMPTY(&mpt->request_timeout_list) != 0) {
3950		/*
3951		 * The timedout commands have already
3952		 * completed.  This typically means
3953		 * that either the timeout value was on
3954		 * the hairy edge of what the device
3955		 * requires or - more likely - interrupts
3956		 * are not happening.
3957		 */
3958		mpt_prt(mpt, "Timedout requests already complete. "
3959		    "Interrupts may not be functioning.\n");
3960		mpt_enable_ints(mpt);
3961		return;
3962	}
3963
3964	/*
3965	 * We have no visibility into the current state of the
3966	 * controller, so attempt to abort the commands in the
3967	 * order they timed-out. For initiator commands, we
3968	 * depend on the reply handler pulling requests off
3969	 * the timeout list.
3970	 */
3971	while ((req = TAILQ_FIRST(&mpt->request_timeout_list)) != NULL) {
3972		uint16_t status;
3973		uint8_t response;
3974		MSG_REQUEST_HEADER *hdrp = req->req_vbuf;
3975
3976		mpt_prt(mpt, "attempting to abort req %p:%u function %x\n",
3977		    req, req->serno, hdrp->Function);
3978		ccb = req->ccb;
3979		if (ccb == NULL) {
3980			mpt_prt(mpt, "null ccb in timed out request. "
3981			    "Resetting Controller.\n");
3982			mpt_reset(mpt, TRUE);
3983			continue;
3984		}
3985		mpt_set_ccb_status(ccb, CAM_CMD_TIMEOUT);
3986
3987		/*
3988		 * Check to see if this is not an initiator command and
3989		 * deal with it differently if it is.
3990		 */
3991		switch (hdrp->Function) {
3992		case MPI_FUNCTION_SCSI_IO_REQUEST:
3993		case MPI_FUNCTION_RAID_SCSI_IO_PASSTHROUGH:
3994			break;
3995		default:
3996			/*
3997			 * XXX: FIX ME: need to abort target assists...
3998			 */
3999			mpt_prt(mpt, "just putting it back on the pend q\n");
4000			TAILQ_REMOVE(&mpt->request_timeout_list, req, links);
4001			TAILQ_INSERT_HEAD(&mpt->request_pending_list, req,
4002			    links);
4003			continue;
4004		}
4005
4006		error = mpt_scsi_send_tmf(mpt,
4007		    MPI_SCSITASKMGMT_TASKTYPE_ABORT_TASK,
4008		    0, 0, ccb->ccb_h.target_id, ccb->ccb_h.target_lun,
4009		    htole32(req->index | scsi_io_handler_id), TRUE);
4010
4011		if (error != 0) {
4012			/*
4013			 * mpt_scsi_send_tmf hard resets on failure, so no
4014			 * need to do so here.  Our queue should be emptied
4015			 * by the hard reset.
4016			 */
4017			continue;
4018		}
4019
4020		error = mpt_wait_req(mpt, mpt->tmf_req, REQ_STATE_DONE,
4021		    REQ_STATE_DONE, TRUE, 500);
4022
4023		status = le16toh(mpt->tmf_req->IOCStatus);
4024		response = mpt->tmf_req->ResponseCode;
4025		mpt->tmf_req->state = REQ_STATE_FREE;
4026
4027		if (error != 0) {
4028			/*
4029			 * If we've errored out,, reset the controller.
4030			 */
4031			mpt_prt(mpt, "mpt_recover_commands: abort timed-out. "
4032			    "Resetting controller\n");
4033			mpt_reset(mpt, TRUE);
4034			continue;
4035		}
4036
4037		if ((status & MPI_IOCSTATUS_MASK) != MPI_IOCSTATUS_SUCCESS) {
4038			mpt_prt(mpt, "mpt_recover_commands: IOC Status 0x%x. "
4039			    "Resetting controller.\n", status);
4040			mpt_reset(mpt, TRUE);
4041			continue;
4042		}
4043
4044		if (response != MPI_SCSITASKMGMT_RSP_TM_SUCCEEDED &&
4045		    response != MPI_SCSITASKMGMT_RSP_TM_COMPLETE) {
4046			mpt_prt(mpt, "mpt_recover_commands: TMF Response 0x%x. "
4047			    "Resetting controller.\n", response);
4048			mpt_reset(mpt, TRUE);
4049			continue;
4050		}
4051		mpt_prt(mpt, "abort of req %p:%u completed\n", req, req->serno);
4052	}
4053}
4054
4055/************************ Target Mode Support ****************************/
4056static void
4057mpt_fc_post_els(struct mpt_softc *mpt, request_t *req, int ioindex)
4058{
4059	MSG_LINK_SERVICE_BUFFER_POST_REQUEST *fc;
4060	PTR_SGE_TRANSACTION32 tep;
4061	PTR_SGE_SIMPLE32 se;
4062	bus_addr_t paddr;
4063	uint32_t fl;
4064
4065	paddr = req->req_pbuf;
4066	paddr += MPT_RQSL(mpt);
4067
4068	fc = req->req_vbuf;
4069	memset(fc, 0, MPT_REQUEST_AREA);
4070	fc->BufferCount = 1;
4071	fc->Function = MPI_FUNCTION_FC_LINK_SRVC_BUF_POST;
4072	fc->MsgContext = htole32(req->index | fc_els_handler_id);
4073
4074	/*
4075	 * Okay, set up ELS buffer pointers. ELS buffer pointers
4076	 * consist of a TE SGL element (with details length of zero)
4077	 * followed by a SIMPLE SGL element which holds the address
4078	 * of the buffer.
4079	 */
4080
4081	tep = (PTR_SGE_TRANSACTION32) &fc->SGL;
4082
4083	tep->ContextSize = 4;
4084	tep->Flags = 0;
4085	tep->TransactionContext[0] = htole32(ioindex);
4086
4087	se = (PTR_SGE_SIMPLE32) &tep->TransactionDetails[0];
4088	fl =
4089		MPI_SGE_FLAGS_HOST_TO_IOC	|
4090		MPI_SGE_FLAGS_SIMPLE_ELEMENT	|
4091		MPI_SGE_FLAGS_LAST_ELEMENT	|
4092		MPI_SGE_FLAGS_END_OF_LIST	|
4093		MPI_SGE_FLAGS_END_OF_BUFFER;
4094	fl <<= MPI_SGE_FLAGS_SHIFT;
4095	fl |= (MPT_NRFM(mpt) - MPT_RQSL(mpt));
4096	se->FlagsLength = htole32(fl);
4097	se->Address = htole32((uint32_t) paddr);
4098	mpt_lprt(mpt, MPT_PRT_DEBUG,
4099	    "add ELS index %d ioindex %d for %p:%u\n",
4100	    req->index, ioindex, req, req->serno);
4101	KASSERT(((req->state & REQ_STATE_LOCKED) != 0),
4102	    ("mpt_fc_post_els: request not locked"));
4103	mpt_send_cmd(mpt, req);
4104}
4105
4106static void
4107mpt_post_target_command(struct mpt_softc *mpt, request_t *req, int ioindex)
4108{
4109	PTR_MSG_TARGET_CMD_BUFFER_POST_REQUEST fc;
4110	PTR_CMD_BUFFER_DESCRIPTOR cb;
4111	bus_addr_t paddr;
4112
4113	paddr = req->req_pbuf;
4114	paddr += MPT_RQSL(mpt);
4115	memset(req->req_vbuf, 0, MPT_REQUEST_AREA);
4116	MPT_TGT_STATE(mpt, req)->state = TGT_STATE_LOADING;
4117
4118	fc = req->req_vbuf;
4119	fc->BufferCount = 1;
4120	fc->Function = MPI_FUNCTION_TARGET_CMD_BUFFER_POST;
4121	fc->MsgContext = htole32(req->index | mpt->scsi_tgt_handler_id);
4122
4123	cb = &fc->Buffer[0];
4124	cb->IoIndex = htole16(ioindex);
4125	cb->u.PhysicalAddress32 = htole32((U32) paddr);
4126
4127	mpt_check_doorbell(mpt);
4128	mpt_send_cmd(mpt, req);
4129}
4130
4131static int
4132mpt_add_els_buffers(struct mpt_softc *mpt)
4133{
4134	int i;
4135
4136	if (mpt->is_fc == 0) {
4137		return (TRUE);
4138	}
4139
4140	if (mpt->els_cmds_allocated) {
4141		return (TRUE);
4142	}
4143
4144	mpt->els_cmd_ptrs = malloc(MPT_MAX_ELS * sizeof (request_t *),
4145	    M_DEVBUF, M_NOWAIT | M_ZERO);
4146
4147	if (mpt->els_cmd_ptrs == NULL) {
4148		return (FALSE);
4149	}
4150
4151	/*
4152	 * Feed the chip some ELS buffer resources
4153	 */
4154	for (i = 0; i < MPT_MAX_ELS; i++) {
4155		request_t *req = mpt_get_request(mpt, FALSE);
4156		if (req == NULL) {
4157			break;
4158		}
4159		req->state |= REQ_STATE_LOCKED;
4160		mpt->els_cmd_ptrs[i] = req;
4161		mpt_fc_post_els(mpt, req, i);
4162	}
4163
4164	if (i == 0) {
4165		mpt_prt(mpt, "unable to add ELS buffer resources\n");
4166		free(mpt->els_cmd_ptrs, M_DEVBUF);
4167		mpt->els_cmd_ptrs = NULL;
4168		return (FALSE);
4169	}
4170	if (i != MPT_MAX_ELS) {
4171		mpt_lprt(mpt, MPT_PRT_INFO,
4172		    "only added %d of %d  ELS buffers\n", i, MPT_MAX_ELS);
4173	}
4174	mpt->els_cmds_allocated = i;
4175	return(TRUE);
4176}
4177
4178static int
4179mpt_add_target_commands(struct mpt_softc *mpt)
4180{
4181	int i, max;
4182
4183	if (mpt->tgt_cmd_ptrs) {
4184		return (TRUE);
4185	}
4186
4187	max = MPT_MAX_REQUESTS(mpt) >> 1;
4188	if (max > mpt->mpt_max_tgtcmds) {
4189		max = mpt->mpt_max_tgtcmds;
4190	}
4191	mpt->tgt_cmd_ptrs =
4192	    malloc(max * sizeof (request_t *), M_DEVBUF, M_NOWAIT | M_ZERO);
4193	if (mpt->tgt_cmd_ptrs == NULL) {
4194		mpt_prt(mpt,
4195		    "mpt_add_target_commands: could not allocate cmd ptrs\n");
4196		return (FALSE);
4197	}
4198
4199	for (i = 0; i < max; i++) {
4200		request_t *req;
4201
4202		req = mpt_get_request(mpt, FALSE);
4203		if (req == NULL) {
4204			break;
4205		}
4206		req->state |= REQ_STATE_LOCKED;
4207		mpt->tgt_cmd_ptrs[i] = req;
4208		mpt_post_target_command(mpt, req, i);
4209	}
4210
4211
4212	if (i == 0) {
4213		mpt_lprt(mpt, MPT_PRT_ERROR, "could not add any target bufs\n");
4214		free(mpt->tgt_cmd_ptrs, M_DEVBUF);
4215		mpt->tgt_cmd_ptrs = NULL;
4216		return (FALSE);
4217	}
4218
4219	mpt->tgt_cmds_allocated = i;
4220
4221	if (i < max) {
4222		mpt_lprt(mpt, MPT_PRT_INFO,
4223		    "added %d of %d target bufs\n", i, max);
4224	}
4225	return (i);
4226}
4227
4228static int
4229mpt_enable_lun(struct mpt_softc *mpt, target_id_t tgt, lun_id_t lun)
4230{
4231
4232	if (tgt == CAM_TARGET_WILDCARD && lun == CAM_LUN_WILDCARD) {
4233		mpt->twildcard = 1;
4234	} else if (lun >= MPT_MAX_LUNS) {
4235		return (EINVAL);
4236	} else if (tgt != CAM_TARGET_WILDCARD && tgt != 0) {
4237		return (EINVAL);
4238	}
4239	if (mpt->tenabled == 0) {
4240		if (mpt->is_fc) {
4241			(void) mpt_fc_reset_link(mpt, 0);
4242		}
4243		mpt->tenabled = 1;
4244	}
4245	if (lun == CAM_LUN_WILDCARD) {
4246		mpt->trt_wildcard.enabled = 1;
4247	} else {
4248		mpt->trt[lun].enabled = 1;
4249	}
4250	return (0);
4251}
4252
4253static int
4254mpt_disable_lun(struct mpt_softc *mpt, target_id_t tgt, lun_id_t lun)
4255{
4256	int i;
4257
4258	if (tgt == CAM_TARGET_WILDCARD && lun == CAM_LUN_WILDCARD) {
4259		mpt->twildcard = 0;
4260	} else if (lun >= MPT_MAX_LUNS) {
4261		return (EINVAL);
4262	} else if (tgt != CAM_TARGET_WILDCARD && tgt != 0) {
4263		return (EINVAL);
4264	}
4265	if (lun == CAM_LUN_WILDCARD) {
4266		mpt->trt_wildcard.enabled = 0;
4267	} else {
4268		mpt->trt[lun].enabled = 0;
4269	}
4270	for (i = 0; i < MPT_MAX_LUNS; i++) {
4271		if (mpt->trt[lun].enabled) {
4272			break;
4273		}
4274	}
4275	if (i == MPT_MAX_LUNS && mpt->twildcard == 0) {
4276		if (mpt->is_fc) {
4277			(void) mpt_fc_reset_link(mpt, 0);
4278		}
4279		mpt->tenabled = 0;
4280	}
4281	return (0);
4282}
4283
4284/*
4285 * Called with MPT lock held
4286 */
4287static void
4288mpt_target_start_io(struct mpt_softc *mpt, union ccb *ccb)
4289{
4290	struct ccb_scsiio *csio = &ccb->csio;
4291	request_t *cmd_req = MPT_TAG_2_REQ(mpt, csio->tag_id);
4292	mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, cmd_req);
4293
4294	switch (tgt->state) {
4295	case TGT_STATE_IN_CAM:
4296		break;
4297	case TGT_STATE_MOVING_DATA:
4298		mpt_set_ccb_status(ccb, CAM_REQUEUE_REQ);
4299		xpt_freeze_simq(mpt->sim, 1);
4300		ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
4301		tgt->ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
4302		xpt_done(ccb);
4303		return;
4304	default:
4305		mpt_prt(mpt, "ccb %p flags 0x%x tag 0x%08x had bad request "
4306		    "starting I/O\n", ccb, csio->ccb_h.flags, csio->tag_id);
4307		mpt_tgt_dump_req_state(mpt, cmd_req);
4308		mpt_set_ccb_status(ccb, CAM_REQ_CMP_ERR);
4309		xpt_done(ccb);
4310		return;
4311	}
4312
4313	if (csio->dxfer_len) {
4314		bus_dmamap_callback_t *cb;
4315		PTR_MSG_TARGET_ASSIST_REQUEST ta;
4316		request_t *req;
4317		int error;
4318
4319		KASSERT((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE,
4320		    ("dxfer_len %u but direction is NONE", csio->dxfer_len));
4321
4322		if ((req = mpt_get_request(mpt, FALSE)) == NULL) {
4323			if (mpt->outofbeer == 0) {
4324				mpt->outofbeer = 1;
4325				xpt_freeze_simq(mpt->sim, 1);
4326				mpt_lprt(mpt, MPT_PRT_DEBUG, "FREEZEQ\n");
4327			}
4328			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
4329			mpt_set_ccb_status(ccb, CAM_REQUEUE_REQ);
4330			xpt_done(ccb);
4331			return;
4332		}
4333		ccb->ccb_h.status = CAM_SIM_QUEUED | CAM_REQ_INPROG;
4334		if (sizeof (bus_addr_t) > 4) {
4335			cb = mpt_execute_req_a64;
4336		} else {
4337			cb = mpt_execute_req;
4338		}
4339
4340		req->ccb = ccb;
4341		ccb->ccb_h.ccb_req_ptr = req;
4342
4343		/*
4344		 * Record the currently active ccb and the
4345		 * request for it in our target state area.
4346		 */
4347		tgt->ccb = ccb;
4348		tgt->req = req;
4349
4350		memset(req->req_vbuf, 0, MPT_RQSL(mpt));
4351		ta = req->req_vbuf;
4352
4353		if (mpt->is_sas) {
4354			PTR_MPI_TARGET_SSP_CMD_BUFFER ssp =
4355			     cmd_req->req_vbuf;
4356			ta->QueueTag = ssp->InitiatorTag;
4357		} else if (mpt->is_spi) {
4358			PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER sp =
4359			     cmd_req->req_vbuf;
4360			ta->QueueTag = sp->Tag;
4361		}
4362		ta->Function = MPI_FUNCTION_TARGET_ASSIST;
4363		ta->MsgContext = htole32(req->index | mpt->scsi_tgt_handler_id);
4364		ta->ReplyWord = htole32(tgt->reply_desc);
4365		if (csio->ccb_h.target_lun > MPT_MAX_LUNS) {
4366			ta->LUN[0] =
4367			    0x40 | ((csio->ccb_h.target_lun >> 8) & 0x3f);
4368			ta->LUN[1] = csio->ccb_h.target_lun & 0xff;
4369		} else {
4370			ta->LUN[1] = csio->ccb_h.target_lun;
4371		}
4372
4373		ta->RelativeOffset = tgt->bytes_xfered;
4374		ta->DataLength = ccb->csio.dxfer_len;
4375		if (ta->DataLength > tgt->resid) {
4376			ta->DataLength = tgt->resid;
4377		}
4378
4379		/*
4380		 * XXX Should be done after data transfer completes?
4381		 */
4382		tgt->resid -= csio->dxfer_len;
4383		tgt->bytes_xfered += csio->dxfer_len;
4384
4385		if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
4386			ta->TargetAssistFlags |=
4387			    TARGET_ASSIST_FLAGS_DATA_DIRECTION;
4388		}
4389
4390#ifdef	WE_TRUST_AUTO_GOOD_STATUS
4391		if ((ccb->ccb_h.flags & CAM_SEND_STATUS) &&
4392		    csio->scsi_status == SCSI_STATUS_OK && tgt->resid == 0) {
4393			ta->TargetAssistFlags |=
4394			    TARGET_ASSIST_FLAGS_AUTO_STATUS;
4395		}
4396#endif
4397		tgt->state = TGT_STATE_SETTING_UP_FOR_DATA;
4398
4399		mpt_lprt(mpt, MPT_PRT_DEBUG,
4400		    "DATA_CCB %p tag %x %u bytes %u resid flg %x req %p:%u "
4401		    "nxtstate=%d\n", csio, csio->tag_id, csio->dxfer_len,
4402		    tgt->resid, ccb->ccb_h.flags, req, req->serno, tgt->state);
4403
4404		error = bus_dmamap_load_ccb(mpt->buffer_dmat, req->dmap, ccb,
4405		    cb, req, 0);
4406		if (error == EINPROGRESS) {
4407			xpt_freeze_simq(mpt->sim, 1);
4408			ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
4409		}
4410	} else {
4411		uint8_t *sp = NULL, sense[MPT_SENSE_SIZE];
4412
4413		/*
4414		 * XXX: I don't know why this seems to happen, but
4415		 * XXX: completing the CCB seems to make things happy.
4416		 * XXX: This seems to happen if the initiator requests
4417		 * XXX: enough data that we have to do multiple CTIOs.
4418		 */
4419		if ((ccb->ccb_h.flags & CAM_SEND_STATUS) == 0) {
4420			mpt_lprt(mpt, MPT_PRT_DEBUG,
4421			    "Meaningless STATUS CCB (%p): flags %x status %x "
4422			    "resid %d bytes_xfered %u\n", ccb, ccb->ccb_h.flags,
4423			    ccb->ccb_h.status, tgt->resid, tgt->bytes_xfered);
4424			mpt_set_ccb_status(ccb, CAM_REQ_CMP);
4425			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
4426			xpt_done(ccb);
4427			return;
4428		}
4429		if (ccb->ccb_h.flags & CAM_SEND_SENSE) {
4430			sp = sense;
4431			memcpy(sp, &csio->sense_data,
4432			   min(csio->sense_len, MPT_SENSE_SIZE));
4433		}
4434		mpt_scsi_tgt_status(mpt, ccb, cmd_req, csio->scsi_status, sp);
4435	}
4436}
4437
4438static void
4439mpt_scsi_tgt_local(struct mpt_softc *mpt, request_t *cmd_req,
4440    uint32_t lun, int send, uint8_t *data, size_t length)
4441{
4442	mpt_tgt_state_t *tgt;
4443	PTR_MSG_TARGET_ASSIST_REQUEST ta;
4444	SGE_SIMPLE32 *se;
4445	uint32_t flags;
4446	uint8_t *dptr;
4447	bus_addr_t pptr;
4448	request_t *req;
4449
4450	/*
4451	 * We enter with resid set to the data load for the command.
4452	 */
4453	tgt = MPT_TGT_STATE(mpt, cmd_req);
4454	if (length == 0 || tgt->resid == 0) {
4455		tgt->resid = 0;
4456		mpt_scsi_tgt_status(mpt, NULL, cmd_req, 0, NULL);
4457		return;
4458	}
4459
4460	if ((req = mpt_get_request(mpt, FALSE)) == NULL) {
4461		mpt_prt(mpt, "out of resources- dropping local response\n");
4462		return;
4463	}
4464	tgt->is_local = 1;
4465
4466
4467	memset(req->req_vbuf, 0, MPT_RQSL(mpt));
4468	ta = req->req_vbuf;
4469
4470	if (mpt->is_sas) {
4471		PTR_MPI_TARGET_SSP_CMD_BUFFER ssp = cmd_req->req_vbuf;
4472		ta->QueueTag = ssp->InitiatorTag;
4473	} else if (mpt->is_spi) {
4474		PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER sp = cmd_req->req_vbuf;
4475		ta->QueueTag = sp->Tag;
4476	}
4477	ta->Function = MPI_FUNCTION_TARGET_ASSIST;
4478	ta->MsgContext = htole32(req->index | mpt->scsi_tgt_handler_id);
4479	ta->ReplyWord = htole32(tgt->reply_desc);
4480	if (lun > MPT_MAX_LUNS) {
4481		ta->LUN[0] = 0x40 | ((lun >> 8) & 0x3f);
4482		ta->LUN[1] = lun & 0xff;
4483	} else {
4484		ta->LUN[1] = lun;
4485	}
4486	ta->RelativeOffset = 0;
4487	ta->DataLength = length;
4488
4489	dptr = req->req_vbuf;
4490	dptr += MPT_RQSL(mpt);
4491	pptr = req->req_pbuf;
4492	pptr += MPT_RQSL(mpt);
4493	memcpy(dptr, data, min(length, MPT_RQSL(mpt)));
4494
4495	se = (SGE_SIMPLE32 *) &ta->SGL[0];
4496	memset(se, 0,sizeof (*se));
4497
4498	flags = MPI_SGE_FLAGS_SIMPLE_ELEMENT;
4499	if (send) {
4500		ta->TargetAssistFlags |= TARGET_ASSIST_FLAGS_DATA_DIRECTION;
4501		flags |= MPI_SGE_FLAGS_HOST_TO_IOC;
4502	}
4503	se->Address = pptr;
4504	MPI_pSGE_SET_LENGTH(se, length);
4505	flags |= MPI_SGE_FLAGS_LAST_ELEMENT;
4506	flags |= MPI_SGE_FLAGS_END_OF_LIST | MPI_SGE_FLAGS_END_OF_BUFFER;
4507	MPI_pSGE_SET_FLAGS(se, flags);
4508
4509	tgt->ccb = NULL;
4510	tgt->req = req;
4511	tgt->resid -= length;
4512	tgt->bytes_xfered = length;
4513#ifdef	WE_TRUST_AUTO_GOOD_STATUS
4514	tgt->state = TGT_STATE_MOVING_DATA_AND_STATUS;
4515#else
4516	tgt->state = TGT_STATE_MOVING_DATA;
4517#endif
4518	mpt_send_cmd(mpt, req);
4519}
4520
4521/*
4522 * Abort queued up CCBs
4523 */
4524static cam_status
4525mpt_abort_target_ccb(struct mpt_softc *mpt, union ccb *ccb)
4526{
4527	struct mpt_hdr_stailq *lp;
4528	struct ccb_hdr *srch;
4529	int found = 0;
4530	union ccb *accb = ccb->cab.abort_ccb;
4531	tgt_resource_t *trtp;
4532
4533	mpt_lprt(mpt, MPT_PRT_DEBUG, "aborting ccb %p\n", accb);
4534
4535	if (ccb->ccb_h.target_lun == CAM_LUN_WILDCARD) {
4536		trtp = &mpt->trt_wildcard;
4537	} else {
4538		trtp = &mpt->trt[ccb->ccb_h.target_lun];
4539	}
4540
4541	if (accb->ccb_h.func_code == XPT_ACCEPT_TARGET_IO) {
4542		lp = &trtp->atios;
4543	} else if (accb->ccb_h.func_code == XPT_IMMEDIATE_NOTIFY) {
4544		lp = &trtp->inots;
4545	} else {
4546		return (CAM_REQ_INVALID);
4547	}
4548
4549	STAILQ_FOREACH(srch, lp, sim_links.stqe) {
4550		if (srch == &accb->ccb_h) {
4551			found = 1;
4552			STAILQ_REMOVE(lp, srch, ccb_hdr, sim_links.stqe);
4553			break;
4554		}
4555	}
4556	if (found) {
4557		accb->ccb_h.status = CAM_REQ_ABORTED;
4558		xpt_done(accb);
4559		return (CAM_REQ_CMP);
4560	}
4561	mpt_prt(mpt, "mpt_abort_tgt_ccb: CCB %p not found\n", ccb);
4562	return (CAM_PATH_INVALID);
4563}
4564
4565/*
4566 * Ask the MPT to abort the current target command
4567 */
4568static int
4569mpt_abort_target_cmd(struct mpt_softc *mpt, request_t *cmd_req)
4570{
4571	int error;
4572	request_t *req;
4573	PTR_MSG_TARGET_MODE_ABORT abtp;
4574
4575	req = mpt_get_request(mpt, FALSE);
4576	if (req == NULL) {
4577		return (-1);
4578	}
4579	abtp = req->req_vbuf;
4580	memset(abtp, 0, sizeof (*abtp));
4581
4582	abtp->MsgContext = htole32(req->index | mpt->scsi_tgt_handler_id);
4583	abtp->AbortType = TARGET_MODE_ABORT_TYPE_EXACT_IO;
4584	abtp->Function = MPI_FUNCTION_TARGET_MODE_ABORT;
4585	abtp->ReplyWord = htole32(MPT_TGT_STATE(mpt, cmd_req)->reply_desc);
4586	error = 0;
4587	if (mpt->is_fc || mpt->is_sas) {
4588		mpt_send_cmd(mpt, req);
4589	} else {
4590		error = mpt_send_handshake_cmd(mpt, sizeof(*req), req);
4591	}
4592	return (error);
4593}
4594
4595/*
4596 * WE_TRUST_AUTO_GOOD_STATUS- I've found that setting
4597 * TARGET_STATUS_SEND_FLAGS_AUTO_GOOD_STATUS leads the
4598 * FC929 to set bogus FC_RSP fields (nonzero residuals
4599 * but w/o RESID fields set). This causes QLogic initiators
4600 * to think maybe that a frame was lost.
4601 *
4602 * WE_CAN_USE_AUTO_REPOST- we can't use AUTO_REPOST because
4603 * we use allocated requests to do TARGET_ASSIST and we
4604 * need to know when to release them.
4605 */
4606
4607static void
4608mpt_scsi_tgt_status(struct mpt_softc *mpt, union ccb *ccb, request_t *cmd_req,
4609    uint8_t status, uint8_t const *sense_data)
4610{
4611	uint8_t *cmd_vbuf;
4612	mpt_tgt_state_t *tgt;
4613	PTR_MSG_TARGET_STATUS_SEND_REQUEST tp;
4614	request_t *req;
4615	bus_addr_t paddr;
4616	int resplen = 0;
4617	uint32_t fl;
4618
4619	cmd_vbuf = cmd_req->req_vbuf;
4620	cmd_vbuf += MPT_RQSL(mpt);
4621	tgt = MPT_TGT_STATE(mpt, cmd_req);
4622
4623	if ((req = mpt_get_request(mpt, FALSE)) == NULL) {
4624		if (mpt->outofbeer == 0) {
4625			mpt->outofbeer = 1;
4626			xpt_freeze_simq(mpt->sim, 1);
4627			mpt_lprt(mpt, MPT_PRT_DEBUG, "FREEZEQ\n");
4628		}
4629		if (ccb) {
4630			ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
4631			mpt_set_ccb_status(ccb, CAM_REQUEUE_REQ);
4632			xpt_done(ccb);
4633		} else {
4634			mpt_prt(mpt,
4635			    "could not allocate status request- dropping\n");
4636		}
4637		return;
4638	}
4639	req->ccb = ccb;
4640	if (ccb) {
4641		ccb->ccb_h.ccb_mpt_ptr = mpt;
4642		ccb->ccb_h.ccb_req_ptr = req;
4643	}
4644
4645	/*
4646	 * Record the currently active ccb, if any, and the
4647	 * request for it in our target state area.
4648	 */
4649	tgt->ccb = ccb;
4650	tgt->req = req;
4651	tgt->state = TGT_STATE_SENDING_STATUS;
4652
4653	tp = req->req_vbuf;
4654	paddr = req->req_pbuf;
4655	paddr += MPT_RQSL(mpt);
4656
4657	memset(tp, 0, sizeof (*tp));
4658	tp->Function = MPI_FUNCTION_TARGET_STATUS_SEND;
4659	if (mpt->is_fc) {
4660		PTR_MPI_TARGET_FCP_CMD_BUFFER fc =
4661		    (PTR_MPI_TARGET_FCP_CMD_BUFFER) cmd_vbuf;
4662		uint8_t *sts_vbuf;
4663		uint32_t *rsp;
4664
4665		sts_vbuf = req->req_vbuf;
4666		sts_vbuf += MPT_RQSL(mpt);
4667		rsp = (uint32_t *) sts_vbuf;
4668		memcpy(tp->LUN, fc->FcpLun, sizeof (tp->LUN));
4669
4670		/*
4671		 * The MPI_TARGET_FCP_RSP_BUFFER define is unfortunate.
4672		 * It has to be big-endian in memory and is organized
4673		 * in 32 bit words, which are much easier to deal with
4674		 * as words which are swizzled as needed.
4675		 *
4676		 * All we're filling here is the FC_RSP payload.
4677		 * We may just have the chip synthesize it if
4678		 * we have no residual and an OK status.
4679		 *
4680		 */
4681		memset(rsp, 0, sizeof (MPI_TARGET_FCP_RSP_BUFFER));
4682
4683		rsp[2] = status;
4684		if (tgt->resid) {
4685			rsp[2] |= 0x800;	/* XXXX NEED MNEMONIC!!!! */
4686			rsp[3] = htobe32(tgt->resid);
4687#ifdef	WE_TRUST_AUTO_GOOD_STATUS
4688			resplen = sizeof (MPI_TARGET_FCP_RSP_BUFFER);
4689#endif
4690		}
4691		if (status == SCSI_STATUS_CHECK_COND) {
4692			int i;
4693
4694			rsp[2] |= 0x200;	/* XXXX NEED MNEMONIC!!!! */
4695			rsp[4] = htobe32(MPT_SENSE_SIZE);
4696			if (sense_data) {
4697				memcpy(&rsp[8], sense_data, MPT_SENSE_SIZE);
4698			} else {
4699				mpt_prt(mpt, "mpt_scsi_tgt_status: CHECK CONDI"
4700				    "TION but no sense data?\n");
4701				memset(&rsp, 0, MPT_SENSE_SIZE);
4702			}
4703			for (i = 8; i < (8 + (MPT_SENSE_SIZE >> 2)); i++) {
4704				rsp[i] = htobe32(rsp[i]);
4705			}
4706#ifdef	WE_TRUST_AUTO_GOOD_STATUS
4707			resplen = sizeof (MPI_TARGET_FCP_RSP_BUFFER);
4708#endif
4709		}
4710#ifndef	WE_TRUST_AUTO_GOOD_STATUS
4711		resplen = sizeof (MPI_TARGET_FCP_RSP_BUFFER);
4712#endif
4713		rsp[2] = htobe32(rsp[2]);
4714	} else if (mpt->is_sas) {
4715		PTR_MPI_TARGET_SSP_CMD_BUFFER ssp =
4716		    (PTR_MPI_TARGET_SSP_CMD_BUFFER) cmd_vbuf;
4717		memcpy(tp->LUN, ssp->LogicalUnitNumber, sizeof (tp->LUN));
4718	} else {
4719		PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER sp =
4720		    (PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER) cmd_vbuf;
4721		tp->StatusCode = status;
4722		tp->QueueTag = htole16(sp->Tag);
4723		memcpy(tp->LUN, sp->LogicalUnitNumber, sizeof (tp->LUN));
4724	}
4725
4726	tp->ReplyWord = htole32(tgt->reply_desc);
4727	tp->MsgContext = htole32(req->index | mpt->scsi_tgt_handler_id);
4728
4729#ifdef	WE_CAN_USE_AUTO_REPOST
4730	tp->MsgFlags = TARGET_STATUS_SEND_FLAGS_REPOST_CMD_BUFFER;
4731#endif
4732	if (status == SCSI_STATUS_OK && resplen == 0) {
4733		tp->MsgFlags |= TARGET_STATUS_SEND_FLAGS_AUTO_GOOD_STATUS;
4734	} else {
4735		tp->StatusDataSGE.u.Address32 = htole32((uint32_t) paddr);
4736		fl =
4737			MPI_SGE_FLAGS_HOST_TO_IOC	|
4738			MPI_SGE_FLAGS_SIMPLE_ELEMENT	|
4739			MPI_SGE_FLAGS_LAST_ELEMENT	|
4740			MPI_SGE_FLAGS_END_OF_LIST	|
4741			MPI_SGE_FLAGS_END_OF_BUFFER;
4742		fl <<= MPI_SGE_FLAGS_SHIFT;
4743		fl |= resplen;
4744		tp->StatusDataSGE.FlagsLength = htole32(fl);
4745	}
4746
4747	mpt_lprt(mpt, MPT_PRT_DEBUG,
4748	    "STATUS_CCB %p (wit%s sense) tag %x req %p:%u resid %u\n",
4749	    ccb, sense_data?"h" : "hout", ccb? ccb->csio.tag_id : -1, req,
4750	    req->serno, tgt->resid);
4751	if (ccb) {
4752		ccb->ccb_h.status = CAM_SIM_QUEUED | CAM_REQ_INPROG;
4753		mpt_req_timeout(req, 60 * hz, mpt_timeout, ccb);
4754	}
4755	mpt_send_cmd(mpt, req);
4756}
4757
4758static void
4759mpt_scsi_tgt_tsk_mgmt(struct mpt_softc *mpt, request_t *req, mpt_task_mgmt_t fc,
4760    tgt_resource_t *trtp, int init_id)
4761{
4762	struct ccb_immediate_notify *inot;
4763	mpt_tgt_state_t *tgt;
4764
4765	tgt = MPT_TGT_STATE(mpt, req);
4766	inot = (struct ccb_immediate_notify *) STAILQ_FIRST(&trtp->inots);
4767	if (inot == NULL) {
4768		mpt_lprt(mpt, MPT_PRT_WARN, "no INOTSs- sending back BSY\n");
4769		mpt_scsi_tgt_status(mpt, NULL, req, SCSI_STATUS_BUSY, NULL);
4770		return;
4771	}
4772	STAILQ_REMOVE_HEAD(&trtp->inots, sim_links.stqe);
4773	mpt_lprt(mpt, MPT_PRT_DEBUG1,
4774	    "Get FREE INOT %p lun %d\n", inot, inot->ccb_h.target_lun);
4775
4776	inot->initiator_id = init_id;	/* XXX */
4777	/*
4778	 * This is a somewhat grotesque attempt to map from task management
4779	 * to old style SCSI messages. God help us all.
4780	 */
4781	switch (fc) {
4782	case MPT_ABORT_TASK_SET:
4783		inot->arg = MSG_ABORT_TAG;
4784		break;
4785	case MPT_CLEAR_TASK_SET:
4786		inot->arg = MSG_CLEAR_TASK_SET;
4787		break;
4788	case MPT_TARGET_RESET:
4789		inot->arg = MSG_TARGET_RESET;
4790		break;
4791	case MPT_CLEAR_ACA:
4792		inot->arg = MSG_CLEAR_ACA;
4793		break;
4794	case MPT_TERMINATE_TASK:
4795		inot->arg = MSG_ABORT_TAG;
4796		break;
4797	default:
4798		inot->arg = MSG_NOOP;
4799		break;
4800	}
4801	/*
4802	 * XXX KDM we need the sequence/tag number for the target of the
4803	 * task management operation, especially if it is an abort.
4804	 */
4805	tgt->ccb = (union ccb *) inot;
4806	inot->ccb_h.status = CAM_MESSAGE_RECV|CAM_DEV_QFRZN;
4807	xpt_done((union ccb *)inot);
4808}
4809
4810static void
4811mpt_scsi_tgt_atio(struct mpt_softc *mpt, request_t *req, uint32_t reply_desc)
4812{
4813	static uint8_t null_iqd[SHORT_INQUIRY_LENGTH] = {
4814	    0x7f, 0x00, 0x02, 0x02, 0x20, 0x00, 0x00, 0x32,
4815	     'F',  'R',  'E',  'E',  'B',  'S',  'D',  ' ',
4816	     'L',  'S',  'I',  '-',  'L',  'O',  'G',  'I',
4817	     'C',  ' ',  'N',  'U',  'L',  'D',  'E',  'V',
4818	     '0',  '0',  '0',  '1'
4819	};
4820	struct ccb_accept_tio *atiop;
4821	lun_id_t lun;
4822	int tag_action = 0;
4823	mpt_tgt_state_t *tgt;
4824	tgt_resource_t *trtp = NULL;
4825	U8 *lunptr;
4826	U8 *vbuf;
4827	U16 itag;
4828	U16 ioindex;
4829	mpt_task_mgmt_t fct = MPT_NIL_TMT_VALUE;
4830	uint8_t *cdbp;
4831
4832	/*
4833	 * Stash info for the current command where we can get at it later.
4834	 */
4835	vbuf = req->req_vbuf;
4836	vbuf += MPT_RQSL(mpt);
4837
4838	/*
4839	 * Get our state pointer set up.
4840	 */
4841	tgt = MPT_TGT_STATE(mpt, req);
4842	if (tgt->state != TGT_STATE_LOADED) {
4843		mpt_tgt_dump_req_state(mpt, req);
4844		panic("bad target state in mpt_scsi_tgt_atio");
4845	}
4846	memset(tgt, 0, sizeof (mpt_tgt_state_t));
4847	tgt->state = TGT_STATE_IN_CAM;
4848	tgt->reply_desc = reply_desc;
4849	ioindex = GET_IO_INDEX(reply_desc);
4850	if (mpt->verbose >= MPT_PRT_DEBUG) {
4851		mpt_dump_data(mpt, "mpt_scsi_tgt_atio response", vbuf,
4852		    max(sizeof (MPI_TARGET_FCP_CMD_BUFFER),
4853		    max(sizeof (MPI_TARGET_SSP_CMD_BUFFER),
4854		    sizeof (MPI_TARGET_SCSI_SPI_CMD_BUFFER))));
4855	}
4856	if (mpt->is_fc) {
4857		PTR_MPI_TARGET_FCP_CMD_BUFFER fc;
4858		fc = (PTR_MPI_TARGET_FCP_CMD_BUFFER) vbuf;
4859		if (fc->FcpCntl[2]) {
4860			/*
4861			 * Task Management Request
4862			 */
4863			switch (fc->FcpCntl[2]) {
4864			case 0x2:
4865				fct = MPT_ABORT_TASK_SET;
4866				break;
4867			case 0x4:
4868				fct = MPT_CLEAR_TASK_SET;
4869				break;
4870			case 0x20:
4871				fct = MPT_TARGET_RESET;
4872				break;
4873			case 0x40:
4874				fct = MPT_CLEAR_ACA;
4875				break;
4876			case 0x80:
4877				fct = MPT_TERMINATE_TASK;
4878				break;
4879			default:
4880				mpt_prt(mpt, "CORRUPTED TASK MGMT BITS: 0x%x\n",
4881				    fc->FcpCntl[2]);
4882				mpt_scsi_tgt_status(mpt, 0, req,
4883				    SCSI_STATUS_OK, 0);
4884				return;
4885			}
4886		} else {
4887			switch (fc->FcpCntl[1]) {
4888			case 0:
4889				tag_action = MSG_SIMPLE_Q_TAG;
4890				break;
4891			case 1:
4892				tag_action = MSG_HEAD_OF_Q_TAG;
4893				break;
4894			case 2:
4895				tag_action = MSG_ORDERED_Q_TAG;
4896				break;
4897			default:
4898				/*
4899				 * Bah. Ignore Untagged Queing and ACA
4900				 */
4901				tag_action = MSG_SIMPLE_Q_TAG;
4902				break;
4903			}
4904		}
4905		tgt->resid = be32toh(fc->FcpDl);
4906		cdbp = fc->FcpCdb;
4907		lunptr = fc->FcpLun;
4908		itag = be16toh(fc->OptionalOxid);
4909	} else if (mpt->is_sas) {
4910		PTR_MPI_TARGET_SSP_CMD_BUFFER ssp;
4911		ssp = (PTR_MPI_TARGET_SSP_CMD_BUFFER) vbuf;
4912		cdbp = ssp->CDB;
4913		lunptr = ssp->LogicalUnitNumber;
4914		itag = ssp->InitiatorTag;
4915	} else {
4916		PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER sp;
4917		sp = (PTR_MPI_TARGET_SCSI_SPI_CMD_BUFFER) vbuf;
4918		cdbp = sp->CDB;
4919		lunptr = sp->LogicalUnitNumber;
4920		itag = sp->Tag;
4921	}
4922
4923	/*
4924	 * Generate a simple lun
4925	 */
4926	switch (lunptr[0] & 0xc0) {
4927	case 0x40:
4928		lun = ((lunptr[0] & 0x3f) << 8) | lunptr[1];
4929		break;
4930	case 0:
4931		lun = lunptr[1];
4932		break;
4933	default:
4934		mpt_lprt(mpt, MPT_PRT_ERROR, "cannot handle this type lun\n");
4935		lun = 0xffff;
4936		break;
4937	}
4938
4939	/*
4940	 * Deal with non-enabled or bad luns here.
4941	 */
4942	if (lun >= MPT_MAX_LUNS || mpt->tenabled == 0 ||
4943	    mpt->trt[lun].enabled == 0) {
4944		if (mpt->twildcard) {
4945			trtp = &mpt->trt_wildcard;
4946		} else if (fct == MPT_NIL_TMT_VALUE) {
4947			/*
4948			 * In this case, we haven't got an upstream listener
4949			 * for either a specific lun or wildcard luns. We
4950			 * have to make some sensible response. For regular
4951			 * inquiry, just return some NOT HERE inquiry data.
4952			 * For VPD inquiry, report illegal field in cdb.
4953			 * For REQUEST SENSE, just return NO SENSE data.
4954			 * REPORT LUNS gets illegal command.
4955			 * All other commands get 'no such device'.
4956			 */
4957			uint8_t *sp, cond, buf[MPT_SENSE_SIZE];
4958			size_t len;
4959
4960			memset(buf, 0, MPT_SENSE_SIZE);
4961			cond = SCSI_STATUS_CHECK_COND;
4962			buf[0] = 0xf0;
4963			buf[2] = 0x5;
4964			buf[7] = 0x8;
4965			sp = buf;
4966			tgt->tag_id = MPT_MAKE_TAGID(mpt, req, ioindex);
4967
4968			switch (cdbp[0]) {
4969			case INQUIRY:
4970			{
4971				if (cdbp[1] != 0) {
4972					buf[12] = 0x26;
4973					buf[13] = 0x01;
4974					break;
4975				}
4976				len = min(tgt->resid, cdbp[4]);
4977				len = min(len, sizeof (null_iqd));
4978				mpt_lprt(mpt, MPT_PRT_DEBUG,
4979				    "local inquiry %ld bytes\n", (long) len);
4980				mpt_scsi_tgt_local(mpt, req, lun, 1,
4981				    null_iqd, len);
4982				return;
4983			}
4984			case REQUEST_SENSE:
4985			{
4986				buf[2] = 0x0;
4987				len = min(tgt->resid, cdbp[4]);
4988				len = min(len, sizeof (buf));
4989				mpt_lprt(mpt, MPT_PRT_DEBUG,
4990				    "local reqsense %ld bytes\n", (long) len);
4991				mpt_scsi_tgt_local(mpt, req, lun, 1,
4992				    buf, len);
4993				return;
4994			}
4995			case REPORT_LUNS:
4996				mpt_lprt(mpt, MPT_PRT_DEBUG, "REPORT LUNS\n");
4997				buf[12] = 0x26;
4998				return;
4999			default:
5000				mpt_lprt(mpt, MPT_PRT_DEBUG,
5001				    "CMD 0x%x to unmanaged lun %u\n",
5002				    cdbp[0], lun);
5003				buf[12] = 0x25;
5004				break;
5005			}
5006			mpt_scsi_tgt_status(mpt, NULL, req, cond, sp);
5007			return;
5008		}
5009		/* otherwise, leave trtp NULL */
5010	} else {
5011		trtp = &mpt->trt[lun];
5012	}
5013
5014	/*
5015	 * Deal with any task management
5016	 */
5017	if (fct != MPT_NIL_TMT_VALUE) {
5018		if (trtp == NULL) {
5019			mpt_prt(mpt, "task mgmt function %x but no listener\n",
5020			    fct);
5021			mpt_scsi_tgt_status(mpt, 0, req,
5022			    SCSI_STATUS_OK, 0);
5023		} else {
5024			mpt_scsi_tgt_tsk_mgmt(mpt, req, fct, trtp,
5025			    GET_INITIATOR_INDEX(reply_desc));
5026		}
5027		return;
5028	}
5029
5030
5031	atiop = (struct ccb_accept_tio *) STAILQ_FIRST(&trtp->atios);
5032	if (atiop == NULL) {
5033		mpt_lprt(mpt, MPT_PRT_WARN,
5034		    "no ATIOs for lun %u- sending back %s\n", lun,
5035		    mpt->tenabled? "QUEUE FULL" : "BUSY");
5036		mpt_scsi_tgt_status(mpt, NULL, req,
5037		    mpt->tenabled? SCSI_STATUS_QUEUE_FULL : SCSI_STATUS_BUSY,
5038		    NULL);
5039		return;
5040	}
5041	STAILQ_REMOVE_HEAD(&trtp->atios, sim_links.stqe);
5042	mpt_lprt(mpt, MPT_PRT_DEBUG1,
5043	    "Get FREE ATIO %p lun %d\n", atiop, atiop->ccb_h.target_lun);
5044	atiop->ccb_h.ccb_mpt_ptr = mpt;
5045	atiop->ccb_h.status = CAM_CDB_RECVD;
5046	atiop->ccb_h.target_lun = lun;
5047	atiop->sense_len = 0;
5048	atiop->init_id = GET_INITIATOR_INDEX(reply_desc);
5049	atiop->cdb_len = mpt_cdblen(cdbp[0], 16);
5050	memcpy(atiop->cdb_io.cdb_bytes, cdbp, atiop->cdb_len);
5051
5052	/*
5053	 * The tag we construct here allows us to find the
5054	 * original request that the command came in with.
5055	 *
5056	 * This way we don't have to depend on anything but the
5057	 * tag to find things when CCBs show back up from CAM.
5058	 */
5059	atiop->tag_id = MPT_MAKE_TAGID(mpt, req, ioindex);
5060	tgt->tag_id = atiop->tag_id;
5061	if (tag_action) {
5062		atiop->tag_action = tag_action;
5063		atiop->ccb_h.flags = CAM_TAG_ACTION_VALID;
5064	}
5065	if (mpt->verbose >= MPT_PRT_DEBUG) {
5066		int i;
5067		mpt_prt(mpt, "START_CCB %p for lun %u CDB=<", atiop,
5068		    atiop->ccb_h.target_lun);
5069		for (i = 0; i < atiop->cdb_len; i++) {
5070			mpt_prtc(mpt, "%02x%c", cdbp[i] & 0xff,
5071			    (i == (atiop->cdb_len - 1))? '>' : ' ');
5072		}
5073		mpt_prtc(mpt, " itag %x tag %x rdesc %x dl=%u\n",
5074	    	    itag, atiop->tag_id, tgt->reply_desc, tgt->resid);
5075	}
5076
5077	xpt_done((union ccb *)atiop);
5078}
5079
5080static void
5081mpt_tgt_dump_tgt_state(struct mpt_softc *mpt, request_t *req)
5082{
5083	mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, req);
5084
5085	mpt_prt(mpt, "req %p:%u tgt:rdesc 0x%x resid %u xfrd %u ccb %p treq %p "
5086	    "nx %d tag 0x%08x state=%d\n", req, req->serno, tgt->reply_desc,
5087	    tgt->resid, tgt->bytes_xfered, tgt->ccb, tgt->req, tgt->nxfers,
5088	    tgt->tag_id, tgt->state);
5089}
5090
5091static void
5092mpt_tgt_dump_req_state(struct mpt_softc *mpt, request_t *req)
5093{
5094
5095	mpt_prt(mpt, "req %p:%u index %u (%x) state %x\n", req, req->serno,
5096	    req->index, req->index, req->state);
5097	mpt_tgt_dump_tgt_state(mpt, req);
5098}
5099
5100static int
5101mpt_scsi_tgt_reply_handler(struct mpt_softc *mpt, request_t *req,
5102    uint32_t reply_desc, MSG_DEFAULT_REPLY *reply_frame)
5103{
5104	int dbg;
5105	union ccb *ccb;
5106	U16 status;
5107
5108	if (reply_frame == NULL) {
5109		/*
5110		 * Figure out what the state of the command is.
5111		 */
5112		mpt_tgt_state_t *tgt = MPT_TGT_STATE(mpt, req);
5113
5114#ifdef	INVARIANTS
5115		mpt_req_spcl(mpt, req, "turbo scsi_tgt_reply", __LINE__);
5116		if (tgt->req) {
5117			mpt_req_not_spcl(mpt, tgt->req,
5118			    "turbo scsi_tgt_reply associated req", __LINE__);
5119		}
5120#endif
5121		switch(tgt->state) {
5122		case TGT_STATE_LOADED:
5123			/*
5124			 * This is a new command starting.
5125			 */
5126			mpt_scsi_tgt_atio(mpt, req, reply_desc);
5127			break;
5128		case TGT_STATE_MOVING_DATA:
5129		{
5130			uint8_t *sp = NULL, sense[MPT_SENSE_SIZE];
5131
5132			ccb = tgt->ccb;
5133			if (tgt->req == NULL) {
5134				panic("mpt: turbo target reply with null "
5135				    "associated request moving data");
5136				/* NOTREACHED */
5137			}
5138			if (ccb == NULL) {
5139				if (tgt->is_local == 0) {
5140					panic("mpt: turbo target reply with "
5141					    "null associated ccb moving data");
5142					/* NOTREACHED */
5143				}
5144				mpt_lprt(mpt, MPT_PRT_DEBUG,
5145				    "TARGET_ASSIST local done\n");
5146				TAILQ_REMOVE(&mpt->request_pending_list,
5147				    tgt->req, links);
5148				mpt_free_request(mpt, tgt->req);
5149				tgt->req = NULL;
5150				mpt_scsi_tgt_status(mpt, NULL, req,
5151				    0, NULL);
5152				return (TRUE);
5153			}
5154			tgt->ccb = NULL;
5155			tgt->nxfers++;
5156			mpt_req_untimeout(req, mpt_timeout, ccb);
5157			mpt_lprt(mpt, MPT_PRT_DEBUG,
5158			    "TARGET_ASSIST %p (req %p:%u) done tag 0x%x\n",
5159			    ccb, tgt->req, tgt->req->serno, ccb->csio.tag_id);
5160			/*
5161			 * Free the Target Assist Request
5162			 */
5163			KASSERT(tgt->req->ccb == ccb,
5164			    ("tgt->req %p:%u tgt->req->ccb %p", tgt->req,
5165			    tgt->req->serno, tgt->req->ccb));
5166			TAILQ_REMOVE(&mpt->request_pending_list,
5167			    tgt->req, links);
5168			mpt_free_request(mpt, tgt->req);
5169			tgt->req = NULL;
5170
5171			/*
5172			 * Do we need to send status now? That is, are
5173			 * we done with all our data transfers?
5174			 */
5175			if ((ccb->ccb_h.flags & CAM_SEND_STATUS) == 0) {
5176				mpt_set_ccb_status(ccb, CAM_REQ_CMP);
5177				ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
5178				KASSERT(ccb->ccb_h.status,
5179				    ("zero ccb sts at %d", __LINE__));
5180				tgt->state = TGT_STATE_IN_CAM;
5181				if (mpt->outofbeer) {
5182					ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
5183					mpt->outofbeer = 0;
5184					mpt_lprt(mpt, MPT_PRT_DEBUG, "THAWQ\n");
5185				}
5186				xpt_done(ccb);
5187				break;
5188			}
5189			/*
5190			 * Otherwise, send status (and sense)
5191			 */
5192			if (ccb->ccb_h.flags & CAM_SEND_SENSE) {
5193				sp = sense;
5194				memcpy(sp, &ccb->csio.sense_data,
5195				   min(ccb->csio.sense_len, MPT_SENSE_SIZE));
5196			}
5197			mpt_scsi_tgt_status(mpt, ccb, req,
5198			    ccb->csio.scsi_status, sp);
5199			break;
5200		}
5201		case TGT_STATE_SENDING_STATUS:
5202		case TGT_STATE_MOVING_DATA_AND_STATUS:
5203		{
5204			int ioindex;
5205			ccb = tgt->ccb;
5206
5207			if (tgt->req == NULL) {
5208				panic("mpt: turbo target reply with null "
5209				    "associated request sending status");
5210				/* NOTREACHED */
5211			}
5212
5213			if (ccb) {
5214				tgt->ccb = NULL;
5215				if (tgt->state ==
5216				    TGT_STATE_MOVING_DATA_AND_STATUS) {
5217					tgt->nxfers++;
5218				}
5219				mpt_req_untimeout(req, mpt_timeout, ccb);
5220				if (ccb->ccb_h.flags & CAM_SEND_SENSE) {
5221					ccb->ccb_h.status |= CAM_SENT_SENSE;
5222				}
5223				mpt_lprt(mpt, MPT_PRT_DEBUG,
5224				    "TARGET_STATUS tag %x sts %x flgs %x req "
5225				    "%p\n", ccb->csio.tag_id, ccb->ccb_h.status,
5226				    ccb->ccb_h.flags, tgt->req);
5227				/*
5228				 * Free the Target Send Status Request
5229				 */
5230				KASSERT(tgt->req->ccb == ccb,
5231				    ("tgt->req %p:%u tgt->req->ccb %p",
5232				    tgt->req, tgt->req->serno, tgt->req->ccb));
5233				/*
5234				 * Notify CAM that we're done
5235				 */
5236				mpt_set_ccb_status(ccb, CAM_REQ_CMP);
5237				ccb->ccb_h.status &= ~CAM_SIM_QUEUED;
5238				KASSERT(ccb->ccb_h.status,
5239				    ("ZERO ccb sts at %d", __LINE__));
5240				tgt->ccb = NULL;
5241			} else {
5242				mpt_lprt(mpt, MPT_PRT_DEBUG,
5243				    "TARGET_STATUS non-CAM for  req %p:%u\n",
5244				    tgt->req, tgt->req->serno);
5245			}
5246			TAILQ_REMOVE(&mpt->request_pending_list,
5247			    tgt->req, links);
5248			mpt_free_request(mpt, tgt->req);
5249			tgt->req = NULL;
5250
5251			/*
5252			 * And re-post the Command Buffer.
5253			 * This will reset the state.
5254			 */
5255			ioindex = GET_IO_INDEX(reply_desc);
5256			TAILQ_REMOVE(&mpt->request_pending_list, req, links);
5257			tgt->is_local = 0;
5258			mpt_post_target_command(mpt, req, ioindex);
5259
5260			/*
5261			 * And post a done for anyone who cares
5262			 */
5263			if (ccb) {
5264				if (mpt->outofbeer) {
5265					ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
5266					mpt->outofbeer = 0;
5267					mpt_lprt(mpt, MPT_PRT_DEBUG, "THAWQ\n");
5268				}
5269				xpt_done(ccb);
5270			}
5271			break;
5272		}
5273		case TGT_STATE_NIL:	/* XXX This Never Happens XXX */
5274			tgt->state = TGT_STATE_LOADED;
5275			break;
5276		default:
5277			mpt_prt(mpt, "Unknown Target State 0x%x in Context "
5278			    "Reply Function\n", tgt->state);
5279		}
5280		return (TRUE);
5281	}
5282
5283	status = le16toh(reply_frame->IOCStatus);
5284	if (status != MPI_IOCSTATUS_SUCCESS) {
5285		dbg = MPT_PRT_ERROR;
5286	} else {
5287		dbg = MPT_PRT_DEBUG1;
5288	}
5289
5290	mpt_lprt(mpt, dbg,
5291	    "SCSI_TGT REPLY: req=%p:%u reply=%p func=%x IOCstatus 0x%x\n",
5292	     req, req->serno, reply_frame, reply_frame->Function, status);
5293
5294	switch (reply_frame->Function) {
5295	case MPI_FUNCTION_TARGET_CMD_BUFFER_POST:
5296	{
5297		mpt_tgt_state_t *tgt;
5298#ifdef	INVARIANTS
5299		mpt_req_spcl(mpt, req, "tgt reply BUFFER POST", __LINE__);
5300#endif
5301		if (status != MPI_IOCSTATUS_SUCCESS) {
5302			/*
5303			 * XXX What to do?
5304			 */
5305			break;
5306		}
5307		tgt = MPT_TGT_STATE(mpt, req);
5308		KASSERT(tgt->state == TGT_STATE_LOADING,
5309		    ("bad state 0x%x on reply to buffer post", tgt->state));
5310		mpt_assign_serno(mpt, req);
5311		tgt->state = TGT_STATE_LOADED;
5312		break;
5313	}
5314	case MPI_FUNCTION_TARGET_ASSIST:
5315#ifdef	INVARIANTS
5316		mpt_req_not_spcl(mpt, req, "tgt reply TARGET ASSIST", __LINE__);
5317#endif
5318		mpt_prt(mpt, "target assist completion\n");
5319		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
5320		mpt_free_request(mpt, req);
5321		break;
5322	case MPI_FUNCTION_TARGET_STATUS_SEND:
5323#ifdef	INVARIANTS
5324		mpt_req_not_spcl(mpt, req, "tgt reply STATUS SEND", __LINE__);
5325#endif
5326		mpt_prt(mpt, "status send completion\n");
5327		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
5328		mpt_free_request(mpt, req);
5329		break;
5330	case MPI_FUNCTION_TARGET_MODE_ABORT:
5331	{
5332		PTR_MSG_TARGET_MODE_ABORT_REPLY abtrp =
5333		    (PTR_MSG_TARGET_MODE_ABORT_REPLY) reply_frame;
5334		PTR_MSG_TARGET_MODE_ABORT abtp =
5335		    (PTR_MSG_TARGET_MODE_ABORT) req->req_vbuf;
5336		uint32_t cc = GET_IO_INDEX(le32toh(abtp->ReplyWord));
5337#ifdef	INVARIANTS
5338		mpt_req_not_spcl(mpt, req, "tgt reply TMODE ABORT", __LINE__);
5339#endif
5340		mpt_prt(mpt, "ABORT RX_ID 0x%x Complete; status 0x%x cnt %u\n",
5341		    cc, le16toh(abtrp->IOCStatus), le32toh(abtrp->AbortCount));
5342		TAILQ_REMOVE(&mpt->request_pending_list, req, links);
5343		mpt_free_request(mpt, req);
5344		break;
5345	}
5346	default:
5347		mpt_prt(mpt, "Unknown Target Address Reply Function code: "
5348		    "0x%x\n", reply_frame->Function);
5349		break;
5350	}
5351	return (TRUE);
5352}
5353