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@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@27: static void redraw(void);
nuclear@27: static int proc_events(void);
nuclear@27: static int keyb(int key);
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@27: static float walk_speed = 0.5;
nuclear@27: static float look_speed = 1.0;
nuclear@27: static int mouse_look = 0;
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@27: 	if(init() == -1) {
nuclear@27: 		return 1;
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	while(proc_events()) {
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@28: 	float vfov, hfov, aspect;
nuclear@28: 
nuclear@28: 	aspect = 320.0 / 200.0;
nuclear@28: 	vfov = 60.0;
nuclear@28: 	hfov = vfov * aspect;
nuclear@28: 
nuclear@27: 	init_timer(100);
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@27: }
nuclear@27: 
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: #define DEG_TO_RAD(x)	(M_PI * (x) / 180.0)
nuclear@27: void cam_move(float dx, float dy)
nuclear@27: {
nuclear@27: 	float angle = DEG_TO_RAD(cam_theta);
nuclear@27: 	cam_x += cos(angle) * dx + sin(angle) * dy;
nuclear@27: 	cam_z -= -sin(angle) * dx + cos(angle) * dy;
nuclear@27: }
nuclear@27: 
nuclear@27: static int proc_events(void)
nuclear@27: {
nuclear@27: 	static int prev_mx, prev_my, prev_bnmask;
nuclear@27: 	int mx, my, bnmask;
nuclear@27: 
nuclear@27: 	if(kbhit()) {
nuclear@27: 		if(keyb(getch()) == 0) {
nuclear@27: 			return 0;
nuclear@27: 		}
nuclear@27: 	}
nuclear@27: 
nuclear@27: 	bnmask = read_mouse(&mx, &my);
nuclear@27: 	if(bnmask != prev_bnmask) {
nuclear@27: 		mouse_button(bnmask, mx, my);
nuclear@27: 		prev_bnmask = bnmask;
nuclear@27: 	}
nuclear@27: 	if(mx != prev_mx || my != prev_my) {
nuclear@27: 		mouse_motion(mx, my);
nuclear@27: 		prev_mx = mx;
nuclear@27: 		prev_my = my;
nuclear@27: 	}
nuclear@27: 	return 1;
nuclear@27: }
nuclear@27: 
nuclear@27: static int keyb(int key)
nuclear@27: {
nuclear@27: 	switch(key) {
nuclear@27: 	case 27:
nuclear@27: 		return 0;
nuclear@27: 
nuclear@27: 	case 'w':
nuclear@27: 		cam_move(0, walk_speed);
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case 's':
nuclear@27: 		cam_move(0, -walk_speed);
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case 'a':
nuclear@27: 		cam_move(-walk_speed, 0);
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case 'd':
nuclear@27: 		cam_move(walk_speed, 0);
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	case '`':
nuclear@27: 		mouse_look = !mouse_look;
nuclear@27: 		break;
nuclear@27: 
nuclear@27: 	default:
nuclear@27: 		break;
nuclear@27: 	}
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@27: 	static int prev_x, prev_y;
nuclear@27: 	int dx = x - prev_x;
nuclear@27: 	int dy = y - prev_y;
nuclear@27: 	prev_x = x;
nuclear@27: 	prev_y = y;
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: }