0.3.1/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.11 2005/02/22 06:26:10 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;

        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", 0);
        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	2	/*
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.11 2005/02/22 06:26:10 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			idata = memory_readmax64(cpu, data, len);
79
80			/* Palette: */
81			if (relative_addr >= 0x800 && relative_addr <= 0xff8) {
82			int index = (relative_addr - 0x800) / 8;
83
84			if (writeflag == MEM_WRITE) {
85			d->fb->rgb_palette[index*3 + 0] = (idata >> 16) & 255;
86			d->fb->rgb_palette[index*3 + 1] = (idata >> 8) & 255;
87			d->fb->rgb_palette[index*3 + 2] = idata & 255;
88			schedule_redraw_of_whole_screen(d);
89			} else {
90			odata = (d->fb->rgb_palette[index*3 + 0] << 16) +
91			(d->fb->rgb_palette[index*3 + 1] << 8) +
92			d->fb->rgb_palette[index*3 + 2];
93			}
94			goto nice_return;
95			}
96
97			switch (relative_addr) {
98			case 0x0118:
99			odata = d->xsize / 4;
100			break;
101			case 0x0150:
102			/* TODO: This has to do with ysize, but I haven't
103			figured out exactly how yet. */
104			odata = d->ysize + 512;
105			break;
106			default:
107			if (writeflag == MEM_WRITE) {
108			debug("[ m700_fb: unimplemented write to address "
109			"0x%x, data=0x%02x ]\n",
110			(int)relative_addr, (int)idata);
111			} else {
112			debug("[ m700_fb: unimplemented read from address "
113			"0x%x ]\n", (int)relative_addr);
114			}
115			}
116
117			nice_return:
118			if (writeflag == MEM_READ)
119			memory_writemax64(cpu, data, len, odata);
120
121			return 1;
122			}
123
124
125			/*
126			* dev_m700_fb_init():
127			*/
128			void dev_m700_fb_init(struct machine machine, struct memory mem,
129			uint64_t baseaddr, uint64_t baseaddr2)
130			{
131			struct m700_fb_data *d = malloc(sizeof(struct m700_fb_data));
132			if (d == NULL) {
133			fprintf(stderr, "out of memory\n");
134			exit(1);
135			}
136			memset(d, 0, sizeof(struct m700_fb_data));
137			d->xsize = DEFAULT_XSIZE;
138			d->ysize = DEFAULT_YSIZE;
139
140			d->fb = dev_fb_init(machine, mem, baseaddr2, VFB_GENERIC,
141			d->xsize, d->ysize, d->xsize, d->ysize, 8, "M700 G364", 0);
142			if (d->fb == NULL) {
143			fprintf(stderr, "dev_m700_fb_init(): out of memory\n");
144			exit(1);
145			}
146
147			memory_device_register(mem, "m700_fb", baseaddr, DEV_M700_FB_LENGTH,
148			dev_m700_fb_access, (void *)d, MEM_DEFAULT, NULL);
149			}
150