git.mutantstargoat.com Git - dosdemo/blob - src/demo.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <math.h>
   5 #include <ctype.h>
   6 #include <errno.h>
   7 #include <limits.h>
   8 #include "demo.h"
   9 #include "screen.h"
  10 #include "3dgfx.h"
  11 #include "music.h"
  12 #include "cfgopt.h"
  13 #include "tinyfps.h"
  14 #include "util.h"
  15
  16 int fb_width = 320;
  17 int fb_height = 240;
  18 int fb_bpp = 16;
  19 uint16_t *fb_pixels, *vmem_back, *vmem_front;
  20 unsigned long time_msec;
  21 int mouse_x, mouse_y;
  22 unsigned int mouse_bmask;
  23
  24 float sball_matrix[] = {1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1};
  25
  26 static unsigned long nframes;
  27 static int console_active;
  28
  29 int demo_init(int argc, char **argv)
  30 {
  31         struct screen *scr;
  32         char *env;
  33
  34         if(load_config("demo.cfg") == -1) {
  35                 return -1;
  36         }
  37         if((env = getenv("START_SCR"))) {
  38                 opt.start_scr = env;
  39         }
  40         if(parse_args(argc, argv) == -1) {
  41                 return -1;
  42         }
  43
  44         initFpsFonts();
  45
  46         if(g3d_init() == -1) {
  47                 return -1;
  48         }
  49         g3d_framebuffer(fb_width, fb_height, fb_pixels);
  50
  51         if(opt.music) {
  52                 if(music_open("data/test.mod") == -1) {
  53                         return -1;
  54                 }
  55         }
  56
  57         if(scr_init() == -1) {
  58                 return -1;
  59         }
  60         if(opt.start_scr) {
  61                 scr = scr_lookup(opt.start_scr);
  62         } else {
  63                 scr = scr_screen(0);
  64         }
  65
  66         if(!scr || scr_change(scr, 4000) == -1) {
  67                 fprintf(stderr, "screen %s not found\n", opt.start_scr ? opt.start_scr : "0");
  68                 return -1;
  69         }
  70
  71         /* clear the framebuffer at least once */
  72         memset(fb_pixels, 0, fb_width * fb_height * fb_bpp / CHAR_BIT);
  73
  74         if(opt.music) {
  75                 music_play();
  76         }
  77         return 0;
  78 }
  79
  80 void demo_cleanup(void)
  81 {
  82         if(opt.music) {
  83                 music_close();
  84         }
  85         scr_shutdown();
  86         g3d_destroy();
  87
  88         if(time_msec) {
  89                 float fps = (float)nframes / ((float)time_msec / 1000.0f);
  90                 printf("average framerate: %.1f\n", fps);
  91         }
  92 }
  93
  94 void demo_draw(void)
  95 {
  96         if(opt.music) {
  97                 music_update();
  98         }
  99         scr_update();
 100         scr_draw();
 101
 102         ++nframes;
 103 }
 104
 105 static void change_screen(int idx)
 106 {
 107         printf("change screen %d\n", idx);
 108         scr_change(scr_screen(idx), 4000);
 109 }
 110
 111 #define CBUF_SIZE       64
 112 #define CBUF_MASK       (CBUF_SIZE - 1)
 113 void demo_keyboard(int key, int press)
 114 {
 115         static char cbuf[CBUF_SIZE];
 116         static int rd, wr;
 117         char inp[CBUF_SIZE + 1], *dptr;
 118         int i, nscr;
 119
 120         if(press) {
 121                 switch(key) {
 122                 case 27:
 123                         demo_quit();
 124                         break;
 125
 126                 case 127:
 127                         debug_break();
 128                         break;
 129
 130                 case '`':
 131                         console_active = !console_active;
 132                         if(console_active) {
 133                                 printf("> ");
 134                                 fflush(stdout);
 135                         } else {
 136                                 putchar('\n');
 137                         }
 138                         break;
 139
 140                 case '\b':
 141                         if(console_active && wr != rd) {
 142                                 printf("\b \b");
 143                                 fflush(stdout);
 144                                 wr = (wr + CBUF_SIZE - 1) & CBUF_MASK;
 145                         }
 146                         break;
 147
 148                 case '\n':
 149                 case '\r':
 150                         if(console_active) {
 151                                 dptr = inp;
 152                                 while(rd != wr) {
 153                                         *dptr++ = cbuf[rd];
 154                                         rd = (rd + 1) & CBUF_MASK;
 155                                 }
 156                                 *dptr = 0;
 157                                 if(inp[0]) {
 158                                         printf("\ntrying to match: %s\n", inp);
 159                                         nscr = scr_num_screens();
 160                                         for(i=0; i<nscr; i++) {
 161                                                 if(strstr(scr_screen(i)->name, inp)) {
 162                                                         change_screen(i);
 163                                                         break;
 164                                                 }
 165                                         }
 166                                 }
 167                                 console_active = 0;
 168                         }
 169                         break;
 170
 171                 default:
 172                         if(key >= '1' && key <= '9' && key <= '1' + scr_num_screens()) {
 173                                 change_screen(key - '1');
 174                         } else if(key == '0' && scr_num_screens() >= 10) {
 175                                 change_screen(9);
 176                         }
 177
 178                         if(console_active && key < 256 && isprint(key)) {
 179                                 putchar(key);
 180                                 fflush(stdout);
 181
 182                                 cbuf[wr] = key;
 183                                 wr = (wr + 1) & CBUF_MASK;
 184                                 if(wr == rd) { /* overflow */
 185                                         rd = (rd + 1) & CBUF_MASK;
 186                                 }
 187                         }
 188                         break;
 189                 }
 190         }
 191 }
 192
 193
 194 void mouse_orbit_update(float *theta, float *phi, float *dist)
 195 {
 196         static int prev_mx, prev_my;
 197         static unsigned int prev_bmask;
 198
 199         if(mouse_bmask) {
 200                 if((mouse_bmask ^ prev_bmask) == 0) {
 201                         int dx = mouse_x - prev_mx;
 202                         int dy = mouse_y - prev_my;
 203
 204                         if(dx || dy) {
 205                                 if(mouse_bmask & 1) {
 206                                         float p = *phi;
 207                                         *theta += dx * 1.0;
 208                                         p += dy * 1.0;
 209
 210                                         if(p < -90) p = -90;
 211                                         if(p > 90) p = 90;
 212                                         *phi = p;
 213                                 }
 214                                 if(mouse_bmask & 4) {
 215                                         *dist += dy * 0.5;
 216
 217                                         if(*dist < 0) *dist = 0;
 218                                 }
 219                         }
 220                 }
 221         }
 222         prev_mx = mouse_x;
 223         prev_my = mouse_y;
 224         prev_bmask = mouse_bmask;
 225 }