sm501: Add missing arbitration control register
[qemu.git] / hw / display / ssd0303.c
1 /*
2 * SSD0303 OLED controller with OSRAM Pictiva 96x16 display.
3 *
4 * Copyright (c) 2006-2007 CodeSourcery.
5 * Written by Paul Brook
6 *
7 * This code is licensed 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. */
13 #include "qemu/osdep.h"
14 #include "hw/i2c/i2c.h"
15 #include "ui/console.h"
16
17 //#define DEBUG_SSD0303 1
18
19 #ifdef DEBUG_SSD0303
20 #define DPRINTF(fmt, ...) \
21 do { printf("ssd0303: " fmt , ## __VA_ARGS__); } while (0)
22 #define BADF(fmt, ...) \
23 do { fprintf(stderr, "ssd0303: error: " fmt , ## __VA_ARGS__); exit(1);} while (0)
24 #else
25 #define DPRINTF(fmt, ...) do {} while(0)
26 #define BADF(fmt, ...) \
27 do { fprintf(stderr, "ssd0303: error: " fmt , ## __VA_ARGS__);} while (0)
28 #endif
29
30 /* Scaling factor for pixels. */
31 #define MAGNIFY 4
32
33 enum ssd0303_mode
34 {
35 SSD0303_IDLE,
36 SSD0303_DATA,
37 SSD0303_CMD
38 };
39
40 enum ssd0303_cmd {
41 SSD0303_CMD_NONE,
42 SSD0303_CMD_SKIP1
43 };
44
45 #define TYPE_SSD0303 "ssd0303"
46 #define SSD0303(obj) OBJECT_CHECK(ssd0303_state, (obj), TYPE_SSD0303)
47
48 typedef struct {
49 I2CSlave parent_obj;
50
51 QemuConsole *con;
52 int row;
53 int col;
54 int start_line;
55 int mirror;
56 int flash;
57 int enabled;
58 int inverse;
59 int redraw;
60 enum ssd0303_mode mode;
61 enum ssd0303_cmd cmd_state;
62 uint8_t framebuffer[132*8];
63 } ssd0303_state;
64
65 static int ssd0303_recv(I2CSlave *i2c)
66 {
67 BADF("Reads not implemented\n");
68 return -1;
69 }
70
71 static int ssd0303_send(I2CSlave *i2c, uint8_t data)
72 {
73 ssd0303_state *s = SSD0303(i2c);
74 enum ssd0303_cmd old_cmd_state;
75
76 switch (s->mode) {
77 case SSD0303_IDLE:
78 DPRINTF("byte 0x%02x\n", data);
79 if (data == 0x80)
80 s->mode = SSD0303_CMD;
81 else if (data == 0x40)
82 s->mode = SSD0303_DATA;
83 else
84 BADF("Unexpected byte 0x%x\n", data);
85 break;
86 case SSD0303_DATA:
87 DPRINTF("data 0x%02x\n", data);
88 if (s->col < 132) {
89 s->framebuffer[s->col + s->row * 132] = data;
90 s->col++;
91 s->redraw = 1;
92 }
93 break;
94 case SSD0303_CMD:
95 old_cmd_state = s->cmd_state;
96 s->cmd_state = SSD0303_CMD_NONE;
97 switch (old_cmd_state) {
98 case SSD0303_CMD_NONE:
99 DPRINTF("cmd 0x%02x\n", data);
100 s->mode = SSD0303_IDLE;
101 switch (data) {
102 case 0x00 ... 0x0f: /* Set lower column address. */
103 s->col = (s->col & 0xf0) | (data & 0xf);
104 break;
105 case 0x10 ... 0x20: /* Set higher column address. */
106 s->col = (s->col & 0x0f) | ((data & 0xf) << 4);
107 break;
108 case 0x40 ... 0x7f: /* Set start line. */
109 s->start_line = 0;
110 break;
111 case 0x81: /* Set contrast (Ignored). */
112 s->cmd_state = SSD0303_CMD_SKIP1;
113 break;
114 case 0xa0: /* Mirror off. */
115 s->mirror = 0;
116 break;
117 case 0xa1: /* Mirror off. */
118 s->mirror = 1;
119 break;
120 case 0xa4: /* Entire display off. */
121 s->flash = 0;
122 break;
123 case 0xa5: /* Entire display on. */
124 s->flash = 1;
125 break;
126 case 0xa6: /* Inverse off. */
127 s->inverse = 0;
128 break;
129 case 0xa7: /* Inverse on. */
130 s->inverse = 1;
131 break;
132 case 0xa8: /* Set multiplied ratio (Ignored). */
133 s->cmd_state = SSD0303_CMD_SKIP1;
134 break;
135 case 0xad: /* DC-DC power control. */
136 s->cmd_state = SSD0303_CMD_SKIP1;
137 break;
138 case 0xae: /* Display off. */
139 s->enabled = 0;
140 break;
141 case 0xaf: /* Display on. */
142 s->enabled = 1;
143 break;
144 case 0xb0 ... 0xbf: /* Set Page address. */
145 s->row = data & 7;
146 break;
147 case 0xc0 ... 0xc8: /* Set COM output direction (Ignored). */
148 break;
149 case 0xd3: /* Set display offset (Ignored). */
150 s->cmd_state = SSD0303_CMD_SKIP1;
151 break;
152 case 0xd5: /* Set display clock (Ignored). */
153 s->cmd_state = SSD0303_CMD_SKIP1;
154 break;
155 case 0xd8: /* Set color and power mode (Ignored). */
156 s->cmd_state = SSD0303_CMD_SKIP1;
157 break;
158 case 0xd9: /* Set pre-charge period (Ignored). */
159 s->cmd_state = SSD0303_CMD_SKIP1;
160 break;
161 case 0xda: /* Set COM pin configuration (Ignored). */
162 s->cmd_state = SSD0303_CMD_SKIP1;
163 break;
164 case 0xdb: /* Set VCOM dselect level (Ignored). */
165 s->cmd_state = SSD0303_CMD_SKIP1;
166 break;
167 case 0xe3: /* no-op. */
168 break;
169 default:
170 BADF("Unknown command: 0x%x\n", data);
171 }
172 break;
173 case SSD0303_CMD_SKIP1:
174 DPRINTF("skip 0x%02x\n", data);
175 break;
176 }
177 break;
178 }
179 return 0;
180 }
181
182 static int ssd0303_event(I2CSlave *i2c, enum i2c_event event)
183 {
184 ssd0303_state *s = SSD0303(i2c);
185
186 switch (event) {
187 case I2C_FINISH:
188 s->mode = SSD0303_IDLE;
189 break;
190 case I2C_START_RECV:
191 case I2C_START_SEND:
192 case I2C_NACK:
193 /* Nothing to do. */
194 break;
195 }
196
197 return 0;
198 }
199
200 static void ssd0303_update_display(void *opaque)
201 {
202 ssd0303_state *s = (ssd0303_state *)opaque;
203 DisplaySurface *surface = qemu_console_surface(s->con);
204 uint8_t *dest;
205 uint8_t *src;
206 int x;
207 int y;
208 int line;
209 char *colors[2];
210 char colortab[MAGNIFY * 8];
211 int dest_width;
212 uint8_t mask;
213
214 if (!s->redraw)
215 return;
216
217 switch (surface_bits_per_pixel(surface)) {
218 case 0:
219 return;
220 case 15:
221 dest_width = 2;
222 break;
223 case 16:
224 dest_width = 2;
225 break;
226 case 24:
227 dest_width = 3;
228 break;
229 case 32:
230 dest_width = 4;
231 break;
232 default:
233 BADF("Bad color depth\n");
234 return;
235 }
236 dest_width *= MAGNIFY;
237 memset(colortab, 0xff, dest_width);
238 memset(colortab + dest_width, 0, dest_width);
239 if (s->flash) {
240 colors[0] = colortab;
241 colors[1] = colortab;
242 } else if (s->inverse) {
243 colors[0] = colortab;
244 colors[1] = colortab + dest_width;
245 } else {
246 colors[0] = colortab + dest_width;
247 colors[1] = colortab;
248 }
249 dest = surface_data(surface);
250 for (y = 0; y < 16; y++) {
251 line = (y + s->start_line) & 63;
252 src = s->framebuffer + 132 * (line >> 3) + 36;
253 mask = 1 << (line & 7);
254 for (x = 0; x < 96; x++) {
255 memcpy(dest, colors[(*src & mask) != 0], dest_width);
256 dest += dest_width;
257 src++;
258 }
259 for (x = 1; x < MAGNIFY; x++) {
260 memcpy(dest, dest - dest_width * 96, dest_width * 96);
261 dest += dest_width * 96;
262 }
263 }
264 s->redraw = 0;
265 dpy_gfx_update(s->con, 0, 0, 96 * MAGNIFY, 16 * MAGNIFY);
266 }
267
268 static void ssd0303_invalidate_display(void * opaque)
269 {
270 ssd0303_state *s = (ssd0303_state *)opaque;
271 s->redraw = 1;
272 }
273
274 static const VMStateDescription vmstate_ssd0303 = {
275 .name = "ssd0303_oled",
276 .version_id = 1,
277 .minimum_version_id = 1,
278 .fields = (VMStateField[]) {
279 VMSTATE_INT32(row, ssd0303_state),
280 VMSTATE_INT32(col, ssd0303_state),
281 VMSTATE_INT32(start_line, ssd0303_state),
282 VMSTATE_INT32(mirror, ssd0303_state),
283 VMSTATE_INT32(flash, ssd0303_state),
284 VMSTATE_INT32(enabled, ssd0303_state),
285 VMSTATE_INT32(inverse, ssd0303_state),
286 VMSTATE_INT32(redraw, ssd0303_state),
287 VMSTATE_UINT32(mode, ssd0303_state),
288 VMSTATE_UINT32(cmd_state, ssd0303_state),
289 VMSTATE_BUFFER(framebuffer, ssd0303_state),
290 VMSTATE_I2C_SLAVE(parent_obj, ssd0303_state),
291 VMSTATE_END_OF_LIST()
292 }
293 };
294
295 static const GraphicHwOps ssd0303_ops = {
296 .invalidate = ssd0303_invalidate_display,
297 .gfx_update = ssd0303_update_display,
298 };
299
300 static int ssd0303_init(I2CSlave *i2c)
301 {
302 ssd0303_state *s = SSD0303(i2c);
303
304 s->con = graphic_console_init(DEVICE(i2c), 0, &ssd0303_ops, s);
305 qemu_console_resize(s->con, 96 * MAGNIFY, 16 * MAGNIFY);
306 return 0;
307 }
308
309 static void ssd0303_class_init(ObjectClass *klass, void *data)
310 {
311 DeviceClass *dc = DEVICE_CLASS(klass);
312 I2CSlaveClass *k = I2C_SLAVE_CLASS(klass);
313
314 k->init = ssd0303_init;
315 k->event = ssd0303_event;
316 k->recv = ssd0303_recv;
317 k->send = ssd0303_send;
318 dc->vmsd = &vmstate_ssd0303;
319 }
320
321 static const TypeInfo ssd0303_info = {
322 .name = TYPE_SSD0303,
323 .parent = TYPE_I2C_SLAVE,
324 .instance_size = sizeof(ssd0303_state),
325 .class_init = ssd0303_class_init,
326 };
327
328 static void ssd0303_register_types(void)
329 {
330 type_register_static(&ssd0303_info);
331 }
332
333 type_init(ssd0303_register_types)