xref: /netbsd/sys/arch/amiga/dev/ioblix_zbus.c (revision c4a72b64)
1 /*	$NetBSD: ioblix_zbus.c,v 1.9 2002/10/02 04:55:51 thorpej Exp $ */
2 
3 /*-
4  * Copyright (c) 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Ignatios Souvatzis.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *        This product includes software developed by the NetBSD
21  *        Foundation, Inc. and its contributors.
22  * 4. Neither the name of The NetBSD Foundation nor the names of its
23  *    contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  */
38 
39 #include <sys/cdefs.h>
40 __KERNEL_RCSID(0, "$NetBSD: ioblix_zbus.c,v 1.9 2002/10/02 04:55:51 thorpej Exp $");
41 
42 /* IOBlix Zorro driver */
43 /* XXX to be done: we need to probe the com clock speed! */
44 
45 #include <sys/types.h>
46 
47 #include <sys/conf.h>
48 #include <sys/device.h>
49 #include <sys/systm.h>
50 #include <sys/param.h>
51 
52 #include <machine/bus.h>
53 
54 #include <amiga/include/cpu.h>
55 
56 #include <amiga/amiga/device.h>
57 #include <amiga/amiga/drcustom.h>
58 
59 #include <amiga/dev/supio.h>
60 #include <amiga/dev/zbusvar.h>
61 
62 
63 struct iobz_softc {
64 	struct device sc_dev;
65 	struct bus_space_tag sc_bst;
66 };
67 
68 int iobzmatch(struct device *, struct cfdata *, void *);
69 void iobzattach(struct device *, struct device *, void *);
70 int iobzprint(void *auxp, const char *);
71 void iobz_shutdown(void *);
72 
73 CFATTACH_DECL(iobl_zbus, sizeof(struct iobz_softc),
74     iobzmatch, iobzattach, NULL, NULL);
75 
76 int
77 iobzmatch(struct device *parent, struct cfdata *cfp, void *auxp)
78 {
79 
80 	struct zbus_args *zap;
81 
82 	zap = auxp;
83 
84 	if (zap->manid != 4711)
85 		return (0);
86 
87 	if (zap->prodid != 1)
88 		return (0);
89 
90 	return (1);
91 }
92 
93 struct iobz_devs {
94 	char *name;
95 	unsigned off;
96 	int arg;
97 } iobzdevices[] = {
98 	{ "com", 0x100, 24000000 },	/* XXX see below */
99 	{ "com", 0x108, 24000000 },
100 	{ "com", 0x110, 24000000 },
101 	{ "com", 0x118, 24000000 },
102 	{ "lpt", 0x200, 0 },
103 	{ "lpt", 0x300, 0 },
104 	{ 0, 0, 0}
105 };
106 
107 #ifndef IOBZCLOCK
108 #define IOBZCLOCK 22118400;
109 #endif
110 int iobzclock = IOBZCLOCK;		/* patchable! */
111 
112 void
113 iobzattach(struct device *parent, struct device *self, void *auxp)
114 {
115 	struct iobz_softc *iobzsc;
116 	struct iobz_devs  *iobzd;
117 	struct zbus_args *zap;
118 	struct supio_attach_args supa;
119 	extern const struct amiga_bus_space_methods amiga_bus_stride_16;
120 	volatile u_int8_t *p;
121 
122 
123 	iobzsc = (struct iobz_softc *)self;
124 	zap = auxp;
125 
126 	if (parent)
127 		printf("\n");
128 
129 	iobzsc->sc_bst.base = (u_long)zap->va;
130 	iobzsc->sc_bst.absm = &amiga_bus_stride_16;
131 
132 	supa.supio_iot = &iobzsc->sc_bst;
133 	supa.supio_ipl = 6;
134 
135 	iobzd = iobzdevices;
136 
137 	while (iobzd->name) {
138 		supa.supio_name = iobzd->name;
139 		supa.supio_iobase = iobzd->off;
140 		supa.supio_arg = iobzclock /* XXX iobzd->arg */;
141 		config_found(self, &supa, iobzprint); /* XXX */
142 		++iobzd;
143 	}
144 
145 	p = (volatile u_int8_t *)zap->va + 2;
146 	(void)shutdownhook_establish(iobz_shutdown, (void *)p);
147 	*p = ((*p) & 0x1F) | 0x80;
148 }
149 
150 int
151 iobzprint(void *auxp, const char *pnp)
152 {
153 	struct supio_attach_args *supa;
154 	supa = auxp;
155 
156 	if (pnp == NULL)
157 		return(QUIET);
158 
159 	printf("%s at %s port 0x%02x",
160 	    supa->supio_name, pnp, supa->supio_iobase);
161 
162 	return(UNCONF);
163 }
164 
165 /*
166  * Disable board interupts at shutdown time.
167  */
168 
169 void
170 iobz_shutdown(void *p) {
171 	volatile int8_t *q;
172 
173 	q = p;
174 
175 	*q &= 0x1F;
176 }
177