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: src/sys/modules/syscons/fire/fire_saver.c,v 1.6.2.1 2000/05/10 14:01:23 obrien Exp $ 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 #include <sys/random.h> 44 45 #include <dev/fb/fbreg.h> 46 #include <dev/fb/splashreg.h> 47 #include <dev/syscons/syscons.h> 48 49 #define X_SIZE 320 50 #define Y_SIZE 200 51 52 static int blanked; 53 static u_char fire_pal[768]; 54 static u_char buf[X_SIZE * (Y_SIZE + 1)]; 55 static u_char *vid; 56 57 static int 58 fire_saver(video_adapter_t *adp, int blank) 59 { 60 int x, y; 61 62 if (blank) { 63 if (blanked <= 0) { 64 int red, green, blue; 65 int palette_index; 66 67 set_video_mode(adp, M_VGA_CG320); 68 69 /* build and load palette */ 70 red = green = blue = 0; 71 for (palette_index = 0; palette_index < 256; palette_index++) { 72 red++; 73 if (red > 128) 74 green += 2; 75 76 fire_pal[(palette_index * 3) + 0] = red; 77 fire_pal[(palette_index * 3) + 1] = green; 78 fire_pal[(palette_index * 3) + 2] = blue; 79 } 80 load_palette(adp, fire_pal); 81 82 blanked++; 83 vid = (u_char *) adp->va_window; 84 } 85 /* make a new bottom line */ 86 for (x = 0, y = Y_SIZE; x < X_SIZE; x++) 87 buf[x + (y * X_SIZE)] = random() % 160 + 96; 88 89 /* fade the flames out */ 90 for (y = 0; y < Y_SIZE; y++) { 91 for (x = 0; x < X_SIZE; x++) { 92 buf[x + (y * X_SIZE)] = (buf[(x + 0) + ((y + 0) * X_SIZE)] + 93 buf[(x - 1) + ((y + 1) * X_SIZE)] + 94 buf[(x + 0) + ((y + 1) * X_SIZE)] + 95 buf[(x + 1) + ((y + 1) * X_SIZE)]) / 4; 96 if (buf[x + (y * X_SIZE)] > 0) 97 buf[x + (y * X_SIZE)]--; 98 } 99 } 100 101 /* blit our buffer into video ram */ 102 memcpy(vid, buf, X_SIZE * Y_SIZE); 103 } else { 104 blanked = 0; 105 } 106 107 return 0; 108 } 109 110 static int 111 fire_initialise(video_adapter_t *adp) 112 { 113 video_info_t info; 114 115 /* check that the console is capable of running in 320x200x256 */ 116 if (get_mode_info(adp, M_VGA_CG320, &info)) { 117 log(LOG_NOTICE, "fire_saver: the console does not support M_VGA_CG320\n"); 118 return (ENODEV); 119 } 120 blanked = 0; 121 122 return 0; 123 } 124 125 static int 126 fire_terminate(video_adapter_t *adp) 127 { 128 return 0; 129 } 130 131 static scrn_saver_t fire_module = { 132 "fire_saver", fire_initialise, fire_terminate, fire_saver, NULL 133 }; 134 135 SAVER_MODULE(fire_saver, fire_module); 136