xref: /illumos-kvm-cmd/hw/tosa.c (revision 68396ea9)
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 #include "ssi.h"
22 #include "blockdev.h"
23 #include "sysbus.h"
24 
25 #define TOSA_RAM    0x04000000
26 #define TOSA_ROM	0x00800000
27 
28 #define TOSA_GPIO_nSD_DETECT	(9)
29 #define TOSA_GPIO_ON_RESET		(19)
30 #define TOSA_GPIO_CF_IRQ		(21)	/* CF slot0 Ready */
31 #define TOSA_GPIO_CF_CD			(13)
32 #define TOSA_GPIO_TC6393XB_INT  (15)
33 #define TOSA_GPIO_JC_CF_IRQ		(36)	/* CF slot1 Ready */
34 
35 #define TOSA_SCOOP_GPIO_BASE	1
36 #define TOSA_GPIO_IR_POWERDWN	(TOSA_SCOOP_GPIO_BASE + 2)
37 #define TOSA_GPIO_SD_WP			(TOSA_SCOOP_GPIO_BASE + 3)
38 #define TOSA_GPIO_PWR_ON		(TOSA_SCOOP_GPIO_BASE + 4)
39 
40 #define TOSA_SCOOP_JC_GPIO_BASE		1
41 #define TOSA_GPIO_BT_LED		(TOSA_SCOOP_JC_GPIO_BASE + 0)
42 #define TOSA_GPIO_NOTE_LED		(TOSA_SCOOP_JC_GPIO_BASE + 1)
43 #define TOSA_GPIO_CHRG_ERR_LED		(TOSA_SCOOP_JC_GPIO_BASE + 2)
44 #define TOSA_GPIO_TC6393XB_L3V_ON	(TOSA_SCOOP_JC_GPIO_BASE + 5)
45 #define TOSA_GPIO_WLAN_LED		(TOSA_SCOOP_JC_GPIO_BASE + 7)
46 
47 #define	DAC_BASE	0x4e
48 #define DAC_CH1		0
49 #define DAC_CH2		1
50 
tosa_microdrive_attach(PXA2xxState * cpu)51 static void tosa_microdrive_attach(PXA2xxState *cpu)
52 {
53     PCMCIACardState *md;
54     BlockDriverState *bs;
55     DriveInfo *dinfo;
56 
57     dinfo = drive_get(IF_IDE, 0, 0);
58     if (!dinfo)
59         return;
60     bs = dinfo->bdrv;
61     if (bdrv_is_inserted(bs) && !bdrv_is_removable(bs)) {
62         md = dscm1xxxx_init(dinfo);
63         pxa2xx_pcmcia_attach(cpu->pcmcia[0], md);
64     }
65 }
66 
tosa_out_switch(void * opaque,int line,int level)67 static void tosa_out_switch(void *opaque, int line, int level)
68 {
69     switch (line) {
70         case 0:
71             fprintf(stderr, "blue LED %s.\n", level ? "on" : "off");
72             break;
73         case 1:
74             fprintf(stderr, "green LED %s.\n", level ? "on" : "off");
75             break;
76         case 2:
77             fprintf(stderr, "amber LED %s.\n", level ? "on" : "off");
78             break;
79         case 3:
80             fprintf(stderr, "wlan LED %s.\n", level ? "on" : "off");
81             break;
82         default:
83             fprintf(stderr, "Uhandled out event: %d = %d\n", line, level);
84             break;
85     }
86 }
87 
88 
tosa_gpio_setup(PXA2xxState * cpu,DeviceState * scp0,DeviceState * scp1,TC6393xbState * tmio)89 static void tosa_gpio_setup(PXA2xxState *cpu,
90                 DeviceState *scp0,
91                 DeviceState *scp1,
92                 TC6393xbState *tmio)
93 {
94     qemu_irq *outsignals = qemu_allocate_irqs(tosa_out_switch, cpu, 4);
95     /* MMC/SD host */
96     pxa2xx_mmci_handlers(cpu->mmc,
97                     qdev_get_gpio_in(scp0, TOSA_GPIO_SD_WP),
98                     qemu_irq_invert(qdev_get_gpio_in(cpu->gpio, TOSA_GPIO_nSD_DETECT)));
99 
100     /* Handle reset */
101     qdev_connect_gpio_out(cpu->gpio, TOSA_GPIO_ON_RESET, cpu->reset);
102 
103     /* PCMCIA signals: card's IRQ and Card-Detect */
104     pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[0],
105                         qdev_get_gpio_in(cpu->gpio, TOSA_GPIO_CF_IRQ),
106                         qdev_get_gpio_in(cpu->gpio, TOSA_GPIO_CF_CD));
107 
108     pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[1],
109                         qdev_get_gpio_in(cpu->gpio, TOSA_GPIO_JC_CF_IRQ),
110                         NULL);
111 
112     qdev_connect_gpio_out(scp1, TOSA_GPIO_BT_LED, outsignals[0]);
113     qdev_connect_gpio_out(scp1, TOSA_GPIO_NOTE_LED, outsignals[1]);
114     qdev_connect_gpio_out(scp1, TOSA_GPIO_CHRG_ERR_LED, outsignals[2]);
115     qdev_connect_gpio_out(scp1, TOSA_GPIO_WLAN_LED, outsignals[3]);
116 
117     qdev_connect_gpio_out(scp1, TOSA_GPIO_TC6393XB_L3V_ON, tc6393xb_l3v_get(tmio));
118 }
119 
tosa_ssp_tansfer(SSISlave * dev,uint32_t value)120 static uint32_t tosa_ssp_tansfer(SSISlave *dev, uint32_t value)
121 {
122     fprintf(stderr, "TG: %d %02x\n", value >> 5, value & 0x1f);
123     return 0;
124 }
125 
tosa_ssp_init(SSISlave * dev)126 static int tosa_ssp_init(SSISlave *dev)
127 {
128     /* Nothing to do.  */
129     return 0;
130 }
131 
132 typedef struct {
133     i2c_slave i2c;
134     int len;
135     char buf[3];
136 } TosaDACState;
137 
tosa_dac_send(i2c_slave * i2c,uint8_t data)138 static int tosa_dac_send(i2c_slave *i2c, uint8_t data)
139 {
140     TosaDACState *s = FROM_I2C_SLAVE(TosaDACState, i2c);
141     s->buf[s->len] = data;
142     if (s->len ++ > 2) {
143 #ifdef VERBOSE
144         fprintf(stderr, "%s: message too long (%i bytes)\n", __FUNCTION__, s->len);
145 #endif
146         return 1;
147     }
148 
149     if (s->len == 2) {
150         fprintf(stderr, "dac: channel %d value 0x%02x\n",
151                 s->buf[0], s->buf[1]);
152     }
153 
154     return 0;
155 }
156 
tosa_dac_event(i2c_slave * i2c,enum i2c_event event)157 static void tosa_dac_event(i2c_slave *i2c, enum i2c_event event)
158 {
159     TosaDACState *s = FROM_I2C_SLAVE(TosaDACState, i2c);
160     s->len = 0;
161     switch (event) {
162     case I2C_START_SEND:
163         break;
164     case I2C_START_RECV:
165         printf("%s: recv not supported!!!\n", __FUNCTION__);
166         break;
167     case I2C_FINISH:
168 #ifdef VERBOSE
169         if (s->len < 2)
170             printf("%s: message too short (%i bytes)\n", __FUNCTION__, s->len);
171         if (s->len > 2)
172             printf("%s: message too long\n", __FUNCTION__);
173 #endif
174         break;
175     default:
176         break;
177     }
178 }
179 
tosa_dac_recv(i2c_slave * s)180 static int tosa_dac_recv(i2c_slave *s)
181 {
182     printf("%s: recv not supported!!!\n", __FUNCTION__);
183     return -1;
184 }
185 
tosa_dac_init(i2c_slave * i2c)186 static int tosa_dac_init(i2c_slave *i2c)
187 {
188     /* Nothing to do.  */
189     return 0;
190 }
191 
tosa_tg_init(PXA2xxState * cpu)192 static void tosa_tg_init(PXA2xxState *cpu)
193 {
194     i2c_bus *bus = pxa2xx_i2c_bus(cpu->i2c[0]);
195     i2c_create_slave(bus, "tosa_dac", DAC_BASE);
196     ssi_create_slave(cpu->ssp[1], "tosa-ssp");
197 }
198 
199 
200 static struct arm_boot_info tosa_binfo = {
201     .loader_start = PXA2XX_SDRAM_BASE,
202     .ram_size = 0x04000000,
203 };
204 
tosa_init(ram_addr_t ram_size,const char * boot_device,const char * kernel_filename,const char * kernel_cmdline,const char * initrd_filename,const char * cpu_model)205 static void tosa_init(ram_addr_t ram_size,
206                 const char *boot_device,
207                 const char *kernel_filename, const char *kernel_cmdline,
208                 const char *initrd_filename, const char *cpu_model)
209 {
210     PXA2xxState *cpu;
211     TC6393xbState *tmio;
212     DeviceState *scp0, *scp1;
213 
214     if (!cpu_model)
215         cpu_model = "pxa255";
216 
217     cpu = pxa255_init(tosa_binfo.ram_size);
218 
219     cpu_register_physical_memory(0, TOSA_ROM,
220                     qemu_ram_alloc(NULL, "tosa.rom", TOSA_ROM) | IO_MEM_ROM);
221 
222     tmio = tc6393xb_init(0x10000000,
223             qdev_get_gpio_in(cpu->gpio, TOSA_GPIO_TC6393XB_INT));
224 
225     scp0 = sysbus_create_simple("scoop", 0x08800000, NULL);
226     scp1 = sysbus_create_simple("scoop", 0x14800040, NULL);
227 
228     tosa_gpio_setup(cpu, scp0, scp1, tmio);
229 
230     tosa_microdrive_attach(cpu);
231 
232     tosa_tg_init(cpu);
233 
234     tosa_binfo.kernel_filename = kernel_filename;
235     tosa_binfo.kernel_cmdline = kernel_cmdline;
236     tosa_binfo.initrd_filename = initrd_filename;
237     tosa_binfo.board_id = 0x208;
238     arm_load_kernel(cpu->env, &tosa_binfo);
239     sl_bootparam_write(SL_PXA_PARAM_BASE);
240 }
241 
242 static QEMUMachine tosapda_machine = {
243     .name = "tosa",
244     .desc = "Tosa PDA (PXA255)",
245     .init = tosa_init,
246 };
247 
tosapda_machine_init(void)248 static void tosapda_machine_init(void)
249 {
250     qemu_register_machine(&tosapda_machine);
251 }
252 
253 machine_init(tosapda_machine_init);
254 
255 static I2CSlaveInfo tosa_dac_info = {
256     .qdev.name = "tosa_dac",
257     .qdev.size = sizeof(TosaDACState),
258     .init = tosa_dac_init,
259     .event = tosa_dac_event,
260     .recv = tosa_dac_recv,
261     .send = tosa_dac_send
262 };
263 
264 static SSISlaveInfo tosa_ssp_info = {
265     .qdev.name = "tosa-ssp",
266     .qdev.size = sizeof(SSISlave),
267     .init = tosa_ssp_init,
268     .transfer = tosa_ssp_tansfer
269 };
270 
tosa_register_devices(void)271 static void tosa_register_devices(void)
272 {
273     i2c_register_slave(&tosa_dac_info);
274     ssi_register_slave(&tosa_ssp_info);
275 }
276 
277 device_init(tosa_register_devices)
278