1 /*
2 * newport_con.c: Abscon for newport hardware
3 *
4 * (C) 1998 Thomas Bogendoerfer (tsbogend@alpha.franken.de)
5 * (C) 1999 Ulf Carlsson (ulfc@thepuffingruop.com)
6 *
7 * This driver is based on sgicons.c and cons_newport.
8 *
9 * Copyright (C) 1996 David S. Miller (dm@engr.sgi.com)
10 * Copyright (C) 1997 Miguel de Icaza (miguel@nuclecu.unam.mx)
11 */
12 #include <linux/init.h>
13 #include <linux/kernel.h>
14 #include <linux/errno.h>
15 #include <linux/tty.h>
16 #include <linux/kd.h>
17 #include <linux/selection.h>
18 #include <linux/console.h>
19 #include <linux/console_struct.h>
20 #include <linux/vt_kern.h>
21 #include <linux/mm.h>
22 #include <linux/module.h>
23
24 #include <asm/uaccess.h>
25 #include <asm/system.h>
26 #include <asm/page.h>
27 #include <asm/pgtable.h>
28 #include <video/newport.h>
29 #define INCLUDE_LINUX_LOGO_DATA
30 #include <asm/linux_logo.h>
31
32 #include <video/font.h>
33
34 #define LOGO_W 80
35 #define LOGO_H 80
36
37 extern struct fbcon_font_desc font_vga_8x16;
38
39 #define FONT_DATA ((unsigned char *)font_vga_8x16.data)
40
41 extern struct newport_regs *npregs;
42
43 static int logo_active;
44 static int topscan;
45 static int xcurs_correction = 29;
46 static int newport_xsize;
47 static int newport_ysize;
48
49 #define BMASK(c) (c << 24)
50
51 #define RENDER(regs, cp) do { \
52 (regs)->go.zpattern = BMASK((cp)[0x0]); (regs)->go.zpattern = BMASK((cp)[0x1]); \
53 (regs)->go.zpattern = BMASK((cp)[0x2]); (regs)->go.zpattern = BMASK((cp)[0x3]); \
54 (regs)->go.zpattern = BMASK((cp)[0x4]); (regs)->go.zpattern = BMASK((cp)[0x5]); \
55 (regs)->go.zpattern = BMASK((cp)[0x6]); (regs)->go.zpattern = BMASK((cp)[0x7]); \
56 (regs)->go.zpattern = BMASK((cp)[0x8]); (regs)->go.zpattern = BMASK((cp)[0x9]); \
57 (regs)->go.zpattern = BMASK((cp)[0xa]); (regs)->go.zpattern = BMASK((cp)[0xb]); \
58 (regs)->go.zpattern = BMASK((cp)[0xc]); (regs)->go.zpattern = BMASK((cp)[0xd]); \
59 (regs)->go.zpattern = BMASK((cp)[0xe]); (regs)->go.zpattern = BMASK((cp)[0xf]); \
60 } while(0)
61
62 #define TESTVAL 0xdeadbeef
63 #define XSTI_TO_FXSTART(val) (((val) & 0xffff) << 11)
64
65 static inline void newport_render_background(int xstart, int ystart,
66 int xend, int yend, int ci)
67 {
68 newport_wait();
69 npregs->set.wrmask = 0xffffffff;
70 npregs->set.drawmode0 = (NPORT_DMODE0_DRAW | NPORT_DMODE0_BLOCK |
71 NPORT_DMODE0_DOSETUP | NPORT_DMODE0_STOPX |
72 NPORT_DMODE0_STOPY);
73 npregs->set.colori = ci;
74 npregs->set.xystarti = (xstart << 16) | ((ystart + topscan) & 0x3ff);
75 npregs->go.xyendi = ((xend + 7) << 16) | ((yend + topscan + 15) & 0x3ff);
76 }
77
78 static inline void newport_init_cmap(void)
79 {
80 unsigned short i;
81
82 for(i = 0; i < 16; i++) {
83 newport_bfwait();
84 newport_cmap_setaddr(npregs, color_table[i]);
85 newport_cmap_setrgb(npregs,
86 default_red[i],
87 default_grn[i],
88 default_blu[i]);
89 }
90 }
91
92 static inline void newport_show_logo(void)
93 {
94 unsigned long i;
95
96 for(i = 0; i < LINUX_LOGO_COLORS; i++) {
97 newport_bfwait();
98 newport_cmap_setaddr(npregs, i + 0x20);
99 newport_cmap_setrgb(npregs,
100 linux_logo_red[i],
101 linux_logo_green[i],
102 linux_logo_blue[i]);
103 }
104
105 newport_wait();
106 npregs->set.drawmode0 = (NPORT_DMODE0_DRAW | NPORT_DMODE0_BLOCK |
107 NPORT_DMODE0_CHOST);
108
109 npregs->set.xystarti = ((newport_xsize - LOGO_W) << 16) | (0);
110 npregs->set.xyendi = ((newport_xsize - 1) << 16);
111 newport_wait();
112
113 for (i = 0; i < LOGO_W * LOGO_H; i++)
114 npregs->go.hostrw0 = linux_logo[i] << 24;
115 }
116
117 static inline void newport_clear_screen(int xstart, int ystart, int xend,
118 int yend, int ci) {
119 if (logo_active)
120 return;
121
122 newport_wait();
123 npregs->set.wrmask = 0xffffffff;
124 npregs->set.drawmode0 = (NPORT_DMODE0_DRAW | NPORT_DMODE0_BLOCK |
125 NPORT_DMODE0_DOSETUP | NPORT_DMODE0_STOPX |
126 NPORT_DMODE0_STOPY);
127 npregs->set.colori = ci;
128 npregs->set.xystarti = (xstart << 16) | ystart;
129 npregs->go.xyendi = (xend << 16) | yend;
130 }
131
132 static inline void newport_clear_lines(int ystart, int yend, int ci)
133 {
134 ystart = ((ystart << 4) + topscan) & 0x3ff;
135 yend = ((yend << 4) + topscan + 15) & 0x3ff;
136 newport_clear_screen (0, ystart, 1280+63, yend, ci);
137 }
138
139 void newport_reset (void)
140 {
141 unsigned short treg;
142 int i;
143
144 newport_wait();
145 treg = newport_vc2_get(npregs, VC2_IREG_CONTROL);
146 newport_vc2_set(npregs, VC2_IREG_CONTROL, (treg | VC2_CTRL_EVIDEO));
147
148 treg = newport_vc2_get(npregs, VC2_IREG_CENTRY);
149 newport_vc2_set(npregs, VC2_IREG_RADDR, treg);
150 npregs->set.dcbmode = (NPORT_DMODE_AVC2 | VC2_REGADDR_RAM |
151 NPORT_DMODE_W2 | VC2_PROTOCOL);
152 for(i = 0; i < 128; i++) {
153 newport_bfwait();
154 if (i == 92 || i == 94)
155 npregs->set.dcbdata0.byshort.s1 = 0xff00;
156 else
157 npregs->set.dcbdata0.byshort.s1 = 0x0000;
158 }
159
160 newport_init_cmap();
161
162 /* turn off popup plane */
163 npregs->set.dcbmode = (DCB_XMAP0 | R_DCB_XMAP9_PROTOCOL |
164 XM9_CRS_CONFIG | NPORT_DMODE_W1);
165 npregs->set.dcbdata0.bybytes.b3 &= ~XM9_PUPMODE;
166 npregs->set.dcbmode = (DCB_XMAP1 | R_DCB_XMAP9_PROTOCOL |
167 XM9_CRS_CONFIG | NPORT_DMODE_W1);
168 npregs->set.dcbdata0.bybytes.b3 &= ~XM9_PUPMODE;
169
170 topscan = 0;
171 npregs->cset.topscan = 0x3ff;
172 npregs->cset.xywin = (4096 << 16) | 4096;
173
174 /* Clear the screen. */
175 newport_clear_screen(0,0,1280+63,1024,0);
176 }
177
178 /*
179 * calculate the actual screen size by reading
180 * the video timing out of the VC2
181 */
182 void newport_get_screensize(void)
183 {
184 int i,cols;
185 unsigned short ventry,treg;
186 unsigned short linetable[128]; /* should be enough */
187
188 ventry = newport_vc2_get (npregs, VC2_IREG_VENTRY);
189 newport_vc2_set(npregs, VC2_IREG_RADDR, ventry);
190 npregs->set.dcbmode = (NPORT_DMODE_AVC2 | VC2_REGADDR_RAM |
191 NPORT_DMODE_W2 | VC2_PROTOCOL);
192 for(i = 0; i < 128; i++) {
193 newport_bfwait();
194 linetable[i] = npregs->set.dcbdata0.byshort.s1;
195 }
196
197 newport_xsize = newport_ysize = 0;
198 for (i = 0; linetable[i+1] && (i < sizeof(linetable)); i+=2) {
199 cols = 0;
200 newport_vc2_set(npregs, VC2_IREG_RADDR, linetable[i]);
201 npregs->set.dcbmode = (NPORT_DMODE_AVC2 | VC2_REGADDR_RAM |
202 NPORT_DMODE_W2 | VC2_PROTOCOL);
203 do {
204 newport_bfwait();
205 treg = npregs->set.dcbdata0.byshort.s1;
206 if ((treg & 1) == 0)
207 cols += (treg >> 7) & 0xfe;
208 if ((treg & 0x80) == 0) {
209 newport_bfwait();
210 treg = npregs->set.dcbdata0.byshort.s1;
211 }
212 } while ((treg & 0x8000) == 0);
213 if (cols) {
214 if (cols > newport_xsize)
215 newport_xsize = cols;
216 newport_ysize += linetable[i+1];
217 }
218 }
219 printk ("NG1: Screensize %dx%d\n",newport_xsize,newport_ysize);
220 }
221
222 static void newport_get_revisions(void)
223 {
224 unsigned int tmp;
225 unsigned int board_rev;
226 unsigned int rex3_rev;
227 unsigned int vc2_rev;
228 unsigned int cmap_rev;
229 unsigned int xmap9_rev;
230 unsigned int bt445_rev;
231 unsigned int bitplanes;
232
233 rex3_rev = npregs->cset.status & NPORT_STAT_VERS;
234
235 npregs->set.dcbmode = (DCB_CMAP0 | NCMAP_PROTOCOL |
236 NCMAP_REGADDR_RREG | NPORT_DMODE_W1);
237 tmp = npregs->set.dcbdata0.bybytes.b3;
238 cmap_rev = tmp & 7;
239 board_rev = (tmp >> 4) & 7;
240 bitplanes = ((board_rev > 1) && (tmp & 0x80)) ? 8 : 24;
241
242 npregs->set.dcbmode = (DCB_CMAP1 | NCMAP_PROTOCOL |
243 NCMAP_REGADDR_RREG | NPORT_DMODE_W1);
244 tmp = npregs->set.dcbdata0.bybytes.b3;
245 if ((tmp & 7) < cmap_rev)
246 cmap_rev = (tmp & 7);
247
248 vc2_rev = (newport_vc2_get(npregs, VC2_IREG_CONFIG) >> 5) & 7;
249
250 npregs->set.dcbmode = (DCB_XMAP0 | R_DCB_XMAP9_PROTOCOL |
251 XM9_CRS_REVISION | NPORT_DMODE_W1);
252 xmap9_rev = npregs->set.dcbdata0.bybytes.b3 & 7;
253
254 npregs->set.dcbmode = (DCB_BT445 | BT445_PROTOCOL |
255 BT445_CSR_ADDR_REG | NPORT_DMODE_W1);
256 npregs->set.dcbdata0.bybytes.b3 = BT445_REVISION_REG;
257 npregs->set.dcbmode = (DCB_BT445 | BT445_PROTOCOL |
258 BT445_CSR_REVISION | NPORT_DMODE_W1);
259 bt445_rev = (npregs->set.dcbdata0.bybytes.b3 >> 4) - 0x0a;
260
261 #define L(a) (char)('A'+(a))
262 printk ("NG1: Revision %d, %d bitplanes, REX3 revision %c, VC2 revision %c, xmap9 revision %c, cmap revision %c, bt445 revision %c\n",
263 board_rev,bitplanes,L(rex3_rev),L(vc2_rev), L(xmap9_rev),
264 L(cmap_rev ? (cmap_rev+1):0),L(bt445_rev));
265 #undef L
266
267 if (board_rev == 3) /* I don't know all affected revisions */
268 xcurs_correction = 21;
269 }
270
271 #ifdef MODULE
272 static const char *newport_startup(void)
273 #else
274 static const char * __init newport_startup(void)
275 #endif
276 {
277 struct newport_regs *p;
278
279 npregs = (struct newport_regs *) (KSEG1 + 0x1f0f0000);
280
281 p = npregs;
282 p->cset.config = NPORT_CFG_GD0;
283
284 if(newport_wait()) {
285 return NULL;
286 }
287
288 p->set.xstarti = TESTVAL; if(p->set._xstart.word != XSTI_TO_FXSTART(TESTVAL)) {
289 return NULL;
290 }
291
292 newport_reset ();
293 newport_get_revisions();
294 newport_get_screensize();
295
296 // gfx_init (display_desc);
297
298 return "SGI Newport";
299 }
300
301 static void newport_init(struct vc_data *vc, int init)
302 {
303 vc->vc_cols = newport_xsize / 8;
304 vc->vc_rows = newport_ysize / 16;
305 vc->vc_can_do_color = 1;
306 }
307
308 static void newport_clear(struct vc_data *vc, int sy, int sx, int height, int width)
309 {
310 int xend = ((sx + width) << 3) - 1;
311 int ystart = ((sy << 4) + topscan) & 0x3ff;
312 int yend = (((sy + height) << 4) + topscan - 1) & 0x3ff;
313
314 if (logo_active)
315 return;
316
317 if (ystart < yend) {
318 newport_clear_screen(sx << 3, ystart, xend, yend,
319 (vc->vc_color & 0xf0) >> 4);
320 } else {
321 newport_clear_screen(sx << 3, ystart, xend, 1023,
322 (vc->vc_color & 0xf0) >> 4);
323 newport_clear_screen(sx << 3, 0, xend, yend,
324 (vc->vc_color & 0xf0) >> 4);
325 }
326 }
327
328 static void newport_putc(struct vc_data *vc, int charattr, int ypos, int xpos)
329 {
330 unsigned char *p;
331
332 p = &FONT_DATA[(charattr & 0xff) << 4];
333 charattr = (charattr >> 8) & 0xff;
334 xpos <<= 3;
335 ypos <<= 4;
336
337 newport_render_background(xpos, ypos, xpos, ypos, (charattr & 0xf0) >> 4);
338
339 /* Set the color and drawing mode. */
340 newport_wait();
341 npregs->set.colori = charattr & 0xf;
342 npregs->set.drawmode0 = (NPORT_DMODE0_DRAW | NPORT_DMODE0_BLOCK |
343 NPORT_DMODE0_STOPX | NPORT_DMODE0_ZPENAB |
344 NPORT_DMODE0_L32);
345
346 /* Set coordinates for bitmap operation. */
347 npregs->set.xystarti = (xpos << 16) | ((ypos + topscan) & 0x3ff);
348 npregs->set.xyendi = ((xpos + 7) << 16);
349 newport_wait();
350
351 /* Go, baby, go... */
352 RENDER(npregs, p);
353 }
354
355 static void newport_putcs(struct vc_data *vc, const unsigned short *s,
356 int count, int ypos, int xpos)
357 {
358 int i;
359 int charattr;
360 unsigned char *p;
361
362 charattr = (*s >> 8) & 0xff;
363
364 xpos <<= 3;
365 ypos <<= 4;
366
367 if (!logo_active)
368 /* Clear the area behing the string */
369 newport_render_background(xpos, ypos, xpos + ((count-1) << 3), ypos,
370 (charattr & 0xf0) >> 4);
371
372 newport_wait();
373
374 /* Set the color and drawing mode. */
375 npregs->set.colori = charattr & 0xf;
376 npregs->set.drawmode0 = (NPORT_DMODE0_DRAW | NPORT_DMODE0_BLOCK |
377 NPORT_DMODE0_STOPX | NPORT_DMODE0_ZPENAB |
378 NPORT_DMODE0_L32);
379
380 for (i = 0; i < count; i++, xpos += 8) {
381 p = &FONT_DATA[(s[i] & 0xff) << 4];
382
383 newport_wait();
384
385 /* Set coordinates for bitmap operation. */
386 npregs->set.xystarti = (xpos << 16) | ((ypos + topscan) & 0x3ff);
387 npregs->set.xyendi = ((xpos + 7) << 16);
388
389 /* Go, baby, go... */
390 RENDER(npregs, p);
391 }
392 }
393
394 static void newport_cursor(struct vc_data *vc, int mode)
395 {
396 unsigned short treg;
397 int xcurs, ycurs;
398
399 switch (mode) {
400 case CM_ERASE:
401 treg = newport_vc2_get(npregs, VC2_IREG_CONTROL);
402 newport_vc2_set(npregs, VC2_IREG_CONTROL, (treg & ~(VC2_CTRL_ECDISP)));
403 break;
404
405 case CM_MOVE:
406 case CM_DRAW:
407 treg = newport_vc2_get(npregs, VC2_IREG_CONTROL);
408 newport_vc2_set(npregs, VC2_IREG_CONTROL, (treg | VC2_CTRL_ECDISP));
409 xcurs = (vc->vc_pos - vc->vc_visible_origin) / 2;
410 ycurs = ((xcurs / vc->vc_cols) << 4) + 31;
411 xcurs = ((xcurs % vc->vc_cols) << 3) + xcurs_correction;
412 newport_vc2_set(npregs, VC2_IREG_CURSX, xcurs);
413 newport_vc2_set(npregs, VC2_IREG_CURSY, ycurs);
414 }
415 }
416
417 static int newport_switch(struct vc_data *vc)
418 {
419 static int logo_drawn = 0;
420
421 topscan = 0;
422 npregs->cset.topscan = 0x3ff;
423
424 if (!logo_drawn) {
425 newport_show_logo();
426 logo_drawn = 1;
427 logo_active = 1;
428 }
429
430 return 1;
431 }
432
433 static int newport_blank(struct vc_data *c, int blank)
434 {
435 unsigned short treg;
436
437 if (blank == 0) {
438 /* unblank console */
439 treg = newport_vc2_get(npregs, VC2_IREG_CONTROL);
440 newport_vc2_set(npregs, VC2_IREG_CONTROL, (treg | VC2_CTRL_EDISP));
441 } else {
442 /* blank console */
443 treg = newport_vc2_get(npregs, VC2_IREG_CONTROL);
444 newport_vc2_set(npregs, VC2_IREG_CONTROL, (treg & ~(VC2_CTRL_EDISP)));
445 }
446 return 1;
447 }
448
449 static int newport_font_op(struct vc_data *vc, struct console_font_op *f)
450 {
451 return -ENOSYS;
452 }
453
454 static int newport_set_palette(struct vc_data *vc, unsigned char *table)
455 {
456 return -EINVAL;
457 }
458
459 static int newport_scrolldelta(struct vc_data *vc, int lines)
460 {
461 /* there is (nearly) no off-screen memory, so we can't scroll back */
462 return 0;
463 }
464
465 static int newport_scroll(struct vc_data *vc, int t, int b, int dir, int lines)
466 {
467 int count,x,y;
468 unsigned short *s, *d;
469 unsigned short chattr;
470
471 logo_active = 0; /* it's time to disable the logo now.. */
472
473 if (t == 0 && b == vc->vc_rows) {
474 if (dir == SM_UP) {
475 topscan = (topscan + (lines << 4)) & 0x3ff;
476 newport_clear_lines (vc->vc_rows-lines,vc->vc_rows-1,
477 (vc->vc_color & 0xf0) >> 4);
478 } else {
479 topscan = (topscan + (-lines << 4)) & 0x3ff;
480 newport_clear_lines (0,lines-1, (vc->vc_color & 0xf0) >> 4);
481 }
482 npregs->cset.topscan = (topscan - 1) & 0x3ff;
483 return 0;
484 }
485
486 count = (b-t-lines) * vc->vc_cols;
487 if (dir == SM_UP) {
488 x = 0; y = t;
489 s = (unsigned short *)(vc->vc_origin + vc->vc_size_row*(t+lines));
490 d = (unsigned short *)(vc->vc_origin + vc->vc_size_row*t);
491 while (count--) {
492 chattr = scr_readw (s++);
493 if (chattr != scr_readw(d)) {
494 newport_putc (vc, chattr, y, x);
495 scr_writew (chattr, d);
496 }
497 d++;
498 if (++x == vc->vc_cols) {
499 x = 0; y++;
500 }
501 }
502 d = (unsigned short *)(vc->vc_origin + vc->vc_size_row*(b-lines));
503 x = 0; y = b-lines;
504 for (count = 0; count < (lines * vc->vc_cols); count++) {
505 if (scr_readw(d) != vc->vc_video_erase_char) {
506 newport_putc (vc, vc->vc_video_erase_char, y, x);
507 scr_writew (vc->vc_video_erase_char, d);
508 }
509 d++;
510 if (++x == vc->vc_cols) {
511 x = 0; y++;
512 }
513 }
514 } else {
515 x = vc->vc_cols-1; y = b-1;
516 s = (unsigned short *)(vc->vc_origin + vc->vc_size_row*(b-lines)-2);
517 d = (unsigned short *)(vc->vc_origin + vc->vc_size_row*b-2);
518 while (count--) {
519 chattr = scr_readw (s--);
520 if (chattr != scr_readw(d)) {
521 newport_putc (vc, chattr, y, x);
522 scr_writew (chattr, d);
523 }
524 d--;
525 if (x-- == 0) {
526 x = vc->vc_cols-1; y--;
527 }
528 }
529 d = (unsigned short *)(vc->vc_origin + vc->vc_size_row*t);
530 x = 0; y = t;
531 for (count = 0; count < (lines * vc->vc_cols); count++) {
532 if (scr_readw(d) != vc->vc_video_erase_char) {
533 newport_putc (vc, vc->vc_video_erase_char, y, x);
534 scr_writew (vc->vc_video_erase_char, d);
535 }
536 d++;
537 if (++x == vc->vc_cols) {
538 x = 0; y++;
539 }
540 }
541 }
542 return 1;
543 }
544
545 static void newport_bmove(struct vc_data *vc, int sy, int sx, int dy, int dx, int h, int w)
546 {
547 short xs, ys, xe, ye, xoffs, yoffs, tmp;
548
549 xs = sx << 3; xe = ((sx+w) << 3)-1;
550 /*
551 * as bmove is only used to move stuff around in the same line
552 * (h == 1), we don't care about wrap arounds caused by topscan != 0
553 */
554 ys = ((sy << 4) + topscan) & 0x3ff; ye = (((sy+h) << 4)-1+topscan) & 0x3ff;
555 xoffs = (dx - sx) << 3;
556 yoffs = (dy - sy) << 4;
557 if (xoffs > 0) {
558 /* move to the right, exchange starting points */
559 tmp = xe; xe = xs; xs = tmp;
560 }
561 newport_wait();
562 npregs->set.drawmode0 = (NPORT_DMODE0_S2S | NPORT_DMODE0_BLOCK |
563 NPORT_DMODE0_DOSETUP | NPORT_DMODE0_STOPX |
564 NPORT_DMODE0_STOPY);
565 npregs->set.xystarti = (xs << 16) | ys;
566 npregs->set.xyendi = (xe << 16) | ye;
567 npregs->go.xymove = (xoffs << 16) | yoffs;
568 }
569
570 static int newport_dummy(struct vc_data *c)
571 {
572 return 0;
573 }
574
575 #define DUMMY (void *) newport_dummy
576
577 const struct consw newport_con = {
578 con_startup: newport_startup,
579 con_init: newport_init,
580 con_deinit: DUMMY,
581 con_clear: newport_clear,
582 con_putc: newport_putc,
583 con_putcs: newport_putcs,
584 con_cursor: newport_cursor,
585 con_scroll: newport_scroll,
586 con_bmove: newport_bmove,
587 con_switch: newport_switch,
588 con_blank: newport_blank,
589 con_font_op: newport_font_op,
590 con_set_palette: newport_set_palette,
591 con_scrolldelta: newport_scrolldelta,
592 con_set_origin: DUMMY,
593 con_save_screen: DUMMY,
594 };
595
596 #ifdef MODULE
597
598 int init_module(void) {
599 if (!newport_startup())
600 printk("Error loading SGI Newport Console driver\n");
601 else
602 printk("Loading SGI Newport Console Driver\n");
603
604 take_over_console(&newport_con,0,MAX_NR_CONSOLES-1,1);
605
606 return 0;
607 }
608
609 int cleanup_module(void) {
610 printk("Unloading SGI Newport Console Driver\n");
611 return 0;
612 }
613
614 #endif
615
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.