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