#include <stdio.h>
#include <stdlib.h>
#include <math.h>
+#include <assert.h>
#include <imago2.h>
+#ifndef NO_THREADS
#include "tpool.h"
-#include "tunnel.h"
+#endif
+#include "demo.h"
+#include "screen.h"
+
+#define VSCALE 1.5
#define TEX_FNAME "data/grid.png"
#define TEX_USCALE 4
#define TEX_VSCALE 2
-#define USCALE 2
-#define VSCALE 1
+#define NUM_WORK_ITEMS 8
-extern unsigned long time_msec;
+static struct work {
+ void *pixels;
+ int starty, num_lines;
+ long tm;
+ int xoffs, yoffs;
+} work[NUM_WORK_ITEMS];
-static void draw_tunnel_range(unsigned short *pixels, int starty, int num_lines);
+static int init(void);
+static void destroy(void);
+static void start(long trans_time);
+static void stop(long trans_time);
+static void draw(void);
+
+static void (*draw_tunnel_range)(void*, int, int, int, int, long);
+
+static void draw_tunnel_range16(void *pixels, int xoffs, int yoffs, int starty, int num_lines, long tm);
+static void draw_tunnel_range32(void *pixels, int xoffs, int yoffs, int starty, int num_lines, long tm);
static int count_bits(unsigned int x);
static int count_zeros(unsigned int x);
+static struct screen scr = {
+ "tunnel",
+ init,
+ destroy,
+ start,
+ stop,
+ draw
+};
+
+struct tunmap {
+ int u, v;
+ unsigned char fog;
+};
+
static int xsz, ysz, vxsz, vysz;
-static unsigned int *tunnel_map;
-static unsigned char *tunnel_fog;
+static int pan_width, pan_height;
+static struct tunmap *tunnel_map;
static int tex_xsz, tex_ysz;
static unsigned int *tex_pixels;
static int tex_xshift, tex_yshift;
static unsigned int tex_xmask, tex_ymask;
+#ifndef NO_THREADS
static struct thread_pool *tpool;
+#endif
+
+static long trans_start, trans_dur;
+static int trans_dir;
-int init_tunnel(int x, int y)
+struct screen *tunnel_screen(void)
+{
+ return &scr;
+}
+
+
+static int init(void)
{
int i, j, n;
- unsigned int *tmap;
- unsigned char *fog;
- float aspect = (float)x / (float)y;
+ struct tunmap *tmap;
+ float aspect = (float)fb_width / (float)fb_height;
+
+ switch(fb_depth) {
+ case 16:
+ draw_tunnel_range = draw_tunnel_range16;
+ break;
+ case 32:
+ draw_tunnel_range = draw_tunnel_range32;
+ break;
+ default:
+ fprintf(stderr, "unsupported color depth: %d\n", fb_depth);
+ return -1;
+ }
+
+ xsz = fb_width / 2;
+ ysz = fb_height;
+ vxsz = xsz * VSCALE;
+ vysz = ysz * VSCALE;
- xsz = x;
- ysz = y;
- vxsz = xsz / USCALE;
- vysz = ysz / VSCALE;
+ pan_width = vxsz - xsz;
+ pan_height = vysz - ysz;
if(!(tunnel_map = malloc(vxsz * vysz * sizeof *tunnel_map))) {
fprintf(stderr, "failed to allocate tunnel map\n");
return -1;
}
- if(!(tunnel_fog = malloc(vxsz * vysz))) {
- fprintf(stderr, "failed to allocate tunnel fog map\n");
- return -1;
- }
tmap = tunnel_map;
- fog = tunnel_fog;
for(i=0; i<vysz; i++) {
float y = 2.0 * (float)i / (float)vysz - 1.0;
float d = sqrt(x * x + y * y);
float tv = d == 0.0 ? 0.0 : 1.0 / d;
- int tx = (int)(tu * 65535.0 * TEX_USCALE) & 0xffff;
- int ty = (int)(tv * 65535.0 * TEX_VSCALE) & 0xffff;
+ int fog = (int)(d * 128.0f);
- int f = (int)(d * 95.0);
-
- *tmap++ = (tx << 16) | ty;
- *fog++ = f > 255 ? 255 : f;
+ tmap->u = (int)(tu * 65535.0 * TEX_USCALE) & 0xffff;
+ tmap->v = (int)(tv * 65535.0 * TEX_VSCALE) & 0xffff;
+ tmap->fog = fog > 255 ? 255 : fog;
+ tmap++;
}
}
}
tex_yshift = n;
+#ifndef NO_THREADS
if(!(tpool = tpool_create(0))) {
fprintf(stderr, "failed to create thread pool\n");
return -1;
}
+#endif
+
+ /* initialize the constant part of all work items */
+ for(i=0; i<NUM_WORK_ITEMS; i++) {
+ int num_lines = ysz / NUM_WORK_ITEMS;
+ work[i].pixels = fb_pixels;
+ work[i].starty = i * num_lines;
+ }
return 0;
}
-void destroy_tunnel(void)
+static void destroy(void)
{
+#ifndef NO_THREADS
tpool_destroy(tpool);
+#endif
free(tunnel_map);
- free(tunnel_fog);
}
-#define NUM_WORK_ITEMS 32
+static void start(long trans_time)
+{
+ if(trans_time) {
+ trans_start = time_msec;
+ trans_dur = trans_time;
+ trans_dir = 1;
+ }
+}
+
+static void stop(long trans_time)
+{
+ if(trans_time) {
+ trans_start = time_msec;
+ trans_dur = trans_time;
+ trans_dir = -1;
+ }
+}
-static struct work {
- unsigned short *pixels;
- int starty, num_lines;
-} work[NUM_WORK_ITEMS];
static void work_func(void *cls)
{
struct work *w = (struct work*)cls;
- draw_tunnel_range(w->pixels, w->starty, w->num_lines);
+ draw_tunnel_range(w->pixels, w->xoffs, w->yoffs, w->starty, w->num_lines, w->tm);
}
-void draw_tunnel(unsigned short *pixels)
+static void draw(void)
{
- int i, num_lines = vysz / NUM_WORK_ITEMS;
+ int i, num_lines = ysz / NUM_WORK_ITEMS;
+ int draw_lines = num_lines;
+ float t;
+ int xoffs, yoffs;
+
+ if(trans_dir) {
+ long interval = time_msec - trans_start;
+ int progr = num_lines * interval / trans_dur;
+ if(trans_dir < 0) {
+ draw_lines = num_lines - progr - 1;
+ } else {
+ draw_lines = progr;
+ }
+ if(progr >= num_lines) {
+ trans_dir = 0;
+ }
+ }
+
+ t = time_msec / 10000.0;
+ xoffs = (int)(cos(t * 3.0) * pan_width / 2) + pan_width / 2;
+ yoffs = (int)(sin(t * 4.0) * pan_height / 2) + pan_height / 2;
+
for(i=0; i<NUM_WORK_ITEMS; i++) {
- work[i].pixels = pixels;
- work[i].starty = i * num_lines;
- work[i].num_lines = num_lines;
+ work[i].num_lines = draw_lines;
+ work[i].tm = time_msec;
+ work[i].xoffs = xoffs;
+ work[i].yoffs = yoffs;
+#ifdef NO_THREADS
+ work_func(work + i);
+ }
+#else
tpool_enqueue(tpool, work + i, work_func, 0);
}
tpool_wait(tpool);
+#endif
+}
+
+static void tunnel_color(int *rp, int *gp, int *bp, long toffs, struct tunmap *tmap)
+{
+ int r, g, b;
+ unsigned int col;
+ unsigned int tx = (tmap->u << tex_xshift) >> 16;
+ unsigned int ty = (tmap->v << tex_yshift) >> 16;
+ tx += toffs;
+ ty += toffs << 1;
+
+ tx &= tex_xmask;
+ ty &= tex_ymask;
+
+ col = tex_pixels[(ty << tex_xshift) + tx];
+ r = col & 0xff;
+ g = (col >> 8) & 0xff;
+ b = (col >> 16) & 0xff;
+
+ *rp = (r * tmap->fog) >> 8;
+ *gp = (g * tmap->fog) >> 8;
+ *bp = (b * tmap->fog) >> 8;
}
#define PACK_RGB16(r, g, b) \
- (((((r) >> 3) & 0x1f) << 11) | ((((g) >> 2) & 0x3f) << 5) | ((b) & 0x1f))
+ (((((r) >> 3) & 0x1f) << 11) | ((((g) >> 2) & 0x3f) << 5) | (((b) >> 3) & 0x1f))
+#define PACK_RGB32(r, g, b) \
+ ((((r) & 0xff) << 16) | (((g) & 0xff) << 8) | ((b) & 0xff))
-static void draw_tunnel_range(unsigned short *pixels, int starty, int num_lines)
+static void draw_tunnel_range16(void *pix, int xoffs, int yoffs, int starty, int num_lines, long tm)
{
- int i, j, k, r, g, b;
- unsigned int *tmap = tunnel_map + starty * vxsz;
- unsigned char *fog = tunnel_fog + starty * vxsz;
+ int i, j;
+ struct tunmap *tmap = tunnel_map + (starty + yoffs) * vxsz + xoffs;
- long toffs = time_msec / 4;
- pixels += starty * xsz * VSCALE;
+ long toffs = tm / 4;
+ unsigned int *pixels = (unsigned int*)pix + starty * (fb_width >> 1);
for(i=0; i<num_lines; i++) {
- for(j=0; j<vxsz; j++) {
- unsigned short *ptr;
+ for(j=0; j<xsz; j++) {
+ unsigned int col;
+ int r, g, b;
+
+ tunnel_color(&r, &g, &b, toffs, tmap + j);
+ col = PACK_RGB16(r, g, b);
+ *pixels++ = (col << 16) | col;
+ }
+ tmap += vxsz;
+ }
+}
+
+static void draw_tunnel_range32(void *pix, int xoffs, int yoffs, int starty, int num_lines, long tm)
+{
+ int i, j;
+ struct tunmap *tmap = tunnel_map + (starty + yoffs) * vxsz + xoffs;
+
+ long toffs = tm / 4;
+ unsigned int *pixels = (unsigned int*)pix + starty * fb_width;
+
+ for(i=0; i<num_lines; i++) {
+ for(j=0; j<xsz; j++) {
unsigned int col;
- unsigned int tx = (((*tmap >> 16) & 0xffff) << tex_xshift) >> 16;
- unsigned int ty = ((*tmap & 0xffff) << tex_yshift) >> 16;
- ++tmap;
-
- tx += toffs;
- ty += toffs << 1;
-
- tx &= tex_xmask;
- ty &= tex_ymask;
-
- col = tex_pixels[(ty << tex_xshift) + tx];
- r = col & 0xff;
- g = (col >> 8) & 0xff;
- b = (col >> 16) & 0xff;
-
- r = (r * *fog) >> 8;
- g = (g * *fog) >> 8;
- b = (b * *fog) >> 8;
- ++fog;
-
- col = ((((r >> 3) & 0x1f) << 11) | (((g >> 2) & 0x3f) << 5) | ((b >> 3) & 0x1f));
-
- ptr = pixels;
- for(k=0; k<VSCALE; k++) {
- switch(USCALE) {
- case 4:
- ptr[3] = col;
- case 3:
- ptr[2] = col;
- case 2:
- ptr[1] = col;
- case 1:
- *ptr = col;
- }
- ptr += xsz;
- }
- pixels += USCALE;
+ int r, g, b;
+
+ tunnel_color(&r, &g, &b, toffs, tmap + j);
+ col = PACK_RGB32(r, g, b);
+
+ *pixels++ = col;
+ *pixels++ = col;
}
- pixels += xsz * (VSCALE - 1);
+ tmap += vxsz;
}
}