|
1 /* vim:set shiftwidth=4 ts=4 et: */ |
|
2 /* |
|
3 * PXA255 Sharp Zaurus SL-6000 PDA platform |
|
4 * |
|
5 * Copyright (c) 2008 Dmitry Baryshkov |
|
6 * |
|
7 * Code based on spitz platform by Andrzej Zaborowski <balrog@zabor.org> |
|
8 * This code is licensed under the GNU GPL v2. |
|
9 */ |
|
10 |
|
11 #include "hw.h" |
|
12 #include "pxa.h" |
|
13 #include "arm-misc.h" |
|
14 #include "sysemu.h" |
|
15 #include "devices.h" |
|
16 #include "sharpsl.h" |
|
17 #include "pcmcia.h" |
|
18 #include "block.h" |
|
19 #include "boards.h" |
|
20 #include "i2c.h" |
|
21 |
|
22 #define TOSA_RAM 0x04000000 |
|
23 #define TOSA_ROM 0x00800000 |
|
24 |
|
25 #define TOSA_GPIO_nSD_DETECT (9) |
|
26 #define TOSA_GPIO_ON_RESET (19) |
|
27 #define TOSA_GPIO_CF_IRQ (21) /* CF slot0 Ready */ |
|
28 #define TOSA_GPIO_CF_CD (13) |
|
29 #define TOSA_GPIO_TC6393XB_INT (15) |
|
30 #define TOSA_GPIO_JC_CF_IRQ (36) /* CF slot1 Ready */ |
|
31 |
|
32 #define TOSA_SCOOP_GPIO_BASE 1 |
|
33 #define TOSA_GPIO_IR_POWERDWN (TOSA_SCOOP_GPIO_BASE + 2) |
|
34 #define TOSA_GPIO_SD_WP (TOSA_SCOOP_GPIO_BASE + 3) |
|
35 #define TOSA_GPIO_PWR_ON (TOSA_SCOOP_GPIO_BASE + 4) |
|
36 |
|
37 #define TOSA_SCOOP_JC_GPIO_BASE 1 |
|
38 #define TOSA_GPIO_BT_LED (TOSA_SCOOP_JC_GPIO_BASE + 0) |
|
39 #define TOSA_GPIO_NOTE_LED (TOSA_SCOOP_JC_GPIO_BASE + 1) |
|
40 #define TOSA_GPIO_CHRG_ERR_LED (TOSA_SCOOP_JC_GPIO_BASE + 2) |
|
41 #define TOSA_GPIO_TC6393XB_L3V_ON (TOSA_SCOOP_JC_GPIO_BASE + 5) |
|
42 #define TOSA_GPIO_WLAN_LED (TOSA_SCOOP_JC_GPIO_BASE + 7) |
|
43 |
|
44 #define DAC_BASE 0x4e |
|
45 #define DAC_CH1 0 |
|
46 #define DAC_CH2 1 |
|
47 |
|
48 static void tosa_microdrive_attach(struct pxa2xx_state_s *cpu) |
|
49 { |
|
50 struct pcmcia_card_s *md; |
|
51 int index; |
|
52 BlockDriverState *bs; |
|
53 |
|
54 index = drive_get_index(IF_IDE, 0, 0); |
|
55 if (index == -1) |
|
56 return; |
|
57 bs = drives_table[index].bdrv; |
|
58 if (bdrv_is_inserted(bs) && !bdrv_is_removable(bs)) { |
|
59 md = dscm1xxxx_init(bs); |
|
60 pxa2xx_pcmcia_attach(cpu->pcmcia[0], md); |
|
61 } |
|
62 } |
|
63 |
|
64 static void tosa_out_switch(void *opaque, int line, int level) |
|
65 { |
|
66 switch (line) { |
|
67 case 0: |
|
68 fprintf(stderr, "blue LED %s.\n", level ? "on" : "off"); |
|
69 break; |
|
70 case 1: |
|
71 fprintf(stderr, "green LED %s.\n", level ? "on" : "off"); |
|
72 break; |
|
73 case 2: |
|
74 fprintf(stderr, "amber LED %s.\n", level ? "on" : "off"); |
|
75 break; |
|
76 case 3: |
|
77 fprintf(stderr, "wlan LED %s.\n", level ? "on" : "off"); |
|
78 break; |
|
79 default: |
|
80 fprintf(stderr, "Uhandled out event: %d = %d\n", line, level); |
|
81 break; |
|
82 } |
|
83 } |
|
84 |
|
85 |
|
86 static void tosa_gpio_setup(struct pxa2xx_state_s *cpu, |
|
87 struct scoop_info_s *scp0, |
|
88 struct scoop_info_s *scp1, |
|
89 struct tc6393xb_s *tmio) |
|
90 { |
|
91 qemu_irq *outsignals = qemu_allocate_irqs(tosa_out_switch, cpu, 4); |
|
92 /* MMC/SD host */ |
|
93 pxa2xx_mmci_handlers(cpu->mmc, |
|
94 scoop_gpio_in_get(scp0)[TOSA_GPIO_SD_WP], |
|
95 qemu_irq_invert(pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_nSD_DETECT])); |
|
96 |
|
97 /* Handle reset */ |
|
98 pxa2xx_gpio_out_set(cpu->gpio, TOSA_GPIO_ON_RESET, cpu->reset); |
|
99 |
|
100 /* PCMCIA signals: card's IRQ and Card-Detect */ |
|
101 pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[0], |
|
102 pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_CF_IRQ], |
|
103 pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_CF_CD]); |
|
104 |
|
105 pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[1], |
|
106 pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_JC_CF_IRQ], |
|
107 NULL); |
|
108 |
|
109 scoop_gpio_out_set(scp1, TOSA_GPIO_BT_LED, outsignals[0]); |
|
110 scoop_gpio_out_set(scp1, TOSA_GPIO_NOTE_LED, outsignals[1]); |
|
111 scoop_gpio_out_set(scp1, TOSA_GPIO_CHRG_ERR_LED, outsignals[2]); |
|
112 scoop_gpio_out_set(scp1, TOSA_GPIO_WLAN_LED, outsignals[3]); |
|
113 |
|
114 scoop_gpio_out_set(scp1, TOSA_GPIO_TC6393XB_L3V_ON, tc6393xb_l3v_get(tmio)); |
|
115 } |
|
116 |
|
117 static uint32_t tosa_ssp_read(void *opaque) |
|
118 { |
|
119 return 0; |
|
120 } |
|
121 |
|
122 static void tosa_ssp_write(void *opaque, uint32_t value) |
|
123 { |
|
124 fprintf(stderr, "TG: %d %02x\n", value >> 5, value & 0x1f); |
|
125 } |
|
126 |
|
127 struct tosa_dac_i2c { |
|
128 i2c_slave i2c; |
|
129 int len; |
|
130 char buf[3]; |
|
131 }; |
|
132 |
|
133 static int tosa_dac_send(i2c_slave *i2c, uint8_t data) |
|
134 { |
|
135 struct tosa_dac_i2c *s = (struct tosa_dac_i2c *)i2c; |
|
136 s->buf[s->len] = data; |
|
137 if (s->len ++ > 2) { |
|
138 #ifdef VERBOSE |
|
139 fprintf(stderr, "%s: message too long (%i bytes)\n", __FUNCTION__, s->len); |
|
140 #endif |
|
141 return 1; |
|
142 } |
|
143 |
|
144 if (s->len == 2) { |
|
145 fprintf(stderr, "dac: channel %d value 0x%02x\n", |
|
146 s->buf[0], s->buf[1]); |
|
147 } |
|
148 |
|
149 return 0; |
|
150 } |
|
151 |
|
152 static void tosa_dac_event(i2c_slave *i2c, enum i2c_event event) |
|
153 { |
|
154 struct tosa_dac_i2c *s = (struct tosa_dac_i2c *)i2c; |
|
155 s->len = 0; |
|
156 switch (event) { |
|
157 case I2C_START_SEND: |
|
158 break; |
|
159 case I2C_START_RECV: |
|
160 printf("%s: recv not supported!!!\n", __FUNCTION__); |
|
161 break; |
|
162 case I2C_FINISH: |
|
163 #ifdef VERBOSE |
|
164 if (s->len < 2) |
|
165 printf("%s: message too short (%i bytes)\n", __FUNCTION__, s->len); |
|
166 if (s->len > 2) |
|
167 printf("%s: message too long\n", __FUNCTION__); |
|
168 #endif |
|
169 break; |
|
170 default: |
|
171 break; |
|
172 } |
|
173 } |
|
174 |
|
175 int tosa_dac_recv(i2c_slave *s) |
|
176 { |
|
177 printf("%s: recv not supported!!!\n", __FUNCTION__); |
|
178 return -1; |
|
179 } |
|
180 |
|
181 static void tosa_tg_init(struct pxa2xx_state_s *cpu) |
|
182 { |
|
183 struct i2c_bus *bus = pxa2xx_i2c_bus(cpu->i2c[0]); |
|
184 struct i2c_slave *dac = i2c_slave_init(bus, 0, sizeof(struct tosa_dac_i2c)); |
|
185 dac->send = tosa_dac_send; |
|
186 dac->event = tosa_dac_event; |
|
187 dac->recv = tosa_dac_recv; |
|
188 i2c_set_slave_address(dac, DAC_BASE); |
|
189 pxa2xx_ssp_attach(cpu->ssp[1], tosa_ssp_read, |
|
190 tosa_ssp_write, cpu); |
|
191 } |
|
192 |
|
193 |
|
194 static struct arm_boot_info tosa_binfo = { |
|
195 .loader_start = PXA2XX_SDRAM_BASE, |
|
196 .ram_size = 0x04000000, |
|
197 }; |
|
198 |
|
199 static void tosa_init(ram_addr_t ram_size, int vga_ram_size, |
|
200 const char *boot_device, DisplayState *ds, |
|
201 const char *kernel_filename, const char *kernel_cmdline, |
|
202 const char *initrd_filename, const char *cpu_model) |
|
203 { |
|
204 struct pxa2xx_state_s *cpu; |
|
205 struct tc6393xb_s *tmio; |
|
206 struct scoop_info_s *scp0, *scp1; |
|
207 |
|
208 if (ram_size < (TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE + TC6393XB_RAM)) { |
|
209 fprintf(stderr, "This platform requires %i bytes of memory\n", |
|
210 TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE); |
|
211 exit(1); |
|
212 } |
|
213 |
|
214 if (!cpu_model) |
|
215 cpu_model = "pxa255"; |
|
216 |
|
217 cpu = pxa255_init(tosa_binfo.ram_size, NULL); |
|
218 |
|
219 cpu_register_physical_memory(0, TOSA_ROM, |
|
220 qemu_ram_alloc(TOSA_ROM) | IO_MEM_ROM); |
|
221 |
|
222 tmio = tc6393xb_init(0x10000000, |
|
223 pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_TC6393XB_INT], |
|
224 ds); |
|
225 |
|
226 scp0 = scoop_init(cpu, 0, 0x08800000); |
|
227 scp1 = scoop_init(cpu, 1, 0x14800040); |
|
228 |
|
229 tosa_gpio_setup(cpu, scp0, scp1, tmio); |
|
230 |
|
231 tosa_microdrive_attach(cpu); |
|
232 |
|
233 tosa_tg_init(cpu); |
|
234 |
|
235 /* Setup initial (reset) machine state */ |
|
236 cpu->env->regs[15] = tosa_binfo.loader_start; |
|
237 |
|
238 tosa_binfo.kernel_filename = kernel_filename; |
|
239 tosa_binfo.kernel_cmdline = kernel_cmdline; |
|
240 tosa_binfo.initrd_filename = initrd_filename; |
|
241 tosa_binfo.board_id = 0x208; |
|
242 arm_load_kernel(cpu->env, &tosa_binfo); |
|
243 sl_bootparam_write(SL_PXA_PARAM_BASE - PXA2XX_SDRAM_BASE); |
|
244 } |
|
245 |
|
246 QEMUMachine tosapda_machine = { |
|
247 .name = "tosa", |
|
248 .desc = "Tosa PDA (PXA255)", |
|
249 .init = tosa_init, |
|
250 .ram_require = TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE + RAMSIZE_FIXED + TC6393XB_RAM, |
|
251 }; |