xref: /qemu/hw/display/ati.c (revision b49f4755)
1 /*
2  * QEMU ATI SVGA emulation
3  *
4  * Copyright (c) 2019 BALATON Zoltan
5  *
6  * This work is licensed under the GNU GPL license version 2 or later.
7  */
8 
9 /*
10  * WARNING:
11  * This is very incomplete and only enough for Linux console and some
12  * unaccelerated X output at the moment.
13  * Currently it's little more than a frame buffer with minimal functions,
14  * other more advanced features of the hardware are yet to be implemented.
15  * We only aim for Rage 128 Pro (and some RV100) and 2D only at first,
16  * No 3D at all yet (maybe after 2D works, but feel free to improve it)
17  */
18 
19 #include "qemu/osdep.h"
20 #include "ati_int.h"
21 #include "ati_regs.h"
22 #include "vga-access.h"
23 #include "hw/qdev-properties.h"
24 #include "vga_regs.h"
25 #include "qemu/log.h"
26 #include "qemu/module.h"
27 #include "qemu/error-report.h"
28 #include "qapi/error.h"
29 #include "ui/console.h"
30 #include "hw/display/i2c-ddc.h"
31 #include "trace.h"
32 
33 #define ATI_DEBUG_HW_CURSOR 0
34 
35 #ifdef CONFIG_PIXMAN
36 #define DEFAULT_X_PIXMAN 3
37 #else
38 #define DEFAULT_X_PIXMAN 0
39 #endif
40 
41 static const struct {
42     const char *name;
43     uint16_t dev_id;
44 } ati_model_aliases[] = {
45     { "rage128p", PCI_DEVICE_ID_ATI_RAGE128_PF },
46     { "rv100", PCI_DEVICE_ID_ATI_RADEON_QY },
47 };
48 
49 enum { VGA_MODE, EXT_MODE };
50 
51 static void ati_vga_switch_mode(ATIVGAState *s)
52 {
53     DPRINTF("%d -> %d\n",
54             s->mode, !!(s->regs.crtc_gen_cntl & CRTC2_EXT_DISP_EN));
55     if (s->regs.crtc_gen_cntl & CRTC2_EXT_DISP_EN) {
56         /* Extended mode enabled */
57         s->mode = EXT_MODE;
58         if (s->regs.crtc_gen_cntl & CRTC2_EN) {
59             /* CRT controller enabled, use CRTC values */
60             /* FIXME Should these be the same as VGA CRTC regs? */
61             uint32_t offs = s->regs.crtc_offset & 0x07ffffff;
62             int stride = (s->regs.crtc_pitch & 0x7ff) * 8;
63             int bpp = 0;
64             int h, v;
65 
66             if (s->regs.crtc_h_total_disp == 0) {
67                 s->regs.crtc_h_total_disp = ((640 / 8) - 1) << 16;
68             }
69             if (s->regs.crtc_v_total_disp == 0) {
70                 s->regs.crtc_v_total_disp = (480 - 1) << 16;
71             }
72             h = ((s->regs.crtc_h_total_disp >> 16) + 1) * 8;
73             v = (s->regs.crtc_v_total_disp >> 16) + 1;
74             switch (s->regs.crtc_gen_cntl & CRTC_PIX_WIDTH_MASK) {
75             case CRTC_PIX_WIDTH_4BPP:
76                 bpp = 4;
77                 break;
78             case CRTC_PIX_WIDTH_8BPP:
79                 bpp = 8;
80                 break;
81             case CRTC_PIX_WIDTH_15BPP:
82                 bpp = 15;
83                 break;
84             case CRTC_PIX_WIDTH_16BPP:
85                 bpp = 16;
86                 break;
87             case CRTC_PIX_WIDTH_24BPP:
88                 bpp = 24;
89                 break;
90             case CRTC_PIX_WIDTH_32BPP:
91                 bpp = 32;
92                 break;
93             default:
94                 qemu_log_mask(LOG_UNIMP, "Unsupported bpp value\n");
95                 return;
96             }
97             DPRINTF("Switching to %dx%d %d %d @ %x\n", h, v, stride, bpp, offs);
98             vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
99             vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_DISABLED);
100             s->vga.big_endian_fb = (s->regs.config_cntl & APER_0_ENDIAN ||
101                                     s->regs.config_cntl & APER_1_ENDIAN ?
102                                     true : false);
103             /* reset VBE regs then set up mode */
104             s->vga.vbe_regs[VBE_DISPI_INDEX_XRES] = h;
105             s->vga.vbe_regs[VBE_DISPI_INDEX_YRES] = v;
106             s->vga.vbe_regs[VBE_DISPI_INDEX_BPP] = bpp;
107             /* enable mode via ioport so it updates vga regs */
108             vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
109             vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_ENABLED |
110                 VBE_DISPI_LFB_ENABLED | VBE_DISPI_NOCLEARMEM |
111                 (s->regs.dac_cntl & DAC_8BIT_EN ? VBE_DISPI_8BIT_DAC : 0));
112             /* now set offset and stride after enable as that resets these */
113             if (stride) {
114                 int bypp = DIV_ROUND_UP(bpp, BITS_PER_BYTE);
115 
116                 vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_VIRT_WIDTH);
117                 vbe_ioport_write_data(&s->vga, 0, stride);
118                 stride *= bypp;
119                 if (offs % stride) {
120                     DPRINTF("CRTC offset is not multiple of pitch\n");
121                     vbe_ioport_write_index(&s->vga, 0,
122                                            VBE_DISPI_INDEX_X_OFFSET);
123                     vbe_ioport_write_data(&s->vga, 0, offs % stride / bypp);
124                 }
125                 vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_Y_OFFSET);
126                 vbe_ioport_write_data(&s->vga, 0, offs / stride);
127                 DPRINTF("VBE offset (%d,%d), vbe_start_addr=%x\n",
128                         s->vga.vbe_regs[VBE_DISPI_INDEX_X_OFFSET],
129                         s->vga.vbe_regs[VBE_DISPI_INDEX_Y_OFFSET],
130                         s->vga.vbe_start_addr);
131             }
132         }
133     } else {
134         /* VGA mode enabled */
135         s->mode = VGA_MODE;
136         vbe_ioport_write_index(&s->vga, 0, VBE_DISPI_INDEX_ENABLE);
137         vbe_ioport_write_data(&s->vga, 0, VBE_DISPI_DISABLED);
138     }
139 }
140 
141 /* Used by host side hardware cursor */
142 static void ati_cursor_define(ATIVGAState *s)
143 {
144     uint8_t data[1024];
145     uint32_t srcoff;
146     int i, j, idx = 0;
147 
148     if ((s->regs.cur_offset & BIT(31)) || s->cursor_guest_mode) {
149         return; /* Do not update cursor if locked or rendered by guest */
150     }
151     /* FIXME handle cur_hv_offs correctly */
152     srcoff = s->regs.cur_offset -
153         (s->regs.cur_hv_offs >> 16) - (s->regs.cur_hv_offs & 0xffff) * 16;
154     for (i = 0; i < 64; i++) {
155         for (j = 0; j < 8; j++, idx++) {
156             data[idx] = vga_read_byte(&s->vga, srcoff + i * 16 + j);
157             data[512 + idx] = vga_read_byte(&s->vga, srcoff + i * 16 + j + 8);
158         }
159     }
160     if (!s->cursor) {
161         s->cursor = cursor_alloc(64, 64);
162     }
163     cursor_set_mono(s->cursor, s->regs.cur_color1, s->regs.cur_color0,
164                     &data[512], 1, &data[0]);
165     dpy_cursor_define(s->vga.con, s->cursor);
166 }
167 
168 /* Alternatively support guest rendered hardware cursor */
169 static void ati_cursor_invalidate(VGACommonState *vga)
170 {
171     ATIVGAState *s = container_of(vga, ATIVGAState, vga);
172     int size = (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) ? 64 : 0;
173 
174     if (s->regs.cur_offset & BIT(31)) {
175         return; /* Do not update cursor if locked */
176     }
177     if (s->cursor_size != size ||
178         vga->hw_cursor_x != s->regs.cur_hv_pos >> 16 ||
179         vga->hw_cursor_y != (s->regs.cur_hv_pos & 0xffff) ||
180         s->cursor_offset != s->regs.cur_offset - (s->regs.cur_hv_offs >> 16) -
181         (s->regs.cur_hv_offs & 0xffff) * 16) {
182         /* Remove old cursor then update and show new one if needed */
183         vga_invalidate_scanlines(vga, vga->hw_cursor_y, vga->hw_cursor_y + 63);
184         vga->hw_cursor_x = s->regs.cur_hv_pos >> 16;
185         vga->hw_cursor_y = s->regs.cur_hv_pos & 0xffff;
186         s->cursor_offset = s->regs.cur_offset - (s->regs.cur_hv_offs >> 16) -
187                            (s->regs.cur_hv_offs & 0xffff) * 16;
188         s->cursor_size = size;
189         if (size) {
190             vga_invalidate_scanlines(vga,
191                                      vga->hw_cursor_y, vga->hw_cursor_y + 63);
192         }
193     }
194 }
195 
196 static void ati_cursor_draw_line(VGACommonState *vga, uint8_t *d, int scr_y)
197 {
198     ATIVGAState *s = container_of(vga, ATIVGAState, vga);
199     uint32_t srcoff;
200     uint32_t *dp = (uint32_t *)d;
201     int i, j, h;
202 
203     if (!(s->regs.crtc_gen_cntl & CRTC2_CUR_EN) ||
204         scr_y < vga->hw_cursor_y || scr_y >= vga->hw_cursor_y + 64 ||
205         scr_y > s->regs.crtc_v_total_disp >> 16) {
206         return;
207     }
208     /* FIXME handle cur_hv_offs correctly */
209     srcoff = s->cursor_offset + (scr_y - vga->hw_cursor_y) * 16;
210     dp = &dp[vga->hw_cursor_x];
211     h = ((s->regs.crtc_h_total_disp >> 16) + 1) * 8;
212     for (i = 0; i < 8; i++) {
213         uint32_t color;
214         uint8_t abits = vga_read_byte(vga, srcoff + i);
215         uint8_t xbits = vga_read_byte(vga, srcoff + i + 8);
216         for (j = 0; j < 8; j++, abits <<= 1, xbits <<= 1) {
217             if (abits & BIT(7)) {
218                 if (xbits & BIT(7)) {
219                     color = dp[i * 8 + j] ^ 0xffffffff; /* complement */
220                 } else {
221                     continue; /* transparent, no change */
222                 }
223             } else {
224                 color = (xbits & BIT(7) ? s->regs.cur_color1 :
225                                           s->regs.cur_color0) | 0xff000000;
226             }
227             if (vga->hw_cursor_x + i * 8 + j >= h) {
228                 return; /* end of screen, don't span to next line */
229             }
230             dp[i * 8 + j] = color;
231         }
232     }
233 }
234 
235 static uint64_t ati_i2c(bitbang_i2c_interface *i2c, uint64_t data, int base)
236 {
237     bool c = (data & BIT(base + 17) ? !!(data & BIT(base + 1)) : 1);
238     bool d = (data & BIT(base + 16) ? !!(data & BIT(base)) : 1);
239 
240     bitbang_i2c_set(i2c, BITBANG_I2C_SCL, c);
241     d = bitbang_i2c_set(i2c, BITBANG_I2C_SDA, d);
242 
243     data &= ~0xf00ULL;
244     if (c) {
245         data |= BIT(base + 9);
246     }
247     if (d) {
248         data |= BIT(base + 8);
249     }
250     return data;
251 }
252 
253 static void ati_vga_update_irq(ATIVGAState *s)
254 {
255     pci_set_irq(&s->dev, !!(s->regs.gen_int_status & s->regs.gen_int_cntl));
256 }
257 
258 static void ati_vga_vblank_irq(void *opaque)
259 {
260     ATIVGAState *s = opaque;
261 
262     timer_mod(&s->vblank_timer, qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) +
263               NANOSECONDS_PER_SECOND / 60);
264     s->regs.gen_int_status |= CRTC_VBLANK_INT;
265     ati_vga_update_irq(s);
266 }
267 
268 static inline uint64_t ati_reg_read_offs(uint32_t reg, int offs,
269                                          unsigned int size)
270 {
271     if (offs == 0 && size == 4) {
272         return reg;
273     } else {
274         return extract32(reg, offs * BITS_PER_BYTE, size * BITS_PER_BYTE);
275     }
276 }
277 
278 static uint64_t ati_mm_read(void *opaque, hwaddr addr, unsigned int size)
279 {
280     ATIVGAState *s = opaque;
281     uint64_t val = 0;
282 
283     switch (addr) {
284     case MM_INDEX:
285         val = s->regs.mm_index;
286         break;
287     case MM_DATA ... MM_DATA + 3:
288         /* indexed access to regs or memory */
289         if (s->regs.mm_index & BIT(31)) {
290             uint32_t idx = s->regs.mm_index & ~BIT(31);
291             if (idx <= s->vga.vram_size - size) {
292                 val = ldn_le_p(s->vga.vram_ptr + idx, size);
293             }
294         } else if (s->regs.mm_index > MM_DATA + 3) {
295             val = ati_mm_read(s, s->regs.mm_index + addr - MM_DATA, size);
296         } else {
297             qemu_log_mask(LOG_GUEST_ERROR,
298                 "ati_mm_read: mm_index too small: %u\n", s->regs.mm_index);
299         }
300         break;
301     case BIOS_0_SCRATCH ... BUS_CNTL - 1:
302     {
303         int i = (addr - BIOS_0_SCRATCH) / 4;
304         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF && i > 3) {
305             break;
306         }
307         val = ati_reg_read_offs(s->regs.bios_scratch[i],
308                                 addr - (BIOS_0_SCRATCH + i * 4), size);
309         break;
310     }
311     case GEN_INT_CNTL:
312         val = s->regs.gen_int_cntl;
313         break;
314     case GEN_INT_STATUS:
315         val = s->regs.gen_int_status;
316         break;
317     case CRTC_GEN_CNTL ... CRTC_GEN_CNTL + 3:
318         val = ati_reg_read_offs(s->regs.crtc_gen_cntl,
319                                 addr - CRTC_GEN_CNTL, size);
320         break;
321     case CRTC_EXT_CNTL ... CRTC_EXT_CNTL + 3:
322         val = ati_reg_read_offs(s->regs.crtc_ext_cntl,
323                                 addr - CRTC_EXT_CNTL, size);
324         break;
325     case DAC_CNTL:
326         val = s->regs.dac_cntl;
327         break;
328     case GPIO_VGA_DDC ... GPIO_VGA_DDC + 3:
329         val = ati_reg_read_offs(s->regs.gpio_vga_ddc,
330                                 addr - GPIO_VGA_DDC, size);
331         break;
332     case GPIO_DVI_DDC ... GPIO_DVI_DDC + 3:
333         val = ati_reg_read_offs(s->regs.gpio_dvi_ddc,
334                                 addr - GPIO_DVI_DDC, size);
335         break;
336     case GPIO_MONID ... GPIO_MONID + 3:
337         val = ati_reg_read_offs(s->regs.gpio_monid,
338                                 addr - GPIO_MONID, size);
339         break;
340     case PALETTE_INDEX:
341         /* FIXME unaligned access */
342         val = vga_ioport_read(&s->vga, VGA_PEL_IR) << 16;
343         val |= vga_ioport_read(&s->vga, VGA_PEL_IW) & 0xff;
344         break;
345     case PALETTE_DATA:
346         val = vga_ioport_read(&s->vga, VGA_PEL_D);
347         break;
348     case PALETTE_30_DATA:
349         val = s->regs.palette[vga_ioport_read(&s->vga, VGA_PEL_IR)];
350         break;
351     case CNFG_CNTL:
352         val = s->regs.config_cntl;
353         break;
354     case CNFG_MEMSIZE:
355         val = s->vga.vram_size;
356         break;
357     case CONFIG_APER_0_BASE:
358     case CONFIG_APER_1_BASE:
359         val = pci_default_read_config(&s->dev,
360                                       PCI_BASE_ADDRESS_0, size) & 0xfffffff0;
361         break;
362     case CONFIG_APER_SIZE:
363         val = s->vga.vram_size / 2;
364         break;
365     case CONFIG_REG_1_BASE:
366         val = pci_default_read_config(&s->dev,
367                                       PCI_BASE_ADDRESS_2, size) & 0xfffffff0;
368         break;
369     case CONFIG_REG_APER_SIZE:
370         val = memory_region_size(&s->mm) / 2;
371         break;
372     case HOST_PATH_CNTL:
373         val = BIT(23); /* Radeon HDP_APER_CNTL */
374         break;
375     case MC_STATUS:
376         val = 5;
377         break;
378     case MEM_SDRAM_MODE_REG:
379         if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
380             val = BIT(28) | BIT(20);
381         }
382         break;
383     case RBBM_STATUS:
384     case GUI_STAT:
385         val = 64; /* free CMDFIFO entries */
386         break;
387     case CRTC_H_TOTAL_DISP:
388         val = s->regs.crtc_h_total_disp;
389         break;
390     case CRTC_H_SYNC_STRT_WID:
391         val = s->regs.crtc_h_sync_strt_wid;
392         break;
393     case CRTC_V_TOTAL_DISP:
394         val = s->regs.crtc_v_total_disp;
395         break;
396     case CRTC_V_SYNC_STRT_WID:
397         val = s->regs.crtc_v_sync_strt_wid;
398         break;
399     case CRTC_OFFSET:
400         val = s->regs.crtc_offset;
401         break;
402     case CRTC_OFFSET_CNTL:
403         val = s->regs.crtc_offset_cntl;
404         break;
405     case CRTC_PITCH:
406         val = s->regs.crtc_pitch;
407         break;
408     case 0xf00 ... 0xfff:
409         val = pci_default_read_config(&s->dev, addr - 0xf00, size);
410         break;
411     case CUR_OFFSET ... CUR_OFFSET + 3:
412         val = ati_reg_read_offs(s->regs.cur_offset, addr - CUR_OFFSET, size);
413         break;
414     case CUR_HORZ_VERT_POSN ... CUR_HORZ_VERT_POSN + 3:
415         val = ati_reg_read_offs(s->regs.cur_hv_pos,
416                                 addr - CUR_HORZ_VERT_POSN, size);
417         if (addr + size > CUR_HORZ_VERT_POSN + 3) {
418             val |= (s->regs.cur_offset & BIT(31)) >> (4 - size);
419         }
420         break;
421     case CUR_HORZ_VERT_OFF ... CUR_HORZ_VERT_OFF + 3:
422         val = ati_reg_read_offs(s->regs.cur_hv_offs,
423                                 addr - CUR_HORZ_VERT_OFF, size);
424         if (addr + size > CUR_HORZ_VERT_OFF + 3) {
425             val |= (s->regs.cur_offset & BIT(31)) >> (4 - size);
426         }
427         break;
428     case CUR_CLR0 ... CUR_CLR0 + 3:
429         val = ati_reg_read_offs(s->regs.cur_color0, addr - CUR_CLR0, size);
430         break;
431     case CUR_CLR1 ... CUR_CLR1 + 3:
432         val = ati_reg_read_offs(s->regs.cur_color1, addr - CUR_CLR1, size);
433         break;
434     case DST_OFFSET:
435         val = s->regs.dst_offset;
436         break;
437     case DST_PITCH:
438         val = s->regs.dst_pitch;
439         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
440             val &= s->regs.dst_tile << 16;
441         }
442         break;
443     case DST_WIDTH:
444         val = s->regs.dst_width;
445         break;
446     case DST_HEIGHT:
447         val = s->regs.dst_height;
448         break;
449     case SRC_X:
450         val = s->regs.src_x;
451         break;
452     case SRC_Y:
453         val = s->regs.src_y;
454         break;
455     case DST_X:
456         val = s->regs.dst_x;
457         break;
458     case DST_Y:
459         val = s->regs.dst_y;
460         break;
461     case DP_GUI_MASTER_CNTL:
462         val = s->regs.dp_gui_master_cntl;
463         break;
464     case SRC_OFFSET:
465         val = s->regs.src_offset;
466         break;
467     case SRC_PITCH:
468         val = s->regs.src_pitch;
469         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
470             val &= s->regs.src_tile << 16;
471         }
472         break;
473     case DP_BRUSH_BKGD_CLR:
474         val = s->regs.dp_brush_bkgd_clr;
475         break;
476     case DP_BRUSH_FRGD_CLR:
477         val = s->regs.dp_brush_frgd_clr;
478         break;
479     case DP_SRC_FRGD_CLR:
480         val = s->regs.dp_src_frgd_clr;
481         break;
482     case DP_SRC_BKGD_CLR:
483         val = s->regs.dp_src_bkgd_clr;
484         break;
485     case DP_CNTL:
486         val = s->regs.dp_cntl;
487         break;
488     case DP_DATATYPE:
489         val = s->regs.dp_datatype;
490         break;
491     case DP_MIX:
492         val = s->regs.dp_mix;
493         break;
494     case DP_WRITE_MASK:
495         val = s->regs.dp_write_mask;
496         break;
497     case DEFAULT_OFFSET:
498         val = s->regs.default_offset;
499         if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
500             val >>= 10;
501             val |= s->regs.default_pitch << 16;
502             val |= s->regs.default_tile << 30;
503         }
504         break;
505     case DEFAULT_PITCH:
506         val = s->regs.default_pitch;
507         val |= s->regs.default_tile << 16;
508         break;
509     case DEFAULT_SC_BOTTOM_RIGHT:
510         val = s->regs.default_sc_bottom_right;
511         break;
512     default:
513         break;
514     }
515     if (addr < CUR_OFFSET || addr > CUR_CLR1 || ATI_DEBUG_HW_CURSOR) {
516         trace_ati_mm_read(size, addr, ati_reg_name(addr & ~3ULL), val);
517     }
518     return val;
519 }
520 
521 static inline void ati_reg_write_offs(uint32_t *reg, int offs,
522                                       uint64_t data, unsigned int size)
523 {
524     if (offs == 0 && size == 4) {
525         *reg = data;
526     } else {
527         *reg = deposit32(*reg, offs * BITS_PER_BYTE, size * BITS_PER_BYTE,
528                          data);
529     }
530 }
531 
532 static void ati_mm_write(void *opaque, hwaddr addr,
533                            uint64_t data, unsigned int size)
534 {
535     ATIVGAState *s = opaque;
536 
537     if (addr < CUR_OFFSET || addr > CUR_CLR1 || ATI_DEBUG_HW_CURSOR) {
538         trace_ati_mm_write(size, addr, ati_reg_name(addr & ~3ULL), data);
539     }
540     switch (addr) {
541     case MM_INDEX:
542         s->regs.mm_index = data & ~3;
543         break;
544     case MM_DATA ... MM_DATA + 3:
545         /* indexed access to regs or memory */
546         if (s->regs.mm_index & BIT(31)) {
547             uint32_t idx = s->regs.mm_index & ~BIT(31);
548             if (idx <= s->vga.vram_size - size) {
549                 stn_le_p(s->vga.vram_ptr + idx, size, data);
550             }
551         } else if (s->regs.mm_index > MM_DATA + 3) {
552             ati_mm_write(s, s->regs.mm_index + addr - MM_DATA, data, size);
553         } else {
554             qemu_log_mask(LOG_GUEST_ERROR,
555                 "ati_mm_write: mm_index too small: %u\n", s->regs.mm_index);
556         }
557         break;
558     case BIOS_0_SCRATCH ... BUS_CNTL - 1:
559     {
560         int i = (addr - BIOS_0_SCRATCH) / 4;
561         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF && i > 3) {
562             break;
563         }
564         ati_reg_write_offs(&s->regs.bios_scratch[i],
565                            addr - (BIOS_0_SCRATCH + i * 4), data, size);
566         break;
567     }
568     case GEN_INT_CNTL:
569         s->regs.gen_int_cntl = data;
570         if (data & CRTC_VBLANK_INT) {
571             ati_vga_vblank_irq(s);
572         } else {
573             timer_del(&s->vblank_timer);
574             ati_vga_update_irq(s);
575         }
576         break;
577     case GEN_INT_STATUS:
578         data &= (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF ?
579                  0x000f040fUL : 0xfc080effUL);
580         s->regs.gen_int_status &= ~data;
581         ati_vga_update_irq(s);
582         break;
583     case CRTC_GEN_CNTL ... CRTC_GEN_CNTL + 3:
584     {
585         uint32_t val = s->regs.crtc_gen_cntl;
586         ati_reg_write_offs(&s->regs.crtc_gen_cntl,
587                            addr - CRTC_GEN_CNTL, data, size);
588         if ((val & CRTC2_CUR_EN) != (s->regs.crtc_gen_cntl & CRTC2_CUR_EN)) {
589             if (s->cursor_guest_mode) {
590                 s->vga.force_shadow = !!(s->regs.crtc_gen_cntl & CRTC2_CUR_EN);
591             } else {
592                 if (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) {
593                     ati_cursor_define(s);
594                 }
595                 dpy_mouse_set(s->vga.con, s->regs.cur_hv_pos >> 16,
596                               s->regs.cur_hv_pos & 0xffff,
597                               (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) != 0);
598             }
599         }
600         if ((val & (CRTC2_EXT_DISP_EN | CRTC2_EN)) !=
601             (s->regs.crtc_gen_cntl & (CRTC2_EXT_DISP_EN | CRTC2_EN))) {
602             ati_vga_switch_mode(s);
603         }
604         break;
605     }
606     case CRTC_EXT_CNTL ... CRTC_EXT_CNTL + 3:
607     {
608         uint32_t val = s->regs.crtc_ext_cntl;
609         ati_reg_write_offs(&s->regs.crtc_ext_cntl,
610                            addr - CRTC_EXT_CNTL, data, size);
611         if (s->regs.crtc_ext_cntl & CRT_CRTC_DISPLAY_DIS) {
612             DPRINTF("Display disabled\n");
613             s->vga.ar_index &= ~BIT(5);
614         } else {
615             DPRINTF("Display enabled\n");
616             s->vga.ar_index |= BIT(5);
617             ati_vga_switch_mode(s);
618         }
619         if ((val & CRT_CRTC_DISPLAY_DIS) !=
620             (s->regs.crtc_ext_cntl & CRT_CRTC_DISPLAY_DIS)) {
621             ati_vga_switch_mode(s);
622         }
623         break;
624     }
625     case DAC_CNTL:
626         s->regs.dac_cntl = data & 0xffffe3ff;
627         s->vga.dac_8bit = !!(data & DAC_8BIT_EN);
628         break;
629     /*
630      * GPIO regs for DDC access. Because some drivers access these via
631      * multiple byte writes we have to be careful when we send bits to
632      * avoid spurious changes in bitbang_i2c state. Only do it when either
633      * the enable bits are changed or output bits changed while enabled.
634      */
635     case GPIO_VGA_DDC ... GPIO_VGA_DDC + 3:
636         if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
637             /* FIXME: Maybe add a property to select VGA or DVI port? */
638         }
639         break;
640     case GPIO_DVI_DDC ... GPIO_DVI_DDC + 3:
641         if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF) {
642             ati_reg_write_offs(&s->regs.gpio_dvi_ddc,
643                                addr - GPIO_DVI_DDC, data, size);
644             if ((addr <= GPIO_DVI_DDC + 2 && addr + size > GPIO_DVI_DDC + 2) ||
645                 (addr == GPIO_DVI_DDC && (s->regs.gpio_dvi_ddc & 0x30000))) {
646                 s->regs.gpio_dvi_ddc = ati_i2c(&s->bbi2c,
647                                                s->regs.gpio_dvi_ddc, 0);
648             }
649         }
650         break;
651     case GPIO_MONID ... GPIO_MONID + 3:
652         /* FIXME What does Radeon have here? */
653         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
654             /* Rage128p accesses DDC via MONID(1-2) with additional mask bit */
655             ati_reg_write_offs(&s->regs.gpio_monid,
656                                addr - GPIO_MONID, data, size);
657             if ((s->regs.gpio_monid & BIT(25)) &&
658                 ((addr <= GPIO_MONID + 2 && addr + size > GPIO_MONID + 2) ||
659                  (addr == GPIO_MONID && (s->regs.gpio_monid & 0x60000)))) {
660                 s->regs.gpio_monid = ati_i2c(&s->bbi2c, s->regs.gpio_monid, 1);
661             }
662         }
663         break;
664     case PALETTE_INDEX ... PALETTE_INDEX + 3:
665         if (size == 4) {
666             vga_ioport_write(&s->vga, VGA_PEL_IR, (data >> 16) & 0xff);
667             vga_ioport_write(&s->vga, VGA_PEL_IW, data & 0xff);
668         } else {
669             if (addr == PALETTE_INDEX) {
670                 vga_ioport_write(&s->vga, VGA_PEL_IW, data & 0xff);
671             } else {
672                 vga_ioport_write(&s->vga, VGA_PEL_IR, data & 0xff);
673             }
674         }
675         break;
676     case PALETTE_DATA ... PALETTE_DATA + 3:
677         data <<= addr - PALETTE_DATA;
678         data = bswap32(data) >> 8;
679         vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
680         data >>= 8;
681         vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
682         data >>= 8;
683         vga_ioport_write(&s->vga, VGA_PEL_D, data & 0xff);
684         break;
685     case PALETTE_30_DATA:
686         s->regs.palette[vga_ioport_read(&s->vga, VGA_PEL_IW)] = data;
687         vga_ioport_write(&s->vga, VGA_PEL_D, (data >> 22) & 0xff);
688         vga_ioport_write(&s->vga, VGA_PEL_D, (data >> 12) & 0xff);
689         vga_ioport_write(&s->vga, VGA_PEL_D, (data >> 2) & 0xff);
690         break;
691     case CNFG_CNTL:
692         s->regs.config_cntl = data;
693         break;
694     case CRTC_H_TOTAL_DISP:
695         s->regs.crtc_h_total_disp = data & 0x07ff07ff;
696         break;
697     case CRTC_H_SYNC_STRT_WID:
698         s->regs.crtc_h_sync_strt_wid = data & 0x17bf1fff;
699         break;
700     case CRTC_V_TOTAL_DISP:
701         s->regs.crtc_v_total_disp = data & 0x0fff0fff;
702         break;
703     case CRTC_V_SYNC_STRT_WID:
704         s->regs.crtc_v_sync_strt_wid = data & 0x9f0fff;
705         break;
706     case CRTC_OFFSET:
707         s->regs.crtc_offset = data & 0xc7ffffff;
708         break;
709     case CRTC_OFFSET_CNTL:
710         s->regs.crtc_offset_cntl = data; /* FIXME */
711         break;
712     case CRTC_PITCH:
713         s->regs.crtc_pitch = data & 0x07ff07ff;
714         break;
715     case 0xf00 ... 0xfff:
716         /* read-only copy of PCI config space so ignore writes */
717         break;
718     case CUR_OFFSET ... CUR_OFFSET + 3:
719     {
720         uint32_t t = s->regs.cur_offset;
721 
722         ati_reg_write_offs(&t, addr - CUR_OFFSET, data, size);
723         t &= 0x87fffff0;
724         if (s->regs.cur_offset != t) {
725             s->regs.cur_offset = t;
726             ati_cursor_define(s);
727         }
728         break;
729     }
730     case CUR_HORZ_VERT_POSN ... CUR_HORZ_VERT_POSN + 3:
731     {
732         uint32_t t = s->regs.cur_hv_pos | (s->regs.cur_offset & BIT(31));
733 
734         ati_reg_write_offs(&t, addr - CUR_HORZ_VERT_POSN, data, size);
735         s->regs.cur_hv_pos = t & 0x3fff0fff;
736         if (t & BIT(31)) {
737             s->regs.cur_offset |= t & BIT(31);
738         } else if (s->regs.cur_offset & BIT(31)) {
739             s->regs.cur_offset &= ~BIT(31);
740             ati_cursor_define(s);
741         }
742         if (!s->cursor_guest_mode &&
743             (s->regs.crtc_gen_cntl & CRTC2_CUR_EN) && !(t & BIT(31))) {
744             dpy_mouse_set(s->vga.con, s->regs.cur_hv_pos >> 16,
745                           s->regs.cur_hv_pos & 0xffff, 1);
746         }
747         break;
748     }
749     case CUR_HORZ_VERT_OFF:
750     {
751         uint32_t t = s->regs.cur_hv_offs | (s->regs.cur_offset & BIT(31));
752 
753         ati_reg_write_offs(&t, addr - CUR_HORZ_VERT_OFF, data, size);
754         s->regs.cur_hv_offs = t & 0x3f003f;
755         if (t & BIT(31)) {
756             s->regs.cur_offset |= t & BIT(31);
757         } else if (s->regs.cur_offset & BIT(31)) {
758             s->regs.cur_offset &= ~BIT(31);
759             ati_cursor_define(s);
760         }
761         break;
762     }
763     case CUR_CLR0 ... CUR_CLR0 + 3:
764     {
765         uint32_t t = s->regs.cur_color0;
766 
767         ati_reg_write_offs(&t, addr - CUR_CLR0, data, size);
768         t &= 0xffffff;
769         if (s->regs.cur_color0 != t) {
770             s->regs.cur_color0 = t;
771             ati_cursor_define(s);
772         }
773         break;
774     }
775     case CUR_CLR1 ... CUR_CLR1 + 3:
776         /*
777          * Update cursor unconditionally here because some clients set up
778          * other registers before actually writing cursor data to memory at
779          * offset so we would miss cursor change unless always updating here
780          */
781         ati_reg_write_offs(&s->regs.cur_color1, addr - CUR_CLR1, data, size);
782         s->regs.cur_color1 &= 0xffffff;
783         ati_cursor_define(s);
784         break;
785     case DST_OFFSET:
786         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
787             s->regs.dst_offset = data & 0xfffffff0;
788         } else {
789             s->regs.dst_offset = data & 0xfffffc00;
790         }
791         break;
792     case DST_PITCH:
793         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
794             s->regs.dst_pitch = data & 0x3fff;
795             s->regs.dst_tile = (data >> 16) & 1;
796         } else {
797             s->regs.dst_pitch = data & 0x3ff0;
798         }
799         break;
800     case DST_TILE:
801         if (s->dev_id == PCI_DEVICE_ID_ATI_RADEON_QY) {
802             s->regs.dst_tile = data & 3;
803         }
804         break;
805     case DST_WIDTH:
806         s->regs.dst_width = data & 0x3fff;
807         ati_2d_blt(s);
808         break;
809     case DST_HEIGHT:
810         s->regs.dst_height = data & 0x3fff;
811         break;
812     case SRC_X:
813         s->regs.src_x = data & 0x3fff;
814         break;
815     case SRC_Y:
816         s->regs.src_y = data & 0x3fff;
817         break;
818     case DST_X:
819         s->regs.dst_x = data & 0x3fff;
820         break;
821     case DST_Y:
822         s->regs.dst_y = data & 0x3fff;
823         break;
824     case SRC_PITCH_OFFSET:
825         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
826             s->regs.src_offset = (data & 0x1fffff) << 5;
827             s->regs.src_pitch = (data & 0x7fe00000) >> 21;
828             s->regs.src_tile = data >> 31;
829         } else {
830             s->regs.src_offset = (data & 0x3fffff) << 10;
831             s->regs.src_pitch = (data & 0x3fc00000) >> 16;
832             s->regs.src_tile = (data >> 30) & 1;
833         }
834         break;
835     case DST_PITCH_OFFSET:
836         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
837             s->regs.dst_offset = (data & 0x1fffff) << 5;
838             s->regs.dst_pitch = (data & 0x7fe00000) >> 21;
839             s->regs.dst_tile = data >> 31;
840         } else {
841             s->regs.dst_offset = (data & 0x3fffff) << 10;
842             s->regs.dst_pitch = (data & 0x3fc00000) >> 16;
843             s->regs.dst_tile = data >> 30;
844         }
845         break;
846     case SRC_Y_X:
847         s->regs.src_x = data & 0x3fff;
848         s->regs.src_y = (data >> 16) & 0x3fff;
849         break;
850     case DST_Y_X:
851         s->regs.dst_x = data & 0x3fff;
852         s->regs.dst_y = (data >> 16) & 0x3fff;
853         break;
854     case DST_HEIGHT_WIDTH:
855         s->regs.dst_width = data & 0x3fff;
856         s->regs.dst_height = (data >> 16) & 0x3fff;
857         ati_2d_blt(s);
858         break;
859     case DP_GUI_MASTER_CNTL:
860         s->regs.dp_gui_master_cntl = data & 0xf800000f;
861         s->regs.dp_datatype = (data & 0x0f00) >> 8 | (data & 0x30f0) << 4 |
862                               (data & 0x4000) << 16;
863         s->regs.dp_mix = (data & GMC_ROP3_MASK) | (data & 0x7000000) >> 16;
864         break;
865     case DST_WIDTH_X:
866         s->regs.dst_x = data & 0x3fff;
867         s->regs.dst_width = (data >> 16) & 0x3fff;
868         ati_2d_blt(s);
869         break;
870     case SRC_X_Y:
871         s->regs.src_y = data & 0x3fff;
872         s->regs.src_x = (data >> 16) & 0x3fff;
873         break;
874     case DST_X_Y:
875         s->regs.dst_y = data & 0x3fff;
876         s->regs.dst_x = (data >> 16) & 0x3fff;
877         break;
878     case DST_WIDTH_HEIGHT:
879         s->regs.dst_height = data & 0x3fff;
880         s->regs.dst_width = (data >> 16) & 0x3fff;
881         ati_2d_blt(s);
882         break;
883     case DST_HEIGHT_Y:
884         s->regs.dst_y = data & 0x3fff;
885         s->regs.dst_height = (data >> 16) & 0x3fff;
886         break;
887     case SRC_OFFSET:
888         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
889             s->regs.src_offset = data & 0xfffffff0;
890         } else {
891             s->regs.src_offset = data & 0xfffffc00;
892         }
893         break;
894     case SRC_PITCH:
895         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
896             s->regs.src_pitch = data & 0x3fff;
897             s->regs.src_tile = (data >> 16) & 1;
898         } else {
899             s->regs.src_pitch = data & 0x3ff0;
900         }
901         break;
902     case DP_BRUSH_BKGD_CLR:
903         s->regs.dp_brush_bkgd_clr = data;
904         break;
905     case DP_BRUSH_FRGD_CLR:
906         s->regs.dp_brush_frgd_clr = data;
907         break;
908     case DP_CNTL:
909         s->regs.dp_cntl = data;
910         break;
911     case DP_DATATYPE:
912         s->regs.dp_datatype = data & 0xe0070f0f;
913         break;
914     case DP_MIX:
915         s->regs.dp_mix = data & 0x00ff0700;
916         break;
917     case DP_WRITE_MASK:
918         s->regs.dp_write_mask = data;
919         break;
920     case DEFAULT_OFFSET:
921         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
922             s->regs.default_offset = data & 0xfffffff0;
923         } else {
924             /* Radeon has DEFAULT_PITCH_OFFSET here like DST_PITCH_OFFSET */
925             s->regs.default_offset = (data & 0x3fffff) << 10;
926             s->regs.default_pitch = (data & 0x3fc00000) >> 16;
927             s->regs.default_tile = data >> 30;
928         }
929         break;
930     case DEFAULT_PITCH:
931         if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
932             s->regs.default_pitch = data & 0x3fff;
933             s->regs.default_tile = (data >> 16) & 1;
934         }
935         break;
936     case DEFAULT_SC_BOTTOM_RIGHT:
937         s->regs.default_sc_bottom_right = data & 0x3fff3fff;
938         break;
939     default:
940         break;
941     }
942 }
943 
944 static const MemoryRegionOps ati_mm_ops = {
945     .read = ati_mm_read,
946     .write = ati_mm_write,
947     .endianness = DEVICE_LITTLE_ENDIAN,
948 };
949 
950 static void ati_vga_realize(PCIDevice *dev, Error **errp)
951 {
952     ATIVGAState *s = ATI_VGA(dev);
953     VGACommonState *vga = &s->vga;
954 
955 #ifndef CONFIG_PIXMAN
956     if (s->use_pixman != 0) {
957         warn_report("x-pixman != 0, not effective without PIXMAN");
958     }
959 #endif
960 
961     if (s->model) {
962         int i;
963         for (i = 0; i < ARRAY_SIZE(ati_model_aliases); i++) {
964             if (!strcmp(s->model, ati_model_aliases[i].name)) {
965                 s->dev_id = ati_model_aliases[i].dev_id;
966                 break;
967             }
968         }
969         if (i >= ARRAY_SIZE(ati_model_aliases)) {
970             warn_report("Unknown ATI VGA model name, "
971                         "using default rage128p");
972         }
973     }
974     if (s->dev_id != PCI_DEVICE_ID_ATI_RAGE128_PF &&
975         s->dev_id != PCI_DEVICE_ID_ATI_RADEON_QY) {
976         error_setg(errp, "Unknown ATI VGA device id, "
977                    "only 0x5046 and 0x5159 are supported");
978         return;
979     }
980     pci_set_word(dev->config + PCI_DEVICE_ID, s->dev_id);
981 
982     if (s->dev_id == PCI_DEVICE_ID_ATI_RADEON_QY &&
983         s->vga.vram_size_mb < 16) {
984         warn_report("Too small video memory for device id");
985         s->vga.vram_size_mb = 16;
986     }
987 
988     /* init vga bits */
989     if (!vga_common_init(vga, OBJECT(s), errp)) {
990         return;
991     }
992     vga_init(vga, OBJECT(s), pci_address_space(dev),
993              pci_address_space_io(dev), true);
994     vga->con = graphic_console_init(DEVICE(s), 0, s->vga.hw_ops, &s->vga);
995     if (s->cursor_guest_mode) {
996         vga->cursor_invalidate = ati_cursor_invalidate;
997         vga->cursor_draw_line = ati_cursor_draw_line;
998     }
999 
1000     /* ddc, edid */
1001     I2CBus *i2cbus = i2c_init_bus(DEVICE(s), "ati-vga.ddc");
1002     bitbang_i2c_init(&s->bbi2c, i2cbus);
1003     I2CSlave *i2cddc = I2C_SLAVE(qdev_new(TYPE_I2CDDC));
1004     i2c_slave_set_address(i2cddc, 0x50);
1005     qdev_realize_and_unref(DEVICE(i2cddc), BUS(i2cbus), &error_abort);
1006 
1007     /* mmio register space */
1008     memory_region_init_io(&s->mm, OBJECT(s), &ati_mm_ops, s,
1009                           "ati.mmregs", 0x4000);
1010     /* io space is alias to beginning of mmregs */
1011     memory_region_init_alias(&s->io, OBJECT(s), "ati.io", &s->mm, 0, 0x100);
1012 
1013     pci_register_bar(dev, 0, PCI_BASE_ADDRESS_MEM_PREFETCH, &vga->vram);
1014     pci_register_bar(dev, 1, PCI_BASE_ADDRESS_SPACE_IO, &s->io);
1015     pci_register_bar(dev, 2, PCI_BASE_ADDRESS_SPACE_MEMORY, &s->mm);
1016 
1017     /* most interrupts are not yet emulated but MacOS needs at least VBlank */
1018     dev->config[PCI_INTERRUPT_PIN] = 1;
1019     timer_init_ns(&s->vblank_timer, QEMU_CLOCK_VIRTUAL, ati_vga_vblank_irq, s);
1020 }
1021 
1022 static void ati_vga_reset(DeviceState *dev)
1023 {
1024     ATIVGAState *s = ATI_VGA(dev);
1025 
1026     timer_del(&s->vblank_timer);
1027     ati_vga_update_irq(s);
1028 
1029     /* reset vga */
1030     vga_common_reset(&s->vga);
1031     s->mode = VGA_MODE;
1032 }
1033 
1034 static void ati_vga_exit(PCIDevice *dev)
1035 {
1036     ATIVGAState *s = ATI_VGA(dev);
1037 
1038     timer_del(&s->vblank_timer);
1039     graphic_console_close(s->vga.con);
1040 }
1041 
1042 static Property ati_vga_properties[] = {
1043     DEFINE_PROP_UINT32("vgamem_mb", ATIVGAState, vga.vram_size_mb, 16),
1044     DEFINE_PROP_STRING("model", ATIVGAState, model),
1045     DEFINE_PROP_UINT16("x-device-id", ATIVGAState, dev_id,
1046                        PCI_DEVICE_ID_ATI_RAGE128_PF),
1047     DEFINE_PROP_BOOL("guest_hwcursor", ATIVGAState, cursor_guest_mode, false),
1048     /* this is a debug option, prefer PROP_UINT over PROP_BIT for simplicity */
1049     DEFINE_PROP_UINT8("x-pixman", ATIVGAState, use_pixman, DEFAULT_X_PIXMAN),
1050     DEFINE_PROP_END_OF_LIST()
1051 };
1052 
1053 static void ati_vga_class_init(ObjectClass *klass, void *data)
1054 {
1055     DeviceClass *dc = DEVICE_CLASS(klass);
1056     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
1057 
1058     dc->reset = ati_vga_reset;
1059     device_class_set_props(dc, ati_vga_properties);
1060     dc->hotpluggable = false;
1061     set_bit(DEVICE_CATEGORY_DISPLAY, dc->categories);
1062 
1063     k->class_id = PCI_CLASS_DISPLAY_VGA;
1064     k->vendor_id = PCI_VENDOR_ID_ATI;
1065     k->device_id = PCI_DEVICE_ID_ATI_RAGE128_PF;
1066     k->romfile = "vgabios-ati.bin";
1067     k->realize = ati_vga_realize;
1068     k->exit = ati_vga_exit;
1069 }
1070 
1071 static void ati_vga_init(Object *o)
1072 {
1073     object_property_set_description(o, "x-pixman", "Use pixman for: "
1074                                     "1: fill, 2: blit");
1075 }
1076 
1077 static const TypeInfo ati_vga_info = {
1078     .name = TYPE_ATI_VGA,
1079     .parent = TYPE_PCI_DEVICE,
1080     .instance_size = sizeof(ATIVGAState),
1081     .class_init = ati_vga_class_init,
1082     .instance_init = ati_vga_init,
1083     .interfaces = (InterfaceInfo[]) {
1084           { INTERFACE_CONVENTIONAL_PCI_DEVICE },
1085           { },
1086     },
1087 };
1088 
1089 static void ati_vga_register_types(void)
1090 {
1091     type_register_static(&ati_vga_info);
1092 }
1093 
1094 type_init(ati_vga_register_types)
1095