1 /*
2 * QEMU SM501 Device
3 *
4 * Copyright (c) 2008 Shin-ichiro KAWASAKI
5 * Copyright (c) 2016-2020 BALATON Zoltan
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 * of this software and associated documentation files (the "Software"), to deal
9 * in the Software without restriction, including without limitation the rights
10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11 * copies of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
23 * THE SOFTWARE.
24 */
25
26 #include "qemu/osdep.h"
27 #include "qemu/units.h"
28 #include "qapi/error.h"
29 #include "qemu/log.h"
30 #include "qemu/module.h"
31 #include "hw/usb/hcd-ohci.h"
32 #include "hw/char/serial.h"
33 #include "ui/console.h"
34 #include "hw/sysbus.h"
35 #include "migration/vmstate.h"
36 #include "hw/pci/pci_device.h"
37 #include "hw/qdev-properties.h"
38 #include "hw/i2c/i2c.h"
39 #include "hw/display/i2c-ddc.h"
40 #include "qemu/range.h"
41 #include "ui/pixel_ops.h"
42 #include "qemu/bswap.h"
43 #include "trace.h"
44 #include "qom/object.h"
45
46 #define MMIO_BASE_OFFSET 0x3e00000
47 #define MMIO_SIZE 0x200000
48 #define DC_PALETTE_ENTRIES (0x400 * 3)
49
50 /* SM501 register definitions taken from "linux/include/linux/sm501-regs.h" */
51
52 /* System Configuration area */
53 /* System config base */
54 #define SM501_SYS_CONFIG 0x000000
55
56 /* config 1 */
57 #define SM501_SYSTEM_CONTROL 0x000000
58
59 #define SM501_SYSCTRL_PANEL_TRISTATE (1 << 0)
60 #define SM501_SYSCTRL_MEM_TRISTATE (1 << 1)
61 #define SM501_SYSCTRL_CRT_TRISTATE (1 << 2)
62
63 #define SM501_SYSCTRL_PCI_SLAVE_BURST_MASK (3 << 4)
64 #define SM501_SYSCTRL_PCI_SLAVE_BURST_1 (0 << 4)
65 #define SM501_SYSCTRL_PCI_SLAVE_BURST_2 (1 << 4)
66 #define SM501_SYSCTRL_PCI_SLAVE_BURST_4 (2 << 4)
67 #define SM501_SYSCTRL_PCI_SLAVE_BURST_8 (3 << 4)
68
69 #define SM501_SYSCTRL_PCI_CLOCK_RUN_EN (1 << 6)
70 #define SM501_SYSCTRL_PCI_RETRY_DISABLE (1 << 7)
71 #define SM501_SYSCTRL_PCI_SUBSYS_LOCK (1 << 11)
72 #define SM501_SYSCTRL_PCI_BURST_READ_EN (1 << 15)
73
74 /* miscellaneous control */
75
76 #define SM501_MISC_CONTROL 0x000004
77
78 #define SM501_MISC_BUS_SH 0x0
79 #define SM501_MISC_BUS_PCI 0x1
80 #define SM501_MISC_BUS_XSCALE 0x2
81 #define SM501_MISC_BUS_NEC 0x6
82 #define SM501_MISC_BUS_MASK 0x7
83
84 #define SM501_MISC_VR_62MB (1 << 3)
85 #define SM501_MISC_CDR_RESET (1 << 7)
86 #define SM501_MISC_USB_LB (1 << 8)
87 #define SM501_MISC_USB_SLAVE (1 << 9)
88 #define SM501_MISC_BL_1 (1 << 10)
89 #define SM501_MISC_MC (1 << 11)
90 #define SM501_MISC_DAC_POWER (1 << 12)
91 #define SM501_MISC_IRQ_INVERT (1 << 16)
92 #define SM501_MISC_SH (1 << 17)
93
94 #define SM501_MISC_HOLD_EMPTY (0 << 18)
95 #define SM501_MISC_HOLD_8 (1 << 18)
96 #define SM501_MISC_HOLD_16 (2 << 18)
97 #define SM501_MISC_HOLD_24 (3 << 18)
98 #define SM501_MISC_HOLD_32 (4 << 18)
99 #define SM501_MISC_HOLD_MASK (7 << 18)
100
101 #define SM501_MISC_FREQ_12 (1 << 24)
102 #define SM501_MISC_PNL_24BIT (1 << 25)
103 #define SM501_MISC_8051_LE (1 << 26)
104
105
106
107 #define SM501_GPIO31_0_CONTROL 0x000008
108 #define SM501_GPIO63_32_CONTROL 0x00000C
109 #define SM501_DRAM_CONTROL 0x000010
110
111 /* command list */
112 #define SM501_ARBTRTN_CONTROL 0x000014
113
114 /* command list */
115 #define SM501_COMMAND_LIST_STATUS 0x000024
116
117 /* interrupt debug */
118 #define SM501_RAW_IRQ_STATUS 0x000028
119 #define SM501_RAW_IRQ_CLEAR 0x000028
120 #define SM501_IRQ_STATUS 0x00002C
121 #define SM501_IRQ_MASK 0x000030
122 #define SM501_DEBUG_CONTROL 0x000034
123
124 /* power management */
125 #define SM501_POWERMODE_P2X_SRC (1 << 29)
126 #define SM501_POWERMODE_V2X_SRC (1 << 20)
127 #define SM501_POWERMODE_M_SRC (1 << 12)
128 #define SM501_POWERMODE_M1_SRC (1 << 4)
129
130 #define SM501_CURRENT_GATE 0x000038
131 #define SM501_CURRENT_CLOCK 0x00003C
132 #define SM501_POWER_MODE_0_GATE 0x000040
133 #define SM501_POWER_MODE_0_CLOCK 0x000044
134 #define SM501_POWER_MODE_1_GATE 0x000048
135 #define SM501_POWER_MODE_1_CLOCK 0x00004C
136 #define SM501_SLEEP_MODE_GATE 0x000050
137 #define SM501_POWER_MODE_CONTROL 0x000054
138
139 /* power gates for units within the 501 */
140 #define SM501_GATE_HOST 0
141 #define SM501_GATE_MEMORY 1
142 #define SM501_GATE_DISPLAY 2
143 #define SM501_GATE_2D_ENGINE 3
144 #define SM501_GATE_CSC 4
145 #define SM501_GATE_ZVPORT 5
146 #define SM501_GATE_GPIO 6
147 #define SM501_GATE_UART0 7
148 #define SM501_GATE_UART1 8
149 #define SM501_GATE_SSP 10
150 #define SM501_GATE_USB_HOST 11
151 #define SM501_GATE_USB_GADGET 12
152 #define SM501_GATE_UCONTROLLER 17
153 #define SM501_GATE_AC97 18
154
155 /* panel clock */
156 #define SM501_CLOCK_P2XCLK 24
157 /* crt clock */
158 #define SM501_CLOCK_V2XCLK 16
159 /* main clock */
160 #define SM501_CLOCK_MCLK 8
161 /* SDRAM controller clock */
162 #define SM501_CLOCK_M1XCLK 0
163
164 /* config 2 */
165 #define SM501_PCI_MASTER_BASE 0x000058
166 #define SM501_ENDIAN_CONTROL 0x00005C
167 #define SM501_DEVICEID 0x000060
168 /* 0x050100A0 */
169
170 #define SM501_DEVICEID_SM501 0x05010000
171 #define SM501_DEVICEID_IDMASK 0xffff0000
172 #define SM501_DEVICEID_REVMASK 0x000000ff
173
174 #define SM501_PLLCLOCK_COUNT 0x000064
175 #define SM501_MISC_TIMING 0x000068
176 #define SM501_CURRENT_SDRAM_CLOCK 0x00006C
177
178 #define SM501_PROGRAMMABLE_PLL_CONTROL 0x000074
179
180 /* GPIO base */
181 #define SM501_GPIO 0x010000
182 #define SM501_GPIO_DATA_LOW 0x00
183 #define SM501_GPIO_DATA_HIGH 0x04
184 #define SM501_GPIO_DDR_LOW 0x08
185 #define SM501_GPIO_DDR_HIGH 0x0C
186 #define SM501_GPIO_IRQ_SETUP 0x10
187 #define SM501_GPIO_IRQ_STATUS 0x14
188 #define SM501_GPIO_IRQ_RESET 0x14
189
190 /* I2C controller base */
191 #define SM501_I2C 0x010040
192 #define SM501_I2C_BYTE_COUNT 0x00
193 #define SM501_I2C_CONTROL 0x01
194 #define SM501_I2C_STATUS 0x02
195 #define SM501_I2C_RESET 0x02
196 #define SM501_I2C_SLAVE_ADDRESS 0x03
197 #define SM501_I2C_DATA 0x04
198
199 #define SM501_I2C_CONTROL_START (1 << 2)
200 #define SM501_I2C_CONTROL_ENABLE (1 << 0)
201
202 #define SM501_I2C_STATUS_COMPLETE (1 << 3)
203 #define SM501_I2C_STATUS_ERROR (1 << 2)
204
205 #define SM501_I2C_RESET_ERROR (1 << 2)
206
207 /* SSP base */
208 #define SM501_SSP 0x020000
209
210 /* Uart 0 base */
211 #define SM501_UART0 0x030000
212
213 /* Uart 1 base */
214 #define SM501_UART1 0x030020
215
216 /* USB host port base */
217 #define SM501_USB_HOST 0x040000
218
219 /* USB slave/gadget base */
220 #define SM501_USB_GADGET 0x060000
221
222 /* USB slave/gadget data port base */
223 #define SM501_USB_GADGET_DATA 0x070000
224
225 /* Display controller/video engine base */
226 #define SM501_DC 0x080000
227
228 /* common defines for the SM501 address registers */
229 #define SM501_ADDR_FLIP (1 << 31)
230 #define SM501_ADDR_EXT (1 << 27)
231 #define SM501_ADDR_CS1 (1 << 26)
232 #define SM501_ADDR_MASK (0x3f << 26)
233
234 #define SM501_FIFO_MASK (0x3 << 16)
235 #define SM501_FIFO_1 (0x0 << 16)
236 #define SM501_FIFO_3 (0x1 << 16)
237 #define SM501_FIFO_7 (0x2 << 16)
238 #define SM501_FIFO_11 (0x3 << 16)
239
240 /* common registers for panel and the crt */
241 #define SM501_OFF_DC_H_TOT 0x000
242 #define SM501_OFF_DC_V_TOT 0x008
243 #define SM501_OFF_DC_H_SYNC 0x004
244 #define SM501_OFF_DC_V_SYNC 0x00C
245
246 #define SM501_DC_PANEL_CONTROL 0x000
247
248 #define SM501_DC_PANEL_CONTROL_FPEN (1 << 27)
249 #define SM501_DC_PANEL_CONTROL_BIAS (1 << 26)
250 #define SM501_DC_PANEL_CONTROL_DATA (1 << 25)
251 #define SM501_DC_PANEL_CONTROL_VDD (1 << 24)
252 #define SM501_DC_PANEL_CONTROL_DP (1 << 23)
253
254 #define SM501_DC_PANEL_CONTROL_TFT_888 (0 << 21)
255 #define SM501_DC_PANEL_CONTROL_TFT_333 (1 << 21)
256 #define SM501_DC_PANEL_CONTROL_TFT_444 (2 << 21)
257
258 #define SM501_DC_PANEL_CONTROL_DE (1 << 20)
259
260 #define SM501_DC_PANEL_CONTROL_LCD_TFT (0 << 18)
261 #define SM501_DC_PANEL_CONTROL_LCD_STN8 (1 << 18)
262 #define SM501_DC_PANEL_CONTROL_LCD_STN12 (2 << 18)
263
264 #define SM501_DC_PANEL_CONTROL_CP (1 << 14)
265 #define SM501_DC_PANEL_CONTROL_VSP (1 << 13)
266 #define SM501_DC_PANEL_CONTROL_HSP (1 << 12)
267 #define SM501_DC_PANEL_CONTROL_CK (1 << 9)
268 #define SM501_DC_PANEL_CONTROL_TE (1 << 8)
269 #define SM501_DC_PANEL_CONTROL_VPD (1 << 7)
270 #define SM501_DC_PANEL_CONTROL_VP (1 << 6)
271 #define SM501_DC_PANEL_CONTROL_HPD (1 << 5)
272 #define SM501_DC_PANEL_CONTROL_HP (1 << 4)
273 #define SM501_DC_PANEL_CONTROL_GAMMA (1 << 3)
274 #define SM501_DC_PANEL_CONTROL_EN (1 << 2)
275
276 #define SM501_DC_PANEL_CONTROL_8BPP (0 << 0)
277 #define SM501_DC_PANEL_CONTROL_16BPP (1 << 0)
278 #define SM501_DC_PANEL_CONTROL_32BPP (2 << 0)
279
280
281 #define SM501_DC_PANEL_PANNING_CONTROL 0x004
282 #define SM501_DC_PANEL_COLOR_KEY 0x008
283 #define SM501_DC_PANEL_FB_ADDR 0x00C
284 #define SM501_DC_PANEL_FB_OFFSET 0x010
285 #define SM501_DC_PANEL_FB_WIDTH 0x014
286 #define SM501_DC_PANEL_FB_HEIGHT 0x018
287 #define SM501_DC_PANEL_TL_LOC 0x01C
288 #define SM501_DC_PANEL_BR_LOC 0x020
289 #define SM501_DC_PANEL_H_TOT 0x024
290 #define SM501_DC_PANEL_H_SYNC 0x028
291 #define SM501_DC_PANEL_V_TOT 0x02C
292 #define SM501_DC_PANEL_V_SYNC 0x030
293 #define SM501_DC_PANEL_CUR_LINE 0x034
294
295 #define SM501_DC_VIDEO_CONTROL 0x040
296 #define SM501_DC_VIDEO_FB0_ADDR 0x044
297 #define SM501_DC_VIDEO_FB_WIDTH 0x048
298 #define SM501_DC_VIDEO_FB0_LAST_ADDR 0x04C
299 #define SM501_DC_VIDEO_TL_LOC 0x050
300 #define SM501_DC_VIDEO_BR_LOC 0x054
301 #define SM501_DC_VIDEO_SCALE 0x058
302 #define SM501_DC_VIDEO_INIT_SCALE 0x05C
303 #define SM501_DC_VIDEO_YUV_CONSTANTS 0x060
304 #define SM501_DC_VIDEO_FB1_ADDR 0x064
305 #define SM501_DC_VIDEO_FB1_LAST_ADDR 0x068
306
307 #define SM501_DC_VIDEO_ALPHA_CONTROL 0x080
308 #define SM501_DC_VIDEO_ALPHA_FB_ADDR 0x084
309 #define SM501_DC_VIDEO_ALPHA_FB_OFFSET 0x088
310 #define SM501_DC_VIDEO_ALPHA_FB_LAST_ADDR 0x08C
311 #define SM501_DC_VIDEO_ALPHA_TL_LOC 0x090
312 #define SM501_DC_VIDEO_ALPHA_BR_LOC 0x094
313 #define SM501_DC_VIDEO_ALPHA_SCALE 0x098
314 #define SM501_DC_VIDEO_ALPHA_INIT_SCALE 0x09C
315 #define SM501_DC_VIDEO_ALPHA_CHROMA_KEY 0x0A0
316 #define SM501_DC_VIDEO_ALPHA_COLOR_LOOKUP 0x0A4
317
318 #define SM501_DC_PANEL_HWC_BASE 0x0F0
319 #define SM501_DC_PANEL_HWC_ADDR 0x0F0
320 #define SM501_DC_PANEL_HWC_LOC 0x0F4
321 #define SM501_DC_PANEL_HWC_COLOR_1_2 0x0F8
322 #define SM501_DC_PANEL_HWC_COLOR_3 0x0FC
323
324 #define SM501_HWC_EN (1 << 31)
325
326 #define SM501_OFF_HWC_ADDR 0x00
327 #define SM501_OFF_HWC_LOC 0x04
328 #define SM501_OFF_HWC_COLOR_1_2 0x08
329 #define SM501_OFF_HWC_COLOR_3 0x0C
330
331 #define SM501_DC_ALPHA_CONTROL 0x100
332 #define SM501_DC_ALPHA_FB_ADDR 0x104
333 #define SM501_DC_ALPHA_FB_OFFSET 0x108
334 #define SM501_DC_ALPHA_TL_LOC 0x10C
335 #define SM501_DC_ALPHA_BR_LOC 0x110
336 #define SM501_DC_ALPHA_CHROMA_KEY 0x114
337 #define SM501_DC_ALPHA_COLOR_LOOKUP 0x118
338
339 #define SM501_DC_CRT_CONTROL 0x200
340
341 #define SM501_DC_CRT_CONTROL_TVP (1 << 15)
342 #define SM501_DC_CRT_CONTROL_CP (1 << 14)
343 #define SM501_DC_CRT_CONTROL_VSP (1 << 13)
344 #define SM501_DC_CRT_CONTROL_HSP (1 << 12)
345 #define SM501_DC_CRT_CONTROL_VS (1 << 11)
346 #define SM501_DC_CRT_CONTROL_BLANK (1 << 10)
347 #define SM501_DC_CRT_CONTROL_SEL (1 << 9)
348 #define SM501_DC_CRT_CONTROL_TE (1 << 8)
349 #define SM501_DC_CRT_CONTROL_PIXEL_MASK (0xF << 4)
350 #define SM501_DC_CRT_CONTROL_GAMMA (1 << 3)
351 #define SM501_DC_CRT_CONTROL_ENABLE (1 << 2)
352
353 #define SM501_DC_CRT_CONTROL_8BPP (0 << 0)
354 #define SM501_DC_CRT_CONTROL_16BPP (1 << 0)
355 #define SM501_DC_CRT_CONTROL_32BPP (2 << 0)
356
357 #define SM501_DC_CRT_FB_ADDR 0x204
358 #define SM501_DC_CRT_FB_OFFSET 0x208
359 #define SM501_DC_CRT_H_TOT 0x20C
360 #define SM501_DC_CRT_H_SYNC 0x210
361 #define SM501_DC_CRT_V_TOT 0x214
362 #define SM501_DC_CRT_V_SYNC 0x218
363 #define SM501_DC_CRT_SIGNATURE_ANALYZER 0x21C
364 #define SM501_DC_CRT_CUR_LINE 0x220
365 #define SM501_DC_CRT_MONITOR_DETECT 0x224
366
367 #define SM501_DC_CRT_HWC_BASE 0x230
368 #define SM501_DC_CRT_HWC_ADDR 0x230
369 #define SM501_DC_CRT_HWC_LOC 0x234
370 #define SM501_DC_CRT_HWC_COLOR_1_2 0x238
371 #define SM501_DC_CRT_HWC_COLOR_3 0x23C
372
373 #define SM501_DC_PANEL_PALETTE 0x400
374
375 #define SM501_DC_VIDEO_PALETTE 0x800
376
377 #define SM501_DC_CRT_PALETTE 0xC00
378
379 /* Zoom Video port base */
380 #define SM501_ZVPORT 0x090000
381
382 /* AC97/I2S base */
383 #define SM501_AC97 0x0A0000
384
385 /* 8051 micro controller base */
386 #define SM501_UCONTROLLER 0x0B0000
387
388 /* 8051 micro controller SRAM base */
389 #define SM501_UCONTROLLER_SRAM 0x0C0000
390
391 /* DMA base */
392 #define SM501_DMA 0x0D0000
393
394 /* 2d engine base */
395 #define SM501_2D_ENGINE 0x100000
396 #define SM501_2D_SOURCE 0x00
397 #define SM501_2D_DESTINATION 0x04
398 #define SM501_2D_DIMENSION 0x08
399 #define SM501_2D_CONTROL 0x0C
400 #define SM501_2D_PITCH 0x10
401 #define SM501_2D_FOREGROUND 0x14
402 #define SM501_2D_BACKGROUND 0x18
403 #define SM501_2D_STRETCH 0x1C
404 #define SM501_2D_COLOR_COMPARE 0x20
405 #define SM501_2D_COLOR_COMPARE_MASK 0x24
406 #define SM501_2D_MASK 0x28
407 #define SM501_2D_CLIP_TL 0x2C
408 #define SM501_2D_CLIP_BR 0x30
409 #define SM501_2D_MONO_PATTERN_LOW 0x34
410 #define SM501_2D_MONO_PATTERN_HIGH 0x38
411 #define SM501_2D_WINDOW_WIDTH 0x3C
412 #define SM501_2D_SOURCE_BASE 0x40
413 #define SM501_2D_DESTINATION_BASE 0x44
414 #define SM501_2D_ALPHA 0x48
415 #define SM501_2D_WRAP 0x4C
416 #define SM501_2D_STATUS 0x50
417
418 #define SM501_CSC_Y_SOURCE_BASE 0xC8
419 #define SM501_CSC_CONSTANTS 0xCC
420 #define SM501_CSC_Y_SOURCE_X 0xD0
421 #define SM501_CSC_Y_SOURCE_Y 0xD4
422 #define SM501_CSC_U_SOURCE_BASE 0xD8
423 #define SM501_CSC_V_SOURCE_BASE 0xDC
424 #define SM501_CSC_SOURCE_DIMENSION 0xE0
425 #define SM501_CSC_SOURCE_PITCH 0xE4
426 #define SM501_CSC_DESTINATION 0xE8
427 #define SM501_CSC_DESTINATION_DIMENSION 0xEC
428 #define SM501_CSC_DESTINATION_PITCH 0xF0
429 #define SM501_CSC_SCALE_FACTOR 0xF4
430 #define SM501_CSC_DESTINATION_BASE 0xF8
431 #define SM501_CSC_CONTROL 0xFC
432
433 /* 2d engine data port base */
434 #define SM501_2D_ENGINE_DATA 0x110000
435
436 /* end of register definitions */
437
438 #define SM501_HWC_WIDTH 64
439 #define SM501_HWC_HEIGHT 64
440
441 #ifdef CONFIG_PIXMAN
442 #define DEFAULT_X_PIXMAN 7
443 #else
444 #define DEFAULT_X_PIXMAN 0
445 #endif
446
447 /* SM501 local memory size taken from "linux/drivers/mfd/sm501.c" */
448 static const uint32_t sm501_mem_local_size[] = {
449 [0] = 4 * MiB,
450 [1] = 8 * MiB,
451 [2] = 16 * MiB,
452 [3] = 32 * MiB,
453 [4] = 64 * MiB,
454 [5] = 2 * MiB,
455 };
456 #define get_local_mem_size(s) sm501_mem_local_size[(s)->local_mem_size_index]
457
458 typedef struct SM501State {
459 /* graphic console status */
460 QemuConsole *con;
461
462 /* status & internal resources */
463 uint32_t local_mem_size_index;
464 uint8_t *local_mem;
465 MemoryRegion local_mem_region;
466 MemoryRegion mmio_region;
467 MemoryRegion system_config_region;
468 MemoryRegion i2c_region;
469 MemoryRegion disp_ctrl_region;
470 MemoryRegion twoD_engine_region;
471 uint32_t last_width;
472 uint32_t last_height;
473 bool do_full_update; /* perform a full update next time */
474 uint8_t use_pixman;
475 I2CBus *i2c_bus;
476
477 /* mmio registers */
478 uint32_t system_control;
479 uint32_t misc_control;
480 uint32_t gpio_31_0_control;
481 uint32_t gpio_63_32_control;
482 uint32_t dram_control;
483 uint32_t arbitration_control;
484 uint32_t irq_mask;
485 uint32_t misc_timing;
486 uint32_t power_mode_control;
487
488 uint8_t i2c_byte_count;
489 uint8_t i2c_status;
490 uint8_t i2c_addr;
491 uint8_t i2c_data[16];
492
493 uint32_t uart0_ier;
494 uint32_t uart0_lcr;
495 uint32_t uart0_mcr;
496 uint32_t uart0_scr;
497
498 uint8_t dc_palette[DC_PALETTE_ENTRIES];
499
500 uint32_t dc_panel_control;
501 uint32_t dc_panel_panning_control;
502 uint32_t dc_panel_fb_addr;
503 uint32_t dc_panel_fb_offset;
504 uint32_t dc_panel_fb_width;
505 uint32_t dc_panel_fb_height;
506 uint32_t dc_panel_tl_location;
507 uint32_t dc_panel_br_location;
508 uint32_t dc_panel_h_total;
509 uint32_t dc_panel_h_sync;
510 uint32_t dc_panel_v_total;
511 uint32_t dc_panel_v_sync;
512
513 uint32_t dc_panel_hwc_addr;
514 uint32_t dc_panel_hwc_location;
515 uint32_t dc_panel_hwc_color_1_2;
516 uint32_t dc_panel_hwc_color_3;
517
518 uint32_t dc_video_control;
519
520 uint32_t dc_crt_control;
521 uint32_t dc_crt_fb_addr;
522 uint32_t dc_crt_fb_offset;
523 uint32_t dc_crt_h_total;
524 uint32_t dc_crt_h_sync;
525 uint32_t dc_crt_v_total;
526 uint32_t dc_crt_v_sync;
527
528 uint32_t dc_crt_hwc_addr;
529 uint32_t dc_crt_hwc_location;
530 uint32_t dc_crt_hwc_color_1_2;
531 uint32_t dc_crt_hwc_color_3;
532
533 uint32_t twoD_source;
534 uint32_t twoD_destination;
535 uint32_t twoD_dimension;
536 uint32_t twoD_control;
537 uint32_t twoD_pitch;
538 uint32_t twoD_foreground;
539 uint32_t twoD_background;
540 uint32_t twoD_stretch;
541 uint32_t twoD_color_compare;
542 uint32_t twoD_color_compare_mask;
543 uint32_t twoD_mask;
544 uint32_t twoD_clip_tl;
545 uint32_t twoD_clip_br;
546 uint32_t twoD_mono_pattern_low;
547 uint32_t twoD_mono_pattern_high;
548 uint32_t twoD_window_width;
549 uint32_t twoD_source_base;
550 uint32_t twoD_destination_base;
551 uint32_t twoD_alpha;
552 uint32_t twoD_wrap;
553 } SM501State;
554
get_local_mem_size_index(uint32_t size)555 static uint32_t get_local_mem_size_index(uint32_t size)
556 {
557 uint32_t norm_size = 0;
558 int i, index = 0;
559
560 for (i = 0; i < ARRAY_SIZE(sm501_mem_local_size); i++) {
561 uint32_t new_size = sm501_mem_local_size[i];
562 if (new_size >= size) {
563 if (norm_size == 0 || norm_size > new_size) {
564 norm_size = new_size;
565 index = i;
566 }
567 }
568 }
569
570 return index;
571 }
572
get_fb_addr(SM501State * s,int crt)573 static ram_addr_t get_fb_addr(SM501State *s, int crt)
574 {
575 return (crt ? s->dc_crt_fb_addr : s->dc_panel_fb_addr) & 0x3FFFFF0;
576 }
577
get_width(SM501State * s,int crt)578 static inline int get_width(SM501State *s, int crt)
579 {
580 int width = crt ? s->dc_crt_h_total : s->dc_panel_h_total;
581 return (width & 0x00000FFF) + 1;
582 }
583
get_height(SM501State * s,int crt)584 static inline int get_height(SM501State *s, int crt)
585 {
586 int height = crt ? s->dc_crt_v_total : s->dc_panel_v_total;
587 return (height & 0x00000FFF) + 1;
588 }
589
get_bpp(SM501State * s,int crt)590 static inline int get_bpp(SM501State *s, int crt)
591 {
592 int bpp = crt ? s->dc_crt_control : s->dc_panel_control;
593 return 1 << (bpp & 3);
594 }
595
596 /**
597 * Check the availability of hardware cursor.
598 * @param crt 0 for PANEL, 1 for CRT.
599 */
is_hwc_enabled(SM501State * state,int crt)600 static inline int is_hwc_enabled(SM501State *state, int crt)
601 {
602 uint32_t addr = crt ? state->dc_crt_hwc_addr : state->dc_panel_hwc_addr;
603 return addr & SM501_HWC_EN;
604 }
605
606 /**
607 * Get the address which holds cursor pattern data.
608 * @param crt 0 for PANEL, 1 for CRT.
609 */
get_hwc_address(SM501State * state,int crt)610 static inline uint8_t *get_hwc_address(SM501State *state, int crt)
611 {
612 uint32_t addr = crt ? state->dc_crt_hwc_addr : state->dc_panel_hwc_addr;
613 return state->local_mem + (addr & 0x03FFFFF0);
614 }
615
616 /**
617 * Get the cursor position in y coordinate.
618 * @param crt 0 for PANEL, 1 for CRT.
619 */
get_hwc_y(SM501State * state,int crt)620 static inline uint32_t get_hwc_y(SM501State *state, int crt)
621 {
622 uint32_t location = crt ? state->dc_crt_hwc_location
623 : state->dc_panel_hwc_location;
624 return (location & 0x07FF0000) >> 16;
625 }
626
627 /**
628 * Get the cursor position in x coordinate.
629 * @param crt 0 for PANEL, 1 for CRT.
630 */
get_hwc_x(SM501State * state,int crt)631 static inline uint32_t get_hwc_x(SM501State *state, int crt)
632 {
633 uint32_t location = crt ? state->dc_crt_hwc_location
634 : state->dc_panel_hwc_location;
635 return location & 0x000007FF;
636 }
637
638 /**
639 * Get the hardware cursor palette.
640 * @param crt 0 for PANEL, 1 for CRT.
641 * @param palette pointer to a [3 * 3] array to store color values in
642 */
get_hwc_palette(SM501State * state,int crt,uint8_t * palette)643 static inline void get_hwc_palette(SM501State *state, int crt, uint8_t *palette)
644 {
645 int i;
646 uint32_t color_reg;
647 uint16_t rgb565;
648
649 for (i = 0; i < 3; i++) {
650 if (i + 1 == 3) {
651 color_reg = crt ? state->dc_crt_hwc_color_3
652 : state->dc_panel_hwc_color_3;
653 } else {
654 color_reg = crt ? state->dc_crt_hwc_color_1_2
655 : state->dc_panel_hwc_color_1_2;
656 }
657
658 if (i + 1 == 2) {
659 rgb565 = (color_reg >> 16) & 0xFFFF;
660 } else {
661 rgb565 = color_reg & 0xFFFF;
662 }
663 palette[i * 3 + 0] = ((rgb565 >> 11) * 527 + 23) >> 6; /* r */
664 palette[i * 3 + 1] = (((rgb565 >> 5) & 0x3f) * 259 + 33) >> 6; /* g */
665 palette[i * 3 + 2] = ((rgb565 & 0x1f) * 527 + 23) >> 6; /* b */
666 }
667 }
668
hwc_invalidate(SM501State * s,int crt)669 static inline void hwc_invalidate(SM501State *s, int crt)
670 {
671 int w = get_width(s, crt);
672 int h = get_height(s, crt);
673 int bpp = get_bpp(s, crt);
674 int start = get_hwc_y(s, crt);
675 int end = MIN(h, start + SM501_HWC_HEIGHT) + 1;
676
677 start *= w * bpp;
678 end *= w * bpp;
679
680 memory_region_set_dirty(&s->local_mem_region,
681 get_fb_addr(s, crt) + start, end - start);
682 }
683
sm501_2d_operation(SM501State * s)684 static void sm501_2d_operation(SM501State *s)
685 {
686 int cmd = (s->twoD_control >> 16) & 0x1F;
687 int rtl = s->twoD_control & BIT(27);
688 int format = (s->twoD_stretch >> 20) & 3;
689 int bypp = 1 << format; /* bytes per pixel */
690 int rop_mode = (s->twoD_control >> 15) & 1; /* 1 for rop2, else rop3 */
691 /* 1 if rop2 source is the pattern, otherwise the source is the bitmap */
692 int rop2_source_is_pattern = (s->twoD_control >> 14) & 1;
693 int rop = s->twoD_control & 0xFF;
694 unsigned int dst_x = (s->twoD_destination >> 16) & 0x01FFF;
695 unsigned int dst_y = s->twoD_destination & 0xFFFF;
696 unsigned int width = (s->twoD_dimension >> 16) & 0x1FFF;
697 unsigned int height = s->twoD_dimension & 0xFFFF;
698 uint32_t dst_base = s->twoD_destination_base & 0x03FFFFFF;
699 unsigned int dst_pitch = (s->twoD_pitch >> 16) & 0x1FFF;
700 int crt = (s->dc_crt_control & SM501_DC_CRT_CONTROL_SEL) ? 1 : 0;
701 int fb_len = get_width(s, crt) * get_height(s, crt) * get_bpp(s, crt);
702 bool overlap = false, fallback = false;
703
704 if ((s->twoD_stretch >> 16) & 0xF) {
705 qemu_log_mask(LOG_UNIMP, "sm501: only XY addressing is supported.\n");
706 return;
707 }
708
709 if (s->twoD_source_base & BIT(27) || s->twoD_destination_base & BIT(27)) {
710 qemu_log_mask(LOG_UNIMP, "sm501: only local memory is supported.\n");
711 return;
712 }
713
714 if (!dst_pitch) {
715 qemu_log_mask(LOG_GUEST_ERROR, "sm501: Zero dest pitch.\n");
716 return;
717 }
718
719 if (!width || !height) {
720 qemu_log_mask(LOG_GUEST_ERROR, "sm501: Zero size 2D op.\n");
721 return;
722 }
723
724 if (rtl) {
725 dst_x -= width - 1;
726 dst_y -= height - 1;
727 }
728
729 if (dst_base >= get_local_mem_size(s) ||
730 dst_base + (dst_x + width + (dst_y + height) * dst_pitch) * bypp >=
731 get_local_mem_size(s)) {
732 qemu_log_mask(LOG_GUEST_ERROR, "sm501: 2D op dest is outside vram.\n");
733 return;
734 }
735
736 switch (cmd) {
737 case 0: /* BitBlt */
738 {
739 unsigned int src_x = (s->twoD_source >> 16) & 0x01FFF;
740 unsigned int src_y = s->twoD_source & 0xFFFF;
741 uint32_t src_base = s->twoD_source_base & 0x03FFFFFF;
742 unsigned int src_pitch = s->twoD_pitch & 0x1FFF;
743
744 if (!src_pitch) {
745 qemu_log_mask(LOG_GUEST_ERROR, "sm501: Zero src pitch.\n");
746 return;
747 }
748
749 if (rtl) {
750 src_x -= width - 1;
751 src_y -= height - 1;
752 }
753
754 if (src_base >= get_local_mem_size(s) ||
755 src_base + (src_x + width + (src_y + height) * src_pitch) * bypp >=
756 get_local_mem_size(s)) {
757 qemu_log_mask(LOG_GUEST_ERROR,
758 "sm501: 2D op src is outside vram.\n");
759 return;
760 }
761
762 if ((rop_mode && rop == 0x5) || (!rop_mode && rop == 0x55)) {
763 /* DSTINVERT, is there a way to do this with pixman? */
764 unsigned int x, y, i;
765 uint8_t *d = s->local_mem + dst_base;
766
767 for (y = 0; y < height; y++) {
768 i = (dst_x + (dst_y + y) * dst_pitch) * bypp;
769 for (x = 0; x < width; x++, i += bypp) {
770 stn_he_p(&d[i], bypp, ~ldn_he_p(&d[i], bypp));
771 }
772 }
773 } else if (!rop_mode && rop == 0x99) {
774 /* DSxn, is there a way to do this with pixman? */
775 unsigned int x, y, i, j;
776 uint8_t *sp = s->local_mem + src_base;
777 uint8_t *d = s->local_mem + dst_base;
778
779 for (y = 0; y < height; y++) {
780 i = (dst_x + (dst_y + y) * dst_pitch) * bypp;
781 j = (src_x + (src_y + y) * src_pitch) * bypp;
782 for (x = 0; x < width; x++, i += bypp, j += bypp) {
783 stn_he_p(&d[i], bypp,
784 ~(ldn_he_p(&sp[j], bypp) ^ ldn_he_p(&d[i], bypp)));
785 }
786 }
787 } else if (!rop_mode && rop == 0xee) {
788 /* SRCPAINT, is there a way to do this with pixman? */
789 unsigned int x, y, i, j;
790 uint8_t *sp = s->local_mem + src_base;
791 uint8_t *d = s->local_mem + dst_base;
792
793 for (y = 0; y < height; y++) {
794 i = (dst_x + (dst_y + y) * dst_pitch) * bypp;
795 j = (src_x + (src_y + y) * src_pitch) * bypp;
796 for (x = 0; x < width; x++, i += bypp, j += bypp) {
797 stn_he_p(&d[i], bypp,
798 ldn_he_p(&sp[j], bypp) | ldn_he_p(&d[i], bypp));
799 }
800 }
801 } else {
802 /* Do copy src for unimplemented ops, better than unpainted area */
803 if ((rop_mode && (rop != 0xc || rop2_source_is_pattern)) ||
804 (!rop_mode && rop != 0xcc)) {
805 qemu_log_mask(LOG_UNIMP,
806 "sm501: rop%d op %x%s not implemented\n",
807 (rop_mode ? 2 : 3), rop,
808 (rop2_source_is_pattern ?
809 " with pattern source" : ""));
810 }
811 /* Ignore no-op blits, some guests seem to do this */
812 if (src_base == dst_base && src_pitch == dst_pitch &&
813 src_x == dst_x && src_y == dst_y) {
814 break;
815 }
816 /* Some clients also do 1 pixel blits, avoid overhead for these */
817 if (width == 1 && height == 1) {
818 unsigned int si = (src_x + src_y * src_pitch) * bypp;
819 unsigned int di = (dst_x + dst_y * dst_pitch) * bypp;
820 stn_he_p(&s->local_mem[dst_base + di], bypp,
821 ldn_he_p(&s->local_mem[src_base + si], bypp));
822 break;
823 }
824 /* If reverse blit do simple check for overlaps */
825 if (rtl && src_base == dst_base && src_pitch == dst_pitch) {
826 overlap = (src_x < dst_x + width && src_x + width > dst_x &&
827 src_y < dst_y + height && src_y + height > dst_y);
828 } else if (rtl) {
829 unsigned int sb, se, db, de;
830 sb = src_base + (src_x + src_y * src_pitch) * bypp;
831 se = sb + (width + (height - 1) * src_pitch) * bypp;
832 db = dst_base + (dst_x + dst_y * dst_pitch) * bypp;
833 de = db + (width + (height - 1) * dst_pitch) * bypp;
834 overlap = (db < se && sb < de);
835 }
836 #ifdef CONFIG_PIXMAN
837 if (overlap && (s->use_pixman & BIT(2))) {
838 /* pixman can't do reverse blit: copy via temporary */
839 int tmp_stride = DIV_ROUND_UP(width * bypp, sizeof(uint32_t));
840 static uint32_t tmp_buf[16384];
841 uint32_t *tmp = tmp_buf;
842
843 if (tmp_stride * sizeof(uint32_t) * height > sizeof(tmp_buf)) {
844 tmp = g_malloc(tmp_stride * sizeof(uint32_t) * height);
845 }
846 fallback = !pixman_blt((uint32_t *)&s->local_mem[src_base],
847 tmp,
848 src_pitch * bypp / sizeof(uint32_t),
849 tmp_stride,
850 8 * bypp, 8 * bypp,
851 src_x, src_y, 0, 0, width, height);
852 if (!fallback) {
853 fallback = !pixman_blt(tmp,
854 (uint32_t *)&s->local_mem[dst_base],
855 tmp_stride,
856 dst_pitch * bypp / sizeof(uint32_t),
857 8 * bypp, 8 * bypp,
858 0, 0, dst_x, dst_y, width, height);
859 }
860 if (tmp != tmp_buf) {
861 g_free(tmp);
862 }
863 } else if (!overlap && (s->use_pixman & BIT(1))) {
864 fallback = !pixman_blt((uint32_t *)&s->local_mem[src_base],
865 (uint32_t *)&s->local_mem[dst_base],
866 src_pitch * bypp / sizeof(uint32_t),
867 dst_pitch * bypp / sizeof(uint32_t),
868 8 * bypp, 8 * bypp, src_x, src_y,
869 dst_x, dst_y, width, height);
870 } else
871 #endif
872 {
873 fallback = true;
874 }
875 if (fallback) {
876 uint8_t *sp = s->local_mem + src_base;
877 uint8_t *d = s->local_mem + dst_base;
878 unsigned int y, i, j;
879 for (y = 0; y < height; y++) {
880 if (overlap) { /* overlap also means rtl */
881 i = (dst_y + height - 1 - y) * dst_pitch;
882 i = (dst_x + i) * bypp;
883 j = (src_y + height - 1 - y) * src_pitch;
884 j = (src_x + j) * bypp;
885 memmove(&d[i], &sp[j], width * bypp);
886 } else {
887 i = (dst_x + (dst_y + y) * dst_pitch) * bypp;
888 j = (src_x + (src_y + y) * src_pitch) * bypp;
889 memcpy(&d[i], &sp[j], width * bypp);
890 }
891 }
892 }
893 }
894 break;
895 }
896 case 1: /* Rectangle Fill */
897 {
898 uint32_t color = s->twoD_foreground;
899
900 if (format == 2) {
901 color = cpu_to_le32(color);
902 } else if (format == 1) {
903 color = cpu_to_le16(color);
904 }
905
906 #ifdef CONFIG_PIXMAN
907 if (!(s->use_pixman & BIT(0)) || (width == 1 && height == 1) ||
908 !pixman_fill((uint32_t *)&s->local_mem[dst_base],
909 dst_pitch * bypp / sizeof(uint32_t), 8 * bypp,
910 dst_x, dst_y, width, height, color))
911 #endif
912 {
913 /* fallback when pixman failed or we don't want to call it */
914 uint8_t *d = s->local_mem + dst_base;
915 unsigned int x, y, i;
916 for (y = 0; y < height; y++) {
917 i = (dst_x + (dst_y + y) * dst_pitch) * bypp;
918 for (x = 0; x < width; x++, i += bypp) {
919 stn_he_p(&d[i], bypp, color);
920 }
921 }
922 }
923 break;
924 }
925 default:
926 qemu_log_mask(LOG_UNIMP, "sm501: not implemented 2D operation: %d\n",
927 cmd);
928 return;
929 }
930
931 if (dst_base >= get_fb_addr(s, crt) &&
932 dst_base <= get_fb_addr(s, crt) + fb_len) {
933 int dst_len = MIN(fb_len, ((dst_y + height - 1) * dst_pitch +
934 dst_x + width) * bypp);
935 if (dst_len) {
936 memory_region_set_dirty(&s->local_mem_region, dst_base, dst_len);
937 }
938 }
939 }
940
sm501_system_config_read(void * opaque,hwaddr addr,unsigned size)941 static uint64_t sm501_system_config_read(void *opaque, hwaddr addr,
942 unsigned size)
943 {
944 SM501State *s = opaque;
945 uint32_t ret = 0;
946
947 switch (addr) {
948 case SM501_SYSTEM_CONTROL:
949 ret = s->system_control;
950 break;
951 case SM501_MISC_CONTROL:
952 ret = s->misc_control;
953 break;
954 case SM501_GPIO31_0_CONTROL:
955 ret = s->gpio_31_0_control;
956 break;
957 case SM501_GPIO63_32_CONTROL:
958 ret = s->gpio_63_32_control;
959 break;
960 case SM501_DEVICEID:
961 ret = 0x050100A0;
962 break;
963 case SM501_DRAM_CONTROL:
964 ret = (s->dram_control & 0x07F107C0) | s->local_mem_size_index << 13;
965 break;
966 case SM501_ARBTRTN_CONTROL:
967 ret = s->arbitration_control;
968 break;
969 case SM501_COMMAND_LIST_STATUS:
970 ret = 0x00180002; /* FIFOs are empty, everything idle */
971 break;
972 case SM501_IRQ_MASK:
973 ret = s->irq_mask;
974 break;
975 case SM501_MISC_TIMING:
976 /* TODO : simulate gate control */
977 ret = s->misc_timing;
978 break;
979 case SM501_CURRENT_GATE:
980 /* TODO : simulate gate control */
981 ret = 0x00021807;
982 break;
983 case SM501_CURRENT_CLOCK:
984 ret = 0x2A1A0A09;
985 break;
986 case SM501_POWER_MODE_CONTROL:
987 ret = s->power_mode_control;
988 break;
989 case SM501_ENDIAN_CONTROL:
990 ret = 0; /* Only default little endian mode is supported */
991 break;
992
993 default:
994 qemu_log_mask(LOG_UNIMP, "sm501: not implemented system config"
995 "register read. addr=%" HWADDR_PRIx "\n", addr);
996 }
997 trace_sm501_system_config_read(addr, ret);
998 return ret;
999 }
1000
sm501_system_config_write(void * opaque,hwaddr addr,uint64_t value,unsigned size)1001 static void sm501_system_config_write(void *opaque, hwaddr addr,
1002 uint64_t value, unsigned size)
1003 {
1004 SM501State *s = opaque;
1005
1006 trace_sm501_system_config_write((uint32_t)addr, (uint32_t)value);
1007 switch (addr) {
1008 case SM501_SYSTEM_CONTROL:
1009 s->system_control &= 0x10DB0000;
1010 s->system_control |= value & 0xEF00B8F7;
1011 break;
1012 case SM501_MISC_CONTROL:
1013 s->misc_control &= 0xEF;
1014 s->misc_control |= value & 0xFF7FFF10;
1015 break;
1016 case SM501_GPIO31_0_CONTROL:
1017 s->gpio_31_0_control = value;
1018 break;
1019 case SM501_GPIO63_32_CONTROL:
1020 s->gpio_63_32_control = value & 0xFF80FFFF;
1021 break;
1022 case SM501_DRAM_CONTROL:
1023 s->local_mem_size_index = (value >> 13) & 0x7;
1024 /* TODO : check validity of size change */
1025 s->dram_control &= 0x80000000;
1026 s->dram_control |= value & 0x7FFFFFC3;
1027 break;
1028 case SM501_ARBTRTN_CONTROL:
1029 s->arbitration_control = value & 0x37777777;
1030 break;
1031 case SM501_IRQ_MASK:
1032 s->irq_mask = value & 0xFFDF3F5F;
1033 break;
1034 case SM501_MISC_TIMING:
1035 s->misc_timing = value & 0xF31F1FFF;
1036 break;
1037 case SM501_POWER_MODE_0_GATE:
1038 case SM501_POWER_MODE_1_GATE:
1039 case SM501_POWER_MODE_0_CLOCK:
1040 case SM501_POWER_MODE_1_CLOCK:
1041 /* TODO : simulate gate & clock control */
1042 break;
1043 case SM501_POWER_MODE_CONTROL:
1044 s->power_mode_control = value & 0x00000003;
1045 break;
1046 case SM501_ENDIAN_CONTROL:
1047 if (value & 0x00000001) {
1048 qemu_log_mask(LOG_UNIMP, "sm501: system config big endian mode not"
1049 " implemented.\n");
1050 }
1051 break;
1052
1053 default:
1054 qemu_log_mask(LOG_UNIMP, "sm501: not implemented system config"
1055 "register write. addr=%" HWADDR_PRIx
1056 ", val=%" PRIx64 "\n", addr, value);
1057 }
1058 }
1059
1060 static const MemoryRegionOps sm501_system_config_ops = {
1061 .read = sm501_system_config_read,
1062 .write = sm501_system_config_write,
1063 .valid = {
1064 .min_access_size = 4,
1065 .max_access_size = 4,
1066 },
1067 .endianness = DEVICE_LITTLE_ENDIAN,
1068 };
1069
sm501_i2c_read(void * opaque,hwaddr addr,unsigned size)1070 static uint64_t sm501_i2c_read(void *opaque, hwaddr addr, unsigned size)
1071 {
1072 SM501State *s = opaque;
1073 uint8_t ret = 0;
1074
1075 switch (addr) {
1076 case SM501_I2C_BYTE_COUNT:
1077 ret = s->i2c_byte_count;
1078 break;
1079 case SM501_I2C_STATUS:
1080 ret = s->i2c_status;
1081 break;
1082 case SM501_I2C_SLAVE_ADDRESS:
1083 ret = s->i2c_addr;
1084 break;
1085 case SM501_I2C_DATA ... SM501_I2C_DATA + 15:
1086 ret = s->i2c_data[addr - SM501_I2C_DATA];
1087 break;
1088 default:
1089 qemu_log_mask(LOG_UNIMP, "sm501 i2c : not implemented register read."
1090 " addr=0x%" HWADDR_PRIx "\n", addr);
1091 }
1092 trace_sm501_i2c_read((uint32_t)addr, ret);
1093 return ret;
1094 }
1095
sm501_i2c_write(void * opaque,hwaddr addr,uint64_t value,unsigned size)1096 static void sm501_i2c_write(void *opaque, hwaddr addr, uint64_t value,
1097 unsigned size)
1098 {
1099 SM501State *s = opaque;
1100
1101 trace_sm501_i2c_write((uint32_t)addr, (uint32_t)value);
1102 switch (addr) {
1103 case SM501_I2C_BYTE_COUNT:
1104 s->i2c_byte_count = value & 0xf;
1105 break;
1106 case SM501_I2C_CONTROL:
1107 if (value & SM501_I2C_CONTROL_ENABLE) {
1108 if (value & SM501_I2C_CONTROL_START) {
1109 bool is_recv = s->i2c_addr & 1;
1110 int res = i2c_start_transfer(s->i2c_bus,
1111 s->i2c_addr >> 1,
1112 is_recv);
1113 if (res) {
1114 s->i2c_status |= SM501_I2C_STATUS_ERROR;
1115 } else {
1116 int i;
1117 for (i = 0; i <= s->i2c_byte_count; i++) {
1118 if (is_recv) {
1119 s->i2c_data[i] = i2c_recv(s->i2c_bus);
1120 } else if (i2c_send(s->i2c_bus, s->i2c_data[i]) < 0) {
1121 s->i2c_status |= SM501_I2C_STATUS_ERROR;
1122 return;
1123 }
1124 }
1125 if (i) {
1126 s->i2c_status = SM501_I2C_STATUS_COMPLETE;
1127 }
1128 }
1129 } else {
1130 i2c_end_transfer(s->i2c_bus);
1131 s->i2c_status &= ~SM501_I2C_STATUS_ERROR;
1132 }
1133 }
1134 break;
1135 case SM501_I2C_RESET:
1136 if ((value & SM501_I2C_RESET_ERROR) == 0) {
1137 s->i2c_status &= ~SM501_I2C_STATUS_ERROR;
1138 }
1139 break;
1140 case SM501_I2C_SLAVE_ADDRESS:
1141 s->i2c_addr = value & 0xff;
1142 break;
1143 case SM501_I2C_DATA ... SM501_I2C_DATA + 15:
1144 s->i2c_data[addr - SM501_I2C_DATA] = value & 0xff;
1145 break;
1146 default:
1147 qemu_log_mask(LOG_UNIMP, "sm501 i2c : not implemented register write. "
1148 "addr=0x%" HWADDR_PRIx " val=%" PRIx64 "\n", addr, value);
1149 }
1150 }
1151
1152 static const MemoryRegionOps sm501_i2c_ops = {
1153 .read = sm501_i2c_read,
1154 .write = sm501_i2c_write,
1155 .valid = {
1156 .min_access_size = 1,
1157 .max_access_size = 1,
1158 },
1159 .impl = {
1160 .min_access_size = 1,
1161 .max_access_size = 1,
1162 },
1163 .endianness = DEVICE_LITTLE_ENDIAN,
1164 };
1165
sm501_palette_read(void * opaque,hwaddr addr)1166 static uint32_t sm501_palette_read(void *opaque, hwaddr addr)
1167 {
1168 SM501State *s = opaque;
1169
1170 trace_sm501_palette_read((uint32_t)addr);
1171
1172 /* TODO : consider BYTE/WORD access */
1173 /* TODO : consider endian */
1174
1175 assert(range_covers_byte(0, 0x400 * 3, addr));
1176 return *(uint32_t *)&s->dc_palette[addr];
1177 }
1178
sm501_palette_write(void * opaque,hwaddr addr,uint32_t value)1179 static void sm501_palette_write(void *opaque, hwaddr addr,
1180 uint32_t value)
1181 {
1182 SM501State *s = opaque;
1183
1184 trace_sm501_palette_write((uint32_t)addr, value);
1185
1186 /* TODO : consider BYTE/WORD access */
1187 /* TODO : consider endian */
1188
1189 assert(range_covers_byte(0, 0x400 * 3, addr));
1190 *(uint32_t *)&s->dc_palette[addr] = value;
1191 s->do_full_update = true;
1192 }
1193
sm501_disp_ctrl_read(void * opaque,hwaddr addr,unsigned size)1194 static uint64_t sm501_disp_ctrl_read(void *opaque, hwaddr addr,
1195 unsigned size)
1196 {
1197 SM501State *s = opaque;
1198 uint32_t ret = 0;
1199
1200 switch (addr) {
1201
1202 case SM501_DC_PANEL_CONTROL:
1203 ret = s->dc_panel_control;
1204 break;
1205 case SM501_DC_PANEL_PANNING_CONTROL:
1206 ret = s->dc_panel_panning_control;
1207 break;
1208 case SM501_DC_PANEL_COLOR_KEY:
1209 /* Not implemented yet */
1210 break;
1211 case SM501_DC_PANEL_FB_ADDR:
1212 ret = s->dc_panel_fb_addr;
1213 break;
1214 case SM501_DC_PANEL_FB_OFFSET:
1215 ret = s->dc_panel_fb_offset;
1216 break;
1217 case SM501_DC_PANEL_FB_WIDTH:
1218 ret = s->dc_panel_fb_width;
1219 break;
1220 case SM501_DC_PANEL_FB_HEIGHT:
1221 ret = s->dc_panel_fb_height;
1222 break;
1223 case SM501_DC_PANEL_TL_LOC:
1224 ret = s->dc_panel_tl_location;
1225 break;
1226 case SM501_DC_PANEL_BR_LOC:
1227 ret = s->dc_panel_br_location;
1228 break;
1229
1230 case SM501_DC_PANEL_H_TOT:
1231 ret = s->dc_panel_h_total;
1232 break;
1233 case SM501_DC_PANEL_H_SYNC:
1234 ret = s->dc_panel_h_sync;
1235 break;
1236 case SM501_DC_PANEL_V_TOT:
1237 ret = s->dc_panel_v_total;
1238 break;
1239 case SM501_DC_PANEL_V_SYNC:
1240 ret = s->dc_panel_v_sync;
1241 break;
1242
1243 case SM501_DC_PANEL_HWC_ADDR:
1244 ret = s->dc_panel_hwc_addr;
1245 break;
1246 case SM501_DC_PANEL_HWC_LOC:
1247 ret = s->dc_panel_hwc_location;
1248 break;
1249 case SM501_DC_PANEL_HWC_COLOR_1_2:
1250 ret = s->dc_panel_hwc_color_1_2;
1251 break;
1252 case SM501_DC_PANEL_HWC_COLOR_3:
1253 ret = s->dc_panel_hwc_color_3;
1254 break;
1255
1256 case SM501_DC_VIDEO_CONTROL:
1257 ret = s->dc_video_control;
1258 break;
1259
1260 case SM501_DC_CRT_CONTROL:
1261 ret = s->dc_crt_control;
1262 break;
1263 case SM501_DC_CRT_FB_ADDR:
1264 ret = s->dc_crt_fb_addr;
1265 break;
1266 case SM501_DC_CRT_FB_OFFSET:
1267 ret = s->dc_crt_fb_offset;
1268 break;
1269 case SM501_DC_CRT_H_TOT:
1270 ret = s->dc_crt_h_total;
1271 break;
1272 case SM501_DC_CRT_H_SYNC:
1273 ret = s->dc_crt_h_sync;
1274 break;
1275 case SM501_DC_CRT_V_TOT:
1276 ret = s->dc_crt_v_total;
1277 break;
1278 case SM501_DC_CRT_V_SYNC:
1279 ret = s->dc_crt_v_sync;
1280 break;
1281
1282 case SM501_DC_CRT_HWC_ADDR:
1283 ret = s->dc_crt_hwc_addr;
1284 break;
1285 case SM501_DC_CRT_HWC_LOC:
1286 ret = s->dc_crt_hwc_location;
1287 break;
1288 case SM501_DC_CRT_HWC_COLOR_1_2:
1289 ret = s->dc_crt_hwc_color_1_2;
1290 break;
1291 case SM501_DC_CRT_HWC_COLOR_3:
1292 ret = s->dc_crt_hwc_color_3;
1293 break;
1294
1295 case SM501_DC_PANEL_PALETTE ... SM501_DC_PANEL_PALETTE + 0x400 * 3 - 4:
1296 ret = sm501_palette_read(opaque, addr - SM501_DC_PANEL_PALETTE);
1297 break;
1298
1299 default:
1300 qemu_log_mask(LOG_UNIMP, "sm501: not implemented disp ctrl register "
1301 "read. addr=%" HWADDR_PRIx "\n", addr);
1302 }
1303 trace_sm501_disp_ctrl_read((uint32_t)addr, ret);
1304 return ret;
1305 }
1306
sm501_disp_ctrl_write(void * opaque,hwaddr addr,uint64_t value,unsigned size)1307 static void sm501_disp_ctrl_write(void *opaque, hwaddr addr,
1308 uint64_t value, unsigned size)
1309 {
1310 SM501State *s = opaque;
1311
1312 trace_sm501_disp_ctrl_write((uint32_t)addr, (uint32_t)value);
1313 switch (addr) {
1314 case SM501_DC_PANEL_CONTROL:
1315 s->dc_panel_control = value & 0x0FFF73FF;
1316 break;
1317 case SM501_DC_PANEL_PANNING_CONTROL:
1318 s->dc_panel_panning_control = value & 0xFF3FFF3F;
1319 break;
1320 case SM501_DC_PANEL_COLOR_KEY:
1321 /* Not implemented yet */
1322 break;
1323 case SM501_DC_PANEL_FB_ADDR:
1324 s->dc_panel_fb_addr = value & 0x8FFFFFF0;
1325 if (value & 0x8000000) {
1326 qemu_log_mask(LOG_UNIMP, "Panel external memory not supported\n");
1327 }
1328 s->do_full_update = true;
1329 break;
1330 case SM501_DC_PANEL_FB_OFFSET:
1331 s->dc_panel_fb_offset = value & 0x3FF03FF0;
1332 break;
1333 case SM501_DC_PANEL_FB_WIDTH:
1334 s->dc_panel_fb_width = value & 0x0FFF0FFF;
1335 break;
1336 case SM501_DC_PANEL_FB_HEIGHT:
1337 s->dc_panel_fb_height = value & 0x0FFF0FFF;
1338 break;
1339 case SM501_DC_PANEL_TL_LOC:
1340 s->dc_panel_tl_location = value & 0x07FF07FF;
1341 break;
1342 case SM501_DC_PANEL_BR_LOC:
1343 s->dc_panel_br_location = value & 0x07FF07FF;
1344 break;
1345
1346 case SM501_DC_PANEL_H_TOT:
1347 s->dc_panel_h_total = value & 0x0FFF0FFF;
1348 break;
1349 case SM501_DC_PANEL_H_SYNC:
1350 s->dc_panel_h_sync = value & 0x00FF0FFF;
1351 break;
1352 case SM501_DC_PANEL_V_TOT:
1353 s->dc_panel_v_total = value & 0x0FFF0FFF;
1354 break;
1355 case SM501_DC_PANEL_V_SYNC:
1356 s->dc_panel_v_sync = value & 0x003F0FFF;
1357 break;
1358
1359 case SM501_DC_PANEL_HWC_ADDR:
1360 value &= 0x8FFFFFF0;
1361 if (value != s->dc_panel_hwc_addr) {
1362 hwc_invalidate(s, 0);
1363 s->dc_panel_hwc_addr = value;
1364 }
1365 break;
1366 case SM501_DC_PANEL_HWC_LOC:
1367 value &= 0x0FFF0FFF;
1368 if (value != s->dc_panel_hwc_location) {
1369 hwc_invalidate(s, 0);
1370 s->dc_panel_hwc_location = value;
1371 }
1372 break;
1373 case SM501_DC_PANEL_HWC_COLOR_1_2:
1374 s->dc_panel_hwc_color_1_2 = value;
1375 break;
1376 case SM501_DC_PANEL_HWC_COLOR_3:
1377 s->dc_panel_hwc_color_3 = value & 0x0000FFFF;
1378 break;
1379
1380 case SM501_DC_VIDEO_CONTROL:
1381 s->dc_video_control = value & 0x00037FFF;
1382 break;
1383
1384 case SM501_DC_CRT_CONTROL:
1385 s->dc_crt_control = value & 0x0003FFFF;
1386 break;
1387 case SM501_DC_CRT_FB_ADDR:
1388 s->dc_crt_fb_addr = value & 0x8FFFFFF0;
1389 if (value & 0x8000000) {
1390 qemu_log_mask(LOG_UNIMP, "CRT external memory not supported\n");
1391 }
1392 s->do_full_update = true;
1393 break;
1394 case SM501_DC_CRT_FB_OFFSET:
1395 s->dc_crt_fb_offset = value & 0x3FF03FF0;
1396 break;
1397 case SM501_DC_CRT_H_TOT:
1398 s->dc_crt_h_total = value & 0x0FFF0FFF;
1399 break;
1400 case SM501_DC_CRT_H_SYNC:
1401 s->dc_crt_h_sync = value & 0x00FF0FFF;
1402 break;
1403 case SM501_DC_CRT_V_TOT:
1404 s->dc_crt_v_total = value & 0x0FFF0FFF;
1405 break;
1406 case SM501_DC_CRT_V_SYNC:
1407 s->dc_crt_v_sync = value & 0x003F0FFF;
1408 break;
1409
1410 case SM501_DC_CRT_HWC_ADDR:
1411 value &= 0x8FFFFFF0;
1412 if (value != s->dc_crt_hwc_addr) {
1413 hwc_invalidate(s, 1);
1414 s->dc_crt_hwc_addr = value;
1415 }
1416 break;
1417 case SM501_DC_CRT_HWC_LOC:
1418 value &= 0x0FFF0FFF;
1419 if (value != s->dc_crt_hwc_location) {
1420 hwc_invalidate(s, 1);
1421 s->dc_crt_hwc_location = value;
1422 }
1423 break;
1424 case SM501_DC_CRT_HWC_COLOR_1_2:
1425 s->dc_crt_hwc_color_1_2 = value;
1426 break;
1427 case SM501_DC_CRT_HWC_COLOR_3:
1428 s->dc_crt_hwc_color_3 = value & 0x0000FFFF;
1429 break;
1430
1431 case SM501_DC_PANEL_PALETTE ... SM501_DC_PANEL_PALETTE + 0x400 * 3 - 4:
1432 sm501_palette_write(opaque, addr - SM501_DC_PANEL_PALETTE, value);
1433 break;
1434
1435 default:
1436 qemu_log_mask(LOG_UNIMP, "sm501: not implemented disp ctrl register "
1437 "write. addr=%" HWADDR_PRIx
1438 ", val=%" PRIx64 "\n", addr, value);
1439 }
1440 }
1441
1442 static const MemoryRegionOps sm501_disp_ctrl_ops = {
1443 .read = sm501_disp_ctrl_read,
1444 .write = sm501_disp_ctrl_write,
1445 .valid = {
1446 .min_access_size = 4,
1447 .max_access_size = 4,
1448 },
1449 .endianness = DEVICE_LITTLE_ENDIAN,
1450 };
1451
sm501_2d_engine_read(void * opaque,hwaddr addr,unsigned size)1452 static uint64_t sm501_2d_engine_read(void *opaque, hwaddr addr,
1453 unsigned size)
1454 {
1455 SM501State *s = opaque;
1456 uint32_t ret = 0;
1457
1458 switch (addr) {
1459 case SM501_2D_SOURCE:
1460 ret = s->twoD_source;
1461 break;
1462 case SM501_2D_DESTINATION:
1463 ret = s->twoD_destination;
1464 break;
1465 case SM501_2D_DIMENSION:
1466 ret = s->twoD_dimension;
1467 break;
1468 case SM501_2D_CONTROL:
1469 ret = s->twoD_control;
1470 break;
1471 case SM501_2D_PITCH:
1472 ret = s->twoD_pitch;
1473 break;
1474 case SM501_2D_FOREGROUND:
1475 ret = s->twoD_foreground;
1476 break;
1477 case SM501_2D_BACKGROUND:
1478 ret = s->twoD_background;
1479 break;
1480 case SM501_2D_STRETCH:
1481 ret = s->twoD_stretch;
1482 break;
1483 case SM501_2D_COLOR_COMPARE:
1484 ret = s->twoD_color_compare;
1485 break;
1486 case SM501_2D_COLOR_COMPARE_MASK:
1487 ret = s->twoD_color_compare_mask;
1488 break;
1489 case SM501_2D_MASK:
1490 ret = s->twoD_mask;
1491 break;
1492 case SM501_2D_CLIP_TL:
1493 ret = s->twoD_clip_tl;
1494 break;
1495 case SM501_2D_CLIP_BR:
1496 ret = s->twoD_clip_br;
1497 break;
1498 case SM501_2D_MONO_PATTERN_LOW:
1499 ret = s->twoD_mono_pattern_low;
1500 break;
1501 case SM501_2D_MONO_PATTERN_HIGH:
1502 ret = s->twoD_mono_pattern_high;
1503 break;
1504 case SM501_2D_WINDOW_WIDTH:
1505 ret = s->twoD_window_width;
1506 break;
1507 case SM501_2D_SOURCE_BASE:
1508 ret = s->twoD_source_base;
1509 break;
1510 case SM501_2D_DESTINATION_BASE:
1511 ret = s->twoD_destination_base;
1512 break;
1513 case SM501_2D_ALPHA:
1514 ret = s->twoD_alpha;
1515 break;
1516 case SM501_2D_WRAP:
1517 ret = s->twoD_wrap;
1518 break;
1519 case SM501_2D_STATUS:
1520 ret = 0; /* Should return interrupt status */
1521 break;
1522 default:
1523 qemu_log_mask(LOG_UNIMP, "sm501: not implemented disp ctrl register "
1524 "read. addr=%" HWADDR_PRIx "\n", addr);
1525 }
1526 trace_sm501_2d_engine_read((uint32_t)addr, ret);
1527 return ret;
1528 }
1529
sm501_2d_engine_write(void * opaque,hwaddr addr,uint64_t value,unsigned size)1530 static void sm501_2d_engine_write(void *opaque, hwaddr addr,
1531 uint64_t value, unsigned size)
1532 {
1533 SM501State *s = opaque;
1534
1535 trace_sm501_2d_engine_write((uint32_t)addr, (uint32_t)value);
1536 switch (addr) {
1537 case SM501_2D_SOURCE:
1538 s->twoD_source = value;
1539 break;
1540 case SM501_2D_DESTINATION:
1541 s->twoD_destination = value;
1542 break;
1543 case SM501_2D_DIMENSION:
1544 s->twoD_dimension = value;
1545 break;
1546 case SM501_2D_CONTROL:
1547 s->twoD_control = value;
1548
1549 /* do 2d operation if start flag is set. */
1550 if (value & 0x80000000) {
1551 sm501_2d_operation(s);
1552 s->twoD_control &= ~0x80000000; /* start flag down */
1553 }
1554
1555 break;
1556 case SM501_2D_PITCH:
1557 s->twoD_pitch = value;
1558 break;
1559 case SM501_2D_FOREGROUND:
1560 s->twoD_foreground = value;
1561 break;
1562 case SM501_2D_BACKGROUND:
1563 s->twoD_background = value;
1564 break;
1565 case SM501_2D_STRETCH:
1566 if (((value >> 20) & 3) == 3) {
1567 value &= ~BIT(20);
1568 }
1569 s->twoD_stretch = value;
1570 break;
1571 case SM501_2D_COLOR_COMPARE:
1572 s->twoD_color_compare = value;
1573 break;
1574 case SM501_2D_COLOR_COMPARE_MASK:
1575 s->twoD_color_compare_mask = value;
1576 break;
1577 case SM501_2D_MASK:
1578 s->twoD_mask = value;
1579 break;
1580 case SM501_2D_CLIP_TL:
1581 s->twoD_clip_tl = value;
1582 break;
1583 case SM501_2D_CLIP_BR:
1584 s->twoD_clip_br = value;
1585 break;
1586 case SM501_2D_MONO_PATTERN_LOW:
1587 s->twoD_mono_pattern_low = value;
1588 break;
1589 case SM501_2D_MONO_PATTERN_HIGH:
1590 s->twoD_mono_pattern_high = value;
1591 break;
1592 case SM501_2D_WINDOW_WIDTH:
1593 s->twoD_window_width = value;
1594 break;
1595 case SM501_2D_SOURCE_BASE:
1596 s->twoD_source_base = value;
1597 break;
1598 case SM501_2D_DESTINATION_BASE:
1599 s->twoD_destination_base = value;
1600 break;
1601 case SM501_2D_ALPHA:
1602 s->twoD_alpha = value;
1603 break;
1604 case SM501_2D_WRAP:
1605 s->twoD_wrap = value;
1606 break;
1607 case SM501_2D_STATUS:
1608 /* ignored, writing 0 should clear interrupt status */
1609 break;
1610 default:
1611 qemu_log_mask(LOG_UNIMP, "sm501: not implemented 2d engine register "
1612 "write. addr=%" HWADDR_PRIx
1613 ", val=%" PRIx64 "\n", addr, value);
1614 }
1615 }
1616
1617 static const MemoryRegionOps sm501_2d_engine_ops = {
1618 .read = sm501_2d_engine_read,
1619 .write = sm501_2d_engine_write,
1620 .valid = {
1621 .min_access_size = 4,
1622 .max_access_size = 4,
1623 },
1624 .endianness = DEVICE_LITTLE_ENDIAN,
1625 };
1626
1627 /* draw line functions for all console modes */
1628
1629 typedef void draw_line_func(uint8_t *d, const uint8_t *s,
1630 int width, const uint32_t *pal);
1631
1632 typedef void draw_hwc_line_func(uint8_t *d, const uint8_t *s,
1633 int width, const uint8_t *palette,
1634 int c_x, int c_y);
1635
draw_line8_32(uint8_t * d,const uint8_t * s,int width,const uint32_t * pal)1636 static void draw_line8_32(uint8_t *d, const uint8_t *s, int width,
1637 const uint32_t *pal)
1638 {
1639 uint8_t v, r, g, b;
1640 do {
1641 v = ldub_p(s);
1642 r = (pal[v] >> 16) & 0xff;
1643 g = (pal[v] >> 8) & 0xff;
1644 b = (pal[v] >> 0) & 0xff;
1645 *(uint32_t *)d = rgb_to_pixel32(r, g, b);
1646 s++;
1647 d += 4;
1648 } while (--width != 0);
1649 }
1650
draw_line16_32(uint8_t * d,const uint8_t * s,int width,const uint32_t * pal)1651 static void draw_line16_32(uint8_t *d, const uint8_t *s, int width,
1652 const uint32_t *pal)
1653 {
1654 uint16_t rgb565;
1655 uint8_t r, g, b;
1656
1657 do {
1658 rgb565 = lduw_le_p(s);
1659 r = (rgb565 >> 8) & 0xf8;
1660 g = (rgb565 >> 3) & 0xfc;
1661 b = (rgb565 << 3) & 0xf8;
1662 *(uint32_t *)d = rgb_to_pixel32(r, g, b);
1663 s += 2;
1664 d += 4;
1665 } while (--width != 0);
1666 }
1667
draw_line32_32(uint8_t * d,const uint8_t * s,int width,const uint32_t * pal)1668 static void draw_line32_32(uint8_t *d, const uint8_t *s, int width,
1669 const uint32_t *pal)
1670 {
1671 uint8_t r, g, b;
1672
1673 do {
1674 r = s[2];
1675 g = s[1];
1676 b = s[0];
1677 *(uint32_t *)d = rgb_to_pixel32(r, g, b);
1678 s += 4;
1679 d += 4;
1680 } while (--width != 0);
1681 }
1682
1683 /**
1684 * Draw hardware cursor image on the given line.
1685 */
draw_hwc_line_32(uint8_t * d,const uint8_t * s,int width,const uint8_t * palette,int c_x,int c_y)1686 static void draw_hwc_line_32(uint8_t *d, const uint8_t *s, int width,
1687 const uint8_t *palette, int c_x, int c_y)
1688 {
1689 int i;
1690 uint8_t r, g, b, v, bitset = 0;
1691
1692 /* get cursor position */
1693 assert(0 <= c_y && c_y < SM501_HWC_HEIGHT);
1694 s += SM501_HWC_WIDTH * c_y / 4; /* 4 pixels per byte */
1695 d += c_x * 4;
1696
1697 for (i = 0; i < SM501_HWC_WIDTH && c_x + i < width; i++) {
1698 /* get pixel value */
1699 if (i % 4 == 0) {
1700 bitset = ldub_p(s);
1701 s++;
1702 }
1703 v = bitset & 3;
1704 bitset >>= 2;
1705
1706 /* write pixel */
1707 if (v) {
1708 v--;
1709 r = palette[v * 3 + 0];
1710 g = palette[v * 3 + 1];
1711 b = palette[v * 3 + 2];
1712 *(uint32_t *)d = rgb_to_pixel32(r, g, b);
1713 }
1714 d += 4;
1715 }
1716 }
1717
sm501_update_display(void * opaque)1718 static void sm501_update_display(void *opaque)
1719 {
1720 SM501State *s = opaque;
1721 DisplaySurface *surface = qemu_console_surface(s->con);
1722 DirtyBitmapSnapshot *snap;
1723 int y, c_x = 0, c_y = 0;
1724 int crt = (s->dc_crt_control & SM501_DC_CRT_CONTROL_SEL) ? 1 : 0;
1725 int width = get_width(s, crt);
1726 int height = get_height(s, crt);
1727 int src_bpp = get_bpp(s, crt);
1728 int dst_bpp = surface_bytes_per_pixel(surface);
1729 draw_line_func *draw_line = NULL;
1730 draw_hwc_line_func *draw_hwc_line = NULL;
1731 int full_update = 0;
1732 int y_start = -1;
1733 ram_addr_t offset;
1734 uint32_t *palette;
1735 uint8_t hwc_palette[3 * 3];
1736 uint8_t *hwc_src = NULL;
1737
1738 assert(dst_bpp == 4); /* Output is always 32-bit RGB */
1739
1740 if (!((crt ? s->dc_crt_control : s->dc_panel_control)
1741 & SM501_DC_CRT_CONTROL_ENABLE)) {
1742 return;
1743 }
1744
1745 palette = (uint32_t *)(crt ? &s->dc_palette[SM501_DC_CRT_PALETTE -
1746 SM501_DC_PANEL_PALETTE]
1747 : &s->dc_palette[0]);
1748
1749 /* choose draw_line function */
1750 switch (src_bpp) {
1751 case 1:
1752 draw_line = draw_line8_32;
1753 break;
1754 case 2:
1755 draw_line = draw_line16_32;
1756 break;
1757 case 4:
1758 draw_line = draw_line32_32;
1759 break;
1760 default:
1761 qemu_log_mask(LOG_GUEST_ERROR, "sm501: update display"
1762 "invalid control register value.\n");
1763 return;
1764 }
1765
1766 /* set up to draw hardware cursor */
1767 if (is_hwc_enabled(s, crt)) {
1768 /* choose cursor draw line function */
1769 draw_hwc_line = draw_hwc_line_32;
1770 hwc_src = get_hwc_address(s, crt);
1771 c_x = get_hwc_x(s, crt);
1772 c_y = get_hwc_y(s, crt);
1773 get_hwc_palette(s, crt, hwc_palette);
1774 }
1775
1776 /* adjust console size */
1777 if (s->last_width != width || s->last_height != height) {
1778 qemu_console_resize(s->con, width, height);
1779 surface = qemu_console_surface(s->con);
1780 s->last_width = width;
1781 s->last_height = height;
1782 full_update = 1;
1783 }
1784
1785 /* someone else requested a full update */
1786 if (s->do_full_update) {
1787 s->do_full_update = false;
1788 full_update = 1;
1789 }
1790
1791 /* draw each line according to conditions */
1792 offset = get_fb_addr(s, crt);
1793 snap = memory_region_snapshot_and_clear_dirty(&s->local_mem_region,
1794 offset, width * height * src_bpp, DIRTY_MEMORY_VGA);
1795 for (y = 0; y < height; y++, offset += width * src_bpp) {
1796 int update, update_hwc;
1797
1798 /* check if hardware cursor is enabled and we're within its range */
1799 update_hwc = draw_hwc_line && c_y <= y && y < c_y + SM501_HWC_HEIGHT;
1800 update = full_update || update_hwc;
1801 /* check dirty flags for each line */
1802 update |= memory_region_snapshot_get_dirty(&s->local_mem_region, snap,
1803 offset, width * src_bpp);
1804
1805 /* draw line and change status */
1806 if (update) {
1807 uint8_t *d = surface_data(surface);
1808 d += y * width * dst_bpp;
1809
1810 /* draw graphics layer */
1811 draw_line(d, s->local_mem + offset, width, palette);
1812
1813 /* draw hardware cursor */
1814 if (update_hwc) {
1815 draw_hwc_line(d, hwc_src, width, hwc_palette, c_x, y - c_y);
1816 }
1817
1818 if (y_start < 0) {
1819 y_start = y;
1820 }
1821 } else {
1822 if (y_start >= 0) {
1823 /* flush to display */
1824 dpy_gfx_update(s->con, 0, y_start, width, y - y_start);
1825 y_start = -1;
1826 }
1827 }
1828 }
1829 g_free(snap);
1830
1831 /* complete flush to display */
1832 if (y_start >= 0) {
1833 dpy_gfx_update(s->con, 0, y_start, width, y - y_start);
1834 }
1835 }
1836
1837 static const GraphicHwOps sm501_ops = {
1838 .gfx_update = sm501_update_display,
1839 };
1840
sm501_reset(SM501State * s)1841 static void sm501_reset(SM501State *s)
1842 {
1843 s->system_control = 0x00100000; /* 2D engine FIFO empty */
1844 /*
1845 * Bits 17 (SH), 7 (CDR), 6:5 (Test), 2:0 (Bus) are all supposed
1846 * to be determined at reset by GPIO lines which set config bits.
1847 * We hardwire them:
1848 * SH = 0 : Hitachi Ready Polarity == Active Low
1849 * CDR = 0 : do not reset clock divider
1850 * TEST = 0 : Normal mode (not testing the silicon)
1851 * BUS = 0 : Hitachi SH3/SH4
1852 */
1853 s->misc_control = SM501_MISC_DAC_POWER;
1854 s->gpio_31_0_control = 0;
1855 s->gpio_63_32_control = 0;
1856 s->dram_control = 0;
1857 s->arbitration_control = 0x05146732;
1858 s->irq_mask = 0;
1859 s->misc_timing = 0;
1860 s->power_mode_control = 0;
1861 s->i2c_byte_count = 0;
1862 s->i2c_status = 0;
1863 s->i2c_addr = 0;
1864 memset(s->i2c_data, 0, 16);
1865 s->dc_panel_control = 0x00010000; /* FIFO level 3 */
1866 s->dc_video_control = 0;
1867 s->dc_crt_control = 0x00010000;
1868 s->twoD_source = 0;
1869 s->twoD_destination = 0;
1870 s->twoD_dimension = 0;
1871 s->twoD_control = 0;
1872 s->twoD_pitch = 0;
1873 s->twoD_foreground = 0;
1874 s->twoD_background = 0;
1875 s->twoD_stretch = 0;
1876 s->twoD_color_compare = 0;
1877 s->twoD_color_compare_mask = 0;
1878 s->twoD_mask = 0;
1879 s->twoD_clip_tl = 0;
1880 s->twoD_clip_br = 0;
1881 s->twoD_mono_pattern_low = 0;
1882 s->twoD_mono_pattern_high = 0;
1883 s->twoD_window_width = 0;
1884 s->twoD_source_base = 0;
1885 s->twoD_destination_base = 0;
1886 s->twoD_alpha = 0;
1887 s->twoD_wrap = 0;
1888 }
1889
sm501_init(SM501State * s,DeviceState * dev,uint32_t local_mem_bytes)1890 static void sm501_init(SM501State *s, DeviceState *dev,
1891 uint32_t local_mem_bytes)
1892 {
1893 #ifndef CONFIG_PIXMAN
1894 if (s->use_pixman != 0) {
1895 warn_report("x-pixman != 0, not effective without PIXMAN");
1896 }
1897 #endif
1898
1899 s->local_mem_size_index = get_local_mem_size_index(local_mem_bytes);
1900
1901 /* local memory */
1902 memory_region_init_ram(&s->local_mem_region, OBJECT(dev), "sm501.local",
1903 get_local_mem_size(s), &error_fatal);
1904 memory_region_set_log(&s->local_mem_region, true, DIRTY_MEMORY_VGA);
1905 s->local_mem = memory_region_get_ram_ptr(&s->local_mem_region);
1906
1907 /* i2c */
1908 s->i2c_bus = i2c_init_bus(dev, "sm501.i2c");
1909 /* ddc */
1910 I2CDDCState *ddc = I2CDDC(qdev_new(TYPE_I2CDDC));
1911 i2c_slave_set_address(I2C_SLAVE(ddc), 0x50);
1912 qdev_realize_and_unref(DEVICE(ddc), BUS(s->i2c_bus), &error_abort);
1913
1914 /* mmio */
1915 memory_region_init(&s->mmio_region, OBJECT(dev), "sm501.mmio", MMIO_SIZE);
1916 memory_region_init_io(&s->system_config_region, OBJECT(dev),
1917 &sm501_system_config_ops, s,
1918 "sm501-system-config", 0x6c);
1919 memory_region_add_subregion(&s->mmio_region, SM501_SYS_CONFIG,
1920 &s->system_config_region);
1921 memory_region_init_io(&s->i2c_region, OBJECT(dev), &sm501_i2c_ops, s,
1922 "sm501-i2c", 0x14);
1923 memory_region_add_subregion(&s->mmio_region, SM501_I2C, &s->i2c_region);
1924 memory_region_init_io(&s->disp_ctrl_region, OBJECT(dev),
1925 &sm501_disp_ctrl_ops, s,
1926 "sm501-disp-ctrl", 0x1000);
1927 memory_region_add_subregion(&s->mmio_region, SM501_DC,
1928 &s->disp_ctrl_region);
1929 memory_region_init_io(&s->twoD_engine_region, OBJECT(dev),
1930 &sm501_2d_engine_ops, s,
1931 "sm501-2d-engine", 0x54);
1932 memory_region_add_subregion(&s->mmio_region, SM501_2D_ENGINE,
1933 &s->twoD_engine_region);
1934
1935 /* create qemu graphic console */
1936 s->con = graphic_console_init(dev, 0, &sm501_ops, s);
1937 }
1938
1939 static const VMStateDescription vmstate_sm501_state = {
1940 .name = "sm501-state",
1941 .version_id = 1,
1942 .minimum_version_id = 1,
1943 .fields = (const VMStateField[]) {
1944 VMSTATE_UINT32(local_mem_size_index, SM501State),
1945 VMSTATE_UINT32(system_control, SM501State),
1946 VMSTATE_UINT32(misc_control, SM501State),
1947 VMSTATE_UINT32(gpio_31_0_control, SM501State),
1948 VMSTATE_UINT32(gpio_63_32_control, SM501State),
1949 VMSTATE_UINT32(dram_control, SM501State),
1950 VMSTATE_UINT32(arbitration_control, SM501State),
1951 VMSTATE_UINT32(irq_mask, SM501State),
1952 VMSTATE_UINT32(misc_timing, SM501State),
1953 VMSTATE_UINT32(power_mode_control, SM501State),
1954 VMSTATE_UINT32(uart0_ier, SM501State),
1955 VMSTATE_UINT32(uart0_lcr, SM501State),
1956 VMSTATE_UINT32(uart0_mcr, SM501State),
1957 VMSTATE_UINT32(uart0_scr, SM501State),
1958 VMSTATE_UINT8_ARRAY(dc_palette, SM501State, DC_PALETTE_ENTRIES),
1959 VMSTATE_UINT32(dc_panel_control, SM501State),
1960 VMSTATE_UINT32(dc_panel_panning_control, SM501State),
1961 VMSTATE_UINT32(dc_panel_fb_addr, SM501State),
1962 VMSTATE_UINT32(dc_panel_fb_offset, SM501State),
1963 VMSTATE_UINT32(dc_panel_fb_width, SM501State),
1964 VMSTATE_UINT32(dc_panel_fb_height, SM501State),
1965 VMSTATE_UINT32(dc_panel_tl_location, SM501State),
1966 VMSTATE_UINT32(dc_panel_br_location, SM501State),
1967 VMSTATE_UINT32(dc_panel_h_total, SM501State),
1968 VMSTATE_UINT32(dc_panel_h_sync, SM501State),
1969 VMSTATE_UINT32(dc_panel_v_total, SM501State),
1970 VMSTATE_UINT32(dc_panel_v_sync, SM501State),
1971 VMSTATE_UINT32(dc_panel_hwc_addr, SM501State),
1972 VMSTATE_UINT32(dc_panel_hwc_location, SM501State),
1973 VMSTATE_UINT32(dc_panel_hwc_color_1_2, SM501State),
1974 VMSTATE_UINT32(dc_panel_hwc_color_3, SM501State),
1975 VMSTATE_UINT32(dc_video_control, SM501State),
1976 VMSTATE_UINT32(dc_crt_control, SM501State),
1977 VMSTATE_UINT32(dc_crt_fb_addr, SM501State),
1978 VMSTATE_UINT32(dc_crt_fb_offset, SM501State),
1979 VMSTATE_UINT32(dc_crt_h_total, SM501State),
1980 VMSTATE_UINT32(dc_crt_h_sync, SM501State),
1981 VMSTATE_UINT32(dc_crt_v_total, SM501State),
1982 VMSTATE_UINT32(dc_crt_v_sync, SM501State),
1983 VMSTATE_UINT32(dc_crt_hwc_addr, SM501State),
1984 VMSTATE_UINT32(dc_crt_hwc_location, SM501State),
1985 VMSTATE_UINT32(dc_crt_hwc_color_1_2, SM501State),
1986 VMSTATE_UINT32(dc_crt_hwc_color_3, SM501State),
1987 VMSTATE_UINT32(twoD_source, SM501State),
1988 VMSTATE_UINT32(twoD_destination, SM501State),
1989 VMSTATE_UINT32(twoD_dimension, SM501State),
1990 VMSTATE_UINT32(twoD_control, SM501State),
1991 VMSTATE_UINT32(twoD_pitch, SM501State),
1992 VMSTATE_UINT32(twoD_foreground, SM501State),
1993 VMSTATE_UINT32(twoD_background, SM501State),
1994 VMSTATE_UINT32(twoD_stretch, SM501State),
1995 VMSTATE_UINT32(twoD_color_compare, SM501State),
1996 VMSTATE_UINT32(twoD_color_compare_mask, SM501State),
1997 VMSTATE_UINT32(twoD_mask, SM501State),
1998 VMSTATE_UINT32(twoD_clip_tl, SM501State),
1999 VMSTATE_UINT32(twoD_clip_br, SM501State),
2000 VMSTATE_UINT32(twoD_mono_pattern_low, SM501State),
2001 VMSTATE_UINT32(twoD_mono_pattern_high, SM501State),
2002 VMSTATE_UINT32(twoD_window_width, SM501State),
2003 VMSTATE_UINT32(twoD_source_base, SM501State),
2004 VMSTATE_UINT32(twoD_destination_base, SM501State),
2005 VMSTATE_UINT32(twoD_alpha, SM501State),
2006 VMSTATE_UINT32(twoD_wrap, SM501State),
2007 /* Added in version 2 */
2008 VMSTATE_UINT8(i2c_byte_count, SM501State),
2009 VMSTATE_UINT8(i2c_status, SM501State),
2010 VMSTATE_UINT8(i2c_addr, SM501State),
2011 VMSTATE_UINT8_ARRAY(i2c_data, SM501State, 16),
2012 VMSTATE_END_OF_LIST()
2013 }
2014 };
2015
2016 #define TYPE_SYSBUS_SM501 "sysbus-sm501"
2017 OBJECT_DECLARE_SIMPLE_TYPE(SM501SysBusState, SYSBUS_SM501)
2018
2019 struct SM501SysBusState {
2020 /*< private >*/
2021 SysBusDevice parent_obj;
2022 /*< public >*/
2023 SM501State state;
2024 uint32_t vram_size;
2025 SerialMM serial;
2026 OHCISysBusState ohci;
2027 };
2028
sm501_realize_sysbus(DeviceState * dev,Error ** errp)2029 static void sm501_realize_sysbus(DeviceState *dev, Error **errp)
2030 {
2031 SM501SysBusState *s = SYSBUS_SM501(dev);
2032 SysBusDevice *sbd = SYS_BUS_DEVICE(dev);
2033 MemoryRegion *mr;
2034
2035 sm501_init(&s->state, dev, s->vram_size);
2036 if (get_local_mem_size(&s->state) != s->vram_size) {
2037 error_setg(errp, "Invalid VRAM size, nearest valid size is %" PRIu32,
2038 get_local_mem_size(&s->state));
2039 return;
2040 }
2041 sysbus_init_mmio(sbd, &s->state.local_mem_region);
2042 sysbus_init_mmio(sbd, &s->state.mmio_region);
2043
2044 /* bridge to usb host emulation module */
2045 sysbus_realize_and_unref(SYS_BUS_DEVICE(&s->ohci), &error_fatal);
2046 memory_region_add_subregion(&s->state.mmio_region, SM501_USB_HOST,
2047 sysbus_mmio_get_region(SYS_BUS_DEVICE(&s->ohci), 0));
2048 sysbus_pass_irq(sbd, SYS_BUS_DEVICE(&s->ohci));
2049
2050 /* bridge to serial emulation module */
2051 sysbus_realize(SYS_BUS_DEVICE(&s->serial), &error_fatal);
2052 mr = sysbus_mmio_get_region(SYS_BUS_DEVICE(&s->serial), 0);
2053 memory_region_add_subregion(&s->state.mmio_region, SM501_UART0, mr);
2054 /* TODO : chain irq to IRL */
2055 }
2056
2057 static Property sm501_sysbus_properties[] = {
2058 DEFINE_PROP_UINT32("vram-size", SM501SysBusState, vram_size, 0),
2059 /* this a debug option, prefer PROP_UINT over PROP_BIT for simplicity */
2060 DEFINE_PROP_UINT8("x-pixman", SM501SysBusState, state.use_pixman, DEFAULT_X_PIXMAN),
2061 DEFINE_PROP_END_OF_LIST(),
2062 };
2063
sm501_reset_sysbus(DeviceState * dev)2064 static void sm501_reset_sysbus(DeviceState *dev)
2065 {
2066 SM501SysBusState *s = SYSBUS_SM501(dev);
2067 sm501_reset(&s->state);
2068 }
2069
2070 static const VMStateDescription vmstate_sm501_sysbus = {
2071 .name = TYPE_SYSBUS_SM501,
2072 .version_id = 2,
2073 .minimum_version_id = 2,
2074 .fields = (const VMStateField[]) {
2075 VMSTATE_STRUCT(state, SM501SysBusState, 1,
2076 vmstate_sm501_state, SM501State),
2077 VMSTATE_END_OF_LIST()
2078 }
2079 };
2080
sm501_sysbus_class_init(ObjectClass * klass,void * data)2081 static void sm501_sysbus_class_init(ObjectClass *klass, void *data)
2082 {
2083 DeviceClass *dc = DEVICE_CLASS(klass);
2084
2085 dc->realize = sm501_realize_sysbus;
2086 set_bit(DEVICE_CATEGORY_DISPLAY, dc->categories);
2087 dc->desc = "SM501 Multimedia Companion";
2088 device_class_set_props(dc, sm501_sysbus_properties);
2089 dc->reset = sm501_reset_sysbus;
2090 dc->vmsd = &vmstate_sm501_sysbus;
2091 }
2092
sm501_sysbus_init(Object * o)2093 static void sm501_sysbus_init(Object *o)
2094 {
2095 SM501SysBusState *sm501 = SYSBUS_SM501(o);
2096 OHCISysBusState *ohci = &sm501->ohci;
2097 SerialMM *smm = &sm501->serial;
2098
2099 object_initialize_child(o, "ohci", ohci, TYPE_SYSBUS_OHCI);
2100 object_property_add_alias(o, "dma-offset", OBJECT(ohci), "dma-offset");
2101 qdev_prop_set_uint32(DEVICE(ohci), "num-ports", 2);
2102
2103 object_initialize_child(o, "serial", smm, TYPE_SERIAL_MM);
2104 qdev_set_legacy_instance_id(DEVICE(smm), SM501_UART0, 2);
2105 qdev_prop_set_uint8(DEVICE(smm), "regshift", 2);
2106 qdev_prop_set_uint8(DEVICE(smm), "endianness", DEVICE_LITTLE_ENDIAN);
2107
2108 object_property_add_alias(o, "chardev", OBJECT(smm), "chardev");
2109 }
2110
2111 static const TypeInfo sm501_sysbus_info = {
2112 .name = TYPE_SYSBUS_SM501,
2113 .parent = TYPE_SYS_BUS_DEVICE,
2114 .instance_size = sizeof(SM501SysBusState),
2115 .class_init = sm501_sysbus_class_init,
2116 .instance_init = sm501_sysbus_init,
2117 };
2118
2119 #define TYPE_PCI_SM501 "sm501"
2120 OBJECT_DECLARE_SIMPLE_TYPE(SM501PCIState, PCI_SM501)
2121
2122 struct SM501PCIState {
2123 /*< private >*/
2124 PCIDevice parent_obj;
2125 /*< public >*/
2126 SM501State state;
2127 uint32_t vram_size;
2128 };
2129
sm501_realize_pci(PCIDevice * dev,Error ** errp)2130 static void sm501_realize_pci(PCIDevice *dev, Error **errp)
2131 {
2132 SM501PCIState *s = PCI_SM501(dev);
2133
2134 sm501_init(&s->state, DEVICE(dev), s->vram_size);
2135 if (get_local_mem_size(&s->state) != s->vram_size) {
2136 error_setg(errp, "Invalid VRAM size, nearest valid size is %" PRIu32,
2137 get_local_mem_size(&s->state));
2138 return;
2139 }
2140 pci_register_bar(dev, 0, PCI_BASE_ADDRESS_SPACE_MEMORY,
2141 &s->state.local_mem_region);
2142 pci_register_bar(dev, 1, PCI_BASE_ADDRESS_SPACE_MEMORY,
2143 &s->state.mmio_region);
2144 }
2145
2146 static Property sm501_pci_properties[] = {
2147 DEFINE_PROP_UINT32("vram-size", SM501PCIState, vram_size, 64 * MiB),
2148 DEFINE_PROP_UINT8("x-pixman", SM501PCIState, state.use_pixman, DEFAULT_X_PIXMAN),
2149 DEFINE_PROP_END_OF_LIST(),
2150 };
2151
sm501_reset_pci(DeviceState * dev)2152 static void sm501_reset_pci(DeviceState *dev)
2153 {
2154 SM501PCIState *s = PCI_SM501(dev);
2155 sm501_reset(&s->state);
2156 /* Bits 2:0 of misc_control register is 001 for PCI */
2157 s->state.misc_control |= 1;
2158 }
2159
2160 static const VMStateDescription vmstate_sm501_pci = {
2161 .name = TYPE_PCI_SM501,
2162 .version_id = 2,
2163 .minimum_version_id = 2,
2164 .fields = (const VMStateField[]) {
2165 VMSTATE_PCI_DEVICE(parent_obj, SM501PCIState),
2166 VMSTATE_STRUCT(state, SM501PCIState, 1,
2167 vmstate_sm501_state, SM501State),
2168 VMSTATE_END_OF_LIST()
2169 }
2170 };
2171
sm501_pci_class_init(ObjectClass * klass,void * data)2172 static void sm501_pci_class_init(ObjectClass *klass, void *data)
2173 {
2174 DeviceClass *dc = DEVICE_CLASS(klass);
2175 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
2176
2177 k->realize = sm501_realize_pci;
2178 k->vendor_id = PCI_VENDOR_ID_SILICON_MOTION;
2179 k->device_id = PCI_DEVICE_ID_SM501;
2180 k->class_id = PCI_CLASS_DISPLAY_OTHER;
2181 set_bit(DEVICE_CATEGORY_DISPLAY, dc->categories);
2182 dc->desc = "SM501 Display Controller";
2183 device_class_set_props(dc, sm501_pci_properties);
2184 dc->reset = sm501_reset_pci;
2185 dc->hotpluggable = false;
2186 dc->vmsd = &vmstate_sm501_pci;
2187 }
2188
sm501_pci_init(Object * o)2189 static void sm501_pci_init(Object *o)
2190 {
2191 object_property_set_description(o, "x-pixman", "Use pixman for: "
2192 "1: fill, 2: blit, 4: overlap blit");
2193 }
2194
2195 static const TypeInfo sm501_pci_info = {
2196 .name = TYPE_PCI_SM501,
2197 .parent = TYPE_PCI_DEVICE,
2198 .instance_size = sizeof(SM501PCIState),
2199 .class_init = sm501_pci_class_init,
2200 .instance_init = sm501_pci_init,
2201 .interfaces = (InterfaceInfo[]) {
2202 { INTERFACE_CONVENTIONAL_PCI_DEVICE },
2203 { },
2204 },
2205 };
2206
sm501_register_types(void)2207 static void sm501_register_types(void)
2208 {
2209 type_register_static(&sm501_sysbus_info);
2210 type_register_static(&sm501_pci_info);
2211 }
2212
2213 type_init(sm501_register_types)
2214