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

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <math.h>
   5 #include <assert.h>
   6 #include "imago2.h"
   7 #include "demo.h"
   8 #include "screen.h"
   9
  10 /* APPROX. 170 FPS Minimum */
  11
  12 #define BG_FILENAME "data/grise.png"
  13 #define GROBJ_01_FILENAME "data/grobj_01.png"
  14
  15 #define BB_SIZE 512     /* Let's use a power of 2. Maybe we'll zoom/rotate the effect */
  16
  17 /* Every backBuffer scanline is guaranteed to have that many dummy pixels before and after */
  18 #define PIXEL_PADDING 32
  19
  20 #define MIN_SCROLL PIXEL_PADDING
  21 #define MAX_SCROLL (backgroundW - fb_width - MIN_SCROLL)
  22
  23 #define FAR_SCROLL_SPEED 50.0f
  24 #define NEAR_SCROLL_SPEED 400.0f
  25
  26 #define HORIZON_HEIGHT 100
  27 #define REFLECTION_HEIGHT (240 - HORIZON_HEIGHT)
  28
  29 #define NORMALMAP_SCANLINE 372
  30
  31 static int init(void);
  32 static void destroy(void);
  33 static void start(long trans_time);
  34 /*static void stop(long trans_time);*/
  35 static void draw(void);
  36
  37 static void convert32To16(unsigned int *src32, unsigned short *dst16, unsigned int pixelCount);
  38 static void processNormal();
  39 static void initScrollTables();
  40 static void updateScrollTables(float dt);
  41
  42 static void rleEncode(unsigned char *pixels, unsigned int w, unsigned int h);
  43
  44 static unsigned short *background = 0;
  45 static int backgroundW = 0;
  46 static int backgroundH = 0;
  47
  48 static unsigned int lastFrameTime = 0;
  49 static float lastFrameDuration = 0.0f;
  50
  51 static short *displacementMap;
  52
  53 static unsigned short *backBuffer;
  54
  55 static float scrollScaleTable[REFLECTION_HEIGHT];
  56 static float scrollTable[REFLECTION_HEIGHT];
  57 static int scrollTableRounded[REFLECTION_HEIGHT];
  58 static int scrollModTable[REFLECTION_HEIGHT];
  59 static float nearScrollAmount = 0.0f;
  60
  61 static struct screen scr = {
  62         "galaxyrise",
  63         init,
  64         destroy,
  65         start,
  66         0,
  67         draw
  68 };
  69
  70 struct screen *grise_screen(void)
  71 {
  72         return &scr;
  73 }
  74
  75
  76 static int init(void)
  77 {
  78         unsigned char *reflectedObject;
  79         int reflectedObjectW, reflectedObjectH;
  80
  81         /* Allocate back buffer */
  82         backBuffer = (unsigned short*) malloc(BB_SIZE * BB_SIZE * sizeof(unsigned short));
  83
  84         /* grise.png contains the background (horizon), baked reflection and normalmap for displacement */
  85         if (!(background = img_load_pixels(BG_FILENAME, &backgroundW, &backgroundH, IMG_FMT_RGBA32))) {
  86                 fprintf(stderr, "failed to load image " BG_FILENAME "\n");
  87                 return -1;
  88         }
  89
  90         /* Convert to 16bpp */
  91         convert32To16((unsigned int*)background, background, backgroundW * NORMALMAP_SCANLINE); /* Normalmap will keep its 32 bit color */
  92
  93         /* Load reflected objects */
  94         if (!(reflectedObject = img_load_pixels(GROBJ_01_FILENAME, &reflectedObjectW, &reflectedObjectH, IMG_FMT_GREY8))) {
  95                 fprintf(stderr, "failed to load image " GROBJ_01_FILENAME "\n");
  96                 return -1;
  97         }
  98
  99         rleEncode(reflectedObject, reflectedObjectW, reflectedObjectH);
 100
 101         img_free_pixels(reflectedObject);
 102
 103         initScrollTables();
 104
 105         processNormal();
 106
 107 #ifdef MIKE_PC
 108         return 0xCAFE;
 109 #else
 110         return 0;
 111 #endif
 112 }
 113
 114 static void destroy(void)
 115 {
 116         free(backBuffer);
 117         backBuffer = 0;
 118
 119         img_free_pixels(background);
 120 }
 121
 122 static void start(long trans_time)
 123 {
 124         lastFrameTime = time_msec;
 125 }
 126
 127 /* XXX add the stop function when you have an out-transition, otherwise
 128  * it just delays the change to the next effect.
 129  */
 130 /*
 131 static void stop(long trans_time)
 132 {
 133 }
 134 */
 135
 136 static void draw(void)
 137 {
 138         int scroll = MIN_SCROLL + (MAX_SCROLL - MIN_SCROLL) * mouse_x / fb_width;
 139         unsigned short *dst = backBuffer + PIXEL_PADDING;
 140         unsigned short *src = background + scroll;
 141         int scanline = 0;
 142         int i = 0;
 143         short *dispScanline;
 144         int d;
 145
 146         lastFrameDuration = (time_msec - lastFrameTime) / 1000.0f;
 147         lastFrameTime = time_msec;
 148
 149         /* First, render the horizon */
 150         for (scanline = 0; scanline < HORIZON_HEIGHT; scanline++) {
 151                 memcpy(dst, src, fb_width * 2);
 152                 src += backgroundW;
 153                 dst += BB_SIZE;
 154         }
 155
 156         /* Create scroll opffsets for all scanlines of the normalmap */
 157         updateScrollTables(lastFrameDuration);
 158
 159         /* Then, render the reflection under the horizon */
 160         /* dst is already in place */
 161         src = background + HORIZON_HEIGHT * backgroundW;
 162         dispScanline = displacementMap;
 163         for (scanline = 0; scanline < REFLECTION_HEIGHT; scanline++) {
 164                 for (i = 0; i < fb_width; i++) {
 165                         d = dispScanline[(i + scrollTableRounded[scanline]) % scrollModTable[scanline]];
 166                         *dst++ = src[i + scroll + d];
 167                 }
 168                 src += backgroundW;
 169                 dst += BB_SIZE - fb_width;
 170                 dispScanline += backgroundW;
 171         }
 172
 173         /* Blit effect to framebuffer */
 174         src = backBuffer + PIXEL_PADDING;
 175         dst = fb_pixels;
 176         for (scanline = 0; scanline < fb_height; scanline++) {
 177                 memcpy(dst, src, fb_width * 2);
 178                 src += BB_SIZE;
 179                 dst += fb_width;
 180         }
 181
 182         swap_buffers(fb_pixels);
 183 }
 184
 185 /* src and dst can be the same */
 186 static void convert32To16(unsigned int *src32, unsigned short *dst16, unsigned int pixelCount) {
 187         unsigned int p;
 188         while (pixelCount) {
 189                 p = *src32++;
 190                 *dst16++ =      ((p << 8) & 0xF800)             /* R */
 191                         |               ((p >> 5) & 0x07E0)             /* G */
 192                         |               ((p >> 19) & 0x001F);   /* B */
 193                 pixelCount--;
 194         }
 195 }
 196
 197 /* Normal map preprocessing */
 198 /* Scale normal with depth and unpack R component (horizontal component) */
 199 static void processNormal() {
 200         int scanline;
 201         int i;
 202         int x;
 203         short maxDisplacement = 0;
 204         short minDisplacement = 256;
 205         unsigned short *dst;
 206         short *dst2;
 207         unsigned int *normalmap = (unsigned int*)background;
 208         normalmap += NORMALMAP_SCANLINE * backgroundW;
 209         dst = (unsigned short*)normalmap;
 210         displacementMap = (short*)dst;
 211         dst2 = displacementMap;
 212
 213         for (scanline = 0; scanline < REFLECTION_HEIGHT; scanline++) {
 214                 scrollModTable[scanline] = (int) (backgroundW / scrollScaleTable[scanline] + 0.5f);
 215                 for (i = 0; i < backgroundW; i++) {
 216                         x = (int)(i * scrollScaleTable[scanline] + 0.5f);
 217                         if (x < backgroundW) {
 218                                 *dst = (unsigned short)(normalmap[x] >> 8) & 0xFF;
 219                                 if ((short)*dst > maxDisplacement) maxDisplacement = (short)(*dst);
 220                                 if ((short)*dst < minDisplacement) minDisplacement = (short)(*dst);
 221                         } else {
 222                                 *dst = 0;
 223                         }
 224                         dst++;
 225                 }
 226                 normalmap += backgroundW;
 227         }
 228
 229         if (maxDisplacement == minDisplacement) {
 230                 printf("Warning: grise normalmap fucked up\n");
 231                 return;
 232         }
 233
 234         /* Second pass - subtract half maximum displacement to displace in both directions */
 235         for (scanline = 0; scanline < REFLECTION_HEIGHT; scanline++) {
 236                 for (i = 0; i < backgroundW; i++) {
 237                         /* Remember that MIN_SCROLL is the padding around the screen, so ti's the maximum displacement we can get (positive & negative) */
 238                         *dst2 = 2 * MIN_SCROLL * (*dst2 - minDisplacement) / (maxDisplacement - minDisplacement) - MIN_SCROLL;
 239                         *dst2 = (short)((float)*dst2 / scrollScaleTable[scanline] + 0.5f); /* Displacements must also scale with distance*/
 240                         dst2++;
 241                 }
 242         }
 243 }
 244
 245 static float distanceScale(int scanline) {
 246         float farScale, t;
 247         farScale = (float)NEAR_SCROLL_SPEED / (float)FAR_SCROLL_SPEED;
 248         t = (float)scanline / ((float)REFLECTION_HEIGHT - 1);
 249         return 1.0f / (1.0f / farScale + (1.0f - 1.0f / farScale) * t);
 250 }
 251
 252 static void initScrollTables() {
 253         int i = 0;
 254         for (i = 0; i < REFLECTION_HEIGHT; i++) {
 255                 scrollScaleTable[i] = distanceScale(i);
 256                 scrollTable[i] = 0.0f;
 257                 scrollTableRounded[i] = 0;
 258         }
 259 }
 260
 261
 262 static void updateScrollTables(float dt) {
 263         int i = 0;
 264
 265         nearScrollAmount += dt * NEAR_SCROLL_SPEED;
 266         nearScrollAmount = (float) fmod(nearScrollAmount, 512.0f);
 267
 268         for (i = 0; i < REFLECTION_HEIGHT; i++) {
 269                 scrollTable[i] = nearScrollAmount / scrollScaleTable[i];
 270                 scrollTableRounded[i] = (int)(scrollTable[i] + 0.5f) % scrollModTable[i];
 271         }
 272 }
 273
 274 static void rleEncode(unsigned char *pixels, unsigned int w, unsigned int h) {
 275         int scanline;
 276         int i;
 277         int skipping = 1;
 278
 279         for (scanline = 0; scanline < h; scanline++) {
 280                 for (i = 0; i < w; i++) {
 281                         if (*pixels++) {
 282
 283                         }
 284                 }
 285         }
 286 }