?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
8354 sync regcomp(3C) with upstream (fix make catalog)
[unleashed/tickless.git] / usr / src / uts / sun4u / io / mach_rootnex.c
blob8c0653d84a0e0f545226ea8d04cba4380ffd87ba
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 2006 Sun Microsystems, Inc. All rights reserved.
23 * Use is subject to license terms.
24 */
25
26 #pragma ident "%Z%%M% %I% %E% SMI"
27
28 /*
29 * sun4u root nexus driver
30 */
31 #include <sys/conf.h>
32 #include <sys/cpuvar.h>
33 #include <sys/sysiosbus.h>
34 #include <sys/intreg.h>
35 #include <sys/ddi_subrdefs.h>
36 #include <sys/sunndi.h>
37 #include <sys/async.h>
38
39 /* Useful debugging Stuff */
40 #include <sys/nexusdebug.h>
41 #define ROOTNEX_MAP_DEBUG 0x1
42 #define ROOTNEX_INTR_DEBUG 0x2
43
44 /*
45 * Extern declarations
46 */
47 extern uint_t root_phys_addr_lo_mask;
48 extern int rootnex_name_child(dev_info_t *child, char *name, int namelen);
49 extern int rootnex_ctl_uninitchild(dev_info_t *dip);
50
51 uint_t root_phys_addr_hi_mask = 0xffffffff;
52
53 /*
54 * config information
55 */
56 int
57 rootnex_add_intr_impl(dev_info_t *dip, dev_info_t *rdip,
58 ddi_intr_handle_impl_t *hdlp);
59
60 int
61 rootnex_remove_intr_impl(dev_info_t *dip, dev_info_t *rdip,
62 ddi_intr_handle_impl_t *hdlp);
63
64 int
65 rootnex_get_intr_pri(dev_info_t *dip, dev_info_t *rdip,
66 ddi_intr_handle_impl_t *hdlp);
67
68 ddi_iblock_cookie_t rootnex_err_ibc;
69
70 /*
71 * rootnex_add_intr_impl:
72 */
73 /*ARGSUSED*/
74 int
75 rootnex_add_intr_impl(dev_info_t *dip, dev_info_t *rdip,
76 ddi_intr_handle_impl_t *hdlp)
77 {
78 volatile uint64_t *intr_mapping_reg;
79 volatile uint64_t mondo_vector;
80 int32_t r_upaid = -1;
81 int32_t slave = 0;
82 int32_t portid;
83 int len, ret;
84
85 if (((portid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
86 DDI_PROP_DONTPASS, "upa-portid", -1)) != -1) ||
87 ((portid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
88 DDI_PROP_DONTPASS, "portid", -1)) != -1)) {
89 if (ddi_getprop(DDI_DEV_T_ANY, rdip, DDI_PROP_DONTPASS,
90 "upa-interrupt-slave", 0) != 0) {
91
92 /* Give slave devices pri of 5. e.g. fb's */
93 hdlp->ih_pri = 5;
94 }
95
96 /*
97 * Translate the interrupt property by stuffing in the
98 * portid for those devices which have a portid.
99 */
100 hdlp->ih_vector |= (UPAID_TO_IGN(portid) << 6);
101 }
102
103 /*
104 * Hack to support the UPA slave devices before the 1275
105 * support for imap was introduced.
106 */
107 if (ddi_getproplen(DDI_DEV_T_ANY, dip, NULL, "interrupt-map",
108 &len) != DDI_PROP_SUCCESS && ddi_getprop(DDI_DEV_T_ANY,
109 rdip, DDI_PROP_DONTPASS, "upa-interrupt-slave", 0) != 0 &&
110 ddi_get_parent(rdip) == dip) {
111 slave = 1;
112
113 if ((r_upaid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
114 DDI_PROP_DONTPASS, "upa-portid", -1)) != -1) {
115 extern uint64_t *get_intr_mapping_reg(int, int);
116
117 if ((intr_mapping_reg = get_intr_mapping_reg(
118 r_upaid, 1)) == NULL)
119 return (DDI_FAILURE);
120 } else
121 return (DDI_FAILURE);
122 }
123
124 if ((ret = i_ddi_add_ivintr(hdlp)) != DDI_SUCCESS)
125 return (ret);
126
127 /*
128 * Hack to support the UPA slave devices before the 1275
129 * support for imap was introduced.
130 */
131 if (slave) {
132 /*
133 * Program the interrupt mapping register.
134 * Interrupts from the slave UPA devices are
135 * directed at the boot CPU until it is known
136 * that they can be safely redirected while
137 * running under load.
138 */
139 mondo_vector = cpu0.cpu_id << IMR_TID_SHIFT;
140 mondo_vector |= (IMR_VALID | (uint64_t)hdlp->ih_vector);
141
142 /* Set the mapping register */
143 *intr_mapping_reg = mondo_vector;
144
145 /* Flush write buffers */
146 mondo_vector = *intr_mapping_reg;
147 }
148
149 return (ret);
150 }
151
152 /*
153 * rootnex_remove_intr_impl:
154 */
155 /*ARGSUSED*/
156 int
157 rootnex_remove_intr_impl(dev_info_t *dip, dev_info_t *rdip,
158 ddi_intr_handle_impl_t *hdlp)
159 {
160 int32_t portid;
161 int len;
162
163 if (((portid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
164 DDI_PROP_DONTPASS, "upa-portid", -1)) != -1) ||
165 ((portid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
166 DDI_PROP_DONTPASS, "portid", -1)) != -1)) {
167 /*
168 * Translate the interrupt property by stuffing in the
169 * portid for those devices which have a portid.
170 */
171 hdlp->ih_vector |= (UPAID_TO_IGN(portid) << 6);
172 }
173
174 /*
175 * Hack to support the UPA slave devices before the 1275
176 * support for imap was introduced.
177 */
178 if (ddi_getproplen(DDI_DEV_T_ANY, dip, NULL, "interrupt-map",
179 &len) != DDI_PROP_SUCCESS && ddi_getprop(DDI_DEV_T_ANY,
180 rdip, DDI_PROP_DONTPASS, "upa-interrupt-slave", 0) != 0) {
181 int32_t r_upaid = -1;
182
183 if ((r_upaid = ddi_prop_get_int(DDI_DEV_T_ANY, rdip,
184 DDI_PROP_DONTPASS, "upa-portid", -1)) != -1 &&
185 ddi_get_parent(rdip) == dip) {
186 volatile uint64_t *intr_mapping_reg;
187 volatile uint64_t flush_data;
188 extern uint64_t *get_intr_mapping_reg(int, int);
189
190 if ((intr_mapping_reg = get_intr_mapping_reg(
191 r_upaid, 1)) == NULL)
192 return (DDI_SUCCESS);
193
194 /* Clear the mapping register */
195 *intr_mapping_reg = 0x0ull;
196
197 /* Flush write buffers */
198 flush_data = *intr_mapping_reg;
199 #ifdef lint
200 flush_data = flush_data;
201 #endif /* lint */
202 }
203 }
204
205 i_ddi_rem_ivintr(hdlp);
206
207 return (DDI_SUCCESS);
208 }
209
210 /*
211 * rootnex_get_intr_pri:
212 */
213 /*ARGSUSED*/
214 int
215 rootnex_get_intr_pri(dev_info_t *dip, dev_info_t *rdip,
216 ddi_intr_handle_impl_t *hdlp)
217 {
218 int pri = hdlp->ih_pri;
219
220 if (ddi_prop_get_int(DDI_DEV_T_ANY, rdip, DDI_PROP_DONTPASS,
221 "upa-portid", -1) != -1) {
222 if (ddi_getprop(DDI_DEV_T_ANY, rdip, DDI_PROP_DONTPASS,
223 "upa-interrupt-slave", 0) != 0) {
224
225 /* Give slave devices pri of 5. e.g. fb's */
226 pri = 5;
227 }
228 }
229
230 return (pri);
231 }
232
233 int
234 rootnex_ctl_reportdev_impl(dev_info_t *dev)
235 {
236 struct regspec *rp;
237 char buf[80];
238 char *p = buf;
239 register int n;
240 int portid;
241 int nodeid;
242
243 (void) sprintf(p, "%s%d at root", ddi_driver_name(dev),
244 ddi_get_instance(dev));
245 p += strlen(p);
246
247 if ((n = sparc_pd_getnreg(dev)) > 0) {
248 rp = sparc_pd_getreg(dev, 0);
249
250 (void) strcpy(p, ": ");
251 p += strlen(p);
252
253 /*
254 * This stuff needs to be fixed correctly for the FFB
255 * devices and the UPA add-on devices.
256 */
257 portid = ddi_prop_get_int(DDI_DEV_T_ANY, dev,
258 DDI_PROP_DONTPASS, "upa-portid", -1);
259 if (portid != -1)
260 (void) sprintf(p, "UPA 0x%x 0x%x%s",
261 portid,
262 rp->regspec_addr, (n > 1 ? "" : " ..."));
263 else {
264 portid = ddi_prop_get_int(DDI_DEV_T_ANY, dev,
265 DDI_PROP_DONTPASS, "portid", -1);
266 nodeid = ddi_prop_get_int(DDI_DEV_T_ANY, dev,
267 DDI_PROP_DONTPASS, "nodeid", -1);
268 if (portid == -1 && nodeid == -1)
269 printf("could not find portid "
270 "or nodeid property in %s\n",
271 DEVI(dev)->devi_node_name);
272
273 if (portid != -1)
274 (void) sprintf(p, "SAFARI 0x%x 0x%x%s",
275 portid,
276 rp->regspec_addr &
277 root_phys_addr_lo_mask,
278 (n > 1 ? "" : " ..."));
279 if (nodeid != -1)
280 (void) sprintf(p, "SSM Node %d", nodeid);
281 }
282 p += strlen(p);
283 }
284
285 /*
286 * This is where we need to print out the interrupt specifications
287 * for the FFB device and any UPA add-on devices. Not sure how to
288 * do this yet?
289 */
290 cmn_err(CE_CONT, "?%s\n", buf);
291 return (DDI_SUCCESS);
292 }
293
294 int
295 rootnex_name_child_impl(dev_info_t *child, char *name, int namelen)
296 {
297 struct ddi_parent_private_data *pdptr;
298 int portid, nodeid;
299 char *node_name;
300 struct regspec *rp;
301
302 extern uint_t root_phys_addr_lo_mask;
303 extern void make_ddi_ppd(
304 dev_info_t *, struct ddi_parent_private_data **);
305
306 /*
307 * Fill in parent-private data and this function returns to us
308 * an indication if it used "registers" to fill in the data.
309 */
310 if (ddi_get_parent_data(child) == NULL) {
311 make_ddi_ppd(child, &pdptr);
312 ddi_set_parent_data(child, pdptr);
313 }
314
315 /*
316 * No reg property, return null string as address (e.g. pseudo)
317 */
318 name[0] = '\0';
319 if (sparc_pd_getnreg(child) == 0) {
320 return (DDI_SUCCESS);
321 }
322 rp = sparc_pd_getreg(child, 0);
323 ASSERT(rp != NULL);
324
325 /*
326 * Create portid property for fhc node under root(/fhc).
327 */
328 node_name = ddi_node_name(child);
329 if ((strcmp(node_name, "fhc") == 0) ||
330 (strcmp(node_name, "mem-unit") == 0) ||
331 (strcmp(node_name, "central") == 0)) {
332 #ifdef _STARFIRE
333 portid = ((((rp->regspec_bustype) & 0x6) >> 1) |
334 (((rp->regspec_bustype) & 0xF0) >> 2) |
335 (((rp->regspec_bustype) & 0x8) << 3));
336 #else
337 portid = (rp->regspec_bustype >> 1) & 0x1f;
338 #endif
339
340 /*
341 * The port-id must go on the hardware property list,
342 * otherwise, initchild may fail.
343 */
344 if (ndi_prop_update_int(DDI_DEV_T_NONE, child, "upa-portid",
345 portid) != DDI_SUCCESS)
346 cmn_err(CE_WARN,
347 "Error in creating upa-portid property for fhc.\n");
348 }
349
350 /*
351 * Name node on behalf of child nexus.
352 */
353 if (ddi_get_parent(child) != ddi_root_node()) {
354 (void) snprintf(name, namelen, "%x,%x",
355 rp->regspec_bustype, rp->regspec_addr);
356 return (DDI_SUCCESS);
357 }
358
359 /*
360 * On sun4u, the 'name' of children of the root node
361 * is foo@<upa-mid>,<offset>, which is derived from,
362 * but not identical to the physical address.
363 */
364 portid = ddi_prop_get_int(DDI_DEV_T_ANY, child,
365 DDI_PROP_DONTPASS, "upa-portid", -1);
366 if (portid == -1)
367 portid = ddi_prop_get_int(DDI_DEV_T_ANY, child,
368 DDI_PROP_DONTPASS, "portid", -1);
369 nodeid = ddi_prop_get_int(DDI_DEV_T_ANY, child,
370 DDI_PROP_DONTPASS, "nodeid", -1);
371
372 /*
373 * Do not log message, to handle cases where OBP version
374 * does not have "portid" property for the root i2c node.
375 *
376 * Platforms supporting root i2c node (potentially without
377 * "portid" property) are :
378 * SunBlade 1500, SunBlade 2500, V240, V250
379 */
380 if (portid == -1 && nodeid == -1 &&
381 strncmp(node_name, "i2c", strlen("i2c")) != 0)
382 cmn_err(CE_WARN,
383 "could not find portid or nodeid property in %s\n",
384 DEVI(child)->devi_node_name);
385 if (nodeid != -1)
386 (void) snprintf(name, namelen, "%x,0", nodeid);
387 else
388 (void) snprintf(name, namelen, "%x,%x", portid,
389 rp->regspec_addr & root_phys_addr_lo_mask);
390
391 return (DDI_SUCCESS);
392 }
393
394 int
395 rootnex_ctl_initchild_impl(dev_info_t *dip)
396 {
397 struct regspec *rp;
398 struct ddi_parent_private_data *pd;
399 char name[MAXNAMELEN];
400
401 extern struct ddi_parent_private_data *init_regspec_64(dev_info_t *dip);
402
403 /* Name the child */
404 (void) rootnex_name_child(dip, name, MAXNAMELEN);
405 ddi_set_name_addr(dip, name);
406
407 /*
408 * Try to merge .conf node. If merge is successful, return
409 * DDI_FAILURE to allow caller to remove this node.
410 */
411 if (ndi_dev_is_persistent_node(dip) == 0 &&
412 (ndi_merge_node(dip, rootnex_name_child) == DDI_SUCCESS)) {
413 (void) rootnex_ctl_uninitchild(dip);
414 return (DDI_FAILURE);
415 }
416
417 /*
418 * If there are no "reg"s in the child node, return.
419 */
420 pd = init_regspec_64(dip);
421 if ((pd == NULL) || (pd->par_nreg == 0))
422 return (DDI_SUCCESS);
423
424 /*
425 * If this is a slave device sitting on the UPA, we assume that
426 * This device can accept DMA accesses from other devices. We need
427 * to register this fact with the system by using the highest
428 * and lowest physical pfns of the devices register space. This
429 * will then represent a physical block of addresses that are valid
430 * for DMA accesses.
431 */
432 if ((ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS, "upa-portid",
433 -1) != -1) && ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
434 "upa-interrupt-slave", 0)) {
435 pfn_t lopfn = (pfn_t)-1;
436 pfn_t hipfn = 0;
437 int i;
438 extern void pf_set_dmacapable(pfn_t, pfn_t);
439
440 /* Scan the devices highest and lowest physical pfns */
441 for (i = 0, rp = pd->par_reg; i < pd->par_nreg; i++, rp++) {
442 uint64_t addr;
443 pfn_t tmphipfn, tmplopfn;
444
445 addr = (unsigned long long)((unsigned long long)
446 rp->regspec_bustype << 32);
447 addr |= (uint64_t)rp->regspec_addr;
448 tmplopfn = (pfn_t)(addr >> MMU_PAGESHIFT);
449 addr += (uint64_t)(rp->regspec_size - 1);
450 tmphipfn = (pfn_t)(addr >> MMU_PAGESHIFT);
451
452 hipfn = (tmphipfn > hipfn) ? tmphipfn : hipfn;
453 lopfn = (tmplopfn < lopfn) ? tmplopfn : lopfn;
454 }
455 pf_set_dmacapable(hipfn, lopfn);
456 }
457
458 return (DDI_SUCCESS);
459 }
460
461 void
462 rootnex_ctl_uninitchild_impl(dev_info_t *dip)
463 {
464 if ((ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS, "upa-portid",
465 -1) != -1) && (ddi_getprop(DDI_DEV_T_ANY, dip, DDI_PROP_DONTPASS,
466 "upa-interrupt-slave", 0))) {
467 struct regspec *rp;
468 extern void pf_unset_dmacapable(pfn_t);
469 unsigned long long addr;
470 pfn_t pfn;
471 struct ddi_parent_private_data *pd;
472
473 pd = ddi_get_parent_data(dip);
474 ASSERT(pd != NULL);
475 rp = pd->par_reg;
476 addr = (unsigned long long) ((unsigned long long)
477 rp->regspec_bustype << 32);
478 addr |= (unsigned long long) rp->regspec_addr;
479 pfn = (pfn_t)(addr >> MMU_PAGESHIFT);
480
481 pf_unset_dmacapable(pfn);
482 }
483 }
unleashed repo fork