xref: /illumos-gate/usr/src/cmd/mdb/common/modules/fcp/fcp.c (revision 2983dda76a6d296fdb560c88114fe41caad1b84f)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 /*
22  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
23  * Use is subject to license terms.
24  *
25  * FCP mdb module
26  */
27 
28 
29 #include <sys/mdb_modapi.h>
30 #include <sys/mutex.h>
31 #include <sys/modctl.h>
32 #include <sys/scsi/scsi.h>
33 #include <sys/sunndi.h>
34 #include <sys/fibre-channel/fc.h>
35 #include <sys/fibre-channel/ulp/fcpvar.h>
36 
37 static struct fcp_port	port;
38 static struct fcp_tgt	tgt;
39 static struct fcp_lun	lun;
40 static uint32_t	tgt_hash_index;
41 
42 
43 /*
44  * Leadville fcp walker/dcmd code
45  */
46 
47 static int
48 fcp_walk_i(mdb_walk_state_t *wsp)
49 {
50 	if (wsp->walk_addr == NULL &&
51 	    mdb_readvar(&wsp->walk_addr, "fcp_port_head") == -1) {
52 		mdb_warn("failed to read 'fcp_port_head'");
53 		return (WALK_ERR);
54 	}
55 
56 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_port), UM_SLEEP);
57 	return (WALK_NEXT);
58 }
59 
60 static int
61 fcp_walk_s(mdb_walk_state_t *wsp)
62 {
63 	int status;
64 
65 	if (wsp->walk_addr == NULL)
66 		return (WALK_DONE);
67 
68 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_port),
69 	    wsp->walk_addr) == -1) {
70 		mdb_warn("failed to read fcp_port at %p", wsp->walk_addr);
71 		return (WALK_DONE);
72 	}
73 
74 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
75 	    wsp->walk_cbdata);
76 
77 	wsp->walk_addr =
78 	    (uintptr_t)(((struct fcp_port *)wsp->walk_data)->port_next);
79 
80 	return (status);
81 }
82 
83 /*
84  * The walker's fini function is invoked at the end of each walk.
85  */
86 static void
87 fcp_walk_f(mdb_walk_state_t *wsp)
88 {
89 	mdb_free(wsp->walk_data, sizeof (struct fcp_port));
90 }
91 
92 
93 static int
94 fcp(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
95 {
96 	struct fcp_port		pinfo;
97 
98 	if (argc != 0) {
99 		return (DCMD_USAGE);
100 	}
101 
102 	if (!(flags & DCMD_ADDRSPEC)) {
103 		if (mdb_walk_dcmd("fcp", "fcp",
104 		    argc, argv) == -1) {
105 			mdb_warn("failed to walk 'fcp_port_head'");
106 			return (DCMD_ERR);
107 		}
108 		return (DCMD_OK);
109 	}
110 
111 	mdb_printf("FCP structure at %p\n", addr);
112 
113 	/*
114 	 * For each port, we just need to read the fc_fca_port_t struct, read
115 	 * the port_handle
116 	 */
117 	if (mdb_vread(&pinfo, sizeof (struct fcp_port), addr) !=
118 	    sizeof (struct fcp_port)) {
119 		mdb_warn("failed to read fcp_port at %p", addr);
120 		return (DCMD_OK);
121 	}
122 
123 	mdb_printf("  mutex             : 0x%-08x\n", pinfo.port_mutex);
124 	mdb_printf("  ipkt_list         : 0x%p\n", pinfo.port_ipkt_list);
125 	mdb_printf("  state             : 0x%-08x\n", pinfo.port_state);
126 	mdb_printf("  phys_state        : 0x%-08x\n", pinfo.port_phys_state);
127 	mdb_printf("  top               : %u\n", pinfo.port_topology);
128 	mdb_printf("  sid               : 0x%-06x\n", pinfo.port_id);
129 	mdb_printf("  reset_list        : 0x%p\n", pinfo.port_reset_list);
130 	mdb_printf("  link_cnt          : %u\n", pinfo.port_link_cnt);
131 	mdb_printf("  deadline          : %d\n", pinfo.port_deadline);
132 	mdb_printf("  port wwn          : "
133 	    "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
134 	    pinfo.port_pwwn.raw_wwn[0], pinfo.port_pwwn.raw_wwn[1],
135 	    pinfo.port_pwwn.raw_wwn[2], pinfo.port_pwwn.raw_wwn[3],
136 	    pinfo.port_pwwn.raw_wwn[4], pinfo.port_pwwn.raw_wwn[5],
137 	    pinfo.port_pwwn.raw_wwn[6], pinfo.port_pwwn.raw_wwn[7]);
138 	mdb_printf("  node wwn          : "
139 	    "%02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x\n",
140 	    pinfo.port_nwwn.raw_wwn[0], pinfo.port_nwwn.raw_wwn[1],
141 	    pinfo.port_nwwn.raw_wwn[2], pinfo.port_nwwn.raw_wwn[3],
142 	    pinfo.port_nwwn.raw_wwn[4], pinfo.port_nwwn.raw_wwn[5],
143 	    pinfo.port_nwwn.raw_wwn[6], pinfo.port_nwwn.raw_wwn[7]);
144 	mdb_printf("  handle            : 0x%p\n", pinfo.port_fp_handle);
145 	mdb_printf("  cmd_mutex         : 0x%-08x\n", pinfo.port_pkt_mutex);
146 	mdb_printf("  ncmds             : %u\n", pinfo.port_npkts);
147 	mdb_printf("  pkt_head          : 0x%p\n", pinfo.port_pkt_head);
148 	mdb_printf("  pkt_tail          : 0x%p\n", pinfo.port_pkt_tail);
149 	mdb_printf("  ipkt_cnt          : %d\n", pinfo.port_ipkt_cnt);
150 	mdb_printf("  instance          : %u\n", pinfo.port_instance);
151 	mdb_printf("  max_exch          : %u\n", pinfo.port_max_exch);
152 	mdb_printf("  cmds_aborted      : 0x%-08x\n",
153 	    pinfo.port_reset_action);
154 	mdb_printf("  cmds_dma_flags    : 0x%-08x\n",
155 	    pinfo.port_cmds_dma_flags);
156 	mdb_printf("  fcp_dma           : 0x%-08x\n", pinfo.port_fcp_dma);
157 	mdb_printf("  priv_pkt_len      : %u\n", pinfo.port_priv_pkt_len);
158 	mdb_printf("  data_dma_attr     : 0x%-08x\n",
159 	    pinfo.port_data_dma_attr);
160 	mdb_printf("  cmd_dma_attr      : 0x%-08x\n",
161 	    pinfo.port_cmd_dma_attr);
162 	mdb_printf("  resp_dma_attr     : 0x%-08x\n",
163 	    pinfo.port_resp_dma_attr);
164 	mdb_printf("  dma_acc_attr      : 0x%-08x\n",
165 	    pinfo.port_dma_acc_attr);
166 	mdb_printf("  tran              : 0x%p\n", pinfo.port_tran);
167 	mdb_printf("  dip               : 0x%p\n", pinfo.port_dip);
168 	mdb_printf("  reset_notify_listf: 0x%p\n",
169 	    pinfo.port_reset_notify_listf);
170 	mdb_printf("  event_defs        : 0x%p\n", pinfo.port_ndi_event_defs);
171 	mdb_printf("  event_hdl         : 0x%p\n", pinfo.port_ndi_event_hdl);
172 	mdb_printf("  events            : 0x%p\n", pinfo.port_ndi_events);
173 	mdb_printf("  tgt_hash_table    : 0x%p\n", pinfo.port_tgt_hash_table);
174 	mdb_printf("  mpxio             : %d\n", pinfo.port_mpxio);
175 
176 	mdb_printf("\n");
177 
178 	return (DCMD_OK);
179 }
180 
181 
182 /*
183  * Leadville cmds walker/dcmd code
184  */
185 
186 static int
187 cmds_walk_i(mdb_walk_state_t *wsp)
188 {
189 	if (wsp->walk_addr == NULL) {
190 		mdb_warn("Can not perform global walk");
191 		return (WALK_ERR);
192 	}
193 
194 	/*
195 	 * Input should be a fcp_lun, so read it to get the fcp_pkt
196 	 * lists's head
197 	 */
198 
199 	if (mdb_vread(&lun, sizeof (struct fcp_lun), wsp->walk_addr) !=
200 	    sizeof (struct fcp_lun)) {
201 		mdb_warn("Unable to read in the fcp_lun structure address\n");
202 		return (WALK_ERR);
203 	}
204 
205 	wsp->walk_addr = (uintptr_t)(lun.lun_pkt_head);
206 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_pkt), UM_SLEEP);
207 
208 	return (WALK_NEXT);
209 }
210 
211 static int
212 cmds_walk_s(mdb_walk_state_t *wsp)
213 {
214 	int status;
215 
216 	if (wsp->walk_addr == NULL)
217 		return (WALK_DONE);
218 
219 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_pkt),
220 	    wsp->walk_addr) == -1) {
221 		mdb_warn("failed to read fcp_pkt at %p", wsp->walk_addr);
222 		return (WALK_DONE);
223 	}
224 
225 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
226 	    wsp->walk_cbdata);
227 
228 	wsp->walk_addr =
229 	    (uintptr_t)(((struct fcp_pkt *)wsp->walk_data)->cmd_forw);
230 
231 	return (status);
232 }
233 
234 /*
235  * The walker's fini function is invoked at the end of each walk.
236  */
237 static void
238 cmds_walk_f(mdb_walk_state_t *wsp)
239 {
240 	mdb_free(wsp->walk_data, sizeof (struct fcp_pkt));
241 }
242 
243 
244 /*
245  * Leadville luns walker/dcmd code
246  */
247 
248 static int
249 luns_walk_i(mdb_walk_state_t *wsp)
250 {
251 	if (wsp->walk_addr == NULL) {
252 		mdb_warn("Can not perform global walk");
253 		return (WALK_ERR);
254 	}
255 
256 	/*
257 	 * Input should be a fcp_tgt, so read it to get the fcp_lun
258 	 * lists's head
259 	 */
260 
261 	if (mdb_vread(&tgt, sizeof (struct fcp_tgt), wsp->walk_addr) !=
262 	    sizeof (struct fcp_tgt)) {
263 		mdb_warn("Unable to read in the fcp_tgt structure address\n");
264 		return (WALK_ERR);
265 	}
266 
267 	wsp->walk_addr = (uintptr_t)(tgt.tgt_lun);
268 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_lun), UM_SLEEP);
269 
270 	return (WALK_NEXT);
271 }
272 
273 static int
274 luns_walk_s(mdb_walk_state_t *wsp)
275 {
276 	int status;
277 
278 	if (wsp->walk_addr == NULL)
279 		return (WALK_DONE);
280 
281 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_lun),
282 	    wsp->walk_addr) == -1) {
283 		mdb_warn("failed to read fcp_pkt at %p", wsp->walk_addr);
284 		return (WALK_DONE);
285 	}
286 
287 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
288 	    wsp->walk_cbdata);
289 
290 	wsp->walk_addr =
291 	    (uintptr_t)(((struct fcp_lun *)wsp->walk_data)->lun_next);
292 
293 	return (status);
294 }
295 
296 /*
297  * The walker's fini function is invoked at the end of each walk.
298  */
299 static void
300 luns_walk_f(mdb_walk_state_t *wsp)
301 {
302 	mdb_free(wsp->walk_data, sizeof (struct fcp_lun));
303 }
304 
305 
306 /*
307  * Leadville targets walker/dcmd code
308  */
309 
310 static int
311 targets_walk_i(mdb_walk_state_t *wsp)
312 {
313 	if (wsp->walk_addr == NULL) {
314 		mdb_warn("Can not perform global walk\n");
315 		return (WALK_ERR);
316 	}
317 
318 	/*
319 	 * Input should be a fcp_port, so read it to get the port_tgt
320 	 * table's head
321 	 */
322 
323 	if (mdb_vread(&port, sizeof (struct fcp_port), wsp->walk_addr) !=
324 	    sizeof (struct fcp_port)) {
325 		mdb_warn("Unable to read in the port structure address\n");
326 		return (WALK_ERR);
327 	}
328 
329 	tgt_hash_index = 0;
330 
331 	while ((port.port_tgt_hash_table[tgt_hash_index] == NULL) &&
332 	    (tgt_hash_index < FCP_NUM_HASH)) {
333 		tgt_hash_index++;
334 	}
335 
336 	wsp->walk_addr = (uintptr_t)(port.port_tgt_hash_table[tgt_hash_index]);
337 
338 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_tgt), UM_SLEEP);
339 
340 	return (WALK_NEXT);
341 }
342 
343 static int
344 targets_walk_s(mdb_walk_state_t *wsp)
345 {
346 	int status;
347 
348 	if ((wsp->walk_addr == NULL) &&
349 	    (tgt_hash_index >= (FCP_NUM_HASH - 1))) {
350 		return (WALK_DONE);
351 	}
352 
353 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_tgt),
354 	    wsp->walk_addr) == -1) {
355 		mdb_warn("failed to read fcp_tgt at %p", wsp->walk_addr);
356 		return (WALK_DONE);
357 	}
358 
359 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
360 	    wsp->walk_cbdata);
361 
362 	wsp->walk_addr =
363 	    (uintptr_t)(((struct fcp_tgt *)wsp->walk_data)->tgt_next);
364 
365 	if (wsp->walk_addr == NULL) {
366 		/*
367 		 * locate the next hash list
368 		 */
369 
370 		tgt_hash_index++;
371 
372 		while ((port.port_tgt_hash_table[tgt_hash_index] == NULL) &&
373 		    (tgt_hash_index < FCP_NUM_HASH)) {
374 			tgt_hash_index++;
375 		}
376 
377 		if (tgt_hash_index == FCP_NUM_HASH) {
378 			/* You're done */
379 			return (status);
380 		}
381 
382 		wsp->walk_addr =
383 		    (uintptr_t)(port.port_tgt_hash_table[tgt_hash_index]);
384 	}
385 
386 	return (status);
387 }
388 
389 /*
390  * The walker's fini function is invoked at the end of each walk.
391  */
392 static void
393 targets_walk_f(mdb_walk_state_t *wsp)
394 {
395 	mdb_free(wsp->walk_data, sizeof (struct fcp_tgt));
396 }
397 
398 
399 /*
400  * Leadville fcp_ipkt walker/dcmd code
401  */
402 
403 static int
404 ipkt_walk_i(mdb_walk_state_t *wsp)
405 {
406 	if (wsp->walk_addr == NULL) {
407 		mdb_warn("The address of a fcp_port"
408 		    " structure must be given\n");
409 		return (WALK_ERR);
410 	}
411 
412 	/*
413 	 * Input should be a fcp_port, so read it to get the ipkt
414 	 * list's head
415 	 */
416 
417 	if (mdb_vread(&port, sizeof (struct fcp_port), wsp->walk_addr) !=
418 	    sizeof (struct fcp_port)) {
419 		mdb_warn("Failed to read in the fcp_port"
420 		    " at 0x%p\n", wsp->walk_addr);
421 		return (WALK_ERR);
422 	}
423 
424 	wsp->walk_addr = (uintptr_t)(port.port_ipkt_list);
425 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_ipkt), UM_SLEEP);
426 
427 	return (WALK_NEXT);
428 }
429 
430 static int
431 ipkt_walk_s(mdb_walk_state_t *wsp)
432 {
433 	int status;
434 
435 	if (wsp->walk_addr == NULL)
436 		return (WALK_DONE);
437 
438 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_ipkt),
439 	    wsp->walk_addr) == -1) {
440 		mdb_warn("Failed to read in the fcp_ipkt"
441 		    " at 0x%p\n", wsp->walk_addr);
442 		return (WALK_DONE);
443 	}
444 
445 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
446 	    wsp->walk_cbdata);
447 
448 	wsp->walk_addr =
449 	    (uintptr_t)(((struct fcp_ipkt *)wsp->walk_data)->ipkt_next);
450 
451 	return (status);
452 }
453 
454 /*
455  * The walker's fini function is invoked at the end of each walk.
456  */
457 static void
458 ipkt_walk_f(mdb_walk_state_t *wsp)
459 {
460 	mdb_free(wsp->walk_data, sizeof (struct fcp_ipkt));
461 }
462 
463 /*
464  * Leadville fcp_pkt walker/dcmd code
465  */
466 
467 static int
468 pkt_walk_i(mdb_walk_state_t *wsp)
469 {
470 	if (wsp->walk_addr == NULL) {
471 		mdb_warn("The address of a fcp_port"
472 		    " structure must be given\n");
473 		return (WALK_ERR);
474 	}
475 
476 	/*
477 	 * Input should be an fcp_port, so read it to get the pkt
478 	 * list's head
479 	 */
480 
481 	if (mdb_vread(&port, sizeof (struct fcp_port), wsp->walk_addr) !=
482 	    sizeof (struct fcp_port)) {
483 		mdb_warn("Failed to read in the fcp_port"
484 		    " at 0x%p\n", wsp->walk_addr);
485 		return (WALK_ERR);
486 	}
487 
488 	wsp->walk_addr = (uintptr_t)(port.port_pkt_head);
489 	wsp->walk_data = mdb_alloc(sizeof (struct fcp_pkt), UM_SLEEP);
490 
491 	return (WALK_NEXT);
492 }
493 
494 static int
495 pkt_walk_s(mdb_walk_state_t *wsp)
496 {
497 	int status;
498 
499 	if (wsp->walk_addr == NULL)
500 		return (WALK_DONE);
501 
502 	if (mdb_vread(wsp->walk_data, sizeof (struct fcp_pkt),
503 	    wsp->walk_addr) == -1) {
504 		mdb_warn("Failed to read in the fcp_pkt"
505 		    " at 0x%p\n", wsp->walk_addr);
506 		return (WALK_DONE);
507 	}
508 
509 	status = wsp->walk_callback(wsp->walk_addr, wsp->walk_data,
510 	    wsp->walk_cbdata);
511 
512 	wsp->walk_addr =
513 	    (uintptr_t)(((struct fcp_pkt *)wsp->walk_data)->cmd_next);
514 
515 	return (status);
516 }
517 
518 /*
519  * The walker's fini function is invoked at the end of each walk.
520  */
521 static void
522 pkt_walk_f(mdb_walk_state_t *wsp)
523 {
524 	mdb_free(wsp->walk_data, sizeof (struct fcp_pkt));
525 }
526 
527 /*
528  * MDB module linkage information:
529  *
530  * We declare a list of structures describing our dcmds, a list of structures
531  * describing our walkers, and a function named _mdb_init to return a pointer
532  * to our module information.
533  */
534 
535 static const mdb_dcmd_t dcmds[] = {
536 	{ "fcp", NULL, "Leadville fcp instances", fcp },
537 	{ NULL }
538 };
539 
540 static const mdb_walker_t walkers[] = {
541 	{ "fcp", "Walk list of Leadville fcp instances",
542 		fcp_walk_i, fcp_walk_s, fcp_walk_f },
543 	{ "cmds", "Walk list of SCSI commands in fcp's per-lun queue",
544 		cmds_walk_i, cmds_walk_s, cmds_walk_f },
545 	{ "luns", "Walk list of LUNs in an fcp target",
546 		luns_walk_i, luns_walk_s, luns_walk_f },
547 	{ "targets", "Walk list of fcp targets attached to the local port",
548 		targets_walk_i, targets_walk_s, targets_walk_f },
549 	{ "fcp_ipkt", "Walk list of internal packets queued on a local port",
550 		ipkt_walk_i, ipkt_walk_s, ipkt_walk_f},
551 	{ "fcp_pkt", "Walk list of packets queued on a local port",
552 		pkt_walk_i, pkt_walk_s, pkt_walk_f},
553 	{ NULL }
554 };
555 
556 static const mdb_modinfo_t modinfo = {
557 	MDB_API_VERSION, dcmds, walkers
558 };
559 
560 const mdb_modinfo_t *
561 _mdb_init(void)
562 {
563 	return (&modinfo);
564 }
565