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	dpavlin	4	/*
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	dpavlin	18	* $Id: dev_m700_fb.c,v 1.13 2005/10/26 14:37:04 debug Exp $
29	dpavlin	4	*
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	dpavlin	18	if (writeflag == MEM_WRITE)
79			idata = memory_readmax64(cpu, data, len);
80	dpavlin	4
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	dpavlin	12	d->xsize, d->ysize, d->xsize, d->ysize, 8, "M700 G364");
143	dpavlin	4	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