kftxx.c revision 1.13 1 /* $NetBSD: kftxx.c,v 1.13 2007/03/04 05:59:12 christos Exp $ */
2
3 /*
4 * Copyright (c) 1997 by Matthew Jacob
5 * NASA AMES Research Center.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice immediately at the beginning of the file, without modification,
13 * this list of conditions, and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
24 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33 /*
34 * KFTIA and KFTHA Bus Adapter Node for I/O hoses
35 * found on AlphaServer 8200 and 8400 systems.
36 *
37 * i.e., handler for all TLSB I/O nodes.
38 */
39
40 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */
41
42 __KERNEL_RCSID(0, "$NetBSD: kftxx.c,v 1.13 2007/03/04 05:59:12 christos Exp $");
43
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/device.h>
47 #include <sys/malloc.h>
48
49 #include <machine/autoconf.h>
50 #include <machine/rpb.h>
51 #include <machine/pte.h>
52
53 #include <alpha/tlsb/tlsbreg.h>
54 #include <alpha/tlsb/tlsbvar.h>
55 #include <alpha/tlsb/kftxxreg.h>
56 #include <alpha/tlsb/kftxxvar.h>
57 #include <alpha/pci/dwlpxvar.h>
58
59 struct kft_softc {
60 struct device sc_dev;
61 int sc_node; /* TLSB node */
62 u_int16_t sc_dtype; /* device type */
63 };
64
65 #define KV(_addr) ((void *)ALPHA_PHYS_TO_K0SEG((_addr)))
66
67 static int kftmatch __P((struct device *, struct cfdata *, void *));
68 static void kftattach __P((struct device *, struct device *, void *));
69 CFATTACH_DECL(kft, sizeof(struct kft_softc),
70 kftmatch, kftattach, NULL, NULL);
71
72 static int kftprint __P((void *, const char *));
73
74 static int
75 kftprint(aux, pnp)
76 void *aux;
77 const char *pnp;
78 {
79 register struct kft_dev_attach_args *ka = aux;
80 if (pnp)
81 aprint_normal("%s at %s", ka->ka_name, pnp);
82 aprint_normal(" hose %d", ka->ka_hosenum);
83 return (UNCONF);
84 }
85
86 static int
87 kftmatch(parent, cf, aux)
88 struct device *parent;
89 struct cfdata *cf;
90 void *aux;
91 {
92 struct tlsb_dev_attach_args *ta = aux;
93 if (TLDEV_ISIOPORT(ta->ta_dtype))
94 return (1);
95 return (0);
96 }
97
98 static void
99 kftattach(parent, self, aux)
100 struct device *parent;
101 struct device *self;
102 void *aux;
103 {
104 struct tlsb_dev_attach_args *ta = aux;
105 struct kft_softc *sc = (struct kft_softc *)self;
106 struct kft_dev_attach_args ka;
107 int hoseno;
108
109 sc->sc_node = ta->ta_node;
110 sc->sc_dtype = ta->ta_dtype;
111
112 printf("\n");
113
114 for (hoseno = 0; hoseno < MAXHOSE; hoseno++) {
115 u_int32_t value =
116 TLSB_GET_NODEREG(sc->sc_node, KFT_IDPNSEX(hoseno));
117 if (value & 0x0E000000) {
118 printf("%s: Hose %d IDPNSE has %x\n", self->dv_xname,
119 hoseno, value);
120 continue;
121 }
122 if ((value & 0x1) != 0x0) {
123 printf("%s: Hose %d has a Bad Cable (0x%x)\n",
124 self->dv_xname, hoseno, value);
125 continue;
126 }
127 if ((value & 0x6) != 0x6) {
128 if (value)
129 printf("%s: Hose %d is missing PWROK (0x%x)\n",
130 self->dv_xname, hoseno, value);
131 continue;
132 }
133 ka.ka_name = "dwlpx";
134 ka.ka_node = sc->sc_node;
135 ka.ka_dtype = sc->sc_dtype;
136 ka.ka_hosenum = hoseno;
137 config_found(self, &ka, kftprint);
138 }
139 }
140