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#include "qemu/osdep.h"
26#include "qemu-common.h"
27#include "ui/console.h"
28#include "ui/pixel_ops.h"
29#include "trace.h"
30#include "hw/sysbus.h"
31
32typedef enum {
33 REDRAW_NONE = 0, REDRAW_SEGMENTS = 1, REDRAW_BACKGROUND = 2,
34} screen_state_t;
35
36#define TYPE_JAZZ_LED "jazz-led"
37#define JAZZ_LED(obj) OBJECT_CHECK(LedState, (obj), TYPE_JAZZ_LED)
38
39typedef struct LedState {
40 SysBusDevice parent_obj;
41
42 MemoryRegion iomem;
43 uint8_t segments;
44 QemuConsole *con;
45 screen_state_t state;
46} LedState;
47
48static uint64_t jazz_led_read(void *opaque, hwaddr addr,
49 unsigned int size)
50{
51 LedState *s = opaque;
52 uint8_t val;
53
54 val = s->segments;
55 trace_jazz_led_read(addr, val);
56
57 return val;
58}
59
60static void jazz_led_write(void *opaque, hwaddr addr,
61 uint64_t val, unsigned int size)
62{
63 LedState *s = opaque;
64 uint8_t new_val = val & 0xff;
65
66 trace_jazz_led_write(addr, new_val);
67
68 s->segments = new_val;
69 s->state |= REDRAW_SEGMENTS;
70}
71
72static const MemoryRegionOps led_ops = {
73 .read = jazz_led_read,
74 .write = jazz_led_write,
75 .endianness = DEVICE_NATIVE_ENDIAN,
76 .impl.min_access_size = 1,
77 .impl.max_access_size = 1,
78};
79
80
81
82
83static void draw_horizontal_line(DisplaySurface *ds,
84 int posy, int posx1, int posx2,
85 uint32_t color)
86{
87 uint8_t *d;
88 int x, bpp;
89
90 bpp = (surface_bits_per_pixel(ds) + 7) >> 3;
91 d = surface_data(ds) + surface_stride(ds) * posy + bpp * posx1;
92 switch(bpp) {
93 case 1:
94 for (x = posx1; x <= posx2; x++) {
95 *((uint8_t *)d) = color;
96 d++;
97 }
98 break;
99 case 2:
100 for (x = posx1; x <= posx2; x++) {
101 *((uint16_t *)d) = color;
102 d += 2;
103 }
104 break;
105 case 4:
106 for (x = posx1; x <= posx2; x++) {
107 *((uint32_t *)d) = color;
108 d += 4;
109 }
110 break;
111 }
112}
113
114static void draw_vertical_line(DisplaySurface *ds,
115 int posx, int posy1, int posy2,
116 uint32_t color)
117{
118 uint8_t *d;
119 int y, bpp;
120
121 bpp = (surface_bits_per_pixel(ds) + 7) >> 3;
122 d = surface_data(ds) + surface_stride(ds) * posy1 + bpp * posx;
123 switch(bpp) {
124 case 1:
125 for (y = posy1; y <= posy2; y++) {
126 *((uint8_t *)d) = color;
127 d += surface_stride(ds);
128 }
129 break;
130 case 2:
131 for (y = posy1; y <= posy2; y++) {
132 *((uint16_t *)d) = color;
133 d += surface_stride(ds);
134 }
135 break;
136 case 4:
137 for (y = posy1; y <= posy2; y++) {
138 *((uint32_t *)d) = color;
139 d += surface_stride(ds);
140 }
141 break;
142 }
143}
144
145static void jazz_led_update_display(void *opaque)
146{
147 LedState *s = opaque;
148 DisplaySurface *surface = qemu_console_surface(s->con);
149 uint8_t *d1;
150 uint32_t color_segment, color_led;
151 int y, bpp;
152
153 if (s->state & REDRAW_BACKGROUND) {
154
155 bpp = (surface_bits_per_pixel(surface) + 7) >> 3;
156 d1 = surface_data(surface);
157 for (y = 0; y < surface_height(surface); y++) {
158 memset(d1, 0x00, surface_width(surface) * bpp);
159 d1 += surface_stride(surface);
160 }
161 }
162
163 if (s->state & REDRAW_SEGMENTS) {
164
165 switch (surface_bits_per_pixel(surface)) {
166 case 8:
167 color_segment = rgb_to_pixel8(0xaa, 0xaa, 0xaa);
168 color_led = rgb_to_pixel8(0x00, 0xff, 0x00);
169 break;
170 case 15:
171 color_segment = rgb_to_pixel15(0xaa, 0xaa, 0xaa);
172 color_led = rgb_to_pixel15(0x00, 0xff, 0x00);
173 break;
174 case 16:
175 color_segment = rgb_to_pixel16(0xaa, 0xaa, 0xaa);
176 color_led = rgb_to_pixel16(0x00, 0xff, 0x00);
177 break;
178 case 24:
179 color_segment = rgb_to_pixel24(0xaa, 0xaa, 0xaa);
180 color_led = rgb_to_pixel24(0x00, 0xff, 0x00);
181 break;
182 case 32:
183 color_segment = rgb_to_pixel32(0xaa, 0xaa, 0xaa);
184 color_led = rgb_to_pixel32(0x00, 0xff, 0x00);
185 break;
186 default:
187 return;
188 }
189
190
191 draw_horizontal_line(surface, 40, 10, 40,
192 (s->segments & 0x02) ? color_segment : 0);
193 draw_vertical_line(surface, 10, 10, 40,
194 (s->segments & 0x04) ? color_segment : 0);
195 draw_vertical_line(surface, 10, 40, 70,
196 (s->segments & 0x08) ? color_segment : 0);
197 draw_horizontal_line(surface, 70, 10, 40,
198 (s->segments & 0x10) ? color_segment : 0);
199 draw_vertical_line(surface, 40, 40, 70,
200 (s->segments & 0x20) ? color_segment : 0);
201 draw_vertical_line(surface, 40, 10, 40,
202 (s->segments & 0x40) ? color_segment : 0);
203 draw_horizontal_line(surface, 10, 10, 40,
204 (s->segments & 0x80) ? color_segment : 0);
205
206
207 if (!(s->segments & 0x01))
208 color_led = 0;
209 draw_horizontal_line(surface, 68, 50, 50, color_led);
210 draw_horizontal_line(surface, 69, 49, 51, color_led);
211 draw_horizontal_line(surface, 70, 48, 52, color_led);
212 draw_horizontal_line(surface, 71, 49, 51, color_led);
213 draw_horizontal_line(surface, 72, 50, 50, color_led);
214 }
215
216 s->state = REDRAW_NONE;
217 dpy_gfx_update(s->con, 0, 0,
218 surface_width(surface), surface_height(surface));
219}
220
221static void jazz_led_invalidate_display(void *opaque)
222{
223 LedState *s = opaque;
224 s->state |= REDRAW_SEGMENTS | REDRAW_BACKGROUND;
225}
226
227static void jazz_led_text_update(void *opaque, console_ch_t *chardata)
228{
229 LedState *s = opaque;
230 char buf[3];
231
232 dpy_text_cursor(s->con, -1, -1);
233 qemu_console_resize(s->con, 2, 1);
234
235
236 snprintf(buf, 3, "%02hhx", s->segments);
237 console_write_ch(chardata++, ATTR2CHTYPE(buf[0], QEMU_COLOR_BLUE,
238 QEMU_COLOR_BLACK, 1));
239 console_write_ch(chardata++, ATTR2CHTYPE(buf[1], QEMU_COLOR_BLUE,
240 QEMU_COLOR_BLACK, 1));
241
242 dpy_text_update(s->con, 0, 0, 2, 1);
243}
244
245static int jazz_led_post_load(void *opaque, int version_id)
246{
247
248 jazz_led_invalidate_display(opaque);
249
250 return 0;
251}
252
253static const VMStateDescription vmstate_jazz_led = {
254 .name = "jazz-led",
255 .version_id = 0,
256 .minimum_version_id = 0,
257 .post_load = jazz_led_post_load,
258 .fields = (VMStateField[]) {
259 VMSTATE_UINT8(segments, LedState),
260 VMSTATE_END_OF_LIST()
261 }
262};
263
264static const GraphicHwOps jazz_led_ops = {
265 .invalidate = jazz_led_invalidate_display,
266 .gfx_update = jazz_led_update_display,
267 .text_update = jazz_led_text_update,
268};
269
270static void jazz_led_init(Object *obj)
271{
272 LedState *s = JAZZ_LED(obj);
273 SysBusDevice *dev = SYS_BUS_DEVICE(obj);
274
275 memory_region_init_io(&s->iomem, obj, &led_ops, s, "led", 1);
276 sysbus_init_mmio(dev, &s->iomem);
277}
278
279static void jazz_led_realize(DeviceState *dev, Error **errp)
280{
281 LedState *s = JAZZ_LED(dev);
282
283 s->con = graphic_console_init(dev, 0, &jazz_led_ops, s);
284}
285
286static void jazz_led_reset(DeviceState *d)
287{
288 LedState *s = JAZZ_LED(d);
289
290 s->segments = 0;
291 s->state = REDRAW_SEGMENTS | REDRAW_BACKGROUND;
292 qemu_console_resize(s->con, 60, 80);
293}
294
295static void jazz_led_class_init(ObjectClass *klass, void *data)
296{
297 DeviceClass *dc = DEVICE_CLASS(klass);
298
299 dc->desc = "Jazz LED display",
300 dc->vmsd = &vmstate_jazz_led;
301 dc->reset = jazz_led_reset;
302 dc->realize = jazz_led_realize;
303}
304
305static const TypeInfo jazz_led_info = {
306 .name = TYPE_JAZZ_LED,
307 .parent = TYPE_SYS_BUS_DEVICE,
308 .instance_size = sizeof(LedState),
309 .instance_init = jazz_led_init,
310 .class_init = jazz_led_class_init,
311};
312
313static void jazz_led_register(void)
314{
315 type_register_static(&jazz_led_info);
316}
317
318type_init(jazz_led_register);
319
