1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 1998 Dag-Erling 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 31 #include <sys/param.h> 32 #include <sys/systm.h> 33 #include <sys/kernel.h> 34 #include <sys/module.h> 35 #include <sys/syslog.h> 36 #include <sys/consio.h> 37 #include <sys/fbio.h> 38 39 #include <dev/fb/fbreg.h> 40 #include <dev/fb/splashreg.h> 41 #include <dev/syscons/syscons.h> 42 43 #define SAVER_NAME "warp_saver" 44 #define SPP 15 45 #define STARS (SPP * (1 + 2 + 4 + 8)) 46 47 #define SET_ORIGIN(adp, o) do { \ 48 int oo = o; \ 49 if (oo != last_origin) \ 50 vidd_set_win_org(adp, last_origin = oo); \ 51 } while (0) 52 53 static u_char *vid; 54 static int banksize, scrmode, bpsl, scrw, scrh; 55 static int blanked; 56 static int star[STARS]; 57 static u_char warp_pal[768] = { 58 0x00, 0x00, 0x00, 59 0x66, 0x66, 0x66, 60 0x99, 0x99, 0x99, 61 0xcc, 0xcc, 0xcc, 62 0xff, 0xff, 0xff 63 /* the rest is zero-filled by the compiler */ 64 }; 65 66 static void 67 warp_update(video_adapter_t *adp) 68 { 69 int i, j, k, n, o, p; 70 int last_origin = -1; 71 72 for (i = 1, k = 0, n = SPP*8; i < 5; i++, n /= 2) { 73 for (j = 0; j < n; j++, k++) { 74 p = (star[k] / scrw) * bpsl + (star[k] % scrw); 75 o = 0; 76 while (p > banksize) { 77 p -= banksize; 78 o += banksize; 79 } 80 SET_ORIGIN(adp, o); 81 vid[p] = 0; 82 star[k] += i; 83 if (star[k] > scrw*scrh) 84 star[k] -= scrw*scrh; 85 p = (star[k] / scrw) * bpsl + (star[k] % scrw); 86 o = 0; 87 while (p > banksize) { 88 p -= banksize; 89 o += banksize; 90 } 91 SET_ORIGIN(adp, o); 92 vid[p] = i; 93 } 94 } 95 } 96 97 static int 98 warp_saver(video_adapter_t *adp, int blank) 99 { 100 int pl; 101 102 if (blank) { 103 /* switch to graphics mode */ 104 if (blanked <= 0) { 105 pl = splhigh(); 106 vidd_set_mode(adp, scrmode); 107 vidd_load_palette(adp, warp_pal); 108 vidd_set_border(adp, 0); 109 blanked++; 110 vid = (u_char *)adp->va_window; 111 banksize = adp->va_window_size; 112 bpsl = adp->va_line_width; 113 splx(pl); 114 vidd_clear(adp); 115 } 116 /* update display */ 117 warp_update(adp); 118 } else { 119 blanked = 0; 120 } 121 return (0); 122 } 123 124 static int 125 warp_init(video_adapter_t *adp) 126 { 127 video_info_t info; 128 int i; 129 130 if (!vidd_get_info(adp, M_VGA_CG320, &info)) { 131 scrmode = M_VGA_CG320; 132 } else { 133 log(LOG_NOTICE, 134 "%s: the console does not support M_VGA_CG320\n", 135 SAVER_NAME); 136 return (ENODEV); 137 } 138 139 scrw = info.vi_width; 140 scrh = info.vi_height; 141 142 /* randomize the star field */ 143 for (i = 0; i < STARS; i++) 144 star[i] = random() % (scrw * scrh); 145 146 return (0); 147 } 148 149 static int 150 warp_term(video_adapter_t *adp) 151 { 152 return (0); 153 } 154 155 static scrn_saver_t warp_module = { 156 SAVER_NAME, 157 warp_init, 158 warp_term, 159 warp_saver, 160 NULL 161 }; 162 163 SAVER_MODULE(warp_saver, warp_module); 164