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
26 /*
27 * SunOS 5.x Multithreaded STREAMS DLPI FCIP Module
28 * This is a pseudo driver module to handle encapsulation of IP and ARP
29 * datagrams over FibreChannel interfaces. FCIP is a cloneable STREAMS
30 * driver module which interfaces with IP/ARP using DLPI. This module
31 * is a Style-2 DLS provider.
32 *
33 * The implementation of this module is based on RFC 2625 which gives
34 * details on the encapsulation of IP/ARP data over FibreChannel.
35 * The fcip module needs to resolve an IP address to a port address before
36 * sending data to a destination port. A FC device port has 2 addresses
37 * associated with it: A 8 byte World Wide unique Port Name and a 3 byte
38 * volatile Port number or Port_ID.
39 *
40 * The mapping between a IP address and the World Wide Port Name is handled
41 * by the ARP layer since the IP over FC draft requires the MAC address to
42 * be the least significant six bytes of the WorldWide Port Names. The
43 * fcip module however needs to identify the destination port uniquely when
44 * the destination FC device has multiple FC ports.
45 *
46 * The FC layer mapping between the World Wide Port Name and the Port_ID
47 * will be handled through the use of a fabric name server or through the
48 * use of the FARP ELS command as described in the draft. Since the Port_IDs
49 * are volatile, the mapping between the World Wide Port Name and Port_IDs
50 * must be maintained and validated before use each time a datagram
51 * needs to be sent to the destination ports. The FC transport module
52 * informs the fcip module of all changes to states of ports on the
53 * fabric through registered callbacks. This enables the fcip module
54 * to maintain the WW_PN to Port_ID mappings current.
55 *
56 * For details on how this module interfaces with the FibreChannel Transport
57 * modules, refer to PSARC/1997/385. Chapter 3 of the FibreChannel Transport
58 * Programming guide details the APIs between ULPs and the Transport.
59 *
60 * Now for some Caveats:
61 *
62 * RFC 2625 requires that a FibreChannel Port name (the Port WWN) have
63 * the NAA bits set to '0001' indicating a IEEE 48bit address which
64 * corresponds to a ULA (Universal LAN MAC address). But with FibreChannel
65 * adapters containing 2 or more ports, IEEE naming cannot identify the
66 * ports on an adapter uniquely so we will in the first implementation
67 * be operating only on Port 0 of each adapter.
68 */
69
70 #include <sys/types.h>
71 #include <sys/errno.h>
72 #include <sys/debug.h>
73 #include <sys/time.h>
74 #include <sys/sysmacros.h>
75 #include <sys/systm.h>
76 #include <sys/user.h>
77 #include <sys/stropts.h>
78 #include <sys/stream.h>
79 #include <sys/strlog.h>
80 #include <sys/strsubr.h>
81 #include <sys/cmn_err.h>
82 #include <sys/cpu.h>
83 #include <sys/kmem.h>
84 #include <sys/conf.h>
85 #include <sys/ddi.h>
86 #include <sys/sunddi.h>
87 #include <sys/ksynch.h>
88 #include <sys/stat.h>
89 #include <sys/kstat.h>
90 #include <sys/vtrace.h>
91 #include <sys/strsun.h>
92 #include <sys/varargs.h>
93 #include <sys/modctl.h>
94 #include <sys/thread.h>
95 #include <sys/var.h>
96 #include <sys/proc.h>
97 #include <inet/common.h>
98 #include <netinet/ip6.h>
99 #include <inet/ip.h>
100 #include <inet/arp.h>
101 #include <inet/mi.h>
102 #include <inet/nd.h>
103 #include <sys/dlpi.h>
104 #include <sys/ethernet.h>
105 #include <sys/file.h>
106 #include <sys/syslog.h>
107 #include <sys/disp.h>
108 #include <sys/taskq.h>
109
110 /*
111 * Leadville includes
112 */
113
114 #include <sys/fibre-channel/fc.h>
115 #include <sys/fibre-channel/impl/fc_ulpif.h>
116 #include <sys/fibre-channel/ulp/fcip.h>
117
118 /*
119 * TNF Probe/trace facility include
120 */
121 #if defined(lint) || defined(FCIP_TNF_ENABLED)
122 #include <sys/tnf_probe.h>
123 #endif
124
125 #define FCIP_ESBALLOC
126
127 /*
128 * Function prototypes
129 */
130
131 /* standard loadable modules entry points */
132 static int fcip_attach(dev_info_t *, ddi_attach_cmd_t);
133 static int fcip_detach(dev_info_t *, ddi_detach_cmd_t);
134 static void fcip_dodetach(struct fcipstr *slp);
135 static int fcip_getinfo(dev_info_t *dip, ddi_info_cmd_t cmd,
136 void *arg, void **result);
137
138
139 /* streams specific */
140 static void fcip_setipq(struct fcip *fptr);
141 static int fcip_wput(queue_t *, mblk_t *);
142 static int fcip_wsrv(queue_t *);
143 static void fcip_proto(queue_t *, mblk_t *);
144 static void fcip_ioctl(queue_t *, mblk_t *);
145 static int fcip_open(queue_t *wq, dev_t *devp, int flag,
146 int sflag, cred_t *credp);
147 static int fcip_close(queue_t *rq, int flag, int otyp, cred_t *credp);
148 static int fcip_start(queue_t *wq, mblk_t *mp, struct fcip *fptr,
149 struct fcip_dest *fdestp, int flags);
150 static void fcip_sendup(struct fcip *fptr, mblk_t *mp,
151 struct fcipstr *(*acceptfunc)());
152 static struct fcipstr *fcip_accept(struct fcipstr *slp, struct fcip *fptr,
153 int type, la_wwn_t *dhostp);
154 static mblk_t *fcip_addudind(struct fcip *fptr, mblk_t *mp,
155 fcph_network_hdr_t *nhdr, int type);
156 static int fcip_setup_mac_addr(struct fcip *fptr);
157 static void fcip_kstat_init(struct fcip *fptr);
158 static int fcip_stat_update(kstat_t *, int);
159
160
161 /* dlpi specific */
162 static void fcip_spareq(queue_t *wq, mblk_t *mp);
163 static void fcip_pareq(queue_t *wq, mblk_t *mp);
164 static void fcip_ubreq(queue_t *wq, mblk_t *mp);
165 static void fcip_breq(queue_t *wq, mblk_t *mp);
166 static void fcip_dreq(queue_t *wq, mblk_t *mp);
167 static void fcip_areq(queue_t *wq, mblk_t *mp);
168 static void fcip_udreq(queue_t *wq, mblk_t *mp);
169 static void fcip_ireq(queue_t *wq, mblk_t *mp);
170 static void fcip_dl_ioc_hdr_info(queue_t *wq, mblk_t *mp);
171
172
173 /* solaris sundry, DR/CPR etc */
174 static int fcip_cache_constructor(void *buf, void *arg, int size);
175 static void fcip_cache_destructor(void *buf, void *size);
176 static int fcip_handle_suspend(fcip_port_info_t *fport, fc_detach_cmd_t cmd);
177 static int fcip_handle_resume(fcip_port_info_t *fport,
178 fc_ulp_port_info_t *port_info, fc_attach_cmd_t cmd);
179 static fcip_port_info_t *fcip_softstate_free(fcip_port_info_t *fport);
180 static int fcip_port_attach_handler(struct fcip *fptr);
181
182
183 /*
184 * ulp - transport interface function prototypes
185 */
186 static int fcip_port_attach(opaque_t ulp_handle, fc_ulp_port_info_t *,
187 fc_attach_cmd_t cmd, uint32_t sid);
188 static int fcip_port_detach(opaque_t ulp_handle, fc_ulp_port_info_t *,
189 fc_detach_cmd_t cmd);
190 static int fcip_port_ioctl(opaque_t ulp_handle, opaque_t port_handle,
191 dev_t dev, int cmd, intptr_t data, int mode, cred_t *credp, int *rval,
192 uint32_t claimed);
193 static void fcip_statec_cb(opaque_t ulp_handle, opaque_t phandle,
194 uint32_t port_state, uint32_t port_top, fc_portmap_t changelist[],
195 uint32_t listlen, uint32_t sid);
196 static int fcip_els_cb(opaque_t ulp_handle, opaque_t phandle,
197 fc_unsol_buf_t *buf, uint32_t claimed);
198 static int fcip_data_cb(opaque_t ulp_handle, opaque_t phandle,
199 fc_unsol_buf_t *payload, uint32_t claimed);
200
201
202 /* Routing table specific */
203 static void fcip_handle_topology(struct fcip *fptr);
204 static int fcip_init_port(struct fcip *fptr);
205 struct fcip_routing_table *fcip_lookup_rtable(struct fcip *fptr,
206 la_wwn_t *pwwn, int matchflag);
207 static void fcip_rt_update(struct fcip *fptr, fc_portmap_t *devlist,
208 uint32_t listlen);
209 static void fcip_rt_flush(struct fcip *fptr);
210 static void fcip_rte_remove_deferred(void *arg);
211 static int fcip_do_plogi(struct fcip *fptr, struct fcip_routing_table *frp);
212
213
214 /* dest table specific */
215 static struct fcip_dest *fcip_get_dest(struct fcip *fptr,
216 la_wwn_t *dlphys);
217 static struct fcip_dest *fcip_add_dest(struct fcip *fptr,
218 struct fcip_routing_table *frp);
219 static int fcip_dest_add_broadcast_entry(struct fcip *fptr, int new_flag);
220 static uint32_t fcip_get_broadcast_did(struct fcip *fptr);
221 static void fcip_cleanup_dest(struct fcip *fptr);
222
223
224 /* helper functions */
225 static fcip_port_info_t *fcip_get_port(opaque_t phandle);
226 static int fcip_wwn_compare(la_wwn_t *wwn1, la_wwn_t *wwn2, int flag);
227 static void fcip_ether_to_str(struct ether_addr *e, caddr_t s);
228 static int fcip_port_get_num_pkts(struct fcip *fptr);
229 static int fcip_check_port_busy(struct fcip *fptr);
230 static void fcip_check_remove_minor_node(void);
231 static int fcip_set_wwn(la_wwn_t *pwwn);
232 static int fcip_plogi_in_progress(struct fcip *fptr);
233 static int fcip_check_port_exists(struct fcip *fptr);
234 static int fcip_is_supported_fc_topology(int fc_topology);
235
236
237 /* pkt specific */
238 static fcip_pkt_t *fcip_pkt_alloc(struct fcip *fptr, mblk_t *bp,
239 int flags, int datalen);
240 static void fcip_pkt_free(struct fcip_pkt *fcip_pkt, int flags);
241 static fcip_pkt_t *fcip_ipkt_alloc(struct fcip *fptr, int cmdlen,
242 int resplen, opaque_t pd, int flags);
243 static void fcip_ipkt_free(fcip_pkt_t *fcip_pkt);
244 static void fcip_ipkt_callback(fc_packet_t *fc_pkt);
245 static void fcip_free_pkt_dma(fcip_pkt_t *fcip_pkt);
246 static void fcip_pkt_callback(fc_packet_t *fc_pkt);
247 static void fcip_init_unicast_pkt(fcip_pkt_t *fcip_pkt, fc_portid_t sid,
248 fc_portid_t did, void (*comp) ());
249 static int fcip_transport(fcip_pkt_t *fcip_pkt);
250 static void fcip_pkt_timeout(void *arg);
251 static void fcip_timeout(void *arg);
252 static void fcip_fdestp_enqueue_pkt(struct fcip_dest *fdestp,
253 fcip_pkt_t *fcip_pkt);
254 static int fcip_fdestp_dequeue_pkt(struct fcip_dest *fdestp,
255 fcip_pkt_t *fcip_pkt);
256 static int fcip_sendup_constructor(void *buf, void *arg, int flags);
257 static void fcip_sendup_thr(void *arg);
258 static int fcip_sendup_alloc_enque(struct fcip *ftpr, mblk_t *mp,
259 struct fcipstr *(*f)());
260
261 /*
262 * zero copy inbound data handling
263 */
264 #ifdef FCIP_ESBALLOC
265 static void fcip_ubfree(char *arg);
266 #endif /* FCIP_ESBALLOC */
267
268 #if !defined(FCIP_ESBALLOC)
269 static void *fcip_allocb(size_t size, uint_t pri);
270 #endif
271
272
273 /* FCIP FARP support functions */
274 static struct fcip_dest *fcip_do_farp(struct fcip *fptr, la_wwn_t *pwwn,
275 char *ip_addr, size_t ip_addr_len, int flags);
276 static void fcip_init_broadcast_pkt(fcip_pkt_t *fcip_pkt, void (*comp) (),
277 int is_els);
278 static int fcip_handle_farp_request(struct fcip *fptr, la_els_farp_t *fcmd);
279 static int fcip_handle_farp_response(struct fcip *fptr, la_els_farp_t *fcmd);
280 static void fcip_cache_arp_broadcast(struct fcip *ftpr, fc_unsol_buf_t *buf);
281 static void fcip_port_ns(void *arg);
282
283 #ifdef DEBUG
284
285 #include <sys/debug.h>
286
287 #define FCIP_DEBUG_DEFAULT 0x1
288 #define FCIP_DEBUG_ATTACH 0x2
289 #define FCIP_DEBUG_INIT 0x4
290 #define FCIP_DEBUG_DETACH 0x8
291 #define FCIP_DEBUG_DLPI 0x10
292 #define FCIP_DEBUG_ELS 0x20
293 #define FCIP_DEBUG_DOWNSTREAM 0x40
294 #define FCIP_DEBUG_UPSTREAM 0x80
295 #define FCIP_DEBUG_MISC 0x100
296
297 #define FCIP_DEBUG_STARTUP (FCIP_DEBUG_ATTACH|FCIP_DEBUG_INIT)
298 #define FCIP_DEBUG_DATAOUT (FCIP_DEBUG_DLPI|FCIP_DEBUG_DOWNSTREAM)
299 #define FCIP_DEBUG_DATAIN (FCIP_DEBUG_ELS|FCIP_DEBUG_UPSTREAM)
300
301 static int fcip_debug = FCIP_DEBUG_DEFAULT;
302
303 #define FCIP_DEBUG(level, args) \
304 if (fcip_debug & (level)) cmn_err args;
305
306 #else /* DEBUG */
307
308 #define FCIP_DEBUG(level, args) /* do nothing */
309
310 #endif /* DEBUG */
311
312 #define KIOIP KSTAT_INTR_PTR(fcip->fcip_intrstats)
313
314 /*
315 * Endian independent ethernet to WWN copy
316 */
317 #define ether_to_wwn(E, W) \
318 bzero((void *)(W), sizeof (la_wwn_t)); \
319 bcopy((void *)(E), (void *)&((W)->raw_wwn[2]), ETHERADDRL); \
320 (W)->raw_wwn[0] |= 0x10
321
322 /*
323 * wwn_to_ether : Endian independent, copies a WWN to struct ether_addr.
324 * The args to the macro are pointers to WWN and ether_addr structures
325 */
326 #define wwn_to_ether(W, E) \
327 bcopy((void *)&((W)->raw_wwn[2]), (void *)E, ETHERADDRL)
328
329 /*
330 * The module_info structure contains identification and limit values.
331 * All queues associated with a certain driver share the same module_info
332 * structures. This structure defines the characteristics of that driver/
333 * module's queues. The module name must be unique. The max and min packet
334 * sizes limit the no. of characters in M_DATA messages. The Hi and Lo
335 * water marks are for flow control when a module has a service procedure.
336 */
337 static struct module_info fcipminfo = {
338 FCIPIDNUM, /* mi_idnum : Module ID num */
339 FCIPNAME, /* mi_idname: Module Name */
340 FCIPMINPSZ, /* mi_minpsz: Min packet size */
341 FCIPMAXPSZ, /* mi_maxpsz: Max packet size */
342 FCIPHIWAT, /* mi_hiwat : High water mark */
343 FCIPLOWAT /* mi_lowat : Low water mark */
344 };
345
346 /*
347 * The qinit structres contain the module put, service. open and close
348 * procedure pointers. All modules and drivers with the same streamtab
349 * file (i.e same fmodsw or cdevsw entry points) point to the same
350 * upstream (read) and downstream (write) qinit structs.
351 */
352 static struct qinit fcip_rinit = {
353 NULL, /* qi_putp */
354 NULL, /* qi_srvp */
355 fcip_open, /* qi_qopen */
356 fcip_close, /* qi_qclose */
357 NULL, /* qi_qadmin */
358 &fcipminfo, /* qi_minfo */
359 NULL /* qi_mstat */
360 };
361
362 static struct qinit fcip_winit = {
363 fcip_wput, /* qi_putp */
364 fcip_wsrv, /* qi_srvp */
365 NULL, /* qi_qopen */
366 NULL, /* qi_qclose */
367 NULL, /* qi_qadmin */
368 &fcipminfo, /* qi_minfo */
369 NULL /* qi_mstat */
370 };
371
372 /*
373 * streamtab contains pointers to the read and write qinit structures
374 */
375
376 static struct streamtab fcip_info = {
377 &fcip_rinit, /* st_rdinit */
378 &fcip_winit, /* st_wrinit */
379 NULL, /* st_muxrinit */
380 NULL, /* st_muxwrinit */
381 };
382
383 static struct cb_ops fcip_cb_ops = {
384 nodev, /* open */
385 nodev, /* close */
386 nodev, /* strategy */
387 nodev, /* print */
388 nodev, /* dump */
389 nodev, /* read */
390 nodev, /* write */
391 nodev, /* ioctl */
392 nodev, /* devmap */
393 nodev, /* mmap */
394 nodev, /* segmap */
395 nochpoll, /* poll */
396 ddi_prop_op, /* cb_prop_op */
397 &fcip_info, /* streamtab */
398 D_MP | D_HOTPLUG, /* Driver compatibility flag */
399 CB_REV, /* rev */
400 nodev, /* int (*cb_aread)() */
401 nodev /* int (*cb_awrite)() */
402 };
403
404 /*
405 * autoconfiguration routines.
406 */
407 static struct dev_ops fcip_ops = {
408 DEVO_REV, /* devo_rev, */
409 0, /* refcnt */
410 fcip_getinfo, /* info */
411 nulldev, /* identify */
412 nulldev, /* probe */
413 fcip_attach, /* attach */
414 fcip_detach, /* detach */
415 nodev, /* RESET */
416 &fcip_cb_ops, /* driver operations */
417 NULL, /* bus operations */
418 ddi_power /* power management */
419 };
420
421 #define FCIP_VERSION "1.61"
422 #define FCIP_NAME "SunFC FCIP v" FCIP_VERSION
423
424 #define PORT_DRIVER "fp"
425
426 #define GETSTRUCT(struct, number) \
427 ((struct *)kmem_zalloc((size_t)(sizeof (struct) * (number)), \
428 KM_SLEEP))
429
430 static struct modldrv modldrv = {
431 &mod_driverops, /* Type of module - driver */
432 FCIP_NAME, /* Name of module */
433 &fcip_ops, /* driver ops */
434 };
435
436 static struct modlinkage modlinkage = {
437 MODREV_1, { (void *)&modldrv, NULL }
438 };
439
440
441 /*
442 * Now for some global statics
443 */
444 static uint32_t fcip_ub_nbufs = FCIP_UB_NBUFS;
445 static uint32_t fcip_ub_size = FCIP_UB_SIZE;
446 static int fcip_pkt_ttl_ticks = FCIP_PKT_TTL;
447 static int fcip_tick_incr = 1;
448 static int fcip_wait_cmds = FCIP_WAIT_CMDS;
449 static int fcip_num_attaching = 0;
450 static int fcip_port_attach_pending = 0;
451 static int fcip_create_nodes_on_demand = 1; /* keep it similar to fcp */
452 static int fcip_cache_on_arp_broadcast = 0;
453 static int fcip_farp_supported = 0;
454 static int fcip_minor_node_created = 0;
455
456 /*
457 * Supported FCAs
458 */
459 #define QLC_PORT_1_ID_BITS 0x100
460 #define QLC_PORT_2_ID_BITS 0x101
461 #define QLC_PORT_NAA 0x2
462 #define QLC_MODULE_NAME "qlc"
463 #define IS_QLC_PORT(port_dip) \
464 (strcmp(ddi_driver_name(ddi_get_parent((port_dip))),\
465 QLC_MODULE_NAME) == 0)
466
467
468 /*
469 * fcip softstate structures head.
470 */
471
472 static void *fcip_softp = NULL;
473
474 /*
475 * linked list of active (inuse) driver streams
476 */
477
478 static int fcip_num_instances = 0;
479 static dev_info_t *fcip_module_dip = (dev_info_t *)0;
480
481
482 /*
483 * Ethernet broadcast address: Broadcast addressing in IP over fibre
484 * channel should be the IEEE ULA (also the low 6 bytes of the Port WWN).
485 *
486 * The broadcast addressing varies for differing topologies a node may be in:
487 * - On a private loop the ARP broadcast is a class 3 sequence sent
488 * using OPNfr (Open Broadcast Replicate primitive) followed by
489 * the ARP frame to D_ID 0xFFFFFF
490 *
491 * - On a public Loop the broadcast sequence is sent to AL_PA 0x00
492 * (no OPNfr primitive).
493 *
494 * - For direct attach and point to point topologies we just send
495 * the frame to D_ID 0xFFFFFF
496 *
497 * For public loop the handling would probably be different - for now
498 * I'll just declare this struct - It can be deleted if not necessary.
499 *
500 */
501
502
503 /*
504 * DL_INFO_ACK template for the fcip module. The dl_info_ack_t structure is
505 * returned as a part of an DL_INFO_ACK message which is a M_PCPROTO message
506 * returned in response to a DL_INFO_REQ message sent to us from a DLS user
507 * Let us fake an ether header as much as possible.
508 *
509 * dl_addr_length is the Provider's DLSAP addr which is SAP addr +
510 * Physical addr of the provider. We set this to
511 * ushort_t + sizeof (la_wwn_t) for Fibre Channel ports.
512 * dl_mac_type Lets just use DL_ETHER - we can try using DL_IPFC, a new
513 * dlpi.h define later.
514 * dl_sap_length -2 indicating the SAP address follows the Physical addr
515 * component in the DLSAP addr.
516 * dl_service_mode: DLCLDS - connectionless data link service.
517 *
518 */
519
520 static dl_info_ack_t fcip_infoack = {
521 DL_INFO_ACK, /* dl_primitive */
522 FCIPMTU, /* dl_max_sdu */
523 0, /* dl_min_sdu */
524 FCIPADDRL, /* dl_addr_length */
525 DL_ETHER, /* dl_mac_type */
526 0, /* dl_reserved */
527 0, /* dl_current_state */
528 -2, /* dl_sap_length */
529 DL_CLDLS, /* dl_service_mode */
530 0, /* dl_qos_length */
531 0, /* dl_qos_offset */
532 0, /* dl_range_length */
533 0, /* dl_range_offset */
534 DL_STYLE2, /* dl_provider_style */
535 sizeof (dl_info_ack_t), /* dl_addr_offset */
536 DL_VERSION_2, /* dl_version */
537 ETHERADDRL, /* dl_brdcst_addr_length */
538 sizeof (dl_info_ack_t) + FCIPADDRL, /* dl_brdcst_addr_offset */
539 0 /* dl_growth */
540 };
541
542 /*
543 * FCIP broadcast address definition.
544 */
545 static struct ether_addr fcipnhbroadcastaddr = {
546 { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }
547 };
548
549 /*
550 * RFC2625 requires the broadcast ARP address in the ARP data payload to
551 * be set to 0x00 00 00 00 00 00 for ARP broadcast packets
552 */
553 static struct ether_addr fcip_arpbroadcast_addr = {
554 { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }
555 };
556
557
558 #define ether_bcopy(src, dest) bcopy((src), (dest), ETHERADDRL);
559
560 /*
561 * global kernel locks
562 */
563 static kcondvar_t fcip_global_cv;
564 static kmutex_t fcip_global_mutex;
565
566 /*
567 * fctl external defines
568 */
569 extern int fc_ulp_add(fc_ulp_modinfo_t *);
570
571 /*
572 * fctl data structures
573 */
574
575 #define FCIP_REV 0x07
576
577 /* linked list of port info structures */
578 static fcip_port_info_t *fcip_port_head = NULL;
579
580 /* linked list of fcip structures */
581 static struct fcipstr *fcipstrup = NULL;
582 static krwlock_t fcipstruplock;
583
584
585 /*
586 * Module information structure. This structure gives the FC Transport modules
587 * information about an ULP that registers with it.
588 */
589 static fc_ulp_modinfo_t fcip_modinfo = {
590 0, /* for xref checks? */
591 FCTL_ULP_MODREV_4, /* FCIP revision */
592 FC_TYPE_IS8802_SNAP, /* type 5 for SNAP encapsulated datagrams */
593 FCIP_NAME, /* module name as in the modldrv struct */
594 0x0, /* get all statec callbacks for now */
595 fcip_port_attach, /* port attach callback */
596 fcip_port_detach, /* port detach callback */
597 fcip_port_ioctl, /* port ioctl callback */
598 fcip_els_cb, /* els callback */
599 fcip_data_cb, /* data callback */
600 fcip_statec_cb /* state change callback */
601 };
602
603
604 /*
605 * Solaris 9 and up, the /kernel/drv/fp.conf file will have the following entry
606 *
607 * ddi-forceattach=1;
608 *
609 * This will ensure that fp is loaded at bootup. No additional checks are needed
610 */
611 int
612 _init(void)
613 {
614 int rval;
615
616 FCIP_TNF_LOAD();
617
618 /*
619 * Initialize the mutexs used by port attach and other callbacks.
620 * The transport can call back into our port_attach_callback
621 * routine even before _init() completes and bad things can happen.
622 */
623 mutex_init(&fcip_global_mutex, NULL, MUTEX_DRIVER, NULL);
624 cv_init(&fcip_global_cv, NULL, CV_DRIVER, NULL);
625 rw_init(&fcipstruplock, NULL, RW_DRIVER, NULL);
626
627 mutex_enter(&fcip_global_mutex);
628 fcip_port_attach_pending = 1;
629 mutex_exit(&fcip_global_mutex);
630
631 /*
632 * Now attempt to register fcip with the transport.
633 * If fc_ulp_add fails, fcip module will not be loaded.
634 */
635 rval = fc_ulp_add(&fcip_modinfo);
636 if (rval != FC_SUCCESS) {
637 mutex_destroy(&fcip_global_mutex);
638 cv_destroy(&fcip_global_cv);
639 rw_destroy(&fcipstruplock);
640 switch (rval) {
641 case FC_ULP_SAMEMODULE:
642 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
643 "!fcip: module is already registered with"
644 " transport"));
645 rval = EEXIST;
646 break;
647 case FC_ULP_SAMETYPE:
648 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
649 "!fcip: Another module of the same ULP type 0x%x"
650 " is already registered with the transport",
651 fcip_modinfo.ulp_type));
652 rval = EEXIST;
653 break;
654 case FC_BADULP:
655 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
656 "!fcip: Current fcip version 0x%x does not match"
657 " fctl version",
658 fcip_modinfo.ulp_rev));
659 rval = ENODEV;
660 break;
661 default:
662 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
663 "!fcip: fc_ulp_add failed with status 0x%x", rval));
664 rval = ENODEV;
665 break;
666 }
667 FCIP_TNF_UNLOAD(&modlinkage);
668 return (rval);
669 }
670
671 if ((rval = ddi_soft_state_init(&fcip_softp, sizeof (struct fcip),
672 FCIP_NUM_INSTANCES)) != 0) {
673 mutex_destroy(&fcip_global_mutex);
674 cv_destroy(&fcip_global_cv);
675 rw_destroy(&fcipstruplock);
676 (void) fc_ulp_remove(&fcip_modinfo);
677 FCIP_TNF_UNLOAD(&modlinkage);
678 return (rval);
679 }
680
681 if ((rval = mod_install(&modlinkage)) != 0) {
682 FCIP_TNF_UNLOAD(&modlinkage);
683 (void) fc_ulp_remove(&fcip_modinfo);
684 mutex_destroy(&fcip_global_mutex);
685 cv_destroy(&fcip_global_cv);
686 rw_destroy(&fcipstruplock);
687 ddi_soft_state_fini(&fcip_softp);
688 }
689 return (rval);
690 }
691
692 /*
693 * Unload the port driver if this was the only ULP loaded and then
694 * deregister with the transport.
695 */
696 int
697 _fini(void)
698 {
699 int rval;
700 int rval1;
701
702 /*
703 * Do not permit the module to be unloaded before a port
704 * attach callback has happened.
705 */
706 mutex_enter(&fcip_global_mutex);
707 if (fcip_num_attaching || fcip_port_attach_pending) {
708 mutex_exit(&fcip_global_mutex);
709 return (EBUSY);
710 }
711 mutex_exit(&fcip_global_mutex);
712
713 if ((rval = mod_remove(&modlinkage)) != 0) {
714 return (rval);
715 }
716
717 /*
718 * unregister with the transport layer
719 */
720 rval1 = fc_ulp_remove(&fcip_modinfo);
721
722 /*
723 * If the ULP was not registered with the transport, init should
724 * have failed. If transport has no knowledge of our existence
725 * we should simply bail out and succeed
726 */
727 #ifdef DEBUG
728 if (rval1 == FC_BADULP) {
729 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
730 "fcip: ULP was never registered with the transport"));
731 rval = ENODEV;
732 } else if (rval1 == FC_BADTYPE) {
733 FCIP_DEBUG(FCIP_DEBUG_DEFAULT, (CE_WARN,
734 "fcip: No ULP of this type 0x%x was registered with "
735 "transport", fcip_modinfo.ulp_type));
736 rval = ENODEV;
737 }
738 #endif /* DEBUG */
739
740 mutex_destroy(&fcip_global_mutex);
741 rw_destroy(&fcipstruplock);
742 cv_destroy(&fcip_global_cv);
743 ddi_soft_state_fini(&fcip_softp);
744
745 FCIP_TNF_UNLOAD(&modlinkage);
746
747 return (rval);
748 }
749
750 /*
751 * Info about this loadable module
752 */
753 int
754 _info(struct modinfo *modinfop)
755 {
756 return (mod_info(&modlinkage, modinfop));
757 }
758
759 /*
760 * The port attach callback is invoked by the port driver when a FCA
761 * port comes online and binds with the transport layer. The transport
762 * then callsback into all ULP modules registered with it. The Port attach
763 * call back will also provide the ULP module with the Port's WWN and S_ID
764 */
765 /* ARGSUSED */
766 static int
767 fcip_port_attach(opaque_t ulp_handle, fc_ulp_port_info_t *port_info,
768 fc_attach_cmd_t cmd, uint32_t sid)
769 {
770 int rval = FC_FAILURE;
771 int instance;
772 struct fcip *fptr;
773 fcip_port_info_t *fport = NULL;
774 fcip_port_info_t *cur_fport;
775 fc_portid_t src_id;
776
777 switch (cmd) {
778 case FC_CMD_ATTACH: {
779 la_wwn_t *ww_pn = NULL;
780 /*
781 * It was determined that, as per spec, the lower 48 bits of
782 * the port-WWN will always be unique. This will make the MAC
783 * address (i.e the lower 48 bits of the WWN), that IP/ARP
784 * depend on, unique too. Hence we should be able to remove the
785 * restriction of attaching to only one of the ports of
786 * multi port FCAs.
787 *
788 * Earlier, fcip used to attach only to qlc module and fail
789 * silently for attach failures resulting from unknown FCAs or
790 * unsupported FCA ports. Now, we'll do no such checks.
791 */
792 ww_pn = &port_info->port_pwwn;
793
794 FCIP_TNF_PROBE_2((fcip_port_attach, "fcip io", /* CSTYLED */,
795 tnf_string, msg, "port id bits",
796 tnf_opaque, nport_id, ww_pn->w.nport_id));
797 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_NOTE,
798 "port id bits: 0x%x", ww_pn->w.nport_id));
799 /*
800 * A port has come online
801 */
802 mutex_enter(&fcip_global_mutex);
803 fcip_num_instances++;
804 fcip_num_attaching++;
805
806 if (fcip_port_head == NULL) {
807 /* OK to sleep here ? */
808 fport = kmem_zalloc(sizeof (fcip_port_info_t),
809 KM_NOSLEEP);
810 if (fport == NULL) {
811 fcip_num_instances--;
812 fcip_num_attaching--;
813 ASSERT(fcip_num_attaching >= 0);
814 mutex_exit(&fcip_global_mutex);
815 rval = FC_FAILURE;
816 cmn_err(CE_WARN, "!fcip(%d): port attach "
817 "failed: alloc failed",
818 ddi_get_instance(port_info->port_dip));
819 goto done;
820 }
821 fcip_port_head = fport;
822 } else {
823 /*
824 * traverse the port list and also check for
825 * duplicate port attaches - Nothing wrong in being
826 * paranoid Heh Heh.
827 */
828 cur_fport = fcip_port_head;
829 while (cur_fport != NULL) {
830 if (cur_fport->fcipp_handle ==
831 port_info->port_handle) {
832 fcip_num_instances--;
833 fcip_num_attaching--;
834 ASSERT(fcip_num_attaching >= 0);
835 mutex_exit(&fcip_global_mutex);
836 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_WARN,
837 "!fcip(%d): port already "
838 "attached!!", ddi_get_instance(
839 port_info->port_dip)));
840 rval = FC_FAILURE;
841 goto done;
842 }
843 cur_fport = cur_fport->fcipp_next;
844 }
845 fport = kmem_zalloc(sizeof (fcip_port_info_t),
846 KM_NOSLEEP);
847 if (fport == NULL) {
848 rval = FC_FAILURE;
849 fcip_num_instances--;
850 fcip_num_attaching--;
851 ASSERT(fcip_num_attaching >= 0);
852 mutex_exit(&fcip_global_mutex);
853 cmn_err(CE_WARN, "!fcip(%d): port attach "
854 "failed: alloc failed",
855 ddi_get_instance(port_info->port_dip));
856 goto done;
857 }
858 fport->fcipp_next = fcip_port_head;
859 fcip_port_head = fport;
860 }
861
862 mutex_exit(&fcip_global_mutex);
863
864 /*
865 * now fill in the details about the port itself
866 */
867 fport->fcipp_linkage = *port_info->port_linkage;
868 fport->fcipp_handle = port_info->port_handle;
869 fport->fcipp_dip = port_info->port_dip;
870 fport->fcipp_topology = port_info->port_flags;
871 fport->fcipp_pstate = port_info->port_state;
872 fport->fcipp_naa = port_info->port_pwwn.w.naa_id;
873 bcopy(&port_info->port_pwwn, &fport->fcipp_pwwn,
874 sizeof (la_wwn_t));
875 bcopy(&port_info->port_nwwn, &fport->fcipp_nwwn,
876 sizeof (la_wwn_t));
877 fport->fcipp_fca_pkt_size = port_info->port_fca_pkt_size;
878 fport->fcipp_cmd_dma_attr = *port_info->port_cmd_dma_attr;
879 fport->fcipp_resp_dma_attr = *port_info->port_resp_dma_attr;
880 fport->fcipp_fca_acc_attr = *port_info->port_acc_attr;
881 src_id.port_id = sid;
882 src_id.priv_lilp_posit = 0;
883 fport->fcipp_sid = src_id;
884
885 /*
886 * allocate soft state for this instance
887 */
888 instance = ddi_get_instance(fport->fcipp_dip);
889 if (ddi_soft_state_zalloc(fcip_softp,
890 instance) != DDI_SUCCESS) {
891 rval = FC_FAILURE;
892 cmn_err(CE_WARN, "!fcip(%d): port attach failed: "
893 "soft state alloc failed", instance);
894 goto failure;
895 }
896
897 fptr = ddi_get_soft_state(fcip_softp, instance);
898
899 if (fptr == NULL) {
900 rval = FC_FAILURE;
901 cmn_err(CE_WARN, "!fcip(%d): port attach failed: "
902 "failure to get soft state", instance);
903 goto failure;
904 }
905
906 /*
907 * initialize all mutexes and locks required for this module
908 */
909 mutex_init(&fptr->fcip_mutex, NULL, MUTEX_DRIVER, NULL);
910 mutex_init(&fptr->fcip_ub_mutex, NULL, MUTEX_DRIVER, NULL);
911 mutex_init(&fptr->fcip_rt_mutex, NULL, MUTEX_DRIVER, NULL);
912 mutex_init(&fptr->fcip_dest_mutex, NULL, MUTEX_DRIVER, NULL);
913 mutex_init(&fptr->fcip_sendup_mutex, NULL, MUTEX_DRIVER, NULL);
914 cv_init(&fptr->fcip_farp_cv, NULL, CV_DRIVER, NULL);
915 cv_init(&fptr->fcip_sendup_cv, NULL, CV_DRIVER, NULL);
916 cv_init(&fptr->fcip_ub_cv, NULL, CV_DRIVER, NULL);
917
918 mutex_enter(&fptr->fcip_mutex);
919
920 fptr->fcip_dip = fport->fcipp_dip; /* parent's dip */
921 fptr->fcip_instance = instance;
922 fptr->fcip_ub_upstream = 0;
923
924 if (FC_PORT_STATE_MASK(port_info->port_state) ==
925 FC_STATE_ONLINE) {
926 fptr->fcip_port_state = FCIP_PORT_ONLINE;
927 if (fptr->fcip_flags & FCIP_LINK_DOWN) {
928 fptr->fcip_flags &= ~FCIP_LINK_DOWN;
929 }
930 } else {
931 fptr->fcip_port_state = FCIP_PORT_OFFLINE;
932 }
933
934 fptr->fcip_flags |= FCIP_ATTACHING;
935 fptr->fcip_port_info = fport;
936
937 /*
938 * Extract our MAC addr from our port's WWN. The lower 48
939 * bits will be our MAC address
940 */
941 wwn_to_ether(&fport->fcipp_nwwn, &fptr->fcip_macaddr);
942
943 fport->fcipp_fcip = fptr;
944
945 FCIP_DEBUG(FCIP_DEBUG_ATTACH,
946 (CE_NOTE, "fcipdest : 0x%lx, rtable : 0x%lx",
947 (long)(sizeof (fptr->fcip_dest)),
948 (long)(sizeof (fptr->fcip_rtable))));
949
950 bzero(fptr->fcip_dest, sizeof (fptr->fcip_dest));
951 bzero(fptr->fcip_rtable, sizeof (fptr->fcip_rtable));
952
953 /*
954 * create a taskq to handle sundry jobs for the driver
955 * This way we can have jobs run in parallel
956 */
957 fptr->fcip_tq = taskq_create("fcip_tasks",
958 FCIP_NUM_THREADS, MINCLSYSPRI, FCIP_MIN_TASKS,
959 FCIP_MAX_TASKS, TASKQ_PREPOPULATE);
960
961 mutex_exit(&fptr->fcip_mutex);
962
963 /*
964 * create a separate thread to handle all unsolicited
965 * callback handling. This is because unsolicited_callback
966 * can happen from an interrupt context and the upstream
967 * modules can put new messages right back in the same
968 * thread context. This usually works fine, but sometimes
969 * we may have to block to obtain the dest struct entries
970 * for some remote ports.
971 */
972 mutex_enter(&fptr->fcip_sendup_mutex);
973 if (thread_create(NULL, DEFAULTSTKSZ,
974 (void (*)())fcip_sendup_thr, (caddr_t)fptr, 0, &p0,
975 TS_RUN, minclsyspri) == NULL) {
976 mutex_exit(&fptr->fcip_sendup_mutex);
977 cmn_err(CE_WARN,
978 "!unable to create fcip sendup thread for "
979 " instance: 0x%x", instance);
980 rval = FC_FAILURE;
981 goto done;
982 }
983 fptr->fcip_sendup_thr_initted = 1;
984 fptr->fcip_sendup_head = fptr->fcip_sendup_tail = NULL;
985 mutex_exit(&fptr->fcip_sendup_mutex);
986
987
988 /* Let the attach handler do the rest */
989 if (fcip_port_attach_handler(fptr) != FC_SUCCESS) {
990 /*
991 * We have already cleaned up so return
992 */
993 rval = FC_FAILURE;
994 cmn_err(CE_WARN, "!fcip(%d): port attach failed",
995 instance);
996 goto done;
997 }
998
999 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_CONT,
1000 "!fcip attach for port instance (0x%x) successful",
1001 instance));
1002
1003 rval = FC_SUCCESS;
1004 goto done;
1005 }
1006 case FC_CMD_POWER_UP:
1007 /* FALLTHROUGH */
1008 case FC_CMD_RESUME:
1009 mutex_enter(&fcip_global_mutex);
1010 fport = fcip_port_head;
1011 while (fport != NULL) {
1012 if (fport->fcipp_handle == port_info->port_handle) {
1013 break;
1014 }
1015 fport = fport->fcipp_next;
1016 }
1017 if (fport == NULL) {
1018 rval = FC_SUCCESS;
1019 mutex_exit(&fcip_global_mutex);
1020 goto done;
1021 }
1022 rval = fcip_handle_resume(fport, port_info, cmd);
1023 mutex_exit(&fcip_global_mutex);
1024 goto done;
1025
1026 default:
1027 FCIP_TNF_PROBE_2((fcip_port_attach, "fcip io", /* CSTYLED */,
1028 tnf_string, msg, "unknown command type",
1029 tnf_uint, cmd, cmd));
1030 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_WARN,
1031 "unknown cmd type 0x%x in port_attach", cmd));
1032 rval = FC_FAILURE;
1033 goto done;
1034 }
1035
1036 failure:
1037 if (fport) {
1038 mutex_enter(&fcip_global_mutex);
1039 fcip_num_attaching--;
1040 ASSERT(fcip_num_attaching >= 0);
1041 (void) fcip_softstate_free(fport);
1042 fcip_port_attach_pending = 0;
1043 mutex_exit(&fcip_global_mutex);
1044 }
1045 return (rval);
1046
1047 done:
1048 mutex_enter(&fcip_global_mutex);
1049 fcip_port_attach_pending = 0;
1050 mutex_exit(&fcip_global_mutex);
1051 return (rval);
1052 }
1053
1054 /*
1055 * fcip_port_attach_handler : Completes the port attach operation after
1056 * the ulp_port_attach routine has completed its ground work. The job
1057 * of this function among other things is to obtain and handle topology
1058 * specifics, initialize a port, setup broadcast address entries in
1059 * the fcip tables etc. This routine cleans up behind itself on failures.
1060 * Returns FC_SUCCESS or FC_FAILURE.
1061 */
1062 static int
1063 fcip_port_attach_handler(struct fcip *fptr)
1064 {
1065 fcip_port_info_t *fport = fptr->fcip_port_info;
1066 int rval = FC_FAILURE;
1067
1068 ASSERT(fport != NULL);
1069
1070 mutex_enter(&fcip_global_mutex);
1071
1072 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_NOTE,
1073 "fcip module dip: %p instance: %d",
1074 (void *)fcip_module_dip, ddi_get_instance(fptr->fcip_dip)));
1075
1076 if (fcip_module_dip == NULL) {
1077 clock_t fcip_lbolt;
1078
1079 fcip_lbolt = ddi_get_lbolt();
1080 /*
1081 * we need to use the fcip devinfo for creating
1082 * the clone device node, but the fcip attach
1083 * (from its conf file entry claiming to be a
1084 * child of pseudo) may not have happened yet.
1085 * wait here for 10 seconds and fail port attach
1086 * if the fcip devinfo is not attached yet
1087 */
1088 fcip_lbolt += drv_usectohz(FCIP_INIT_DELAY);
1089
1090 FCIP_DEBUG(FCIP_DEBUG_ATTACH,
1091 (CE_WARN, "cv_timedwait lbolt %lx", fcip_lbolt));
1092
1093 (void) cv_timedwait(&fcip_global_cv, &fcip_global_mutex,
1094 fcip_lbolt);
1095
1096 if (fcip_module_dip == NULL) {
1097 mutex_exit(&fcip_global_mutex);
1098
1099 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_WARN,
1100 "fcip attach did not happen"));
1101 goto port_attach_cleanup;
1102 }
1103 }
1104
1105 if ((!fcip_minor_node_created) &&
1106 fcip_is_supported_fc_topology(fport->fcipp_topology)) {
1107 /*
1108 * Checking for same topologies which are considered valid
1109 * by fcip_handle_topology(). Dont create a minor node if
1110 * nothing is hanging off the FC port.
1111 */
1112 if (ddi_create_minor_node(fcip_module_dip, "fcip", S_IFCHR,
1113 ddi_get_instance(fptr->fcip_dip), DDI_PSEUDO,
1114 CLONE_DEV) == DDI_FAILURE) {
1115 mutex_exit(&fcip_global_mutex);
1116 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_WARN,
1117 "failed to create minor node for fcip(%d)",
1118 ddi_get_instance(fptr->fcip_dip)));
1119 goto port_attach_cleanup;
1120 }
1121 fcip_minor_node_created++;
1122 }
1123 mutex_exit(&fcip_global_mutex);
1124
1125 /*
1126 * initialize port for traffic
1127 */
1128 if (fcip_init_port(fptr) != FC_SUCCESS) {
1129 /* fcip_init_port has already cleaned up its stuff */
1130
1131 mutex_enter(&fcip_global_mutex);
1132
1133 if ((fcip_num_instances == 1) &&
1134 (fcip_minor_node_created == 1)) {
1135 /* Remove minor node iff this is the last instance */
1136 ddi_remove_minor_node(fcip_module_dip, NULL);
1137 }
1138
1139 mutex_exit(&fcip_global_mutex);
1140
1141 goto port_attach_cleanup;
1142 }
1143
1144 mutex_enter(&fptr->fcip_mutex);
1145 fptr->fcip_flags &= ~FCIP_ATTACHING;
1146 fptr->fcip_flags |= FCIP_INITED;
1147 fptr->fcip_timeout_ticks = 0;
1148
1149 /*
1150 * start the timeout threads
1151 */
1152 fptr->fcip_timeout_id = timeout(fcip_timeout, fptr,
1153 drv_usectohz(1000000));
1154
1155 mutex_exit(&fptr->fcip_mutex);
1156 mutex_enter(&fcip_global_mutex);
1157 fcip_num_attaching--;
1158 ASSERT(fcip_num_attaching >= 0);
1159 mutex_exit(&fcip_global_mutex);
1160 rval = FC_SUCCESS;
1161 return (rval);
1162
1163 port_attach_cleanup:
1164 mutex_enter(&fcip_global_mutex);
1165 (void) fcip_softstate_free(fport);
1166 fcip_num_attaching--;
1167 ASSERT(fcip_num_attaching >= 0);
1168 mutex_exit(&fcip_global_mutex);
1169 rval = FC_FAILURE;
1170 return (rval);
1171 }
1172
1173
1174 /*
1175 * Handler for DDI_RESUME operations. Port must be ready to restart IP
1176 * traffic on resume
1177 */
1178 static int
1179 fcip_handle_resume(fcip_port_info_t *fport, fc_ulp_port_info_t *port_info,
1180 fc_attach_cmd_t cmd)
1181 {
1182 int rval = FC_SUCCESS;
1183 struct fcip *fptr = fport->fcipp_fcip;
1184 struct fcipstr *tslp;
1185 int index;
1186
1187
1188 ASSERT(fptr != NULL);
1189
1190 mutex_enter(&fptr->fcip_mutex);
1191
1192 if (cmd == FC_CMD_POWER_UP) {
1193 fptr->fcip_flags &= ~(FCIP_POWER_DOWN);
1194 if (fptr->fcip_flags & FCIP_SUSPENDED) {
1195 mutex_exit(&fptr->fcip_mutex);
1196 return (FC_SUCCESS);
1197 }
1198 } else if (cmd == FC_CMD_RESUME) {
1199 fptr->fcip_flags &= ~(FCIP_SUSPENDED);
1200 } else {
1201 mutex_exit(&fptr->fcip_mutex);
1202 return (FC_FAILURE);
1203 }
1204
1205 /*
1206 * set the current port state and topology
1207 */
1208 fport->fcipp_topology = port_info->port_flags;
1209 fport->fcipp_pstate = port_info->port_state;
1210
1211 rw_enter(&fcipstruplock, RW_READER);
1212 for (tslp = fcipstrup; tslp; tslp = tslp->sl_nextp) {
1213 if (tslp->sl_fcip == fptr) {
1214 break;
1215 }
1216 }
1217 rw_exit(&fcipstruplock);
1218
1219 /*
1220 * No active streams on this port
1221 */
1222 if (tslp == NULL) {
1223 rval = FC_SUCCESS;
1224 goto done;
1225 }
1226
1227 mutex_enter(&fptr->fcip_rt_mutex);
1228 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
1229 struct fcip_routing_table *frp;
1230
1231 frp = fptr->fcip_rtable[index];
1232 while (frp) {
1233 uint32_t did;
1234 /*
1235 * Mark the broadcast RTE available again. It
1236 * was marked SUSPENDED during SUSPEND.
1237 */
1238 did = fcip_get_broadcast_did(fptr);
1239 if (frp->fcipr_d_id.port_id == did) {
1240 frp->fcipr_state = 0;
1241 index = FCIP_RT_HASH_ELEMS;
1242 break;
1243 }
1244 frp = frp->fcipr_next;
1245 }
1246 }
1247 mutex_exit(&fptr->fcip_rt_mutex);
1248
1249 /*
1250 * fcip_handle_topology will update the port entries in the
1251 * routing table.
1252 * fcip_handle_topology also takes care of resetting the
1253 * fcipr_state field in the routing table structure. The entries
1254 * were set to RT_INVALID during suspend.
1255 */
1256 fcip_handle_topology(fptr);
1257
1258 done:
1259 /*
1260 * Restart the timeout thread
1261 */
1262 fptr->fcip_timeout_id = timeout(fcip_timeout, fptr,
1263 drv_usectohz(1000000));
1264 mutex_exit(&fptr->fcip_mutex);
1265 return (rval);
1266 }
1267
1268
1269 /*
1270 * Insert a destination port entry into the routing table for
1271 * this port
1272 */
1273 static void
1274 fcip_rt_update(struct fcip *fptr, fc_portmap_t *devlist, uint32_t listlen)
1275 {
1276 struct fcip_routing_table *frp;
1277 fcip_port_info_t *fport = fptr->fcip_port_info;
1278 int hash_bucket, i;
1279 fc_portmap_t *pmap;
1280 char wwn_buf[20];
1281
1282 FCIP_TNF_PROBE_2((fcip_rt_update, "fcip io", /* CSTYLED */,
1283 tnf_string, msg, "enter",
1284 tnf_int, listlen, listlen));
1285
1286 ASSERT(!mutex_owned(&fptr->fcip_mutex));
1287 mutex_enter(&fptr->fcip_rt_mutex);
1288
1289 for (i = 0; i < listlen; i++) {
1290 pmap = &(devlist[i]);
1291
1292 frp = fcip_lookup_rtable(fptr, &(pmap->map_pwwn),
1293 FCIP_COMPARE_PWWN);
1294 /*
1295 * If an entry for a port in the devlist exists in the
1296 * in the per port routing table, make sure the data
1297 * is current. We need to do this irrespective of the
1298 * underlying port topology.
1299 */
1300 switch (pmap->map_type) {
1301 /* FALLTHROUGH */
1302 case PORT_DEVICE_NOCHANGE:
1303 /* FALLTHROUGH */
1304 case PORT_DEVICE_USER_LOGIN:
1305 /* FALLTHROUGH */
1306 case PORT_DEVICE_CHANGED:
1307 /* FALLTHROUGH */
1308 case PORT_DEVICE_NEW:
1309 if (frp == NULL) {
1310 goto add_new_entry;
1311 } else if (frp) {
1312 goto update_entry;
1313 } else {
1314 continue;
1315 }
1316
1317 case PORT_DEVICE_OLD:
1318 /* FALLTHROUGH */
1319 case PORT_DEVICE_USER_LOGOUT:
1320 /*
1321 * Mark entry for removal from Routing Table if
1322 * one exists. Let the timeout thread actually
1323 * remove the entry after we've given up hopes
1324 * of the port ever showing up.
1325 */
1326 if (frp) {
1327 uint32_t did;
1328
1329 /*
1330 * Mark the routing table as invalid to bail
1331 * the packets early that are in transit
1332 */
1333 did = fptr->fcip_broadcast_did;
1334 if (frp->fcipr_d_id.port_id != did) {
1335 frp->fcipr_pd = NULL;
1336 frp->fcipr_state = FCIP_RT_INVALID;
1337 frp->fcipr_invalid_timeout =
1338 fptr->fcip_timeout_ticks +
1339 FCIP_RTE_TIMEOUT;
1340 }
1341 }
1342 continue;
1343
1344 default:
1345 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_WARN,
1346 "unknown map flags in rt_update"));
1347 continue;
1348 }
1349 add_new_entry:
1350 ASSERT(frp == NULL);
1351 hash_bucket = FCIP_RT_HASH(pmap->map_pwwn.raw_wwn);
1352
1353 ASSERT(hash_bucket < FCIP_RT_HASH_ELEMS);
1354
1355 FCIP_TNF_PROBE_2((fcip_rt_update, "cfip io", /* CSTYLED */,
1356 tnf_string, msg,
1357 "add new entry",
1358 tnf_int, hashbucket, hash_bucket));
1359
1360 frp = (struct fcip_routing_table *)
1361 kmem_zalloc(sizeof (struct fcip_routing_table), KM_SLEEP);
1362 /* insert at beginning of hash bucket */
1363 frp->fcipr_next = fptr->fcip_rtable[hash_bucket];
1364 fptr->fcip_rtable[hash_bucket] = frp;
1365 fc_wwn_to_str(&pmap->map_pwwn, wwn_buf);
1366 FCIP_DEBUG(FCIP_DEBUG_ATTACH, (CE_NOTE,
1367 "added entry for pwwn %s and d_id 0x%x",
1368 wwn_buf, pmap->map_did.port_id));
1369 update_entry:
1370 bcopy((void *)&pmap->map_pwwn,
1371 (void *)&frp->fcipr_pwwn, sizeof (la_wwn_t));
1372 bcopy((void *)&pmap->map_nwwn, (void *)&frp->fcipr_nwwn,
1373 sizeof (la_wwn_t));
1374 frp->fcipr_d_id = pmap->map_did;
1375 frp->fcipr_state = pmap->map_state;
1376 frp->fcipr_pd = pmap->map_pd;
1377
1378 /*
1379 * If there is no pd for a destination port that is not
1380 * a broadcast entry, the port is pretty much unusable - so
1381 * mark the port for removal so we can try adding back the
1382 * entry again.
1383 */
1384 if ((frp->fcipr_pd == NULL) &&
1385 (frp->fcipr_d_id.port_id != fptr->fcip_broadcast_did)) {
1386 frp->fcipr_state = PORT_DEVICE_INVALID;
1387 frp->fcipr_invalid_timeout = fptr->fcip_timeout_ticks +
1388 (FCIP_RTE_TIMEOUT / 2);
1389 }
1390 frp->fcipr_fca_dev =
1391 fc_ulp_get_fca_device(fport->fcipp_handle, pmap->map_did);
1392
1393 /*
1394 * login to the remote port. Don't worry about
1395 * plogi failures for now
1396 */
1397 if (pmap->map_pd != NULL) {
1398 (void) fcip_do_plogi(fptr, frp);
1399 } else if (FC_TOP_EXTERNAL(fport->fcipp_topology)) {
1400 fc_wwn_to_str(&frp->fcipr_pwwn, wwn_buf);
1401 FCIP_DEBUG(FCIP_DEBUG_MISC, (CE_NOTE,
1402 "logging into pwwn %s, d_id 0x%x",
1403 wwn_buf, frp->fcipr_d_id.port_id));
1404 (void) fcip_do_plogi(fptr, frp);
1405 }
1406
1407 FCIP_TNF_BYTE_ARRAY(fcip_rt_update, "fcip io", "detail",
1408 "new wwn in rt", pwwn,
1409 &frp->fcipr_pwwn, sizeof (la_wwn_t));
1410 }
1411 mutex_exit(&fptr->fcip_rt_mutex);
1412 }
1413
1414
1415 /*
1416 * return a matching routing table entry for a given fcip instance
1417 */
1418 struct fcip_routing_table *
1419 fcip_lookup_rtable(struct fcip *fptr, la_wwn_t *wwn, int matchflag)
1420 {
1421 struct fcip_routing_table *frp = NULL;
1422 int hash_bucket;
1423
1424
1425 FCIP_TNF_PROBE_1((fcip_lookup_rtable, "fcip io", /* CSTYLED */,
1426 tnf_string, msg, "enter"));
1427 FCIP_TNF_BYTE_ARRAY(fcip_lookup_rtable, "fcip io", "detail",
1428 "rtable lookup for", wwn,
1429 &wwn->raw_wwn, sizeof (la_wwn_t));
1430 FCIP_TNF_PROBE_2((fcip_lookup_rtable, "fcip io", /* CSTYLED */,
1431 tnf_string, msg, "match by",
1432 tnf_int, matchflag, matchflag));
1433
1434 ASSERT(mutex_owned(&fptr->fcip_rt_mutex));
1435
1436 hash_bucket = FCIP_RT_HASH(wwn->raw_wwn);
1437 frp = fptr->fcip_rtable[hash_bucket];
1438 while (frp != NULL) {
1439
1440 FCIP_TNF_BYTE_ARRAY(fcip_lookup_rtable, "fcip io", "detail",
1441 "rtable entry", nwwn,
1442 &(frp->fcipr_nwwn.raw_wwn), sizeof (la_wwn_t));
1443
1444 if (fcip_wwn_compare(&frp->fcipr_pwwn, wwn, matchflag) == 0) {
1445 break;
1446 }
1447
1448 frp = frp->fcipr_next;
1449 }
1450 FCIP_TNF_PROBE_2((fcip_lookup_rtable, "fcip io", /* CSTYLED */,
1451 tnf_string, msg, "lookup result",
1452 tnf_opaque, frp, frp));
1453 return (frp);
1454 }
1455
1456 /*
1457 * Attach of fcip under pseudo. The actual setup of the interface
1458 * actually happens in fcip_port_attach on a callback from the
1459 * transport. The port_attach callback however can proceed only
1460 * after the devinfo for fcip has been created under pseudo
1461 */
1462 static int
1463 fcip_attach(dev_info_t *dip, ddi_attach_cmd_t cmd)
1464 {
1465 switch ((int)cmd) {
1466
1467 case DDI_ATTACH: {
1468 ASSERT(fcip_module_dip == NULL);
1469 fcip_module_dip = dip;
1470
1471 /*
1472 * this call originates as a result of fcip's conf
1473 * file entry and will result in a fcip instance being
1474 * a child of pseudo. We should ensure here that the port
1475 * driver (fp) has been loaded and initted since we would
1476 * never get a port attach callback without fp being loaded.
1477 * If we are unable to succesfully load and initalize fp -
1478 * just fail this attach.
1479 */
1480 mutex_enter(&fcip_global_mutex);
1481
1482 FCIP_DEBUG(FCIP_DEBUG_ATTACH,
1483 (CE_WARN, "global cv - signaling"));
1484
1485 cv_signal(&fcip_global_cv);
1486
1487 FCIP_DEBUG(FCIP_DEBUG_ATTACH,
1488 (CE_WARN, "global cv - signaled"));
1489 mutex_exit(&fcip_global_mutex);
1490 return (DDI_SUCCESS);
1491 }
1492 case DDI_RESUME:
1493 /*
1494 * Resume appears trickier
1495 */
1496 return (DDI_SUCCESS);
1497 default:
1498 return (DDI_FAILURE);
1499 }
1500 }
1501
1502
1503 /*
1504 * The detach entry point to permit unloading fcip. We make sure
1505 * there are no active streams before we proceed with the detach
1506 */
1507 /* ARGSUSED */
1508 static int
1509 fcip_detach(dev_info_t *dip, ddi_detach_cmd_t cmd)
1510 {
1511 struct fcip *fptr;
1512 fcip_port_info_t *fport;
1513 int detached;
1514
1515 switch (cmd) {
1516 case DDI_DETACH: {
1517 /*
1518 * If we got here, any active streams should have been
1519 * unplumbed but check anyway
1520 */
1521 mutex_enter(&fcip_global_mutex);
1522 if (fcipstrup != NULL) {
1523 mutex_exit(&fcip_global_mutex);
1524 return (DDI_FAILURE);
1525 }
1526
1527 if (fcip_port_head != NULL) {
1528 /*
1529 * Check to see if we have unattached/unbound
1530 * ports. If all the ports are unattached/unbound go
1531 * ahead and unregister with the transport
1532 */
1533 fport = fcip_port_head;
1534 while (fport != NULL) {
1535 fptr = fport->fcipp_fcip;
1536 if (fptr == NULL) {
1537 continue;
1538 }
1539 mutex_enter(&fptr->fcip_mutex);
1540 fptr->fcip_flags |= FCIP_DETACHING;
1541 if (fptr->fcip_ipq ||
1542 fptr->fcip_flags & (FCIP_IN_TIMEOUT |
1543 FCIP_IN_CALLBACK | FCIP_ATTACHING |
1544 FCIP_SUSPENDED | FCIP_POWER_DOWN |
1545 FCIP_REG_INPROGRESS)) {
1546 FCIP_TNF_PROBE_1((fcip_detach,
1547 "fcip io", /* CSTYLED */,
1548 tnf_string, msg,
1549 "fcip instance busy"));
1550
1551 mutex_exit(&fptr->fcip_mutex);
1552 FCIP_DEBUG(FCIP_DEBUG_DETACH, (CE_WARN,
1553 "fcip instance busy"));
1554 break;
1555 }
1556 /*
1557 * Check for any outstanding pkts. If yes
1558 * fail the detach
1559 */
1560 mutex_enter(&fptr->fcip_dest_mutex);
1561 if (fcip_port_get_num_pkts(fptr) > 0) {
1562 mutex_exit(&fptr->fcip_dest_mutex);
1563 mutex_exit(&fptr->fcip_mutex);
1564 FCIP_DEBUG(FCIP_DEBUG_DETACH, (CE_WARN,
1565 "fcip instance busy - pkts "
1566 "pending"));
1567 break;
1568 }
1569 mutex_exit(&fptr->fcip_dest_mutex);
1570
1571 mutex_enter(&fptr->fcip_rt_mutex);
1572 if (fcip_plogi_in_progress(fptr)) {
1573 mutex_exit(&fptr->fcip_rt_mutex);
1574 mutex_exit(&fptr->fcip_mutex);
1575 FCIP_DEBUG(FCIP_DEBUG_DETACH, (CE_WARN,
1576 "fcip instance busy - plogi in "
1577 "progress"));
1578 break;
1579 }
1580 mutex_exit(&fptr->fcip_rt_mutex);
1581
1582 mutex_exit(&fptr->fcip_mutex);
1583 fport = fport->fcipp_next;
1584 }
1585 /*
1586 * if fport is non NULL - we have active ports
1587 */
1588 if (fport != NULL) {
1589 /*
1590 * Remove the DETACHING flags on the ports
1591 */
1592 fport = fcip_port_head;
1593 while (fport != NULL) {
1594 fptr = fport->fcipp_fcip;
1595 mutex_enter(&fptr->fcip_mutex);
1596 fptr->fcip_flags &= ~(FCIP_DETACHING);
1597 mutex_exit(&fptr->fcip_mutex);
1598 fport = fport->fcipp_next;
1599 }
1600 mutex_exit(&fcip_global_mutex);
1601 return (DDI_FAILURE);
1602 }
1603 }
1604
1605 /*
1606 * free up all softstate structures
1607 */
1608 fport = fcip_port_head;
1609 while (fport != NULL) {
1610 detached = 1;
1611
1612 fptr = fport->fcipp_fcip;
1613 if (fptr) {
1614 mutex_enter(&fptr->fcip_mutex);
1615 /*
1616 * Check to see if somebody beat us to the
1617 * punch
1618 */
1619 detached = fptr->fcip_flags & FCIP_DETACHED;
1620 fptr->fcip_flags &= ~(FCIP_DETACHING);
1621 fptr->fcip_flags |= FCIP_DETACHED;
1622 mutex_exit(&fptr->fcip_mutex);
1623 }
1624
1625 if (!detached) {
1626 fport = fcip_softstate_free(fport);
1627 } else {
1628 /*
1629 * If the port was marked as detached
1630 * but it was still in the list, that
1631 * means another thread has marked it
1632 * but we got in while it released the
1633 * fcip_global_mutex in softstate_free.
1634 * Given that, we're still safe to use
1635 * fport->fcipp_next to find out what
1636 * the next port on the list is.
1637 */
1638 fport = fport->fcipp_next;
1639 }
1640
1641 FCIP_DEBUG(FCIP_DEBUG_DETACH,
1642 (CE_NOTE, "detaching port"));
1643
1644 FCIP_TNF_PROBE_1((fcip_detach,
1645 "fcip io", /* CSTYLED */, tnf_string,
1646 msg, "detaching port"));
1647 }
1648
1649 /*
1650 * If we haven't removed all the port structures, we
1651 * aren't yet ready to be detached.
1652 */
1653 if (fcip_port_head != NULL) {
1654 mutex_exit(&fcip_global_mutex);
1655 return (DDI_FAILURE);
1656 }
1657
1658 fcip_num_instances = 0;
1659 mutex_exit(&fcip_global_mutex);
1660 fcip_module_dip = NULL;
1661 return (DDI_SUCCESS);
1662 }
1663 case DDI_SUSPEND:
1664 return (DDI_SUCCESS);
1665 default:
1666 return (DDI_FAILURE);
1667 }
1668 }
1669
1670 /*
1671 * The port_detach callback is called from the transport when a
1672 * FC port is being removed from the transport's control. This routine
1673 * provides fcip with an opportunity to cleanup all activities and
1674 * structures on the port marked for removal.
1675 */
1676 /* ARGSUSED */
1677 static int
1678 fcip_port_detach(opaque_t ulp_handle, fc_ulp_port_info_t *port_info,
1679 fc_detach_cmd_t cmd)
1680 {
1681 int rval = FC_FAILURE;
1682 fcip_port_info_t *fport;
1683 struct fcip *fptr;
1684 struct fcipstr *strp;
1685
1686 switch (cmd) {
1687 case FC_CMD_DETACH: {
1688 mutex_enter(&fcip_global_mutex);
1689
1690 if (fcip_port_head == NULL) {
1691 /*
1692 * we are all done but our fini has not been
1693 * called yet!! Let's hope we have no active
1694 * fcip instances here. - strange secnario but
1695 * no harm in having this return a success.
1696 */
1697 fcip_check_remove_minor_node();
1698
1699 mutex_exit(&fcip_global_mutex);
1700 return (FC_SUCCESS);
1701 } else {
1702 /*
1703 * traverse the port list
1704 */
1705 fport = fcip_port_head;
1706 while (fport != NULL) {
1707 if (fport->fcipp_handle ==
1708 port_info->port_handle) {
1709 fptr = fport->fcipp_fcip;
1710
1711 /*
1712 * Fail the port detach if there is
1713 * still an attached, bound stream on
1714 * this interface.
1715 */
1716
1717 rw_enter(&fcipstruplock, RW_READER);
1718
1719 for (strp = fcipstrup; strp != NULL;
1720 strp = strp->sl_nextp) {
1721 if (strp->sl_fcip == fptr) {
1722 rw_exit(&fcipstruplock);
1723 mutex_exit(
1724 &fcip_global_mutex);
1725 return (FC_FAILURE);
1726 }
1727 }
1728
1729 rw_exit(&fcipstruplock);
1730
1731 /*
1732 * fail port detach if we are in
1733 * the middle of a deferred port attach
1734 * or if the port has outstanding pkts
1735 */
1736 if (fptr != NULL) {
1737 mutex_enter(&fptr->fcip_mutex);
1738 if (fcip_check_port_busy
1739 (fptr) ||
1740 (fptr->fcip_flags &
1741 FCIP_DETACHED)) {
1742 mutex_exit(
1743 &fptr->fcip_mutex);
1744 mutex_exit(
1745 &fcip_global_mutex);
1746 return (FC_FAILURE);
1747 }
1748
1749 fptr->fcip_flags |=
1750 FCIP_DETACHED;
1751 mutex_exit(&fptr->fcip_mutex);
1752 }
1753 (void) fcip_softstate_free(fport);
1754
1755 fcip_check_remove_minor_node();
1756 mutex_exit(&fcip_global_mutex);
1757 return (FC_SUCCESS);
1758 }
1759 fport = fport->fcipp_next;
1760 }
1761 ASSERT(fport == NULL);
1762 }
1763 mutex_exit(&fcip_global_mutex);
1764 break;
1765 }
1766 case FC_CMD_POWER_DOWN:
1767 /* FALLTHROUGH */
1768 case FC_CMD_SUSPEND:
1769 mutex_enter(&fcip_global_mutex);
1770 fport = fcip_port_head;
1771 while (fport != NULL) {
1772 if (fport->fcipp_handle == port_info->port_handle) {
1773 break;
1774 }
1775 fport = fport->fcipp_next;
1776 }
1777 if (fport == NULL) {
1778 mutex_exit(&fcip_global_mutex);
1779 break;
1780 }
1781 rval = fcip_handle_suspend(fport, cmd);
1782 mutex_exit(&fcip_global_mutex);
1783 break;
1784 default:
1785 FCIP_DEBUG(FCIP_DEBUG_DETACH,
1786 (CE_WARN, "unknown port detach command!!"));
1787 break;
1788 }
1789 return (rval);
1790 }
1791
1792
1793 /*
1794 * Returns 0 if the port is not busy, else returns non zero.
1795 */
1796 static int
1797 fcip_check_port_busy(struct fcip *fptr)
1798 {
1799 int rval = 0, num_pkts = 0;
1800
1801 ASSERT(fptr != NULL);
1802 ASSERT(MUTEX_HELD(&fptr->fcip_mutex));
1803
1804 mutex_enter(&fptr->fcip_dest_mutex);
1805
1806 if (fptr->fcip_flags & FCIP_PORT_BUSY ||
1807 ((num_pkts = fcip_port_get_num_pkts(fptr)) > 0) ||
1808 fptr->fcip_num_ipkts_pending) {
1809 rval = 1;
1810 FCIP_DEBUG(FCIP_DEBUG_DETACH,
1811 (CE_NOTE, "!fcip_check_port_busy: port is busy "
1812 "fcip_flags: 0x%x, num_pkts: 0x%x, ipkts_pending: 0x%lx!",
1813 fptr->fcip_flags, num_pkts, fptr->fcip_num_ipkts_pending));
1814 }
1815
1816 mutex_exit(&fptr->fcip_dest_mutex);
1817 return (rval);
1818 }
1819
1820 /*
1821 * Helper routine to remove fcip's minor node
1822 * There is one minor node per system and it should be removed if there are no
1823 * other fcip instances (which has a 1:1 mapping for fp instances) present
1824 */
1825 static void
1826 fcip_check_remove_minor_node(void)
1827 {
1828 ASSERT(MUTEX_HELD(&fcip_global_mutex));
1829
1830 /*
1831 * If there are no more fcip (fp) instances, remove the
1832 * minor node for fcip.
1833 * Reset fcip_minor_node_created to invalidate it.
1834 */
1835 if (fcip_num_instances == 0 && (fcip_module_dip != NULL)) {
1836 ddi_remove_minor_node(fcip_module_dip, NULL);
1837 fcip_minor_node_created = 0;
1838 }
1839 }
1840
1841 /*
1842 * This routine permits the suspend operation during a CPR/System
1843 * power management operation. The routine basically quiesces I/Os
1844 * on all active interfaces
1845 */
1846 static int
1847 fcip_handle_suspend(fcip_port_info_t *fport, fc_detach_cmd_t cmd)
1848 {
1849 struct fcip *fptr = fport->fcipp_fcip;
1850 timeout_id_t tid;
1851 int index;
1852 int tryagain = 0;
1853 int count;
1854 struct fcipstr *tslp;
1855
1856
1857 ASSERT(fptr != NULL);
1858 mutex_enter(&fptr->fcip_mutex);
1859
1860 /*
1861 * Fail if we are in the middle of a callback. Don't use delay during
1862 * suspend since clock intrs are not available so busy wait
1863 */
1864 count = 0;
1865 while (count++ < 15 &&
1866 ((fptr->fcip_flags & FCIP_IN_CALLBACK) ||
1867 (fptr->fcip_flags & FCIP_IN_TIMEOUT))) {
1868 mutex_exit(&fptr->fcip_mutex);
1869 drv_usecwait(1000000);
1870 mutex_enter(&fptr->fcip_mutex);
1871 }
1872
1873 if (fptr->fcip_flags & FCIP_IN_CALLBACK ||
1874 fptr->fcip_flags & FCIP_IN_TIMEOUT) {
1875 mutex_exit(&fptr->fcip_mutex);
1876 return (FC_FAILURE);
1877 }
1878
1879 if (cmd == FC_CMD_POWER_DOWN) {
1880 if (fptr->fcip_flags & FCIP_SUSPENDED) {
1881 fptr->fcip_flags |= FCIP_POWER_DOWN;
1882 mutex_exit(&fptr->fcip_mutex);
1883 goto success;
1884 } else {
1885 fptr->fcip_flags |= FCIP_POWER_DOWN;
1886 }
1887 } else if (cmd == FC_CMD_SUSPEND) {
1888 fptr->fcip_flags |= FCIP_SUSPENDED;
1889 } else {
1890 mutex_exit(&fptr->fcip_mutex);
1891 return (FC_FAILURE);
1892 }
1893
1894 mutex_exit(&fptr->fcip_mutex);
1895 /*
1896 * If no streams are plumbed - its the easiest case - Just
1897 * bail out without having to do much
1898 */
1899
1900 rw_enter(&fcipstruplock, RW_READER);
1901 for (tslp = fcipstrup; tslp; tslp = tslp->sl_nextp) {
1902 if (tslp->sl_fcip == fptr) {
1903 break;
1904 }
1905 }
1906 rw_exit(&fcipstruplock);
1907
1908 /*
1909 * No active streams on this port
1910 */
1911 if (tslp == NULL) {
1912 goto success;
1913 }
1914
1915 /*
1916 * Walk through each Routing table structure and check if
1917 * the destination table has any outstanding commands. If yes
1918 * wait for the commands to drain. Since we go through each
1919 * routing table entry in succession, it may be wise to wait
1920 * only a few seconds for each entry.
1921 */
1922 mutex_enter(&fptr->fcip_rt_mutex);
1923 while (!tryagain) {
1924
1925 tryagain = 0;
1926 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
1927 struct fcip_routing_table *frp;
1928 struct fcip_dest *fdestp;
1929 la_wwn_t *pwwn;
1930 int hash_bucket;
1931
1932 frp = fptr->fcip_rtable[index];
1933 while (frp) {
1934 /*
1935 * Mark the routing table as SUSPENDED. Even
1936 * mark the broadcast entry SUSPENDED to
1937 * prevent any ARP or other broadcasts. We
1938 * can reset the state of the broadcast
1939 * RTE when we resume.
1940 */
1941 frp->fcipr_state = FCIP_RT_SUSPENDED;
1942 pwwn = &frp->fcipr_pwwn;
1943
1944 /*
1945 * Get hold of destination pointer
1946 */
1947 mutex_enter(&fptr->fcip_dest_mutex);
1948
1949 hash_bucket = FCIP_DEST_HASH(pwwn->raw_wwn);
1950 ASSERT(hash_bucket < FCIP_DEST_HASH_ELEMS);
1951
1952 fdestp = fptr->fcip_dest[hash_bucket];
1953 while (fdestp != NULL) {
1954 mutex_enter(&fdestp->fcipd_mutex);
1955 if (fdestp->fcipd_rtable) {
1956 if (fcip_wwn_compare(pwwn,
1957 &fdestp->fcipd_pwwn,
1958 FCIP_COMPARE_PWWN) == 0) {
1959 mutex_exit(
1960 &fdestp->fcipd_mutex);
1961 break;
1962 }
1963 }
1964 mutex_exit(&fdestp->fcipd_mutex);
1965 fdestp = fdestp->fcipd_next;
1966 }
1967
1968 mutex_exit(&fptr->fcip_dest_mutex);
1969 if (fdestp == NULL) {
1970 frp = frp->fcipr_next;
1971 continue;
1972 }
1973
1974 /*
1975 * Wait for fcip_wait_cmds seconds for
1976 * the commands to drain.
1977 */
1978 count = 0;
1979 mutex_enter(&fdestp->fcipd_mutex);
1980 while (fdestp->fcipd_ncmds &&
1981 count < fcip_wait_cmds) {
1982 mutex_exit(&fdestp->fcipd_mutex);
1983 mutex_exit(&fptr->fcip_rt_mutex);
1984 drv_usecwait(1000000);
1985 mutex_enter(&fptr->fcip_rt_mutex);
1986 mutex_enter(&fdestp->fcipd_mutex);
1987 count++;
1988 }
1989 /*
1990 * Check if we were able to drain all cmds
1991 * successfully. Else continue with other
1992 * ports and try during the second pass
1993 */
1994 if (fdestp->fcipd_ncmds) {
1995 tryagain++;
1996 }
1997 mutex_exit(&fdestp->fcipd_mutex);
1998
1999 frp = frp->fcipr_next;
2000 }
2001 }
2002 if (tryagain == 0) {
2003 break;
2004 }
2005 }
2006 mutex_exit(&fptr->fcip_rt_mutex);
2007
2008 if (tryagain) {
2009 mutex_enter(&fptr->fcip_mutex);
2010 fptr->fcip_flags &= ~(FCIP_SUSPENDED | FCIP_POWER_DOWN);
2011 mutex_exit(&fptr->fcip_mutex);
2012 return (FC_FAILURE);
2013 }
2014
2015 success:
2016 mutex_enter(&fptr->fcip_mutex);
2017 tid = fptr->fcip_timeout_id;
2018 fptr->fcip_timeout_id = NULL;
2019 mutex_exit(&fptr->fcip_mutex);
2020
2021 (void) untimeout(tid);
2022
2023 return (FC_SUCCESS);
2024 }
2025
2026 /*
2027 * the getinfo(9E) entry point
2028 */
2029 /* ARGSUSED */
2030 static int
2031 fcip_getinfo(dev_info_t *dip, ddi_info_cmd_t cmd, void *arg, void **result)
2032 {
2033 int rval = DDI_FAILURE;
2034
2035 switch (cmd) {
2036 case DDI_INFO_DEVT2DEVINFO:
2037 *result = fcip_module_dip;
2038 if (*result)
2039 rval = DDI_SUCCESS;
2040 break;
2041
2042 case DDI_INFO_DEVT2INSTANCE:
2043 *result = (void *)0;
2044 rval = DDI_SUCCESS;
2045 break;
2046 default:
2047 break;
2048 }
2049
2050 return (rval);
2051 }
2052
2053 /*
2054 * called from fcip_attach to initialize kstats for the link
2055 */
2056 /* ARGSUSED */
2057 static void
2058 fcip_kstat_init(struct fcip *fptr)
2059 {
2060 int instance;
2061 char buf[16];
2062 struct fcipstat *fcipstatp;
2063
2064 ASSERT(mutex_owned(&fptr->fcip_mutex));
2065
2066 instance = ddi_get_instance(fptr->fcip_dip);
2067 (void) sprintf(buf, "fcip%d", instance);
2068
2069 #ifdef kstat
2070 fptr->fcip_kstatp = kstat_create("fcip", instance, buf, "net",
2071 KSTAT_TYPE_NAMED,
2072 (sizeof (struct fcipstat)/ sizeof (kstat_named_t)),
2073 KSTAT_FLAG_PERSISTENT);
2074 #else
2075 fptr->fcip_kstatp = kstat_create("fcip", instance, buf, "net",
2076 KSTAT_TYPE_NAMED,
2077 (sizeof (struct fcipstat)/ sizeof (kstat_named_t)), 0);
2078 #endif
2079 if (fptr->fcip_kstatp == NULL) {
2080 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_WARN, "kstat created failed"));
2081 return;
2082 }
2083
2084 fcipstatp = (struct fcipstat *)fptr->fcip_kstatp->ks_data;
2085 kstat_named_init(&fcipstatp->fcips_ipackets, "ipackets",
2086 KSTAT_DATA_ULONG);
2087 kstat_named_init(&fcipstatp->fcips_ierrors, "ierrors",
2088 KSTAT_DATA_ULONG);
2089 kstat_named_init(&fcipstatp->fcips_opackets, "opackets",
2090 KSTAT_DATA_ULONG);
2091 kstat_named_init(&fcipstatp->fcips_oerrors, "oerrors",
2092 KSTAT_DATA_ULONG);
2093 kstat_named_init(&fcipstatp->fcips_collisions, "collisions",
2094 KSTAT_DATA_ULONG);
2095 kstat_named_init(&fcipstatp->fcips_nocanput, "nocanput",
2096 KSTAT_DATA_ULONG);
2097 kstat_named_init(&fcipstatp->fcips_allocbfail, "allocbfail",
2098 KSTAT_DATA_ULONG);
2099
2100 kstat_named_init(&fcipstatp->fcips_defer, "defer",
2101 KSTAT_DATA_ULONG);
2102 kstat_named_init(&fcipstatp->fcips_fram, "fram",
2103 KSTAT_DATA_ULONG);
2104 kstat_named_init(&fcipstatp->fcips_crc, "crc",
2105 KSTAT_DATA_ULONG);
2106 kstat_named_init(&fcipstatp->fcips_oflo, "oflo",
2107 KSTAT_DATA_ULONG);
2108 kstat_named_init(&fcipstatp->fcips_uflo, "uflo",
2109 KSTAT_DATA_ULONG);
2110 kstat_named_init(&fcipstatp->fcips_missed, "missed",
2111 KSTAT_DATA_ULONG);
2112 kstat_named_init(&fcipstatp->fcips_tlcol, "tlcol",
2113 KSTAT_DATA_ULONG);
2114 kstat_named_init(&fcipstatp->fcips_trtry, "trtry",
2115 KSTAT_DATA_ULONG);
2116 kstat_named_init(&fcipstatp->fcips_tnocar, "tnocar",
2117 KSTAT_DATA_ULONG);
2118 kstat_named_init(&fcipstatp->fcips_inits, "inits",
2119 KSTAT_DATA_ULONG);
2120 kstat_named_init(&fcipstatp->fcips_notbufs, "notbufs",
2121 KSTAT_DATA_ULONG);
2122 kstat_named_init(&fcipstatp->fcips_norbufs, "norbufs",
2123 KSTAT_DATA_ULONG);
2124 kstat_named_init(&fcipstatp->fcips_allocbfail, "allocbfail",
2125 KSTAT_DATA_ULONG);
2126
2127 /*
2128 * required by kstat for MIB II objects(RFC 1213)
2129 */
2130 kstat_named_init(&fcipstatp->fcips_rcvbytes, "fcips_rcvbytes",
2131 KSTAT_DATA_ULONG); /* # octets received */
2132 /* MIB - ifInOctets */
2133 kstat_named_init(&fcipstatp->fcips_xmtbytes, "fcips_xmtbytes",
2134 KSTAT_DATA_ULONG); /* # octets xmitted */
2135 /* MIB - ifOutOctets */
2136 kstat_named_init(&fcipstatp->fcips_multircv, "fcips_multircv",
2137 KSTAT_DATA_ULONG); /* # multicast packets */
2138 /* delivered to upper layer */
2139 /* MIB - ifInNUcastPkts */
2140 kstat_named_init(&fcipstatp->fcips_multixmt, "fcips_multixmt",
2141 KSTAT_DATA_ULONG); /* # multicast packets */
2142 /* requested to be sent */
2143 /* MIB - ifOutNUcastPkts */
2144 kstat_named_init(&fcipstatp->fcips_brdcstrcv, "fcips_brdcstrcv",
2145 KSTAT_DATA_ULONG); /* # broadcast packets */
2146 /* delivered to upper layer */
2147 /* MIB - ifInNUcastPkts */
2148 kstat_named_init(&fcipstatp->fcips_brdcstxmt, "fcips_brdcstxmt",
2149 KSTAT_DATA_ULONG); /* # broadcast packets */
2150 /* requested to be sent */
2151 /* MIB - ifOutNUcastPkts */
2152 kstat_named_init(&fcipstatp->fcips_norcvbuf, "fcips_norcvbuf",
2153 KSTAT_DATA_ULONG); /* # rcv packets discarded */
2154 /* MIB - ifInDiscards */
2155 kstat_named_init(&fcipstatp->fcips_noxmtbuf, "fcips_noxmtbuf",
2156 KSTAT_DATA_ULONG); /* # xmt packets discarded */
2157
2158 fptr->fcip_kstatp->ks_update = fcip_stat_update;
2159 fptr->fcip_kstatp->ks_private = (void *) fptr;
2160 kstat_install(fptr->fcip_kstatp);
2161 }
2162
2163 /*
2164 * Update the defined kstats for netstat et al to use
2165 */
2166 /* ARGSUSED */
2167 static int
2168 fcip_stat_update(kstat_t *fcip_statp, int val)
2169 {
2170 struct fcipstat *fcipstatp;
2171 struct fcip *fptr;
2172
2173 fptr = (struct fcip *)fcip_statp->ks_private;
2174 fcipstatp = (struct fcipstat *)fcip_statp->ks_data;
2175
2176 if (val == KSTAT_WRITE) {
2177 fptr->fcip_ipackets = fcipstatp->fcips_ipackets.value.ul;
2178 fptr->fcip_ierrors = fcipstatp->fcips_ierrors.value.ul;
2179 fptr->fcip_opackets = fcipstatp->fcips_opackets.value.ul;
2180 fptr->fcip_oerrors = fcipstatp->fcips_oerrors.value.ul;
2181 fptr->fcip_collisions = fcipstatp->fcips_collisions.value.ul;
2182 fptr->fcip_defer = fcipstatp->fcips_defer.value.ul;
2183 fptr->fcip_fram = fcipstatp->fcips_fram.value.ul;
2184 fptr->fcip_crc = fcipstatp->fcips_crc.value.ul;
2185 fptr->fcip_oflo = fcipstatp->fcips_oflo.value.ul;
2186 fptr->fcip_uflo = fcipstatp->fcips_uflo.value.ul;
2187 fptr->fcip_missed = fcipstatp->fcips_missed.value.ul;
2188 fptr->fcip_tlcol = fcipstatp->fcips_tlcol.value.ul;
2189 fptr->fcip_trtry = fcipstatp->fcips_trtry.value.ul;
2190 fptr->fcip_tnocar = fcipstatp->fcips_tnocar.value.ul;
2191 fptr->fcip_inits = fcipstatp->fcips_inits.value.ul;
2192 fptr->fcip_notbufs = fcipstatp->fcips_notbufs.value.ul;
2193 fptr->fcip_norbufs = fcipstatp->fcips_norbufs.value.ul;
2194 fptr->fcip_nocanput = fcipstatp->fcips_nocanput.value.ul;
2195 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2196 fptr->fcip_rcvbytes = fcipstatp->fcips_rcvbytes.value.ul;
2197 fptr->fcip_xmtbytes = fcipstatp->fcips_xmtbytes.value.ul;
2198 fptr->fcip_multircv = fcipstatp->fcips_multircv.value.ul;
2199 fptr->fcip_multixmt = fcipstatp->fcips_multixmt.value.ul;
2200 fptr->fcip_brdcstrcv = fcipstatp->fcips_brdcstrcv.value.ul;
2201 fptr->fcip_norcvbuf = fcipstatp->fcips_norcvbuf.value.ul;
2202 fptr->fcip_noxmtbuf = fcipstatp->fcips_noxmtbuf.value.ul;
2203 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2204 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2205 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2206 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2207 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2208 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2209 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2210 fptr->fcip_allocbfail = fcipstatp->fcips_allocbfail.value.ul;
2211
2212 } else {
2213 fcipstatp->fcips_ipackets.value.ul = fptr->fcip_ipackets;
2214 fcipstatp->fcips_ierrors.value.ul = fptr->fcip_ierrors;
2215 fcipstatp->fcips_opackets.value.ul = fptr->fcip_opackets;
2216 fcipstatp->fcips_oerrors.value.ul = fptr->fcip_oerrors;
2217 fcipstatp->fcips_collisions.value.ul = fptr->fcip_collisions;
2218 fcipstatp->fcips_nocanput.value.ul = fptr->fcip_nocanput;
2219 fcipstatp->fcips_allocbfail.value.ul = fptr->fcip_allocbfail;
2220 fcipstatp->fcips_defer.value.ul = fptr->fcip_defer;
2221 fcipstatp->fcips_fram.value.ul = fptr->fcip_fram;
2222 fcipstatp->fcips_crc.value.ul = fptr->fcip_crc;
2223 fcipstatp->fcips_oflo.value.ul = fptr->fcip_oflo;
2224 fcipstatp->fcips_uflo.value.ul = fptr->fcip_uflo;
2225 fcipstatp->fcips_missed.value.ul = fptr->fcip_missed;
2226 fcipstatp->fcips_tlcol.value.ul = fptr->fcip_tlcol;
2227 fcipstatp->fcips_trtry.value.ul = fptr->fcip_trtry;
2228 fcipstatp->fcips_tnocar.value.ul = fptr->fcip_tnocar;
2229 fcipstatp->fcips_inits.value.ul = fptr->fcip_inits;
2230 fcipstatp->fcips_norbufs.value.ul = fptr->fcip_norbufs;
2231 fcipstatp->fcips_notbufs.value.ul = fptr->fcip_notbufs;
2232 fcipstatp->fcips_rcvbytes.value.ul = fptr->fcip_rcvbytes;
2233 fcipstatp->fcips_xmtbytes.value.ul = fptr->fcip_xmtbytes;
2234 fcipstatp->fcips_multircv.value.ul = fptr->fcip_multircv;
2235 fcipstatp->fcips_multixmt.value.ul = fptr->fcip_multixmt;
2236 fcipstatp->fcips_brdcstrcv.value.ul = fptr->fcip_brdcstrcv;
2237 fcipstatp->fcips_brdcstxmt.value.ul = fptr->fcip_brdcstxmt;
2238 fcipstatp->fcips_norcvbuf.value.ul = fptr->fcip_norcvbuf;
2239 fcipstatp->fcips_noxmtbuf.value.ul = fptr->fcip_noxmtbuf;
2240
2241 }
2242 return (0);
2243 }
2244
2245
2246 /*
2247 * fcip_statec_cb: handles all required state change callback notifications
2248 * it receives from the transport
2249 */
2250 /* ARGSUSED */
2251 static void
2252 fcip_statec_cb(opaque_t ulp_handle, opaque_t phandle,
2253 uint32_t port_state, uint32_t port_top, fc_portmap_t changelist[],
2254 uint32_t listlen, uint32_t sid)
2255 {
2256 fcip_port_info_t *fport;
2257 struct fcip *fptr;
2258 struct fcipstr *slp;
2259 queue_t *wrq;
2260 int instance;
2261 int index;
2262 struct fcip_routing_table *frtp;
2263
2264 fport = fcip_get_port(phandle);
2265
2266 if (fport == NULL) {
2267 return;
2268 }
2269
2270 fptr = fport->fcipp_fcip;
2271 ASSERT(fptr != NULL);
2272
2273 if (fptr == NULL) {
2274 return;
2275 }
2276
2277 instance = ddi_get_instance(fport->fcipp_dip);
2278
2279 FCIP_TNF_PROBE_4((fcip_statec_cb, "fcip io", /* CSTYLED */,
2280 tnf_string, msg, "state change callback",
2281 tnf_uint, instance, instance,
2282 tnf_uint, S_ID, sid,
2283 tnf_int, count, listlen));
2284 FCIP_DEBUG(FCIP_DEBUG_ELS,
2285 (CE_NOTE, "fcip%d, state change callback: state:0x%x, "
2286 "S_ID:0x%x, count:0x%x", instance, port_state, sid, listlen));
2287
2288 mutex_enter(&fptr->fcip_mutex);
2289
2290 if ((fptr->fcip_flags & (FCIP_DETACHING | FCIP_DETACHED)) ||
2291 (fptr->fcip_flags & (FCIP_SUSPENDED | FCIP_POWER_DOWN))) {
2292 mutex_exit(&fptr->fcip_mutex);
2293 return;
2294 }
2295
2296 /*
2297 * set fcip flags to indicate we are in the middle of a
2298 * state change callback so we can wait till the statechange
2299 * is handled before succeeding/failing the SUSPEND/POWER DOWN.
2300 */
2301 fptr->fcip_flags |= FCIP_IN_SC_CB;
2302
2303 fport->fcipp_pstate = port_state;
2304
2305 /*
2306 * Check if topology changed. If Yes - Modify the broadcast
2307 * RTE entries to understand the new broadcast D_IDs
2308 */
2309 if (fport->fcipp_topology != port_top &&
2310 (port_top != FC_TOP_UNKNOWN)) {
2311 /* REMOVE later */
2312 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_NOTE,
2313 "topology changed: Old topology: 0x%x New topology 0x%x",
2314 fport->fcipp_topology, port_top));
2315 /*
2316 * If topology changed - attempt a rediscovery of
2317 * devices. Helps specially in Fabric/Public loops
2318 * and if on_demand_node_creation is disabled
2319 */
2320 fport->fcipp_topology = port_top;
2321 fcip_handle_topology(fptr);
2322 }
2323
2324 mutex_exit(&fptr->fcip_mutex);
2325
2326 switch (FC_PORT_STATE_MASK(port_state)) {
2327 case FC_STATE_ONLINE:
2328 /* FALLTHROUGH */
2329 case FC_STATE_LIP:
2330 /* FALLTHROUGH */
2331 case FC_STATE_LIP_LBIT_SET:
2332
2333 /*
2334 * nothing to do here actually other than if we
2335 * were actually logged onto a port in the devlist
2336 * (which indicates active communication between
2337 * the host port and the port in the changelist).
2338 * If however we are in a private loop or point to
2339 * point mode, we need to check for any IP capable
2340 * ports and update our routing table.
2341 */
2342 switch (port_top) {
2343 case FC_TOP_FABRIC:
2344 /*
2345 * This indicates a fabric port with a NameServer.
2346 * Check the devlist to see if we are in active
2347 * communication with a port on the devlist.
2348 */
2349 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_NOTE,
2350 "Statec_cb: fabric topology"));
2351 fcip_rt_update(fptr, changelist, listlen);
2352 break;
2353 case FC_TOP_NO_NS:
2354 /*
2355 * No nameserver - so treat it like a Private loop
2356 * or point to point topology and get a map of
2357 * devices on the link and get IP capable ports to
2358 * to update the routing table.
2359 */
2360 FCIP_DEBUG(FCIP_DEBUG_ELS,
2361 (CE_NOTE, "Statec_cb: NO_NS topology"));
2362 /* FALLTHROUGH */
2363 case FC_TOP_PRIVATE_LOOP:
2364 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_NOTE,
2365 "Statec_cb: Pvt_Loop topology"));
2366 /* FALLTHROUGH */
2367 case FC_TOP_PT_PT:
2368 /*
2369 * call get_port_map() and update routing table
2370 */
2371 fcip_rt_update(fptr, changelist, listlen);
2372 break;
2373 default:
2374 FCIP_DEBUG(FCIP_DEBUG_ELS,
2375 (CE_NOTE, "Statec_cb: Unknown topology"));
2376 }
2377
2378 /*
2379 * We should now enable the Queues and permit I/Os
2380 * to flow through downstream. The update of routing
2381 * table should have flushed out any port entries that
2382 * don't exist or are not available after the state change
2383 */
2384 mutex_enter(&fptr->fcip_mutex);
2385 fptr->fcip_port_state = FCIP_PORT_ONLINE;
2386 if (fptr->fcip_flags & FCIP_LINK_DOWN) {
2387 fptr->fcip_flags &= ~FCIP_LINK_DOWN;
2388 }
2389 mutex_exit(&fptr->fcip_mutex);
2390
2391 /*
2392 * Enable write queues
2393 */
2394 rw_enter(&fcipstruplock, RW_READER);
2395 for (slp = fcipstrup; slp != NULL; slp = slp->sl_nextp) {
2396 if (slp && slp->sl_fcip == fptr) {
2397 wrq = WR(slp->sl_rq);
2398 if (wrq->q_flag & QFULL) {
2399 qenable(wrq);
2400 }
2401 }
2402 }
2403 rw_exit(&fcipstruplock);
2404 break;
2405 case FC_STATE_OFFLINE:
2406 /*
2407 * mark the port_state OFFLINE and wait for it to
2408 * become online. Any new messages in this state will
2409 * simply be queued back up. If the port does not
2410 * come online in a short while, we can begin failing
2411 * messages and flush the routing table
2412 */
2413 mutex_enter(&fptr->fcip_mutex);
2414 fptr->fcip_mark_offline = fptr->fcip_timeout_ticks +
2415 FCIP_OFFLINE_TIMEOUT;
2416 fptr->fcip_port_state = FCIP_PORT_OFFLINE;
2417 mutex_exit(&fptr->fcip_mutex);
2418
2419 /*
2420 * Mark all Routing table entries as invalid to prevent
2421 * any commands from trickling through to ports that
2422 * have disappeared from under us
2423 */
2424 mutex_enter(&fptr->fcip_rt_mutex);
2425 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
2426 frtp = fptr->fcip_rtable[index];
2427 while (frtp) {
2428 frtp->fcipr_state = PORT_DEVICE_INVALID;
2429 frtp = frtp->fcipr_next;
2430 }
2431 }
2432 mutex_exit(&fptr->fcip_rt_mutex);
2433
2434 break;
2435
2436 case FC_STATE_RESET_REQUESTED:
2437 /*
2438 * Release all Unsolicited buffers back to transport/FCA.
2439 * This also means the port state is marked offline - so
2440 * we may have to do what OFFLINE state requires us to do.
2441 * Care must be taken to wait for any active unsolicited
2442 * buffer with the other Streams modules - so wait for
2443 * a freeb if the unsolicited buffer is passed back all
2444 * the way upstream.
2445 */
2446 mutex_enter(&fptr->fcip_mutex);
2447
2448 #ifdef FCIP_ESBALLOC
2449 while (fptr->fcip_ub_upstream) {
2450 cv_wait(&fptr->fcip_ub_cv, &fptr->fcip_mutex);
2451 }
2452 #endif /* FCIP_ESBALLOC */
2453
2454 fptr->fcip_mark_offline = fptr->fcip_timeout_ticks +
2455 FCIP_OFFLINE_TIMEOUT;
2456 fptr->fcip_port_state = FCIP_PORT_OFFLINE;
2457 mutex_exit(&fptr->fcip_mutex);
2458 break;
2459
2460 case FC_STATE_DEVICE_CHANGE:
2461 if (listlen) {
2462 fcip_rt_update(fptr, changelist, listlen);
2463 }
2464 break;
2465 case FC_STATE_RESET:
2466 /*
2467 * Not much to do I guess - wait for port to become
2468 * ONLINE. If the port doesn't become online in a short
2469 * while, the upper layers abort any request themselves.
2470 * We can just putback the messages in the streams queues
2471 * if the link is offline
2472 */
2473 break;
2474 }
2475 mutex_enter(&fptr->fcip_mutex);
2476 fptr->fcip_flags &= ~(FCIP_IN_SC_CB);
2477 mutex_exit(&fptr->fcip_mutex);
2478 }
2479
2480 /*
2481 * Given a port handle, return the fcip_port_info structure corresponding
2482 * to that port handle. The transport allocates and communicates with
2483 * ULPs using port handles
2484 */
2485 static fcip_port_info_t *
2486 fcip_get_port(opaque_t phandle)
2487 {
2488 fcip_port_info_t *fport;
2489
2490 ASSERT(phandle != NULL);
2491
2492 mutex_enter(&fcip_global_mutex);
2493 fport = fcip_port_head;
2494
2495 while (fport != NULL) {
2496 if (fport->fcipp_handle == phandle) {
2497 /* found */
2498 break;
2499 }
2500 fport = fport->fcipp_next;
2501 }
2502
2503 mutex_exit(&fcip_global_mutex);
2504
2505 return (fport);
2506 }
2507
2508 /*
2509 * Handle inbound ELS requests received by the transport. We are only
2510 * intereseted in FARP/InARP mostly.
2511 */
2512 /* ARGSUSED */
2513 static int
2514 fcip_els_cb(opaque_t ulp_handle, opaque_t phandle,
2515 fc_unsol_buf_t *buf, uint32_t claimed)
2516 {
2517 fcip_port_info_t *fport;
2518 struct fcip *fptr;
2519 int instance;
2520 uchar_t r_ctl;
2521 uchar_t ls_code;
2522 la_els_farp_t farp_cmd;
2523 la_els_farp_t *fcmd;
2524 int rval = FC_UNCLAIMED;
2525
2526 fport = fcip_get_port(phandle);
2527 if (fport == NULL) {
2528 return (FC_UNCLAIMED);
2529 }
2530
2531 fptr = fport->fcipp_fcip;
2532 ASSERT(fptr != NULL);
2533 if (fptr == NULL) {
2534 return (FC_UNCLAIMED);
2535 }
2536
2537 instance = ddi_get_instance(fport->fcipp_dip);
2538
2539 mutex_enter(&fptr->fcip_mutex);
2540 if ((fptr->fcip_flags & (FCIP_DETACHING | FCIP_DETACHED)) ||
2541 (fptr->fcip_flags & (FCIP_SUSPENDED | FCIP_POWER_DOWN))) {
2542 mutex_exit(&fptr->fcip_mutex);
2543 return (FC_UNCLAIMED);
2544 }
2545
2546 /*
2547 * set fcip flags to indicate we are in the middle of a
2548 * ELS callback so we can wait till the statechange
2549 * is handled before succeeding/failing the SUSPEND/POWER DOWN.
2550 */
2551 fptr->fcip_flags |= FCIP_IN_ELS_CB;
2552 mutex_exit(&fptr->fcip_mutex);
2553
2554 FCIP_TNF_PROBE_2((fcip_els_cb, "fcip io", /* CSTYLED */,
2555 tnf_string, msg, "ELS callback",
2556 tnf_uint, instance, instance));
2557
2558 FCIP_DEBUG(FCIP_DEBUG_ELS,
2559 (CE_NOTE, "fcip%d, ELS callback , ", instance));
2560
2561 r_ctl = buf->ub_frame.r_ctl;
2562 switch (r_ctl & R_CTL_ROUTING) {
2563 case R_CTL_EXTENDED_SVC:
2564 if (r_ctl == R_CTL_ELS_REQ) {
2565 ls_code = buf->ub_buffer[0];
2566 if (ls_code == LA_ELS_FARP_REQ) {
2567 /*
2568 * Inbound FARP broadcast request
2569 */
2570 if (buf->ub_bufsize != sizeof (la_els_farp_t)) {
2571 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_WARN,
2572 "Invalid FARP req buffer size "
2573 "expected 0x%lx, got 0x%x",
2574 (long)(sizeof (la_els_farp_t)),
2575 buf->ub_bufsize));
2576 rval = FC_UNCLAIMED;
2577 goto els_cb_done;
2578 }
2579 fcmd = (la_els_farp_t *)buf;
2580 if (fcip_wwn_compare(&fcmd->resp_nwwn,
2581 &fport->fcipp_nwwn,
2582 FCIP_COMPARE_NWWN) != 0) {
2583 rval = FC_UNCLAIMED;
2584 goto els_cb_done;
2585 }
2586 /*
2587 * copy the FARP request and release the
2588 * unsolicited buffer
2589 */
2590 fcmd = &farp_cmd;
2591 bcopy((void *)buf, (void *)fcmd,
2592 sizeof (la_els_farp_t));
2593 (void) fc_ulp_ubrelease(fport->fcipp_handle, 1,
2594 &buf->ub_token);
2595
2596 if (fcip_farp_supported &&
2597 fcip_handle_farp_request(fptr, fcmd) ==
2598 FC_SUCCESS) {
2599 /*
2600 * We successfully sent out a FARP
2601 * reply to the requesting port
2602 */
2603 rval = FC_SUCCESS;
2604 goto els_cb_done;
2605 } else {
2606 rval = FC_UNCLAIMED;
2607 goto els_cb_done;
2608 }
2609 }
2610 } else if (r_ctl == R_CTL_ELS_RSP) {
2611 ls_code = buf->ub_buffer[0];
2612 if (ls_code == LA_ELS_FARP_REPLY) {
2613 /*
2614 * We received a REPLY to our FARP request
2615 */
2616 if (buf->ub_bufsize != sizeof (la_els_farp_t)) {
2617 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_WARN,
2618 "Invalid FARP req buffer size "
2619 "expected 0x%lx, got 0x%x",
2620 (long)(sizeof (la_els_farp_t)),
2621 buf->ub_bufsize));
2622 rval = FC_UNCLAIMED;
2623 goto els_cb_done;
2624 }
2625 fcmd = &farp_cmd;
2626 bcopy((void *)buf, (void *)fcmd,
2627 sizeof (la_els_farp_t));
2628 (void) fc_ulp_ubrelease(fport->fcipp_handle, 1,
2629 &buf->ub_token);
2630 if (fcip_farp_supported &&
2631 fcip_handle_farp_response(fptr, fcmd) ==
2632 FC_SUCCESS) {
2633 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_NOTE,
2634 "Successfully recevied a FARP "
2635 "response"));
2636 mutex_enter(&fptr->fcip_mutex);
2637 fptr->fcip_farp_rsp_flag = 1;
2638 cv_signal(&fptr->fcip_farp_cv);
2639 mutex_exit(&fptr->fcip_mutex);
2640 rval = FC_SUCCESS;
2641 goto els_cb_done;
2642 } else {
2643 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_WARN,
2644 "Unable to handle a FARP response "
2645 "receive"));
2646 rval = FC_UNCLAIMED;
2647 goto els_cb_done;
2648 }
2649 }
2650 }
2651 break;
2652 default:
2653 break;
2654 }
2655 els_cb_done:
2656 mutex_enter(&fptr->fcip_mutex);
2657 fptr->fcip_flags &= ~(FCIP_IN_ELS_CB);
2658 mutex_exit(&fptr->fcip_mutex);
2659 return (rval);
2660 }
2661
2662
2663 /*
2664 * Handle inbound FARP requests
2665 */
2666 static int
2667 fcip_handle_farp_request(struct fcip *fptr, la_els_farp_t *fcmd)
2668 {
2669 fcip_pkt_t *fcip_pkt;
2670 fc_packet_t *fc_pkt;
2671 fcip_port_info_t *fport = fptr->fcip_port_info;
2672 int rval = FC_FAILURE;
2673 opaque_t fca_dev;
2674 fc_portmap_t map;
2675 struct fcip_routing_table *frp;
2676 struct fcip_dest *fdestp;
2677
2678 /*
2679 * Add an entry for the remote port into our routing and destination
2680 * tables.
2681 */
2682 map.map_did = fcmd->req_id;
2683 map.map_hard_addr.hard_addr = fcmd->req_id.port_id;
2684 map.map_state = PORT_DEVICE_VALID;
2685 map.map_type = PORT_DEVICE_NEW;
2686 map.map_flags = 0;
2687 map.map_pd = NULL;
2688 bcopy((void *)&fcmd->req_pwwn, (void *)&map.map_pwwn,
2689 sizeof (la_wwn_t));
2690 bcopy((void *)&fcmd->req_nwwn, (void *)&map.map_nwwn,
2691 sizeof (la_wwn_t));
2692 fcip_rt_update(fptr, &map, 1);
2693 mutex_enter(&fptr->fcip_rt_mutex);
2694 frp = fcip_lookup_rtable(fptr, &fcmd->req_pwwn, FCIP_COMPARE_NWWN);
2695 mutex_exit(&fptr->fcip_rt_mutex);
2696
2697 fdestp = fcip_add_dest(fptr, frp);
2698
2699 fcip_pkt = fcip_ipkt_alloc(fptr, sizeof (la_els_farp_t),
2700 sizeof (la_els_farp_t), NULL, KM_SLEEP);
2701 if (fcip_pkt == NULL) {
2702 rval = FC_FAILURE;
2703 goto farp_done;
2704 }
2705 /*
2706 * Fill in our port's PWWN and NWWN
2707 */
2708 fcmd->resp_pwwn = fport->fcipp_pwwn;
2709 fcmd->resp_nwwn = fport->fcipp_nwwn;
2710
2711 fcip_init_unicast_pkt(fcip_pkt, fport->fcipp_sid,
2712 fcmd->req_id, NULL);
2713
2714 fca_dev =
2715 fc_ulp_get_fca_device(fport->fcipp_handle, fcmd->req_id);
2716 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
2717 fc_pkt->pkt_cmd_fhdr.r_ctl = R_CTL_ELS_RSP;
2718 fc_pkt->pkt_fca_device = fca_dev;
2719 fcip_pkt->fcip_pkt_dest = fdestp;
2720
2721 /*
2722 * Attempt a PLOGI again
2723 */
2724 if (fcmd->resp_flags & FARP_INIT_P_LOGI) {
2725 if (fcip_do_plogi(fptr, frp) != FC_SUCCESS) {
2726 /*
2727 * Login to the remote port failed. There is no
2728 * point continuing with the FARP request further
2729 * so bail out here.
2730 */
2731 frp->fcipr_state = PORT_DEVICE_INVALID;
2732 rval = FC_FAILURE;
2733 goto farp_done;
2734 }
2735 }
2736
2737 FCIP_CP_OUT(fcmd, fc_pkt->pkt_cmd, fc_pkt->pkt_cmd_acc,
2738 sizeof (la_els_farp_t));
2739
2740 rval = fc_ulp_issue_els(fport->fcipp_handle, fc_pkt);
2741 if (rval != FC_SUCCESS) {
2742 FCIP_TNF_PROBE_2((fcip_handle_farp_request, "fcip io",
2743 /* CSTYLED */, tnf_string, msg,
2744 "fcip_transport of farp reply failed",
2745 tnf_uint, rval, rval));
2746 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_WARN,
2747 "fcip_transport of farp reply failed 0x%x", rval));
2748 }
2749
2750 farp_done:
2751 return (rval);
2752 }
2753
2754
2755 /*
2756 * Handle FARP responses to our FARP requests. When we receive a FARP
2757 * reply, we need to add the entry for the Port that replied into our
2758 * routing and destination hash tables. It is possible that the remote
2759 * port did not login into us (FARP responses can be received without
2760 * a PLOGI)
2761 */
2762 static int
2763 fcip_handle_farp_response(struct fcip *fptr, la_els_farp_t *fcmd)
2764 {
2765 int rval = FC_FAILURE;
2766 fc_portmap_t map;
2767 struct fcip_routing_table *frp;
2768 struct fcip_dest *fdestp;
2769
2770 /*
2771 * Add an entry for the remote port into our routing and destination
2772 * tables.
2773 */
2774 map.map_did = fcmd->dest_id;
2775 map.map_hard_addr.hard_addr = fcmd->dest_id.port_id;
2776 map.map_state = PORT_DEVICE_VALID;
2777 map.map_type = PORT_DEVICE_NEW;
2778 map.map_flags = 0;
2779 map.map_pd = NULL;
2780 bcopy((void *)&fcmd->resp_pwwn, (void *)&map.map_pwwn,
2781 sizeof (la_wwn_t));
2782 bcopy((void *)&fcmd->resp_nwwn, (void *)&map.map_nwwn,
2783 sizeof (la_wwn_t));
2784 fcip_rt_update(fptr, &map, 1);
2785 mutex_enter(&fptr->fcip_rt_mutex);
2786 frp = fcip_lookup_rtable(fptr, &fcmd->resp_pwwn, FCIP_COMPARE_NWWN);
2787 mutex_exit(&fptr->fcip_rt_mutex);
2788
2789 fdestp = fcip_add_dest(fptr, frp);
2790
2791 if (fdestp != NULL) {
2792 rval = FC_SUCCESS;
2793 }
2794 return (rval);
2795 }
2796
2797
2798 #define FCIP_HDRS_LENGTH \
2799 sizeof (fcph_network_hdr_t)+sizeof (llc_snap_hdr_t)+sizeof (ipha_t)
2800
2801 /*
2802 * fcip_data_cb is the heart of most IP operations. This routine is called
2803 * by the transport when any unsolicited IP data arrives at a port (which
2804 * is almost all IP data). This routine then strips off the Network header
2805 * from the payload (after authenticating the received payload ofcourse),
2806 * creates a message blk and sends the data upstream. You will see ugly
2807 * #defines because of problems with using esballoc() as opposed to
2808 * allocb to prevent an extra copy of data. We should probably move to
2809 * esballoc entirely when the MTU eventually will be larger than 1500 bytes
2810 * since copies will get more expensive then. At 1500 byte MTUs, there is
2811 * no noticable difference between using allocb and esballoc. The other
2812 * caveat is that the qlc firmware still cannot tell us accurately the
2813 * no. of valid bytes in the unsol buffer it DMA'ed so we have to resort
2814 * to looking into the IP header and hoping that the no. of bytes speficified
2815 * in the header was actually received.
2816 */
2817 /* ARGSUSED */
2818 static int
2819 fcip_data_cb(opaque_t ulp_handle, opaque_t phandle,
2820 fc_unsol_buf_t *buf, uint32_t claimed)
2821 {
2822 fcip_port_info_t *fport;
2823 struct fcip *fptr;
2824 fcph_network_hdr_t *nhdr;
2825 llc_snap_hdr_t *snaphdr;
2826 mblk_t *bp;
2827 uint32_t len;
2828 uint32_t hdrlen;
2829 ushort_t type;
2830 ipha_t *iphdr;
2831 int rval;
2832
2833 #ifdef FCIP_ESBALLOC
2834 frtn_t *free_ubuf;
2835 struct fcip_esballoc_arg *fesb_argp;
2836 #endif /* FCIP_ESBALLOC */
2837
2838 fport = fcip_get_port(phandle);
2839 if (fport == NULL) {
2840 return (FC_UNCLAIMED);
2841 }
2842
2843 fptr = fport->fcipp_fcip;
2844 ASSERT(fptr != NULL);
2845
2846 if (fptr == NULL) {
2847 return (FC_UNCLAIMED);
2848 }
2849
2850 mutex_enter(&fptr->fcip_mutex);
2851 if ((fptr->fcip_flags & (FCIP_DETACHING | FCIP_DETACHED)) ||
2852 (fptr->fcip_flags & (FCIP_SUSPENDED | FCIP_POWER_DOWN))) {
2853 mutex_exit(&fptr->fcip_mutex);
2854 rval = FC_UNCLAIMED;
2855 goto data_cb_done;
2856 }
2857
2858 /*
2859 * set fcip flags to indicate we are in the middle of a
2860 * data callback so we can wait till the statechange
2861 * is handled before succeeding/failing the SUSPEND/POWER DOWN.
2862 */
2863 fptr->fcip_flags |= FCIP_IN_DATA_CB;
2864 mutex_exit(&fptr->fcip_mutex);
2865
2866 FCIP_TNF_PROBE_2((fcip_data_cb, "fcip io", /* CSTYLED */,
2867 tnf_string, msg, "data callback",
2868 tnf_int, instance, ddi_get_instance(fport->fcipp_dip)));
2869 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2870 (CE_NOTE, "fcip%d, data callback",
2871 ddi_get_instance(fport->fcipp_dip)));
2872
2873 /*
2874 * get to the network and snap headers in the payload
2875 */
2876 nhdr = (fcph_network_hdr_t *)buf->ub_buffer;
2877 snaphdr = (llc_snap_hdr_t *)(buf->ub_buffer +
2878 sizeof (fcph_network_hdr_t));
2879
2880 hdrlen = sizeof (fcph_network_hdr_t) + sizeof (llc_snap_hdr_t);
2881
2882 /*
2883 * get the IP header to obtain the no. of bytes we need to read
2884 * off from the unsol buffer. This obviously is because not all
2885 * data fills up the unsol buffer completely and the firmware
2886 * doesn't tell us how many valid bytes are in there as well
2887 */
2888 iphdr = (ipha_t *)(buf->ub_buffer + hdrlen);
2889 snaphdr->pid = BE_16(snaphdr->pid);
2890 type = snaphdr->pid;
2891
2892 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2893 (CE_CONT, "SNAPHDR: dsap %x, ssap %x, ctrl %x\n",
2894 snaphdr->dsap, snaphdr->ssap, snaphdr->ctrl));
2895
2896 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2897 (CE_CONT, "oui[0] 0x%x oui[1] 0x%x oui[2] 0x%x pid 0x%x\n",
2898 snaphdr->oui[0], snaphdr->oui[1], snaphdr->oui[2], snaphdr->pid));
2899
2900 /* Authneticate, Authenticate */
2901 if (type == ETHERTYPE_IP) {
2902 len = hdrlen + BE_16(iphdr->ipha_length);
2903 } else if (type == ETHERTYPE_ARP) {
2904 len = hdrlen + 28;
2905 } else {
2906 len = buf->ub_bufsize;
2907 }
2908
2909 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2910 (CE_CONT, "effective packet length is %d bytes.\n", len));
2911
2912 if (len < hdrlen || len > FCIP_UB_SIZE) {
2913 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2914 (CE_NOTE, "Incorrect buffer size %d bytes", len));
2915 rval = FC_UNCLAIMED;
2916 goto data_cb_done;
2917 }
2918
2919 if (buf->ub_frame.type != FC_TYPE_IS8802_SNAP) {
2920 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM, (CE_NOTE, "Not IP/ARP data"));
2921 rval = FC_UNCLAIMED;
2922 goto data_cb_done;
2923 }
2924
2925 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM, (CE_NOTE, "checking wwn"));
2926
2927 if ((fcip_wwn_compare(&nhdr->net_dest_addr, &fport->fcipp_pwwn,
2928 FCIP_COMPARE_NWWN) != 0) &&
2929 (!IS_BROADCAST_ADDR(&nhdr->net_dest_addr))) {
2930 rval = FC_UNCLAIMED;
2931 goto data_cb_done;
2932 } else if (fcip_cache_on_arp_broadcast &&
2933 IS_BROADCAST_ADDR(&nhdr->net_dest_addr)) {
2934 fcip_cache_arp_broadcast(fptr, buf);
2935 }
2936
2937 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM, (CE_NOTE, "Allocate streams block"));
2938
2939 /*
2940 * Using esballoc instead of allocb should be faster, atleast at
2941 * larger MTUs than 1500 bytes. Someday we'll get there :)
2942 */
2943 #if defined(FCIP_ESBALLOC)
2944 /*
2945 * allocate memory for the frtn function arg. The Function
2946 * (fcip_ubfree) arg is a struct fcip_esballoc_arg type
2947 * which contains pointers to the unsol buffer and the
2948 * opaque port handle for releasing the unsol buffer back to
2949 * the FCA for reuse
2950 */
2951 fesb_argp = (struct fcip_esballoc_arg *)
2952 kmem_zalloc(sizeof (struct fcip_esballoc_arg), KM_NOSLEEP);
2953
2954 if (fesb_argp == NULL) {
2955 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2956 (CE_WARN, "esballoc of mblk failed in data_cb"));
2957 rval = FC_UNCLAIMED;
2958 goto data_cb_done;
2959 }
2960 /*
2961 * Check with KM_NOSLEEP
2962 */
2963 free_ubuf = (frtn_t *)kmem_zalloc(sizeof (frtn_t), KM_NOSLEEP);
2964 if (free_ubuf == NULL) {
2965 kmem_free(fesb_argp, sizeof (struct fcip_esballoc_arg));
2966 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2967 (CE_WARN, "esballoc of mblk failed in data_cb"));
2968 rval = FC_UNCLAIMED;
2969 goto data_cb_done;
2970 }
2971
2972 fesb_argp->frtnp = free_ubuf;
2973 fesb_argp->buf = buf;
2974 fesb_argp->phandle = phandle;
2975 free_ubuf->free_func = fcip_ubfree;
2976 free_ubuf->free_arg = (char *)fesb_argp;
2977 if ((bp = (mblk_t *)esballoc((unsigned char *)buf->ub_buffer,
2978 len, BPRI_MED, free_ubuf)) == NULL) {
2979 kmem_free(fesb_argp, sizeof (struct fcip_esballoc_arg));
2980 kmem_free(free_ubuf, sizeof (frtn_t));
2981 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2982 (CE_WARN, "esballoc of mblk failed in data_cb"));
2983 rval = FC_UNCLAIMED;
2984 goto data_cb_done;
2985 }
2986 #elif !defined(FCIP_ESBALLOC)
2987 /*
2988 * allocate streams mblk and copy the contents of the
2989 * unsolicited buffer into this newly alloc'ed mblk
2990 */
2991 if ((bp = (mblk_t *)fcip_allocb((size_t)len, BPRI_LO)) == NULL) {
2992 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
2993 (CE_WARN, "alloc of mblk failed in data_cb"));
2994 rval = FC_UNCLAIMED;
2995 goto data_cb_done;
2996 }
2997
2998 /*
2999 * Unsolicited buffers handed up to us from the FCA must be
3000 * endian clean so just bcopy the data into our mblk. Else
3001 * we may have to either copy the data byte by byte or
3002 * use the ddi_rep_get* routines to do the copy for us.
3003 */
3004 bcopy(buf->ub_buffer, bp->b_rptr, len);
3005
3006 /*
3007 * for esballoc'ed mblks - free the UB in the frtn function
3008 * along with the memory allocated for the function arg.
3009 * for allocb'ed mblk - release the unsolicited buffer here
3010 */
3011 (void) fc_ulp_ubrelease(phandle, 1, &buf->ub_token);
3012
3013 #endif /* FCIP_ESBALLOC */
3014
3015 bp->b_wptr = bp->b_rptr + len;
3016 fptr->fcip_ipackets++;
3017
3018 if (type == ETHERTYPE_IP) {
3019 mutex_enter(&fptr->fcip_mutex);
3020 fptr->fcip_ub_upstream++;
3021 mutex_exit(&fptr->fcip_mutex);
3022 bp->b_rptr += hdrlen;
3023
3024 /*
3025 * Check if ipq is valid in the sendup thread
3026 */
3027 if (fcip_sendup_alloc_enque(fptr, bp, NULL) != FC_SUCCESS) {
3028 freemsg(bp);
3029 }
3030 } else {
3031 /*
3032 * We won't get ethernet 802.3 packets in FCIP but we may get
3033 * types other than ETHERTYPE_IP, such as ETHERTYPE_ARP. Let
3034 * fcip_sendup() do the matching.
3035 */
3036 mutex_enter(&fptr->fcip_mutex);
3037 fptr->fcip_ub_upstream++;
3038 mutex_exit(&fptr->fcip_mutex);
3039 if (fcip_sendup_alloc_enque(fptr, bp,
3040 fcip_accept) != FC_SUCCESS) {
3041 freemsg(bp);
3042 }
3043 }
3044
3045 rval = FC_SUCCESS;
3046
3047 /*
3048 * Unset fcip_flags to indicate we are out of callback and return
3049 */
3050 data_cb_done:
3051 mutex_enter(&fptr->fcip_mutex);
3052 fptr->fcip_flags &= ~(FCIP_IN_DATA_CB);
3053 mutex_exit(&fptr->fcip_mutex);
3054 return (rval);
3055 }
3056
3057 #if !defined(FCIP_ESBALLOC)
3058 /*
3059 * Allocate a message block for the inbound data to be sent upstream.
3060 */
3061 static void *
3062 fcip_allocb(size_t size, uint_t pri)
3063 {
3064 mblk_t *mp;
3065
3066 if ((mp = allocb(size, pri)) == NULL) {
3067 return (NULL);
3068 }
3069 return (mp);
3070 }
3071
3072 #endif
3073
3074 /*
3075 * This helper routine kmem cache alloc's a sendup element for enquing
3076 * into the sendup list for callbacks upstream from the dedicated sendup
3077 * thread. We enque the msg buf into the sendup list and cv_signal the
3078 * sendup thread to finish the callback for us.
3079 */
3080 static int
3081 fcip_sendup_alloc_enque(struct fcip *fptr, mblk_t *mp, struct fcipstr *(*f)())
3082 {
3083 struct fcip_sendup_elem *msg_elem;
3084 int rval = FC_FAILURE;
3085
3086 FCIP_TNF_PROBE_1((fcip_sendup_alloc_enque, "fcip io", /* CSTYLED */,
3087 tnf_string, msg, "sendup msg enque"));
3088 msg_elem = kmem_cache_alloc(fptr->fcip_sendup_cache, KM_NOSLEEP);
3089 if (msg_elem == NULL) {
3090 /* drop pkt to floor - update stats */
3091 rval = FC_FAILURE;
3092 goto sendup_alloc_done;
3093 }
3094 msg_elem->fcipsu_mp = mp;
3095 msg_elem->fcipsu_func = f;
3096
3097 mutex_enter(&fptr->fcip_sendup_mutex);
3098 if (fptr->fcip_sendup_head == NULL) {
3099 fptr->fcip_sendup_head = fptr->fcip_sendup_tail = msg_elem;
3100 } else {
3101 fptr->fcip_sendup_tail->fcipsu_next = msg_elem;
3102 fptr->fcip_sendup_tail = msg_elem;
3103 }
3104 fptr->fcip_sendup_cnt++;
3105 cv_signal(&fptr->fcip_sendup_cv);
3106 mutex_exit(&fptr->fcip_sendup_mutex);
3107 rval = FC_SUCCESS;
3108
3109 sendup_alloc_done:
3110 return (rval);
3111 }
3112
3113 /*
3114 * One of the ways of performing the WWN to D_ID mapping required for
3115 * IPFC data is to cache the unsolicited ARP broadcast messages received
3116 * and update the routing table to add entry for the destination port
3117 * if we are the intended recipient of the ARP broadcast message. This is
3118 * one of the methods recommended in the rfc to obtain the WWN to D_ID mapping
3119 * but is not typically used unless enabled. The driver prefers to use the
3120 * nameserver/lilp map to obtain this mapping.
3121 */
3122 static void
3123 fcip_cache_arp_broadcast(struct fcip *fptr, fc_unsol_buf_t *buf)
3124 {
3125 fcip_port_info_t *fport;
3126 fcph_network_hdr_t *nhdr;
3127 struct fcip_routing_table *frp;
3128 fc_portmap_t map;
3129
3130 fport = fptr->fcip_port_info;
3131 if (fport == NULL) {
3132 return;
3133 }
3134 ASSERT(fport != NULL);
3135
3136 nhdr = (fcph_network_hdr_t *)buf->ub_buffer;
3137
3138 mutex_enter(&fptr->fcip_rt_mutex);
3139 frp = fcip_lookup_rtable(fptr, &nhdr->net_src_addr, FCIP_COMPARE_NWWN);
3140 mutex_exit(&fptr->fcip_rt_mutex);
3141 if (frp == NULL) {
3142 map.map_did.port_id = buf->ub_frame.s_id;
3143 map.map_hard_addr.hard_addr = buf->ub_frame.s_id;
3144 map.map_state = PORT_DEVICE_VALID;
3145 map.map_type = PORT_DEVICE_NEW;
3146 map.map_flags = 0;
3147 map.map_pd = NULL;
3148 bcopy((void *)&nhdr->net_src_addr, (void *)&map.map_pwwn,
3149 sizeof (la_wwn_t));
3150 bcopy((void *)&nhdr->net_src_addr, (void *)&map.map_nwwn,
3151 sizeof (la_wwn_t));
3152 fcip_rt_update(fptr, &map, 1);
3153 mutex_enter(&fptr->fcip_rt_mutex);
3154 frp = fcip_lookup_rtable(fptr, &nhdr->net_src_addr,
3155 FCIP_COMPARE_NWWN);
3156 mutex_exit(&fptr->fcip_rt_mutex);
3157
3158 (void) fcip_add_dest(fptr, frp);
3159 }
3160
3161 }
3162
3163 /*
3164 * This is a dedicated thread to do callbacks from fcip's data callback
3165 * routines into the modules upstream. The reason for this thread is
3166 * the data callback function can be called from an interrupt context and
3167 * the upstream modules *can* make calls downstream in the same thread
3168 * context. If the call is to a fabric port which is not yet in our
3169 * routing tables, we may have to query the nameserver/fabric for the
3170 * MAC addr to Port_ID mapping which may be blocking calls.
3171 */
3172 static void
3173 fcip_sendup_thr(void *arg)
3174 {
3175 struct fcip *fptr = (struct fcip *)arg;
3176 struct fcip_sendup_elem *msg_elem;
3177 queue_t *ip4q = NULL;
3178
3179 CALLB_CPR_INIT(&fptr->fcip_cpr_info, &fptr->fcip_sendup_mutex,
3180 callb_generic_cpr, "fcip_sendup_thr");
3181
3182 mutex_enter(&fptr->fcip_sendup_mutex);
3183 for (;;) {
3184
3185 while (fptr->fcip_sendup_thr_initted &&
3186 fptr->fcip_sendup_head == NULL) {
3187 CALLB_CPR_SAFE_BEGIN(&fptr->fcip_cpr_info);
3188 cv_wait(&fptr->fcip_sendup_cv,
3189 &fptr->fcip_sendup_mutex);
3190 CALLB_CPR_SAFE_END(&fptr->fcip_cpr_info,
3191 &fptr->fcip_sendup_mutex);
3192 }
3193
3194 if (fptr->fcip_sendup_thr_initted == 0) {
3195 break;
3196 }
3197
3198 FCIP_TNF_PROBE_1((fcip_sendup_thr, "fcip io", /* CSTYLED */,
3199 tnf_string, msg, "fcip sendup thr - new msg"));
3200
3201 msg_elem = fptr->fcip_sendup_head;
3202 fptr->fcip_sendup_head = msg_elem->fcipsu_next;
3203 msg_elem->fcipsu_next = NULL;
3204 mutex_exit(&fptr->fcip_sendup_mutex);
3205
3206 if (msg_elem->fcipsu_func == NULL) {
3207 /*
3208 * Message for ipq. Check to see if the ipq is
3209 * is still valid. Since the thread is asynchronous,
3210 * there could have been a close on the stream
3211 */
3212 mutex_enter(&fptr->fcip_mutex);
3213 if (fptr->fcip_ipq && canputnext(fptr->fcip_ipq)) {
3214 ip4q = fptr->fcip_ipq;
3215 mutex_exit(&fptr->fcip_mutex);
3216 putnext(ip4q, msg_elem->fcipsu_mp);
3217 } else {
3218 mutex_exit(&fptr->fcip_mutex);
3219 freemsg(msg_elem->fcipsu_mp);
3220 }
3221 } else {
3222 fcip_sendup(fptr, msg_elem->fcipsu_mp,
3223 msg_elem->fcipsu_func);
3224 }
3225
3226 #if !defined(FCIP_ESBALLOC)
3227 /*
3228 * for allocb'ed mblk - decrement upstream count here
3229 */
3230 mutex_enter(&fptr->fcip_mutex);
3231 ASSERT(fptr->fcip_ub_upstream > 0);
3232 fptr->fcip_ub_upstream--;
3233 mutex_exit(&fptr->fcip_mutex);
3234 #endif /* FCIP_ESBALLOC */
3235
3236 kmem_cache_free(fptr->fcip_sendup_cache, (void *)msg_elem);
3237 mutex_enter(&fptr->fcip_sendup_mutex);
3238 fptr->fcip_sendup_cnt--;
3239 }
3240
3241
3242 #ifndef __lock_lint
3243 CALLB_CPR_EXIT(&fptr->fcip_cpr_info);
3244 #else
3245 mutex_exit(&fptr->fcip_sendup_mutex);
3246 #endif /* __lock_lint */
3247
3248 /* Wake up fcip detach thread by the end */
3249 cv_signal(&fptr->fcip_sendup_cv);
3250
3251 thread_exit();
3252 }
3253
3254 #ifdef FCIP_ESBALLOC
3255
3256 /*
3257 * called from the stream head when it is done using an unsolicited buffer.
3258 * We release this buffer then to the FCA for reuse.
3259 */
3260 static void
3261 fcip_ubfree(char *arg)
3262 {
3263 struct fcip_esballoc_arg *fesb_argp = (struct fcip_esballoc_arg *)arg;
3264 fc_unsol_buf_t *ubuf;
3265 frtn_t *frtnp;
3266 fcip_port_info_t *fport;
3267 struct fcip *fptr;
3268
3269
3270 fport = fcip_get_port(fesb_argp->phandle);
3271 fptr = fport->fcipp_fcip;
3272
3273 ASSERT(fesb_argp != NULL);
3274 ubuf = fesb_argp->buf;
3275 frtnp = fesb_argp->frtnp;
3276
3277
3278 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM,
3279 (CE_WARN, "freeing ubuf after esballoc in fcip_ubfree"));
3280 (void) fc_ulp_ubrelease(fesb_argp->phandle, 1, &ubuf->ub_token);
3281
3282 mutex_enter(&fptr->fcip_mutex);
3283 ASSERT(fptr->fcip_ub_upstream > 0);
3284 fptr->fcip_ub_upstream--;
3285 cv_signal(&fptr->fcip_ub_cv);
3286 mutex_exit(&fptr->fcip_mutex);
3287
3288 kmem_free(frtnp, sizeof (frtn_t));
3289 kmem_free(fesb_argp, sizeof (struct fcip_esballoc_arg));
3290 }
3291
3292 #endif /* FCIP_ESBALLOC */
3293
3294 /*
3295 * handle data other than that of type ETHERTYPE_IP and send it on its
3296 * way upstream to the right streams module to handle
3297 */
3298 static void
3299 fcip_sendup(struct fcip *fptr, mblk_t *mp, struct fcipstr *(*acceptfunc)())
3300 {
3301 struct fcipstr *slp, *nslp;
3302 la_wwn_t *dhostp;
3303 mblk_t *nmp;
3304 uint32_t isgroupaddr;
3305 int type;
3306 uint32_t hdrlen;
3307 fcph_network_hdr_t *nhdr;
3308 llc_snap_hdr_t *snaphdr;
3309
3310 FCIP_TNF_PROBE_1((fcip_sendup, "fcip io", /* CSTYLED */,
3311 tnf_string, msg, "fcip sendup"));
3312 nhdr = (fcph_network_hdr_t *)mp->b_rptr;
3313 snaphdr =
3314 (llc_snap_hdr_t *)(mp->b_rptr + sizeof (fcph_network_hdr_t));
3315 dhostp = &nhdr->net_dest_addr;
3316 type = snaphdr->pid;
3317 hdrlen = sizeof (fcph_network_hdr_t) + sizeof (llc_snap_hdr_t);
3318
3319 /* No group address with fibre channel */
3320 isgroupaddr = 0;
3321
3322 /*
3323 * While holding a reader lock on the linked list of streams structures,
3324 * attempt to match the address criteria for each stream
3325 * and pass up the raw M_DATA ("fastpath") or a DL_UNITDATA_IND.
3326 */
3327
3328 rw_enter(&fcipstruplock, RW_READER);
3329
3330 if ((slp = (*acceptfunc)(fcipstrup, fptr, type, dhostp)) == NULL) {
3331 rw_exit(&fcipstruplock);
3332 FCIP_TNF_PROBE_1((fcip_sendup, "fcip io", /* CSTYLED */,
3333 tnf_string, msg, "fcip sendup - no slp"));
3334 freemsg(mp);
3335 return;
3336 }
3337
3338 /*
3339 * Loop on matching open streams until (*acceptfunc)() returns NULL.
3340 */
3341 for (; nslp = (*acceptfunc)(slp->sl_nextp, fptr, type, dhostp);
3342 slp = nslp) {
3343 if (canputnext(slp->sl_rq)) {
3344 if (nmp = dupmsg(mp)) {
3345 if ((slp->sl_flags & FCIP_SLFAST) &&
3346 !isgroupaddr) {
3347 nmp->b_rptr += hdrlen;
3348 putnext(slp->sl_rq, nmp);
3349 } else if (slp->sl_flags & FCIP_SLRAW) {
3350 /* No headers when FCIP_SLRAW is set */
3351 putnext(slp->sl_rq, nmp);
3352 } else if ((nmp = fcip_addudind(fptr, nmp,
3353 nhdr, type))) {
3354 putnext(slp->sl_rq, nmp);
3355 }
3356 }
3357 }
3358 }
3359
3360 /*
3361 * Do the last one.
3362 */
3363 if (canputnext(slp->sl_rq)) {
3364 if (slp->sl_flags & FCIP_SLFAST) {
3365 mp->b_rptr += hdrlen;
3366 putnext(slp->sl_rq, mp);
3367 } else if (slp->sl_flags & FCIP_SLRAW) {
3368 putnext(slp->sl_rq, mp);
3369 } else if ((mp = fcip_addudind(fptr, mp, nhdr, type))) {
3370 putnext(slp->sl_rq, mp);
3371 }
3372 } else {
3373 freemsg(mp);
3374 }
3375 FCIP_TNF_PROBE_1((fcip_sendup, "fcip io", /* CSTYLED */,
3376 tnf_string, msg, "fcip sendup done"));
3377
3378 rw_exit(&fcipstruplock);
3379 }
3380
3381 /*
3382 * Match the stream based on type and wwn if necessary.
3383 * Destination wwn dhostp is passed to this routine is reserved
3384 * for future usage. We don't need to use it right now since port
3385 * to fcip instance mapping is unique and wwn is already validated when
3386 * packet comes to fcip.
3387 */
3388 /* ARGSUSED */
3389 static struct fcipstr *
3390 fcip_accept(struct fcipstr *slp, struct fcip *fptr, int type, la_wwn_t *dhostp)
3391 {
3392 t_uscalar_t sap;
3393
3394 FCIP_TNF_PROBE_1((fcip_accept, "fcip io", /* CSTYLED */,
3395 tnf_string, msg, "fcip accept"));
3396
3397 for (; slp; slp = slp->sl_nextp) {
3398 sap = slp->sl_sap;
3399 FCIP_DEBUG(FCIP_DEBUG_UPSTREAM, (CE_CONT,
3400 "fcip_accept: checking next sap = %x, type = %x",
3401 sap, type));
3402
3403 if ((slp->sl_fcip == fptr) && (type == sap)) {
3404 return (slp);
3405 }
3406 }
3407 return (NULL);
3408 }
3409
3410 /*
3411 * Handle DL_UNITDATA_IND messages
3412 */
3413 static mblk_t *
3414 fcip_addudind(struct fcip *fptr, mblk_t *mp, fcph_network_hdr_t *nhdr,
3415 int type)
3416 {
3417 dl_unitdata_ind_t *dludindp;
3418 struct fcipdladdr *dlap;
3419 mblk_t *nmp;
3420 int size;
3421 uint32_t hdrlen;
3422 struct ether_addr src_addr;
3423 struct ether_addr dest_addr;
3424
3425
3426 hdrlen = (sizeof (llc_snap_hdr_t) + sizeof (fcph_network_hdr_t));
3427 mp->b_rptr += hdrlen;
3428
3429 FCIP_TNF_PROBE_1((fcip_addudind, "fcip io", /* CSTYLED */,
3430 tnf_string, msg, "fcip addudind"));
3431
3432 /*
3433 * Allocate an M_PROTO mblk for the DL_UNITDATA_IND.
3434 */
3435 size = sizeof (dl_unitdata_ind_t) + FCIPADDRL + FCIPADDRL;
3436 if ((nmp = allocb(size, BPRI_LO)) == NULL) {
3437 fptr->fcip_allocbfail++;
3438 freemsg(mp);
3439 return (NULL);
3440 }
3441 DB_TYPE(nmp) = M_PROTO;
3442 nmp->b_wptr = nmp->b_datap->db_lim;
3443 nmp->b_rptr = nmp->b_wptr - size;
3444
3445 /*
3446 * Construct a DL_UNITDATA_IND primitive.
3447 */
3448 dludindp = (dl_unitdata_ind_t *)nmp->b_rptr;
3449 dludindp->dl_primitive = DL_UNITDATA_IND;
3450 dludindp->dl_dest_addr_length = FCIPADDRL;
3451 dludindp->dl_dest_addr_offset = sizeof (dl_unitdata_ind_t);
3452 dludindp->dl_src_addr_length = FCIPADDRL;
3453 dludindp->dl_src_addr_offset = sizeof (dl_unitdata_ind_t) + FCIPADDRL;
3454 dludindp->dl_group_address = 0; /* not DL_MULTI */
3455
3456 dlap = (struct fcipdladdr *)(nmp->b_rptr + sizeof (dl_unitdata_ind_t));
3457 wwn_to_ether(&nhdr->net_dest_addr, &dest_addr);
3458 ether_bcopy(&dest_addr, &dlap->dl_phys);
3459 dlap->dl_sap = (uint16_t)type;
3460
3461 dlap = (struct fcipdladdr *)(nmp->b_rptr + sizeof (dl_unitdata_ind_t)
3462 + FCIPADDRL);
3463 wwn_to_ether(&nhdr->net_src_addr, &src_addr);
3464 ether_bcopy(&src_addr, &dlap->dl_phys);
3465 dlap->dl_sap = (uint16_t)type;
3466
3467 /*
3468 * Link the M_PROTO and M_DATA together.
3469 */
3470 nmp->b_cont = mp;
3471 return (nmp);
3472 }
3473
3474
3475 /*
3476 * The open routine. For clone opens, we return the next available minor
3477 * no. for the stream to use
3478 */
3479 /* ARGSUSED */
3480 static int
3481 fcip_open(queue_t *rq, dev_t *devp, int flag, int sflag, cred_t *credp)
3482 {
3483 struct fcipstr *slp;
3484 struct fcipstr **prevslp;
3485 minor_t minor;
3486
3487 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "in fcip_open"));
3488 FCIP_TNF_PROBE_1((fcip_open, "fcip io", /* CSTYLED */,
3489 tnf_string, msg, "enter"));
3490 /*
3491 * We need to ensure that the port driver is loaded before
3492 * we proceed
3493 */
3494 if (ddi_hold_installed_driver(ddi_name_to_major(PORT_DRIVER)) == NULL) {
3495 /* no port driver instances found */
3496 FCIP_DEBUG(FCIP_DEBUG_STARTUP, (CE_WARN,
3497 "!ddi_hold_installed_driver of fp failed\n"));
3498 return (ENXIO);
3499 }
3500 /* serialize opens */
3501 rw_enter(&fcipstruplock, RW_WRITER);
3502
3503 prevslp = &fcipstrup;
3504 if (sflag == CLONEOPEN) {
3505 minor = 0;
3506 for (; (slp = *prevslp) != NULL; prevslp = &slp->sl_nextp) {
3507 if (minor < slp->sl_minor) {
3508 break;
3509 }
3510 minor ++;
3511 }
3512 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE,
3513 "getmajor returns 0x%x", getmajor(*devp)));
3514 *devp = makedevice(getmajor(*devp), minor);
3515 } else {
3516 minor = getminor(*devp);
3517 }
3518
3519 /*
3520 * check if our qp's private area is already initialized. If yes
3521 * the stream is already open - just return
3522 */
3523 if (rq->q_ptr) {
3524 goto done;
3525 }
3526
3527 slp = GETSTRUCT(struct fcipstr, 1);
3528 slp->sl_minor = minor;
3529 slp->sl_rq = rq;
3530 slp->sl_sap = 0;
3531 slp->sl_flags = 0;
3532 slp->sl_state = DL_UNATTACHED;
3533 slp->sl_fcip = NULL;
3534
3535 mutex_init(&slp->sl_lock, NULL, MUTEX_DRIVER, NULL);
3536
3537 /*
3538 * link this new stream entry into list of active streams
3539 */
3540 slp->sl_nextp = *prevslp;
3541 *prevslp = slp;
3542
3543 rq->q_ptr = WR(rq)->q_ptr = (char *)slp;
3544
3545 /*
3546 * Disable automatic enabling of our write service procedures
3547 * we need to control this explicitly. This will prevent
3548 * anyone scheduling of our write service procedures.
3549 */
3550 noenable(WR(rq));
3551
3552 done:
3553 rw_exit(&fcipstruplock);
3554 /*
3555 * enable our put and service routines on the read side
3556 */
3557 qprocson(rq);
3558
3559 /*
3560 * There is only one instance of fcip (instance = 0)
3561 * for multiple instances of hardware
3562 */
3563 (void) qassociate(rq, 0); /* don't allow drcompat to be pushed */
3564 return (0);
3565 }
3566
3567 /*
3568 * close an opened stream. The minor no. will then be available for
3569 * future opens.
3570 */
3571 /* ARGSUSED */
3572 static int
3573 fcip_close(queue_t *rq, int flag, int otyp, cred_t *credp)
3574 {
3575 struct fcipstr *slp;
3576 struct fcipstr **prevslp;
3577
3578 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "in fcip_close"));
3579 FCIP_TNF_PROBE_1((fcip_close, "fcip io", /* CSTYLED */,
3580 tnf_string, msg, "enter"));
3581 ASSERT(rq);
3582 /* we should also have the active stream pointer in q_ptr */
3583 ASSERT(rq->q_ptr);
3584
3585 ddi_rele_driver(ddi_name_to_major(PORT_DRIVER));
3586 /*
3587 * disable our put and service procedures. We had enabled them
3588 * on open
3589 */
3590 qprocsoff(rq);
3591 slp = (struct fcipstr *)rq->q_ptr;
3592
3593 /*
3594 * Implicitly detach stream a stream from an interface.
3595 */
3596 if (slp->sl_fcip) {
3597 fcip_dodetach(slp);
3598 }
3599
3600 (void) qassociate(rq, -1); /* undo association in open */
3601
3602 rw_enter(&fcipstruplock, RW_WRITER);
3603
3604 /*
3605 * unlink this stream from the active stream list and free it
3606 */
3607 for (prevslp = &fcipstrup; (slp = *prevslp) != NULL;
3608 prevslp = &slp->sl_nextp) {
3609 if (slp == (struct fcipstr *)rq->q_ptr) {
3610 break;
3611 }
3612 }
3613
3614 /* we should have found slp */
3615 ASSERT(slp);
3616
3617 *prevslp = slp->sl_nextp;
3618 mutex_destroy(&slp->sl_lock);
3619 kmem_free(slp, sizeof (struct fcipstr));
3620 rq->q_ptr = WR(rq)->q_ptr = NULL;
3621
3622 rw_exit(&fcipstruplock);
3623 return (0);
3624 }
3625
3626 /*
3627 * This is not an extension of the DDI_DETACH request. This routine
3628 * only detaches a stream from an interface
3629 */
3630 static void
3631 fcip_dodetach(struct fcipstr *slp)
3632 {
3633 struct fcipstr *tslp;
3634 struct fcip *fptr;
3635
3636 FCIP_DEBUG(FCIP_DEBUG_DETACH, (CE_NOTE, "in fcip_dodetach"));
3637 FCIP_TNF_PROBE_1((fcip_dodetach, "fcip io", /* CSTYLED */,
3638 tnf_string, msg, "enter"));
3639 ASSERT(slp->sl_fcip != NULL);
3640
3641 fptr = slp->sl_fcip;
3642 slp->sl_fcip = NULL;
3643
3644 /*
3645 * we don't support promiscuous mode currently but check
3646 * for and disable any promiscuous mode operation
3647 */
3648 if (slp->sl_flags & SLALLPHYS) {
3649 slp->sl_flags &= ~SLALLPHYS;
3650 }
3651
3652 /*
3653 * disable ALLMULTI mode if all mulitcast addr are ON
3654 */
3655 if (slp->sl_flags & SLALLMULTI) {
3656 slp->sl_flags &= ~SLALLMULTI;
3657 }
3658
3659 /*
3660 * we are most likely going to perform multicast by
3661 * broadcasting to the well known addr (D_ID) 0xFFFFFF or
3662 * ALPA 0x00 in case of public loops
3663 */
3664
3665
3666 /*
3667 * detach unit from device structure.
3668 */
3669 for (tslp = fcipstrup; tslp != NULL; tslp = tslp->sl_nextp) {
3670 if (tslp->sl_fcip == fptr) {
3671 break;
3672 }
3673 }
3674 if (tslp == NULL) {
3675 FCIP_DEBUG(FCIP_DEBUG_DETACH, (CE_WARN,
3676 "fcip_dodeatch - active stream struct not found"));
3677
3678 /* unregister with Fabric nameserver?? */
3679 }
3680 slp->sl_state = DL_UNATTACHED;
3681
3682 fcip_setipq(fptr);
3683 }
3684
3685
3686 /*
3687 * Set or clear device ipq pointer.
3688 * Walk thru all the streams on this device, if a ETHERTYPE_IP
3689 * stream is found, assign device ipq to its sl_rq.
3690 */
3691 static void
3692 fcip_setipq(struct fcip *fptr)
3693 {
3694 struct fcipstr *slp;
3695 int ok = 1;
3696 queue_t *ipq = NULL;
3697
3698 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_NOTE, "entered fcip_setipq"));
3699
3700 rw_enter(&fcipstruplock, RW_READER);
3701
3702 for (slp = fcipstrup; slp != NULL; slp = slp->sl_nextp) {
3703 if (slp->sl_fcip == fptr) {
3704 if (slp->sl_flags & (SLALLPHYS|SLALLSAP)) {
3705 ok = 0;
3706 }
3707 if (slp->sl_sap == ETHERTYPE_IP) {
3708 if (ipq == NULL) {
3709 ipq = slp->sl_rq;
3710 } else {
3711 ok = 0;
3712 }
3713 }
3714 }
3715 }
3716
3717 rw_exit(&fcipstruplock);
3718
3719 if (fcip_check_port_exists(fptr)) {
3720 /* fptr passed to us is stale */
3721 return;
3722 }
3723
3724 mutex_enter(&fptr->fcip_mutex);
3725 if (ok) {
3726 fptr->fcip_ipq = ipq;
3727 } else {
3728 fptr->fcip_ipq = NULL;
3729 }
3730 mutex_exit(&fptr->fcip_mutex);
3731 }
3732
3733
3734 /* ARGSUSED */
3735 static void
3736 fcip_ioctl(queue_t *wq, mblk_t *mp)
3737 {
3738 struct iocblk *iocp = (struct iocblk *)mp->b_rptr;
3739 struct fcipstr *slp = (struct fcipstr *)wq->q_ptr;
3740
3741 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
3742 (CE_NOTE, "in fcip ioctl : %d", iocp->ioc_cmd));
3743 FCIP_TNF_PROBE_1((fcip_ioctl, "fcip io", /* CSTYLED */,
3744 tnf_string, msg, "enter"));
3745
3746 switch (iocp->ioc_cmd) {
3747 case DLIOCRAW:
3748 slp->sl_flags |= FCIP_SLRAW;
3749 miocack(wq, mp, 0, 0);
3750 break;
3751
3752 case DL_IOC_HDR_INFO:
3753 fcip_dl_ioc_hdr_info(wq, mp);
3754 break;
3755
3756 default:
3757 miocnak(wq, mp, 0, EINVAL);
3758 break;
3759 }
3760 }
3761
3762 /*
3763 * The streams 'Put' routine.
3764 */
3765 /* ARGSUSED */
3766 static int
3767 fcip_wput(queue_t *wq, mblk_t *mp)
3768 {
3769 struct fcipstr *slp = (struct fcipstr *)wq->q_ptr;
3770 struct fcip *fptr;
3771 struct fcip_dest *fdestp;
3772 fcph_network_hdr_t *headerp;
3773
3774 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
3775 (CE_NOTE, "in fcip_wput :: type:%x", DB_TYPE(mp)));
3776
3777 switch (DB_TYPE(mp)) {
3778 case M_DATA: {
3779
3780 fptr = slp->sl_fcip;
3781
3782 if (((slp->sl_flags & (FCIP_SLFAST|FCIP_SLRAW)) == 0) ||
3783 (slp->sl_state != DL_IDLE) ||
3784 (fptr == NULL)) {
3785 /*
3786 * set error in the message block and send a reply
3787 * back upstream. Sun's merror routine does this
3788 * for us more cleanly.
3789 */
3790 merror(wq, mp, EPROTO);
3791 break;
3792 }
3793
3794 /*
3795 * if any messages are already enqueued or if the interface
3796 * is in promiscuous mode, causing the packets to loop back
3797 * up, then enqueue the message. Otherwise just transmit
3798 * the message. putq() puts the message on fcip's
3799 * write queue and qenable() puts the queue (wq) on
3800 * the list of queues to be called by the streams scheduler.
3801 */
3802 if (wq->q_first) {
3803 (void) putq(wq, mp);
3804 fptr->fcip_wantw = 1;
3805 qenable(wq);
3806 } else if (fptr->fcip_flags & FCIP_PROMISC) {
3807 /*
3808 * Promiscous mode not supported but add this code in
3809 * case it will be supported in future.
3810 */
3811 (void) putq(wq, mp);
3812 qenable(wq);
3813 } else {
3814
3815 headerp = (fcph_network_hdr_t *)mp->b_rptr;
3816 fdestp = fcip_get_dest(fptr, &headerp->net_dest_addr);
3817
3818 if (fdestp == NULL) {
3819 merror(wq, mp, EPROTO);
3820 break;
3821 }
3822
3823 ASSERT(fdestp != NULL);
3824
3825 (void) fcip_start(wq, mp, fptr, fdestp, KM_SLEEP);
3826 }
3827 break;
3828 }
3829 case M_PROTO:
3830 case M_PCPROTO:
3831 /*
3832 * to prevent recursive calls into fcip_proto
3833 * (PROTO and PCPROTO messages are handled by fcip_proto)
3834 * let the service procedure handle these messages by
3835 * calling putq here.
3836 */
3837 (void) putq(wq, mp);
3838 qenable(wq);
3839 break;
3840
3841 case M_IOCTL:
3842 fcip_ioctl(wq, mp);
3843 break;
3844
3845 case M_FLUSH:
3846 if (*mp->b_rptr & FLUSHW) {
3847 flushq(wq, FLUSHALL);
3848 *mp->b_rptr &= ~FLUSHW;
3849 }
3850 /*
3851 * we have both FLUSHW and FLUSHR set with FLUSHRW
3852 */
3853 if (*mp->b_rptr & FLUSHR) {
3854 /*
3855 * send msg back upstream. qreply() takes care
3856 * of using the RD(wq) queue on its reply
3857 */
3858 qreply(wq, mp);
3859 } else {
3860 freemsg(mp);
3861 }
3862 break;
3863
3864 default:
3865 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
3866 (CE_NOTE, "default msg type: %x", DB_TYPE(mp)));
3867 freemsg(mp);
3868 break;
3869 }
3870 return (0);
3871 }
3872
3873
3874 /*
3875 * Handle M_PROTO and M_PCPROTO messages
3876 */
3877 /* ARGSUSED */
3878 static void
3879 fcip_proto(queue_t *wq, mblk_t *mp)
3880 {
3881 union DL_primitives *dlp;
3882 struct fcipstr *slp;
3883 t_uscalar_t prim;
3884
3885 slp = (struct fcipstr *)wq->q_ptr;
3886 dlp = (union DL_primitives *)mp->b_rptr;
3887 prim = dlp->dl_primitive; /* the DLPI command */
3888
3889 FCIP_TNF_PROBE_5((fcip_proto, "fcip io", /* CSTYLED */,
3890 tnf_string, msg, "enter",
3891 tnf_opaque, wq, wq,
3892 tnf_opaque, mp, mp,
3893 tnf_opaque, MP_DB_TYPE, DB_TYPE(mp),
3894 tnf_opaque, dl_primitive, dlp->dl_primitive));
3895
3896 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_NOTE, "dl_primitve : %x", prim));
3897
3898 mutex_enter(&slp->sl_lock);
3899
3900 switch (prim) {
3901 case DL_UNITDATA_REQ:
3902 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3903 tnf_string, msg, "unit data request"));
3904 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "unit data request"));
3905 fcip_udreq(wq, mp);
3906 break;
3907
3908 case DL_ATTACH_REQ:
3909 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3910 tnf_string, msg, "Attach request"));
3911 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "Attach request"));
3912 fcip_areq(wq, mp);
3913 break;
3914
3915 case DL_DETACH_REQ:
3916 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3917 tnf_string, msg, "Detach request"));
3918 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "Detach request"));
3919 fcip_dreq(wq, mp);
3920 break;
3921
3922 case DL_BIND_REQ:
3923 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "Bind request"));
3924 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3925 tnf_string, msg, "Bind request"));
3926 fcip_breq(wq, mp);
3927 break;
3928
3929 case DL_UNBIND_REQ:
3930 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3931 tnf_string, msg, "unbind request"));
3932 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "unbind request"));
3933 fcip_ubreq(wq, mp);
3934 break;
3935
3936 case DL_INFO_REQ:
3937 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3938 tnf_string, msg, "Info request"));
3939 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "Info request"));
3940 fcip_ireq(wq, mp);
3941 break;
3942
3943 case DL_SET_PHYS_ADDR_REQ:
3944 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3945 tnf_string, msg, "set phy addr request"));
3946 FCIP_DEBUG(FCIP_DEBUG_DLPI,
3947 (CE_NOTE, "set phy addr request"));
3948 fcip_spareq(wq, mp);
3949 break;
3950
3951 case DL_PHYS_ADDR_REQ:
3952 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3953 tnf_string, msg, "phy addr request"));
3954 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "phy addr request"));
3955 fcip_pareq(wq, mp);
3956 break;
3957
3958 case DL_ENABMULTI_REQ:
3959 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3960 tnf_string, msg, "Enable Multicast request"));
3961 FCIP_DEBUG(FCIP_DEBUG_DLPI,
3962 (CE_NOTE, "Enable Multicast request"));
3963 dlerrorack(wq, mp, prim, DL_UNSUPPORTED, 0);
3964 break;
3965
3966 case DL_DISABMULTI_REQ:
3967 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3968 tnf_string, msg, "Disable Multicast request"));
3969 FCIP_DEBUG(FCIP_DEBUG_DLPI,
3970 (CE_NOTE, "Disable Multicast request"));
3971 dlerrorack(wq, mp, prim, DL_UNSUPPORTED, 0);
3972 break;
3973
3974 case DL_PROMISCON_REQ:
3975 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3976 tnf_string, msg, "Promiscuous mode ON request"));
3977 FCIP_DEBUG(FCIP_DEBUG_DLPI,
3978 (CE_NOTE, "Promiscuous mode ON request"));
3979 dlerrorack(wq, mp, prim, DL_UNSUPPORTED, 0);
3980 break;
3981
3982 case DL_PROMISCOFF_REQ:
3983 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3984 tnf_string, msg, "Promiscuous mode OFF request"));
3985 FCIP_DEBUG(FCIP_DEBUG_DLPI,
3986 (CE_NOTE, "Promiscuous mode OFF request"));
3987 dlerrorack(wq, mp, prim, DL_UNSUPPORTED, 0);
3988 break;
3989
3990 default:
3991 FCIP_TNF_PROBE_1((fcip_proto, "fcip io", /* CSTYLED */,
3992 tnf_string, msg, "Unsupported request"));
3993 dlerrorack(wq, mp, prim, DL_UNSUPPORTED, 0);
3994 break;
3995 }
3996 mutex_exit(&slp->sl_lock);
3997 }
3998
3999 /*
4000 * Always enqueue M_PROTO and M_PCPROTO messages pn the wq and M_DATA
4001 * messages sometimes. Processing of M_PROTO and M_PCPROTO messages
4002 * require us to hold fcip's internal locks across (upstream) putnext
4003 * calls. Specifically fcip_intr could hold fcip_intrlock and fcipstruplock
4004 * when it calls putnext(). That thread could loop back around to call
4005 * fcip_wput and eventually fcip_init() to cause a recursive mutex panic
4006 *
4007 * M_DATA messages are enqueued only if we are out of xmit resources. Once
4008 * the transmit resources are available the service procedure is enabled
4009 * and an attempt is made to xmit all messages on the wq.
4010 */
4011 /* ARGSUSED */
4012 static int
4013 fcip_wsrv(queue_t *wq)
4014 {
4015 mblk_t *mp;
4016 struct fcipstr *slp;
4017 struct fcip *fptr;
4018 struct fcip_dest *fdestp;
4019 fcph_network_hdr_t *headerp;
4020
4021 slp = (struct fcipstr *)wq->q_ptr;
4022 fptr = slp->sl_fcip;
4023
4024 FCIP_TNF_PROBE_2((fcip_wsrv, "fcip io", /* CSTYLED */,
4025 tnf_string, msg, "enter",
4026 tnf_opaque, wq, wq));
4027 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "fcip wsrv"));
4028
4029 while (mp = getq(wq)) {
4030 switch (DB_TYPE(mp)) {
4031 case M_DATA:
4032 if (fptr && mp) {
4033 headerp = (fcph_network_hdr_t *)mp->b_rptr;
4034 fdestp = fcip_get_dest(fptr,
4035 &headerp->net_dest_addr);
4036 if (fdestp == NULL) {
4037 freemsg(mp);
4038 goto done;
4039 }
4040 if (fcip_start(wq, mp, fptr, fdestp,
4041 KM_SLEEP)) {
4042 goto done;
4043 }
4044 } else {
4045 freemsg(mp);
4046 }
4047 break;
4048
4049 case M_PROTO:
4050 case M_PCPROTO:
4051 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
4052 (CE_NOTE, "PROT msg in wsrv"));
4053 fcip_proto(wq, mp);
4054 break;
4055 default:
4056 break;
4057 }
4058 }
4059 done:
4060 return (0);
4061 }
4062
4063
4064 /*
4065 * This routine is called from fcip_wsrv to send a message downstream
4066 * on the fibre towards its destination. This routine performs the
4067 * actual WWN to D_ID mapping by looking up the routing and destination
4068 * tables.
4069 */
4070 /* ARGSUSED */
4071 static int
4072 fcip_start(queue_t *wq, mblk_t *mp, struct fcip *fptr,
4073 struct fcip_dest *fdestp, int flags)
4074 {
4075 int rval;
4076 int free;
4077 fcip_pkt_t *fcip_pkt;
4078 fc_packet_t *fc_pkt;
4079 fcip_port_info_t *fport = fptr->fcip_port_info;
4080 size_t datalen;
4081
4082 FCIP_TNF_PROBE_4((fcip_start, "fcip io", /* CSTYLED */,
4083 tnf_string, msg, "enter", tnf_opaque, wq, wq,
4084 tnf_opaque, mp, mp,
4085 tnf_opaque, MP_DB_TYPE, DB_TYPE(mp)));
4086 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "in fcipstart"));
4087
4088 ASSERT(fdestp != NULL);
4089
4090 /*
4091 * Only return if port has gone offline and not come back online
4092 * in a while
4093 */
4094 if (fptr->fcip_flags & FCIP_LINK_DOWN) {
4095 freemsg(mp);
4096 return (0);
4097 }
4098
4099 /*
4100 * The message block coming in here already has the network and
4101 * llc_snap hdr stuffed in
4102 */
4103 /*
4104 * Traditionally ethernet drivers at sun handle 3 cases here -
4105 * 1. messages with one mblk
4106 * 2. messages with 2 mblks
4107 * 3. messages with >2 mblks
4108 * For now lets handle all the 3 cases in a single case where we
4109 * put them together in one mblk that has all the data
4110 */
4111
4112 if (mp->b_cont != NULL) {
4113 if (!pullupmsg(mp, -1)) {
4114 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
4115 (CE_WARN, "failed to concat message"));
4116 freemsg(mp);
4117 return (1);
4118 }
4119 }
4120
4121 datalen = msgsize(mp);
4122
4123 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE,
4124 "msgsize with nhdr & llcsnap hdr in fcip_pkt_alloc 0x%lx",
4125 datalen));
4126
4127 /*
4128 * We cannot have requests larger than FCIPMTU+Headers
4129 */
4130 if (datalen > (FCIPMTU + sizeof (llc_snap_hdr_t) +
4131 sizeof (fcph_network_hdr_t))) {
4132 freemsg(mp);
4133 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE,
4134 "fcip_pkt_alloc: datalen is larger than "
4135 "max possible size."));
4136 return (1);
4137 }
4138
4139 fcip_pkt = fcip_pkt_alloc(fptr, mp, flags, datalen);
4140 if (fcip_pkt == NULL) {
4141 (void) putbq(wq, mp);
4142 return (1);
4143 }
4144
4145 fcip_pkt->fcip_pkt_mp = mp;
4146 fcip_pkt->fcip_pkt_wq = wq;
4147 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
4148
4149 mutex_enter(&fdestp->fcipd_mutex);
4150 /*
4151 * If the device dynamically disappeared, just fail the request.
4152 */
4153 if (fdestp->fcipd_rtable == NULL) {
4154 mutex_exit(&fdestp->fcipd_mutex);
4155 fcip_pkt_free(fcip_pkt, 1);
4156 return (1);
4157 }
4158
4159 /*
4160 * Now that we've assigned pkt_pd, we can call fc_ulp_init_packet
4161 */
4162
4163 fc_pkt->pkt_pd = fdestp->fcipd_pd;
4164
4165 if (fc_ulp_init_packet((opaque_t)fport->fcipp_handle,
4166 fc_pkt, flags) != FC_SUCCESS) {
4167 mutex_exit(&fdestp->fcipd_mutex);
4168 fcip_pkt_free(fcip_pkt, 1);
4169 return (1);
4170 }
4171
4172 fcip_fdestp_enqueue_pkt(fdestp, fcip_pkt);
4173 fcip_pkt->fcip_pkt_dest = fdestp;
4174 fc_pkt->pkt_fca_device = fdestp->fcipd_fca_dev;
4175
4176 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE,
4177 "setting cmdlen to 0x%x: rsp 0x%x : data 0x%x",
4178 fc_pkt->pkt_cmdlen, fc_pkt->pkt_rsplen, fc_pkt->pkt_datalen));
4179
4180 fcip_init_unicast_pkt(fcip_pkt, fport->fcipp_sid,
4181 fdestp->fcipd_did, fcip_pkt_callback);
4182
4183 fdestp->fcipd_ncmds++;
4184
4185 mutex_exit(&fdestp->fcipd_mutex);
4186 if ((rval = fcip_transport(fcip_pkt)) == FC_SUCCESS) {
4187 fptr->fcip_opackets++;
4188 return (0);
4189 }
4190
4191 free = (rval == FC_STATEC_BUSY || rval == FC_OFFLINE ||
4192 rval == FC_TRAN_BUSY) ? 0 : 1;
4193
4194 mutex_enter(&fdestp->fcipd_mutex);
4195 rval = fcip_fdestp_dequeue_pkt(fdestp, fcip_pkt);
4196
4197 if (!rval) {
4198 fcip_pkt = NULL;
4199 } else {
4200 fdestp->fcipd_ncmds--;
4201 }
4202 mutex_exit(&fdestp->fcipd_mutex);
4203
4204 if (fcip_pkt != NULL) {
4205 fcip_pkt_free(fcip_pkt, free);
4206 }
4207
4208 if (!free) {
4209 (void) putbq(wq, mp);
4210 }
4211
4212 return (1);
4213 }
4214
4215
4216 /*
4217 * This routine enqueus a packet marked to be issued to the
4218 * transport in the dest structure. This enables us to timeout any
4219 * request stuck with the FCA/transport for long periods of time
4220 * without a response. fcip_pkt_timeout will attempt to clean up
4221 * any packets hung in this state of limbo.
4222 */
4223 static void
4224 fcip_fdestp_enqueue_pkt(struct fcip_dest *fdestp, fcip_pkt_t *fcip_pkt)
4225 {
4226 ASSERT(mutex_owned(&fdestp->fcipd_mutex));
4227 FCIP_TNF_PROBE_1((fcip_fdestp_enqueue_pkt, "fcip io", /* CSTYLED */,
4228 tnf_string, msg, "destp enq pkt"));
4229
4230 /*
4231 * Just hang it off the head of packet list
4232 */
4233 fcip_pkt->fcip_pkt_next = fdestp->fcipd_head;
4234 fcip_pkt->fcip_pkt_prev = NULL;
4235 fcip_pkt->fcip_pkt_flags |= FCIP_PKT_IN_LIST;
4236
4237 if (fdestp->fcipd_head != NULL) {
4238 ASSERT(fdestp->fcipd_head->fcip_pkt_prev == NULL);
4239 fdestp->fcipd_head->fcip_pkt_prev = fcip_pkt;
4240 }
4241
4242 fdestp->fcipd_head = fcip_pkt;
4243 }
4244
4245
4246 /*
4247 * dequeues any packets after the transport/FCA tells us it has
4248 * been successfully sent on its way. Ofcourse it doesn't mean that
4249 * the packet will actually reach its destination but its atleast
4250 * a step closer in that direction
4251 */
4252 static int
4253 fcip_fdestp_dequeue_pkt(struct fcip_dest *fdestp, fcip_pkt_t *fcip_pkt)
4254 {
4255 fcip_pkt_t *fcipd_pkt;
4256
4257 ASSERT(mutex_owned(&fdestp->fcipd_mutex));
4258 if (fcip_pkt->fcip_pkt_flags & FCIP_PKT_IN_TIMEOUT) {
4259 fcipd_pkt = fdestp->fcipd_head;
4260 while (fcipd_pkt) {
4261 if (fcipd_pkt == fcip_pkt) {
4262 fcip_pkt_t *pptr = NULL;
4263
4264 if (fcipd_pkt == fdestp->fcipd_head) {
4265 ASSERT(fcipd_pkt->fcip_pkt_prev ==
4266 NULL);
4267 fdestp->fcipd_head =
4268 fcipd_pkt->fcip_pkt_next;
4269 } else {
4270 pptr = fcipd_pkt->fcip_pkt_prev;
4271 ASSERT(pptr != NULL);
4272 pptr->fcip_pkt_next =
4273 fcipd_pkt->fcip_pkt_next;
4274 }
4275 if (fcipd_pkt->fcip_pkt_next) {
4276 pptr = fcipd_pkt->fcip_pkt_next;
4277 pptr->fcip_pkt_prev =
4278 fcipd_pkt->fcip_pkt_prev;
4279 }
4280 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_LIST;
4281 break;
4282 }
4283 fcipd_pkt = fcipd_pkt->fcip_pkt_next;
4284 }
4285 } else {
4286 if (fcip_pkt->fcip_pkt_prev == NULL) {
4287 ASSERT(fdestp->fcipd_head == fcip_pkt);
4288 fdestp->fcipd_head = fcip_pkt->fcip_pkt_next;
4289 } else {
4290 fcip_pkt->fcip_pkt_prev->fcip_pkt_next =
4291 fcip_pkt->fcip_pkt_next;
4292 }
4293
4294 if (fcip_pkt->fcip_pkt_next) {
4295 fcip_pkt->fcip_pkt_next->fcip_pkt_prev =
4296 fcip_pkt->fcip_pkt_prev;
4297 }
4298
4299 fcipd_pkt = fcip_pkt;
4300 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_LIST;
4301 }
4302
4303 return (fcipd_pkt == fcip_pkt);
4304 }
4305
4306 /*
4307 * The transport routine - this is the routine that actually calls
4308 * into the FCA driver (through the transport ofcourse) to transmit a
4309 * datagram on the fibre. The dest struct assoicated with the port to
4310 * which the data is intended is already bound to the packet, this routine
4311 * only takes care of marking the packet a broadcast packet if it is
4312 * intended to be a broadcast request. This permits the transport to send
4313 * the packet down on the wire even if it doesn't have an entry for the
4314 * D_ID in its d_id hash tables.
4315 */
4316 static int
4317 fcip_transport(fcip_pkt_t *fcip_pkt)
4318 {
4319 struct fcip *fptr;
4320 fc_packet_t *fc_pkt;
4321 fcip_port_info_t *fport;
4322 struct fcip_dest *fdestp;
4323 uint32_t did;
4324 int rval = FC_FAILURE;
4325 struct fcip_routing_table *frp = NULL;
4326
4327 FCIP_TNF_PROBE_1((fcip_transport, "fcip io", /* CSTYLED */,
4328 tnf_string, msg, "enter"));
4329
4330 fptr = fcip_pkt->fcip_pkt_fptr;
4331 fport = fptr->fcip_port_info;
4332 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
4333 fdestp = fcip_pkt->fcip_pkt_dest;
4334 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_WARN, "fcip_transport called"));
4335
4336 did = fptr->fcip_broadcast_did;
4337 if (fc_pkt->pkt_cmd_fhdr.d_id == did &&
4338 fc_pkt->pkt_tran_type != FC_PKT_BROADCAST) {
4339 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
4340 (CE_NOTE, "trantype set to BROADCAST"));
4341 fc_pkt->pkt_tran_type = FC_PKT_BROADCAST;
4342 }
4343
4344 mutex_enter(&fptr->fcip_mutex);
4345 if ((fc_pkt->pkt_tran_type != FC_PKT_BROADCAST) &&
4346 (fc_pkt->pkt_pd == NULL)) {
4347 mutex_exit(&fptr->fcip_mutex);
4348 FCIP_TNF_PROBE_1((fcip_transport, "fcip io", /* CSTYLED */,
4349 tnf_string, msg, "fcip transport no pd"));
4350 return (rval);
4351 } else if (fptr->fcip_port_state == FCIP_PORT_OFFLINE) {
4352 mutex_exit(&fptr->fcip_mutex);
4353 FCIP_TNF_PROBE_1((fcip_transport, "fcip io", /* CSTYLED */,
4354 tnf_string, msg, "fcip transport port offline"));
4355 return (FC_TRAN_BUSY);
4356 }
4357 mutex_exit(&fptr->fcip_mutex);
4358
4359 if (fdestp) {
4360 struct fcip_routing_table *frp;
4361
4362 frp = fdestp->fcipd_rtable;
4363 mutex_enter(&fptr->fcip_rt_mutex);
4364 mutex_enter(&fdestp->fcipd_mutex);
4365 if (fc_pkt->pkt_pd != NULL) {
4366 if ((frp == NULL) ||
4367 (frp && FCIP_RTE_UNAVAIL(frp->fcipr_state))) {
4368 mutex_exit(&fdestp->fcipd_mutex);
4369 mutex_exit(&fptr->fcip_rt_mutex);
4370 if (frp &&
4371 (frp->fcipr_state == FCIP_RT_INVALID)) {
4372 FCIP_TNF_PROBE_1((fcip_transport,
4373 "fcip io", /* CSTYLED */,
4374 tnf_string, msg,
4375 "fcip transport - TRANBUSY"));
4376 return (FC_TRAN_BUSY);
4377 } else {
4378 FCIP_TNF_PROBE_1((fcip_transport,
4379 "fcip io", /* CSTYLED */,
4380 tnf_string, msg,
4381 "fcip transport: frp unavailable"));
4382 return (rval);
4383 }
4384 }
4385 }
4386 mutex_exit(&fdestp->fcipd_mutex);
4387 mutex_exit(&fptr->fcip_rt_mutex);
4388 ASSERT(fcip_pkt->fcip_pkt_flags & FCIP_PKT_IN_LIST);
4389 }
4390
4391 /* Explicitly invalidate this field till fcip decides to use it */
4392 fc_pkt->pkt_ulp_rscn_infop = NULL;
4393
4394 rval = fc_ulp_transport(fport->fcipp_handle, fc_pkt);
4395 if (rval == FC_STATEC_BUSY || rval == FC_OFFLINE) {
4396 /*
4397 * Need to queue up the command for retry
4398 */
4399 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
4400 (CE_WARN, "ulp_transport failed: 0x%x", rval));
4401 } else if (rval == FC_LOGINREQ && (frp != NULL)) {
4402 (void) fcip_do_plogi(fptr, frp);
4403 } else if (rval == FC_BADPACKET && (frp != NULL)) {
4404 /*
4405 * There is a distinct possiblity in our scheme of things
4406 * that we have a routing table entry with a NULL pd struct.
4407 * Mark the routing table entry for removal if it is not a
4408 * broadcast entry
4409 */
4410 if ((frp->fcipr_d_id.port_id != 0x0) &&
4411 (frp->fcipr_d_id.port_id != 0xffffff)) {
4412 mutex_enter(&fptr->fcip_rt_mutex);
4413 frp->fcipr_pd = NULL;
4414 frp->fcipr_state = PORT_DEVICE_INVALID;
4415 mutex_exit(&fptr->fcip_rt_mutex);
4416 }
4417 }
4418
4419 FCIP_TNF_PROBE_1((fcip_transport, "fcip io", /* CSTYLED */,
4420 tnf_string, msg, "fcip transport done"));
4421 return (rval);
4422 }
4423
4424 /*
4425 * Call back routine. Called by the FCA/transport when the messages
4426 * has been put onto the wire towards its intended destination. We can
4427 * now free the fc_packet associated with the message
4428 */
4429 static void
4430 fcip_pkt_callback(fc_packet_t *fc_pkt)
4431 {
4432 int rval;
4433 fcip_pkt_t *fcip_pkt;
4434 struct fcip_dest *fdestp;
4435
4436 fcip_pkt = (fcip_pkt_t *)fc_pkt->pkt_ulp_private;
4437 fdestp = fcip_pkt->fcip_pkt_dest;
4438
4439 /*
4440 * take the lock early so that we don't have a race condition
4441 * with fcip_timeout
4442 *
4443 * fdestp->fcipd_mutex isn't really intended to lock per
4444 * packet struct - see bug 5105592 for permanent solution
4445 */
4446 mutex_enter(&fdestp->fcipd_mutex);
4447
4448 fcip_pkt->fcip_pkt_flags |= FCIP_PKT_RETURNED;
4449 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_ABORT;
4450 if (fcip_pkt->fcip_pkt_flags & FCIP_PKT_IN_TIMEOUT) {
4451 mutex_exit(&fdestp->fcipd_mutex);
4452 return;
4453 }
4454
4455 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "pkt callback"));
4456
4457 ASSERT(fdestp->fcipd_rtable != NULL);
4458 ASSERT(fcip_pkt->fcip_pkt_flags & FCIP_PKT_IN_LIST);
4459 rval = fcip_fdestp_dequeue_pkt(fdestp, fcip_pkt);
4460 fdestp->fcipd_ncmds--;
4461 mutex_exit(&fdestp->fcipd_mutex);
4462
4463 if (rval) {
4464 fcip_pkt_free(fcip_pkt, 1);
4465 }
4466
4467 FCIP_TNF_PROBE_1((fcip_pkt_callback, "fcip io", /* CSTYLED */,
4468 tnf_string, msg, "pkt callback done"));
4469 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_NOTE, "pkt callback done"));
4470 }
4471
4472 /*
4473 * Return 1 if the topology is supported, else return 0.
4474 * Topology support is consistent with what the whole
4475 * stack supports together.
4476 */
4477 static int
4478 fcip_is_supported_fc_topology(int fc_topology)
4479 {
4480 switch (fc_topology) {
4481
4482 case FC_TOP_PRIVATE_LOOP :
4483 case FC_TOP_PUBLIC_LOOP :
4484 case FC_TOP_FABRIC :
4485 case FC_TOP_NO_NS :
4486 return (1);
4487 default :
4488 return (0);
4489 }
4490 }
4491
4492 /*
4493 * handle any topology specific initializations here
4494 * this routine must be called while holding fcip_mutex
4495 */
4496 /* ARGSUSED */
4497 static void
4498 fcip_handle_topology(struct fcip *fptr)
4499 {
4500
4501 fcip_port_info_t *fport = fptr->fcip_port_info;
4502
4503 ASSERT(mutex_owned(&fptr->fcip_mutex));
4504
4505 /*
4506 * Since we know the port's topology - handle topology
4507 * specific details here. In Point to Point and Private Loop
4508 * topologies - we would probably not have a name server
4509 */
4510
4511 FCIP_TNF_PROBE_3((fcip_handle_topology, "fcip io", /* CSTYLED */,
4512 tnf_string, msg, "enter",
4513 tnf_uint, port_state, fport->fcipp_pstate,
4514 tnf_uint, topology, fport->fcipp_topology));
4515 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_NOTE, "port state: %x, topology %x",
4516 fport->fcipp_pstate, fport->fcipp_topology));
4517
4518 fptr->fcip_broadcast_did = fcip_get_broadcast_did(fptr);
4519 mutex_exit(&fptr->fcip_mutex);
4520 (void) fcip_dest_add_broadcast_entry(fptr, 0);
4521 mutex_enter(&fptr->fcip_mutex);
4522
4523 if (!fcip_is_supported_fc_topology(fport->fcipp_topology)) {
4524 FCIP_DEBUG(FCIP_DEBUG_INIT,
4525 (CE_WARN, "fcip(0x%x): Unsupported port topology (0x%x)",
4526 fptr->fcip_instance, fport->fcipp_topology));
4527 return;
4528 }
4529
4530 switch (fport->fcipp_topology) {
4531 case FC_TOP_PRIVATE_LOOP: {
4532
4533 fc_portmap_t *port_map;
4534 uint32_t listlen, alloclen;
4535 /*
4536 * we may have to maintain routing. Get a list of
4537 * all devices on this port that the transport layer is
4538 * aware of. Check if any of them is a IS8802 type port,
4539 * if yes get its WWN and DID mapping and cache it in
4540 * the purport routing table. Since there is no
4541 * State Change notification for private loop/point_point
4542 * topologies - this table may not be accurate. The static
4543 * routing table is updated on a state change callback.
4544 */
4545 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_WARN, "port state valid!!"));
4546 fptr->fcip_port_state = FCIP_PORT_ONLINE;
4547 listlen = alloclen = FCIP_MAX_PORTS;
4548 port_map = (fc_portmap_t *)
4549 kmem_zalloc((FCIP_MAX_PORTS * sizeof (fc_portmap_t)),
4550 KM_SLEEP);
4551 if (fc_ulp_getportmap(fport->fcipp_handle, &port_map,
4552 &listlen, FC_ULP_PLOGI_PRESERVE) == FC_SUCCESS) {
4553 mutex_exit(&fptr->fcip_mutex);
4554 fcip_rt_update(fptr, port_map, listlen);
4555 mutex_enter(&fptr->fcip_mutex);
4556 }
4557 if (listlen > alloclen) {
4558 alloclen = listlen;
4559 }
4560 kmem_free(port_map, (alloclen * sizeof (fc_portmap_t)));
4561 /*
4562 * Now fall through and register with the transport
4563 * that this port is IP capable
4564 */
4565 }
4566 /* FALLTHROUGH */
4567 case FC_TOP_NO_NS:
4568 /*
4569 * If we don't have a nameserver, lets wait until we
4570 * have to send out a packet to a remote port and then
4571 * try and discover the port using ARP/FARP.
4572 */
4573 /* FALLTHROUGH */
4574 case FC_TOP_PUBLIC_LOOP:
4575 case FC_TOP_FABRIC: {
4576 fc_portmap_t *port_map;
4577 uint32_t listlen, alloclen;
4578
4579 /* FC_TYPE of 0x05 goes to word 0, LSB */
4580 fptr->fcip_port_state = FCIP_PORT_ONLINE;
4581
4582 if (!(fptr->fcip_flags & FCIP_REG_INPROGRESS)) {
4583 fptr->fcip_flags |= FCIP_REG_INPROGRESS;
4584 if (taskq_dispatch(fptr->fcip_tq, fcip_port_ns,
4585 fptr, KM_NOSLEEP) == 0) {
4586 fptr->fcip_flags &= ~FCIP_REG_INPROGRESS;
4587 }
4588 }
4589
4590 /*
4591 * If fcip_create_nodes_on_demand is overridden to force
4592 * discovery of all nodes in Fabric/Public loop topologies
4593 * we need to query for and obtain all nodes and log into
4594 * them as with private loop devices
4595 */
4596 if (!fcip_create_nodes_on_demand) {
4597 fptr->fcip_port_state = FCIP_PORT_ONLINE;
4598 listlen = alloclen = FCIP_MAX_PORTS;
4599 port_map = (fc_portmap_t *)
4600 kmem_zalloc((FCIP_MAX_PORTS *
4601 sizeof (fc_portmap_t)), KM_SLEEP);
4602 if (fc_ulp_getportmap(fport->fcipp_handle, &port_map,
4603 &listlen, FC_ULP_PLOGI_PRESERVE) == FC_SUCCESS) {
4604 mutex_exit(&fptr->fcip_mutex);
4605 fcip_rt_update(fptr, port_map, listlen);
4606 mutex_enter(&fptr->fcip_mutex);
4607 }
4608 if (listlen > alloclen) {
4609 alloclen = listlen;
4610 }
4611 kmem_free(port_map,
4612 (alloclen * sizeof (fc_portmap_t)));
4613 }
4614 break;
4615 }
4616
4617 default:
4618 break;
4619 }
4620 }
4621
4622 static void
4623 fcip_port_ns(void *arg)
4624 {
4625 struct fcip *fptr = (struct fcip *)arg;
4626 fcip_port_info_t *fport = fptr->fcip_port_info;
4627 fc_ns_cmd_t ns_cmd;
4628 uint32_t types[8];
4629 ns_rfc_type_t rfc;
4630
4631 mutex_enter(&fptr->fcip_mutex);
4632 if ((fptr->fcip_flags & (FCIP_DETACHING | FCIP_DETACHED)) ||
4633 (fptr->fcip_flags & (FCIP_SUSPENDED | FCIP_POWER_DOWN))) {
4634 fptr->fcip_flags &= ~FCIP_REG_INPROGRESS;
4635 mutex_exit(&fptr->fcip_mutex);
4636 return;
4637 }
4638 mutex_exit(&fptr->fcip_mutex);
4639
4640 /*
4641 * Prepare the Name server structure to
4642 * register with the transport in case of
4643 * Fabric configuration.
4644 */
4645 bzero(&rfc, sizeof (rfc));
4646 bzero(types, sizeof (types));
4647
4648 types[FC4_TYPE_WORD_POS(FC_TYPE_IS8802_SNAP)] = (1 <<
4649 FC4_TYPE_BIT_POS(FC_TYPE_IS8802_SNAP));
4650
4651 rfc.rfc_port_id.port_id = fport->fcipp_sid.port_id;
4652 bcopy(types, rfc.rfc_types, sizeof (types));
4653
4654 ns_cmd.ns_flags = 0;
4655 ns_cmd.ns_cmd = NS_RFT_ID;
4656 ns_cmd.ns_req_len = sizeof (rfc);
4657 ns_cmd.ns_req_payload = (caddr_t)&rfc;
4658 ns_cmd.ns_resp_len = 0;
4659 ns_cmd.ns_resp_payload = NULL;
4660
4661 /*
4662 * Perform the Name Server Registration for FC IS8802_SNAP Type.
4663 * We don't expect a reply for registering port type
4664 */
4665 (void) fc_ulp_port_ns(fptr->fcip_port_info->fcipp_handle,
4666 (opaque_t)0, &ns_cmd);
4667
4668 mutex_enter(&fptr->fcip_mutex);
4669 fptr->fcip_flags &= ~FCIP_REG_INPROGRESS;
4670 mutex_exit(&fptr->fcip_mutex);
4671 }
4672
4673 /*
4674 * setup this instance of fcip. This routine inits kstats, allocates
4675 * unsolicited buffers, determines' this port's siblings and handles
4676 * topology specific details which includes registering with the name
4677 * server and also setting up the routing table for this port for
4678 * private loops and point to point topologies
4679 */
4680 static int
4681 fcip_init_port(struct fcip *fptr)
4682 {
4683 int rval = FC_SUCCESS;
4684 fcip_port_info_t *fport = fptr->fcip_port_info;
4685 static char buf[64];
4686 size_t tok_buf_size;
4687
4688 ASSERT(fport != NULL);
4689
4690 FCIP_TNF_PROBE_1((fcip_init_port, "fcip io", /* CSTYLED */,
4691 tnf_string, msg, "enter"));
4692 mutex_enter(&fptr->fcip_mutex);
4693
4694 /*
4695 * setup mac address for this port. Don't be too worried if
4696 * the WWN is zero, there is probably nothing attached to
4697 * to the port. There is no point allocating unsolicited buffers
4698 * for an unused port so return success if we don't have a MAC
4699 * address. Do the port init on a state change notification.
4700 */
4701 if (fcip_setup_mac_addr(fptr) == FCIP_INVALID_WWN) {
4702 fptr->fcip_port_state = FCIP_PORT_OFFLINE;
4703 rval = FC_SUCCESS;
4704 goto done;
4705 }
4706
4707 /*
4708 * clear routing table hash list for this port
4709 */
4710 fcip_rt_flush(fptr);
4711
4712 /*
4713 * init kstats for this instance
4714 */
4715 fcip_kstat_init(fptr);
4716
4717 /*
4718 * Allocate unsolicited buffers
4719 */
4720 fptr->fcip_ub_nbufs = fcip_ub_nbufs;
4721 tok_buf_size = sizeof (*fptr->fcip_ub_tokens) * fcip_ub_nbufs;
4722
4723 FCIP_TNF_PROBE_2((fcip_init_port, "fcip io", /* CSTYLED */,
4724 tnf_string, msg, "debug",
4725 tnf_int, tokBufsize, tok_buf_size));
4726
4727 FCIP_DEBUG(FCIP_DEBUG_INIT,
4728 (CE_WARN, "tokBufsize: 0x%lx", tok_buf_size));
4729
4730 fptr->fcip_ub_tokens = kmem_zalloc(tok_buf_size, KM_SLEEP);
4731
4732 if (fptr->fcip_ub_tokens == NULL) {
4733 rval = FC_FAILURE;
4734 FCIP_DEBUG(FCIP_DEBUG_INIT,
4735 (CE_WARN, "fcip(%d): failed to allocate unsol buf",
4736 fptr->fcip_instance));
4737 goto done;
4738 }
4739 rval = fc_ulp_uballoc(fport->fcipp_handle, &fptr->fcip_ub_nbufs,
4740 fcip_ub_size, FC_TYPE_IS8802_SNAP, fptr->fcip_ub_tokens);
4741
4742 if (rval != FC_SUCCESS) {
4743 FCIP_DEBUG(FCIP_DEBUG_INIT,
4744 (CE_WARN, "fcip(%d): fc_ulp_uballoc failed with 0x%x!!",
4745 fptr->fcip_instance, rval));
4746 }
4747
4748 switch (rval) {
4749 case FC_SUCCESS:
4750 break;
4751
4752 case FC_OFFLINE:
4753 fptr->fcip_port_state = FCIP_PORT_OFFLINE;
4754 rval = FC_FAILURE;
4755 goto done;
4756
4757 case FC_UB_ERROR:
4758 FCIP_TNF_PROBE_1((fcip_init_port, "fcip io", /* CSTYLED */,
4759 tnf_string, msg, "invalid ub alloc request"));
4760 FCIP_DEBUG(FCIP_DEBUG_INIT,
4761 (CE_WARN, "invalid ub alloc request !!"));
4762 rval = FC_FAILURE;
4763 goto done;
4764
4765 case FC_FAILURE:
4766 /*
4767 * requested bytes could not be alloced
4768 */
4769 if (fptr->fcip_ub_nbufs != fcip_ub_nbufs) {
4770 cmn_err(CE_WARN,
4771 "!fcip(0x%x): Failed to alloc unsolicited bufs",
4772 ddi_get_instance(fport->fcipp_dip));
4773 rval = FC_FAILURE;
4774 goto done;
4775 }
4776 break;
4777
4778 default:
4779 rval = FC_FAILURE;
4780 break;
4781 }
4782
4783 /*
4784 * Preallocate a Cache of fcip packets for transmit and receive
4785 * We don't want to be holding on to unsolicited buffers while
4786 * we transmit the message upstream
4787 */
4788 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_NOTE, "allocating fcip_pkt cache"));
4789
4790 (void) sprintf(buf, "fcip%d_cache", fptr->fcip_instance);
4791 fptr->fcip_xmit_cache = kmem_cache_create(buf,
4792 (fport->fcipp_fca_pkt_size + sizeof (fcip_pkt_t)),
4793 8, fcip_cache_constructor, fcip_cache_destructor,
4794 NULL, (void *)fport, NULL, 0);
4795
4796 (void) sprintf(buf, "fcip%d_sendup_cache", fptr->fcip_instance);
4797 fptr->fcip_sendup_cache = kmem_cache_create(buf,
4798 sizeof (struct fcip_sendup_elem),
4799 8, fcip_sendup_constructor, NULL, NULL, (void *)fport, NULL, 0);
4800
4801 if (fptr->fcip_xmit_cache == NULL) {
4802 FCIP_TNF_PROBE_2((fcip_init_port, "fcip io", /* CSTYLED */,
4803 tnf_string, msg, "unable to allocate xmit cache",
4804 tnf_int, instance, fptr->fcip_instance));
4805 FCIP_DEBUG(FCIP_DEBUG_INIT,
4806 (CE_WARN, "fcip%d unable to allocate xmit cache",
4807 fptr->fcip_instance));
4808 rval = FC_FAILURE;
4809 goto done;
4810 }
4811
4812 /*
4813 * We may need to handle routing tables for point to point and
4814 * fcal topologies and register with NameServer for Fabric
4815 * topologies.
4816 */
4817 fcip_handle_topology(fptr);
4818 mutex_exit(&fptr->fcip_mutex);
4819 if (fcip_dest_add_broadcast_entry(fptr, 1) != FC_SUCCESS) {
4820 FCIP_DEBUG(FCIP_DEBUG_INIT,
4821 (CE_WARN, "fcip(0x%x):add broadcast entry failed!!",
4822 fptr->fcip_instance));
4823 mutex_enter(&fptr->fcip_mutex);
4824 rval = FC_FAILURE;
4825 goto done;
4826 }
4827
4828 rval = FC_SUCCESS;
4829 return (rval);
4830
4831 done:
4832 /*
4833 * we don't always come here from port_attach - so cleanup
4834 * anything done in the init_port routine
4835 */
4836 if (fptr->fcip_kstatp) {
4837 kstat_delete(fptr->fcip_kstatp);
4838 fptr->fcip_kstatp = NULL;
4839 }
4840
4841 if (fptr->fcip_xmit_cache) {
4842 kmem_cache_destroy(fptr->fcip_xmit_cache);
4843 fptr->fcip_xmit_cache = NULL;
4844 }
4845
4846 if (fptr->fcip_sendup_cache) {
4847 kmem_cache_destroy(fptr->fcip_sendup_cache);
4848 fptr->fcip_sendup_cache = NULL;
4849 }
4850
4851 /* release unsolicited buffers */
4852 if (fptr->fcip_ub_tokens) {
4853 uint64_t *tokens = fptr->fcip_ub_tokens;
4854 fptr->fcip_ub_tokens = NULL;
4855
4856 mutex_exit(&fptr->fcip_mutex);
4857 (void) fc_ulp_ubfree(fport->fcipp_handle, fptr->fcip_ub_nbufs,
4858 tokens);
4859 kmem_free(tokens, tok_buf_size);
4860
4861 } else {
4862 mutex_exit(&fptr->fcip_mutex);
4863 }
4864
4865 return (rval);
4866 }
4867
4868 /*
4869 * Sets up a port's MAC address from its WWN
4870 */
4871 static int
4872 fcip_setup_mac_addr(struct fcip *fptr)
4873 {
4874 fcip_port_info_t *fport = fptr->fcip_port_info;
4875
4876 ASSERT(mutex_owned(&fptr->fcip_mutex));
4877
4878 fptr->fcip_addrflags = 0;
4879
4880 /*
4881 * we cannot choose a MAC address for our interface - we have
4882 * to live with whatever node WWN we get (minus the top two
4883 * MSbytes for the MAC address) from the transport layer. We will
4884 * treat the WWN as our factory MAC address.
4885 */
4886
4887 if ((fport->fcipp_nwwn.w.wwn_hi != 0) ||
4888 (fport->fcipp_nwwn.w.wwn_lo != 0)) {
4889 char etherstr[ETHERSTRL];
4890
4891 wwn_to_ether(&fport->fcipp_nwwn, &fptr->fcip_macaddr);
4892 fcip_ether_to_str(&fptr->fcip_macaddr, etherstr);
4893 FCIP_DEBUG(FCIP_DEBUG_INIT,
4894 (CE_NOTE, "setupmacaddr ouraddr %s", etherstr));
4895
4896 fptr->fcip_addrflags = (FCIP_FACTADDR_PRESENT |
4897 FCIP_FACTADDR_USE);
4898 } else {
4899 /*
4900 * No WWN - just return failure - there's not much
4901 * we can do since we cannot set the WWN.
4902 */
4903 FCIP_DEBUG(FCIP_DEBUG_INIT,
4904 (CE_WARN, "Port does not have a valid WWN"));
4905 return (FCIP_INVALID_WWN);
4906 }
4907 return (FC_SUCCESS);
4908 }
4909
4910
4911 /*
4912 * flush routing table entries
4913 */
4914 static void
4915 fcip_rt_flush(struct fcip *fptr)
4916 {
4917 int index;
4918
4919 mutex_enter(&fptr->fcip_rt_mutex);
4920 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
4921 struct fcip_routing_table *frtp, *frtp_next;
4922 frtp = fptr->fcip_rtable[index];
4923 while (frtp) {
4924 frtp_next = frtp->fcipr_next;
4925 kmem_free(frtp, sizeof (struct fcip_routing_table));
4926 frtp = frtp_next;
4927 }
4928 fptr->fcip_rtable[index] = NULL;
4929 }
4930 mutex_exit(&fptr->fcip_rt_mutex);
4931 }
4932
4933 /*
4934 * Free up the fcip softstate and all allocated resources for the
4935 * fcip instance assoicated with a given port driver instance
4936 *
4937 * Given that the list of structures pointed to by fcip_port_head,
4938 * this function is called from multiple sources, and the
4939 * fcip_global_mutex that protects fcip_port_head must be dropped,
4940 * our best solution is to return a value that indicates the next
4941 * port in the list. This way the caller doesn't need to worry
4942 * about the race condition where he saves off a pointer to the
4943 * next structure in the list and by the time this routine returns,
4944 * that next structure has already been freed.
4945 */
4946 static fcip_port_info_t *
4947 fcip_softstate_free(fcip_port_info_t *fport)
4948 {
4949 struct fcip *fptr = NULL;
4950 int instance;
4951 timeout_id_t tid;
4952 opaque_t phandle = NULL;
4953 fcip_port_info_t *prev_fport, *cur_fport, *next_fport = NULL;
4954
4955 ASSERT(MUTEX_HELD(&fcip_global_mutex));
4956
4957 if (fport) {
4958 phandle = fport->fcipp_handle;
4959 fptr = fport->fcipp_fcip;
4960 } else {
4961 return (next_fport);
4962 }
4963
4964 if (fptr) {
4965 mutex_enter(&fptr->fcip_mutex);
4966 instance = ddi_get_instance(fptr->fcip_dip);
4967
4968 /*
4969 * dismantle timeout thread for this instance of fcip
4970 */
4971 tid = fptr->fcip_timeout_id;
4972 fptr->fcip_timeout_id = NULL;
4973
4974 mutex_exit(&fptr->fcip_mutex);
4975 (void) untimeout(tid);
4976 mutex_enter(&fptr->fcip_mutex);
4977
4978 ASSERT(fcip_num_instances >= 0);
4979 fcip_num_instances--;
4980
4981 /*
4982 * stop sendup thread
4983 */
4984 mutex_enter(&fptr->fcip_sendup_mutex);
4985 if (fptr->fcip_sendup_thr_initted) {
4986 fptr->fcip_sendup_thr_initted = 0;
4987 cv_signal(&fptr->fcip_sendup_cv);
4988 cv_wait(&fptr->fcip_sendup_cv,
4989 &fptr->fcip_sendup_mutex);
4990 }
4991 ASSERT(fptr->fcip_sendup_head == NULL);
4992 fptr->fcip_sendup_head = fptr->fcip_sendup_tail = NULL;
4993 mutex_exit(&fptr->fcip_sendup_mutex);
4994
4995 /*
4996 * dismantle taskq
4997 */
4998 if (fptr->fcip_tq) {
4999 taskq_t *tq = fptr->fcip_tq;
5000
5001 fptr->fcip_tq = NULL;
5002
5003 mutex_exit(&fptr->fcip_mutex);
5004 taskq_destroy(tq);
5005 mutex_enter(&fptr->fcip_mutex);
5006 }
5007
5008 if (fptr->fcip_kstatp) {
5009 kstat_delete(fptr->fcip_kstatp);
5010 fptr->fcip_kstatp = NULL;
5011 }
5012
5013 /* flush the routing table entries */
5014 fcip_rt_flush(fptr);
5015
5016 if (fptr->fcip_xmit_cache) {
5017 kmem_cache_destroy(fptr->fcip_xmit_cache);
5018 fptr->fcip_xmit_cache = NULL;
5019 }
5020
5021 if (fptr->fcip_sendup_cache) {
5022 kmem_cache_destroy(fptr->fcip_sendup_cache);
5023 fptr->fcip_sendup_cache = NULL;
5024 }
5025
5026 fcip_cleanup_dest(fptr);
5027
5028 /* release unsolicited buffers */
5029 if (fptr->fcip_ub_tokens) {
5030 uint64_t *tokens = fptr->fcip_ub_tokens;
5031
5032 fptr->fcip_ub_tokens = NULL;
5033 mutex_exit(&fptr->fcip_mutex);
5034 if (phandle) {
5035 /*
5036 * release the global mutex here to
5037 * permit any data pending callbacks to
5038 * complete. Else we will deadlock in the
5039 * FCA waiting for all unsol buffers to be
5040 * returned.
5041 */
5042 mutex_exit(&fcip_global_mutex);
5043 (void) fc_ulp_ubfree(phandle,
5044 fptr->fcip_ub_nbufs, tokens);
5045 mutex_enter(&fcip_global_mutex);
5046 }
5047 kmem_free(tokens, (sizeof (*tokens) * fcip_ub_nbufs));
5048 } else {
5049 mutex_exit(&fptr->fcip_mutex);
5050 }
5051
5052 mutex_destroy(&fptr->fcip_mutex);
5053 mutex_destroy(&fptr->fcip_ub_mutex);
5054 mutex_destroy(&fptr->fcip_rt_mutex);
5055 mutex_destroy(&fptr->fcip_dest_mutex);
5056 mutex_destroy(&fptr->fcip_sendup_mutex);
5057 cv_destroy(&fptr->fcip_farp_cv);
5058 cv_destroy(&fptr->fcip_sendup_cv);
5059 cv_destroy(&fptr->fcip_ub_cv);
5060
5061 ddi_soft_state_free(fcip_softp, instance);
5062 }
5063
5064 /*
5065 * Now dequeue the fcip_port_info from the port list
5066 */
5067 cur_fport = fcip_port_head;
5068 prev_fport = NULL;
5069 while (cur_fport != NULL) {
5070 if (cur_fport == fport) {
5071 break;
5072 }
5073 prev_fport = cur_fport;
5074 cur_fport = cur_fport->fcipp_next;
5075 }
5076
5077 /*
5078 * Assert that we found a port in our port list
5079 */
5080 ASSERT(cur_fport == fport);
5081
5082 if (prev_fport) {
5083 /*
5084 * Not the first port in the port list
5085 */
5086 prev_fport->fcipp_next = fport->fcipp_next;
5087 } else {
5088 /*
5089 * first port
5090 */
5091 fcip_port_head = fport->fcipp_next;
5092 }
5093 next_fport = fport->fcipp_next;
5094 kmem_free(fport, sizeof (fcip_port_info_t));
5095
5096 return (next_fport);
5097 }
5098
5099
5100 /*
5101 * This is called by transport for any ioctl operations performed
5102 * on the devctl or other transport minor nodes. It is currently
5103 * unused for fcip
5104 */
5105 /* ARGSUSED */
5106 static int
5107 fcip_port_ioctl(opaque_t ulp_handle, opaque_t port_handle, dev_t dev,
5108 int cmd, intptr_t data, int mode, cred_t *credp, int *rval,
5109 uint32_t claimed)
5110 {
5111 return (FC_UNCLAIMED);
5112 }
5113
5114 /*
5115 * DL_INFO_REQ - returns information about the DLPI stream to the DLS user
5116 * requesting information about this interface
5117 */
5118 static void
5119 fcip_ireq(queue_t *wq, mblk_t *mp)
5120 {
5121 struct fcipstr *slp;
5122 struct fcip *fptr;
5123 dl_info_ack_t *dlip;
5124 struct fcipdladdr *dlap;
5125 la_wwn_t *ep;
5126 int size;
5127 char etherstr[ETHERSTRL];
5128
5129 slp = (struct fcipstr *)wq->q_ptr;
5130
5131 fptr = slp->sl_fcip;
5132
5133 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5134 (CE_NOTE, "fcip_ireq: info request req rcvd"));
5135
5136 FCIP_TNF_PROBE_1((fcip_ireq, "fcip io", /* CSTYLED */,
5137 tnf_string, msg, "fcip ireq entered"));
5138
5139 if (MBLKL(mp) < DL_INFO_REQ_SIZE) {
5140 dlerrorack(wq, mp, DL_INFO_REQ, DL_BADPRIM, 0);
5141 return;
5142 }
5143
5144 /*
5145 * Exchange current message for a DL_INFO_ACK
5146 */
5147 size = sizeof (dl_info_ack_t) + FCIPADDRL + ETHERADDRL;
5148 if ((mp = mexchange(wq, mp, size, M_PCPROTO, DL_INFO_ACK)) == NULL) {
5149 return;
5150 }
5151
5152 /*
5153 * FILL in the DL_INFO_ACK fields and reply
5154 */
5155 dlip = (dl_info_ack_t *)mp->b_rptr;
5156 *dlip = fcip_infoack;
5157 dlip->dl_current_state = slp->sl_state;
5158 dlap = (struct fcipdladdr *)(mp->b_rptr + dlip->dl_addr_offset);
5159 dlap->dl_sap = slp->sl_sap;
5160
5161
5162 if (fptr) {
5163 fcip_ether_to_str(&fptr->fcip_macaddr, etherstr);
5164 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5165 (CE_NOTE, "ireq - our mac: %s", etherstr));
5166 ether_bcopy(&fptr->fcip_macaddr, &dlap->dl_phys);
5167 } else {
5168 bzero((caddr_t)&dlap->dl_phys, ETHERADDRL);
5169 }
5170
5171 ep = (la_wwn_t *)(mp->b_rptr + dlip->dl_brdcst_addr_offset);
5172 ether_bcopy(&fcip_arpbroadcast_addr, ep);
5173
5174 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "sending back info req.."));
5175 qreply(wq, mp);
5176 }
5177
5178
5179 /*
5180 * To handle DL_UNITDATA_REQ requests.
5181 */
5182
5183 static void
5184 fcip_udreq(queue_t *wq, mblk_t *mp)
5185 {
5186 struct fcipstr *slp;
5187 struct fcip *fptr;
5188 fcip_port_info_t *fport;
5189 dl_unitdata_req_t *dludp;
5190 mblk_t *nmp;
5191 struct fcipdladdr *dlap;
5192 fcph_network_hdr_t *headerp;
5193 llc_snap_hdr_t *lsnap;
5194 t_uscalar_t off, len;
5195 struct fcip_dest *fdestp;
5196 la_wwn_t wwn;
5197 int hdr_size;
5198
5199 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "inside fcip_udreq"));
5200
5201 FCIP_TNF_PROBE_1((fcip_udreq, "fcip io", /* CSTYLED */,
5202 tnf_string, msg, "fcip udreq entered"));
5203
5204 slp = (struct fcipstr *)wq->q_ptr;
5205
5206 if (slp->sl_state != DL_IDLE) {
5207 dlerrorack(wq, mp, DL_UNITDATA_REQ, DL_OUTSTATE, 0);
5208 return;
5209 }
5210
5211 fptr = slp->sl_fcip;
5212
5213 if (fptr == NULL) {
5214 dlerrorack(wq, mp, DL_UNITDATA_REQ, DL_OUTSTATE, 0);
5215 return;
5216 }
5217
5218 fport = fptr->fcip_port_info;
5219
5220 dludp = (dl_unitdata_req_t *)mp->b_rptr;
5221 off = dludp->dl_dest_addr_offset;
5222 len = dludp->dl_dest_addr_length;
5223
5224 /*
5225 * Validate destination address format
5226 */
5227 if (!MBLKIN(mp, off, len) || (len != FCIPADDRL)) {
5228 dluderrorind(wq, mp, (mp->b_rptr + off), len, DL_BADADDR, 0);
5229 return;
5230 }
5231
5232 /*
5233 * Error if no M_DATA follows
5234 */
5235 nmp = mp->b_cont;
5236 if (nmp == NULL) {
5237 dluderrorind(wq, mp, (mp->b_rptr + off), len, DL_BADDATA, 0);
5238 return;
5239 }
5240 dlap = (struct fcipdladdr *)(mp->b_rptr + off);
5241
5242 /*
5243 * Now get the destination structure for the remote NPORT
5244 */
5245 ether_to_wwn(&dlap->dl_phys, &wwn);
5246 fdestp = fcip_get_dest(fptr, &wwn);
5247
5248 if (fdestp == NULL) {
5249 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE,
5250 "udreq - couldn't find dest struct for remote port");
5251 dluderrorind(wq, mp, (mp->b_rptr + off), len, DL_BADDATA, 0));
5252 return;
5253 }
5254
5255 /*
5256 * Network header + SAP
5257 */
5258 hdr_size = sizeof (fcph_network_hdr_t) + sizeof (llc_snap_hdr_t);
5259
5260 /* DB_REF gives the no. of msgs pointing to this block */
5261 if ((DB_REF(nmp) == 1) &&
5262 (MBLKHEAD(nmp) >= hdr_size) &&
5263 (((uintptr_t)mp->b_rptr & 0x1) == 0)) {
5264 la_wwn_t wwn;
5265 nmp->b_rptr -= hdr_size;
5266
5267 /* first put the network header */
5268 headerp = (fcph_network_hdr_t *)nmp->b_rptr;
5269 if (ether_cmp(&dlap->dl_phys, &fcip_arpbroadcast_addr) == 0) {
5270 ether_to_wwn(&fcipnhbroadcastaddr, &wwn);
5271 } else {
5272 ether_to_wwn(&dlap->dl_phys, &wwn);
5273 }
5274 bcopy(&wwn, &headerp->net_dest_addr, sizeof (la_wwn_t));
5275 ether_to_wwn(&fptr->fcip_macaddr, &wwn);
5276 bcopy(&wwn, &headerp->net_src_addr, sizeof (la_wwn_t));
5277
5278 /* Now the snap header */
5279 lsnap = (llc_snap_hdr_t *)(nmp->b_rptr +
5280 sizeof (fcph_network_hdr_t));
5281 lsnap->dsap = 0xAA;
5282 lsnap->ssap = 0xAA;
5283 lsnap->ctrl = 0x03;
5284 lsnap->oui[0] = 0x00;
5285 lsnap->oui[1] = 0x00; /* 80 */
5286 lsnap->oui[2] = 0x00; /* C2 */
5287 lsnap->pid = BE_16((dlap->dl_sap));
5288
5289 freeb(mp);
5290 mp = nmp;
5291
5292 } else {
5293 la_wwn_t wwn;
5294
5295 DB_TYPE(mp) = M_DATA;
5296 headerp = (fcph_network_hdr_t *)mp->b_rptr;
5297
5298 /*
5299 * Only fill in the low 48bits of WWN for now - we can
5300 * fill in the NAA_ID after we find the port in the
5301 * routing tables
5302 */
5303 if (ether_cmp(&dlap->dl_phys, &fcip_arpbroadcast_addr) == 0) {
5304 ether_to_wwn(&fcipnhbroadcastaddr, &wwn);
5305 } else {
5306 ether_to_wwn(&dlap->dl_phys, &wwn);
5307 }
5308 bcopy(&wwn, &headerp->net_dest_addr, sizeof (la_wwn_t));
5309 /* need to send our PWWN */
5310 bcopy(&fport->fcipp_pwwn, &headerp->net_src_addr,
5311 sizeof (la_wwn_t));
5312
5313 lsnap = (llc_snap_hdr_t *)(nmp->b_rptr +
5314 sizeof (fcph_network_hdr_t));
5315 lsnap->dsap = 0xAA;
5316 lsnap->ssap = 0xAA;
5317 lsnap->ctrl = 0x03;
5318 lsnap->oui[0] = 0x00;
5319 lsnap->oui[1] = 0x00;
5320 lsnap->oui[2] = 0x00;
5321 lsnap->pid = BE_16(dlap->dl_sap);
5322
5323 mp->b_wptr = mp->b_rptr + hdr_size;
5324 }
5325
5326 /*
5327 * Ethernet drivers have a lot of gunk here to put the Type
5328 * information (for Ethernet encapsulation (RFC 894) or the
5329 * Length (for 802.2/802.3) - I guess we'll just ignore that
5330 * here.
5331 */
5332
5333 /*
5334 * Start the I/O on this port. If fcip_start failed for some reason
5335 * we call putbq in fcip_start so we don't need to check the
5336 * return value from fcip_start
5337 */
5338 (void) fcip_start(wq, mp, fptr, fdestp, KM_SLEEP);
5339 }
5340
5341 /*
5342 * DL_ATTACH_REQ: attaches a PPA with a stream. ATTACH requets are needed
5343 * for style 2 DLS providers to identify the physical medium through which
5344 * the streams communication will happen
5345 */
5346 static void
5347 fcip_areq(queue_t *wq, mblk_t *mp)
5348 {
5349 struct fcipstr *slp;
5350 union DL_primitives *dlp;
5351 fcip_port_info_t *fport;
5352 struct fcip *fptr;
5353 int ppa;
5354
5355 slp = (struct fcipstr *)wq->q_ptr;
5356 dlp = (union DL_primitives *)mp->b_rptr;
5357
5358 if (MBLKL(mp) < DL_ATTACH_REQ_SIZE) {
5359 dlerrorack(wq, mp, DL_ATTACH_REQ, DL_BADPRIM, 0);
5360 return;
5361 }
5362
5363 if (slp->sl_state != DL_UNATTACHED) {
5364 dlerrorack(wq, mp, DL_ATTACH_REQ, DL_OUTSTATE, 0);
5365 return;
5366 }
5367
5368 ppa = dlp->attach_req.dl_ppa;
5369 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "attach req: ppa %x", ppa));
5370
5371 /*
5372 * check if the PPA is valid
5373 */
5374
5375 mutex_enter(&fcip_global_mutex);
5376
5377 for (fport = fcip_port_head; fport; fport = fport->fcipp_next) {
5378 if ((fptr = fport->fcipp_fcip) == NULL) {
5379 continue;
5380 }
5381 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "ppa %x, inst %x", ppa,
5382 ddi_get_instance(fptr->fcip_dip)));
5383
5384 if (ppa == ddi_get_instance(fptr->fcip_dip)) {
5385 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5386 (CE_NOTE, "ppa found %x", ppa));
5387 break;
5388 }
5389 }
5390
5391 if (fport == NULL) {
5392 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5393 (CE_NOTE, "dlerrorack coz fport==NULL"));
5394
5395 mutex_exit(&fcip_global_mutex);
5396
5397 if (fc_ulp_get_port_handle(ppa) == NULL) {
5398 dlerrorack(wq, mp, DL_ATTACH_REQ, DL_BADPPA, 0);
5399 return;
5400 }
5401
5402 /*
5403 * Wait for Port attach callback to trigger. If port_detach
5404 * got in while we were waiting, then ddi_get_soft_state
5405 * will return NULL, and we'll return error.
5406 */
5407
5408 delay(drv_usectohz(FCIP_INIT_DELAY));
5409 mutex_enter(&fcip_global_mutex);
5410
5411 fptr = ddi_get_soft_state(fcip_softp, ppa);
5412 if (fptr == NULL) {
5413 mutex_exit(&fcip_global_mutex);
5414 dlerrorack(wq, mp, DL_ATTACH_REQ, DL_BADPPA, 0);
5415 return;
5416 }
5417 }
5418
5419 /*
5420 * set link to device and update our state
5421 */
5422 slp->sl_fcip = fptr;
5423 slp->sl_state = DL_UNBOUND;
5424
5425 mutex_exit(&fcip_global_mutex);
5426
5427 #ifdef DEBUG
5428 mutex_enter(&fptr->fcip_mutex);
5429 if (fptr->fcip_flags & FCIP_LINK_DOWN) {
5430 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_WARN, "port not online yet"));
5431 }
5432 mutex_exit(&fptr->fcip_mutex);
5433 #endif
5434
5435 dlokack(wq, mp, DL_ATTACH_REQ);
5436 }
5437
5438
5439 /*
5440 * DL_DETACH request - detaches a PPA from a stream
5441 */
5442 static void
5443 fcip_dreq(queue_t *wq, mblk_t *mp)
5444 {
5445 struct fcipstr *slp;
5446
5447 slp = (struct fcipstr *)wq->q_ptr;
5448
5449 if (MBLKL(mp) < DL_DETACH_REQ_SIZE) {
5450 dlerrorack(wq, mp, DL_DETACH_REQ, DL_BADPRIM, 0);
5451 return;
5452 }
5453
5454 if (slp->sl_state != DL_UNBOUND) {
5455 dlerrorack(wq, mp, DL_DETACH_REQ, DL_OUTSTATE, 0);
5456 return;
5457 }
5458
5459 fcip_dodetach(slp);
5460 dlokack(wq, mp, DL_DETACH_REQ);
5461 }
5462
5463 /*
5464 * DL_BIND request: requests a DLS provider to bind a DLSAP to the stream.
5465 * DLS users communicate with a physical interface through DLSAPs. Multiple
5466 * DLSAPs can be bound to the same stream (PPA)
5467 */
5468 static void
5469 fcip_breq(queue_t *wq, mblk_t *mp)
5470 {
5471 struct fcipstr *slp;
5472 union DL_primitives *dlp;
5473 struct fcip *fptr;
5474 struct fcipdladdr fcipaddr;
5475 t_uscalar_t sap;
5476 int xidtest;
5477
5478 slp = (struct fcipstr *)wq->q_ptr;
5479
5480 if (MBLKL(mp) < DL_BIND_REQ_SIZE) {
5481 dlerrorack(wq, mp, DL_BIND_REQ, DL_BADPRIM, 0);
5482 return;
5483 }
5484
5485 if (slp->sl_state != DL_UNBOUND) {
5486 dlerrorack(wq, mp, DL_BIND_REQ, DL_OUTSTATE, 0);
5487 return;
5488 }
5489
5490 dlp = (union DL_primitives *)mp->b_rptr;
5491 fptr = slp->sl_fcip;
5492
5493 if (fptr == NULL) {
5494 dlerrorack(wq, mp, DL_BIND_REQ, DL_OUTSTATE, 0);
5495 return;
5496 }
5497
5498 sap = dlp->bind_req.dl_sap;
5499 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "fcip_breq - sap: %x", sap));
5500 xidtest = dlp->bind_req.dl_xidtest_flg;
5501
5502 if (xidtest) {
5503 dlerrorack(wq, mp, DL_BIND_REQ, DL_NOAUTO, 0);
5504 return;
5505 }
5506
5507 FCIP_DEBUG(FCIP_DEBUG_DLPI, (CE_NOTE, "DLBIND: sap : %x", sap));
5508
5509 if (sap > ETHERTYPE_MAX) {
5510 dlerrorack(wq, mp, dlp->dl_primitive, DL_BADSAP, 0);
5511 return;
5512 }
5513 /*
5514 * save SAP for this stream and change the link state
5515 */
5516 slp->sl_sap = sap;
5517 slp->sl_state = DL_IDLE;
5518
5519 fcipaddr.dl_sap = sap;
5520 ether_bcopy(&fptr->fcip_macaddr, &fcipaddr.dl_phys);
5521 dlbindack(wq, mp, sap, &fcipaddr, FCIPADDRL, 0, 0);
5522
5523 fcip_setipq(fptr);
5524 }
5525
5526 /*
5527 * DL_UNBIND request to unbind a previously bound DLSAP, from this stream
5528 */
5529 static void
5530 fcip_ubreq(queue_t *wq, mblk_t *mp)
5531 {
5532 struct fcipstr *slp;
5533
5534 slp = (struct fcipstr *)wq->q_ptr;
5535
5536 if (MBLKL(mp) < DL_UNBIND_REQ_SIZE) {
5537 dlerrorack(wq, mp, DL_UNBIND_REQ, DL_BADPRIM, 0);
5538 return;
5539 }
5540
5541 if (slp->sl_state != DL_IDLE) {
5542 dlerrorack(wq, mp, DL_UNBIND_REQ, DL_OUTSTATE, 0);
5543 return;
5544 }
5545
5546 slp->sl_state = DL_UNBOUND;
5547 slp->sl_sap = 0;
5548
5549 (void) putnextctl1(RD(wq), M_FLUSH, FLUSHRW);
5550 dlokack(wq, mp, DL_UNBIND_REQ);
5551
5552 fcip_setipq(slp->sl_fcip);
5553 }
5554
5555 /*
5556 * Return our physical address
5557 */
5558 static void
5559 fcip_pareq(queue_t *wq, mblk_t *mp)
5560 {
5561 struct fcipstr *slp;
5562 union DL_primitives *dlp;
5563 int type;
5564 struct fcip *fptr;
5565 fcip_port_info_t *fport;
5566 struct ether_addr addr;
5567
5568 slp = (struct fcipstr *)wq->q_ptr;
5569
5570 if (MBLKL(mp) < DL_PHYS_ADDR_REQ_SIZE) {
5571 dlerrorack(wq, mp, DL_PHYS_ADDR_REQ, DL_BADPRIM, 0);
5572 return;
5573 }
5574
5575 dlp = (union DL_primitives *)mp->b_rptr;
5576 type = dlp->physaddr_req.dl_addr_type;
5577 fptr = slp->sl_fcip;
5578
5579 if (fptr == NULL) {
5580 dlerrorack(wq, mp, DL_PHYS_ADDR_REQ, DL_OUTSTATE, 0);
5581 return;
5582 }
5583
5584 fport = fptr->fcip_port_info;
5585
5586 switch (type) {
5587 case DL_FACT_PHYS_ADDR:
5588 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5589 (CE_NOTE, "returning factory phys addr"));
5590 wwn_to_ether(&fport->fcipp_pwwn, &addr);
5591 break;
5592
5593 case DL_CURR_PHYS_ADDR:
5594 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5595 (CE_NOTE, "returning current phys addr"));
5596 ether_bcopy(&fptr->fcip_macaddr, &addr);
5597 break;
5598
5599 default:
5600 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5601 (CE_NOTE, "Not known cmd type in phys addr"));
5602 dlerrorack(wq, mp, DL_PHYS_ADDR_REQ, DL_NOTSUPPORTED, 0);
5603 return;
5604 }
5605 dlphysaddrack(wq, mp, &addr, ETHERADDRL);
5606 }
5607
5608 /*
5609 * Set physical address DLPI request
5610 */
5611 static void
5612 fcip_spareq(queue_t *wq, mblk_t *mp)
5613 {
5614 struct fcipstr *slp;
5615 union DL_primitives *dlp;
5616 t_uscalar_t off, len;
5617 struct ether_addr *addrp;
5618 la_wwn_t wwn;
5619 struct fcip *fptr;
5620 fc_ns_cmd_t fcip_ns_cmd;
5621
5622 slp = (struct fcipstr *)wq->q_ptr;
5623
5624 if (MBLKL(mp) < DL_SET_PHYS_ADDR_REQ_SIZE) {
5625 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_BADPRIM, 0);
5626 return;
5627 }
5628
5629 dlp = (union DL_primitives *)mp->b_rptr;
5630 len = dlp->set_physaddr_req.dl_addr_length;
5631 off = dlp->set_physaddr_req.dl_addr_offset;
5632
5633 if (!MBLKIN(mp, off, len)) {
5634 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_BADPRIM, 0);
5635 return;
5636 }
5637
5638 addrp = (struct ether_addr *)(mp->b_rptr + off);
5639
5640 /*
5641 * If the length of physical address is not correct or address
5642 * specified is a broadcast address or multicast addr -
5643 * return an error.
5644 */
5645 if ((len != ETHERADDRL) ||
5646 ((addrp->ether_addr_octet[0] & 01) == 1) ||
5647 (ether_cmp(addrp, &fcip_arpbroadcast_addr) == 0)) {
5648 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_BADADDR, 0);
5649 return;
5650 }
5651
5652 /*
5653 * check if a stream is attached to this device. Else return an error
5654 */
5655 if ((fptr = slp->sl_fcip) == NULL) {
5656 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_OUTSTATE, 0);
5657 return;
5658 }
5659
5660 /*
5661 * set the new interface local address. We request the transport
5662 * layer to change the Port WWN for this device - return an error
5663 * if we don't succeed.
5664 */
5665
5666 ether_to_wwn(addrp, &wwn);
5667 if (fcip_set_wwn(&wwn) == FC_SUCCESS) {
5668 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5669 (CE_WARN, "WWN changed in spareq"));
5670 } else {
5671 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_BADADDR, 0);
5672 }
5673
5674 /*
5675 * register The new Port WWN and Node WWN with the transport
5676 * and Nameserver. Hope the transport ensures all current I/O
5677 * has stopped before actually attempting to register a new
5678 * port and Node WWN else we are hosed. Maybe a Link reset
5679 * will get everyone's attention.
5680 */
5681 fcip_ns_cmd.ns_flags = 0;
5682 fcip_ns_cmd.ns_cmd = NS_RPN_ID;
5683 fcip_ns_cmd.ns_req_len = sizeof (la_wwn_t);
5684 fcip_ns_cmd.ns_req_payload = (caddr_t)&wwn.raw_wwn[0];
5685 fcip_ns_cmd.ns_resp_len = 0;
5686 fcip_ns_cmd.ns_resp_payload = (caddr_t)0;
5687 if (fc_ulp_port_ns(fptr->fcip_port_info->fcipp_handle,
5688 (opaque_t)0, &fcip_ns_cmd) != FC_SUCCESS) {
5689 FCIP_DEBUG(FCIP_DEBUG_DLPI,
5690 (CE_WARN, "setting Port WWN failed"));
5691 dlerrorack(wq, mp, DL_SET_PHYS_ADDR_REQ, DL_BADPRIM, 0);
5692 return;
5693 }
5694
5695 dlokack(wq, mp, DL_SET_PHYS_ADDR_REQ);
5696 }
5697
5698 /*
5699 * change our port's WWN if permitted by hardware
5700 */
5701 /* ARGSUSED */
5702 static int
5703 fcip_set_wwn(la_wwn_t *pwwn)
5704 {
5705 /*
5706 * We're usually not allowed to change the WWN of adapters
5707 * but some adapters do permit us to change the WWN - don't
5708 * permit setting of WWNs (yet?) - This behavior could be
5709 * modified if needed
5710 */
5711 return (FC_FAILURE);
5712 }
5713
5714
5715 /*
5716 * This routine fills in the header for fastpath data requests. What this
5717 * does in simple terms is, instead of sending all data through the Unitdata
5718 * request dlpi code paths (which will then append the protocol specific
5719 * header - network and snap headers in our case), the upper layers issue
5720 * a M_IOCTL with a DL_IOC_HDR_INFO request and ask the streams endpoint
5721 * driver to give the header it needs appended and the upper layer
5722 * allocates and fills in the header and calls our put routine
5723 */
5724 static void
5725 fcip_dl_ioc_hdr_info(queue_t *wq, mblk_t *mp)
5726 {
5727 mblk_t *nmp;
5728 struct fcipstr *slp;
5729 struct fcipdladdr *dlap;
5730 dl_unitdata_req_t *dlup;
5731 fcph_network_hdr_t *headerp;
5732 la_wwn_t wwn;
5733 llc_snap_hdr_t *lsnap;
5734 struct fcip *fptr;
5735 fcip_port_info_t *fport;
5736 t_uscalar_t off, len;
5737 size_t hdrlen;
5738 int error;
5739
5740 slp = (struct fcipstr *)wq->q_ptr;
5741 fptr = slp->sl_fcip;
5742 if (fptr == NULL) {
5743 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5744 (CE_NOTE, "dliochdr : returns EINVAL1"));
5745 miocnak(wq, mp, 0, EINVAL);
5746 return;
5747 }
5748
5749 error = miocpullup(mp, sizeof (dl_unitdata_req_t) + FCIPADDRL);
5750 if (error != 0) {
5751 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5752 (CE_NOTE, "dliochdr : returns %d", error));
5753 miocnak(wq, mp, 0, error);
5754 return;
5755 }
5756
5757 fport = fptr->fcip_port_info;
5758
5759 /*
5760 * check if the DL_UNITDATA_REQ destination addr has valid offset
5761 * and length values
5762 */
5763 dlup = (dl_unitdata_req_t *)mp->b_cont->b_rptr;
5764 off = dlup->dl_dest_addr_offset;
5765 len = dlup->dl_dest_addr_length;
5766 if (dlup->dl_primitive != DL_UNITDATA_REQ ||
5767 !MBLKIN(mp->b_cont, off, len) || (len != FCIPADDRL)) {
5768 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5769 (CE_NOTE, "dliochdr : returns EINVAL2"));
5770 miocnak(wq, mp, 0, EINVAL);
5771 return;
5772 }
5773
5774 dlap = (struct fcipdladdr *)(mp->b_cont->b_rptr + off);
5775
5776 /*
5777 * Allocate a new mblk to hold the ether header
5778 */
5779
5780 /*
5781 * setup space for network header
5782 */
5783 hdrlen = (sizeof (llc_snap_hdr_t) + sizeof (fcph_network_hdr_t));
5784 if ((nmp = allocb(hdrlen, BPRI_MED)) == NULL) {
5785 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5786 (CE_NOTE, "dliochdr : returns ENOMEM"));
5787 miocnak(wq, mp, 0, ENOMEM);
5788 return;
5789 }
5790 nmp->b_wptr += hdrlen;
5791
5792 /*
5793 * Fill in the Network Hdr and LLC SNAP header;
5794 */
5795 headerp = (fcph_network_hdr_t *)nmp->b_rptr;
5796 /*
5797 * just fill in the Node WWN here - we can fill in the NAA_ID when
5798 * we search the routing table
5799 */
5800 if (ether_cmp(&dlap->dl_phys, &fcip_arpbroadcast_addr) == 0) {
5801 ether_to_wwn(&fcipnhbroadcastaddr, &wwn);
5802 } else {
5803 ether_to_wwn(&dlap->dl_phys, &wwn);
5804 }
5805 bcopy(&wwn, &headerp->net_dest_addr, sizeof (la_wwn_t));
5806 bcopy(&fport->fcipp_pwwn, &headerp->net_src_addr, sizeof (la_wwn_t));
5807 lsnap = (llc_snap_hdr_t *)(nmp->b_rptr + sizeof (fcph_network_hdr_t));
5808 lsnap->dsap = 0xAA;
5809 lsnap->ssap = 0xAA;
5810 lsnap->ctrl = 0x03;
5811 lsnap->oui[0] = 0x00;
5812 lsnap->oui[1] = 0x00;
5813 lsnap->oui[2] = 0x00;
5814 lsnap->pid = BE_16(dlap->dl_sap);
5815
5816 /*
5817 * Link new mblk in after the "request" mblks.
5818 */
5819 linkb(mp, nmp);
5820
5821 slp->sl_flags |= FCIP_SLFAST;
5822
5823 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5824 (CE_NOTE, "dliochdr : returns success "));
5825 miocack(wq, mp, msgsize(mp->b_cont), 0);
5826 }
5827
5828
5829 /*
5830 * Establish a kmem cache for fcip packets
5831 */
5832 static int
5833 fcip_cache_constructor(void *buf, void *arg, int flags)
5834 {
5835 fcip_pkt_t *fcip_pkt = buf;
5836 fc_packet_t *fc_pkt;
5837 fcip_port_info_t *fport = (fcip_port_info_t *)arg;
5838 int (*cb) (caddr_t);
5839 struct fcip *fptr;
5840
5841 cb = (flags == KM_SLEEP) ? DDI_DMA_SLEEP : DDI_DMA_DONTWAIT;
5842
5843 ASSERT(fport != NULL);
5844
5845 fptr = fport->fcipp_fcip;
5846
5847 /*
5848 * we allocated space for our private area at the end of the
5849 * fc packet. Make sure we point to it correctly. Ideally we
5850 * should just push fc_packet_private to the beginning or end
5851 * of the fc_packet structure
5852 */
5853 fcip_pkt->fcip_pkt_next = NULL;
5854 fcip_pkt->fcip_pkt_prev = NULL;
5855 fcip_pkt->fcip_pkt_dest = NULL;
5856 fcip_pkt->fcip_pkt_state = 0;
5857 fcip_pkt->fcip_pkt_reason = 0;
5858 fcip_pkt->fcip_pkt_flags = 0;
5859 fcip_pkt->fcip_pkt_fptr = fptr;
5860 fcip_pkt->fcip_pkt_dma_flags = 0;
5861
5862 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
5863 fc_pkt->pkt_ulp_rscn_infop = NULL;
5864
5865 /*
5866 * We use pkt_cmd_dma for OUTBOUND requests. We don't expect
5867 * any responses for outbound IP data so no need to setup
5868 * response or data dma handles.
5869 */
5870 if (ddi_dma_alloc_handle(fport->fcipp_dip,
5871 &fport->fcipp_cmd_dma_attr, cb, NULL,
5872 &fc_pkt->pkt_cmd_dma) != DDI_SUCCESS) {
5873 return (FCIP_FAILURE);
5874 }
5875
5876 fc_pkt->pkt_cmd_acc = fc_pkt->pkt_resp_acc = NULL;
5877 fc_pkt->pkt_fca_private = (opaque_t)((caddr_t)buf +
5878 sizeof (fcip_pkt_t));
5879 fc_pkt->pkt_ulp_private = (opaque_t)fcip_pkt;
5880
5881 fc_pkt->pkt_cmd_cookie_cnt = fc_pkt->pkt_resp_cookie_cnt =
5882 fc_pkt->pkt_data_cookie_cnt = 0;
5883 fc_pkt->pkt_cmd_cookie = fc_pkt->pkt_resp_cookie =
5884 fc_pkt->pkt_data_cookie = NULL;
5885
5886 return (FCIP_SUCCESS);
5887 }
5888
5889 /*
5890 * destroy the fcip kmem cache
5891 */
5892 static void
5893 fcip_cache_destructor(void *buf, void *arg)
5894 {
5895 fcip_pkt_t *fcip_pkt = (fcip_pkt_t *)buf;
5896 fc_packet_t *fc_pkt;
5897 fcip_port_info_t *fport = (fcip_port_info_t *)arg;
5898 struct fcip *fptr;
5899
5900 ASSERT(fport != NULL);
5901
5902 fptr = fport->fcipp_fcip;
5903
5904 ASSERT(fptr == fcip_pkt->fcip_pkt_fptr);
5905 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
5906
5907 if (fc_pkt->pkt_cmd_dma) {
5908 ddi_dma_free_handle(&fc_pkt->pkt_cmd_dma);
5909 }
5910 }
5911
5912 /*
5913 * the fcip destination structure is hashed on Node WWN assuming
5914 * a NAA_ID of 0x1 (IEEE)
5915 */
5916 static struct fcip_dest *
5917 fcip_get_dest(struct fcip *fptr, la_wwn_t *pwwn)
5918 {
5919 struct fcip_dest *fdestp = NULL;
5920 fcip_port_info_t *fport;
5921 int hash_bucket;
5922 opaque_t pd;
5923 int rval;
5924 struct fcip_routing_table *frp;
5925 la_wwn_t twwn;
5926 uint32_t *twwnp = (uint32_t *)&twwn;
5927
5928 hash_bucket = FCIP_DEST_HASH(pwwn->raw_wwn);
5929 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5930 (CE_NOTE, "get dest hashbucket : 0x%x", hash_bucket));
5931 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5932 (CE_NOTE, "0x%x 0x%x 0x%x 0x%x 0x%x 0x%x",
5933 pwwn->raw_wwn[2], pwwn->raw_wwn[3], pwwn->raw_wwn[4],
5934 pwwn->raw_wwn[5], pwwn->raw_wwn[6], pwwn->raw_wwn[7]));
5935
5936 ASSERT(hash_bucket < FCIP_DEST_HASH_ELEMS);
5937
5938 if (fcip_check_port_exists(fptr)) {
5939 /* fptr is stale, return fdestp */
5940 return (fdestp);
5941 }
5942 fport = fptr->fcip_port_info;
5943
5944 /*
5945 * First check if we have active I/Os going on with the
5946 * destination port (an entry would exist in fcip_dest hash table)
5947 */
5948 mutex_enter(&fptr->fcip_dest_mutex);
5949 fdestp = fptr->fcip_dest[hash_bucket];
5950 while (fdestp != NULL) {
5951 mutex_enter(&fdestp->fcipd_mutex);
5952 if (fdestp->fcipd_rtable) {
5953 if (fcip_wwn_compare(pwwn, &fdestp->fcipd_pwwn,
5954 FCIP_COMPARE_NWWN) == 0) {
5955 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
5956 (CE_NOTE, "found fdestp"));
5957 mutex_exit(&fdestp->fcipd_mutex);
5958 mutex_exit(&fptr->fcip_dest_mutex);
5959 return (fdestp);
5960 }
5961 }
5962 mutex_exit(&fdestp->fcipd_mutex);
5963 fdestp = fdestp->fcipd_next;
5964 }
5965 mutex_exit(&fptr->fcip_dest_mutex);
5966
5967 /*
5968 * We did not find the destination port information in our
5969 * active port list so search for an entry in our routing
5970 * table.
5971 */
5972 mutex_enter(&fptr->fcip_rt_mutex);
5973 frp = fcip_lookup_rtable(fptr, pwwn, FCIP_COMPARE_NWWN);
5974 mutex_exit(&fptr->fcip_rt_mutex);
5975
5976 if (frp == NULL || (frp && (!FCIP_RTE_UNAVAIL(frp->fcipr_state)) &&
5977 frp->fcipr_state != PORT_DEVICE_LOGGED_IN) ||
5978 (frp && frp->fcipr_pd == NULL)) {
5979 /*
5980 * No entry for the destination port in our routing
5981 * table too. First query the transport to see if it
5982 * already has structures for the destination port in
5983 * its hash tables. This must be done for all topologies
5984 * since we could have retired entries in the hash tables
5985 * which may have to be re-added without a statechange
5986 * callback happening. Its better to try and get an entry
5987 * for the destination port rather than simply failing a
5988 * request though it may be an overkill in private loop
5989 * topologies.
5990 * If a entry for the remote port exists in the transport's
5991 * hash tables, we are fine and can add the entry to our
5992 * routing and dest hash lists, Else for fabric configs we
5993 * query the nameserver if one exists or issue FARP ELS.
5994 */
5995
5996 /*
5997 * We need to do a PortName based Nameserver
5998 * query operation. So get the right PortWWN
5999 * for the adapter.
6000 */
6001 bcopy(pwwn, &twwn, sizeof (la_wwn_t));
6002
6003 /*
6004 * Try IEEE Name (Format 1) first, this is the default and
6005 * Emulex uses this format.
6006 */
6007 pd = fc_ulp_get_remote_port(fport->fcipp_handle,
6008 &twwn, &rval, 1);
6009
6010 if (rval != FC_SUCCESS) {
6011 /*
6012 * If IEEE Name (Format 1) query failed, try IEEE
6013 * Extended Name (Format 2) which Qlogic uses.
6014 * And try port 1 on Qlogic FC-HBA first.
6015 * Note: On x86, we need to byte swap the 32-bit
6016 * word first, after the modification, swap it back.
6017 */
6018 *twwnp = BE_32(*twwnp);
6019 twwn.w.nport_id = QLC_PORT_1_ID_BITS;
6020 twwn.w.naa_id = QLC_PORT_NAA;
6021 *twwnp = BE_32(*twwnp);
6022 pd = fc_ulp_get_remote_port(fport->fcipp_handle,
6023 &twwn, &rval, 1);
6024 }
6025
6026 if (rval != FC_SUCCESS) {
6027 /* If still failed, try port 2 on Qlogic FC-HBA. */
6028 *twwnp = BE_32(*twwnp);
6029 twwn.w.nport_id = QLC_PORT_2_ID_BITS;
6030 *twwnp = BE_32(*twwnp);
6031 pd = fc_ulp_get_remote_port(fport->fcipp_handle,
6032 &twwn, &rval, 1);
6033 }
6034
6035 if (rval == FC_SUCCESS) {
6036 fc_portmap_t map;
6037 /*
6038 * Add the newly found destination structure
6039 * to our routing table. Create a map with
6040 * the device we found. We could ask the
6041 * transport to give us the list of all
6042 * devices connected to our port but we
6043 * probably don't need to know all the devices
6044 * so let us just constuct a list with only
6045 * one device instead.
6046 */
6047
6048 fc_ulp_copy_portmap(&map, pd);
6049 fcip_rt_update(fptr, &map, 1);
6050
6051 mutex_enter(&fptr->fcip_rt_mutex);
6052 frp = fcip_lookup_rtable(fptr, pwwn,
6053 FCIP_COMPARE_NWWN);
6054 mutex_exit(&fptr->fcip_rt_mutex);
6055
6056 fdestp = fcip_add_dest(fptr, frp);
6057 } else if (fcip_farp_supported &&
6058 (FC_TOP_EXTERNAL(fport->fcipp_topology) ||
6059 (fport->fcipp_topology == FC_TOP_PT_PT))) {
6060 /*
6061 * The Name server request failed so
6062 * issue an FARP
6063 */
6064 fdestp = fcip_do_farp(fptr, pwwn, NULL,
6065 0, 0);
6066 } else {
6067 fdestp = NULL;
6068 }
6069 } else if (frp && frp->fcipr_state == PORT_DEVICE_LOGGED_IN) {
6070 /*
6071 * Prepare a dest structure to return to caller
6072 */
6073 fdestp = fcip_add_dest(fptr, frp);
6074 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
6075 (CE_NOTE, "in fcip get dest non fabric"));
6076 }
6077 return (fdestp);
6078 }
6079
6080
6081 /*
6082 * Endian clean WWN compare.
6083 * Returns 0 if they compare OK, else return non zero value.
6084 * flag can be bitwise OR of FCIP_COMPARE_NWWN, FCIP_COMPARE_PWWN,
6085 * FCIP_COMPARE_BROADCAST.
6086 */
6087 static int
6088 fcip_wwn_compare(la_wwn_t *wwn1, la_wwn_t *wwn2, int flag)
6089 {
6090 int rval = 0;
6091 if ((wwn1->raw_wwn[2] != wwn2->raw_wwn[2]) ||
6092 (wwn1->raw_wwn[3] != wwn2->raw_wwn[3]) ||
6093 (wwn1->raw_wwn[4] != wwn2->raw_wwn[4]) ||
6094 (wwn1->raw_wwn[5] != wwn2->raw_wwn[5]) ||
6095 (wwn1->raw_wwn[6] != wwn2->raw_wwn[6]) ||
6096 (wwn1->raw_wwn[7] != wwn2->raw_wwn[7])) {
6097 rval = 1;
6098 } else if ((flag == FCIP_COMPARE_PWWN) &&
6099 (((wwn1->raw_wwn[0] & 0xf0) != (wwn2->raw_wwn[0] & 0xf0)) ||
6100 (wwn1->raw_wwn[1] != wwn2->raw_wwn[1]))) {
6101 rval = 1;
6102 }
6103 return (rval);
6104 }
6105
6106
6107 /*
6108 * Add an entry for a remote port in the dest hash table. Dest hash table
6109 * has entries for ports in the routing hash table with which we decide
6110 * to establish IP communication with. The no. of entries in the dest hash
6111 * table must always be less than or equal to the entries in the routing
6112 * hash table. Every entry in the dest hash table ofcourse must have a
6113 * corresponding entry in the routing hash table
6114 */
6115 static struct fcip_dest *
6116 fcip_add_dest(struct fcip *fptr, struct fcip_routing_table *frp)
6117 {
6118 struct fcip_dest *fdestp = NULL;
6119 la_wwn_t *pwwn;
6120 int hash_bucket;
6121 struct fcip_dest *fdest_new;
6122
6123 if (frp == NULL) {
6124 return (fdestp);
6125 }
6126
6127 pwwn = &frp->fcipr_pwwn;
6128 mutex_enter(&fptr->fcip_dest_mutex);
6129 hash_bucket = FCIP_DEST_HASH(pwwn->raw_wwn);
6130 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
6131 (CE_NOTE, "add dest hash_bucket: 0x%x", hash_bucket));
6132
6133 ASSERT(hash_bucket < FCIP_DEST_HASH_ELEMS);
6134
6135 fdestp = fptr->fcip_dest[hash_bucket];
6136 while (fdestp != NULL) {
6137 mutex_enter(&fdestp->fcipd_mutex);
6138 if (fdestp->fcipd_rtable) {
6139 if (fcip_wwn_compare(pwwn, &fdestp->fcipd_pwwn,
6140 FCIP_COMPARE_PWWN) == 0) {
6141 mutex_exit(&fdestp->fcipd_mutex);
6142 mutex_exit(&fptr->fcip_dest_mutex);
6143 return (fdestp);
6144 }
6145 }
6146 mutex_exit(&fdestp->fcipd_mutex);
6147 fdestp = fdestp->fcipd_next;
6148 }
6149
6150 ASSERT(fdestp == NULL);
6151
6152 fdest_new = (struct fcip_dest *)
6153 kmem_zalloc(sizeof (struct fcip_dest), KM_SLEEP);
6154
6155 mutex_init(&fdest_new->fcipd_mutex, NULL, MUTEX_DRIVER, NULL);
6156 fdest_new->fcipd_next = fptr->fcip_dest[hash_bucket];
6157 fdest_new->fcipd_refcnt = 0;
6158 fdest_new->fcipd_rtable = frp;
6159 fdest_new->fcipd_ncmds = 0;
6160 fptr->fcip_dest[hash_bucket] = fdest_new;
6161 fdest_new->fcipd_flags = FCIP_PORT_NOTLOGGED;
6162
6163 mutex_exit(&fptr->fcip_dest_mutex);
6164 return (fdest_new);
6165 }
6166
6167 /*
6168 * Cleanup the dest hash table and remove all entries
6169 */
6170 static void
6171 fcip_cleanup_dest(struct fcip *fptr)
6172 {
6173 struct fcip_dest *fdestp = NULL;
6174 struct fcip_dest *fdest_delp = NULL;
6175 int i;
6176
6177 mutex_enter(&fptr->fcip_dest_mutex);
6178
6179 for (i = 0; i < FCIP_DEST_HASH_ELEMS; i++) {
6180 fdestp = fptr->fcip_dest[i];
6181 while (fdestp != NULL) {
6182 mutex_destroy(&fdestp->fcipd_mutex);
6183 fdest_delp = fdestp;
6184 fdestp = fdestp->fcipd_next;
6185 kmem_free(fdest_delp, sizeof (struct fcip_dest));
6186 fptr->fcip_dest[i] = NULL;
6187 }
6188 }
6189 mutex_exit(&fptr->fcip_dest_mutex);
6190 }
6191
6192
6193 /*
6194 * Send FARP requests for Fabric ports when we don't have the port
6195 * we wish to talk to in our routing hash table. FARP is specially required
6196 * to talk to FC switches for inband switch management. Most FC switches
6197 * today have a switch FC IP address for IP over FC inband switch management
6198 * but the WWN and Port_ID for this traffic is not available through the
6199 * Nameservers since the switch themeselves are transparent.
6200 */
6201 /* ARGSUSED */
6202 static struct fcip_dest *
6203 fcip_do_farp(struct fcip *fptr, la_wwn_t *pwwn, char *ip_addr,
6204 size_t ip_addr_len, int flags)
6205 {
6206 fcip_pkt_t *fcip_pkt;
6207 fc_packet_t *fc_pkt;
6208 fcip_port_info_t *fport = fptr->fcip_port_info;
6209 la_els_farp_t farp_cmd;
6210 la_els_farp_t *fcmd;
6211 struct fcip_dest *fdestp = NULL;
6212 int rval;
6213 clock_t farp_lbolt;
6214 la_wwn_t broadcast_wwn;
6215 struct fcip_dest *bdestp;
6216 struct fcip_routing_table *frp;
6217
6218 bdestp = fcip_get_dest(fptr, &broadcast_wwn);
6219
6220 if (bdestp == NULL) {
6221 return (fdestp);
6222 }
6223
6224 fcip_pkt = fcip_ipkt_alloc(fptr, sizeof (la_els_farp_t),
6225 sizeof (la_els_farp_t), bdestp->fcipd_pd, KM_SLEEP);
6226
6227 if (fcip_pkt == NULL) {
6228 return (fdestp);
6229 }
6230
6231 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6232 ether_to_wwn(&fcip_arpbroadcast_addr, &broadcast_wwn);
6233
6234 mutex_enter(&bdestp->fcipd_mutex);
6235 if (bdestp->fcipd_rtable == NULL) {
6236 mutex_exit(&bdestp->fcipd_mutex);
6237 fcip_ipkt_free(fcip_pkt);
6238 return (fdestp);
6239 }
6240
6241 fcip_pkt->fcip_pkt_dest = bdestp;
6242 fc_pkt->pkt_fca_device = bdestp->fcipd_fca_dev;
6243
6244 bdestp->fcipd_ncmds++;
6245 mutex_exit(&bdestp->fcipd_mutex);
6246
6247 fcip_init_broadcast_pkt(fcip_pkt, NULL, 1);
6248 fcip_pkt->fcip_pkt_flags |= FCIP_PKT_IN_LIST;
6249
6250 /*
6251 * Now initialize the FARP payload itself
6252 */
6253 fcmd = &farp_cmd;
6254 fcmd->ls_code.ls_code = LA_ELS_FARP_REQ;
6255 fcmd->ls_code.mbz = 0;
6256 /*
6257 * for now just match the Port WWN since the other match addr
6258 * code points are optional. We can explore matching the IP address
6259 * if needed
6260 */
6261 if (ip_addr) {
6262 fcmd->match_addr = FARP_MATCH_WW_PN_IPv4;
6263 } else {
6264 fcmd->match_addr = FARP_MATCH_WW_PN;
6265 }
6266
6267 /*
6268 * Request the responder port to log into us - that way
6269 * the Transport is aware of the remote port when we create
6270 * an entry for it in our tables
6271 */
6272 fcmd->resp_flags = FARP_INIT_REPLY | FARP_INIT_P_LOGI;
6273 fcmd->req_id = fport->fcipp_sid;
6274 fcmd->dest_id.port_id = fc_pkt->pkt_cmd_fhdr.d_id;
6275 bcopy(&fport->fcipp_pwwn, &fcmd->req_pwwn, sizeof (la_wwn_t));
6276 bcopy(&fport->fcipp_nwwn, &fcmd->req_nwwn, sizeof (la_wwn_t));
6277 bcopy(pwwn, &fcmd->resp_pwwn, sizeof (la_wwn_t));
6278 /*
6279 * copy in source IP address if we get to know it
6280 */
6281 if (ip_addr) {
6282 bcopy(ip_addr, fcmd->resp_ip, ip_addr_len);
6283 }
6284
6285 fc_pkt->pkt_cmdlen = sizeof (la_els_farp_t);
6286 fc_pkt->pkt_rsplen = sizeof (la_els_farp_t);
6287 fc_pkt->pkt_tran_type = FC_PKT_EXCHANGE;
6288 fc_pkt->pkt_ulp_private = (opaque_t)fcip_pkt;
6289
6290 /*
6291 * Endian safe copy
6292 */
6293 FCIP_CP_OUT(fcmd, fc_pkt->pkt_cmd, fc_pkt->pkt_cmd_acc,
6294 sizeof (la_els_farp_t));
6295
6296 /*
6297 * send the packet in polled mode.
6298 */
6299 rval = fc_ulp_issue_els(fport->fcipp_handle, fc_pkt);
6300 if (rval != FC_SUCCESS) {
6301 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_WARN,
6302 "fcip_transport of farp pkt failed 0x%x", rval));
6303 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_LIST;
6304 fcip_ipkt_free(fcip_pkt);
6305
6306 mutex_enter(&bdestp->fcipd_mutex);
6307 bdestp->fcipd_ncmds--;
6308 mutex_exit(&bdestp->fcipd_mutex);
6309
6310 return (fdestp);
6311 }
6312
6313 farp_lbolt = ddi_get_lbolt();
6314 farp_lbolt += drv_usectohz(FCIP_FARP_TIMEOUT);
6315
6316 mutex_enter(&fptr->fcip_mutex);
6317 fptr->fcip_farp_rsp_flag = 0;
6318 while (!fptr->fcip_farp_rsp_flag) {
6319 if (cv_timedwait(&fptr->fcip_farp_cv, &fptr->fcip_mutex,
6320 farp_lbolt) == -1) {
6321 /*
6322 * No FARP response from any destination port
6323 * so bail out.
6324 */
6325 fptr->fcip_farp_rsp_flag = 1;
6326 } else {
6327 /*
6328 * We received a FARP response - check to see if the
6329 * response was in reply to our FARP request.
6330 */
6331
6332 mutex_enter(&fptr->fcip_rt_mutex);
6333 frp = fcip_lookup_rtable(fptr, pwwn, FCIP_COMPARE_NWWN);
6334 mutex_exit(&fptr->fcip_rt_mutex);
6335
6336 if ((frp != NULL) &&
6337 !FCIP_RTE_UNAVAIL(frp->fcipr_state)) {
6338 fdestp = fcip_get_dest(fptr, pwwn);
6339 } else {
6340 /*
6341 * Not our FARP response so go back and wait
6342 * again till FARP_TIMEOUT expires
6343 */
6344 fptr->fcip_farp_rsp_flag = 0;
6345 }
6346 }
6347 }
6348 mutex_exit(&fptr->fcip_mutex);
6349
6350 fcip_pkt->fcip_pkt_flags |= FCIP_PKT_IN_LIST;
6351 fcip_ipkt_free(fcip_pkt);
6352 mutex_enter(&bdestp->fcipd_mutex);
6353 bdestp->fcipd_ncmds--;
6354 mutex_exit(&bdestp->fcipd_mutex);
6355 return (fdestp);
6356 }
6357
6358
6359
6360 /*
6361 * Helper routine to PLOGI to a remote port we wish to talk to.
6362 * This may not be required since the port driver does logins anyway,
6363 * but this can be required in fabric cases since FARP requests/responses
6364 * don't require you to be logged in?
6365 */
6366
6367 /* ARGSUSED */
6368 static int
6369 fcip_do_plogi(struct fcip *fptr, struct fcip_routing_table *frp)
6370 {
6371 fcip_pkt_t *fcip_pkt;
6372 fc_packet_t *fc_pkt;
6373 fcip_port_info_t *fport = fptr->fcip_port_info;
6374 la_els_logi_t logi;
6375 int rval;
6376 fc_frame_hdr_t *fr_hdr;
6377
6378 /*
6379 * Don't bother to login for broadcast RTE entries
6380 */
6381 if ((frp->fcipr_d_id.port_id == 0x0) ||
6382 (frp->fcipr_d_id.port_id == 0xffffff)) {
6383 return (FC_FAILURE);
6384 }
6385
6386 /*
6387 * We shouldn't pound in too many logins here
6388 *
6389 */
6390 if (frp->fcipr_state == FCIP_RT_LOGIN_PROGRESS ||
6391 frp->fcipr_state == PORT_DEVICE_LOGGED_IN) {
6392 return (FC_SUCCESS);
6393 }
6394
6395 fcip_pkt = fcip_ipkt_alloc(fptr, sizeof (la_els_logi_t),
6396 sizeof (la_els_logi_t), frp->fcipr_pd, KM_SLEEP);
6397
6398 if (fcip_pkt == NULL) {
6399 return (FC_FAILURE);
6400 }
6401
6402 /*
6403 * Update back pointer for login state update
6404 */
6405 fcip_pkt->fcip_pkt_frp = frp;
6406 frp->fcipr_state = FCIP_RT_LOGIN_PROGRESS;
6407
6408 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6409
6410 /*
6411 * Initialize frame header for ELS
6412 */
6413 fr_hdr = &fc_pkt->pkt_cmd_fhdr;
6414 fr_hdr->r_ctl = R_CTL_ELS_REQ;
6415 fr_hdr->type = FC_TYPE_EXTENDED_LS;
6416 fr_hdr->f_ctl = F_CTL_SEQ_INITIATIVE | F_CTL_FIRST_SEQ;
6417 fr_hdr->df_ctl = 0;
6418 fr_hdr->s_id = fport->fcipp_sid.port_id;
6419 fr_hdr->d_id = frp->fcipr_d_id.port_id;
6420 fr_hdr->seq_cnt = 0;
6421 fr_hdr->ox_id = 0xffff;
6422 fr_hdr->rx_id = 0xffff;
6423 fr_hdr->ro = 0;
6424
6425 fc_pkt->pkt_rsplen = sizeof (la_els_logi_t);
6426 fc_pkt->pkt_comp = fcip_ipkt_callback;
6427 fc_pkt->pkt_tran_type = FC_PKT_EXCHANGE;
6428 fc_pkt->pkt_timeout = 10; /* 10 seconds */
6429 fcip_pkt->fcip_pkt_ttl = fptr->fcip_timeout_ticks + fc_pkt->pkt_timeout;
6430 fc_pkt->pkt_ulp_private = (opaque_t)fcip_pkt;
6431
6432 /*
6433 * Everybody does class 3, so let's just set it. If the transport
6434 * knows better, it will deal with the class appropriately.
6435 */
6436
6437 fc_pkt->pkt_tran_flags = FC_TRAN_INTR | FC_TRAN_CLASS3;
6438
6439 /*
6440 * we need only fill in the ls_code and the cmd frame header
6441 */
6442 bzero((void *)&logi, sizeof (la_els_logi_t));
6443 logi.ls_code.ls_code = LA_ELS_PLOGI;
6444 logi.ls_code.mbz = 0;
6445
6446 FCIP_CP_OUT((uint8_t *)&logi, fc_pkt->pkt_cmd, fc_pkt->pkt_cmd_acc,
6447 sizeof (la_els_logi_t));
6448
6449 rval = fc_ulp_login(fport->fcipp_handle, &fc_pkt, 1);
6450 if (rval != FC_SUCCESS) {
6451 cmn_err(CE_WARN,
6452 "!fc_ulp_login failed for d_id: 0x%x, rval: 0x%x",
6453 frp->fcipr_d_id.port_id, rval);
6454 fcip_ipkt_free(fcip_pkt);
6455 }
6456 return (rval);
6457 }
6458
6459 /*
6460 * The packet callback routine - called from the transport/FCA after
6461 * it is done DMA'ing/sending out the packet contents on the wire so
6462 * that the alloc'ed packet can be freed
6463 */
6464 static void
6465 fcip_ipkt_callback(fc_packet_t *fc_pkt)
6466 {
6467 ls_code_t logi_req;
6468 ls_code_t logi_resp;
6469 fcip_pkt_t *fcip_pkt;
6470 fc_frame_hdr_t *fr_hdr;
6471 struct fcip *fptr;
6472 fcip_port_info_t *fport;
6473 struct fcip_routing_table *frp;
6474
6475 fr_hdr = &fc_pkt->pkt_cmd_fhdr;
6476
6477 FCIP_CP_IN(fc_pkt->pkt_resp, (uint8_t *)&logi_resp,
6478 fc_pkt->pkt_resp_acc, sizeof (logi_resp));
6479
6480 FCIP_CP_IN(fc_pkt->pkt_cmd, (uint8_t *)&logi_req, fc_pkt->pkt_cmd_acc,
6481 sizeof (logi_req));
6482
6483 fcip_pkt = (fcip_pkt_t *)fc_pkt->pkt_ulp_private;
6484 frp = fcip_pkt->fcip_pkt_frp;
6485 fptr = fcip_pkt->fcip_pkt_fptr;
6486 fport = fptr->fcip_port_info;
6487
6488 ASSERT(logi_req.ls_code == LA_ELS_PLOGI);
6489
6490 if (fc_pkt->pkt_state != FC_PKT_SUCCESS ||
6491 logi_resp.ls_code != LA_ELS_ACC) {
6492 /* EMPTY */
6493
6494 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_WARN,
6495 "opcode : 0x%x to d_id: 0x%x failed",
6496 logi_req.ls_code, fr_hdr->d_id));
6497
6498 mutex_enter(&fptr->fcip_rt_mutex);
6499 frp->fcipr_state = PORT_DEVICE_INVALID;
6500 frp->fcipr_invalid_timeout = fptr->fcip_timeout_ticks +
6501 (FCIP_RTE_TIMEOUT / 2);
6502 mutex_exit(&fptr->fcip_rt_mutex);
6503 } else {
6504 fc_portid_t d_id;
6505
6506 d_id.port_id = fr_hdr->d_id;
6507 d_id.priv_lilp_posit = 0;
6508
6509 /*
6510 * Update PLOGI results; FCA Handle, and Port device handles
6511 */
6512 mutex_enter(&fptr->fcip_rt_mutex);
6513 frp->fcipr_pd = fc_pkt->pkt_pd;
6514 frp->fcipr_fca_dev =
6515 fc_ulp_get_fca_device(fport->fcipp_handle, d_id);
6516 frp->fcipr_state = PORT_DEVICE_LOGGED_IN;
6517 mutex_exit(&fptr->fcip_rt_mutex);
6518 }
6519
6520 fcip_ipkt_free(fcip_pkt);
6521 }
6522
6523
6524 /*
6525 * pkt_alloc routine for outbound IP datagrams. The cache constructor
6526 * Only initializes the pkt_cmd_dma (which is where the outbound datagram
6527 * is stuffed) since we don't expect response
6528 */
6529 static fcip_pkt_t *
6530 fcip_pkt_alloc(struct fcip *fptr, mblk_t *bp, int flags, int datalen)
6531 {
6532 fcip_pkt_t *fcip_pkt;
6533 fc_packet_t *fc_pkt;
6534 ddi_dma_cookie_t pkt_cookie;
6535 ddi_dma_cookie_t *cp;
6536 uint32_t cnt;
6537 fcip_port_info_t *fport = fptr->fcip_port_info;
6538
6539 fcip_pkt = kmem_cache_alloc(fptr->fcip_xmit_cache, flags);
6540 if (fcip_pkt == NULL) {
6541 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM, (CE_WARN,
6542 "fcip_pkt_alloc: kmem_cache_alloc failed"));
6543 return (NULL);
6544 }
6545
6546 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6547 fcip_pkt->fcip_pkt_fcpktp = fc_pkt;
6548 fc_pkt->pkt_tran_flags = 0;
6549 fcip_pkt->fcip_pkt_dma_flags = 0;
6550
6551 /*
6552 * the cache constructor has allocated the dma handle
6553 */
6554 fc_pkt->pkt_cmd = (caddr_t)bp->b_rptr;
6555 if (ddi_dma_addr_bind_handle(fc_pkt->pkt_cmd_dma, NULL,
6556 (caddr_t)bp->b_rptr, datalen, DDI_DMA_WRITE | DDI_DMA_CONSISTENT,
6557 DDI_DMA_DONTWAIT, NULL, &pkt_cookie,
6558 &fc_pkt->pkt_cmd_cookie_cnt) != DDI_DMA_MAPPED) {
6559 goto fail;
6560 }
6561
6562 fcip_pkt->fcip_pkt_dma_flags |= FCIP_CMD_DMA_BOUND;
6563
6564 if (fc_pkt->pkt_cmd_cookie_cnt >
6565 fport->fcipp_cmd_dma_attr.dma_attr_sgllen) {
6566 goto fail;
6567 }
6568
6569 ASSERT(fc_pkt->pkt_cmd_cookie_cnt != 0);
6570
6571 cp = fc_pkt->pkt_cmd_cookie = (ddi_dma_cookie_t *)kmem_alloc(
6572 fc_pkt->pkt_cmd_cookie_cnt * sizeof (pkt_cookie),
6573 KM_NOSLEEP);
6574
6575 if (cp == NULL) {
6576 goto fail;
6577 }
6578
6579 *cp = pkt_cookie;
6580 cp++;
6581 for (cnt = 1; cnt < fc_pkt->pkt_cmd_cookie_cnt; cnt++, cp++) {
6582 ddi_dma_nextcookie(fc_pkt->pkt_cmd_dma, &pkt_cookie);
6583 *cp = pkt_cookie;
6584 }
6585
6586 fc_pkt->pkt_cmdlen = datalen;
6587
6588 fcip_pkt->fcip_pkt_mp = NULL;
6589 fcip_pkt->fcip_pkt_wq = NULL;
6590 fcip_pkt->fcip_pkt_dest = NULL;
6591 fcip_pkt->fcip_pkt_next = NULL;
6592 fcip_pkt->fcip_pkt_prev = NULL;
6593 fcip_pkt->fcip_pkt_state = 0;
6594 fcip_pkt->fcip_pkt_reason = 0;
6595 fcip_pkt->fcip_pkt_flags = 0;
6596 fcip_pkt->fcip_pkt_frp = NULL;
6597
6598 return (fcip_pkt);
6599 fail:
6600 if (fcip_pkt) {
6601 fcip_pkt_free(fcip_pkt, 0);
6602 }
6603 return ((fcip_pkt_t *)0);
6604 }
6605
6606 /*
6607 * Free a packet and all its associated resources
6608 */
6609 static void
6610 fcip_pkt_free(struct fcip_pkt *fcip_pkt, int free_mblk)
6611 {
6612 fc_packet_t *fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6613 struct fcip *fptr = fcip_pkt->fcip_pkt_fptr;
6614
6615 if (fc_pkt->pkt_cmd_cookie != NULL) {
6616 kmem_free(fc_pkt->pkt_cmd_cookie, fc_pkt->pkt_cmd_cookie_cnt *
6617 sizeof (ddi_dma_cookie_t));
6618 fc_pkt->pkt_cmd_cookie = NULL;
6619 }
6620
6621 fcip_free_pkt_dma(fcip_pkt);
6622 if (free_mblk && fcip_pkt->fcip_pkt_mp) {
6623 freemsg(fcip_pkt->fcip_pkt_mp);
6624 fcip_pkt->fcip_pkt_mp = NULL;
6625 }
6626
6627 (void) fc_ulp_uninit_packet(fptr->fcip_port_info->fcipp_handle, fc_pkt);
6628
6629 kmem_cache_free(fptr->fcip_xmit_cache, (void *)fcip_pkt);
6630 }
6631
6632 /*
6633 * Allocate a Packet for internal driver use. This is for requests
6634 * that originate from within the driver
6635 */
6636 static fcip_pkt_t *
6637 fcip_ipkt_alloc(struct fcip *fptr, int cmdlen, int resplen,
6638 opaque_t pd, int flags)
6639 {
6640 fcip_pkt_t *fcip_pkt;
6641 fc_packet_t *fc_pkt;
6642 int (*cb)(caddr_t);
6643 fcip_port_info_t *fport = fptr->fcip_port_info;
6644 size_t real_len;
6645 uint_t held_here = 0;
6646 ddi_dma_cookie_t pkt_cookie;
6647 ddi_dma_cookie_t *cp;
6648 uint32_t cnt;
6649
6650 cb = (flags == KM_SLEEP) ? DDI_DMA_SLEEP : DDI_DMA_DONTWAIT;
6651
6652 fcip_pkt = kmem_zalloc((sizeof (fcip_pkt_t) +
6653 fport->fcipp_fca_pkt_size), flags);
6654
6655 if (fcip_pkt == NULL) {
6656 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
6657 (CE_WARN, "pkt alloc of ineternal pkt failed"));
6658 goto fail;
6659 }
6660
6661 fcip_pkt->fcip_pkt_flags = FCIP_PKT_INTERNAL;
6662 fcip_pkt->fcip_pkt_fptr = fptr;
6663 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6664 fcip_pkt->fcip_pkt_fcpktp = fc_pkt;
6665 fc_pkt->pkt_tran_flags = 0;
6666 fc_pkt->pkt_cmdlen = 0;
6667 fc_pkt->pkt_rsplen = 0;
6668 fc_pkt->pkt_datalen = 0;
6669 fc_pkt->pkt_fca_private = (opaque_t)((caddr_t)fcip_pkt +
6670 sizeof (fcip_pkt_t));
6671 fc_pkt->pkt_ulp_private = (opaque_t)fcip_pkt;
6672
6673 if (cmdlen) {
6674 if (ddi_dma_alloc_handle(fptr->fcip_dip,
6675 &fport->fcipp_cmd_dma_attr, cb, NULL,
6676 &fc_pkt->pkt_cmd_dma) != DDI_SUCCESS) {
6677 goto fail;
6678 }
6679
6680 if (ddi_dma_mem_alloc(fc_pkt->pkt_cmd_dma, cmdlen,
6681 &fport->fcipp_fca_acc_attr, DDI_DMA_CONSISTENT,
6682 cb, NULL, (caddr_t *)&fc_pkt->pkt_cmd,
6683 &real_len, &fc_pkt->pkt_cmd_acc) != DDI_SUCCESS) {
6684 goto fail;
6685 }
6686
6687 fcip_pkt->fcip_pkt_dma_flags |= FCIP_CMD_DMA_MEM;
6688 fc_pkt->pkt_cmdlen = cmdlen;
6689
6690 if (real_len < cmdlen) {
6691 goto fail;
6692 }
6693
6694 if (ddi_dma_addr_bind_handle(fc_pkt->pkt_cmd_dma, NULL,
6695 (caddr_t)fc_pkt->pkt_cmd, real_len,
6696 DDI_DMA_WRITE | DDI_DMA_CONSISTENT, cb, NULL,
6697 &pkt_cookie, &fc_pkt->pkt_cmd_cookie_cnt) !=
6698 DDI_DMA_MAPPED) {
6699 goto fail;
6700 }
6701
6702 fcip_pkt->fcip_pkt_dma_flags |= FCIP_CMD_DMA_BOUND;
6703
6704 if (fc_pkt->pkt_cmd_cookie_cnt >
6705 fport->fcipp_cmd_dma_attr.dma_attr_sgllen) {
6706 goto fail;
6707 }
6708
6709 ASSERT(fc_pkt->pkt_cmd_cookie_cnt != 0);
6710
6711 cp = fc_pkt->pkt_cmd_cookie = (ddi_dma_cookie_t *)kmem_alloc(
6712 fc_pkt->pkt_cmd_cookie_cnt * sizeof (pkt_cookie),
6713 KM_NOSLEEP);
6714
6715 if (cp == NULL) {
6716 goto fail;
6717 }
6718
6719 *cp = pkt_cookie;
6720 cp++;
6721 for (cnt = 1; cnt < fc_pkt->pkt_cmd_cookie_cnt; cnt++, cp++) {
6722 ddi_dma_nextcookie(fc_pkt->pkt_cmd_dma, &pkt_cookie);
6723 *cp = pkt_cookie;
6724 }
6725 }
6726
6727 if (resplen) {
6728 if (ddi_dma_alloc_handle(fptr->fcip_dip,
6729 &fport->fcipp_resp_dma_attr, cb, NULL,
6730 &fc_pkt->pkt_resp_dma) != DDI_SUCCESS) {
6731 goto fail;
6732 }
6733
6734 if (ddi_dma_mem_alloc(fc_pkt->pkt_resp_dma, resplen,
6735 &fport->fcipp_fca_acc_attr, DDI_DMA_CONSISTENT,
6736 cb, NULL, (caddr_t *)&fc_pkt->pkt_resp,
6737 &real_len, &fc_pkt->pkt_resp_acc) != DDI_SUCCESS) {
6738 goto fail;
6739 }
6740
6741 fcip_pkt->fcip_pkt_dma_flags |= FCIP_RESP_DMA_MEM;
6742
6743 if (real_len < resplen) {
6744 goto fail;
6745 }
6746
6747 if (ddi_dma_addr_bind_handle(fc_pkt->pkt_resp_dma, NULL,
6748 (caddr_t)fc_pkt->pkt_resp, real_len,
6749 DDI_DMA_WRITE | DDI_DMA_CONSISTENT, cb, NULL,
6750 &pkt_cookie, &fc_pkt->pkt_resp_cookie_cnt) !=
6751 DDI_DMA_MAPPED) {
6752 goto fail;
6753 }
6754
6755 fcip_pkt->fcip_pkt_dma_flags |= FCIP_RESP_DMA_BOUND;
6756 fc_pkt->pkt_rsplen = resplen;
6757
6758 if (fc_pkt->pkt_resp_cookie_cnt >
6759 fport->fcipp_resp_dma_attr.dma_attr_sgllen) {
6760 goto fail;
6761 }
6762
6763 ASSERT(fc_pkt->pkt_resp_cookie_cnt != 0);
6764
6765 cp = fc_pkt->pkt_resp_cookie = (ddi_dma_cookie_t *)kmem_alloc(
6766 fc_pkt->pkt_resp_cookie_cnt * sizeof (pkt_cookie),
6767 KM_NOSLEEP);
6768
6769 if (cp == NULL) {
6770 goto fail;
6771 }
6772
6773 *cp = pkt_cookie;
6774 cp++;
6775 for (cnt = 1; cnt < fc_pkt->pkt_resp_cookie_cnt; cnt++, cp++) {
6776 ddi_dma_nextcookie(fc_pkt->pkt_resp_dma, &pkt_cookie);
6777 *cp = pkt_cookie;
6778 }
6779 }
6780
6781 /*
6782 * Initialize pkt_pd prior to calling fc_ulp_init_packet
6783 */
6784
6785 fc_pkt->pkt_pd = pd;
6786
6787 /*
6788 * Ask the FCA to bless the internal packet
6789 */
6790 if (fc_ulp_init_packet((opaque_t)fport->fcipp_handle,
6791 fc_pkt, flags) != FC_SUCCESS) {
6792 goto fail;
6793 }
6794
6795 /*
6796 * Keep track of # of ipkts alloc-ed
6797 * This function can get called with mutex either held or not. So, we'll
6798 * grab mutex if it is not already held by this thread.
6799 * This has to be cleaned up someday.
6800 */
6801 if (!MUTEX_HELD(&fptr->fcip_mutex)) {
6802 held_here = 1;
6803 mutex_enter(&fptr->fcip_mutex);
6804 }
6805
6806 fptr->fcip_num_ipkts_pending++;
6807
6808 if (held_here)
6809 mutex_exit(&fptr->fcip_mutex);
6810
6811 return (fcip_pkt);
6812 fail:
6813 if (fcip_pkt) {
6814 fcip_ipkt_free(fcip_pkt);
6815 }
6816
6817 return (NULL);
6818 }
6819
6820 /*
6821 * free up an internal IP packet (like a FARP pkt etc)
6822 */
6823 static void
6824 fcip_ipkt_free(fcip_pkt_t *fcip_pkt)
6825 {
6826 fc_packet_t *fc_pkt;
6827 struct fcip *fptr = fcip_pkt->fcip_pkt_fptr;
6828 fcip_port_info_t *fport = fptr->fcip_port_info;
6829
6830 ASSERT(fptr != NULL);
6831 ASSERT(!mutex_owned(&fptr->fcip_mutex));
6832
6833 /* One less ipkt to wait for */
6834 mutex_enter(&fptr->fcip_mutex);
6835 if (fptr->fcip_num_ipkts_pending) /* Safety check */
6836 fptr->fcip_num_ipkts_pending--;
6837 mutex_exit(&fptr->fcip_mutex);
6838
6839 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6840
6841 if (fc_pkt->pkt_cmd_cookie != NULL) {
6842 kmem_free(fc_pkt->pkt_cmd_cookie, fc_pkt->pkt_cmd_cookie_cnt *
6843 sizeof (ddi_dma_cookie_t));
6844 fc_pkt->pkt_cmd_cookie = NULL;
6845 }
6846
6847 if (fc_pkt->pkt_resp_cookie != NULL) {
6848 kmem_free(fc_pkt->pkt_resp_cookie, fc_pkt->pkt_resp_cookie_cnt *
6849 sizeof (ddi_dma_cookie_t));
6850 fc_pkt->pkt_resp_cookie = NULL;
6851 }
6852
6853 if (fc_ulp_uninit_packet(fport->fcipp_handle, fc_pkt) != FC_SUCCESS) {
6854 FCIP_DEBUG(FCIP_DEBUG_ELS, (CE_WARN,
6855 "fc_ulp_uninit_pkt failed for internal fc pkt 0x%p",
6856 (void *)fc_pkt));
6857 }
6858 fcip_free_pkt_dma(fcip_pkt);
6859 kmem_free(fcip_pkt, (sizeof (fcip_pkt_t) + fport->fcipp_fca_pkt_size));
6860 }
6861
6862 /*
6863 * initialize a unicast request. This is a misnomer because even the
6864 * broadcast requests are initialized with this routine
6865 */
6866 static void
6867 fcip_init_unicast_pkt(fcip_pkt_t *fcip_pkt, fc_portid_t sid, fc_portid_t did,
6868 void (*comp) ())
6869 {
6870 fc_packet_t *fc_pkt;
6871 fc_frame_hdr_t *fr_hdr;
6872 struct fcip *fptr = fcip_pkt->fcip_pkt_fptr;
6873
6874 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6875 fr_hdr = &fc_pkt->pkt_cmd_fhdr;
6876
6877 fr_hdr->r_ctl = R_CTL_DEVICE_DATA | R_CTL_UNSOL_DATA;
6878 fr_hdr->s_id = sid.port_id;
6879 fr_hdr->d_id = did.port_id;
6880 fr_hdr->type = FC_TYPE_IS8802_SNAP;
6881 fr_hdr->f_ctl = F_CTL_FIRST_SEQ | F_CTL_LAST_SEQ;
6882 fr_hdr->df_ctl = DF_CTL_NET_HDR;
6883 fr_hdr->seq_cnt = 0;
6884 fr_hdr->ox_id = 0xffff;
6885 fr_hdr->rx_id = 0xffff;
6886 fr_hdr->ro = 0;
6887 /*
6888 * reset all the length fields
6889 */
6890 fc_pkt->pkt_rsplen = 0;
6891 fc_pkt->pkt_datalen = 0;
6892 fc_pkt->pkt_comp = comp;
6893 if (comp) {
6894 fc_pkt->pkt_tran_flags |= FC_TRAN_INTR;
6895 } else {
6896 fc_pkt->pkt_tran_flags |= FC_TRAN_NO_INTR;
6897 }
6898 fc_pkt->pkt_tran_type = FC_PKT_OUTBOUND | FC_PKT_IP_WRITE;
6899 fc_pkt->pkt_timeout = fcip_pkt_ttl_ticks;
6900 fcip_pkt->fcip_pkt_ttl = fptr->fcip_timeout_ticks + fc_pkt->pkt_timeout;
6901 }
6902
6903
6904 /*
6905 * Initialize a fcip_packet for broadcast data transfers
6906 */
6907 static void
6908 fcip_init_broadcast_pkt(fcip_pkt_t *fcip_pkt, void (*comp) (), int is_els)
6909 {
6910 fc_packet_t *fc_pkt;
6911 fc_frame_hdr_t *fr_hdr;
6912 struct fcip *fptr = fcip_pkt->fcip_pkt_fptr;
6913 fcip_port_info_t *fport = fptr->fcip_port_info;
6914 uint32_t sid;
6915 uint32_t did;
6916
6917 FCIP_TNF_PROBE_1((fcip_init_broadcast_pkt, "fcip io", /* CSTYLED */,
6918 tnf_string, msg, "enter"));
6919 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6920 fr_hdr = &fc_pkt->pkt_cmd_fhdr;
6921 sid = fport->fcipp_sid.port_id;
6922
6923 if (is_els) {
6924 fr_hdr->r_ctl = R_CTL_ELS_REQ;
6925 } else {
6926 fr_hdr->r_ctl = R_CTL_DEVICE_DATA | R_CTL_UNSOL_DATA;
6927 }
6928 fr_hdr->s_id = sid;
6929 /*
6930 * The destination broadcast address depends on the topology
6931 * of the underlying port
6932 */
6933 did = fptr->fcip_broadcast_did;
6934 /*
6935 * mark pkt a broadcast pkt
6936 */
6937 fc_pkt->pkt_tran_type = FC_PKT_BROADCAST;
6938
6939 fr_hdr->d_id = did;
6940 fr_hdr->type = FC_TYPE_IS8802_SNAP;
6941 fr_hdr->f_ctl = F_CTL_FIRST_SEQ | F_CTL_LAST_SEQ | F_CTL_END_SEQ;
6942 fr_hdr->f_ctl &= ~(F_CTL_SEQ_INITIATIVE);
6943 fr_hdr->df_ctl = DF_CTL_NET_HDR;
6944 fr_hdr->seq_cnt = 0;
6945 fr_hdr->ox_id = 0xffff;
6946 fr_hdr->rx_id = 0xffff;
6947 fr_hdr->ro = 0;
6948 fc_pkt->pkt_comp = comp;
6949
6950 if (comp) {
6951 fc_pkt->pkt_tran_flags |= FC_TRAN_INTR;
6952 } else {
6953 fc_pkt->pkt_tran_flags |= FC_TRAN_NO_INTR;
6954 }
6955
6956 fc_pkt->pkt_tran_type = FC_PKT_BROADCAST;
6957 fc_pkt->pkt_timeout = fcip_pkt_ttl_ticks;
6958 fcip_pkt->fcip_pkt_ttl = fptr->fcip_timeout_ticks + fc_pkt->pkt_timeout;
6959 }
6960
6961
6962
6963 /*
6964 * Free up all DMA resources associated with an allocated packet
6965 */
6966 static void
6967 fcip_free_pkt_dma(fcip_pkt_t *fcip_pkt)
6968 {
6969 fc_packet_t *fc_pkt;
6970
6971 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
6972
6973 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
6974 (CE_NOTE, "in freepktdma : flags 0x%x",
6975 fcip_pkt->fcip_pkt_dma_flags));
6976
6977 if (fcip_pkt->fcip_pkt_dma_flags & FCIP_CMD_DMA_BOUND) {
6978 (void) ddi_dma_unbind_handle(fc_pkt->pkt_cmd_dma);
6979 }
6980 if (fcip_pkt->fcip_pkt_dma_flags & FCIP_CMD_DMA_MEM) {
6981 ddi_dma_mem_free(&fc_pkt->pkt_cmd_acc);
6982 }
6983
6984 if (fcip_pkt->fcip_pkt_dma_flags & FCIP_RESP_DMA_BOUND) {
6985 (void) ddi_dma_unbind_handle(fc_pkt->pkt_resp_dma);
6986 }
6987 if (fcip_pkt->fcip_pkt_dma_flags & FCIP_RESP_DMA_MEM) {
6988 ddi_dma_mem_free(&fc_pkt->pkt_resp_acc);
6989 }
6990 /*
6991 * for internal commands, we need to free up the dma handles too.
6992 * This is done in the cache destructor for non internal cmds
6993 */
6994 if (fcip_pkt->fcip_pkt_flags & FCIP_PKT_INTERNAL) {
6995 if (fc_pkt->pkt_cmd_dma) {
6996 ddi_dma_free_handle(&fc_pkt->pkt_cmd_dma);
6997 }
6998 if (fc_pkt->pkt_resp_dma) {
6999 ddi_dma_free_handle(&fc_pkt->pkt_resp_dma);
7000 }
7001 }
7002 }
7003
7004
7005 /*
7006 * helper routine to generate a string, given an ether addr
7007 */
7008 static void
7009 fcip_ether_to_str(struct ether_addr *e, caddr_t s)
7010 {
7011 int i;
7012
7013 for (i = 0; i < sizeof (struct ether_addr); i++, s += 2) {
7014 FCIP_DEBUG(FCIP_DEBUG_MISC,
7015 (CE_CONT, "0x%02X:", e->ether_addr_octet[i]));
7016 (void) sprintf(s, "%02X", e->ether_addr_octet[i]);
7017 }
7018
7019 *s = '\0';
7020 }
7021
7022 /*
7023 * When a broadcast request comes from the upper streams modules, it
7024 * is ugly to look into every datagram to figure out if it is a broadcast
7025 * datagram or a unicast packet. Instead just add the broadcast entries
7026 * into our routing and dest tables and the standard hash table look ups
7027 * will find the entries. It is a lot cleaner this way. Also Solaris ifconfig
7028 * seems to be very ethernet specific and it requires broadcasts to the
7029 * ether broadcast addr of 0xffffffffff to succeed even though we specified
7030 * in the dl_info request that our broadcast MAC addr is 0x0000000000
7031 * (can't figure out why RFC2625 did this though). So add broadcast entries
7032 * for both MAC address
7033 */
7034 static int
7035 fcip_dest_add_broadcast_entry(struct fcip *fptr, int new_flag)
7036 {
7037 fc_portmap_t map;
7038 struct fcip_routing_table *frp;
7039 uint32_t did;
7040 la_wwn_t broadcast_wwn;
7041
7042 /*
7043 * get port_id of destination for broadcast - this is topology
7044 * dependent
7045 */
7046 did = fptr->fcip_broadcast_did;
7047
7048 ether_to_wwn(&fcip_arpbroadcast_addr, &broadcast_wwn);
7049 bcopy((void *)&broadcast_wwn, (void *)&map.map_pwwn, sizeof (la_wwn_t));
7050 bcopy((void *)&broadcast_wwn, (void *)&map.map_nwwn, sizeof (la_wwn_t));
7051
7052 map.map_did.port_id = did;
7053 map.map_hard_addr.hard_addr = did;
7054 map.map_state = PORT_DEVICE_VALID;
7055 if (new_flag) {
7056 map.map_type = PORT_DEVICE_NEW;
7057 } else {
7058 map.map_type = PORT_DEVICE_CHANGED;
7059 }
7060 map.map_flags = 0;
7061 map.map_pd = NULL;
7062 bzero(&map.map_fc4_types, sizeof (map.map_fc4_types));
7063 fcip_rt_update(fptr, &map, 1);
7064 mutex_enter(&fptr->fcip_rt_mutex);
7065 frp = fcip_lookup_rtable(fptr, &broadcast_wwn, FCIP_COMPARE_NWWN);
7066 mutex_exit(&fptr->fcip_rt_mutex);
7067 if (frp == NULL) {
7068 return (FC_FAILURE);
7069 }
7070 (void) fcip_add_dest(fptr, frp);
7071 /*
7072 * The Upper IP layers expect the traditional broadcast MAC addr
7073 * of 0xff ff ff ff ff ff to work too if we want to plumb the fcip
7074 * stream through the /etc/hostname.fcipXX file. Instead of checking
7075 * each phys addr for a match with fcip's ARP header broadcast
7076 * addr (0x00 00 00 00 00 00), its simply easier to add another
7077 * broadcast entry for 0xff ff ff ff ff ff.
7078 */
7079 ether_to_wwn(&fcipnhbroadcastaddr, &broadcast_wwn);
7080 bcopy((void *)&broadcast_wwn, (void *)&map.map_pwwn, sizeof (la_wwn_t));
7081 bcopy((void *)&broadcast_wwn, (void *)&map.map_nwwn, sizeof (la_wwn_t));
7082 fcip_rt_update(fptr, &map, 1);
7083 mutex_enter(&fptr->fcip_rt_mutex);
7084 frp = fcip_lookup_rtable(fptr, &broadcast_wwn, FCIP_COMPARE_NWWN);
7085 mutex_exit(&fptr->fcip_rt_mutex);
7086 if (frp == NULL) {
7087 return (FC_FAILURE);
7088 }
7089 (void) fcip_add_dest(fptr, frp);
7090 return (FC_SUCCESS);
7091 }
7092
7093 /*
7094 * We need to obtain the D_ID of the broadcast port for transmitting all
7095 * our broadcast (and multicast) requests. The broadcast D_ID as we know
7096 * is dependent on the link topology
7097 */
7098 static uint32_t
7099 fcip_get_broadcast_did(struct fcip *fptr)
7100 {
7101 fcip_port_info_t *fport = fptr->fcip_port_info;
7102 uint32_t did = 0;
7103 uint32_t sid;
7104
7105 FCIP_TNF_PROBE_2((fcip_get_broadcast_did, "fcip io", /* CSTYLED */,
7106 tnf_string, msg, "enter",
7107 tnf_opaque, fptr, fptr));
7108
7109 sid = fport->fcipp_sid.port_id;
7110
7111 switch (fport->fcipp_topology) {
7112
7113 case FC_TOP_PT_PT: {
7114 fc_portmap_t *port_map = NULL;
7115 uint32_t listlen = 0;
7116
7117 if (fc_ulp_getportmap(fport->fcipp_handle, &port_map,
7118 &listlen, FC_ULP_PLOGI_DONTCARE) == FC_SUCCESS) {
7119 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_NOTE,
7120 "fcip_gpmap: listlen : 0x%x", listlen));
7121 if (listlen == 1) {
7122 did = port_map->map_did.port_id;
7123 }
7124 }
7125 if (port_map) {
7126 kmem_free(port_map, listlen * sizeof (fc_portmap_t));
7127 }
7128 if (listlen != 1) {
7129 /* Dummy return value */
7130 return (0x00FFFFFF);
7131 }
7132 break;
7133 }
7134
7135 case FC_TOP_NO_NS:
7136 /* FALLTHROUGH */
7137 case FC_TOP_FABRIC:
7138 /*
7139 * The broadcast address is the same whether or not
7140 * the switch/fabric contains a Name service.
7141 */
7142 did = 0x00FFFFFF;
7143 break;
7144
7145 case FC_TOP_PUBLIC_LOOP:
7146 /*
7147 * The open replicate primitive must not be used. The
7148 * broadcast sequence is simply sent to ALPA 0x00. The
7149 * fabric controller then propagates the broadcast to all
7150 * other ports. The fabric propagates the broadcast by
7151 * using the OPNfr primitive.
7152 */
7153 did = 0x00;
7154 break;
7155
7156 case FC_TOP_PRIVATE_LOOP:
7157 /*
7158 * The source port for broadcast in private loop mode
7159 * must send an OPN(fr) signal forcing all ports in the
7160 * loop to replicate the frames that they receive.
7161 */
7162 did = 0x00FFFFFF;
7163 break;
7164
7165 case FC_TOP_UNKNOWN:
7166 /* FALLTHROUGH */
7167 default:
7168 did = sid;
7169 FCIP_DEBUG(FCIP_DEBUG_INIT, (CE_WARN,
7170 "fcip(0x%x):unknown topology in init_broadcast_pkt",
7171 fptr->fcip_instance));
7172 break;
7173 }
7174 FCIP_TNF_PROBE_2((fcip_get_broadcast_did, "fcip io", /* CSTYLED */,
7175 tnf_string, msg, "return",
7176 tnf_opaque, did, did));
7177
7178 return (did);
7179 }
7180
7181
7182 /*
7183 * fcip timeout performs 2 operations:
7184 * 1. timeout any packets sent to the FCA for which a callback hasn't
7185 * happened. If you are wondering why we need a callback since all
7186 * traffic in FCIP is unidirectional, hence all exchanges are unidirectional
7187 * but wait, we can only free up the resources after we know the FCA has
7188 * DMA'ed out the data. pretty obvious eh :)
7189 *
7190 * 2. Retire and routing table entries we marked up for retiring. This is
7191 * to give the link a chance to recover instead of marking a port down
7192 * when we have lost all communication with it after a link transition
7193 */
7194 static void
7195 fcip_timeout(void *arg)
7196 {
7197 struct fcip *fptr = (struct fcip *)arg;
7198 int i;
7199 fcip_pkt_t *fcip_pkt;
7200 struct fcip_dest *fdestp;
7201 int index;
7202 struct fcip_routing_table *frtp;
7203 int dispatch_rte_removal = 0;
7204
7205 mutex_enter(&fptr->fcip_mutex);
7206
7207 fptr->fcip_flags |= FCIP_IN_TIMEOUT;
7208 fptr->fcip_timeout_ticks += fcip_tick_incr;
7209
7210 if (fptr->fcip_flags & (FCIP_DETACHED | FCIP_DETACHING | \
7211 FCIP_SUSPENDED | FCIP_POWER_DOWN)) {
7212 fptr->fcip_flags &= ~(FCIP_IN_TIMEOUT);
7213 mutex_exit(&fptr->fcip_mutex);
7214 return;
7215 }
7216
7217 if (fptr->fcip_port_state == FCIP_PORT_OFFLINE) {
7218 if (fptr->fcip_timeout_ticks > fptr->fcip_mark_offline) {
7219 fptr->fcip_flags |= FCIP_LINK_DOWN;
7220 }
7221 }
7222 if (!fptr->fcip_flags & FCIP_RTE_REMOVING) {
7223 dispatch_rte_removal = 1;
7224 }
7225 mutex_exit(&fptr->fcip_mutex);
7226
7227 /*
7228 * Check if we have any Invalid routing table entries in our
7229 * hashtable we have marked off for deferred removal. If any,
7230 * we can spawn a taskq thread to do the cleanup for us. We
7231 * need to avoid cleanup in the timeout thread since we may
7232 * have to wait for outstanding commands to complete before
7233 * we retire a routing table entry. Also dispatch the taskq
7234 * thread only if we are already do not have a taskq thread
7235 * dispatched.
7236 */
7237 if (dispatch_rte_removal) {
7238 mutex_enter(&fptr->fcip_rt_mutex);
7239 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
7240 frtp = fptr->fcip_rtable[index];
7241 while (frtp) {
7242 if ((frtp->fcipr_state == FCIP_RT_INVALID) &&
7243 (fptr->fcip_timeout_ticks >
7244 frtp->fcipr_invalid_timeout)) {
7245 /*
7246 * If we cannot schedule a task thread
7247 * let us attempt again on the next
7248 * tick rather than call
7249 * fcip_rte_remove_deferred() from here
7250 * directly since the routine can sleep.
7251 */
7252 frtp->fcipr_state = FCIP_RT_RETIRED;
7253
7254 mutex_enter(&fptr->fcip_mutex);
7255 fptr->fcip_flags |= FCIP_RTE_REMOVING;
7256 mutex_exit(&fptr->fcip_mutex);
7257
7258 if (taskq_dispatch(fptr->fcip_tq,
7259 fcip_rte_remove_deferred, fptr,
7260 KM_NOSLEEP) == 0) {
7261 /*
7262 * failed - so mark the entry
7263 * as invalid again.
7264 */
7265 frtp->fcipr_state =
7266 FCIP_RT_INVALID;
7267
7268 mutex_enter(&fptr->fcip_mutex);
7269 fptr->fcip_flags &=
7270 ~FCIP_RTE_REMOVING;
7271 mutex_exit(&fptr->fcip_mutex);
7272 }
7273 }
7274 frtp = frtp->fcipr_next;
7275 }
7276 }
7277 mutex_exit(&fptr->fcip_rt_mutex);
7278 }
7279
7280 mutex_enter(&fptr->fcip_dest_mutex);
7281
7282 /*
7283 * Now timeout any packets stuck with the transport/FCA for too long
7284 */
7285 for (i = 0; i < FCIP_DEST_HASH_ELEMS; i++) {
7286 fdestp = fptr->fcip_dest[i];
7287 while (fdestp != NULL) {
7288 mutex_enter(&fdestp->fcipd_mutex);
7289 for (fcip_pkt = fdestp->fcipd_head; fcip_pkt != NULL;
7290 fcip_pkt = fcip_pkt->fcip_pkt_next) {
7291 if (fcip_pkt->fcip_pkt_flags &
7292 (FCIP_PKT_RETURNED | FCIP_PKT_IN_TIMEOUT |
7293 FCIP_PKT_IN_ABORT)) {
7294 continue;
7295 }
7296 if (fptr->fcip_timeout_ticks >
7297 fcip_pkt->fcip_pkt_ttl) {
7298 fcip_pkt->fcip_pkt_flags |=
7299 FCIP_PKT_IN_TIMEOUT;
7300
7301 mutex_exit(&fdestp->fcipd_mutex);
7302 if (taskq_dispatch(fptr->fcip_tq,
7303 fcip_pkt_timeout, fcip_pkt,
7304 KM_NOSLEEP) == 0) {
7305 /*
7306 * timeout immediately
7307 */
7308 fcip_pkt_timeout(fcip_pkt);
7309 }
7310 mutex_enter(&fdestp->fcipd_mutex);
7311 /*
7312 * The linked list is altered because
7313 * of one of the following reasons:
7314 * a. Timeout code dequeued a pkt
7315 * b. Pkt completion happened
7316 *
7317 * So restart the spin starting at
7318 * the head again; This is a bit
7319 * excessive, but okay since
7320 * fcip_timeout_ticks isn't incremented
7321 * for this spin, we will skip the
7322 * not-to-be-timedout packets quickly
7323 */
7324 fcip_pkt = fdestp->fcipd_head;
7325 if (fcip_pkt == NULL) {
7326 break;
7327 }
7328 }
7329 }
7330 mutex_exit(&fdestp->fcipd_mutex);
7331 fdestp = fdestp->fcipd_next;
7332 }
7333 }
7334 mutex_exit(&fptr->fcip_dest_mutex);
7335
7336 /*
7337 * reschedule the timeout thread
7338 */
7339 mutex_enter(&fptr->fcip_mutex);
7340
7341 fptr->fcip_timeout_id = timeout(fcip_timeout, fptr,
7342 drv_usectohz(1000000));
7343 fptr->fcip_flags &= ~(FCIP_IN_TIMEOUT);
7344 mutex_exit(&fptr->fcip_mutex);
7345 }
7346
7347
7348 /*
7349 * This routine is either called from taskq or directly from fcip_timeout
7350 * does the actual job of aborting the packet
7351 */
7352 static void
7353 fcip_pkt_timeout(void *arg)
7354 {
7355 fcip_pkt_t *fcip_pkt = (fcip_pkt_t *)arg;
7356 struct fcip_dest *fdestp;
7357 struct fcip *fptr;
7358 fc_packet_t *fc_pkt;
7359 fcip_port_info_t *fport;
7360 int rval;
7361
7362 fdestp = fcip_pkt->fcip_pkt_dest;
7363 fptr = fcip_pkt->fcip_pkt_fptr;
7364 fport = fptr->fcip_port_info;
7365 fc_pkt = FCIP_PKT_TO_FC_PKT(fcip_pkt);
7366
7367 /*
7368 * try to abort the pkt
7369 */
7370 fcip_pkt->fcip_pkt_flags |= FCIP_PKT_IN_ABORT;
7371 rval = fc_ulp_abort(fport->fcipp_handle, fc_pkt, KM_NOSLEEP);
7372
7373 FCIP_DEBUG(FCIP_DEBUG_DOWNSTREAM,
7374 (CE_NOTE, "fc_ulp_abort returns: 0x%x", rval));
7375
7376 if (rval == FC_SUCCESS) {
7377 ASSERT(fdestp != NULL);
7378
7379 /*
7380 * dequeue the pkt from the dest structure pkt list
7381 */
7382 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_ABORT;
7383 mutex_enter(&fdestp->fcipd_mutex);
7384 rval = fcip_fdestp_dequeue_pkt(fdestp, fcip_pkt);
7385 ASSERT(rval == 1);
7386 mutex_exit(&fdestp->fcipd_mutex);
7387
7388 /*
7389 * Now cleanup the pkt and free the mblk
7390 */
7391 fcip_pkt_free(fcip_pkt, 1);
7392 } else {
7393 /*
7394 * abort failed - just mark the pkt as done and
7395 * wait for it to complete in fcip_pkt_callback since
7396 * the pkt has already been xmitted by the FCA
7397 */
7398 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_TIMEOUT;
7399 if (fcip_pkt->fcip_pkt_flags & FCIP_PKT_RETURNED) {
7400 fcip_pkt->fcip_pkt_flags &= ~FCIP_PKT_IN_ABORT;
7401 mutex_enter(&fdestp->fcipd_mutex);
7402 rval = fcip_fdestp_dequeue_pkt(fdestp, fcip_pkt);
7403 ASSERT(rval == 1);
7404 mutex_exit(&fdestp->fcipd_mutex);
7405
7406 fcip_pkt_free(fcip_pkt, 1);
7407 }
7408 return;
7409 }
7410 }
7411
7412
7413 /*
7414 * Remove a routing table entry marked for deferred removal. This routine
7415 * unlike fcip_pkt_timeout, is always called from a taskq context
7416 */
7417 static void
7418 fcip_rte_remove_deferred(void *arg)
7419 {
7420 struct fcip *fptr = (struct fcip *)arg;
7421 int hash_bucket;
7422 struct fcip_dest *fdestp;
7423 la_wwn_t *pwwn;
7424 int index;
7425 struct fcip_routing_table *frtp, *frtp_next, *frtp_prev;
7426
7427
7428 mutex_enter(&fptr->fcip_rt_mutex);
7429 for (index = 0; index < FCIP_RT_HASH_ELEMS; index++) {
7430 frtp = fptr->fcip_rtable[index];
7431 frtp_prev = NULL;
7432 while (frtp) {
7433 frtp_next = frtp->fcipr_next;
7434
7435 if (frtp->fcipr_state == FCIP_RT_RETIRED) {
7436
7437 pwwn = &frtp->fcipr_pwwn;
7438 /*
7439 * Get hold of destination pointer
7440 */
7441 mutex_enter(&fptr->fcip_dest_mutex);
7442
7443 hash_bucket = FCIP_DEST_HASH(pwwn->raw_wwn);
7444 ASSERT(hash_bucket < FCIP_DEST_HASH_ELEMS);
7445
7446 fdestp = fptr->fcip_dest[hash_bucket];
7447 while (fdestp != NULL) {
7448 mutex_enter(&fdestp->fcipd_mutex);
7449 if (fdestp->fcipd_rtable) {
7450 if (fcip_wwn_compare(pwwn,
7451 &fdestp->fcipd_pwwn,
7452 FCIP_COMPARE_PWWN) == 0) {
7453 mutex_exit(
7454 &fdestp->fcipd_mutex);
7455 break;
7456 }
7457 }
7458 mutex_exit(&fdestp->fcipd_mutex);
7459 fdestp = fdestp->fcipd_next;
7460 }
7461
7462 mutex_exit(&fptr->fcip_dest_mutex);
7463 if (fdestp == NULL) {
7464 frtp_prev = frtp;
7465 frtp = frtp_next;
7466 continue;
7467 }
7468
7469 mutex_enter(&fdestp->fcipd_mutex);
7470 if (fdestp->fcipd_ncmds) {
7471 /*
7472 * Instead of waiting to drain commands
7473 * let us revisit this RT entry in
7474 * the next pass.
7475 */
7476 mutex_exit(&fdestp->fcipd_mutex);
7477 frtp_prev = frtp;
7478 frtp = frtp_next;
7479 continue;
7480 }
7481
7482 /*
7483 * We are clean, so remove the RTE
7484 */
7485 fdestp->fcipd_rtable = NULL;
7486 mutex_exit(&fdestp->fcipd_mutex);
7487
7488 FCIP_TNF_PROBE_2((fcip_rte_remove_deferred,
7489 "fcip io", /* CSTYLED */,
7490 tnf_string, msg,
7491 "remove retired routing entry",
7492 tnf_int, index, index));
7493
7494 if (frtp_prev == NULL) {
7495 /* first element */
7496 fptr->fcip_rtable[index] =
7497 frtp->fcipr_next;
7498 } else {
7499 frtp_prev->fcipr_next =
7500 frtp->fcipr_next;
7501 }
7502 kmem_free(frtp,
7503 sizeof (struct fcip_routing_table));
7504
7505 frtp = frtp_next;
7506 } else {
7507 frtp_prev = frtp;
7508 frtp = frtp_next;
7509 }
7510 }
7511 }
7512 mutex_exit(&fptr->fcip_rt_mutex);
7513 /*
7514 * Clear the RTE_REMOVING flag
7515 */
7516 mutex_enter(&fptr->fcip_mutex);
7517 fptr->fcip_flags &= ~FCIP_RTE_REMOVING;
7518 mutex_exit(&fptr->fcip_mutex);
7519 }
7520
7521 /*
7522 * Walk through all the dest hash table entries and count up the total
7523 * no. of packets outstanding against a given port
7524 */
7525 static int
7526 fcip_port_get_num_pkts(struct fcip *fptr)
7527 {
7528 int num_cmds = 0;
7529 int i;
7530 struct fcip_dest *fdestp;
7531
7532 ASSERT(mutex_owned(&fptr->fcip_dest_mutex));
7533
7534 for (i = 0; i < FCIP_DEST_HASH_ELEMS; i++) {
7535 fdestp = fptr->fcip_dest[i];
7536 while (fdestp != NULL) {
7537 mutex_enter(&fdestp->fcipd_mutex);
7538
7539 ASSERT(fdestp->fcipd_ncmds >= 0);
7540
7541 if (fdestp->fcipd_ncmds > 0) {
7542 num_cmds += fdestp->fcipd_ncmds;
7543 }
7544 mutex_exit(&fdestp->fcipd_mutex);
7545 fdestp = fdestp->fcipd_next;
7546 }
7547 }
7548
7549 return (num_cmds);
7550 }
7551
7552
7553 /*
7554 * Walk through the routing table for this state instance and see if there is a
7555 * PLOGI in progress for any of the entries. Return success even if we find one.
7556 */
7557 static int
7558 fcip_plogi_in_progress(struct fcip *fptr)
7559 {
7560 int i;
7561 struct fcip_routing_table *frp;
7562
7563 ASSERT(mutex_owned(&fptr->fcip_rt_mutex));
7564
7565 for (i = 0; i < FCIP_RT_HASH_ELEMS; i++) {
7566 frp = fptr->fcip_rtable[i];
7567 while (frp) {
7568 if (frp->fcipr_state == FCIP_RT_LOGIN_PROGRESS) {
7569 /* Found an entry where PLOGI is in progress */
7570 return (1);
7571 }
7572 frp = frp->fcipr_next;
7573 }
7574 }
7575
7576 return (0);
7577 }
7578
7579 /*
7580 * Walk through the fcip port global list and check if the given port exists in
7581 * the list. Returns "0" if port exists and "1" if otherwise.
7582 */
7583 static int
7584 fcip_check_port_exists(struct fcip *fptr)
7585 {
7586 fcip_port_info_t *cur_fport;
7587 fcip_port_info_t *fport;
7588
7589 mutex_enter(&fcip_global_mutex);
7590 fport = fptr->fcip_port_info;
7591 cur_fport = fcip_port_head;
7592 while (cur_fport != NULL) {
7593 if (cur_fport == fport) {
7594 /* Found */
7595 mutex_exit(&fcip_global_mutex);
7596 return (0);
7597 } else {
7598 cur_fport = cur_fport->fcipp_next;
7599 }
7600 }
7601 mutex_exit(&fcip_global_mutex);
7602
7603 return (1);
7604 }
7605
7606 /*
7607 * Constructor to initialize the sendup elements for callback into
7608 * modules upstream
7609 */
7610
7611 /* ARGSUSED */
7612 static int
7613 fcip_sendup_constructor(void *buf, void *arg, int flags)
7614 {
7615 struct fcip_sendup_elem *msg_elem = (struct fcip_sendup_elem *)buf;
7616 fcip_port_info_t *fport = (fcip_port_info_t *)arg;
7617
7618 ASSERT(fport != NULL);
7619
7620 msg_elem->fcipsu_mp = NULL;
7621 msg_elem->fcipsu_func = NULL;
7622 msg_elem->fcipsu_next = NULL;
7623
7624 return (FCIP_SUCCESS);
7625 }