Merge remote-tracking branch 'remotes/kraxel/tags/pull-vga-20170103-1' into staging
[qemu.git] / ui / cursor.c
1 #include "qemu/osdep.h"
2 #include "qemu-common.h"
3 #include "ui/console.h"
4
5 #include "cursor_hidden.xpm"
6 #include "cursor_left_ptr.xpm"
7
8 /* for creating built-in cursors */
9 static QEMUCursor *cursor_parse_xpm(const char *xpm[])
10 {
11 QEMUCursor *c;
12 uint32_t ctab[128];
13 unsigned int width, height, colors, chars;
14 unsigned int line = 0, i, r, g, b, x, y, pixel;
15 char name[16];
16 uint8_t idx;
17
18 /* parse header line: width, height, #colors, #chars */
19 if (sscanf(xpm[line], "%u %u %u %u",
20 &width, &height, &colors, &chars) != 4) {
21 fprintf(stderr, "%s: header parse error: \"%s\"\n",
22 __FUNCTION__, xpm[line]);
23 return NULL;
24 }
25 if (chars != 1) {
26 fprintf(stderr, "%s: chars != 1 not supported\n", __FUNCTION__);
27 return NULL;
28 }
29 line++;
30
31 /* parse color table */
32 for (i = 0; i < colors; i++, line++) {
33 if (sscanf(xpm[line], "%c c %15s", &idx, name) == 2) {
34 if (sscanf(name, "#%02x%02x%02x", &r, &g, &b) == 3) {
35 ctab[idx] = (0xff << 24) | (b << 16) | (g << 8) | r;
36 continue;
37 }
38 if (strcmp(name, "None") == 0) {
39 ctab[idx] = 0x00000000;
40 continue;
41 }
42 }
43 fprintf(stderr, "%s: color parse error: \"%s\"\n",
44 __FUNCTION__, xpm[line]);
45 return NULL;
46 }
47
48 /* parse pixel data */
49 c = cursor_alloc(width, height);
50 for (pixel = 0, y = 0; y < height; y++, line++) {
51 for (x = 0; x < height; x++, pixel++) {
52 idx = xpm[line][x];
53 c->data[pixel] = ctab[idx];
54 }
55 }
56 return c;
57 }
58
59 /* nice for debugging */
60 void cursor_print_ascii_art(QEMUCursor *c, const char *prefix)
61 {
62 uint32_t *data = c->data;
63 int x,y;
64
65 for (y = 0; y < c->height; y++) {
66 fprintf(stderr, "%s: %2d: |", prefix, y);
67 for (x = 0; x < c->width; x++, data++) {
68 if ((*data & 0xff000000) != 0xff000000) {
69 fprintf(stderr, " "); /* transparent */
70 } else if ((*data & 0x00ffffff) == 0x00ffffff) {
71 fprintf(stderr, "."); /* white */
72 } else if ((*data & 0x00ffffff) == 0x00000000) {
73 fprintf(stderr, "X"); /* black */
74 } else {
75 fprintf(stderr, "o"); /* other */
76 }
77 }
78 fprintf(stderr, "|\n");
79 }
80 }
81
82 QEMUCursor *cursor_builtin_hidden(void)
83 {
84 return cursor_parse_xpm(cursor_hidden_xpm);
85 }
86
87 QEMUCursor *cursor_builtin_left_ptr(void)
88 {
89 return cursor_parse_xpm(cursor_left_ptr_xpm);
90 }
91
92 QEMUCursor *cursor_alloc(int width, int height)
93 {
94 QEMUCursor *c;
95 int datasize = width * height * sizeof(uint32_t);
96
97 c = g_malloc0(sizeof(QEMUCursor) + datasize);
98 c->width = width;
99 c->height = height;
100 c->refcount = 1;
101 return c;
102 }
103
104 void cursor_get(QEMUCursor *c)
105 {
106 c->refcount++;
107 }
108
109 void cursor_put(QEMUCursor *c)
110 {
111 if (c == NULL)
112 return;
113 c->refcount--;
114 if (c->refcount)
115 return;
116 g_free(c);
117 }
118
119 int cursor_get_mono_bpl(QEMUCursor *c)
120 {
121 return (c->width + 7) / 8;
122 }
123
124 void cursor_set_mono(QEMUCursor *c,
125 uint32_t foreground, uint32_t background, uint8_t *image,
126 int transparent, uint8_t *mask)
127 {
128 uint32_t *data = c->data;
129 uint8_t bit;
130 int x,y,bpl;
131
132 bpl = cursor_get_mono_bpl(c);
133 for (y = 0; y < c->height; y++) {
134 bit = 0x80;
135 for (x = 0; x < c->width; x++, data++) {
136 if (transparent && mask[x/8] & bit) {
137 *data = 0x00000000;
138 } else if (!transparent && !(mask[x/8] & bit)) {
139 *data = 0x00000000;
140 } else if (image[x/8] & bit) {
141 *data = 0xff000000 | foreground;
142 } else {
143 *data = 0xff000000 | background;
144 }
145 bit >>= 1;
146 if (bit == 0) {
147 bit = 0x80;
148 }
149 }
150 mask += bpl;
151 image += bpl;
152 }
153 }
154
155 void cursor_get_mono_image(QEMUCursor *c, int foreground, uint8_t *image)
156 {
157 uint32_t *data = c->data;
158 uint8_t bit;
159 int x,y,bpl;
160
161 bpl = cursor_get_mono_bpl(c);
162 memset(image, 0, bpl * c->height);
163 for (y = 0; y < c->height; y++) {
164 bit = 0x80;
165 for (x = 0; x < c->width; x++, data++) {
166 if (((*data & 0xff000000) == 0xff000000) &&
167 ((*data & 0x00ffffff) == foreground)) {
168 image[x/8] |= bit;
169 }
170 bit >>= 1;
171 if (bit == 0) {
172 bit = 0x80;
173 }
174 }
175 image += bpl;
176 }
177 }
178
179 void cursor_get_mono_mask(QEMUCursor *c, int transparent, uint8_t *mask)
180 {
181 uint32_t *data = c->data;
182 uint8_t bit;
183 int x,y,bpl;
184
185 bpl = cursor_get_mono_bpl(c);
186 memset(mask, 0, bpl * c->height);
187 for (y = 0; y < c->height; y++) {
188 bit = 0x80;
189 for (x = 0; x < c->width; x++, data++) {
190 if ((*data & 0xff000000) != 0xff000000) {
191 if (transparent != 0) {
192 mask[x/8] |= bit;
193 }
194 } else {
195 if (transparent == 0) {
196 mask[x/8] |= bit;
197 }
198 }
199 bit >>= 1;
200 if (bit == 0) {
201 bit = 0x80;
202 }
203 }
204 mask += bpl;
205 }
206 }