1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 1995-1998 Søren Schmidt 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 * without modification, immediately at the beginning of the file. 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/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 #include <sys/resourcevar.h> 40 #include <sys/smp.h> 41 42 #include <machine/pc/display.h> 43 44 #include <dev/fb/fbreg.h> 45 #include <dev/fb/splashreg.h> 46 #include <dev/syscons/syscons.h> 47 48 static u_char *message; 49 static int *messagep; 50 static int messagelen; 51 static int blanked; 52 53 #define MSGBUF_LEN 70 54 55 static int nofancy = 0; 56 TUNABLE_INT("hw.syscons.saver_snake_nofancy", &nofancy); 57 58 #define FANCY_SNAKE (!nofancy) 59 #define LOAD_HIGH(ld) (((ld * 100 + FSCALE / 2) >> FSHIFT) / 100) 60 #define LOAD_LOW(ld) (((ld * 100 + FSCALE / 2) >> FSHIFT) % 100) 61 62 static inline void update_msg(void); 63 64 static int 65 snake_saver(video_adapter_t *adp, int blank) 66 { 67 static int dirx, diry; 68 int f, color, load; 69 sc_softc_t *sc; 70 scr_stat *scp; 71 72 /* XXX hack for minimal changes. */ 73 #define save message 74 #define savs messagep 75 76 sc = sc_find_softc(adp, NULL); 77 if (sc == NULL) 78 return EAGAIN; 79 scp = sc->cur_scp; 80 81 if (blank) { 82 if (adp->va_info.vi_flags & V_INFO_GRAPHICS) 83 return EAGAIN; 84 if (blanked <= 0) { 85 sc_vtb_clear(&scp->scr, sc->scr_map[0x20], 86 (FG_LIGHTGREY | BG_BLACK) << 8); 87 vidd_set_hw_cursor(adp, -1, -1); 88 sc_set_border(scp, 0); 89 dirx = (scp->xpos ? 1 : -1); 90 diry = (scp->ypos ? 91 scp->xsize : -scp->xsize); 92 for (f=0; f< messagelen; f++) 93 savs[f] = scp->xpos + scp->ypos*scp->xsize; 94 sc_vtb_putc(&scp->scr, savs[0], sc->scr_map[*save], 95 (FG_LIGHTGREY | BG_BLACK) << 8); 96 blanked = 1; 97 } 98 if (blanked++ < 4) 99 return 0; 100 blanked = 1; 101 sc_vtb_putc(&scp->scr, savs[messagelen - 1], sc->scr_map[0x20], 102 (FG_LIGHTGREY | BG_BLACK) << 8); 103 for (f=messagelen-1; f > 0; f--) 104 savs[f] = savs[f-1]; 105 f = savs[0]; 106 if ((f % scp->xsize) == 0 || 107 (f % scp->xsize) == scp->xsize - 1 || 108 (random() % 50) == 0) 109 dirx = -dirx; 110 if ((f / scp->xsize) == 0 || 111 (f / scp->xsize) == scp->ysize - 1 || 112 (random() % 20) == 0) 113 diry = -diry; 114 savs[0] += dirx + diry; 115 if (FANCY_SNAKE) { 116 update_msg(); 117 load = ((averunnable.ldavg[0] * 100 + FSCALE / 2) >> FSHIFT); 118 if (load == 0) 119 color = FG_LIGHTGREY | BG_BLACK; 120 else if (load / mp_ncpus <= 50) 121 color = FG_LIGHTGREEN | BG_BLACK; 122 else if (load / mp_ncpus <= 75) 123 color = FG_YELLOW | BG_BLACK; 124 else if (load / mp_ncpus <= 99) 125 color = FG_LIGHTRED | BG_BLACK; 126 else 127 color = FG_RED | FG_BLINK | BG_BLACK; 128 } else 129 color = FG_LIGHTGREY | BG_BLACK; 130 131 for (f=messagelen-1; f>=0; f--) 132 sc_vtb_putc(&scp->scr, savs[f], sc->scr_map[save[f]], 133 color << 8); 134 } else 135 blanked = 0; 136 137 return 0; 138 } 139 140 static inline void 141 update_msg(void) 142 { 143 if (!FANCY_SNAKE) { 144 messagelen = sprintf(message, "%s %s", ostype, osrelease); 145 return; 146 } 147 messagelen = snprintf(message, MSGBUF_LEN, 148 "%s %s (%d.%02d %d.%02d, %d.%02d)", 149 ostype, osrelease, 150 LOAD_HIGH(averunnable.ldavg[0]), LOAD_LOW(averunnable.ldavg[0]), 151 LOAD_HIGH(averunnable.ldavg[1]), LOAD_LOW(averunnable.ldavg[1]), 152 LOAD_HIGH(averunnable.ldavg[2]), LOAD_LOW(averunnable.ldavg[2])); 153 } 154 155 static int 156 snake_init(video_adapter_t *adp) 157 { 158 message = malloc(MSGBUF_LEN, M_DEVBUF, M_WAITOK); 159 messagep = malloc(MSGBUF_LEN * sizeof *messagep, M_DEVBUF, M_WAITOK); 160 update_msg(); 161 return 0; 162 } 163 164 static int 165 snake_term(video_adapter_t *adp) 166 { 167 free(message, M_DEVBUF); 168 free(messagep, M_DEVBUF); 169 return 0; 170 } 171 172 static scrn_saver_t snake_module = { 173 "snake_saver", snake_init, snake_term, snake_saver, NULL, 174 }; 175 176 SAVER_MODULE(snake_saver, snake_module); 177