xref: /netbsd-src/sys/arch/atari/dev/grf.c (revision 8e6ab8837d8d6b9198e67c1c445300b483e2f304)
1 /*	$NetBSD: grf.c,v 1.32 2003/07/15 01:19:49 lukem 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/cdefs.h>
53 __KERNEL_RCSID(0, "$NetBSD: grf.c,v 1.32 2003/07/15 01:19:49 lukem Exp $");
54 
55 #include <sys/param.h>
56 #include <sys/proc.h>
57 #include <sys/ioctl.h>
58 #include <sys/device.h>
59 #include <sys/file.h>
60 #include <sys/malloc.h>
61 #include <sys/conf.h>
62 #include <sys/systm.h>
63 #include <sys/vnode.h>
64 #include <sys/mman.h>
65 
66 #include <machine/cpu.h>
67 
68 #include <uvm/uvm_extern.h>
69 
70 #include <atari/atari/device.h>
71 #include <atari/dev/grfioctl.h>
72 #include <atari/dev/grfabs_reg.h>
73 #include <atari/dev/grfvar.h>
74 #include <atari/dev/itevar.h>
75 #include <atari/dev/viewioctl.h>
76 #include <atari/dev/viewvar.h>
77 
78 #include "grfcc.h"
79 #include "grfet.h"
80 #define	NGRF	(NGRFCC + NGRFET)
81 
82 #if NGRF > 0
83 
84 #include "ite.h"
85 #if NITE == 0
86 #define	ite_on(u,f)
87 #define	ite_off(u,f)
88 #define ite_reinit(d)
89 #endif
90 
91 int grfon __P((dev_t));
92 int grfoff __P((dev_t));
93 int grfsinfo __P((dev_t, struct grfdyninfo *));
94 
95 int grfbusprint __P((void *auxp, const char *));
96 int grfbusmatch __P((struct device *, struct cfdata *, void *));
97 void grfbusattach __P((struct device *, struct device *, void *));
98 
99 /*
100  * pointers to grf drivers device structs
101  */
102 struct grf_softc *grfsp[NGRF]; /* XXX */
103 
104 CFATTACH_DECL(grfbus, sizeof(struct device),
105     grfbusmatch, grfbusattach, NULL, NULL);
106 
107 extern struct cfdriver grfbus_cd;
108 
109 dev_type_open(grfopen);
110 dev_type_close(grfclose);
111 dev_type_ioctl(grfioctl);
112 dev_type_mmap(grfmmap);
113 
114 const struct cdevsw grf_cdevsw = {
115 	grfopen, grfclose, noread, nowrite, grfioctl,
116 	nostop, notty, nopoll, grfmmap, nokqfilter,
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 /*
276  * map the contents of a graphics display card into process'
277  * memory space.
278  */
279 paddr_t
280 grfmmap(dev, off, prot)
281 	dev_t	dev;
282 	off_t	off;
283 	int	prot;
284 {
285 	struct grf_softc	*gp;
286 	struct grfinfo		*gi;
287 	u_int			vgabase, linbase;
288 
289 	gp = grfsp[GRFUNIT(dev)];
290 	gi = &gp->g_display;
291 
292 	vgabase = gi->gd_vgabase;
293 	linbase = gi->gd_linbase;
294 
295 	/*
296 	 * control registers
297 	 */
298 	if (off >= 0 && off < gi->gd_regsize)
299 		return(((paddr_t)gi->gd_regaddr + off) >> PGSHIFT);
300 
301 	/*
302 	 * VGA memory
303 	 */
304 	if (off >= vgabase && off < (vgabase + gi->gd_vgasize))
305 		return(((paddr_t)gi->gd_vgaaddr - vgabase + off) >> PGSHIFT);
306 
307 	/*
308 	 * frame buffer
309 	 */
310 	if (off >= linbase && off < (linbase + gi->gd_fbsize))
311 		return(((paddr_t)gi->gd_fbaddr - linbase + off) >> PGSHIFT);
312 	return(-1);
313 }
314 
315 int
316 grfon(dev)
317 	dev_t dev;
318 {
319 	struct grf_softc *gp;
320 
321 	gp = grfsp[GRFUNIT(dev)];
322 
323 	if (gp->g_flags & GF_GRFON)
324 		return(0);
325 
326 	gp->g_flags |= GF_GRFON;
327 	if (gp->g_itedev != NODEV)
328 		ite_off(gp->g_itedev, 3);
329 
330 	return(gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVON : GM_GRFON,
331 							NULL, 0, 0));
332 }
333 
334 int
335 grfoff(dev)
336 	dev_t dev;
337 {
338 	struct grf_softc *gp;
339 	int error;
340 
341 	gp = grfsp[GRFUNIT(dev)];
342 
343 	if ((gp->g_flags & GF_GRFON) == 0)
344 		return(0);
345 
346 	gp->g_flags &= ~GF_GRFON;
347 	error = gp->g_mode(gp, (dev & GRFOVDEV) ? GM_GRFOVOFF : GM_GRFOFF,
348 						NULL, 0, 0);
349 
350 	/*
351 	 * Closely tied together no X's
352 	 */
353 	if (gp->g_itedev != NODEV)
354 		ite_on(gp->g_itedev, 2);
355 
356 	return(error);
357 }
358 
359 int
360 grfsinfo(dev, dyninfo)
361 	dev_t dev;
362 	struct grfdyninfo *dyninfo;
363 {
364 	struct grf_softc *gp;
365 	int error;
366 
367 	gp = grfsp[GRFUNIT(dev)];
368 	error = gp->g_mode(gp, GM_GRFCONFIG, dyninfo, 0, 0);
369 
370 	/*
371 	 * Closely tied together no X's
372 	 */
373 	if (gp->g_itedev != NODEV)
374 		ite_reinit(gp->g_itedev);
375 	return(error);
376 }
377 
378 /*
379  * Get the grf-info in sync with underlying view.
380  */
381 void
382 grf_viewsync(gp)
383 struct grf_softc *gp;
384 {
385 	struct view_size	vs;
386 	bmap_t			bm;
387 	struct grfinfo		*gi;
388 	extern const struct cdevsw view_cdevsw;
389 
390 	gi = &gp->g_display;
391 
392 	(*view_cdevsw.d_ioctl)(gp->g_viewdev, VIOCGBMAP, (caddr_t)&bm,
393 			       0, NOPROC);
394 
395 	gp->g_data = (caddr_t) 0xDeadBeaf; /* not particularly clean.. */
396 
397 	gi->gd_fbaddr  = bm.hw_address;
398 	gi->gd_fbsize  = bm.phys_mappable;
399 	gi->gd_linbase = bm.lin_base;
400 	gi->gd_regaddr = bm.hw_regs;
401 	gi->gd_regsize = bm.reg_size;
402 	gi->gd_vgaaddr = bm.vga_address;
403 	gi->gd_vgasize = bm.vga_mappable;
404 	gi->gd_vgabase = bm.vga_base;
405 
406 	if((*view_cdevsw.d_ioctl)(gp->g_viewdev, VIOCGSIZE, (caddr_t)&vs, 0,
407 				  NOPROC)) {
408 		/*
409 		 * fill in some default values...
410 		 * XXX: Should _never_ happen
411 		 */
412 		vs.width  = 640;
413 		vs.height = 400;
414 		vs.depth  = 1;
415 	}
416 	gi->gd_colors = 1 << vs.depth;
417 	gi->gd_planes = vs.depth;
418 
419 	gi->gd_fbwidth         = vs.width;
420 	gi->gd_fbheight        = vs.height;
421 	gi->gd_dyn.gdi_fbx     = 0;
422 	gi->gd_dyn.gdi_fby     = 0;
423 	gi->gd_dyn.gdi_dwidth  = vs.width;
424 	gi->gd_dyn.gdi_dheight = vs.height;
425 	gi->gd_dyn.gdi_dx      = 0;
426 	gi->gd_dyn.gdi_dy      = 0;
427 }
428 
429 /*
430  * Change the mode of the display.
431  * Right now all we can do is grfon/grfoff.
432  * Return a UNIX error number or 0 for success.
433  */
434 /*ARGSUSED*/
435 int
436 grf_mode(gp, cmd, arg, a2, a3)
437 struct grf_softc	*gp;
438 int			cmd, a2, a3;
439 void			*arg;
440 {
441 	extern const struct cdevsw view_cdevsw;
442 
443 	switch (cmd) {
444 		case GM_GRFON:
445 			/*
446 			 * Get in sync with view, ite might have changed it.
447 			 */
448 			grf_viewsync(gp);
449 			(*view_cdevsw.d_ioctl)(gp->g_viewdev, VIOCDISPLAY,
450 					       NULL, 0, NOPROC);
451 			return(0);
452 	case GM_GRFOFF:
453 			(*view_cdevsw.d_ioctl)(gp->g_viewdev, VIOCREMOVE,
454 					       NULL, 0, NOPROC);
455 			return(0);
456 	case GM_GRFCONFIG:
457 	default:
458 			break;
459 	}
460 	return(EPASSTHROUGH);
461 }
462 #endif	/* NGRF > 0 */
463