2 * Marvell MV88W8618 / Freecom MusicPal emulation.
4 * Copyright (c) 2008 Jan Kiszka
6 * This code is licenced under the GNU GPL v2.
16 #include "qemu-timer.h"
20 #include "audio/audio.h"
23 #define MP_ETH_BASE 0x80008000
24 #define MP_ETH_SIZE 0x00001000
26 #define MP_UART1_BASE 0x8000C840
27 #define MP_UART2_BASE 0x8000C940
29 #define MP_FLASHCFG_BASE 0x90006000
30 #define MP_FLASHCFG_SIZE 0x00001000
32 #define MP_AUDIO_BASE 0x90007000
33 #define MP_AUDIO_SIZE 0x00001000
35 #define MP_PIC_BASE 0x90008000
36 #define MP_PIC_SIZE 0x00001000
38 #define MP_PIT_BASE 0x90009000
39 #define MP_PIT_SIZE 0x00001000
41 #define MP_LCD_BASE 0x9000c000
42 #define MP_LCD_SIZE 0x00001000
44 #define MP_SRAM_BASE 0xC0000000
45 #define MP_SRAM_SIZE 0x00020000
47 #define MP_RAM_DEFAULT_SIZE 32*1024*1024
48 #define MP_FLASH_SIZE_MAX 32*1024*1024
50 #define MP_TIMER1_IRQ 4
52 #define MP_TIMER4_IRQ 7
55 #define MP_UART1_IRQ 11
56 #define MP_UART2_IRQ 11
57 #define MP_GPIO_IRQ 12
59 #define MP_AUDIO_IRQ 30
61 static uint32_t gpio_in_state = 0xffffffff;
62 static uint32_t gpio_out_state;
63 static ram_addr_t sram_off;
65 /* Address conversion helpers */
66 static void *target2host_addr(uint32_t addr)
68 if (addr < MP_SRAM_BASE) {
69 if (addr >= MP_RAM_DEFAULT_SIZE)
71 return (void *)(phys_ram_base + addr);
73 if (addr >= MP_SRAM_BASE + MP_SRAM_SIZE)
75 return (void *)(phys_ram_base + sram_off + addr - MP_SRAM_BASE);
79 static uint32_t host2target_addr(void *addr)
81 if (addr < ((void *)phys_ram_base) + sram_off)
82 return (unsigned long)addr - (unsigned long)phys_ram_base;
84 return (unsigned long)addr - (unsigned long)phys_ram_base -
85 sram_off + MP_SRAM_BASE;
89 typedef enum i2c_state {
112 typedef struct i2c_interface {
121 static void i2c_enter_stop(i2c_interface *i2c)
123 if (i2c->current_addr >= 0)
124 i2c_end_transfer(i2c->bus);
125 i2c->current_addr = -1;
126 i2c->state = STOPPED;
129 static void i2c_state_update(i2c_interface *i2c, int data, int clock)
134 switch (i2c->state) {
136 if (data == 0 && i2c->last_data == 1 && clock == 1)
137 i2c->state = INITIALIZING;
141 if (clock == 0 && i2c->last_clock == 1 && data == 0)
142 i2c->state = SENDING_BIT7;
147 case SENDING_BIT7 ... SENDING_BIT0:
148 if (clock == 0 && i2c->last_clock == 1) {
149 i2c->buffer = (i2c->buffer << 1) | data;
150 i2c->state++; /* will end up in WAITING_FOR_ACK */
151 } else if (data == 1 && i2c->last_data == 0 && clock == 1)
155 case WAITING_FOR_ACK:
156 if (clock == 0 && i2c->last_clock == 1) {
157 if (i2c->current_addr < 0) {
158 i2c->current_addr = i2c->buffer;
159 i2c_start_transfer(i2c->bus, i2c->current_addr & 0xfe,
162 i2c_send(i2c->bus, i2c->buffer);
163 if (i2c->current_addr & 1) {
164 i2c->state = RECEIVING_BIT7;
165 i2c->buffer = i2c_recv(i2c->bus);
167 i2c->state = SENDING_BIT7;
168 } else if (data == 1 && i2c->last_data == 0 && clock == 1)
172 case RECEIVING_BIT7 ... RECEIVING_BIT0:
173 if (clock == 0 && i2c->last_clock == 1) {
174 i2c->state++; /* will end up in SENDING_ACK */
176 } else if (data == 1 && i2c->last_data == 0 && clock == 1)
181 if (clock == 0 && i2c->last_clock == 1) {
182 i2c->state = RECEIVING_BIT7;
184 i2c->buffer = i2c_recv(i2c->bus);
187 } else if (data == 1 && i2c->last_data == 0 && clock == 1)
192 i2c->last_data = data;
193 i2c->last_clock = clock;
196 static int i2c_get_data(i2c_interface *i2c)
201 switch (i2c->state) {
202 case RECEIVING_BIT7 ... RECEIVING_BIT0:
203 return (i2c->buffer >> 7);
205 case WAITING_FOR_ACK:
211 static i2c_interface *mixer_i2c;
215 /* Audio register offsets */
216 #define MP_AUDIO_PLAYBACK_MODE 0x00
217 #define MP_AUDIO_CLOCK_DIV 0x18
218 #define MP_AUDIO_IRQ_STATUS 0x20
219 #define MP_AUDIO_IRQ_ENABLE 0x24
220 #define MP_AUDIO_TX_START_LO 0x28
221 #define MP_AUDIO_TX_THRESHOLD 0x2C
222 #define MP_AUDIO_TX_STATUS 0x38
223 #define MP_AUDIO_TX_START_HI 0x40
225 /* Status register and IRQ enable bits */
226 #define MP_AUDIO_TX_HALF (1 << 6)
227 #define MP_AUDIO_TX_FULL (1 << 7)
229 /* Playback mode bits */
230 #define MP_AUDIO_16BIT_SAMPLE (1 << 0)
231 #define MP_AUDIO_PLAYBACK_EN (1 << 7)
232 #define MP_AUDIO_CLOCK_24MHZ (1 << 9)
233 #define MP_AUDIO_MONO (1 << 14)
235 /* Wolfson 8750 I2C address */
236 #define MP_WM_ADDR 0x34
238 const char audio_name[] = "mv88w8618";
240 typedef struct musicpal_audio_state {
243 uint32_t playback_mode;
246 unsigned long phys_buf;
248 unsigned int threshold;
249 unsigned int play_pos;
250 unsigned int last_free;
253 } musicpal_audio_state;
255 static void audio_callback(void *opaque, int free_out, int free_in)
257 musicpal_audio_state *s = opaque;
258 int16_t *codec_buffer, *mem_buffer;
261 if (!(s->playback_mode & MP_AUDIO_PLAYBACK_EN))
264 if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE)
267 if (!(s->playback_mode & MP_AUDIO_MONO))
270 block_size = s->threshold/2;
271 if (free_out - s->last_free < block_size)
274 mem_buffer = s->target_buffer + s->play_pos;
275 if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE) {
276 if (s->playback_mode & MP_AUDIO_MONO) {
277 codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
278 for (pos = 0; pos < block_size; pos += 2) {
279 *codec_buffer++ = *mem_buffer;
280 *codec_buffer++ = *mem_buffer++;
283 memcpy(wm8750_dac_buffer(s->wm, block_size >> 2),
284 (uint32_t *)mem_buffer, block_size);
286 if (s->playback_mode & MP_AUDIO_MONO) {
287 codec_buffer = wm8750_dac_buffer(s->wm, block_size);
288 for (pos = 0; pos < block_size; pos++) {
289 *codec_buffer++ = cpu_to_le16(256 * *((int8_t *)mem_buffer));
290 *codec_buffer++ = cpu_to_le16(256 * *((int8_t *)mem_buffer)++);
293 codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
294 for (pos = 0; pos < block_size; pos += 2) {
295 *codec_buffer++ = cpu_to_le16(256 * *((int8_t *)mem_buffer)++);
296 *codec_buffer++ = cpu_to_le16(256 * *((int8_t *)mem_buffer)++);
300 wm8750_dac_commit(s->wm);
302 s->last_free = free_out - block_size;
304 if (s->play_pos == 0) {
305 s->status |= MP_AUDIO_TX_HALF;
306 s->play_pos = block_size;
308 s->status |= MP_AUDIO_TX_FULL;
312 if (s->status & s->irq_enable)
313 qemu_irq_raise(s->irq);
316 static void musicpal_audio_clock_update(musicpal_audio_state *s)
320 if (s->playback_mode & MP_AUDIO_CLOCK_24MHZ)
321 rate = 24576000 / 64; /* 24.576MHz */
323 rate = 11289600 / 64; /* 11.2896MHz */
325 rate /= ((s->clock_div >> 8) & 0xff) + 1;
327 wm8750_set_bclk_in(s->wm, rate);
330 static uint32_t musicpal_audio_read(void *opaque, target_phys_addr_t offset)
332 musicpal_audio_state *s = opaque;
336 case MP_AUDIO_PLAYBACK_MODE:
337 return s->playback_mode;
339 case MP_AUDIO_CLOCK_DIV:
342 case MP_AUDIO_IRQ_STATUS:
345 case MP_AUDIO_IRQ_ENABLE:
346 return s->irq_enable;
348 case MP_AUDIO_TX_STATUS:
349 return s->play_pos >> 2;
356 static void musicpal_audio_write(void *opaque, target_phys_addr_t offset,
359 musicpal_audio_state *s = opaque;
363 case MP_AUDIO_PLAYBACK_MODE:
364 if (value & MP_AUDIO_PLAYBACK_EN &&
365 !(s->playback_mode & MP_AUDIO_PLAYBACK_EN)) {
370 s->playback_mode = value;
371 musicpal_audio_clock_update(s);
374 case MP_AUDIO_CLOCK_DIV:
375 s->clock_div = value;
378 musicpal_audio_clock_update(s);
381 case MP_AUDIO_IRQ_STATUS:
385 case MP_AUDIO_IRQ_ENABLE:
386 s->irq_enable = value;
387 if (s->status & s->irq_enable)
388 qemu_irq_raise(s->irq);
391 case MP_AUDIO_TX_START_LO:
392 s->phys_buf = (s->phys_buf & 0xFFFF0000) | (value & 0xFFFF);
393 s->target_buffer = target2host_addr(s->phys_buf);
398 case MP_AUDIO_TX_THRESHOLD:
399 s->threshold = (value + 1) * 4;
402 case MP_AUDIO_TX_START_HI:
403 s->phys_buf = (s->phys_buf & 0xFFFF) | (value << 16);
404 s->target_buffer = target2host_addr(s->phys_buf);
411 static void musicpal_audio_reset(void *opaque)
413 musicpal_audio_state *s = opaque;
415 s->playback_mode = 0;
420 static CPUReadMemoryFunc *musicpal_audio_readfn[] = {
426 static CPUWriteMemoryFunc *musicpal_audio_writefn[] = {
427 musicpal_audio_write,
428 musicpal_audio_write,
432 static i2c_interface *musicpal_audio_init(uint32_t base, qemu_irq irq)
435 musicpal_audio_state *s;
441 AUD_log(audio_name, "No audio state\n");
445 s = qemu_mallocz(sizeof(musicpal_audio_state));
451 i2c = qemu_mallocz(sizeof(i2c_interface));
454 i2c->bus = i2c_init_bus();
455 i2c->current_addr = -1;
457 s->wm = wm8750_init(i2c->bus, audio);
460 i2c_set_slave_address(s->wm, MP_WM_ADDR);
461 wm8750_data_req_set(s->wm, audio_callback, s);
463 iomemtype = cpu_register_io_memory(0, musicpal_audio_readfn,
464 musicpal_audio_writefn, s);
465 cpu_register_physical_memory(base, MP_AUDIO_SIZE, iomemtype);
467 qemu_register_reset(musicpal_audio_reset, s);
471 #else /* !HAS_AUDIO */
472 static i2c_interface *musicpal_audio_init(uint32_t base, qemu_irq irq)
476 #endif /* !HAS_AUDIO */
478 /* Ethernet register offsets */
479 #define MP_ETH_SMIR 0x010
480 #define MP_ETH_PCXR 0x408
481 #define MP_ETH_SDCMR 0x448
482 #define MP_ETH_ICR 0x450
483 #define MP_ETH_IMR 0x458
484 #define MP_ETH_FRDP0 0x480
485 #define MP_ETH_FRDP1 0x484
486 #define MP_ETH_FRDP2 0x488
487 #define MP_ETH_FRDP3 0x48C
488 #define MP_ETH_CRDP0 0x4A0
489 #define MP_ETH_CRDP1 0x4A4
490 #define MP_ETH_CRDP2 0x4A8
491 #define MP_ETH_CRDP3 0x4AC
492 #define MP_ETH_CTDP0 0x4E0
493 #define MP_ETH_CTDP1 0x4E4
494 #define MP_ETH_CTDP2 0x4E8
495 #define MP_ETH_CTDP3 0x4EC
498 #define MP_ETH_SMIR_DATA 0x0000FFFF
499 #define MP_ETH_SMIR_ADDR 0x03FF0000
500 #define MP_ETH_SMIR_OPCODE (1 << 26) /* Read value */
501 #define MP_ETH_SMIR_RDVALID (1 << 27)
504 #define MP_ETH_PHY1_BMSR 0x00210000
505 #define MP_ETH_PHY1_PHYSID1 0x00410000
506 #define MP_ETH_PHY1_PHYSID2 0x00610000
508 #define MP_PHY_BMSR_LINK 0x0004
509 #define MP_PHY_BMSR_AUTONEG 0x0008
511 #define MP_PHY_88E3015 0x01410E20
513 /* TX descriptor status */
514 #define MP_ETH_TX_OWN (1 << 31)
516 /* RX descriptor status */
517 #define MP_ETH_RX_OWN (1 << 31)
519 /* Interrupt cause/mask bits */
520 #define MP_ETH_IRQ_RX_BIT 0
521 #define MP_ETH_IRQ_RX (1 << MP_ETH_IRQ_RX_BIT)
522 #define MP_ETH_IRQ_TXHI_BIT 2
523 #define MP_ETH_IRQ_TXLO_BIT 3
525 /* Port config bits */
526 #define MP_ETH_PCXR_2BSM_BIT 28 /* 2-byte incoming suffix */
528 /* SDMA command bits */
529 #define MP_ETH_CMD_TXHI (1 << 23)
530 #define MP_ETH_CMD_TXLO (1 << 22)
532 typedef struct mv88w8618_tx_desc {
540 typedef struct mv88w8618_rx_desc {
543 uint16_t buffer_size;
548 typedef struct mv88w8618_eth_state {
555 mv88w8618_tx_desc *tx_queue[2];
556 mv88w8618_rx_desc *rx_queue[4];
557 mv88w8618_rx_desc *frx_queue[4];
558 mv88w8618_rx_desc *cur_rx[4];
560 } mv88w8618_eth_state;
562 static int eth_can_receive(void *opaque)
567 static void eth_receive(void *opaque, const uint8_t *buf, int size)
569 mv88w8618_eth_state *s = opaque;
570 mv88w8618_rx_desc *desc;
573 for (i = 0; i < 4; i++) {
578 if (le32_to_cpu(desc->cmdstat) & MP_ETH_RX_OWN &&
579 le16_to_cpu(desc->buffer_size) >= size) {
580 memcpy(target2host_addr(le32_to_cpu(desc->buffer) +
583 desc->bytes = cpu_to_le16(size + s->vlan_header);
584 desc->cmdstat &= cpu_to_le32(~MP_ETH_RX_OWN);
585 s->cur_rx[i] = target2host_addr(le32_to_cpu(desc->next));
587 s->icr |= MP_ETH_IRQ_RX;
589 qemu_irq_raise(s->irq);
592 desc = target2host_addr(le32_to_cpu(desc->next));
593 } while (desc != s->rx_queue[i]);
597 static void eth_send(mv88w8618_eth_state *s, int queue_index)
599 mv88w8618_tx_desc *desc = s->tx_queue[queue_index];
602 if (le32_to_cpu(desc->cmdstat) & MP_ETH_TX_OWN) {
603 qemu_send_packet(s->vc,
604 target2host_addr(le32_to_cpu(desc->buffer)),
605 le16_to_cpu(desc->bytes));
606 desc->cmdstat &= cpu_to_le32(~MP_ETH_TX_OWN);
607 s->icr |= 1 << (MP_ETH_IRQ_TXLO_BIT - queue_index);
609 desc = target2host_addr(le32_to_cpu(desc->next));
610 } while (desc != s->tx_queue[queue_index]);
613 static uint32_t mv88w8618_eth_read(void *opaque, target_phys_addr_t offset)
615 mv88w8618_eth_state *s = opaque;
620 if (s->smir & MP_ETH_SMIR_OPCODE) {
621 switch (s->smir & MP_ETH_SMIR_ADDR) {
622 case MP_ETH_PHY1_BMSR:
623 return MP_PHY_BMSR_LINK | MP_PHY_BMSR_AUTONEG |
625 case MP_ETH_PHY1_PHYSID1:
626 return (MP_PHY_88E3015 >> 16) | MP_ETH_SMIR_RDVALID;
627 case MP_ETH_PHY1_PHYSID2:
628 return (MP_PHY_88E3015 & 0xFFFF) | MP_ETH_SMIR_RDVALID;
630 return MP_ETH_SMIR_RDVALID;
641 case MP_ETH_FRDP0 ... MP_ETH_FRDP3:
642 return host2target_addr(s->frx_queue[(offset - MP_ETH_FRDP0)/4]);
644 case MP_ETH_CRDP0 ... MP_ETH_CRDP3:
645 return host2target_addr(s->rx_queue[(offset - MP_ETH_CRDP0)/4]);
647 case MP_ETH_CTDP0 ... MP_ETH_CTDP3:
648 return host2target_addr(s->tx_queue[(offset - MP_ETH_CTDP0)/4]);
655 static void mv88w8618_eth_write(void *opaque, target_phys_addr_t offset,
658 mv88w8618_eth_state *s = opaque;
667 s->vlan_header = ((value >> MP_ETH_PCXR_2BSM_BIT) & 1) * 2;
671 if (value & MP_ETH_CMD_TXHI)
673 if (value & MP_ETH_CMD_TXLO)
675 if (value & (MP_ETH_CMD_TXHI | MP_ETH_CMD_TXLO) && s->icr & s->imr)
676 qemu_irq_raise(s->irq);
686 qemu_irq_raise(s->irq);
689 case MP_ETH_FRDP0 ... MP_ETH_FRDP3:
690 s->frx_queue[(offset - MP_ETH_FRDP0)/4] = target2host_addr(value);
693 case MP_ETH_CRDP0 ... MP_ETH_CRDP3:
694 s->rx_queue[(offset - MP_ETH_CRDP0)/4] =
695 s->cur_rx[(offset - MP_ETH_CRDP0)/4] = target2host_addr(value);
698 case MP_ETH_CTDP0 ... MP_ETH_CTDP3:
699 s->tx_queue[(offset - MP_ETH_CTDP0)/4] = target2host_addr(value);
704 static CPUReadMemoryFunc *mv88w8618_eth_readfn[] = {
710 static CPUWriteMemoryFunc *mv88w8618_eth_writefn[] = {
716 static void mv88w8618_eth_init(NICInfo *nd, uint32_t base, qemu_irq irq)
718 mv88w8618_eth_state *s;
721 s = qemu_mallocz(sizeof(mv88w8618_eth_state));
726 s->vc = qemu_new_vlan_client(nd->vlan, eth_receive, eth_can_receive, s);
727 iomemtype = cpu_register_io_memory(0, mv88w8618_eth_readfn,
728 mv88w8618_eth_writefn, s);
729 cpu_register_physical_memory(base, MP_ETH_SIZE, iomemtype);
732 /* LCD register offsets */
733 #define MP_LCD_IRQCTRL 0x180
734 #define MP_LCD_IRQSTAT 0x184
735 #define MP_LCD_SPICTRL 0x1ac
736 #define MP_LCD_INST 0x1bc
737 #define MP_LCD_DATA 0x1c0
740 #define MP_LCD_SPI_DATA 0x00100011
741 #define MP_LCD_SPI_CMD 0x00104011
742 #define MP_LCD_SPI_INVALID 0x00000000
745 #define MP_LCD_INST_SETPAGE0 0xB0
747 #define MP_LCD_INST_SETPAGE7 0xB7
749 #define MP_LCD_TEXTCOLOR 0xe0e0ff /* RRGGBB */
751 typedef struct musicpal_lcd_state {
758 uint8_t video_ram[128*64/8];
759 } musicpal_lcd_state;
761 static uint32_t lcd_brightness;
763 static uint8_t scale_lcd_color(uint8_t col)
767 switch (lcd_brightness) {
768 case 0x00000007: /* 0 */
771 case 0x00020000: /* 1 */
772 return (tmp * 1) / 7;
774 case 0x00020001: /* 2 */
775 return (tmp * 2) / 7;
777 case 0x00040000: /* 3 */
778 return (tmp * 3) / 7;
780 case 0x00010006: /* 4 */
781 return (tmp * 4) / 7;
783 case 0x00020005: /* 5 */
784 return (tmp * 5) / 7;
786 case 0x00040003: /* 6 */
787 return (tmp * 6) / 7;
789 case 0x00030004: /* 7 */
795 #define SET_LCD_PIXEL(depth, type) \
796 static inline void glue(set_lcd_pixel, depth) \
797 (musicpal_lcd_state *s, int x, int y, type col) \
800 type *pixel = &((type *) s->ds->data)[(y * 128 * 3 + x) * 3]; \
802 for (dy = 0; dy < 3; dy++, pixel += 127 * 3) \
803 for (dx = 0; dx < 3; dx++, pixel++) \
806 SET_LCD_PIXEL(8, uint8_t)
807 SET_LCD_PIXEL(16, uint16_t)
808 SET_LCD_PIXEL(32, uint32_t)
810 #include "pixel_ops.h"
812 static void lcd_refresh(void *opaque)
814 musicpal_lcd_state *s = opaque;
817 switch (s->ds->depth) {
820 #define LCD_REFRESH(depth, func) \
822 col = func(scale_lcd_color((MP_LCD_TEXTCOLOR >> 16) & 0xff), \
823 scale_lcd_color((MP_LCD_TEXTCOLOR >> 8) & 0xff), \
824 scale_lcd_color(MP_LCD_TEXTCOLOR & 0xff)); \
825 for (x = 0; x < 128; x++) \
826 for (y = 0; y < 64; y++) \
827 if (s->video_ram[x + (y/8)*128] & (1 << (y % 8))) \
828 glue(set_lcd_pixel, depth)(s, x, y, col); \
830 glue(set_lcd_pixel, depth)(s, x, y, 0); \
832 LCD_REFRESH(8, rgb_to_pixel8)
833 LCD_REFRESH(16, rgb_to_pixel16)
834 LCD_REFRESH(32, (s->ds->bgr ? rgb_to_pixel32bgr : rgb_to_pixel32))
836 cpu_abort(cpu_single_env, "unsupported colour depth %i\n",
840 dpy_update(s->ds, 0, 0, 128*3, 64*3);
843 static uint32_t musicpal_lcd_read(void *opaque, target_phys_addr_t offset)
845 musicpal_lcd_state *s = opaque;
857 static void musicpal_lcd_write(void *opaque, target_phys_addr_t offset,
860 musicpal_lcd_state *s = opaque;
869 if (value == MP_LCD_SPI_DATA || value == MP_LCD_SPI_CMD)
872 s->mode = MP_LCD_SPI_INVALID;
876 if (value >= MP_LCD_INST_SETPAGE0 && value <= MP_LCD_INST_SETPAGE7) {
877 s->page = value - MP_LCD_INST_SETPAGE0;
883 if (s->mode == MP_LCD_SPI_CMD) {
884 if (value >= MP_LCD_INST_SETPAGE0 &&
885 value <= MP_LCD_INST_SETPAGE7) {
886 s->page = value - MP_LCD_INST_SETPAGE0;
889 } else if (s->mode == MP_LCD_SPI_DATA) {
890 s->video_ram[s->page*128 + s->page_off] = value;
891 s->page_off = (s->page_off + 1) & 127;
897 static CPUReadMemoryFunc *musicpal_lcd_readfn[] = {
903 static CPUWriteMemoryFunc *musicpal_lcd_writefn[] = {
909 static void musicpal_lcd_init(DisplayState *ds, uint32_t base)
911 musicpal_lcd_state *s;
914 s = qemu_mallocz(sizeof(musicpal_lcd_state));
919 iomemtype = cpu_register_io_memory(0, musicpal_lcd_readfn,
920 musicpal_lcd_writefn, s);
921 cpu_register_physical_memory(base, MP_LCD_SIZE, iomemtype);
923 graphic_console_init(ds, lcd_refresh, NULL, NULL, NULL, s);
924 dpy_resize(ds, 128*3, 64*3);
927 /* PIC register offsets */
928 #define MP_PIC_STATUS 0x00
929 #define MP_PIC_ENABLE_SET 0x08
930 #define MP_PIC_ENABLE_CLR 0x0C
932 typedef struct mv88w8618_pic_state
938 } mv88w8618_pic_state;
940 static void mv88w8618_pic_update(mv88w8618_pic_state *s)
942 qemu_set_irq(s->parent_irq, (s->level & s->enabled));
945 static void mv88w8618_pic_set_irq(void *opaque, int irq, int level)
947 mv88w8618_pic_state *s = opaque;
950 s->level |= 1 << irq;
952 s->level &= ~(1 << irq);
953 mv88w8618_pic_update(s);
956 static uint32_t mv88w8618_pic_read(void *opaque, target_phys_addr_t offset)
958 mv88w8618_pic_state *s = opaque;
963 return s->level & s->enabled;
970 static void mv88w8618_pic_write(void *opaque, target_phys_addr_t offset,
973 mv88w8618_pic_state *s = opaque;
977 case MP_PIC_ENABLE_SET:
981 case MP_PIC_ENABLE_CLR:
982 s->enabled &= ~value;
986 mv88w8618_pic_update(s);
989 static void mv88w8618_pic_reset(void *opaque)
991 mv88w8618_pic_state *s = opaque;
997 static CPUReadMemoryFunc *mv88w8618_pic_readfn[] = {
1003 static CPUWriteMemoryFunc *mv88w8618_pic_writefn[] = {
1004 mv88w8618_pic_write,
1005 mv88w8618_pic_write,
1009 static qemu_irq *mv88w8618_pic_init(uint32_t base, qemu_irq parent_irq)
1011 mv88w8618_pic_state *s;
1015 s = qemu_mallocz(sizeof(mv88w8618_pic_state));
1018 qi = qemu_allocate_irqs(mv88w8618_pic_set_irq, s, 32);
1020 s->parent_irq = parent_irq;
1021 iomemtype = cpu_register_io_memory(0, mv88w8618_pic_readfn,
1022 mv88w8618_pic_writefn, s);
1023 cpu_register_physical_memory(base, MP_PIC_SIZE, iomemtype);
1025 qemu_register_reset(mv88w8618_pic_reset, s);
1030 /* PIT register offsets */
1031 #define MP_PIT_TIMER1_LENGTH 0x00
1033 #define MP_PIT_TIMER4_LENGTH 0x0C
1034 #define MP_PIT_CONTROL 0x10
1035 #define MP_PIT_TIMER1_VALUE 0x14
1037 #define MP_PIT_TIMER4_VALUE 0x20
1038 #define MP_BOARD_RESET 0x34
1040 /* Magic board reset value (probably some watchdog behind it) */
1041 #define MP_BOARD_RESET_MAGIC 0x10000
1043 typedef struct mv88w8618_timer_state {
1044 ptimer_state *timer;
1048 } mv88w8618_timer_state;
1050 typedef struct mv88w8618_pit_state {
1054 } mv88w8618_pit_state;
1056 static void mv88w8618_timer_tick(void *opaque)
1058 mv88w8618_timer_state *s = opaque;
1060 qemu_irq_raise(s->irq);
1063 static void *mv88w8618_timer_init(uint32_t freq, qemu_irq irq)
1065 mv88w8618_timer_state *s;
1068 s = qemu_mallocz(sizeof(mv88w8618_timer_state));
1072 bh = qemu_bh_new(mv88w8618_timer_tick, s);
1073 s->timer = ptimer_init(bh);
1078 static uint32_t mv88w8618_pit_read(void *opaque, target_phys_addr_t offset)
1080 mv88w8618_pit_state *s = opaque;
1081 mv88w8618_timer_state *t;
1085 case MP_PIT_TIMER1_VALUE ... MP_PIT_TIMER4_VALUE:
1086 t = s->timer[(offset-MP_PIT_TIMER1_VALUE) >> 2];
1087 return ptimer_get_count(t->timer);
1094 static void mv88w8618_pit_write(void *opaque, target_phys_addr_t offset,
1097 mv88w8618_pit_state *s = opaque;
1098 mv88w8618_timer_state *t;
1103 case MP_PIT_TIMER1_LENGTH ... MP_PIT_TIMER4_LENGTH:
1104 t = s->timer[offset >> 2];
1106 ptimer_set_limit(t->timer, t->limit, 1);
1109 case MP_PIT_CONTROL:
1110 for (i = 0; i < 4; i++) {
1113 ptimer_set_limit(t->timer, t->limit, 0);
1114 ptimer_set_freq(t->timer, t->freq);
1115 ptimer_run(t->timer, 0);
1121 case MP_BOARD_RESET:
1122 if (value == MP_BOARD_RESET_MAGIC)
1123 qemu_system_reset_request();
1128 static CPUReadMemoryFunc *mv88w8618_pit_readfn[] = {
1134 static CPUWriteMemoryFunc *mv88w8618_pit_writefn[] = {
1135 mv88w8618_pit_write,
1136 mv88w8618_pit_write,
1140 static void mv88w8618_pit_init(uint32_t base, qemu_irq *pic, int irq)
1143 mv88w8618_pit_state *s;
1145 s = qemu_mallocz(sizeof(mv88w8618_pit_state));
1150 /* Letting them all run at 1 MHz is likely just a pragmatic
1151 * simplification. */
1152 s->timer[0] = mv88w8618_timer_init(1000000, pic[irq]);
1153 s->timer[1] = mv88w8618_timer_init(1000000, pic[irq + 1]);
1154 s->timer[2] = mv88w8618_timer_init(1000000, pic[irq + 2]);
1155 s->timer[3] = mv88w8618_timer_init(1000000, pic[irq + 3]);
1157 iomemtype = cpu_register_io_memory(0, mv88w8618_pit_readfn,
1158 mv88w8618_pit_writefn, s);
1159 cpu_register_physical_memory(base, MP_PIT_SIZE, iomemtype);
1162 /* Flash config register offsets */
1163 #define MP_FLASHCFG_CFGR0 0x04
1165 typedef struct mv88w8618_flashcfg_state {
1168 } mv88w8618_flashcfg_state;
1170 static uint32_t mv88w8618_flashcfg_read(void *opaque,
1171 target_phys_addr_t offset)
1173 mv88w8618_flashcfg_state *s = opaque;
1177 case MP_FLASHCFG_CFGR0:
1185 static void mv88w8618_flashcfg_write(void *opaque, target_phys_addr_t offset,
1188 mv88w8618_flashcfg_state *s = opaque;
1192 case MP_FLASHCFG_CFGR0:
1198 static CPUReadMemoryFunc *mv88w8618_flashcfg_readfn[] = {
1199 mv88w8618_flashcfg_read,
1200 mv88w8618_flashcfg_read,
1201 mv88w8618_flashcfg_read
1204 static CPUWriteMemoryFunc *mv88w8618_flashcfg_writefn[] = {
1205 mv88w8618_flashcfg_write,
1206 mv88w8618_flashcfg_write,
1207 mv88w8618_flashcfg_write
1210 static void mv88w8618_flashcfg_init(uint32_t base)
1213 mv88w8618_flashcfg_state *s;
1215 s = qemu_mallocz(sizeof(mv88w8618_flashcfg_state));
1220 s->cfgr0 = 0xfffe4285; /* Default as set by U-Boot for 8 MB flash */
1221 iomemtype = cpu_register_io_memory(0, mv88w8618_flashcfg_readfn,
1222 mv88w8618_flashcfg_writefn, s);
1223 cpu_register_physical_memory(base, MP_FLASHCFG_SIZE, iomemtype);
1226 /* Various registers in the 0x80000000 domain */
1227 #define MP_BOARD_REVISION 0x2018
1229 #define MP_WLAN_MAGIC1 0xc11c
1230 #define MP_WLAN_MAGIC2 0xc124
1232 #define MP_GPIO_OE_LO 0xd008
1233 #define MP_GPIO_OUT_LO 0xd00c
1234 #define MP_GPIO_IN_LO 0xd010
1235 #define MP_GPIO_ISR_LO 0xd020
1236 #define MP_GPIO_OE_HI 0xd508
1237 #define MP_GPIO_OUT_HI 0xd50c
1238 #define MP_GPIO_IN_HI 0xd510
1239 #define MP_GPIO_ISR_HI 0xd520
1241 /* GPIO bits & masks */
1242 #define MP_GPIO_WHEEL_VOL (1 << 8)
1243 #define MP_GPIO_WHEEL_VOL_INV (1 << 9)
1244 #define MP_GPIO_WHEEL_NAV (1 << 10)
1245 #define MP_GPIO_WHEEL_NAV_INV (1 << 11)
1246 #define MP_GPIO_LCD_BRIGHTNESS 0x00070000
1247 #define MP_GPIO_BTN_FAVORITS (1 << 19)
1248 #define MP_GPIO_BTN_MENU (1 << 20)
1249 #define MP_GPIO_BTN_VOLUME (1 << 21)
1250 #define MP_GPIO_BTN_NAVIGATION (1 << 22)
1251 #define MP_GPIO_I2C_DATA_BIT 29
1252 #define MP_GPIO_I2C_DATA (1 << MP_GPIO_I2C_DATA_BIT)
1253 #define MP_GPIO_I2C_CLOCK_BIT 30
1255 /* LCD brightness bits in GPIO_OE_HI */
1256 #define MP_OE_LCD_BRIGHTNESS 0x0007
1258 static uint32_t musicpal_read(void *opaque, target_phys_addr_t offset)
1260 offset -= 0x80000000;
1262 case MP_BOARD_REVISION:
1265 case MP_GPIO_OE_HI: /* used for LCD brightness control */
1266 return lcd_brightness & MP_OE_LCD_BRIGHTNESS;
1268 case MP_GPIO_OUT_LO:
1269 return gpio_out_state & 0xFFFF;
1270 case MP_GPIO_OUT_HI:
1271 return gpio_out_state >> 16;
1274 return gpio_in_state & 0xFFFF;
1276 /* Update received I2C data */
1277 gpio_in_state = (gpio_in_state & ~MP_GPIO_I2C_DATA) |
1278 (i2c_get_data(mixer_i2c) << MP_GPIO_I2C_DATA_BIT);
1279 return gpio_in_state >> 16;
1281 /* This is a simplification of reality */
1282 case MP_GPIO_ISR_LO:
1283 return ~gpio_in_state & 0xFFFF;
1284 case MP_GPIO_ISR_HI:
1285 return ~gpio_in_state >> 16;
1287 /* Workaround to allow loading the binary-only wlandrv.ko crap
1288 * from the original Freecom firmware. */
1289 case MP_WLAN_MAGIC1:
1291 case MP_WLAN_MAGIC2:
1299 static void musicpal_write(void *opaque, target_phys_addr_t offset,
1302 offset -= 0x80000000;
1304 case MP_GPIO_OE_HI: /* used for LCD brightness control */
1305 lcd_brightness = (lcd_brightness & MP_GPIO_LCD_BRIGHTNESS) |
1306 (value & MP_OE_LCD_BRIGHTNESS);
1309 case MP_GPIO_OUT_LO:
1310 gpio_out_state = (gpio_out_state & 0xFFFF0000) | (value & 0xFFFF);
1312 case MP_GPIO_OUT_HI:
1313 gpio_out_state = (gpio_out_state & 0xFFFF) | (value << 16);
1314 lcd_brightness = (lcd_brightness & 0xFFFF) |
1315 (gpio_out_state & MP_GPIO_LCD_BRIGHTNESS);
1316 i2c_state_update(mixer_i2c,
1317 (gpio_out_state >> MP_GPIO_I2C_DATA_BIT) & 1,
1318 (gpio_out_state >> MP_GPIO_I2C_CLOCK_BIT) & 1);
1324 /* Keyboard codes & masks */
1325 #define KEY_PRESSED 0x80
1326 #define KEY_CODE 0x7f
1328 #define KEYCODE_TAB 0x0f
1329 #define KEYCODE_ENTER 0x1c
1330 #define KEYCODE_F 0x21
1331 #define KEYCODE_M 0x32
1333 #define KEYCODE_EXTENDED 0xe0
1334 #define KEYCODE_UP 0x48
1335 #define KEYCODE_DOWN 0x50
1336 #define KEYCODE_LEFT 0x4b
1337 #define KEYCODE_RIGHT 0x4d
1339 static void musicpal_key_event(void *opaque, int keycode)
1341 qemu_irq irq = opaque;
1343 static int kbd_extended;
1345 if (keycode == KEYCODE_EXTENDED) {
1351 switch (keycode & KEY_CODE) {
1353 event = MP_GPIO_WHEEL_NAV | MP_GPIO_WHEEL_NAV_INV;
1357 event = MP_GPIO_WHEEL_NAV;
1361 event = MP_GPIO_WHEEL_VOL | MP_GPIO_WHEEL_VOL_INV;
1365 event = MP_GPIO_WHEEL_VOL;
1369 switch (keycode & KEY_CODE) {
1371 event = MP_GPIO_BTN_FAVORITS;
1375 event = MP_GPIO_BTN_VOLUME;
1379 event = MP_GPIO_BTN_NAVIGATION;
1383 event = MP_GPIO_BTN_MENU;
1387 if (keycode & KEY_PRESSED)
1388 gpio_in_state |= event;
1389 else if (gpio_in_state & event) {
1390 gpio_in_state &= ~event;
1391 qemu_irq_raise(irq);
1397 static CPUReadMemoryFunc *musicpal_readfn[] = {
1403 static CPUWriteMemoryFunc *musicpal_writefn[] = {
1409 static struct arm_boot_info musicpal_binfo = {
1410 .loader_start = 0x0,
1414 static void musicpal_init(ram_addr_t ram_size, int vga_ram_size,
1415 const char *boot_device, DisplayState *ds,
1416 const char *kernel_filename, const char *kernel_cmdline,
1417 const char *initrd_filename, const char *cpu_model)
1423 unsigned long flash_size;
1426 cpu_model = "arm926";
1428 env = cpu_init(cpu_model);
1430 fprintf(stderr, "Unable to find CPU definition\n");
1433 pic = arm_pic_init_cpu(env);
1435 /* For now we use a fixed - the original - RAM size */
1436 cpu_register_physical_memory(0, MP_RAM_DEFAULT_SIZE,
1437 qemu_ram_alloc(MP_RAM_DEFAULT_SIZE));
1439 sram_off = qemu_ram_alloc(MP_SRAM_SIZE);
1440 cpu_register_physical_memory(MP_SRAM_BASE, MP_SRAM_SIZE, sram_off);
1442 /* Catch various stuff not handled by separate subsystems */
1443 iomemtype = cpu_register_io_memory(0, musicpal_readfn,
1444 musicpal_writefn, env);
1445 cpu_register_physical_memory(0x80000000, 0x10000, iomemtype);
1447 pic = mv88w8618_pic_init(MP_PIC_BASE, pic[ARM_PIC_CPU_IRQ]);
1448 mv88w8618_pit_init(MP_PIT_BASE, pic, MP_TIMER1_IRQ);
1451 serial_mm_init(MP_UART1_BASE, 2, pic[MP_UART1_IRQ], /*1825000,*/
1454 serial_mm_init(MP_UART2_BASE, 2, pic[MP_UART2_IRQ], /*1825000,*/
1457 /* Register flash */
1458 index = drive_get_index(IF_PFLASH, 0, 0);
1460 flash_size = bdrv_getlength(drives_table[index].bdrv);
1461 if (flash_size != 8*1024*1024 && flash_size != 16*1024*1024 &&
1462 flash_size != 32*1024*1024) {
1463 fprintf(stderr, "Invalid flash image size\n");
1468 * The original U-Boot accesses the flash at 0xFE000000 instead of
1469 * 0xFF800000 (if there is 8 MB flash). So remap flash access if the
1470 * image is smaller than 32 MB.
1472 pflash_cfi02_register(0-MP_FLASH_SIZE_MAX, qemu_ram_alloc(flash_size),
1473 drives_table[index].bdrv, 0x10000,
1474 (flash_size + 0xffff) >> 16,
1475 MP_FLASH_SIZE_MAX / flash_size,
1476 2, 0x00BF, 0x236D, 0x0000, 0x0000,
1479 mv88w8618_flashcfg_init(MP_FLASHCFG_BASE);
1481 musicpal_lcd_init(ds, MP_LCD_BASE);
1483 qemu_add_kbd_event_handler(musicpal_key_event, pic[MP_GPIO_IRQ]);
1486 * Wait a bit to catch menu button during U-Boot start-up
1487 * (to trigger emergency update).
1491 mv88w8618_eth_init(&nd_table[0], MP_ETH_BASE, pic[MP_ETH_IRQ]);
1493 mixer_i2c = musicpal_audio_init(MP_AUDIO_BASE, pic[MP_AUDIO_IRQ]);
1495 musicpal_binfo.ram_size = MP_RAM_DEFAULT_SIZE;
1496 musicpal_binfo.kernel_filename = kernel_filename;
1497 musicpal_binfo.kernel_cmdline = kernel_cmdline;
1498 musicpal_binfo.initrd_filename = initrd_filename;
1499 arm_load_kernel(env, &musicpal_binfo);
1502 QEMUMachine musicpal_machine = {
1504 "Marvell 88w8618 / MusicPal (ARM926EJ-S)",
1506 MP_RAM_DEFAULT_SIZE + MP_SRAM_SIZE + MP_FLASH_SIZE_MAX + RAMSIZE_FIXED