nuclear@27: #include <stdio.h>
nuclear@27: #include <stdlib.h>
nuclear@27: #include <math.h>
nuclear@27: #include <signal.h>
nuclear@27: #include <conio.h>
nuclear@27: #include "wvga.h"
nuclear@27: #include "mingl.h"
nuclear@27: #include "timer.h"
nuclear@33: #include "keyb.h"
nuclear@27: #include "mouse.h"
nuclear@27: #include "texture.h"
nuclear@27: #include "palman.h"
nuclear@27: #include "scene.h"
nuclear@27: 
nuclear@27: #define DEG2RAD(x)	(M_PI * (x) / 180.0)
nuclear@27: 
nuclear@27: static int init(void);
nuclear@27: static void shutdown(void);
nuclear@34: static void update(unsigned long dtmsec);
nuclear@27: static void redraw(void);
nuclear@27: static int proc_events(void);
nuclear@27: static void mouse_button(int bn, int x, int y);
nuclear@27: static void mouse_motion(int x, int y);
nuclear@27: static void sighandler(int s);
nuclear@27: 
nuclear@27: 
nuclear@27: static float cam_x, cam_y, cam_z;
nuclear@27: static float cam_theta, cam_phi;
nuclear@27: 
nuclear@34: static float walk_speed = 6.0;
nuclear@27: static float look_speed = 1.0;
nuclear@33: 
nuclear@33: static int mouse_look = 1;
nuclear@27: 
nuclear@27: static void *fbuf;
nuclear@27: static struct scene scn;
nuclear@27: 
nuclear@27: 
nuclear@27: int main(void)
nuclear@27: {
nuclear@34: 	unsigned long prev_msec = 0;
nuclear@34: 
nuclear@27: 	if(init() == -1) {
nuclear@27: 		return 1;
nuclear@27: 	}
nuclear@27: 
nuclear@34: 	for(;;) {
nuclear@34: 		unsigned long msec = get_msec();
nuclear@34: 		unsigned long dt = msec - prev_msec;
nuclear@34: 		prev_msec = msec;
nuclear@34: 
nuclear@34: 		if(!proc_events()) {
nuclear@34: 			break;
nuclear@34: 		}
nuclear@34: 
nuclear@34: 		update(dt);
nuclear@27: 		redraw();
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	shutdown();
nuclear@27: 	return 0;
nuclear@27: }
nuclear@27: 
nuclear@27: 
nuclear@27: static int init(void)
nuclear@27: {
nuclear@34: 	float vfov, aspect;
nuclear@28: 
nuclear@28: 	aspect = 320.0 / 200.0;
nuclear@28: 	vfov = 60.0;
nuclear@28: 
nuclear@27: 	init_timer(100);
nuclear@33: 	kb_init(16); /* 16 characters input buffer */
nuclear@27: 
nuclear@27: 	set_video_mode(0x13);
nuclear@27: 
nuclear@27: 	signal(SIGINT, sighandler);
nuclear@27: 	signal(SIGSEGV, sighandler);
nuclear@27: 	signal(SIGFPE, sighandler);
nuclear@27: 	signal(SIGILL, sighandler);
nuclear@27: 	signal(SIGABRT, sighandler);
nuclear@27: 
nuclear@27: 	if(mgl_init(320, 200) == -1) {
nuclear@27: 		fprintf(stderr, "mgl init failed\n");
nuclear@27: 		return -1;
nuclear@27: 	}
nuclear@27: 	fbuf = mgl_framebuffer();
nuclear@27: 
nuclear@27: 	mgl_enable(MGL_CULL_FACE);
nuclear@27: 	mgl_enable(MGL_SMOOTH);
nuclear@27: 	mgl_enable(MGL_LIGHTING);
nuclear@27: 	mgl_enable(MGL_DEPTH_TEST);
nuclear@27: 
nuclear@27: 	mgl_matrix_mode(MGL_PROJECTION);
nuclear@27: 	mgl_load_identity();
nuclear@28: 	mgl_perspective(vfov, aspect, 0.5, 200.0);
nuclear@28: 
nuclear@28: #if 0
nuclear@28: 	mgl_enable(MGL_CLIP_PLANE0);
nuclear@28: 	mgl_enable(MGL_CLIP_PLANE1);
nuclear@28: 	mgl_enable(MGL_CLIP_PLANE2);
nuclear@28: 	mgl_enable(MGL_CLIP_PLANE3);
nuclear@28: 	mgl_clip_plane(MGL_CLIP_PLANE0, -1, 0, -1, 0);	/* positive X */
nuclear@28: 	mgl_clip_plane(MGL_CLIP_PLANE1, 1, 0, -1, 0);	/* negative X */
nuclear@28: 	mgl_clip_plane(MGL_CLIP_PLANE2, 0, -1, -0.5, 0);	/* positive Y */
nuclear@28: 	mgl_clip_plane(MGL_CLIP_PLANE3, 0, 1, -0.5, 0);	/* negative Y */
nuclear@28: #endif
nuclear@27: 
nuclear@27: 	/* setup palette */
nuclear@27: 	palm_add_color(255, 255, 255);
nuclear@27: 
nuclear@27: 	scn_init(&scn);
nuclear@27: 	if(scn_load(&scn, "data/hall.obj") == -1) {
nuclear@27: 		return -1;
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	palm_build();
nuclear@27: 	{
nuclear@27: 		int i, palsz = palm_palette_size();
nuclear@27: 		struct palm_color *pal = palm_palette();
nuclear@27: 
nuclear@27: 		for(i=0; i<palsz; i++) {
nuclear@27: 			set_pal_entry(i, pal[i].r, pal[i].g, pal[i].b);
nuclear@27: 		}
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	mgl_color_range(palm_color_range() - 1);
nuclear@27: 	return 0;
nuclear@27: }
nuclear@27: 
nuclear@27: static void shutdown(void)
nuclear@27: {
nuclear@27: 	mgl_free();
nuclear@27: 	set_video_mode(3);
nuclear@33: 	kb_shutdown();
nuclear@27: }
nuclear@27: 
nuclear@34: 
nuclear@34: #define DEG_TO_RAD(x)	(M_PI * (x) / 180.0)
nuclear@34: void cam_move(float dx, float dy)
nuclear@34: {
nuclear@34: 	float angle = DEG_TO_RAD(cam_theta);
nuclear@34: 	cam_x += cos(angle) * dx + sin(angle) * dy;
nuclear@34: 	cam_z -= -sin(angle) * dx + cos(angle) * dy;
nuclear@34: }
nuclear@34: 
nuclear@34: static void update(unsigned long dtmsec)
nuclear@34: {
nuclear@34: 	float dt = (float)dtmsec / 1000.0f;
nuclear@34: 	float offs = walk_speed * dt;
nuclear@34: 
nuclear@34: 	if(kb_isdown('w') || kb_isdown('W'))
nuclear@34: 		cam_move(0, offs);
nuclear@34: 
nuclear@34: 	if(kb_isdown('s') || kb_isdown('S'))
nuclear@34: 		cam_move(0, -offs);
nuclear@34: 
nuclear@34: 	if(kb_isdown('a') || kb_isdown('A'))
nuclear@34: 		cam_move(-offs, 0);
nuclear@34: 
nuclear@34: 	if(kb_isdown('d') || kb_isdown('D'))
nuclear@34: 		cam_move(offs, 0);
nuclear@34: }
nuclear@34: 
nuclear@27: static void redraw(void)
nuclear@27: {
nuclear@27: 	mgl_clear(0);
nuclear@27: 	mgl_clear_depth();
nuclear@27: 
nuclear@27: 	mgl_matrix_mode(MGL_MODELVIEW);
nuclear@27: 	mgl_load_identity();
nuclear@27: 	mgl_rotate(cam_phi, 1, 0, 0);
nuclear@27: 	mgl_rotate(cam_theta, 0, 1, 0);
nuclear@27: 	mgl_translate(-cam_x, -cam_y, -cam_z);
nuclear@27: 	mgl_translate(0, -2.0, 0);
nuclear@27: 
nuclear@27: 	mgl_light_intensity(0, 1.0);
nuclear@27: 	mgl_light_position(0, 0, 5, 0, 1);
nuclear@27: 
nuclear@27: 	/*mgl_torus(0.75, 0.25, 16, 8);*/
nuclear@27: 	scn_render(&scn);
nuclear@27: 
nuclear@27: 	copy_frame(fbuf);
nuclear@27: }
nuclear@27: 
nuclear@27: static int proc_events(void)
nuclear@27: {
nuclear@27: 	static int prev_mx, prev_my, prev_bnmask;
nuclear@34: 	int mx, my, bnmask;
nuclear@27: 
nuclear@33: 	int key;
nuclear@33: 	while((key = kb_getkey()) != -1) {
nuclear@33: 		switch(key) {
nuclear@33: 		case 27:
nuclear@33: 			return 0;
nuclear@27: 
nuclear@33: 		case '`':
nuclear@33: 			mouse_look = !mouse_look;
nuclear@33: 			break;
nuclear@33: 
nuclear@33: 		default:
nuclear@33: 			break;
nuclear@33: 		}
nuclear@33: 	}
nuclear@33: 
nuclear@34: 	bnmask = read_mouse(&mx, &my);
nuclear@34: 	if(bnmask != prev_bnmask) {
nuclear@34: 		mouse_button(bnmask, mx, my);
nuclear@34: 		prev_bnmask = bnmask;
nuclear@34: 	}
nuclear@34: 	if(mx != prev_mx || my != prev_my) {
nuclear@34: 		mouse_motion(mx, my);
nuclear@34: 		prev_mx = mx;
nuclear@34: 		prev_my = my;
nuclear@34: 	}
nuclear@27: 	return 1;
nuclear@27: }
nuclear@27: 
nuclear@27: static int bnstate;
nuclear@27: static void mouse_button(int bn, int x, int y)
nuclear@27: {
nuclear@27: 	bnstate = bn;
nuclear@27: }
nuclear@27: 
nuclear@27: static void mouse_motion(int x, int y)
nuclear@27: {
nuclear@33: 	static int prev_x = -1, prev_y;
nuclear@27: 	int dx = x - prev_x;
nuclear@27: 	int dy = y - prev_y;
nuclear@33: 
nuclear@33: 	if(mouse_look) {
nuclear@33: 		if(prev_x == -1) {
nuclear@33: 			dx = dy = 0;
nuclear@33: 		}
nuclear@33: 
nuclear@33: 		set_mouse(160, 100);
nuclear@33: 		prev_x = 160;
nuclear@33: 		prev_y = 100;
nuclear@33: 	} else {
nuclear@33: 		prev_x = x;
nuclear@33: 		prev_y = y;
nuclear@33: 	}
nuclear@27: 
nuclear@27: 	if(mouse_look || bnstate) {
nuclear@27: 		cam_theta += dx * look_speed;
nuclear@27: 		cam_phi += dy * look_speed;
nuclear@27: 
nuclear@27: 		if(cam_phi < -90) {
nuclear@27: 			cam_phi = -90;
nuclear@27: 		}
nuclear@27: 		if(cam_phi > 90) {
nuclear@27: 			cam_phi = 90;
nuclear@27: 		}
nuclear@27: 	}
nuclear@27: }
nuclear@27: 
nuclear@27: static void sighandler(int s)
nuclear@27: {
nuclear@27: 	set_video_mode(3);
nuclear@27: 
nuclear@27: 	switch(s) {
nuclear@27: 	case SIGABRT:
nuclear@27: 		fprintf(stderr, "abort\n");
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case SIGILL:
nuclear@27: 		fprintf(stderr, "illegal operation\n");
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case SIGSEGV:
nuclear@27: 		fprintf(stderr, "segmentation fault\n");
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case SIGINT:
nuclear@27: 		fprintf(stderr, "interrupted\n");
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case SIGFPE:
nuclear@27: 		fprintf(stderr, "floating point exception\n");
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	default:
nuclear@27: 		fprintf(stderr, "unexpected signal\n");
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	exit(1);
nuclear@27: }