sys/dev/misc/syscons/warp/warp_saver.c

   1 /*-
   2  * Copyright (c) 1998 Dag-Erling Coïdan Smørgrav
   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  *    in this position and unchanged.
  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  * 3. The name of the author may not be used to endorse or promote products
  15  *    derived from this software without specific prior written permission
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  *
  28  * $FreeBSD: src/sys/modules/syscons/warp/warp_saver.c,v 1.7.2.1 2000/05/10 16:26:47 obrien Exp $
  29  * $DragonFly: src/sys/dev/misc/syscons/warp/warp_saver.c,v 1.2 2003/06/17 04:28:47 dillon Exp $
  30  */
  31
  32 #include <sys/param.h>
  33 #include <sys/systm.h>
  34 #include <sys/kernel.h>
  35 #include <sys/module.h>
  36 #include <sys/syslog.h>
  37 #include <sys/consio.h>
  38 #include <sys/fbio.h>
  39 #include <sys/random.h>
  40
  41 #include <dev/fb/fbreg.h>
  42 #include <dev/fb/splashreg.h>
  43 #include <dev/syscons/syscons.h>
  44
  45 static u_char *vid;
  46 static int blanked;
  47
  48 #define SCRW 320
  49 #define SCRH 200
  50 #define SPP 15
  51 #define STARS (SPP*(1+2+4+8))
  52
  53 static int star[STARS];
  54 static u_char warp_pal[768] = {
  55     0x00, 0x00, 0x00,
  56     0x66, 0x66, 0x66,
  57     0x99, 0x99, 0x99,
  58     0xcc, 0xcc, 0xcc,
  59     0xff, 0xff, 0xff
  60     /* the rest is zero-filled by the compiler */
  61 };
  62
  63 static void
  64 warp_update(void)
  65 {
  66     int i, j, k, n;
  67
  68     for (i = 1, k = 0, n = SPP*8; i < 5; i++, n /= 2)
  69         for (j = 0; j < n; j++, k++) {
  70             vid[star[k]] = 0;
  71             star[k] += i;
  72             if (star[k] > SCRW*SCRH)
  73                 star[k] -= SCRW*SCRH;
  74             vid[star[k]] = i;
  75         }
  76 }
  77
  78 static int
  79 warp_saver(video_adapter_t *adp, int blank)
  80 {
  81     int pl;
  82
  83     if (blank) {
  84         /* switch to graphics mode */
  85         if (blanked <= 0) {
  86             pl = splhigh();
  87             set_video_mode(adp, M_VGA_CG320);
  88             load_palette(adp, warp_pal);
  89 #if 0 /* XXX conflict */
  90             set_border(adp, 0);
  91 #endif
  92             blanked++;
  93             vid = (u_char *)adp->va_window;
  94             splx(pl);
  95             bzero(vid, SCRW*SCRH);
  96         }
  97
  98         /* update display */
  99         warp_update();
 100
 101     } else {
 102         blanked = 0;
 103     }
 104     return 0;
 105 }
 106
 107 static int
 108 warp_init(video_adapter_t *adp)
 109 {
 110     video_info_t info;
 111     int i;
 112
 113     /* check that the console is capable of running in 320x200x256 */
 114     if (get_mode_info(adp, M_VGA_CG320, &info)) {
 115         log(LOG_NOTICE, "warp_saver: the console does not support M_VGA_CG320\n");
 116         return ENODEV;
 117     }
 118
 119     /* randomize the star field */
 120     for (i = 0; i < STARS; i++) {
 121         star[i] = random() % (SCRW*SCRH);
 122     }
 123
 124     blanked = 0;
 125
 126     return 0;
 127 }
 128
 129 static int
 130 warp_term(video_adapter_t *adp)
 131 {
 132     return 0;
 133 }
 134
 135 static scrn_saver_t warp_module = {
 136     "warp_saver", warp_init, warp_term, warp_saver, NULL,
 137 };
 138
 139 SAVER_MODULE(warp_saver, warp_module);