Merge remote-tracking branch 'remotes/kraxel/tags/input-20200921-pull-request' into...
[qemu.git] / ui / cursor.c
1 #include "qemu/osdep.h"
2 #include "ui/console.h"
3
4 #include "cursor_hidden.xpm"
5 #include "cursor_left_ptr.xpm"
6
7 /* for creating built-in cursors */
8 static QEMUCursor *cursor_parse_xpm(const char *xpm[])
9 {
10 QEMUCursor *c;
11 uint32_t ctab[128];
12 unsigned int width, height, colors, chars;
13 unsigned int line = 0, i, r, g, b, x, y, pixel;
14 char name[16];
15 uint8_t idx;
16
17 /* parse header line: width, height, #colors, #chars */
18 if (sscanf(xpm[line], "%u %u %u %u",
19 &width, &height, &colors, &chars) != 4) {
20 fprintf(stderr, "%s: header parse error: \"%s\"\n",
21 __func__, xpm[line]);
22 return NULL;
23 }
24 if (chars != 1) {
25 fprintf(stderr, "%s: chars != 1 not supported\n", __func__);
26 return NULL;
27 }
28 line++;
29
30 /* parse color table */
31 for (i = 0; i < colors; i++, line++) {
32 if (sscanf(xpm[line], "%c c %15s", &idx, name) == 2) {
33 if (sscanf(name, "#%02x%02x%02x", &r, &g, &b) == 3) {
34 ctab[idx] = (0xff << 24) | (b << 16) | (g << 8) | r;
35 continue;
36 }
37 if (strcmp(name, "None") == 0) {
38 ctab[idx] = 0x00000000;
39 continue;
40 }
41 }
42 fprintf(stderr, "%s: color parse error: \"%s\"\n",
43 __func__, xpm[line]);
44 return NULL;
45 }
46
47 /* parse pixel data */
48 c = cursor_alloc(width, height);
49 for (pixel = 0, y = 0; y < height; y++, line++) {
50 for (x = 0; x < height; x++, pixel++) {
51 idx = xpm[line][x];
52 c->data[pixel] = ctab[idx];
53 }
54 }
55 return c;
56 }
57
58 /* nice for debugging */
59 void cursor_print_ascii_art(QEMUCursor *c, const char *prefix)
60 {
61 uint32_t *data = c->data;
62 int x,y;
63
64 for (y = 0; y < c->height; y++) {
65 fprintf(stderr, "%s: %2d: |", prefix, y);
66 for (x = 0; x < c->width; x++, data++) {
67 if ((*data & 0xff000000) != 0xff000000) {
68 fprintf(stderr, " "); /* transparent */
69 } else if ((*data & 0x00ffffff) == 0x00ffffff) {
70 fprintf(stderr, "."); /* white */
71 } else if ((*data & 0x00ffffff) == 0x00000000) {
72 fprintf(stderr, "X"); /* black */
73 } else {
74 fprintf(stderr, "o"); /* other */
75 }
76 }
77 fprintf(stderr, "|\n");
78 }
79 }
80
81 QEMUCursor *cursor_builtin_hidden(void)
82 {
83 return cursor_parse_xpm(cursor_hidden_xpm);
84 }
85
86 QEMUCursor *cursor_builtin_left_ptr(void)
87 {
88 return cursor_parse_xpm(cursor_left_ptr_xpm);
89 }
90
91 QEMUCursor *cursor_alloc(int width, int height)
92 {
93 QEMUCursor *c;
94 int datasize = width * height * sizeof(uint32_t);
95
96 c = g_malloc0(sizeof(QEMUCursor) + datasize);
97 c->width = width;
98 c->height = height;
99 c->refcount = 1;
100 return c;
101 }
102
103 void cursor_get(QEMUCursor *c)
104 {
105 c->refcount++;
106 }
107
108 void cursor_put(QEMUCursor *c)
109 {
110 if (c == NULL)
111 return;
112 c->refcount--;
113 if (c->refcount)
114 return;
115 g_free(c);
116 }
117
118 int cursor_get_mono_bpl(QEMUCursor *c)
119 {
120 return DIV_ROUND_UP(c->width, 8);
121 }
122
123 void cursor_set_mono(QEMUCursor *c,
124 uint32_t foreground, uint32_t background, uint8_t *image,
125 int transparent, uint8_t *mask)
126 {
127 uint32_t *data = c->data;
128 uint8_t bit;
129 int x,y,bpl;
130 bool expand_bitmap_only = image == mask;
131 bool has_inverted_colors = false;
132 const uint32_t inverted = 0x80000000;
133
134 /*
135 * Converts a monochrome bitmap with XOR mask 'image' and AND mask 'mask':
136 * https://docs.microsoft.com/en-us/windows-hardware/drivers/display/drawing-monochrome-pointers
137 */
138 bpl = cursor_get_mono_bpl(c);
139 for (y = 0; y < c->height; y++) {
140 bit = 0x80;
141 for (x = 0; x < c->width; x++, data++) {
142 if (transparent && mask[x/8] & bit) {
143 if (!expand_bitmap_only && image[x / 8] & bit) {
144 *data = inverted;
145 has_inverted_colors = true;
146 } else {
147 *data = 0x00000000;
148 }
149 } else if (!transparent && !(mask[x/8] & bit)) {
150 *data = 0x00000000;
151 } else if (image[x/8] & bit) {
152 *data = 0xff000000 | foreground;
153 } else {
154 *data = 0xff000000 | background;
155 }
156 bit >>= 1;
157 if (bit == 0) {
158 bit = 0x80;
159 }
160 }
161 mask += bpl;
162 image += bpl;
163 }
164
165 /*
166 * If there are any pixels with inverted colors, create an outline (fill
167 * transparent neighbors with the background color) and use the foreground
168 * color as "inverted" color.
169 */
170 if (has_inverted_colors) {
171 data = c->data;
172 for (y = 0; y < c->height; y++) {
173 for (x = 0; x < c->width; x++, data++) {
174 if (*data == 0 /* transparent */ &&
175 ((x > 0 && data[-1] == inverted) ||
176 (x + 1 < c->width && data[1] == inverted) ||
177 (y > 0 && data[-c->width] == inverted) ||
178 (y + 1 < c->height && data[c->width] == inverted))) {
179 *data = 0xff000000 | background;
180 }
181 }
182 }
183 data = c->data;
184 for (x = 0; x < c->width * c->height; x++, data++) {
185 if (*data == inverted) {
186 *data = 0xff000000 | foreground;
187 }
188 }
189 }
190 }
191
192 void cursor_get_mono_image(QEMUCursor *c, int foreground, uint8_t *image)
193 {
194 uint32_t *data = c->data;
195 uint8_t bit;
196 int x,y,bpl;
197
198 bpl = cursor_get_mono_bpl(c);
199 memset(image, 0, bpl * c->height);
200 for (y = 0; y < c->height; y++) {
201 bit = 0x80;
202 for (x = 0; x < c->width; x++, data++) {
203 if (((*data & 0xff000000) == 0xff000000) &&
204 ((*data & 0x00ffffff) == foreground)) {
205 image[x/8] |= bit;
206 }
207 bit >>= 1;
208 if (bit == 0) {
209 bit = 0x80;
210 }
211 }
212 image += bpl;
213 }
214 }
215
216 void cursor_get_mono_mask(QEMUCursor *c, int transparent, uint8_t *mask)
217 {
218 uint32_t *data = c->data;
219 uint8_t bit;
220 int x,y,bpl;
221
222 bpl = cursor_get_mono_bpl(c);
223 memset(mask, 0, bpl * c->height);
224 for (y = 0; y < c->height; y++) {
225 bit = 0x80;
226 for (x = 0; x < c->width; x++, data++) {
227 if ((*data & 0xff000000) != 0xff000000) {
228 if (transparent != 0) {
229 mask[x/8] |= bit;
230 }
231 } else {
232 if (transparent == 0) {
233 mask[x/8] |= bit;
234 }
235 }
236 bit >>= 1;
237 if (bit == 0) {
238 bit = 0x80;
239 }
240 }
241 mask += bpl;
242 }
243 }