[qemu.git] / hw / ssd0323.c

/*
 * SSD0323 OLED controller with OSRAM Pictiva 128x64 display.
 *
 * Copyright (c) 2006-2007 CodeSourcery.
 * Written by Paul Brook
 *
 * This code is licenced under the GPL.
 */

/* The controller can support a variety of different displays, but we only
   implement one.  Most of the commends relating to brightness and geometry
   setup are ignored. */
#include "hw.h"
#include "devices.h"
#include "console.h"

//#define DEBUG_SSD0323 1

#ifdef DEBUG_SSD0323
#define DPRINTF(fmt, args...) \
do { printf("ssd0323: " fmt , ##args); } while (0)
#define BADF(fmt, args...) \
do { fprintf(stderr, "ssd0323: error: " fmt , ##args); exit(1);} while (0)
#else
#define DPRINTF(fmt, args...) do {} while(0)
#define BADF(fmt, args...) \
do { fprintf(stderr, "ssd0323: error: " fmt , ##args);} while (0)
#endif

/* Scaling factor for pixels.  */
#define MAGNIFY 4

#define REMAP_SWAP_COLUMN 0x01
#define REMAP_SWAP_NYBBLE 0x02
#define REMAP_VERTICAL    0x04
#define REMAP_SWAP_COM    0x10
#define REMAP_SPLIT_COM   0x40

enum ssd0323_mode
{
    SSD0323_CMD,
    SSD0323_DATA
};

typedef struct {
    DisplayState *ds;

    int cmd_len;
    int cmd;
    int cmd_data[8];
    int row;
    int row_start;
    int row_end;
    int col;
    int col_start;
    int col_end;
    int redraw;
    int remap;
    enum ssd0323_mode mode;
    uint8_t framebuffer[128 * 80 / 2];
} ssd0323_state;

int ssd0323_xfer_ssi(void *opaque, int data)
{
    ssd0323_state *s = (ssd0323_state *)opaque;
    switch (s->mode) {
    case SSD0323_DATA:
        DPRINTF("data 0x%02x\n", data);
        s->framebuffer[s->col + s->row * 64] = data;
        if (s->remap & REMAP_VERTICAL) {
            s->row++;
            if (s->row > s->row_end) {
                s->row = s->row_start;
                s->col++;
            }
            if (s->col > s->col_end) {
                s->col = s->col_start;
            }
        } else {
            s->col++;
            if (s->col > s->col_end) {
                s->row++;
                s->col = s->col_start;
            }
            if (s->row > s->row_end) {
                s->row = s->row_start;
            }
        }
        s->redraw = 1;
        break;
    case SSD0323_CMD:
        DPRINTF("cmd 0x%02x\n", data);
        if (s->cmd_len == 0) {
            s->cmd = data;
        } else {
            s->cmd_data[s->cmd_len - 1] = data;
        }
        s->cmd_len++;
        switch (s->cmd) {
#define DATA(x) if (s->cmd_len <= (x)) return 0
        case 0x15: /* Set column.  */
            DATA(2);
            s->col = s->col_start = s->cmd_data[0] % 64;
            s->col_end = s->cmd_data[1] % 64;
            break;
        case 0x75: /* Set row.  */
            DATA(2);
            s->row = s->row_start = s->cmd_data[0] % 80;
            s->row_end = s->cmd_data[1] % 80;
            break;
        case 0x81: /* Set contrast */
            DATA(1);
            break;
        case 0x84: case 0x85: case 0x86: /* Max current.  */
            DATA(0);
            break;
        case 0xa0: /* Set remapping.  */
            /* FIXME: Implement this.  */
            DATA(1);
            s->remap = s->cmd_data[0];
            break;
        case 0xa1: /* Set display start line.  */
        case 0xa2: /* Set display offset.  */
            /* FIXME: Implement these.  */
            DATA(1);
            break;
        case 0xa4: /* Normal mode.  */
        case 0xa5: /* All on.  */
        case 0xa6: /* All off.  */
        case 0xa7: /* Inverse.  */
            /* FIXME: Implement these.  */
            DATA(0);
            break;
        case 0xa8: /* Set multiplex ratio.  */
        case 0xad: /* Set DC-DC converter.  */
            DATA(1);
            /* Ignored.  Don't care.  */
            break;
        case 0xae: /* Display off.  */
        case 0xaf: /* Display on.  */
            DATA(0);
            /* TODO: Implement power control.  */
            break;
        case 0xb1: /* Set phase length.  */
        case 0xb2: /* Set row period.  */
        case 0xb3: /* Set clock rate.  */
        case 0xbc: /* Set precharge.  */
        case 0xbe: /* Set VCOMH.  */
        case 0xbf: /* Set segment low.  */
            DATA(1);
            /* Ignored.  Don't care.  */
            break;
        case 0xb8: /* Set grey scale table.  */
            /* FIXME: Implement this.  */
            DATA(8);
            break;
        case 0xe3: /* NOP.  */
            DATA(0);
            break;
        case 0xff: /* Nasty hack because we don't handle chip selects
                      properly.  */
            break;
        default:
            BADF("Unknown command: 0x%x\n", data);
        }
        s->cmd_len = 0;
        return 0;
    }
    return 0;
}

static void ssd0323_update_display(void *opaque)
{
    ssd0323_state *s = (ssd0323_state *)opaque;
    uint8_t *dest;
    uint8_t *src;
    int x;
    int y;
    int i;
    int line;
    char *colors[16];
    char colortab[MAGNIFY * 64];
    char *p;
    int dest_width;

    if (s->redraw) {
        switch (s->ds->depth) {
        case 0:
            return;
        case 15:
            dest_width = 2;
            break;
        case 16:
            dest_width = 2;
            break;
        case 24:
            dest_width = 3;
            break;
        case 32:
            dest_width = 4;
            break;
        default:
            BADF("Bad color depth\n");
            return;
        }
        p = colortab;
        for (i = 0; i < 16; i++) {
            int n;
            colors[i] = p;
            switch (s->ds->depth) {
            case 15:
                n = i * 2 + (i >> 3);
                p[0] = n | (n << 5);
                p[1] = (n << 2) | (n >> 3);
                break;
            case 16:
                n = i * 2 + (i >> 3);
                p[0] = n | (n << 6) | ((n << 1) & 0x20);
                p[1] = (n << 3) | (n >> 2);
                break;
            case 24:
            case 32:
                n = (i << 4) | i;
                p[0] = p[1] = p[2] = n;
                break;
            default:
                BADF("Bad color depth\n");
                return;
            }
            p += dest_width;
        }
        /* TODO: Implement row/column remapping.  */
        dest = s->ds->data;
        for (y = 0; y < 64; y++) {
            line = y;
            src = s->framebuffer + 64 * line;
            for (x = 0; x < 64; x++) {
                int val;
                val = *src >> 4;
                for (i = 0; i < MAGNIFY; i++) {
                    memcpy(dest, colors[val], dest_width);
                    dest += dest_width;
                }
                val = *src & 0xf;
                for (i = 0; i < MAGNIFY; i++) {
                    memcpy(dest, colors[val], dest_width);
                    dest += dest_width;
                }
                src++;
            }
            for (i = 1; i < MAGNIFY; i++) {
                memcpy(dest, dest - dest_width * MAGNIFY * 128,
                       dest_width * 128 * MAGNIFY);
                dest += dest_width * 128 * MAGNIFY;
            }
        }
    }
    dpy_update(s->ds, 0, 0, 128 * MAGNIFY, 64 * MAGNIFY);
}

static void ssd0323_invalidate_display(void * opaque)
{
    ssd0323_state *s = (ssd0323_state *)opaque;
    s->redraw = 1;
}

/* Command/data input.  */
static void ssd0323_cd(void *opaque, int n, int level)
{
    ssd0323_state *s = (ssd0323_state *)opaque;
    DPRINTF("%s mode\n", level ? "Data" : "Command");
    s->mode = level ? SSD0323_DATA : SSD0323_CMD;
}

void *ssd0323_init(DisplayState *ds, qemu_irq *cmd_p)
{
    ssd0323_state *s;
    qemu_irq *cmd;

    s = (ssd0323_state *)qemu_mallocz(sizeof(ssd0323_state));
    s->ds = ds;
    graphic_console_init(ds, ssd0323_update_display, ssd0323_invalidate_display,
                         NULL, NULL, s);
    dpy_resize(s->ds, 128 * MAGNIFY, 64 * MAGNIFY);
    s->col_end = 63;
    s->row_end = 79;

    cmd = qemu_allocate_irqs(ssd0323_cd, s, 1);
    *cmd_p = *cmd;

    return s;
}
Commit	Line	Data
9ee6e8bb PB	1	/*
	2	* SSD0323 OLED controller with OSRAM Pictiva 128x64 display.
	3	*
	4	* Copyright (c) 2006-2007 CodeSourcery.
	5	* Written by Paul Brook
	6	*
	7	* This code is licenced under the GPL.
	8	*/
	9
	10	/* The controller can support a variety of different displays, but we only
	11	implement one. Most of the commends relating to brightness and geometry
	12	setup are ignored. */
87ecb68b PB	13	#include "hw.h"
	14	#include "devices.h"
	15	#include "console.h"
9ee6e8bb PB	16
	17	//#define DEBUG_SSD0323 1
	18
	19	#ifdef DEBUG_SSD0323
	20	#define DPRINTF(fmt, args...) \
	21	do { printf("ssd0323: " fmt , ##args); } while (0)
	22	#define BADF(fmt, args...) \
	23	do { fprintf(stderr, "ssd0323: error: " fmt , ##args); exit(1);} while (0)
	24	#else
	25	#define DPRINTF(fmt, args...) do {} while(0)
	26	#define BADF(fmt, args...) \
	27	do { fprintf(stderr, "ssd0323: error: " fmt , ##args);} while (0)
	28	#endif
	29
	30	/* Scaling factor for pixels. */
	31	#define MAGNIFY 4
	32
7ac56ff0 PB	33	#define REMAP_SWAP_COLUMN 0x01
	34	#define REMAP_SWAP_NYBBLE 0x02
	35	#define REMAP_VERTICAL 0x04
	36	#define REMAP_SWAP_COM 0x10
	37	#define REMAP_SPLIT_COM 0x40
	38
9ee6e8bb PB	39	enum ssd0323_mode
	40	{
	41	SSD0323_CMD,
	42	SSD0323_DATA
	43	};
	44
	45	typedef struct {
	46	DisplayState *ds;
	47
	48	int cmd_len;
	49	int cmd;
	50	int cmd_data[8];
	51	int row;
	52	int row_start;
	53	int row_end;
	54	int col;
	55	int col_start;
	56	int col_end;
	57	int redraw;
7ac56ff0	58	int remap;
9ee6e8bb PB	59	enum ssd0323_mode mode;
	60	uint8_t framebuffer[128 * 80 / 2];
	61	} ssd0323_state;
	62
	63	int ssd0323_xfer_ssi(void *opaque, int data)
	64	{
	65	ssd0323_state s = (ssd0323_state )opaque;
	66	switch (s->mode) {
	67	case SSD0323_DATA:
	68	DPRINTF("data 0x%02x\n", data);
	69	s->framebuffer[s->col + s->row * 64] = data;
7ac56ff0	70	if (s->remap & REMAP_VERTICAL) {
9ee6e8bb	71	s->row++;
7ac56ff0 PB	72	if (s->row > s->row_end) {
	73	s->row = s->row_start;
	74	s->col++;
	75	}
	76	if (s->col > s->col_end) {
	77	s->col = s->col_start;
	78	}
	79	} else {
	80	s->col++;
	81	if (s->col > s->col_end) {
	82	s->row++;
	83	s->col = s->col_start;
	84	}
	85	if (s->row > s->row_end) {
	86	s->row = s->row_start;
	87	}
9ee6e8bb PB	88	}
	89	s->redraw = 1;
	90	break;
	91	case SSD0323_CMD:
	92	DPRINTF("cmd 0x%02x\n", data);
	93	if (s->cmd_len == 0) {
	94	s->cmd = data;
	95	} else {
	96	s->cmd_data[s->cmd_len - 1] = data;
	97	}
	98	s->cmd_len++;
	99	switch (s->cmd) {
	100	#define DATA(x) if (s->cmd_len <= (x)) return 0
	101	case 0x15: /* Set column. */
	102	DATA(2);
7ac56ff0	103	s->col = s->col_start = s->cmd_data[0] % 64;
9ee6e8bb PB	104	s->col_end = s->cmd_data[1] % 64;
	105	break;
	106	case 0x75: /* Set row. */
	107	DATA(2);
7ac56ff0	108	s->row = s->row_start = s->cmd_data[0] % 80;
9ee6e8bb PB	109	s->row_end = s->cmd_data[1] % 80;
	110	break;
	111	case 0x81: /* Set contrast */
	112	DATA(1);
	113	break;
	114	case 0x84: case 0x85: case 0x86: /* Max current. */
	115	DATA(0);
	116	break;
	117	case 0xa0: /* Set remapping. */
	118	/* FIXME: Implement this. */
	119	DATA(1);
7ac56ff0	120	s->remap = s->cmd_data[0];
9ee6e8bb PB	121	break;
	122	case 0xa1: /* Set display start line. */
	123	case 0xa2: /* Set display offset. */
	124	/* FIXME: Implement these. */
	125	DATA(1);
	126	break;
	127	case 0xa4: /* Normal mode. */
	128	case 0xa5: /* All on. */
	129	case 0xa6: /* All off. */
	130	case 0xa7: /* Inverse. */
	131	/* FIXME: Implement these. */
	132	DATA(0);
	133	break;
	134	case 0xa8: /* Set multiplex ratio. */
	135	case 0xad: /* Set DC-DC converter. */
	136	DATA(1);
	137	/* Ignored. Don't care. */
	138	break;
	139	case 0xae: /* Display off. */
	140	case 0xaf: /* Display on. */
	141	DATA(0);
	142	/* TODO: Implement power control. */
	143	break;
	144	case 0xb1: /* Set phase length. */
	145	case 0xb2: /* Set row period. */
	146	case 0xb3: /* Set clock rate. */
	147	case 0xbc: /* Set precharge. */
	148	case 0xbe: /* Set VCOMH. */
	149	case 0xbf: /* Set segment low. */
	150	DATA(1);
	151	/* Ignored. Don't care. */
	152	break;
	153	case 0xb8: /* Set grey scale table. */
	154	/* FIXME: Implement this. */
	155	DATA(8);
	156	break;
	157	case 0xe3: /* NOP. */
	158	DATA(0);
	159	break;
775616c3 PB	160	case 0xff: /* Nasty hack because we don't handle chip selects
	161	properly. */
	162	break;
9ee6e8bb PB	163	default:
	164	BADF("Unknown command: 0x%x\n", data);
	165	}
	166	s->cmd_len = 0;
	167	return 0;
	168	}
	169	return 0;
	170	}
	171
	172	static void ssd0323_update_display(void *opaque)
	173	{
	174	ssd0323_state s = (ssd0323_state )opaque;
	175	uint8_t *dest;
	176	uint8_t *src;
	177	int x;
	178	int y;
	179	int i;
	180	int line;
	181	char *colors[16];
	182	char colortab[MAGNIFY * 64];
	183	char *p;
	184	int dest_width;
	185
	186	if (s->redraw) {
	187	switch (s->ds->depth) {
	188	case 0:
	189	return;
	190	case 15:
	191	dest_width = 2;
	192	break;
	193	case 16:
	194	dest_width = 2;
	195	break;
	196	case 24:
	197	dest_width = 3;
	198	break;
	199	case 32:
	200	dest_width = 4;
	201	break;
	202	default:
	203	BADF("Bad color depth\n");
	204	return;
	205	}
	206	p = colortab;
	207	for (i = 0; i < 16; i++) {
	208	int n;
	209	colors[i] = p;
	210	switch (s->ds->depth) {
	211	case 15:
	212	n = i * 2 + (i >> 3);
	213	p[0] = n \| (n << 5);
	214	p[1] = (n << 2) \| (n >> 3);
	215	break;
	216	case 16:
	217	n = i * 2 + (i >> 3);
	218	p[0] = n \| (n << 6) \| ((n << 1) & 0x20);
	219	p[1] = (n << 3) \| (n >> 2);
	220	break;
	221	case 24:
	222	case 32:
	223	n = (i << 4) \| i;
	224	p[0] = p[1] = p[2] = n;
	225	break;
	226	default:
227	BADF("Bad color depth\n");
228	return;
229	}
230	p += dest_width;
231	}
7ac56ff0	232	/* TODO: Implement row/column remapping. */
9ee6e8bb PB	233	dest = s->ds->data;
	234	for (y = 0; y < 64; y++) {
	235	line = y;
	236	src = s->framebuffer + 64 * line;
	237	for (x = 0; x < 64; x++) {
	238	int val;
	239	val = *src >> 4;
	240	for (i = 0; i < MAGNIFY; i++) {
	241	memcpy(dest, colors[val], dest_width);
	242	dest += dest_width;
	243	}
	244	val = *src & 0xf;
	245	for (i = 0; i < MAGNIFY; i++) {
	246	memcpy(dest, colors[val], dest_width);
	247	dest += dest_width;
	248	}
	249	src++;
	250	}
	251	for (i = 1; i < MAGNIFY; i++) {
	252	memcpy(dest, dest - dest_width * MAGNIFY * 128,
	253	dest_width * 128 * MAGNIFY);
	254	dest += dest_width * 128 * MAGNIFY;
	255	}
	256	}
	257	}
	258	dpy_update(s->ds, 0, 0, 128 * MAGNIFY, 64 * MAGNIFY);
	259	}
	260
	261	static void ssd0323_invalidate_display(void * opaque)
	262	{
	263	ssd0323_state s = (ssd0323_state )opaque;
	264	s->redraw = 1;
	265	}
	266
	267	/* Command/data input. */
	268	static void ssd0323_cd(void *opaque, int n, int level)
	269	{
	270	ssd0323_state s = (ssd0323_state )opaque;
	271	DPRINTF("%s mode\n", level ? "Data" : "Command");
	272	s->mode = level ? SSD0323_DATA : SSD0323_CMD;
	273	}
	274
	275	void ssd0323_init(DisplayState ds, qemu_irq *cmd_p)
	276	{
	277	ssd0323_state *s;
	278	qemu_irq *cmd;
	279
	280	s = (ssd0323_state *)qemu_mallocz(sizeof(ssd0323_state));
	281	s->ds = ds;
	282	graphic_console_init(ds, ssd0323_update_display, ssd0323_invalidate_display,
4d3b6f6e	283	NULL, NULL, s);
9ee6e8bb PB	284	dpy_resize(s->ds, 128 * MAGNIFY, 64 * MAGNIFY);
	285	s->col_end = 63;
	286	s->row_end = 79;
	287
	288	cmd = qemu_allocate_irqs(ssd0323_cd, s, 1);
	289	cmd_p = cmd;
	290
	291	return s;
	292	}