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