src/devices/pci_dec21030.c

/*
 *  Copyright (C) 2004  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright  
 *     notice, this list of conditions and the following disclaimer in the 
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE   
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *   
 *
 *  $Id: pci_dec21030.c,v 1.15 2005/02/26 18:00:38 debug Exp $
 *
 *  DEC 21030 "tga" graphics.
 *
 *  Resolutions that seem to be possible:  640x480, 1024x768, 1280x1024.
 *  8 bits, perhaps others? (24 bit?)
 *
 *  NetBSD should say something like this:
 *
 *      tga0 at pci0 dev 12 function 0: TGA2 pass 2, board type T8-02
 *      tga0: 1280 x 1024, 8bpp, Bt485 RAMDAC
 *
 *  See netbsd/src/sys/dev/pci/tga.c for more info.
 *      tga_rop_vtov() for video-to-video copy (scrolling and fast
 *                      erasing)
 *
 *  TODO: This device is far from complete.
 *        The RAMDAC is non-existant.
 *
 *  TODO:  all fb device writes with direct writes to the framebuffer
 *  memory, and update the x1,y1,x2,y2 coordinates instead.
 *  That will give better performance.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "memory.h"
#include "misc.h"
#include "devices.h"
#include "bus_pci.h"
#include "tgareg.h"

#define MAX_XSIZE       2048

#if 1
int dec21030_default_xsize = 640;
int dec21030_default_ysize = 480;
#else
int dec21030_default_xsize = 1024;
int dec21030_default_ysize = 768;
#endif


/*  TODO:  Ugly hack:  this causes the framebuffer to be in memory  */
#define FRAMEBUFFER_PADDR       0x4000000000ULL
#define FRAMEBUFFER_BASE        0x201000

#define PCI_VENDOR_DEC         0x1011          /*  Digital Equipment  */
#define PCI_PRODUCT_DEC_21030  0x0004          /*  DECchip 21030 ("TGA")  */

struct dec21030_data {
        int             graphics_mode;
        uint32_t        pixel_mask;
        uint32_t        copy_source;
        uint32_t        color;
        struct vfb_data *vfb_data;
};


/*
 *  pci_dec21030_rr():
 *
 *  See http://mail-index.netbsd.org/port-arc/2001/08/13/0000.html
 *  for more info.
 */
uint32_t pci_dec21030_rr(int reg)
{
        switch (reg) {
        case 0x00:
                return PCI_VENDOR_DEC + (PCI_PRODUCT_DEC_21030 << 16);
        case 0x04:
                return 0x02800087;
        case 0x08:
                return 0x03800003;
                /*  return
                PCI_CLASS_CODE(PCI_CLASS_DISPLAY, PCI_SUBCLASS_DISPLAY_VGA, 0)
                + 0x03;  */
        case 0x0c:
                return 0x0000ff00;
        case 0x10:
                /*  address  (8=prefetchable)  */
                return 0x00000000 + 8;
        case 0x30:
                return 0x08000001;
        case 0x3c:
                return 0x00000100;      /*  interrupt pin ?  */
        default:
                return 0;
        }
}


/*
 *  dev_dec21030_access():
 */
int dev_dec21030_access(struct cpu *cpu, struct memory *mem,
        uint64_t relative_addr, unsigned char *data, size_t len,
        int writeflag, void *extra)
{
        struct dec21030_data *d = extra;
        uint64_t idata, odata = 0;
        int reg, r, i, white = 255, black = 0;
        int newlen;
        unsigned char buf2[MAX_XSIZE];

        /*  Read/write to the framebuffer:  */
        if (relative_addr >= FRAMEBUFFER_BASE) {
                /*  TODO:  Perhaps this isn't graphics mode (GMOR),
                    but GOPR (operation) specific:  */

                switch (d->graphics_mode) {
                case 1:         /*  Bitmap write:  */
                        /*  Copy from data into buf2:  */
                        for (i=0; i<len; i++) {
                                buf2[i*8 + 0] = data[i]&1? white : black;
                                buf2[i*8 + 1] = data[i]&2? white : black;
                                buf2[i*8 + 2] = data[i]&4? white : black;
                                buf2[i*8 + 3] = data[i]&8? white : black;
                                buf2[i*8 + 4] = data[i]&16? white : black;
                                buf2[i*8 + 5] = data[i]&32? white : black;
                                buf2[i*8 + 6] = data[i]&64? white : black;
                                buf2[i*8 + 7] = data[i]&128? white : black;
                        }

                        newlen = 0;
                        for (i=0; i<32; i++)
                                if (d->pixel_mask & (1 << i))
                                        newlen ++;

                        if (newlen > len * 8)
                                newlen = len * 8;

                        r = dev_fb_access(cpu, mem, relative_addr -
                            FRAMEBUFFER_BASE, buf2, newlen, writeflag,
                            d->vfb_data);
                        break;
                case 0x2d:      /*  Block fill:  */
                        /*  data is nr of pixels to fill minus one  */
                        newlen = memory_readmax64(cpu, data, len) + 1;
                        /*  debug("YO addr=0x%08x, newlen=%i\n", relative_addr,
                            newlen);  */
                        if (newlen > MAX_XSIZE)
                                newlen = MAX_XSIZE;
                        memset(buf2, d->color, newlen);
                        r = dev_fb_access(cpu, mem, relative_addr -
                            FRAMEBUFFER_BASE, buf2, newlen, MEM_WRITE,
                            d->vfb_data);
                        break;
                default:
                        r = dev_fb_access(cpu, mem, relative_addr -
                            FRAMEBUFFER_BASE, data, len, writeflag,
                            d->vfb_data);
                }
                return r;
        }

        idata = memory_readmax64(cpu, data, len);

        /*  Read from/write to the dec21030's registers:  */
        reg = ((relative_addr - TGA_MEM_CREGS) & (TGA_CREGS_ALIAS - 1))
            / sizeof(uint32_t);
        switch (reg) {

        /*  Color?  (there are 8 of these, 2 used in 8-bit mode,
            8 in 24-bit mode)  */
        case TGA_REG_GBCR0:
                if (writeflag == MEM_WRITE)
                        d->color = idata;
                else
                        odata = d->color;
                break;

        /*  Board revision  */
/*      case TGA_MEM_CREGS + sizeof(uint32_t) * TGA_REG_GREV:  */
        case TGA_REG_GREV:
                /*  01,02,03,04 (rev0) and 20,21,22 (rev1) are allowed  */
                odata = 0x04;
                break;

        /*  Graphics Mode:  */
        case TGA_REG_GMOR:
                if (writeflag == MEM_WRITE)
                        d->graphics_mode = idata;
                else
                        odata = d->graphics_mode;
                break;

        /*  Pixel mask:  */
        case TGA_REG_GPXR_S:            /*  "one-shot"  */
        case TGA_REG_GPXR_P:            /*  persistant  */
                if (writeflag == MEM_WRITE)
                        d->pixel_mask = idata;
                else
                        odata = d->pixel_mask;
                break;

        /*  Horizonsal size:  */
        case TGA_REG_VHCR:
                odata = dec21030_default_xsize / 4;     /*  lowest 9 bits  */
                break;

        /*  Vertical size:  */
        case TGA_REG_VVCR:
                odata = dec21030_default_ysize;         /*  lowest 11 bits  */
                break;

        /*  Block copy source:  */
        case TGA_REG_GCSR:
                d->copy_source = idata;
                debug("[ dec21030: block copy source = 0x%08x ]\n", idata);
                break;

        /*  Block copy destination:  */
        case TGA_REG_GCDR:
                debug("[ dec21030: block copy destination = 0x%08x ]\n", idata);
                newlen = 64;
                /*  Both source and destination are raw framebuffer addresses,
                    offset by 0x1000.  */
                dev_fb_access(cpu, mem, d->copy_source - 0x1000,
                    buf2, newlen, MEM_READ,  d->vfb_data);
                dev_fb_access(cpu, mem, idata - 0x1000,
                    buf2, newlen, MEM_WRITE, d->vfb_data);
                break;

        default:
                if (writeflag == MEM_WRITE)
                        debug("[ dec21030: unimplemented write to address"
                            " 0x%x (=reg 0x%x), data=0x%02x ]\n",
                            (int)relative_addr, reg, (int)idata);
                else
                        debug("[ dec21030: unimplemented read from address"
                            " 0x%x (=reg 0x%x) ]\n", (int)relative_addr, reg);
        }

        if (writeflag == MEM_READ)
                memory_writemax64(cpu, data, len, odata);

        return 1;
}


/*
 *  pci_dec21030_init():
 */
void pci_dec21030_init(struct machine *machine, struct memory *mem)
{
        struct dec21030_data *d;

        d = malloc(sizeof(struct dec21030_data));
        if (d == NULL) {
                fprintf(stderr, "out of memory\n");
                exit(1);
        }
        memset(d, 0, sizeof(struct dec21030_data));

        /*  TODO:  this address is based on what NetBSD/arc uses...
            fix this  */
        memory_device_register(mem, "dec21030", 0x100000000ULL,
            128*1048576, dev_dec21030_access, d, MEM_DEFAULT, NULL);

        /*
         *  TODO:  I have no idea about how/where this framebuffer should
         *  be in relation to the pci device
         */
        d->vfb_data = dev_fb_init(machine, mem, FRAMEBUFFER_PADDR, VFB_GENERIC,
            dec21030_default_xsize, dec21030_default_ysize,
            dec21030_default_xsize, dec21030_default_ysize, 8, "TGA", 0);
}

1	/*
2	* Copyright (C) 2004 Anders Gavare. All rights reserved.
3	*
4	* Redistribution and use in source and binary forms, with or without
5	* modification, are permitted provided that the following conditions are met:
6	*
7	* 1. Redistributions of source code must retain the above copyright
8	* notice, this list of conditions and the following disclaimer.
9	* 2. Redistributions in binary form must reproduce the above copyright
10	* notice, this list of conditions and the following disclaimer in the
11	* documentation and/or other materials provided with the distribution.
12	* 3. The name of the author may not be used to endorse or promote products
13	* derived from this software without specific prior written permission.
14	*
15	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25	* SUCH DAMAGE.
26	*
27	*
28	* $Id: pci_dec21030.c,v 1.15 2005/02/26 18:00:38 debug Exp $
29	*
30	* DEC 21030 "tga" graphics.
31	*
32	* Resolutions that seem to be possible: 640x480, 1024x768, 1280x1024.
33	* 8 bits, perhaps others? (24 bit?)
34	*
35	* NetBSD should say something like this:
36	*
37	* tga0 at pci0 dev 12 function 0: TGA2 pass 2, board type T8-02
38	* tga0: 1280 x 1024, 8bpp, Bt485 RAMDAC
39	*
40	* See netbsd/src/sys/dev/pci/tga.c for more info.
41	* tga_rop_vtov() for video-to-video copy (scrolling and fast
42	* erasing)
43	*
44	* TODO: This device is far from complete.
45	* The RAMDAC is non-existant.
46	*
47	* TODO: all fb device writes with direct writes to the framebuffer
48	* memory, and update the x1,y1,x2,y2 coordinates instead.
49	* That will give better performance.
50	*/
51
52	#include <stdio.h>
53	#include <stdlib.h>
54	#include <string.h>
55
56	#include "memory.h"
57	#include "misc.h"
58	#include "devices.h"
59	#include "bus_pci.h"
60	#include "tgareg.h"
61
62	#define MAX_XSIZE 2048
63
64	#if 1
65	int dec21030_default_xsize = 640;
66	int dec21030_default_ysize = 480;
67	#else
68	int dec21030_default_xsize = 1024;
69	int dec21030_default_ysize = 768;
70	#endif
71
72
73	/* TODO: Ugly hack: this causes the framebuffer to be in memory */
74	#define FRAMEBUFFER_PADDR 0x4000000000ULL
75	#define FRAMEBUFFER_BASE 0x201000
76
77	#define PCI_VENDOR_DEC 0x1011 /* Digital Equipment */
78	#define PCI_PRODUCT_DEC_21030 0x0004 /* DECchip 21030 ("TGA") */
79
80	struct dec21030_data {
81	int graphics_mode;
82	uint32_t pixel_mask;
83	uint32_t copy_source;
84	uint32_t color;
85	struct vfb_data *vfb_data;
86	};
87
88
89	/*
90	* pci_dec21030_rr():
91	*
92	* See http://mail-index.netbsd.org/port-arc/2001/08/13/0000.html
93	* for more info.
94	*/
95	uint32_t pci_dec21030_rr(int reg)
96	{
97	switch (reg) {
98	case 0x00:
99	return PCI_VENDOR_DEC + (PCI_PRODUCT_DEC_21030 << 16);
100	case 0x04:
101	return 0x02800087;
102	case 0x08:
103	return 0x03800003;
104	/* return
105	PCI_CLASS_CODE(PCI_CLASS_DISPLAY, PCI_SUBCLASS_DISPLAY_VGA, 0)
106	+ 0x03; */
107	case 0x0c:
108	return 0x0000ff00;
109	case 0x10:
110	/* address (8=prefetchable) */
111	return 0x00000000 + 8;
112	case 0x30:
113	return 0x08000001;
114	case 0x3c:
115	return 0x00000100; /* interrupt pin ? */
116	default:
117	return 0;
118	}
119	}
120
121
122	/*
123	* dev_dec21030_access():
124	*/
125	int dev_dec21030_access(struct cpu cpu, struct memory mem,
126	uint64_t relative_addr, unsigned char *data, size_t len,
127	int writeflag, void *extra)
128	{
129	struct dec21030_data *d = extra;
130	uint64_t idata, odata = 0;
131	int reg, r, i, white = 255, black = 0;
132	int newlen;
133	unsigned char buf2[MAX_XSIZE];
134
135	/* Read/write to the framebuffer: */
136	if (relative_addr >= FRAMEBUFFER_BASE) {
137	/* TODO: Perhaps this isn't graphics mode (GMOR),
138	but GOPR (operation) specific: */
139
140	switch (d->graphics_mode) {
141	case 1: /* Bitmap write: */
142	/* Copy from data into buf2: */
143	for (i=0; i<len; i++) {
144	buf2[i*8 + 0] = data[i]&1? white : black;
145	buf2[i*8 + 1] = data[i]&2? white : black;
146	buf2[i*8 + 2] = data[i]&4? white : black;
147	buf2[i*8 + 3] = data[i]&8? white : black;
148	buf2[i*8 + 4] = data[i]&16? white : black;
149	buf2[i*8 + 5] = data[i]&32? white : black;
150	buf2[i*8 + 6] = data[i]&64? white : black;
151	buf2[i*8 + 7] = data[i]&128? white : black;
152	}
153
154	newlen = 0;
155	for (i=0; i<32; i++)
156	if (d->pixel_mask & (1 << i))
157	newlen ++;
158
159	if (newlen > len * 8)
160	newlen = len * 8;
161
162	r = dev_fb_access(cpu, mem, relative_addr -
163	FRAMEBUFFER_BASE, buf2, newlen, writeflag,
164	d->vfb_data);
165	break;
166	case 0x2d: /* Block fill: */
167	/* data is nr of pixels to fill minus one */
168	newlen = memory_readmax64(cpu, data, len) + 1;
169	/* debug("YO addr=0x%08x, newlen=%i\n", relative_addr,
170	newlen); */
171	if (newlen > MAX_XSIZE)
172	newlen = MAX_XSIZE;
173	memset(buf2, d->color, newlen);
174	r = dev_fb_access(cpu, mem, relative_addr -
175	FRAMEBUFFER_BASE, buf2, newlen, MEM_WRITE,
176	d->vfb_data);
177	break;
178	default:
179	r = dev_fb_access(cpu, mem, relative_addr -
180	FRAMEBUFFER_BASE, data, len, writeflag,
181	d->vfb_data);
182	}
183	return r;
184	}
185
186	idata = memory_readmax64(cpu, data, len);
187
188	/* Read from/write to the dec21030's registers: */
189	reg = ((relative_addr - TGA_MEM_CREGS) & (TGA_CREGS_ALIAS - 1))
190	/ sizeof(uint32_t);
191	switch (reg) {
192
193	/* Color? (there are 8 of these, 2 used in 8-bit mode,
194	8 in 24-bit mode) */
195	case TGA_REG_GBCR0:
196	if (writeflag == MEM_WRITE)
197	d->color = idata;
198	else
199	odata = d->color;
200	break;
201
202	/* Board revision */
203	/* case TGA_MEM_CREGS + sizeof(uint32_t) * TGA_REG_GREV: */
204	case TGA_REG_GREV:
205	/* 01,02,03,04 (rev0) and 20,21,22 (rev1) are allowed */
206	odata = 0x04;
207	break;
208
209	/* Graphics Mode: */
210	case TGA_REG_GMOR:
211	if (writeflag == MEM_WRITE)
212	d->graphics_mode = idata;
213	else
214	odata = d->graphics_mode;
215	break;
216
217	/* Pixel mask: */
218	case TGA_REG_GPXR_S: /* "one-shot" */
219	case TGA_REG_GPXR_P: /* persistant */
220	if (writeflag == MEM_WRITE)
221	d->pixel_mask = idata;
222	else
223	odata = d->pixel_mask;
224	break;
225
226	/* Horizonsal size: */
227	case TGA_REG_VHCR:
228	odata = dec21030_default_xsize / 4; /* lowest 9 bits */
229	break;
230
231	/* Vertical size: */
232	case TGA_REG_VVCR:
233	odata = dec21030_default_ysize; /* lowest 11 bits */
234	break;
235
236	/* Block copy source: */
237	case TGA_REG_GCSR:
238	d->copy_source = idata;
239	debug("[ dec21030: block copy source = 0x%08x ]\n", idata);
240	break;
241
242	/* Block copy destination: */
243	case TGA_REG_GCDR:
244	debug("[ dec21030: block copy destination = 0x%08x ]\n", idata);
245	newlen = 64;
246	/* Both source and destination are raw framebuffer addresses,
247	offset by 0x1000. */
248	dev_fb_access(cpu, mem, d->copy_source - 0x1000,
249	buf2, newlen, MEM_READ, d->vfb_data);
250	dev_fb_access(cpu, mem, idata - 0x1000,
251	buf2, newlen, MEM_WRITE, d->vfb_data);
252	break;
253
254	default:
255	if (writeflag == MEM_WRITE)
256	debug("[ dec21030: unimplemented write to address"
257	" 0x%x (=reg 0x%x), data=0x%02x ]\n",
258	(int)relative_addr, reg, (int)idata);
259	else
260	debug("[ dec21030: unimplemented read from address"
261	" 0x%x (=reg 0x%x) ]\n", (int)relative_addr, reg);
262	}
263
264	if (writeflag == MEM_READ)
265	memory_writemax64(cpu, data, len, odata);
266
267	return 1;
268	}
269
270
271	/*
272	* pci_dec21030_init():
273	*/
274	void pci_dec21030_init(struct machine machine, struct memory mem)
275	{
276	struct dec21030_data *d;
277
278	d = malloc(sizeof(struct dec21030_data));
279	if (d == NULL) {
280	fprintf(stderr, "out of memory\n");
281	exit(1);
282	}
283	memset(d, 0, sizeof(struct dec21030_data));
284
285	/* TODO: this address is based on what NetBSD/arc uses...
286	fix this */
287	memory_device_register(mem, "dec21030", 0x100000000ULL,
288	128*1048576, dev_dec21030_access, d, MEM_DEFAULT, NULL);
289
290	/*
291	* TODO: I have no idea about how/where this framebuffer should
292	* be in relation to the pci device
293	*/
294	d->vfb_data = dev_fb_init(machine, mem, FRAMEBUFFER_PADDR, VFB_GENERIC,
295	dec21030_default_xsize, dec21030_default_ysize,
296	dec21030_default_xsize, dec21030_default_ysize, 8, "TGA", 0);
297	}
298