1 /* $NetBSD: kftxx.c,v 1.19 2021/08/07 16:18:41 thorpej 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.19 2021/08/07 16:18:41 thorpej Exp $");
43
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/device.h>
47
48 #include <machine/autoconf.h>
49 #include <machine/rpb.h>
50 #include <machine/pte.h>
51
52 #include <alpha/tlsb/tlsbreg.h>
53 #include <alpha/tlsb/tlsbvar.h>
54 #include <alpha/tlsb/kftxxreg.h>
55 #include <alpha/tlsb/kftxxvar.h>
56 #include <alpha/pci/dwlpxvar.h>
57
58 struct kft_softc {
59 device_t sc_dev;
60 int sc_node; /* TLSB node */
61 uint16_t sc_dtype; /* device type */
62 };
63
64 #define KV(_addr) ((void *)ALPHA_PHYS_TO_K0SEG((_addr)))
65
66 static int kftmatch(device_t, cfdata_t, void *);
67 static void kftattach(device_t, device_t, void *);
68
69 CFATTACH_DECL_NEW(kft, sizeof(struct kft_softc),
70 kftmatch, kftattach, NULL, NULL);
71
72 static int kftprint(void *, const char *);
73
74 static int
kftprint(void * aux,const char * pnp)75 kftprint(void *aux, const char *pnp)
76 {
77 register struct kft_dev_attach_args *ka = aux;
78 if (pnp)
79 aprint_normal("%s at %s", ka->ka_name, pnp);
80 aprint_normal(" hose %d", ka->ka_hosenum);
81 return (UNCONF);
82 }
83
84 static int
kftmatch(device_t parent,cfdata_t cf,void * aux)85 kftmatch(device_t parent, cfdata_t cf, void *aux)
86 {
87 struct tlsb_dev_attach_args *ta = aux;
88 if (TLDEV_ISIOPORT(ta->ta_dtype))
89 return (1);
90 return (0);
91 }
92
93 static void
kftattach(device_t parent,device_t self,void * aux)94 kftattach(device_t parent, device_t self, void *aux)
95 {
96 struct tlsb_dev_attach_args *ta = aux;
97 struct kft_softc *sc = device_private(self);
98 struct kft_dev_attach_args ka;
99 int hoseno;
100
101 sc->sc_dev = self;
102 sc->sc_node = ta->ta_node;
103 sc->sc_dtype = ta->ta_dtype;
104
105 aprint_normal("\n");
106
107 for (hoseno = 0; hoseno < MAXHOSE; hoseno++) {
108 uint32_t value =
109 TLSB_GET_NODEREG(sc->sc_node, KFT_IDPNSEX(hoseno));
110 if (value & 0x0E000000) {
111 aprint_error_dev(self, "Hose %d IDPNSE has %x\n",
112 hoseno, value);
113 continue;
114 }
115 if ((value & 0x1) != 0x0) {
116 aprint_error_dev(self,
117 "Hose %d has a Bad Cable (0x%x)\n", hoseno, value);
118 continue;
119 }
120 if ((value & 0x6) != 0x6) {
121 if (value)
122 aprint_error_dev(self,
123 "Hose %d is missing PWROK (0x%x)\n",
124 hoseno, value);
125 continue;
126 }
127 ka.ka_name = "dwlpx";
128 ka.ka_node = sc->sc_node;
129 ka.ka_dtype = sc->sc_dtype;
130 ka.ka_hosenum = hoseno;
131 config_found(self, &ka, kftprint, CFARGS_NONE);
132 }
133 }
134