xref: /dflybsd-src/sys/dev/misc/syscons/dragon/dragon_saver.c (revision 86d7f5d305c6adaa56ff4582ece9859d73106103)
186d7f5d3SJohn Marino /*-
286d7f5d3SJohn Marino  * Copyright (c) 2000 Chiharu Shibata
386d7f5d3SJohn Marino  * All rights reserved.
486d7f5d3SJohn Marino  *
586d7f5d3SJohn Marino  * Redistribution and use in source and binary forms, with or without
686d7f5d3SJohn Marino  * modification, are permitted provided that the following conditions
786d7f5d3SJohn Marino  * are met:
886d7f5d3SJohn Marino  * 1. Redistributions of source code must retain the above copyright
986d7f5d3SJohn Marino  *    notice, this list of conditions and the following disclaimer
1086d7f5d3SJohn Marino  *    in this position and unchanged.
1186d7f5d3SJohn Marino  * 2. Redistributions in binary form must reproduce the above copyright
1286d7f5d3SJohn Marino  *    notice, this list of conditions and the following disclaimer in the
1386d7f5d3SJohn Marino  *    documentation and/or other materials provided with the distribution.
1486d7f5d3SJohn Marino  * 3. The name of the author may not be used to endorse or promote products
1586d7f5d3SJohn Marino  *    derived from this software without specific prior written permission.
1686d7f5d3SJohn Marino  *
1786d7f5d3SJohn Marino  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
1886d7f5d3SJohn Marino  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
1986d7f5d3SJohn Marino  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
2086d7f5d3SJohn Marino  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
2186d7f5d3SJohn Marino  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
2286d7f5d3SJohn Marino  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
2386d7f5d3SJohn Marino  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
2486d7f5d3SJohn Marino  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
2586d7f5d3SJohn Marino  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
2686d7f5d3SJohn Marino  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
2786d7f5d3SJohn Marino  *
2886d7f5d3SJohn Marino  * $FreeBSD: src/sys/modules/syscons/dragon/dragon_saver.c,v 1.1.2.1 2003/05/11 01:17:02 murray Exp $
2986d7f5d3SJohn Marino  * $DragonFly: src/sys/dev/misc/syscons/dragon/dragon_saver.c,v 1.6 2006/09/03 18:52:26 dillon Exp $
3086d7f5d3SJohn Marino  */
3186d7f5d3SJohn Marino 
3286d7f5d3SJohn Marino #include	<sys/param.h>
3386d7f5d3SJohn Marino #include	<sys/systm.h>
3486d7f5d3SJohn Marino #include	<sys/kernel.h>
3586d7f5d3SJohn Marino #include	<sys/module.h>
3686d7f5d3SJohn Marino #include	<sys/syslog.h>
3786d7f5d3SJohn Marino #include	<sys/consio.h>
3886d7f5d3SJohn Marino #include	<sys/fbio.h>
3986d7f5d3SJohn Marino #include	<sys/thread.h>
4086d7f5d3SJohn Marino #include	<sys/thread2.h>
4186d7f5d3SJohn Marino 
4286d7f5d3SJohn Marino #include	<sys/random.h>
4386d7f5d3SJohn Marino 
4486d7f5d3SJohn Marino #include	<dev/video/fb/fbreg.h>
4586d7f5d3SJohn Marino #include	<dev/video/fb/splashreg.h>
4686d7f5d3SJohn Marino #include	"../syscons.h"
4786d7f5d3SJohn Marino 
4886d7f5d3SJohn Marino #define SAVER_NAME	 "dragon_saver"
4986d7f5d3SJohn Marino 
5086d7f5d3SJohn Marino static u_char	*vid;
5186d7f5d3SJohn Marino static int	blanked;
5286d7f5d3SJohn Marino 
5386d7f5d3SJohn Marino #define	VIDEO_MODE	M_VGA_CG320
5486d7f5d3SJohn Marino #define	VIDEO_MODE_NAME	"M_VGA_CG320"
5586d7f5d3SJohn Marino #define	SCRW	320
5686d7f5d3SJohn Marino #define	SCRH	200
5786d7f5d3SJohn Marino #define	ORDER	13
5886d7f5d3SJohn Marino #define	CURVE	3
5986d7f5d3SJohn Marino #define	OUT	100
6086d7f5d3SJohn Marino 
6186d7f5d3SJohn Marino static int	cur_x, cur_y;
6286d7f5d3SJohn Marino static int	curve;
6386d7f5d3SJohn Marino static u_char	dragon_pal[3*256];	/* zero-filled by the compiler */
6486d7f5d3SJohn Marino 
6586d7f5d3SJohn Marino static __inline int
gpset(int x,int y,int val)6686d7f5d3SJohn Marino gpset(int x, int y, int val)
6786d7f5d3SJohn Marino {
6886d7f5d3SJohn Marino 	if (x < 0 || y < 0 || SCRW <= x || SCRH <= y) {
6986d7f5d3SJohn Marino 		return 0;
7086d7f5d3SJohn Marino 	}
7186d7f5d3SJohn Marino 	vid[x + y * SCRW] = val;
7286d7f5d3SJohn Marino 	return 1;
7386d7f5d3SJohn Marino }
7486d7f5d3SJohn Marino 
7586d7f5d3SJohn Marino static int
gdraw(int dx,int dy,int val)7686d7f5d3SJohn Marino gdraw(int dx, int dy, int val)
7786d7f5d3SJohn Marino {
7886d7f5d3SJohn Marino 	int	i;
7986d7f5d3SJohn Marino 	int	set = 0;
8086d7f5d3SJohn Marino 
8186d7f5d3SJohn Marino 	if (dx != 0) {
8286d7f5d3SJohn Marino 		i = cur_x;
8386d7f5d3SJohn Marino 		cur_x += dx;
8486d7f5d3SJohn Marino 		if (dx < 0) {
8586d7f5d3SJohn Marino 			i += dx;
8686d7f5d3SJohn Marino 			dx = -dx;
8786d7f5d3SJohn Marino 		}
8886d7f5d3SJohn Marino 		/* horizontal line */
8986d7f5d3SJohn Marino 		for (; dx >= 0; --dx, ++i) {
9086d7f5d3SJohn Marino 			set |= gpset(i, cur_y, val);
9186d7f5d3SJohn Marino 		}
9286d7f5d3SJohn Marino 	}
9386d7f5d3SJohn Marino 	else {	/* dy != 0 */
9486d7f5d3SJohn Marino 		i = cur_y;
9586d7f5d3SJohn Marino 		cur_y += dy;
9686d7f5d3SJohn Marino 		if (dy < 0) {
9786d7f5d3SJohn Marino 			i += dy;
9886d7f5d3SJohn Marino 			dy = -dy;
9986d7f5d3SJohn Marino 		}
10086d7f5d3SJohn Marino 		/* vertical line */
10186d7f5d3SJohn Marino 		for (; dy >= 0; --dy, ++i) {
10286d7f5d3SJohn Marino 			set |= gpset(cur_x, i, val);
10386d7f5d3SJohn Marino 		}
10486d7f5d3SJohn Marino 	}
10586d7f5d3SJohn Marino 	return set;
10686d7f5d3SJohn Marino }
10786d7f5d3SJohn Marino 
10886d7f5d3SJohn Marino static void
dragon_update(video_adapter_t * adp)10986d7f5d3SJohn Marino dragon_update(video_adapter_t *adp)
11086d7f5d3SJohn Marino {
11186d7f5d3SJohn Marino 	static int	i, p, q;
11286d7f5d3SJohn Marino 	static int	order, mul, out;
11386d7f5d3SJohn Marino 	static int	org_x, org_y;
11486d7f5d3SJohn Marino 	static int	dx, dy;
11586d7f5d3SJohn Marino 	static unsigned char	fold[1 << (ORDER - 3)];
11686d7f5d3SJohn Marino #define	GET_FOLD(x)	(fold[(x) >> 3]  &  (1 << ((x) & 7)))
11786d7f5d3SJohn Marino #define	SET_FOLD(x)	(fold[(x) >> 3] |=  (1 << ((x) & 7)))
11886d7f5d3SJohn Marino #define	CLR_FOLD(x)	(fold[(x) >> 3] &= ~(1 << ((x) & 7)))
11986d7f5d3SJohn Marino 	int	tmp;
12086d7f5d3SJohn Marino 
12186d7f5d3SJohn Marino 	if (curve > CURVE) {
12286d7f5d3SJohn Marino 		bzero(vid, SCRW*SCRH);
12386d7f5d3SJohn Marino 
12486d7f5d3SJohn Marino 		/* set palette of each curves */
12586d7f5d3SJohn Marino 		for (tmp = 0; tmp < 3*CURVE; ++tmp) {
12686d7f5d3SJohn Marino 			dragon_pal[3+tmp] = (u_char)krandom();
12786d7f5d3SJohn Marino 		}
12886d7f5d3SJohn Marino 		load_palette(adp, dragon_pal);
12986d7f5d3SJohn Marino 
13086d7f5d3SJohn Marino 		mul = ((krandom() & 7) + 1) * (SCRW / 320);
13186d7f5d3SJohn Marino 		org_x = krandom() % SCRW; org_y = krandom() % SCRH;
13286d7f5d3SJohn Marino 
13386d7f5d3SJohn Marino 		curve = 0;
13486d7f5d3SJohn Marino 		order = ORDER;
13586d7f5d3SJohn Marino 	}
13686d7f5d3SJohn Marino 
13786d7f5d3SJohn Marino 	if (order >= ORDER) {
13886d7f5d3SJohn Marino 		++curve;
13986d7f5d3SJohn Marino 
14086d7f5d3SJohn Marino 		cur_x = org_x; cur_y = org_y;
14186d7f5d3SJohn Marino 
14286d7f5d3SJohn Marino 		switch (curve) {
14386d7f5d3SJohn Marino 		case 1:
14486d7f5d3SJohn Marino 			dx = 0; dy = mul;
14586d7f5d3SJohn Marino 			break;
14686d7f5d3SJohn Marino 		case 2:
14786d7f5d3SJohn Marino 			dx = mul; dy = 0;
14886d7f5d3SJohn Marino 			break;
14986d7f5d3SJohn Marino 		case 3:
15086d7f5d3SJohn Marino 			dx = 0; dy = -mul;
15186d7f5d3SJohn Marino 			break;
15286d7f5d3SJohn Marino 		}
15386d7f5d3SJohn Marino 		(void)gdraw(dx, dy, curve); out = 0;
15486d7f5d3SJohn Marino 
15586d7f5d3SJohn Marino 		order = 0;
15686d7f5d3SJohn Marino 		q = p = 0; i = q + 1;
15786d7f5d3SJohn Marino 	}
15886d7f5d3SJohn Marino 
15986d7f5d3SJohn Marino 	if (i > q) {
16086d7f5d3SJohn Marino 		SET_FOLD(p); q = p * 2;
16186d7f5d3SJohn Marino 
16286d7f5d3SJohn Marino 		++order;
16386d7f5d3SJohn Marino 		i = p; p = q + 1;
16486d7f5d3SJohn Marino 	}
16586d7f5d3SJohn Marino 
16686d7f5d3SJohn Marino 	if (GET_FOLD(q-i) != 0) {
16786d7f5d3SJohn Marino 		CLR_FOLD(i);
16886d7f5d3SJohn Marino 		tmp = dx; dx =  dy; dy = -tmp;	/* turn right */
16986d7f5d3SJohn Marino 	}
17086d7f5d3SJohn Marino 	else {
17186d7f5d3SJohn Marino 		SET_FOLD(i);
17286d7f5d3SJohn Marino 		tmp = dx; dx = -dy; dy =  tmp;	/* turn left */
17386d7f5d3SJohn Marino 	}
17486d7f5d3SJohn Marino 	if (gdraw(dx, dy, curve)) {
17586d7f5d3SJohn Marino 		out = 0;
17686d7f5d3SJohn Marino 	}
17786d7f5d3SJohn Marino 	else {
17886d7f5d3SJohn Marino 		if (++out > OUT) {
17986d7f5d3SJohn Marino 			order = ORDER;	/* force to terminate this curve */
18086d7f5d3SJohn Marino 		}
18186d7f5d3SJohn Marino 	}
18286d7f5d3SJohn Marino 	++i;
18386d7f5d3SJohn Marino }
18486d7f5d3SJohn Marino 
18586d7f5d3SJohn Marino static int
dragon_saver(video_adapter_t * adp,int blank)18686d7f5d3SJohn Marino dragon_saver(video_adapter_t *adp, int blank)
18786d7f5d3SJohn Marino {
18886d7f5d3SJohn Marino 	if (blank) {
18986d7f5d3SJohn Marino 		/* switch to graphics mode */
19086d7f5d3SJohn Marino 		if (blanked <= 0) {
19186d7f5d3SJohn Marino 			crit_enter();
19286d7f5d3SJohn Marino 			set_video_mode(adp, VIDEO_MODE);
19386d7f5d3SJohn Marino 			vid = (u_char *)adp->va_window;
19486d7f5d3SJohn Marino 			curve = CURVE + 1;
19586d7f5d3SJohn Marino 			++blanked;
19686d7f5d3SJohn Marino 			crit_exit();
19786d7f5d3SJohn Marino 		}
19886d7f5d3SJohn Marino 
19986d7f5d3SJohn Marino 		/* update display */
20086d7f5d3SJohn Marino 		dragon_update(adp);
20186d7f5d3SJohn Marino 	}
20286d7f5d3SJohn Marino 	else {
20386d7f5d3SJohn Marino 		blanked = 0;
20486d7f5d3SJohn Marino 	}
20586d7f5d3SJohn Marino 	return 0;
20686d7f5d3SJohn Marino }
20786d7f5d3SJohn Marino 
20886d7f5d3SJohn Marino static int
dragon_init(video_adapter_t * adp)20986d7f5d3SJohn Marino dragon_init(video_adapter_t *adp)
21086d7f5d3SJohn Marino {
21186d7f5d3SJohn Marino 	video_info_t info;
21286d7f5d3SJohn Marino 
21386d7f5d3SJohn Marino 	/* check that the console is capable of running in 320x200x256 */
21486d7f5d3SJohn Marino 	if (get_mode_info(adp, VIDEO_MODE, &info)) {
21586d7f5d3SJohn Marino 		log(LOG_NOTICE,
21686d7f5d3SJohn Marino 		    "%s: the console does not support " VIDEO_MODE_NAME "\n",
21786d7f5d3SJohn Marino 		    SAVER_NAME);
21886d7f5d3SJohn Marino 		return ENODEV;
21986d7f5d3SJohn Marino 	}
22086d7f5d3SJohn Marino 
22186d7f5d3SJohn Marino 	blanked = 0;
22286d7f5d3SJohn Marino 	return 0;
22386d7f5d3SJohn Marino }
22486d7f5d3SJohn Marino 
22586d7f5d3SJohn Marino static int
dragon_term(video_adapter_t * adp)22686d7f5d3SJohn Marino dragon_term(video_adapter_t *adp)
22786d7f5d3SJohn Marino {
22886d7f5d3SJohn Marino 	return 0;
22986d7f5d3SJohn Marino }
23086d7f5d3SJohn Marino 
23186d7f5d3SJohn Marino static scrn_saver_t dragon_module = {
23286d7f5d3SJohn Marino 	SAVER_NAME,
23386d7f5d3SJohn Marino 	dragon_init,
23486d7f5d3SJohn Marino 	dragon_term,
23586d7f5d3SJohn Marino 	dragon_saver,
23686d7f5d3SJohn Marino 	NULL,
23786d7f5d3SJohn Marino };
23886d7f5d3SJohn Marino 
23986d7f5d3SJohn Marino SAVER_MODULE(dragon_saver, dragon_module);
240