grf.c revision 1.12 1 1.11 cgd /* $NetBSD: grf.c,v 1.12 1996/09/16 06:43:32 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.1 leo #include <vm/vm.h>
63 1.1 leo #include <vm/vm_kern.h>
64 1.1 leo #include <vm/vm_page.h>
65 1.1 leo #include <vm/vm_pager.h>
66 1.1 leo #include <machine/cpu.h>
67 1.1 leo #include <atari/atari/device.h>
68 1.1 leo #include <atari/dev/grfioctl.h>
69 1.1 leo #include <atari/dev/grfabs_reg.h>
70 1.1 leo #include <atari/dev/grfvar.h>
71 1.1 leo #include <atari/dev/itevar.h>
72 1.1 leo #include <atari/dev/viewioctl.h>
73 1.1 leo #include <atari/dev/viewvar.h>
74 1.1 leo
75 1.12 leo #include "grfcc.h"
76 1.12 leo #include "grfet.h"
77 1.12 leo #define NGRF (NGRFCC + NGRFET)
78 1.12 leo
79 1.1 leo #if NGRF > 0
80 1.1 leo
81 1.1 leo #include "ite.h"
82 1.1 leo #if NITE == 0
83 1.1 leo #define ite_on(u,f)
84 1.1 leo #define ite_off(u,f)
85 1.1 leo #define ite_reinit(d)
86 1.1 leo #endif
87 1.1 leo
88 1.1 leo int grfon __P((dev_t));
89 1.1 leo int grfoff __P((dev_t));
90 1.1 leo int grfsinfo __P((dev_t, struct grfdyninfo *));
91 1.1 leo #ifdef BANKEDDEVPAGER
92 1.1 leo int grfbanked_get __P((dev_t, off_t, int));
93 1.1 leo int grfbanked_cur __P((dev_t));
94 1.1 leo int grfbanked_set __P((dev_t, int));
95 1.1 leo #endif
96 1.1 leo
97 1.11 cgd int grfbusprint __P((void *auxp, const char *));
98 1.8 thorpej int grfbusmatch __P((struct device *, void *, void *));
99 1.1 leo void grfbusattach __P((struct device *, struct device *, void *));
100 1.1 leo
101 1.1 leo /*
102 1.1 leo * pointers to grf drivers device structs
103 1.1 leo */
104 1.12 leo struct grf_softc *grfsp[NGRF]; /* XXX */
105 1.1 leo
106 1.8 thorpej struct cfattach grfbus_ca = {
107 1.8 thorpej sizeof(struct device), grfbusmatch, grfbusattach
108 1.8 thorpej };
109 1.8 thorpej
110 1.8 thorpej struct cfdriver grfbus_cd = {
111 1.9 leo NULL, "grfbus", DV_DULL
112 1.8 thorpej };
113 1.1 leo
114 1.1 leo /*
115 1.1 leo * only used in console init.
116 1.1 leo */
117 1.1 leo static struct cfdata *cfdata_gbus = NULL;
118 1.1 leo
119 1.1 leo int
120 1.8 thorpej grfbusmatch(pdp, match, auxp)
121 1.1 leo struct device *pdp;
122 1.8 thorpej void *match, *auxp;
123 1.1 leo {
124 1.8 thorpej struct cfdata *cfp = match;
125 1.8 thorpej
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.12 leo 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.1 leo
176 1.1 leo if ((gp->g_flags & GF_ALIVE) == 0)
177 1.1 leo return(ENXIO);
178 1.1 leo
179 1.1 leo if ((gp->g_flags & (GF_OPEN|GF_EXCLUDE)) == (GF_OPEN|GF_EXCLUDE))
180 1.1 leo return(EBUSY);
181 1.6 leo grf_viewsync(gp);
182 1.1 leo
183 1.1 leo return(0);
184 1.1 leo }
185 1.1 leo
186 1.1 leo /*ARGSUSED*/
187 1.1 leo int
188 1.10 leo grfclose(dev, flags, mode, p)
189 1.10 leo dev_t dev;
190 1.10 leo int flags;
191 1.10 leo int mode;
192 1.10 leo struct proc *p;
193 1.1 leo {
194 1.1 leo struct grf_softc *gp;
195 1.1 leo
196 1.1 leo gp = grfsp[GRFUNIT(dev)];
197 1.1 leo (void)grfoff(dev);
198 1.1 leo gp->g_flags &= GF_ALIVE;
199 1.1 leo return(0);
200 1.1 leo }
201 1.1 leo
202 1.1 leo /*ARGSUSED*/
203 1.1 leo int
204 1.1 leo grfioctl(dev, cmd, data, flag, p)
205 1.1 leo dev_t dev;
206 1.1 leo u_long cmd;
207 1.1 leo int flag;
208 1.1 leo caddr_t data;
209 1.1 leo struct proc *p;
210 1.1 leo {
211 1.1 leo struct grf_softc *gp;
212 1.1 leo int error;
213 1.1 leo
214 1.1 leo gp = grfsp[GRFUNIT(dev)];
215 1.1 leo error = 0;
216 1.1 leo
217 1.1 leo switch (cmd) {
218 1.1 leo case OGRFIOCGINFO:
219 1.1 leo /* argl.. no bank-member.. */
220 1.1 leo bcopy((caddr_t)&gp->g_display, data, sizeof(struct grfinfo)-4);
221 1.1 leo break;
222 1.1 leo case GRFIOCGINFO:
223 1.1 leo bcopy((caddr_t)&gp->g_display, data, sizeof(struct grfinfo));
224 1.1 leo break;
225 1.1 leo case GRFIOCON:
226 1.1 leo error = grfon(dev);
227 1.1 leo break;
228 1.1 leo case GRFIOCOFF:
229 1.1 leo error = grfoff(dev);
230 1.1 leo break;
231 1.1 leo case GRFIOCSINFO:
232 1.1 leo error = grfsinfo(dev, (struct grfdyninfo *) data);
233 1.1 leo break;
234 1.1 leo case GRFGETVMODE:
235 1.7 leo return(gp->g_mode(gp, GM_GRFGETVMODE, data, 0, 0));
236 1.1 leo case GRFSETVMODE:
237 1.7 leo error = gp->g_mode(gp, GM_GRFSETVMODE, data, 0, 0);
238 1.1 leo if (error == 0 && gp->g_itedev)
239 1.1 leo ite_reinit(gp->g_itedev);
240 1.1 leo break;
241 1.1 leo case GRFGETNUMVM:
242 1.7 leo return(gp->g_mode(gp, GM_GRFGETNUMVM, data, 0, 0));
243 1.1 leo /*
244 1.1 leo * these are all hardware dependant, and have to be resolved
245 1.1 leo * in the respective driver.
246 1.1 leo */
247 1.1 leo case GRFIOCPUTCMAP:
248 1.1 leo case GRFIOCGETCMAP:
249 1.1 leo case GRFIOCSSPRITEPOS:
250 1.1 leo case GRFIOCGSPRITEPOS:
251 1.1 leo case GRFIOCSSPRITEINF:
252 1.1 leo case GRFIOCGSPRITEINF:
253 1.1 leo case GRFIOCGSPRITEMAX:
254 1.1 leo default:
255 1.1 leo /*
256 1.1 leo * check to see whether it's a command recognized by the
257 1.1 leo * view code.
258 1.1 leo */
259 1.4 leo return(viewioctl(gp->g_viewdev, cmd, data, flag, p));
260 1.1 leo error = EINVAL;
261 1.1 leo break;
262 1.1 leo
263 1.1 leo }
264 1.1 leo return(error);
265 1.1 leo }
266 1.1 leo
267 1.1 leo /*ARGSUSED*/
268 1.1 leo int
269 1.10 leo grfselect(dev, rw, p)
270 1.10 leo dev_t dev;
271 1.10 leo int rw;
272 1.10 leo struct proc *p;
273 1.1 leo {
274 1.1 leo if (rw == FREAD)
275 1.1 leo return(0);
276 1.1 leo return(1);
277 1.1 leo }
278 1.1 leo
279 1.1 leo /*
280 1.1 leo * map the contents of a graphics display card into process'
281 1.1 leo * memory space.
282 1.1 leo */
283 1.1 leo int
284 1.2 mycroft grfmmap(dev, off, prot)
285 1.1 leo dev_t dev;
286 1.1 leo int off, prot;
287 1.1 leo {
288 1.5 leo struct grf_softc *gp;
289 1.5 leo struct grfinfo *gi;
290 1.5 leo
291 1.5 leo gp = grfsp[GRFUNIT(dev)];
292 1.5 leo gi = &gp->g_display;
293 1.5 leo
294 1.5 leo /*
295 1.5 leo * frame buffer
296 1.5 leo */
297 1.5 leo if ((off >= 0) && (off < gi->gd_fbsize))
298 1.5 leo return (((u_int)gi->gd_fbaddr + off) >> PGSHIFT);
299 1.5 leo return(-1);
300 1.1 leo }
301 1.1 leo
302 1.1 leo int
303 1.1 leo grfon(dev)
304 1.1 leo dev_t dev;
305 1.1 leo {
306 1.1 leo struct grf_softc *gp;
307 1.1 leo
308 1.1 leo gp = grfsp[GRFUNIT(dev)];
309 1.1 leo
310 1.1 leo if (gp->g_flags & GF_GRFON)
311 1.1 leo return(0);
312 1.1 leo
313 1.1 leo gp->g_flags |= GF_GRFON;
314 1.1 leo if (gp->g_itedev != NODEV)
315 1.1 leo ite_off(gp->g_itedev, 3);
316 1.1 leo
317 1.7 leo return(gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVON : GM_GRFON,
318 1.7 leo NULL, 0, 0));
319 1.1 leo }
320 1.1 leo
321 1.1 leo int
322 1.1 leo grfoff(dev)
323 1.1 leo dev_t dev;
324 1.1 leo {
325 1.1 leo struct grf_softc *gp;
326 1.1 leo int error;
327 1.1 leo
328 1.1 leo gp = grfsp[GRFUNIT(dev)];
329 1.1 leo
330 1.1 leo if ((gp->g_flags & GF_GRFON) == 0)
331 1.1 leo return(0);
332 1.1 leo
333 1.1 leo gp->g_flags &= ~GF_GRFON;
334 1.7 leo error = gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVOFF : GM_GRFOFF,
335 1.7 leo NULL, 0, 0);
336 1.1 leo
337 1.1 leo /*
338 1.1 leo * Closely tied together no X's
339 1.1 leo */
340 1.1 leo if (gp->g_itedev != NODEV)
341 1.1 leo ite_on(gp->g_itedev, 2);
342 1.1 leo
343 1.1 leo return(error);
344 1.1 leo }
345 1.1 leo
346 1.1 leo int
347 1.1 leo grfsinfo(dev, dyninfo)
348 1.1 leo dev_t dev;
349 1.1 leo struct grfdyninfo *dyninfo;
350 1.1 leo {
351 1.1 leo struct grf_softc *gp;
352 1.1 leo int error;
353 1.1 leo
354 1.1 leo gp = grfsp[GRFUNIT(dev)];
355 1.7 leo error = gp->g_mode(gp, GM_GRFCONFIG, dyninfo, 0, 0);
356 1.1 leo
357 1.1 leo /*
358 1.1 leo * Closely tied together no X's
359 1.1 leo */
360 1.1 leo if (gp->g_itedev != NODEV)
361 1.1 leo ite_reinit(gp->g_itedev);
362 1.1 leo return(error);
363 1.1 leo }
364 1.1 leo
365 1.1 leo /*
366 1.1 leo * Get the grf-info in sync with underlying view.
367 1.1 leo */
368 1.12 leo void
369 1.1 leo grf_viewsync(gp)
370 1.1 leo struct grf_softc *gp;
371 1.1 leo {
372 1.1 leo struct view_size vs;
373 1.1 leo bmap_t bm;
374 1.1 leo struct grfinfo *gi;
375 1.1 leo
376 1.1 leo gi = &gp->g_display;
377 1.1 leo
378 1.10 leo viewioctl(gp->g_viewdev, VIOCGBMAP, (caddr_t)&bm, 0, NOPROC);
379 1.1 leo
380 1.1 leo gp->g_data = (caddr_t) 0xDeadBeaf; /* not particularly clean.. */
381 1.1 leo
382 1.1 leo gi->gd_fbaddr = bm.hw_address;
383 1.1 leo gi->gd_fbsize = bm.depth*bm.bytes_per_row*bm.rows;
384 1.12 leo gi->gd_regaddr = bm.hw_regs;
385 1.12 leo gi->gd_regsize = bm.reg_size;
386 1.12 leo gp->g_fbkva = bm.plane;
387 1.12 leo gp->g_regkva = bm.regs;
388 1.1 leo
389 1.10 leo if(viewioctl(gp->g_viewdev, VIOCGSIZE, (caddr_t)&vs, 0, NOPROC)) {
390 1.1 leo /*
391 1.1 leo * fill in some default values...
392 1.1 leo * XXX: Should _never_ happen
393 1.1 leo */
394 1.1 leo vs.width = 640;
395 1.1 leo vs.height = 400;
396 1.3 leo vs.depth = 1;
397 1.1 leo }
398 1.1 leo gi->gd_colors = 1 << vs.depth;
399 1.1 leo gi->gd_planes = vs.depth;
400 1.1 leo
401 1.1 leo gi->gd_fbwidth = vs.width;
402 1.1 leo gi->gd_fbheight = vs.height;
403 1.1 leo gi->gd_dyn.gdi_fbx = 0;
404 1.1 leo gi->gd_dyn.gdi_fby = 0;
405 1.1 leo gi->gd_dyn.gdi_dwidth = vs.width;
406 1.1 leo gi->gd_dyn.gdi_dheight = vs.height;
407 1.1 leo gi->gd_dyn.gdi_dx = 0;
408 1.1 leo gi->gd_dyn.gdi_dy = 0;
409 1.1 leo }
410 1.1 leo
411 1.1 leo /*
412 1.1 leo * Change the mode of the display.
413 1.1 leo * Right now all we can do is grfon/grfoff.
414 1.1 leo * Return a UNIX error number or 0 for success.
415 1.1 leo */
416 1.1 leo /*ARGSUSED*/
417 1.12 leo int
418 1.1 leo grf_mode(gp, cmd, arg, a2, a3)
419 1.1 leo struct grf_softc *gp;
420 1.1 leo int cmd, a2, a3;
421 1.1 leo void *arg;
422 1.1 leo {
423 1.1 leo switch (cmd) {
424 1.1 leo case GM_GRFON:
425 1.1 leo /*
426 1.1 leo * Get in sync with view, ite might have changed it.
427 1.1 leo */
428 1.1 leo grf_viewsync(gp);
429 1.10 leo viewioctl(gp->g_viewdev, VIOCDISPLAY, NULL, 0, NOPROC);
430 1.1 leo return(0);
431 1.1 leo case GM_GRFOFF:
432 1.10 leo viewioctl(gp->g_viewdev, VIOCREMOVE, NULL, 0, NOPROC);
433 1.1 leo return(0);
434 1.1 leo case GM_GRFCONFIG:
435 1.1 leo default:
436 1.1 leo break;
437 1.1 leo }
438 1.1 leo return(EINVAL);
439 1.1 leo }
440 1.1 leo #endif /* NGRF > 0 */
441