xref: /netbsd-src/sys/arch/mac68k/dev/grf_compat.c (revision f89f6560d453f5e37386cc7938c072d2f528b9fa)
1 /*	$NetBSD: grf_compat.c,v 1.27 2014/12/14 23:48:58 chs Exp $	*/
2 
3 /*
4  * Copyright (C) 1999 Scott Reynolds
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 /*
31  * macfb compatibility with legacy grf devices
32  */
33 
34 #include "opt_grf_compat.h"
35 
36 #include <sys/cdefs.h>
37 __KERNEL_RCSID(0, "$NetBSD: grf_compat.c,v 1.27 2014/12/14 23:48:58 chs Exp $");
38 
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/conf.h>
42 #include <sys/device.h>
43 #include <sys/errno.h>
44 #include <sys/ioctl.h>
45 #include <sys/malloc.h>
46 #include <sys/proc.h>
47 #include <sys/resourcevar.h>
48 
49 #include <machine/bus.h>
50 #include <machine/grfioctl.h>
51 
52 #include <mac68k/nubus/nubus.h>
53 #include <mac68k/dev/grfvar.h>
54 #include <mac68k/dev/macfbvar.h>
55 
56 #include <miscfs/specfs/specdev.h>
57 
58 #include <uvm/uvm_extern.h>
59 
60 dev_type_open(grfopen);
61 dev_type_close(grfclose);
62 dev_type_ioctl(grfioctl);
63 dev_type_mmap(grfmmap);
64 
65 const struct cdevsw grf_cdevsw = {
66 	.d_open = grfopen,
67 	.d_close = grfclose,
68 	.d_read = noread,
69 	.d_write = nowrite,
70 	.d_ioctl = grfioctl,
71 	.d_stop = nostop,
72 	.d_tty = notty,
73 	.d_poll = nopoll,
74 	.d_mmap = grfmmap,
75 	.d_kqfilter = nokqfilter,
76 	.d_discard = nodiscard,
77 	.d_flag = 0
78 };
79 
80 void	grf_scinit(struct grf_softc *, const char *, int);
81 void	grf_init(int);
82 void	grfattach(int);
83 int	grfmap(dev_t, struct macfb_softc *, void **, struct proc *);
84 int	grfunmap(dev_t, struct macfb_softc *, void *, struct proc *);
85 
86 /* Non-private for the benefit of libkvm. */
87 struct	grf_softc *grf_softc;
88 int	numgrf = 0;
89 
90 /*
91  * Initialize a softc to sane defaults.
92  */
93 void
94 grf_scinit(struct grf_softc *sc, const char *name, int unit)
95 {
96 	memset(sc, 0, sizeof(struct grf_softc));
97 	snprintf(sc->sc_xname, sizeof(sc->sc_xname), "%s%d", name, unit);
98 	sc->mfb_sc = NULL;
99 }
100 
101 /*
102  * (Re-)initialize the grf_softc block so that at least the requested
103  * number of elements has been allocated.  If this results in more
104  * elements than we had prior to getting here, we initialize each of
105  * them to avoid problems down the road.
106  */
107 void
108 grf_init(int n)
109 {
110 	struct grf_softc *sc;
111 	int i;
112 
113 	if (n >= numgrf) {
114 		i = numgrf;
115 		numgrf = n + 1;
116 
117 		if (grf_softc == NULL)
118 			sc = (struct grf_softc *)
119 			    malloc(numgrf * sizeof(*sc),
120 			    M_DEVBUF, M_NOWAIT);
121 		else
122 			sc = (struct grf_softc *)
123 			    realloc(grf_softc, numgrf * sizeof(*sc),
124 			    M_DEVBUF, M_NOWAIT);
125 		if (sc == NULL) {
126 			printf("WARNING: no memory for grf emulation\n");
127 			if (grf_softc != NULL)
128 				free(grf_softc, M_DEVBUF);
129 			return;
130 		}
131 		grf_softc = sc;
132 
133 		/* Initialize per-softc structures. */
134 		while (i < numgrf) {
135 			grf_scinit(&grf_softc[i], "grf", i);
136 			i++;
137 		}
138 	}
139 }
140 
141 /*
142  * Called by main() during pseudo-device attachment.  If we had a
143  * way to configure additional grf devices later, this would actually
144  * allocate enough space for them.  As it stands, it's nonsensical,
145  * so other than a basic sanity check we do nothing.
146  */
147 void
148 grfattach(int n)
149 {
150 	if (n <= 0) {
151 #ifdef DIAGNOSTIC
152 		panic("grfattach: count <= 0");
153 #endif
154 		return;
155 	}
156 
157 #if 0 /* XXX someday, if we implement a way to attach after autoconfig */
158 	grf_init(n);
159 #endif
160 }
161 
162 /*
163  * Called from macfb_attach() after setting up the frame buffer.  Since
164  * there is a 1:1 correspondence between the macfb device and the grf
165  * device, the only bit of information we really need is the macfb_softc.
166  */
167 void
168 grf_attach(struct macfb_softc *sc, int unit)
169 {
170 
171 	grf_init(unit);
172 	if (unit < numgrf)
173 		grf_softc[unit].mfb_sc = sc;
174 }
175 
176 /*
177  * Standard device ops
178  */
179 int
180 grfopen(dev_t dev, int flag, int mode, struct lwp *l)
181 {
182 	struct grf_softc *sc;
183 	int unit = GRFUNIT(dev);
184 	int rv = 0;
185 
186 	if (grf_softc == NULL || unit >= numgrf)
187 		return ENXIO;
188 
189 	sc = &grf_softc[unit];
190 	if (sc->mfb_sc == NULL)
191 		rv = ENXIO;
192 
193 	return rv;
194 }
195 
196 int
197 grfclose(dev_t dev, int flag, int mode, struct lwp *l)
198 {
199 	struct grf_softc *sc;
200 	int unit = GRFUNIT(dev);
201 	int rv = 0;
202 
203 	if (grf_softc == NULL || unit >= numgrf)
204 		return ENXIO;
205 
206 	sc = &grf_softc[unit];
207 	if (sc->mfb_sc != NULL)
208 		macfb_clear(sc->mfb_sc->sc_dc);	/* clear the display */
209 	else
210 		rv = ENXIO;
211 
212 	return rv;
213 }
214 
215 int
216 grfioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
217 {
218 	struct grf_softc *sc;
219 	struct macfb_devconfig *dc;
220 #if defined(GRF_COMPAT) || (NGRF > 0)
221 	struct grfinfo *gd;
222 #endif /* GRF_COMPAT || (NGRF > 0) */
223 	struct grfmode *gm;
224 	int unit = GRFUNIT(dev);
225 	int rv;
226 
227 	if (grf_softc == NULL || unit >= numgrf)
228 		return ENXIO;
229 
230 	sc = &grf_softc[unit];
231 	if (sc->mfb_sc == NULL)
232 		return ENXIO;
233 
234 	dc = sc->mfb_sc->sc_dc;
235 
236 	switch (cmd) {
237 #if defined(GRF_COMPAT) || (NGRF > 0)
238 	case GRFIOCGINFO:
239 		gd = (struct grfinfo *)data;
240 		memset(gd, 0, sizeof(struct grfinfo));
241 		gd->gd_fbaddr     = (void *)dc->dc_paddr;
242 		gd->gd_fbsize     = dc->dc_size;
243 		gd->gd_colors     = (short)(1 << dc->dc_depth);
244 		gd->gd_planes     = (short)dc->dc_depth;
245 		gd->gd_fbwidth    = dc->dc_wid;
246 		gd->gd_fbheight   = dc->dc_ht;
247 		gd->gd_fbrowbytes = dc->dc_rowbytes;
248 		gd->gd_dwidth     = dc->dc_raster.width;
249 		gd->gd_dheight    = dc->dc_raster.height;
250 		rv = 0;
251 		break;
252 #endif /* GRF_COMPAT || (NGRF > 0) */
253 
254 	case GRFIOCON:
255 	case GRFIOCOFF:
256 		/* Nothing to do */
257 		rv = 0;
258 		break;
259 
260 #if defined(GRF_COMPAT) || (NGRF > 0)
261 	case GRFIOCMAP:
262 		rv = grfmap(dev, sc->mfb_sc, (void **)data, l->l_proc);
263 		break;
264 
265 	case GRFIOCUNMAP:
266 		rv = grfunmap(dev, sc->mfb_sc, *(void **)data, l->l_proc);
267 		break;
268 #endif /* GRF_COMPAT || (NGRF > 0) */
269 
270 	case GRFIOCGMODE:
271 		gm = (struct grfmode *)data;
272 		memset(gm, 0, sizeof(struct grfmode));
273 		gm->fbbase   = (char *)dc->dc_vaddr;
274 		gm->fbsize   = dc->dc_size;
275 		gm->fboff    = dc->dc_offset;
276 		gm->rowbytes = dc->dc_rowbytes;
277 		gm->width    = dc->dc_wid;
278 		gm->height   = dc->dc_ht;
279 		gm->psize    = dc->dc_depth;
280 		rv = 0;
281 		break;
282 
283 	case GRFIOCLISTMODES:
284 	case GRFIOCGETMODE:
285 	case GRFIOCSETMODE:
286 		/* NONE of these operations are (officially) supported. */
287 	default:
288 		rv = EINVAL;
289 		break;
290 	}
291 	return rv;
292 }
293 
294 paddr_t
295 grfmmap(dev_t dev, off_t off, int prot)
296 {
297 	struct grf_softc *sc;
298 	struct macfb_devconfig *dc;
299 	int unit = GRFUNIT(dev);
300 
301 	if (grf_softc == NULL || unit >= numgrf)
302 		return ENXIO;
303 
304 	sc = &grf_softc[unit];
305 	if (sc->mfb_sc == NULL)
306 		return ENXIO;
307 
308 	dc = sc->mfb_sc->sc_dc;
309 
310 	if ((u_int)off < m68k_round_page(dc->dc_offset + dc->dc_size))
311 		return m68k_btop(dc->dc_paddr + off);
312 
313 	return (-1);
314 }
315 
316 int
317 grfmap(dev_t dev, struct macfb_softc *sc, void **addrp, struct proc *p)
318 {
319 	size_t len;
320 	int error;
321 
322 	len = m68k_round_page(sc->sc_dc->dc_offset + sc->sc_dc->dc_size);
323 	error = uvm_mmap_dev(p, addrp, len, dev, 0);
324 
325 	/* Offset into page: */
326 	*addrp = (char *)*addrp + sc->sc_dc->dc_offset;
327 
328 	return (error);
329 }
330 
331 int
332 grfunmap(dev_t dev, struct macfb_softc *sc, void *addr, struct proc *p)
333 {
334 	size_t size;
335 
336 	addr = (char *)addr - sc->sc_dc->dc_offset;
337 
338 	if (addr <= 0)
339 		return (-1);
340 
341 	size = m68k_round_page(sc->sc_dc->dc_offset + sc->sc_dc->dc_size);
342 	uvm_unmap(&p->p_vmspace->vm_map, (vaddr_t)addr, (vaddr_t)addr + size);
343 	return 0;
344 }
345