added serial spaceball support in the dos version. can be used for
[dosdemo] / src / dos / main.c
1 #include <stdio.h>
2 #include <stdlib.h>
3 #include <math.h>
4 #include <string.h>
5 #include <limits.h>
6 #include "demo.h"
7 #include "keyb.h"
8 #include "mouse.h"
9 #include "timer.h"
10 #include "gfx.h"
11 #include "vmath.h"
12 #include "sball.h"
13 #include "cfgopt.h"
14 #include "logger.h"
15
16 static int handle_sball_event(sball_event *ev);
17 static void recalc_sball_matrix(float *xform);
18
19 static int quit;
20 static int use_mouse;
21 static long fbsize;
22
23 static int use_sball;
24 static vec3_t pos = {0, 0, 0};
25 static quat_t rot = {0, 0, 0, 1};
26
27 int main(int argc, char **argv)
28 {
29         fbsize = fb_width * fb_height * fb_bpp / CHAR_BIT;
30
31         init_logger("demo.log");
32
33         init_timer(100);
34         kb_init(32);
35
36         if((use_mouse = have_mouse())) {
37                 set_mouse_limits(0, 0, fb_width, fb_height);
38                 set_mouse(fb_width / 2, fb_height / 2);
39         }
40
41         if(!(fb_pixels = malloc(fbsize))) {
42                 fprintf(stderr, "failed to allocate backbuffer\n");
43                 return 1;
44         }
45
46         if(!(vmem_front = set_video_mode(fb_width, fb_height, fb_bpp))) {
47                 return 1;
48         }
49         /* TODO implement multiple video memory pages for flipping */
50         vmem_back = vmem_front;
51
52         if(demo_init(argc, argv) == -1) {
53                 set_text_mode();
54                 return 1;
55         }
56
57         if(opt.sball && sball_init() == 0) {
58                 use_sball = 1;
59         }
60
61         reset_timer();
62
63         while(!quit) {
64                 int key;
65                 while((key = kb_getkey()) != -1) {
66                         demo_keyboard(key, 1);
67                 }
68                 if(quit) goto break_evloop;
69
70                 if(use_mouse) {
71                         mouse_bmask = read_mouse(&mouse_x, &mouse_y);
72                 }
73                 if(use_sball && sball_pending()) {
74                         sball_event ev;
75                         printf("got sball event\n");
76                         while(sball_getevent(&ev)) {
77                                 handle_sball_event(&ev);
78                         }
79                         recalc_sball_matrix(sball_matrix);
80                 }
81
82                 time_msec = get_msec();
83                 demo_draw();
84         }
85
86 break_evloop:
87         set_text_mode();
88         demo_cleanup();
89         kb_shutdown();
90         if(use_sball) {
91                 sball_shutdown();
92         }
93         return 0;
94 }
95
96 void demo_quit(void)
97 {
98         quit = 1;
99 }
100
101 void swap_buffers(void *pixels)
102 {
103         /* TODO implement page flipping */
104         if(pixels) {
105                 /*wait_vsync();*/
106                 drawFps(pixels);
107                 memcpy(vmem_front, pixels, fbsize);
108         } else {
109                 drawFps(vmem_back);
110         }
111 }
112
113
114 #define TX(ev)  ((ev)->motion.motion[0])
115 #define TY(ev)  ((ev)->motion.motion[1])
116 #define TZ(ev)  ((ev)->motion.motion[2])
117 #define RX(ev)  ((ev)->motion.motion[3])
118 #define RY(ev)  ((ev)->motion.motion[4])
119 #define RZ(ev)  ((ev)->motion.motion[5])
120
121 static int handle_sball_event(sball_event *ev)
122 {
123         switch(ev->type) {
124         case SBALL_EV_MOTION:
125                 if(RX(ev) | RY(ev) | RZ(ev)) {
126                         float rx = (float)RX(ev);
127                         float ry = (float)RY(ev);
128                         float rz = (float)RZ(ev);
129                         float axis_len = sqrt(rx * rx + ry * ry + rz * rz);
130                         if(axis_len > 0.0) {
131                                 rot = quat_rotate(rot, axis_len * 0.001, -rx / axis_len,
132                                                 -ry / axis_len, -rz / axis_len);
133                         }
134                 }
135
136                 pos.x += TX(ev) * 0.001;
137                 pos.y += TY(ev) * 0.001;
138                 pos.z += TZ(ev) * 0.001;
139                 break;
140
141         case SBALL_EV_BUTTON:
142                 if(ev->button.pressed) {
143                         pos = v3_cons(0, 0, 0);
144                         rot = quat_cons(1, 0, 0, 0);
145                 }
146                 break;
147         }
148
149         return 0;
150 }
151
152 void recalc_sball_matrix(float *xform)
153 {
154         quat_to_mat(xform, rot);
155         xform[12] = pos.x;
156         xform[13] = pos.y;
157         xform[14] = pos.z;
158 }