1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 1998 Dag-Erling Coïdan Smørgrav 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 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. 16 * 3. The name of the author may not be used to endorse or promote products 17 * derived from this software without specific prior written permission 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 * 30 * $FreeBSD$ 31 */ 32 33 #include <sys/param.h> 34 #include <sys/systm.h> 35 #include <sys/kernel.h> 36 #include <sys/module.h> 37 #include <sys/syslog.h> 38 #include <sys/consio.h> 39 #include <sys/fbio.h> 40 41 #include <dev/fb/fbreg.h> 42 #include <dev/fb/splashreg.h> 43 #include <dev/syscons/syscons.h> 44 45 #define SAVER_NAME "warp_saver" 46 #define SPP 15 47 #define STARS (SPP * (1 + 2 + 4 + 8)) 48 49 #define SET_ORIGIN(adp, o) do { \ 50 int oo = o; \ 51 if (oo != last_origin) \ 52 vidd_set_win_org(adp, last_origin = oo); \ 53 } while (0) 54 55 static u_char *vid; 56 static int banksize, scrmode, bpsl, scrw, scrh; 57 static int blanked; 58 static int star[STARS]; 59 static u_char warp_pal[768] = { 60 0x00, 0x00, 0x00, 61 0x66, 0x66, 0x66, 62 0x99, 0x99, 0x99, 63 0xcc, 0xcc, 0xcc, 64 0xff, 0xff, 0xff 65 /* the rest is zero-filled by the compiler */ 66 }; 67 68 static void 69 warp_update(video_adapter_t *adp) 70 { 71 int i, j, k, n, o, p; 72 int last_origin = -1; 73 74 for (i = 1, k = 0, n = SPP*8; i < 5; i++, n /= 2) { 75 for (j = 0; j < n; j++, k++) { 76 p = (star[k] / scrw) * bpsl + (star[k] % scrw); 77 o = 0; 78 while (p > banksize) { 79 p -= banksize; 80 o += banksize; 81 } 82 SET_ORIGIN(adp, o); 83 vid[p] = 0; 84 star[k] += i; 85 if (star[k] > scrw*scrh) 86 star[k] -= scrw*scrh; 87 p = (star[k] / scrw) * bpsl + (star[k] % scrw); 88 o = 0; 89 while (p > banksize) { 90 p -= banksize; 91 o += banksize; 92 } 93 SET_ORIGIN(adp, o); 94 vid[p] = i; 95 } 96 } 97 } 98 99 static int 100 warp_saver(video_adapter_t *adp, int blank) 101 { 102 int pl; 103 104 if (blank) { 105 /* switch to graphics mode */ 106 if (blanked <= 0) { 107 pl = splhigh(); 108 vidd_set_mode(adp, scrmode); 109 vidd_load_palette(adp, warp_pal); 110 vidd_set_border(adp, 0); 111 blanked++; 112 vid = (u_char *)adp->va_window; 113 banksize = adp->va_window_size; 114 bpsl = adp->va_line_width; 115 splx(pl); 116 vidd_clear(adp); 117 } 118 /* update display */ 119 warp_update(adp); 120 } else { 121 blanked = 0; 122 } 123 return (0); 124 } 125 126 static int 127 warp_init(video_adapter_t *adp) 128 { 129 video_info_t info; 130 int i; 131 132 if (!vidd_get_info(adp, M_VGA_CG320, &info)) { 133 scrmode = M_VGA_CG320; 134 } else { 135 log(LOG_NOTICE, 136 "%s: the console does not support M_VGA_CG320\n", 137 SAVER_NAME); 138 return (ENODEV); 139 } 140 141 scrw = info.vi_width; 142 scrh = info.vi_height; 143 144 /* randomize the star field */ 145 for (i = 0; i < STARS; i++) 146 star[i] = random() % (scrw * scrh); 147 148 return (0); 149 } 150 151 static int 152 warp_term(video_adapter_t *adp) 153 { 154 return (0); 155 } 156 157 static scrn_saver_t warp_module = { 158 SAVER_NAME, 159 warp_init, 160 warp_term, 161 warp_saver, 162 NULL 163 }; 164 165 SAVER_MODULE(warp_saver, warp_module); 166