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