xref: /netbsd-src/sys/arch/mac68k/obio/grf_obio.c (revision fdecd6a253f999ae92b139670d9e15cc9df4497c)
1 /*	$NetBSD: grf_obio.c,v 1.21 1997/06/10 19:01:35 veego Exp $	*/
2 
3 /*
4  * Copyright (c) 1995 Allen Briggs.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by Allen Briggs.
17  * 4. The name of the author may not be used to endorse or promote products
18  *    derived from this software without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30  */
31 /*
32  * Graphics display driver for the Macintosh internal video for machines
33  * that don't map it into a fake nubus card.
34  */
35 
36 #include <sys/param.h>
37 
38 #include <sys/device.h>
39 #include <sys/ioctl.h>
40 #include <sys/file.h>
41 #include <sys/malloc.h>
42 #include <sys/mman.h>
43 #include <sys/proc.h>
44 #include <sys/systm.h>
45 
46 #include <machine/autoconf.h>
47 #include <machine/bus.h>
48 #include <machine/cpu.h>
49 #include <machine/grfioctl.h>
50 #include <machine/viareg.h>
51 
52 #include "nubus.h"
53 #include "obiovar.h"
54 #include "grfvar.h"
55 
56 extern u_int32_t	mac68k_vidlog;
57 extern u_int32_t	mac68k_vidphys;
58 extern long		videorowbytes;
59 extern long		videobitdepth;
60 extern unsigned long	videosize;
61 
62 static int	grfiv_mode __P((struct grf_softc *gp, int cmd, void *arg));
63 static caddr_t	grfiv_phys __P((struct grf_softc *gp, vm_offset_t addr));
64 static int	grfiv_match __P((struct device *, struct cfdata *, void *));
65 static void	grfiv_attach __P((struct device *, struct device *, void *));
66 
67 struct cfdriver intvid_cd = {
68 	NULL, "intvid", DV_DULL
69 };
70 
71 struct cfattach intvid_ca = {
72 	sizeof(struct grfbus_softc), grfiv_match, grfiv_attach
73 };
74 
75 #define QUADRA_DAFB_BASE	0xF9800000
76 
77 static int
78 grfiv_match(parent, cf, aux)
79 	struct device *parent;
80 	struct cfdata *cf;
81 	void *aux;
82 {
83 	struct obio_attach_args *oa = (struct obio_attach_args *) aux;
84 	bus_space_handle_t	bsh;
85 	int			found, sense;
86 
87 	found = 1;
88 
89         switch (current_mac_model->class) {
90 	case MACH_CLASSQ:
91 	case MACH_CLASSQ2:
92 
93 		/*
94 		 * Assume DAFB for all of these, unless we can't
95 		 * access the memory.
96 		 */
97 
98 		if (bus_space_map(oa->oa_tag, QUADRA_DAFB_BASE, 0x1000,
99 					0, &bsh)) {
100 			panic("failed to map space for DAFB regs.\n");
101 		}
102 
103 		if (bus_probe(oa->oa_tag, bsh, 0x1C, 4) == 0) {
104 			bus_space_unmap(oa->oa_tag, bsh, 0x1000);
105 			found = 0;
106 			goto nodafb;
107 		}
108 
109 		sense = (bus_space_read_4(oa->oa_tag, bsh, 0x1C) & 7);
110 
111 		if (sense == 0)
112 			found = 0;
113 
114 		/* Set "Turbo SCSI" configuration to default */
115 		bus_space_write_4(oa->oa_tag, bsh, 0x24, 0x1d1); /* ch0 */
116 		bus_space_write_4(oa->oa_tag, bsh, 0x28, 0x1d1); /* ch1 */
117 
118 		/* Disable interrupts */
119 		bus_space_write_4(oa->oa_tag, bsh, 0x104, 0);
120 
121 		/* Clear any interrupts */
122 		bus_space_write_4(oa->oa_tag, bsh, 0x10C, 0);
123 		bus_space_write_4(oa->oa_tag, bsh, 0x110, 0);
124 		bus_space_write_4(oa->oa_tag, bsh, 0x114, 0);
125 
126 		bus_space_unmap(oa->oa_tag, bsh, 0x1000);
127 
128 		break;
129 
130 	default:
131 nodafb:
132 		if (mac68k_vidlog == 0) {
133 			found = 0;
134 		}
135 
136 		break;
137 	}
138 
139 	return found;
140 }
141 
142 #define R4(sc, o) (bus_space_read_4((sc)->sc_tag, (sc)->sc_regh, o) & 0xfff)
143 
144 static void
145 grfiv_attach(parent, self, aux)
146 	struct device *parent, *self;
147 	void   *aux;
148 {
149 	struct obio_attach_args *oa = (struct obio_attach_args *) aux;
150 	struct grfbus_softc	*sc;
151 	struct grfmode		*gm;
152 
153 	sc = (struct grfbus_softc *) self;
154 
155 	sc->card_id = 0;
156 
157         switch (current_mac_model->class) {
158         case MACH_CLASSQ:
159         case MACH_CLASSQ2:
160 		sc->sc_tag = oa->oa_tag;
161 		if (bus_space_map(sc->sc_tag, QUADRA_DAFB_BASE, 0x1000,
162 					0, &sc->sc_regh)) {
163 			panic("failed to map space for DAFB regs.\n");
164 		}
165 		printf(": DAFB: Monitor sense %x.\n", R4(sc,0x1C)&7);
166 		break;
167 	default:
168 		printf(": Internal Video\n");
169 		break;
170 	}
171 
172 	gm = &(sc->curr_mode);
173 	gm->mode_id = 0;
174 	gm->psize = videobitdepth;
175 	gm->ptype = 0;
176 	gm->width = videosize & 0xffff;
177 	gm->height = (videosize >> 16) & 0xffff;
178 	gm->rowbytes = videorowbytes;
179 	gm->hres = 80;		/* XXX Hack */
180 	gm->vres = 80;		/* XXX Hack */
181 	gm->fbsize = gm->rowbytes * gm->height;
182 	gm->fbbase = (caddr_t) m68k_trunc_page(mac68k_vidlog);
183 	gm->fboff = mac68k_vidlog & PGOFSET;
184 
185 	/* Perform common video attachment. */
186 	grf_establish(sc, NULL, grfiv_mode, grfiv_phys);
187 }
188 
189 static int
190 grfiv_mode(sc, cmd, arg)
191 	struct grf_softc *sc;
192 	int cmd;
193 	void *arg;
194 {
195 	switch (cmd) {
196 	case GM_GRFON:
197 	case GM_GRFOFF:
198 		return 0;
199 	case GM_CURRMODE:
200 		break;
201 	case GM_NEWMODE:
202 		break;
203 	case GM_LISTMODES:
204 		break;
205 	}
206 	return EINVAL;
207 }
208 
209 static caddr_t
210 grfiv_phys(gp, addr)
211 	struct grf_softc *gp;
212 	vm_offset_t addr;
213 {
214 	/*
215 	 * If we're using IIsi or similar, this will be 0.
216 	 * If we're using IIvx or similar, this will be correct.
217 	 */
218 	return (caddr_t) mac68k_vidphys;
219 }
220