deepstone

annotate src/test.c @ 4:c3e0bccd673e

added texture mapping
author John Tsiombikas <nuclear@member.fsf.org>
date Mon, 21 Nov 2011 11:51:23 +0200
parents 0e781cc43178
children bce78aaafc68
rev   line source
nuclear@0 1 /*
nuclear@0 2 256-color 3D graphics hack for real-mode DOS.
nuclear@0 3 Copyright (C) 2011 John Tsiombikas <nuclear@member.fsf.org>
nuclear@0 4
nuclear@0 5 This program is free software: you can redistribute it and/or modify
nuclear@0 6 it under the terms of the GNU General Public License as published by
nuclear@0 7 the Free Software Foundation, either version 3 of the License, or
nuclear@0 8 (at your option) any later version.
nuclear@0 9
nuclear@0 10 This program is distributed in the hope that it will be useful,
nuclear@0 11 but WITHOUT ANY WARRANTY; without even the implied warranty of
nuclear@0 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
nuclear@0 13 GNU General Public License for more details.
nuclear@0 14
nuclear@0 15 You should have received a copy of the GNU General Public License
nuclear@0 16 along with this program. If not, see <http://www.gnu.org/licenses/>.
nuclear@0 17 */
nuclear@0 18 #include <stdio.h>
nuclear@0 19 #include <stdlib.h>
nuclear@0 20 #include <string.h>
nuclear@0 21 #include <signal.h>
nuclear@0 22 #include <conio.h>
nuclear@0 23 #include "vga.h"
nuclear@0 24 #include "mingl.h"
nuclear@0 25 #include "timer.h"
nuclear@0 26 #include "mouse.h"
nuclear@1 27 #include "palman.h"
nuclear@3 28 #include "texture.h"
nuclear@0 29
nuclear@0 30 static int init(void);
nuclear@0 31 static void shutdown(void);
nuclear@0 32 static void redraw(void);
nuclear@0 33 static void draw_cursor(unsigned char *fb, int xsz, int ysz, int mx, int my, int cidx);
nuclear@0 34 static int keyb(char key);
nuclear@0 35 static void mouse_button(int bn, int x, int y);
nuclear@0 36 static void mouse_motion(int x, int y);
nuclear@0 37 static void sighandler(int s);
nuclear@0 38 static int parse_args(int argc, char **argv);
nuclear@0 39 static void print_perf(void);
nuclear@0 40
nuclear@0 41 static unsigned char *fbuf;
nuclear@0 42
nuclear@3 43 static struct texture *tex;
nuclear@4 44 static char *texfile;
nuclear@3 45
nuclear@1 46 static int white_base, red_base, green_base, blue_base;
nuclear@1 47 static int grad_range;
nuclear@1 48
nuclear@0 49 static int use_vsync = 1;
nuclear@0 50 static int under_windows = 0;
nuclear@0 51 static unsigned long num_frm;
nuclear@0 52
nuclear@0 53 enum { CUBE, SPHERE, TORUS, NUM_PRIMS };
nuclear@0 54 static int prim = SPHERE;
nuclear@0 55 static int auto_rotate = 1;
nuclear@0 56 static float cam_theta, cam_phi;
nuclear@0 57
nuclear@0 58 static int mx, my;
nuclear@0 59
nuclear@0 60 int main(int argc, char **argv)
nuclear@0 61 {
nuclear@0 62 int mbn, prev_mx = -1, prev_my = -1, prev_mbn = 0;
nuclear@0 63
nuclear@0 64 if(parse_args(argc, argv) == -1) {
nuclear@0 65 return 1;
nuclear@0 66 }
nuclear@0 67
nuclear@0 68 if(init() == -1) {
nuclear@0 69 return 1;
nuclear@0 70 }
nuclear@0 71
nuclear@0 72 reset_timer();
nuclear@0 73
nuclear@0 74 for(;;) {
nuclear@0 75 if(kbhit()) {
nuclear@0 76 if(keyb(getch()) == 0) {
nuclear@0 77 break;
nuclear@0 78 }
nuclear@0 79 }
nuclear@0 80
nuclear@0 81 mbn = read_mouse(&mx, &my);
nuclear@0 82 if(mbn != prev_mbn) {
nuclear@0 83 mouse_button(mbn, mx, my);
nuclear@0 84 prev_mbn = mbn;
nuclear@0 85 }
nuclear@0 86 if(mx != prev_mx || my != prev_my) {
nuclear@0 87 if(mbn) {
nuclear@0 88 mouse_motion(mx, my);
nuclear@0 89 }
nuclear@0 90 prev_mx = mx;
nuclear@0 91 prev_my = my;
nuclear@0 92 }
nuclear@0 93
nuclear@0 94 redraw();
nuclear@0 95 }
nuclear@0 96
nuclear@0 97 shutdown();
nuclear@0 98 print_perf();
nuclear@0 99 return 0;
nuclear@0 100 }
nuclear@0 101
nuclear@0 102 static int init(void)
nuclear@0 103 {
nuclear@0 104 int i;
nuclear@1 105 struct palm_color *pal;
nuclear@0 106
nuclear@0 107 init_timer(under_windows ? 0 : 100);
nuclear@0 108
nuclear@0 109 set_video_mode(0x13);
nuclear@0 110
nuclear@0 111 signal(SIGINT, sighandler);
nuclear@0 112 signal(SIGSEGV, sighandler);
nuclear@0 113 signal(SIGFPE, sighandler);
nuclear@0 114 signal(SIGILL, sighandler);
nuclear@0 115 signal(SIGABRT, sighandler);
nuclear@0 116
nuclear@1 117
nuclear@4 118 if(mgl_init(320, 200) == -1) {
nuclear@4 119 fprintf(stderr, "mgl init failed\n");
nuclear@4 120 return -1;
nuclear@4 121 }
nuclear@4 122 fbuf = mgl_framebuffer();
nuclear@4 123
nuclear@4 124
nuclear@4 125 if(!texfile) {
nuclear@4 126 palm_add_color(255, 255, 255);
nuclear@4 127 palm_add_color(255, 0, 0);
nuclear@4 128 palm_add_color(0, 255, 0);
nuclear@4 129 palm_add_color(0, 0, 255);
nuclear@4 130 palm_build();
nuclear@4 131
nuclear@4 132 white_base = palm_color_base(255, 255, 255);
nuclear@4 133 red_base = palm_color_base(255, 0, 0);
nuclear@4 134 green_base = palm_color_base(0, 255, 0);
nuclear@4 135 blue_base = palm_color_base(0, 0, 255);
nuclear@4 136
nuclear@4 137 tex = tex_gen_checker(64, 64, 3, 3, red_base, blue_base);
nuclear@4 138 } else {
nuclear@4 139 if(!(tex = load_texture(texfile))) {
nuclear@4 140 return -1;
nuclear@4 141 }
nuclear@4 142
nuclear@4 143 palm_build();
nuclear@4 144 get_texture_pixels(tex);
nuclear@4 145
nuclear@4 146 mgl_enable(MGL_TEXTURE_2D);
nuclear@4 147 }
nuclear@4 148
nuclear@1 149 grad_range = palm_color_range();
nuclear@1 150
nuclear@1 151 pal = palm_palette();
nuclear@1 152 for(i=0; i<palm_palette_size(); i++) {
nuclear@1 153 set_palette(i, pal[i].r, pal[i].g, pal[i].b);
nuclear@0 154 }
nuclear@0 155
nuclear@0 156 mgl_enable(MGL_CULL_FACE);
nuclear@0 157 mgl_enable(MGL_SMOOTH);
nuclear@1 158 mgl_color_range(grad_range - 1); /* gradient range */
nuclear@0 159
nuclear@0 160 mgl_enable(MGL_LIGHTING);
nuclear@0 161 mgl_light_intensity(0, 1.0);
nuclear@0 162 mgl_light_direction(0, -0.5, 0.5, 1);
nuclear@0 163
nuclear@0 164 mgl_matrix_mode(MGL_PROJECTION);
nuclear@0 165 mgl_load_identity();
nuclear@0 166 mgl_perspective(45.0, 320.0 / 200.0, 0.5, 100.0);
nuclear@0 167
nuclear@3 168 mgl_teximage(tex->width, tex->height, tex->pixels);
nuclear@3 169
nuclear@0 170 return 0;
nuclear@0 171 }
nuclear@0 172
nuclear@0 173 static void shutdown(void)
nuclear@0 174 {
nuclear@0 175 mgl_free();
nuclear@0 176 set_video_mode(3);
nuclear@0 177 }
nuclear@0 178
nuclear@0 179 static void redraw(void)
nuclear@0 180 {
nuclear@0 181 float angle = get_msec() / 10.0;
nuclear@0 182 mgl_clear(0);
nuclear@0 183
nuclear@0 184 mgl_matrix_mode(MGL_MODELVIEW);
nuclear@0 185 mgl_load_identity();
nuclear@0 186 if(auto_rotate) {
nuclear@0 187 mgl_rotate(angle, 0, 0, 1);
nuclear@0 188 mgl_rotate(angle * 0.5, 1, 0, 0);
nuclear@0 189 } else {
nuclear@0 190 mgl_rotate(cam_theta, 0, 1, 0);
nuclear@0 191 mgl_rotate(cam_phi, 1, 0, 0);
nuclear@0 192 }
nuclear@0 193 mgl_translate(0, 0, -4);
nuclear@0 194
nuclear@0 195 switch(prim) {
nuclear@0 196 case TORUS:
nuclear@1 197 mgl_index(green_base);
nuclear@0 198 mgl_torus(1.0, 0.25, 16, 8);
nuclear@0 199 break;
nuclear@0 200 case SPHERE:
nuclear@1 201 mgl_index(blue_base);
nuclear@0 202 mgl_sphere(1.0, 16, 8);
nuclear@0 203 break;
nuclear@0 204 case CUBE:
nuclear@1 205 mgl_index(red_base);
nuclear@0 206 mgl_cube(1.0);
nuclear@0 207 }
nuclear@0 208
nuclear@0 209 if(!auto_rotate) {
nuclear@1 210 draw_cursor(fbuf, 320, 200, mx, my, white_base + grad_range - 1);
nuclear@0 211 }
nuclear@0 212
nuclear@0 213 copy_frame(fbuf);
nuclear@0 214 if(use_vsync) {
nuclear@0 215 wait_vsync();
nuclear@0 216 }
nuclear@0 217 num_frm++;
nuclear@0 218 }
nuclear@0 219
nuclear@0 220 static void draw_cursor(unsigned char *fb, int xsz, int ysz, int mx, int my, int cidx)
nuclear@0 221 {
nuclear@0 222 static char img[] =
nuclear@0 223 "oo........"
nuclear@0 224 "oxo......."
nuclear@0 225 "oxxo......"
nuclear@0 226 "oxxxo....."
nuclear@0 227 "oxxxxo...."
nuclear@0 228 "oxxxxxo..."
nuclear@0 229 "oxxxxxxo.."
nuclear@0 230 "oxxxxxxxo."
nuclear@0 231 "oxxxxxxxxo"
nuclear@0 232 "oxxxxxoooo"
nuclear@0 233 "oxxoxxo..."
nuclear@0 234 "oxo.oxxo.."
nuclear@0 235 "oo..oxxo.."
nuclear@0 236 ".....oxxo."
nuclear@0 237 ".....oxxo."
nuclear@0 238 "......oo..";
nuclear@0 239 int i, j, w = 10, h = 16;
nuclear@0 240
nuclear@0 241 if(mx < 0 || my < 0) {
nuclear@0 242 return;
nuclear@0 243 }
nuclear@0 244 if(mx + w >= xsz) {
nuclear@0 245 w = xsz - mx;
nuclear@0 246 }
nuclear@0 247 if(my + h >= ysz) {
nuclear@0 248 h = ysz - my;
nuclear@0 249 }
nuclear@0 250
nuclear@0 251 fb += my * xsz + mx;
nuclear@0 252 for(i=0; i<h; i++) {
nuclear@0 253 for(j=0; j<w; j++) {
nuclear@0 254 char c = img[(i << 3) + (i << 1) + j];
nuclear@0 255 if(c != '.') {
nuclear@0 256 fb[j] = c == 'x' ? 0 : cidx;
nuclear@0 257 }
nuclear@0 258 }
nuclear@0 259 fb += xsz;
nuclear@0 260 }
nuclear@0 261 }
nuclear@0 262
nuclear@0 263 static int keyb(char key)
nuclear@0 264 {
nuclear@0 265 switch(key) {
nuclear@0 266 case 'q':
nuclear@0 267 case 27:
nuclear@0 268 return 0;
nuclear@0 269
nuclear@3 270 case 's':
nuclear@3 271 if(mgl_isenabled(MGL_SMOOTH)) {
nuclear@3 272 mgl_disable(MGL_SMOOTH);
nuclear@3 273 } else {
nuclear@3 274 mgl_enable(MGL_SMOOTH);
nuclear@3 275 }
nuclear@3 276 break;
nuclear@3 277
nuclear@3 278 case 't':
nuclear@3 279 if(mgl_isenabled(MGL_TEXTURE_2D)) {
nuclear@3 280 mgl_disable(MGL_TEXTURE_2D);
nuclear@3 281 } else {
nuclear@3 282 mgl_enable(MGL_TEXTURE_2D);
nuclear@3 283 }
nuclear@3 284 break;
nuclear@3 285
nuclear@0 286 case ' ':
nuclear@0 287 auto_rotate = !auto_rotate;
nuclear@0 288 break;
nuclear@0 289
nuclear@0 290 case 'p':
nuclear@0 291 prim = (prim + 1) % NUM_PRIMS;
nuclear@0 292 break;
nuclear@0 293
nuclear@0 294 default:
nuclear@0 295 break;
nuclear@0 296 }
nuclear@0 297 return 1;
nuclear@0 298 }
nuclear@0 299
nuclear@0 300 static int bnstate;
nuclear@0 301 static int prev_x, prev_y;
nuclear@0 302
nuclear@0 303 static void mouse_button(int bn, int x, int y)
nuclear@0 304 {
nuclear@0 305 bnstate = bn;
nuclear@0 306 prev_x = x;
nuclear@0 307 prev_y = y;
nuclear@0 308 }
nuclear@0 309
nuclear@0 310 static void mouse_motion(int x, int y)
nuclear@0 311 {
nuclear@0 312 int dx, dy;
nuclear@0 313
nuclear@0 314 dx = x - prev_x;
nuclear@0 315 dy = y - prev_y;
nuclear@0 316 prev_x = x;
nuclear@0 317 prev_y = y;
nuclear@0 318
nuclear@0 319 if(bnstate) {
nuclear@0 320 cam_theta += dx;
nuclear@0 321 cam_phi += dy;
nuclear@0 322
nuclear@0 323 if(cam_phi > 90) cam_phi = 90;
nuclear@0 324 if(cam_phi < -90) cam_phi = -90;
nuclear@0 325 }
nuclear@0 326 }
nuclear@0 327
nuclear@0 328 static void sighandler(int s)
nuclear@0 329 {
nuclear@0 330 set_video_mode(3);
nuclear@0 331
nuclear@0 332 switch(s) {
nuclear@0 333 case SIGABRT:
nuclear@0 334 fprintf(stderr, "abort\n");
nuclear@0 335 break;
nuclear@0 336
nuclear@0 337 case SIGILL:
nuclear@0 338 fprintf(stderr, "illegal operation\n");
nuclear@0 339 break;
nuclear@0 340
nuclear@0 341 case SIGSEGV:
nuclear@0 342 fprintf(stderr, "segmentation fault\n");
nuclear@0 343 break;
nuclear@0 344
nuclear@0 345 case SIGINT:
nuclear@0 346 fprintf(stderr, "interrupted\n");
nuclear@0 347 break;
nuclear@0 348
nuclear@0 349 case SIGFPE:
nuclear@0 350 fprintf(stderr, "floating point exception\n");
nuclear@0 351 break;
nuclear@0 352
nuclear@0 353 default:
nuclear@0 354 fprintf(stderr, "unexpected signal\n");
nuclear@0 355 }
nuclear@0 356
nuclear@0 357 exit(1);
nuclear@0 358 }
nuclear@0 359
nuclear@0 360 static int parse_args(int argc, char **argv)
nuclear@0 361 {
nuclear@0 362 int i;
nuclear@0 363
nuclear@0 364 for(i=1; i<argc; i++) {
nuclear@0 365 if(argv[i][0] == '-') {
nuclear@0 366 if(argv[i][2] != 0) {
nuclear@0 367 goto invalid;
nuclear@0 368 }
nuclear@0 369 switch(argv[i][1]) {
nuclear@0 370 case 'a':
nuclear@0 371 auto_rotate = !auto_rotate;
nuclear@0 372 break;
nuclear@0 373
nuclear@4 374 case 't':
nuclear@4 375 texfile = argv[++i];
nuclear@4 376 break;
nuclear@4 377
nuclear@0 378 case 'v':
nuclear@0 379 use_vsync = !use_vsync;
nuclear@0 380 break;
nuclear@0 381
nuclear@0 382 case 'p':
nuclear@0 383 if(strcmp(argv[++i], "cube") == 0) {
nuclear@0 384 prim = CUBE;
nuclear@0 385 } else if(strcmp(argv[i], "sphere") == 0) {
nuclear@0 386 prim = SPHERE;
nuclear@0 387 } else if(strcmp(argv[i], "torus") == 0) {
nuclear@0 388 prim = TORUS;
nuclear@0 389 } else {
nuclear@0 390 goto invalid;
nuclear@0 391 }
nuclear@0 392 break;
nuclear@0 393
nuclear@0 394 case 'w':
nuclear@0 395 under_windows = 1;
nuclear@0 396 break;
nuclear@0 397
nuclear@0 398 case 'h':
nuclear@0 399 printf("Usage %s [options]\n", argv[0]);
nuclear@0 400 printf("options:\n");
nuclear@0 401 printf(" -p select one of (cube|sphere|torus)\n");
nuclear@0 402 printf(" -v use vsync\n");
nuclear@0 403 printf(" -w run under windows\n");
nuclear@0 404 printf(" -h print usage information and exit\n");
nuclear@0 405 exit(0);
nuclear@0 406
nuclear@0 407 default:
nuclear@0 408 goto invalid;
nuclear@0 409 }
nuclear@0 410 } else {
nuclear@0 411 goto invalid;
nuclear@0 412 }
nuclear@0 413 }
nuclear@0 414
nuclear@0 415 return 0;
nuclear@0 416
nuclear@0 417 invalid:
nuclear@0 418 fprintf(stderr, "invalid argument: %s\n", argv[i]);
nuclear@0 419 return -1;
nuclear@0 420 }
nuclear@0 421
nuclear@0 422
nuclear@0 423 static void print_perf(void)
nuclear@0 424 {
nuclear@0 425 unsigned long msec, avg_frame_time;
nuclear@0 426 float sec, fps;
nuclear@0 427
nuclear@0 428 msec = get_msec();
nuclear@0 429 if(!num_frm || msec < 1000) {
nuclear@0 430 printf("leaving so soon? (%lu ms)\n", msec);
nuclear@0 431 return;
nuclear@0 432 }
nuclear@0 433
nuclear@0 434 sec = msec / 1000.0f;
nuclear@0 435 fps = (float)num_frm / sec;
nuclear@0 436 avg_frame_time = msec / num_frm;
nuclear@0 437
nuclear@0 438 printf("%lu frames in %.2f seconds\n", num_frm, sec);
nuclear@0 439 printf(" avg. frame time: %lu ms\n", avg_frame_time);
nuclear@0 440 printf(" avg. framerate: %.2f fps\n", fps);
nuclear@0 441 }