xref: /dflybsd-src/sys/dev/misc/syscons/dragon/dragon_saver.c (revision 86d7f5d305c6adaa56ff4582ece9859d73106103)
1*86d7f5d3SJohn Marino /*-
2*86d7f5d3SJohn Marino  * Copyright (c) 2000 Chiharu Shibata
3*86d7f5d3SJohn Marino  * All rights reserved.
4*86d7f5d3SJohn Marino  *
5*86d7f5d3SJohn Marino  * Redistribution and use in source and binary forms, with or without
6*86d7f5d3SJohn Marino  * modification, are permitted provided that the following conditions
7*86d7f5d3SJohn Marino  * are met:
8*86d7f5d3SJohn Marino  * 1. Redistributions of source code must retain the above copyright
9*86d7f5d3SJohn Marino  *    notice, this list of conditions and the following disclaimer
10*86d7f5d3SJohn Marino  *    in this position and unchanged.
11*86d7f5d3SJohn Marino  * 2. Redistributions in binary form must reproduce the above copyright
12*86d7f5d3SJohn Marino  *    notice, this list of conditions and the following disclaimer in the
13*86d7f5d3SJohn Marino  *    documentation and/or other materials provided with the distribution.
14*86d7f5d3SJohn Marino  * 3. The name of the author may not be used to endorse or promote products
15*86d7f5d3SJohn Marino  *    derived from this software without specific prior written permission.
16*86d7f5d3SJohn Marino  *
17*86d7f5d3SJohn Marino  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18*86d7f5d3SJohn Marino  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19*86d7f5d3SJohn Marino  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20*86d7f5d3SJohn Marino  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21*86d7f5d3SJohn Marino  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22*86d7f5d3SJohn Marino  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23*86d7f5d3SJohn Marino  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24*86d7f5d3SJohn Marino  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25*86d7f5d3SJohn Marino  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26*86d7f5d3SJohn Marino  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27*86d7f5d3SJohn Marino  *
28*86d7f5d3SJohn Marino  * $FreeBSD: src/sys/modules/syscons/dragon/dragon_saver.c,v 1.1.2.1 2003/05/11 01:17:02 murray Exp $
29*86d7f5d3SJohn Marino  * $DragonFly: src/sys/dev/misc/syscons/dragon/dragon_saver.c,v 1.6 2006/09/03 18:52:26 dillon Exp $
30*86d7f5d3SJohn Marino  */
31*86d7f5d3SJohn Marino 
32*86d7f5d3SJohn Marino #include	<sys/param.h>
33*86d7f5d3SJohn Marino #include	<sys/systm.h>
34*86d7f5d3SJohn Marino #include	<sys/kernel.h>
35*86d7f5d3SJohn Marino #include	<sys/module.h>
36*86d7f5d3SJohn Marino #include	<sys/syslog.h>
37*86d7f5d3SJohn Marino #include	<sys/consio.h>
38*86d7f5d3SJohn Marino #include	<sys/fbio.h>
39*86d7f5d3SJohn Marino #include	<sys/thread.h>
40*86d7f5d3SJohn Marino #include	<sys/thread2.h>
41*86d7f5d3SJohn Marino 
42*86d7f5d3SJohn Marino #include	<sys/random.h>
43*86d7f5d3SJohn Marino 
44*86d7f5d3SJohn Marino #include	<dev/video/fb/fbreg.h>
45*86d7f5d3SJohn Marino #include	<dev/video/fb/splashreg.h>
46*86d7f5d3SJohn Marino #include	"../syscons.h"
47*86d7f5d3SJohn Marino 
48*86d7f5d3SJohn Marino #define SAVER_NAME	 "dragon_saver"
49*86d7f5d3SJohn Marino 
50*86d7f5d3SJohn Marino static u_char	*vid;
51*86d7f5d3SJohn Marino static int	blanked;
52*86d7f5d3SJohn Marino 
53*86d7f5d3SJohn Marino #define	VIDEO_MODE	M_VGA_CG320
54*86d7f5d3SJohn Marino #define	VIDEO_MODE_NAME	"M_VGA_CG320"
55*86d7f5d3SJohn Marino #define	SCRW	320
56*86d7f5d3SJohn Marino #define	SCRH	200
57*86d7f5d3SJohn Marino #define	ORDER	13
58*86d7f5d3SJohn Marino #define	CURVE	3
59*86d7f5d3SJohn Marino #define	OUT	100
60*86d7f5d3SJohn Marino 
61*86d7f5d3SJohn Marino static int	cur_x, cur_y;
62*86d7f5d3SJohn Marino static int	curve;
63*86d7f5d3SJohn Marino static u_char	dragon_pal[3*256];	/* zero-filled by the compiler */
64*86d7f5d3SJohn Marino 
65*86d7f5d3SJohn Marino static __inline int
gpset(int x,int y,int val)66*86d7f5d3SJohn Marino gpset(int x, int y, int val)
67*86d7f5d3SJohn Marino {
68*86d7f5d3SJohn Marino 	if (x < 0 || y < 0 || SCRW <= x || SCRH <= y) {
69*86d7f5d3SJohn Marino 		return 0;
70*86d7f5d3SJohn Marino 	}
71*86d7f5d3SJohn Marino 	vid[x + y * SCRW] = val;
72*86d7f5d3SJohn Marino 	return 1;
73*86d7f5d3SJohn Marino }
74*86d7f5d3SJohn Marino 
75*86d7f5d3SJohn Marino static int
gdraw(int dx,int dy,int val)76*86d7f5d3SJohn Marino gdraw(int dx, int dy, int val)
77*86d7f5d3SJohn Marino {
78*86d7f5d3SJohn Marino 	int	i;
79*86d7f5d3SJohn Marino 	int	set = 0;
80*86d7f5d3SJohn Marino 
81*86d7f5d3SJohn Marino 	if (dx != 0) {
82*86d7f5d3SJohn Marino 		i = cur_x;
83*86d7f5d3SJohn Marino 		cur_x += dx;
84*86d7f5d3SJohn Marino 		if (dx < 0) {
85*86d7f5d3SJohn Marino 			i += dx;
86*86d7f5d3SJohn Marino 			dx = -dx;
87*86d7f5d3SJohn Marino 		}
88*86d7f5d3SJohn Marino 		/* horizontal line */
89*86d7f5d3SJohn Marino 		for (; dx >= 0; --dx, ++i) {
90*86d7f5d3SJohn Marino 			set |= gpset(i, cur_y, val);
91*86d7f5d3SJohn Marino 		}
92*86d7f5d3SJohn Marino 	}
93*86d7f5d3SJohn Marino 	else {	/* dy != 0 */
94*86d7f5d3SJohn Marino 		i = cur_y;
95*86d7f5d3SJohn Marino 		cur_y += dy;
96*86d7f5d3SJohn Marino 		if (dy < 0) {
97*86d7f5d3SJohn Marino 			i += dy;
98*86d7f5d3SJohn Marino 			dy = -dy;
99*86d7f5d3SJohn Marino 		}
100*86d7f5d3SJohn Marino 		/* vertical line */
101*86d7f5d3SJohn Marino 		for (; dy >= 0; --dy, ++i) {
102*86d7f5d3SJohn Marino 			set |= gpset(cur_x, i, val);
103*86d7f5d3SJohn Marino 		}
104*86d7f5d3SJohn Marino 	}
105*86d7f5d3SJohn Marino 	return set;
106*86d7f5d3SJohn Marino }
107*86d7f5d3SJohn Marino 
108*86d7f5d3SJohn Marino static void
dragon_update(video_adapter_t * adp)109*86d7f5d3SJohn Marino dragon_update(video_adapter_t *adp)
110*86d7f5d3SJohn Marino {
111*86d7f5d3SJohn Marino 	static int	i, p, q;
112*86d7f5d3SJohn Marino 	static int	order, mul, out;
113*86d7f5d3SJohn Marino 	static int	org_x, org_y;
114*86d7f5d3SJohn Marino 	static int	dx, dy;
115*86d7f5d3SJohn Marino 	static unsigned char	fold[1 << (ORDER - 3)];
116*86d7f5d3SJohn Marino #define	GET_FOLD(x)	(fold[(x) >> 3]  &  (1 << ((x) & 7)))
117*86d7f5d3SJohn Marino #define	SET_FOLD(x)	(fold[(x) >> 3] |=  (1 << ((x) & 7)))
118*86d7f5d3SJohn Marino #define	CLR_FOLD(x)	(fold[(x) >> 3] &= ~(1 << ((x) & 7)))
119*86d7f5d3SJohn Marino 	int	tmp;
120*86d7f5d3SJohn Marino 
121*86d7f5d3SJohn Marino 	if (curve > CURVE) {
122*86d7f5d3SJohn Marino 		bzero(vid, SCRW*SCRH);
123*86d7f5d3SJohn Marino 
124*86d7f5d3SJohn Marino 		/* set palette of each curves */
125*86d7f5d3SJohn Marino 		for (tmp = 0; tmp < 3*CURVE; ++tmp) {
126*86d7f5d3SJohn Marino 			dragon_pal[3+tmp] = (u_char)krandom();
127*86d7f5d3SJohn Marino 		}
128*86d7f5d3SJohn Marino 		load_palette(adp, dragon_pal);
129*86d7f5d3SJohn Marino 
130*86d7f5d3SJohn Marino 		mul = ((krandom() & 7) + 1) * (SCRW / 320);
131*86d7f5d3SJohn Marino 		org_x = krandom() % SCRW; org_y = krandom() % SCRH;
132*86d7f5d3SJohn Marino 
133*86d7f5d3SJohn Marino 		curve = 0;
134*86d7f5d3SJohn Marino 		order = ORDER;
135*86d7f5d3SJohn Marino 	}
136*86d7f5d3SJohn Marino 
137*86d7f5d3SJohn Marino 	if (order >= ORDER) {
138*86d7f5d3SJohn Marino 		++curve;
139*86d7f5d3SJohn Marino 
140*86d7f5d3SJohn Marino 		cur_x = org_x; cur_y = org_y;
141*86d7f5d3SJohn Marino 
142*86d7f5d3SJohn Marino 		switch (curve) {
143*86d7f5d3SJohn Marino 		case 1:
144*86d7f5d3SJohn Marino 			dx = 0; dy = mul;
145*86d7f5d3SJohn Marino 			break;
146*86d7f5d3SJohn Marino 		case 2:
147*86d7f5d3SJohn Marino 			dx = mul; dy = 0;
148*86d7f5d3SJohn Marino 			break;
149*86d7f5d3SJohn Marino 		case 3:
150*86d7f5d3SJohn Marino 			dx = 0; dy = -mul;
151*86d7f5d3SJohn Marino 			break;
152*86d7f5d3SJohn Marino 		}
153*86d7f5d3SJohn Marino 		(void)gdraw(dx, dy, curve); out = 0;
154*86d7f5d3SJohn Marino 
155*86d7f5d3SJohn Marino 		order = 0;
156*86d7f5d3SJohn Marino 		q = p = 0; i = q + 1;
157*86d7f5d3SJohn Marino 	}
158*86d7f5d3SJohn Marino 
159*86d7f5d3SJohn Marino 	if (i > q) {
160*86d7f5d3SJohn Marino 		SET_FOLD(p); q = p * 2;
161*86d7f5d3SJohn Marino 
162*86d7f5d3SJohn Marino 		++order;
163*86d7f5d3SJohn Marino 		i = p; p = q + 1;
164*86d7f5d3SJohn Marino 	}
165*86d7f5d3SJohn Marino 
166*86d7f5d3SJohn Marino 	if (GET_FOLD(q-i) != 0) {
167*86d7f5d3SJohn Marino 		CLR_FOLD(i);
168*86d7f5d3SJohn Marino 		tmp = dx; dx =  dy; dy = -tmp;	/* turn right */
169*86d7f5d3SJohn Marino 	}
170*86d7f5d3SJohn Marino 	else {
171*86d7f5d3SJohn Marino 		SET_FOLD(i);
172*86d7f5d3SJohn Marino 		tmp = dx; dx = -dy; dy =  tmp;	/* turn left */
173*86d7f5d3SJohn Marino 	}
174*86d7f5d3SJohn Marino 	if (gdraw(dx, dy, curve)) {
175*86d7f5d3SJohn Marino 		out = 0;
176*86d7f5d3SJohn Marino 	}
177*86d7f5d3SJohn Marino 	else {
178*86d7f5d3SJohn Marino 		if (++out > OUT) {
179*86d7f5d3SJohn Marino 			order = ORDER;	/* force to terminate this curve */
180*86d7f5d3SJohn Marino 		}
181*86d7f5d3SJohn Marino 	}
182*86d7f5d3SJohn Marino 	++i;
183*86d7f5d3SJohn Marino }
184*86d7f5d3SJohn Marino 
185*86d7f5d3SJohn Marino static int
dragon_saver(video_adapter_t * adp,int blank)186*86d7f5d3SJohn Marino dragon_saver(video_adapter_t *adp, int blank)
187*86d7f5d3SJohn Marino {
188*86d7f5d3SJohn Marino 	if (blank) {
189*86d7f5d3SJohn Marino 		/* switch to graphics mode */
190*86d7f5d3SJohn Marino 		if (blanked <= 0) {
191*86d7f5d3SJohn Marino 			crit_enter();
192*86d7f5d3SJohn Marino 			set_video_mode(adp, VIDEO_MODE);
193*86d7f5d3SJohn Marino 			vid = (u_char *)adp->va_window;
194*86d7f5d3SJohn Marino 			curve = CURVE + 1;
195*86d7f5d3SJohn Marino 			++blanked;
196*86d7f5d3SJohn Marino 			crit_exit();
197*86d7f5d3SJohn Marino 		}
198*86d7f5d3SJohn Marino 
199*86d7f5d3SJohn Marino 		/* update display */
200*86d7f5d3SJohn Marino 		dragon_update(adp);
201*86d7f5d3SJohn Marino 	}
202*86d7f5d3SJohn Marino 	else {
203*86d7f5d3SJohn Marino 		blanked = 0;
204*86d7f5d3SJohn Marino 	}
205*86d7f5d3SJohn Marino 	return 0;
206*86d7f5d3SJohn Marino }
207*86d7f5d3SJohn Marino 
208*86d7f5d3SJohn Marino static int
dragon_init(video_adapter_t * adp)209*86d7f5d3SJohn Marino dragon_init(video_adapter_t *adp)
210*86d7f5d3SJohn Marino {
211*86d7f5d3SJohn Marino 	video_info_t info;
212*86d7f5d3SJohn Marino 
213*86d7f5d3SJohn Marino 	/* check that the console is capable of running in 320x200x256 */
214*86d7f5d3SJohn Marino 	if (get_mode_info(adp, VIDEO_MODE, &info)) {
215*86d7f5d3SJohn Marino 		log(LOG_NOTICE,
216*86d7f5d3SJohn Marino 		    "%s: the console does not support " VIDEO_MODE_NAME "\n",
217*86d7f5d3SJohn Marino 		    SAVER_NAME);
218*86d7f5d3SJohn Marino 		return ENODEV;
219*86d7f5d3SJohn Marino 	}
220*86d7f5d3SJohn Marino 
221*86d7f5d3SJohn Marino 	blanked = 0;
222*86d7f5d3SJohn Marino 	return 0;
223*86d7f5d3SJohn Marino }
224*86d7f5d3SJohn Marino 
225*86d7f5d3SJohn Marino static int
dragon_term(video_adapter_t * adp)226*86d7f5d3SJohn Marino dragon_term(video_adapter_t *adp)
227*86d7f5d3SJohn Marino {
228*86d7f5d3SJohn Marino 	return 0;
229*86d7f5d3SJohn Marino }
230*86d7f5d3SJohn Marino 
231*86d7f5d3SJohn Marino static scrn_saver_t dragon_module = {
232*86d7f5d3SJohn Marino 	SAVER_NAME,
233*86d7f5d3SJohn Marino 	dragon_init,
234*86d7f5d3SJohn Marino 	dragon_term,
235*86d7f5d3SJohn Marino 	dragon_saver,
236*86d7f5d3SJohn Marino 	NULL,
237*86d7f5d3SJohn Marino };
238*86d7f5d3SJohn Marino 
239*86d7f5d3SJohn Marino SAVER_MODULE(dragon_saver, dragon_module);
240