xref: /illumos-gate/usr/src/uts/common/io/ib/ibnex/ibnex.c (revision 46b592853d0f4f11781b6b0a7533f267c6aee132)
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 2009 Sun Microsystems, Inc.  All rights reserved.
23  * Use is subject to license terms.
24  */
25 
26 /*
27  * The InfiniBand  Nexus driver (IB nexus) is a bus nexus driver for IB bus.
28  * It supports  Port nodes, Virtual Physical Point of Attachment nodes (VPPA)
29  * for  HCAs registered with IBTL and IOC nodes for all the IOCs present in
30  * the IB fabric (that are accessible to the host). It also supports Pseudo
31  * device children to be enumerated using their .conf file(s). All Port nodes
32  * and VPPA nodes are children of HCA drivers. All the IOC nodes and the Pseudo
33  * device nodes are children of the IB nexus driver.
34  *
35  * IB nexus driver provides bus nexus entry points to all the HCA drivers.
36  *
37  * IB nexus  driver registers with  InfiniBand Device  Manager (IBDM) to get
38  * information about all the HCA ports and  I/O Controllers (IOCs) connected
39  * to the IB fabric. Based on that information, IB nexus will create all the
40  * device tree nodes.
41  */
42 
43 #include <sys/conf.h>
44 #include <sys/stat.h>
45 #include <sys/modctl.h>
46 #include <sys/taskq.h>
47 #include <sys/mdi_impldefs.h>
48 #include <sys/sunmdi.h>
49 #include <sys/sunpm.h>
50 #include <sys/ib/mgt/ibdm/ibdm_impl.h>
51 #include <sys/ib/ibnex/ibnex.h>
52 #include <sys/ib/ibnex/ibnex_devctl.h>
53 #include <sys/ib/ibtl/ibti.h>
54 #include <sys/ib/ibtl/impl/ibtl_ibnex.h>
55 #include <sys/file.h>
56 #include <sys/hwconf.h>
57 #include <sys/fs/dv_node.h>
58 
59 /* Function prototypes */
60 static int		ibnex_attach(dev_info_t *, ddi_attach_cmd_t);
61 static int		ibnex_getinfo(dev_info_t *, ddi_info_cmd_t,
62 			    void *, void **);
63 static int		ibnex_detach(dev_info_t *, ddi_detach_cmd_t);
64 static int		ibnex_busctl(dev_info_t *,
65 			    dev_info_t *, ddi_ctl_enum_t, void *, void *);
66 static int		ibnex_map_fault(dev_info_t *,
67 			    dev_info_t *, struct hat *, struct seg *,
68 			    caddr_t, struct devpage *, pfn_t, uint_t, uint_t);
69 static int		ibnex_init_child(dev_info_t *);
70 static ibnex_rval_t	ibnex_comm_svc_init(char *, ibnex_node_type_t);
71 static void		ibnex_comm_svc_fini();
72 dev_info_t		*ibnex_commsvc_initnode(dev_info_t *,
73 			    ibdm_port_attr_t *, int, int, ib_pkey_t, int *,
74 			    int);
75 static void		ibnex_delete_port_node_data(ibnex_node_data_t *);
76 int			ibnex_get_dip_from_guid(ib_guid_t, int,
77 			    ib_pkey_t, dev_info_t **);
78 static ibnex_node_data_t *ibnex_is_node_data_present(ibnex_node_type_t,
79 			    void *, int, ib_pkey_t);
80 static ibnex_node_data_t *ibnex_init_child_nodedata(ibnex_node_type_t, void *,
81 			    int, ib_pkey_t);
82 static int		ibnex_create_port_node_prop(ibdm_port_attr_t *,
83 			    dev_info_t *, char *, ib_pkey_t);
84 void			ibnex_dm_callback(void *, ibdm_events_t);
85 static int		ibnex_create_port_compatible_prop(dev_info_t *,
86 			    char *, ibdm_port_attr_t *);
87 static int		ibnex_create_ioc_srv_props(
88 			    dev_info_t *, ibdm_ioc_info_t *);
89 static int		ibnex_get_eventcookie(dev_info_t *,
90 			    dev_info_t *, char *, ddi_eventcookie_t *);
91 static int		ibnex_add_eventcall(dev_info_t *, dev_info_t *,
92 			    ddi_eventcookie_t, void (*)(dev_info_t *,
93 			    ddi_eventcookie_t, void *, void *),
94 			    void *arg, ddi_callback_id_t *cb_id);
95 static int		ibnex_remove_eventcall(dev_info_t *,
96 			    ddi_callback_id_t);
97 static int		ibnex_post_event(dev_info_t *, dev_info_t *,
98 			    ddi_eventcookie_t, void *);
99 static int		ibnex_bus_config(dev_info_t *, uint_t,
100 			    ddi_bus_config_op_t, void *, dev_info_t **);
101 static int		ibnex_bus_unconfig(dev_info_t *,
102 			    uint_t, ddi_bus_config_op_t, void *);
103 static dev_info_t	*ibnex_config_port_node(dev_info_t *, char *);
104 static dev_info_t	*ibnex_config_obp_args(dev_info_t *, char *);
105 static int		ibnex_get_pkey_commsvc_index_portnum(
106 			    char *, int *, ib_pkey_t *, uint8_t *);
107 static void		ibnex_config_all_children(dev_info_t *);
108 static int		ibnex_devname_to_portnum(char *, uint8_t *);
109 static void		ibnex_create_vppa_nodes(
110 			    dev_info_t *, ibdm_port_attr_t *);
111 static void		ibnex_create_port_nodes(
112 			    dev_info_t *, ibdm_port_attr_t *);
113 static void		ibnex_create_hcasvc_nodes(
114 			    dev_info_t *, ibdm_port_attr_t *);
115 static int		ibnex_config_root_iocnode(dev_info_t *, char *);
116 static int		ibnex_devname2port(char *, int *);
117 static int		ibnex_config_ioc_node(char *, dev_info_t *);
118 static int		ibnex_devname_to_node_n_ioc_guids(
119 			    char *, ib_guid_t *, ib_guid_t *, char **);
120 static void		ibnex_ioc_node_cleanup();
121 static void		ibnex_delete_ioc_node_data(ibnex_node_data_t *);
122 int			ibnex_ioc_initnode_all_pi(ibdm_ioc_info_t *);
123 static int		ibnex_ioc_initnode_pdip(ibnex_node_data_t *,
124 			    ibdm_ioc_info_t *, dev_info_t *);
125 static int		ibnex_create_ioc_node_prop(
126 			    ibdm_ioc_info_t *, dev_info_t *);
127 static int		ibnex_create_ioc_compatible_prop(
128 			    dev_info_t *, ib_dm_ioc_ctrl_profile_t *);
129 uint64_t		ibnex_str2hex(char *, int, int *);
130 static int		ibnex_str2int(char *, int, int *);
131 static int		ibnex_create_ioc_portgid_prop(
132 			    dev_info_t *, ibdm_ioc_info_t *);
133 static void		ibnex_wakeup_reprobe_ioc(ibnex_node_data_t *, int);
134 static void		ibnex_wakeup_reprobe_all();
135 ibt_status_t		ibnex_ibtl_callback(ibtl_ibnex_cb_args_t *);
136 static int		ibnex_prom_devname_to_pkey_n_portnum(
137 			    char *, ib_pkey_t *, uint8_t *);
138 void			ibnex_pseudo_initnodes(void);
139 static char		*ibnex_lookup_named_prop(ddi_prop_t *, char *);
140 static void		ibnex_pseudo_node_cleanup(void);
141 static int		ibnex_name_child(dev_info_t *, char *, int);
142 static int		ibnex_name_pseudo_child(dev_info_t *, char *);
143 
144 void			ibnex_reprobe_ioc_dev(void *);
145 void			ibnex_reprobe_ioc_all();
146 static void		ibnex_update_prop(ibnex_node_data_t *,
147 			    ibdm_ioc_info_t *);
148 static ibnex_rval_t	ibnex_unique_svcname(char *);
149 static void		ibnex_handle_reprobe_dev(void *arg);
150 
151 extern int		ibnex_open(dev_t *, int, int, cred_t *);
152 extern int		ibnex_close(dev_t, int, int, cred_t *);
153 extern int		ibnex_ioctl(dev_t, int, intptr_t, int, cred_t *, int *);
154 extern int		ibnex_offline_childdip(dev_info_t *);
155 
156 static int		ibnex_ioc_create_pi(
157 			    ibdm_ioc_info_t *, ibnex_node_data_t *,
158 			    dev_info_t *, int *);
159 static int		ibnex_bus_power(dev_info_t *, void *,
160 			    pm_bus_power_op_t, void *, void *);
161 int			ibnex_pseudo_create_all_pi(ibnex_node_data_t *);
162 static int		ibnex_pseudo_create_pi_pdip(ibnex_node_data_t *,
163 			    dev_info_t *);
164 static int		ibnex_pseudo_config_one(
165 			    ibnex_node_data_t *, char *, dev_info_t *);
166 static int		ibnex_pseudo_mdi_config_one(int, void *, dev_info_t **,
167 			    char *, char *);
168 static void		ibnex_config_pseudo_all(dev_info_t *);
169 static int		ibnex_ioc_bus_config_one(dev_info_t **, uint_t,
170 			    ddi_bus_config_op_t, void *, dev_info_t **, int *);
171 static int		ibnex_is_merge_node(dev_info_t *);
172 static void		ibnex_hw_in_dev_tree(char *);
173 static int		ibnex_ioc_config_from_pdip(ibdm_ioc_info_t *,
174     dev_info_t *, int);
175 static int		ibnex_ioc_pi_exists(ibnex_node_data_t *, dev_info_t *);
176 static int		ibnex_ioc_pi_reachable(ibdm_ioc_info_t *,
177     dev_info_t *);
178 
179 /*
180  * The bus_ops structure defines the capabilities of HCA nexus driver.
181  */
182 struct bus_ops ibnex_ci_busops = {
183 	BUSO_REV,
184 	nullbusmap,		/* bus_map */
185 	NULL,			/* bus_get_intrspec */
186 	NULL,			/* bus_add_intrspec */
187 	NULL,			/* bus_remove_intrspec */
188 	ibnex_map_fault,	/* Map Fault */
189 	ddi_no_dma_map,		/* DMA related entry points */
190 	NULL,
191 	NULL,
192 	NULL,
193 	NULL,
194 	NULL,
195 	NULL,
196 	NULL,
197 	ibnex_busctl,		/* bus_ctl */
198 	ddi_bus_prop_op,	/* bus_prop_op */
199 	NULL,			/* bus_get_eventcookie	*/
200 	NULL,			/* bus_add_eventcall	*/
201 	NULL,			/* bus_remove_eventcall	*/
202 	NULL,			/* bus_post_event	*/
203 	NULL,
204 	ibnex_bus_config,	/* bus config */
205 	ibnex_bus_unconfig	/* bus unconfig */
206 };
207 
208 /*
209  * Prototype declarations for the VHCI options
210  */
211 /*
212  * Functions registered with the mpxio framework
213  */
214 static int ib_vhci_pi_init(dev_info_t *, mdi_pathinfo_t *, int);
215 static int ib_vhci_pi_uninit(dev_info_t *, mdi_pathinfo_t *, int);
216 static int ib_vhci_pi_state_change(dev_info_t *, mdi_pathinfo_t *,
217 		mdi_pathinfo_state_t, uint32_t, int);
218 static int ib_vhci_failover(dev_info_t *, dev_info_t *, int);
219 
220 
221 static mdi_vhci_ops_t ibnex_vhci_ops = {
222 	MDI_VHCI_OPS_REV,
223 	ib_vhci_pi_init,
224 	ib_vhci_pi_uninit,
225 	ib_vhci_pi_state_change,
226 	ib_vhci_failover
227 };
228 
229 
230 /*
231  * The  bus_ops  structure  defines the  capabilities  of IB nexus driver.
232  * IB nexus drivers does not  support any DMA  operations for its children
233  * as there is  no  such concept in Infiniband.  All the memory operations
234  * and DMA operations required by the child drivers can be performed using
235  * the IBTF API.
236  */
237 struct bus_ops ibnex_bus_ops = {
238 	BUSO_REV,
239 	nullbusmap,		/* bus_map */
240 	NULL,			/* bus_get_intrspec */
241 	NULL,			/* bus_add_intrspec */
242 	NULL,			/* bus_remove_intrspec */
243 	ibnex_map_fault,	/* Map Fault */
244 	ddi_no_dma_map,		/* DMA related entry points */
245 	ddi_no_dma_allochdl,
246 	NULL,
247 	NULL,
248 	NULL,
249 	NULL,
250 	NULL,
251 	NULL,
252 	ibnex_busctl,		/* bus_ctl */
253 	ddi_bus_prop_op,	/* bus_prop_op */
254 	ibnex_get_eventcookie,	/* bus_get_eventcookie	*/
255 	ibnex_add_eventcall,	/* bus_add_eventcall	*/
256 	ibnex_remove_eventcall,	/* bus_remove_eventcall	*/
257 	ibnex_post_event,		/* bus_post_event	*/
258 	NULL,
259 	ibnex_bus_config,	/* bus config */
260 	ibnex_bus_unconfig,	/* bus unconfig */
261 	NULL,			/* bus fm init */
262 	NULL,			/* bus fm fini */
263 	NULL,			/* bus fm access enter */
264 	NULL,			/* bus fm access exit */
265 	ibnex_bus_power		/* bus power */
266 };
267 
268 /* ibnex cb_ops */
269 static struct cb_ops ibnex_cbops = {
270 	ibnex_open,		/* open */
271 	ibnex_close,		/* close */
272 	nodev,			/* strategy */
273 	nodev,			/* print */
274 	nodev,			/* dump */
275 	nodev,			/* read */
276 	nodev,			/* write */
277 	ibnex_ioctl,		/* ioctl */
278 	nodev,			/* devmap */
279 	nodev,			/* mmap */
280 	nodev,			/* segmap */
281 	nochpoll,		/* poll */
282 	ddi_prop_op,		/* prop_op */
283 	NULL,			/* stream */
284 	D_MP,			/* cb_flag */
285 	CB_REV, 		/* rev */
286 	nodev,			/* int (*cb_aread)() */
287 	nodev			/* int (*cb_awrite)() */
288 };
289 
290 /*
291  * Device options
292  * Note: ddi_no_info needs to change during devfs time frame. The drivers
293  *	 with 1 to 1 mapping between minor node and instance should use
294  *	 ddi_1to1_info. (See bug id 4424752)
295  */
296 static struct dev_ops ibnex_ops = {
297 	DEVO_REV,		/* devo_rev, */
298 	0,			/* refcnt  */
299 	ibnex_getinfo,		/* info */
300 	nulldev,		/* identify */
301 	nulldev,		/* probe */
302 	ibnex_attach,		/* attach */
303 	ibnex_detach,		/* detach */
304 	nodev,			/* reset */
305 	&ibnex_cbops,		/* driver ops - devctl interfaces */
306 	&ibnex_bus_ops,		/* bus operations */
307 	nulldev,		/* power */
308 	ddi_quiesce_not_needed,		/* quiesce */
309 };
310 
311 /* Module linkage information for the kernel.  */
312 static struct modldrv modldrv = {
313 	&mod_driverops,		/* Driver module */
314 	"IB nexus",		/* Driver name and version */
315 	&ibnex_ops,		/* driver ops */
316 };
317 
318 static struct modlinkage modlinkage = {
319 	MODREV_1, (void *)&modldrv, NULL
320 };
321 
322 /*
323  * Global per-instance IB Nexus data.
324  * There is only one instance of IB Nexus supported.
325  */
326 ibnex_t ibnex;
327 #ifdef __lock_lint
328 extern ibdm_t ibdm;
329 #endif
330 _NOTE(MUTEX_PROTECTS_DATA(ibnex.ibnex_mutex, ibnex_s))
331 _NOTE(DATA_READABLE_WITHOUT_LOCK(ibnex.ibnex_num_comm_svcs
332 	ibnex.ibnex_comm_svc_names ibnex.ibnex_nvppa_comm_svcs
333 	ibnex.ibnex_vppa_comm_svc_names ibnex.ibnex_nhcasvc_comm_svcs
334 	ibnex.ibnex_hcasvc_comm_svc_names ibnex.ibnex_ioc_list))
335 _NOTE(MUTEX_PROTECTS_DATA(ibnex.ibnex_mutex, ibnex_node_data_s))
336 _NOTE(LOCK_ORDER(ibdm.ibdm_hl_mutex ibnex.ibnex_mutex))
337 
338 /* The port settling time in seconds */
339 int	ibnex_port_settling_time = 30;
340 
341 /* create an array of properties supported, easier to add new ones here */
342 static struct ibnex_property {
343 	char			*name;
344 	ibnex_node_type_t	type;
345 } ibnex_properties[]  = {
346 	{ "port-svc-list",  IBNEX_PORT_COMMSVC_NODE},
347 	{ "vppa-svc-list",  IBNEX_VPPA_COMMSVC_NODE},
348 	{ "hca-svc-list",	IBNEX_HCASVC_COMMSVC_NODE}
349 };
350 
351 #define	N_IBNEX_PROPS	(sizeof (ibnex_properties))/ \
352 				(sizeof (struct ibnex_property))
353 
354 /*
355  * Event Definition
356  *	Single event, event name defined in ibti_common.h.
357  *	Event posted to specific child handler. Event posted
358  *	at kernel priority.
359  */
360 static ndi_event_definition_t ibnex_ndi_event_defs[] = {
361 	{IB_EVENT_TAG_PROP_UPDATE,  IB_PROP_UPDATE_EVENT, EPL_KERNEL,
362 		NDI_EVENT_POST_TO_TGT}
363 };
364 
365 #define	IB_N_NDI_EVENTS	\
366 	(sizeof (ibnex_ndi_event_defs) / sizeof (ndi_event_definition_t))
367 
368 static ndi_event_set_t ib_ndi_events = {
369 	NDI_EVENTS_REV1, IB_N_NDI_EVENTS, ibnex_ndi_event_defs};
370 static int	ibnex_hw_status = IBNEX_DEVTREE_NOT_CHECKED;
371 
372 
373 /*
374  * _init
375  *	Loadable module init, called before any other module.
376  */
377 int
378 _init(void)
379 {
380 	int	error;
381 	char	**hca_driver_list;
382 	int	i, ndrivers;
383 
384 	if (ibnex_hw_status == IBNEX_DEVTREE_NOT_CHECKED) {
385 		ibnex_hw_status = IBNEX_HW_NOT_IN_DEVTREE;
386 		hca_driver_list = mdi_get_phci_driver_list("ib", &ndrivers);
387 		for (i = 0; i < ndrivers; i++) {
388 			ibnex_hw_in_dev_tree(hca_driver_list[i]);
389 			if (ibnex_hw_status == IBNEX_HW_IN_DEVTREE)
390 				break;
391 		}
392 		mdi_free_phci_driver_list(hca_driver_list, ndrivers);
393 	}
394 
395 	/*
396 	 * IB Nexus _init can be called while force attaching
397 	 * IB Nexus driver or when a HCA is hotplugged.
398 	 *
399 	 * If IB HW is not in device tree or if no HCA driver
400 	 * has been attached, fail IB Nexus _init().
401 	 */
402 	if (ibnex_hw_status == IBNEX_HW_NOT_IN_DEVTREE &&
403 	    ibt_hw_is_present() == 0) {
404 		IBTF_DPRINTF_L4("ibnex", "\t_init: NO IB HW");
405 		return (DDI_FAILURE);
406 	}
407 
408 	IBTF_DPRINTF_L4("ibnex", "\t_init");
409 	mutex_init(&ibnex.ibnex_mutex, NULL, MUTEX_DRIVER, NULL);
410 	cv_init(&ibnex.ibnex_reprobe_cv, NULL, CV_DRIVER, NULL);
411 	cv_init(&ibnex.ibnex_ioc_list_cv, NULL, CV_DRIVER, NULL);
412 	if ((error = mod_install(&modlinkage)) != 0) {
413 		IBTF_DPRINTF_L2("ibnex", "\t_init: mod_install failed");
414 		mutex_destroy(&ibnex.ibnex_mutex);
415 		cv_destroy(&ibnex.ibnex_reprobe_cv);
416 		cv_destroy(&ibnex.ibnex_ioc_list_cv);
417 	} else {
418 		ibdm_ibnex_register_callback(ibnex_dm_callback);
419 		ibtl_ibnex_register_callback(ibnex_ibtl_callback);
420 	}
421 	return (error);
422 }
423 
424 
425 /*
426  * _fini
427  *	Prepares a module for unloading.
428  */
429 int
430 _fini(void)
431 {
432 	int	error;
433 
434 	IBTF_DPRINTF_L4("ibnex", "\t_fini");
435 	if ((error = mod_remove(&modlinkage)) != 0) {
436 		return (error);
437 	}
438 	ibdm_ibnex_unregister_callback();
439 	ibtl_ibnex_unregister_callback();
440 	mutex_destroy(&ibnex.ibnex_mutex);
441 	cv_destroy(&ibnex.ibnex_reprobe_cv);
442 	cv_destroy(&ibnex.ibnex_ioc_list_cv);
443 	return (0);
444 }
445 
446 
447 /*
448  * _info
449  *	Returns information about loadable module.
450  */
451 int
452 _info(struct modinfo *modinfop)
453 {
454 	IBTF_DPRINTF_L4("ibnex", "\t_info");
455 	return (mod_info(&modlinkage, modinfop));
456 }
457 
458 
459 /*
460  * ibnex_attach
461  *	Configure and attach an instance of the IB Nexus driver
462  *	Only one instance of IB Nexus is supported
463  *	Create a minor node for cfgadm purpose
464  *	Initialize communication services
465  *	Register callback with IBDM
466  *	Register callback with IBTL
467  */
468 static int
469 ibnex_attach(dev_info_t *dip, ddi_attach_cmd_t cmd)
470 {
471 	int		i;
472 	int		instance = ddi_get_instance(dip);
473 
474 	IBTF_DPRINTF_L4("ibnex", "\tattach: device = %p cmd = %x)", dip, cmd);
475 
476 	switch (cmd) {
477 	case DDI_ATTACH:
478 		break;
479 	case DDI_RESUME:
480 		IBTF_DPRINTF_L4("ibnex", "\tattach: RESUME");
481 		return (DDI_SUCCESS);
482 	default:
483 		return (DDI_FAILURE);
484 	}
485 
486 	/* Fail attach for more than one instance */
487 	mutex_enter(&ibnex.ibnex_mutex);
488 	if (ibnex.ibnex_dip != NULL) {
489 		mutex_exit(&ibnex.ibnex_mutex);
490 		return (DDI_FAILURE);
491 	}
492 	mutex_exit(&ibnex.ibnex_mutex);
493 
494 	/* Register with MPxIO framework */
495 
496 	if (mdi_vhci_register(MDI_HCI_CLASS_IB, dip, &ibnex_vhci_ops, 0)
497 	    != MDI_SUCCESS) {
498 		IBTF_DPRINTF_L2("ibnex",
499 		    "\tattach: mdi_vhci_register() failed");
500 		return (DDI_FAILURE);
501 	}
502 
503 
504 	/*
505 	 * Create the "fabric" devctl minor-node for IB DR support.
506 	 * The minor number for the "devctl" node is in the same format
507 	 * as the AP minor nodes.
508 	 */
509 	if (ddi_create_minor_node(dip, IBNEX_FABRIC, S_IFCHR, instance,
510 	    DDI_NT_IB_ATTACHMENT_POINT, 0) != DDI_SUCCESS) {
511 		IBTF_DPRINTF_L2("ibnex",
512 		    "\tattach: failed to create fabric minornode");
513 		(void) mdi_vhci_unregister(dip, 0);
514 		return (DDI_FAILURE);
515 	}
516 
517 	/*
518 	 * Create "devctl" minor node for general ioctl interface to the
519 	 * ib nexus.
520 	 */
521 	if (ddi_create_minor_node(dip, "devctl", S_IFCHR, instance,
522 	    DDI_NT_IB_NEXUS, 0) != DDI_SUCCESS) {
523 		IBTF_DPRINTF_L2("ibnex",
524 		    "\tattach: failed to create devctl minornode");
525 		(void) ddi_remove_minor_node(dip, NULL);
526 		(void) mdi_vhci_unregister(dip, 0);
527 		return (DDI_FAILURE);
528 	}
529 
530 	/*
531 	 * Set pm-want-child-notification property for
532 	 * power management of the phci and client
533 	 */
534 	if (ddi_prop_create(DDI_DEV_T_NONE, dip, DDI_PROP_CANSLEEP,
535 	    "pm-want-child-notification?", NULL, NULL) != DDI_PROP_SUCCESS) {
536 		IBTF_DPRINTF_L2("ibnex",
537 		    "_attach: create pm-want-child-notification failed");
538 		(void) ddi_remove_minor_node(dip, NULL);
539 		(void) mdi_vhci_unregister(dip, 0);
540 		return (DDI_FAILURE);
541 	}
542 
543 	mutex_enter(&ibnex.ibnex_mutex);
544 	ibnex.ibnex_dip  = dip;
545 	mutex_exit(&ibnex.ibnex_mutex);
546 
547 	/*
548 	 * Event Handling: Definition and Binding.
549 	 */
550 	if (ndi_event_alloc_hdl(dip, 0, &ibnex.ibnex_ndi_event_hdl,
551 	    NDI_SLEEP) != NDI_SUCCESS) {
552 		(void) ddi_remove_minor_node(dip, NULL);
553 		IBTF_DPRINTF_L2("ibnex",
554 		    "_attach: ndi_event_alloc_hdl failed");
555 		(void) mdi_vhci_unregister(dip, 0);
556 		return (DDI_FAILURE);
557 	}
558 	if (ndi_event_bind_set(ibnex.ibnex_ndi_event_hdl, &ib_ndi_events,
559 	    NDI_SLEEP) != NDI_SUCCESS) {
560 		(void) ddi_remove_minor_node(dip, NULL);
561 		(void) ndi_event_free_hdl(ibnex.ibnex_ndi_event_hdl);
562 		IBTF_DPRINTF_L2("ibnex",
563 		    "_attach: ndi_event_bind_set failed");
564 		(void) mdi_vhci_unregister(dip, 0);
565 		return (DDI_FAILURE);
566 	}
567 
568 	for (i = 0; i < N_IBNEX_PROPS; i++) {
569 		if (ibnex_comm_svc_init(ibnex_properties[i].name,
570 		    ibnex_properties[i].type) != IBNEX_SUCCESS) {
571 			ibnex_comm_svc_fini();
572 			(void) ndi_event_unbind_set(ibnex.ibnex_ndi_event_hdl,
573 			    &ib_ndi_events, NDI_SLEEP);
574 			(void) ddi_remove_minor_node(dip, NULL);
575 			(void) ndi_event_free_hdl(
576 			    ibnex.ibnex_ndi_event_hdl);
577 			ibnex.ibnex_ndi_event_hdl = NULL;
578 			IBTF_DPRINTF_L2("ibnex", "_attach: ibnex_comm_svc_init"
579 			    " failed %s", ibnex_properties[i].name);
580 			(void) mdi_vhci_unregister(dip, 0);
581 			return (DDI_FAILURE);
582 		}
583 	}
584 
585 	/*
586 	 * before anything else comes up:
587 	 * Initialize the internal list of pseudo device nodes by
588 	 * getting all pseudo children of "ib" and processing them.
589 	 */
590 	ibnex_pseudo_initnodes();
591 
592 	return (DDI_SUCCESS);
593 }
594 
595 
596 /*
597  * ibnex_getinfo()
598  * Given the device number, return the devinfo pointer or the
599  * instance number.
600  * Note: always succeed DDI_INFO_DEVT2INSTANCE, even before attach.
601  */
602 
603 /*ARGSUSED*/
604 static int
605 ibnex_getinfo(dev_info_t *dip, ddi_info_cmd_t cmd, void *arg, void **result)
606 {
607 	int ret = DDI_SUCCESS;
608 
609 	IBTF_DPRINTF_L4("ibnex", "\tgetinfo: Begin");
610 	switch (cmd) {
611 	case DDI_INFO_DEVT2DEVINFO:
612 		if (ibnex.ibnex_dip != NULL)
613 			*result = ibnex.ibnex_dip;
614 		else {
615 			*result = NULL;
616 			ret = DDI_FAILURE;
617 		}
618 		break;
619 
620 	case DDI_INFO_DEVT2INSTANCE:
621 		*result = 0;
622 		break;
623 
624 	default:
625 		ret = DDI_FAILURE;
626 	}
627 	return (ret);
628 }
629 
630 
631 /*
632  * ibnex_detach
633  *	Unregister callback with the IBDM
634  *	Unregister callback with the IBTL
635  *	Uninitialize the communication entries
636  *	Remove all the minor nodes created by this instance
637  */
638 static int
639 ibnex_detach(dev_info_t *dip, ddi_detach_cmd_t cmd)
640 {
641 
642 	IBTF_DPRINTF_L4("ibnex", "\tdetach: dip = %p cmd = %x)", dip, cmd);
643 
644 	switch (cmd) {
645 
646 	case DDI_DETACH:
647 		break;
648 	case DDI_SUSPEND:
649 		IBTF_DPRINTF_L4("ibnex", "\t_detach: Suspend");
650 		return (DDI_SUCCESS);
651 	default:
652 		return (DDI_FAILURE);
653 	}
654 
655 	mutex_enter(&ibnex.ibnex_mutex);
656 	if (ibt_hw_is_present()) {
657 		IBTF_DPRINTF_L2("ibnex",
658 		    "\tdetach: IB HW is present ");
659 		mutex_exit(&ibnex.ibnex_mutex);
660 		return (DDI_FAILURE);
661 	}
662 	if (ndi_event_free_hdl(ibnex.ibnex_ndi_event_hdl)) {
663 		IBTF_DPRINTF_L2("ibnex",
664 		    "\tdetach: ndi_event_free_hdl() failed");
665 		mutex_exit(&ibnex.ibnex_mutex);
666 		return (DDI_FAILURE);
667 	}
668 	ibnex.ibnex_ndi_event_hdl = NULL;
669 	ibnex.ibnex_prop_update_evt_cookie = NULL;
670 
671 	ibnex_pseudo_node_cleanup();
672 	ibnex_comm_svc_fini();
673 	ibnex_ioc_node_cleanup();
674 
675 	(void) ddi_remove_minor_node(dip, NULL);
676 	ibnex.ibnex_dip = NULL;
677 	mutex_exit(&ibnex.ibnex_mutex);
678 	(void) mdi_vhci_unregister(dip, 0);
679 	return (DDI_SUCCESS);
680 }
681 
682 
683 /*
684  * ibnex_pseudo_node_cleanup()
685  *	This checks if all the "dips" have been deallocated (implying
686  *	that all the children have been unconfigured) first.
687  *	If not, it just returns.
688  *	If yes, then it frees up memory allocated for devi_name,
689  *	node_addr, and property list.
690  */
691 static void
692 ibnex_pseudo_node_cleanup(void)
693 {
694 	ibnex_node_data_t	*nodep =  ibnex.ibnex_pseudo_node_head;
695 	ibnex_pseudo_node_t	*pseudo;
696 
697 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_node_cleanup:");
698 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
699 
700 	for (; nodep; nodep = nodep->node_next)
701 		if (nodep->node_dip)
702 			return;
703 
704 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_node_cleanup: freeing up memory");
705 	for (nodep =  ibnex.ibnex_pseudo_node_head; nodep;
706 	    nodep = nodep->node_next) {
707 
708 		pseudo = &nodep->node_data.pseudo_node;
709 		if (pseudo->pseudo_node_addr) {
710 			kmem_free(pseudo->pseudo_node_addr,
711 			    strlen(pseudo-> pseudo_node_addr) + 1);
712 			pseudo->pseudo_node_addr = NULL;
713 		}
714 
715 		if (pseudo->pseudo_devi_name) {
716 			kmem_free(pseudo->pseudo_devi_name,
717 			    strlen(pseudo-> pseudo_devi_name) + 1);
718 			pseudo->pseudo_devi_name = NULL;
719 		}
720 
721 		if (pseudo->pseudo_unit_addr) {
722 			kmem_free(pseudo->pseudo_unit_addr,
723 			    pseudo->pseudo_unit_addr_len);
724 		}
725 	}
726 }
727 
728 
729 /*
730  * This functions wakes up any reprobe requests waiting for completion
731  * of reprobe of this IOC. It also send an NDI event, if  :
732  *
733  *	notify_flag is set. This is set if :
734  *		ibt_reprobe_ioc has returned with SUCCESS
735  *		IBTF client has not been notified for this node.
736  *	node_data->node_dip != NULL
737  *	node_state has IBNEX_NODE_REPROBE_NOTIFY_ALWAYS set
738  *	An NDI event cookie has been registered.
739  */
740 static void
741 ibnex_wakeup_reprobe_ioc(ibnex_node_data_t *node_data, int notify_flag)
742 {
743 	ddi_eventcookie_t	evt_cookie;
744 
745 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
746 	evt_cookie = ibnex.ibnex_prop_update_evt_cookie;
747 
748 	if ((ibnex.ibnex_reprobe_state == IBNEX_REPROBE_IOC_WAIT) ||
749 	    (node_data->node_reprobe_state != 0)) {
750 		if (notify_flag && (node_data->node_dip != NULL) &&
751 		    (node_data->node_state &
752 		    IBNEX_NODE_REPROBE_NOTIFY_ALWAYS) &&
753 		    (evt_cookie != NULL)) {
754 			ibt_prop_update_payload_t	evt_data;
755 
756 			mutex_exit(&ibnex.ibnex_mutex);
757 
758 			bzero(&evt_data, sizeof (evt_data));
759 			if (ndi_post_event(ibnex.ibnex_dip,
760 			    node_data->node_dip,
761 			    evt_cookie, &evt_data) != NDI_SUCCESS)
762 				IBTF_DPRINTF_L2("ibnex",
763 				    "\tndi_post_event failed\n");
764 
765 			mutex_enter(&ibnex.ibnex_mutex);
766 		}
767 
768 		node_data->node_reprobe_state = 0;
769 		cv_broadcast(&ibnex.ibnex_reprobe_cv);
770 	}
771 	node_data->node_reprobe_state = 0;
772 }
773 
774 /*
775  * This function wakes up any reprobe request waiting for completion
776  * of reprobe of all IOCs.
777  */
778 static void
779 ibnex_wakeup_reprobe_all()
780 {
781 	ibnex_node_data_t *ioc_node;
782 
783 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
784 
785 	/* Notify if another reprobe_all is pending */
786 	if (ibnex.ibnex_reprobe_state == IBNEX_REPROBE_ALL_WAIT) {
787 		ibnex.ibnex_reprobe_state = 0;
788 		cv_broadcast(&ibnex.ibnex_reprobe_cv);
789 	}
790 	ibnex.ibnex_reprobe_state = 0;
791 
792 	/*
793 	 * The IOC may be hot-removed after the reprobe request.
794 	 * Reset the reprobe states for such IOCs.
795 	 */
796 	for (ioc_node = ibnex.ibnex_ioc_node_head; ioc_node;
797 	    ioc_node = ioc_node->node_next) {
798 		if (ioc_node->node_reprobe_state != 0) {
799 			ibnex_wakeup_reprobe_ioc(ioc_node, 1);
800 		}
801 	}
802 }
803 
804 /*
805  * ibnex_ibnex_callback:
806  *	IBTL_IBNEX_IBC_INIT:
807  *		Called from ibc_init() which is called from
808  *		HCA driver _init entry point
809  *		Initializes the HCA dev_ops structure with default
810  *		IB nexus structure.
811  *	IBTL_IBNEX_IBC_FINI:
812  *		Called from ibc_fini() which is called from
813  *		HCA driver _fini entry point
814  *		Un-Initializes the HCA dev_ops structure with default
815  *		IB nexus strucuture.
816  *	Returns IBT_SUCCESS
817  */
818 ibt_status_t
819 ibnex_ibtl_callback(ibtl_ibnex_cb_args_t *cb_args)
820 {
821 	int			retval = IBT_SUCCESS;
822 	struct dev_ops 		*hca_dev_ops;
823 	dev_info_t		*clnt_dip;
824 	ibnex_node_data_t	*node_data;
825 
826 	IBTF_DPRINTF_L5("ibnex", "\tibtl_callback");
827 
828 	switch (cb_args->cb_flag) {
829 	case IBTL_IBNEX_IBC_INIT:
830 		/*
831 		 * Get the devops structure of the HCA,
832 		 * and put IB nexus default busops vector in its place.
833 		 */
834 		hca_dev_ops = ((struct modldrv *)
835 		    (cb_args->cb_modlp->ml_linkage[0]))->drv_dev_ops;
836 		ASSERT((hca_dev_ops) && (hca_dev_ops->devo_bus_ops == NULL));
837 		hca_dev_ops->devo_bus_ops = &ibnex_ci_busops;
838 		break;
839 
840 	case IBTL_IBNEX_IBC_FINI:
841 		hca_dev_ops = ((struct modldrv *)
842 		    (cb_args->cb_modlp->ml_linkage[0]))->drv_dev_ops;
843 		hca_dev_ops->devo_bus_ops = NULL;
844 		break;
845 
846 	case IBTL_IBNEX_REPROBE_DEV_REQ:
847 		/* IBTL pass down request for ibt_reprobe_dev */
848 		clnt_dip = cb_args->cb_dip;
849 		ASSERT(clnt_dip);
850 
851 		node_data = ddi_get_parent_data(clnt_dip);
852 		ASSERT(node_data);
853 
854 		/* Reprobe for IOC nodes only */
855 		ASSERT(node_data->node_type == IBNEX_IOC_NODE);
856 
857 		/*
858 		 * Start the reprobe. This could sleep as it is not
859 		 * from interrupt context.
860 		 */
861 		if (taskq_dispatch(system_taskq, ibnex_handle_reprobe_dev,
862 		    clnt_dip, TQ_SLEEP) == 0) {
863 			IBTF_DPRINTF_L2("ibnex",
864 			    "ibnex_ibtl_callback: taskq_dispatch failed");
865 			mutex_enter(&ibnex.ibnex_mutex);
866 			ibnex_wakeup_reprobe_ioc(node_data, 0);
867 			mutex_exit(&ibnex.ibnex_mutex);
868 			return (IBT_INSUFF_KERNEL_RESOURCE);
869 		}
870 		return (IBT_SUCCESS);
871 	}
872 
873 	return (retval);
874 }
875 
876 
877 /*
878  * Bus-ops entry points
879  */
880 
881 /*
882  * ibnex_map_fault
883  * 	IOC drivers need not map memory. Return failure to fail any
884  *	such calls.
885  */
886 /*ARGSUSED*/
887 static int
888 ibnex_map_fault(dev_info_t *dip, dev_info_t *rdip, struct hat *hat,
889     struct seg *seg, caddr_t addr, struct devpage *dp, pfn_t pfn,
890     uint_t prot, uint_t lock)
891 {
892 	return (DDI_FAILURE);
893 }
894 
895 
896 /*
897  * ibnex_busctl
898  * 	bus_ctl bus_ops entry point
899  */
900 /*ARGSUSED*/
901 static int
902 ibnex_busctl(dev_info_t *dip, dev_info_t *rdip,
903     ddi_ctl_enum_t ctlop, void *arg, void *result)
904 {
905 	dev_info_t		*child_dip;
906 
907 	IBTF_DPRINTF_L4("ibnex",
908 	    "\tbusctl: dip = %p, rdip = %p, ctlop = %x,", dip, rdip, ctlop);
909 	IBTF_DPRINTF_L4("ibnex", "\tbusctl: targ = %p, result %p", arg, result);
910 
911 	switch (ctlop) {
912 	case DDI_CTLOPS_REPORTDEV:
913 		if (rdip == NULL) {
914 			return (DDI_FAILURE);
915 		}
916 
917 		/* Log the relevant details of dip to sysbuf */
918 		cmn_err(CE_CONT, "?IB device: %s@%s, %s%d\n",
919 		    ddi_node_name(rdip), ddi_get_name_addr(rdip),
920 		    ddi_driver_name(rdip), ddi_get_instance(rdip));
921 
922 		return (DDI_SUCCESS);
923 
924 	case DDI_CTLOPS_INITCHILD:
925 		child_dip = (dev_info_t *)arg;
926 		return (ibnex_init_child(child_dip));
927 
928 	case DDI_CTLOPS_UNINITCHILD:
929 		child_dip = (dev_info_t *)arg;
930 		ddi_set_name_addr(child_dip, NULL);
931 		return (DDI_SUCCESS);
932 
933 	case DDI_CTLOPS_ATTACH:
934 	case DDI_CTLOPS_DETACH:
935 	case DDI_CTLOPS_POWER :
936 		return (DDI_SUCCESS);
937 
938 	case DDI_CTLOPS_SIDDEV:
939 		/*
940 		 * Return DDI_SUCCESS for IOC/PORT/VPPA nodes and
941 		 * DDI_FAILURE for the nodes enumerated by a Pseudo file.
942 		 */
943 		return (ndi_dev_is_persistent_node(rdip) ?
944 		    DDI_SUCCESS : DDI_FAILURE);
945 
946 
947 	case DDI_CTLOPS_IOMIN:
948 		/*
949 		 * Return DDI_SUCCESS, so that consistent buf alloc
950 		 * gets the default DMA IO minimum for the platform
951 		 */
952 		return (DDI_SUCCESS);
953 
954 	/*
955 	 * These ops correspond to functions that "shouldn't" be
956 	 * called by IB Nexus driver.
957 	 */
958 	case DDI_CTLOPS_DMAPMAPC:
959 	case DDI_CTLOPS_REPORTINT:
960 	case DDI_CTLOPS_REGSIZE:
961 	case DDI_CTLOPS_NREGS:
962 	case DDI_CTLOPS_SLAVEONLY:
963 	case DDI_CTLOPS_AFFINITY:
964 	case DDI_CTLOPS_POKE:
965 	case DDI_CTLOPS_PEEK:
966 		IBTF_DPRINTF_L2("ibnex",
967 		    "%s%d: invalid op (%d) from %s inst%d",
968 		    ddi_get_name(dip), ddi_get_instance(dip),
969 		    ctlop, ddi_get_name(rdip), ddi_get_instance(rdip));
970 		return (DDI_FAILURE);
971 
972 	/*
973 	 * Everything else (PTOB/BTOP/BTOPR/DVMAPAGESIZE requests) we
974 	 * pass up
975 	 */
976 	default:
977 		return (ddi_ctlops(dip, rdip, ctlop, arg, result));
978 	}
979 }
980 
981 
982 /*
983  * ibnex_init_child()
984  *
985  * Initialize a child device node. This is called for the DDI_CTLOPS_INITCHILD
986  * entry. Function returns DDI_SUCCESS,  DDI_FAILURE or DDI_NOT_WELL_FORMED.
987  */
988 static int
989 ibnex_init_child(dev_info_t *child)
990 {
991 	int			ret;
992 	char			name[MAXNAMELEN];
993 
994 	IBTF_DPRINTF_L4("ibnex", "\tinit_child: child = %p", child);
995 
996 	/* Handle Pseudo nodes of client children */
997 	if (ndi_dev_is_persistent_node(child) == 0) {
998 		/* Skip nodes without ib-node-type="merge" */
999 		if (ibnex_is_merge_node(child) != IBNEX_SUCCESS)
1000 			return (DDI_FAILURE);
1001 
1002 		if (ibnex_name_pseudo_child(child, name) != DDI_SUCCESS)
1003 			return (DDI_FAILURE);
1004 
1005 		ddi_set_name_addr(child, name);
1006 		/*
1007 		 * Merge the .conf node
1008 		 */
1009 		if (ndi_merge_node(child,
1010 		    ibnex_name_child) == DDI_SUCCESS) {
1011 			ddi_set_name_addr(child, NULL);
1012 			return (DDI_FAILURE);
1013 		}
1014 		return (DDI_NOT_WELL_FORMED);
1015 
1016 	}
1017 
1018 	if ((ret = ibnex_name_child(child, name, 0)) != DDI_SUCCESS)
1019 		return (ret);
1020 
1021 	ddi_set_name_addr(child, name);
1022 
1023 	return (DDI_SUCCESS);
1024 }
1025 
1026 
1027 int
1028 ibnex_name_pseudo_child(dev_info_t *child, char *name)
1029 {
1030 	char **unit_addr;
1031 	uint_t n;
1032 	if (ddi_prop_lookup_string_array(DDI_DEV_T_ANY, child,
1033 	    DDI_PROP_DONTPASS, "unit-address", &unit_addr, &n) !=
1034 	    DDI_PROP_SUCCESS) {
1035 		IBTF_DPRINTF_L4("ibnex",
1036 		    "\tname_pseudo_child: cannot find unit-address in %s.conf",
1037 		    ddi_get_name(child));
1038 		return (DDI_FAILURE);
1039 	}
1040 	if (n != 1 || *unit_addr == NULL || **unit_addr == 0) {
1041 		cmn_err(CE_WARN, "unit-address property in %s.conf"
1042 		    " not well-formed", ddi_get_name(child));
1043 		ddi_prop_free(unit_addr);
1044 		return (DDI_FAILURE);
1045 	}
1046 	(void) snprintf(name, MAXNAMELEN, "%s", *unit_addr);
1047 	ddi_prop_free(unit_addr);
1048 	return (DDI_SUCCESS);
1049 }
1050 
1051 
1052 /*ARGSUSED*/
1053 int
1054 ibnex_name_child(dev_info_t *child, char *name, int flag)
1055 {
1056 	ibnex_pseudo_node_t	*pseudo;
1057 	ibnex_node_data_t	*node_datap;
1058 	ibnex_port_node_t	*port_node;
1059 	ibnex_ioc_node_t	*ioc;
1060 
1061 	node_datap = ddi_get_parent_data(child);
1062 	if (node_datap == NULL) {
1063 		IBTF_DPRINTF_L2("ibnex", "\tname_child: Node data is NULL");
1064 		return (DDI_NOT_WELL_FORMED);
1065 	}
1066 	IBTF_DPRINTF_L4("ibnex", "\tname_sid_child: Node data %p"
1067 	    "Node type %x", node_datap, node_datap->node_type);
1068 	switch (node_datap->node_type) {
1069 	case IBNEX_PORT_COMMSVC_NODE:
1070 		port_node = &node_datap->node_data.port_node;
1071 		(void) snprintf(name, IBNEX_MAX_NODEADDR_SZ, "%x,0,%s",
1072 		    port_node->port_num,
1073 		    ibnex.ibnex_comm_svc_names[port_node->port_commsvc_idx]);
1074 		break;
1075 	case IBNEX_VPPA_COMMSVC_NODE:
1076 		port_node = &node_datap->node_data.port_node;
1077 		(void) snprintf(name, IBNEX_MAX_NODEADDR_SZ, "%x,%x,%s",
1078 		    port_node->port_num, port_node->port_pkey, ibnex.
1079 		    ibnex_vppa_comm_svc_names[port_node->port_commsvc_idx]);
1080 		break;
1081 	case IBNEX_HCASVC_COMMSVC_NODE:
1082 		port_node = &node_datap->node_data.port_node;
1083 		(void) snprintf(name, IBNEX_MAX_NODEADDR_SZ, "%x,0,%s",
1084 		    port_node->port_num,
1085 		    ibnex.ibnex_hcasvc_comm_svc_names[port_node->
1086 		    port_commsvc_idx]);
1087 		break;
1088 	case IBNEX_IOC_NODE:
1089 		ioc = &node_datap->node_data.ioc_node;
1090 		(void) snprintf(name, IBNEX_MAX_NODEADDR_SZ, "%llX,%llX",
1091 		    (longlong_t)ioc->ioc_guid, (longlong_t)ioc->iou_guid);
1092 		break;
1093 	case IBNEX_PSEUDO_NODE:
1094 		pseudo = &node_datap->node_data.pseudo_node;
1095 		(void) snprintf(name,
1096 		    IBNEX_MAX_NODEADDR_SZ, pseudo->pseudo_unit_addr);
1097 		break;
1098 	default:
1099 		IBTF_DPRINTF_L2("ibnex", "\name_child: Not well formed");
1100 		return (DDI_NOT_WELL_FORMED);
1101 	}
1102 
1103 	return (DDI_SUCCESS);
1104 }
1105 
1106 
1107 /*
1108  * ibnex_bus_config()
1109  *
1110  * BUS_CONFIG_ONE:
1111  *	Enumerate the exact instance of the driver. Use the device node name
1112  *	to locate the exact instance.
1113  *	Query IBDM to find whether the hardware exits for the instance of the
1114  *	driver. If exists, create a device node and return NDI_SUCCESS.
1115  *
1116  * BUS_CONFIG_ALL:
1117  *	Enumerate all the instances of all the possible children (seen before
1118  *	and never seen before).
1119  *
1120  * BUS_CONFIG_DRIVER:
1121  *	Enumerate all the instances of a particular driver.
1122  */
1123 static int
1124 ibnex_bus_config(dev_info_t *parent, uint_t flag,
1125     ddi_bus_config_op_t op, void *devname, dev_info_t **child)
1126 {
1127 	int			ret = IBNEX_SUCCESS, len, circ, need_bus_config;
1128 	char 			*device_name, *cname = NULL, *caddr = NULL;
1129 	char			*device_name1;
1130 	char			*srvname, nameaddr[MAXNAMELEN];
1131 	dev_info_t		*cdip, *pdip = NULL;
1132 	ibnex_node_data_t	*node_data;
1133 	ibnex_port_node_t	*port_node;
1134 	int			use_mdi_devi_locking = 0;
1135 
1136 	if (parent != ibnex.ibnex_dip) {
1137 		/*
1138 		 * This must be an HCA.In a normal case HCA is setup as a phci.
1139 		 * If an HCA is in maintenance mode, its phci is not set up
1140 		 * but the driver is attached to update the firmware. In this
1141 		 * case, do not configure the MPxIO clients.
1142 		 */
1143 		if (mdi_component_is_phci(parent, NULL) == MDI_FAILURE) {
1144 			if (op == BUS_CONFIG_ALL || op == BUS_CONFIG_DRIVER)
1145 				return (NDI_SUCCESS);
1146 			else
1147 				return (NDI_FAILURE);
1148 		}
1149 
1150 		/* Set use_mdi_devi_locking appropriately */
1151 		if ((op != BUS_CONFIG_ONE) || (op == BUS_CONFIG_ONE &&
1152 		    strncmp((char *)devname, IBNEX_IBPORT_CNAME, 6) != 0)) {
1153 			IBTF_DPRINTF_L4("ibnex",
1154 			    "\tbus_config: using mdi_devi_enter");
1155 			use_mdi_devi_locking = 1;
1156 		}
1157 	}
1158 
1159 	if (use_mdi_devi_locking)
1160 		mdi_devi_enter(parent, &circ);
1161 	else
1162 		ndi_devi_enter(parent, &circ);
1163 
1164 	switch (op) {
1165 	case BUS_CONFIG_ONE:
1166 		IBTF_DPRINTF_L4("ibnex", "\tbus_config: CONFIG_ONE, "
1167 		    "parent %p", parent);
1168 
1169 		len = strlen((char *)devname) + 1;
1170 		device_name = i_ddi_strdup(devname, KM_SLEEP);
1171 		i_ddi_parse_name(device_name, &cname, &caddr, NULL);
1172 
1173 		if (caddr == NULL || (strlen(caddr) == 0)) {
1174 			kmem_free(device_name, len);
1175 			if (use_mdi_devi_locking)
1176 				mdi_devi_exit(parent, circ);
1177 			else
1178 				ndi_devi_exit(parent, circ);
1179 			return (NDI_FAILURE);
1180 		}
1181 
1182 		/*
1183 		 * i_ddi_parse_name() strips of the address portion
1184 		 * of the device name. Recreate device name for
1185 		 * ndi_devi_findchild
1186 		 */
1187 		device_name1 = i_ddi_strdup(devname, KM_SLEEP);
1188 
1189 		IBTF_DPRINTF_L4("ibnex",
1190 		    "\tbus_config: cname %s addr %s", cname, caddr);
1191 
1192 		cdip = ndi_devi_findchild(parent, device_name1);
1193 		if (cdip)
1194 			node_data = ddi_get_parent_data(cdip);
1195 		kmem_free(device_name1, len);
1196 		if (cdip == NULL || (node_data != NULL &&
1197 		    node_data->node_dip == NULL)) {
1198 			/* Node is not present */
1199 			if (strncmp(cname, IBNEX_IOC_CNAME, 3) == 0) {
1200 				if (use_mdi_devi_locking)
1201 					mdi_devi_exit(parent, circ);
1202 				else
1203 					ndi_devi_exit(parent, circ);
1204 
1205 				ret = ibnex_ioc_bus_config_one(&parent, flag,
1206 				    op, devname, child, &need_bus_config);
1207 				if (!need_bus_config) {
1208 					kmem_free(device_name, len);
1209 					return (ret);
1210 				}
1211 
1212 				if (use_mdi_devi_locking)
1213 					mdi_devi_enter(parent, &circ);
1214 				else
1215 					ndi_devi_enter(parent, &circ);
1216 			} else if ((strncmp(cname,
1217 			    IBNEX_IBPORT_CNAME, 6) == 0) &&
1218 			    (parent != ibnex.ibnex_dip)) { /* parent is HCA */
1219 				cdip = ibnex_config_port_node(parent, devname);
1220 				if (cdip)
1221 					ret = IBNEX_SUCCESS;
1222 				else
1223 					ret = IBNEX_FAILURE;
1224 			} else {
1225 				/*
1226 				 * if not IOC or PORT device then always
1227 				 * assume a Pseudo child
1228 				 *
1229 				 * if IB Nexus is the parent, call MDI.
1230 				 * else if HCA is the parent, enumerate
1231 				 * the Pseudo node.
1232 				 */
1233 				ret = IBNEX_SUCCESS;
1234 				ibnex_pseudo_initnodes();
1235 				if (parent == ibnex.ibnex_dip) {
1236 					if (use_mdi_devi_locking)
1237 						mdi_devi_exit(parent, circ);
1238 					else
1239 						ndi_devi_exit(parent, circ);
1240 
1241 					mutex_enter(&ibnex.ibnex_mutex);
1242 					ret = ibnex_pseudo_mdi_config_one(
1243 					    flag, devname, child, cname,
1244 					    caddr);
1245 					mutex_exit(&ibnex.ibnex_mutex);
1246 					kmem_free(device_name, len);
1247 					return (ret);
1248 				}
1249 				mutex_enter(&ibnex.ibnex_mutex);
1250 				ret = ibnex_pseudo_config_one(NULL,
1251 				    caddr, parent);
1252 				mutex_exit(&ibnex.ibnex_mutex);
1253 			}
1254 		}
1255 
1256 		if (strncmp(cname, IBNEX_IBPORT_CNAME, 6) == 0) {
1257 			/* Allows enumeration under PHCI */
1258 			flag |= NDI_MDI_FALLBACK;
1259 		}
1260 		kmem_free(device_name, len);
1261 		break;
1262 
1263 	case BUS_CONFIG_OBP_ARGS:
1264 		cdip = ibnex_config_obp_args(parent, devname);
1265 		if (cdip) {
1266 			/*
1267 			 * Boot case.
1268 			 * Special handling because the "devname"
1269 			 * format for the enumerated device is
1270 			 * different.
1271 			 */
1272 			node_data = ddi_get_parent_data(cdip);
1273 			port_node = &node_data->node_data.port_node;
1274 			if (node_data->node_type ==
1275 			    IBNEX_VPPA_COMMSVC_NODE) {
1276 				srvname =
1277 				    ibnex.ibnex_vppa_comm_svc_names[
1278 				    port_node->port_commsvc_idx];
1279 				(void) snprintf(nameaddr, MAXNAMELEN,
1280 				    "ibport@%x,%x,%s",
1281 				    port_node->port_num,
1282 				    port_node->port_pkey, srvname);
1283 			}
1284 			devname = (void *)nameaddr;
1285 		} else {
1286 			IBTF_DPRINTF_L2("ibnex",
1287 			    "\tbus_config: CONFIG_OBP_ARGS : invalid state!!");
1288 
1289 			ret = IBNEX_FAILURE;
1290 		}
1291 		break;
1292 	case BUS_CONFIG_ALL:
1293 		/*FALLTHRU*/
1294 	case BUS_CONFIG_DRIVER:
1295 		if (op == BUS_CONFIG_ALL)
1296 			IBTF_DPRINTF_L4("ibnex", "\tbus_config: CONFIG_ALL, "
1297 			    "parent %p", parent);
1298 		else
1299 			IBTF_DPRINTF_L4("ibnex", "\tbus_config: CONFIG_DRIVER"
1300 			    ", parent %p", parent);
1301 
1302 		/*
1303 		 * No locks to be held while calling mdi_vhci_bus_config()
1304 		 * ibnex_config_all_children() holds appropriate locks.
1305 		 */
1306 		if (use_mdi_devi_locking)
1307 			mdi_devi_exit(parent, circ);
1308 		else
1309 			ndi_devi_exit(parent, circ);
1310 
1311 		/*
1312 		 * Drive CONFIG requests for IB Nexus parent through
1313 		 * MDI. This is needed to load the HCA drivers in x86 SRP
1314 		 * boot case.
1315 		 *
1316 		 * CONFIG Requests with HCA parent will probe devices using
1317 		 * ibdm and configure all children.
1318 		 */
1319 		if (parent == ibnex.ibnex_dip) {
1320 			ibdm_ioc_info_t	*ioc_list, *new_ioc_list;
1321 
1322 			mutex_enter(&ibnex.ibnex_mutex);
1323 			while (ibnex.ibnex_ioc_list_state !=
1324 			    IBNEX_IOC_LIST_READY) {
1325 				cv_wait(&ibnex.ibnex_ioc_list_cv,
1326 				    &ibnex.ibnex_mutex);
1327 			}
1328 			ibnex.ibnex_ioc_list_state = IBNEX_IOC_LIST_RENEW;
1329 			mutex_exit(&ibnex.ibnex_mutex);
1330 			/* Enumerate all the IOC's */
1331 			ibdm_ibnex_port_settle_wait(0,
1332 			    ibnex_port_settling_time);
1333 
1334 			new_ioc_list = ibdm_ibnex_get_ioc_list(
1335 			    IBDM_IBNEX_NORMAL_PROBE);
1336 			IBTF_DPRINTF_L4("ibnex",
1337 			    "\tbus_config: alloc ioc_list %p", new_ioc_list);
1338 			/*
1339 			 * Optimize the calls for each BUS_CONFIG_ALL request
1340 			 * to the IB Nexus dip. This is currently done for
1341 			 * each PDIP.
1342 			 */
1343 			mutex_enter(&ibnex.ibnex_mutex);
1344 			ioc_list = ibnex.ibnex_ioc_list;
1345 			ibnex.ibnex_ioc_list = new_ioc_list;
1346 			ibnex.ibnex_ioc_list_state = IBNEX_IOC_LIST_READY;
1347 			cv_broadcast(&ibnex.ibnex_ioc_list_cv);
1348 			mutex_exit(&ibnex.ibnex_mutex);
1349 
1350 			if (ioc_list) {
1351 				IBTF_DPRINTF_L4("ibnex",
1352 				    "\tbus_config: freeing ioc_list %p",
1353 				    ioc_list);
1354 				ibdm_ibnex_free_ioc_list(ioc_list);
1355 			}
1356 
1357 
1358 			ret = mdi_vhci_bus_config(parent,
1359 			    flag, op, devname, child, NULL);
1360 			return (ret);
1361 		} else {
1362 			ibnex_config_all_children(parent);
1363 
1364 			if (use_mdi_devi_locking)
1365 				mdi_devi_enter(parent, &circ);
1366 			else
1367 				ndi_devi_enter(parent, &circ);
1368 		}
1369 		break;
1370 	default:
1371 		IBTF_DPRINTF_L4("ibnex", "\tbus_config: error");
1372 		ret = IBNEX_FAILURE;
1373 		break;
1374 	}
1375 
1376 	if (use_mdi_devi_locking)
1377 		mdi_devi_exit(parent, circ);
1378 	else
1379 		ndi_devi_exit(parent, circ);
1380 
1381 	if (ret == IBNEX_SUCCESS) {
1382 		if (op == BUS_CONFIG_OBP_ARGS)
1383 			op = BUS_CONFIG_ONE;
1384 
1385 		if (pdip == NULL)
1386 			pdip = parent;
1387 
1388 		ret = ndi_busop_bus_config(
1389 		    pdip, flag, op, devname, child, 0);
1390 		IBTF_DPRINTF_L4("ibnex", "\tbus_config:"
1391 		    "ndi_busop_bus_config : retval %d", ret);
1392 		return (ret);
1393 	}
1394 
1395 	return (NDI_FAILURE);
1396 }
1397 
1398 
1399 /*
1400  * ibnex_config_root_iocnode()
1401  *	Configures one particular instance of the IOC driver.
1402  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
1403  */
1404 static int
1405 ibnex_config_root_iocnode(dev_info_t *parent, char *device_name)
1406 {
1407 	int			ret, port = 0, iter = 0;
1408 	boolean_t		displayed = B_FALSE;
1409 	char			*portstr;
1410 	ib_guid_t		hca_guid, iou_guid, ioc_guid;
1411 	ibdm_ioc_info_t		*ioc_info;
1412 	ibdm_port_attr_t	*port_attr;
1413 
1414 	IBTF_DPRINTF_L4("ibnex",
1415 	    "\tconfig_root_iocnode: name %s", device_name);
1416 
1417 	portstr = strstr(device_name, ":port=");
1418 	if (portstr == NULL) {
1419 		return (IBNEX_FAILURE);
1420 	}
1421 
1422 	portstr[0] = 0; portstr++;
1423 	if (ibnex_devname2port(portstr, &port)) {
1424 		IBTF_DPRINTF_L4("ibnex", "\tconfig_root_iocnode: invalid port");
1425 		return (IBNEX_FAILURE);
1426 	}
1427 
1428 	if (ibnex_devname_to_node_n_ioc_guids(
1429 	    device_name, &iou_guid, &ioc_guid, NULL) != IBNEX_SUCCESS) {
1430 		return (IBNEX_FAILURE);
1431 	}
1432 
1433 	(void) snprintf(device_name, (IBNEX_MAX_NODEADDR_SZ + 4),
1434 	    "ioc@%llX,%llX", (longlong_t)ioc_guid, (longlong_t)iou_guid);
1435 
1436 	hca_guid = ibtl_ibnex_hcadip2guid(parent);
1437 	if ((port_attr = ibdm_ibnex_probe_hcaport(hca_guid, port)) == NULL) {
1438 		IBTF_DPRINTF_L2("ibnex",
1439 		    "\tconfig_root_iocnode: Port does not exist");
1440 		return (IBNEX_FAILURE);
1441 	}
1442 
1443 	/* Wait until "port is up" */
1444 	while (port_attr->pa_state != IBT_PORT_ACTIVE) {
1445 		ibdm_ibnex_free_port_attr(port_attr);
1446 		delay(drv_usectohz(10000));
1447 		if ((port_attr = ibdm_ibnex_probe_hcaport(
1448 		    hca_guid, port)) == NULL) {
1449 			return (IBNEX_FAILURE);
1450 		}
1451 
1452 		if (iter++ == 400) {
1453 			if (displayed == B_FALSE) {
1454 				cmn_err(CE_NOTE, "\tWaiting for Port %d "
1455 				    "initialization", port_attr->pa_port_num);
1456 				displayed = B_TRUE;
1457 			}
1458 		}
1459 	}
1460 	ibdm_ibnex_free_port_attr(port_attr);
1461 	IBTF_DPRINTF_L4("ibnex", "\tconfig_rootioc_node:"
1462 	    "Port is initialized");
1463 
1464 	if ((ioc_info = ibdm_ibnex_probe_ioc(iou_guid, ioc_guid, 0)) == NULL) {
1465 		ibdm_ibnex_free_ioc_list(ioc_info);
1466 		return (IBNEX_FAILURE);
1467 	}
1468 	mutex_enter(&ibnex.ibnex_mutex);
1469 	if ((ret = ibnex_ioc_config_from_pdip(ioc_info, parent, 0)) !=
1470 	    IBNEX_SUCCESS) {
1471 		IBTF_DPRINTF_L2("ibnex",
1472 		    "\tconfig_root_ioc_node failed for pdip %p", parent);
1473 	}
1474 	mutex_exit(&ibnex.ibnex_mutex);
1475 	ibdm_ibnex_free_ioc_list(ioc_info);
1476 	return (ret);
1477 }
1478 
1479 
1480 static int
1481 ibnex_devname2port(char *portstr, int *port)
1482 {
1483 	char	*temp;
1484 	int	ret = IBNEX_FAILURE;
1485 
1486 	IBTF_DPRINTF_L4("ibnex", "\tdevname2port: Begin");
1487 
1488 	temp = strchr(portstr, '=');
1489 	if (temp != NULL) {
1490 		temp++;
1491 		*port = ibnex_str2int(temp, strlen(temp), &ret);
1492 	}
1493 	return (ret);
1494 }
1495 
1496 
1497 /*
1498  * ibnex_config_all_children()
1499  *	Wait for lata SM initialization case before enumerating the nodes
1500  *	Get list of HCA's and HCA port information
1501  *		Create device device nodes and its node properties
1502  *		for port nodes and VPPA nodes
1503  *	Get list of all the IOC node information
1504  *		Create device nodes and its properties for all the IOCs
1505  *		if not created already
1506  *	Bind drivers for all the newly created device nodes
1507  *	Support Pseudo nodes enumerated using their .conf file
1508  */
1509 static void
1510 ibnex_config_all_children(dev_info_t *parent)
1511 {
1512 	int			ii;
1513 	ibdm_ioc_info_t		*ioc_list;
1514 	ibdm_hca_list_t		*hca_list;
1515 	ib_guid_t		hca_guid;
1516 	int			circ;
1517 
1518 	IBTF_DPRINTF_L4("ibnex", "\tconfig_all_children: Begin");
1519 
1520 	/*
1521 	 * Enumerate children of this HCA, port nodes,
1522 	 * VPPA & HCA_SVC nodes. Use ndi_devi_enter() for
1523 	 * locking. IB Nexus is enumerating the children
1524 	 * of HCA, not MPXIO clients.
1525 	 */
1526 	ndi_devi_enter(parent, &circ);
1527 	hca_guid = ibtl_ibnex_hcadip2guid(parent);
1528 	ibdm_ibnex_port_settle_wait(hca_guid, ibnex_port_settling_time);
1529 	hca_list = ibdm_ibnex_get_hca_info_by_guid(hca_guid);
1530 	if (hca_list == NULL) {
1531 		ndi_devi_exit(parent, circ);
1532 		return;
1533 	}
1534 	ibnex_create_hcasvc_nodes(parent, hca_list->hl_hca_port_attr);
1535 	for (ii = 0; ii < hca_list->hl_nports; ii++) {
1536 		ibnex_create_port_nodes(
1537 		    parent, &hca_list->hl_port_attr[ii]);
1538 		ibnex_create_vppa_nodes(
1539 		    parent, &hca_list->hl_port_attr[ii]);
1540 	}
1541 	ibdm_ibnex_free_hca_list(hca_list);
1542 	ndi_devi_exit(parent, circ);
1543 
1544 	/*
1545 	 * Use mdi_devi_enter() for locking. IB Nexus is
1546 	 * enumerating MPxIO clients.
1547 	 */
1548 	mdi_devi_enter(parent, &circ);
1549 
1550 	ibnex_pseudo_initnodes();
1551 
1552 	mutex_enter(&ibnex.ibnex_mutex);
1553 	while (ibnex.ibnex_ioc_list_state != IBNEX_IOC_LIST_READY) {
1554 		cv_wait(&ibnex.ibnex_ioc_list_cv, &ibnex.ibnex_mutex);
1555 	}
1556 	ibnex.ibnex_ioc_list_state = IBNEX_IOC_LIST_ACCESS;
1557 	ioc_list = ibnex.ibnex_ioc_list;
1558 	while (ioc_list) {
1559 		(void) ibnex_ioc_config_from_pdip(ioc_list, parent, 0);
1560 		ioc_list = ioc_list->ioc_next;
1561 	}
1562 	ibnex.ibnex_ioc_list_state = IBNEX_IOC_LIST_READY;
1563 	cv_broadcast(&ibnex.ibnex_ioc_list_cv);
1564 
1565 	/* Config IBTF Pseudo clients */
1566 	ibnex_config_pseudo_all(parent);
1567 
1568 	mutex_exit(&ibnex.ibnex_mutex);
1569 	mdi_devi_exit(parent, circ);
1570 
1571 	IBTF_DPRINTF_L4("ibnex", "\tconfig_all_children: End");
1572 }
1573 
1574 
1575 /*
1576  * ibnex_create_port_nodes:
1577  *	Creates a device node per each communication service defined
1578  *	in the "port-commsvc-list" property per HCA port
1579  */
1580 static void
1581 ibnex_create_port_nodes(dev_info_t *parent, ibdm_port_attr_t *port_attr)
1582 {
1583 	int		idx;
1584 	dev_info_t	*dip;
1585 	int		rval;
1586 
1587 	mutex_enter(&ibnex.ibnex_mutex);
1588 	for (idx = 0; idx < ibnex.ibnex_num_comm_svcs; idx++) {
1589 		rval = ibnex_get_dip_from_guid(port_attr->pa_port_guid,
1590 		    idx, 0, &dip);
1591 		if (rval != IBNEX_SUCCESS) {
1592 			(void) ibnex_commsvc_initnode(parent, port_attr, idx,
1593 			    IBNEX_PORT_COMMSVC_NODE, 0, &rval,
1594 			    IBNEX_DEVFS_ENUMERATE);
1595 		}
1596 	}
1597 	mutex_exit(&ibnex.ibnex_mutex);
1598 }
1599 
1600 
1601 /*
1602  * ibnex_create_vppa_nodes:
1603  *	Creates a device node per each communication service defined
1604  *	in the "vppa-commsvc-list" property and per each PKEY that
1605  *	this particular port supports and per HCA port
1606  */
1607 static void
1608 ibnex_create_vppa_nodes(dev_info_t *parent, ibdm_port_attr_t *port_attr)
1609 {
1610 	int 		idx, ii;
1611 	int		rval;
1612 	ib_pkey_t 	pkey;
1613 	dev_info_t	*dip;
1614 
1615 	IBTF_DPRINTF_L4("ibnex", "\tcreate_vppa_nodes: Begin");
1616 
1617 	mutex_enter(&ibnex.ibnex_mutex);
1618 	if (port_attr->pa_state != IBT_PORT_ACTIVE) {
1619 		IBTF_DPRINTF_L4("ibnex", "\tcreate_vppa_nodes: "
1620 		    "Port %d is down", port_attr->pa_port_num);
1621 		mutex_exit(&ibnex.ibnex_mutex);
1622 		return;
1623 	}
1624 	for (idx = 0; idx < ibnex.ibnex_nvppa_comm_svcs; idx++) {
1625 		for (ii = 0; ii < port_attr->pa_npkeys; ii++) {
1626 			pkey = port_attr->pa_pkey_tbl[ii].pt_pkey;
1627 
1628 			if (IBNEX_INVALID_PKEY(pkey)) {
1629 				continue;
1630 			}
1631 			rval = ibnex_get_dip_from_guid(
1632 			    port_attr->pa_port_guid, idx, pkey, &dip);
1633 			if ((rval != IBNEX_SUCCESS) || (dip == NULL)) {
1634 				(void) ibnex_commsvc_initnode(parent, port_attr,
1635 				    idx, IBNEX_VPPA_COMMSVC_NODE,
1636 				    pkey, &rval, IBNEX_CFGADM_ENUMERATE);
1637 			}
1638 		}
1639 	}
1640 	mutex_exit(&ibnex.ibnex_mutex);
1641 }
1642 
1643 
1644 /*
1645  * ibnex_create_hcasvc_nodes:
1646  *	Creates a device node per each communication service defined
1647  *	in the "port-commsvc-list" property per HCA port
1648  */
1649 static void
1650 ibnex_create_hcasvc_nodes(dev_info_t *parent, ibdm_port_attr_t *port_attr)
1651 {
1652 	int		idx;
1653 	dev_info_t	*dip;
1654 	int		rval;
1655 
1656 	mutex_enter(&ibnex.ibnex_mutex);
1657 	for (idx = 0; idx < ibnex.ibnex_nhcasvc_comm_svcs; idx++) {
1658 		rval = ibnex_get_dip_from_guid(port_attr->pa_port_guid,
1659 		    idx, 0, &dip);
1660 		if (rval != IBNEX_SUCCESS) {
1661 			(void) ibnex_commsvc_initnode(parent, port_attr, idx,
1662 			    IBNEX_HCASVC_COMMSVC_NODE, 0, &rval,
1663 			    IBNEX_DEVFS_ENUMERATE);
1664 			IBTF_DPRINTF_L5("ibnex", "create_hcasvc_nodes: "
1665 			    "commsvc_initnode failed, rval %x", rval);
1666 		}
1667 	}
1668 	mutex_exit(&ibnex.ibnex_mutex);
1669 }
1670 
1671 
1672 /*
1673  * ibnex_bus_unconfig()
1674  *
1675  *	Unconfigure a particular device node or all instance of a device
1676  *	driver device or all children of IBnex
1677  */
1678 static int
1679 ibnex_bus_unconfig(dev_info_t *parent,
1680     uint_t flag, ddi_bus_config_op_t op, void *device_name)
1681 {
1682 	ibnex_node_data_t	*ndp;
1683 	major_t			major = (major_t)(uintptr_t)device_name;
1684 	dev_info_t		*dip = NULL;
1685 
1686 	if (ndi_busop_bus_unconfig(parent, flag, op, device_name) !=
1687 	    DDI_SUCCESS)
1688 		return (DDI_FAILURE);
1689 
1690 	/*
1691 	 * We can come into this routine with dip as ibnexus dip or hca dip.
1692 	 * When the dip is that of ib nexus we need to clean up the IOC and
1693 	 * pseudo nodes. When the dip is that of an HCA (not IB nexus dip)
1694 	 * cleanup the port nodes.
1695 	 */
1696 	if ((op == BUS_UNCONFIG_ALL || op == BUS_UNCONFIG_DRIVER) &&
1697 	    (flag & (NDI_UNCONFIG | NDI_DETACH_DRIVER))) {
1698 		mutex_enter(&ibnex.ibnex_mutex);
1699 		if (parent != ibnex.ibnex_dip) {
1700 			if (major == -1) {
1701 				/*
1702 				 * HCA dip. When major number is -1 HCA is
1703 				 * going away cleanup all the port nodes.
1704 				 */
1705 				for (ndp = ibnex.ibnex_port_node_head;
1706 				    ndp; ndp = ndp->node_next) {
1707 					ibnex_port_node_t	*port_node;
1708 
1709 					port_node = &ndp->node_data.port_node;
1710 					if (port_node->port_pdip == parent) {
1711 						port_node->port_pdip = NULL;
1712 						ndp->node_dip = NULL;
1713 						ndp->node_state =
1714 						    IBNEX_CFGADM_UNCONFIGURED;
1715 					}
1716 				}
1717 			} else {
1718 				/*
1719 				 * HCA dip. Cleanup only the port nodes that
1720 				 * match the major number.
1721 				 */
1722 				for (ndp = ibnex.ibnex_port_node_head;
1723 				    ndp; ndp = ndp->node_next) {
1724 					ibnex_port_node_t	*port_node;
1725 
1726 					port_node = &ndp->node_data.port_node;
1727 					dip = ndp->node_dip;
1728 					if (dip && (ddi_driver_major(dip) ==
1729 					    major) && port_node->port_pdip ==
1730 					    parent) {
1731 						port_node->port_pdip = NULL;
1732 						ndp->node_dip = NULL;
1733 						ndp->node_state =
1734 						    IBNEX_CFGADM_UNCONFIGURED;
1735 					}
1736 				}
1737 			}
1738 		} else {
1739 			/*
1740 			 * IB dip. here we handle IOC and pseudo nodes which
1741 			 * are the children of IB nexus. Cleanup only the nodes
1742 			 * with matching major number. We also need to cleanup
1743 			 * the PathInfo links to the PHCI here.
1744 			 */
1745 			for (ndp = ibnex.ibnex_ioc_node_head;
1746 			    ndp; ndp = ndp->node_next) {
1747 				dip = ndp->node_dip;
1748 				if (dip && (ddi_driver_major(dip) == major)) {
1749 					(void) ibnex_offline_childdip(dip);
1750 				}
1751 			}
1752 			for (ndp = ibnex.ibnex_pseudo_node_head;
1753 			    ndp; ndp = ndp->node_next) {
1754 				dip = ndp->node_dip;
1755 				if (dip && (ddi_driver_major(dip) == major)) {
1756 					(void) ibnex_offline_childdip(dip);
1757 				}
1758 			}
1759 		}
1760 		mutex_exit(&ibnex.ibnex_mutex);
1761 	}
1762 	return (DDI_SUCCESS);
1763 }
1764 
1765 
1766 /*
1767  * ibnex_config_port_node()
1768  *
1769  *	Configures a particular port / HCA  node for a particular
1770  *	communication service.
1771  *	The format of the device_name is
1772  *		ibport@<Port#>,<pkey>,<service name>
1773  *	where pkey = 0 for port communication service nodes
1774  *		  Port# = 0 for HCA_SVC communication service nodes
1775  *	Returns "dev_info_t" of the "child" node just created
1776  *	NULL when failed to enumerate the child node
1777  */
1778 static dev_info_t *
1779 ibnex_config_port_node(dev_info_t *parent, char *devname)
1780 {
1781 	int			ii, index;
1782 	int			rval;
1783 	uint8_t			port_num;
1784 	ib_guid_t		hca_guid, port_guid;
1785 	ib_pkey_t		pkey;
1786 	dev_info_t		*cdip;
1787 	ibdm_port_attr_t	*port_attr;
1788 	ibdm_hca_list_t		*hca_list;
1789 
1790 	IBTF_DPRINTF_L4("ibnex", "\tconfig_port_node: %s", devname);
1791 
1792 	if (ibnex_get_pkey_commsvc_index_portnum(devname,
1793 	    &index, &pkey, &port_num) != IBNEX_SUCCESS) {
1794 		IBTF_DPRINTF_L2("ibnex",
1795 		    "\tconfig_port_node: Invalid Service Name");
1796 		return (NULL);
1797 	}
1798 
1799 	hca_guid = ibtl_ibnex_hcadip2guid(parent);
1800 	if (port_num == 0) {
1801 		/*
1802 		 * Use the dummy port attribute for HCA node in hca_list
1803 		 * Note : pa_state is always IBT_PORT_ACTIVE.
1804 		 */
1805 		hca_list = ibdm_ibnex_get_hca_info_by_guid(hca_guid);
1806 		ASSERT(hca_list != NULL);
1807 		port_attr = hca_list->hl_hca_port_attr;
1808 	} else {
1809 		if ((port_attr = ibdm_ibnex_probe_hcaport(
1810 		    hca_guid, port_num)) == NULL) {
1811 			IBTF_DPRINTF_L2("ibnex",
1812 			    "\tconfig_port_node: Port does not exist");
1813 			return (NULL);
1814 		}
1815 
1816 		if (port_attr->pa_state != IBT_PORT_ACTIVE) {
1817 			ibdm_ibnex_port_settle_wait(
1818 			    hca_guid, ibnex_port_settling_time);
1819 			ibdm_ibnex_free_port_attr(port_attr);
1820 			if ((port_attr = ibdm_ibnex_probe_hcaport(
1821 			    hca_guid, port_num)) == NULL) {
1822 				return (NULL);
1823 			}
1824 		}
1825 	}
1826 
1827 	port_guid = port_attr->pa_port_guid;
1828 	mutex_enter(&ibnex.ibnex_mutex);
1829 	if ((rval = ibnex_get_dip_from_guid(port_guid, index, pkey,
1830 	    &cdip)) == IBNEX_SUCCESS) {
1831 		IBTF_DPRINTF_L4("ibnex", "\tconfig_port_node: Node exists");
1832 		mutex_exit(&ibnex.ibnex_mutex);
1833 		if (port_num != 0)
1834 			ibdm_ibnex_free_port_attr(port_attr);
1835 		else
1836 			ibdm_ibnex_free_hca_list(hca_list);
1837 		return (cdip);
1838 	}
1839 
1840 	if (pkey == 0 && port_num != 0) {
1841 		cdip = ibnex_commsvc_initnode(parent,
1842 		    port_attr, index, IBNEX_PORT_COMMSVC_NODE, pkey, &rval,
1843 		    IBNEX_DEVFS_ENUMERATE);
1844 		IBTF_DPRINTF_L5("ibnex",
1845 		    "\t ibnex_commsvc_initnode rval %x", rval);
1846 	} else if (pkey == 0 && port_num == 0) {
1847 		cdip = ibnex_commsvc_initnode(parent,
1848 		    port_attr, index, IBNEX_HCASVC_COMMSVC_NODE, pkey, &rval,
1849 		    IBNEX_DEVFS_ENUMERATE);
1850 		IBTF_DPRINTF_L5("ibnex",
1851 		    "\t ibnex_commsvc_initnode rval %x", rval);
1852 	} else {
1853 		if (port_attr->pa_state != IBT_PORT_ACTIVE) {
1854 			IBTF_DPRINTF_L4("ibnex", "\tconfig_port_nodes: "
1855 			    "Port %d is down", port_attr->pa_port_num);
1856 			ibdm_ibnex_free_port_attr(port_attr);
1857 			mutex_exit(&ibnex.ibnex_mutex);
1858 			return (NULL);
1859 		}
1860 		for (ii = 0; ii < port_attr->pa_npkeys; ii++) {
1861 			if (pkey == port_attr->pa_pkey_tbl[ii].pt_pkey) {
1862 				cdip = ibnex_commsvc_initnode(parent, port_attr,
1863 				    index, IBNEX_VPPA_COMMSVC_NODE,
1864 				    pkey, &rval, IBNEX_CFGADM_ENUMERATE);
1865 				IBTF_DPRINTF_L5("ibnex",
1866 				    "\t ibnex_commsvc_initnode rval %x", rval);
1867 				break;
1868 			}
1869 		}
1870 	}
1871 	mutex_exit(&ibnex.ibnex_mutex);
1872 	if (port_num != 0)
1873 		ibdm_ibnex_free_port_attr(port_attr);
1874 	else
1875 		ibdm_ibnex_free_hca_list(hca_list);
1876 	return (cdip);
1877 }
1878 
1879 
1880 /*
1881  * ibnex_config_obp_args()
1882  *	Configures a particular port node for a IP over IB communication
1883  *	service.
1884  *	The format of the input string "devname" is
1885  *		port=x,pkey=y,protocol=ip,<wanboot options>
1886  *	Thr format of the node name created here is
1887  *		ibport@<Port#>,<pkey>,<service name>
1888  *	where pkey = 0 for port communication service nodes
1889  *	Returns "dev_info_t" of the "child" node just created
1890  *	NULL when failed to enumerate the child node
1891  *
1892  */
1893 static dev_info_t *
1894 ibnex_config_obp_args(dev_info_t *parent, char *devname)
1895 {
1896 	int			ii, index;
1897 	int			rval, iter = 0;
1898 	char			*temp;
1899 	uint8_t			port_num;
1900 	ib_guid_t		hca_guid, port_guid;
1901 	ib_pkey_t		pkey;
1902 	dev_info_t		*cdip;
1903 	boolean_t		displayed = B_FALSE;
1904 	ibdm_port_attr_t	*port_attr;
1905 
1906 	IBTF_DPRINTF_L4("ibnex", "\tconfig_obp_args: %s", devname);
1907 
1908 	/* Is this OBP node for IPoIB ? */
1909 	temp = devname;
1910 	do {
1911 		temp = strstr(temp, ",protocol=ip");
1912 		if (temp == NULL)
1913 			break;
1914 
1915 		if (strlen(devname) > (int)((temp - devname) + 12)) {
1916 			if (temp[12] == ',')
1917 				break;
1918 		} else {
1919 			break;
1920 		}
1921 		temp++;
1922 	} while (temp);
1923 
1924 	if (temp == NULL)
1925 		return (NULL);
1926 	if (ibnex_prom_devname_to_pkey_n_portnum(
1927 	    devname, &pkey, &port_num) != IBNEX_SUCCESS) {
1928 		return (NULL);
1929 	}
1930 	for (index = 0; index < ibnex.ibnex_nvppa_comm_svcs; index++) {
1931 		if (strcmp(ibnex.ibnex_vppa_comm_svc_names[index],
1932 		    "ipib") == 0) {
1933 			break;
1934 		}
1935 	}
1936 
1937 	hca_guid = ibtl_ibnex_hcadip2guid(parent);
1938 	if ((port_attr = ibdm_ibnex_probe_hcaport(
1939 	    hca_guid, port_num)) == NULL) {
1940 		IBTF_DPRINTF_L2("ibnex",
1941 		    "\tconfig_port_node: Port does not exist");
1942 		return (NULL);
1943 	}
1944 
1945 	/* Wait until "port is up" */
1946 	while (port_attr->pa_state != IBT_PORT_ACTIVE) {
1947 		ibdm_ibnex_free_port_attr(port_attr);
1948 		delay(drv_usectohz(10000));
1949 		if ((port_attr = ibdm_ibnex_probe_hcaport(
1950 		    hca_guid, port_num)) == NULL) {
1951 			return (NULL);
1952 		}
1953 		if (iter++ == 400) {
1954 			if (displayed == B_FALSE) {
1955 				cmn_err(CE_NOTE, "\tWaiting for Port %d "
1956 				    "initialization", port_attr->pa_port_num);
1957 				displayed = B_TRUE;
1958 			}
1959 		}
1960 	}
1961 	IBTF_DPRINTF_L4("ibnex", "\tPort is initialized");
1962 
1963 	mutex_enter(&ibnex.ibnex_mutex);
1964 	port_guid = port_attr->pa_port_guid;
1965 	if ((rval = ibnex_get_dip_from_guid(port_guid, index, pkey,
1966 	    &cdip)) == IBNEX_SUCCESS) {
1967 		IBTF_DPRINTF_L4("ibnex", "\tconfig_port_node: Node exists");
1968 		mutex_exit(&ibnex.ibnex_mutex);
1969 		ibdm_ibnex_free_port_attr(port_attr);
1970 		return (cdip);
1971 	}
1972 	for (ii = 0; ii < port_attr->pa_npkeys; ii++) {
1973 		if (pkey == port_attr->pa_pkey_tbl[ii].pt_pkey) {
1974 			cdip = ibnex_commsvc_initnode(parent, port_attr,
1975 			    index, IBNEX_VPPA_COMMSVC_NODE, pkey, &rval,
1976 			    IBNEX_CFGADM_ENUMERATE);
1977 			IBTF_DPRINTF_L5("ibnex",
1978 			    "\t ibnex_commsvc_initnode rval %x", rval);
1979 			break;
1980 		}
1981 	}
1982 	mutex_exit(&ibnex.ibnex_mutex);
1983 
1984 	ibdm_ibnex_free_port_attr(port_attr);
1985 	return (cdip);
1986 }
1987 
1988 
1989 /*
1990  * ibnex_prom_devname_to_pkey_n_portnum()
1991  *	Parses the device node name and extracts "PKEY" and "port#"
1992  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
1993  */
1994 static int
1995 ibnex_prom_devname_to_pkey_n_portnum(
1996     char *devname, ib_pkey_t *pkey, uint8_t *port)
1997 {
1998 	int	ret = IBNEX_SUCCESS;
1999 	char	*tmp, *tmp1;
2000 
2001 	if ((tmp = strstr(devname, "port=")) != NULL) {
2002 		if ((tmp = strchr(++tmp, '=')) != NULL)
2003 			if ((tmp1 = strchr(++tmp, ',')) != NULL)
2004 				*port = ibnex_str2int(tmp, (tmp1 - tmp), &ret);
2005 	} else
2006 		ret = IBNEX_FAILURE;
2007 
2008 	if ((ret == IBNEX_SUCCESS) &&
2009 	    (tmp = strstr(devname, "pkey=")) != NULL) {
2010 		if ((tmp = strchr(++tmp, '=')) != NULL)
2011 			if ((tmp1 = strchr(++tmp, ',')) != NULL)
2012 				*pkey = ibnex_str2hex(tmp, (tmp1 - tmp), &ret);
2013 	} else
2014 		ret = IBNEX_FAILURE;
2015 
2016 	return (ret);
2017 }
2018 
2019 
2020 /*
2021  * ibnex_get_pkey_commsvc_index_portnum()
2022  *	Parses the device node name and extracts PKEY, communication
2023  *	service index & Port #.
2024  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2025  */
2026 static int
2027 ibnex_get_pkey_commsvc_index_portnum(char *device_name, int *index,
2028     ib_pkey_t *pkey, uint8_t *port_num)
2029 {
2030 	char 	*srv, **service_name, *temp;
2031 	int  	ii, ncommsvcs, ret;
2032 
2033 	if (ibnex_devname_to_portnum(device_name, port_num) !=
2034 	    IBNEX_SUCCESS) {
2035 		IBTF_DPRINTF_L2("ibnex",
2036 		    "\tget_pkey_commsvc_index_portnum: Invalid PortGuid");
2037 		return (NULL);
2038 	}
2039 	srv = strchr(device_name, ',');
2040 	if (srv == 0)
2041 		return (IBNEX_FAILURE);
2042 
2043 	srv++;
2044 	temp = strchr(srv, ',');
2045 	if (temp == 0)
2046 		return (IBNEX_FAILURE);
2047 	temp++;
2048 	*pkey = ibnex_str2hex(srv, (temp - srv - 1), &ret);
2049 	if (ret != IBNEX_SUCCESS)
2050 		return (ret);
2051 
2052 	if (*pkey == 0 && *port_num != 0) {
2053 		service_name = ibnex.ibnex_comm_svc_names;
2054 		ncommsvcs = ibnex.ibnex_num_comm_svcs;
2055 	} else if (*pkey == 0 && *port_num == 0) {
2056 		service_name = ibnex.ibnex_hcasvc_comm_svc_names;
2057 		ncommsvcs = ibnex.ibnex_nhcasvc_comm_svcs;
2058 	} else {
2059 		service_name = ibnex.ibnex_vppa_comm_svc_names;
2060 		ncommsvcs = ibnex.ibnex_nvppa_comm_svcs;
2061 	}
2062 
2063 	for (ii = 0; ii < ncommsvcs; ii++) {
2064 		if (strcmp(service_name[ii], temp) == 0) {
2065 			break;
2066 		}
2067 	}
2068 	if (ii == ncommsvcs)
2069 		return (IBNEX_FAILURE);
2070 
2071 	*index = ii;
2072 	return (IBNEX_SUCCESS);
2073 }
2074 
2075 
2076 /*
2077  * ibnex_devname_to_portnum()
2078  *	Get portguid from device name
2079  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2080  */
2081 static int
2082 ibnex_devname_to_portnum(char *device_name, uint8_t *portnum)
2083 {
2084 	int	ret;
2085 	char	*temp1, *temp2;
2086 
2087 	temp1 = strchr(device_name, '@');
2088 	if (temp1 == NULL) {
2089 		return (IBNEX_FAILURE);
2090 	}
2091 	temp2 = strchr(temp1, ',');
2092 	if (temp2 == NULL)
2093 		return (IBNEX_FAILURE);
2094 	temp1++;
2095 	*portnum = ibnex_str2hex(temp1, (temp2 - temp1), &ret);
2096 	return (ret);
2097 }
2098 
2099 
2100 /*
2101  * ibnex_config_ioc_node()
2102  *	Configures one particular instance of the IOC driver.
2103  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2104  */
2105 static int
2106 ibnex_config_ioc_node(char *device_name, dev_info_t *pdip)
2107 {
2108 	int			ret;
2109 	ib_guid_t		iou_guid, ioc_guid;
2110 	ibdm_ioc_info_t		*ioc_info;
2111 
2112 	IBTF_DPRINTF_L4("ibnex", "\tconfig_ioc_node: Begin");
2113 
2114 	if (ibnex_devname_to_node_n_ioc_guids(
2115 	    device_name, &iou_guid, &ioc_guid, NULL) != IBNEX_SUCCESS) {
2116 		return (IBNEX_FAILURE);
2117 	}
2118 
2119 	ibdm_ibnex_port_settle_wait(0, ibnex_port_settling_time);
2120 
2121 	if ((ioc_info = ibdm_ibnex_probe_ioc(iou_guid, ioc_guid, 0)) ==
2122 	    NULL) {
2123 		ibdm_ibnex_free_ioc_list(ioc_info);
2124 		return (IBNEX_FAILURE);
2125 	}
2126 	mutex_enter(&ibnex.ibnex_mutex);
2127 	ret = ibnex_ioc_config_from_pdip(ioc_info, pdip, 0);
2128 	mutex_exit(&ibnex.ibnex_mutex);
2129 	ibdm_ibnex_free_ioc_list(ioc_info);
2130 	IBTF_DPRINTF_L4("ibnex", "\tconfig_ioc_node: ret %x",
2131 	    ret);
2132 	return (ret);
2133 }
2134 
2135 
2136 /*
2137  * ibnex_devname_to_node_n_ioc_guids()
2138  *	Get node guid and ioc guid from the device name
2139  *	Format of the device node name is:
2140  *		ioc@<IOC GUID>,<IOU GUID>
2141  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2142  */
2143 static int
2144 ibnex_devname_to_node_n_ioc_guids(
2145     char *device_name, ib_guid_t *iou_guid, ib_guid_t *ioc_guid,
2146     char **ioc_guid_strp)
2147 {
2148 	char	*temp1, *temp;
2149 	int	len, ret;
2150 	char	*ioc_guid_str;
2151 
2152 	IBTF_DPRINTF_L4("ibnex", "\tdevname_to_node_n_ioc_guids:"
2153 	    "Device Name %s", device_name);
2154 
2155 	if ((temp = strchr(device_name, '@')) == NULL) {
2156 		return (IBNEX_FAILURE);
2157 	}
2158 	if ((temp1 = strchr(++temp, ',')) == NULL) {
2159 		return (IBNEX_FAILURE);
2160 	}
2161 	*ioc_guid = ibnex_str2hex(temp, (temp1 - temp), &ret);
2162 	if (ret == IBNEX_SUCCESS) {
2163 		if (ioc_guid_strp) {
2164 			ioc_guid_str = *ioc_guid_strp = kmem_zalloc((temp1
2165 			    - temp) + 1, KM_SLEEP);
2166 			(void) strncpy(ioc_guid_str, temp, temp1 - temp + 1);
2167 			ioc_guid_str[temp1 - temp] = '\0';
2168 		}
2169 		len = device_name + strlen(device_name) - ++temp1;
2170 		*iou_guid = ibnex_str2hex(temp1, len, &ret);
2171 	}
2172 	return (ret);
2173 }
2174 
2175 
2176 /*
2177  * ibnex_ioc_initnode()
2178  *	Allocate a pathinfo node for the IOC
2179  *	Initialize the device node
2180  *	Bind driver to the node
2181  *	Update IBnex global data
2182  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE/IBNEX_BUSY
2183  */
2184 static int
2185 ibnex_ioc_initnode_pdip(ibnex_node_data_t *node_data,
2186     ibdm_ioc_info_t *ioc_info, dev_info_t *pdip)
2187 {
2188 	int			rval, node_valid;
2189 	ibnex_node_state_t	prev_state;
2190 
2191 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
2192 	ASSERT(node_data);
2193 
2194 
2195 	/*
2196 	 * Return EBUSY if another configure/unconfigure
2197 	 * operation is in progress
2198 	 */
2199 	if (node_data->node_state == IBNEX_CFGADM_UNCONFIGURING) {
2200 		IBTF_DPRINTF_L4("ibnex",
2201 		    "\tioc_initnode_pdip : BUSY");
2202 		return (IBNEX_BUSY);
2203 	}
2204 
2205 	prev_state = node_data->node_state;
2206 	node_data->node_state = IBNEX_CFGADM_CONFIGURING;
2207 	mutex_exit(&ibnex.ibnex_mutex);
2208 
2209 	rval = ibnex_ioc_create_pi(ioc_info, node_data, pdip, &node_valid);
2210 
2211 	mutex_enter(&ibnex.ibnex_mutex);
2212 	if (rval == IBNEX_SUCCESS)
2213 		node_data->node_state = IBNEX_CFGADM_CONFIGURED;
2214 	else if (node_valid)
2215 		node_data->node_state = prev_state;
2216 
2217 	return (rval);
2218 }
2219 
2220 /*
2221  * ibnex_config_pseudo_all()
2222  *	Configure all the pseudo nodes
2223  */
2224 static void
2225 ibnex_config_pseudo_all(dev_info_t *pdip)
2226 {
2227 	ibnex_node_data_t	*nodep;
2228 
2229 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
2230 
2231 	for (nodep = ibnex.ibnex_pseudo_node_head;
2232 	    nodep; nodep = nodep->node_next) {
2233 		(void) ibnex_pseudo_config_one(nodep, NULL, pdip);
2234 	}
2235 }
2236 
2237 
2238 /*
2239  * ibnex_pseudo_config_one()
2240  */
2241 static int
2242 ibnex_pseudo_config_one(ibnex_node_data_t *node_data, char *caddr,
2243     dev_info_t *pdip)
2244 {
2245 	int			rval;
2246 	ibnex_pseudo_node_t	*pseudo;
2247 	ibnex_node_state_t	prev_state;
2248 
2249 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_config_one(%p, %p, %p)",
2250 	    node_data, caddr, pdip);
2251 
2252 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
2253 
2254 	if (node_data == NULL) {
2255 		IBTF_DPRINTF_L4("ibnex",
2256 		    "\tpseudo_config_one: caddr = %s", caddr);
2257 
2258 		/*
2259 		 * This function is now called with PHCI / HCA driver
2260 		 * as parent. The format of devicename is :
2261 		 * 	<driver_name>@<driver_name>,<unit_address>
2262 		 * The "caddr" part of the devicename matches the
2263 		 * format of pseudo_node_addr.
2264 		 *
2265 		 * Use "caddr" to find a matching Pseudo node entry.
2266 		 */
2267 		node_data = ibnex_is_node_data_present(IBNEX_PSEUDO_NODE,
2268 		    (void *)caddr, 0, 0);
2269 	}
2270 
2271 	if (node_data == NULL) {
2272 		IBTF_DPRINTF_L2("ibnex",
2273 		    "\tpseudo_config_one: Invalid node");
2274 		return (IBNEX_FAILURE);
2275 	}
2276 
2277 	if (node_data->node_ap_state == IBNEX_NODE_AP_UNCONFIGURED) {
2278 		IBTF_DPRINTF_L4("ibnex",
2279 		    "\tpseudo_config_one: Unconfigured node");
2280 		return (IBNEX_FAILURE);
2281 	}
2282 
2283 	pseudo = &node_data->node_data.pseudo_node;
2284 
2285 	/*
2286 	 * Do not enumerate nodes with ib-node-type set as "merge"
2287 	 */
2288 	if (pseudo->pseudo_merge_node == 1) {
2289 		IBTF_DPRINTF_L4("ibnex",
2290 		    "\tpseudo_config_one: merge_node");
2291 		return (IBNEX_FAILURE);
2292 	}
2293 
2294 	/*
2295 	 * Check if a PI has already been created for the PDIP.
2296 	 * If so, return SUCCESS.
2297 	 */
2298 	if (node_data->node_dip != NULL && mdi_pi_find(pdip,
2299 	    pseudo->pseudo_node_addr, pseudo->pseudo_node_addr) != NULL) {
2300 		IBTF_DPRINTF_L4("ibnex",
2301 		    "\tpseudo_config_one: PI created,"
2302 		    " pdip %p, addr %s", pdip, pseudo->pseudo_node_addr);
2303 		return (IBNEX_SUCCESS);
2304 	}
2305 
2306 	/*
2307 	 * Return EBUSY if another unconfigure
2308 	 * operation is in progress
2309 	 */
2310 	if (node_data->node_state == IBNEX_CFGADM_UNCONFIGURING) {
2311 		IBTF_DPRINTF_L4("ibnex",
2312 		    "\tpseudo_config_one: BUSY");
2313 		return (IBNEX_BUSY);
2314 	}
2315 
2316 
2317 	prev_state = node_data->node_state;
2318 	node_data->node_state = IBNEX_CFGADM_CONFIGURING;
2319 
2320 	mutex_exit(&ibnex.ibnex_mutex);
2321 	rval = ibnex_pseudo_create_pi_pdip(node_data, pdip);
2322 	mutex_enter(&ibnex.ibnex_mutex);
2323 
2324 	if (rval == IBNEX_SUCCESS) {
2325 		node_data->node_state = IBNEX_CFGADM_CONFIGURED;
2326 	} else {
2327 		node_data->node_state = prev_state;
2328 	}
2329 
2330 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_config_one: ret %x",
2331 	    rval);
2332 	return (rval);
2333 }
2334 
2335 
2336 /*
2337  * ibnex_pseudo_mdi_config_one()
2338  *	This is similar to ibnex_pseudo_config_one. Few
2339  *	differences :
2340  *	1. parent device lock not held(no ndi_devi_enter)
2341  *	2. Called for IB Nexus as parent, not IB HCA as
2342  *	   parent.
2343  *	3. Calls mdi_vhci_bus_config()
2344  * This function skips checks for node_state, initializing
2345  * node_state, node_dip, etc. These checks and initializations
2346  * are done when BUS_CONFIG is called with PHCI as the parent.
2347  */
2348 static int
2349 ibnex_pseudo_mdi_config_one(int flag, void *devname, dev_info_t **child,
2350     char *cname, char *caddr)
2351 {
2352 	int			rval, len;
2353 	char			*node_addr;
2354 	ibnex_node_data_t	*node_data;
2355 
2356 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_mdi_config_one:"
2357 	    "cname = %s caddr = %s", cname, caddr);
2358 
2359 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
2360 
2361 	len = strlen(cname) + strlen(caddr) + 2;
2362 	node_addr = (char *)kmem_alloc(len, KM_SLEEP);
2363 
2364 	(void) snprintf(node_addr, len, "%s,%s", cname, caddr);
2365 	node_data = ibnex_is_node_data_present(IBNEX_PSEUDO_NODE,
2366 	    (void *)node_addr, 0, 0);
2367 	kmem_free(node_addr, len);
2368 
2369 	if (node_data == NULL) {
2370 		IBTF_DPRINTF_L2("ibnex",
2371 		    "\tpseudo_mdi_config_one: Invalid node");
2372 		return (IBNEX_FAILURE);
2373 	}
2374 
2375 	mutex_exit(&ibnex.ibnex_mutex);
2376 	rval = mdi_vhci_bus_config(ibnex.ibnex_dip, flag, BUS_CONFIG_ONE,
2377 	    devname, child, node_data->node_data.pseudo_node.pseudo_node_addr);
2378 	mutex_enter(&ibnex.ibnex_mutex);
2379 
2380 	return (rval);
2381 }
2382 
2383 
2384 /*
2385  * ibnex_pseudo_create_all_pi()
2386  *	Create all path infos node for a pseudo entry
2387  */
2388 int
2389 ibnex_pseudo_create_all_pi(ibnex_node_data_t *nodep)
2390 {
2391 	int		hcacnt, rc;
2392 	int		hcafailcnt = 0;
2393 	dev_info_t	*hca_dip;
2394 	ibdm_hca_list_t	*hca_list, *head;
2395 
2396 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_create_all_pi(%p)",
2397 	    nodep);
2398 	ibdm_ibnex_get_hca_list(&hca_list, &hcacnt);
2399 
2400 	head = hca_list;
2401 
2402 	/*
2403 	 * We return failure even if we fail for all HCAs.
2404 	 */
2405 	for (; hca_list != NULL; hca_list = hca_list->hl_next) {
2406 		hca_dip = ibtl_ibnex_hcaguid2dip(hca_list->hl_hca_guid);
2407 		rc = ibnex_pseudo_create_pi_pdip(nodep, hca_dip);
2408 		if (rc != IBNEX_SUCCESS)
2409 			hcafailcnt++;
2410 	}
2411 	if (head)
2412 		ibdm_ibnex_free_hca_list(head);
2413 
2414 	if (hcafailcnt == hcacnt)
2415 		rc = IBNEX_FAILURE;
2416 	else
2417 		rc = IBNEX_SUCCESS;
2418 
2419 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_create_all_pi rc %x",
2420 	    rc);
2421 	return (rc);
2422 }
2423 
2424 static int
2425 ibnex_pseudo_create_pi_pdip(ibnex_node_data_t *nodep, dev_info_t *hca_dip)
2426 {
2427 	mdi_pathinfo_t		*pip;
2428 	int			rval;
2429 	dev_info_t		*cdip = NULL;
2430 	ibnex_pseudo_node_t	*pseudo;
2431 	int			first_pi = 0;
2432 
2433 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_create_pi_pdip: %p, %p",
2434 	    nodep, hca_dip);
2435 
2436 	pseudo = &nodep->node_data.pseudo_node;
2437 
2438 	rval = mdi_pi_alloc(hca_dip,
2439 	    pseudo->pseudo_devi_name, pseudo->pseudo_node_addr,
2440 	    pseudo->pseudo_node_addr, 0, &pip);
2441 
2442 	if (rval != MDI_SUCCESS) {
2443 		IBTF_DPRINTF_L2("ibnex", "\tpseudo_create_pi_pdip:"
2444 		    " mdi_pi_alloc failed");
2445 		return (IBNEX_FAILURE);
2446 	}
2447 	cdip = mdi_pi_get_client(pip);
2448 
2449 	if (nodep->node_dip == NULL) {
2450 		IBTF_DPRINTF_L4("ibnex",
2451 		    "\tpseudo_create_pi: New dip %p", cdip);
2452 
2453 		first_pi = 1;
2454 		nodep->node_dip = cdip;
2455 		ddi_set_parent_data(cdip, nodep);
2456 	}
2457 
2458 	rval = mdi_pi_online(pip, 0);
2459 
2460 	if (rval != MDI_SUCCESS) {
2461 		IBTF_DPRINTF_L2("ibnex",
2462 		    "\tpseudo_create_pi: "
2463 		    "mdi_pi_online: failed for pseudo dip %p,"
2464 		    " rval %d", cdip, rval);
2465 		rval = IBNEX_FAILURE;
2466 		if (first_pi == 1) {
2467 			ddi_set_parent_data(cdip, NULL);
2468 			(void) ibnex_offline_childdip(cdip);
2469 			nodep->node_dip = NULL;
2470 		} else
2471 			(void) mdi_pi_free(pip, 0);
2472 	} else
2473 		rval = IBNEX_SUCCESS;
2474 	return (rval);
2475 }
2476 
2477 /*
2478  * ibnex_ioc_create_pi()
2479  *	Create a pathinfo node for the ioc node
2480  */
2481 static int
2482 ibnex_ioc_create_pi(ibdm_ioc_info_t *ioc_info, ibnex_node_data_t *node_data,
2483     dev_info_t *pdip, int *node_valid)
2484 {
2485 	mdi_pathinfo_t		*pip;
2486 	int			rval = DDI_FAILURE;
2487 	dev_info_t		*cdip = NULL;
2488 	int			create_prop = 0;
2489 	ibnex_ioc_node_t	*ioc = &node_data->node_data.ioc_node;
2490 
2491 	IBTF_DPRINTF_L4("ibnex",
2492 	    "\tibnex_ioc_create_pi(%p, %p, %p)", ioc_info, node_data, pdip);
2493 	*node_valid = 1;
2494 
2495 	/*
2496 	 * For CONFIG_ONE requests through HCA dip, alloc
2497 	 * for HCA dip driving BUS_CONFIG request.
2498 	 */
2499 	rval =  mdi_pi_alloc(pdip, IBNEX_IOC_CNAME, ioc->ioc_guid_str,
2500 	    ioc->ioc_phci_guid, 0, &pip);
2501 	if (rval != MDI_SUCCESS) {
2502 		IBTF_DPRINTF_L2("ibnex",
2503 		    "\tioc_create_pi: mdi_pi_alloc(%p, %s. %s) failed",
2504 		    pdip, ioc->ioc_guid_str, ioc->ioc_phci_guid);
2505 		return (IBNEX_FAILURE);
2506 	}
2507 	cdip = mdi_pi_get_client(pip);
2508 
2509 	IBTF_DPRINTF_L4("ibnex", "\tioc_create_pi: IOC dip %p",
2510 	    cdip);
2511 
2512 	if (node_data->node_dip == NULL) {
2513 		node_data->node_dip = cdip;
2514 		ddi_set_parent_data(cdip, node_data);
2515 		create_prop = 1;
2516 		IBTF_DPRINTF_L4("ibnex",
2517 		    "\tioc_create_pi: creating prop");
2518 		if ((rval = ibnex_create_ioc_node_prop(
2519 		    ioc_info, cdip)) != IBNEX_SUCCESS) {
2520 			IBTF_DPRINTF_L4("ibnex",
2521 			    "\tioc_create_pi: creating prop failed");
2522 			ibnex_delete_ioc_node_data(node_data);
2523 			*node_valid = 0;
2524 			ddi_prop_remove_all(cdip);
2525 			ddi_set_parent_data(cdip, NULL);
2526 
2527 			(void) ibnex_offline_childdip(cdip);
2528 			return (IBNEX_FAILURE);
2529 		}
2530 	}
2531 
2532 	rval = mdi_pi_online(pip, 0);
2533 
2534 	if (rval != MDI_SUCCESS) {
2535 		IBTF_DPRINTF_L2("ibnex", "\tioc_create_pi: "
2536 		    "mdi_pi_online() failed ioc dip %p, rval %d",
2537 		    cdip, rval);
2538 		rval = IBNEX_FAILURE;
2539 		if (create_prop) {
2540 			ddi_set_parent_data(cdip, NULL);
2541 			ddi_prop_remove_all(cdip);
2542 			ibnex_delete_ioc_node_data(node_data);
2543 			*node_valid = 0;
2544 			(void) ibnex_offline_childdip(cdip);
2545 		} else
2546 			(void) mdi_pi_free(pip, 0);
2547 	} else
2548 		rval = IBNEX_SUCCESS;
2549 
2550 	IBTF_DPRINTF_L4("ibnex", "\tioc_create_pi ret %x", rval);
2551 	return (rval);
2552 }
2553 
2554 
2555 /*
2556  * ibnex_create_ioc_node_prop()
2557  *	Create IOC device node properties
2558  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2559  */
2560 static int
2561 ibnex_create_ioc_node_prop(ibdm_ioc_info_t *ioc_info, dev_info_t *cdip)
2562 {
2563 	uint16_t		 capabilities;
2564 	ib_dm_ioc_ctrl_profile_t *ioc_profile = &ioc_info->ioc_profile;
2565 
2566 	IBTF_DPRINTF_L4("ibnex", "\tcreate_ioc_node_prop");
2567 
2568 	if (ibnex_create_ioc_compatible_prop(cdip,
2569 	    ioc_profile) != IBNEX_SUCCESS) {
2570 		return (IBNEX_FAILURE);
2571 	}
2572 	if ((ioc_info->ioc_iou_dc_valid) &&
2573 	    (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "iou-diagcode",
2574 	    ioc_info->ioc_iou_diagcode)) != DDI_PROP_SUCCESS) {
2575 		IBTF_DPRINTF_L2("ibnex",
2576 		    "\tcreate_ioc_node_prop: iou-diagcode create failed");
2577 		return (IBNEX_FAILURE);
2578 	}
2579 	if ((ioc_info->ioc_diagdeviceid) && (ioc_info->ioc_dc_valid)) {
2580 		if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "ioc-diagcode",
2581 		    ioc_info->ioc_diagcode) != DDI_PROP_SUCCESS) {
2582 			IBTF_DPRINTF_L2("ibnex", "\tcreate_ioc_node_prop: "
2583 			    "ioc-diagcode create failed");
2584 			return (IBNEX_FAILURE);
2585 		}
2586 	}
2587 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "rdma-queue-depth",
2588 	    ioc_profile->ioc_rdma_read_qdepth) != DDI_PROP_SUCCESS) {
2589 		IBTF_DPRINTF_L2("ibnex",
2590 		    "\tcreate_ioc_node_prop: rdma-queue-depth create failed");
2591 		return (IBNEX_FAILURE);
2592 	}
2593 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "rdma-transfer-size",
2594 	    ioc_profile->ioc_rdma_xfer_sz) != DDI_PROP_SUCCESS) {
2595 		IBTF_DPRINTF_L2("ibnex", "\tcreate_ioc_node_prop: "
2596 		    "rdma-transfer-size create failed");
2597 		return (IBNEX_FAILURE);
2598 	}
2599 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "send-message-size",
2600 	    ioc_profile->ioc_send_msg_sz) != DDI_PROP_SUCCESS) {
2601 		IBTF_DPRINTF_L2("ibnex",
2602 		    "\tcreate_ioc_node_prop: send-message-size create failed");
2603 		return (IBNEX_FAILURE);
2604 	}
2605 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "send-queue-depth",
2606 	    ioc_profile->ioc_send_msg_qdepth) != DDI_PROP_SUCCESS) {
2607 		IBTF_DPRINTF_L2("ibnex",
2608 		    "\tcreate_ioc_node_prop: send-queue-depth create failed");
2609 		return (IBNEX_FAILURE);
2610 	}
2611 
2612 	capabilities = (ioc_profile->ioc_ctrl_opcap_mask << 8);
2613 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip,
2614 	    "capabilities", capabilities) != DDI_PROP_SUCCESS) {
2615 		IBTF_DPRINTF_L2("ibnex",
2616 		    "\tcreate_ioc_node_prop: capabilities create failed");
2617 		return (IBNEX_FAILURE);
2618 	}
2619 	if (ndi_prop_update_string(DDI_DEV_T_NONE, cdip, "id-string",
2620 	    (char *)ioc_profile->ioc_id_string) != DDI_PROP_SUCCESS) {
2621 		IBTF_DPRINTF_L2("ibnex",
2622 		    "\tcreate_ioc_node_prop: id-string failed");
2623 		return (IBNEX_FAILURE);
2624 	}
2625 
2626 	/*
2627 	 * Create properties to represent all the service entries supported
2628 	 * by the IOC. Each service entry consists of 1) Service ID (64 bits)
2629 	 * and 2) Service name (40 bytes). The service entry table is
2630 	 * represented by two properties, service-ids and service-names. The
2631 	 * service-id property is a array of int64's and service names is
2632 	 * array of strings. The first element in the "service-ids" property
2633 	 * corresponds to first string in the "service-names" and so on.
2634 	 */
2635 	if ((ioc_profile->ioc_service_entries != 0) &&
2636 	    (ibnex_create_ioc_srv_props(cdip, ioc_info) != IBNEX_SUCCESS))
2637 		return (IBNEX_FAILURE);
2638 
2639 	/* Create destination port GID properties */
2640 	if (ibnex_create_ioc_portgid_prop(cdip, ioc_info) != IBNEX_SUCCESS)
2641 		return (IBNEX_FAILURE);
2642 
2643 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "protocol-version",
2644 	    ioc_profile->ioc_protocol_ver) != DDI_PROP_SUCCESS) {
2645 		IBTF_DPRINTF_L2("ibnex",
2646 		    "\tcreate_ioc_node_prop: protocol-version create failed");
2647 		return (IBNEX_FAILURE);
2648 	}
2649 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "protocol",
2650 	    ioc_profile->ioc_protocol) != DDI_PROP_SUCCESS) {
2651 		IBTF_DPRINTF_L2("ibnex",
2652 		    "\tcreate_ioc_node_prop: protocol create failed");
2653 		return (IBNEX_FAILURE);
2654 	}
2655 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "io-subclass",
2656 	    ioc_profile->ioc_io_subclass) != DDI_PROP_SUCCESS) {
2657 		IBTF_DPRINTF_L2("ibnex",
2658 		    "\tcreate_ioc_node_prop: subclass create failed");
2659 		return (IBNEX_FAILURE);
2660 	}
2661 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "io-class",
2662 	    ioc_profile->ioc_io_class) != DDI_PROP_SUCCESS) {
2663 		IBTF_DPRINTF_L2("ibnex",
2664 		    "\tcreate_ioc_node_prop: class prop create failed");
2665 		return (IBNEX_FAILURE);
2666 	}
2667 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "subsystem-id",
2668 	    ioc_profile->ioc_subsys_id) != DDI_PROP_SUCCESS) {
2669 		IBTF_DPRINTF_L2("ibnex",
2670 		    "\tcreate_ioc_node_prop: subsys_id create failed");
2671 		return (IBNEX_FAILURE);
2672 	}
2673 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "subsystem-vendor-id",
2674 	    ioc_profile->ioc_subsys_vendorid) != DDI_PROP_SUCCESS) {
2675 		IBTF_DPRINTF_L2("ibnex",
2676 		    "\tcreate_ioc_node_prop: subsystem vendor create failed");
2677 		return (IBNEX_FAILURE);
2678 	}
2679 	if (ndi_prop_update_int64(DDI_DEV_T_NONE, cdip, "ioc-guid",
2680 	    ioc_profile->ioc_guid) != DDI_PROP_SUCCESS) {
2681 		IBTF_DPRINTF_L2("ibnex",
2682 		    "\tcreate_ioc_node_prop: protocol create failed");
2683 		return (IBNEX_FAILURE);
2684 	}
2685 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "device-version",
2686 	    ioc_profile->ioc_device_ver) != DDI_PROP_SUCCESS) {
2687 		IBTF_DPRINTF_L2("ibnex",
2688 		    "\tcreate_ioc_node_prop: product-id create failed");
2689 		return (IBNEX_FAILURE);
2690 	}
2691 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "device-id",
2692 	    ioc_profile->ioc_deviceid) != DDI_PROP_SUCCESS) {
2693 		IBTF_DPRINTF_L2("ibnex",
2694 		    "\tcreate_ioc_node_prop: product-id create failed");
2695 		return (IBNEX_FAILURE);
2696 	}
2697 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "vendor-id",
2698 	    ioc_profile->ioc_vendorid) != DDI_PROP_SUCCESS) {
2699 		IBTF_DPRINTF_L2("ibnex",
2700 		    "\tcreate_ioc_node_prop: vendor-id create failed");
2701 		return (IBNEX_FAILURE);
2702 	}
2703 	return (IBNEX_SUCCESS);
2704 }
2705 
2706 
2707 /*
2708  * ibnex_create_ioc_portgid_prop()
2709  *	Creates "port-entries", "port-list" properties
2710  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2711  */
2712 static int
2713 ibnex_create_ioc_portgid_prop(
2714     dev_info_t *cdip, ibdm_ioc_info_t *ioc_info)
2715 {
2716 	uint64_t	*port_gids;
2717 	int		length, ii, jj;
2718 	int		prop_len;
2719 	ibnex_node_data_t *node_data;
2720 
2721 	IBTF_DPRINTF_L4("ibnex", "\tcreate_ioc_portgid_prop");
2722 
2723 	node_data = ddi_get_parent_data(cdip);
2724 	ASSERT(node_data);
2725 
2726 	prop_len = (ioc_info->ioc_nportgids != 0) ?
2727 	    (2 * ioc_info->ioc_nportgids) : 1;
2728 	length = sizeof (uint64_t) * prop_len;
2729 	port_gids = kmem_zalloc(length, KM_SLEEP);
2730 
2731 	for (ii = 0, jj = 0; ii < ioc_info->ioc_nportgids; ii++) {
2732 		port_gids[jj++] = ioc_info->ioc_gid_list[ii].gid_dgid_hi;
2733 		port_gids[jj++] = ioc_info->ioc_gid_list[ii].gid_dgid_lo;
2734 	}
2735 	if (ndi_prop_update_int64_array(DDI_DEV_T_NONE, cdip, "port-list",
2736 	    (int64_t *)port_gids, prop_len) != DDI_PROP_SUCCESS) {
2737 		IBTF_DPRINTF_L2("ibnex",
2738 		    "\tcreate_ioc_portgid_prop: port-list create failed");
2739 		kmem_free(port_gids, length);
2740 		return (IBNEX_FAILURE);
2741 	}
2742 	if (ndi_prop_update_int(DDI_DEV_T_NONE, cdip, "port-entries",
2743 	    ioc_info->ioc_nportgids) != DDI_PROP_SUCCESS) {
2744 		IBTF_DPRINTF_L2("ibnex",
2745 		    "\tcreate_ioc_portgid_prop: port-entries create failed");
2746 		kmem_free(port_gids, length);
2747 		return (IBNEX_FAILURE);
2748 	}
2749 
2750 	kmem_free(port_gids, length);
2751 	return (IBNEX_SUCCESS);
2752 }
2753 
2754 
2755 /*
2756  * ibnex_create_ioc_srv_props()
2757  *	Creates "service-name" and "service-id" properties
2758  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2759  */
2760 static int
2761 ibnex_create_ioc_srv_props(
2762     dev_info_t *cdip, ibdm_ioc_info_t *ioc_info)
2763 {
2764 	int			length, ii;
2765 	uint64_t		*srv_id;
2766 	char			*temp, *srv_names[IB_DM_MAX_IOCS_IN_IOU];
2767 	ib_dm_ioc_ctrl_profile_t *profile = &ioc_info->ioc_profile;
2768 	ibdm_srvents_info_t	 *srvents = ioc_info->ioc_serv;
2769 
2770 	IBTF_DPRINTF_L4("ibnex", "\tcreate_ioc_srv_props");
2771 
2772 	length = profile->ioc_service_entries * sizeof (ib_dm_srv_t);
2773 	srv_id = kmem_zalloc(length, KM_SLEEP);
2774 	temp = (char *)((char *)srv_id + (8 * profile->ioc_service_entries));
2775 	for (ii = 0; ii < profile->ioc_service_entries; ii++) {
2776 		srv_names[ii] = (char *)temp + (ii * IB_DM_MAX_SVC_NAME_LEN);
2777 	}
2778 
2779 	for (ii = 0; ii < profile->ioc_service_entries; ii++) {
2780 		srv_id[ii] = srvents[ii].se_attr.srv_id;
2781 		bcopy(srvents[ii].se_attr.srv_name,
2782 		    srv_names[ii], (IB_DM_MAX_SVC_NAME_LEN - 1));
2783 		IBTF_DPRINTF_L4("ibnex", "\tcreate_ioc_srv_props "
2784 		    "Service Names : %s", srv_names[ii]);
2785 		IBTF_DPRINTF_L4("ibnex", "\tcreate_ioc_srv_props "
2786 		    "Service ID : %llX", srv_id[ii]);
2787 	}
2788 
2789 	if (ndi_prop_update_int64_array(DDI_DEV_T_NONE, cdip,
2790 	    "service-id", (int64_t *)srv_id,
2791 	    profile->ioc_service_entries) != DDI_PROP_SUCCESS) {
2792 		IBTF_DPRINTF_L2("ibnex",
2793 		    "\tcreate_ioc_srv_props: service-id create failed");
2794 		kmem_free(srv_id, length);
2795 		return (IBNEX_FAILURE);
2796 	}
2797 
2798 	if (ndi_prop_update_string_array(DDI_DEV_T_NONE, cdip,
2799 	    "service-name", (char **)srv_names,
2800 	    profile->ioc_service_entries) != DDI_PROP_SUCCESS) {
2801 		IBTF_DPRINTF_L2("ibnex",
2802 		    "\tcreate_ioc_srv_props: service-name create failed");
2803 		kmem_free(srv_id, length);
2804 		return (IBNEX_FAILURE);
2805 	}
2806 	kmem_free(srv_id, length);
2807 	return (IBNEX_SUCCESS);
2808 }
2809 
2810 
2811 /*
2812  * ibnex_create_ioc_compatible_prop()
2813  *	Creates "compatible" property values
2814  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
2815  */
2816 static int
2817 ibnex_create_ioc_compatible_prop(
2818     dev_info_t *cdip, ib_dm_ioc_ctrl_profile_t *ioc_profile)
2819 {
2820 	char		*temp;
2821 	int		rval, ii;
2822 	char		*compatible[IBNEX_MAX_COMPAT_NAMES];
2823 
2824 	/*
2825 	 * Initialize the "compatible" property string as below:
2826 	 * Compatible Strings :
2827 	 *	1. ib.V<vid>P<pid>S<subsys vid>s<subsys id>v<ver>
2828 	 *	2. ib.V<vid>P<pid>S<subsys vid>s<subsys id>
2829 	 *	3. ib.V<vid>P<pid>v<ver>
2830 	 *	4. ib.V<vid>P<pid>
2831 	 *	5. ib.C<Class>c<Subclass>p<protocol>r<protocol ver>
2832 	 *	6. ib.C<Class>c<Subclass>p<protocol>
2833 	 *
2834 	 * Note:
2835 	 *	All leading zeros must be present
2836 	 *	All numeric values must specified in hex without prefix "0x"
2837 	 */
2838 
2839 	temp = kmem_alloc(IBNEX_MAX_COMPAT_PROP_SZ, KM_SLEEP);
2840 	for (ii = 0; ii < IBNEX_MAX_COMPAT_NAMES; ii++)
2841 		compatible[ii] = temp + (ii * IBNEX_MAX_COMPAT_LEN);
2842 
2843 	(void) snprintf(compatible[0], IBNEX_MAX_COMPAT_LEN,
2844 	    "ib.V%06xP%08xS%06xs%08xv%04x",
2845 	    ioc_profile->ioc_vendorid, ioc_profile->ioc_deviceid,
2846 	    ioc_profile->ioc_subsys_vendorid, ioc_profile->ioc_subsys_id,
2847 	    ioc_profile->ioc_device_ver);
2848 
2849 	(void) snprintf(compatible[1], IBNEX_MAX_COMPAT_LEN,
2850 	    "ib.V%06xP%08xS%06xs%08x",
2851 	    ioc_profile->ioc_vendorid, ioc_profile->ioc_deviceid,
2852 	    ioc_profile->ioc_subsys_vendorid, ioc_profile->ioc_subsys_id);
2853 
2854 	(void) snprintf(compatible[2], IBNEX_MAX_COMPAT_LEN,
2855 	    "ib.V%06xP%08xv%04x",
2856 	    ioc_profile->ioc_vendorid, ioc_profile->ioc_deviceid,
2857 	    ioc_profile->ioc_device_ver);
2858 
2859 	(void) snprintf(compatible[3], IBNEX_MAX_COMPAT_LEN,
2860 	    "ib.V%06xP%08x",
2861 	    ioc_profile->ioc_vendorid, ioc_profile->ioc_deviceid);
2862 
2863 	(void) snprintf(compatible[4], IBNEX_MAX_COMPAT_LEN,
2864 	    "ib.C%04xc%04xp%04xr%04x",
2865 	    ioc_profile->ioc_io_class, ioc_profile->ioc_io_subclass,
2866 	    ioc_profile->ioc_protocol, ioc_profile->ioc_protocol_ver);
2867 
2868 	(void) snprintf(compatible[5], IBNEX_MAX_COMPAT_LEN,
2869 	    "ib.C%04xc%04xp%04x",
2870 	    ioc_profile->ioc_io_class, ioc_profile->ioc_io_subclass,
2871 	    ioc_profile->ioc_protocol);
2872 	for (ii = 0; ii < IBNEX_MAX_COMPAT_NAMES; ii++)
2873 		IBTF_DPRINTF_L4("ibnex", "\tcompatible: %s", compatible[ii]);
2874 
2875 	/* Create the compatible property for child cdip */
2876 	rval = ndi_prop_update_string_array(DDI_DEV_T_NONE, cdip,
2877 	    "compatible", (char **)compatible, IBNEX_MAX_COMPAT_NAMES);
2878 
2879 	if (rval != DDI_PROP_SUCCESS) {
2880 		IBTF_DPRINTF_L2("ibnex", "\tcompatible prop_create failed");
2881 		kmem_free(temp, IBNEX_MAX_COMPAT_PROP_SZ);
2882 		return (IBNEX_FAILURE);
2883 	}
2884 
2885 	kmem_free(temp, IBNEX_MAX_COMPAT_PROP_SZ);
2886 	return (IBNEX_SUCCESS);
2887 }
2888 
2889 
2890 static void
2891 ibnex_ioc_node_cleanup()
2892 {
2893 	ibnex_node_data_t *node, *delete;
2894 
2895 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
2896 	for (node = ibnex.ibnex_ioc_node_head; node; ) {
2897 		delete = node;
2898 		node = node->node_next;
2899 		mutex_exit(&ibnex.ibnex_mutex);
2900 		ibnex_delete_ioc_node_data(delete);
2901 		mutex_enter(&ibnex.ibnex_mutex);
2902 	}
2903 }
2904 
2905 /*
2906  * ibnex_delete_ioc_node_data()
2907  *	Delete IOC node from the list
2908  */
2909 static void
2910 ibnex_delete_ioc_node_data(ibnex_node_data_t *node)
2911 {
2912 	IBTF_DPRINTF_L4("ibnex", "\tdelete_ioc_node_data:");
2913 
2914 	mutex_enter(&ibnex.ibnex_mutex);
2915 	if ((node->node_next == NULL) && (node->node_prev == NULL)) {
2916 		ASSERT(ibnex.ibnex_ioc_node_head == node);
2917 		ibnex.ibnex_ioc_node_head = NULL;
2918 	} else if (node->node_next == NULL)
2919 		node->node_prev->node_next = NULL;
2920 	else if (node->node_prev == NULL) {
2921 		node->node_next->node_prev = NULL;
2922 		ibnex.ibnex_ioc_node_head = node->node_next;
2923 	} else {
2924 		node->node_prev->node_next = node->node_next;
2925 		node->node_next->node_prev = node->node_prev;
2926 	}
2927 	IBTF_DPRINTF_L4("ibnex", "\tdelete_ioc_node_data: head %p",
2928 	    ibnex.ibnex_ioc_node_head);
2929 	mutex_exit(&ibnex.ibnex_mutex);
2930 	kmem_free(node, sizeof (ibnex_node_data_t));
2931 }
2932 
2933 
2934 /*
2935  * ibnex_dm_callback()
2936  *
2937  *	This routine is registered with the IBDM during IB nexus attach. It
2938  *	is called by the IBDM module when it discovers
2939  *		New HCA port
2940  *		HCA port removal
2941  *		New HCA added
2942  *		HCA removed
2943  */
2944 void
2945 ibnex_dm_callback(void *arg, ibdm_events_t flag)
2946 {
2947 	char	hca_guid[IBNEX_HCAGUID_STRSZ];
2948 	ibdm_ioc_info_t	*ioc_list, *ioc;
2949 	ibnex_node_data_t	*node_data;
2950 	dev_info_t		*phci;
2951 
2952 	IBTF_DPRINTF_L4("ibnex", "\tdm_callback: attr %p event %x", arg, flag);
2953 
2954 	switch (flag) {
2955 	case IBDM_EVENT_HCA_ADDED:
2956 		(void) snprintf(hca_guid, IBNEX_HCAGUID_STRSZ, "%llX",
2957 		    (*(longlong_t *)arg));
2958 		/* Create a devctl minor node for the HCA's port  */
2959 		if (ddi_create_minor_node(ibnex.ibnex_dip, hca_guid, S_IFCHR,
2960 		    ddi_get_instance(ibnex.ibnex_dip),
2961 		    DDI_NT_IB_ATTACHMENT_POINT, 0) != DDI_SUCCESS) {
2962 			IBTF_DPRINTF_L4("ibnex", "\tdm_callback: failed to "
2963 			    "create minor node for port w/ guid %s", hca_guid);
2964 		}
2965 
2966 		break;
2967 
2968 	case IBDM_EVENT_HCA_REMOVED:
2969 		(void) snprintf(hca_guid, IBNEX_HCAGUID_STRSZ, "%llX",
2970 		    (*(longlong_t *)arg));
2971 		ddi_remove_minor_node(ibnex.ibnex_dip, hca_guid);
2972 		break;
2973 
2974 	case IBDM_EVENT_IOC_PROP_UPDATE:
2975 		ioc = ioc_list = (ibdm_ioc_info_t *)arg;
2976 		if (ioc_list == NULL)
2977 			break;
2978 
2979 		mutex_enter(&ibnex.ibnex_mutex);
2980 		while (ioc_list) {
2981 			if ((node_data = ibnex_is_node_data_present(
2982 			    IBNEX_IOC_NODE, ioc_list, 0, 0)) != NULL &&
2983 			    node_data->node_dip != NULL) {
2984 				ibnex_update_prop(node_data, ioc_list);
2985 			}
2986 			ioc_list = ioc_list->ioc_next;
2987 		}
2988 		mutex_exit(&ibnex.ibnex_mutex);
2989 		ibdm_ibnex_free_ioc_list(ioc);
2990 		break;
2991 
2992 	case IBDM_EVENT_PORT_UP:
2993 	case IBDM_EVENT_PORT_PKEY_CHANGE:
2994 		phci = ibtl_ibnex_hcaguid2dip(*(longlong_t *)arg);
2995 		devfs_clean(phci, NULL, 0);
2996 		break;
2997 	default:
2998 		break;
2999 
3000 	}
3001 }
3002 
3003 
3004 /*
3005  * ibnex_get_dip_from_guid()
3006  *
3007  *	Searches the linked list of the port nodes and returns the dip for
3008  *	the of the Port / Node guid requested.
3009  *	Returns NULL if not found
3010  */
3011 int
3012 ibnex_get_dip_from_guid(ib_guid_t guid, int index, ib_pkey_t pkey,
3013     dev_info_t **dip)
3014 {
3015 	int			node_index;
3016 	ib_guid_t		node_guid;
3017 	ib_pkey_t		node_pkey;
3018 	ibnex_node_data_t	*node_data;
3019 
3020 	IBTF_DPRINTF_L4("ibnex",
3021 	    "\tget_dip_from_guid: guid = %llX", guid);
3022 
3023 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
3024 	/* Search for a matching entry in internal lists */
3025 	node_data = ibnex.ibnex_port_node_head;
3026 	while (node_data) {
3027 		node_guid = node_data->node_data.port_node.port_guid;
3028 		node_index = node_data->node_data.port_node.port_commsvc_idx;
3029 		node_pkey = node_data->node_data.port_node.port_pkey;
3030 		if ((node_guid == guid) && (index == node_index) &&
3031 		    (node_pkey == pkey)) {
3032 			break;
3033 		}
3034 		node_data = node_data->node_next;
3035 	}
3036 
3037 	/* matching found with a valid dip */
3038 	if (node_data && node_data->node_dip) {
3039 		*dip = node_data->node_dip;
3040 		return (IBNEX_SUCCESS);
3041 	} else if (node_data && !node_data->node_dip) {	/* dip is invalid */
3042 		*dip = NULL;
3043 		return (IBNEX_SUCCESS);
3044 	}
3045 
3046 	/* no match found */
3047 	*dip = NULL;
3048 	return (IBNEX_FAILURE);
3049 }
3050 
3051 
3052 /*
3053  * ibnex_comm_svc_init()
3054  *	Read the property and cache the values in the global
3055  *	structure.
3056  *	Check for max allowed length (4 bytes) of service name
3057  *	(each element of the property)
3058  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
3059  */
3060 static ibnex_rval_t
3061 ibnex_comm_svc_init(char *property, ibnex_node_type_t type)
3062 {
3063 	int		i, len, count;
3064 	int		ncomm_svcs;
3065 	char		**comm_svcp;
3066 	char		**servicep = NULL;
3067 	uint_t		nservices = 0;
3068 	int			*valid = NULL;
3069 
3070 	IBTF_DPRINTF_L4("ibnex", "\tcomm_svc_init : %s property, type = %x",
3071 	    property, type);
3072 
3073 	/* lookup the string array property */
3074 	if (ddi_prop_lookup_string_array(DDI_DEV_T_ANY, ibnex.ibnex_dip,
3075 	    DDI_PROP_DONTPASS, property, &servicep, &nservices) !=
3076 	    DDI_PROP_SUCCESS) {
3077 		IBTF_DPRINTF_L2("ibnex", "\t%s property undefined", property);
3078 		return (IBNEX_SUCCESS);
3079 	}
3080 
3081 	if (nservices)
3082 		valid = kmem_zalloc(nservices * sizeof (int), KM_SLEEP);
3083 
3084 
3085 	/* first read the file to get a count of valid service entries */
3086 	for (ncomm_svcs = 0, count = 0; count < nservices; count++) {
3087 		int j;
3088 
3089 		len = strlen(servicep[count]);
3090 		/*
3091 		 * ib.conf has NULL strings for port-svc-list &
3092 		 * hca-svc-list, by default. Do not have L2 message
3093 		 * for these.
3094 		 */
3095 		if (len == 1 || len > 4) {
3096 			IBTF_DPRINTF_L2("ibnex", "\tcomm_svc_init : "
3097 			    "Service name %s for property %s invalid : "
3098 			    "length %d", servicep[count], property, len);
3099 			continue;
3100 		} else if (len == 0) {
3101 			continue;
3102 		}
3103 		if (ibnex_unique_svcname(servicep[count]) != IBNEX_SUCCESS) {
3104 			IBTF_DPRINTF_L2("ibnex", "\tcomm_svc_init : "
3105 			    "Service name %s invalid : Not unique",
3106 			    servicep[count]);
3107 			continue;
3108 		}
3109 
3110 		/*
3111 		 * ibnex_unique_svcname checks for uniqueness in service names
3112 		 * communication services fully initialized. Check uniqueness
3113 		 * in service names currently initialized.
3114 		 */
3115 		for (j = 0; j < count; j++)
3116 			if (valid[j] && strncmp(servicep[count],
3117 			    servicep[j], 4) == 0) {
3118 				IBTF_DPRINTF_L2("ibnex", "\tcomm_svc_init : "
3119 				    "Service name %s invalid : Not unique",
3120 				    servicep[count]);
3121 					continue;
3122 			}
3123 
3124 		valid[count] = 1;
3125 		ncomm_svcs++;
3126 	}
3127 
3128 	/* if no valid entries found, bailout */
3129 	if (nservices == 0 || ncomm_svcs == 0) {
3130 		IBTF_DPRINTF_L4("ibnex", "\tNo %s entries found", property);
3131 		ddi_prop_free(servicep); /* free the property */
3132 		if (valid)
3133 			kmem_free(valid, nservices * sizeof (int));
3134 		return (IBNEX_SUCCESS);
3135 	}
3136 
3137 	comm_svcp = kmem_zalloc((ncomm_svcs * sizeof (char *)), KM_SLEEP);
3138 	if (type == IBNEX_PORT_COMMSVC_NODE) {
3139 		ibnex.ibnex_comm_svc_names = comm_svcp;
3140 		ibnex.ibnex_num_comm_svcs = ncomm_svcs;
3141 	} else if (type == IBNEX_VPPA_COMMSVC_NODE) {
3142 		ibnex.ibnex_vppa_comm_svc_names = comm_svcp;
3143 		ibnex.ibnex_nvppa_comm_svcs = ncomm_svcs;
3144 	} else if (type == IBNEX_HCASVC_COMMSVC_NODE) {
3145 		ibnex.ibnex_hcasvc_comm_svc_names = comm_svcp;
3146 		ibnex.ibnex_nhcasvc_comm_svcs = ncomm_svcs;
3147 	}
3148 
3149 	/* copy the services into an array of strings */
3150 	for (i = 0, count = 0; count < nservices; count++) {
3151 		if (valid[count] == 0)	/* Skip invalid ones */
3152 			continue;
3153 		comm_svcp[i] = kmem_alloc(len + 1, KM_SLEEP);
3154 		(void) strcpy(comm_svcp[i], servicep[count]);
3155 		IBTF_DPRINTF_L4("ibnex",
3156 		    "\t\tService [%d]: %s", i, comm_svcp[i]);
3157 		++i;
3158 	}
3159 	ddi_prop_free(servicep);
3160 	kmem_free(valid, nservices * sizeof (int));
3161 	return (IBNEX_SUCCESS);
3162 }
3163 
3164 
3165 /*
3166  * ibnex_comm_svc_fini()
3167  *	Deallocate all the memory allocated for the communication
3168  *	service arrays.
3169  */
3170 static void
3171 ibnex_comm_svc_fini()
3172 {
3173 	int	index;
3174 
3175 	for (index = 0; index < ibnex.ibnex_num_comm_svcs; index++) {
3176 		kmem_free(ibnex.ibnex_comm_svc_names[index],
3177 		    (strlen(ibnex.ibnex_comm_svc_names[index]) + 1));
3178 	}
3179 	if (ibnex.ibnex_comm_svc_names) {
3180 		kmem_free(ibnex.ibnex_comm_svc_names,
3181 		    ibnex.ibnex_num_comm_svcs * sizeof (char *));
3182 	}
3183 	for (index = 0; index < ibnex.ibnex_nvppa_comm_svcs; index++) {
3184 		kmem_free(ibnex.ibnex_vppa_comm_svc_names[index],
3185 		    strlen(ibnex.ibnex_vppa_comm_svc_names[index]) +1);
3186 	}
3187 	if (ibnex.ibnex_vppa_comm_svc_names) {
3188 		kmem_free(ibnex.ibnex_vppa_comm_svc_names,
3189 		    ibnex.ibnex_nvppa_comm_svcs * sizeof (char *));
3190 	}
3191 	for (index = 0; index < ibnex.ibnex_nhcasvc_comm_svcs; index++) {
3192 		kmem_free(ibnex.ibnex_hcasvc_comm_svc_names[index],
3193 		    strlen(ibnex.ibnex_hcasvc_comm_svc_names[index]) +1);
3194 	}
3195 	if (ibnex.ibnex_hcasvc_comm_svc_names) {
3196 		kmem_free(ibnex.ibnex_hcasvc_comm_svc_names,
3197 		    ibnex.ibnex_nhcasvc_comm_svcs * sizeof (char *));
3198 	}
3199 	ibnex.ibnex_comm_svc_names = NULL;
3200 	ibnex.ibnex_num_comm_svcs = 0;
3201 	ibnex.ibnex_vppa_comm_svc_names = NULL;
3202 	ibnex.ibnex_nvppa_comm_svcs = 0;
3203 	ibnex.ibnex_hcasvc_comm_svc_names = NULL;
3204 	ibnex.ibnex_nhcasvc_comm_svcs = 0;
3205 }
3206 
3207 
3208 /*
3209  * ibnex_commsvc_initnode()
3210  *	This routine is specific to port/VPPA node creation
3211  *	Creates a device node for the comm service specified by commsvc_index
3212  *	Creates all the device node properties
3213  *	Allocates and initializes the node specific data
3214  *	Binds the device driver of the device node
3215  *	Returns "dev_info_t" of the child node or NULL in case of failure
3216  *	Sets IBNEX_SUCCESS/IBNEX_FAILURE/IBNEX_BUSY in "rval" to reflect
3217  *	if the operation was successful, failed or was not performed.
3218  */
3219 dev_info_t *
3220 ibnex_commsvc_initnode(dev_info_t *parent, ibdm_port_attr_t *port_attr,
3221     int index, int node_type, ib_pkey_t pkey, int *rval, int flag)
3222 {
3223 	int			ret;
3224 	char			*svcname;
3225 	dev_info_t		*cdip;
3226 	ibnex_node_data_t	*node_data;
3227 	ibnex_port_node_t	*port_node;
3228 	char devname[MAXNAMELEN];
3229 	int 			cdip_allocated = 0;
3230 
3231 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
3232 
3233 	*rval = IBNEX_SUCCESS;
3234 
3235 	/*
3236 	 * prevent any races
3237 	 * we have seen this node_data and it has been initialized
3238 	 * Note that node_dip is already NULL if unconfigure is in
3239 	 * progress.
3240 	 */
3241 	node_data = ibnex_is_node_data_present(node_type, (void *)port_attr,
3242 	    index, pkey);
3243 
3244 	/*
3245 	 * If this node has been explicity unconfigured by cfgadm, then it can
3246 	 * be configured back again only by cfgadm configure.
3247 	 */
3248 	if (node_data && (node_data->node_ap_state ==
3249 	    IBNEX_NODE_AP_UNCONFIGURED)) {
3250 		*rval = IBNEX_FAILURE;
3251 		return (NULL);
3252 	}
3253 
3254 	if (node_data && node_data->node_dip) {
3255 		/*
3256 		 * Return NULL if another configure
3257 		 * operation is in progress
3258 		 */
3259 		if (node_data->node_state == IBNEX_CFGADM_CONFIGURING) {
3260 			*rval = IBNEX_BUSY;
3261 			return (NULL);
3262 		} else {
3263 			return (node_data->node_dip);
3264 		}
3265 	} else if (node_data == NULL) {
3266 		/* allocate a new ibnex_node_data_t */
3267 		node_data = ibnex_init_child_nodedata(node_type, port_attr,
3268 		    index, pkey);
3269 		node_data->node_data.port_node.port_pdip = parent;
3270 	}
3271 
3272 	/*
3273 	 * Return NULL if another unconfigure operation is in progress
3274 	 */
3275 	if (node_data->node_state == IBNEX_CFGADM_UNCONFIGURING) {
3276 		*rval = IBNEX_BUSY;
3277 		return (NULL);
3278 	}
3279 
3280 	ASSERT(node_data->node_state != IBNEX_CFGADM_CONFIGURED);
3281 	node_data->node_state = IBNEX_CFGADM_CONFIGURING;
3282 
3283 	switch (node_type) {
3284 		case IBNEX_VPPA_COMMSVC_NODE :
3285 			svcname = ibnex.ibnex_vppa_comm_svc_names[index];
3286 			port_node = &node_data->node_data.port_node;
3287 			(void) snprintf(devname, MAXNAMELEN, "%s@%x,%x,%s",
3288 			    IBNEX_IBPORT_CNAME, port_node->port_num,
3289 			    port_node->port_pkey, svcname);
3290 			break;
3291 		case IBNEX_HCASVC_COMMSVC_NODE :
3292 			svcname = ibnex.ibnex_hcasvc_comm_svc_names[index];
3293 			port_node = &node_data->node_data.port_node;
3294 			(void) snprintf(devname, MAXNAMELEN, "%s@%x,0,%s",
3295 			    IBNEX_IBPORT_CNAME, port_node->port_num, svcname);
3296 			break;
3297 		case IBNEX_PORT_COMMSVC_NODE :
3298 			svcname = ibnex.ibnex_comm_svc_names[index];
3299 			port_node = &node_data->node_data.port_node;
3300 			(void) snprintf(devname, MAXNAMELEN, "%s@%x,0,%s",
3301 			    IBNEX_IBPORT_CNAME, port_node->port_num, svcname);
3302 			break;
3303 		default :
3304 			IBTF_DPRINTF_L2("ibnex", "\tcommsvc_initnode:"
3305 			    "\tInvalid Node type");
3306 			*rval = IBNEX_FAILURE;
3307 			ibnex_delete_port_node_data(node_data);
3308 			return (NULL);
3309 	}
3310 
3311 	if ((cdip = ndi_devi_findchild(parent, devname)) != NULL) {
3312 		if (i_ddi_devi_attached(cdip)) {
3313 			node_data->node_dip	= cdip;
3314 			node_data->node_data.port_node.port_pdip = parent;
3315 			node_data->node_state = IBNEX_CFGADM_CONFIGURED;
3316 			ddi_set_parent_data(cdip, node_data);
3317 			IBTF_DPRINTF_L4("ibnex", "\tcommsvc_initnode: found "
3318 			    "attached cdip 0x%p for devname %s", cdip, devname);
3319 			return (cdip);
3320 		}
3321 	} else {
3322 		ndi_devi_alloc_sleep(parent,
3323 		    IBNEX_IBPORT_CNAME, (pnode_t)DEVI_SID_NODEID, &cdip);
3324 		cdip_allocated = 1;
3325 	}
3326 
3327 	node_data->node_dip	= cdip;
3328 	ddi_set_parent_data(cdip, node_data);
3329 	mutex_exit(&ibnex.ibnex_mutex);
3330 
3331 
3332 	if (ibnex_create_port_node_prop(port_attr, cdip, svcname, pkey) ==
3333 	    IBNEX_SUCCESS) {
3334 		if (flag == IBNEX_DEVFS_ENUMERATE)
3335 			ret = ndi_devi_bind_driver(cdip, 0);
3336 		else
3337 			ret = ndi_devi_online(cdip, 0);
3338 		if (ret == NDI_SUCCESS) {
3339 			mutex_enter(&ibnex.ibnex_mutex);
3340 			node_data->node_state	= IBNEX_CFGADM_CONFIGURED;
3341 			node_data->node_data.port_node.port_pdip = parent;
3342 			return (cdip);
3343 		}
3344 		IBTF_DPRINTF_L4("ibnex", "\tcommsvc_initnode: BIND/ONLINE "
3345 		    "of cdip 0x%p for devname %s and flag %d failed", cdip,
3346 		    devname, flag);
3347 	}
3348 
3349 	*rval = IBNEX_FAILURE;
3350 	node_data->node_dip = NULL;
3351 	ddi_set_parent_data(cdip, NULL);
3352 	if (cdip_allocated)
3353 		(void) ndi_devi_free(cdip);
3354 	mutex_enter(&ibnex.ibnex_mutex);
3355 	IBTF_DPRINTF_L4("ibnex", "\tcommsvc_initnode: failure exit");
3356 	return (NULL);
3357 }
3358 
3359 
3360 /*
3361  * ibnex_create_port_node_prop()
3362  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
3363  */
3364 static int
3365 ibnex_create_port_node_prop(ibdm_port_attr_t *port_attr,
3366     dev_info_t *child_dip, char *srvname, ib_pkey_t pkey)
3367 {
3368 	if (ibnex_create_port_compatible_prop(child_dip,
3369 	    srvname, port_attr) != DDI_PROP_SUCCESS) {
3370 		IBTF_DPRINTF_L2("ibnex",
3371 		    "\tcreate_port_node_prop: compatible update failed");
3372 		return (IBNEX_FAILURE);
3373 	}
3374 	if ((pkey != 0) && (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip,
3375 	    "port-pkey", pkey) != DDI_PROP_SUCCESS)) {
3376 		IBTF_DPRINTF_L2("ibnex",
3377 		    "\tcreate_port_node_prop: port-num update failed");
3378 		return (IBNEX_FAILURE);
3379 	}
3380 
3381 	/*
3382 	 * For HCA_SVC device nodes, port_num will be 0.
3383 	 * Do not create the "port-number" & "port-guid" properties.
3384 	 */
3385 	if (port_attr->pa_port_num != 0) {
3386 		if (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip,
3387 		    "port-number", port_attr->pa_port_num) !=
3388 		    DDI_PROP_SUCCESS) {
3389 			IBTF_DPRINTF_L2("ibnex",
3390 			    "\tcreate_port_node_prop: port-num update failed");
3391 			return (IBNEX_FAILURE);
3392 		}
3393 		if (ndi_prop_update_int64(DDI_DEV_T_NONE, child_dip,
3394 		    "port-guid", port_attr->pa_port_guid) !=
3395 		    DDI_PROP_SUCCESS) {
3396 			IBTF_DPRINTF_L2("ibnex",
3397 			    "\tcreate_port_node_prop: port-guid update failed");
3398 			return (IBNEX_FAILURE);
3399 		}
3400 	} else {
3401 		ibdm_hca_list_t	*hca_list;
3402 
3403 		/*
3404 		 * HCA_SVC nodes require "num-ports" & "port-guids"
3405 		 * properties.
3406 		 *
3407 		 * To create the num-ports & port-guids attribute :
3408 		 * 1. Get HCA list (ibdm_ibnex_get_hca_info_by_guid)
3409 		 * 2. Form the array of port GUIDs.
3410 		 */
3411 		if ((hca_list = ibdm_ibnex_get_hca_info_by_guid(
3412 		    port_attr->pa_hca_guid)) == NULL) {
3413 			IBTF_DPRINTF_L2("ibnex",
3414 			    "\tcreate_port_node_prop: hca_info_by_guid failed");
3415 			return (IBNEX_FAILURE);
3416 		}
3417 
3418 		if (hca_list->hl_nports != 0) {
3419 			ib_guid_t	*port_guids;
3420 			uint8_t		portnum;
3421 
3422 			ASSERT(hca_list->hl_port_attr != NULL);
3423 
3424 			port_guids = kmem_zalloc(
3425 			    hca_list->hl_nports * sizeof (ib_guid_t),
3426 			    KM_SLEEP);
3427 
3428 			for (portnum = 0; portnum < hca_list->hl_nports;
3429 			    portnum++) {
3430 				port_guids[portnum] = (hca_list->
3431 				    hl_port_attr[portnum]).pa_port_guid;
3432 			}
3433 
3434 			if (ndi_prop_update_int64_array(DDI_DEV_T_NONE,
3435 			    child_dip, "port-guids", (int64_t *)port_guids,
3436 			    hca_list->hl_nports) != DDI_PROP_SUCCESS) {
3437 				IBTF_DPRINTF_L2("ibnex",
3438 				    "\tcreate_port_node_prop: port-guids "
3439 				    "create failed");
3440 				kmem_free(port_guids, hca_list->hl_nports *
3441 				    sizeof (ib_guid_t));
3442 				ibdm_ibnex_free_hca_list(hca_list);
3443 				return (IBNEX_FAILURE);
3444 			}
3445 			kmem_free(port_guids, hca_list->hl_nports *
3446 			    sizeof (ib_guid_t));
3447 		}
3448 
3449 		if (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip,
3450 		    "num-ports", hca_list->hl_nports) != DDI_PROP_SUCCESS) {
3451 			IBTF_DPRINTF_L2("ibnex",
3452 			    "\tcreate_port_node_prop: num-ports update failed");
3453 			ibdm_ibnex_free_hca_list(hca_list);
3454 			return (IBNEX_FAILURE);
3455 		}
3456 		ibdm_ibnex_free_hca_list(hca_list);
3457 	}
3458 
3459 	if (ndi_prop_update_int64(DDI_DEV_T_NONE, child_dip,
3460 	    "hca-guid", port_attr->pa_hca_guid) != DDI_PROP_SUCCESS) {
3461 		IBTF_DPRINTF_L2("ibnex",
3462 		    "\tcreate_port_node_prop: hca-guid update failed");
3463 		return (IBNEX_FAILURE);
3464 	}
3465 	if (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip,
3466 	    "product-id", port_attr->pa_productid) != DDI_PROP_SUCCESS) {
3467 		IBTF_DPRINTF_L2("ibnex",
3468 		    "\tcreate_port_node_prop: product-id update failed");
3469 		return (IBNEX_FAILURE);
3470 	}
3471 	if (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip,
3472 	    "vendor-id", port_attr->pa_vendorid) != DDI_PROP_SUCCESS) {
3473 		IBTF_DPRINTF_L2("ibnex",
3474 		    "\tcreate_port_node_prop: vendor-id update failed");
3475 		return (IBNEX_FAILURE);
3476 	}
3477 	if (ndi_prop_update_int(DDI_DEV_T_NONE, child_dip, "device-version",
3478 	    port_attr->pa_dev_version) != DDI_PROP_SUCCESS) {
3479 		IBTF_DPRINTF_L2("ibnex",
3480 		    "\tcreate_port_node_prop: device-version update failed");
3481 		return (IBNEX_FAILURE);
3482 	}
3483 	return (IBNEX_SUCCESS);
3484 }
3485 
3486 
3487 /*
3488  * ibnex_str2int()
3489  *	Utility function that converts a string of length  "len" to
3490  *	integer.
3491  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
3492  */
3493 static int
3494 ibnex_str2int(char *c, int len, int *ret)
3495 {
3496 	int intval = 0, ii;
3497 
3498 	IBTF_DPRINTF_L4("ibnex", "\tstr2int: Int string %s..", c);
3499 	*ret = IBNEX_SUCCESS;
3500 	for (ii = 0; ii < len; ii ++) {
3501 		if ((c[ii] >= '0') && (c[ii] <= '9'))
3502 			intval = intval * 10 +c[ii] - '0';
3503 		else {
3504 			IBTF_DPRINTF_L2("ibnex",
3505 			    "\tstr2int: Invalid integer string %s..", c);
3506 			*ret = IBNEX_FAILURE;
3507 			break;
3508 		}
3509 	}
3510 
3511 	return (intval);
3512 }
3513 
3514 
3515 /*
3516  * ibnex_str2hex()
3517  *	Utility functions that converts a string of length  "len" to
3518  *	hex value. Note. This function does not handle strings which
3519  *	string length more than 8 bytes.
3520  *
3521  */
3522 uint64_t
3523 ibnex_str2hex(char *c, int len, int *ret)
3524 {
3525 	uint64_t hex = 0, ii;
3526 
3527 	*ret = IBNEX_SUCCESS;
3528 	for (ii = 0; ii < len; ii ++) {
3529 		hex = (ii == 0) ? hex : (hex << 4);
3530 		if ((c[ii] >= '0') && (c[ii] <= '9'))
3531 			hex |= c[ii] - '0';
3532 		else if ((c[ii] >= 'a') && (c[ii] <= 'f'))
3533 			hex |= c[ii] - 'a' + 10;
3534 		else if ((c[ii] >= 'A') && (c[ii] <= 'F'))
3535 			hex |= c[ii] - 'A' + 10;
3536 		else {
3537 			IBTF_DPRINTF_L2("ibnex",
3538 			    "\tstr2hex: Invalid integer string");
3539 			*ret = IBNEX_FAILURE;
3540 			break;
3541 		}
3542 	}
3543 
3544 	return (hex);
3545 }
3546 
3547 
3548 /*
3549  * ibnex_create_port_compatible_prop()
3550  *	Creates 'Compatibility' property for port / HCA_SVC device nodes
3551  *	Returns IBNEX_SUCCESS/IBNEX_FAILURE
3552  */
3553 static int
3554 ibnex_create_port_compatible_prop(dev_info_t *child_dip,
3555     char *comm_svcp, ibdm_port_attr_t *port_attr)
3556 {
3557 	int 	rval, i;
3558 	char	*temp;
3559 	char	*compatible[IBNEX_MAX_IBPORT_COMPAT_NAMES];
3560 
3561 	IBTF_DPRINTF_L4("ibnex", "\tcreate_port_compatible_prop: Begin");
3562 	/*
3563 	 * Initialize the "compatible" property string as below:
3564 	 * Compatible Strings :
3565 	 * 1. ib.V<vid>P<pid>v<revision>.<service name>.
3566 	 * 2. ib.V<vid>P<pid>.<service name>.
3567 	 * 3. ib.<service name>
3568 	 * Leading zeros must be present
3569 	 */
3570 	temp = kmem_alloc(IBNEX_MAX_IBPORT_COMPAT_PROP_SZ, KM_SLEEP);
3571 	for (i = 0; i < IBNEX_MAX_IBPORT_COMPAT_NAMES; i++) {
3572 		compatible[i] = temp + (i * IBNEX_MAX_COMPAT_LEN);
3573 	}
3574 
3575 	(void) snprintf(compatible[0], IBNEX_MAX_COMPAT_LEN,
3576 	    "ib.V%06xP%08xv%04x.%s",
3577 	    port_attr->pa_vendorid, port_attr->pa_productid,
3578 	    port_attr->pa_dev_version, comm_svcp);
3579 	(void) snprintf(compatible[1], IBNEX_MAX_COMPAT_LEN,
3580 	    "ib.V%06xP%08x.%s",
3581 	    port_attr->pa_vendorid, port_attr->pa_productid,
3582 	    comm_svcp);
3583 	(void) snprintf(compatible[2], IBNEX_MAX_COMPAT_LEN,
3584 	    "ib.%s", comm_svcp);
3585 
3586 	for (i = 0; i < IBNEX_MAX_IBPORT_COMPAT_NAMES; i++)
3587 		IBTF_DPRINTF_L4("ibnex", "\tcompatible: %s", compatible[i]);
3588 
3589 	rval = ndi_prop_update_string_array(DDI_DEV_T_NONE, child_dip,
3590 	    "compatible", (char **)compatible, IBNEX_MAX_IBPORT_COMPAT_NAMES);
3591 
3592 	if (rval != DDI_PROP_SUCCESS) {
3593 		kmem_free(temp, IBNEX_MAX_IBPORT_COMPAT_PROP_SZ);
3594 		return (IBNEX_FAILURE);
3595 	}
3596 	kmem_free(temp, IBNEX_MAX_IBPORT_COMPAT_PROP_SZ);
3597 	return (IBNEX_SUCCESS);
3598 }
3599 
3600 
3601 /*
3602  * ibnex_delete_port_node_data()
3603  *	Delete the parent private node data from the linked list
3604  *	Deallocate the memory of the port/ioc attributes
3605  *	Deallocate the memory of the node data
3606  */
3607 static void
3608 ibnex_delete_port_node_data(ibnex_node_data_t *node)
3609 {
3610 	if ((node->node_next == NULL) && (node->node_prev == NULL))
3611 		ibnex.ibnex_port_node_head = NULL;
3612 	else if (node->node_next == NULL)
3613 		node->node_prev->node_next = NULL;
3614 	else if (node->node_prev == NULL) {
3615 		node->node_next->node_prev = NULL;
3616 		ibnex.ibnex_port_node_head = node->node_next;
3617 	} else {
3618 		node->node_prev->node_next = node->node_next;
3619 		node->node_next->node_prev = node->node_prev;
3620 	}
3621 	kmem_free(node, sizeof (ibnex_node_data_t));
3622 }
3623 
3624 
3625 /*
3626  * ibnex_is_node_data_present()
3627  *	Checks whether ibnex_node_t is created already
3628  *	Returns ibnex_node_data_t if found, otherwise NULL
3629  */
3630 static ibnex_node_data_t *
3631 ibnex_is_node_data_present(ibnex_node_type_t node_type, void *attr,
3632     int index, ib_pkey_t pkey)
3633 {
3634 	ibnex_node_data_t	*nodep;
3635 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
3636 	if (node_type == IBNEX_IOC_NODE) {
3637 		ibdm_ioc_info_t *ioc_infop = (ibdm_ioc_info_t *)attr;
3638 
3639 		for (nodep = ibnex.ibnex_ioc_node_head; nodep != NULL;
3640 		    nodep = nodep->node_next) {
3641 			if (nodep->node_data.ioc_node.ioc_guid ==
3642 			    ioc_infop->ioc_profile.ioc_guid) {
3643 				return (nodep);
3644 			}
3645 		}
3646 
3647 	} else if (node_type == IBNEX_PSEUDO_NODE) {
3648 		for (nodep = ibnex.ibnex_pseudo_node_head; nodep;
3649 		    nodep = nodep->node_next)
3650 			if (strcmp(nodep->node_data.pseudo_node.
3651 			    pseudo_node_addr, (char *)attr) == 0)
3652 				return (nodep);
3653 
3654 	} else {
3655 		ibdm_port_attr_t *pattrp = (ibdm_port_attr_t *)attr;
3656 
3657 		for (nodep = ibnex.ibnex_port_node_head; nodep != NULL;
3658 		    nodep = nodep->node_next) {
3659 			if ((nodep->node_data.port_node.port_guid ==
3660 			    pattrp->pa_port_guid) &&
3661 			    (nodep->node_data.port_node.port_commsvc_idx ==
3662 			    index) &&
3663 			    (nodep->node_data.port_node.port_pkey == pkey)) {
3664 				return (nodep);
3665 			}
3666 		}
3667 	}
3668 	return (NULL);
3669 }
3670 
3671 /*
3672  * ibnex_lookup_unit_address_prop:
3673  *
3674  *	If property with name is found, return its value
3675  *	otherwise return NULL.
3676  */
3677 static char *
3678 ibnex_lookup_named_prop(ddi_prop_t *head, char *name)
3679 {
3680 	ddi_prop_t	*propp;
3681 
3682 	/* Search the list of properties for name */
3683 	for (propp = head; propp != NULL; propp = propp->prop_next)  {
3684 		if (strcmp(propp->prop_name, name) != 0)
3685 			continue;
3686 		/* named property should be valid and have a value */
3687 		if (propp->prop_len <= 1)
3688 			break;
3689 		return ((char *)propp->prop_val);
3690 	}
3691 
3692 	return ((char *)0);
3693 }
3694 
3695 
3696 /*
3697  * ibnex_pseudo_initnodes()
3698  *	This routine is specific to pseudo node information handling
3699  *	Creates a ibnex_node_data_t all pseudo nodes children of ibnex
3700  */
3701 void
3702 ibnex_pseudo_initnodes()
3703 {
3704 	int			pnam_len, len;
3705 	ibnex_node_data_t	*nodep;
3706 	struct hwc_spec		*list, *spec;
3707 	char			*node_addr, *temp, *unit_addr;
3708 	char			*node_type;
3709 
3710 	IBTF_DPRINTF_L4("ibnex", "\tpseudo_initnodes");
3711 
3712 	mutex_enter(&ibnex.ibnex_mutex);
3713 	/*
3714 	 * get a list of all "pseudo" children of "ib".
3715 	 * for these children initialize/allocate an internal
3716 	 * ibnex_node_data_t.
3717 	 */
3718 	list = hwc_get_child_spec(ibnex.ibnex_dip, (major_t)-1);
3719 	for (spec = list; spec != NULL; spec = spec->hwc_next) {
3720 		if (spec->hwc_devi_sys_prop_ptr == NULL)
3721 			continue;
3722 
3723 		/* Check "ib-node-type" property for IOC .conf */
3724 		node_type = ibnex_lookup_named_prop(
3725 		    spec->hwc_devi_sys_prop_ptr, "ib-node-type");
3726 
3727 		/* "unit-address" property should be present */
3728 		temp = ibnex_lookup_named_prop(
3729 		    spec->hwc_devi_sys_prop_ptr, "unit-address");
3730 		if (temp == NULL)
3731 			continue;
3732 
3733 		pnam_len = strlen(spec->hwc_devi_name) + strlen(temp) + 2;
3734 
3735 		node_addr = kmem_zalloc(pnam_len, KM_SLEEP);
3736 
3737 		(void) snprintf(node_addr,
3738 		    pnam_len, "%s,%s", spec->hwc_devi_name, temp);
3739 
3740 		nodep = ibnex_is_node_data_present(
3741 		    IBNEX_PSEUDO_NODE, (void *)node_addr, 0, 0);
3742 
3743 		if (nodep) {
3744 			kmem_free(node_addr, pnam_len);
3745 			continue;
3746 		}
3747 
3748 		nodep = ibnex_init_child_nodedata(IBNEX_PSEUDO_NODE,
3749 		    (void *)spec->hwc_devi_name, 0, 0);
3750 
3751 		nodep->node_data.pseudo_node.pseudo_node_addr = node_addr;
3752 		(void) snprintf(nodep->node_data.
3753 		    pseudo_node.pseudo_node_addr, pnam_len, "%s", node_addr);
3754 
3755 		len = strlen(temp) + 1;
3756 		unit_addr = (char *)kmem_alloc(len, KM_SLEEP);
3757 		nodep->node_data.pseudo_node.pseudo_unit_addr = unit_addr;
3758 		(void) snprintf(unit_addr, len, "%s", temp);
3759 		nodep->node_data.pseudo_node.pseudo_unit_addr_len = len;
3760 
3761 		if (node_type && strcmp(node_type, "merge") == 0)
3762 			nodep->node_data.pseudo_node.pseudo_merge_node = 1;
3763 
3764 		IBTF_DPRINTF_L3("ibnex", "\tpseudo_initnodes: unit addr = %s"
3765 		    " : drv name = %s", unit_addr, spec->hwc_devi_name);
3766 	}
3767 	hwc_free_spec_list(list);
3768 	mutex_exit(&ibnex.ibnex_mutex);
3769 }
3770 
3771 
3772 /*
3773  * ibnex_init_child_nodedata()
3774  *
3775  *	Allocate memory for the parent private data for device node
3776  *	Initializes the parent private child device node data.
3777  *	Returns pointer to the parent private data
3778  */
3779 static ibnex_node_data_t *
3780 ibnex_init_child_nodedata(ibnex_node_type_t node_type, void *attr, int index,
3781     ib_pkey_t pkey)
3782 {
3783 	char			 *devi_name;
3784 	ibdm_ioc_info_t		 *ioc_info;
3785 	ibnex_ioc_node_t	 *ioc_node;
3786 	ibnex_node_data_t	 *node_data;
3787 	ib_dm_ioc_ctrl_profile_t *ioc_profile;
3788 
3789 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
3790 
3791 	node_data = kmem_zalloc(sizeof (ibnex_node_data_t), KM_SLEEP);
3792 	node_data->node_ap_state = IBNEX_NODE_AP_CONFIGURED;
3793 	node_data->node_state = IBNEX_CFGADM_CONFIGURING;
3794 	node_data->node_type	= node_type;
3795 
3796 	if (node_type == IBNEX_IOC_NODE) {
3797 		ioc_info	= (ibdm_ioc_info_t *)attr;
3798 		ioc_profile	= &ioc_info->ioc_profile;
3799 		ioc_node	= &node_data->node_data.ioc_node;
3800 
3801 		ioc_node->iou_guid = ioc_info->ioc_iou_guid;
3802 		ioc_node->ioc_guid = ioc_profile->ioc_guid;
3803 		(void) strncpy(ioc_node->ioc_id_string,
3804 		    (char *)ioc_profile->ioc_id_string,
3805 		    IB_DM_IOC_ID_STRING_LEN);
3806 		ioc_node->ioc_ngids = ioc_info->ioc_nportgids;
3807 
3808 		node_data->node_next = ibnex.ibnex_ioc_node_head;
3809 		node_data->node_prev = NULL;
3810 		if (ibnex.ibnex_ioc_node_head)
3811 			ibnex.ibnex_ioc_node_head->node_prev = node_data;
3812 		ibnex.ibnex_ioc_node_head = node_data;
3813 	} else if (node_type == IBNEX_PSEUDO_NODE) {
3814 		devi_name = (char *)attr;
3815 		node_data->node_data.pseudo_node.pseudo_devi_name =
3816 		    kmem_zalloc(strlen(devi_name) + 1, KM_SLEEP);
3817 		(void) strncpy(node_data->node_data.pseudo_node.
3818 		    pseudo_devi_name, devi_name, strlen(devi_name));
3819 		node_data->node_next = ibnex.ibnex_pseudo_node_head;
3820 		node_data->node_prev = NULL;
3821 		if (ibnex.ibnex_pseudo_node_head)
3822 			ibnex.ibnex_pseudo_node_head->node_prev = node_data;
3823 		ibnex.ibnex_pseudo_node_head = node_data;
3824 	} else {
3825 		node_data->node_data.port_node.port_hcaguid =
3826 		    ((ibdm_port_attr_t *)attr)->pa_hca_guid;
3827 		node_data->node_data.port_node.port_guid =
3828 		    ((ibdm_port_attr_t *)attr)->pa_port_guid;
3829 		node_data->node_data.port_node.port_num =
3830 		    ((ibdm_port_attr_t *)attr)->pa_port_num;
3831 		node_data->node_data.port_node.port_commsvc_idx = index;
3832 		node_data->node_data.port_node.port_pkey = pkey;
3833 
3834 		node_data->node_next = ibnex.ibnex_port_node_head;
3835 		node_data->node_prev = NULL;
3836 		if (ibnex.ibnex_port_node_head)
3837 			ibnex.ibnex_port_node_head->node_prev = node_data;
3838 		ibnex.ibnex_port_node_head = node_data;
3839 	}
3840 	return (node_data);
3841 }
3842 
3843 static int
3844 ibnex_get_eventcookie(dev_info_t *dip, dev_info_t *rdip,
3845     char *eventname, ddi_eventcookie_t *cookie)
3846 {
3847 	int rc;
3848 
3849 
3850 	IBTF_DPRINTF_L4("ibnex", "ibnex_get_eventcookie(%p, %p, %s, 0x%X)",
3851 	    dip, rdip, eventname, cookie);
3852 
3853 	rc = ndi_event_retrieve_cookie(ibnex.ibnex_ndi_event_hdl,
3854 	    rdip, eventname, cookie, NDI_EVENT_NOPASS);
3855 	if (rc == NDI_SUCCESS) {
3856 		mutex_enter(&ibnex.ibnex_mutex);
3857 		ibnex.ibnex_prop_update_evt_cookie = *cookie;
3858 		mutex_exit(&ibnex.ibnex_mutex);
3859 	}
3860 
3861 	return (rc);
3862 }
3863 
3864 static int
3865 ibnex_add_eventcall(dev_info_t *dip, dev_info_t *rdip,
3866     ddi_eventcookie_t cookie, void (*callback)(dev_info_t *dip,
3867     ddi_eventcookie_t cookie, void *arg, void *bus_impldata),
3868     void *arg, ddi_callback_id_t *cb_id)
3869 {
3870 	IBTF_DPRINTF_L4("ibnex",
3871 	    "ibnex_add_eventcall(%p, %p, 0x%X, %p, %p, %p)",
3872 	    dip, rdip, cookie, callback, arg, cb_id);
3873 
3874 	return (ndi_event_add_callback(ibnex.ibnex_ndi_event_hdl,
3875 	    rdip, cookie, callback, arg, NDI_SLEEP, cb_id));
3876 }
3877 
3878 static int
3879 ibnex_remove_eventcall(dev_info_t *dip, ddi_callback_id_t cb_id)
3880 {
3881 	IBTF_DPRINTF_L4("ibnex", "ibnex_remove_eventcall(%p, 0x%X)",
3882 	    dip, cb_id);
3883 
3884 	return (ndi_event_remove_callback(ibnex.ibnex_ndi_event_hdl,
3885 	    cb_id));
3886 }
3887 
3888 static int
3889 ibnex_post_event(dev_info_t *dip, dev_info_t *rdip,
3890     ddi_eventcookie_t cookie, void *bus_impldata)
3891 {
3892 	IBTF_DPRINTF_L4("ibnex", "ibnex_post_event(%p, %p, 0x%X, %p)",
3893 	    dip, rdip, cookie, bus_impldata);
3894 
3895 	return (ndi_event_run_callbacks(ibnex.ibnex_ndi_event_hdl, rdip,
3896 	    cookie, bus_impldata));
3897 }
3898 
3899 /*
3900  * ibnex_reprobe_ioc_dev()
3901  *
3902  * This could be called as a result of ibt_reprobe_dev request or
3903  * cfgadm command. The function is called from a taskq in case of
3904  * ibt_reprobe_dev and from user context for cfgadm command.
3905  *
3906  * This function reprobes the properties for one IOC dip.
3907  *
3908  * node_reprobe_state should be set before calling this function.
3909  */
3910 void
3911 ibnex_reprobe_ioc_dev(void *arg)
3912 {
3913 	dev_info_t	*dip = (dev_info_t *)arg;
3914 	ibnex_node_data_t	*node_data;
3915 	ibnex_ioc_node_t	*ioc_data;
3916 	ibdm_ioc_info_t		*ioc_info;
3917 
3918 	/* ASSERT(NO_LOCKS_HELD); */
3919 	ASSERT(dip != NULL);
3920 
3921 	node_data = ddi_get_parent_data(dip);
3922 	ASSERT(node_data);
3923 
3924 	if (node_data->node_dip == NULL) {
3925 		IBTF_DPRINTF_L4("ibnex", "reprobe for unconfigured dip");
3926 		mutex_enter(&ibnex.ibnex_mutex);
3927 		ibnex_wakeup_reprobe_ioc(node_data, 0);
3928 		mutex_exit(&ibnex.ibnex_mutex);
3929 		return;
3930 	}
3931 	ioc_data = &(node_data->node_data.ioc_node);
3932 
3933 	/* Reprobe the IOC */
3934 	ioc_info = ibdm_ibnex_probe_ioc(ioc_data->iou_guid, ioc_data->ioc_guid,
3935 	    1);
3936 	if (ioc_info == NULL) {
3937 		IBTF_DPRINTF_L2("ibnex", "Null ioc_info from reprobe");
3938 		mutex_enter(&ibnex.ibnex_mutex);
3939 		ibnex_wakeup_reprobe_ioc(node_data, 1);
3940 		mutex_exit(&ibnex.ibnex_mutex);
3941 		return;
3942 	}
3943 
3944 	mutex_enter(&ibnex.ibnex_mutex);
3945 	if (node_data->node_dip)
3946 		ibnex_update_prop(node_data, ioc_info);
3947 	ibnex_wakeup_reprobe_ioc(node_data, 0);
3948 	mutex_exit(&ibnex.ibnex_mutex);
3949 
3950 	ibdm_ibnex_free_ioc_list(ioc_info);
3951 }
3952 
3953 /*
3954  * ibnex_reprobe_all()
3955  *
3956  * This could be called as a result of cfgadm command. The function
3957  * is called from user context.
3958  *
3959  * This function reprobes the properties for all IOC dips.
3960  *
3961  * ibnex_reprobe_state should be set before calling this function.
3962  */
3963 void
3964 ibnex_reprobe_ioc_all()
3965 {
3966 	ibnex_node_data_t	*node_data;
3967 	ibdm_ioc_info_t		*ioc_info_list, *ioc;
3968 
3969 	/* ASSERT(NO_LOCKS_HELD); */
3970 
3971 	/* Sweep the fabric */
3972 	ioc = ioc_info_list = ibdm_ibnex_get_ioc_list(
3973 	    IBDM_IBNEX_REPROBE_ALL);
3974 	if (ioc_info_list == NULL) {
3975 		mutex_enter(&ibnex.ibnex_mutex);
3976 		ibnex_wakeup_reprobe_all();
3977 		mutex_exit(&ibnex.ibnex_mutex);
3978 		return;
3979 	}
3980 
3981 	mutex_enter(&ibnex.ibnex_mutex);
3982 	while (ioc_info_list) {
3983 		if ((node_data = ibnex_is_node_data_present(IBNEX_IOC_NODE,
3984 		    ioc_info_list, 0, 0)) != NULL &&
3985 		    node_data->node_dip != NULL) {
3986 			ibnex_update_prop(node_data, ioc_info_list);
3987 		}
3988 		ioc_info_list = ioc_info_list->ioc_next;
3989 	}
3990 	ibnex_wakeup_reprobe_all();
3991 	mutex_exit(&ibnex.ibnex_mutex);
3992 
3993 	ibdm_ibnex_free_ioc_list(ioc);
3994 }
3995 
3996 /*
3997  * Update the properties, if it has modified and notify IBTF client.
3998  */
3999 static void
4000 ibnex_update_prop(ibnex_node_data_t *node_data, ibdm_ioc_info_t *ioc_info)
4001 {
4002 	ibt_prop_update_payload_t	evt_data;
4003 	dev_info_t	*dip = node_data->node_dip;
4004 	ddi_eventcookie_t	evt_cookie;
4005 	ibnex_ioc_node_t *ioc;
4006 
4007 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
4008 
4009 	ASSERT(dip != NULL);
4010 
4011 	ioc = &node_data->node_data.ioc_node;
4012 
4013 	evt_data = ioc_info->ioc_info_updated;
4014 	evt_cookie = ibnex.ibnex_prop_update_evt_cookie;
4015 
4016 	/*
4017 	 * For a disconnected IOC :
4018 	 *	Store the ioc_profile for supplying cfgadm info
4019 	 *	ibdm maintains no info of disconnected IOC
4020 	 *
4021 	 * For reconnected IOC :
4022 	 *	ibdm has info of previous service entries
4023 	 *	ioc_profile maintained by ibnexus is used to
4024 	 *	update ib_srv_prop_updated.
4025 	 *	Free the ibnex maintained ioc_profile
4026 	 */
4027 	if (ioc_info->ioc_nportgids == 0) {
4028 		IBTF_DPRINTF_L4("ibnex",
4029 		    "\tupdate_prop:  IOC disconnected");
4030 		ioc->ioc_profile = (ib_dm_ioc_ctrl_profile_t *)kmem_zalloc(
4031 		    sizeof (ib_dm_ioc_ctrl_profile_t), KM_SLEEP);
4032 		bcopy(&ioc_info->ioc_profile, ioc->ioc_profile,
4033 		    sizeof (ib_dm_ioc_ctrl_profile_t));
4034 
4035 		ibnex.ibnex_num_disconnect_iocs++;
4036 	} else if (ioc_info->ioc_nportgids != 0 && ioc->ioc_ngids == 0 &&
4037 	    ioc->ioc_profile != NULL) {
4038 		IBTF_DPRINTF_L4("ibnex",
4039 		    "\tupdate_prop: IOC reconnected");
4040 		if (ioc->ioc_profile->ioc_service_entries !=
4041 		    ioc_info->ioc_profile.ioc_service_entries)
4042 			evt_data.ib_srv_prop_updated = 1;
4043 
4044 		ibnex.ibnex_num_disconnect_iocs--;
4045 		kmem_free(ioc->ioc_profile, sizeof (ib_dm_ioc_ctrl_profile_t));
4046 		ioc->ioc_profile = NULL;
4047 	}
4048 
4049 	/* Update the properties that have changed */
4050 	mutex_exit(&ibnex.ibnex_mutex);
4051 	if (evt_data.ib_gid_prop_updated) {
4052 		if (ibnex_create_ioc_portgid_prop(dip, ioc_info) !=
4053 		    IBNEX_SUCCESS) {
4054 			mutex_enter(&ibnex.ibnex_mutex);
4055 			return;
4056 		}
4057 	}
4058 	if (evt_data.ib_srv_prop_updated) {
4059 		if (ioc_info->ioc_profile.ioc_service_entries != 0 &&
4060 		    (ibnex_create_ioc_srv_props(dip, ioc_info) !=
4061 		    IBNEX_SUCCESS)) {
4062 			mutex_enter(&ibnex.ibnex_mutex);
4063 			return;
4064 		} else if (ioc_info->ioc_profile.ioc_service_entries == 0) {
4065 			(void) ndi_prop_remove(DDI_DEV_T_NONE, dip,
4066 			    "service-id");
4067 			(void) ndi_prop_remove(DDI_DEV_T_NONE, dip,
4068 			    "service-name");
4069 		}
4070 	}
4071 	mutex_enter(&ibnex.ibnex_mutex);
4072 	ioc->ioc_ngids = ioc_info->ioc_nportgids;
4073 
4074 	/*
4075 	 * Post an event if :
4076 	 *	1. Properites have changed or NOTIFY_ALWAYS is set.
4077 	 *	2. child dip is configured and a valid cookie for
4078 	 *	   IB_PROP_UPDATE_EVENT.
4079 	 */
4080 	if ((evt_data.ib_prop_updated != 0 ||
4081 	    (node_data->node_reprobe_state &
4082 	    IBNEX_NODE_REPROBE_NOTIFY_ALWAYS)) &&
4083 	    ((node_data->node_state == IBNEX_CFGADM_CONFIGURED) &&
4084 	    (evt_cookie != NULL))) {
4085 			mutex_exit(&ibnex.ibnex_mutex);
4086 
4087 			if (ndi_post_event(ibnex.ibnex_dip, dip,
4088 			    evt_cookie, &evt_data) != NDI_SUCCESS)
4089 				IBTF_DPRINTF_L2("ibnex",
4090 				    "\tndi_post_event failed\n");
4091 
4092 			mutex_enter(&ibnex.ibnex_mutex);
4093 	}
4094 
4095 	/*
4096 	 * Cleanup node_reprobe_state, for ibt_reprobe_dev
4097 	 * requests, when reprobe all / node reprobe is in
4098 	 * progress. ibnex_reprobe_ioc_dev is not called
4099 	 * in this case.
4100 	 */
4101 	if (node_data->node_reprobe_state ==
4102 	    IBNEX_NODE_REPROBE_NOTIFY_ALWAYS)
4103 		ibnex_wakeup_reprobe_ioc(node_data, 0);
4104 }
4105 
4106 static ibnex_rval_t
4107 ibnex_unique_svcname(char *svcname)
4108 {
4109 	int i;
4110 
4111 	/* Check Port Services */
4112 	for (i = 0; i < ibnex.ibnex_num_comm_svcs; i++)
4113 		if (ibnex.ibnex_comm_svc_names[i] && strncmp(svcname,
4114 		    ibnex.ibnex_comm_svc_names[i], 4) == 0)
4115 			return (IBNEX_FAILURE);
4116 
4117 	/* Check VPPA Services */
4118 	for (i = 0; i < ibnex.ibnex_nvppa_comm_svcs; i++)
4119 		if (ibnex.ibnex_vppa_comm_svc_names[i] && strncmp(svcname,
4120 		    ibnex.ibnex_vppa_comm_svc_names[i], 4) == 0)
4121 			return (IBNEX_FAILURE);
4122 
4123 	/* Check HCA_SVC Services */
4124 	for (i = 0; i < ibnex.ibnex_nhcasvc_comm_svcs; i++)
4125 		if (ibnex.ibnex_hcasvc_comm_svc_names[i] && strncmp(svcname,
4126 		    ibnex.ibnex_hcasvc_comm_svc_names[i], 4) == 0)
4127 			return (IBNEX_FAILURE);
4128 
4129 	return (IBNEX_SUCCESS);
4130 }
4131 
4132 static void
4133 ibnex_handle_reprobe_dev(void *arg)
4134 {
4135 	dev_info_t	*dip = (dev_info_t *)arg;
4136 	ibnex_node_data_t	*node_data;
4137 
4138 	ASSERT(dip != NULL);
4139 	node_data = ddi_get_parent_data(dip);
4140 	ASSERT(node_data);
4141 
4142 	/*
4143 	 * Return success if:
4144 	 *	1. Reprobe for all nodes are in progress
4145 	 *	2. Reprobe for this node is in progress.
4146 	 * The reprobe in progress will complete eventually and
4147 	 * update the properties, if required.
4148 	 */
4149 	mutex_enter(&ibnex.ibnex_mutex);
4150 	if (ibnex.ibnex_reprobe_state != 0 ||
4151 	    node_data->node_reprobe_state != 0) {
4152 		/*
4153 		 * Setting NOTIFY_ALWAYS to ensure that
4154 		 * DDI event is delivered always for
4155 		 * ibt_reprobe_dev
4156 		 */
4157 		node_data->node_reprobe_state |=
4158 		    IBNEX_NODE_REPROBE_NOTIFY_ALWAYS;
4159 		mutex_exit(&ibnex.ibnex_mutex);
4160 		return;
4161 	}
4162 	node_data->node_reprobe_state =
4163 	    IBNEX_NODE_REPROBE_NOTIFY_ALWAYS;
4164 	mutex_exit(&ibnex.ibnex_mutex);
4165 	ibnex_reprobe_ioc_dev(arg);
4166 }
4167 
4168 
4169 /*
4170  * MPxIO pathmangement routines. Currently IB nexus does not support
4171  * any kind of pathmangement. So, just return success to make MPxIO
4172  * framework happy.
4173  */
4174 /*ARGSUSED*/
4175 static int
4176 ib_vhci_pi_init(dev_info_t *vdip, mdi_pathinfo_t *pip, int flag)
4177 {
4178 	IBTF_DPRINTF_L4("ibnex", "\tpi_init: dip %p pip %p", vdip, pip);
4179 	return (MDI_SUCCESS);
4180 }
4181 
4182 
4183 /*ARGSUSED*/
4184 static int
4185 ib_vhci_pi_uninit(dev_info_t *vdip, mdi_pathinfo_t *pip, int flag)
4186 {
4187 	dev_info_t *cdip;
4188 	ibnex_node_data_t *node_data;
4189 	int clnt_num_pi;
4190 	IBTF_DPRINTF_L4("ibnex", "\tpi_uninit: dip %p pip %p", vdip, pip);
4191 
4192 	if (pip == NULL)
4193 		return (MDI_FAILURE);
4194 	/*
4195 	 * Get the Client dev_info from the pathinfo.
4196 	 */
4197 	cdip = mdi_pi_get_client(pip);
4198 	if (cdip == NULL)
4199 		return (MDI_FAILURE);
4200 
4201 	/*
4202 	 * How many PIs do we have from this cdip ?
4203 	 */
4204 	clnt_num_pi = mdi_client_get_path_count(cdip);
4205 
4206 	/*
4207 	 * If this is the last PI that is being free'd ( called from
4208 	 * mdi_pi_free) we have to clean up the node data for the cdip since
4209 	 * the client would have been detached by mdi_devi_offline.
4210 	 */
4211 	if (clnt_num_pi == 1) {
4212 		for (node_data = ibnex.ibnex_ioc_node_head;
4213 		    node_data; node_data = node_data->node_next) {
4214 			if (node_data->node_dip == cdip) {
4215 				node_data->node_dip = NULL;
4216 				node_data->node_state =
4217 				    IBNEX_CFGADM_UNCONFIGURED;
4218 				return (MDI_SUCCESS);
4219 			}
4220 		}
4221 		for (node_data = ibnex.ibnex_pseudo_node_head;
4222 		    node_data; node_data = node_data->node_next) {
4223 			if (node_data->node_dip == cdip) {
4224 				node_data->node_dip = NULL;
4225 				node_data->node_state =
4226 				    IBNEX_CFGADM_UNCONFIGURED;
4227 				return (MDI_SUCCESS);
4228 			}
4229 		}
4230 	}
4231 	return (MDI_SUCCESS);
4232 }
4233 
4234 
4235 /*ARGSUSED*/
4236 static int
4237 ib_vhci_pi_state_change(dev_info_t *vdip, mdi_pathinfo_t *pip,
4238 		mdi_pathinfo_state_t state, uint32_t arg1, int arg2)
4239 {
4240 	IBTF_DPRINTF_L4("ibnex",
4241 	    "\tpi_state_change: dip %p pip %p state %x", vdip, pip, state);
4242 	return (MDI_SUCCESS);
4243 }
4244 
4245 
4246 /*ARGSUSED*/
4247 static int
4248 ib_vhci_failover(dev_info_t *dip1, dev_info_t *dip2, int arg)
4249 {
4250 	return (MDI_SUCCESS);
4251 }
4252 
4253 
4254 static int
4255 ibnex_bus_power(dev_info_t *parent, void *impl_arg,
4256     pm_bus_power_op_t op, void *arg, void *result)
4257 {
4258 
4259 	int ret = DDI_SUCCESS;
4260 
4261 	IBTF_DPRINTF_L4("ibnex", "\tbus_power: begin: op = %d", op);
4262 
4263 	/*
4264 	 * Generic processing in MPxIO framework
4265 	 */
4266 	ret = mdi_bus_power(parent, impl_arg, op, arg, result);
4267 
4268 	switch (ret) {
4269 	case MDI_SUCCESS:
4270 		ret = DDI_SUCCESS;
4271 		break;
4272 	case MDI_FAILURE:
4273 		ret = DDI_FAILURE;
4274 		break;
4275 	default:
4276 		break;
4277 	}
4278 
4279 	return (ret);
4280 }
4281 
4282 
4283 /*
4284  * If enumerated as a child of IB Nexus / VHCI, call mdi_vhci_bus_config.
4285  * ndi_devi_enter is not held during this call. mdi_vhci_bus_config()
4286  * will have called ndi_busop_bus_config(), no need for the caller to call
4287  * ndi_busop_bus_config() again.
4288  *
4289  * If enumerated as a child of HCA device, this could be a case for
4290  * Sparc boot or device enumeration from PHCI, driven by MDI.
4291  * Hold parent lock (ndi_devi_enter). The caller will have to call
4292  * ndi_busop_bus_config() if this function returns SUCCESS.
4293  *
4294  * if the device name contains ":port", then it is the Sparc boot case.
4295  * Handle this as before.
4296  *
4297  * If the device name does *not* contain the ":port", then :
4298  *	1. ibdm to probe IOC
4299  *	2. Create a pathinfo only if the IOC is reachable from the parent dip.
4300  */
4301 static int
4302 ibnex_ioc_bus_config_one(dev_info_t **pdipp, uint_t flag,
4303     ddi_bus_config_op_t op, void *devname, dev_info_t **child,
4304     int *need_bus_config)
4305 {
4306 	int ret = DDI_FAILURE, circ;
4307 	dev_info_t *pdip = *pdipp;
4308 	ib_guid_t	iou_guid, ioc_guid;
4309 	char *ioc_guid_str;
4310 
4311 
4312 	*need_bus_config = 1;
4313 
4314 	if (pdip == ibnex.ibnex_dip) {
4315 		if (ibnex_devname_to_node_n_ioc_guids(
4316 		    (char *)devname, &iou_guid, &ioc_guid,
4317 		    &ioc_guid_str) != IBNEX_SUCCESS) {
4318 			return (ret);
4319 		}
4320 		ret = mdi_vhci_bus_config(pdip, flag, op, devname, child,
4321 		    ioc_guid_str);
4322 		kmem_free(ioc_guid_str, strlen(ioc_guid_str) + 1);
4323 		if (ret == MDI_SUCCESS)
4324 			*need_bus_config = 0;
4325 	} else {
4326 		mdi_devi_enter(pdip, &circ);
4327 		if (strstr((char *)devname, ":port=") != NULL) {
4328 			ret = ibnex_config_root_iocnode(pdip, devname);
4329 			ASSERT(ibnex.ibnex_dip == NULL);
4330 			*pdipp = ibnex.ibnex_dip;
4331 		} else {
4332 			ret = ibnex_config_ioc_node(devname, pdip);
4333 		}
4334 		mdi_devi_exit(pdip, circ);
4335 	}
4336 	return (ret);
4337 }
4338 
4339 static int
4340 ibnex_is_merge_node(dev_info_t *child)
4341 {
4342 	char	*node;
4343 	int	ret = IBNEX_INVALID_NODE;
4344 
4345 	if (ddi_prop_lookup_string(DDI_DEV_T_ANY, child,
4346 	    DDI_PROP_DONTPASS, "ib-node-type", &node) !=
4347 	    DDI_PROP_SUCCESS) {
4348 		return (IBNEX_FAILURE);
4349 	}
4350 
4351 	if (node != NULL && *node != 0) {
4352 		if (strcmp(node, "merge") == 0)
4353 			ret = IBNEX_SUCCESS;
4354 		else {
4355 			IBTF_DPRINTF_L4("ibnex",
4356 			    "\tis_merge_node: ib-node-type = %s", node);
4357 		}
4358 	}
4359 
4360 	ddi_prop_free(node);
4361 	return (ret);
4362 }
4363 
4364 /*
4365  * Checks if the dn_head for the driver has already
4366  * initialized by the prom tree.
4367  */
4368 void
4369 ibnex_hw_in_dev_tree(char *driver_name)
4370 {
4371 	major_t	major;
4372 
4373 	IBTF_DPRINTF_L4("ibnex", "\thw_in_dev_tree(%s)", driver_name);
4374 
4375 	if (devnamesp == NULL)
4376 		return;
4377 
4378 	major = ddi_name_to_major(driver_name);
4379 	if (major == -1)
4380 		return;
4381 
4382 	if (devnamesp[major].dn_head != (dev_info_t *)NULL)
4383 		ibnex_hw_status = IBNEX_HW_IN_DEVTREE;
4384 }
4385 
4386 int
4387 ibnex_ioc_initnode_all_pi(ibdm_ioc_info_t *ioc_info)
4388 {
4389 	ibdm_hca_list_t	*hca_list;
4390 	dev_info_t	*hca_dip;
4391 	int	rc = IBNEX_FAILURE;
4392 
4393 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
4394 	/*
4395 	 * We return failure even if we fail for all HCAs
4396 	 */
4397 	for (hca_list = ioc_info->ioc_hca_list; hca_list;
4398 	    hca_list = hca_list->hl_next) {
4399 		hca_dip = ibtl_ibnex_hcaguid2dip(hca_list->hl_hca_guid);
4400 		if (ibnex_ioc_config_from_pdip(ioc_info, hca_dip, 1) ==
4401 		    IBNEX_SUCCESS)
4402 			rc = IBNEX_SUCCESS;
4403 	}
4404 	return (rc);
4405 }
4406 
4407 static int
4408 ibnex_ioc_config_from_pdip(ibdm_ioc_info_t *ioc_info, dev_info_t *pdip,
4409     int pdip_reachable_checked)
4410 {
4411 	ibnex_node_data_t	*node_data;
4412 	int			create_pdip = 0;
4413 	int			rc = IBNEX_SUCCESS;
4414 
4415 
4416 	ASSERT(MUTEX_HELD(&ibnex.ibnex_mutex));
4417 	IBTF_DPRINTF_L4("ibnex",
4418 	    "/tioc_config_from_pdip(%p, %p, %d)", ioc_info, pdip,
4419 	    pdip_reachable_checked);
4420 
4421 	if (pdip_reachable_checked == 0) {
4422 		if (ibnex_ioc_pi_reachable(ioc_info, pdip) == IBNEX_FAILURE) {
4423 			IBTF_DPRINTF_L4("ibnex",
4424 			    "/tioc_config_from_pdip: ioc %p not reachable"
4425 			    "from %p", ioc_info, pdip);
4426 			return (IBNEX_FAILURE);
4427 		}
4428 	}
4429 
4430 	node_data = ibnex_is_node_data_present(IBNEX_IOC_NODE,
4431 	    (void *)ioc_info, 0, 0);
4432 
4433 	if (node_data && node_data->node_ap_state ==
4434 	    IBNEX_NODE_AP_UNCONFIGURED) {
4435 		IBTF_DPRINTF_L4("ibnex",
4436 		    "\tioc_config_from_pdip: Unconfigured node");
4437 		return (IBNEX_FAILURE);
4438 	}
4439 
4440 
4441 	if (node_data == NULL) {
4442 		ibnex_ioc_node_t	*ioc;
4443 
4444 		create_pdip = 1;
4445 
4446 		node_data = ibnex_init_child_nodedata(IBNEX_IOC_NODE,
4447 		    ioc_info, 0, 0);
4448 		ASSERT(node_data);
4449 		ioc = &node_data->node_data.ioc_node;
4450 		(void) snprintf(ioc->ioc_guid_str, IBNEX_IOC_GUID_LEN,
4451 		    "%llX",
4452 		    (longlong_t)ioc_info->ioc_profile.ioc_guid);
4453 		(void) snprintf(ioc->ioc_phci_guid, IBNEX_PHCI_GUID_LEN,
4454 		    "%llX,%llX",
4455 		    (longlong_t)ioc_info->ioc_profile.ioc_guid,
4456 		    (longlong_t)ioc_info->ioc_iou_guid);
4457 	} else if (ibnex_ioc_pi_exists(node_data, pdip) == IBNEX_FAILURE) {
4458 		create_pdip = 1;
4459 	}
4460 
4461 	if (create_pdip) {
4462 		rc = ibnex_ioc_initnode_pdip(node_data, ioc_info, pdip);
4463 	}
4464 
4465 	IBTF_DPRINTF_L4("ibnex", "\tioc_config_from_pdip ret %x",
4466 	    rc);
4467 	return (rc);
4468 }
4469 
4470 /*
4471  * This function checks if a pathinfo has already been created
4472  * for the HCA parent. The function returns SUCCESS if a pathinfo
4473  * has already been created, FAILURE if not.
4474  */
4475 static int
4476 ibnex_ioc_pi_exists(ibnex_node_data_t *node_data, dev_info_t *parent)
4477 {
4478 	int	rc;
4479 	ibnex_ioc_node_t	*ioc;
4480 
4481 	ioc = &node_data->node_data.ioc_node;
4482 	if (mdi_pi_find(parent, (char *)ioc->ioc_guid_str,
4483 	    (char *)ioc->ioc_phci_guid) != NULL)
4484 		rc = IBNEX_SUCCESS;
4485 	else
4486 		rc = IBNEX_FAILURE;
4487 
4488 	IBTF_DPRINTF_L4("ibnex", "\tioc_pi_created- client_guid %s, "
4489 	    "phci_guid %s, parent %p, rc %x",
4490 	    ioc->ioc_guid_str, ioc->ioc_phci_guid, parent, rc);
4491 	return (rc);
4492 }
4493 
4494 static int
4495 ibnex_ioc_pi_reachable(ibdm_ioc_info_t *ioc_info, dev_info_t *pdip)
4496 {
4497 	ibdm_hca_list_t	*hca_list;
4498 	dev_info_t	*hca_dip;
4499 
4500 	IBTF_DPRINTF_L4("ibnex", "\tioc_pi_reachable(%p, %p)",
4501 	    ioc_info, pdip);
4502 	for (hca_list = ioc_info->ioc_hca_list; hca_list;
4503 	    hca_list = hca_list->hl_next) {
4504 		hca_dip = ibtl_ibnex_hcaguid2dip(hca_list->hl_hca_guid);
4505 		if (hca_dip == pdip) {
4506 			IBTF_DPRINTF_L4("ibnex",
4507 			    "\tioc_pi_reachable FAILURE");
4508 			return (IBNEX_SUCCESS);
4509 		}
4510 	}
4511 
4512 	IBTF_DPRINTF_L4("ibnex", "\tioc_pi_reachable FAILURE");
4513 	return (IBNEX_FAILURE);
4514 }
4515