src/devices/dev_m700_fb.c

/*
 *  Copyright (C) 2004-2005  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: dev_m700_fb.c,v 1.13 2005/10/26 14:37:04 debug Exp $
 *  
 *  Olivetti M700 framebuffer.
 *
 *  TODO: This is enough to show the penguin and some text, with Linux,
 *  but that's about it.
 */

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

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


#define DEFAULT_XSIZE           800
#define DEFAULT_YSIZE           600


struct m700_fb_data {
        struct vfb_data         *fb;
        int                     xsize;
        int                     ysize;
};


/*
 *  schedule_redraw_of_whole_screen():
 */
static void schedule_redraw_of_whole_screen(struct m700_fb_data *d)
{
        d->fb->update_x1 = 0;
        d->fb->update_x2 = d->fb->xsize - 1;
        d->fb->update_y1 = 0;
        d->fb->update_y2 = d->fb->ysize - 1;
}


/*
 *  dev_m700_fb_access():
 */
int dev_m700_fb_access(struct cpu *cpu, struct memory *mem,
        uint64_t relative_addr, unsigned char *data, size_t len,
        int writeflag, void *extra)
{
        struct m700_fb_data *d = (struct m700_fb_data *) extra;
        uint64_t idata = 0, odata = 0;

        if (writeflag == MEM_WRITE)
                idata = memory_readmax64(cpu, data, len);

        /*  Palette:  */
        if (relative_addr >= 0x800 && relative_addr <= 0xff8) {
                int index = (relative_addr - 0x800) / 8;

                if (writeflag == MEM_WRITE) {
                        d->fb->rgb_palette[index*3 + 0] = (idata >> 16) & 255;
                        d->fb->rgb_palette[index*3 + 1] = (idata >> 8) & 255;
                        d->fb->rgb_palette[index*3 + 2] = idata & 255;
                        schedule_redraw_of_whole_screen(d);
                } else {
                        odata = (d->fb->rgb_palette[index*3 + 0] << 16) +
                            (d->fb->rgb_palette[index*3 + 1] << 8) +
                            d->fb->rgb_palette[index*3 + 2];
                }
                goto nice_return;
        }

        switch (relative_addr) {
        case 0x0118:
                odata = d->xsize / 4;
                break;
        case 0x0150:
                /*  TODO: This has to do with ysize, but I haven't
                    figured out exactly how yet.  */
                odata = d->ysize + 512;
                break;
        default:
                if (writeflag == MEM_WRITE) {
                        debug("[ m700_fb: unimplemented write to address "
                            "0x%x, data=0x%02x ]\n",
                            (int)relative_addr, (int)idata);
                } else {
                        debug("[ m700_fb: unimplemented read from address "
                            "0x%x ]\n", (int)relative_addr);
                }
        }

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

        return 1;
}


/*
 *  dev_m700_fb_init():
 */
void dev_m700_fb_init(struct machine *machine, struct memory *mem,
        uint64_t baseaddr, uint64_t baseaddr2)
{
        struct m700_fb_data *d = malloc(sizeof(struct m700_fb_data));
        if (d == NULL) {
                fprintf(stderr, "out of memory\n");
                exit(1);
        }
        memset(d, 0, sizeof(struct m700_fb_data));
        d->xsize = DEFAULT_XSIZE;
        d->ysize = DEFAULT_YSIZE;

        d->fb = dev_fb_init(machine, mem, baseaddr2, VFB_GENERIC,
            d->xsize, d->ysize, d->xsize, d->ysize, 8, "M700 G364");
        if (d->fb == NULL) {
                fprintf(stderr, "dev_m700_fb_init(): out of memory\n");
                exit(1);
        }

        memory_device_register(mem, "m700_fb", baseaddr, DEV_M700_FB_LENGTH,
            dev_m700_fb_access, (void *)d, MEM_DEFAULT, NULL);
}

1	/*
2	* Copyright (C) 2004-2005 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: dev_m700_fb.c,v 1.13 2005/10/26 14:37:04 debug Exp $
29	*
30	* Olivetti M700 framebuffer.
31	*
32	* TODO: This is enough to show the penguin and some text, with Linux,
33	* but that's about it.
34	*/
35
36	#include <stdio.h>
37	#include <stdlib.h>
38	#include <string.h>
39
40	#include "devices.h"
41	#include "memory.h"
42	#include "misc.h"
43
44
45	#define DEFAULT_XSIZE 800
46	#define DEFAULT_YSIZE 600
47
48
49	struct m700_fb_data {
50	struct vfb_data *fb;
51	int xsize;
52	int ysize;
53	};
54
55
56	/*
57	* schedule_redraw_of_whole_screen():
58	*/
59	static void schedule_redraw_of_whole_screen(struct m700_fb_data *d)
60	{
61	d->fb->update_x1 = 0;
62	d->fb->update_x2 = d->fb->xsize - 1;
63	d->fb->update_y1 = 0;
64	d->fb->update_y2 = d->fb->ysize - 1;
65	}
66
67
68	/*
69	* dev_m700_fb_access():
70	*/
71	int dev_m700_fb_access(struct cpu cpu, struct memory mem,
72	uint64_t relative_addr, unsigned char *data, size_t len,
73	int writeflag, void *extra)
74	{
75	struct m700_fb_data d = (struct m700_fb_data ) extra;
76	uint64_t idata = 0, odata = 0;
77
78	if (writeflag == MEM_WRITE)
79	idata = memory_readmax64(cpu, data, len);
80
81	/* Palette: */
82	if (relative_addr >= 0x800 && relative_addr <= 0xff8) {
83	int index = (relative_addr - 0x800) / 8;
84
85	if (writeflag == MEM_WRITE) {
86	d->fb->rgb_palette[index*3 + 0] = (idata >> 16) & 255;
87	d->fb->rgb_palette[index*3 + 1] = (idata >> 8) & 255;
88	d->fb->rgb_palette[index*3 + 2] = idata & 255;
89	schedule_redraw_of_whole_screen(d);
90	} else {
91	odata = (d->fb->rgb_palette[index*3 + 0] << 16) +
92	(d->fb->rgb_palette[index*3 + 1] << 8) +
93	d->fb->rgb_palette[index*3 + 2];
94	}
95	goto nice_return;
96	}
97
98	switch (relative_addr) {
99	case 0x0118:
100	odata = d->xsize / 4;
101	break;
102	case 0x0150:
103	/* TODO: This has to do with ysize, but I haven't
104	figured out exactly how yet. */
105	odata = d->ysize + 512;
106	break;
107	default:
108	if (writeflag == MEM_WRITE) {
109	debug("[ m700_fb: unimplemented write to address "
110	"0x%x, data=0x%02x ]\n",
111	(int)relative_addr, (int)idata);
112	} else {
113	debug("[ m700_fb: unimplemented read from address "
114	"0x%x ]\n", (int)relative_addr);
115	}
116	}
117
118	nice_return:
119	if (writeflag == MEM_READ)
120	memory_writemax64(cpu, data, len, odata);
121
122	return 1;
123	}
124
125
126	/*
127	* dev_m700_fb_init():
128	*/
129	void dev_m700_fb_init(struct machine machine, struct memory mem,
130	uint64_t baseaddr, uint64_t baseaddr2)
131	{
132	struct m700_fb_data *d = malloc(sizeof(struct m700_fb_data));
133	if (d == NULL) {
134	fprintf(stderr, "out of memory\n");
135	exit(1);
136	}
137	memset(d, 0, sizeof(struct m700_fb_data));
138	d->xsize = DEFAULT_XSIZE;
139	d->ysize = DEFAULT_YSIZE;
140
141	d->fb = dev_fb_init(machine, mem, baseaddr2, VFB_GENERIC,
142	d->xsize, d->ysize, d->xsize, d->ysize, 8, "M700 G364");
143	if (d->fb == NULL) {
144	fprintf(stderr, "dev_m700_fb_init(): out of memory\n");
145	exit(1);
146	}
147
148	memory_device_register(mem, "m700_fb", baseaddr, DEV_M700_FB_LENGTH,
149	dev_m700_fb_access, (void *)d, MEM_DEFAULT, NULL);
150	}
151