grf.c revision 1.20 1 1.20 leo /* $NetBSD: grf.c,v 1.20 1997/04/25 19:25:38 leo Exp $ */
2 1.1 leo
3 1.1 leo /*
4 1.1 leo * Copyright (c) 1995 Leo Weppelman
5 1.1 leo * Copyright (c) 1988 University of Utah.
6 1.1 leo * Copyright (c) 1990 The Regents of the University of California.
7 1.1 leo * All rights reserved.
8 1.1 leo *
9 1.1 leo * This code is derived from software contributed to Berkeley by
10 1.1 leo * the Systems Programming Group of the University of Utah Computer
11 1.1 leo * Science Department.
12 1.1 leo *
13 1.1 leo * Redistribution and use in source and binary forms, with or without
14 1.1 leo * modification, are permitted provided that the following conditions
15 1.1 leo * are met:
16 1.1 leo * 1. Redistributions of source code must retain the above copyright
17 1.1 leo * notice, this list of conditions and the following disclaimer.
18 1.1 leo * 2. Redistributions in binary form must reproduce the above copyright
19 1.1 leo * notice, this list of conditions and the following disclaimer in the
20 1.1 leo * documentation and/or other materials provided with the distribution.
21 1.1 leo * 3. All advertising materials mentioning features or use of this software
22 1.1 leo * must display the following acknowledgement:
23 1.1 leo * This product includes software developed by the University of
24 1.1 leo * California, Berkeley and its contributors.
25 1.1 leo * 4. Neither the name of the University nor the names of its contributors
26 1.1 leo * may be used to endorse or promote products derived from this software
27 1.1 leo * without specific prior written permission.
28 1.1 leo *
29 1.1 leo * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
30 1.1 leo * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
31 1.1 leo * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
32 1.1 leo * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
33 1.1 leo * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
34 1.1 leo * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
35 1.1 leo * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36 1.1 leo * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
37 1.1 leo * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
38 1.1 leo * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 1.1 leo * SUCH DAMAGE.
40 1.1 leo *
41 1.1 leo * from: Utah $Hdr: grf.c 1.31 91/01/21$
42 1.1 leo *
43 1.1 leo * @(#)grf.c 7.8 (Berkeley) 5/7/91
44 1.1 leo */
45 1.1 leo
46 1.1 leo /*
47 1.1 leo * Graphics display driver for the Atari
48 1.1 leo * This is the hardware-independent portion of the driver.
49 1.1 leo * Hardware access is through the grf_softc->g_mode routine.
50 1.1 leo */
51 1.1 leo
52 1.1 leo #include <sys/param.h>
53 1.1 leo #include <sys/proc.h>
54 1.1 leo #include <sys/ioctl.h>
55 1.1 leo #include <sys/device.h>
56 1.1 leo #include <sys/file.h>
57 1.1 leo #include <sys/malloc.h>
58 1.1 leo #include <sys/conf.h>
59 1.1 leo #include <sys/systm.h>
60 1.1 leo #include <sys/vnode.h>
61 1.1 leo #include <sys/mman.h>
62 1.13 leo #include <sys/poll.h>
63 1.1 leo #include <vm/vm.h>
64 1.1 leo #include <vm/vm_kern.h>
65 1.1 leo #include <vm/vm_page.h>
66 1.1 leo #include <vm/vm_pager.h>
67 1.1 leo #include <machine/cpu.h>
68 1.1 leo #include <atari/atari/device.h>
69 1.1 leo #include <atari/dev/grfioctl.h>
70 1.1 leo #include <atari/dev/grfabs_reg.h>
71 1.1 leo #include <atari/dev/grfvar.h>
72 1.1 leo #include <atari/dev/itevar.h>
73 1.1 leo #include <atari/dev/viewioctl.h>
74 1.1 leo #include <atari/dev/viewvar.h>
75 1.1 leo
76 1.12 leo #include "grfcc.h"
77 1.12 leo #include "grfet.h"
78 1.12 leo #define NGRF (NGRFCC + NGRFET)
79 1.12 leo
80 1.1 leo #if NGRF > 0
81 1.1 leo
82 1.1 leo #include "ite.h"
83 1.1 leo #if NITE == 0
84 1.1 leo #define ite_on(u,f)
85 1.1 leo #define ite_off(u,f)
86 1.1 leo #define ite_reinit(d)
87 1.1 leo #endif
88 1.1 leo
89 1.1 leo int grfon __P((dev_t));
90 1.1 leo int grfoff __P((dev_t));
91 1.1 leo int grfsinfo __P((dev_t, struct grfdyninfo *));
92 1.1 leo #ifdef BANKEDDEVPAGER
93 1.1 leo int grfbanked_get __P((dev_t, off_t, int));
94 1.1 leo int grfbanked_cur __P((dev_t));
95 1.1 leo int grfbanked_set __P((dev_t, int));
96 1.1 leo #endif
97 1.1 leo
98 1.11 cgd int grfbusprint __P((void *auxp, const char *));
99 1.17 leo int grfbusmatch __P((struct device *, struct cfdata *, void *));
100 1.1 leo void grfbusattach __P((struct device *, struct device *, void *));
101 1.1 leo
102 1.1 leo /*
103 1.1 leo * pointers to grf drivers device structs
104 1.1 leo */
105 1.12 leo struct grf_softc *grfsp[NGRF]; /* XXX */
106 1.1 leo
107 1.8 thorpej struct cfattach grfbus_ca = {
108 1.8 thorpej sizeof(struct device), grfbusmatch, grfbusattach
109 1.8 thorpej };
110 1.8 thorpej
111 1.8 thorpej struct cfdriver grfbus_cd = {
112 1.9 leo NULL, "grfbus", DV_DULL
113 1.8 thorpej };
114 1.1 leo
115 1.1 leo /*
116 1.1 leo * only used in console init.
117 1.1 leo */
118 1.1 leo static struct cfdata *cfdata_gbus = NULL;
119 1.1 leo
120 1.1 leo int
121 1.17 leo grfbusmatch(pdp, cfp, auxp)
122 1.1 leo struct device *pdp;
123 1.17 leo struct cfdata *cfp;
124 1.17 leo void *auxp;
125 1.1 leo {
126 1.8 thorpej if(strcmp(auxp, grfbus_cd.cd_name))
127 1.1 leo return(0);
128 1.1 leo
129 1.12 leo if(atari_realconfig == 0)
130 1.12 leo cfdata_gbus = cfp;
131 1.1 leo return(1); /* Always there */
132 1.1 leo }
133 1.1 leo
134 1.1 leo void
135 1.1 leo grfbusattach(pdp, dp, auxp)
136 1.1 leo struct device *pdp, *dp;
137 1.1 leo void *auxp;
138 1.1 leo {
139 1.12 leo grf_auxp_t grf_auxp;
140 1.12 leo
141 1.12 leo grf_auxp.busprint = grfbusprint;
142 1.12 leo grf_auxp.from_bus_match = 1;
143 1.1 leo
144 1.12 leo if(dp == NULL) /* Console init */
145 1.12 leo atari_config_found(cfdata_gbus, NULL, (void*)&grf_auxp, grfbusprint);
146 1.12 leo else {
147 1.16 christos printf("\n");
148 1.12 leo config_found(dp, (void*)&grf_auxp, grfbusprint);
149 1.12 leo }
150 1.1 leo }
151 1.1 leo
152 1.1 leo int
153 1.1 leo grfbusprint(auxp, name)
154 1.12 leo void *auxp;
155 1.12 leo const char *name;
156 1.1 leo {
157 1.1 leo if(name == NULL)
158 1.1 leo return(UNCONF);
159 1.1 leo return(QUIET);
160 1.1 leo }
161 1.1 leo
162 1.1 leo /*ARGSUSED*/
163 1.1 leo int
164 1.1 leo grfopen(dev, flags, devtype, p)
165 1.1 leo dev_t dev;
166 1.1 leo int flags, devtype;
167 1.1 leo struct proc *p;
168 1.1 leo {
169 1.1 leo struct grf_softc *gp;
170 1.1 leo
171 1.1 leo if (GRFUNIT(dev) >= NGRF)
172 1.1 leo return(ENXIO);
173 1.1 leo
174 1.1 leo gp = grfsp[GRFUNIT(dev)];
175 1.19 leo if (gp == NULL)
176 1.19 leo return(ENXIO);
177 1.1 leo
178 1.1 leo if ((gp->g_flags & GF_ALIVE) == 0)
179 1.1 leo return(ENXIO);
180 1.1 leo
181 1.1 leo if ((gp->g_flags & (GF_OPEN|GF_EXCLUDE)) == (GF_OPEN|GF_EXCLUDE))
182 1.1 leo return(EBUSY);
183 1.6 leo grf_viewsync(gp);
184 1.1 leo
185 1.1 leo return(0);
186 1.1 leo }
187 1.1 leo
188 1.1 leo /*ARGSUSED*/
189 1.1 leo int
190 1.10 leo grfclose(dev, flags, mode, p)
191 1.10 leo dev_t dev;
192 1.10 leo int flags;
193 1.10 leo int mode;
194 1.10 leo struct proc *p;
195 1.1 leo {
196 1.1 leo struct grf_softc *gp;
197 1.1 leo
198 1.1 leo gp = grfsp[GRFUNIT(dev)];
199 1.1 leo (void)grfoff(dev);
200 1.1 leo gp->g_flags &= GF_ALIVE;
201 1.1 leo return(0);
202 1.1 leo }
203 1.1 leo
204 1.1 leo /*ARGSUSED*/
205 1.1 leo int
206 1.1 leo grfioctl(dev, cmd, data, flag, p)
207 1.1 leo dev_t dev;
208 1.1 leo u_long cmd;
209 1.1 leo int flag;
210 1.1 leo caddr_t data;
211 1.1 leo struct proc *p;
212 1.1 leo {
213 1.1 leo struct grf_softc *gp;
214 1.1 leo int error;
215 1.1 leo
216 1.1 leo gp = grfsp[GRFUNIT(dev)];
217 1.1 leo error = 0;
218 1.1 leo
219 1.1 leo switch (cmd) {
220 1.1 leo case OGRFIOCGINFO:
221 1.1 leo /* argl.. no bank-member.. */
222 1.1 leo bcopy((caddr_t)&gp->g_display, data, sizeof(struct grfinfo)-4);
223 1.1 leo break;
224 1.1 leo case GRFIOCGINFO:
225 1.1 leo bcopy((caddr_t)&gp->g_display, data, sizeof(struct grfinfo));
226 1.1 leo break;
227 1.1 leo case GRFIOCON:
228 1.1 leo error = grfon(dev);
229 1.1 leo break;
230 1.1 leo case GRFIOCOFF:
231 1.1 leo error = grfoff(dev);
232 1.1 leo break;
233 1.1 leo case GRFIOCSINFO:
234 1.1 leo error = grfsinfo(dev, (struct grfdyninfo *) data);
235 1.1 leo break;
236 1.1 leo case GRFGETVMODE:
237 1.7 leo return(gp->g_mode(gp, GM_GRFGETVMODE, data, 0, 0));
238 1.1 leo case GRFSETVMODE:
239 1.7 leo error = gp->g_mode(gp, GM_GRFSETVMODE, data, 0, 0);
240 1.1 leo if (error == 0 && gp->g_itedev)
241 1.1 leo ite_reinit(gp->g_itedev);
242 1.1 leo break;
243 1.1 leo case GRFGETNUMVM:
244 1.7 leo return(gp->g_mode(gp, GM_GRFGETNUMVM, data, 0, 0));
245 1.1 leo /*
246 1.1 leo * these are all hardware dependant, and have to be resolved
247 1.1 leo * in the respective driver.
248 1.1 leo */
249 1.1 leo case GRFIOCPUTCMAP:
250 1.1 leo case GRFIOCGETCMAP:
251 1.1 leo case GRFIOCSSPRITEPOS:
252 1.1 leo case GRFIOCGSPRITEPOS:
253 1.1 leo case GRFIOCSSPRITEINF:
254 1.1 leo case GRFIOCGSPRITEINF:
255 1.1 leo case GRFIOCGSPRITEMAX:
256 1.1 leo default:
257 1.1 leo /*
258 1.1 leo * check to see whether it's a command recognized by the
259 1.1 leo * view code.
260 1.1 leo */
261 1.4 leo return(viewioctl(gp->g_viewdev, cmd, data, flag, p));
262 1.1 leo error = EINVAL;
263 1.1 leo break;
264 1.1 leo
265 1.1 leo }
266 1.1 leo return(error);
267 1.1 leo }
268 1.1 leo
269 1.1 leo /*ARGSUSED*/
270 1.1 leo int
271 1.13 leo grfpoll(dev, events, p)
272 1.10 leo dev_t dev;
273 1.13 leo int events;
274 1.10 leo struct proc *p;
275 1.1 leo {
276 1.13 leo int revents = 0;
277 1.13 leo
278 1.13 leo if (events & (POLLOUT | POLLWRNORM))
279 1.13 leo revents |= events & (POLLOUT | POLLWRNORM);
280 1.13 leo return (revents);
281 1.1 leo }
282 1.1 leo
283 1.1 leo /*
284 1.1 leo * map the contents of a graphics display card into process'
285 1.1 leo * memory space.
286 1.1 leo */
287 1.1 leo int
288 1.2 mycroft grfmmap(dev, off, prot)
289 1.1 leo dev_t dev;
290 1.1 leo int off, prot;
291 1.1 leo {
292 1.5 leo struct grf_softc *gp;
293 1.5 leo struct grfinfo *gi;
294 1.5 leo
295 1.5 leo gp = grfsp[GRFUNIT(dev)];
296 1.5 leo gi = &gp->g_display;
297 1.18 leo
298 1.18 leo /*
299 1.18 leo * control registers
300 1.18 leo */
301 1.18 leo if (off >= 0 && off < gi->gd_regsize)
302 1.18 leo return(((u_int)gi->gd_regaddr + off) >> PGSHIFT);
303 1.5 leo
304 1.5 leo /*
305 1.5 leo * frame buffer
306 1.5 leo */
307 1.5 leo if ((off >= 0) && (off < gi->gd_fbsize))
308 1.5 leo return (((u_int)gi->gd_fbaddr + off) >> PGSHIFT);
309 1.5 leo return(-1);
310 1.1 leo }
311 1.1 leo
312 1.1 leo int
313 1.1 leo grfon(dev)
314 1.1 leo dev_t dev;
315 1.1 leo {
316 1.1 leo struct grf_softc *gp;
317 1.1 leo
318 1.1 leo gp = grfsp[GRFUNIT(dev)];
319 1.1 leo
320 1.1 leo if (gp->g_flags & GF_GRFON)
321 1.1 leo return(0);
322 1.1 leo
323 1.1 leo gp->g_flags |= GF_GRFON;
324 1.1 leo if (gp->g_itedev != NODEV)
325 1.1 leo ite_off(gp->g_itedev, 3);
326 1.1 leo
327 1.7 leo return(gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVON : GM_GRFON,
328 1.7 leo NULL, 0, 0));
329 1.1 leo }
330 1.1 leo
331 1.1 leo int
332 1.1 leo grfoff(dev)
333 1.1 leo dev_t dev;
334 1.1 leo {
335 1.1 leo struct grf_softc *gp;
336 1.1 leo int error;
337 1.1 leo
338 1.1 leo gp = grfsp[GRFUNIT(dev)];
339 1.1 leo
340 1.1 leo if ((gp->g_flags & GF_GRFON) == 0)
341 1.1 leo return(0);
342 1.1 leo
343 1.1 leo gp->g_flags &= ~GF_GRFON;
344 1.7 leo error = gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVOFF : GM_GRFOFF,
345 1.7 leo NULL, 0, 0);
346 1.1 leo
347 1.1 leo /*
348 1.1 leo * Closely tied together no X's
349 1.1 leo */
350 1.1 leo if (gp->g_itedev != NODEV)
351 1.1 leo ite_on(gp->g_itedev, 2);
352 1.1 leo
353 1.1 leo return(error);
354 1.1 leo }
355 1.1 leo
356 1.1 leo int
357 1.1 leo grfsinfo(dev, dyninfo)
358 1.1 leo dev_t dev;
359 1.1 leo struct grfdyninfo *dyninfo;
360 1.1 leo {
361 1.1 leo struct grf_softc *gp;
362 1.1 leo int error;
363 1.1 leo
364 1.1 leo gp = grfsp[GRFUNIT(dev)];
365 1.7 leo error = gp->g_mode(gp, GM_GRFCONFIG, dyninfo, 0, 0);
366 1.1 leo
367 1.1 leo /*
368 1.1 leo * Closely tied together no X's
369 1.1 leo */
370 1.1 leo if (gp->g_itedev != NODEV)
371 1.1 leo ite_reinit(gp->g_itedev);
372 1.1 leo return(error);
373 1.1 leo }
374 1.1 leo
375 1.1 leo /*
376 1.1 leo * Get the grf-info in sync with underlying view.
377 1.1 leo */
378 1.12 leo void
379 1.1 leo grf_viewsync(gp)
380 1.1 leo struct grf_softc *gp;
381 1.1 leo {
382 1.1 leo struct view_size vs;
383 1.1 leo bmap_t bm;
384 1.1 leo struct grfinfo *gi;
385 1.1 leo
386 1.1 leo gi = &gp->g_display;
387 1.1 leo
388 1.10 leo viewioctl(gp->g_viewdev, VIOCGBMAP, (caddr_t)&bm, 0, NOPROC);
389 1.1 leo
390 1.1 leo gp->g_data = (caddr_t) 0xDeadBeaf; /* not particularly clean.. */
391 1.1 leo
392 1.1 leo gi->gd_fbaddr = bm.hw_address;
393 1.20 leo gi->gd_fbsize = bm.phys_mappable;
394 1.12 leo gi->gd_regaddr = bm.hw_regs;
395 1.12 leo gi->gd_regsize = bm.reg_size;
396 1.1 leo
397 1.10 leo if(viewioctl(gp->g_viewdev, VIOCGSIZE, (caddr_t)&vs, 0, NOPROC)) {
398 1.1 leo /*
399 1.1 leo * fill in some default values...
400 1.1 leo * XXX: Should _never_ happen
401 1.1 leo */
402 1.1 leo vs.width = 640;
403 1.1 leo vs.height = 400;
404 1.3 leo vs.depth = 1;
405 1.1 leo }
406 1.1 leo gi->gd_colors = 1 << vs.depth;
407 1.1 leo gi->gd_planes = vs.depth;
408 1.1 leo
409 1.1 leo gi->gd_fbwidth = vs.width;
410 1.1 leo gi->gd_fbheight = vs.height;
411 1.1 leo gi->gd_dyn.gdi_fbx = 0;
412 1.1 leo gi->gd_dyn.gdi_fby = 0;
413 1.1 leo gi->gd_dyn.gdi_dwidth = vs.width;
414 1.1 leo gi->gd_dyn.gdi_dheight = vs.height;
415 1.1 leo gi->gd_dyn.gdi_dx = 0;
416 1.1 leo gi->gd_dyn.gdi_dy = 0;
417 1.1 leo }
418 1.1 leo
419 1.1 leo /*
420 1.1 leo * Change the mode of the display.
421 1.1 leo * Right now all we can do is grfon/grfoff.
422 1.1 leo * Return a UNIX error number or 0 for success.
423 1.1 leo */
424 1.1 leo /*ARGSUSED*/
425 1.12 leo int
426 1.1 leo grf_mode(gp, cmd, arg, a2, a3)
427 1.1 leo struct grf_softc *gp;
428 1.1 leo int cmd, a2, a3;
429 1.1 leo void *arg;
430 1.1 leo {
431 1.1 leo switch (cmd) {
432 1.1 leo case GM_GRFON:
433 1.1 leo /*
434 1.1 leo * Get in sync with view, ite might have changed it.
435 1.1 leo */
436 1.1 leo grf_viewsync(gp);
437 1.10 leo viewioctl(gp->g_viewdev, VIOCDISPLAY, NULL, 0, NOPROC);
438 1.1 leo return(0);
439 1.1 leo case GM_GRFOFF:
440 1.10 leo viewioctl(gp->g_viewdev, VIOCREMOVE, NULL, 0, NOPROC);
441 1.1 leo return(0);
442 1.1 leo case GM_GRFCONFIG:
443 1.1 leo default:
444 1.1 leo break;
445 1.1 leo }
446 1.1 leo return(EINVAL);
447 1.1 leo }
448 1.1 leo #endif /* NGRF > 0 */
449