1 | /* |
2 | * QEMU JAZZ LED emulator. |
3 | * |
4 | * Copyright (c) 2007-2012 Herve Poussineau |
5 | * |
6 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
7 | * of this software and associated documentation files (the "Software"), to deal |
8 | * in the Software without restriction, including without limitation the rights |
9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
10 | * copies of the Software, and to permit persons to whom the Software is |
11 | * furnished to do so, subject to the following conditions: |
12 | * |
13 | * The above copyright notice and this permission notice shall be included in |
14 | * all copies or substantial portions of the Software. |
15 | * |
16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
22 | * THE SOFTWARE. |
23 | */ |
24 | |
25 | #include "qemu/osdep.h" |
26 | #include "qemu/module.h" |
27 | #include "ui/console.h" |
28 | #include "ui/pixel_ops.h" |
29 | #include "trace.h" |
30 | #include "hw/sysbus.h" |
31 | #include "migration/vmstate.h" |
32 | |
33 | typedef enum { |
34 | REDRAW_NONE = 0, REDRAW_SEGMENTS = 1, REDRAW_BACKGROUND = 2, |
35 | } screen_state_t; |
36 | |
37 | #define TYPE_JAZZ_LED "jazz-led" |
38 | #define JAZZ_LED(obj) OBJECT_CHECK(LedState, (obj), TYPE_JAZZ_LED) |
39 | |
40 | typedef struct LedState { |
41 | SysBusDevice parent_obj; |
42 | |
43 | MemoryRegion iomem; |
44 | uint8_t segments; |
45 | QemuConsole *con; |
46 | screen_state_t state; |
47 | } LedState; |
48 | |
49 | static uint64_t jazz_led_read(void *opaque, hwaddr addr, |
50 | unsigned int size) |
51 | { |
52 | LedState *s = opaque; |
53 | uint8_t val; |
54 | |
55 | val = s->segments; |
56 | trace_jazz_led_read(addr, val); |
57 | |
58 | return val; |
59 | } |
60 | |
61 | static void jazz_led_write(void *opaque, hwaddr addr, |
62 | uint64_t val, unsigned int size) |
63 | { |
64 | LedState *s = opaque; |
65 | uint8_t new_val = val & 0xff; |
66 | |
67 | trace_jazz_led_write(addr, new_val); |
68 | |
69 | s->segments = new_val; |
70 | s->state |= REDRAW_SEGMENTS; |
71 | } |
72 | |
73 | static const MemoryRegionOps led_ops = { |
74 | .read = jazz_led_read, |
75 | .write = jazz_led_write, |
76 | .endianness = DEVICE_NATIVE_ENDIAN, |
77 | .impl.min_access_size = 1, |
78 | .impl.max_access_size = 1, |
79 | }; |
80 | |
81 | /***********************************************************/ |
82 | /* jazz_led display */ |
83 | |
84 | static void draw_horizontal_line(DisplaySurface *ds, |
85 | int posy, int posx1, int posx2, |
86 | uint32_t color) |
87 | { |
88 | uint8_t *d; |
89 | int x, bpp; |
90 | |
91 | bpp = (surface_bits_per_pixel(ds) + 7) >> 3; |
92 | d = surface_data(ds) + surface_stride(ds) * posy + bpp * posx1; |
93 | switch(bpp) { |
94 | case 1: |
95 | for (x = posx1; x <= posx2; x++) { |
96 | *((uint8_t *)d) = color; |
97 | d++; |
98 | } |
99 | break; |
100 | case 2: |
101 | for (x = posx1; x <= posx2; x++) { |
102 | *((uint16_t *)d) = color; |
103 | d += 2; |
104 | } |
105 | break; |
106 | case 4: |
107 | for (x = posx1; x <= posx2; x++) { |
108 | *((uint32_t *)d) = color; |
109 | d += 4; |
110 | } |
111 | break; |
112 | } |
113 | } |
114 | |
115 | static void draw_vertical_line(DisplaySurface *ds, |
116 | int posx, int posy1, int posy2, |
117 | uint32_t color) |
118 | { |
119 | uint8_t *d; |
120 | int y, bpp; |
121 | |
122 | bpp = (surface_bits_per_pixel(ds) + 7) >> 3; |
123 | d = surface_data(ds) + surface_stride(ds) * posy1 + bpp * posx; |
124 | switch(bpp) { |
125 | case 1: |
126 | for (y = posy1; y <= posy2; y++) { |
127 | *((uint8_t *)d) = color; |
128 | d += surface_stride(ds); |
129 | } |
130 | break; |
131 | case 2: |
132 | for (y = posy1; y <= posy2; y++) { |
133 | *((uint16_t *)d) = color; |
134 | d += surface_stride(ds); |
135 | } |
136 | break; |
137 | case 4: |
138 | for (y = posy1; y <= posy2; y++) { |
139 | *((uint32_t *)d) = color; |
140 | d += surface_stride(ds); |
141 | } |
142 | break; |
143 | } |
144 | } |
145 | |
146 | static void jazz_led_update_display(void *opaque) |
147 | { |
148 | LedState *s = opaque; |
149 | DisplaySurface *surface = qemu_console_surface(s->con); |
150 | uint8_t *d1; |
151 | uint32_t color_segment, color_led; |
152 | int y, bpp; |
153 | |
154 | if (s->state & REDRAW_BACKGROUND) { |
155 | /* clear screen */ |
156 | bpp = (surface_bits_per_pixel(surface) + 7) >> 3; |
157 | d1 = surface_data(surface); |
158 | for (y = 0; y < surface_height(surface); y++) { |
159 | memset(d1, 0x00, surface_width(surface) * bpp); |
160 | d1 += surface_stride(surface); |
161 | } |
162 | } |
163 | |
164 | if (s->state & REDRAW_SEGMENTS) { |
165 | /* set colors according to bpp */ |
166 | switch (surface_bits_per_pixel(surface)) { |
167 | case 8: |
168 | color_segment = rgb_to_pixel8(0xaa, 0xaa, 0xaa); |
169 | color_led = rgb_to_pixel8(0x00, 0xff, 0x00); |
170 | break; |
171 | case 15: |
172 | color_segment = rgb_to_pixel15(0xaa, 0xaa, 0xaa); |
173 | color_led = rgb_to_pixel15(0x00, 0xff, 0x00); |
174 | break; |
175 | case 16: |
176 | color_segment = rgb_to_pixel16(0xaa, 0xaa, 0xaa); |
177 | color_led = rgb_to_pixel16(0x00, 0xff, 0x00); |
178 | break; |
179 | case 24: |
180 | color_segment = rgb_to_pixel24(0xaa, 0xaa, 0xaa); |
181 | color_led = rgb_to_pixel24(0x00, 0xff, 0x00); |
182 | break; |
183 | case 32: |
184 | color_segment = rgb_to_pixel32(0xaa, 0xaa, 0xaa); |
185 | color_led = rgb_to_pixel32(0x00, 0xff, 0x00); |
186 | break; |
187 | default: |
188 | return; |
189 | } |
190 | |
191 | /* display segments */ |
192 | draw_horizontal_line(surface, 40, 10, 40, |
193 | (s->segments & 0x02) ? color_segment : 0); |
194 | draw_vertical_line(surface, 10, 10, 40, |
195 | (s->segments & 0x04) ? color_segment : 0); |
196 | draw_vertical_line(surface, 10, 40, 70, |
197 | (s->segments & 0x08) ? color_segment : 0); |
198 | draw_horizontal_line(surface, 70, 10, 40, |
199 | (s->segments & 0x10) ? color_segment : 0); |
200 | draw_vertical_line(surface, 40, 40, 70, |
201 | (s->segments & 0x20) ? color_segment : 0); |
202 | draw_vertical_line(surface, 40, 10, 40, |
203 | (s->segments & 0x40) ? color_segment : 0); |
204 | draw_horizontal_line(surface, 10, 10, 40, |
205 | (s->segments & 0x80) ? color_segment : 0); |
206 | |
207 | /* display led */ |
208 | if (!(s->segments & 0x01)) |
209 | color_led = 0; /* black */ |
210 | draw_horizontal_line(surface, 68, 50, 50, color_led); |
211 | draw_horizontal_line(surface, 69, 49, 51, color_led); |
212 | draw_horizontal_line(surface, 70, 48, 52, color_led); |
213 | draw_horizontal_line(surface, 71, 49, 51, color_led); |
214 | draw_horizontal_line(surface, 72, 50, 50, color_led); |
215 | } |
216 | |
217 | s->state = REDRAW_NONE; |
218 | dpy_gfx_update_full(s->con); |
219 | } |
220 | |
221 | static void jazz_led_invalidate_display(void *opaque) |
222 | { |
223 | LedState *s = opaque; |
224 | s->state |= REDRAW_SEGMENTS | REDRAW_BACKGROUND; |
225 | } |
226 | |
227 | static 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 | /* TODO: draw the segments */ |
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 | |
245 | static int jazz_led_post_load(void *opaque, int version_id) |
246 | { |
247 | /* force refresh */ |
248 | jazz_led_invalidate_display(opaque); |
249 | |
250 | return 0; |
251 | } |
252 | |
253 | static 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 | |
264 | static 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 | |
270 | static 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 | |
279 | static 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 | |
286 | static 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 | |
295 | static 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 | |
305 | static 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 | |
313 | static void jazz_led_register(void) |
314 | { |
315 | type_register_static(&jazz_led_info); |
316 | } |
317 | |
318 | type_init(jazz_led_register); |
319 | |