1 /*- 2 * Copyright (c) 1999 Brad Forschinger 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 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 * 26 * $FreeBSD$ 27 */ 28 29 /* 30 * brad forschinger, 19990504 <retch@flag.blackened.net> 31 * 32 * written with much help from warp_saver.c 33 * 34 */ 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/kernel.h> 39 #include <sys/module.h> 40 #include <sys/syslog.h> 41 #include <sys/consio.h> 42 #include <sys/fbio.h> 43 44 #include <machine/random.h> 45 46 #include <dev/fb/fbreg.h> 47 #include <dev/fb/splashreg.h> 48 #include <dev/syscons/syscons.h> 49 50 #define X_SIZE 320 51 #define Y_SIZE 200 52 53 static int blanked; 54 static u_char fire_pal[768]; 55 static u_char buf[X_SIZE * (Y_SIZE + 1)]; 56 static u_char *vid; 57 58 static int 59 fire_saver(video_adapter_t *adp, int blank) 60 { 61 int x, y; 62 63 if (blank) { 64 if (blanked <= 0) { 65 int red, green, blue; 66 int palette_index; 67 68 set_video_mode(adp, M_VGA_CG320); 69 70 /* build and load palette */ 71 red = green = blue = 0; 72 for (palette_index = 0; palette_index < 256; palette_index++) { 73 red++; 74 if (red > 128) 75 green += 2; 76 77 fire_pal[(palette_index * 3) + 0] = red; 78 fire_pal[(palette_index * 3) + 1] = green; 79 fire_pal[(palette_index * 3) + 2] = blue; 80 } 81 load_palette(adp, fire_pal); 82 83 blanked++; 84 vid = (u_char *) adp->va_window; 85 } 86 /* make a new bottom line */ 87 for (x = 0, y = Y_SIZE; x < X_SIZE; x++) 88 buf[x + (y * X_SIZE)] = random() % 160 + 96; 89 90 /* fade the flames out */ 91 for (y = 0; y < Y_SIZE; y++) { 92 for (x = 0; x < X_SIZE; x++) { 93 buf[x + (y * X_SIZE)] = (buf[(x + 0) + ((y + 0) * X_SIZE)] + 94 buf[(x - 1) + ((y + 1) * X_SIZE)] + 95 buf[(x + 0) + ((y + 1) * X_SIZE)] + 96 buf[(x + 1) + ((y + 1) * X_SIZE)]) / 4; 97 if (buf[x + (y * X_SIZE)] > 0) 98 buf[x + (y * X_SIZE)]--; 99 } 100 } 101 102 /* blit our buffer into video ram */ 103 memcpy(vid, buf, X_SIZE * Y_SIZE); 104 } else { 105 blanked = 0; 106 } 107 108 return 0; 109 } 110 111 static int 112 fire_initialise(video_adapter_t *adp) 113 { 114 video_info_t info; 115 116 /* check that the console is capable of running in 320x200x256 */ 117 if (get_mode_info(adp, M_VGA_CG320, &info)) { 118 log(LOG_NOTICE, "fire_saver: the console does not support M_VGA_CG320\n"); 119 return (ENODEV); 120 } 121 blanked = 0; 122 123 return 0; 124 } 125 126 static int 127 fire_terminate(video_adapter_t *adp) 128 { 129 return 0; 130 } 131 132 static scrn_saver_t fire_module = { 133 "fire_saver", fire_initialise, fire_terminate, fire_saver, NULL 134 }; 135 136 SAVER_MODULE(fire_saver, fire_module); 137