29
30#include <sys/param.h>
31#include <sys/systm.h>
32#include <sys/module.h>
33#include <sys/bus.h>
34#include <sys/kernel.h>
35#include <sys/sysctl.h>
36#include <sys/limits.h>
37#include <sys/conf.h>
38#include <sys/cons.h>
39#include <sys/proc.h>
40#include <sys/fcntl.h>
41#include <sys/malloc.h>
42#include <sys/fbio.h>
43#include <sys/consio.h>
44
45#include <machine/bus.h>
46#include <machine/sc_machdep.h>
47
48#include <sys/rman.h>
49
50#include <dev/fb/fbreg.h>
51#include <dev/syscons/syscons.h>
52
53#include <dev/ofw/openfirm.h>
54#include <dev/ofw/ofw_bus.h>
55#include <dev/ofw/ofw_pci.h>
56#include <powerpc/ofw/ofw_syscons.h>
57
58static int ofwfb_ignore_mmap_checks;
59SYSCTL_NODE(_hw, OID_AUTO, ofwfb, CTLFLAG_RD, 0, "ofwfb");
60SYSCTL_INT(_hw_ofwfb, OID_AUTO, relax_mmap, CTLFLAG_RW,
61 &ofwfb_ignore_mmap_checks, 0, "relax mmap bounds checking");
62
63extern u_char dflt_font_16[];
64extern u_char dflt_font_14[];
65extern u_char dflt_font_8[];
66
67static int ofwfb_configure(int flags);
68
69static vi_probe_t ofwfb_probe;
70static vi_init_t ofwfb_init;
71static vi_get_info_t ofwfb_get_info;
72static vi_query_mode_t ofwfb_query_mode;
73static vi_set_mode_t ofwfb_set_mode;
74static vi_save_font_t ofwfb_save_font;
75static vi_load_font_t ofwfb_load_font;
76static vi_show_font_t ofwfb_show_font;
77static vi_save_palette_t ofwfb_save_palette;
78static vi_load_palette_t ofwfb_load_palette;
79static vi_set_border_t ofwfb_set_border;
80static vi_save_state_t ofwfb_save_state;
81static vi_load_state_t ofwfb_load_state;
82static vi_set_win_org_t ofwfb_set_win_org;
83static vi_read_hw_cursor_t ofwfb_read_hw_cursor;
84static vi_set_hw_cursor_t ofwfb_set_hw_cursor;
85static vi_set_hw_cursor_shape_t ofwfb_set_hw_cursor_shape;
86static vi_blank_display_t ofwfb_blank_display;
87static vi_mmap_t ofwfb_mmap;
88static vi_ioctl_t ofwfb_ioctl;
89static vi_clear_t ofwfb_clear;
90static vi_fill_rect_t ofwfb_fill_rect;
91static vi_bitblt_t ofwfb_bitblt;
92static vi_diag_t ofwfb_diag;
93static vi_save_cursor_palette_t ofwfb_save_cursor_palette;
94static vi_load_cursor_palette_t ofwfb_load_cursor_palette;
95static vi_copy_t ofwfb_copy;
96static vi_putp_t ofwfb_putp;
97static vi_putc_t ofwfb_putc;
98static vi_puts_t ofwfb_puts;
99static vi_putm_t ofwfb_putm;
100
101static video_switch_t ofwfbvidsw = {
102 .probe = ofwfb_probe,
103 .init = ofwfb_init,
104 .get_info = ofwfb_get_info,
105 .query_mode = ofwfb_query_mode,
106 .set_mode = ofwfb_set_mode,
107 .save_font = ofwfb_save_font,
108 .load_font = ofwfb_load_font,
109 .show_font = ofwfb_show_font,
110 .save_palette = ofwfb_save_palette,
111 .load_palette = ofwfb_load_palette,
112 .set_border = ofwfb_set_border,
113 .save_state = ofwfb_save_state,
114 .load_state = ofwfb_load_state,
115 .set_win_org = ofwfb_set_win_org,
116 .read_hw_cursor = ofwfb_read_hw_cursor,
117 .set_hw_cursor = ofwfb_set_hw_cursor,
118 .set_hw_cursor_shape = ofwfb_set_hw_cursor_shape,
119 .blank_display = ofwfb_blank_display,
120 .mmap = ofwfb_mmap,
121 .ioctl = ofwfb_ioctl,
122 .clear = ofwfb_clear,
123 .fill_rect = ofwfb_fill_rect,
124 .bitblt = ofwfb_bitblt,
125 .diag = ofwfb_diag,
126 .save_cursor_palette = ofwfb_save_cursor_palette,
127 .load_cursor_palette = ofwfb_load_cursor_palette,
128 .copy = ofwfb_copy,
129 .putp = ofwfb_putp,
130 .putc = ofwfb_putc,
131 .puts = ofwfb_puts,
132 .putm = ofwfb_putm,
133};
134
135/*
136 * bitmap depth-specific routines
137 */
138static vi_blank_display_t ofwfb_blank_display8;
139static vi_putc_t ofwfb_putc8;
140static vi_putm_t ofwfb_putm8;
141static vi_set_border_t ofwfb_set_border8;
142
143static vi_blank_display_t ofwfb_blank_display32;
144static vi_putc_t ofwfb_putc32;
145static vi_putm_t ofwfb_putm32;
146static vi_set_border_t ofwfb_set_border32;
147
148VIDEO_DRIVER(ofwfb, ofwfbvidsw, ofwfb_configure);
149
150extern sc_rndr_sw_t txtrndrsw;
151RENDERER(ofwfb, 0, txtrndrsw, gfb_set);
152
153RENDERER_MODULE(ofwfb, gfb_set);
154
155/*
156 * Define the iso6429-1983 colormap
157 */
158static struct {
159 uint8_t red;
160 uint8_t green;
161 uint8_t blue;
162} ofwfb_cmap[16] = { /* # R G B Color */
163 /* - - - - ----- */
164 { 0x00, 0x00, 0x00 }, /* 0 0 0 0 Black */
165 { 0x00, 0x00, 0xaa }, /* 1 0 0 2/3 Blue */
166 { 0x00, 0xaa, 0x00 }, /* 2 0 2/3 0 Green */
167 { 0x00, 0xaa, 0xaa }, /* 3 0 2/3 2/3 Cyan */
168 { 0xaa, 0x00, 0x00 }, /* 4 2/3 0 0 Red */
169 { 0xaa, 0x00, 0xaa }, /* 5 2/3 0 2/3 Magenta */
170 { 0xaa, 0x55, 0x00 }, /* 6 2/3 1/3 0 Brown */
171 { 0xaa, 0xaa, 0xaa }, /* 7 2/3 2/3 2/3 White */
172 { 0x55, 0x55, 0x55 }, /* 8 1/3 1/3 1/3 Gray */
173 { 0x55, 0x55, 0xff }, /* 9 1/3 1/3 1 Bright Blue */
174 { 0x55, 0xff, 0x55 }, /* 10 1/3 1 1/3 Bright Green */
175 { 0x55, 0xff, 0xff }, /* 11 1/3 1 1 Bright Cyan */
176 { 0xff, 0x55, 0x55 }, /* 12 1 1/3 1/3 Bright Red */
177 { 0xff, 0x55, 0xff }, /* 13 1 1/3 1 Bright Magenta */
178 { 0xff, 0xff, 0x80 }, /* 14 1 1 1/3 Bright Yellow */
179 { 0xff, 0xff, 0xff } /* 15 1 1 1 Bright White */
180};
181
182#define TODO printf("%s: unimplemented\n", __func__)
183
184static u_int16_t ofwfb_static_window[ROW*COL];
185
186static struct ofwfb_softc ofwfb_softc;
187
188static __inline int
189ofwfb_background(uint8_t attr)
190{
191 return (attr >> 4);
192}
193
194static __inline int
195ofwfb_foreground(uint8_t attr)
196{
197 return (attr & 0x0f);
198}
199
200static u_int
201ofwfb_pix32(int attr)
202{
203 u_int retval;
204
205 retval = (ofwfb_cmap[attr].blue << 16) |
206 (ofwfb_cmap[attr].green << 8) |
207 ofwfb_cmap[attr].red;
208
209 return (retval);
210}
211
212static int
213ofwfb_configure(int flags)
214{
215 struct ofwfb_softc *sc;
216 phandle_t chosen;
217 ihandle_t stdout;
218 phandle_t node;
219 bus_addr_t fb_phys;
220 int depth;
221 int disable;
222 int len;
223 char type[16];
224 static int done = 0;
225
226 disable = 0;
227 TUNABLE_INT_FETCH("hw.syscons.disable", &disable);
228 if (disable != 0)
229 return (0);
230
231 if (done != 0)
232 return (0);
233 done = 1;
234
235 sc = &ofwfb_softc;
236
237 chosen = OF_finddevice("/chosen");
238 OF_getprop(chosen, "stdout", &stdout, sizeof(stdout));
239 node = OF_instance_to_package(stdout);
240 if (node == -1) {
241 /*
242 * The "/chosen/stdout" does not exist try
243 * using "screen" directly.
244 */
245 node = OF_finddevice("screen");
246 }
247 OF_getprop(node, "device_type", type, sizeof(type));
248 if (strcmp(type, "display") != 0)
249 return (0);
250
251 /* Only support 8 and 32-bit framebuffers */
252 OF_getprop(node, "depth", &depth, sizeof(depth));
253 if (depth == 8) {
254 sc->sc_blank = ofwfb_blank_display8;
255 sc->sc_putc = ofwfb_putc8;
256 sc->sc_putm = ofwfb_putm8;
257 sc->sc_set_border = ofwfb_set_border8;
258 } else if (depth == 32) {
259 sc->sc_blank = ofwfb_blank_display32;
260 sc->sc_putc = ofwfb_putc32;
261 sc->sc_putm = ofwfb_putm32;
262 sc->sc_set_border = ofwfb_set_border32;
263 } else
264 return (0);
265
266 sc->sc_depth = depth;
267 sc->sc_node = node;
268 sc->sc_console = 1;
269 OF_getprop(node, "height", &sc->sc_height, sizeof(sc->sc_height));
270 OF_getprop(node, "width", &sc->sc_width, sizeof(sc->sc_width));
271 OF_getprop(node, "linebytes", &sc->sc_stride, sizeof(sc->sc_stride));
272
273 /*
274 * Grab the physical address of the framebuffer, and then map it
275 * into our memory space. If the MMU is not yet up, it will be
276 * remapped for us when relocation turns on.
277 *
278 * XXX We assume #address-cells is 1 at this point.
279 */
280 OF_getprop(node, "address", &fb_phys, sizeof(fb_phys));
281
282 bus_space_map(&bs_be_tag, fb_phys, sc->sc_height * sc->sc_stride,
283 0, &sc->sc_addr);
284
285 /*
286 * Get the PCI addresses of the adapter. The node may be the
287 * child of the PCI device: in that case, try the parent for
288 * the assigned-addresses property.
289 */
290 len = OF_getprop(node, "assigned-addresses", sc->sc_pciaddrs,
291 sizeof(sc->sc_pciaddrs));
292 if (len == -1) {
293 len = OF_getprop(OF_parent(node), "assigned-addresses",
294 sc->sc_pciaddrs, sizeof(sc->sc_pciaddrs));
295 }
296
297 if (len != -1) {
298 sc->sc_num_pciaddrs = len / sizeof(struct ofw_pci_register);
299 }
300
301 ofwfb_init(0, &sc->sc_va, 0);
302
303 return (0);
304}
305
306static int
307ofwfb_probe(int unit, video_adapter_t **adp, void *arg, int flags)
308{
309 TODO;
310 return (0);
311}
312
313static int
314ofwfb_init(int unit, video_adapter_t *adp, int flags)
315{
316 struct ofwfb_softc *sc;
317 video_info_t *vi;
318 int cborder;
319 int font_height;
320
321 sc = (struct ofwfb_softc *)adp;
322 vi = &adp->va_info;
323
324 vid_init_struct(adp, "ofwfb", -1, unit);
325
326 /* The default font size can be overridden by loader */
327 font_height = 16;
328 TUNABLE_INT_FETCH("hw.syscons.fsize", &font_height);
329 if (font_height == 8) {
330 sc->sc_font = dflt_font_8;
331 sc->sc_font_height = 8;
332 } else if (font_height == 14) {
333 sc->sc_font = dflt_font_14;
334 sc->sc_font_height = 14;
335 } else {
336 /* default is 8x16 */
337 sc->sc_font = dflt_font_16;
338 sc->sc_font_height = 16;
339 }
340
341 /* The user can set a border in chars - default is 1 char width */
342 cborder = 1;
343 TUNABLE_INT_FETCH("hw.syscons.border", &cborder);
344
345 vi->vi_cheight = sc->sc_font_height;
346 vi->vi_width = sc->sc_width/8 - 2*cborder;
347 vi->vi_height = sc->sc_height/sc->sc_font_height - 2*cborder;
348 vi->vi_cwidth = 8;
349
350 /*
351 * Clamp width/height to syscons maximums
352 */
353 if (vi->vi_width > COL)
354 vi->vi_width = COL;
355 if (vi->vi_height > ROW)
356 vi->vi_height = ROW;
357
358 sc->sc_xmargin = (sc->sc_width - (vi->vi_width * vi->vi_cwidth)) / 2;
359 sc->sc_ymargin = (sc->sc_height - (vi->vi_height * vi->vi_cheight))/2;
360
361 /*
362 * Avoid huge amounts of conditional code in syscons by
363 * defining a dummy h/w text display buffer.
364 */
365 adp->va_window = (vm_offset_t) ofwfb_static_window;
366
367 /*
368 * Enable future font-loading and flag color support, as well as
369 * adding V_ADP_MODECHANGE so that we ofwfb_set_mode() gets called
370 * when the X server shuts down. This enables us to get the console
371 * back when X disappears.
372 */
373 adp->va_flags |= V_ADP_FONT | V_ADP_COLOR | V_ADP_MODECHANGE;
374
375 ofwfb_set_mode(&sc->sc_va, 0);
376
377 vid_register(&sc->sc_va);
378
379 return (0);
380}
381
382static int
383ofwfb_get_info(video_adapter_t *adp, int mode, video_info_t *info)
384{
385 bcopy(&adp->va_info, info, sizeof(*info));
386 return (0);
387}
388
389static int
390ofwfb_query_mode(video_adapter_t *adp, video_info_t *info)
391{
392 TODO;
393 return (0);
394}
395
396static int
397ofwfb_set_mode(video_adapter_t *adp, int mode)
398{
399 struct ofwfb_softc *sc;
400 char name[64];
401 ihandle_t ih;
402 int i, retval;
403
404 sc = (struct ofwfb_softc *)adp;
405
406 /*
407 * Open the display device, which will initialize it.
408 */
409
410 memset(name, 0, sizeof(name));
411 OF_package_to_path(sc->sc_node, name, sizeof(name));
412 ih = OF_open(name);
413
414 if (sc->sc_depth == 8) {
415 /*
416 * Install the ISO6429 colormap - older OFW systems
417 * don't do this by default
418 */
419 for (i = 0; i < 16; i++) {
420 OF_call_method("color!", ih, 4, 1,
421 ofwfb_cmap[i].red,
422 ofwfb_cmap[i].green,
423 ofwfb_cmap[i].blue,
424 i,
425 &retval);
426 }
427 }
428
429 ofwfb_blank_display(&sc->sc_va, V_DISPLAY_ON);
430
431 return (0);
432}
433
434static int
435ofwfb_save_font(video_adapter_t *adp, int page, int size, int width,
436 u_char *data, int c, int count)
437{
438 TODO;
439 return (0);
440}
441
442static int
443ofwfb_load_font(video_adapter_t *adp, int page, int size, int width,
444 u_char *data, int c, int count)
445{
446 struct ofwfb_softc *sc;
447
448 sc = (struct ofwfb_softc *)adp;
449
450 /*
451 * syscons code has already determined that current width/height
452 * are unchanged for this new font
453 */
454 sc->sc_font = data;
455 return (0);
456}
457
458static int
459ofwfb_show_font(video_adapter_t *adp, int page)
460{
461
462 return (0);
463}
464
465static int
466ofwfb_save_palette(video_adapter_t *adp, u_char *palette)
467{
468 /* TODO; */
469 return (0);
470}
471
472static int
473ofwfb_load_palette(video_adapter_t *adp, u_char *palette)
474{
475 /* TODO; */
476 return (0);
477}
478
479static int
480ofwfb_set_border8(video_adapter_t *adp, int border)
481{
482 struct ofwfb_softc *sc;
483 int i, j;
484 uint8_t *addr;
485 uint8_t bground;
486
487 sc = (struct ofwfb_softc *)adp;
488
489 bground = ofwfb_background(border);
490
491 /* Set top margin */
492 addr = (uint8_t *) sc->sc_addr;
493 for (i = 0; i < sc->sc_ymargin; i++) {
494 for (j = 0; j < sc->sc_width; j++) {
495 *(addr + j) = bground;
496 }
497 addr += sc->sc_stride;
498 }
499
500 /* bottom margin */
501 addr = (uint8_t *) sc->sc_addr + (sc->sc_height - sc->sc_ymargin)*sc->sc_stride;
502 for (i = 0; i < sc->sc_ymargin; i++) {
503 for (j = 0; j < sc->sc_width; j++) {
504 *(addr + j) = bground;
505 }
506 addr += sc->sc_stride;
507 }
508
509 /* remaining left and right borders */
510 addr = (uint8_t *) sc->sc_addr + sc->sc_ymargin*sc->sc_stride;
511 for (i = 0; i < sc->sc_height - 2*sc->sc_xmargin; i++) {
512 for (j = 0; j < sc->sc_xmargin; j++) {
513 *(addr + j) = bground;
514 *(addr + j + sc->sc_width - sc->sc_xmargin) = bground;
515 }
516 addr += sc->sc_stride;
517 }
518
519 return (0);
520}
521
522static int
523ofwfb_set_border32(video_adapter_t *adp, int border)
524{
525 /* XXX Be lazy for now and blank entire screen */
526 return (ofwfb_blank_display32(adp, border));
527}
528
529static int
530ofwfb_set_border(video_adapter_t *adp, int border)
531{
532 struct ofwfb_softc *sc;
533
534 sc = (struct ofwfb_softc *)adp;
535
536 return ((*sc->sc_set_border)(adp, border));
537}
538
539static int
540ofwfb_save_state(video_adapter_t *adp, void *p, size_t size)
541{
542 TODO;
543 return (0);
544}
545
546static int
547ofwfb_load_state(video_adapter_t *adp, void *p)
548{
549 TODO;
550 return (0);
551}
552
553static int
554ofwfb_set_win_org(video_adapter_t *adp, off_t offset)
555{
556 TODO;
557 return (0);
558}
559
560static int
561ofwfb_read_hw_cursor(video_adapter_t *adp, int *col, int *row)
562{
563 *col = 0;
564 *row = 0;
565
566 return (0);
567}
568
569static int
570ofwfb_set_hw_cursor(video_adapter_t *adp, int col, int row)
571{
572
573 return (0);
574}
575
576static int
577ofwfb_set_hw_cursor_shape(video_adapter_t *adp, int base, int height,
578 int celsize, int blink)
579{
580 return (0);
581}
582
583static int
584ofwfb_blank_display8(video_adapter_t *adp, int mode)
585{
586 struct ofwfb_softc *sc;
587 int i;
588 uint8_t *addr;
589
590 sc = (struct ofwfb_softc *)adp;
591 addr = (uint8_t *) sc->sc_addr;
592
593 /* Could be done a lot faster e.g. 32-bits, or Altivec'd */
594 for (i = 0; i < sc->sc_stride*sc->sc_height; i++)
595 *(addr + i) = ofwfb_background(SC_NORM_ATTR);
596
597 return (0);
598}
599
600static int
601ofwfb_blank_display32(video_adapter_t *adp, int mode)
602{
603 struct ofwfb_softc *sc;
604 int i;
605 uint32_t *addr;
606
607 sc = (struct ofwfb_softc *)adp;
608 addr = (uint32_t *) sc->sc_addr;
609
610 for (i = 0; i < (sc->sc_stride/4)*sc->sc_height; i++)
611 *(addr + i) = ofwfb_pix32(ofwfb_background(SC_NORM_ATTR));
612
613 return (0);
614}
615
616static int
617ofwfb_blank_display(video_adapter_t *adp, int mode)
618{
619 struct ofwfb_softc *sc;
620
621 sc = (struct ofwfb_softc *)adp;
622
623 return ((*sc->sc_blank)(adp, mode));
624}
625
626static int
| 29
30#include <sys/param.h>
31#include <sys/systm.h>
32#include <sys/module.h>
33#include <sys/bus.h>
34#include <sys/kernel.h>
35#include <sys/sysctl.h>
36#include <sys/limits.h>
37#include <sys/conf.h>
38#include <sys/cons.h>
39#include <sys/proc.h>
40#include <sys/fcntl.h>
41#include <sys/malloc.h>
42#include <sys/fbio.h>
43#include <sys/consio.h>
44
45#include <machine/bus.h>
46#include <machine/sc_machdep.h>
47
48#include <sys/rman.h>
49
50#include <dev/fb/fbreg.h>
51#include <dev/syscons/syscons.h>
52
53#include <dev/ofw/openfirm.h>
54#include <dev/ofw/ofw_bus.h>
55#include <dev/ofw/ofw_pci.h>
56#include <powerpc/ofw/ofw_syscons.h>
57
58static int ofwfb_ignore_mmap_checks;
59SYSCTL_NODE(_hw, OID_AUTO, ofwfb, CTLFLAG_RD, 0, "ofwfb");
60SYSCTL_INT(_hw_ofwfb, OID_AUTO, relax_mmap, CTLFLAG_RW,
61 &ofwfb_ignore_mmap_checks, 0, "relax mmap bounds checking");
62
63extern u_char dflt_font_16[];
64extern u_char dflt_font_14[];
65extern u_char dflt_font_8[];
66
67static int ofwfb_configure(int flags);
68
69static vi_probe_t ofwfb_probe;
70static vi_init_t ofwfb_init;
71static vi_get_info_t ofwfb_get_info;
72static vi_query_mode_t ofwfb_query_mode;
73static vi_set_mode_t ofwfb_set_mode;
74static vi_save_font_t ofwfb_save_font;
75static vi_load_font_t ofwfb_load_font;
76static vi_show_font_t ofwfb_show_font;
77static vi_save_palette_t ofwfb_save_palette;
78static vi_load_palette_t ofwfb_load_palette;
79static vi_set_border_t ofwfb_set_border;
80static vi_save_state_t ofwfb_save_state;
81static vi_load_state_t ofwfb_load_state;
82static vi_set_win_org_t ofwfb_set_win_org;
83static vi_read_hw_cursor_t ofwfb_read_hw_cursor;
84static vi_set_hw_cursor_t ofwfb_set_hw_cursor;
85static vi_set_hw_cursor_shape_t ofwfb_set_hw_cursor_shape;
86static vi_blank_display_t ofwfb_blank_display;
87static vi_mmap_t ofwfb_mmap;
88static vi_ioctl_t ofwfb_ioctl;
89static vi_clear_t ofwfb_clear;
90static vi_fill_rect_t ofwfb_fill_rect;
91static vi_bitblt_t ofwfb_bitblt;
92static vi_diag_t ofwfb_diag;
93static vi_save_cursor_palette_t ofwfb_save_cursor_palette;
94static vi_load_cursor_palette_t ofwfb_load_cursor_palette;
95static vi_copy_t ofwfb_copy;
96static vi_putp_t ofwfb_putp;
97static vi_putc_t ofwfb_putc;
98static vi_puts_t ofwfb_puts;
99static vi_putm_t ofwfb_putm;
100
101static video_switch_t ofwfbvidsw = {
102 .probe = ofwfb_probe,
103 .init = ofwfb_init,
104 .get_info = ofwfb_get_info,
105 .query_mode = ofwfb_query_mode,
106 .set_mode = ofwfb_set_mode,
107 .save_font = ofwfb_save_font,
108 .load_font = ofwfb_load_font,
109 .show_font = ofwfb_show_font,
110 .save_palette = ofwfb_save_palette,
111 .load_palette = ofwfb_load_palette,
112 .set_border = ofwfb_set_border,
113 .save_state = ofwfb_save_state,
114 .load_state = ofwfb_load_state,
115 .set_win_org = ofwfb_set_win_org,
116 .read_hw_cursor = ofwfb_read_hw_cursor,
117 .set_hw_cursor = ofwfb_set_hw_cursor,
118 .set_hw_cursor_shape = ofwfb_set_hw_cursor_shape,
119 .blank_display = ofwfb_blank_display,
120 .mmap = ofwfb_mmap,
121 .ioctl = ofwfb_ioctl,
122 .clear = ofwfb_clear,
123 .fill_rect = ofwfb_fill_rect,
124 .bitblt = ofwfb_bitblt,
125 .diag = ofwfb_diag,
126 .save_cursor_palette = ofwfb_save_cursor_palette,
127 .load_cursor_palette = ofwfb_load_cursor_palette,
128 .copy = ofwfb_copy,
129 .putp = ofwfb_putp,
130 .putc = ofwfb_putc,
131 .puts = ofwfb_puts,
132 .putm = ofwfb_putm,
133};
134
135/*
136 * bitmap depth-specific routines
137 */
138static vi_blank_display_t ofwfb_blank_display8;
139static vi_putc_t ofwfb_putc8;
140static vi_putm_t ofwfb_putm8;
141static vi_set_border_t ofwfb_set_border8;
142
143static vi_blank_display_t ofwfb_blank_display32;
144static vi_putc_t ofwfb_putc32;
145static vi_putm_t ofwfb_putm32;
146static vi_set_border_t ofwfb_set_border32;
147
148VIDEO_DRIVER(ofwfb, ofwfbvidsw, ofwfb_configure);
149
150extern sc_rndr_sw_t txtrndrsw;
151RENDERER(ofwfb, 0, txtrndrsw, gfb_set);
152
153RENDERER_MODULE(ofwfb, gfb_set);
154
155/*
156 * Define the iso6429-1983 colormap
157 */
158static struct {
159 uint8_t red;
160 uint8_t green;
161 uint8_t blue;
162} ofwfb_cmap[16] = { /* # R G B Color */
163 /* - - - - ----- */
164 { 0x00, 0x00, 0x00 }, /* 0 0 0 0 Black */
165 { 0x00, 0x00, 0xaa }, /* 1 0 0 2/3 Blue */
166 { 0x00, 0xaa, 0x00 }, /* 2 0 2/3 0 Green */
167 { 0x00, 0xaa, 0xaa }, /* 3 0 2/3 2/3 Cyan */
168 { 0xaa, 0x00, 0x00 }, /* 4 2/3 0 0 Red */
169 { 0xaa, 0x00, 0xaa }, /* 5 2/3 0 2/3 Magenta */
170 { 0xaa, 0x55, 0x00 }, /* 6 2/3 1/3 0 Brown */
171 { 0xaa, 0xaa, 0xaa }, /* 7 2/3 2/3 2/3 White */
172 { 0x55, 0x55, 0x55 }, /* 8 1/3 1/3 1/3 Gray */
173 { 0x55, 0x55, 0xff }, /* 9 1/3 1/3 1 Bright Blue */
174 { 0x55, 0xff, 0x55 }, /* 10 1/3 1 1/3 Bright Green */
175 { 0x55, 0xff, 0xff }, /* 11 1/3 1 1 Bright Cyan */
176 { 0xff, 0x55, 0x55 }, /* 12 1 1/3 1/3 Bright Red */
177 { 0xff, 0x55, 0xff }, /* 13 1 1/3 1 Bright Magenta */
178 { 0xff, 0xff, 0x80 }, /* 14 1 1 1/3 Bright Yellow */
179 { 0xff, 0xff, 0xff } /* 15 1 1 1 Bright White */
180};
181
182#define TODO printf("%s: unimplemented\n", __func__)
183
184static u_int16_t ofwfb_static_window[ROW*COL];
185
186static struct ofwfb_softc ofwfb_softc;
187
188static __inline int
189ofwfb_background(uint8_t attr)
190{
191 return (attr >> 4);
192}
193
194static __inline int
195ofwfb_foreground(uint8_t attr)
196{
197 return (attr & 0x0f);
198}
199
200static u_int
201ofwfb_pix32(int attr)
202{
203 u_int retval;
204
205 retval = (ofwfb_cmap[attr].blue << 16) |
206 (ofwfb_cmap[attr].green << 8) |
207 ofwfb_cmap[attr].red;
208
209 return (retval);
210}
211
212static int
213ofwfb_configure(int flags)
214{
215 struct ofwfb_softc *sc;
216 phandle_t chosen;
217 ihandle_t stdout;
218 phandle_t node;
219 bus_addr_t fb_phys;
220 int depth;
221 int disable;
222 int len;
223 char type[16];
224 static int done = 0;
225
226 disable = 0;
227 TUNABLE_INT_FETCH("hw.syscons.disable", &disable);
228 if (disable != 0)
229 return (0);
230
231 if (done != 0)
232 return (0);
233 done = 1;
234
235 sc = &ofwfb_softc;
236
237 chosen = OF_finddevice("/chosen");
238 OF_getprop(chosen, "stdout", &stdout, sizeof(stdout));
239 node = OF_instance_to_package(stdout);
240 if (node == -1) {
241 /*
242 * The "/chosen/stdout" does not exist try
243 * using "screen" directly.
244 */
245 node = OF_finddevice("screen");
246 }
247 OF_getprop(node, "device_type", type, sizeof(type));
248 if (strcmp(type, "display") != 0)
249 return (0);
250
251 /* Only support 8 and 32-bit framebuffers */
252 OF_getprop(node, "depth", &depth, sizeof(depth));
253 if (depth == 8) {
254 sc->sc_blank = ofwfb_blank_display8;
255 sc->sc_putc = ofwfb_putc8;
256 sc->sc_putm = ofwfb_putm8;
257 sc->sc_set_border = ofwfb_set_border8;
258 } else if (depth == 32) {
259 sc->sc_blank = ofwfb_blank_display32;
260 sc->sc_putc = ofwfb_putc32;
261 sc->sc_putm = ofwfb_putm32;
262 sc->sc_set_border = ofwfb_set_border32;
263 } else
264 return (0);
265
266 sc->sc_depth = depth;
267 sc->sc_node = node;
268 sc->sc_console = 1;
269 OF_getprop(node, "height", &sc->sc_height, sizeof(sc->sc_height));
270 OF_getprop(node, "width", &sc->sc_width, sizeof(sc->sc_width));
271 OF_getprop(node, "linebytes", &sc->sc_stride, sizeof(sc->sc_stride));
272
273 /*
274 * Grab the physical address of the framebuffer, and then map it
275 * into our memory space. If the MMU is not yet up, it will be
276 * remapped for us when relocation turns on.
277 *
278 * XXX We assume #address-cells is 1 at this point.
279 */
280 OF_getprop(node, "address", &fb_phys, sizeof(fb_phys));
281
282 bus_space_map(&bs_be_tag, fb_phys, sc->sc_height * sc->sc_stride,
283 0, &sc->sc_addr);
284
285 /*
286 * Get the PCI addresses of the adapter. The node may be the
287 * child of the PCI device: in that case, try the parent for
288 * the assigned-addresses property.
289 */
290 len = OF_getprop(node, "assigned-addresses", sc->sc_pciaddrs,
291 sizeof(sc->sc_pciaddrs));
292 if (len == -1) {
293 len = OF_getprop(OF_parent(node), "assigned-addresses",
294 sc->sc_pciaddrs, sizeof(sc->sc_pciaddrs));
295 }
296
297 if (len != -1) {
298 sc->sc_num_pciaddrs = len / sizeof(struct ofw_pci_register);
299 }
300
301 ofwfb_init(0, &sc->sc_va, 0);
302
303 return (0);
304}
305
306static int
307ofwfb_probe(int unit, video_adapter_t **adp, void *arg, int flags)
308{
309 TODO;
310 return (0);
311}
312
313static int
314ofwfb_init(int unit, video_adapter_t *adp, int flags)
315{
316 struct ofwfb_softc *sc;
317 video_info_t *vi;
318 int cborder;
319 int font_height;
320
321 sc = (struct ofwfb_softc *)adp;
322 vi = &adp->va_info;
323
324 vid_init_struct(adp, "ofwfb", -1, unit);
325
326 /* The default font size can be overridden by loader */
327 font_height = 16;
328 TUNABLE_INT_FETCH("hw.syscons.fsize", &font_height);
329 if (font_height == 8) {
330 sc->sc_font = dflt_font_8;
331 sc->sc_font_height = 8;
332 } else if (font_height == 14) {
333 sc->sc_font = dflt_font_14;
334 sc->sc_font_height = 14;
335 } else {
336 /* default is 8x16 */
337 sc->sc_font = dflt_font_16;
338 sc->sc_font_height = 16;
339 }
340
341 /* The user can set a border in chars - default is 1 char width */
342 cborder = 1;
343 TUNABLE_INT_FETCH("hw.syscons.border", &cborder);
344
345 vi->vi_cheight = sc->sc_font_height;
346 vi->vi_width = sc->sc_width/8 - 2*cborder;
347 vi->vi_height = sc->sc_height/sc->sc_font_height - 2*cborder;
348 vi->vi_cwidth = 8;
349
350 /*
351 * Clamp width/height to syscons maximums
352 */
353 if (vi->vi_width > COL)
354 vi->vi_width = COL;
355 if (vi->vi_height > ROW)
356 vi->vi_height = ROW;
357
358 sc->sc_xmargin = (sc->sc_width - (vi->vi_width * vi->vi_cwidth)) / 2;
359 sc->sc_ymargin = (sc->sc_height - (vi->vi_height * vi->vi_cheight))/2;
360
361 /*
362 * Avoid huge amounts of conditional code in syscons by
363 * defining a dummy h/w text display buffer.
364 */
365 adp->va_window = (vm_offset_t) ofwfb_static_window;
366
367 /*
368 * Enable future font-loading and flag color support, as well as
369 * adding V_ADP_MODECHANGE so that we ofwfb_set_mode() gets called
370 * when the X server shuts down. This enables us to get the console
371 * back when X disappears.
372 */
373 adp->va_flags |= V_ADP_FONT | V_ADP_COLOR | V_ADP_MODECHANGE;
374
375 ofwfb_set_mode(&sc->sc_va, 0);
376
377 vid_register(&sc->sc_va);
378
379 return (0);
380}
381
382static int
383ofwfb_get_info(video_adapter_t *adp, int mode, video_info_t *info)
384{
385 bcopy(&adp->va_info, info, sizeof(*info));
386 return (0);
387}
388
389static int
390ofwfb_query_mode(video_adapter_t *adp, video_info_t *info)
391{
392 TODO;
393 return (0);
394}
395
396static int
397ofwfb_set_mode(video_adapter_t *adp, int mode)
398{
399 struct ofwfb_softc *sc;
400 char name[64];
401 ihandle_t ih;
402 int i, retval;
403
404 sc = (struct ofwfb_softc *)adp;
405
406 /*
407 * Open the display device, which will initialize it.
408 */
409
410 memset(name, 0, sizeof(name));
411 OF_package_to_path(sc->sc_node, name, sizeof(name));
412 ih = OF_open(name);
413
414 if (sc->sc_depth == 8) {
415 /*
416 * Install the ISO6429 colormap - older OFW systems
417 * don't do this by default
418 */
419 for (i = 0; i < 16; i++) {
420 OF_call_method("color!", ih, 4, 1,
421 ofwfb_cmap[i].red,
422 ofwfb_cmap[i].green,
423 ofwfb_cmap[i].blue,
424 i,
425 &retval);
426 }
427 }
428
429 ofwfb_blank_display(&sc->sc_va, V_DISPLAY_ON);
430
431 return (0);
432}
433
434static int
435ofwfb_save_font(video_adapter_t *adp, int page, int size, int width,
436 u_char *data, int c, int count)
437{
438 TODO;
439 return (0);
440}
441
442static int
443ofwfb_load_font(video_adapter_t *adp, int page, int size, int width,
444 u_char *data, int c, int count)
445{
446 struct ofwfb_softc *sc;
447
448 sc = (struct ofwfb_softc *)adp;
449
450 /*
451 * syscons code has already determined that current width/height
452 * are unchanged for this new font
453 */
454 sc->sc_font = data;
455 return (0);
456}
457
458static int
459ofwfb_show_font(video_adapter_t *adp, int page)
460{
461
462 return (0);
463}
464
465static int
466ofwfb_save_palette(video_adapter_t *adp, u_char *palette)
467{
468 /* TODO; */
469 return (0);
470}
471
472static int
473ofwfb_load_palette(video_adapter_t *adp, u_char *palette)
474{
475 /* TODO; */
476 return (0);
477}
478
479static int
480ofwfb_set_border8(video_adapter_t *adp, int border)
481{
482 struct ofwfb_softc *sc;
483 int i, j;
484 uint8_t *addr;
485 uint8_t bground;
486
487 sc = (struct ofwfb_softc *)adp;
488
489 bground = ofwfb_background(border);
490
491 /* Set top margin */
492 addr = (uint8_t *) sc->sc_addr;
493 for (i = 0; i < sc->sc_ymargin; i++) {
494 for (j = 0; j < sc->sc_width; j++) {
495 *(addr + j) = bground;
496 }
497 addr += sc->sc_stride;
498 }
499
500 /* bottom margin */
501 addr = (uint8_t *) sc->sc_addr + (sc->sc_height - sc->sc_ymargin)*sc->sc_stride;
502 for (i = 0; i < sc->sc_ymargin; i++) {
503 for (j = 0; j < sc->sc_width; j++) {
504 *(addr + j) = bground;
505 }
506 addr += sc->sc_stride;
507 }
508
509 /* remaining left and right borders */
510 addr = (uint8_t *) sc->sc_addr + sc->sc_ymargin*sc->sc_stride;
511 for (i = 0; i < sc->sc_height - 2*sc->sc_xmargin; i++) {
512 for (j = 0; j < sc->sc_xmargin; j++) {
513 *(addr + j) = bground;
514 *(addr + j + sc->sc_width - sc->sc_xmargin) = bground;
515 }
516 addr += sc->sc_stride;
517 }
518
519 return (0);
520}
521
522static int
523ofwfb_set_border32(video_adapter_t *adp, int border)
524{
525 /* XXX Be lazy for now and blank entire screen */
526 return (ofwfb_blank_display32(adp, border));
527}
528
529static int
530ofwfb_set_border(video_adapter_t *adp, int border)
531{
532 struct ofwfb_softc *sc;
533
534 sc = (struct ofwfb_softc *)adp;
535
536 return ((*sc->sc_set_border)(adp, border));
537}
538
539static int
540ofwfb_save_state(video_adapter_t *adp, void *p, size_t size)
541{
542 TODO;
543 return (0);
544}
545
546static int
547ofwfb_load_state(video_adapter_t *adp, void *p)
548{
549 TODO;
550 return (0);
551}
552
553static int
554ofwfb_set_win_org(video_adapter_t *adp, off_t offset)
555{
556 TODO;
557 return (0);
558}
559
560static int
561ofwfb_read_hw_cursor(video_adapter_t *adp, int *col, int *row)
562{
563 *col = 0;
564 *row = 0;
565
566 return (0);
567}
568
569static int
570ofwfb_set_hw_cursor(video_adapter_t *adp, int col, int row)
571{
572
573 return (0);
574}
575
576static int
577ofwfb_set_hw_cursor_shape(video_adapter_t *adp, int base, int height,
578 int celsize, int blink)
579{
580 return (0);
581}
582
583static int
584ofwfb_blank_display8(video_adapter_t *adp, int mode)
585{
586 struct ofwfb_softc *sc;
587 int i;
588 uint8_t *addr;
589
590 sc = (struct ofwfb_softc *)adp;
591 addr = (uint8_t *) sc->sc_addr;
592
593 /* Could be done a lot faster e.g. 32-bits, or Altivec'd */
594 for (i = 0; i < sc->sc_stride*sc->sc_height; i++)
595 *(addr + i) = ofwfb_background(SC_NORM_ATTR);
596
597 return (0);
598}
599
600static int
601ofwfb_blank_display32(video_adapter_t *adp, int mode)
602{
603 struct ofwfb_softc *sc;
604 int i;
605 uint32_t *addr;
606
607 sc = (struct ofwfb_softc *)adp;
608 addr = (uint32_t *) sc->sc_addr;
609
610 for (i = 0; i < (sc->sc_stride/4)*sc->sc_height; i++)
611 *(addr + i) = ofwfb_pix32(ofwfb_background(SC_NORM_ATTR));
612
613 return (0);
614}
615
616static int
617ofwfb_blank_display(video_adapter_t *adp, int mode)
618{
619 struct ofwfb_softc *sc;
620
621 sc = (struct ofwfb_softc *)adp;
622
623 return ((*sc->sc_blank)(adp, mode));
624}
625
626static int
|
629{
630 struct ofwfb_softc *sc;
631 int i;
632
633 sc = (struct ofwfb_softc *)adp;
634
635 if (sc->sc_num_pciaddrs == 0)
636 return (ENOMEM);
637
638 /*
639 * Hack for Radeon...
640 */
641 if (ofwfb_ignore_mmap_checks) {
642 *paddr = offset;
643 return (0);
644 }
645
646 /*
647 * Make sure the requested address lies within the PCI device's assigned addrs
648 */
649 for (i = 0; i < sc->sc_num_pciaddrs; i++)
650 if (offset >= sc->sc_pciaddrs[i].phys_lo &&
651 offset < (sc->sc_pciaddrs[i].phys_lo + sc->sc_pciaddrs[i].size_lo)) {
652 *paddr = offset;
653 return (0);
654 }
655
656 /*
657 * This might be a legacy VGA mem request: if so, just point it at the
658 * framebuffer, since it shouldn't be touched
659 */
660 if (offset < sc->sc_stride*sc->sc_height) {
661 *paddr = sc->sc_addr + offset;
662 return (0);
663 }
664
665 return (EINVAL);
666}
667
668static int
669ofwfb_ioctl(video_adapter_t *adp, u_long cmd, caddr_t data)
670{
671
672 return (0);
673}
674
675static int
676ofwfb_clear(video_adapter_t *adp)
677{
678 TODO;
679 return (0);
680}
681
682static int
683ofwfb_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
684{
685 TODO;
686 return (0);
687}
688
689static int
690ofwfb_bitblt(video_adapter_t *adp, ...)
691{
692 TODO;
693 return (0);
694}
695
696static int
697ofwfb_diag(video_adapter_t *adp, int level)
698{
699 TODO;
700 return (0);
701}
702
703static int
704ofwfb_save_cursor_palette(video_adapter_t *adp, u_char *palette)
705{
706 TODO;
707 return (0);
708}
709
710static int
711ofwfb_load_cursor_palette(video_adapter_t *adp, u_char *palette)
712{
713 TODO;
714 return (0);
715}
716
717static int
718ofwfb_copy(video_adapter_t *adp, vm_offset_t src, vm_offset_t dst, int n)
719{
720 TODO;
721 return (0);
722}
723
724static int
725ofwfb_putp(video_adapter_t *adp, vm_offset_t off, uint32_t p, uint32_t a,
726 int size, int bpp, int bit_ltor, int byte_ltor)
727{
728 TODO;
729 return (0);
730}
731
732static int
733ofwfb_putc8(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
734{
735 struct ofwfb_softc *sc;
736 int row;
737 int col;
738 int i;
739 uint32_t *addr;
740 u_char *p, fg, bg;
741 union {
742 uint32_t l;
743 uint8_t c[4];
744 } ch1, ch2;
745
746
747 sc = (struct ofwfb_softc *)adp;
748 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight;
749 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth;
750 p = sc->sc_font + c*sc->sc_font_height;
751 addr = (u_int32_t *)((int)sc->sc_addr
752 + (row + sc->sc_ymargin)*sc->sc_stride
753 + col + sc->sc_xmargin);
754
755 fg = ofwfb_foreground(a);
756 bg = ofwfb_background(a);
757
758 for (i = 0; i < sc->sc_font_height; i++) {
759 u_char fline = p[i];
760
761 /*
762 * Assume that there is more background than foreground
763 * in characters and init accordingly
764 */
765 ch1.l = ch2.l = (bg << 24) | (bg << 16) | (bg << 8) | bg;
766
767 /*
768 * Calculate 2 x 4-chars at a time, and then
769 * write these out.
770 */
771 if (fline & 0x80) ch1.c[0] = fg;
772 if (fline & 0x40) ch1.c[1] = fg;
773 if (fline & 0x20) ch1.c[2] = fg;
774 if (fline & 0x10) ch1.c[3] = fg;
775
776 if (fline & 0x08) ch2.c[0] = fg;
777 if (fline & 0x04) ch2.c[1] = fg;
778 if (fline & 0x02) ch2.c[2] = fg;
779 if (fline & 0x01) ch2.c[3] = fg;
780
781 addr[0] = ch1.l;
782 addr[1] = ch2.l;
783 addr += (sc->sc_stride / sizeof(u_int32_t));
784 }
785
786 return (0);
787}
788
789static int
790ofwfb_putc32(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
791{
792 struct ofwfb_softc *sc;
793 int row;
794 int col;
795 int i, j, k;
796 uint32_t *addr;
797 u_char *p;
798
799 sc = (struct ofwfb_softc *)adp;
800 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight;
801 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth;
802 p = sc->sc_font + c*sc->sc_font_height;
803 addr = (uint32_t *)sc->sc_addr
804 + (row + sc->sc_ymargin)*(sc->sc_stride/4)
805 + col + sc->sc_xmargin;
806
807 for (i = 0; i < sc->sc_font_height; i++) {
808 for (j = 0, k = 7; j < 8; j++, k--) {
809 if ((p[i] & (1 << k)) == 0)
810 *(addr + j) = ofwfb_pix32(ofwfb_background(a));
811 else
812 *(addr + j) = ofwfb_pix32(ofwfb_foreground(a));
813 }
814 addr += (sc->sc_stride/4);
815 }
816
817 return (0);
818}
819
820static int
821ofwfb_putc(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
822{
823 struct ofwfb_softc *sc;
824
825 sc = (struct ofwfb_softc *)adp;
826
827 return ((*sc->sc_putc)(adp, off, c, a));
828}
829
830static int
831ofwfb_puts(video_adapter_t *adp, vm_offset_t off, u_int16_t *s, int len)
832{
833 int i;
834
835 for (i = 0; i < len; i++) {
836 ofwfb_putc(adp, off + i, s[i] & 0xff, (s[i] & 0xff00) >> 8);
837 }
838 return (0);
839}
840
841static int
842ofwfb_putm(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
843 uint32_t pixel_mask, int size, int width)
844{
845 struct ofwfb_softc *sc;
846
847 sc = (struct ofwfb_softc *)adp;
848
849 return ((*sc->sc_putm)(adp, x, y, pixel_image, pixel_mask, size,
850 width));
851}
852
853static int
854ofwfb_putm8(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
855 uint32_t pixel_mask, int size, int width)
856{
857 struct ofwfb_softc *sc;
858 int i, j, k;
859 uint32_t *addr;
860 u_char fg, bg;
861 union {
862 uint32_t l[2];
863 uint8_t c[8];
864 } ch;
865
866
867 sc = (struct ofwfb_softc *)adp;
868 addr = (u_int32_t *)((int)sc->sc_addr
869 + (y + sc->sc_ymargin)*sc->sc_stride
870 + x + sc->sc_xmargin);
871
872 fg = ofwfb_foreground(SC_NORM_ATTR);
873 bg = ofwfb_background(SC_NORM_ATTR);
874
875 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) {
876 /*
877 * Use the current values for the line
878 */
879 ch.l[0] = addr[0];
880 ch.l[1] = addr[1];
881
882 /*
883 * Calculate 2 x 4-chars at a time, and then
884 * write these out.
885 */
886 for (j = 0, k = width; j < 8; j++, k--) {
887 if (x + j >= sc->sc_width - 2*sc->sc_xmargin)
888 continue;
889
890 if (pixel_image[i] & (1 << k))
891 ch.c[j] = (ch.c[j] == fg) ? bg : fg;
892 }
893
894 addr[0] = ch.l[0];
895 addr[1] = ch.l[1];
896 addr += (sc->sc_stride / sizeof(u_int32_t));
897 }
898
899 return (0);
900}
901
902static int
903ofwfb_putm32(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
904 uint32_t pixel_mask, int size, int width)
905{
906 struct ofwfb_softc *sc;
907 int i, j, k;
908 uint32_t fg, bg;
909 uint32_t *addr;
910
911 sc = (struct ofwfb_softc *)adp;
912 addr = (uint32_t *)sc->sc_addr
913 + (y + sc->sc_ymargin)*(sc->sc_stride/4)
914 + x + sc->sc_xmargin;
915
916 fg = ofwfb_pix32(ofwfb_foreground(SC_NORM_ATTR));
917 bg = ofwfb_pix32(ofwfb_background(SC_NORM_ATTR));
918
919 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) {
920 for (j = 0, k = width; j < 8; j++, k--) {
921 if (x + j >= sc->sc_width - 2*sc->sc_xmargin)
922 continue;
923
924 if (pixel_image[i] & (1 << k))
925 *(addr + j) = (*(addr + j) == fg) ? bg : fg;
926 }
927 addr += (sc->sc_stride/4);
928 }
929
930 return (0);
931}
932
933/*
934 * Define the syscons nexus device attachment
935 */
936static void
937ofwfb_scidentify(driver_t *driver, device_t parent)
938{
939 device_t child;
940
941 /*
942 * Add with a priority guaranteed to make it last on
943 * the device list
944 */
945 child = BUS_ADD_CHILD(parent, INT_MAX, SC_DRIVER_NAME, 0);
946}
947
948static int
949ofwfb_scprobe(device_t dev)
950{
951 int error;
952
953 device_set_desc(dev, "System console");
954
955 error = sc_probe_unit(device_get_unit(dev),
956 device_get_flags(dev) | SC_AUTODETECT_KBD);
957 if (error != 0)
958 return (error);
959
960 /* This is a fake device, so make sure we added it ourselves */
961 return (BUS_PROBE_NOWILDCARD);
962}
963
964static int
965ofwfb_scattach(device_t dev)
966{
967 return (sc_attach_unit(device_get_unit(dev),
968 device_get_flags(dev) | SC_AUTODETECT_KBD));
969}
970
971static device_method_t ofwfb_sc_methods[] = {
972 DEVMETHOD(device_identify, ofwfb_scidentify),
973 DEVMETHOD(device_probe, ofwfb_scprobe),
974 DEVMETHOD(device_attach, ofwfb_scattach),
975 { 0, 0 }
976};
977
978static driver_t ofwfb_sc_driver = {
979 SC_DRIVER_NAME,
980 ofwfb_sc_methods,
981 sizeof(sc_softc_t),
982};
983
984static devclass_t sc_devclass;
985
986DRIVER_MODULE(sc, nexus, ofwfb_sc_driver, sc_devclass, 0, 0);
987
988/*
989 * Define a stub keyboard driver in case one hasn't been
990 * compiled into the kernel
991 */
992#include <sys/kbio.h>
993#include <dev/kbd/kbdreg.h>
994
995static int dummy_kbd_configure(int flags);
996
997keyboard_switch_t dummysw;
998
999static int
1000dummy_kbd_configure(int flags)
1001{
1002
1003 return (0);
1004}
1005KEYBOARD_DRIVER(dummy, dummysw, dummy_kbd_configure);
1006
1007/*
1008 * Utility routines from <dev/fb/fbreg.h>
1009 */
1010void
1011ofwfb_bcopy(const void *s, void *d, size_t c)
1012{
1013 bcopy(s, d, c);
1014}
1015
1016void
1017ofwfb_bzero(void *d, size_t c)
1018{
1019 bzero(d, c);
1020}
1021
1022void
1023ofwfb_fillw(int pat, void *base, size_t cnt)
1024{
1025 u_int16_t *bptr = base;
1026
1027 while (cnt--)
1028 *bptr++ = pat;
1029}
1030
1031u_int16_t
1032ofwfb_readw(u_int16_t *addr)
1033{
1034 return (*addr);
1035}
1036
1037void
1038ofwfb_writew(u_int16_t *addr, u_int16_t val)
1039{
1040 *addr = val;
1041}
| 629{
630 struct ofwfb_softc *sc;
631 int i;
632
633 sc = (struct ofwfb_softc *)adp;
634
635 if (sc->sc_num_pciaddrs == 0)
636 return (ENOMEM);
637
638 /*
639 * Hack for Radeon...
640 */
641 if (ofwfb_ignore_mmap_checks) {
642 *paddr = offset;
643 return (0);
644 }
645
646 /*
647 * Make sure the requested address lies within the PCI device's assigned addrs
648 */
649 for (i = 0; i < sc->sc_num_pciaddrs; i++)
650 if (offset >= sc->sc_pciaddrs[i].phys_lo &&
651 offset < (sc->sc_pciaddrs[i].phys_lo + sc->sc_pciaddrs[i].size_lo)) {
652 *paddr = offset;
653 return (0);
654 }
655
656 /*
657 * This might be a legacy VGA mem request: if so, just point it at the
658 * framebuffer, since it shouldn't be touched
659 */
660 if (offset < sc->sc_stride*sc->sc_height) {
661 *paddr = sc->sc_addr + offset;
662 return (0);
663 }
664
665 return (EINVAL);
666}
667
668static int
669ofwfb_ioctl(video_adapter_t *adp, u_long cmd, caddr_t data)
670{
671
672 return (0);
673}
674
675static int
676ofwfb_clear(video_adapter_t *adp)
677{
678 TODO;
679 return (0);
680}
681
682static int
683ofwfb_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
684{
685 TODO;
686 return (0);
687}
688
689static int
690ofwfb_bitblt(video_adapter_t *adp, ...)
691{
692 TODO;
693 return (0);
694}
695
696static int
697ofwfb_diag(video_adapter_t *adp, int level)
698{
699 TODO;
700 return (0);
701}
702
703static int
704ofwfb_save_cursor_palette(video_adapter_t *adp, u_char *palette)
705{
706 TODO;
707 return (0);
708}
709
710static int
711ofwfb_load_cursor_palette(video_adapter_t *adp, u_char *palette)
712{
713 TODO;
714 return (0);
715}
716
717static int
718ofwfb_copy(video_adapter_t *adp, vm_offset_t src, vm_offset_t dst, int n)
719{
720 TODO;
721 return (0);
722}
723
724static int
725ofwfb_putp(video_adapter_t *adp, vm_offset_t off, uint32_t p, uint32_t a,
726 int size, int bpp, int bit_ltor, int byte_ltor)
727{
728 TODO;
729 return (0);
730}
731
732static int
733ofwfb_putc8(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
734{
735 struct ofwfb_softc *sc;
736 int row;
737 int col;
738 int i;
739 uint32_t *addr;
740 u_char *p, fg, bg;
741 union {
742 uint32_t l;
743 uint8_t c[4];
744 } ch1, ch2;
745
746
747 sc = (struct ofwfb_softc *)adp;
748 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight;
749 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth;
750 p = sc->sc_font + c*sc->sc_font_height;
751 addr = (u_int32_t *)((int)sc->sc_addr
752 + (row + sc->sc_ymargin)*sc->sc_stride
753 + col + sc->sc_xmargin);
754
755 fg = ofwfb_foreground(a);
756 bg = ofwfb_background(a);
757
758 for (i = 0; i < sc->sc_font_height; i++) {
759 u_char fline = p[i];
760
761 /*
762 * Assume that there is more background than foreground
763 * in characters and init accordingly
764 */
765 ch1.l = ch2.l = (bg << 24) | (bg << 16) | (bg << 8) | bg;
766
767 /*
768 * Calculate 2 x 4-chars at a time, and then
769 * write these out.
770 */
771 if (fline & 0x80) ch1.c[0] = fg;
772 if (fline & 0x40) ch1.c[1] = fg;
773 if (fline & 0x20) ch1.c[2] = fg;
774 if (fline & 0x10) ch1.c[3] = fg;
775
776 if (fline & 0x08) ch2.c[0] = fg;
777 if (fline & 0x04) ch2.c[1] = fg;
778 if (fline & 0x02) ch2.c[2] = fg;
779 if (fline & 0x01) ch2.c[3] = fg;
780
781 addr[0] = ch1.l;
782 addr[1] = ch2.l;
783 addr += (sc->sc_stride / sizeof(u_int32_t));
784 }
785
786 return (0);
787}
788
789static int
790ofwfb_putc32(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
791{
792 struct ofwfb_softc *sc;
793 int row;
794 int col;
795 int i, j, k;
796 uint32_t *addr;
797 u_char *p;
798
799 sc = (struct ofwfb_softc *)adp;
800 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight;
801 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth;
802 p = sc->sc_font + c*sc->sc_font_height;
803 addr = (uint32_t *)sc->sc_addr
804 + (row + sc->sc_ymargin)*(sc->sc_stride/4)
805 + col + sc->sc_xmargin;
806
807 for (i = 0; i < sc->sc_font_height; i++) {
808 for (j = 0, k = 7; j < 8; j++, k--) {
809 if ((p[i] & (1 << k)) == 0)
810 *(addr + j) = ofwfb_pix32(ofwfb_background(a));
811 else
812 *(addr + j) = ofwfb_pix32(ofwfb_foreground(a));
813 }
814 addr += (sc->sc_stride/4);
815 }
816
817 return (0);
818}
819
820static int
821ofwfb_putc(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a)
822{
823 struct ofwfb_softc *sc;
824
825 sc = (struct ofwfb_softc *)adp;
826
827 return ((*sc->sc_putc)(adp, off, c, a));
828}
829
830static int
831ofwfb_puts(video_adapter_t *adp, vm_offset_t off, u_int16_t *s, int len)
832{
833 int i;
834
835 for (i = 0; i < len; i++) {
836 ofwfb_putc(adp, off + i, s[i] & 0xff, (s[i] & 0xff00) >> 8);
837 }
838 return (0);
839}
840
841static int
842ofwfb_putm(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
843 uint32_t pixel_mask, int size, int width)
844{
845 struct ofwfb_softc *sc;
846
847 sc = (struct ofwfb_softc *)adp;
848
849 return ((*sc->sc_putm)(adp, x, y, pixel_image, pixel_mask, size,
850 width));
851}
852
853static int
854ofwfb_putm8(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
855 uint32_t pixel_mask, int size, int width)
856{
857 struct ofwfb_softc *sc;
858 int i, j, k;
859 uint32_t *addr;
860 u_char fg, bg;
861 union {
862 uint32_t l[2];
863 uint8_t c[8];
864 } ch;
865
866
867 sc = (struct ofwfb_softc *)adp;
868 addr = (u_int32_t *)((int)sc->sc_addr
869 + (y + sc->sc_ymargin)*sc->sc_stride
870 + x + sc->sc_xmargin);
871
872 fg = ofwfb_foreground(SC_NORM_ATTR);
873 bg = ofwfb_background(SC_NORM_ATTR);
874
875 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) {
876 /*
877 * Use the current values for the line
878 */
879 ch.l[0] = addr[0];
880 ch.l[1] = addr[1];
881
882 /*
883 * Calculate 2 x 4-chars at a time, and then
884 * write these out.
885 */
886 for (j = 0, k = width; j < 8; j++, k--) {
887 if (x + j >= sc->sc_width - 2*sc->sc_xmargin)
888 continue;
889
890 if (pixel_image[i] & (1 << k))
891 ch.c[j] = (ch.c[j] == fg) ? bg : fg;
892 }
893
894 addr[0] = ch.l[0];
895 addr[1] = ch.l[1];
896 addr += (sc->sc_stride / sizeof(u_int32_t));
897 }
898
899 return (0);
900}
901
902static int
903ofwfb_putm32(video_adapter_t *adp, int x, int y, uint8_t *pixel_image,
904 uint32_t pixel_mask, int size, int width)
905{
906 struct ofwfb_softc *sc;
907 int i, j, k;
908 uint32_t fg, bg;
909 uint32_t *addr;
910
911 sc = (struct ofwfb_softc *)adp;
912 addr = (uint32_t *)sc->sc_addr
913 + (y + sc->sc_ymargin)*(sc->sc_stride/4)
914 + x + sc->sc_xmargin;
915
916 fg = ofwfb_pix32(ofwfb_foreground(SC_NORM_ATTR));
917 bg = ofwfb_pix32(ofwfb_background(SC_NORM_ATTR));
918
919 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) {
920 for (j = 0, k = width; j < 8; j++, k--) {
921 if (x + j >= sc->sc_width - 2*sc->sc_xmargin)
922 continue;
923
924 if (pixel_image[i] & (1 << k))
925 *(addr + j) = (*(addr + j) == fg) ? bg : fg;
926 }
927 addr += (sc->sc_stride/4);
928 }
929
930 return (0);
931}
932
933/*
934 * Define the syscons nexus device attachment
935 */
936static void
937ofwfb_scidentify(driver_t *driver, device_t parent)
938{
939 device_t child;
940
941 /*
942 * Add with a priority guaranteed to make it last on
943 * the device list
944 */
945 child = BUS_ADD_CHILD(parent, INT_MAX, SC_DRIVER_NAME, 0);
946}
947
948static int
949ofwfb_scprobe(device_t dev)
950{
951 int error;
952
953 device_set_desc(dev, "System console");
954
955 error = sc_probe_unit(device_get_unit(dev),
956 device_get_flags(dev) | SC_AUTODETECT_KBD);
957 if (error != 0)
958 return (error);
959
960 /* This is a fake device, so make sure we added it ourselves */
961 return (BUS_PROBE_NOWILDCARD);
962}
963
964static int
965ofwfb_scattach(device_t dev)
966{
967 return (sc_attach_unit(device_get_unit(dev),
968 device_get_flags(dev) | SC_AUTODETECT_KBD));
969}
970
971static device_method_t ofwfb_sc_methods[] = {
972 DEVMETHOD(device_identify, ofwfb_scidentify),
973 DEVMETHOD(device_probe, ofwfb_scprobe),
974 DEVMETHOD(device_attach, ofwfb_scattach),
975 { 0, 0 }
976};
977
978static driver_t ofwfb_sc_driver = {
979 SC_DRIVER_NAME,
980 ofwfb_sc_methods,
981 sizeof(sc_softc_t),
982};
983
984static devclass_t sc_devclass;
985
986DRIVER_MODULE(sc, nexus, ofwfb_sc_driver, sc_devclass, 0, 0);
987
988/*
989 * Define a stub keyboard driver in case one hasn't been
990 * compiled into the kernel
991 */
992#include <sys/kbio.h>
993#include <dev/kbd/kbdreg.h>
994
995static int dummy_kbd_configure(int flags);
996
997keyboard_switch_t dummysw;
998
999static int
1000dummy_kbd_configure(int flags)
1001{
1002
1003 return (0);
1004}
1005KEYBOARD_DRIVER(dummy, dummysw, dummy_kbd_configure);
1006
1007/*
1008 * Utility routines from <dev/fb/fbreg.h>
1009 */
1010void
1011ofwfb_bcopy(const void *s, void *d, size_t c)
1012{
1013 bcopy(s, d, c);
1014}
1015
1016void
1017ofwfb_bzero(void *d, size_t c)
1018{
1019 bzero(d, c);
1020}
1021
1022void
1023ofwfb_fillw(int pat, void *base, size_t cnt)
1024{
1025 u_int16_t *bptr = base;
1026
1027 while (cnt--)
1028 *bptr++ = pat;
1029}
1030
1031u_int16_t
1032ofwfb_readw(u_int16_t *addr)
1033{
1034 return (*addr);
1035}
1036
1037void
1038ofwfb_writew(u_int16_t *addr, u_int16_t val)
1039{
1040 *addr = val;
1041}
|