grf_compat.c revision 1.4 1 /* $NetBSD: grf_compat.c,v 1.4 2000/06/26 04:55:46 simonb 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 <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/cdefs.h>
37 #include <sys/conf.h>
38 #include <sys/device.h>
39 #include <sys/errno.h>
40 #include <sys/ioctl.h>
41 #include <sys/malloc.h>
42 #include <sys/mman.h>
43 #include <sys/proc.h>
44 #include <sys/resourcevar.h>
45 #include <sys/vnode.h>
46
47 #include <machine/autoconf.h>
48 #include <machine/bus.h>
49 #include <machine/grfioctl.h>
50
51 #include <mac68k/nubus/nubus.h>
52 #include <mac68k/dev/grfvar.h>
53 #include <mac68k/dev/macfbvar.h>
54
55 #include <miscfs/specfs/specdev.h>
56
57 #include <vm/vm.h>
58 #include <uvm/uvm_extern.h>
59 #include <uvm/uvm_map.h>
60
61 cdev_decl(grf);
62
63 void grf_scinit __P((struct grf_softc *, const char *, int));
64 void grf_init __P((int));
65 void grfattach __P((int));
66 int grfmap __P((dev_t, struct macfb_softc *, caddr_t *, struct proc *));
67 int grfunmap __P((dev_t, struct macfb_softc *, caddr_t, struct proc *));
68
69 /* Non-private for the benefit of libkvm. */
70 struct grf_softc *grf_softc;
71 int numgrf = 0;
72
73 /*
74 * Initialize a softc to sane defaults.
75 */
76 void
77 grf_scinit(sc, name, unit)
78 struct grf_softc *sc;
79 const char *name;
80 int unit;
81 {
82 memset(sc, 0, sizeof(struct grf_softc));
83 snprintf(sc->sc_xname, sizeof(sc->sc_xname), "%s%d", name, unit);
84 sc->mfb_sc = NULL;
85 }
86
87 /*
88 * (Re-)initialize the grf_softc block so that at least the requested
89 * number of elements has been allocated. If this results in more
90 * elements than we had prior to getting here, we initialize each of
91 * them to avoid problems down the road.
92 */
93 void
94 grf_init(n)
95 int n;
96 {
97 struct grf_softc *sc;
98 int i;
99
100 if (n >= numgrf) {
101 i = numgrf;
102 numgrf = n + 1;
103
104 if (grf_softc == NULL)
105 sc = (struct grf_softc *)
106 malloc(numgrf * sizeof(*sc),
107 M_DEVBUF, M_NOWAIT);
108 else
109 sc = (struct grf_softc *)
110 realloc(grf_softc, numgrf * sizeof(*sc),
111 M_DEVBUF, M_NOWAIT);
112 if (sc == NULL) {
113 printf("WARNING: no memory for grf emulation\n");
114 if (grf_softc != NULL)
115 free(grf_softc, M_DEVBUF);
116 return;
117 }
118 grf_softc = sc;
119
120 /* Initialize per-softc structures. */
121 while (i < numgrf) {
122 grf_scinit(&grf_softc[i], "grf", i);
123 i++;
124 }
125 }
126 }
127
128 /*
129 * Called by main() during pseudo-device attachment. If we had a
130 * way to configure additional grf devices later, this would actually
131 * allocate enough space for them. As it stands, it's nonsensical,
132 * so other than a basic sanity check we do nothing.
133 */
134 void
135 grfattach(n)
136 int n;
137 {
138 if (n <= 0) {
139 #ifdef DIAGNOSTIC
140 panic("grfattach: count <= 0");
141 #endif
142 return;
143 }
144
145 #if 0 /* XXX someday, if we implement a way to attach after autoconfig */
146 grf_init(n);
147 #endif
148 }
149
150 /*
151 * Called from macfb_attach() after setting up the frame buffer. Since
152 * there is a 1:1 correspondence between the macfb device and the grf
153 * device, the only bit of information we really need is the macfb_softc.
154 */
155 void
156 grf_attach(sc, unit)
157 struct macfb_softc *sc;
158 int unit;
159 {
160 grf_init(unit);
161
162 if (unit < numgrf)
163 grf_softc[unit].mfb_sc = sc;
164 }
165
166 /*
167 * Standard device ops
168 */
169 int
170 grfopen(dev, flag, mode, p)
171 dev_t dev;
172 int flag;
173 int mode;
174 struct proc *p;
175 {
176 struct grf_softc *sc;
177 int unit = GRFUNIT(dev);
178 int rv = 0;
179
180 if (grf_softc == NULL || unit >= numgrf)
181 return ENXIO;
182
183 sc = &grf_softc[unit];
184 if (sc->mfb_sc == NULL)
185 rv = ENXIO;
186
187 return rv;
188 }
189
190 int
191 grfclose(dev, flag, mode, p)
192 dev_t dev;
193 int flag;
194 int mode;
195 struct proc *p;
196 {
197 struct grf_softc *sc;
198 int unit = GRFUNIT(dev);
199 int rv = 0;
200
201 if (grf_softc == NULL || unit >= numgrf)
202 return ENXIO;
203
204 sc = &grf_softc[unit];
205 if (sc->mfb_sc != NULL)
206 macfb_clear(sc->mfb_sc->sc_dc); /* clear the display */
207 else
208 rv = ENXIO;
209
210 return rv;
211 }
212
213 int
214 grfread(dev, uio, ioflag)
215 dev_t dev;
216 struct uio *uio;
217 int ioflag;
218 {
219 return ENXIO;
220 }
221
222 int
223 grfwrite(dev, uio, ioflag)
224 dev_t dev;
225 struct uio *uio;
226 int ioflag;
227 {
228 return ENXIO;
229 }
230
231 int
232 grfioctl(dev, cmd, data, flag, p)
233 dev_t dev;
234 u_long cmd;
235 caddr_t data;
236 int flag;
237 struct proc *p;
238 {
239 struct grf_softc *sc;
240 struct macfb_devconfig *dc;
241 #if defined(GRF_COMPAT) || (NGRF > 0)
242 struct grfinfo *gd;
243 #endif /* GRF_COMPAT || (NGRF > 0) */
244 struct grfmode *gm;
245 int unit = GRFUNIT(dev);
246 int rv;
247
248 if (grf_softc == NULL || unit >= numgrf)
249 return ENXIO;
250
251 sc = &grf_softc[unit];
252 if (sc->mfb_sc == NULL)
253 return ENXIO;
254
255 dc = sc->mfb_sc->sc_dc;
256
257 switch (cmd) {
258 #if defined(GRF_COMPAT) || (NGRF > 0)
259 case GRFIOCGINFO:
260 gd = (struct grfinfo *)data;
261 memset(gd, 0, sizeof(struct grfinfo));
262 gd->gd_fbaddr = (caddr_t)dc->dc_paddr;
263 gd->gd_fbsize = dc->dc_size;
264 gd->gd_colors = (short)(1 << dc->dc_depth);
265 gd->gd_planes = (short)dc->dc_depth;
266 gd->gd_fbwidth = dc->dc_wid;
267 gd->gd_fbheight = dc->dc_ht;
268 gd->gd_fbrowbytes = dc->dc_rowbytes;
269 gd->gd_dwidth = dc->dc_raster.width;
270 gd->gd_dheight = dc->dc_raster.height;
271 rv = 0;
272 break;
273 #endif /* GRF_COMPAT || (NGRF > 0) */
274
275 case GRFIOCON:
276 case GRFIOCOFF:
277 /* Nothing to do */
278 rv = 0;
279 break;
280
281 #if defined(GRF_COMPAT) || (NGRF > 0)
282 case GRFIOCMAP:
283 rv = grfmap(dev, sc->mfb_sc, (caddr_t *)data, p);
284 break;
285
286 case GRFIOCUNMAP:
287 rv = grfunmap(dev, sc->mfb_sc, *(caddr_t *)data, p);
288 break;
289 #endif /* GRF_COMPAT || (NGRF > 0) */
290
291 case GRFIOCGMODE:
292 gm = (struct grfmode *)data;
293 memset(gm, 0, sizeof(struct grfmode));
294 gm->fbbase = (char *)dc->dc_vaddr;
295 gm->fbsize = dc->dc_size;
296 gm->fboff = dc->dc_offset;
297 gm->rowbytes = dc->dc_rowbytes;
298 gm->width = dc->dc_wid;
299 gm->height = dc->dc_ht;
300 gm->psize = dc->dc_depth;
301 rv = 0;
302 break;
303
304 case GRFIOCLISTMODES:
305 case GRFIOCGETMODE:
306 case GRFIOCSETMODE:
307 /* NONE of these operations are (officially) supported. */
308 default:
309 rv = EINVAL;
310 break;
311 }
312 return rv;
313 }
314
315 int
316 grfpoll(dev, events, p)
317 dev_t dev;
318 int events;
319 struct proc *p;
320 {
321 return EINVAL;
322 }
323
324 paddr_t
325 grfmmap(dev, off, prot)
326 dev_t dev;
327 off_t off;
328 int prot;
329 {
330 struct grf_softc *sc;
331 struct macfb_devconfig *dc;
332 paddr_t addr;
333 int unit = GRFUNIT(dev);
334
335 if (grf_softc == NULL || unit >= numgrf)
336 return ENXIO;
337
338 sc = &grf_softc[unit];
339 if (sc->mfb_sc == NULL)
340 return ENXIO;
341
342 dc = sc->mfb_sc->sc_dc;
343
344 if (off >= 0 &&
345 off < m68k_round_page(dc->dc_offset + dc->dc_size))
346 addr = m68k_btop(dc->dc_paddr + off);
347 else
348 addr = (-1); /* XXX bogus */
349
350 return addr;
351 }
352
353 int
354 grfmap(dev, sc, addrp, p)
355 dev_t dev;
356 struct macfb_softc *sc;
357 caddr_t *addrp;
358 struct proc *p;
359 {
360 struct specinfo si;
361 struct vnode vn;
362 u_long len;
363 int error, flags;
364
365 *addrp = (caddr_t)sc->sc_dc->dc_paddr;
366 len = m68k_round_page(sc->sc_dc->dc_offset + sc->sc_dc->dc_size);
367 flags = MAP_SHARED | MAP_FIXED;
368
369 vn.v_type = VCHR; /* XXX */
370 vn.v_specinfo = &si; /* XXX */
371 vn.v_rdev = dev; /* XXX */
372
373 error = uvm_mmap(&p->p_vmspace->vm_map, (vaddr_t *)addrp,
374 (vsize_t)len, VM_PROT_ALL, VM_PROT_ALL,
375 flags, (caddr_t)&vn, 0, p->p_rlimit[RLIMIT_MEMLOCK].rlim_cur);
376
377 /* Offset into page: */
378 *addrp += sc->sc_dc->dc_offset;
379
380 return (error);
381 }
382
383 int
384 grfunmap(dev, sc, addr, p)
385 dev_t dev;
386 struct macfb_softc *sc;
387 caddr_t addr;
388 struct proc *p;
389 {
390 vm_size_t size;
391 int rv;
392
393 addr -= sc->sc_dc->dc_offset;
394
395 if (addr <= 0)
396 return (-1);
397
398 size = m68k_round_page(sc->sc_dc->dc_offset + sc->sc_dc->dc_size);
399
400 rv = uvm_unmap(&p->p_vmspace->vm_map, (vaddr_t)addr,
401 (vaddr_t)addr + size);
402
403 return (rv == KERN_SUCCESS ? 0 : EINVAL);
404 }
405