1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26#include "qemu/osdep.h"
27#include "qapi/error.h"
28#include "hw/display/bcm2835_fb.h"
29#include "hw/display/framebuffer.h"
30#include "ui/pixel_ops.h"
31#include "hw/misc/bcm2835_mbox_defs.h"
32#include "qemu/log.h"
33
34#define DEFAULT_VCRAM_SIZE 0x4000000
35#define BCM2835_FB_OFFSET 0x00100000
36
37static void fb_invalidate_display(void *opaque)
38{
39 BCM2835FBState *s = BCM2835_FB(opaque);
40
41 s->invalidate = true;
42}
43
44static void draw_line_src16(void *opaque, uint8_t *dst, const uint8_t *src,
45 int width, int deststep)
46{
47 BCM2835FBState *s = opaque;
48 uint16_t rgb565;
49 uint32_t rgb888;
50 uint8_t r, g, b;
51 DisplaySurface *surface = qemu_console_surface(s->con);
52 int bpp = surface_bits_per_pixel(surface);
53
54 while (width--) {
55 switch (s->bpp) {
56 case 8:
57
58
59
60 rgb888 = ldl_le_phys(&s->dma_as, s->vcram_base + (*src << 2));
61 r = (rgb888 >> 0) & 0xff;
62 g = (rgb888 >> 8) & 0xff;
63 b = (rgb888 >> 16) & 0xff;
64 src++;
65 break;
66 case 16:
67 rgb565 = lduw_le_p(src);
68 r = ((rgb565 >> 11) & 0x1f) << 3;
69 g = ((rgb565 >> 5) & 0x3f) << 2;
70 b = ((rgb565 >> 0) & 0x1f) << 3;
71 src += 2;
72 break;
73 case 24:
74 rgb888 = ldl_le_p(src);
75 r = (rgb888 >> 0) & 0xff;
76 g = (rgb888 >> 8) & 0xff;
77 b = (rgb888 >> 16) & 0xff;
78 src += 3;
79 break;
80 case 32:
81 rgb888 = ldl_le_p(src);
82 r = (rgb888 >> 0) & 0xff;
83 g = (rgb888 >> 8) & 0xff;
84 b = (rgb888 >> 16) & 0xff;
85 src += 4;
86 break;
87 default:
88 r = 0;
89 g = 0;
90 b = 0;
91 break;
92 }
93
94 if (s->pixo == 0) {
95
96 uint8_t tmp = r;
97 r = b;
98 b = tmp;
99 }
100
101 switch (bpp) {
102 case 8:
103 *dst++ = rgb_to_pixel8(r, g, b);
104 break;
105 case 15:
106 *(uint16_t *)dst = rgb_to_pixel15(r, g, b);
107 dst += 2;
108 break;
109 case 16:
110 *(uint16_t *)dst = rgb_to_pixel16(r, g, b);
111 dst += 2;
112 break;
113 case 24:
114 rgb888 = rgb_to_pixel24(r, g, b);
115 *dst++ = rgb888 & 0xff;
116 *dst++ = (rgb888 >> 8) & 0xff;
117 *dst++ = (rgb888 >> 16) & 0xff;
118 break;
119 case 32:
120 *(uint32_t *)dst = rgb_to_pixel32(r, g, b);
121 dst += 4;
122 break;
123 default:
124 return;
125 }
126 }
127}
128
129static void fb_update_display(void *opaque)
130{
131 BCM2835FBState *s = opaque;
132 DisplaySurface *surface = qemu_console_surface(s->con);
133 int first = 0;
134 int last = 0;
135 int src_width = 0;
136 int dest_width = 0;
137
138 if (s->lock || !s->xres) {
139 return;
140 }
141
142 src_width = s->xres * (s->bpp >> 3);
143 dest_width = s->xres;
144
145 switch (surface_bits_per_pixel(surface)) {
146 case 0:
147 return;
148 case 8:
149 break;
150 case 15:
151 dest_width *= 2;
152 break;
153 case 16:
154 dest_width *= 2;
155 break;
156 case 24:
157 dest_width *= 3;
158 break;
159 case 32:
160 dest_width *= 4;
161 break;
162 default:
163 hw_error("bcm2835_fb: bad color depth\n");
164 break;
165 }
166
167 if (s->invalidate) {
168 framebuffer_update_memory_section(&s->fbsection, s->dma_mr, s->base,
169 s->yres, src_width);
170 }
171
172 framebuffer_update_display(surface, &s->fbsection, s->xres, s->yres,
173 src_width, dest_width, 0, s->invalidate,
174 draw_line_src16, s, &first, &last);
175
176 if (first >= 0) {
177 dpy_gfx_update(s->con, 0, first, s->xres, last - first + 1);
178 }
179
180 s->invalidate = false;
181}
182
183static void bcm2835_fb_mbox_push(BCM2835FBState *s, uint32_t value)
184{
185 value &= ~0xf;
186
187 s->lock = true;
188
189 s->xres = ldl_le_phys(&s->dma_as, value);
190 s->yres = ldl_le_phys(&s->dma_as, value + 4);
191 s->xres_virtual = ldl_le_phys(&s->dma_as, value + 8);
192 s->yres_virtual = ldl_le_phys(&s->dma_as, value + 12);
193 s->bpp = ldl_le_phys(&s->dma_as, value + 20);
194 s->xoffset = ldl_le_phys(&s->dma_as, value + 24);
195 s->yoffset = ldl_le_phys(&s->dma_as, value + 28);
196
197 s->base = s->vcram_base | (value & 0xc0000000);
198 s->base += BCM2835_FB_OFFSET;
199
200
201
202 s->pitch = s->xres * (s->bpp >> 3);
203 s->size = s->yres * s->pitch;
204
205 stl_le_phys(&s->dma_as, value + 16, s->pitch);
206 stl_le_phys(&s->dma_as, value + 32, s->base);
207 stl_le_phys(&s->dma_as, value + 36, s->size);
208
209 s->invalidate = true;
210 qemu_console_resize(s->con, s->xres, s->yres);
211 s->lock = false;
212}
213
214void bcm2835_fb_reconfigure(BCM2835FBState *s, uint32_t *xres, uint32_t *yres,
215 uint32_t *xoffset, uint32_t *yoffset, uint32_t *bpp,
216 uint32_t *pixo, uint32_t *alpha)
217{
218 s->lock = true;
219
220
221 if (xres) {
222 s->xres = *xres;
223 }
224 if (yres) {
225 s->yres = *yres;
226 }
227 if (xoffset) {
228 s->xoffset = *xoffset;
229 }
230 if (yoffset) {
231 s->yoffset = *yoffset;
232 }
233 if (bpp) {
234 s->bpp = *bpp;
235 }
236 if (pixo) {
237 s->pixo = *pixo;
238 }
239 if (alpha) {
240 s->alpha = *alpha;
241 }
242
243
244
245 s->pitch = s->xres * (s->bpp >> 3);
246 s->size = s->yres * s->pitch;
247
248 s->invalidate = true;
249 qemu_console_resize(s->con, s->xres, s->yres);
250 s->lock = false;
251}
252
253static uint64_t bcm2835_fb_read(void *opaque, hwaddr offset, unsigned size)
254{
255 BCM2835FBState *s = opaque;
256 uint32_t res = 0;
257
258 switch (offset) {
259 case MBOX_AS_DATA:
260 res = MBOX_CHAN_FB;
261 s->pending = false;
262 qemu_set_irq(s->mbox_irq, 0);
263 break;
264
265 case MBOX_AS_PENDING:
266 res = s->pending;
267 break;
268
269 default:
270 qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset %"HWADDR_PRIx"\n",
271 __func__, offset);
272 return 0;
273 }
274
275 return res;
276}
277
278static void bcm2835_fb_write(void *opaque, hwaddr offset, uint64_t value,
279 unsigned size)
280{
281 BCM2835FBState *s = opaque;
282
283 switch (offset) {
284 case MBOX_AS_DATA:
285
286 assert(!s->pending);
287 s->pending = true;
288 bcm2835_fb_mbox_push(s, value);
289 qemu_set_irq(s->mbox_irq, 1);
290 break;
291
292 default:
293 qemu_log_mask(LOG_GUEST_ERROR, "%s: Bad offset %"HWADDR_PRIx"\n",
294 __func__, offset);
295 return;
296 }
297}
298
299static const MemoryRegionOps bcm2835_fb_ops = {
300 .read = bcm2835_fb_read,
301 .write = bcm2835_fb_write,
302 .endianness = DEVICE_NATIVE_ENDIAN,
303 .valid.min_access_size = 4,
304 .valid.max_access_size = 4,
305};
306
307static const VMStateDescription vmstate_bcm2835_fb = {
308 .name = TYPE_BCM2835_FB,
309 .version_id = 1,
310 .minimum_version_id = 1,
311 .fields = (VMStateField[]) {
312 VMSTATE_BOOL(lock, BCM2835FBState),
313 VMSTATE_BOOL(invalidate, BCM2835FBState),
314 VMSTATE_BOOL(pending, BCM2835FBState),
315 VMSTATE_UINT32(xres, BCM2835FBState),
316 VMSTATE_UINT32(yres, BCM2835FBState),
317 VMSTATE_UINT32(xres_virtual, BCM2835FBState),
318 VMSTATE_UINT32(yres_virtual, BCM2835FBState),
319 VMSTATE_UINT32(xoffset, BCM2835FBState),
320 VMSTATE_UINT32(yoffset, BCM2835FBState),
321 VMSTATE_UINT32(bpp, BCM2835FBState),
322 VMSTATE_UINT32(base, BCM2835FBState),
323 VMSTATE_UINT32(pitch, BCM2835FBState),
324 VMSTATE_UINT32(size, BCM2835FBState),
325 VMSTATE_UINT32(pixo, BCM2835FBState),
326 VMSTATE_UINT32(alpha, BCM2835FBState),
327 VMSTATE_END_OF_LIST()
328 }
329};
330
331static const GraphicHwOps vgafb_ops = {
332 .invalidate = fb_invalidate_display,
333 .gfx_update = fb_update_display,
334};
335
336static void bcm2835_fb_init(Object *obj)
337{
338 BCM2835FBState *s = BCM2835_FB(obj);
339
340 memory_region_init_io(&s->iomem, obj, &bcm2835_fb_ops, s, TYPE_BCM2835_FB,
341 0x10);
342 sysbus_init_mmio(SYS_BUS_DEVICE(s), &s->iomem);
343 sysbus_init_irq(SYS_BUS_DEVICE(s), &s->mbox_irq);
344}
345
346static void bcm2835_fb_reset(DeviceState *dev)
347{
348 BCM2835FBState *s = BCM2835_FB(dev);
349
350 s->pending = false;
351
352 s->xres_virtual = s->xres;
353 s->yres_virtual = s->yres;
354 s->xoffset = 0;
355 s->yoffset = 0;
356 s->base = s->vcram_base + BCM2835_FB_OFFSET;
357 s->pitch = s->xres * (s->bpp >> 3);
358 s->size = s->yres * s->pitch;
359
360 s->invalidate = true;
361 s->lock = false;
362}
363
364static void bcm2835_fb_realize(DeviceState *dev, Error **errp)
365{
366 BCM2835FBState *s = BCM2835_FB(dev);
367 Error *err = NULL;
368 Object *obj;
369
370 if (s->vcram_base == 0) {
371 error_setg(errp, "%s: required vcram-base property not set", __func__);
372 return;
373 }
374
375 obj = object_property_get_link(OBJECT(dev), "dma-mr", &err);
376 if (obj == NULL) {
377 error_setg(errp, "%s: required dma-mr link not found: %s",
378 __func__, error_get_pretty(err));
379 return;
380 }
381
382 s->dma_mr = MEMORY_REGION(obj);
383 address_space_init(&s->dma_as, s->dma_mr, NULL);
384
385 bcm2835_fb_reset(dev);
386
387 s->con = graphic_console_init(dev, 0, &vgafb_ops, s);
388 qemu_console_resize(s->con, s->xres, s->yres);
389}
390
391static Property bcm2835_fb_props[] = {
392 DEFINE_PROP_UINT32("vcram-base", BCM2835FBState, vcram_base, 0),
393 DEFINE_PROP_UINT32("vcram-size", BCM2835FBState, vcram_size,
394 DEFAULT_VCRAM_SIZE),
395 DEFINE_PROP_UINT32("xres", BCM2835FBState, xres, 640),
396 DEFINE_PROP_UINT32("yres", BCM2835FBState, yres, 480),
397 DEFINE_PROP_UINT32("bpp", BCM2835FBState, bpp, 16),
398 DEFINE_PROP_UINT32("pixo", BCM2835FBState, pixo, 1),
399 DEFINE_PROP_UINT32("alpha", BCM2835FBState, alpha, 2),
400 DEFINE_PROP_END_OF_LIST()
401};
402
403static void bcm2835_fb_class_init(ObjectClass *klass, void *data)
404{
405 DeviceClass *dc = DEVICE_CLASS(klass);
406
407 dc->props = bcm2835_fb_props;
408 dc->realize = bcm2835_fb_realize;
409 dc->reset = bcm2835_fb_reset;
410 dc->vmsd = &vmstate_bcm2835_fb;
411}
412
413static TypeInfo bcm2835_fb_info = {
414 .name = TYPE_BCM2835_FB,
415 .parent = TYPE_SYS_BUS_DEVICE,
416 .instance_size = sizeof(BCM2835FBState),
417 .class_init = bcm2835_fb_class_init,
418 .instance_init = bcm2835_fb_init,
419};
420
421static void bcm2835_fb_register_types(void)
422{
423 type_register_static(&bcm2835_fb_info);
424}
425
426type_init(bcm2835_fb_register_types)
427