xref: /illumos-gate/usr/src/lib/fm/topo/modules/common/hostbridge/hostbridge.c (revision 6597d6fcfd3058014e6518bb93c97eb0a42b4c3e)
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 /*
23  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #include <string.h>
28 #include <fm/topo_mod.h>
29 #include <fm/topo_hc.h>
30 #include <libdevinfo.h>
31 #include <limits.h>
32 #include <sys/fm/protocol.h>
33 #include <sys/param.h>
34 #include <sys/systeminfo.h>
35 #include <assert.h>
36 
37 #include <hostbridge.h>
38 #include <pcibus.h>
39 #include <did.h>
40 #include <did_props.h>
41 #include <util.h>
42 
43 /*
44  * hostbridge.c
45  *	Generic code shared by all the hostbridge enumerators
46  */
47 static void hb_release(topo_mod_t *, tnode_t *);
48 static int hb_label(topo_mod_t *, tnode_t *, topo_version_t, nvlist_t *,
49     nvlist_t **);
50 static int hb_enum(topo_mod_t *, tnode_t *, const char *, topo_instance_t,
51     topo_instance_t, void *, void *);
52 
53 extern int platform_hb_label(topo_mod_t *, tnode_t *, nvlist_t *, nvlist_t **);
54 extern int platform_hb_enum(topo_mod_t *, tnode_t *,
55     const char *, topo_instance_t, topo_instance_t);
56 
57 extern txprop_t ExHB_common_props[];
58 extern txprop_t HB_common_props[];
59 extern txprop_t RC_common_props[];
60 extern int ExHB_propcnt;
61 extern int HB_propcnt;
62 extern int RC_propcnt;
63 
64 static int specific_hb_enum(topo_mod_t *, tnode_t *, const char *,
65     topo_instance_t, topo_instance_t, void *);
66 
67 static const topo_modops_t Hb_ops =
68 	{ hb_enum, hb_release };
69 static const topo_modinfo_t Hb_info =
70 	{ HOSTBRIDGE, FM_FMRI_SCHEME_HC, HB_ENUMR_VERS, &Hb_ops };
71 
72 static const topo_method_t Hb_methods[] = {
73 	{ TOPO_METH_LABEL, TOPO_METH_LABEL_DESC,
74 	    TOPO_METH_LABEL_VERSION, TOPO_STABILITY_INTERNAL, hb_label },
75 	{ NULL }
76 };
77 
78 static const topo_pgroup_info_t hb_auth_pgroup = {
79 	FM_FMRI_AUTHORITY,
80 	TOPO_STABILITY_PRIVATE,
81 	TOPO_STABILITY_PRIVATE,
82 	1
83 };
84 
85 int
_topo_init(topo_mod_t * modhdl,topo_version_t version)86 _topo_init(topo_mod_t *modhdl, topo_version_t version)
87 {
88 	/*
89 	 * Turn on module debugging output
90 	 */
91 	if (getenv("TOPOHBDBG") != NULL)
92 		topo_mod_setdebug(modhdl);
93 	topo_mod_dprintf(modhdl, "initializing hostbridge enumerator\n");
94 
95 	if (version != HB_ENUMR_VERS)
96 		return (topo_mod_seterrno(modhdl, EMOD_VER_NEW));
97 
98 	if (topo_mod_register(modhdl, &Hb_info, TOPO_VERSION) < 0) {
99 		topo_mod_dprintf(modhdl, "hostbridge registration failed: %s\n",
100 		    topo_mod_errmsg(modhdl));
101 		return (-1); /* mod errno already set */
102 	}
103 
104 	topo_mod_dprintf(modhdl, "Hostbridge enumr initd\n");
105 
106 	return (0);
107 }
108 
109 void
_topo_fini(topo_mod_t * modhdl)110 _topo_fini(topo_mod_t *modhdl)
111 {
112 	topo_mod_unregister(modhdl);
113 }
114 
115 static int
hb_label(topo_mod_t * mp,tnode_t * node,topo_version_t version,nvlist_t * in,nvlist_t ** out)116 hb_label(topo_mod_t *mp, tnode_t *node, topo_version_t version,
117     nvlist_t *in, nvlist_t **out)
118 {
119 	if (version > TOPO_METH_LABEL_VERSION)
120 		return (topo_mod_seterrno(mp, EMOD_VER_NEW));
121 	return (platform_hb_label(mp, node, in, out));
122 }
123 
124 static topo_mod_t *
pci_enumr_load(topo_mod_t * mp)125 pci_enumr_load(topo_mod_t *mp)
126 {
127 	topo_mod_t *rp = NULL;
128 
129 	if ((rp = topo_mod_load(mp, PCI_ENUM, PCI_ENUMR_VERS)) == NULL) {
130 		topo_mod_dprintf(mp,
131 		    "%s enumerator could not load %s.\n", HOSTBRIDGE, PCI_ENUM);
132 	}
133 	return (rp);
134 }
135 
136 /*ARGSUSED*/
137 static int
hb_enum(topo_mod_t * mp,tnode_t * pn,const char * name,topo_instance_t imin,topo_instance_t imax,void * notused,void * data)138 hb_enum(topo_mod_t *mp, tnode_t *pn, const char *name, topo_instance_t imin,
139     topo_instance_t imax, void *notused, void *data)
140 {
141 	int rv;
142 	topo_mod_t *pcimod;
143 
144 	if (strcmp(name, HOSTBRIDGE) != 0) {
145 		topo_mod_dprintf(mp,
146 		    "Currently only know how to enumerate %s components.\n",
147 		    HOSTBRIDGE);
148 		return (0);
149 	}
150 	/*
151 	 * Load the pcibus enumerator
152 	 */
153 	if ((pcimod = pci_enumr_load(mp)) == NULL)
154 		return (-1);
155 
156 	/*
157 	 * If we're asked to enumerate a whole range of hostbridges, then
158 	 * we need to find them all.  If we're just asked to enumerate a
159 	 * single hostbridge, we expect our caller to have passed us linked
160 	 * did_t structures we can use to enumerate the singled out hostbridge.
161 	 */
162 	if (imin != imax) {
163 
164 		if (did_hash_init(mp) < 0) {
165 			topo_mod_dprintf(mp,
166 			    "Hash initialization for hostbridge "
167 			    "enumerator failed.\n");
168 			topo_mod_unload(pcimod);
169 			return (-1);
170 		}
171 		rv = platform_hb_enum(mp, pn, name, imin, imax);
172 		did_hash_fini(mp);
173 	} else {
174 		rv = specific_hb_enum(mp, pn, name, imin, imax, data);
175 	}
176 
177 	return (rv);
178 }
179 
180 /*ARGSUSED*/
181 static void
hb_release(topo_mod_t * mp,tnode_t * node)182 hb_release(topo_mod_t *mp, tnode_t *node)
183 {
184 	topo_method_unregister_all(mp, node);
185 }
186 
187 static tnode_t *
hb_tnode_create(topo_mod_t * mod,tnode_t * parent,const char * name,topo_instance_t i,void * priv)188 hb_tnode_create(topo_mod_t *mod, tnode_t *parent,
189     const char *name, topo_instance_t i, void *priv)
190 {
191 	int err;
192 	nvlist_t *fmri;
193 	tnode_t *ntn;
194 	nvlist_t *auth = topo_mod_auth(mod, parent);
195 
196 	fmri = topo_mod_hcfmri(mod, parent, FM_HC_SCHEME_VERSION, name, i,
197 	    NULL, auth, NULL, NULL, NULL);
198 	nvlist_free(auth);
199 	if (fmri == NULL) {
200 		topo_mod_dprintf(mod,
201 		    "Unable to make nvlist for %s bind: %s.\n",
202 		    name, topo_mod_errmsg(mod));
203 		return (NULL);
204 	}
205 
206 	ntn = topo_node_bind(mod, parent, name, i, fmri);
207 	if (ntn == NULL) {
208 		topo_mod_dprintf(mod,
209 		    "topo_node_bind (%s%" PRIu64 "/%s%" PRIu64 ") failed: %s\n",
210 		    topo_node_name(parent), topo_node_instance(parent),
211 		    name, i,
212 		    topo_strerror(topo_mod_errno(mod)));
213 		nvlist_free(fmri);
214 		return (NULL);
215 	}
216 	nvlist_free(fmri);
217 	topo_node_setspecific(ntn, priv);
218 
219 	if (topo_pgroup_create(ntn, &hb_auth_pgroup, &err) == 0) {
220 		(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
221 		    FM_FMRI_AUTH_PRODUCT, &err);
222 		(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
223 		    FM_FMRI_AUTH_PRODUCT_SN, &err);
224 		(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
225 		    FM_FMRI_AUTH_CHASSIS, &err);
226 		(void) topo_prop_inherit(ntn, FM_FMRI_AUTHORITY,
227 		    FM_FMRI_AUTH_SERVER, &err);
228 	}
229 
230 	if (topo_method_register(mod, ntn, Hb_methods) < 0) {
231 		topo_mod_dprintf(mod, "topo_method_register failed: %s\n",
232 		    topo_strerror(topo_mod_errno(mod)));
233 		topo_node_unbind(ntn);
234 		return (NULL);
235 	}
236 	return (ntn);
237 }
238 
239 tnode_t *
pcihostbridge_declare(topo_mod_t * mod,tnode_t * parent,di_node_t din,topo_instance_t i)240 pcihostbridge_declare(topo_mod_t *mod, tnode_t *parent, di_node_t din,
241     topo_instance_t i)
242 {
243 	did_t *pd;
244 	tnode_t *ntn;
245 
246 	if ((pd = did_find(mod, din)) == NULL)
247 		return (NULL);
248 	if ((ntn = hb_tnode_create(mod, parent, HOSTBRIDGE, i, din)) == NULL)
249 		return (NULL);
250 	if (did_props_set(ntn, pd, HB_common_props, HB_propcnt) < 0) {
251 		topo_node_unbind(ntn);
252 		return (NULL);
253 	}
254 	/*
255 	 * We expect to find pci buses beneath the hostbridge.
256 	 */
257 	if (child_range_add(mod, ntn, PCI_BUS, 0, MAX_HB_BUSES) < 0) {
258 		topo_node_unbind(ntn);
259 		return (NULL);
260 	}
261 	return (ntn);
262 }
263 
264 tnode_t *
pciexhostbridge_declare(topo_mod_t * mod,tnode_t * parent,di_node_t din,topo_instance_t hi)265 pciexhostbridge_declare(topo_mod_t *mod, tnode_t *parent, di_node_t din,
266     topo_instance_t hi)
267 {
268 	did_t *pd;
269 	tnode_t *ntn;
270 
271 	if ((pd = did_find(mod, din)) == NULL)
272 		return (NULL);
273 	if ((ntn = hb_tnode_create(mod, parent, HOSTBRIDGE, hi, din)) == NULL)
274 		return (NULL);
275 	if (did_props_set(ntn, pd, ExHB_common_props, ExHB_propcnt) < 0) {
276 		topo_node_unbind(ntn);
277 		return (NULL);
278 	}
279 	/*
280 	 * We expect to find root complexes beneath the hostbridge.
281 	 */
282 	if (child_range_add(mod, ntn, PCIEX_ROOT, 0, MAX_HB_BUSES) < 0) {
283 		topo_node_unbind(ntn);
284 		return (NULL);
285 	}
286 	return (ntn);
287 }
288 
289 tnode_t *
pciexrc_declare(topo_mod_t * mod,tnode_t * parent,di_node_t din,topo_instance_t ri)290 pciexrc_declare(topo_mod_t *mod, tnode_t *parent, di_node_t din,
291     topo_instance_t ri)
292 {
293 	did_t *pd;
294 	tnode_t *ntn;
295 
296 	if ((pd = did_find(mod, din)) == NULL)
297 		return (NULL);
298 	did_markrc(pd);
299 	if ((ntn = hb_tnode_create(mod, parent, PCIEX_ROOT, ri, din)) == NULL)
300 		return (NULL);
301 	if (did_props_set(ntn, pd, RC_common_props, RC_propcnt) < 0) {
302 		topo_node_unbind(ntn);
303 		return (NULL);
304 	}
305 	/*
306 	 * We expect to find pci-express buses beneath a root complex
307 	 */
308 	if (child_range_add(mod, ntn, PCIEX_BUS, 0, MAX_HB_BUSES) < 0) {
309 		topo_node_range_destroy(ntn, PCIEX_BUS);
310 		return (NULL);
311 	}
312 	return (ntn);
313 }
314 
315 /*ARGSUSED*/
316 static int
specific_hb_enum(topo_mod_t * mod,tnode_t * pn,const char * name,topo_instance_t imin,topo_instance_t imax,void * priv)317 specific_hb_enum(topo_mod_t *mod, tnode_t *pn, const char *name,
318     topo_instance_t imin, topo_instance_t imax, void *priv)
319 {
320 	tnode_t *hb;
321 	did_t *iodid = (did_t *)priv;
322 	did_t *didp;
323 	int brc = 0;
324 	int bus;
325 
326 	did_setspecific(mod, priv);
327 
328 	/*
329 	 * Find the hostbridge of interest
330 	 */
331 	didp = iodid;
332 	for (brc = 0; brc < imin; brc++)
333 		didp = did_chain_get(didp);
334 	assert(didp != NULL);
335 
336 	if ((hb = pcihostbridge_declare(mod, pn, did_dinode(didp), imin))
337 	    == NULL) {
338 		return (-1);
339 	}
340 	while (didp != NULL) {
341 		did_BDF(didp, &bus, NULL, NULL);
342 		if (topo_mod_enumerate(mod,
343 		    hb, PCI_BUS, PCI_BUS, bus, bus, didp) != 0) {
344 			return (topo_mod_seterrno(mod, EMOD_PARTIAL_ENUM));
345 		}
346 		didp = did_link_get(didp);
347 	}
348 
349 	return (0);
350 }
351