iamgreaser/buldthensnip
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
buldthensnip/render.c
Ben Russell (300178622) 15f87dbc43 changed name by stack's request to "iceball"
2012-11-06 11:58:32 +13:00

1001 lines
22 KiB
C
Raw Blame History

/*
This file is part of Iceball.
Iceball is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
Iceball is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with Iceball. If not, see <http://www.gnu.org/licenses/>.
*/
#include "common.h"
// TODO: bump up to 127.5f
#define FOG_DISTANCE 40.0f
#define FTB_MAX_PERSPAN 50
#define DF_NX 0x01
#define DF_NY 0x02
#define DF_NZ 0x04
#define DF_PX 0x08
#define DF_PY 0x10
#define DF_PZ 0x20
#define DF_SPREAD 0x3F
enum
{
CM_NX = 0,
CM_NY,
CM_NZ,
CM_PX,
CM_PY,
CM_PZ,
CM_MAX
};
uint32_t *cubemap_color[CM_MAX];
float *cubemap_depth[CM_MAX];
int cubemap_size;
int cubemap_shift;
uint32_t *rtmp_pixels;
int rtmp_width, rtmp_height, rtmp_pitch;
camera_t *rtmp_camera;
map_t *rtmp_map;
int *ftb_first;
/*
* REFERENCE IMPLEMENTATION
*
*/
uint32_t render_fog_apply(uint32_t color, float depth)
{
int b = color&255;
int g = (color>>8)&255;
int r = (color>>16)&255;
int t = (color>>24)&255;
float fog = (FOG_DISTANCE-(depth < 0.001f ? 0.001f : depth))/FOG_DISTANCE;
if(fog > 1.0f)
fog = 1.0f;
if(fog < 0.0f)
fog = 0.0f;
r = (r*fog+0.5f);
g = (g*fog+0.5f);
b = (b*fog+0.5f);
return b|(g<<8)|(r<<16)|(t<<24);
}
void render_rect_clip(uint32_t *color, int *x1, int *y1, int *x2, int *y2, float depth)
{
*color = render_fog_apply(*color, depth);
// arrange *1 <= *2
if(*x1 > *x2)
{
int t = *x1;
*x1 = *x2;
*x2 = t;
}
if(*y1 > *y2)
{
int t = *y1;
*y1 = *y2;
*y2 = t;
}
// clip
if(*x1 < 0)
*x1 = 0;
if(*y1 < 0)
*y1 = 0;
if(*x2 > cubemap_size)
*x2 = cubemap_size;
if(*y2 > cubemap_size)
*y2 = cubemap_size;
}
void render_vxl_rect_btf(uint32_t *ccolor, float *cdepth, int x1, int y1, int x2, int y2, uint32_t color, float depth)
{
int x,y;
// clip
render_rect_clip(&color, &x1, &y1, &x2, &y2, depth);
if(x2 <= 0)
return;
if(x1 >= cubemap_size)
return;
if(y2 <= 0)
return;
if(y1 >= cubemap_size)
return;
if(x1 == x2)
return;
if(y1 == y2)
return;
// render
uint32_t *cptr = &ccolor[(y1<<cubemap_shift)+x1];
float *dptr = &cdepth[(y1<<cubemap_shift)+x1];
int stride = x2-x1;
int pitch = cubemap_size - stride;
// split it into two, it's more cache/register-friendly (i think)
// FIXME: the depth loop causes a crash! don't use this yet!
//if defined(USE_ASM) && (defined(__i386__) || defined(__amd64__))
#if 0
int ylen = y2-y1;
//stride <<= 2;
pitch <<= 2;
//printf("%i %i %i %i\n",x1,x2,y1,y2);
// AT%T SYNTAX SUCKS
__asm__ (
"render_vxl_rect_btf_lp_color_y:\n\t"
#if defined(__amd64__)
"movq %0, %%rcx\n\t"
#else
"movl %0, %%ecx\n\t"
#endif
"cld\n\trep\n\tstosl\n\t" // IT'S REP STOSD YOU *IDIOTS*!
#if defined(__amd64__)
"add %1, %%rdi\n\t"
#else
"add %1, %%edi\n\t"
#endif
"dec %2\n\t"
"jnz render_vxl_rect_btf_lp_color_y\n\t"
: /* no outputs */
#if defined(__amd64__)
: "g"((uint64_t)stride), "g"((uint64_t)pitch), "g"((uint64_t)ylen),
"D"(cptr), "a"(color)
#else
: "g"(stride), "g"(pitch), "g"(ylen),
"D"(cptr), "a"(color)
#endif
: "ecx", "%1", "%2"
);
//printf("%i %i %i\n",y1,y2,ylen);
// FIXME: depth causes a crash, probably because i suck at inline asm
/*
uint32_t idepth = *(uint32_t *)(float *)&depth;
__asm__ __volatile__ (
"render_vxl_rect_btf_lp_depth_y:\n\t"
#if defined(__amd64__)
"movq %0, %%rcx\n\t"
#else
"movl %0, %%ecx\n\t"
#endif
"cld\n\trep\n\tstosl\n\t" // IT'S REP STOSD YOU *IDIOTS*!
#if defined(__amd64__)
"add %1, %%rdi\n\t"
#else
"add %1, %%edi\n\t"
#endif
"dec %2\n\t"
"jnz render_vxl_rect_btf_lp_depth_y\n\t"
: // no outputs
#if defined(__amd64__)
: "g"((uint64_t)stride), "g"((uint64_t)pitch), "g"((uint64_t)ylen),
"D"(dptr), "a"(idepth)
#else
: "g"(stride), "g"(pitch), "g"(ylen),
"D"(dptr), "a"(idepth)
#endif
: "ecx", "%1", "%2", "memory"
);
*/
#else
for(y = y1; y < y2; y++)
{
for(x = x1; x < x2; x++)
*(cptr++) = color;
cptr += pitch;
}
for(y = y1; y < y2; y++)
{
for(x = x1; x < x2; x++)
*(dptr++) = depth;
dptr += pitch;
}
#endif
}
// TODO: get my head around this.
void todo_render_vxl_rect_ftb_fast(uint32_t *ccolor, float *cdepth, int x1, int y1, int x2, int y2, uint32_t color, float depth)
{
int x,y;
// clip
render_rect_clip(&color, &x1, &y1, &x2, &y2, depth);
if(x2 <= 0)
return;
if(x1 >= cubemap_size)
return;
if(y2 <= 0)
return;
if(y1 >= cubemap_size)
return;
if(x1 == x2)
return;
if(y1 == y2)
return;
// render
uint32_t *cptr = &ccolor[(y1<<cubemap_shift)+x1];
uint32_t *cstarty = &ccolor[(y1<<cubemap_shift)];
float *dptr = &cdepth[(y1<<cubemap_shift)+x1];
int pitch = cubemap_size - (x2-x1);
for(y = y1; y < y2; y++)
{
// read from FTB buffer
int *lf = &(ftb_first[y]);
int f = *lf;
// UPPER = next
// LOWER = length
while(f < x2)
{
// read value
uint32_t *pv = &(ccolor[f]);
uint32_t v = *pv;
// check if we're in the right sort of area
if(f >= x1)
{
// plot it
for(x = x1; x < x2; x++)
*(cptr++) = color;
for(x = x1; x < x2; x++)
*(dptr++) = depth;
} else if(x1 < f+(int)(v&0xFFFF)) {
}
lf = (int *)&ccolor[f];
}
cptr += pitch;
dptr += pitch;
cstarty += cubemap_size;
}
}
void render_vxl_rect_ftb_fast(uint32_t *ccolor, float *cdepth, int x1, int y1, int x2, int y2, uint32_t color, float depth)
//void render_vxl_rect_ftb_slow(uint32_t *ccolor, float *cdepth, int x1, int y1, int x2, int y2, uint32_t color, float depth)
{
int x,y;
// TODO: stop using this bloody function
// (alternatively, switch to the fast FTB as used in Doom and Quake)
//
// NOTE: this approach seems to be faster than render_vxl_rect_btf.
// clip
render_rect_clip(&color, &x1, &y1, &x2, &y2, depth);
if(x2 <= 0)
return;
if(x1 >= cubemap_size)
return;
if(y2 <= 0)
return;
if(y1 >= cubemap_size)
return;
if(x1 == x2)
return;
if(y1 == y2)
return;
// render
uint32_t *cptr = &ccolor[(y1<<cubemap_shift)+x1];
float *dptr = &cdepth[(y1<<cubemap_shift)+x1];
int pitch = cubemap_size - (x2-x1);
for(y = y1; y < y2; y++)
{
for(x = x1; x < x2; x++)
{
if(*cptr == 0)
{
*cptr = color;
*dptr = depth;
}
cptr++;
dptr++;
}
cptr += pitch;
dptr += pitch;
}
}
void render_vxl_trap_ftb_fast(uint32_t *ccolor, float *cdepth,
int x1, int y1, int x2, int y2, int x3, int y3, int x4, int y4,
uint32_t color, float depth)
//void render_vxl_trap_ftb_slow(uint32_t *ccolor, float *cdepth,
// int x1, int y1, int x2, int y2, int x3, int y3, int x4, int y4,
// uint32_t color, float depth)
{
// TODO: fast FTB version
//render_fog_apply(&color, depth);
// TODO: clip
// TODO: form actual trapezia
int x12 = (x1+x2)>>1;
int x23 = (x2+x3)>>1;
int x34 = (x3+x4)>>1;
int x41 = (x4+x1)>>1;
int y12 = (y1+y2)>>1;
int y23 = (y2+y3)>>1;
int y34 = (y3+y4)>>1;
int y41 = (y4+y1)>>1;
//render_vxl_rect_ftb_fast(ccolor, cdepth, x1, y1, x2,);
}
void render_vxl_cube(uint32_t *ccolor, float *cdepth, int x1, int y1, int x2, int y2, uint32_t color, float depth)
{
render_vxl_rect_ftb_fast(ccolor, cdepth, x1, y1, x2, y2, color, depth);
int hsize = (cubemap_size>>1);
int x3 = ((x1-hsize)*depth)/(depth+0.5f)+hsize;
int y3 = ((y1-hsize)*depth)/(depth+0.5f)+hsize;
int x4 = ((x2-hsize)*depth)/(depth+0.5f)+hsize;
int y4 = ((y2-hsize)*depth)/(depth+0.5f)+hsize;
// TODO: replace these with trapezium drawing routines
if(x3 < x1)
render_vxl_rect_ftb_fast(ccolor, cdepth,
(int)x3, (int)y3, (int)x1, (int)y4,
color, depth);
else if(x2 < x4)
render_vxl_rect_ftb_fast(ccolor, cdepth,
(int)x2, (int)y3, (int)x4, (int)y4,
color, depth);
if(y3 < y1)
render_vxl_rect_ftb_fast(ccolor, cdepth,
(int)x3, (int)y3, (int)x4, (int)y1,
color, depth);
else if(y2 < y4)
render_vxl_rect_ftb_fast(ccolor, cdepth,
(int)x3, (int)y2, (int)x4, (int)y4,
color, depth);
}
void render_vxl_face_vert(int blkx, int blky, int blkz,
float subx, float suby, float subz,
int face,
int gx, int gy, int gz)
{
// TODO: this function sucks, speed it up a bit
int sx,sy;
int i;
float tracemul = cubemap_size/2;
float traceadd = tracemul;
// get cubemaps
uint32_t *ccolor = cubemap_color[face];
float *cdepth = cubemap_depth[face];
// clear cubemap
for(i = 0; i < cubemap_size*cubemap_size; i++)
{
ccolor[i] = 0x00000000;
cdepth[i] = FOG_DISTANCE;
}
// clear FTB buffers
for(i = 0; i < cubemap_size; i++)
{
ftb_first[i] = 0;
//ccolor[i<<cubemap_shift] = cubemap_size|(cubemap_size<<16);
}
// get X cube direction
int xgx = gz+gy;
int xgy = 0;
int xgz = -gx;
// get Y cube direction
int ygx = 0;
int ygy = gx+gz;
int ygz = gy;
// get cubemap offset
float cmoffsx = -(xgx*subx+xgy*suby+xgz*subz);
float cmoffsy = -(ygx*subx+ygy*suby+ygz*subz);
// get distance to wall
float dist = -(subx*gx+suby*gy+subz*gz);
if(dist < 0.0f)
dist = 1.0f+dist;
else {
blky--;
blkx--;
blkz--;
}
dist -= 1.0f;
int coz = blky;
// now loop and follow through
while(dist < FOG_DISTANCE)
{
if(coz < 0 || coz >= rtmp_map->ylen)
{
coz += gy;
dist += 1.0f;
if(gy*coz > 0)
break;
continue;
}
// calculate frustum
int frustum = (int)(dist*cubemap_size);
// prep boundaries
int bx1 = 0;
int by1 = 0;
int bx2 = frustum*2;
int by2 = frustum*2;
// clamp wrt pixel counts
// TODO!
// relocate
bx1 -= frustum;
by1 -= frustum;
bx2 -= frustum;
by2 -= frustum;
// need to go towards 0, not -inf!
// (can be done as shifts, just looks nicer this way)
bx1 /= cubemap_size;
by1 /= cubemap_size;
bx2 /= cubemap_size;
by2 /= cubemap_size;
bx1--;by1--;
bx2+=2;by2+=2;
// go through loop
int cox,coy;
//printf("%.3f %i %i %i %i\n ", dist, bx1, by1, bx2, by2);
if(dist >= 0.001f)
{
float boxsize = tracemul/dist;
if(gy >= 0)
{
// bottom cubemap face
for(cox = bx1; cox <= bx2; cox++)
for(coy = by1; coy <= by2; coy++)
{
uint8_t *pillar = rtmp_map->pillars[
((cox+blkx)&(rtmp_map->xlen-1))
+(((coy+blkz)&(rtmp_map->zlen-1))*rtmp_map->xlen)]+4;
//printf("%4i %4i %4i - %i %i %i %i\n",cox,coy,coz,
// pillar[0],pillar[1],pillar[2],pillar[3]);
// get correct height
int ln = 0;
for(;;)
{
if(coz >= pillar[1] && coz <= pillar[2])
{
// TODO: distinguish between top and nontop faces
float px1 = (cox+cmoffsx)*boxsize+traceadd;
float py1 = (coy+cmoffsy)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
//printf("%i %i %i %i\n",(int)px1,(int)py1,(int)px2,(int)py2);
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*(uint32_t *)(&pillar[4]), dist);
break;
} else if(ln != 0 && (coz < pillar[3] && coz > pillar[3]-ln)) {
float px1 = (cox+cmoffsx)*boxsize+traceadd;
float py1 = (coy+cmoffsy)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
//printf("%i %i %i %i\n",(int)px1,(int)py1,(int)px2,(int)py2);
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*(uint32_t *)(&pillar[4*(coz-pillar[3])]), dist);
// TODO: sides
break;
} else if(pillar[0] == 0 || (coz < pillar[1])) {
break;
} else {
ln = pillar[0]-(pillar[2]-pillar[1]+1);
pillar += pillar[0]*4;
}
}
}
} else {
// top cubemap face
for(cox = bx1; cox <= bx2; cox++)
for(coy = by1; coy <= by2; coy++)
{
uint8_t *pillar = rtmp_map->pillars[
((cox+blkx)&(rtmp_map->xlen-1))
+(((coy+blkz)&(rtmp_map->zlen-1))*rtmp_map->xlen)]+4;
//if(pillar[0] == 0)
// continue;
//printf("%4i %4i %4i - %i %i %i %i\n",cox,coy,coz,
// pillar[0],pillar[1],pillar[2],pillar[3]);
// get correct height
int ln = 0;
for(;;)
{
if(coz >= pillar[1] && coz <= pillar[2])
{
float px1 = (-cox+cmoffsx)*boxsize+traceadd;
float py1 = (-coy+cmoffsy)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*(uint32_t *)(&pillar[4*(coz-pillar[1]+1)]), dist);
// TODO: sides
// wait, how the hell am i going to do these here?!
break;
} else if(ln != 0 && (coz < pillar[3] && coz > pillar[3]-ln)) {
float px1 = (-cox+cmoffsx)*boxsize+traceadd;
float py1 = (-coy+cmoffsy)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
//printf("%i %i %i %i\n",(int)px1,(int)py1,(int)px2,(int)py2);
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*(uint32_t *)(&pillar[4*(coz-pillar[3])]), dist);
// TODO: sides
break;
} else if(pillar[0] == 0 || (coz < pillar[1])) {
break;
} else {
ln = pillar[0]-(pillar[2]-pillar[1]+1);
pillar += pillar[0]*4;
}
}
}
}
}
coz += gy;
dist += 1.0f;
}
}
void render_vxl_face_horiz(int blkx, int blky, int blkz,
float subx, float suby, float subz,
int face,
int gx, int gy, int gz)
{
int sx,sy;
int i;
float tracemul = cubemap_size/2;
float traceadd = tracemul;
// get cubemaps
uint32_t *ccolor = cubemap_color[face];
float *cdepth = cubemap_depth[face];
// clear cubemap
for(i = 0; i < cubemap_size*cubemap_size; i++)
{
ccolor[i] = 0x00000000;
cdepth[i] = FOG_DISTANCE;
}
// clear FTB buffers
for(i = 0; i < cubemap_size; i++)
{
ftb_first[i] = 0;
//ccolor[i<<cubemap_shift] = cubemap_size|(cubemap_size<<16);
}
// get X cube direction
int xgx = gz+gy;
int xgy = 0;
int xgz = -gx;
// get Y cube direction
int ygx = 0;
int ygy = gx+gz;
int ygz = gy;
// get cubemap offset
float cmoffsx = -(xgx*subx+xgy*suby+xgz*subz);
float cmoffsy = -(ygx*subx+ygy*suby+ygz*subz);
if(cmoffsy >= 0.0f)
cmoffsy = -cmoffsy;
if(cmoffsx >= 0.0f)
cmoffsx -= 1.0f;
//else
// blky--;
// get distance to wall
float dist = -(subx*gx+suby*gy+subz*gz);
if(dist < 0.0f)
dist = 1.0f+dist;
dist -= 1.0f;
int coz = blky;
// now loop and follow through
while(dist < FOG_DISTANCE)
{
// calculate frustum
int frustum = (int)(dist*cubemap_size);
// prep boundaries
int bx1 = 0;
int by1 = 0;
int bx2 = frustum*2;
int by2 = frustum*2;
// clamp wrt pixel counts
// TODO!
// relocate
bx1 -= frustum;
by1 -= frustum;
bx2 -= frustum;
by2 -= frustum;
// need to go towards 0, not -inf!
// (can be done as shifts, just looks nicer this way)
bx1 /= cubemap_size;
by1 /= cubemap_size;
bx2 /= cubemap_size;
by2 /= cubemap_size;
bx1-=2;by1--;
bx2+=2;by2++;
// go through loop
int cox,coy;
cox = 0;
coy = 0;
if(dist >= 0.001f)
{
float boxsize = tracemul/dist;
float nboxsize = tracemul/(dist+0.5f);
for(cox = bx1; cox <= bx2; cox++)
{
coz = 0;
uint8_t *pillar = rtmp_map->pillars[
((cox*gz+blkx)&(rtmp_map->xlen-1))
+(((-cox*gx+blkz)&(rtmp_map->zlen-1))*rtmp_map->xlen)]+4;
//printf("%4i %4i %4i - %i %i %i %i\n",cox,coy,coz,
// pillar[0],pillar[1],pillar[2],pillar[3]);
for(;;)
{
uint8_t *pcol = pillar+4;
// render top
if(pillar[2]-blky >= by1 && pillar[1]-blky <= by2)
for(coz = pillar[1]; coz <= pillar[2]; coz++)
{
if(coz-blky >= by1 && coz-blky <= by2)
{
float px1 = (cox+cmoffsx)*boxsize+traceadd;
float py1 = (coz+cmoffsy-blky)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*((uint32_t *)pcol), dist);
}
pcol+=4;
}
// advance where sensible
if(pillar[2]-blky > by2)
break;
if(pillar[0] == 0)
break;
pillar += pillar[0]*4;
// render bottom
int diff = (pillar-pcol)>>2;
for(coz = pillar[3]-diff; coz < pillar[3]; coz++)
{
if(coz-blky >= by1 && coz-blky <= by2)
{
float px1 = (cox+cmoffsx)*boxsize+traceadd;
float py1 = (coz+cmoffsy-blky)*boxsize+traceadd;
float px2 = px1+boxsize;
float py2 = py1+boxsize;
render_vxl_cube(ccolor, cdepth,
(int)px1, (int)py1, (int)px2, (int)py2,
*((uint32_t *)pcol), dist);
}
pcol+=4;
}
}
}
}
dist += 1.0f;
blkx += gx;
blkz += gz;
}
}
void render_vxl_redraw(camera_t *camera, map_t *map)
{
int x,y,z;
// stash stuff in globals to prevent spamming the stack too much
// (and in turn thrashing the cache)
rtmp_camera = camera;
rtmp_map = map;
// get block pos
int blkx = ((int)floor(camera->mpx)) & (map->xlen-1);
int blky = ((int)floor(camera->mpy));// & (map->ylen-1);
int blkz = ((int)floor(camera->mpz)) & (map->zlen-1);
// get block subpos
float subx = (camera->mpx - floor(camera->mpx));
float suby = (camera->mpy - floor(camera->mpy));
float subz = (camera->mpz - floor(camera->mpz));
// render each face
render_vxl_face_horiz(blkx, blky, blkz, subx, suby, subz, CM_NX, -1, 0, 0);
render_vxl_face_vert(blkx, blky, blkz, subx, suby, subz, CM_NY, 0, -1, 0);
render_vxl_face_horiz(blkx, blky, blkz, subx, suby, subz, CM_NZ, 0, 0, -1);
render_vxl_face_horiz(blkx, blky, blkz, subx, suby, subz, CM_PX, 1, 0, 0);
render_vxl_face_vert(blkx, blky, blkz, subx, suby, subz, CM_PY, 0, 1, 0);
render_vxl_face_horiz(blkx, blky, blkz, subx, suby, subz, CM_PZ, 0, 0, 1);
}
void render_cubemap(uint32_t *pixels, int width, int height, int pitch, camera_t *camera, map_t *map)
{
int x,y,z;
// stash stuff in globals to prevent spamming the stack too much
// (and in turn thrashing the cache)
rtmp_pixels = pixels;
rtmp_width = width;
rtmp_height = height;
rtmp_pitch = pitch;
rtmp_camera = camera;
rtmp_map = map;
// get corner traces
float tracemul = cubemap_size/2;
float traceadd = tracemul;
float ctrx1 = (camera->mzx+camera->mxx-camera->myx);
float ctry1 = (camera->mzy+camera->mxy-camera->myy);
float ctrz1 = (camera->mzz+camera->mxz-camera->myz);
float ctrx2 = (camera->mzx-camera->mxx-camera->myx);
float ctry2 = (camera->mzy-camera->mxy-camera->myy);
float ctrz2 = (camera->mzz-camera->mxz-camera->myz);
float ctrx3 = (camera->mzx+camera->mxx+camera->myx);
float ctry3 = (camera->mzy+camera->mxy+camera->myy);
float ctrz3 = (camera->mzz+camera->mxz+camera->myz);
float ctrx4 = (camera->mzx-camera->mxx+camera->myx);
float ctry4 = (camera->mzy-camera->mxy+camera->myy);
float ctrz4 = (camera->mzz-camera->mxz+camera->myz);
// calculate deltas
float fbx = ctrx1, fby = ctry1, fbz = ctrz1; // base
float fex = ctrx2, fey = ctry2, fez = ctrz2; // end
float flx = ctrx3-fbx, fly = ctry3-fby, flz = ctrz3-fbz; // left side
float frx = ctrx4-fex, fry = ctry4-fey, frz = ctrz4-fez; // right side
flx /= (float)width; fly /= (float)width; flz /= (float)width;
frx /= (float)width; fry /= (float)width; frz /= (float)width;
// scale cubemap correctly
fbx += flx*((float)(width-height))/2.0f;
fby += fly*((float)(width-height))/2.0f;
fbz += flz*((float)(width-height))/2.0f;
fex += frx*((float)(width-height))/2.0f;
fey += fry*((float)(width-height))/2.0f;
fez += frz*((float)(width-height))/2.0f;
// raytrace it
// TODO: find some faster method
uint32_t *p = pixels;
int hwidth = width/2;
int hheight = height/2;
for(y = -hheight; y < hheight; y++)
{
float fx = fbx;
float fy = fby;
float fz = fbz;
float fdx = (fex-fbx)/(float)width;
float fdy = (fey-fby)/(float)width;
float fdz = (fez-fbz)/(float)width;
for(x = -hwidth; x < hwidth; x++)
{
// get correct cube map and draw
if(fabsf(fx) > fabsf(fy) && fabsf(fx) > fabsf(fz))
{
*p++ = cubemap_color[fx >= 0.0f ? CM_PX : CM_NX][
((cubemap_size-1)&(int)(-fz*tracemul/fx+traceadd))
|(((cubemap_size-1)&(int)(fy*tracemul/fabsf(fx)+traceadd))<<cubemap_shift)];
} else if(fabsf(fz) > fabsf(fy) && fabsf(fz) > fabsf(fx)) {
*p++ = cubemap_color[fz >= 0.0f ? CM_PZ : CM_NZ][
((cubemap_size-1)&(int)(fx*tracemul/fz+traceadd))
|(((cubemap_size-1)&(int)(fy*tracemul/fabsf(fz)+traceadd))<<cubemap_shift)];
} else {
*p++ = cubemap_color[fy >= 0.0f ? CM_PY : CM_NY][
((cubemap_size-1)&(int)(fx*tracemul/fy+traceadd))
|(((cubemap_size-1)&(int)(fz*tracemul/fy+traceadd))<<cubemap_shift)];
}
fx += fdx;
fy += fdy;
fz += fdz;
}
p += pitch-width;
fbx += flx;
fby += fly;
fbz += flz;
fex += frx;
fey += fry;
fez += frz;
}
/*
// TEST: draw something
for(x = 0; x < 512; x++)
for(y = 0; y < 512; y++)
{
pixels[y*pitch+x] = *(uint32_t *)&(map->pillars[y*map->xlen+x][8]);
//pixels[y*pitch+x] = cubemap_color[CM_PZ][y*cubemap_size+x];
}*/
}
int render_init(int width, int height)
{
int i;
int size = (width > height ? width : height);
// get nearest power of 2
size = (size-1);
size |= size>>1;
size |= size>>2;
size |= size>>4;
size |= size>>8;
size++;
// reduce quality a little bit
// 800x600 -> 1024^2 -> 512^2 ends up as 1MB x 6 textures = 6MB
size >>= 1;
// allocate cubemaps
for(i = 0; i < CM_MAX; i++)
{
cubemap_color[i] = malloc(size*size*4);
cubemap_depth[i] = malloc(size*size*4);
if(cubemap_color[i] == NULL || cubemap_depth[i] == NULL)
{
// Can't allocate :. Can't continue
// Clean up like a boss
fprintf(stderr, "render_init: could not allocate cubemap %i\n", i);
for(; i >= 0; i--)
{
if(cubemap_color[i] != NULL)
free(cubemap_color[i]);
if(cubemap_depth[i] != NULL)
free(cubemap_depth[i]);
cubemap_color[i] = NULL;
cubemap_depth[i] = NULL;
}
return 1;
}
}
// we might as well set this, too!
cubemap_size = size;
// calculate shift factor
cubemap_shift = -1;
while(size != 0)
{
cubemap_shift++;
size >>= 1;
}
// allocate space for FTB buffers
ftb_first = malloc(cubemap_size*sizeof(int));
// TODO: check if NULL
return 0;
}
void render_deinit(void)
{
int i;
// deallocate cubemaps
for(i = 0; i < CM_MAX; i++)
{
if(cubemap_color[i] != NULL)
{
free(cubemap_color[i]);
cubemap_color[i] = NULL;
}
if(cubemap_depth[i] != NULL)
{
free(cubemap_depth[i]);
cubemap_depth[i] = NULL;
}
}
// deallocate FTB buffers
if(ftb_first != NULL)
{
free(ftb_first);
ftb_first = NULL;
}
}
Reference in New Issue View Git Blame Copy Permalink