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.
9 * Contributions after 2012-01-13 are licensed under the terms of the
10 * GNU GPL, version 2 or (at your option) any later version.
13 #include "qemu/osdep.h"
14 #include "qapi/error.h"
15 #include "hw/arm/pxa.h"
16 #include "hw/arm/boot.h"
17 #include "sysemu/runstate.h"
18 #include "sysemu/sysemu.h"
19 #include "hw/pcmcia.h"
20 #include "hw/qdev-properties.h"
21 #include "hw/i2c/i2c.h"
23 #include "hw/ssi/ssi.h"
24 #include "hw/block/flash.h"
25 #include "qemu/timer.h"
26 #include "hw/arm/sharpsl.h"
27 #include "ui/console.h"
28 #include "hw/audio/wm8750.h"
29 #include "audio/audio.h"
30 #include "hw/boards.h"
31 #include "hw/sysbus.h"
32 #include "migration/vmstate.h"
33 #include "exec/address-spaces.h"
36 enum spitz_model_e
{ spitz
, akita
, borzoi
, terrier
};
40 enum spitz_model_e model
;
53 #define TYPE_SPITZ_MACHINE "spitz-common"
54 #define SPITZ_MACHINE(obj) \
55 OBJECT_CHECK(SpitzMachineState, obj, TYPE_SPITZ_MACHINE)
56 #define SPITZ_MACHINE_GET_CLASS(obj) \
57 OBJECT_GET_CLASS(SpitzMachineClass, obj, TYPE_SPITZ_MACHINE)
58 #define SPITZ_MACHINE_CLASS(klass) \
59 OBJECT_CLASS_CHECK(SpitzMachineClass, klass, TYPE_SPITZ_MACHINE)
62 #define REG_FMT "0x%02lx"
65 #define FLASH_BASE 0x0c000000
66 #define FLASH_ECCLPLB 0x00 /* Line parity 7 - 0 bit */
67 #define FLASH_ECCLPUB 0x04 /* Line parity 15 - 8 bit */
68 #define FLASH_ECCCP 0x08 /* Column parity 5 - 0 bit */
69 #define FLASH_ECCCNTR 0x0c /* ECC byte counter */
70 #define FLASH_ECCCLRR 0x10 /* Clear ECC */
71 #define FLASH_FLASHIO 0x14 /* Flash I/O */
72 #define FLASH_FLASHCTL 0x18 /* Flash Control */
74 #define FLASHCTL_CE0 (1 << 0)
75 #define FLASHCTL_CLE (1 << 1)
76 #define FLASHCTL_ALE (1 << 2)
77 #define FLASHCTL_WP (1 << 3)
78 #define FLASHCTL_CE1 (1 << 4)
79 #define FLASHCTL_RYBY (1 << 5)
80 #define FLASHCTL_NCE (FLASHCTL_CE0 | FLASHCTL_CE1)
82 #define TYPE_SL_NAND "sl-nand"
83 #define SL_NAND(obj) OBJECT_CHECK(SLNANDState, (obj), TYPE_SL_NAND)
86 SysBusDevice parent_obj
;
96 static uint64_t sl_read(void *opaque
, hwaddr addr
, unsigned size
)
98 SLNANDState
*s
= (SLNANDState
*) opaque
;
102 #define BSHR(byte, from, to) ((s->ecc.lp[byte] >> (from - to)) & (1 << to))
104 return BSHR(0, 4, 0) | BSHR(0, 5, 2) | BSHR(0, 6, 4) | BSHR(0, 7, 6) |
105 BSHR(1, 4, 1) | BSHR(1, 5, 3) | BSHR(1, 6, 5) | BSHR(1, 7, 7);
107 #define BSHL(byte, from, to) ((s->ecc.lp[byte] << (to - from)) & (1 << to))
109 return BSHL(0, 0, 0) | BSHL(0, 1, 2) | BSHL(0, 2, 4) | BSHL(0, 3, 6) |
110 BSHL(1, 0, 1) | BSHL(1, 1, 3) | BSHL(1, 2, 5) | BSHL(1, 3, 7);
116 return s
->ecc
.count
& 0xff;
119 nand_getpins(s
->nand
, &ryby
);
121 return s
->ctl
| FLASHCTL_RYBY
;
127 return ecc_digest(&s
->ecc
, nand_getio(s
->nand
)) |
128 (ecc_digest(&s
->ecc
, nand_getio(s
->nand
)) << 16);
130 return ecc_digest(&s
->ecc
, nand_getio(s
->nand
));
133 zaurus_printf("Bad register offset " REG_FMT
"\n", (unsigned long)addr
);
138 static void sl_write(void *opaque
, hwaddr addr
,
139 uint64_t value
, unsigned size
)
141 SLNANDState
*s
= (SLNANDState
*) opaque
;
145 /* Value is ignored. */
150 s
->ctl
= value
& 0xff & ~FLASHCTL_RYBY
;
151 nand_setpins(s
->nand
,
152 s
->ctl
& FLASHCTL_CLE
,
153 s
->ctl
& FLASHCTL_ALE
,
154 s
->ctl
& FLASHCTL_NCE
,
155 s
->ctl
& FLASHCTL_WP
,
160 nand_setio(s
->nand
, ecc_digest(&s
->ecc
, value
& 0xff));
164 zaurus_printf("Bad register offset " REG_FMT
"\n", (unsigned long)addr
);
173 static const MemoryRegionOps sl_ops
= {
176 .endianness
= DEVICE_NATIVE_ENDIAN
,
179 static void sl_flash_register(PXA2xxState
*cpu
, int size
)
183 dev
= qdev_new(TYPE_SL_NAND
);
185 qdev_prop_set_uint8(dev
, "manf_id", NAND_MFR_SAMSUNG
);
186 if (size
== FLASH_128M
)
187 qdev_prop_set_uint8(dev
, "chip_id", 0x73);
188 else if (size
== FLASH_1024M
)
189 qdev_prop_set_uint8(dev
, "chip_id", 0xf1);
191 sysbus_realize_and_unref(SYS_BUS_DEVICE(dev
), &error_fatal
);
192 sysbus_mmio_map(SYS_BUS_DEVICE(dev
), 0, FLASH_BASE
);
195 static void sl_nand_init(Object
*obj
)
197 SLNANDState
*s
= SL_NAND(obj
);
198 SysBusDevice
*dev
= SYS_BUS_DEVICE(obj
);
202 memory_region_init_io(&s
->iomem
, obj
, &sl_ops
, s
, "sl", 0x40);
203 sysbus_init_mmio(dev
, &s
->iomem
);
206 static void sl_nand_realize(DeviceState
*dev
, Error
**errp
)
208 SLNANDState
*s
= SL_NAND(dev
);
211 /* FIXME use a qdev drive property instead of drive_get() */
212 nand
= drive_get(IF_MTD
, 0, 0);
213 s
->nand
= nand_init(nand
? blk_by_legacy_dinfo(nand
) : NULL
,
214 s
->manf_id
, s
->chip_id
);
219 #define SPITZ_KEY_STROBE_NUM 11
220 #define SPITZ_KEY_SENSE_NUM 7
222 static const int spitz_gpio_key_sense
[SPITZ_KEY_SENSE_NUM
] = {
223 12, 17, 91, 34, 36, 38, 39
226 static const int spitz_gpio_key_strobe
[SPITZ_KEY_STROBE_NUM
] = {
227 88, 23, 24, 25, 26, 27, 52, 103, 107, 108, 114
230 /* Eighth additional row maps the special keys */
231 static int spitz_keymap
[SPITZ_KEY_SENSE_NUM
+ 1][SPITZ_KEY_STROBE_NUM
] = {
232 { 0x1d, 0x02, 0x04, 0x06, 0x07, 0x08, 0x0a, 0x0b, 0x0e, 0x3f, 0x40 },
233 { -1 , 0x03, 0x05, 0x13, 0x15, 0x09, 0x17, 0x18, 0x19, 0x41, 0x42 },
234 { 0x0f, 0x10, 0x12, 0x14, 0x22, 0x16, 0x24, 0x25, -1 , -1 , -1 },
235 { 0x3c, 0x11, 0x1f, 0x21, 0x2f, 0x23, 0x32, 0x26, -1 , 0x36, -1 },
236 { 0x3b, 0x1e, 0x20, 0x2e, 0x30, 0x31, 0x34, -1 , 0x1c, 0x2a, -1 },
237 { 0x44, 0x2c, 0x2d, 0x0c, 0x39, 0x33, -1 , 0x48, -1 , -1 , 0x38 },
238 { 0x37, 0x3d, -1 , 0x45, 0x57, 0x58, 0x4b, 0x50, 0x4d, -1 , -1 },
239 { 0x52, 0x43, 0x01, 0x47, 0x49, -1 , -1 , -1 , -1 , -1 , -1 },
242 #define SPITZ_GPIO_AK_INT 13 /* Remote control */
243 #define SPITZ_GPIO_SYNC 16 /* Sync button */
244 #define SPITZ_GPIO_ON_KEY 95 /* Power button */
245 #define SPITZ_GPIO_SWA 97 /* Lid */
246 #define SPITZ_GPIO_SWB 96 /* Tablet mode */
248 /* The special buttons are mapped to unused keys */
249 static const int spitz_gpiomap
[5] = {
250 SPITZ_GPIO_AK_INT
, SPITZ_GPIO_SYNC
, SPITZ_GPIO_ON_KEY
,
251 SPITZ_GPIO_SWA
, SPITZ_GPIO_SWB
,
254 #define TYPE_SPITZ_KEYBOARD "spitz-keyboard"
255 #define SPITZ_KEYBOARD(obj) \
256 OBJECT_CHECK(SpitzKeyboardState, (obj), TYPE_SPITZ_KEYBOARD)
259 SysBusDevice parent_obj
;
261 qemu_irq sense
[SPITZ_KEY_SENSE_NUM
];
264 uint16_t keyrow
[SPITZ_KEY_SENSE_NUM
];
265 uint16_t strobe_state
;
266 uint16_t sense_state
;
268 uint16_t pre_map
[0x100];
272 int fifopos
, fifolen
;
274 } SpitzKeyboardState
;
276 static void spitz_keyboard_sense_update(SpitzKeyboardState
*s
)
279 uint16_t strobe
, sense
= 0;
280 for (i
= 0; i
< SPITZ_KEY_SENSE_NUM
; i
++) {
281 strobe
= s
->keyrow
[i
] & s
->strobe_state
;
284 if (!(s
->sense_state
& (1 << i
)))
285 qemu_irq_raise(s
->sense
[i
]);
286 } else if (s
->sense_state
& (1 << i
))
287 qemu_irq_lower(s
->sense
[i
]);
290 s
->sense_state
= sense
;
293 static void spitz_keyboard_strobe(void *opaque
, int line
, int level
)
295 SpitzKeyboardState
*s
= (SpitzKeyboardState
*) opaque
;
298 s
->strobe_state
|= 1 << line
;
300 s
->strobe_state
&= ~(1 << line
);
301 spitz_keyboard_sense_update(s
);
304 static void spitz_keyboard_keydown(SpitzKeyboardState
*s
, int keycode
)
306 int spitz_keycode
= s
->keymap
[keycode
& 0x7f];
307 if (spitz_keycode
== -1)
310 /* Handle the additional keys */
311 if ((spitz_keycode
>> 4) == SPITZ_KEY_SENSE_NUM
) {
312 qemu_set_irq(s
->gpiomap
[spitz_keycode
& 0xf], (keycode
< 0x80));
317 s
->keyrow
[spitz_keycode
>> 4] &= ~(1 << (spitz_keycode
& 0xf));
319 s
->keyrow
[spitz_keycode
>> 4] |= 1 << (spitz_keycode
& 0xf);
321 spitz_keyboard_sense_update(s
);
324 #define SPITZ_MOD_SHIFT (1 << 7)
325 #define SPITZ_MOD_CTRL (1 << 8)
326 #define SPITZ_MOD_FN (1 << 9)
328 #define QUEUE_KEY(c) s->fifo[(s->fifopos + s->fifolen ++) & 0xf] = c
330 static void spitz_keyboard_handler(void *opaque
, int keycode
)
332 SpitzKeyboardState
*s
= opaque
;
336 case 0x2a: /* Left Shift */
342 case 0x36: /* Right Shift */
348 case 0x1d: /* Control */
362 code
= s
->pre_map
[mapcode
= ((s
->modifiers
& 3) ?
363 (keycode
| SPITZ_MOD_SHIFT
) :
364 (keycode
& ~SPITZ_MOD_SHIFT
))];
366 if (code
!= mapcode
) {
368 if ((code
& SPITZ_MOD_SHIFT
) && !(s
->modifiers
& 1)) {
369 QUEUE_KEY(0x2a | (keycode
& 0x80));
371 if ((code
& SPITZ_MOD_CTRL
) && !(s
->modifiers
& 4)) {
372 QUEUE_KEY(0x1d | (keycode
& 0x80));
374 if ((code
& SPITZ_MOD_FN
) && !(s
->modifiers
& 8)) {
375 QUEUE_KEY(0x38 | (keycode
& 0x80));
377 if ((code
& SPITZ_MOD_FN
) && (s
->modifiers
& 1)) {
378 QUEUE_KEY(0x2a | (~keycode
& 0x80));
380 if ((code
& SPITZ_MOD_FN
) && (s
->modifiers
& 2)) {
381 QUEUE_KEY(0x36 | (~keycode
& 0x80));
384 if (keycode
& 0x80) {
385 if ((s
->imodifiers
& 1 ) && !(s
->modifiers
& 1))
386 QUEUE_KEY(0x2a | 0x80);
387 if ((s
->imodifiers
& 4 ) && !(s
->modifiers
& 4))
388 QUEUE_KEY(0x1d | 0x80);
389 if ((s
->imodifiers
& 8 ) && !(s
->modifiers
& 8))
390 QUEUE_KEY(0x38 | 0x80);
391 if ((s
->imodifiers
& 0x10) && (s
->modifiers
& 1))
393 if ((s
->imodifiers
& 0x20) && (s
->modifiers
& 2))
397 if ((code
& SPITZ_MOD_SHIFT
) &&
398 !((s
->modifiers
| s
->imodifiers
) & 1)) {
402 if ((code
& SPITZ_MOD_CTRL
) &&
403 !((s
->modifiers
| s
->imodifiers
) & 4)) {
407 if ((code
& SPITZ_MOD_FN
) &&
408 !((s
->modifiers
| s
->imodifiers
) & 8)) {
412 if ((code
& SPITZ_MOD_FN
) && (s
->modifiers
& 1) &&
413 !(s
->imodifiers
& 0x10)) {
414 QUEUE_KEY(0x2a | 0x80);
415 s
->imodifiers
|= 0x10;
417 if ((code
& SPITZ_MOD_FN
) && (s
->modifiers
& 2) &&
418 !(s
->imodifiers
& 0x20)) {
419 QUEUE_KEY(0x36 | 0x80);
420 s
->imodifiers
|= 0x20;
426 QUEUE_KEY((code
& 0x7f) | (keycode
& 0x80));
429 static void spitz_keyboard_tick(void *opaque
)
431 SpitzKeyboardState
*s
= (SpitzKeyboardState
*) opaque
;
434 spitz_keyboard_keydown(s
, s
->fifo
[s
->fifopos
++]);
436 if (s
->fifopos
>= 16)
440 timer_mod(s
->kbdtimer
, qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL
) +
441 NANOSECONDS_PER_SECOND
/ 32);
444 static void spitz_keyboard_pre_map(SpitzKeyboardState
*s
)
447 for (i
= 0; i
< 0x100; i
++)
449 s
->pre_map
[0x02 | SPITZ_MOD_SHIFT
] = 0x02 | SPITZ_MOD_SHIFT
; /* exclam */
450 s
->pre_map
[0x28 | SPITZ_MOD_SHIFT
] = 0x03 | SPITZ_MOD_SHIFT
; /* quotedbl */
451 s
->pre_map
[0x04 | SPITZ_MOD_SHIFT
] = 0x04 | SPITZ_MOD_SHIFT
; /* # */
452 s
->pre_map
[0x05 | SPITZ_MOD_SHIFT
] = 0x05 | SPITZ_MOD_SHIFT
; /* dollar */
453 s
->pre_map
[0x06 | SPITZ_MOD_SHIFT
] = 0x06 | SPITZ_MOD_SHIFT
; /* percent */
454 s
->pre_map
[0x08 | SPITZ_MOD_SHIFT
] = 0x07 | SPITZ_MOD_SHIFT
; /* ampersand */
455 s
->pre_map
[0x28] = 0x08 | SPITZ_MOD_SHIFT
; /* ' */
456 s
->pre_map
[0x0a | SPITZ_MOD_SHIFT
] = 0x09 | SPITZ_MOD_SHIFT
; /* ( */
457 s
->pre_map
[0x0b | SPITZ_MOD_SHIFT
] = 0x0a | SPITZ_MOD_SHIFT
; /* ) */
458 s
->pre_map
[0x29 | SPITZ_MOD_SHIFT
] = 0x0b | SPITZ_MOD_SHIFT
; /* tilde */
459 s
->pre_map
[0x03 | SPITZ_MOD_SHIFT
] = 0x0c | SPITZ_MOD_SHIFT
; /* at */
460 s
->pre_map
[0xd3] = 0x0e | SPITZ_MOD_FN
; /* Delete */
461 s
->pre_map
[0x3a] = 0x0f | SPITZ_MOD_FN
; /* Caps_Lock */
462 s
->pre_map
[0x07 | SPITZ_MOD_SHIFT
] = 0x11 | SPITZ_MOD_FN
; /* ^ */
463 s
->pre_map
[0x0d] = 0x12 | SPITZ_MOD_FN
; /* equal */
464 s
->pre_map
[0x0d | SPITZ_MOD_SHIFT
] = 0x13 | SPITZ_MOD_FN
; /* plus */
465 s
->pre_map
[0x1a] = 0x14 | SPITZ_MOD_FN
; /* [ */
466 s
->pre_map
[0x1b] = 0x15 | SPITZ_MOD_FN
; /* ] */
467 s
->pre_map
[0x1a | SPITZ_MOD_SHIFT
] = 0x16 | SPITZ_MOD_FN
; /* { */
468 s
->pre_map
[0x1b | SPITZ_MOD_SHIFT
] = 0x17 | SPITZ_MOD_FN
; /* } */
469 s
->pre_map
[0x27] = 0x22 | SPITZ_MOD_FN
; /* semicolon */
470 s
->pre_map
[0x27 | SPITZ_MOD_SHIFT
] = 0x23 | SPITZ_MOD_FN
; /* colon */
471 s
->pre_map
[0x09 | SPITZ_MOD_SHIFT
] = 0x24 | SPITZ_MOD_FN
; /* asterisk */
472 s
->pre_map
[0x2b] = 0x25 | SPITZ_MOD_FN
; /* backslash */
473 s
->pre_map
[0x2b | SPITZ_MOD_SHIFT
] = 0x26 | SPITZ_MOD_FN
; /* bar */
474 s
->pre_map
[0x0c | SPITZ_MOD_SHIFT
] = 0x30 | SPITZ_MOD_FN
; /* _ */
475 s
->pre_map
[0x33 | SPITZ_MOD_SHIFT
] = 0x33 | SPITZ_MOD_FN
; /* less */
476 s
->pre_map
[0x35] = 0x33 | SPITZ_MOD_SHIFT
; /* slash */
477 s
->pre_map
[0x34 | SPITZ_MOD_SHIFT
] = 0x34 | SPITZ_MOD_FN
; /* greater */
478 s
->pre_map
[0x35 | SPITZ_MOD_SHIFT
] = 0x34 | SPITZ_MOD_SHIFT
; /* question */
479 s
->pre_map
[0x49] = 0x48 | SPITZ_MOD_FN
; /* Page_Up */
480 s
->pre_map
[0x51] = 0x50 | SPITZ_MOD_FN
; /* Page_Down */
488 #undef SPITZ_MOD_SHIFT
489 #undef SPITZ_MOD_CTRL
492 static int spitz_keyboard_post_load(void *opaque
, int version_id
)
494 SpitzKeyboardState
*s
= (SpitzKeyboardState
*) opaque
;
496 /* Release all pressed keys */
497 memset(s
->keyrow
, 0, sizeof(s
->keyrow
));
498 spitz_keyboard_sense_update(s
);
507 static void spitz_keyboard_register(PXA2xxState
*cpu
)
511 SpitzKeyboardState
*s
;
513 dev
= sysbus_create_simple(TYPE_SPITZ_KEYBOARD
, -1, NULL
);
514 s
= SPITZ_KEYBOARD(dev
);
516 for (i
= 0; i
< SPITZ_KEY_SENSE_NUM
; i
++)
517 qdev_connect_gpio_out(dev
, i
, qdev_get_gpio_in(cpu
->gpio
, spitz_gpio_key_sense
[i
]));
519 for (i
= 0; i
< 5; i
++)
520 s
->gpiomap
[i
] = qdev_get_gpio_in(cpu
->gpio
, spitz_gpiomap
[i
]);
523 s
->gpiomap
[4] = qemu_irq_invert(s
->gpiomap
[4]);
525 for (i
= 0; i
< 5; i
++)
526 qemu_set_irq(s
->gpiomap
[i
], 0);
528 for (i
= 0; i
< SPITZ_KEY_STROBE_NUM
; i
++)
529 qdev_connect_gpio_out(cpu
->gpio
, spitz_gpio_key_strobe
[i
],
530 qdev_get_gpio_in(dev
, i
));
532 timer_mod(s
->kbdtimer
, qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL
));
534 qemu_add_kbd_event_handler(spitz_keyboard_handler
, s
);
537 static void spitz_keyboard_init(Object
*obj
)
539 DeviceState
*dev
= DEVICE(obj
);
540 SpitzKeyboardState
*s
= SPITZ_KEYBOARD(obj
);
543 for (i
= 0; i
< 0x80; i
++)
545 for (i
= 0; i
< SPITZ_KEY_SENSE_NUM
+ 1; i
++)
546 for (j
= 0; j
< SPITZ_KEY_STROBE_NUM
; j
++)
547 if (spitz_keymap
[i
][j
] != -1)
548 s
->keymap
[spitz_keymap
[i
][j
]] = (i
<< 4) | j
;
550 spitz_keyboard_pre_map(s
);
552 qdev_init_gpio_in(dev
, spitz_keyboard_strobe
, SPITZ_KEY_STROBE_NUM
);
553 qdev_init_gpio_out(dev
, s
->sense
, SPITZ_KEY_SENSE_NUM
);
556 static void spitz_keyboard_realize(DeviceState
*dev
, Error
**errp
)
558 SpitzKeyboardState
*s
= SPITZ_KEYBOARD(dev
);
559 s
->kbdtimer
= timer_new_ns(QEMU_CLOCK_VIRTUAL
, spitz_keyboard_tick
, s
);
562 /* LCD backlight controller */
564 #define LCDTG_RESCTL 0x00
565 #define LCDTG_PHACTRL 0x01
566 #define LCDTG_DUTYCTRL 0x02
567 #define LCDTG_POWERREG0 0x03
568 #define LCDTG_POWERREG1 0x04
569 #define LCDTG_GPOR3 0x05
570 #define LCDTG_PICTRL 0x06
571 #define LCDTG_POLCTRL 0x07
575 uint32_t bl_intensity
;
579 static void spitz_bl_update(SpitzLCDTG
*s
)
581 if (s
->bl_power
&& s
->bl_intensity
)
582 zaurus_printf("LCD Backlight now at %i/63\n", s
->bl_intensity
);
584 zaurus_printf("LCD Backlight now off\n");
587 /* FIXME: Implement GPIO properly and remove this hack. */
588 static SpitzLCDTG
*spitz_lcdtg
;
590 static inline void spitz_bl_bit5(void *opaque
, int line
, int level
)
592 SpitzLCDTG
*s
= spitz_lcdtg
;
593 int prev
= s
->bl_intensity
;
596 s
->bl_intensity
&= ~0x20;
598 s
->bl_intensity
|= 0x20;
600 if (s
->bl_power
&& prev
!= s
->bl_intensity
)
604 static inline void spitz_bl_power(void *opaque
, int line
, int level
)
606 SpitzLCDTG
*s
= spitz_lcdtg
;
607 s
->bl_power
= !!level
;
611 static uint32_t spitz_lcdtg_transfer(SSISlave
*dev
, uint32_t value
)
613 SpitzLCDTG
*s
= FROM_SSI_SLAVE(SpitzLCDTG
, dev
);
621 zaurus_printf("LCD in QVGA mode\n");
623 zaurus_printf("LCD in VGA mode\n");
627 s
->bl_intensity
&= ~0x1f;
628 s
->bl_intensity
|= value
;
633 case LCDTG_POWERREG0
:
634 /* Set common voltage to M62332FP */
640 static void spitz_lcdtg_realize(SSISlave
*dev
, Error
**errp
)
642 SpitzLCDTG
*s
= FROM_SSI_SLAVE(SpitzLCDTG
, dev
);
646 s
->bl_intensity
= 0x20;
651 #define CORGI_SSP_PORT 2
653 #define SPITZ_GPIO_LCDCON_CS 53
654 #define SPITZ_GPIO_ADS7846_CS 14
655 #define SPITZ_GPIO_MAX1111_CS 20
656 #define SPITZ_GPIO_TP_INT 11
658 static DeviceState
*max1111
;
660 /* "Demux" the signal based on current chipselect */
667 static uint32_t corgi_ssp_transfer(SSISlave
*dev
, uint32_t value
)
669 CorgiSSPState
*s
= FROM_SSI_SLAVE(CorgiSSPState
, dev
);
672 for (i
= 0; i
< 3; i
++) {
674 return ssi_transfer(s
->bus
[i
], value
);
680 static void corgi_ssp_gpio_cs(void *opaque
, int line
, int level
)
682 CorgiSSPState
*s
= (CorgiSSPState
*)opaque
;
683 assert(line
>= 0 && line
< 3);
684 s
->enable
[line
] = !level
;
687 #define MAX1111_BATT_VOLT 1
688 #define MAX1111_BATT_TEMP 2
689 #define MAX1111_ACIN_VOLT 3
691 #define SPITZ_BATTERY_TEMP 0xe0 /* About 2.9V */
692 #define SPITZ_BATTERY_VOLT 0xd0 /* About 4.0V */
693 #define SPITZ_CHARGEON_ACIN 0x80 /* About 5.0V */
695 static void spitz_adc_temp_on(void *opaque
, int line
, int level
)
701 max111x_set_input(max1111
, MAX1111_BATT_TEMP
, SPITZ_BATTERY_TEMP
);
703 max111x_set_input(max1111
, MAX1111_BATT_TEMP
, 0);
706 static void corgi_ssp_realize(SSISlave
*d
, Error
**errp
)
708 DeviceState
*dev
= DEVICE(d
);
709 CorgiSSPState
*s
= FROM_SSI_SLAVE(CorgiSSPState
, d
);
711 qdev_init_gpio_in(dev
, corgi_ssp_gpio_cs
, 3);
712 s
->bus
[0] = ssi_create_bus(dev
, "ssi0");
713 s
->bus
[1] = ssi_create_bus(dev
, "ssi1");
714 s
->bus
[2] = ssi_create_bus(dev
, "ssi2");
717 static void spitz_ssp_attach(SpitzMachineState
*sms
)
721 sms
->mux
= ssi_create_slave(sms
->mpu
->ssp
[CORGI_SSP_PORT
- 1], "corgi-ssp");
723 bus
= qdev_get_child_bus(sms
->mux
, "ssi0");
724 sms
->lcdtg
= ssi_create_slave(bus
, "spitz-lcdtg");
726 bus
= qdev_get_child_bus(sms
->mux
, "ssi1");
727 sms
->ads7846
= ssi_create_slave(bus
, "ads7846");
728 qdev_connect_gpio_out(sms
->ads7846
, 0,
729 qdev_get_gpio_in(sms
->mpu
->gpio
, SPITZ_GPIO_TP_INT
));
731 bus
= qdev_get_child_bus(sms
->mux
, "ssi2");
732 sms
->max1111
= ssi_create_slave(bus
, "max1111");
733 max1111
= sms
->max1111
;
734 max111x_set_input(sms
->max1111
, MAX1111_BATT_VOLT
, SPITZ_BATTERY_VOLT
);
735 max111x_set_input(sms
->max1111
, MAX1111_BATT_TEMP
, 0);
736 max111x_set_input(sms
->max1111
, MAX1111_ACIN_VOLT
, SPITZ_CHARGEON_ACIN
);
738 qdev_connect_gpio_out(sms
->mpu
->gpio
, SPITZ_GPIO_LCDCON_CS
,
739 qdev_get_gpio_in(sms
->mux
, 0));
740 qdev_connect_gpio_out(sms
->mpu
->gpio
, SPITZ_GPIO_ADS7846_CS
,
741 qdev_get_gpio_in(sms
->mux
, 1));
742 qdev_connect_gpio_out(sms
->mpu
->gpio
, SPITZ_GPIO_MAX1111_CS
,
743 qdev_get_gpio_in(sms
->mux
, 2));
748 static void spitz_microdrive_attach(PXA2xxState
*cpu
, int slot
)
753 dinfo
= drive_get(IF_IDE
, 0, 0);
754 if (!dinfo
|| dinfo
->media_cd
)
756 md
= dscm1xxxx_init(dinfo
);
757 pxa2xx_pcmcia_attach(cpu
->pcmcia
[slot
], md
);
760 /* Wm8750 and Max7310 on I2C */
762 #define AKITA_MAX_ADDR 0x18
763 #define SPITZ_WM_ADDRL 0x1b
764 #define SPITZ_WM_ADDRH 0x1a
766 #define SPITZ_GPIO_WM 5
768 static void spitz_wm8750_addr(void *opaque
, int line
, int level
)
770 I2CSlave
*wm
= (I2CSlave
*) opaque
;
772 i2c_set_slave_address(wm
, SPITZ_WM_ADDRH
);
774 i2c_set_slave_address(wm
, SPITZ_WM_ADDRL
);
777 static void spitz_i2c_setup(PXA2xxState
*cpu
)
779 /* Attach the CPU on one end of our I2C bus. */
780 I2CBus
*bus
= pxa2xx_i2c_bus(cpu
->i2c
[0]);
784 /* Attach a WM8750 to the bus */
785 wm
= i2c_create_slave(bus
, TYPE_WM8750
, 0);
787 spitz_wm8750_addr(wm
, 0, 0);
788 qdev_connect_gpio_out(cpu
->gpio
, SPITZ_GPIO_WM
,
789 qemu_allocate_irq(spitz_wm8750_addr
, wm
, 0));
790 /* .. and to the sound interface. */
791 cpu
->i2s
->opaque
= wm
;
792 cpu
->i2s
->codec_out
= wm8750_dac_dat
;
793 cpu
->i2s
->codec_in
= wm8750_adc_dat
;
794 wm8750_data_req_set(wm
, cpu
->i2s
->data_req
, cpu
->i2s
);
797 static void spitz_akita_i2c_setup(PXA2xxState
*cpu
)
799 /* Attach a Max7310 to Akita I2C bus. */
800 i2c_create_slave(pxa2xx_i2c_bus(cpu
->i2c
[0]), "max7310",
804 /* Other peripherals */
806 static void spitz_out_switch(void *opaque
, int line
, int level
)
810 zaurus_printf("Charging %s.\n", level
? "off" : "on");
813 zaurus_printf("Discharging %s.\n", level
? "on" : "off");
816 zaurus_printf("Green LED %s.\n", level
? "on" : "off");
819 zaurus_printf("Orange LED %s.\n", level
? "on" : "off");
822 spitz_bl_bit5(opaque
, line
, level
);
825 spitz_bl_power(opaque
, line
, level
);
828 spitz_adc_temp_on(opaque
, line
, level
);
833 #define SPITZ_SCP_LED_GREEN 1
834 #define SPITZ_SCP_JK_B 2
835 #define SPITZ_SCP_CHRG_ON 3
836 #define SPITZ_SCP_MUTE_L 4
837 #define SPITZ_SCP_MUTE_R 5
838 #define SPITZ_SCP_CF_POWER 6
839 #define SPITZ_SCP_LED_ORANGE 7
840 #define SPITZ_SCP_JK_A 8
841 #define SPITZ_SCP_ADC_TEMP_ON 9
842 #define SPITZ_SCP2_IR_ON 1
843 #define SPITZ_SCP2_AKIN_PULLUP 2
844 #define SPITZ_SCP2_BACKLIGHT_CONT 7
845 #define SPITZ_SCP2_BACKLIGHT_ON 8
846 #define SPITZ_SCP2_MIC_BIAS 9
848 static void spitz_scoop_gpio_setup(PXA2xxState
*cpu
,
849 DeviceState
*scp0
, DeviceState
*scp1
)
851 qemu_irq
*outsignals
= qemu_allocate_irqs(spitz_out_switch
, cpu
, 8);
853 qdev_connect_gpio_out(scp0
, SPITZ_SCP_CHRG_ON
, outsignals
[0]);
854 qdev_connect_gpio_out(scp0
, SPITZ_SCP_JK_B
, outsignals
[1]);
855 qdev_connect_gpio_out(scp0
, SPITZ_SCP_LED_GREEN
, outsignals
[2]);
856 qdev_connect_gpio_out(scp0
, SPITZ_SCP_LED_ORANGE
, outsignals
[3]);
859 qdev_connect_gpio_out(scp1
, SPITZ_SCP2_BACKLIGHT_CONT
, outsignals
[4]);
860 qdev_connect_gpio_out(scp1
, SPITZ_SCP2_BACKLIGHT_ON
, outsignals
[5]);
863 qdev_connect_gpio_out(scp0
, SPITZ_SCP_ADC_TEMP_ON
, outsignals
[6]);
866 #define SPITZ_GPIO_HSYNC 22
867 #define SPITZ_GPIO_SD_DETECT 9
868 #define SPITZ_GPIO_SD_WP 81
869 #define SPITZ_GPIO_ON_RESET 89
870 #define SPITZ_GPIO_BAT_COVER 90
871 #define SPITZ_GPIO_CF1_IRQ 105
872 #define SPITZ_GPIO_CF1_CD 94
873 #define SPITZ_GPIO_CF2_IRQ 106
874 #define SPITZ_GPIO_CF2_CD 93
876 static int spitz_hsync
;
878 static void spitz_lcd_hsync_handler(void *opaque
, int line
, int level
)
880 PXA2xxState
*cpu
= (PXA2xxState
*) opaque
;
881 qemu_set_irq(qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_HSYNC
), spitz_hsync
);
885 static void spitz_reset(void *opaque
, int line
, int level
)
888 qemu_system_reset_request(SHUTDOWN_CAUSE_GUEST_RESET
);
892 static void spitz_gpio_setup(PXA2xxState
*cpu
, int slots
)
898 * Bad hack: We toggle the LCD hsync GPIO on every GPIO status
899 * read to satisfy broken guests that poll-wait for hsync.
900 * Simulating a real hsync event would be less practical and
901 * wouldn't guarantee that a guest ever exits the loop.
904 lcd_hsync
= qemu_allocate_irq(spitz_lcd_hsync_handler
, cpu
, 0);
905 pxa2xx_gpio_read_notifier(cpu
->gpio
, lcd_hsync
);
906 pxa2xx_lcd_vsync_notifier(cpu
->lcd
, lcd_hsync
);
909 pxa2xx_mmci_handlers(cpu
->mmc
,
910 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_SD_WP
),
911 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_SD_DETECT
));
913 /* Battery lock always closed */
914 qemu_irq_raise(qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_BAT_COVER
));
917 reset
= qemu_allocate_irq(spitz_reset
, cpu
, 0);
918 qdev_connect_gpio_out(cpu
->gpio
, SPITZ_GPIO_ON_RESET
, reset
);
920 /* PCMCIA signals: card's IRQ and Card-Detect */
922 pxa2xx_pcmcia_set_irq_cb(cpu
->pcmcia
[0],
923 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_CF1_IRQ
),
924 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_CF1_CD
));
926 pxa2xx_pcmcia_set_irq_cb(cpu
->pcmcia
[1],
927 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_CF2_IRQ
),
928 qdev_get_gpio_in(cpu
->gpio
, SPITZ_GPIO_CF2_CD
));
932 #define SPITZ_RAM 0x04000000
933 #define SPITZ_ROM 0x00800000
935 static struct arm_boot_info spitz_binfo
= {
936 .loader_start
= PXA2XX_SDRAM_BASE
,
937 .ram_size
= 0x04000000,
940 static void spitz_common_init(MachineState
*machine
)
942 SpitzMachineClass
*smc
= SPITZ_MACHINE_GET_CLASS(machine
);
943 SpitzMachineState
*sms
= SPITZ_MACHINE(machine
);
944 enum spitz_model_e model
= smc
->model
;
946 DeviceState
*scp0
, *scp1
= NULL
;
947 MemoryRegion
*address_space_mem
= get_system_memory();
948 MemoryRegion
*rom
= g_new(MemoryRegion
, 1);
950 /* Setup CPU & memory */
951 mpu
= pxa270_init(address_space_mem
, spitz_binfo
.ram_size
,
955 sl_flash_register(mpu
, (model
== spitz
) ? FLASH_128M
: FLASH_1024M
);
957 memory_region_init_rom(rom
, NULL
, "spitz.rom", SPITZ_ROM
, &error_fatal
);
958 memory_region_add_subregion(address_space_mem
, 0, rom
);
960 /* Setup peripherals */
961 spitz_keyboard_register(mpu
);
963 spitz_ssp_attach(sms
);
965 scp0
= sysbus_create_simple("scoop", 0x10800000, NULL
);
966 if (model
!= akita
) {
967 scp1
= sysbus_create_simple("scoop", 0x08800040, NULL
);
970 spitz_scoop_gpio_setup(mpu
, scp0
, scp1
);
972 spitz_gpio_setup(mpu
, (model
== akita
) ? 1 : 2);
974 spitz_i2c_setup(mpu
);
977 spitz_akita_i2c_setup(mpu
);
979 if (model
== terrier
)
980 /* A 6.0 GB microdrive is permanently sitting in CF slot 1. */
981 spitz_microdrive_attach(mpu
, 1);
982 else if (model
!= akita
)
983 /* A 4.0 GB microdrive is permanently sitting in CF slot 0. */
984 spitz_microdrive_attach(mpu
, 0);
986 spitz_binfo
.board_id
= smc
->arm_id
;
987 arm_load_kernel(mpu
->cpu
, machine
, &spitz_binfo
);
988 sl_bootparam_write(SL_PXA_PARAM_BASE
);
991 static void spitz_common_class_init(ObjectClass
*oc
, void *data
)
993 MachineClass
*mc
= MACHINE_CLASS(oc
);
995 mc
->block_default_type
= IF_IDE
;
996 mc
->ignore_memory_transaction_failures
= true;
997 mc
->init
= spitz_common_init
;
1000 static const TypeInfo spitz_common_info
= {
1001 .name
= TYPE_SPITZ_MACHINE
,
1002 .parent
= TYPE_MACHINE
,
1004 .instance_size
= sizeof(SpitzMachineState
),
1005 .class_size
= sizeof(SpitzMachineClass
),
1006 .class_init
= spitz_common_class_init
,
1009 static void akitapda_class_init(ObjectClass
*oc
, void *data
)
1011 MachineClass
*mc
= MACHINE_CLASS(oc
);
1012 SpitzMachineClass
*smc
= SPITZ_MACHINE_CLASS(oc
);
1014 mc
->desc
= "Sharp SL-C1000 (Akita) PDA (PXA270)";
1015 mc
->default_cpu_type
= ARM_CPU_TYPE_NAME("pxa270-c0");
1017 smc
->arm_id
= 0x2e8;
1020 static const TypeInfo akitapda_type
= {
1021 .name
= MACHINE_TYPE_NAME("akita"),
1022 .parent
= TYPE_SPITZ_MACHINE
,
1023 .class_init
= akitapda_class_init
,
1026 static void spitzpda_class_init(ObjectClass
*oc
, void *data
)
1028 MachineClass
*mc
= MACHINE_CLASS(oc
);
1029 SpitzMachineClass
*smc
= SPITZ_MACHINE_CLASS(oc
);
1031 mc
->desc
= "Sharp SL-C3000 (Spitz) PDA (PXA270)";
1032 mc
->default_cpu_type
= ARM_CPU_TYPE_NAME("pxa270-c0");
1034 smc
->arm_id
= 0x2c9;
1037 static const TypeInfo spitzpda_type
= {
1038 .name
= MACHINE_TYPE_NAME("spitz"),
1039 .parent
= TYPE_SPITZ_MACHINE
,
1040 .class_init
= spitzpda_class_init
,
1043 static void borzoipda_class_init(ObjectClass
*oc
, void *data
)
1045 MachineClass
*mc
= MACHINE_CLASS(oc
);
1046 SpitzMachineClass
*smc
= SPITZ_MACHINE_CLASS(oc
);
1048 mc
->desc
= "Sharp SL-C3100 (Borzoi) PDA (PXA270)";
1049 mc
->default_cpu_type
= ARM_CPU_TYPE_NAME("pxa270-c0");
1050 smc
->model
= borzoi
;
1051 smc
->arm_id
= 0x33f;
1054 static const TypeInfo borzoipda_type
= {
1055 .name
= MACHINE_TYPE_NAME("borzoi"),
1056 .parent
= TYPE_SPITZ_MACHINE
,
1057 .class_init
= borzoipda_class_init
,
1060 static void terrierpda_class_init(ObjectClass
*oc
, void *data
)
1062 MachineClass
*mc
= MACHINE_CLASS(oc
);
1063 SpitzMachineClass
*smc
= SPITZ_MACHINE_CLASS(oc
);
1065 mc
->desc
= "Sharp SL-C3200 (Terrier) PDA (PXA270)";
1066 mc
->default_cpu_type
= ARM_CPU_TYPE_NAME("pxa270-c5");
1067 smc
->model
= terrier
;
1068 smc
->arm_id
= 0x33f;
1071 static const TypeInfo terrierpda_type
= {
1072 .name
= MACHINE_TYPE_NAME("terrier"),
1073 .parent
= TYPE_SPITZ_MACHINE
,
1074 .class_init
= terrierpda_class_init
,
1077 static void spitz_machine_init(void)
1079 type_register_static(&spitz_common_info
);
1080 type_register_static(&akitapda_type
);
1081 type_register_static(&spitzpda_type
);
1082 type_register_static(&borzoipda_type
);
1083 type_register_static(&terrierpda_type
);
1086 type_init(spitz_machine_init
)
1088 static bool is_version_0(void *opaque
, int version_id
)
1090 return version_id
== 0;
1093 static VMStateDescription vmstate_sl_nand_info
= {
1096 .minimum_version_id
= 0,
1097 .fields
= (VMStateField
[]) {
1098 VMSTATE_UINT8(ctl
, SLNANDState
),
1099 VMSTATE_STRUCT(ecc
, SLNANDState
, 0, vmstate_ecc_state
, ECCState
),
1100 VMSTATE_END_OF_LIST(),
1104 static Property sl_nand_properties
[] = {
1105 DEFINE_PROP_UINT8("manf_id", SLNANDState
, manf_id
, NAND_MFR_SAMSUNG
),
1106 DEFINE_PROP_UINT8("chip_id", SLNANDState
, chip_id
, 0xf1),
1107 DEFINE_PROP_END_OF_LIST(),
1110 static void sl_nand_class_init(ObjectClass
*klass
, void *data
)
1112 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1114 dc
->vmsd
= &vmstate_sl_nand_info
;
1115 device_class_set_props(dc
, sl_nand_properties
);
1116 dc
->realize
= sl_nand_realize
;
1117 /* Reason: init() method uses drive_get() */
1118 dc
->user_creatable
= false;
1121 static const TypeInfo sl_nand_info
= {
1122 .name
= TYPE_SL_NAND
,
1123 .parent
= TYPE_SYS_BUS_DEVICE
,
1124 .instance_size
= sizeof(SLNANDState
),
1125 .instance_init
= sl_nand_init
,
1126 .class_init
= sl_nand_class_init
,
1129 static VMStateDescription vmstate_spitz_kbd
= {
1130 .name
= "spitz-keyboard",
1132 .minimum_version_id
= 0,
1133 .post_load
= spitz_keyboard_post_load
,
1134 .fields
= (VMStateField
[]) {
1135 VMSTATE_UINT16(sense_state
, SpitzKeyboardState
),
1136 VMSTATE_UINT16(strobe_state
, SpitzKeyboardState
),
1137 VMSTATE_UNUSED_TEST(is_version_0
, 5),
1138 VMSTATE_END_OF_LIST(),
1142 static void spitz_keyboard_class_init(ObjectClass
*klass
, void *data
)
1144 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1146 dc
->vmsd
= &vmstate_spitz_kbd
;
1147 dc
->realize
= spitz_keyboard_realize
;
1150 static const TypeInfo spitz_keyboard_info
= {
1151 .name
= TYPE_SPITZ_KEYBOARD
,
1152 .parent
= TYPE_SYS_BUS_DEVICE
,
1153 .instance_size
= sizeof(SpitzKeyboardState
),
1154 .instance_init
= spitz_keyboard_init
,
1155 .class_init
= spitz_keyboard_class_init
,
1158 static const VMStateDescription vmstate_corgi_ssp_regs
= {
1159 .name
= "corgi-ssp",
1161 .minimum_version_id
= 2,
1162 .fields
= (VMStateField
[]) {
1163 VMSTATE_SSI_SLAVE(ssidev
, CorgiSSPState
),
1164 VMSTATE_UINT32_ARRAY(enable
, CorgiSSPState
, 3),
1165 VMSTATE_END_OF_LIST(),
1169 static void corgi_ssp_class_init(ObjectClass
*klass
, void *data
)
1171 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1172 SSISlaveClass
*k
= SSI_SLAVE_CLASS(klass
);
1174 k
->realize
= corgi_ssp_realize
;
1175 k
->transfer
= corgi_ssp_transfer
;
1176 dc
->vmsd
= &vmstate_corgi_ssp_regs
;
1179 static const TypeInfo corgi_ssp_info
= {
1180 .name
= "corgi-ssp",
1181 .parent
= TYPE_SSI_SLAVE
,
1182 .instance_size
= sizeof(CorgiSSPState
),
1183 .class_init
= corgi_ssp_class_init
,
1186 static const VMStateDescription vmstate_spitz_lcdtg_regs
= {
1187 .name
= "spitz-lcdtg",
1189 .minimum_version_id
= 1,
1190 .fields
= (VMStateField
[]) {
1191 VMSTATE_SSI_SLAVE(ssidev
, SpitzLCDTG
),
1192 VMSTATE_UINT32(bl_intensity
, SpitzLCDTG
),
1193 VMSTATE_UINT32(bl_power
, SpitzLCDTG
),
1194 VMSTATE_END_OF_LIST(),
1198 static void spitz_lcdtg_class_init(ObjectClass
*klass
, void *data
)
1200 DeviceClass
*dc
= DEVICE_CLASS(klass
);
1201 SSISlaveClass
*k
= SSI_SLAVE_CLASS(klass
);
1203 k
->realize
= spitz_lcdtg_realize
;
1204 k
->transfer
= spitz_lcdtg_transfer
;
1205 dc
->vmsd
= &vmstate_spitz_lcdtg_regs
;
1208 static const TypeInfo spitz_lcdtg_info
= {
1209 .name
= "spitz-lcdtg",
1210 .parent
= TYPE_SSI_SLAVE
,
1211 .instance_size
= sizeof(SpitzLCDTG
),
1212 .class_init
= spitz_lcdtg_class_init
,
1215 static void spitz_register_types(void)
1217 type_register_static(&corgi_ssp_info
);
1218 type_register_static(&spitz_lcdtg_info
);
1219 type_register_static(&spitz_keyboard_info
);
1220 type_register_static(&sl_nand_info
);
1223 type_init(spitz_register_types
)