Merge branch 'upstream-merge'
[qemu-kvm/markmc.git] / hw / spitz.c
blob564519b2c7d7664f4a5288552da8bf1d9cc7c170
1 /*
2 * PXA270-based Clamshell PDA platforms.
4 * Copyright (c) 2006 Openedhand Ltd.
5 * Written by Andrzej Zaborowski <balrog@zabor.org>
7 * This code is licensed under the GNU GPL v2.
8 */
10 #include "hw.h"
11 #include "pxa.h"
12 #include "arm-misc.h"
13 #include "sysemu.h"
14 #include "pcmcia.h"
15 #include "i2c.h"
16 #include "ssi.h"
17 #include "flash.h"
18 #include "qemu-timer.h"
19 #include "devices.h"
20 #include "sharpsl.h"
21 #include "console.h"
22 #include "block.h"
23 #include "audio/audio.h"
24 #include "boards.h"
26 #undef REG_FMT
27 #define REG_FMT "0x%02lx"
29 /* Spitz Flash */
30 #define FLASH_BASE 0x0c000000
31 #define FLASH_ECCLPLB 0x00 /* Line parity 7 - 0 bit */
32 #define FLASH_ECCLPUB 0x04 /* Line parity 15 - 8 bit */
33 #define FLASH_ECCCP 0x08 /* Column parity 5 - 0 bit */
34 #define FLASH_ECCCNTR 0x0c /* ECC byte counter */
35 #define FLASH_ECCCLRR 0x10 /* Clear ECC */
36 #define FLASH_FLASHIO 0x14 /* Flash I/O */
37 #define FLASH_FLASHCTL 0x18 /* Flash Control */
39 #define FLASHCTL_CE0 (1 << 0)
40 #define FLASHCTL_CLE (1 << 1)
41 #define FLASHCTL_ALE (1 << 2)
42 #define FLASHCTL_WP (1 << 3)
43 #define FLASHCTL_CE1 (1 << 4)
44 #define FLASHCTL_RYBY (1 << 5)
45 #define FLASHCTL_NCE (FLASHCTL_CE0 | FLASHCTL_CE1)
47 typedef struct {
48 NANDFlashState *nand;
49 uint8_t ctl;
50 ECCState ecc;
51 } SLNANDState;
53 static uint32_t sl_readb(void *opaque, target_phys_addr_t addr)
55 SLNANDState *s = (SLNANDState *) opaque;
56 int ryby;
58 switch (addr) {
59 #define BSHR(byte, from, to) ((s->ecc.lp[byte] >> (from - to)) & (1 << to))
60 case FLASH_ECCLPLB:
61 return BSHR(0, 4, 0) | BSHR(0, 5, 2) | BSHR(0, 6, 4) | BSHR(0, 7, 6) |
62 BSHR(1, 4, 1) | BSHR(1, 5, 3) | BSHR(1, 6, 5) | BSHR(1, 7, 7);
64 #define BSHL(byte, from, to) ((s->ecc.lp[byte] << (to - from)) & (1 << to))
65 case FLASH_ECCLPUB:
66 return BSHL(0, 0, 0) | BSHL(0, 1, 2) | BSHL(0, 2, 4) | BSHL(0, 3, 6) |
67 BSHL(1, 0, 1) | BSHL(1, 1, 3) | BSHL(1, 2, 5) | BSHL(1, 3, 7);
69 case FLASH_ECCCP:
70 return s->ecc.cp;
72 case FLASH_ECCCNTR:
73 return s->ecc.count & 0xff;
75 case FLASH_FLASHCTL:
76 nand_getpins(s->nand, &ryby);
77 if (ryby)
78 return s->ctl | FLASHCTL_RYBY;
79 else
80 return s->ctl;
82 case FLASH_FLASHIO:
83 return ecc_digest(&s->ecc, nand_getio(s->nand));
85 default:
86 zaurus_printf("Bad register offset " REG_FMT "\n", (unsigned long)addr);
88 return 0;
91 static uint32_t sl_readl(void *opaque, target_phys_addr_t addr)
93 SLNANDState *s = (SLNANDState *) opaque;
95 if (addr == FLASH_FLASHIO)
96 return ecc_digest(&s->ecc, nand_getio(s->nand)) |
97 (ecc_digest(&s->ecc, nand_getio(s->nand)) << 16);
99 return sl_readb(opaque, addr);
102 static void sl_writeb(void *opaque, target_phys_addr_t addr,
103 uint32_t value)
105 SLNANDState *s = (SLNANDState *) opaque;
107 switch (addr) {
108 case FLASH_ECCCLRR:
109 /* Value is ignored. */
110 ecc_reset(&s->ecc);
111 break;
113 case FLASH_FLASHCTL:
114 s->ctl = value & 0xff & ~FLASHCTL_RYBY;
115 nand_setpins(s->nand,
116 s->ctl & FLASHCTL_CLE,
117 s->ctl & FLASHCTL_ALE,
118 s->ctl & FLASHCTL_NCE,
119 s->ctl & FLASHCTL_WP,
121 break;
123 case FLASH_FLASHIO:
124 nand_setio(s->nand, ecc_digest(&s->ecc, value & 0xff));
125 break;
127 default:
128 zaurus_printf("Bad register offset " REG_FMT "\n", (unsigned long)addr);
132 static void sl_save(QEMUFile *f, void *opaque)
134 SLNANDState *s = (SLNANDState *) opaque;
136 qemu_put_8s(f, &s->ctl);
137 ecc_put(f, &s->ecc);
140 static int sl_load(QEMUFile *f, void *opaque, int version_id)
142 SLNANDState *s = (SLNANDState *) opaque;
144 qemu_get_8s(f, &s->ctl);
145 ecc_get(f, &s->ecc);
147 return 0;
150 enum {
151 FLASH_128M,
152 FLASH_1024M,
155 static void sl_flash_register(PXA2xxState *cpu, int size)
157 int iomemtype;
158 SLNANDState *s;
159 CPUReadMemoryFunc * const sl_readfn[] = {
160 sl_readb,
161 sl_readb,
162 sl_readl,
164 CPUWriteMemoryFunc * const sl_writefn[] = {
165 sl_writeb,
166 sl_writeb,
167 sl_writeb,
170 s = (SLNANDState *) qemu_mallocz(sizeof(SLNANDState));
171 s->ctl = 0;
172 if (size == FLASH_128M)
173 s->nand = nand_init(NAND_MFR_SAMSUNG, 0x73);
174 else if (size == FLASH_1024M)
175 s->nand = nand_init(NAND_MFR_SAMSUNG, 0xf1);
177 iomemtype = cpu_register_io_memory(sl_readfn,
178 sl_writefn, s);
179 cpu_register_physical_memory(FLASH_BASE, 0x40, iomemtype);
181 register_savevm("sl_flash", 0, 0, sl_save, sl_load, s);
184 /* Spitz Keyboard */
186 #define SPITZ_KEY_STROBE_NUM 11
187 #define SPITZ_KEY_SENSE_NUM 7
189 static const int spitz_gpio_key_sense[SPITZ_KEY_SENSE_NUM] = {
190 12, 17, 91, 34, 36, 38, 39
193 static const int spitz_gpio_key_strobe[SPITZ_KEY_STROBE_NUM] = {
194 88, 23, 24, 25, 26, 27, 52, 103, 107, 108, 114
197 /* Eighth additional row maps the special keys */
198 static int spitz_keymap[SPITZ_KEY_SENSE_NUM + 1][SPITZ_KEY_STROBE_NUM] = {
199 { 0x1d, 0x02, 0x04, 0x06, 0x07, 0x08, 0x0a, 0x0b, 0x0e, 0x3f, 0x40 },
200 { -1 , 0x03, 0x05, 0x13, 0x15, 0x09, 0x17, 0x18, 0x19, 0x41, 0x42 },
201 { 0x0f, 0x10, 0x12, 0x14, 0x22, 0x16, 0x24, 0x25, -1 , -1 , -1 },
202 { 0x3c, 0x11, 0x1f, 0x21, 0x2f, 0x23, 0x32, 0x26, -1 , 0x36, -1 },
203 { 0x3b, 0x1e, 0x20, 0x2e, 0x30, 0x31, 0x34, -1 , 0x1c, 0x2a, -1 },
204 { 0x44, 0x2c, 0x2d, 0x0c, 0x39, 0x33, -1 , 0x48, -1 , -1 , 0x38 },
205 { 0x37, 0x3d, -1 , 0x45, 0x57, 0x58, 0x4b, 0x50, 0x4d, -1 , -1 },
206 { 0x52, 0x43, 0x01, 0x47, 0x49, -1 , -1 , -1 , -1 , -1 , -1 },
209 #define SPITZ_GPIO_AK_INT 13 /* Remote control */
210 #define SPITZ_GPIO_SYNC 16 /* Sync button */
211 #define SPITZ_GPIO_ON_KEY 95 /* Power button */
212 #define SPITZ_GPIO_SWA 97 /* Lid */
213 #define SPITZ_GPIO_SWB 96 /* Tablet mode */
215 /* The special buttons are mapped to unused keys */
216 static const int spitz_gpiomap[5] = {
217 SPITZ_GPIO_AK_INT, SPITZ_GPIO_SYNC, SPITZ_GPIO_ON_KEY,
218 SPITZ_GPIO_SWA, SPITZ_GPIO_SWB,
220 static int spitz_gpio_invert[5] = { 0, 0, 0, 0, 0, };
222 typedef struct {
223 qemu_irq sense[SPITZ_KEY_SENSE_NUM];
224 qemu_irq *strobe;
225 qemu_irq gpiomap[5];
226 int keymap[0x80];
227 uint16_t keyrow[SPITZ_KEY_SENSE_NUM];
228 uint16_t strobe_state;
229 uint16_t sense_state;
231 uint16_t pre_map[0x100];
232 uint16_t modifiers;
233 uint16_t imodifiers;
234 uint8_t fifo[16];
235 int fifopos, fifolen;
236 QEMUTimer *kbdtimer;
237 } SpitzKeyboardState;
239 static void spitz_keyboard_sense_update(SpitzKeyboardState *s)
241 int i;
242 uint16_t strobe, sense = 0;
243 for (i = 0; i < SPITZ_KEY_SENSE_NUM; i ++) {
244 strobe = s->keyrow[i] & s->strobe_state;
245 if (strobe) {
246 sense |= 1 << i;
247 if (!(s->sense_state & (1 << i)))
248 qemu_irq_raise(s->sense[i]);
249 } else if (s->sense_state & (1 << i))
250 qemu_irq_lower(s->sense[i]);
253 s->sense_state = sense;
256 static void spitz_keyboard_strobe(void *opaque, int line, int level)
258 SpitzKeyboardState *s = (SpitzKeyboardState *) opaque;
260 if (level)
261 s->strobe_state |= 1 << line;
262 else
263 s->strobe_state &= ~(1 << line);
264 spitz_keyboard_sense_update(s);
267 static void spitz_keyboard_keydown(SpitzKeyboardState *s, int keycode)
269 int spitz_keycode = s->keymap[keycode & 0x7f];
270 if (spitz_keycode == -1)
271 return;
273 /* Handle the additional keys */
274 if ((spitz_keycode >> 4) == SPITZ_KEY_SENSE_NUM) {
275 qemu_set_irq(s->gpiomap[spitz_keycode & 0xf], (keycode < 0x80) ^
276 spitz_gpio_invert[spitz_keycode & 0xf]);
277 return;
280 if (keycode & 0x80)
281 s->keyrow[spitz_keycode >> 4] &= ~(1 << (spitz_keycode & 0xf));
282 else
283 s->keyrow[spitz_keycode >> 4] |= 1 << (spitz_keycode & 0xf);
285 spitz_keyboard_sense_update(s);
288 #define SHIFT (1 << 7)
289 #define CTRL (1 << 8)
290 #define FN (1 << 9)
292 #define QUEUE_KEY(c) s->fifo[(s->fifopos + s->fifolen ++) & 0xf] = c
294 static void spitz_keyboard_handler(SpitzKeyboardState *s, int keycode)
296 uint16_t code;
297 int mapcode;
298 switch (keycode) {
299 case 0x2a: /* Left Shift */
300 s->modifiers |= 1;
301 break;
302 case 0xaa:
303 s->modifiers &= ~1;
304 break;
305 case 0x36: /* Right Shift */
306 s->modifiers |= 2;
307 break;
308 case 0xb6:
309 s->modifiers &= ~2;
310 break;
311 case 0x1d: /* Control */
312 s->modifiers |= 4;
313 break;
314 case 0x9d:
315 s->modifiers &= ~4;
316 break;
317 case 0x38: /* Alt */
318 s->modifiers |= 8;
319 break;
320 case 0xb8:
321 s->modifiers &= ~8;
322 break;
325 code = s->pre_map[mapcode = ((s->modifiers & 3) ?
326 (keycode | SHIFT) :
327 (keycode & ~SHIFT))];
329 if (code != mapcode) {
330 #if 0
331 if ((code & SHIFT) && !(s->modifiers & 1))
332 QUEUE_KEY(0x2a | (keycode & 0x80));
333 if ((code & CTRL ) && !(s->modifiers & 4))
334 QUEUE_KEY(0x1d | (keycode & 0x80));
335 if ((code & FN ) && !(s->modifiers & 8))
336 QUEUE_KEY(0x38 | (keycode & 0x80));
337 if ((code & FN ) && (s->modifiers & 1))
338 QUEUE_KEY(0x2a | (~keycode & 0x80));
339 if ((code & FN ) && (s->modifiers & 2))
340 QUEUE_KEY(0x36 | (~keycode & 0x80));
341 #else
342 if (keycode & 0x80) {
343 if ((s->imodifiers & 1 ) && !(s->modifiers & 1))
344 QUEUE_KEY(0x2a | 0x80);
345 if ((s->imodifiers & 4 ) && !(s->modifiers & 4))
346 QUEUE_KEY(0x1d | 0x80);
347 if ((s->imodifiers & 8 ) && !(s->modifiers & 8))
348 QUEUE_KEY(0x38 | 0x80);
349 if ((s->imodifiers & 0x10) && (s->modifiers & 1))
350 QUEUE_KEY(0x2a);
351 if ((s->imodifiers & 0x20) && (s->modifiers & 2))
352 QUEUE_KEY(0x36);
353 s->imodifiers = 0;
354 } else {
355 if ((code & SHIFT) && !((s->modifiers | s->imodifiers) & 1)) {
356 QUEUE_KEY(0x2a);
357 s->imodifiers |= 1;
359 if ((code & CTRL ) && !((s->modifiers | s->imodifiers) & 4)) {
360 QUEUE_KEY(0x1d);
361 s->imodifiers |= 4;
363 if ((code & FN ) && !((s->modifiers | s->imodifiers) & 8)) {
364 QUEUE_KEY(0x38);
365 s->imodifiers |= 8;
367 if ((code & FN ) && (s->modifiers & 1) &&
368 !(s->imodifiers & 0x10)) {
369 QUEUE_KEY(0x2a | 0x80);
370 s->imodifiers |= 0x10;
372 if ((code & FN ) && (s->modifiers & 2) &&
373 !(s->imodifiers & 0x20)) {
374 QUEUE_KEY(0x36 | 0x80);
375 s->imodifiers |= 0x20;
378 #endif
381 QUEUE_KEY((code & 0x7f) | (keycode & 0x80));
384 static void spitz_keyboard_tick(void *opaque)
386 SpitzKeyboardState *s = (SpitzKeyboardState *) opaque;
388 if (s->fifolen) {
389 spitz_keyboard_keydown(s, s->fifo[s->fifopos ++]);
390 s->fifolen --;
391 if (s->fifopos >= 16)
392 s->fifopos = 0;
395 qemu_mod_timer(s->kbdtimer, qemu_get_clock(vm_clock) +
396 get_ticks_per_sec() / 32);
399 static void spitz_keyboard_pre_map(SpitzKeyboardState *s)
401 int i;
402 for (i = 0; i < 0x100; i ++)
403 s->pre_map[i] = i;
404 s->pre_map[0x02 | SHIFT ] = 0x02 | SHIFT; /* exclam */
405 s->pre_map[0x28 | SHIFT ] = 0x03 | SHIFT; /* quotedbl */
406 s->pre_map[0x04 | SHIFT ] = 0x04 | SHIFT; /* numbersign */
407 s->pre_map[0x05 | SHIFT ] = 0x05 | SHIFT; /* dollar */
408 s->pre_map[0x06 | SHIFT ] = 0x06 | SHIFT; /* percent */
409 s->pre_map[0x08 | SHIFT ] = 0x07 | SHIFT; /* ampersand */
410 s->pre_map[0x28 ] = 0x08 | SHIFT; /* apostrophe */
411 s->pre_map[0x0a | SHIFT ] = 0x09 | SHIFT; /* parenleft */
412 s->pre_map[0x0b | SHIFT ] = 0x0a | SHIFT; /* parenright */
413 s->pre_map[0x29 | SHIFT ] = 0x0b | SHIFT; /* asciitilde */
414 s->pre_map[0x03 | SHIFT ] = 0x0c | SHIFT; /* at */
415 s->pre_map[0xd3 ] = 0x0e | FN; /* Delete */
416 s->pre_map[0x3a ] = 0x0f | FN; /* Caps_Lock */
417 s->pre_map[0x07 | SHIFT ] = 0x11 | FN; /* asciicircum */
418 s->pre_map[0x0d ] = 0x12 | FN; /* equal */
419 s->pre_map[0x0d | SHIFT ] = 0x13 | FN; /* plus */
420 s->pre_map[0x1a ] = 0x14 | FN; /* bracketleft */
421 s->pre_map[0x1b ] = 0x15 | FN; /* bracketright */
422 s->pre_map[0x1a | SHIFT ] = 0x16 | FN; /* braceleft */
423 s->pre_map[0x1b | SHIFT ] = 0x17 | FN; /* braceright */
424 s->pre_map[0x27 ] = 0x22 | FN; /* semicolon */
425 s->pre_map[0x27 | SHIFT ] = 0x23 | FN; /* colon */
426 s->pre_map[0x09 | SHIFT ] = 0x24 | FN; /* asterisk */
427 s->pre_map[0x2b ] = 0x25 | FN; /* backslash */
428 s->pre_map[0x2b | SHIFT ] = 0x26 | FN; /* bar */
429 s->pre_map[0x0c | SHIFT ] = 0x30 | FN; /* underscore */
430 s->pre_map[0x33 | SHIFT ] = 0x33 | FN; /* less */
431 s->pre_map[0x35 ] = 0x33 | SHIFT; /* slash */
432 s->pre_map[0x34 | SHIFT ] = 0x34 | FN; /* greater */
433 s->pre_map[0x35 | SHIFT ] = 0x34 | SHIFT; /* question */
434 s->pre_map[0x49 ] = 0x48 | FN; /* Page_Up */
435 s->pre_map[0x51 ] = 0x50 | FN; /* Page_Down */
437 s->modifiers = 0;
438 s->imodifiers = 0;
439 s->fifopos = 0;
440 s->fifolen = 0;
441 s->kbdtimer = qemu_new_timer(vm_clock, spitz_keyboard_tick, s);
442 spitz_keyboard_tick(s);
445 #undef SHIFT
446 #undef CTRL
447 #undef FN
449 static void spitz_keyboard_save(QEMUFile *f, void *opaque)
451 SpitzKeyboardState *s = (SpitzKeyboardState *) opaque;
452 int i;
454 qemu_put_be16s(f, &s->sense_state);
455 qemu_put_be16s(f, &s->strobe_state);
456 for (i = 0; i < 5; i ++)
457 qemu_put_byte(f, spitz_gpio_invert[i]);
460 static int spitz_keyboard_load(QEMUFile *f, void *opaque, int version_id)
462 SpitzKeyboardState *s = (SpitzKeyboardState *) opaque;
463 int i;
465 qemu_get_be16s(f, &s->sense_state);
466 qemu_get_be16s(f, &s->strobe_state);
467 for (i = 0; i < 5; i ++)
468 spitz_gpio_invert[i] = qemu_get_byte(f);
470 /* Release all pressed keys */
471 memset(s->keyrow, 0, sizeof(s->keyrow));
472 spitz_keyboard_sense_update(s);
473 s->modifiers = 0;
474 s->imodifiers = 0;
475 s->fifopos = 0;
476 s->fifolen = 0;
478 return 0;
481 static void spitz_keyboard_register(PXA2xxState *cpu)
483 int i, j;
484 SpitzKeyboardState *s;
486 s = (SpitzKeyboardState *)
487 qemu_mallocz(sizeof(SpitzKeyboardState));
488 memset(s, 0, sizeof(SpitzKeyboardState));
490 for (i = 0; i < 0x80; i ++)
491 s->keymap[i] = -1;
492 for (i = 0; i < SPITZ_KEY_SENSE_NUM + 1; i ++)
493 for (j = 0; j < SPITZ_KEY_STROBE_NUM; j ++)
494 if (spitz_keymap[i][j] != -1)
495 s->keymap[spitz_keymap[i][j]] = (i << 4) | j;
497 for (i = 0; i < SPITZ_KEY_SENSE_NUM; i ++)
498 s->sense[i] = pxa2xx_gpio_in_get(cpu->gpio)[spitz_gpio_key_sense[i]];
500 for (i = 0; i < 5; i ++)
501 s->gpiomap[i] = pxa2xx_gpio_in_get(cpu->gpio)[spitz_gpiomap[i]];
503 s->strobe = qemu_allocate_irqs(spitz_keyboard_strobe, s,
504 SPITZ_KEY_STROBE_NUM);
505 for (i = 0; i < SPITZ_KEY_STROBE_NUM; i ++)
506 pxa2xx_gpio_out_set(cpu->gpio, spitz_gpio_key_strobe[i], s->strobe[i]);
508 spitz_keyboard_pre_map(s);
509 qemu_add_kbd_event_handler((QEMUPutKBDEvent *) spitz_keyboard_handler, s);
511 register_savevm("spitz_keyboard", 0, 0,
512 spitz_keyboard_save, spitz_keyboard_load, s);
515 /* LCD backlight controller */
517 #define LCDTG_RESCTL 0x00
518 #define LCDTG_PHACTRL 0x01
519 #define LCDTG_DUTYCTRL 0x02
520 #define LCDTG_POWERREG0 0x03
521 #define LCDTG_POWERREG1 0x04
522 #define LCDTG_GPOR3 0x05
523 #define LCDTG_PICTRL 0x06
524 #define LCDTG_POLCTRL 0x07
526 typedef struct {
527 SSISlave ssidev;
528 int bl_intensity;
529 int bl_power;
530 } SpitzLCDTG;
532 static void spitz_bl_update(SpitzLCDTG *s)
534 if (s->bl_power && s->bl_intensity)
535 zaurus_printf("LCD Backlight now at %i/63\n", s->bl_intensity);
536 else
537 zaurus_printf("LCD Backlight now off\n");
540 /* FIXME: Implement GPIO properly and remove this hack. */
541 static SpitzLCDTG *spitz_lcdtg;
543 static inline void spitz_bl_bit5(void *opaque, int line, int level)
545 SpitzLCDTG *s = spitz_lcdtg;
546 int prev = s->bl_intensity;
548 if (level)
549 s->bl_intensity &= ~0x20;
550 else
551 s->bl_intensity |= 0x20;
553 if (s->bl_power && prev != s->bl_intensity)
554 spitz_bl_update(s);
557 static inline void spitz_bl_power(void *opaque, int line, int level)
559 SpitzLCDTG *s = spitz_lcdtg;
560 s->bl_power = !!level;
561 spitz_bl_update(s);
564 static uint32_t spitz_lcdtg_transfer(SSISlave *dev, uint32_t value)
566 SpitzLCDTG *s = FROM_SSI_SLAVE(SpitzLCDTG, dev);
567 int addr;
568 addr = value >> 5;
569 value &= 0x1f;
571 switch (addr) {
572 case LCDTG_RESCTL:
573 if (value)
574 zaurus_printf("LCD in QVGA mode\n");
575 else
576 zaurus_printf("LCD in VGA mode\n");
577 break;
579 case LCDTG_DUTYCTRL:
580 s->bl_intensity &= ~0x1f;
581 s->bl_intensity |= value;
582 if (s->bl_power)
583 spitz_bl_update(s);
584 break;
586 case LCDTG_POWERREG0:
587 /* Set common voltage to M62332FP */
588 break;
590 return 0;
593 static void spitz_lcdtg_save(QEMUFile *f, void *opaque)
595 SpitzLCDTG *s = (SpitzLCDTG *)opaque;
596 qemu_put_be32(f, s->bl_intensity);
597 qemu_put_be32(f, s->bl_power);
600 static int spitz_lcdtg_load(QEMUFile *f, void *opaque, int version_id)
602 SpitzLCDTG *s = (SpitzLCDTG *)opaque;
603 s->bl_intensity = qemu_get_be32(f);
604 s->bl_power = qemu_get_be32(f);
605 return 0;
608 static int spitz_lcdtg_init(SSISlave *dev)
610 SpitzLCDTG *s = FROM_SSI_SLAVE(SpitzLCDTG, dev);
612 spitz_lcdtg = s;
613 s->bl_power = 0;
614 s->bl_intensity = 0x20;
616 register_savevm("spitz-lcdtg", -1, 1,
617 spitz_lcdtg_save, spitz_lcdtg_load, s);
618 return 0;
621 /* SSP devices */
623 #define CORGI_SSP_PORT 2
625 #define SPITZ_GPIO_LCDCON_CS 53
626 #define SPITZ_GPIO_ADS7846_CS 14
627 #define SPITZ_GPIO_MAX1111_CS 20
628 #define SPITZ_GPIO_TP_INT 11
630 static DeviceState *max1111;
632 /* "Demux" the signal based on current chipselect */
633 typedef struct {
634 SSISlave ssidev;
635 SSIBus *bus[3];
636 int enable[3];
637 } CorgiSSPState;
639 static uint32_t corgi_ssp_transfer(SSISlave *dev, uint32_t value)
641 CorgiSSPState *s = FROM_SSI_SLAVE(CorgiSSPState, dev);
642 int i;
644 for (i = 0; i < 3; i++) {
645 if (s->enable[i]) {
646 return ssi_transfer(s->bus[i], value);
649 return 0;
652 static void corgi_ssp_gpio_cs(void *opaque, int line, int level)
654 CorgiSSPState *s = (CorgiSSPState *)opaque;
655 assert(line >= 0 && line < 3);
656 s->enable[line] = !level;
659 #define MAX1111_BATT_VOLT 1
660 #define MAX1111_BATT_TEMP 2
661 #define MAX1111_ACIN_VOLT 3
663 #define SPITZ_BATTERY_TEMP 0xe0 /* About 2.9V */
664 #define SPITZ_BATTERY_VOLT 0xd0 /* About 4.0V */
665 #define SPITZ_CHARGEON_ACIN 0x80 /* About 5.0V */
667 static void spitz_adc_temp_on(void *opaque, int line, int level)
669 if (!max1111)
670 return;
672 if (level)
673 max111x_set_input(max1111, MAX1111_BATT_TEMP, SPITZ_BATTERY_TEMP);
674 else
675 max111x_set_input(max1111, MAX1111_BATT_TEMP, 0);
678 static void spitz_ssp_save(QEMUFile *f, void *opaque)
680 CorgiSSPState *s = (CorgiSSPState *)opaque;
681 int i;
683 for (i = 0; i < 3; i++) {
684 qemu_put_be32(f, s->enable[i]);
688 static int spitz_ssp_load(QEMUFile *f, void *opaque, int version_id)
690 CorgiSSPState *s = (CorgiSSPState *)opaque;
691 int i;
693 if (version_id != 1) {
694 return -EINVAL;
696 for (i = 0; i < 3; i++) {
697 s->enable[i] = qemu_get_be32(f);
699 return 0;
702 static int corgi_ssp_init(SSISlave *dev)
704 CorgiSSPState *s = FROM_SSI_SLAVE(CorgiSSPState, dev);
706 qdev_init_gpio_in(&dev->qdev, corgi_ssp_gpio_cs, 3);
707 s->bus[0] = ssi_create_bus(&dev->qdev, "ssi0");
708 s->bus[1] = ssi_create_bus(&dev->qdev, "ssi1");
709 s->bus[2] = ssi_create_bus(&dev->qdev, "ssi2");
711 register_savevm("spitz_ssp", -1, 1, spitz_ssp_save, spitz_ssp_load, s);
712 return 0;
715 static void spitz_ssp_attach(PXA2xxState *cpu)
717 DeviceState *mux;
718 DeviceState *dev;
719 void *bus;
721 mux = ssi_create_slave(cpu->ssp[CORGI_SSP_PORT - 1], "corgi-ssp");
723 bus = qdev_get_child_bus(mux, "ssi0");
724 dev = ssi_create_slave(bus, "spitz-lcdtg");
726 bus = qdev_get_child_bus(mux, "ssi1");
727 dev = ssi_create_slave(bus, "ads7846");
728 qdev_connect_gpio_out(dev, 0,
729 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_TP_INT]);
731 bus = qdev_get_child_bus(mux, "ssi2");
732 max1111 = ssi_create_slave(bus, "max1111");
733 max111x_set_input(max1111, MAX1111_BATT_VOLT, SPITZ_BATTERY_VOLT);
734 max111x_set_input(max1111, MAX1111_BATT_TEMP, 0);
735 max111x_set_input(max1111, MAX1111_ACIN_VOLT, SPITZ_CHARGEON_ACIN);
737 pxa2xx_gpio_out_set(cpu->gpio, SPITZ_GPIO_LCDCON_CS,
738 qdev_get_gpio_in(mux, 0));
739 pxa2xx_gpio_out_set(cpu->gpio, SPITZ_GPIO_ADS7846_CS,
740 qdev_get_gpio_in(mux, 1));
741 pxa2xx_gpio_out_set(cpu->gpio, SPITZ_GPIO_MAX1111_CS,
742 qdev_get_gpio_in(mux, 2));
745 /* CF Microdrive */
747 static void spitz_microdrive_attach(PXA2xxState *cpu, int slot)
749 PCMCIACardState *md;
750 BlockDriverState *bs;
751 DriveInfo *dinfo;
753 dinfo = drive_get(IF_IDE, 0, 0);
754 if (!dinfo)
755 return;
756 bs = dinfo->bdrv;
757 if (bdrv_is_inserted(bs) && !bdrv_is_removable(bs)) {
758 md = dscm1xxxx_init(dinfo);
759 pxa2xx_pcmcia_attach(cpu->pcmcia[slot], md);
763 /* Wm8750 and Max7310 on I2C */
765 #define AKITA_MAX_ADDR 0x18
766 #define SPITZ_WM_ADDRL 0x1b
767 #define SPITZ_WM_ADDRH 0x1a
769 #define SPITZ_GPIO_WM 5
771 #ifdef HAS_AUDIO
772 static void spitz_wm8750_addr(void *opaque, int line, int level)
774 i2c_slave *wm = (i2c_slave *) opaque;
775 if (level)
776 i2c_set_slave_address(wm, SPITZ_WM_ADDRH);
777 else
778 i2c_set_slave_address(wm, SPITZ_WM_ADDRL);
780 #endif
782 static void spitz_i2c_setup(PXA2xxState *cpu)
784 /* Attach the CPU on one end of our I2C bus. */
785 i2c_bus *bus = pxa2xx_i2c_bus(cpu->i2c[0]);
787 #ifdef HAS_AUDIO
788 DeviceState *wm;
790 /* Attach a WM8750 to the bus */
791 wm = i2c_create_slave(bus, "wm8750", 0);
793 spitz_wm8750_addr(wm, 0, 0);
794 pxa2xx_gpio_out_set(cpu->gpio, SPITZ_GPIO_WM,
795 qemu_allocate_irqs(spitz_wm8750_addr, wm, 1)[0]);
796 /* .. and to the sound interface. */
797 cpu->i2s->opaque = wm;
798 cpu->i2s->codec_out = wm8750_dac_dat;
799 cpu->i2s->codec_in = wm8750_adc_dat;
800 wm8750_data_req_set(wm, cpu->i2s->data_req, cpu->i2s);
801 #endif
804 static void spitz_akita_i2c_setup(PXA2xxState *cpu)
806 /* Attach a Max7310 to Akita I2C bus. */
807 i2c_create_slave(pxa2xx_i2c_bus(cpu->i2c[0]), "max7310",
808 AKITA_MAX_ADDR);
811 /* Other peripherals */
813 static void spitz_out_switch(void *opaque, int line, int level)
815 switch (line) {
816 case 0:
817 zaurus_printf("Charging %s.\n", level ? "off" : "on");
818 break;
819 case 1:
820 zaurus_printf("Discharging %s.\n", level ? "on" : "off");
821 break;
822 case 2:
823 zaurus_printf("Green LED %s.\n", level ? "on" : "off");
824 break;
825 case 3:
826 zaurus_printf("Orange LED %s.\n", level ? "on" : "off");
827 break;
828 case 4:
829 spitz_bl_bit5(opaque, line, level);
830 break;
831 case 5:
832 spitz_bl_power(opaque, line, level);
833 break;
834 case 6:
835 spitz_adc_temp_on(opaque, line, level);
836 break;
840 #define SPITZ_SCP_LED_GREEN 1
841 #define SPITZ_SCP_JK_B 2
842 #define SPITZ_SCP_CHRG_ON 3
843 #define SPITZ_SCP_MUTE_L 4
844 #define SPITZ_SCP_MUTE_R 5
845 #define SPITZ_SCP_CF_POWER 6
846 #define SPITZ_SCP_LED_ORANGE 7
847 #define SPITZ_SCP_JK_A 8
848 #define SPITZ_SCP_ADC_TEMP_ON 9
849 #define SPITZ_SCP2_IR_ON 1
850 #define SPITZ_SCP2_AKIN_PULLUP 2
851 #define SPITZ_SCP2_BACKLIGHT_CONT 7
852 #define SPITZ_SCP2_BACKLIGHT_ON 8
853 #define SPITZ_SCP2_MIC_BIAS 9
855 static void spitz_scoop_gpio_setup(PXA2xxState *cpu,
856 ScoopInfo *scp0, ScoopInfo *scp1)
858 qemu_irq *outsignals = qemu_allocate_irqs(spitz_out_switch, cpu, 8);
860 scoop_gpio_out_set(scp0, SPITZ_SCP_CHRG_ON, outsignals[0]);
861 scoop_gpio_out_set(scp0, SPITZ_SCP_JK_B, outsignals[1]);
862 scoop_gpio_out_set(scp0, SPITZ_SCP_LED_GREEN, outsignals[2]);
863 scoop_gpio_out_set(scp0, SPITZ_SCP_LED_ORANGE, outsignals[3]);
865 if (scp1) {
866 scoop_gpio_out_set(scp1, SPITZ_SCP2_BACKLIGHT_CONT, outsignals[4]);
867 scoop_gpio_out_set(scp1, SPITZ_SCP2_BACKLIGHT_ON, outsignals[5]);
870 scoop_gpio_out_set(scp0, SPITZ_SCP_ADC_TEMP_ON, outsignals[6]);
873 #define SPITZ_GPIO_HSYNC 22
874 #define SPITZ_GPIO_SD_DETECT 9
875 #define SPITZ_GPIO_SD_WP 81
876 #define SPITZ_GPIO_ON_RESET 89
877 #define SPITZ_GPIO_BAT_COVER 90
878 #define SPITZ_GPIO_CF1_IRQ 105
879 #define SPITZ_GPIO_CF1_CD 94
880 #define SPITZ_GPIO_CF2_IRQ 106
881 #define SPITZ_GPIO_CF2_CD 93
883 static int spitz_hsync;
885 static void spitz_lcd_hsync_handler(void *opaque, int line, int level)
887 PXA2xxState *cpu = (PXA2xxState *) opaque;
888 qemu_set_irq(pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_HSYNC], spitz_hsync);
889 spitz_hsync ^= 1;
892 static void spitz_gpio_setup(PXA2xxState *cpu, int slots)
894 qemu_irq lcd_hsync;
896 * Bad hack: We toggle the LCD hsync GPIO on every GPIO status
897 * read to satisfy broken guests that poll-wait for hsync.
898 * Simulating a real hsync event would be less practical and
899 * wouldn't guarantee that a guest ever exits the loop.
901 spitz_hsync = 0;
902 lcd_hsync = qemu_allocate_irqs(spitz_lcd_hsync_handler, cpu, 1)[0];
903 pxa2xx_gpio_read_notifier(cpu->gpio, lcd_hsync);
904 pxa2xx_lcd_vsync_notifier(cpu->lcd, lcd_hsync);
906 /* MMC/SD host */
907 pxa2xx_mmci_handlers(cpu->mmc,
908 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_SD_WP],
909 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_SD_DETECT]);
911 /* Battery lock always closed */
912 qemu_irq_raise(pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_BAT_COVER]);
914 /* Handle reset */
915 pxa2xx_gpio_out_set(cpu->gpio, SPITZ_GPIO_ON_RESET, cpu->reset);
917 /* PCMCIA signals: card's IRQ and Card-Detect */
918 if (slots >= 1)
919 pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[0],
920 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_CF1_IRQ],
921 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_CF1_CD]);
922 if (slots >= 2)
923 pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[1],
924 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_CF2_IRQ],
925 pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_CF2_CD]);
927 /* Initialise the screen rotation related signals */
928 spitz_gpio_invert[3] = 0; /* Always open */
929 if (graphic_rotate) { /* Tablet mode */
930 spitz_gpio_invert[4] = 0;
931 } else { /* Portrait mode */
932 spitz_gpio_invert[4] = 1;
934 qemu_set_irq(pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_SWA],
935 spitz_gpio_invert[3]);
936 qemu_set_irq(pxa2xx_gpio_in_get(cpu->gpio)[SPITZ_GPIO_SWB],
937 spitz_gpio_invert[4]);
940 /* Board init. */
941 enum spitz_model_e { spitz, akita, borzoi, terrier };
943 #define SPITZ_RAM 0x04000000
944 #define SPITZ_ROM 0x00800000
946 static struct arm_boot_info spitz_binfo = {
947 .loader_start = PXA2XX_SDRAM_BASE,
948 .ram_size = 0x04000000,
951 static void spitz_common_init(ram_addr_t ram_size,
952 const char *kernel_filename,
953 const char *kernel_cmdline, const char *initrd_filename,
954 const char *cpu_model, enum spitz_model_e model, int arm_id)
956 PXA2xxState *cpu;
957 ScoopInfo *scp0, *scp1 = NULL;
959 if (!cpu_model)
960 cpu_model = (model == terrier) ? "pxa270-c5" : "pxa270-c0";
962 /* Setup CPU & memory */
963 cpu = pxa270_init(spitz_binfo.ram_size, cpu_model);
965 sl_flash_register(cpu, (model == spitz) ? FLASH_128M : FLASH_1024M);
967 cpu_register_physical_memory(0, SPITZ_ROM,
968 qemu_ram_alloc(SPITZ_ROM) | IO_MEM_ROM);
970 /* Setup peripherals */
971 spitz_keyboard_register(cpu);
973 spitz_ssp_attach(cpu);
975 scp0 = scoop_init(cpu, 0, 0x10800000);
976 if (model != akita) {
977 scp1 = scoop_init(cpu, 1, 0x08800040);
980 spitz_scoop_gpio_setup(cpu, scp0, scp1);
982 spitz_gpio_setup(cpu, (model == akita) ? 1 : 2);
984 spitz_i2c_setup(cpu);
986 if (model == akita)
987 spitz_akita_i2c_setup(cpu);
989 if (model == terrier)
990 /* A 6.0 GB microdrive is permanently sitting in CF slot 1. */
991 spitz_microdrive_attach(cpu, 1);
992 else if (model != akita)
993 /* A 4.0 GB microdrive is permanently sitting in CF slot 0. */
994 spitz_microdrive_attach(cpu, 0);
996 /* Setup initial (reset) machine state */
997 cpu->env->regs[15] = spitz_binfo.loader_start;
999 spitz_binfo.kernel_filename = kernel_filename;
1000 spitz_binfo.kernel_cmdline = kernel_cmdline;
1001 spitz_binfo.initrd_filename = initrd_filename;
1002 spitz_binfo.board_id = arm_id;
1003 arm_load_kernel(cpu->env, &spitz_binfo);
1004 sl_bootparam_write(SL_PXA_PARAM_BASE);
1007 static void spitz_init(ram_addr_t ram_size,
1008 const char *boot_device,
1009 const char *kernel_filename, const char *kernel_cmdline,
1010 const char *initrd_filename, const char *cpu_model)
1012 spitz_common_init(ram_size, kernel_filename,
1013 kernel_cmdline, initrd_filename, cpu_model, spitz, 0x2c9);
1016 static void borzoi_init(ram_addr_t ram_size,
1017 const char *boot_device,
1018 const char *kernel_filename, const char *kernel_cmdline,
1019 const char *initrd_filename, const char *cpu_model)
1021 spitz_common_init(ram_size, kernel_filename,
1022 kernel_cmdline, initrd_filename, cpu_model, borzoi, 0x33f);
1025 static void akita_init(ram_addr_t ram_size,
1026 const char *boot_device,
1027 const char *kernel_filename, const char *kernel_cmdline,
1028 const char *initrd_filename, const char *cpu_model)
1030 spitz_common_init(ram_size, kernel_filename,
1031 kernel_cmdline, initrd_filename, cpu_model, akita, 0x2e8);
1034 static void terrier_init(ram_addr_t ram_size,
1035 const char *boot_device,
1036 const char *kernel_filename, const char *kernel_cmdline,
1037 const char *initrd_filename, const char *cpu_model)
1039 spitz_common_init(ram_size, kernel_filename,
1040 kernel_cmdline, initrd_filename, cpu_model, terrier, 0x33f);
1043 static QEMUMachine akitapda_machine = {
1044 .name = "akita",
1045 .desc = "Akita PDA (PXA270)",
1046 .init = akita_init,
1049 static QEMUMachine spitzpda_machine = {
1050 .name = "spitz",
1051 .desc = "Spitz PDA (PXA270)",
1052 .init = spitz_init,
1055 static QEMUMachine borzoipda_machine = {
1056 .name = "borzoi",
1057 .desc = "Borzoi PDA (PXA270)",
1058 .init = borzoi_init,
1061 static QEMUMachine terrierpda_machine = {
1062 .name = "terrier",
1063 .desc = "Terrier PDA (PXA270)",
1064 .init = terrier_init,
1067 static void spitz_machine_init(void)
1069 qemu_register_machine(&akitapda_machine);
1070 qemu_register_machine(&spitzpda_machine);
1071 qemu_register_machine(&borzoipda_machine);
1072 qemu_register_machine(&terrierpda_machine);
1075 machine_init(spitz_machine_init);
1077 static SSISlaveInfo corgi_ssp_info = {
1078 .qdev.name = "corgi-ssp",
1079 .qdev.size = sizeof(CorgiSSPState),
1080 .init = corgi_ssp_init,
1081 .transfer = corgi_ssp_transfer
1084 static SSISlaveInfo spitz_lcdtg_info = {
1085 .qdev.name = "spitz-lcdtg",
1086 .qdev.size = sizeof(SpitzLCDTG),
1087 .init = spitz_lcdtg_init,
1088 .transfer = spitz_lcdtg_transfer
1091 static void spitz_register_devices(void)
1093 ssi_register_slave(&corgi_ssp_info);
1094 ssi_register_slave(&spitz_lcdtg_info);
1097 device_init(spitz_register_devices)