1/*
2 * QEMU ATI SVGA emulation
3 * 2D engine functions
4 *
5 * Copyright (c) 2019 BALATON Zoltan
6 *
7 * This work is licensed under the GNU GPL license version 2 or later.
8 */
9
10#include "qemu/osdep.h"
11#include "ati_int.h"
12#include "ati_regs.h"
13#include "qemu/log.h"
14#include "ui/pixel_ops.h"
15
16/*
17 * NOTE:
18 * This is 2D _acceleration_ and supposed to be fast. Therefore, don't try to
19 * reinvent the wheel (unlikely to get better with a naive implementation than
20 * existing libraries) and avoid (poorly) reimplementing gfx primitives.
21 * That is unnecessary and would become a performance problem. Instead, try to
22 * map to and reuse existing optimised facilities (e.g. pixman) wherever
23 * possible.
24 */
25
26static int ati_bpp_from_datatype(ATIVGAState *s)
27{
28 switch (s->regs.dp_datatype & 0xf) {
29 case 2:
30 return 8;
31 case 3:
32 case 4:
33 return 16;
34 case 5:
35 return 24;
36 case 6:
37 return 32;
38 default:
39 qemu_log_mask(LOG_UNIMP, "Unknown dst datatype %d\n",
40 s->regs.dp_datatype & 0xf);
41 return 0;
42 }
43}
44
45#define DEFAULT_CNTL (s->regs.dp_gui_master_cntl & GMC_DST_PITCH_OFFSET_CNTL)
46
47void ati_2d_blt(ATIVGAState *s)
48{
49 /* FIXME it is probably more complex than this and may need to be */
50 /* rewritten but for now as a start just to get some output: */
51 DisplaySurface *ds = qemu_console_surface(s->vga.con);
52 DPRINTF("%p %u ds: %p %d %d rop: %x\n", s->vga.vram_ptr,
53 s->vga.vbe_start_addr, surface_data(ds), surface_stride(ds),
54 surface_bits_per_pixel(ds),
55 (s->regs.dp_mix & GMC_ROP3_MASK) >> 16);
56 int dst_x = (s->regs.dp_cntl & DST_X_LEFT_TO_RIGHT ?
57 s->regs.dst_x : s->regs.dst_x + 1 - s->regs.dst_width);
58 int dst_y = (s->regs.dp_cntl & DST_Y_TOP_TO_BOTTOM ?
59 s->regs.dst_y : s->regs.dst_y + 1 - s->regs.dst_height);
60 int bpp = ati_bpp_from_datatype(s);
61 int dst_stride = DEFAULT_CNTL ? s->regs.dst_pitch : s->regs.default_pitch;
62 uint8_t *dst_bits = s->vga.vram_ptr + (DEFAULT_CNTL ?
63 s->regs.dst_offset : s->regs.default_offset);
64
65 if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
66 dst_bits += s->regs.crtc_offset & 0x07ffffff;
67 dst_stride *= bpp;
68 }
69 uint8_t *end = s->vga.vram_ptr + s->vga.vram_size;
70 if (dst_bits >= end || dst_bits + dst_x + (dst_y + s->regs.dst_height) *
71 dst_stride >= end) {
72 qemu_log_mask(LOG_UNIMP, "blt outside vram not implemented\n");
73 return;
74 }
75 DPRINTF("%d %d %d, %d %d %d, (%d,%d) -> (%d,%d) %dx%d %c %c\n",
76 s->regs.src_offset, s->regs.dst_offset, s->regs.default_offset,
77 s->regs.src_pitch, s->regs.dst_pitch, s->regs.default_pitch,
78 s->regs.src_x, s->regs.src_y, s->regs.dst_x, s->regs.dst_y,
79 s->regs.dst_width, s->regs.dst_height,
80 (s->regs.dp_cntl & DST_X_LEFT_TO_RIGHT ? '>' : '<'),
81 (s->regs.dp_cntl & DST_Y_TOP_TO_BOTTOM ? 'v' : '^'));
82 switch (s->regs.dp_mix & GMC_ROP3_MASK) {
83 case ROP3_SRCCOPY:
84 {
85 int src_x = (s->regs.dp_cntl & DST_X_LEFT_TO_RIGHT ?
86 s->regs.src_x : s->regs.src_x + 1 - s->regs.dst_width);
87 int src_y = (s->regs.dp_cntl & DST_Y_TOP_TO_BOTTOM ?
88 s->regs.src_y : s->regs.src_y + 1 - s->regs.dst_height);
89 int src_stride = DEFAULT_CNTL ?
90 s->regs.src_pitch : s->regs.default_pitch;
91 uint8_t *src_bits = s->vga.vram_ptr + (DEFAULT_CNTL ?
92 s->regs.src_offset : s->regs.default_offset);
93
94 if (s->dev_id == PCI_DEVICE_ID_ATI_RAGE128_PF) {
95 src_bits += s->regs.crtc_offset & 0x07ffffff;
96 src_stride *= bpp;
97 }
98 if (src_bits >= end || src_bits + src_x +
99 (src_y + s->regs.dst_height) * src_stride >= end) {
100 qemu_log_mask(LOG_UNIMP, "blt outside vram not implemented\n");
101 return;
102 }
103
104 src_stride /= sizeof(uint32_t);
105 dst_stride /= sizeof(uint32_t);
106 DPRINTF("pixman_blt(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d, %d, %d)\n",
107 src_bits, dst_bits, src_stride, dst_stride, bpp, bpp,
108 src_x, src_y, dst_x, dst_y,
109 s->regs.dst_width, s->regs.dst_height);
110 if (s->regs.dp_cntl & DST_X_LEFT_TO_RIGHT &&
111 s->regs.dp_cntl & DST_Y_TOP_TO_BOTTOM) {
112 pixman_blt((uint32_t *)src_bits, (uint32_t *)dst_bits,
113 src_stride, dst_stride, bpp, bpp,
114 src_x, src_y, dst_x, dst_y,
115 s->regs.dst_width, s->regs.dst_height);
116 } else {
117 /* FIXME: We only really need a temporary if src and dst overlap */
118 int llb = s->regs.dst_width * (bpp / 8);
119 int tmp_stride = DIV_ROUND_UP(llb, sizeof(uint32_t));
120 uint32_t *tmp = g_malloc(tmp_stride * sizeof(uint32_t) *
121 s->regs.dst_height);
122 pixman_blt((uint32_t *)src_bits, tmp,
123 src_stride, tmp_stride, bpp, bpp,
124 src_x, src_y, 0, 0,
125 s->regs.dst_width, s->regs.dst_height);
126 pixman_blt(tmp, (uint32_t *)dst_bits,
127 tmp_stride, dst_stride, bpp, bpp,
128 0, 0, dst_x, dst_y,
129 s->regs.dst_width, s->regs.dst_height);
130 g_free(tmp);
131 }
132 if (dst_bits >= s->vga.vram_ptr + s->vga.vbe_start_addr &&
133 dst_bits < s->vga.vram_ptr + s->vga.vbe_start_addr +
134 s->vga.vbe_regs[VBE_DISPI_INDEX_YRES] * s->vga.vbe_line_offset) {
135 memory_region_set_dirty(&s->vga.vram, s->vga.vbe_start_addr +
136 s->regs.dst_offset +
137 dst_y * surface_stride(ds),
138 s->regs.dst_height * surface_stride(ds));
139 }
140 s->regs.dst_x += s->regs.dst_width;
141 s->regs.dst_y += s->regs.dst_height;
142 break;
143 }
144 case ROP3_PATCOPY:
145 case ROP3_BLACKNESS:
146 case ROP3_WHITENESS:
147 {
148 uint32_t filler = 0;
149
150 switch (s->regs.dp_mix & GMC_ROP3_MASK) {
151 case ROP3_PATCOPY:
152 filler = s->regs.dp_brush_frgd_clr;
153 break;
154 case ROP3_BLACKNESS:
155 filler = 0xffUL << 24 | rgb_to_pixel32(s->vga.palette[0],
156 s->vga.palette[1], s->vga.palette[2]);
157 break;
158 case ROP3_WHITENESS:
159 filler = 0xffUL << 24 | rgb_to_pixel32(s->vga.palette[3],
160 s->vga.palette[4], s->vga.palette[5]);
161 break;
162 }
163
164 dst_stride /= sizeof(uint32_t);
165 DPRINTF("pixman_fill(%p, %d, %d, %d, %d, %d, %d, %x)\n",
166 dst_bits, dst_stride, bpp,
167 s->regs.dst_x, s->regs.dst_y,
168 s->regs.dst_width, s->regs.dst_height,
169 filler);
170 pixman_fill((uint32_t *)dst_bits, dst_stride, bpp,
171 s->regs.dst_x, s->regs.dst_y,
172 s->regs.dst_width, s->regs.dst_height,
173 filler);
174 if (dst_bits >= s->vga.vram_ptr + s->vga.vbe_start_addr &&
175 dst_bits < s->vga.vram_ptr + s->vga.vbe_start_addr +
176 s->vga.vbe_regs[VBE_DISPI_INDEX_YRES] * s->vga.vbe_line_offset) {
177 memory_region_set_dirty(&s->vga.vram, s->vga.vbe_start_addr +
178 s->regs.dst_offset +
179 dst_y * surface_stride(ds),
180 s->regs.dst_height * surface_stride(ds));
181 }
182 s->regs.dst_y += s->regs.dst_height;
183 break;
184 }
185 default:
186 qemu_log_mask(LOG_UNIMP, "Unimplemented ati_2d blt op %x\n",
187 (s->regs.dp_mix & GMC_ROP3_MASK) >> 16);
188 }
189}
190