1 /*- 2 * Copyright (c) 1995-1998 S�ren Schmidt 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer, 10 * without modification, immediately at the beginning of the file. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission. 16 * 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. 27 * 28 * $FreeBSD$ 29 */ 30 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> 38 #include <sys/fbio.h> 39 40 #include <machine/pc/display.h> 41 42 #include <dev/fb/fbreg.h> 43 #include <dev/fb/splashreg.h> 44 #include <dev/syscons/syscons.h> 45 46 #ifdef PC98 47 #include <pc98/pc98/pc98_machdep.h> 48 #endif 49 50 static u_char *message; 51 static int *messagep; 52 static int messagelen; 53 static int blanked; 54 55 static int 56 snake_saver(video_adapter_t *adp, int blank) 57 { 58 static int dirx, diry; 59 int f; 60 sc_softc_t *sc; 61 scr_stat *scp; 62 63 /* XXX hack for minimal changes. */ 64 #define save message 65 #define savs messagep 66 67 sc = sc_find_softc(adp, NULL); 68 if (sc == NULL) 69 return EAGAIN; 70 scp = sc->cur_scp; 71 72 if (blank) { 73 if (adp->va_info.vi_flags & V_INFO_GRAPHICS) 74 return EAGAIN; 75 if (blanked <= 0) { 76 #ifdef PC98 77 if (epson_machine_id == 0x20) { 78 outb(0x43f, 0x42); 79 outb(0x0c17, inb(0xc17) & ~0x08); 80 outb(0x43f, 0x40); 81 } 82 #endif /* PC98 */ 83 sc_vtb_clear(&scp->scr, sc->scr_map[0x20], 84 (FG_LIGHTGREY | BG_BLACK) << 8); 85 (*vidsw[adp->va_index]->set_hw_cursor)(adp, -1, -1); 86 sc_set_border(scp, 0); 87 dirx = (scp->xpos ? 1 : -1); 88 diry = (scp->ypos ? 89 scp->xsize : -scp->xsize); 90 for (f=0; f< messagelen; f++) 91 savs[f] = scp->xpos + scp->ypos*scp->xsize; 92 sc_vtb_putc(&scp->scr, savs[0], sc->scr_map[*save], 93 (FG_LIGHTGREY | BG_BLACK) << 8); 94 blanked = 1; 95 } 96 if (blanked++ < 4) 97 return 0; 98 blanked = 1; 99 sc_vtb_putc(&scp->scr, savs[messagelen - 1], sc->scr_map[0x20], 100 (FG_LIGHTGREY | BG_BLACK) << 8); 101 for (f=messagelen-1; f > 0; f--) 102 savs[f] = savs[f-1]; 103 f = savs[0]; 104 if ((f % scp->xsize) == 0 || 105 (f % scp->xsize) == scp->xsize - 1 || 106 (random() % 50) == 0) 107 dirx = -dirx; 108 if ((f / scp->xsize) == 0 || 109 (f / scp->xsize) == scp->ysize - 1 || 110 (random() % 20) == 0) 111 diry = -diry; 112 savs[0] += dirx + diry; 113 for (f=messagelen-1; f>=0; f--) 114 sc_vtb_putc(&scp->scr, savs[f], sc->scr_map[save[f]], 115 (FG_LIGHTGREY | BG_BLACK) << 8); 116 } 117 else { 118 #ifdef PC98 119 if (epson_machine_id == 0x20) { 120 outb(0x43f, 0x42); 121 outb(0x0c17, inb(0xc17) | 0x08); 122 outb(0x43f, 0x40); 123 } 124 #endif /* PC98 */ 125 blanked = 0; 126 } 127 return 0; 128 } 129 130 static int 131 snake_init(video_adapter_t *adp) 132 { 133 messagelen = strlen(ostype) + 1 + strlen(osrelease); 134 message = malloc(messagelen + 1, M_DEVBUF, 0); 135 sprintf(message, "%s %s", ostype, osrelease); 136 messagep = malloc(messagelen * sizeof *messagep, M_DEVBUF, 0); 137 return 0; 138 } 139 140 static int 141 snake_term(video_adapter_t *adp) 142 { 143 free(message, M_DEVBUF); 144 free(messagep, M_DEVBUF); 145 return 0; 146 } 147 148 static scrn_saver_t snake_module = { 149 "snake_saver", snake_init, snake_term, snake_saver, NULL, 150 }; 151 152 SAVER_MODULE(snake_saver, snake_module); 153