Home | History | Annotate | Line # | Download | only in dev
grfabs_tt.c revision 1.13.2.3
      1  1.13.2.3    skrll /*	$NetBSD: grfabs_tt.c,v 1.13.2.3 2004/09/21 13:13:58 skrll Exp $	*/
      2       1.1      leo 
      3       1.1      leo /*
      4       1.1      leo  * Copyright (c) 1995 Leo Weppelman.
      5       1.1      leo  * All rights reserved.
      6       1.1      leo  *
      7       1.1      leo  * Redistribution and use in source and binary forms, with or without
      8       1.1      leo  * modification, are permitted provided that the following conditions
      9       1.1      leo  * are met:
     10       1.1      leo  * 1. Redistributions of source code must retain the above copyright
     11       1.1      leo  *    notice, this list of conditions and the following disclaimer.
     12       1.1      leo  * 2. Redistributions in binary form must reproduce the above copyright
     13       1.1      leo  *    notice, this list of conditions and the following disclaimer in the
     14       1.1      leo  *    documentation and/or other materials provided with the distribution.
     15       1.1      leo  * 3. All advertising materials mentioning features or use of this software
     16       1.1      leo  *    must display the following acknowledgement:
     17       1.1      leo  *      This product includes software developed by Leo Weppelman.
     18       1.1      leo  * 4. The name of the author may not be used to endorse or promote products
     19       1.1      leo  *    derived from this software without specific prior written permission
     20       1.1      leo  *
     21       1.1      leo  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22       1.1      leo  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23       1.1      leo  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24       1.1      leo  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25       1.1      leo  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26       1.1      leo  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27       1.1      leo  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28       1.1      leo  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29       1.1      leo  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30       1.1      leo  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31       1.1      leo  */
     32       1.1      leo 
     33  1.13.2.1    skrll #include <sys/cdefs.h>
     34  1.13.2.3    skrll __KERNEL_RCSID(0, "$NetBSD: grfabs_tt.c,v 1.13.2.3 2004/09/21 13:13:58 skrll Exp $");
     35  1.13.2.1    skrll 
     36       1.1      leo #ifdef TT_VIDEO
     37       1.1      leo /*
     38       1.1      leo  *  atari abstract graphics driver: TT-interface
     39       1.1      leo  */
     40       1.1      leo #include <sys/param.h>
     41       1.1      leo #include <sys/queue.h>
     42       1.1      leo #include <sys/malloc.h>
     43       1.1      leo #include <sys/device.h>
     44       1.2      leo #include <sys/systm.h>
     45       1.1      leo 
     46      1.12  thorpej #include <uvm/uvm_extern.h>
     47      1.12  thorpej 
     48       1.1      leo #include <machine/iomap.h>
     49       1.1      leo #include <machine/video.h>
     50       1.1      leo #include <machine/mfp.h>
     51       1.1      leo #include <atari/atari/device.h>
     52       1.3      leo #include <atari/atari/stalloc.h>
     53       1.1      leo #include <atari/dev/grfabs_reg.h>
     54       1.5      leo #include <atari/dev/grfabs_tt.h>
     55       1.1      leo 
     56       1.1      leo /*
     57       1.1      leo  * Function decls
     58       1.1      leo  */
     59       1.1      leo static void       init_view __P((view_t *, bmap_t *, dmode_t *, box_t *));
     60       1.1      leo static bmap_t	  *alloc_bitmap __P((u_long, u_long, u_char));
     61       1.1      leo static colormap_t *alloc_colormap __P((dmode_t *));
     62       1.1      leo static void 	  free_bitmap __P((bmap_t *));
     63       1.1      leo static void	  tt_display_view __P((view_t *));
     64       1.1      leo static view_t	  *tt_alloc_view __P((dmode_t *, dimen_t *, u_char));
     65       1.1      leo static void	  tt_free_view __P((view_t *));
     66       1.1      leo static void	  tt_remove_view __P((view_t *));
     67       1.6      leo static void	  tt_save_view __P((view_t *));
     68       1.1      leo static int	  tt_use_colormap __P((view_t *, colormap_t *));
     69       1.1      leo 
     70       1.1      leo /*
     71       1.1      leo  * Our function switch table
     72       1.1      leo  */
     73       1.1      leo struct grfabs_sw tt_vid_sw = {
     74       1.1      leo 	tt_display_view,
     75       1.1      leo 	tt_alloc_view,
     76       1.1      leo 	tt_free_view,
     77       1.1      leo 	tt_remove_view,
     78       1.6      leo 	tt_save_view,
     79       1.1      leo 	tt_use_colormap
     80       1.1      leo };
     81       1.1      leo 
     82       1.5      leo struct tt_hwregs {
     83       1.5      leo 	u_short		tt_reg;	/* video mode-register TT	*/
     84       1.5      leo };
     85       1.5      leo #define vm_reg(dm)	(((struct tt_hwregs*)(dm->data))->tt_reg)
     86       1.5      leo 
     87       1.5      leo /*
     88       1.5      leo  * Note that the order of this table *must* match the order of
     89       1.5      leo  * the table below!
     90       1.5      leo  */
     91       1.5      leo static struct tt_hwregs tt_hwregs[] = {
     92       1.5      leo 	{ RES_STHIGH },
     93       1.5      leo 	{ RES_TTHIGH },
     94       1.5      leo 	{ RES_STMID  },
     95       1.5      leo 	{ RES_STLOW  },
     96       1.5      leo 	{ RES_TTMID  },
     97       1.5      leo 	{ RES_TTLOW  }
     98       1.5      leo };
     99       1.5      leo 
    100       1.1      leo static dmode_t vid_modes[] = {
    101       1.5      leo     { { NULL, NULL }, "sthigh", { 640,  400 }, 1, NULL, &tt_vid_sw },
    102       1.5      leo     { { NULL, NULL }, "tthigh", { 1280, 960 }, 1, NULL, &tt_vid_sw },
    103       1.5      leo     { { NULL, NULL }, "stmid",  { 640,  200 }, 2, NULL, &tt_vid_sw },
    104       1.5      leo     { { NULL, NULL }, "stlow",  { 320,  200 }, 4, NULL, &tt_vid_sw },
    105       1.5      leo     { { NULL, NULL }, "ttmid",  { 640,  480 }, 4, NULL, &tt_vid_sw },
    106       1.5      leo     { { NULL, NULL }, "ttlow",  { 320,  480 }, 8, NULL, &tt_vid_sw },
    107       1.4      leo     { { NULL, NULL }, NULL,  }
    108       1.1      leo };
    109       1.1      leo 
    110       1.1      leo /*
    111       1.1      leo  * XXX: called from ite console init routine.
    112      1.10      wiz  * Initialize list of possible video modes.
    113       1.1      leo  */
    114       1.5      leo 
    115       1.1      leo void
    116       1.1      leo tt_probe_video(modelp)
    117       1.1      leo MODES	*modelp;
    118       1.1      leo {
    119       1.1      leo 	dmode_t	*dm;
    120       1.1      leo 	int	i;
    121       1.1      leo 	int	has_mono;
    122       1.1      leo 
    123       1.1      leo 	/*
    124      1.13      wiz 	 * First find out what kind of monitor is attached. DMA-sound
    125       1.1      leo 	 * should be off because the 'sound-done' and 'monochrome-detect'
    126       1.1      leo 	 * are xor-ed together. I think that shutting it down here is the
    127       1.1      leo 	 * wrong place.
    128       1.1      leo 	 */
    129       1.1      leo 	has_mono = (MFP->mf_gpip & IA_MONO) == 0;
    130       1.1      leo 
    131       1.1      leo 	for (i = 0; (dm = &vid_modes[i])->name != NULL; i++) {
    132       1.5      leo 		dm->data = (void *)&tt_hwregs[i];
    133       1.5      leo 		if (has_mono && (vm_reg(dm) != RES_TTHIGH))
    134       1.1      leo 			continue;
    135       1.5      leo 		if (!has_mono && (vm_reg(dm) == RES_TTHIGH))
    136       1.1      leo 			continue;
    137       1.1      leo 		LIST_INSERT_HEAD(modelp, dm, link);
    138       1.1      leo 	}
    139       1.1      leo 
    140       1.1      leo 	for (i=0; i < 16; i++)
    141       1.1      leo 		VIDEO->vd_tt_rgb[i] = CM_L2TT(gra_def_color16[i]);
    142       1.1      leo }
    143       1.1      leo 
    144       1.1      leo static void
    145       1.1      leo tt_display_view(v)
    146       1.1      leo view_t *v;
    147       1.1      leo {
    148       1.1      leo 	dmode_t	*dm = v->mode;
    149       1.1      leo 	bmap_t	*bm = v->bitmap;
    150       1.1      leo 
    151       1.1      leo 	if (dm->current_view) {
    152       1.1      leo 		/*
    153       1.1      leo 		 * Mark current view for this mode as no longer displayed
    154       1.1      leo 		 */
    155       1.1      leo 		dm->current_view->flags &= ~VF_DISPLAY;
    156       1.1      leo 	}
    157       1.1      leo 	dm->current_view = v;
    158       1.1      leo 	v->flags |= VF_DISPLAY;
    159       1.1      leo 
    160       1.1      leo 	tt_use_colormap(v, v->colormap);
    161       1.1      leo 
    162       1.1      leo 	/* XXX: should use vbl for this	*/
    163       1.5      leo 	VIDEO->vd_tt_res = vm_reg(dm);
    164       1.1      leo 	VIDEO->vd_raml   =  (u_long)bm->hw_address & 0xff;
    165       1.1      leo 	VIDEO->vd_ramm   = ((u_long)bm->hw_address >>  8) & 0xff;
    166       1.1      leo 	VIDEO->vd_ramh   = ((u_long)bm->hw_address >> 16) & 0xff;
    167       1.1      leo }
    168       1.1      leo 
    169       1.1      leo void
    170       1.1      leo tt_remove_view(v)
    171       1.1      leo view_t *v;
    172       1.1      leo {
    173       1.1      leo 	dmode_t *mode = v->mode;
    174       1.1      leo 
    175       1.1      leo 	if (mode->current_view == v) {
    176       1.1      leo #if 0
    177       1.1      leo 		if (v->flags & VF_DISPLAY)
    178      1.11   provos 			panic("Cannot shutdown display"); /* XXX */
    179       1.1      leo #endif
    180       1.1      leo 		mode->current_view = NULL;
    181       1.1      leo 	}
    182       1.1      leo 	v->flags &= ~VF_DISPLAY;
    183       1.6      leo }
    184       1.6      leo 
    185       1.6      leo void
    186       1.6      leo tt_save_view(v)
    187       1.6      leo view_t *v;
    188       1.6      leo {
    189       1.1      leo }
    190       1.1      leo 
    191       1.1      leo void
    192       1.1      leo tt_free_view(v)
    193       1.1      leo view_t *v;
    194       1.1      leo {
    195       1.1      leo 	if(v) {
    196       1.1      leo 		tt_remove_view(v);
    197       1.1      leo 		if (v->colormap != &gra_con_cmap)
    198       1.1      leo 			free(v->colormap, M_DEVBUF);
    199       1.1      leo 		free_bitmap(v->bitmap);
    200       1.1      leo 		if (v != &gra_con_view)
    201       1.1      leo 			free(v, M_DEVBUF);
    202       1.1      leo 	}
    203       1.1      leo }
    204       1.1      leo 
    205       1.1      leo static int
    206       1.1      leo tt_use_colormap(v, cm)
    207       1.1      leo view_t		*v;
    208       1.1      leo colormap_t	*cm;
    209       1.1      leo {
    210       1.1      leo 	dmode_t			*dm;
    211       1.1      leo 	volatile u_short	*creg;
    212       1.1      leo 	u_long			*src;
    213       1.1      leo 	colormap_t		*vcm;
    214       1.1      leo 	u_long			*vcreg;
    215       1.1      leo 	u_short			ncreg;
    216       1.1      leo 	int			i;
    217       1.1      leo 
    218       1.1      leo 	dm  = v->mode;
    219       1.1      leo 	vcm = v->colormap;
    220       1.1      leo 
    221       1.1      leo 	/*
    222       1.1      leo 	 * I guess it seems reasonable to require the maps to be
    223       1.1      leo 	 * of the same type...
    224       1.1      leo 	 */
    225       1.1      leo 	if (cm->type != vcm->type)
    226       1.1      leo 		return(EINVAL);
    227       1.1      leo 
    228       1.1      leo 	/*
    229       1.1      leo 	 * First figure out where the actual colormap resides and
    230       1.1      leo 	 * howmany colors are in it.
    231       1.1      leo 	 */
    232       1.5      leo 	switch (vm_reg(dm)) {
    233       1.1      leo 		case RES_STLOW:
    234       1.1      leo 			creg  = &VIDEO->vd_tt_rgb[0];
    235       1.1      leo 			ncreg = 16;
    236       1.1      leo 			break;
    237       1.1      leo 		case RES_STMID:
    238       1.1      leo 			creg  = &VIDEO->vd_tt_rgb[0];
    239       1.1      leo 			ncreg = 4;
    240       1.1      leo 			break;
    241       1.1      leo 		case RES_STHIGH:
    242       1.1      leo 			creg  = &VIDEO->vd_tt_rgb[254];
    243       1.1      leo 			ncreg = 2;
    244       1.1      leo 			break;
    245       1.1      leo 		case RES_TTLOW:
    246       1.1      leo 			creg  = &VIDEO->vd_tt_rgb[0];
    247       1.1      leo 			ncreg = 256;
    248       1.1      leo 			break;
    249       1.1      leo 		case RES_TTMID:
    250       1.1      leo 			creg  = &VIDEO->vd_tt_rgb[0];
    251       1.1      leo 			ncreg = 16;
    252       1.1      leo 			break;
    253       1.1      leo 		case RES_TTHIGH:
    254       1.1      leo 			return(0);	/* No colors	*/
    255       1.1      leo 		default:
    256       1.1      leo 			panic("grf_tt:use_colormap: wrong mode!?");
    257       1.1      leo 	}
    258       1.1      leo 
    259       1.1      leo 	/* If first entry specified beyond capabilities -> error */
    260       1.1      leo 	if (cm->first >= ncreg)
    261       1.1      leo 		return(EINVAL);
    262       1.1      leo 
    263       1.1      leo 	/*
    264       1.1      leo 	 * A little tricky, the actual colormap pointer will be NULL
    265       1.1      leo 	 * when view is not displaying, valid otherwise.
    266       1.1      leo 	 */
    267       1.1      leo 	if (v->flags & VF_DISPLAY)
    268       1.1      leo 		creg = &creg[cm->first];
    269       1.1      leo 	else creg = NULL;
    270       1.1      leo 
    271       1.1      leo 	vcreg  = &vcm->entry[cm->first];
    272       1.1      leo 	ncreg -= cm->first;
    273       1.1      leo 	if (cm->size > ncreg)
    274       1.1      leo 		return(EINVAL);
    275       1.1      leo 	ncreg = cm->size;
    276       1.1      leo 
    277       1.1      leo 	for (i = 0, src = cm->entry; i < ncreg; i++, vcreg++) {
    278       1.1      leo 		*vcreg = *src++;
    279       1.1      leo 
    280       1.1      leo 		/*
    281       1.1      leo 		 * If displaying, also update actual color registers.
    282       1.1      leo 		 */
    283       1.1      leo 		if (creg != NULL)
    284       1.1      leo 			*creg++ = CM_L2TT(*vcreg);
    285       1.1      leo 	}
    286       1.1      leo 	return (0);
    287       1.1      leo }
    288       1.1      leo 
    289       1.1      leo static view_t *
    290       1.1      leo tt_alloc_view(mode, dim, depth)
    291       1.1      leo dmode_t	*mode;
    292       1.1      leo dimen_t	*dim;
    293       1.1      leo u_char   depth;
    294       1.1      leo {
    295       1.1      leo 	view_t *v;
    296       1.1      leo 	bmap_t *bm;
    297       1.1      leo 
    298       1.1      leo 	if (!atari_realconfig)
    299       1.1      leo 		v = &gra_con_view;
    300       1.1      leo 	else v = malloc(sizeof(*v), M_DEVBUF, M_NOWAIT);
    301       1.1      leo 	if(v == NULL)
    302       1.1      leo 		return (NULL);
    303       1.1      leo 
    304       1.1      leo 	bm = alloc_bitmap(mode->size.width, mode->size.height, mode->depth);
    305       1.1      leo 	if (bm) {
    306       1.1      leo 		box_t   box;
    307       1.1      leo 
    308       1.1      leo 		v->colormap = alloc_colormap(mode);
    309       1.1      leo 		if (v->colormap) {
    310       1.1      leo 			INIT_BOX(&box,0,0,mode->size.width,mode->size.height);
    311       1.1      leo 			init_view(v, bm, mode, &box);
    312       1.1      leo 			return (v);
    313       1.1      leo 		}
    314       1.1      leo 		free_bitmap(bm);
    315       1.1      leo 	}
    316       1.1      leo 	if (v != &gra_con_view)
    317       1.1      leo 		free(v, M_DEVBUF);
    318       1.1      leo 	return (NULL);
    319       1.1      leo }
    320       1.1      leo 
    321       1.1      leo static void
    322       1.1      leo init_view(v, bm, mode, dbox)
    323       1.1      leo view_t	*v;
    324       1.1      leo bmap_t	*bm;
    325       1.1      leo dmode_t	*mode;
    326       1.1      leo box_t	*dbox;
    327       1.1      leo {
    328       1.1      leo 	v->bitmap = bm;
    329       1.1      leo 	v->mode   = mode;
    330       1.1      leo 	v->flags  = 0;
    331       1.1      leo 	bcopy(dbox, &v->display, sizeof(box_t));
    332       1.1      leo }
    333       1.1      leo 
    334       1.1      leo /* bitmap functions */
    335       1.1      leo 
    336       1.1      leo static bmap_t *
    337       1.1      leo alloc_bitmap(width, height, depth)
    338       1.1      leo u_long	width, height;
    339       1.1      leo u_char	depth;
    340       1.1      leo {
    341       1.1      leo 	u_long  total_size, bm_size;
    342       1.1      leo 	void	*hw_address;
    343       1.1      leo 	bmap_t	*bm;
    344       1.1      leo 
    345       1.1      leo 	/*
    346       1.1      leo 	 * Sigh, it seems for mapping to work we need the bitplane data to
    347       1.1      leo 	 *  1: be aligned on a page boundry.
    348       1.1      leo 	 *  2: be n pages large.
    349       1.1      leo 	 *
    350       1.1      leo 	 * why? because the user gets a page aligned address, if this is before
    351       1.1      leo 	 * your allocation, too bad.  Also it seems that the mapping routines
    352       1.1      leo 	 * do not watch to closely to the allowable length. so if you go over
    353       1.1      leo 	 * n pages by less than another page, the user gets to write all over
    354       1.1      leo 	 * the entire page. Since you did not allocate up to a page boundry
    355       1.1      leo 	 * (or more) the user writes into someone elses memory. -ch
    356       1.1      leo 	 */
    357       1.8    veego 	bm_size    = m68k_round_page((width * height * depth) / NBBY);
    358      1.12  thorpej 	total_size = bm_size + sizeof(bmap_t) + PAGE_SIZE;
    359       1.1      leo 
    360       1.1      leo 	if ((bm = (bmap_t*)alloc_stmem(total_size, &hw_address)) == NULL)
    361       1.1      leo 		return(NULL);
    362       1.1      leo 
    363       1.1      leo 	bm->plane         = (u_char*)bm + sizeof(bmap_t);
    364       1.8    veego 	bm->plane         = (u_char*)m68k_round_page(bm->plane);
    365       1.1      leo 	bm->hw_address    = (u_char*)hw_address + sizeof(bmap_t);
    366       1.8    veego 	bm->hw_address    = (u_char*)m68k_round_page(bm->hw_address);
    367       1.1      leo 	bm->bytes_per_row = (width * depth) / NBBY;
    368       1.1      leo 	bm->rows          = height;
    369       1.1      leo 	bm->depth         = depth;
    370       1.5      leo 	bm->regs          = NULL;
    371       1.5      leo 	bm->hw_regs       = NULL;
    372       1.5      leo 	bm->reg_size      = 0;
    373       1.7      leo 	bm->phys_mappable = (depth * width * height) / NBBY;
    374       1.9   thomas 	bm->lin_base      = 0;
    375       1.9   thomas 	bm->vga_address   = NULL;
    376       1.9   thomas 	bm->vga_mappable  = 0;
    377       1.9   thomas 	bm->vga_base      = 0;
    378       1.1      leo 
    379       1.1      leo 	bzero(bm->plane, bm_size);
    380       1.1      leo 	return (bm);
    381       1.1      leo }
    382       1.1      leo 
    383       1.1      leo static void
    384       1.1      leo free_bitmap(bm)
    385       1.1      leo bmap_t *bm;
    386       1.1      leo {
    387       1.1      leo 	if (bm)
    388       1.1      leo 		free_stmem(bm);
    389       1.1      leo }
    390       1.1      leo 
    391       1.1      leo static colormap_t *
    392       1.1      leo alloc_colormap(dm)
    393       1.1      leo dmode_t		*dm;
    394       1.1      leo {
    395       1.1      leo 	int		nentries, i;
    396       1.1      leo 	colormap_t	*cm;
    397       1.1      leo 	u_char		type = CM_COLOR;
    398       1.1      leo 
    399       1.5      leo 	switch (vm_reg(dm)) {
    400       1.1      leo 		case RES_STLOW:
    401       1.1      leo 		case RES_TTMID:
    402       1.1      leo 			nentries = 16;
    403       1.1      leo 			break;
    404       1.1      leo 		case RES_STMID:
    405       1.1      leo 			nentries = 4;
    406       1.1      leo 			break;
    407       1.1      leo 		case RES_STHIGH:
    408       1.1      leo 			nentries = 2;
    409       1.1      leo 			break;
    410       1.1      leo 		case RES_TTLOW:
    411       1.1      leo 			nentries = 256;
    412       1.1      leo 			break;
    413       1.1      leo 		case RES_TTHIGH:
    414       1.1      leo 			type     = CM_MONO;
    415       1.1      leo 			nentries = 0;
    416       1.1      leo 			break;
    417       1.1      leo 		default:
    418       1.1      leo 			panic("grf_tt:alloc_colormap: wrong mode!?");
    419       1.1      leo 	}
    420       1.1      leo 	if (!atari_realconfig) {
    421       1.1      leo 		cm = &gra_con_cmap;
    422       1.1      leo 		cm->entry = gra_con_colors;
    423       1.1      leo 	}
    424       1.1      leo 	else {
    425       1.1      leo 		int size;
    426       1.1      leo 
    427       1.1      leo 		size = sizeof(*cm) + (nentries * sizeof(cm->entry[0]));
    428       1.1      leo 		cm   = malloc(size, M_DEVBUF, M_NOWAIT);
    429       1.1      leo 		if (cm == NULL)
    430       1.1      leo 			return (NULL);
    431       1.1      leo 		cm->entry = (long *)&cm[1];
    432       1.1      leo 
    433       1.1      leo 	}
    434       1.1      leo 	if ((cm->type = type) == CM_COLOR)
    435       1.1      leo 		cm->red_mask = cm->green_mask = cm->blue_mask = 0xf;
    436       1.1      leo 	cm->first = 0;
    437       1.1      leo 	cm->size  = nentries;
    438       1.1      leo 
    439       1.1      leo 	for (i = 0; i < nentries; i++)
    440       1.1      leo 		cm->entry[i] = gra_def_color16[i % 16];
    441       1.1      leo 	return (cm);
    442       1.1      leo }
    443       1.1      leo #endif /* TT_VIDEO */
    444