Add access control support to qemu bridge helper
[qemu.git] / hw / z2.c
1 /*
2 * PXA270-based Zipit Z2 device
3 *
4 * Copyright (c) 2011 by Vasily Khoruzhick <anarsoul@gmail.com>
5 *
6 * Code is based on mainstone platform.
7 *
8 * This code is licensed under the GNU GPL v2.
9 *
10 * Contributions after 2012-01-13 are licensed under the terms of the
11 * GNU GPL, version 2 or (at your option) any later version.
12 */
13
14 #include "hw.h"
15 #include "pxa.h"
16 #include "arm-misc.h"
17 #include "devices.h"
18 #include "i2c.h"
19 #include "ssi.h"
20 #include "boards.h"
21 #include "sysemu.h"
22 #include "flash.h"
23 #include "blockdev.h"
24 #include "console.h"
25 #include "audio/audio.h"
26 #include "exec-memory.h"
27
28 #ifdef DEBUG_Z2
29 #define DPRINTF(fmt, ...) \
30 printf(fmt, ## __VA_ARGS__)
31 #else
32 #define DPRINTF(fmt, ...)
33 #endif
34
35 static struct keymap map[0x100] = {
36 [0 ... 0xff] = { -1, -1 },
37 [0x3b] = {0, 0}, /* Option = F1 */
38 [0xc8] = {0, 1}, /* Up */
39 [0xd0] = {0, 2}, /* Down */
40 [0xcb] = {0, 3}, /* Left */
41 [0xcd] = {0, 4}, /* Right */
42 [0xcf] = {0, 5}, /* End */
43 [0x0d] = {0, 6}, /* KPPLUS */
44 [0xc7] = {1, 0}, /* Home */
45 [0x10] = {1, 1}, /* Q */
46 [0x17] = {1, 2}, /* I */
47 [0x22] = {1, 3}, /* G */
48 [0x2d] = {1, 4}, /* X */
49 [0x1c] = {1, 5}, /* Enter */
50 [0x0c] = {1, 6}, /* KPMINUS */
51 [0xc9] = {2, 0}, /* PageUp */
52 [0x11] = {2, 1}, /* W */
53 [0x18] = {2, 2}, /* O */
54 [0x23] = {2, 3}, /* H */
55 [0x2e] = {2, 4}, /* C */
56 [0x38] = {2, 5}, /* LeftAlt */
57 [0xd1] = {3, 0}, /* PageDown */
58 [0x12] = {3, 1}, /* E */
59 [0x19] = {3, 2}, /* P */
60 [0x24] = {3, 3}, /* J */
61 [0x2f] = {3, 4}, /* V */
62 [0x2a] = {3, 5}, /* LeftShift */
63 [0x01] = {4, 0}, /* Esc */
64 [0x13] = {4, 1}, /* R */
65 [0x1e] = {4, 2}, /* A */
66 [0x25] = {4, 3}, /* K */
67 [0x30] = {4, 4}, /* B */
68 [0x1d] = {4, 5}, /* LeftCtrl */
69 [0x0f] = {5, 0}, /* Tab */
70 [0x14] = {5, 1}, /* T */
71 [0x1f] = {5, 2}, /* S */
72 [0x26] = {5, 3}, /* L */
73 [0x31] = {5, 4}, /* N */
74 [0x39] = {5, 5}, /* Space */
75 [0x3c] = {6, 0}, /* Stop = F2 */
76 [0x15] = {6, 1}, /* Y */
77 [0x20] = {6, 2}, /* D */
78 [0x0e] = {6, 3}, /* Backspace */
79 [0x32] = {6, 4}, /* M */
80 [0x33] = {6, 5}, /* Comma */
81 [0x3d] = {7, 0}, /* Play = F3 */
82 [0x16] = {7, 1}, /* U */
83 [0x21] = {7, 2}, /* F */
84 [0x2c] = {7, 3}, /* Z */
85 [0x27] = {7, 4}, /* Semicolon */
86 [0x34] = {7, 5}, /* Dot */
87 };
88
89 #define Z2_RAM_SIZE 0x02000000
90 #define Z2_FLASH_BASE 0x00000000
91 #define Z2_FLASH_SIZE 0x00800000
92
93 static struct arm_boot_info z2_binfo = {
94 .loader_start = PXA2XX_SDRAM_BASE,
95 .ram_size = Z2_RAM_SIZE,
96 };
97
98 #define Z2_GPIO_SD_DETECT 96
99 #define Z2_GPIO_AC_IN 0
100 #define Z2_GPIO_KEY_ON 1
101 #define Z2_GPIO_LCD_CS 88
102
103 typedef struct {
104 SSISlave ssidev;
105 int32_t selected;
106 int32_t enabled;
107 uint8_t buf[3];
108 uint32_t cur_reg;
109 int pos;
110 } ZipitLCD;
111
112 static uint32_t zipit_lcd_transfer(SSISlave *dev, uint32_t value)
113 {
114 ZipitLCD *z = FROM_SSI_SLAVE(ZipitLCD, dev);
115 uint16_t val;
116 if (z->selected) {
117 z->buf[z->pos] = value & 0xff;
118 z->pos++;
119 }
120 if (z->pos == 3) {
121 switch (z->buf[0]) {
122 case 0x74:
123 DPRINTF("%s: reg: 0x%.2x\n", __func__, z->buf[2]);
124 z->cur_reg = z->buf[2];
125 break;
126 case 0x76:
127 val = z->buf[1] << 8 | z->buf[2];
128 DPRINTF("%s: value: 0x%.4x\n", __func__, val);
129 if (z->cur_reg == 0x22 && val == 0x0000) {
130 z->enabled = 1;
131 printf("%s: LCD enabled\n", __func__);
132 } else if (z->cur_reg == 0x10 && val == 0x0000) {
133 z->enabled = 0;
134 printf("%s: LCD disabled\n", __func__);
135 }
136 break;
137 default:
138 DPRINTF("%s: unknown command!\n", __func__);
139 break;
140 }
141 z->pos = 0;
142 }
143 return 0;
144 }
145
146 static void z2_lcd_cs(void *opaque, int line, int level)
147 {
148 ZipitLCD *z2_lcd = opaque;
149 z2_lcd->selected = !level;
150 }
151
152 static int zipit_lcd_init(SSISlave *dev)
153 {
154 ZipitLCD *z = FROM_SSI_SLAVE(ZipitLCD, dev);
155 z->selected = 0;
156 z->enabled = 0;
157 z->pos = 0;
158
159 return 0;
160 }
161
162 static VMStateDescription vmstate_zipit_lcd_state = {
163 .name = "zipit-lcd",
164 .version_id = 1,
165 .minimum_version_id = 1,
166 .minimum_version_id_old = 1,
167 .fields = (VMStateField[]) {
168 VMSTATE_INT32(selected, ZipitLCD),
169 VMSTATE_INT32(enabled, ZipitLCD),
170 VMSTATE_BUFFER(buf, ZipitLCD),
171 VMSTATE_UINT32(cur_reg, ZipitLCD),
172 VMSTATE_INT32(pos, ZipitLCD),
173 VMSTATE_END_OF_LIST(),
174 }
175 };
176
177 static void zipit_lcd_class_init(ObjectClass *klass, void *data)
178 {
179 SSISlaveClass *k = SSI_SLAVE_CLASS(klass);
180
181 k->init = zipit_lcd_init;
182 k->transfer = zipit_lcd_transfer;
183 }
184
185 static DeviceInfo zipit_lcd_info = {
186 .name = "zipit-lcd",
187 .size = sizeof(ZipitLCD),
188 .vmsd = &vmstate_zipit_lcd_state,
189 .class_init = zipit_lcd_class_init,
190 };
191
192 typedef struct {
193 I2CSlave i2c;
194 int len;
195 uint8_t buf[3];
196 } AER915State;
197
198 static int aer915_send(I2CSlave *i2c, uint8_t data)
199 {
200 AER915State *s = FROM_I2C_SLAVE(AER915State, i2c);
201 s->buf[s->len] = data;
202 if (s->len++ > 2) {
203 DPRINTF("%s: message too long (%i bytes)\n",
204 __func__, s->len);
205 return 1;
206 }
207
208 if (s->len == 2) {
209 DPRINTF("%s: reg %d value 0x%02x\n", __func__,
210 s->buf[0], s->buf[1]);
211 }
212
213 return 0;
214 }
215
216 static void aer915_event(I2CSlave *i2c, enum i2c_event event)
217 {
218 AER915State *s = FROM_I2C_SLAVE(AER915State, i2c);
219 switch (event) {
220 case I2C_START_SEND:
221 s->len = 0;
222 break;
223 case I2C_START_RECV:
224 if (s->len != 1) {
225 DPRINTF("%s: short message!?\n", __func__);
226 }
227 break;
228 case I2C_FINISH:
229 break;
230 default:
231 break;
232 }
233 }
234
235 static int aer915_recv(I2CSlave *slave)
236 {
237 int retval = 0x00;
238 AER915State *s = FROM_I2C_SLAVE(AER915State, slave);
239
240 switch (s->buf[0]) {
241 /* Return hardcoded battery voltage,
242 * 0xf0 means ~4.1V
243 */
244 case 0x02:
245 retval = 0xf0;
246 break;
247 /* Return 0x00 for other regs,
248 * we don't know what they are for,
249 * anyway they return 0x00 on real hardware.
250 */
251 default:
252 break;
253 }
254
255 return retval;
256 }
257
258 static int aer915_init(I2CSlave *i2c)
259 {
260 /* Nothing to do. */
261 return 0;
262 }
263
264 static VMStateDescription vmstate_aer915_state = {
265 .name = "aer915",
266 .version_id = 1,
267 .minimum_version_id = 1,
268 .minimum_version_id_old = 1,
269 .fields = (VMStateField[]) {
270 VMSTATE_INT32(len, AER915State),
271 VMSTATE_BUFFER(buf, AER915State),
272 VMSTATE_END_OF_LIST(),
273 }
274 };
275
276 static void aer915_class_init(ObjectClass *klass, void *data)
277 {
278 I2CSlaveClass *k = I2C_SLAVE_CLASS(klass);
279
280 k->init = aer915_init;
281 k->event = aer915_event;
282 k->recv = aer915_recv;
283 k->send = aer915_send;
284 }
285
286 static DeviceInfo aer915_info = {
287 .name = "aer915",
288 .size = sizeof(AER915State),
289 .vmsd = &vmstate_aer915_state,
290 .class_init = aer915_class_init,
291 };
292
293 static void z2_init(ram_addr_t ram_size,
294 const char *boot_device,
295 const char *kernel_filename, const char *kernel_cmdline,
296 const char *initrd_filename, const char *cpu_model)
297 {
298 MemoryRegion *address_space_mem = get_system_memory();
299 uint32_t sector_len = 0x10000;
300 PXA2xxState *cpu;
301 DriveInfo *dinfo;
302 int be;
303 void *z2_lcd;
304 i2c_bus *bus;
305 DeviceState *wm;
306
307 if (!cpu_model) {
308 cpu_model = "pxa270-c5";
309 }
310
311 /* Setup CPU & memory */
312 cpu = pxa270_init(address_space_mem, z2_binfo.ram_size, cpu_model);
313
314 #ifdef TARGET_WORDS_BIGENDIAN
315 be = 1;
316 #else
317 be = 0;
318 #endif
319 dinfo = drive_get(IF_PFLASH, 0, 0);
320 if (!dinfo) {
321 fprintf(stderr, "Flash image must be given with the "
322 "'pflash' parameter\n");
323 exit(1);
324 }
325
326 if (!pflash_cfi01_register(Z2_FLASH_BASE,
327 NULL, "z2.flash0", Z2_FLASH_SIZE,
328 dinfo->bdrv, sector_len,
329 Z2_FLASH_SIZE / sector_len, 4, 0, 0, 0, 0,
330 be)) {
331 fprintf(stderr, "qemu: Error registering flash memory.\n");
332 exit(1);
333 }
334
335 /* setup keypad */
336 pxa27x_register_keypad(cpu->kp, map, 0x100);
337
338 /* MMC/SD host */
339 pxa2xx_mmci_handlers(cpu->mmc,
340 NULL,
341 qdev_get_gpio_in(cpu->gpio, Z2_GPIO_SD_DETECT));
342
343 ssi_register_slave(&zipit_lcd_info);
344 i2c_register_slave(&aer915_info);
345 z2_lcd = ssi_create_slave(cpu->ssp[1], "zipit-lcd");
346 bus = pxa2xx_i2c_bus(cpu->i2c[0]);
347 i2c_create_slave(bus, "aer915", 0x55);
348 wm = i2c_create_slave(bus, "wm8750", 0x1b);
349 cpu->i2s->opaque = wm;
350 cpu->i2s->codec_out = wm8750_dac_dat;
351 cpu->i2s->codec_in = wm8750_adc_dat;
352 wm8750_data_req_set(wm, cpu->i2s->data_req, cpu->i2s);
353
354 qdev_connect_gpio_out(cpu->gpio, Z2_GPIO_LCD_CS,
355 qemu_allocate_irqs(z2_lcd_cs, z2_lcd, 1)[0]);
356
357 if (kernel_filename) {
358 z2_binfo.kernel_filename = kernel_filename;
359 z2_binfo.kernel_cmdline = kernel_cmdline;
360 z2_binfo.initrd_filename = initrd_filename;
361 z2_binfo.board_id = 0x6dd;
362 arm_load_kernel(cpu->env, &z2_binfo);
363 }
364 }
365
366 static QEMUMachine z2_machine = {
367 .name = "z2",
368 .desc = "Zipit Z2 (PXA27x)",
369 .init = z2_init,
370 };
371
372 static void z2_machine_init(void)
373 {
374 qemu_register_machine(&z2_machine);
375 }
376
377 machine_init(z2_machine_init);