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