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.5 2006/09/03 18:52:28 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 #include <sys/thread2.h>
  41 #include <sys/thread.h>
  42
  43 #include <dev/video/fb/fbreg.h>
  44 #include <dev/video/fb/splashreg.h>
  45 #include "../syscons.h"
  46
  47 static u_char *vid;
  48 static int blanked;
  49
  50 #define SCRW 320
  51 #define SCRH 200
  52 #define SPP 15
  53 #define STARS (SPP*(1+2+4+8))
  54
  55 static int star[STARS];
  56 static u_char warp_pal[768] = {
  57     0x00, 0x00, 0x00,
  58     0x66, 0x66, 0x66,
  59     0x99, 0x99, 0x99,
  60     0xcc, 0xcc, 0xcc,
  61     0xff, 0xff, 0xff
  62     /* the rest is zero-filled by the compiler */
  63 };
  64
  65 static void
  66 warp_update(void)
  67 {
  68     int i, j, k, n;
  69
  70     for (i = 1, k = 0, n = SPP*8; i < 5; i++, n /= 2)
  71         for (j = 0; j < n; j++, k++) {
  72             vid[star[k]] = 0;
  73             star[k] += i;
  74             if (star[k] > SCRW*SCRH)
  75                 star[k] -= SCRW*SCRH;
  76             vid[star[k]] = i;
  77         }
  78 }
  79
  80 static int
  81 warp_saver(video_adapter_t *adp, int blank)
  82 {
  83     if (blank) {
  84         /* switch to graphics mode */
  85         if (blanked <= 0) {
  86             crit_enter();
  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             crit_exit();
  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] = krandom() % (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);