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.4 2005/06/11 00:26:51 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
  42 #include <dev/video/fb/fbreg.h>
  43 #include <dev/video/fb/splashreg.h>
  44 #include "../syscons.h"
  45
  46 static u_char *vid;
  47 static int blanked;
  48
  49 #define SCRW 320
  50 #define SCRH 200
  51 #define SPP 15
  52 #define STARS (SPP*(1+2+4+8))
  53
  54 static int star[STARS];
  55 static u_char warp_pal[768] = {
  56     0x00, 0x00, 0x00,
  57     0x66, 0x66, 0x66,
  58     0x99, 0x99, 0x99,
  59     0xcc, 0xcc, 0xcc,
  60     0xff, 0xff, 0xff
  61     /* the rest is zero-filled by the compiler */
  62 };
  63
  64 static void
  65 warp_update(void)
  66 {
  67     int i, j, k, n;
  68
  69     for (i = 1, k = 0, n = SPP*8; i < 5; i++, n /= 2)
  70         for (j = 0; j < n; j++, k++) {
  71             vid[star[k]] = 0;
  72             star[k] += i;
  73             if (star[k] > SCRW*SCRH)
  74                 star[k] -= SCRW*SCRH;
  75             vid[star[k]] = i;
  76         }
  77 }
  78
  79 static int
  80 warp_saver(video_adapter_t *adp, int blank)
  81 {
  82     if (blank) {
  83         /* switch to graphics mode */
  84         if (blanked <= 0) {
  85             crit_enter();
  86             set_video_mode(adp, M_VGA_CG320);
  87             load_palette(adp, warp_pal);
  88 #if 0 /* XXX conflict */
  89             set_border(adp, 0);
  90 #endif
  91             blanked++;
  92             vid = (u_char *)adp->va_window;
  93             crit_exit();
  94             bzero(vid, SCRW*SCRH);
  95         }
  96
  97         /* update display */
  98         warp_update();
  99
 100     } else {
 101         blanked = 0;
 102     }
 103     return 0;
 104 }
 105
 106 static int
 107 warp_init(video_adapter_t *adp)
 108 {
 109     video_info_t info;
 110     int i;
 111
 112     /* check that the console is capable of running in 320x200x256 */
 113     if (get_mode_info(adp, M_VGA_CG320, &info)) {
 114         log(LOG_NOTICE, "warp_saver: the console does not support M_VGA_CG320\n");
 115         return ENODEV;
 116     }
 117
 118     /* randomize the star field */
 119     for (i = 0; i < STARS; i++) {
 120         star[i] = random() % (SCRW*SCRH);
 121     }
 122
 123     blanked = 0;
 124
 125     return 0;
 126 }
 127
 128 static int
 129 warp_term(video_adapter_t *adp)
 130 {
 131     return 0;
 132 }
 133
 134 static scrn_saver_t warp_module = {
 135     "warp_saver", warp_init, warp_term, warp_saver, NULL,
 136 };
 137
 138 SAVER_MODULE(warp_saver, warp_module);