2 * Copyright (c) 1997 Sandro Sigala, Brescia, Italy.
3 * Copyright (c) 1997 Chris Shenton
4 * Copyright (c) 1995 S ren Schmidt
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer
12 * in this position and unchanged.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 * $FreeBSD: src/sys/modules/syscons/daemon/daemon_saver.c,v 1.18.2.2 2001/05/06 05:44:29 nyan Exp $
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/module.h>
34 #include <sys/malloc.h>
35 #include <sys/kernel.h>
36 #include <sys/sysctl.h>
37 #include <sys/consio.h>
40 #include <machine/pc/display.h>
42 #include <dev/fb/fbreg.h>
43 #include <dev/fb/splashreg.h>
44 #include <dev/syscons/syscons.h>
47 #include <pc98/pc98/pc98_machdep.h>
50 #define DAEMON_MAX_WIDTH 32
51 #define DAEMON_MAX_HEIGHT 19
53 static u_char *message;
54 static int messagelen;
57 /* Who is the author of this ASCII pic? */
59 static u_char *daemon_pic[] = {
72 "<----|====O)))==) \\) /====",
73 "<----' `--' `.__,' \\",
76 " ______( (_ / \\______/",
82 static u_char *daemon_attr[] = {
95 "YYYYYYYYYYRRRRYYR RR RYYYY",
96 "YYYYYY RRRR RRRRRR R",
99 " CCCCCCR RR R RRRRRRRR",
106 * Reverse a graphics character, or return unaltered if no mirror;
107 * should do alphanumerics too, but I'm too lazy. <cshenton@it.hq.nasa.gov>
111 xflip_symbol(u_char symbol)
113 static const u_char lchars[] = "`'(){}[]\\/<>";
114 static const u_char rchars[] = "'`)(}{][/\\><";
117 for (pos = 0; lchars[pos] != '\0'; pos++)
118 if (lchars[pos] == symbol)
125 clear_daemon(sc_softc_t *sc, int xpos, int ypos, int dxdir, int xoff, int yoff,
132 for (y = yoff; y < ylen; y++) {
133 sc_vtb_erase(&sc->cur_scp->scr,
134 (ypos + y)*sc->cur_scp->xsize + xpos + xoff,
136 sc->scr_map[0x20], (FG_LIGHTGREY | BG_BLACK) << 8);
141 draw_daemon(sc_softc_t *sc, int xpos, int ypos, int dxdir, int xoff, int yoff,
148 for (y = yoff; y < ylen; y++) {
152 px = DAEMON_MAX_WIDTH - xlen;
153 if (px >= strlen(daemon_pic[y]))
155 for (x = xoff; (x < xlen) && (daemon_pic[y][px] != '\0'); x++, px++) {
156 switch (daemon_attr[y][px]) {
158 case 'R': attr = (FG_LIGHTRED|BG_BLACK)<<8; break;
159 case 'Y': attr = (FG_YELLOW|BG_BLACK)<<8; break;
160 case 'B': attr = (FG_LIGHTBLUE|BG_BLACK)<<8; break;
161 case 'W': attr = (FG_LIGHTGREY|BG_BLACK)<<8; break;
162 case 'C': attr = (FG_CYAN|BG_BLACK)<<8; break;
163 default: attr = (FG_WHITE|BG_BLACK)<<8; break;
165 case 'R': attr = (FG_RED|BG_BLACK)<<8; break;
166 case 'Y': attr = (FG_BROWN|BG_BLACK)<<8; break;
167 case 'B': attr = (FG_BLUE|BG_BLACK)<<8; break;
168 case 'W': attr = (FG_LIGHTGREY|BG_BLACK)<<8; break;
169 case 'C': attr = (FG_CYAN|BG_BLACK)<<8; break;
170 default: attr = (FG_LIGHTGREY|BG_BLACK)<<8; break;
173 if (dxdir < 0) { /* Moving left */
174 sc_vtb_putc(&sc->cur_scp->scr,
175 (ypos + y)*sc->cur_scp->xsize
177 sc->scr_map[daemon_pic[y][px]],
179 } else { /* Moving right */
180 sc_vtb_putc(&sc->cur_scp->scr,
181 (ypos + y)*sc->cur_scp->xsize
182 + xpos + DAEMON_MAX_WIDTH
184 sc->scr_map[xflip_symbol(daemon_pic[y][px])],
192 clear_string(sc_softc_t *sc, int xpos, int ypos, int xoff, char *s, int len)
196 sc_vtb_erase(&sc->cur_scp->scr,
197 ypos*sc->cur_scp->xsize + xpos + xoff, len - xoff,
198 sc->scr_map[0x20], (FG_LIGHTGREY | BG_BLACK) << 8);
202 draw_string(sc_softc_t *sc, int xpos, int ypos, int xoff, u_char *s, int len)
206 for (x = xoff; x < len; x++) {
208 sc_vtb_putc(&sc->cur_scp->scr,
209 ypos*sc->cur_scp->xsize + xpos + x,
210 sc->scr_map[s[x]], (FG_GREEN | BG_BLACK) << 8);
212 sc_vtb_putc(&sc->cur_scp->scr,
213 ypos*sc->cur_scp->xsize + xpos + x,
214 sc->scr_map[s[x]], (FG_LIGHTGREEN | BG_BLACK) << 8);
220 daemon_saver(video_adapter_t *adp, int blank)
222 static int txpos = 10, typos = 10;
223 static int txdir = -1, tydir = -1;
224 static int dxpos = 0, dypos = 0;
225 static int dxdir = 1, dydir = 1;
226 static int moved_daemon = 0;
227 static int xoff, yoff, toff;
228 static int xlen, ylen, tlen;
233 sc = sc_find_softc(adp, NULL);
239 if (adp->va_info.vi_flags & V_INFO_GRAPHICS)
243 if (epson_machine_id == 0x20) {
245 outb(0x0c17, inb(0xc17) & ~0x08);
249 /* clear the screen and set the border color */
250 sc_vtb_clear(&scp->scr, sc->scr_map[0x20],
251 (FG_LIGHTGREY | BG_BLACK) << 8);
252 (*vidsw[adp->va_index]->set_hw_cursor)(adp, -1, -1);
253 sc_set_border(scp, 0);
254 xlen = ylen = tlen = 0;
260 clear_daemon(sc, dxpos, dypos, dxdir, xoff, yoff, xlen, ylen);
261 clear_string(sc, txpos, typos, toff, message, tlen);
263 if (++moved_daemon) {
265 * The daemon picture may be off the screen, if
266 * screen size is chagened while the screen
267 * saver is inactive. Make sure the origin of
268 * the picture is between min and max.
270 if (scp->xsize <= DAEMON_MAX_WIDTH) {
272 * If the screen width is too narrow, we
273 * allow part of the picture go off
274 * the screen so that the daemon won't
277 min = scp->xsize - DAEMON_MAX_WIDTH - 10;
281 max = scp->xsize - DAEMON_MAX_WIDTH;
286 } else if (dxpos >= max) {
291 if (scp->ysize <= DAEMON_MAX_HEIGHT) {
292 min = scp->ysize - DAEMON_MAX_HEIGHT - 10;
296 max = scp->ysize - DAEMON_MAX_HEIGHT;
301 } else if (dypos >= max) {
307 dxpos += dxdir; dypos += dydir;
309 /* clip the picture */
311 xlen = DAEMON_MAX_WIDTH;
312 if (dxpos + xlen <= 0)
316 if (dxpos >= scp->xsize)
318 else if (dxpos + xlen > scp->xsize)
319 xlen = scp->xsize - dxpos;
321 ylen = DAEMON_MAX_HEIGHT;
322 if (dypos + ylen <= 0)
326 if (dypos >= scp->ysize)
328 else if (dypos + ylen > scp->ysize)
329 ylen = scp->ysize - dypos;
332 if (scp->xsize <= messagelen) {
333 min = scp->xsize - messagelen - 10;
337 max = scp->xsize - messagelen;
342 } else if (txpos >= max) {
349 } else if (typos >= scp->ysize - 1) {
350 typos = scp->ysize - 1;
353 txpos += txdir; typos += tydir;
357 if (txpos + tlen <= 0)
361 if (txpos >= scp->xsize)
363 else if (txpos + tlen > scp->xsize)
364 tlen = scp->xsize - txpos;
366 draw_daemon(sc, dxpos, dypos, dxdir, xoff, yoff, xlen, ylen);
367 draw_string(sc, txpos, typos, toff, message, tlen);
370 if (epson_machine_id == 0x20) {
372 outb(0x0c17, inb(0xc17) | 0x08);
382 daemon_init(video_adapter_t *adp)
384 messagelen = strlen(hostname) + 3 + strlen(ostype) + 1 +
386 message = malloc(messagelen + 1, M_DEVBUF, M_WAITOK);
387 sprintf(message, "%s - %s %s", hostname, ostype, osrelease);
393 daemon_term(video_adapter_t *adp)
395 free(message, M_DEVBUF);
399 static scrn_saver_t daemon_module = {
400 "daemon_saver", daemon_init, daemon_term, daemon_saver, NULL,
403 SAVER_MODULE(daemon_saver, daemon_module);