Home | History | Annotate | Line # | Download | only in dev
bw2.c revision 1.31
      1 /*	$NetBSD: bw2.c,v 1.31 2007/03/04 06:00:52 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This software was developed by the Computer Systems Engineering group
      8  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
      9  * contributed to Berkeley.
     10  *
     11  * All advertising materials mentioning features or use of this software
     12  * must display the following acknowledgement:
     13  *	This product includes software developed by the University of
     14  *	California, Lawrence Berkeley Laboratory.
     15  *
     16  * Redistribution and use in source and binary forms, with or without
     17  * modification, are permitted provided that the following conditions
     18  * are met:
     19  * 1. Redistributions of source code must retain the above copyright
     20  *    notice, this list of conditions and the following disclaimer.
     21  * 2. Redistributions in binary form must reproduce the above copyright
     22  *    notice, this list of conditions and the following disclaimer in the
     23  *    documentation and/or other materials provided with the distribution.
     24  * 3. Neither the name of the University nor the names of its contributors
     25  *    may be used to endorse or promote products derived from this software
     26  *    without specific prior written permission.
     27  *
     28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     38  * SUCH DAMAGE.
     39  *
     40  *	@(#)bwtwo.c	8.1 (Berkeley) 6/11/93
     41  */
     42 
     43 /*
     44  * black&white display (bw2) driver.
     45  *
     46  * Does not handle interrupts, even though they can occur.
     47  */
     48 
     49 #include <sys/cdefs.h>
     50 __KERNEL_RCSID(0, "$NetBSD: bw2.c,v 1.31 2007/03/04 06:00:52 christos Exp $");
     51 
     52 #include <sys/param.h>
     53 #include <sys/systm.h>
     54 #include <sys/conf.h>
     55 #include <sys/device.h>
     56 #include <sys/ioctl.h>
     57 #include <sys/malloc.h>
     58 #include <sys/mman.h>
     59 #include <sys/proc.h>
     60 #include <sys/tty.h>
     61 
     62 #include <uvm/uvm_extern.h>
     63 
     64 #include <machine/autoconf.h>
     65 #include <machine/cpu.h>
     66 #include <dev/sun/fbio.h>
     67 #include <machine/idprom.h>
     68 #include <machine/pmap.h>
     69 
     70 #include <sun3/dev/fbvar.h>
     71 #include <sun3/dev/bw2reg.h>
     72 #include <sun3/dev/p4reg.h>
     73 
     74 /* per-display variables */
     75 struct bw2_softc {
     76 	struct	device sc_dev;		/* base device */
     77 	struct	fbdevice sc_fb;		/* frame buffer device */
     78 	int 	sc_phys;		/* display RAM (phys addr) */
     79 	/* If using overlay plane of something, it is... */
     80 	int	sc_ovtype;		/* ... this type. */
     81 	int sc_video_on;
     82 };
     83 
     84 /* autoconfiguration driver */
     85 static void	bw2attach(struct device *, struct device *, void *);
     86 static int	bw2match(struct device *, struct cfdata *, void *);
     87 
     88 CFATTACH_DECL(bwtwo, sizeof(struct bw2_softc),
     89     bw2match, bw2attach, NULL, NULL);
     90 
     91 extern struct cfdriver bwtwo_cd;
     92 
     93 dev_type_open(bw2open);
     94 dev_type_ioctl(bw2ioctl);
     95 dev_type_mmap(bw2mmap);
     96 
     97 const struct cdevsw bwtwo_cdevsw = {
     98 	bw2open, nullclose, noread, nowrite, bw2ioctl,
     99 	nostop, notty, nopoll, bw2mmap, nokqfilter,
    100 };
    101 
    102 /* XXX we do not handle frame buffer interrupts */
    103 
    104 static int bw2gvideo(struct fbdevice *, void *);
    105 static int bw2svideo(struct fbdevice *, void *);
    106 
    107 static struct fbdriver bw2fbdriver = {
    108 	bw2open, nullclose, bw2mmap, nokqfilter,
    109 	fb_noioctl,
    110 	bw2gvideo, bw2svideo,
    111 	fb_noioctl, fb_noioctl, };
    112 
    113 static int
    114 bw2match(struct device *parent, struct cfdata *cf, void *args)
    115 {
    116 	struct confargs *ca = args;
    117 	int mid, p4id, peekval;
    118 	void *p4reg;
    119 
    120 	/* No default address support. */
    121 	if (ca->ca_paddr == -1)
    122 		return (0);
    123 
    124 	/*
    125 	 * Slight hack here:  The low four bits of the
    126 	 * config flags, if set, restrict the match to
    127 	 * that machine "implementation" only.
    128 	 */
    129 	mid = cf->cf_flags & IDM_IMPL_MASK;
    130 	if (mid && (mid != (cpu_machine_id & IDM_IMPL_MASK)))
    131 		return (0);
    132 
    133 	/*
    134 	 * Make sure something is there, and if so,
    135 	 * see if it looks like a P4 register.
    136 	 */
    137 	p4reg = bus_tmapin(ca->ca_bustype, ca->ca_paddr);
    138 	peekval = peek_long(p4reg);
    139 	p4id = (peekval == -1) ?
    140 		P4_NOTFOUND : fb_pfour_id(p4reg);
    141 	bus_tmapout(p4reg);
    142 	if (peekval == -1)
    143 		return (0);
    144 
    145 	/*
    146 	 * The config flag 0x40 if set means we should match
    147 	 * only on a CG? overlay plane.  We can use only the
    148 	 * CG4 and CG8, which both have a P4 register.
    149 	 */
    150 	if (cf->cf_flags & 0x40) {
    151 		switch (p4id) {
    152 		case P4_ID_COLOR8P1:
    153 		case P4_ID_COLOR24:
    154 			return (1);
    155 		case P4_NOTFOUND:
    156 		default:
    157 			return (0);
    158 		}
    159 	}
    160 
    161 	/*
    162 	 * OK, we are expecting a plain old BW2, and
    163 	 * there may or may not be a P4 register.
    164 	 */
    165 	switch (p4id) {
    166 	case P4_ID_BW:
    167 	case P4_NOTFOUND:
    168 		return (1);
    169 	default:
    170 #ifdef	DEBUG
    171 		printf("bwtwo at 0x%x match p4id=0x%x fails\n",
    172 			   ca->ca_paddr, p4id & 0xFF);
    173 #endif
    174 		break;
    175 	}
    176 
    177 	return (0);
    178 }
    179 
    180 /*
    181  * Attach a display.  We need to notice if it is the console, too.
    182  */
    183 static void
    184 bw2attach(struct device *parent, struct device *self, void *args)
    185 {
    186 	struct bw2_softc *sc = (struct bw2_softc *)self;
    187 	struct fbdevice *fb = &sc->sc_fb;
    188 	struct confargs *ca = args;
    189 	struct fbtype *fbt;
    190 	void *p4reg;
    191 	int p4id, tmp;
    192 	int pixeloffset;		/* offset to framebuffer */
    193 
    194 	fbt = &fb->fb_fbtype;
    195 	fbt->fb_type = FBTYPE_SUN2BW;
    196 	fbt->fb_width = 1152;	/* default - see below */
    197 	fbt->fb_height = 900;	/* default - see below */
    198 	fbt->fb_depth = 1;
    199 	fbt->fb_cmsize = 0;
    200 	fbt->fb_size = BW2_FBSIZE;	/* default - see below */
    201 	fb->fb_driver = &bw2fbdriver;
    202 	fb->fb_private = sc;
    203 	fb->fb_name  = sc->sc_dev.dv_xname;
    204 	fb->fb_flags = device_cfdata(&sc->sc_dev)->cf_flags;
    205 
    206 	/* Set up default pixel offset.  May be changed below. */
    207 	pixeloffset = 0;
    208 
    209 	/* Does it have a P4 register? */
    210 	p4reg = bus_mapin(ca->ca_bustype, ca->ca_paddr, 4);
    211 	p4id = fb_pfour_id(p4reg);
    212 	if (p4id != P4_NOTFOUND)
    213 		fb->fb_pfour = p4reg;
    214 	else
    215 		bus_mapout(p4reg, 4);
    216 
    217 	switch (p4id) {
    218 	case P4_NOTFOUND:
    219 		pixeloffset = 0;
    220 		break;
    221 
    222 	case P4_ID_BW:
    223 		pixeloffset = P4_BW_OFF;
    224 		break;
    225 
    226 	default:
    227 		printf("%s: bad p4id=0x%x\n", fb->fb_name, p4id);
    228 		/* Must be some kinda color... */
    229 		/* fall through */
    230 	case P4_ID_COLOR8P1:
    231 	case P4_ID_COLOR24:
    232 		sc->sc_ovtype = p4id;
    233 		pixeloffset = P4_COLOR_OFF_OVERLAY;
    234 		break;
    235 	}
    236 	sc->sc_phys = ca->ca_paddr + pixeloffset;
    237 
    238 	/*
    239 	 * Determine width and height as follows:
    240 	 * If it has a P4 register, use that;
    241 	 * else if unit==0, use the EEPROM size,
    242 	 * else make our best guess.
    243 	 */
    244 	if (fb->fb_pfour)
    245 		fb_pfour_setsize(fb);
    246 	/* XXX device_unit() abuse */
    247 	else if (device_unit(&sc->sc_dev) == 0)
    248 		fb_eeprom_setsize(fb);
    249 	else {
    250 		/* Guess based on machine ID. */
    251 		switch (cpu_machine_id) {
    252 #ifdef	_SUN3_
    253 		case ID_SUN3_60:
    254 			/*
    255 			 * Only the model 60 can have hi-res.
    256 			 * Look at the "resolution" jumper.
    257 			 */
    258 			tmp = bus_peek(BUS_OBMEM, BW2_CR_PADDR, 1);
    259 			if ((tmp != -1) && (tmp & 0x80) == 0)
    260 				goto high_res;
    261 			break;
    262 
    263 		case ID_SUN3_260:
    264 			/* The Sun3/260 is ALWAYS high-resolution! */
    265 			/* fall through */
    266 		high_res:
    267 			fbt->fb_width = 1600;
    268 			fbt->fb_height = 1280;
    269 			fbt->fb_size = BW2_FBSIZE_HIRES;
    270 			break;
    271 #endif	/* SUN3 */
    272 
    273 		default:
    274 			/* Leave the defaults set above. */
    275 			break;
    276 		}
    277 	}
    278 	printf(" (%dx%d)\n", fbt->fb_width, fbt->fb_height);
    279 
    280 	/* Make sure video is on. */
    281 	tmp = 1;
    282 	bw2svideo(fb, &tmp);
    283 
    284 	/* Let /dev/fb know we are here. */
    285 	fb_attach(fb, 1);
    286 }
    287 
    288 int
    289 bw2open(dev_t dev, int flags, int mode, struct lwp *l)
    290 {
    291 	int unit = minor(dev);
    292 
    293 	if (unit >= bwtwo_cd.cd_ndevs || bwtwo_cd.cd_devs[unit] == NULL)
    294 		return (ENXIO);
    295 	return (0);
    296 }
    297 
    298 int
    299 bw2ioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l)
    300 {
    301 	struct bw2_softc *sc = bwtwo_cd.cd_devs[minor(dev)];
    302 
    303 	return (fbioctlfb(&sc->sc_fb, cmd, data));
    304 }
    305 
    306 /*
    307  * Return the address that would map the given device at the given
    308  * offset, allowing for the given protection, or return -1 for error.
    309  */
    310 paddr_t
    311 bw2mmap(dev_t dev, off_t off, int prot)
    312 {
    313 	struct bw2_softc *sc = bwtwo_cd.cd_devs[minor(dev)];
    314 	int size = sc->sc_fb.fb_fbtype.fb_size;
    315 
    316 	if (off & PGOFSET)
    317 		panic("bw2mmap");
    318 
    319 	if ((off < 0) || (off >= size))
    320 		return (-1);
    321 
    322 	/*
    323 	 * I turned on PMAP_NC here to disable the cache as I was
    324 	 * getting horribly broken behaviour without it.
    325 	 */
    326 	return ((sc->sc_phys + off) | PMAP_NC);
    327 }
    328 
    329 /* FBIOGVIDEO: */
    330 static int
    331 bw2gvideo(struct fbdevice *fb, void *data)
    332 {
    333 	struct bw2_softc *sc = fb->fb_private;
    334 	int *on = data;
    335 
    336 	*on = sc->sc_video_on;
    337 	return (0);
    338 }
    339 
    340 /* FBIOSVIDEO: */
    341 static int
    342 bw2svideo(struct fbdevice *fb, void *data)
    343 {
    344 	struct bw2_softc *sc = fb->fb_private;
    345 	int *on = data;
    346 
    347 	if (sc->sc_video_on == *on)
    348 		return (0);
    349 	sc->sc_video_on = *on;
    350 
    351 	if (fb->fb_pfour)
    352 		fb_pfour_set_video(fb, sc->sc_video_on);
    353 	else
    354 		enable_video(sc->sc_video_on);
    355 
    356 	return(0);
    357 }
    358 
    359