dpsoftrast.c

   1
   2 #include <memory.h>
   3 #include "dpsoftrast.h"
   4 #include <stdio.h>
   5 #include <math.h>
   6
   7 #undef true
   8 #undef false
   9 #ifndef __cplusplus
  10 typedef enum bool {false, true} bool;
  11 #endif
  12
  13 #if defined(__GNUC__) || (defined(_MSC_VER) && _MSC_VER >= 1400)
  14 #define RESTRICT __restrict
  15 #else
  16 #define RESTRICT
  17 #endif
  18
  19 #define GL_NONE                                 0
  20 #define GL_FRONT_LEFT                   0x0400
  21 #define GL_FRONT_RIGHT                  0x0401
  22 #define GL_BACK_LEFT                    0x0402
  23 #define GL_BACK_RIGHT                   0x0403
  24 #define GL_FRONT                                0x0404
  25 #define GL_BACK                                 0x0405
  26 #define GL_LEFT                                 0x0406
  27 #define GL_RIGHT                                0x0407
  28 #define GL_FRONT_AND_BACK               0x0408
  29 #define GL_AUX0                                 0x0409
  30 #define GL_AUX1                                 0x040A
  31 #define GL_AUX2                                 0x040B
  32 #define GL_AUX3                                 0x040C
  33
  34 #define GL_NEVER                                0x0200
  35 #define GL_LESS                                 0x0201
  36 #define GL_EQUAL                                0x0202
  37 #define GL_LEQUAL                               0x0203
  38 #define GL_GREATER                              0x0204
  39 #define GL_NOTEQUAL                             0x0205
  40 #define GL_GEQUAL                               0x0206
  41 #define GL_ALWAYS                               0x0207
  42
  43 #define GL_ZERO                                 0x0
  44 #define GL_ONE                                  0x1
  45 #define GL_SRC_COLOR                            0x0300
  46 #define GL_ONE_MINUS_SRC_COLOR                  0x0301
  47 #define GL_DST_COLOR                            0x0306
  48 #define GL_ONE_MINUS_DST_COLOR                  0x0307
  49 #define GL_SRC_ALPHA                            0x0302
  50 #define GL_ONE_MINUS_SRC_ALPHA                  0x0303
  51 #define GL_DST_ALPHA                            0x0304
  52 #define GL_ONE_MINUS_DST_ALPHA                  0x0305
  53 #define GL_SRC_ALPHA_SATURATE                   0x0308
  54 #define GL_CONSTANT_COLOR                       0x8001
  55 #define GL_ONE_MINUS_CONSTANT_COLOR             0x8002
  56 #define GL_CONSTANT_ALPHA                       0x8003
  57 #define GL_ONE_MINUS_CONSTANT_ALPHA             0x8004
  58
  59 typedef enum DPSOFTRAST_ARRAY_e
  60 {
  61         DPSOFTRAST_ARRAY_POSITION,
  62         DPSOFTRAST_ARRAY_COLOR,
  63         DPSOFTRAST_ARRAY_TEXCOORD0,
  64         DPSOFTRAST_ARRAY_TEXCOORD1,
  65         DPSOFTRAST_ARRAY_TEXCOORD2,
  66         DPSOFTRAST_ARRAY_TEXCOORD3,
  67         DPSOFTRAST_ARRAY_TEXCOORD4,
  68         DPSOFTRAST_ARRAY_TEXCOORD5,
  69         DPSOFTRAST_ARRAY_TEXCOORD6,
  70         DPSOFTRAST_ARRAY_TEXCOORD7,
  71         DPSOFTRAST_ARRAY_TOTAL
  72 }
  73 DPSOFTRAST_ARRAY;
  74
  75 typedef struct DPSOFTRAST_Texture_s
  76 {
  77         int flags;
  78         int width;
  79         int height;
  80         int depth;
  81         int sides;
  82         DPSOFTRAST_TEXTURE_FILTER filter;
  83         int mipmaps;
  84         int size;
  85         unsigned char *bytes;
  86         int mipmap[DPSOFTRAST_MAXMIPMAPS][5];
  87 }
  88 DPSOFTRAST_Texture;
  89
  90 typedef struct DPSOFTRAST_State_User_s
  91 {
  92         int colormask[4];
  93         int blendfunc[2];
  94         int blendsubtract;
  95         int depthmask;
  96         int depthtest;
  97         int depthfunc;
  98         int scissortest;
  99         int cullface;
 100         int alphatest;
 101         int alphafunc;
 102         float alphavalue;
 103         int scissor[4];
 104         int viewport[4];
 105         float depthrange[2];
 106         float polygonoffset[2];
 107         float color[4];
 108 }
 109 DPSOFTRAST_State_User;
 110
 111 #define DPSOFTRAST_MAXSUBSPAN 16
 112
 113 typedef struct DPSOFTRAST_State_Draw_Span_s
 114 {
 115         int start; // pixel index
 116         int length; // pixel count
 117         int startx; // usable range (according to pixelmask)
 118         int endx; // usable range (according to pixelmask)
 119         unsigned char mip[DPSOFTRAST_MAXTEXTUREUNITS]; // texcoord to screen space density values (for picking mipmap of textures)
 120         unsigned char *pixelmask; // true for pixels that passed depth test, false for others
 121         // [0][n][] is start interpolant values (projected)
 122         // [1][n][] is end interpolant values (projected)
 123         // [0][DPSOFTRAST_ARRAY_TOTAL][] is start screencoord4f
 124         // [1][DPSOFTRAST_ARRAY_TOTAL][] is end screencoord4f
 125         // NOTE: screencoord4f[3] is W (basically 1/Z), useful for depthbuffer
 126         float data[2][DPSOFTRAST_ARRAY_TOTAL+1][4];
 127 }
 128 DPSOFTRAST_State_Draw_Span;
 129
 130 #define DPSOFTRAST_DRAW_MAXSPANQUEUE 1024
 131
 132 typedef struct DPSOFTRAST_State_Draw_s
 133 {
 134         int numvertices;
 135         int maxvertices;
 136         float *in_array4f[DPSOFTRAST_ARRAY_TOTAL];
 137         float *post_array4f[DPSOFTRAST_ARRAY_TOTAL];
 138         float *screencoord4f;
 139
 140         // spans are queued in this structure for dispatch to the pixel shader,
 141         // partly to improve cache locality, partly for batching purposes, spans
 142         // are flushed before DrawTriangles returns to caller
 143         int numspans;
 144         DPSOFTRAST_State_Draw_Span spanqueue[DPSOFTRAST_DRAW_MAXSPANQUEUE];
 145 }
 146 DPSOFTRAST_State_Draw;
 147
 148 #define DPSOFTRAST_VALIDATE_FB 1
 149 #define DPSOFTRAST_VALIDATE_DEPTHFUNC 2
 150 #define DPSOFTRAST_VALIDATE_BLENDFUNC 4
 151 #define DPSOFTRAST_VALIDATE_DRAW (DPSOFTRAST_VALIDATE_FB | DPSOFTRAST_VALIDATE_DEPTHFUNC | DPSOFTRAST_VALIDATE_BLENDFUNC)
 152
 153 typedef enum DPSOFTRAST_BLENDMODE_e
 154 {
 155         DPSOFTRAST_BLENDMODE_OPAQUE,
 156         DPSOFTRAST_BLENDMODE_ALPHA,
 157         DPSOFTRAST_BLENDMODE_ADDALPHA,
 158         DPSOFTRAST_BLENDMODE_ADD,
 159         DPSOFTRAST_BLENDMODE_INVMOD,
 160         DPSOFTRAST_BLENDMODE_MUL,
 161         DPSOFTRAST_BLENDMODE_MUL2,
 162         DPSOFTRAST_BLENDMODE_SUBALPHA,
 163         DPSOFTRAST_BLENDMODE_PSEUDOALPHA,
 164         DPSOFTRAST_BLENDMODE_TOTAL
 165 }
 166 DPSOFTRAST_BLENDMODE;
 167
 168 typedef struct DPSOFTRAST_State_s
 169 {
 170         // DPSOFTRAST_VALIDATE_ flags
 171         int validate;
 172
 173         int fb_colormask;
 174         int fb_width;
 175         int fb_height;
 176         unsigned int *fb_depthpixels;
 177         unsigned int *fb_colorpixels[4];
 178
 179         const float *pointer_vertex3f;
 180         const float *pointer_color4f;
 181         const unsigned char *pointer_color4ub;
 182         const float *pointer_texcoordf[DPSOFTRAST_MAXTEXCOORDARRAYS];
 183         int stride_vertex;
 184         int stride_color;
 185         int stride_texcoord[DPSOFTRAST_MAXTEXCOORDARRAYS];
 186         int components_texcoord[DPSOFTRAST_MAXTEXCOORDARRAYS];
 187         DPSOFTRAST_Texture *texbound[DPSOFTRAST_MAXTEXTUREUNITS];
 188
 189         int shader_mode;
 190         int shader_permutation;
 191         float uniform4f[DPSOFTRAST_UNIFORM_TOTAL*4];
 192         int uniform1i[DPSOFTRAST_UNIFORM_TOTAL];
 193
 194         // derived values (DPSOFTRAST_VALIDATE_FB)
 195         int fb_clearscissor[4];
 196         int fb_viewport[4];
 197         int fb_viewportscissor[4];
 198         float fb_viewportcenter[2];
 199         float fb_viewportscale[2];
 200
 201         // derived values (DPSOFTRAST_VALIDATE_DEPTHFUNC)
 202         int fb_depthfunc;
 203
 204         // derived values (DPSOFTRAST_VALIDATE_BLENDFUNC)
 205         int fb_blendmode;
 206
 207         int texture_max;
 208         int texture_end;
 209         int texture_firstfree;
 210         DPSOFTRAST_Texture *texture;
 211
 212         int bigendian;
 213
 214         // error reporting
 215         const char *errorstring;
 216
 217         DPSOFTRAST_State_User user;
 218
 219         DPSOFTRAST_State_Draw draw;
 220 }
 221 DPSOFTRAST_State;
 222
 223 DPSOFTRAST_State dpsoftrast;
 224
 225 extern int dpsoftrast_test;
 226
 227 #define DPSOFTRAST_DEPTHSCALE (1024.0f*1048576.0f)
 228 #define DPSOFTRAST_BGRA8_FROM_RGBA32F(r,g,b,a) (((int)(r * 255.0f + 0.5f) << 16) | ((int)(g * 255.0f + 0.5f) << 8) | (int)(b * 255.0f + 0.5f) | ((int)(a * 255.0f + 0.5f) << 24))
 229 #define DPSOFTRAST_DEPTH32_FROM_DEPTH32F(d) ((int)(DPSOFTRAST_DEPTHSCALE * (1-d)))
 230 #define DPSOFTRAST_DRAW_MAXSPANLENGTH 256
 231
 232 void DPSOFTRAST_RecalcFB(void)
 233 {
 234         // calculate framebuffer scissor, viewport, viewport clipped by scissor,
 235         // and viewport projection values
 236         int x1, x2, x3, x4, x5, x6;
 237         int y1, y2, y3, y4, y5, y6;
 238         x1 = dpsoftrast.user.scissor[0];
 239         x2 = dpsoftrast.user.scissor[0] + dpsoftrast.user.scissor[2];
 240         x3 = dpsoftrast.user.viewport[0];
 241         x4 = dpsoftrast.user.viewport[0] + dpsoftrast.user.viewport[2];
 242         y1 = dpsoftrast.fb_height - dpsoftrast.user.scissor[1] - dpsoftrast.user.scissor[3];
 243         y2 = dpsoftrast.fb_height - dpsoftrast.user.scissor[1];
 244         y3 = dpsoftrast.fb_height - dpsoftrast.user.viewport[1] - dpsoftrast.user.viewport[3];
 245         y4 = dpsoftrast.fb_height - dpsoftrast.user.viewport[1];
 246         if (!dpsoftrast.user.scissortest) {x1 = 0;y1 = 0;x2 = dpsoftrast.fb_width;y2 = dpsoftrast.fb_height;}
 247         if (x1 < 0) x1 = 0;
 248         if (x2 > dpsoftrast.fb_width) x2 = dpsoftrast.fb_width;
 249         if (x3 < 0) x1 = 0;
 250         if (x4 > dpsoftrast.fb_width) x4 = dpsoftrast.fb_width;
 251         if (y1 < 0) y1 = 0;
 252         if (y2 > dpsoftrast.fb_height) y2 = dpsoftrast.fb_height;
 253         if (y3 < 0) y1 = 0;
 254         if (y4 > dpsoftrast.fb_height) y4 = dpsoftrast.fb_height;
 255         x5 = x1;if (x5 < x3) x5 = x3;
 256         x6 = x2;if (x6 > x4) x4 = x4;
 257         y5 = y1;if (y5 < y3) y5 = y3;
 258         y6 = y2;if (y6 > y4) y6 = y4;
 259         dpsoftrast.fb_clearscissor[0] = x1;
 260         dpsoftrast.fb_clearscissor[1] = y1;
 261         dpsoftrast.fb_clearscissor[2] = x2 - x1;
 262         dpsoftrast.fb_clearscissor[3] = y2 - y1;
 263         dpsoftrast.fb_viewport[0] = x3;
 264         dpsoftrast.fb_viewport[1] = y3;
 265         dpsoftrast.fb_viewport[2] = x4 - x3;
 266         dpsoftrast.fb_viewport[3] = y4 - y3;
 267         dpsoftrast.fb_viewportscissor[0] = x5;
 268         dpsoftrast.fb_viewportscissor[1] = y5;
 269         dpsoftrast.fb_viewportscissor[2] = x6 - x5;
 270         dpsoftrast.fb_viewportscissor[3] = y6 - y5;
 271         dpsoftrast.fb_viewportcenter[0] = dpsoftrast.user.viewport[0] + 0.5f * dpsoftrast.user.viewport[2] - 0.5f;
 272         dpsoftrast.fb_viewportcenter[1] = dpsoftrast.fb_height - dpsoftrast.user.viewport[1] - 0.5f * dpsoftrast.user.viewport[3] - 0.5f;
 273         dpsoftrast.fb_viewportscale[0] = 0.5f * dpsoftrast.user.viewport[2];
 274         dpsoftrast.fb_viewportscale[1] = -0.5f * dpsoftrast.user.viewport[3];
 275 }
 276
 277 void DPSOFTRAST_RecalcDepthFunc(void)
 278 {
 279         dpsoftrast.fb_depthfunc = dpsoftrast.user.depthtest ? dpsoftrast.user.depthfunc : GL_ALWAYS;
 280 }
 281
 282 int blendmodetable[][4] =
 283 {
 284         {DPSOFTRAST_BLENDMODE_OPAQUE, GL_ONE, GL_ZERO, false},
 285         {DPSOFTRAST_BLENDMODE_ALPHA, GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA, false},
 286         {DPSOFTRAST_BLENDMODE_ADDALPHA, GL_SRC_ALPHA, GL_ONE, false},
 287         {DPSOFTRAST_BLENDMODE_ADD, GL_ONE, GL_ONE, false},
 288         {DPSOFTRAST_BLENDMODE_INVMOD, GL_ZERO, GL_ONE_MINUS_SRC_COLOR, false},
 289         {DPSOFTRAST_BLENDMODE_MUL, GL_ZERO, GL_SRC_COLOR, false},
 290         {DPSOFTRAST_BLENDMODE_MUL, GL_DST_COLOR, GL_ZERO, false},
 291         {DPSOFTRAST_BLENDMODE_MUL2, GL_DST_COLOR, GL_SRC_COLOR, false},
 292         {DPSOFTRAST_BLENDMODE_PSEUDOALPHA, GL_ONE, GL_ONE_MINUS_SRC_ALPHA, false},
 293         {DPSOFTRAST_BLENDMODE_SUBALPHA, GL_SRC_COLOR, GL_ONE, true}
 294 };
 295
 296 void DPSOFTRAST_RecalcBlendFunc(void)
 297 {
 298         int i;
 299         dpsoftrast.fb_blendmode = DPSOFTRAST_BLENDMODE_OPAQUE;
 300         for (i = 0;i < (int)(sizeof(blendmodetable) / sizeof(blendmodetable[0]));i++)
 301         {
 302                 if (dpsoftrast.user.blendfunc[0] == blendmodetable[i][1] && dpsoftrast.user.blendfunc[1] == blendmodetable[i][2] && dpsoftrast.user.blendsubtract == blendmodetable[i][3])
 303                 {
 304                         dpsoftrast.fb_blendmode = blendmodetable[i][0];
 305                         break;
 306                 }
 307         }
 308 }
 309
 310 #define DPSOFTRAST_ValidateQuick(f) ((dpsoftrast.validate & (f)) ? (DPSOFTRAST_Validate(f), 0) : 0)
 311
 312 void DPSOFTRAST_Validate(int mask)
 313 {
 314         mask &= dpsoftrast.validate;
 315         if (!mask)
 316                 return;
 317         if (mask & DPSOFTRAST_VALIDATE_FB)
 318         {
 319                 dpsoftrast.validate &= ~DPSOFTRAST_VALIDATE_FB;
 320                 DPSOFTRAST_RecalcFB();
 321         }
 322         if (mask & DPSOFTRAST_VALIDATE_DEPTHFUNC)
 323         {
 324                 dpsoftrast.validate &= ~DPSOFTRAST_VALIDATE_DEPTHFUNC;
 325                 DPSOFTRAST_RecalcDepthFunc();
 326         }
 327         if (mask & DPSOFTRAST_VALIDATE_BLENDFUNC)
 328         {
 329                 dpsoftrast.validate &= ~DPSOFTRAST_VALIDATE_BLENDFUNC;
 330                 DPSOFTRAST_RecalcBlendFunc();
 331         }
 332 }
 333
 334 DPSOFTRAST_Texture *DPSOFTRAST_Texture_GetByIndex(int index)
 335 {
 336         if (index >= 1 && index < dpsoftrast.texture_end && dpsoftrast.texture[index].bytes)
 337                 return &dpsoftrast.texture[index];
 338         return NULL;
 339 }
 340
 341 int DPSOFTRAST_Texture_New(int flags, int width, int height, int depth)
 342 {
 343         int w;
 344         int h;
 345         int d;
 346         int size;
 347         int s;
 348         int texnum;
 349         int mipmaps;
 350         int sides = (flags & DPSOFTRAST_TEXTURE_FLAG_CUBEMAP) ? 6 : 1;
 351         int texformat = flags & DPSOFTRAST_TEXTURE_FORMAT_COMPAREMASK;
 352         DPSOFTRAST_Texture *texture;
 353         if (width*height*depth < 1)
 354         {
 355                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: width, height or depth is less than 1";
 356                 return 0;
 357         }
 358         if (width > DPSOFTRAST_TEXTURE_MAXSIZE || height > DPSOFTRAST_TEXTURE_MAXSIZE || depth > DPSOFTRAST_TEXTURE_MAXSIZE)
 359         {
 360                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: texture size is too large";
 361                 return 0;
 362         }
 363         switch(texformat)
 364         {
 365         case DPSOFTRAST_TEXTURE_FORMAT_BGRA8:
 366         case DPSOFTRAST_TEXTURE_FORMAT_RGBA8:
 367         case DPSOFTRAST_TEXTURE_FORMAT_ALPHA8:
 368                 break;
 369         case DPSOFTRAST_TEXTURE_FORMAT_DEPTH:
 370                 if (flags & DPSOFTRAST_TEXTURE_FLAG_CUBEMAP)
 371                 {
 372                         dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FORMAT_DEPTH only permitted on 2D textures";
 373                         return 0;
 374                 }
 375                 if (depth != 1)
 376                 {
 377                         dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FORMAT_DEPTH only permitted on 2D textures";
 378                         return 0;
 379                 }
 380                 if ((flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP) && (texformat == DPSOFTRAST_TEXTURE_FORMAT_DEPTH))
 381                 {
 382                         dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FORMAT_DEPTH does not permit mipmaps";
 383                         return 0;
 384                 }
 385                 break;
 386         }
 387         if (depth != 1 && (flags & DPSOFTRAST_TEXTURE_FLAG_CUBEMAP))
 388         {
 389                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FLAG_CUBEMAP can not be used on 3D textures";
 390                 return 0;
 391         }
 392         if (depth != 1 && (flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP))
 393         {
 394                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FLAG_MIPMAP can not be used on 3D textures";
 395                 return 0;
 396         }
 397         if (depth != 1 && (flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP))
 398         {
 399                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FLAG_MIPMAP can not be used on 3D textures";
 400                 return 0;
 401         }
 402         if ((flags & DPSOFTRAST_TEXTURE_FLAG_CUBEMAP) && (flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP))
 403         {
 404                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: DPSOFTRAST_TEXTURE_FLAG_MIPMAP can not be used on cubemap textures";
 405                 return 0;
 406         }
 407         if ((width & (width-1)) || (height & (height-1)) || (depth & (depth-1)))
 408         {
 409                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_New: dimensions are not power of two";
 410                 return 0;
 411         }
 412         // find first empty slot in texture array
 413         for (texnum = dpsoftrast.texture_firstfree;texnum < dpsoftrast.texture_end;texnum++)
 414                 if (!dpsoftrast.texture[texnum].bytes)
 415                         break;
 416         dpsoftrast.texture_firstfree = texnum + 1;
 417         if (dpsoftrast.texture_max <= texnum)
 418         {
 419                 // expand texture array as needed
 420                 if (dpsoftrast.texture_max < 1024)
 421                         dpsoftrast.texture_max = 1024;
 422                 else
 423                         dpsoftrast.texture_max *= 2;
 424                 dpsoftrast.texture = (DPSOFTRAST_Texture *)realloc(dpsoftrast.texture, dpsoftrast.texture_max * sizeof(DPSOFTRAST_Texture));
 425         }
 426         if (dpsoftrast.texture_end <= texnum)
 427                 dpsoftrast.texture_end = texnum + 1;
 428         texture = &dpsoftrast.texture[texnum];
 429         memset(texture, 0, sizeof(*texture));
 430         texture->flags = flags;
 431         texture->width = width;
 432         texture->height = height;
 433         texture->depth = depth;
 434         texture->sides = sides;
 435         w = width;
 436         h = height;
 437         d = depth;
 438         size = 0;
 439         mipmaps = 0;
 440         w = width;
 441         h = height;
 442         d = depth;
 443         for (;;)
 444         {
 445                 s = w * h * d * sides * 4;
 446                 texture->mipmap[mipmaps][0] = size;
 447                 texture->mipmap[mipmaps][1] = s;
 448                 texture->mipmap[mipmaps][2] = w;
 449                 texture->mipmap[mipmaps][3] = h;
 450                 texture->mipmap[mipmaps][4] = d;
 451                 size += s;
 452                 mipmaps++;
 453                 if (w * h * d == 1 || !(flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP))
 454                         break;
 455                 if (w > 1) w >>= 1;
 456                 if (h > 1) h >>= 1;
 457                 if (d > 1) d >>= 1;
 458         }
 459         texture->mipmaps = mipmaps;
 460         texture->size = size;
 461
 462         // allocate the pixels now
 463         texture->bytes = (unsigned char *)calloc(1, size);
 464
 465         return texnum;
 466 }
 467 void DPSOFTRAST_Texture_Free(int index)
 468 {
 469         DPSOFTRAST_Texture *texture;
 470         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 471         if (texture->bytes)
 472                 free(texture->bytes);
 473         texture->bytes = NULL;
 474         memset(texture, 0, sizeof(*texture));
 475         // adjust the free range and used range
 476         if (dpsoftrast.texture_firstfree > index)
 477                 dpsoftrast.texture_firstfree = index;
 478         while (dpsoftrast.texture_end > 0 && dpsoftrast.texture[dpsoftrast.texture_end-1].bytes == NULL)
 479                 dpsoftrast.texture_end--;
 480 }
 481 void DPSOFTRAST_Texture_CalculateMipmaps(int index)
 482 {
 483         int i, x, y, z, w, layer0, layer1, row0, row1;
 484         unsigned char *o, *i0, *i1, *i2, *i3;
 485         DPSOFTRAST_Texture *texture;
 486         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 487         if (texture->mipmaps <= 1)
 488                 return;
 489         for (i = 1;i < texture->mipmaps;i++)
 490         {
 491                 for (z = 0;z < texture->mipmap[i][4];z++)
 492                 {
 493                         layer0 = z*2;
 494                         layer1 = z*2+1;
 495                         if (layer1 >= texture->mipmap[i-1][4])
 496                                 layer1 = texture->mipmap[i-1][4]-1;
 497                         for (y = 0;y < texture->mipmap[i][3];y++)
 498                         {
 499                                 row0 = y*2;
 500                                 row1 = y*2+1;
 501                                 if (row1 >= texture->mipmap[i-1][3])
 502                                         row1 = texture->mipmap[i-1][3]-1;
 503                                 o =  texture->bytes + texture->mipmap[i  ][0] + 4*((texture->mipmap[i  ][3] * z      + y   ) * texture->mipmap[i  ][2]);
 504                                 i0 = texture->bytes + texture->mipmap[i-1][0] + 4*((texture->mipmap[i-1][3] * layer0 + row0) * texture->mipmap[i-1][2]);
 505                                 i1 = texture->bytes + texture->mipmap[i-1][0] + 4*((texture->mipmap[i-1][3] * layer0 + row1) * texture->mipmap[i-1][2]);
 506                                 i2 = texture->bytes + texture->mipmap[i-1][0] + 4*((texture->mipmap[i-1][3] * layer1 + row0) * texture->mipmap[i-1][2]);
 507                                 i3 = texture->bytes + texture->mipmap[i-1][0] + 4*((texture->mipmap[i-1][3] * layer1 + row1) * texture->mipmap[i-1][2]);
 508                                 w = texture->mipmap[i][2];
 509                                 if (layer1 > layer0)
 510                                 {
 511                                         if (texture->mipmap[i-1][2] > 1)
 512                                         {
 513                                                 // average 3D texture
 514                                                 for (x = 0;x < w;x++, o += 4, i0 += 8, i1 += 8, i2 += 8, i3 += 8)
 515                                                 {
 516                                                         o[0] = (i0[0] + i0[4] + i1[0] + i1[4] + i2[0] + i2[4] + i3[0] + i3[4] + 4) >> 3;
 517                                                         o[1] = (i0[1] + i0[5] + i1[1] + i1[5] + i2[1] + i2[5] + i3[1] + i3[5] + 4) >> 3;
 518                                                         o[2] = (i0[2] + i0[6] + i1[2] + i1[6] + i2[2] + i2[6] + i3[2] + i3[6] + 4) >> 3;
 519                                                         o[3] = (i0[3] + i0[7] + i1[3] + i1[7] + i2[3] + i2[7] + i3[3] + i3[7] + 4) >> 3;
 520                                                 }
 521                                         }
 522                                         else
 523                                         {
 524                                                 // average 3D mipmap with parent width == 1
 525                                                 for (x = 0;x < w;x++, o += 4, i0 += 8, i1 += 8)
 526                                                 {
 527                                                         o[0] = (i0[0] + i1[0] + i2[0] + i3[0] + 2) >> 2;
 528                                                         o[1] = (i0[1] + i1[1] + i2[1] + i3[1] + 2) >> 2;
 529                                                         o[2] = (i0[2] + i1[2] + i2[2] + i3[2] + 2) >> 2;
 530                                                         o[3] = (i0[3] + i1[3] + i2[3] + i3[3] + 2) >> 2;
 531                                                 }
 532                                         }
 533                                 }
 534                                 else
 535                                 {
 536                                         if (texture->mipmap[i-1][2] > 1)
 537                                         {
 538                                                 // average 2D texture (common case)
 539                                                 for (x = 0;x < w;x++, o += 4, i0 += 8, i1 += 8)
 540                                                 {
 541                                                         o[0] = (i0[0] + i0[4] + i1[0] + i1[4] + 2) >> 2;
 542                                                         o[1] = (i0[1] + i0[5] + i1[1] + i1[5] + 2) >> 2;
 543                                                         o[2] = (i0[2] + i0[6] + i1[2] + i1[6] + 2) >> 2;
 544                                                         o[3] = (i0[3] + i0[7] + i1[3] + i1[7] + 2) >> 2;
 545                                                 }
 546                                         }
 547                                         else
 548                                         {
 549                                                 // 2D texture with parent width == 1
 550                                                 o[0] = (i0[0] + i1[0] + 1) >> 1;
 551                                                 o[1] = (i0[1] + i1[1] + 1) >> 1;
 552                                                 o[2] = (i0[2] + i1[2] + 1) >> 1;
 553                                                 o[3] = (i0[3] + i1[3] + 1) >> 1;
 554                                         }
 555                                 }
 556                         }
 557                 }
 558         }
 559 }
 560 void DPSOFTRAST_Texture_UpdatePartial(int index, int mip, const unsigned char *pixels, int blockx, int blocky, int blockwidth, int blockheight)
 561 {
 562         DPSOFTRAST_Texture *texture;
 563         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 564
 565         // FIXME IMPLEMENT
 566
 567         dpsoftrast.errorstring = "DPSOFTRAST_Texture_UpdatePartial: Not implemented.";
 568 }
 569 void DPSOFTRAST_Texture_UpdateFull(int index, const unsigned char *pixels)
 570 {
 571         DPSOFTRAST_Texture *texture;
 572         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 573
 574         memcpy(texture->bytes, pixels, texture->mipmap[0][1]);
 575         DPSOFTRAST_Texture_CalculateMipmaps(index);
 576 }
 577 int DPSOFTRAST_Texture_GetWidth(int index, int mip)
 578 {
 579         DPSOFTRAST_Texture *texture;
 580         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return 0;
 581         return texture->mipmap[mip][2];
 582 }
 583 int DPSOFTRAST_Texture_GetHeight(int index, int mip)
 584 {
 585         DPSOFTRAST_Texture *texture;
 586         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return 0;
 587         return texture->mipmap[mip][3];
 588 }
 589 int DPSOFTRAST_Texture_GetDepth(int index, int mip)
 590 {
 591         DPSOFTRAST_Texture *texture;
 592         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return 0;
 593         return texture->mipmap[mip][4];
 594 }
 595 unsigned char *DPSOFTRAST_Texture_GetPixelPointer(int index, int mip)
 596 {
 597         DPSOFTRAST_Texture *texture;
 598         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return 0;
 599         return texture->bytes + texture->mipmap[mip][0];
 600 }
 601 void DPSOFTRAST_Texture_Filter(int index, DPSOFTRAST_TEXTURE_FILTER filter)
 602 {
 603         DPSOFTRAST_Texture *texture;
 604         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 605         if (!(texture->flags & DPSOFTRAST_TEXTURE_FLAG_MIPMAP) && filter > DPSOFTRAST_TEXTURE_FILTER_LINEAR)
 606         {
 607                 dpsoftrast.errorstring = "DPSOFTRAST_Texture_Filter: requested filter mode requires mipmaps";
 608                 return;
 609         }
 610         texture->filter = filter;
 611 }
 612
 613 void DPSOFTRAST_SetRenderTargets(int width, int height, unsigned int *depthpixels, unsigned int *colorpixels0, unsigned int *colorpixels1, unsigned int *colorpixels2, unsigned int *colorpixels3)
 614 {
 615         dpsoftrast.fb_width = width;
 616         dpsoftrast.fb_height = height;
 617         dpsoftrast.fb_depthpixels = depthpixels;
 618         dpsoftrast.fb_colorpixels[0] = colorpixels0;
 619         dpsoftrast.fb_colorpixels[1] = colorpixels1;
 620         dpsoftrast.fb_colorpixels[2] = colorpixels2;
 621         dpsoftrast.fb_colorpixels[3] = colorpixels3;
 622 }
 623 void DPSOFTRAST_Viewport(int x, int y, int width, int height)
 624 {
 625         dpsoftrast.user.viewport[0] = x;
 626         dpsoftrast.user.viewport[1] = y;
 627         dpsoftrast.user.viewport[2] = width;
 628         dpsoftrast.user.viewport[3] = height;
 629         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_FB;
 630 }
 631 void DPSOFTRAST_ClearColor(float r, float g, float b, float a)
 632 {
 633         int i, x1, y1, x2, y2, w, h, x, y;
 634         unsigned int *p;
 635         unsigned int c;
 636         DPSOFTRAST_Validate(DPSOFTRAST_VALIDATE_FB);
 637         x1 = dpsoftrast.fb_clearscissor[0];
 638         y1 = dpsoftrast.fb_clearscissor[1];
 639         x2 = dpsoftrast.fb_clearscissor[2];
 640         y2 = dpsoftrast.fb_clearscissor[1] + dpsoftrast.fb_clearscissor[3];
 641         w = x2 - x1;
 642         h = y2 - y1;
 643         if (w < 1 || h < 1)
 644                 return;
 645         // FIXME: honor dpsoftrast.fb_colormask?
 646         c = DPSOFTRAST_BGRA8_FROM_RGBA32F(r,g,b,a);
 647         for (i = 0;i < 4;i++)
 648         {
 649                 if (!dpsoftrast.fb_colorpixels[i])
 650                         continue;
 651                 for (y = y1;y < y2;y++)
 652                 {
 653                         p = dpsoftrast.fb_colorpixels[i] + y * dpsoftrast.fb_width;
 654                         for (x = x1;x < x2;x++)
 655                                 p[x] = c;
 656                 }
 657         }
 658 }
 659 void DPSOFTRAST_ClearDepth(float d)
 660 {
 661         int x1, y1, x2, y2, w, h, x, y;
 662         unsigned int *p;
 663         unsigned int c;
 664         DPSOFTRAST_Validate(DPSOFTRAST_VALIDATE_FB);
 665         x1 = dpsoftrast.fb_clearscissor[0];
 666         y1 = dpsoftrast.fb_clearscissor[1];
 667         x2 = dpsoftrast.fb_clearscissor[2];
 668         y2 = dpsoftrast.fb_clearscissor[1] + dpsoftrast.fb_clearscissor[3];
 669         w = x2 - x1;
 670         h = y2 - y1;
 671         if (w < 1 || h < 1)
 672                 return;
 673         c = DPSOFTRAST_DEPTH32_FROM_DEPTH32F(d);
 674         for (y = y1;y < y2;y++)
 675         {
 676                 p = dpsoftrast.fb_depthpixels + y * dpsoftrast.fb_width;
 677                 for (x = x1;x < x2;x++)
 678                         p[x] = c;
 679         }
 680 }
 681 void DPSOFTRAST_ColorMask(int r, int g, int b, int a)
 682 {
 683         dpsoftrast.user.colormask[0] = r != 0;
 684         dpsoftrast.user.colormask[1] = g != 0;
 685         dpsoftrast.user.colormask[2] = b != 0;
 686         dpsoftrast.user.colormask[3] = a != 0;
 687         dpsoftrast.fb_colormask = ((-dpsoftrast.user.colormask[0]) & 0x00FF0000) | ((-dpsoftrast.user.colormask[1]) & 0x0000FF00) | ((-dpsoftrast.user.colormask[2]) & 0x000000FF) | ((-dpsoftrast.user.colormask[3]) & 0xFF000000);
 688 }
 689 void DPSOFTRAST_DepthTest(int enable)
 690 {
 691         dpsoftrast.user.depthtest = enable;
 692         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_DEPTHFUNC;
 693 }
 694 void DPSOFTRAST_ScissorTest(int enable)
 695 {
 696         dpsoftrast.user.scissortest = enable;
 697         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_FB;
 698 }
 699 void DPSOFTRAST_Scissor(float x, float y, float width, float height)
 700 {
 701         dpsoftrast.user.scissor[0] = x;
 702         dpsoftrast.user.scissor[1] = y;
 703         dpsoftrast.user.scissor[2] = width;
 704         dpsoftrast.user.scissor[3] = height;
 705         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_FB;
 706 }
 707
 708 void DPSOFTRAST_BlendFunc(int smodulate, int dmodulate)
 709 {
 710         // FIXME: validate
 711         dpsoftrast.user.blendfunc[0] = smodulate;
 712         dpsoftrast.user.blendfunc[1] = dmodulate;
 713         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_BLENDFUNC;
 714 }
 715 void DPSOFTRAST_BlendSubtract(int enable)
 716 {
 717         dpsoftrast.user.blendsubtract = enable != 0;
 718         dpsoftrast.validate |= DPSOFTRAST_VALIDATE_BLENDFUNC;
 719 }
 720 void DPSOFTRAST_DepthMask(int enable)
 721 {
 722         dpsoftrast.user.depthmask = enable;
 723 }
 724 void DPSOFTRAST_DepthFunc(int comparemode)
 725 {
 726         // FIXME: validate
 727         dpsoftrast.user.depthfunc = comparemode;
 728 }
 729 void DPSOFTRAST_DepthRange(float range0, float range1)
 730 {
 731         dpsoftrast.user.depthrange[0] = range0;
 732         dpsoftrast.user.depthrange[1] = range1;
 733 }
 734 void DPSOFTRAST_PolygonOffset(float alongnormal, float intoview)
 735 {
 736         dpsoftrast.user.polygonoffset[0] = alongnormal;
 737         dpsoftrast.user.polygonoffset[1] = intoview;
 738 }
 739 void DPSOFTRAST_CullFace(int mode)
 740 {
 741         // FIXME: validate
 742         dpsoftrast.user.cullface = mode;
 743 }
 744 void DPSOFTRAST_AlphaTest(float enable)
 745 {
 746         dpsoftrast.user.alphatest = enable;
 747 }
 748 void DPSOFTRAST_AlphaFunc(int alphafunc, float alphavalue)
 749 {
 750         // FIXME: validate
 751         dpsoftrast.user.alphafunc = alphafunc;
 752         dpsoftrast.user.alphavalue = alphavalue;
 753 }
 754 void DPSOFTRAST_Color4f(float r, float g, float b, float a)
 755 {
 756         dpsoftrast.user.color[0] = r;
 757         dpsoftrast.user.color[1] = g;
 758         dpsoftrast.user.color[2] = b;
 759         dpsoftrast.user.color[3] = a;
 760 }
 761 void DPSOFTRAST_GetPixelsBGRA(int blockx, int blocky, int blockwidth, int blockheight, unsigned char *outpixels)
 762 {
 763         int outstride = blockwidth * 4;
 764         int instride = dpsoftrast.fb_width * 4;
 765         int bx1 = blockx;
 766         int by1 = blocky;
 767         int bx2 = blockx + blockwidth;
 768         int by2 = blocky + blockheight;
 769         int bw;
 770         int bh;
 771         int x;
 772         int y;
 773         unsigned char *inpixels;
 774         unsigned char *b;
 775         unsigned char *o;
 776         if (bx1 < 0) bx1 = 0;
 777         if (by1 < 0) by1 = 0;
 778         if (bx2 > dpsoftrast.fb_width) bx2 = dpsoftrast.fb_width;
 779         if (by2 > dpsoftrast.fb_height) by2 = dpsoftrast.fb_height;
 780         bw = bx2 - bx1;
 781         bh = by2 - by1;
 782         inpixels = (unsigned char *)dpsoftrast.fb_colorpixels[0];
 783         if (dpsoftrast.bigendian)
 784         {
 785                 for (y = by1;y < by2;y++)
 786                 {
 787                         b = (unsigned char *)inpixels + (dpsoftrast.fb_height - 1 - y) * instride + 4 * bx1;
 788                         o = (unsigned char *)outpixels + (y - by1) * outstride;
 789                         for (x = bx1;x < bx2;x++)
 790                         {
 791                                 o[0] = b[3];
 792                                 o[1] = b[2];
 793                                 o[2] = b[1];
 794                                 o[3] = b[0];
 795                                 o += 4;
 796                                 b += 4;
 797                         }
 798                 }
 799         }
 800         else
 801         {
 802                 for (y = by1;y < by2;y++)
 803                 {
 804                         b = (unsigned char *)inpixels + (dpsoftrast.fb_height - 1 - y) * instride + 4 * bx1;
 805                         o = (unsigned char *)outpixels + (y - by1) * outstride;
 806                         memcpy(o, b, bw*4);
 807                 }
 808         }
 809
 810 }
 811 void DPSOFTRAST_CopyRectangleToTexture(int index, int mip, int tx, int ty, int sx, int sy, int width, int height)
 812 {
 813         int tx1 = tx;
 814         int ty1 = ty;
 815         int tx2 = tx + width;
 816         int ty2 = ty + height;
 817         int sx1 = sx;
 818         int sy1 = sy;
 819         int sx2 = sx + width;
 820         int sy2 = sy + height;
 821         int swidth;
 822         int sheight;
 823         int twidth;
 824         int theight;
 825         int sw;
 826         int sh;
 827         int tw;
 828         int th;
 829         int y;
 830         unsigned int *spixels;
 831         unsigned int *tpixels;
 832         DPSOFTRAST_Texture *texture;
 833         texture = DPSOFTRAST_Texture_GetByIndex(index);if (!texture) return;
 834         if (mip < 0 || mip >= texture->mipmaps) return;
 835         spixels = dpsoftrast.fb_colorpixels[0];
 836         swidth = dpsoftrast.fb_width;
 837         sheight = dpsoftrast.fb_height;
 838         tpixels = (unsigned int *)(texture->bytes + texture->mipmap[mip][0]);
 839         twidth = texture->mipmap[mip][2];
 840         theight = texture->mipmap[mip][3];
 841         if (tx1 < 0) tx1 = 0;
 842         if (ty1 < 0) ty1 = 0;
 843         if (tx2 > twidth) tx2 = twidth;
 844         if (ty2 > theight) ty2 = theight;
 845         if (sx1 < 0) sx1 = 0;
 846         if (sy1 < 0) sy1 = 0;
 847         if (sx2 > swidth) sx2 = swidth;
 848         if (sy2 > sheight) sy2 = sheight;
 849         tw = tx2 - tx1;
 850         th = ty2 - ty1;
 851         sw = sx2 - sx1;
 852         sh = sy2 - sy1;
 853         if (tw > sw) tw = sw;
 854         if (th > sh) th = sh;
 855         if (tw < 1 || th < 1)
 856                 return;
 857         for (y = 0;y < th;y++)
 858                 memcpy(tpixels + ((ty1 + y) * twidth + tx1), spixels + ((sy1 + y) * swidth + sx1), tw*4);
 859         if (texture->mipmaps > 1)
 860                 DPSOFTRAST_Texture_CalculateMipmaps(index);
 861 }
 862 void DPSOFTRAST_SetTexture(int unitnum, int index)
 863 {
 864         DPSOFTRAST_Texture *texture;
 865         if (unitnum < 0 || unitnum >= DPSOFTRAST_MAXTEXTUREUNITS)
 866         {
 867                 dpsoftrast.errorstring = "DPSOFTRAST_SetTexture: invalid unit number";
 868                 return;
 869         }
 870         texture = DPSOFTRAST_Texture_GetByIndex(index);
 871         if (index && !texture)
 872         {
 873                 dpsoftrast.errorstring = "DPSOFTRAST_SetTexture: invalid texture handle";
 874                 return;
 875         }
 876         dpsoftrast.texbound[unitnum] = texture;
 877 }
 878
 879 void DPSOFTRAST_SetVertexPointer(const float *vertex3f, size_t stride)
 880 {
 881         dpsoftrast.pointer_vertex3f = vertex3f;
 882         dpsoftrast.stride_vertex = stride;
 883 }
 884 void DPSOFTRAST_SetColorPointer(const float *color4f, size_t stride)
 885 {
 886         dpsoftrast.pointer_color4f = color4f;
 887         dpsoftrast.pointer_color4ub = NULL;
 888         dpsoftrast.stride_color = stride;
 889 }
 890 void DPSOFTRAST_SetColorPointer4ub(const unsigned char *color4ub, size_t stride)
 891 {
 892         dpsoftrast.pointer_color4f = NULL;
 893         dpsoftrast.pointer_color4ub = color4ub;
 894         dpsoftrast.stride_color = stride;
 895 }
 896 void DPSOFTRAST_SetTexCoordPointer(int unitnum, int numcomponents, size_t stride, const float *texcoordf)
 897 {
 898         dpsoftrast.pointer_texcoordf[unitnum] = texcoordf;
 899         dpsoftrast.components_texcoord[unitnum] = numcomponents;
 900         dpsoftrast.stride_texcoord[unitnum] = stride;
 901 }
 902
 903 void DPSOFTRAST_SetShader(unsigned int mode, unsigned int permutation)
 904 {
 905         dpsoftrast.shader_mode = mode;
 906         dpsoftrast.shader_permutation = permutation;
 907 }
 908 void DPSOFTRAST_Uniform4fARB(DPSOFTRAST_UNIFORM index, float v0, float v1, float v2, float v3)
 909 {
 910         dpsoftrast.uniform4f[index*4+0] = v0;
 911         dpsoftrast.uniform4f[index*4+1] = v1;
 912         dpsoftrast.uniform4f[index*4+2] = v2;
 913         dpsoftrast.uniform4f[index*4+3] = v3;
 914 }
 915 void DPSOFTRAST_Uniform4fvARB(DPSOFTRAST_UNIFORM index, const float *v)
 916 {
 917         dpsoftrast.uniform4f[index*4+0] = v[0];
 918         dpsoftrast.uniform4f[index*4+1] = v[1];
 919         dpsoftrast.uniform4f[index*4+2] = v[2];
 920         dpsoftrast.uniform4f[index*4+3] = v[3];
 921 }
 922 void DPSOFTRAST_UniformMatrix4fvARB(DPSOFTRAST_UNIFORM index, int arraysize, int transpose, const float *v)
 923 {
 924         int i;
 925         for (i = 0;i < arraysize;i++, index += 4, v += 16)
 926         {
 927                 if (transpose)
 928                 {
 929                         dpsoftrast.uniform4f[index*4+0] = v[0];
 930                         dpsoftrast.uniform4f[index*4+1] = v[4];
 931                         dpsoftrast.uniform4f[index*4+2] = v[8];
 932                         dpsoftrast.uniform4f[index*4+3] = v[12];
 933                         dpsoftrast.uniform4f[index*4+4] = v[1];
 934                         dpsoftrast.uniform4f[index*4+5] = v[5];
 935                         dpsoftrast.uniform4f[index*4+6] = v[9];
 936                         dpsoftrast.uniform4f[index*4+7] = v[13];
 937                         dpsoftrast.uniform4f[index*4+8] = v[2];
 938                         dpsoftrast.uniform4f[index*4+9] = v[6];
 939                         dpsoftrast.uniform4f[index*4+10] = v[10];
 940                         dpsoftrast.uniform4f[index*4+11] = v[14];
 941                         dpsoftrast.uniform4f[index*4+12] = v[3];
 942                         dpsoftrast.uniform4f[index*4+13] = v[7];
 943                         dpsoftrast.uniform4f[index*4+14] = v[11];
 944                         dpsoftrast.uniform4f[index*4+15] = v[15];
 945                 }
 946                 else
 947                 {
 948                         dpsoftrast.uniform4f[index*4+0] = v[0];
 949                         dpsoftrast.uniform4f[index*4+1] = v[1];
 950                         dpsoftrast.uniform4f[index*4+2] = v[2];
 951                         dpsoftrast.uniform4f[index*4+3] = v[3];
 952                         dpsoftrast.uniform4f[index*4+4] = v[4];
 953                         dpsoftrast.uniform4f[index*4+5] = v[5];
 954                         dpsoftrast.uniform4f[index*4+6] = v[6];
 955                         dpsoftrast.uniform4f[index*4+7] = v[7];
 956                         dpsoftrast.uniform4f[index*4+8] = v[8];
 957                         dpsoftrast.uniform4f[index*4+9] = v[9];
 958                         dpsoftrast.uniform4f[index*4+10] = v[10];
 959                         dpsoftrast.uniform4f[index*4+11] = v[11];
 960                         dpsoftrast.uniform4f[index*4+12] = v[12];
 961                         dpsoftrast.uniform4f[index*4+13] = v[13];
 962                         dpsoftrast.uniform4f[index*4+14] = v[14];
 963                         dpsoftrast.uniform4f[index*4+15] = v[15];
 964                 }
 965         }
 966 }
 967 void DPSOFTRAST_Uniform1iARB(DPSOFTRAST_UNIFORM index, int i0)
 968 {
 969         dpsoftrast.uniform1i[index] = i0;
 970 }
 971
 972 void DPSOFTRAST_Draw_LoadVertices(int firstvertex, int numvertices, bool needcolors)
 973 {
 974         int i;
 975         int j;
 976         int stride;
 977         const float *v;
 978         float *p;
 979         float *data;
 980         const unsigned char *b;
 981         dpsoftrast.draw.numvertices = numvertices;
 982         if (dpsoftrast.draw.maxvertices < dpsoftrast.draw.numvertices)
 983         {
 984                 if (dpsoftrast.draw.maxvertices < 4096)
 985                         dpsoftrast.draw.maxvertices = 4096;
 986                 while (dpsoftrast.draw.maxvertices < dpsoftrast.draw.numvertices)
 987                         dpsoftrast.draw.maxvertices *= 2;
 988                 if (dpsoftrast.draw.in_array4f[0])
 989                         free(dpsoftrast.draw.in_array4f[0]);
 990                 data = (float *)calloc(1, dpsoftrast.draw.maxvertices * sizeof(float[4])*(DPSOFTRAST_ARRAY_TOTAL*2 + 1));
 991                 for (i = 0;i < DPSOFTRAST_ARRAY_TOTAL;i++, data += dpsoftrast.draw.maxvertices * 4)
 992                         dpsoftrast.draw.in_array4f[i] = data;
 993                 for (i = 0;i < DPSOFTRAST_ARRAY_TOTAL;i++, data += dpsoftrast.draw.maxvertices * 4)
 994                         dpsoftrast.draw.post_array4f[i] = data;
 995                 dpsoftrast.draw.screencoord4f = data;
 996                 data += dpsoftrast.draw.maxvertices * 4;
 997         }
 998         stride = dpsoftrast.stride_vertex;
 999         v = (const float *)((unsigned char *)dpsoftrast.pointer_vertex3f + firstvertex * stride);
1000         p = dpsoftrast.draw.in_array4f[0];
1001         for (i = 0;i < numvertices;i++)
1002         {
1003                 p[0] = v[0];
1004                 p[1] = v[1];
1005                 p[2] = v[2];
1006                 p[3] = 1.0f;
1007                 p += 4;
1008                 v = (const float *)((const unsigned char *)v + stride);
1009         }
1010         if (needcolors)
1011         {
1012                 if (dpsoftrast.pointer_color4f)
1013                 {
1014                         stride = dpsoftrast.stride_color;
1015                         v = (const float *)((const unsigned char *)dpsoftrast.pointer_color4f + firstvertex * stride);
1016                         p = dpsoftrast.draw.in_array4f[1];
1017                         for (i = 0;i < numvertices;i++)
1018                         {
1019                                 p[0] = v[0];
1020                                 p[1] = v[1];
1021                                 p[2] = v[2];
1022                                 p[3] = v[3];
1023                                 p += 4;
1024                                 v = (const float *)((const unsigned char *)v + stride);
1025                         }
1026                 }
1027                 else if (dpsoftrast.pointer_color4ub)
1028                 {
1029                         stride = dpsoftrast.stride_color;
1030                         b = (const unsigned char *)((const unsigned char *)dpsoftrast.pointer_color4ub + firstvertex * stride);
1031                         p = dpsoftrast.draw.in_array4f[1];
1032                         for (i = 0;i < numvertices;i++)
1033                         {
1034                                 p[0] = b[0] * (1.0f / 255.0f);
1035                                 p[1] = b[1] * (1.0f / 255.0f);
1036                                 p[2] = b[2] * (1.0f / 255.0f);
1037                                 p[3] = b[3] * (1.0f / 255.0f);
1038                                 p += 4;
1039                                 b = (const unsigned char *)((const unsigned char *)b + stride);
1040                         }
1041                 }
1042                 else
1043                 {
1044                         v = dpsoftrast.user.color;
1045                         p = dpsoftrast.draw.in_array4f[1];
1046                         for (i = 0;i < numvertices;i++)
1047                         {
1048                                 p[0] = v[0];
1049                                 p[1] = v[1];
1050                                 p[2] = v[2];
1051                                 p[3] = v[3];
1052                                 p += 4;
1053                         }
1054                 }
1055         }
1056         for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL-2;j++)
1057         {
1058                 if (dpsoftrast.pointer_texcoordf[j])
1059                 {
1060                         stride = dpsoftrast.stride_texcoord[j];
1061                         v = (const float *)((const unsigned char *)dpsoftrast.pointer_texcoordf[j] + firstvertex * stride);
1062                         p = dpsoftrast.draw.in_array4f[j+2];
1063                         switch(dpsoftrast.components_texcoord[j])
1064                         {
1065                         case 2:
1066                                 for (i = 0;i < numvertices;i++)
1067                                 {
1068                                         p[0] = v[0];
1069                                         p[1] = v[1];
1070                                         p[2] = 0.0f;
1071                                         p[3] = 1.0f;
1072                                         p += 4;
1073                                         v = (const float *)((const unsigned char *)v + stride);
1074                                 }
1075                                 break;
1076                         case 3:
1077                                 for (i = 0;i < numvertices;i++)
1078                                 {
1079                                         p[0] = v[0];
1080                                         p[1] = v[1];
1081                                         p[2] = v[2];
1082                                         p[3] = 1.0f;
1083                                         p += 4;
1084                                         v = (const float *)((const unsigned char *)v + stride);
1085                                 }
1086                                 break;
1087                         case 4:
1088                                 for (i = 0;i < numvertices;i++)
1089                                 {
1090                                         p[0] = v[0];
1091                                         p[1] = v[1];
1092                                         p[2] = v[2];
1093                                         p[3] = v[3];
1094                                         p += 4;
1095                                         v = (const float *)((const unsigned char *)v + stride);
1096                                 }
1097                                 break;
1098                         }
1099                 }
1100         }
1101 }
1102
1103 void DPSOFTRAST_Array_Transform(float *out4f, const float *in4f, int numitems, const float *inmatrix16f)
1104 {
1105         static const float identitymatrix[4][4] = {{1,0,0,0},{0,1,0,0},{0,0,1,0},{0,0,0,1}};
1106         // TODO: SIMD
1107         float matrix[4][4];
1108         int i;
1109         memcpy(matrix, inmatrix16f, sizeof(float[16]));
1110         if (!memcmp(identitymatrix, matrix, sizeof(float[16])))
1111         {
1112                 // fast case for identity matrix
1113                 memcpy(out4f, in4f, numitems * sizeof(float[4]));
1114                 return;
1115         }
1116         for (i = 0;i < numitems;i++, out4f += 4, in4f += 4)
1117         {
1118                 out4f[0] = in4f[0] * matrix[0][0] + in4f[1] * matrix[1][0] + in4f[2] * matrix[2][0] + in4f[3] * matrix[3][0];
1119                 out4f[1] = in4f[0] * matrix[0][1] + in4f[1] * matrix[1][1] + in4f[2] * matrix[2][1] + in4f[3] * matrix[3][1];
1120                 out4f[2] = in4f[0] * matrix[0][2] + in4f[1] * matrix[1][2] + in4f[2] * matrix[2][2] + in4f[3] * matrix[3][2];
1121                 out4f[3] = in4f[0] * matrix[0][3] + in4f[1] * matrix[1][3] + in4f[2] * matrix[2][3] + in4f[3] * matrix[3][3];
1122         }
1123 }
1124
1125 void DPSOFTRAST_Array_Copy(float *out4f, const float *in4f, int numitems)
1126 {
1127         memcpy(out4f, in4f, numitems * sizeof(float[4]));
1128 }
1129
1130 void DPSOFTRAST_Draw_ProjectVertices(float *out4f, const float *in4f, int numitems)
1131 {
1132         // NOTE: this is used both as a whole mesh transform function and a
1133         // per-triangle transform function (for clipped triangles), accordingly
1134         // it should not crash on divide by 0 but the result of divide by 0 is
1135         // unimportant...
1136         // TODO: SIMD
1137         int i;
1138         float w;
1139         float viewportcenter[4];
1140         float viewportscale[4];
1141         viewportscale[0] = dpsoftrast.fb_viewportscale[0];
1142         viewportscale[1] = dpsoftrast.fb_viewportscale[1];
1143         viewportscale[2] = 0.5f;
1144         viewportscale[3] = 0.0f;
1145         viewportcenter[0] = dpsoftrast.fb_viewportcenter[0];
1146         viewportcenter[1] = dpsoftrast.fb_viewportcenter[1];
1147         viewportcenter[2] = 0.5f;
1148         viewportcenter[3] = 0.0f;
1149         for (i = 0;i < numitems;i++)
1150         {
1151                 if (!in4f[3])
1152                 {
1153                         out4f[0] = 0.0f;
1154                         out4f[1] = 0.0f;
1155                         out4f[2] = 0.0f;
1156                         out4f[3] = 0.0f;
1157                         continue;
1158                 }
1159                 w = 1.0f / in4f[3];
1160                 out4f[0] = viewportcenter[0] + viewportscale[0] * in4f[0] * w;
1161                 out4f[1] = viewportcenter[1] + viewportscale[1] * in4f[1] * w;
1162                 out4f[2] = viewportcenter[2] + viewportscale[2] * in4f[2] * w;
1163                 out4f[3] = viewportcenter[3] + viewportscale[3] * in4f[3] * w;
1164                 out4f[3] = w;
1165                 in4f += 4;
1166                 out4f += 4;
1167         }
1168 }
1169
1170 void DPSOFTRAST_Draw_DebugEdgePoints(const float *screen0, const float *screen1)
1171 {
1172         int i;
1173         int x;
1174         int y;
1175         int w = dpsoftrast.fb_width;
1176         int bounds[4];
1177         float v0[2], v1[2];
1178         unsigned int *pixels = dpsoftrast.fb_colorpixels[0];
1179         //const float *c4f;
1180         bounds[0] = dpsoftrast.fb_viewportscissor[0];
1181         bounds[1] = dpsoftrast.fb_viewportscissor[1];
1182         bounds[2] = dpsoftrast.fb_viewportscissor[0] + dpsoftrast.fb_viewportscissor[2];
1183         bounds[3] = dpsoftrast.fb_viewportscissor[1] + dpsoftrast.fb_viewportscissor[3];
1184         v0[0] = screen0[0];
1185         v0[1] = screen0[1];
1186         v1[0] = screen1[0];
1187         v1[1] = screen1[1];
1188         for (i = 0;i <= 128;i++)
1189         {
1190                 // check nearclip
1191                 //if (dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+3] != 1.0f)
1192                 //      continue;
1193                 x = (int)(v0[0] + (v1[0] - v0[0]) * (i/128.0f));
1194                 y = (int)(v0[1] + (v1[1] - v0[1]) * (i/128.0f));
1195                 if (x < bounds[0] || y < bounds[1] || x >= bounds[2] || y >= bounds[3])
1196                         continue;
1197                 //c4f = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_COLOR] + element0*4;
1198                 //pixels[y*w+x] = DPSOFTRAST_BGRA8_FROM_RGBA32F(c4f[0], c4f[1], c4f[2], c4f[3]);
1199                 pixels[y*w+x] = 0xFFFFFFFF;
1200         }
1201 }
1202
1203 void DPSOFTRAST_Draw_Span_Begin(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *zf)
1204 {
1205         int x;
1206         int startx = span->startx;
1207         int endx = span->endx;
1208         float w = span->data[0][DPSOFTRAST_ARRAY_TOTAL][3];
1209         float wslope = span->data[1][DPSOFTRAST_ARRAY_TOTAL][3];
1210         for (x = startx;x < endx;)
1211         {
1212                 int endsub = x + DPSOFTRAST_MAXSUBSPAN-1;
1213                 float z = 1.0f / (w + wslope * x), dz;
1214                 if (endsub >= endx)
1215                 {
1216                         endsub = endx-1;
1217                         dz = endsub > x ? (1.0f / (w + wslope * endsub) - z) / (endsub - x) : 0.0f;
1218                 }
1219                 else
1220                 {
1221                         dz = (1.0f / (w + wslope * endsub) - z) * (1.0f / (DPSOFTRAST_MAXSUBSPAN-1));
1222                 }
1223                 for (; x <= endsub; x++, z += dz)
1224                         zf[x] = z;
1225         }
1226 }
1227
1228 void DPSOFTRAST_Draw_Span_Finish(const DPSOFTRAST_State_Draw_Span * RESTRICT span, const float * RESTRICT in4f)
1229 {
1230         int x;
1231         int startx = span->startx;
1232         int endx = span->endx;
1233         int d[4];
1234         float a, b;
1235         unsigned char * RESTRICT pixelmask = span->pixelmask;
1236         unsigned char * RESTRICT pixel = (unsigned char *)dpsoftrast.fb_colorpixels[0];
1237         if (!pixel)
1238                 return;
1239         pixel += span->start * 4;
1240         // handle alphatest now (this affects depth writes too)
1241         if (dpsoftrast.user.alphatest)
1242                 for (x = startx;x < endx;x++)
1243                         if (in4f[x*4+3] < 0.5f)
1244                                 pixelmask[x] = false;
1245         // FIXME: this does not handle bigendian
1246         switch(dpsoftrast.fb_blendmode)
1247         {
1248         case DPSOFTRAST_BLENDMODE_OPAQUE:
1249                 for (x = startx;x < endx;x++)
1250                 {
1251                         if (!pixelmask[x])
1252                                 continue;
1253                         d[0] = (int)(in4f[x*4+2]*255.0f);if (d[0] > 255) d[0] = 255;
1254                         d[1] = (int)(in4f[x*4+1]*255.0f);if (d[1] > 255) d[1] = 255;
1255                         d[2] = (int)(in4f[x*4+0]*255.0f);if (d[2] > 255) d[2] = 255;
1256                         d[3] = (int)(in4f[x*4+3]*255.0f);if (d[3] > 255) d[3] = 255;
1257                         pixel[x*4+0] = d[0];
1258                         pixel[x*4+1] = d[1];
1259                         pixel[x*4+2] = d[2];
1260                         pixel[x*4+3] = d[3];
1261                 }
1262                 break;
1263         case DPSOFTRAST_BLENDMODE_ALPHA:
1264                 for (x = startx;x < endx;x++)
1265                 {
1266                         if (!pixelmask[x])
1267                                 continue;
1268                         a = in4f[x*4+3] * 255.0f;
1269                         b = 1.0f - in4f[x*4+3];
1270                         d[0] = (int)(in4f[x*4+2]*a+pixel[x*4+0]*b);if (d[0] > 255) d[0] = 255;
1271                         d[1] = (int)(in4f[x*4+1]*a+pixel[x*4+1]*b);if (d[1] > 255) d[1] = 255;
1272                         d[2] = (int)(in4f[x*4+0]*a+pixel[x*4+2]*b);if (d[2] > 255) d[2] = 255;
1273                         d[3] = (int)(in4f[x*4+3]*a+pixel[x*4+3]*b);if (d[3] > 255) d[3] = 255;
1274                         pixel[x*4+0] = d[0];
1275                         pixel[x*4+1] = d[1];
1276                         pixel[x*4+2] = d[2];
1277                         pixel[x*4+3] = d[3];
1278                 }
1279                 break;
1280         case DPSOFTRAST_BLENDMODE_ADDALPHA:
1281                 for (x = startx;x < endx;x++)
1282                 {
1283                         if (!pixelmask[x])
1284                                 continue;
1285                         a = in4f[x*4+3] * 255.0f;
1286                         d[0] = (int)(in4f[x*4+2]*a+pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1287                         d[1] = (int)(in4f[x*4+1]*a+pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1288                         d[2] = (int)(in4f[x*4+0]*a+pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1289                         d[3] = (int)(in4f[x*4+3]*a+pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1290                         pixel[x*4+0] = d[0];
1291                         pixel[x*4+1] = d[1];
1292                         pixel[x*4+2] = d[2];
1293                         pixel[x*4+3] = d[3];
1294                 }
1295                 break;
1296         case DPSOFTRAST_BLENDMODE_ADD:
1297                 for (x = startx;x < endx;x++)
1298                 {
1299                         if (!pixelmask[x])
1300                                 continue;
1301                         d[0] = (int)(in4f[x*4+2]*255.0f+pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1302                         d[1] = (int)(in4f[x*4+1]*255.0f+pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1303                         d[2] = (int)(in4f[x*4+0]*255.0f+pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1304                         d[3] = (int)(in4f[x*4+3]*255.0f+pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1305                         pixel[x*4+0] = d[0];
1306                         pixel[x*4+1] = d[1];
1307                         pixel[x*4+2] = d[2];
1308                         pixel[x*4+3] = d[3];
1309                 }
1310                 break;
1311         case DPSOFTRAST_BLENDMODE_INVMOD:
1312                 for (x = startx;x < endx;x++)
1313                 {
1314                         if (!pixelmask[x])
1315                                 continue;
1316                         d[0] = (int)((1.0f-in4f[x*4+2])*pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1317                         d[1] = (int)((1.0f-in4f[x*4+1])*pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1318                         d[2] = (int)((1.0f-in4f[x*4+0])*pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1319                         d[3] = (int)((1.0f-in4f[x*4+3])*pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1320                         pixel[x*4+0] = d[0];
1321                         pixel[x*4+1] = d[1];
1322                         pixel[x*4+2] = d[2];
1323                         pixel[x*4+3] = d[3];
1324                 }
1325                 break;
1326         case DPSOFTRAST_BLENDMODE_MUL:
1327                 for (x = startx;x < endx;x++)
1328                 {
1329                         if (!pixelmask[x])
1330                                 continue;
1331                         d[0] = (int)(in4f[x*4+2]*pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1332                         d[1] = (int)(in4f[x*4+1]*pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1333                         d[2] = (int)(in4f[x*4+0]*pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1334                         d[3] = (int)(in4f[x*4+3]*pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1335                         pixel[x*4+0] = d[0];
1336                         pixel[x*4+1] = d[1];
1337                         pixel[x*4+2] = d[2];
1338                         pixel[x*4+3] = d[3];
1339                 }
1340                 break;
1341         case DPSOFTRAST_BLENDMODE_MUL2:
1342                 for (x = startx;x < endx;x++)
1343                 {
1344                         if (!pixelmask[x])
1345                                 continue;
1346                         d[0] = (int)(in4f[x*4+2]*pixel[x*4+0]*2.0f);if (d[0] > 255) d[0] = 255;
1347                         d[1] = (int)(in4f[x*4+1]*pixel[x*4+1]*2.0f);if (d[1] > 255) d[1] = 255;
1348                         d[2] = (int)(in4f[x*4+0]*pixel[x*4+2]*2.0f);if (d[2] > 255) d[2] = 255;
1349                         d[3] = (int)(in4f[x*4+3]*pixel[x*4+3]*2.0f);if (d[3] > 255) d[3] = 255;
1350                         pixel[x*4+0] = d[0];
1351                         pixel[x*4+1] = d[1];
1352                         pixel[x*4+2] = d[2];
1353                         pixel[x*4+3] = d[3];
1354                 }
1355                 break;
1356         case DPSOFTRAST_BLENDMODE_SUBALPHA:
1357                 for (x = startx;x < endx;x++)
1358                 {
1359                         if (!pixelmask[x])
1360                                 continue;
1361                         a = in4f[x*4+3] * -255.0f;
1362                         d[0] = (int)(in4f[x*4+2]*a+pixel[x*4+0]);if (d[0] > 255) d[0] = 255;if (d[0] < 0) d[0] = 0;
1363                         d[1] = (int)(in4f[x*4+1]*a+pixel[x*4+1]);if (d[1] > 255) d[1] = 255;if (d[1] < 0) d[1] = 0;
1364                         d[2] = (int)(in4f[x*4+0]*a+pixel[x*4+2]);if (d[2] > 255) d[2] = 255;if (d[2] < 0) d[2] = 0;
1365                         d[3] = (int)(in4f[x*4+3]*a+pixel[x*4+3]);if (d[3] > 255) d[3] = 255;if (d[3] < 0) d[3] = 0;
1366                         pixel[x*4+0] = d[0];
1367                         pixel[x*4+1] = d[1];
1368                         pixel[x*4+2] = d[2];
1369                         pixel[x*4+3] = d[3];
1370                 }
1371                 break;
1372         case DPSOFTRAST_BLENDMODE_PSEUDOALPHA:
1373                 for (x = startx;x < endx;x++)
1374                 {
1375                         if (!pixelmask[x])
1376                                 continue;
1377                         a = 255.0f;
1378                         b = 1.0f - in4f[x*4+3];
1379                         d[0] = (int)(in4f[x*4+2]*a+pixel[x*4+0]*b);if (d[0] > 255) d[0] = 255;
1380                         d[1] = (int)(in4f[x*4+1]*a+pixel[x*4+1]*b);if (d[1] > 255) d[1] = 255;
1381                         d[2] = (int)(in4f[x*4+0]*a+pixel[x*4+2]*b);if (d[2] > 255) d[2] = 255;
1382                         d[3] = (int)(in4f[x*4+3]*a+pixel[x*4+3]*b);if (d[3] > 255) d[3] = 255;
1383                         pixel[x*4+0] = d[0];
1384                         pixel[x*4+1] = d[1];
1385                         pixel[x*4+2] = d[2];
1386                         pixel[x*4+3] = d[3];
1387                 }
1388                 break;
1389         }
1390 }
1391
1392 void DPSOFTRAST_Draw_Span_FinishBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, const unsigned char* RESTRICT in4ub)
1393 {
1394         int x;
1395         int startx = span->startx;
1396         int endx = span->endx;
1397         int d[4];
1398         const unsigned int * RESTRICT ini = (const unsigned int *)in4ub;
1399         int a, b;
1400         unsigned char * RESTRICT pixelmask = span->pixelmask;
1401         unsigned char * RESTRICT pixel = (unsigned char *)dpsoftrast.fb_colorpixels[0];
1402         unsigned int * RESTRICT pixeli = (unsigned int *)dpsoftrast.fb_colorpixels[0];
1403         if (!pixel)
1404                 return;
1405         pixel += span->start * 4;
1406         pixeli += span->start;
1407         // handle alphatest now (this affects depth writes too)
1408         if (dpsoftrast.user.alphatest)
1409                 for (x = startx;x < endx;x++)
1410                         if (in4ub[x*4+3] < 0.5f)
1411                                 pixelmask[x] = false;
1412         // FIXME: this does not handle bigendian
1413         switch(dpsoftrast.fb_blendmode)
1414         {
1415         case DPSOFTRAST_BLENDMODE_OPAQUE:
1416                 for (x = startx;x < endx;x++)
1417                         if (pixelmask[x])
1418                                 pixeli[x] = ini[x];
1419                 break;
1420         case DPSOFTRAST_BLENDMODE_ALPHA:
1421                 for (x = startx;x < endx;x++)
1422                 {
1423                         if (!pixelmask[x])
1424                                 continue;
1425                         a = in4ub[x*4+3];
1426                         b = 256 - in4ub[x*4+3];
1427                         pixel[x*4+0] = (in4ub[x*4+0]*a+pixel[x*4+0]*b) >> 8;
1428                         pixel[x*4+1] = (in4ub[x*4+1]*a+pixel[x*4+1]*b) >> 8;
1429                         pixel[x*4+2] = (in4ub[x*4+2]*a+pixel[x*4+2]*b) >> 8;
1430                         pixel[x*4+3] = (in4ub[x*4+3]*a+pixel[x*4+3]*b) >> 8;
1431                 }
1432                 break;
1433         case DPSOFTRAST_BLENDMODE_ADDALPHA:
1434                 for (x = startx;x < endx;x++)
1435                 {
1436                         if (!pixelmask[x])
1437                                 continue;
1438                         a = in4ub[x*4+3];
1439                         d[0] = (((in4ub[x*4+0]*a)>>8)+pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1440                         d[1] = (((in4ub[x*4+1]*a)>>8)+pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1441                         d[2] = (((in4ub[x*4+2]*a)>>8)+pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1442                         d[3] = (((in4ub[x*4+3]*a)>>8)+pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1443                         pixel[x*4+0] = d[0];
1444                         pixel[x*4+1] = d[1];
1445                         pixel[x*4+2] = d[2];
1446                         pixel[x*4+3] = d[3];
1447                 }
1448                 break;
1449         case DPSOFTRAST_BLENDMODE_ADD:
1450                 for (x = startx;x < endx;x++)
1451                 {
1452                         if (!pixelmask[x])
1453                                 continue;
1454                         d[0] = (in4ub[x*4+0]+pixel[x*4+0]);if (d[0] > 255) d[0] = 255;
1455                         d[1] = (in4ub[x*4+1]+pixel[x*4+1]);if (d[1] > 255) d[1] = 255;
1456                         d[2] = (in4ub[x*4+2]+pixel[x*4+2]);if (d[2] > 255) d[2] = 255;
1457                         d[3] = (in4ub[x*4+3]+pixel[x*4+3]);if (d[3] > 255) d[3] = 255;
1458                         pixel[x*4+0] = d[0];
1459                         pixel[x*4+1] = d[1];
1460                         pixel[x*4+2] = d[2];
1461                         pixel[x*4+3] = d[3];
1462                 }
1463                 break;
1464         case DPSOFTRAST_BLENDMODE_INVMOD:
1465                 for (x = startx;x < endx;x++)
1466                 {
1467                         if (!pixelmask[x])
1468                                 continue;
1469                         pixel[x*4+0] = ((255-in4ub[x*4+0])*pixel[x*4+0])>>8;
1470                         pixel[x*4+1] = ((255-in4ub[x*4+1])*pixel[x*4+1])>>8;
1471                         pixel[x*4+2] = ((255-in4ub[x*4+2])*pixel[x*4+2])>>8;
1472                         pixel[x*4+3] = ((255-in4ub[x*4+3])*pixel[x*4+3])>>8;
1473                 }
1474                 break;
1475         case DPSOFTRAST_BLENDMODE_MUL:
1476                 for (x = startx;x < endx;x++)
1477                 {
1478                         if (!pixelmask[x])
1479                                 continue;
1480                         pixel[x*4+0] = (in4ub[x*4+0]*pixel[x*4+0])>>8;
1481                         pixel[x*4+1] = (in4ub[x*4+1]*pixel[x*4+1])>>8;
1482                         pixel[x*4+2] = (in4ub[x*4+2]*pixel[x*4+2])>>8;
1483                         pixel[x*4+3] = (in4ub[x*4+3]*pixel[x*4+3])>>8;
1484                 }
1485                 break;
1486         case DPSOFTRAST_BLENDMODE_MUL2:
1487                 for (x = startx;x < endx;x++)
1488                 {
1489                         if (!pixelmask[x])
1490                                 continue;
1491                         d[0] = (in4ub[x*4+0]*pixel[x*4+0])>>7;if (d[0] > 255) d[0] = 255;
1492                         d[1] = (in4ub[x*4+1]*pixel[x*4+1])>>7;if (d[1] > 255) d[1] = 255;
1493                         d[2] = (in4ub[x*4+2]*pixel[x*4+2])>>7;if (d[2] > 255) d[2] = 255;
1494                         d[3] = (in4ub[x*4+3]*pixel[x*4+3])>>7;if (d[3] > 255) d[3] = 255;
1495                         pixel[x*4+0] = d[0];
1496                         pixel[x*4+1] = d[1];
1497                         pixel[x*4+2] = d[2];
1498                         pixel[x*4+3] = d[3];
1499                 }
1500                 break;
1501         case DPSOFTRAST_BLENDMODE_SUBALPHA:
1502                 for (x = startx;x < endx;x++)
1503                 {
1504                         if (!pixelmask[x])
1505                                 continue;
1506                         a = in4ub[x*4+3];
1507                         d[0] = pixel[x*4+0]-((in4ub[x*4+0]*a)>>8);if (d[0] < 0) d[0] = 0;
1508                         d[1] = pixel[x*4+1]-((in4ub[x*4+1]*a)>>8);if (d[1] < 0) d[1] = 0;
1509                         d[2] = pixel[x*4+2]-((in4ub[x*4+2]*a)>>8);if (d[2] < 0) d[2] = 0;
1510                         d[3] = pixel[x*4+3]-((in4ub[x*4+3]*a)>>8);if (d[3] < 0) d[3] = 0;
1511                         pixel[x*4+0] = d[0];
1512                         pixel[x*4+1] = d[1];
1513                         pixel[x*4+2] = d[2];
1514                         pixel[x*4+3] = d[3];
1515                 }
1516                 break;
1517         case DPSOFTRAST_BLENDMODE_PSEUDOALPHA:
1518                 for (x = startx;x < endx;x++)
1519                 {
1520                         if (!pixelmask[x])
1521                                 continue;
1522                         b = 255 - in4ub[x*4+3];
1523                         d[0] = in4ub[x*4+0]+((pixel[x*4+0]*b)>>8);if (d[0] > 255) d[0] = 255;
1524                         d[1] = in4ub[x*4+1]+((pixel[x*4+1]*b)>>8);if (d[1] > 255) d[1] = 255;
1525                         d[2] = in4ub[x*4+2]+((pixel[x*4+2]*b)>>8);if (d[2] > 255) d[2] = 255;
1526                         d[3] = in4ub[x*4+3]+((pixel[x*4+3]*b)>>8);if (d[3] > 255) d[3] = 255;
1527                         pixel[x*4+0] = d[0];
1528                         pixel[x*4+1] = d[1];
1529                         pixel[x*4+2] = d[2];
1530                         pixel[x*4+3] = d[3];
1531                 }
1532                 break;
1533         }
1534 }
1535
1536 void DPSOFTRAST_Draw_Span_Texture2DVarying(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float * RESTRICT out4f, int texunitindex, int arrayindex, const float * RESTRICT zf)
1537 {
1538         int x;
1539         int startx = span->startx;
1540         int endx = span->endx;
1541         int flags;
1542         float c[4];
1543         float data[4];
1544         float slope[4];
1545         float tc[2];
1546         float tcscale[2];
1547         unsigned int tci[2];
1548         unsigned int tci1[2];
1549         unsigned int tcimin[2];
1550         unsigned int tcimax[2];
1551         int tciwrapmask[2];
1552         int tciwidth;
1553         int filter;
1554         int mip;
1555         const unsigned char * RESTRICT pixelbase;
1556         const unsigned char * RESTRICT pixel[4];
1557         DPSOFTRAST_Texture *texture = dpsoftrast.texbound[texunitindex];
1558         // if no texture is bound, just fill it with white
1559         if (!texture)
1560         {
1561                 for (x = startx;x < endx;x++)
1562                 {
1563                         out4f[x*4+0] = 1.0f;
1564                         out4f[x*4+1] = 1.0f;
1565                         out4f[x*4+2] = 1.0f;
1566                         out4f[x*4+3] = 1.0f;
1567                 }
1568                 return;
1569         }
1570         mip = span->mip[texunitindex];
1571         // if this mipmap of the texture is 1 pixel, just fill it with that color
1572         if (texture->mipmap[mip][1] == 4)
1573         {
1574                 c[0] = texture->bytes[2] * (1.0f/255.0f);
1575                 c[1] = texture->bytes[1] * (1.0f/255.0f);
1576                 c[2] = texture->bytes[0] * (1.0f/255.0f);
1577                 c[3] = texture->bytes[3] * (1.0f/255.0f);
1578                 for (x = startx;x < endx;x++)
1579                 {
1580                         out4f[x*4+0] = c[0];
1581                         out4f[x*4+1] = c[1];
1582                         out4f[x*4+2] = c[2];
1583                         out4f[x*4+3] = c[3];
1584                 }
1585                 return;
1586         }
1587         filter = texture->filter & DPSOFTRAST_TEXTURE_FILTER_LINEAR;
1588         data[0] = span->data[0][arrayindex][0];
1589         data[1] = span->data[0][arrayindex][1];
1590         data[2] = span->data[0][arrayindex][2];
1591         data[3] = span->data[0][arrayindex][3];
1592         slope[0] = span->data[1][arrayindex][0];
1593         slope[1] = span->data[1][arrayindex][1];
1594         slope[2] = span->data[1][arrayindex][2];
1595         slope[3] = span->data[1][arrayindex][3];
1596         flags = texture->flags;
1597         pixelbase = (unsigned char *)texture->bytes + texture->mipmap[mip][0];
1598         tcscale[0] = texture->mipmap[mip][2];
1599         tcscale[1] = texture->mipmap[mip][3];
1600         tciwidth = texture->mipmap[mip][2];
1601         tcimin[0] = 0;
1602         tcimin[1] = 0;
1603         tcimax[0] = texture->mipmap[mip][2]-1;
1604         tcimax[1] = texture->mipmap[mip][3]-1;
1605         tciwrapmask[0] = texture->mipmap[mip][2]-1;
1606         tciwrapmask[1] = texture->mipmap[mip][3]-1;
1607         for (x = startx;x < endx;)
1608         {
1609                 float endtc[2];
1610                 unsigned int subtc[2];
1611                 unsigned int substep[2];
1612                 int endsub = x + DPSOFTRAST_MAXSUBSPAN-1;
1613                 float subscale = 4096.0f/(DPSOFTRAST_MAXSUBSPAN-1);
1614                 if (endsub >= endx)
1615                 {
1616                         endsub = endx-1;
1617                         subscale = endsub > x ? 4096.0f / (endsub - x) : 1.0f;
1618                 }
1619                 tc[0] = (data[0] + slope[0]*x) * zf[x] * tcscale[0] - 0.5f;
1620                 tc[1] = (data[1] + slope[1]*x) * zf[x] * tcscale[1] - 0.5f;
1621                 endtc[0] = (data[0] + slope[0]*endsub) * zf[endsub] * tcscale[0] - 0.5f;
1622                 endtc[1] = (data[1] + slope[1]*endsub) * zf[endsub] * tcscale[1] - 0.5f;
1623                 substep[0] = (endtc[0] - tc[0]) * subscale;
1624                 substep[1] = (endtc[1] - tc[1]) * subscale;
1625                 subtc[0] = tc[0] * (1<<12);
1626                 subtc[1] = tc[1] * (1<<12);
1627                 if (!(flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE))
1628                 {
1629                         subtc[0] &= (tciwrapmask[0]<<12)|0xFFF;
1630                         subtc[1] &= (tciwrapmask[1]<<12)|0xFFF;
1631                 }
1632                 if(filter)
1633                 {
1634                         tci[0] = (subtc[0]>>12) - tcimin[0];
1635                         tci[1] = (subtc[1]>>12) - tcimin[1];
1636                         tci1[0] = ((subtc[0] + (endsub - x)*substep[0])>>12);
1637                         tci1[1] = ((subtc[1] + (endsub - x)*substep[1])>>12);
1638                         if (tci[0] <= tcimax[0]-1 && tci[1] <= tcimax[1]-1 && tci1[0] <= tcimax[0]-1 && tci1[1] <= tcimax[1]-1)
1639                         {
1640                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1641                                 {
1642                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1643                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1644                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1645                                         tci[0] = subtc[0]>>12;
1646                                         tci[1] = subtc[1]>>12;
1647                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1648                                         pixel[1] = pixel[0] + 4 * tciwidth;
1649                                         c[0] = (pixel[0][2]*lerp[0]+pixel[0][4+2]*lerp[1]+pixel[1][2]*lerp[2]+pixel[1][4+2]*lerp[3]) * (1.0f / 0xFF000000);
1650                                         c[1] = (pixel[0][1]*lerp[0]+pixel[0][4+1]*lerp[1]+pixel[1][1]*lerp[2]+pixel[1][4+1]*lerp[3]) * (1.0f / 0xFF000000);
1651                                         c[2] = (pixel[0][0]*lerp[0]+pixel[0][4+0]*lerp[1]+pixel[1][0]*lerp[2]+pixel[1][4+0]*lerp[3]) * (1.0f / 0xFF000000);
1652                                         c[3] = (pixel[0][3]*lerp[0]+pixel[0][4+3]*lerp[1]+pixel[1][3]*lerp[2]+pixel[1][4+3]*lerp[3]) * (1.0f / 0xFF000000);
1653                                         out4f[x*4+0] = c[0];
1654                                         out4f[x*4+1] = c[1];
1655                                         out4f[x*4+2] = c[2];
1656                                         out4f[x*4+3] = c[3];
1657                                 }
1658                         }
1659                         else if (flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE)
1660                         {
1661                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1662                                 {
1663                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1664                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1665                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1666                                         tci[0] = subtc[0]>>12;
1667                                         tci[1] = subtc[1]>>12;
1668                                         tci1[0] = tci[0] + 1;
1669                                         tci1[1] = tci[1] + 1;
1670                                         tci[0] = tci[0] >= tcimin[0] ? (tci[0] <= tcimax[0] ? tci[0] : tcimax[0]) : tcimin[0];
1671                                         tci[1] = tci[1] >= tcimin[1] ? (tci[1] <= tcimax[1] ? tci[1] : tcimax[1]) : tcimin[1];
1672                                         tci1[0] = tci1[0] >= tcimin[0] ? (tci1[0] <= tcimax[0] ? tci1[0] : tcimax[0]) : tcimin[0];
1673                                         tci1[1] = tci1[1] >= tcimin[1] ? (tci1[1] <= tcimax[1] ? tci1[1] : tcimax[1]) : tcimin[1];
1674                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1675                                         pixel[1] = pixelbase + 4 * (tci[1]*tciwidth+tci1[0]);
1676                                         pixel[2] = pixelbase + 4 * (tci1[1]*tciwidth+tci[0]);
1677                                         pixel[3] = pixelbase + 4 * (tci1[1]*tciwidth+tci1[0]);
1678                                         c[0] = (pixel[0][2]*lerp[0]+pixel[1][2]*lerp[1]+pixel[2][2]*lerp[2]+pixel[3][2]*lerp[3]) * (1.0f / 0xFF000000);
1679                                         c[1] = (pixel[0][1]*lerp[0]+pixel[1][1]*lerp[1]+pixel[2][1]*lerp[2]+pixel[3][1]*lerp[3]) * (1.0f / 0xFF000000);
1680                                         c[2] = (pixel[0][0]*lerp[0]+pixel[1][0]*lerp[1]+pixel[2][0]*lerp[2]+pixel[3][0]*lerp[3]) * (1.0f / 0xFF000000);
1681                                         c[3] = (pixel[0][3]*lerp[0]+pixel[1][3]*lerp[1]+pixel[2][3]*lerp[2]+pixel[3][3]*lerp[3]) * (1.0f / 0xFF000000);
1682                                         out4f[x*4+0] = c[0];
1683                                         out4f[x*4+1] = c[1];
1684                                         out4f[x*4+2] = c[2];
1685                                         out4f[x*4+3] = c[3];
1686                                 }
1687                         }
1688                         else
1689                         {
1690                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1691                                 {
1692                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1693                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1694                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1695                                         tci[0] = subtc[0]>>12;
1696                                         tci[1] = subtc[1]>>12;
1697                                         tci1[0] = tci[0] + 1;
1698                                         tci1[1] = tci[1] + 1;
1699                                         tci[0] &= tciwrapmask[0];
1700                                         tci[1] &= tciwrapmask[1];
1701                                         tci1[0] &= tciwrapmask[0];
1702                                         tci1[1] &= tciwrapmask[1];
1703                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1704                                         pixel[1] = pixelbase + 4 * (tci[1]*tciwidth+tci1[0]);
1705                                         pixel[2] = pixelbase + 4 * (tci1[1]*tciwidth+tci[0]);
1706                                         pixel[3] = pixelbase + 4 * (tci1[1]*tciwidth+tci1[0]);
1707                                         c[0] = (pixel[0][2]*lerp[0]+pixel[1][2]*lerp[1]+pixel[2][2]*lerp[2]+pixel[3][2]*lerp[3]) * (1.0f / 0xFF000000);
1708                                         c[1] = (pixel[0][1]*lerp[0]+pixel[1][1]*lerp[1]+pixel[2][1]*lerp[2]+pixel[3][1]*lerp[3]) * (1.0f / 0xFF000000);
1709                                         c[2] = (pixel[0][0]*lerp[0]+pixel[1][0]*lerp[1]+pixel[2][0]*lerp[2]+pixel[3][0]*lerp[3]) * (1.0f / 0xFF000000);
1710                                         c[3] = (pixel[0][3]*lerp[0]+pixel[1][3]*lerp[1]+pixel[2][3]*lerp[2]+pixel[3][3]*lerp[3]) * (1.0f / 0xFF000000);
1711                                         out4f[x*4+0] = c[0];
1712                                         out4f[x*4+1] = c[1];
1713                                         out4f[x*4+2] = c[2];
1714                                         out4f[x*4+3] = c[3];
1715                                 }
1716                         }
1717                 }
1718                 else if (flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE)
1719                 {
1720                         for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1721                         {
1722                                 tci[0] = subtc[0]>>12;
1723                                 tci[1] = subtc[1]>>12;
1724                                 tci[0] = tci[0] >= tcimin[0] ? (tci[0] <= tcimax[0] ? tci[0] : tcimax[0]) : tcimin[0];
1725                                 tci[1] = tci[1] >= tcimin[1] ? (tci[1] <= tcimax[1] ? tci[1] : tcimax[1]) : tcimin[1];
1726                                 pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1727                                 c[0] = pixel[0][2] * (1.0f / 255.0f);
1728                                 c[1] = pixel[0][1] * (1.0f / 255.0f);
1729                                 c[2] = pixel[0][0] * (1.0f / 255.0f);
1730                                 c[3] = pixel[0][3] * (1.0f / 255.0f);
1731                                 out4f[x*4+0] = c[0];
1732                                 out4f[x*4+1] = c[1];
1733                                 out4f[x*4+2] = c[2];
1734                                 out4f[x*4+3] = c[3];
1735                         }
1736                 }
1737                 else
1738                 {
1739                         for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1740                         {
1741                                 tci[0] = subtc[0]>>12;
1742                                 tci[1] = subtc[1]>>12;
1743                                 tci[0] &= tciwrapmask[0];
1744                                 tci[1] &= tciwrapmask[1];
1745                                 pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1746                                 c[0] = pixel[0][2] * (1.0f / 255.0f);
1747                                 c[1] = pixel[0][1] * (1.0f / 255.0f);
1748                                 c[2] = pixel[0][0] * (1.0f / 255.0f);
1749                                 c[3] = pixel[0][3] * (1.0f / 255.0f);
1750                                 out4f[x*4+0] = c[0];
1751                                 out4f[x*4+1] = c[1];
1752                                 out4f[x*4+2] = c[2];
1753                                 out4f[x*4+3] = c[3];
1754                         }
1755                 }
1756         }
1757 }
1758
1759 void DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char * RESTRICT out4ub, int texunitindex, int arrayindex, const float * RESTRICT zf)
1760 {
1761         int x;
1762         int startx = span->startx;
1763         int endx = span->endx;
1764         int flags;
1765         float data[4];
1766         float slope[4];
1767         float tc[2];
1768         float tcscale[2];
1769         unsigned int tci[2];
1770         unsigned int tci1[2];
1771         unsigned int tcimin[2];
1772         unsigned int tcimax[2];
1773         int tciwrapmask[2];
1774         int tciwidth;
1775         int filter;
1776         int mip;
1777         unsigned int k;
1778         unsigned int *outi = (unsigned int *)out4ub;
1779         const unsigned char * RESTRICT pixelbase;
1780         const unsigned int * RESTRICT pixelbasei;
1781         const unsigned char * RESTRICT pixel[4];
1782         DPSOFTRAST_Texture *texture = dpsoftrast.texbound[texunitindex];
1783         // if no texture is bound, just fill it with white
1784         if (!texture)
1785         {
1786                 memset(out4ub, 255, span->length*4);
1787                 return;
1788         }
1789         mip = span->mip[texunitindex];
1790         // if this mipmap of the texture is 1 pixel, just fill it with that color
1791         if (texture->mipmap[mip][1] == 4)
1792         {
1793                 k = *((const unsigned int *)texture->bytes);
1794                 for (x = startx;x < endx;x++)
1795                         outi[x] = k;
1796                 return;
1797         }
1798         filter = texture->filter & DPSOFTRAST_TEXTURE_FILTER_LINEAR;
1799         data[0] = span->data[0][arrayindex][0];
1800         data[1] = span->data[0][arrayindex][1];
1801         data[2] = span->data[0][arrayindex][2];
1802         data[3] = span->data[0][arrayindex][3];
1803         slope[0] = span->data[1][arrayindex][0];
1804         slope[1] = span->data[1][arrayindex][1];
1805         slope[2] = span->data[1][arrayindex][2];
1806         slope[3] = span->data[1][arrayindex][3];
1807         flags = texture->flags;
1808         pixelbase = (const unsigned char *)texture->bytes + texture->mipmap[mip][0];
1809         pixelbasei = (const unsigned int *)pixelbase;
1810         tcscale[0] = texture->mipmap[mip][2];
1811         tcscale[1] = texture->mipmap[mip][3];
1812         tciwidth = texture->mipmap[mip][2];
1813         tcimin[0] = 0;
1814         tcimin[1] = 0;
1815         tcimax[0] = texture->mipmap[mip][2]-1;
1816         tcimax[1] = texture->mipmap[mip][3]-1;
1817         tciwrapmask[0] = texture->mipmap[mip][2]-1;
1818         tciwrapmask[1] = texture->mipmap[mip][3]-1;
1819         for (x = startx;x < endx;)
1820         {
1821                 float endtc[2];
1822                 unsigned int subtc[2];
1823                 unsigned int substep[2];
1824                 int endsub = x + DPSOFTRAST_MAXSUBSPAN-1;
1825                 float subscale = 4096.0f/(DPSOFTRAST_MAXSUBSPAN-1);
1826                 if (endsub >= endx)
1827                 {
1828                         endsub = endx-1;
1829                         subscale = endsub > x ? 4096.0f / (endsub - x) : 1.0f;
1830                 }
1831                 tc[0] = (data[0] + slope[0]*x) * zf[x] * tcscale[0] - 0.5f;
1832                 tc[1] = (data[1] + slope[1]*x) * zf[x] * tcscale[1] - 0.5f;
1833                 endtc[0] = (data[0] + slope[0]*endsub) * zf[endsub] * tcscale[0] - 0.5f;
1834                 endtc[1] = (data[1] + slope[1]*endsub) * zf[endsub] * tcscale[1] - 0.5f;
1835                 substep[0] = (endtc[0] - tc[0]) * subscale;
1836                 substep[1] = (endtc[1] - tc[1]) * subscale;
1837                 subtc[0] = tc[0] * (1<<12);
1838                 subtc[1] = tc[1] * (1<<12);
1839                 if (!(flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE))
1840                 {
1841                         subtc[0] &= (tciwrapmask[0]<<12)|0xFFF;
1842                         subtc[1] &= (tciwrapmask[1]<<12)|0xFFF;
1843                 }
1844 #if 0
1845 // LordHavoc: an attempt at reducing number of integer multiplies, did not show any improvement in benchmarks, abandoned.
1846                 if (filter && dpsoftrast_test)
1847                 {
1848                         const unsigned int * RESTRICT pixeli[4];
1849                         tci[0] = (subtc[0]>>12) - tcimin[0];
1850                         tci[1] = (subtc[1]>>12) - tcimin[1];
1851                         tci1[0] = ((subtc[0] + (endsub - x)*substep[0])>>12);
1852                         tci1[1] = ((subtc[1] + (endsub - x)*substep[1])>>12);
1853                         if (tci[0] <= tcimax[0]-1 && tci[1] <= tcimax[1]-1 && tci1[0] <= tcimax[0]-1 && tci1[1] <= tcimax[1]-1)
1854                         {
1855                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1856                                 {
1857                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1858                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1859                                         unsigned int lerp[4] = { (ifrac[0]*ifrac[1]) >> 16, (frac[0]*ifrac[1]) >> 16, (ifrac[0]*frac[1]) >> 16, (frac[0]*frac[1]) >> 16 };
1860                                         tci[0] = subtc[0]>>12;
1861                                         tci[1] = subtc[1]>>12;
1862                                         pixeli[0] = pixelbasei + (tci[1]*tciwidth+tci[0]);
1863                                         pixeli[1] = pixeli[0] + tciwidth;
1864                                         outi[x] = ((((pixeli[0][0] >> 8) & 0x00FF00FF) * lerp[0] + ((pixeli[0][1] >> 8) & 0x00FF00FF) * lerp[1] + ((pixeli[1][0] >> 8) & 0x00FF00FF) * lerp[2] + ((pixeli[1][1] >> 8) & 0x00FF00FF) * lerp[3])     & 0xFF00FF00)
1865                                                 | ((((pixeli[0][0]       & 0x00FF00FF) * lerp[0] + ( pixeli[0][1]       & 0x00FF00FF) * lerp[1] + ( pixeli[1][0]       & 0x00FF00FF) * lerp[2] + ( pixeli[1][1]       & 0x00FF00FF) * lerp[3])>>8) & 0x00FF00FF);
1866                                 }
1867                         }
1868                         else if (flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE)
1869                         {
1870                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1871                                 {
1872                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1873                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1874                                         unsigned int lerp[4] = { (ifrac[0]*ifrac[1]) >> 16, (frac[0]*ifrac[1]) >> 16, (ifrac[0]*frac[1]) >> 16, (frac[0]*frac[1]) >> 16 };
1875                                         tci[0] = subtc[0]>>12;
1876                                         tci[1] = subtc[1]>>12;
1877                                         tci1[0] = tci[0] + 1;
1878                                         tci1[1] = tci[1] + 1;
1879                                         tci[0] = tci[0] >= tcimin[0] ? (tci[0] <= tcimax[0] ? tci[0] : tcimax[0]) : tcimin[0];
1880                                         tci[1] = tci[1] >= tcimin[1] ? (tci[1] <= tcimax[1] ? tci[1] : tcimax[1]) : tcimin[1];
1881                                         tci1[0] = tci1[0] >= tcimin[0] ? (tci1[0] <= tcimax[0] ? tci1[0] : tcimax[0]) : tcimin[0];
1882                                         tci1[1] = tci1[1] >= tcimin[1] ? (tci1[1] <= tcimax[1] ? tci1[1] : tcimax[1]) : tcimin[1];
1883                                         pixeli[0] = pixelbasei + (tci[1]*tciwidth+tci[0]);
1884                                         pixeli[1] = pixelbasei + (tci[1]*tciwidth+tci1[0]);
1885                                         pixeli[2] = pixelbasei + (tci1[1]*tciwidth+tci[0]);
1886                                         pixeli[3] = pixelbasei + (tci1[1]*tciwidth+tci1[0]);
1887                                         outi[x] = ((((pixeli[0][0] >> 8) & 0x00FF00FF) * lerp[0] + ((pixeli[1][0] >> 8) & 0x00FF00FF) * lerp[1] + ((pixeli[2][0] >> 8) & 0x00FF00FF) * lerp[2] + ((pixeli[3][0] >> 8) & 0x00FF00FF) * lerp[3])     & 0xFF00FF00)
1888                                                 | ((((pixeli[0][0]       & 0x00FF00FF) * lerp[0] + ( pixeli[1][0]       & 0x00FF00FF) * lerp[1] + ( pixeli[2][0]       & 0x00FF00FF) * lerp[2] + ( pixeli[3][0]       & 0x00FF00FF) * lerp[3])>>8) & 0x00FF00FF);
1889                                 }
1890                         }
1891                         else
1892                         {
1893                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1894                                 {
1895                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1896                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1897                                         unsigned int lerp[4] = { (ifrac[0]*ifrac[1]) >> 16, (frac[0]*ifrac[1]) >> 16, (ifrac[0]*frac[1]) >> 16, (frac[0]*frac[1]) >> 16 };
1898                                         tci[0] = subtc[0]>>12;
1899                                         tci[1] = subtc[1]>>12;
1900                                         tci1[0] = tci[0] + 1;
1901                                         tci1[1] = tci[1] + 1;
1902                                         tci[0] &= tciwrapmask[0];
1903                                         tci[1] &= tciwrapmask[1];
1904                                         tci1[0] &= tciwrapmask[0];
1905                                         tci1[1] &= tciwrapmask[1];
1906                                         pixeli[0] = pixelbasei + (tci[1]*tciwidth+tci[0]);
1907                                         pixeli[1] = pixelbasei + (tci[1]*tciwidth+tci1[0]);
1908                                         pixeli[2] = pixelbasei + (tci1[1]*tciwidth+tci[0]);
1909                                         pixeli[3] = pixelbasei + (tci1[1]*tciwidth+tci1[0]);
1910                                         outi[x] = ((((pixeli[0][0] >> 8) & 0x00FF00FF) * lerp[0] + ((pixeli[1][0] >> 8) & 0x00FF00FF) * lerp[1] + ((pixeli[2][0] >> 8) & 0x00FF00FF) * lerp[2] + ((pixeli[3][0] >> 8) & 0x00FF00FF) * lerp[3])     & 0xFF00FF00)
1911                                                 | ((((pixeli[0][0]       & 0x00FF00FF) * lerp[0] + ( pixeli[1][0]       & 0x00FF00FF) * lerp[1] + ( pixeli[2][0]       & 0x00FF00FF) * lerp[2] + ( pixeli[3][0]       & 0x00FF00FF) * lerp[3])>>8) & 0x00FF00FF);
1912                                 }
1913                         }
1914                 }
1915                 else
1916 #endif
1917                 if (filter)
1918                 {
1919                         tci[0] = (subtc[0]>>12) - tcimin[0];
1920                         tci[1] = (subtc[1]>>12) - tcimin[1];
1921                         tci1[0] = ((subtc[0] + (endsub - x)*substep[0])>>12);
1922                         tci1[1] = ((subtc[1] + (endsub - x)*substep[1])>>12);
1923                         if (tci[0] <= tcimax[0]-1 && tci[1] <= tcimax[1]-1 && tci1[0] <= tcimax[0]-1 && tci1[1] <= tcimax[1]-1)
1924                         {
1925                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1926                                 {
1927                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1928                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1929                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1930                                         tci[0] = subtc[0]>>12;
1931                                         tci[1] = subtc[1]>>12;
1932                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1933                                         pixel[1] = pixel[0] + 4 * tciwidth;
1934                                         out4ub[x*4+0] = (pixel[0][0]*lerp[0]+pixel[0][4+0]*lerp[1]+pixel[1][0]*lerp[2]+pixel[1][4+0]*lerp[3]) >> 24;
1935                                         out4ub[x*4+1] = (pixel[0][1]*lerp[0]+pixel[0][4+1]*lerp[1]+pixel[1][1]*lerp[2]+pixel[1][4+1]*lerp[3]) >> 24;
1936                                         out4ub[x*4+2] = (pixel[0][2]*lerp[0]+pixel[0][4+2]*lerp[1]+pixel[1][2]*lerp[2]+pixel[1][4+2]*lerp[3]) >> 24;
1937                                         out4ub[x*4+3] = (pixel[0][3]*lerp[0]+pixel[0][4+3]*lerp[1]+pixel[1][3]*lerp[2]+pixel[1][4+3]*lerp[3]) >> 24;
1938                                 }
1939                         }
1940                         else if (flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE)
1941                         {
1942                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1943                                 {
1944                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1945                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1946                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1947                                         tci[0] = subtc[0]>>12;
1948                                         tci[1] = subtc[1]>>12;
1949                                         tci1[0] = tci[0] + 1;
1950                                         tci1[1] = tci[1] + 1;
1951                                         tci[0] = tci[0] >= tcimin[0] ? (tci[0] <= tcimax[0] ? tci[0] : tcimax[0]) : tcimin[0];
1952                                         tci[1] = tci[1] >= tcimin[1] ? (tci[1] <= tcimax[1] ? tci[1] : tcimax[1]) : tcimin[1];
1953                                         tci1[0] = tci1[0] >= tcimin[0] ? (tci1[0] <= tcimax[0] ? tci1[0] : tcimax[0]) : tcimin[0];
1954                                         tci1[1] = tci1[1] >= tcimin[1] ? (tci1[1] <= tcimax[1] ? tci1[1] : tcimax[1]) : tcimin[1];
1955                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1956                                         pixel[1] = pixelbase + 4 * (tci[1]*tciwidth+tci1[0]);
1957                                         pixel[2] = pixelbase + 4 * (tci1[1]*tciwidth+tci[0]);
1958                                         pixel[3] = pixelbase + 4 * (tci1[1]*tciwidth+tci1[0]);
1959                                         out4ub[x*4+0] = (pixel[0][0]*lerp[0]+pixel[1][0]*lerp[1]+pixel[2][0]*lerp[2]+pixel[3][0]*lerp[3]) >> 24;
1960                                         out4ub[x*4+1] = (pixel[0][1]*lerp[0]+pixel[1][1]*lerp[1]+pixel[2][1]*lerp[2]+pixel[3][1]*lerp[3]) >> 24;
1961                                         out4ub[x*4+2] = (pixel[0][2]*lerp[0]+pixel[1][2]*lerp[1]+pixel[2][2]*lerp[2]+pixel[3][2]*lerp[3]) >> 24;
1962                                         out4ub[x*4+3] = (pixel[0][3]*lerp[0]+pixel[1][3]*lerp[1]+pixel[2][3]*lerp[2]+pixel[3][3]*lerp[3]) >> 24;
1963                                 }
1964                         }
1965                         else
1966                         {
1967                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
1968                                 {
1969                                         unsigned int frac[2] = { subtc[0]&0xFFF, subtc[1]&0xFFF };
1970                                         unsigned int ifrac[2] = { 0x1000 - frac[0], 0x1000 - frac[1] };
1971                                         unsigned int lerp[4] = { ifrac[0]*ifrac[1], frac[0]*ifrac[1], ifrac[0]*frac[1], frac[0]*frac[1] };
1972                                         tci[0] = subtc[0]>>12;
1973                                         tci[1] = subtc[1]>>12;
1974                                         tci1[0] = tci[0] + 1;
1975                                         tci1[1] = tci[1] + 1;
1976                                         tci[0] &= tciwrapmask[0];
1977                                         tci[1] &= tciwrapmask[1];
1978                                         tci1[0] &= tciwrapmask[0];
1979                                         tci1[1] &= tciwrapmask[1];
1980                                         pixel[0] = pixelbase + 4 * (tci[1]*tciwidth+tci[0]);
1981                                         pixel[1] = pixelbase + 4 * (tci[1]*tciwidth+tci1[0]);
1982                                         pixel[2] = pixelbase + 4 * (tci1[1]*tciwidth+tci[0]);
1983                                         pixel[3] = pixelbase + 4 * (tci1[1]*tciwidth+tci1[0]);
1984                                         out4ub[x*4+0] = (pixel[0][0]*lerp[0]+pixel[1][0]*lerp[1]+pixel[2][0]*lerp[2]+pixel[3][0]*lerp[3]) >> 24;
1985                                         out4ub[x*4+1] = (pixel[0][1]*lerp[0]+pixel[1][1]*lerp[1]+pixel[2][1]*lerp[2]+pixel[3][1]*lerp[3]) >> 24;
1986                                         out4ub[x*4+2] = (pixel[0][2]*lerp[0]+pixel[1][2]*lerp[1]+pixel[2][2]*lerp[2]+pixel[3][2]*lerp[3]) >> 24;
1987                                         out4ub[x*4+3] = (pixel[0][3]*lerp[0]+pixel[1][3]*lerp[1]+pixel[2][3]*lerp[2]+pixel[3][3]*lerp[3]) >> 24;
1988                                 }
1989                         }
1990                 }
1991                 else
1992                 {
1993                         tci[0] = (subtc[0]>>12) - tcimin[0];
1994                         tci[1] = (subtc[1]>>12) - tcimin[1];
1995                         tci1[0] = ((subtc[0] + (endsub - x)*substep[0])>>12);
1996                         tci1[1] = ((subtc[1] + (endsub - x)*substep[1])>>12);
1997                         if (tci[0] <= tcimax[0]-1 && tci[1] <= tcimax[1]-1 && tci1[0] <= tcimax[0]-1 && tci1[1] <= tcimax[1]-1)
1998                         {
1999                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
2000                                 {
2001                                         tci[0] = subtc[0]>>12;
2002                                         tci[1] = subtc[1]>>12;
2003                                         outi[x] = pixelbasei[(tci[1]*tciwidth+tci[0])];
2004                                 }
2005                         }
2006                         else if (flags & DPSOFTRAST_TEXTURE_FLAG_CLAMPTOEDGE)
2007                         {
2008                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
2009                                 {
2010                                         tci[0] = subtc[0]>>12;
2011                                         tci[1] = subtc[1]>>12;
2012                                         tci[0] = tci[0] >= tcimin[0] ? (tci[0] <= tcimax[0] ? tci[0] : tcimax[0]) : tcimin[0];
2013                                         tci[1] = tci[1] >= tcimin[1] ? (tci[1] <= tcimax[1] ? tci[1] : tcimax[1]) : tcimin[1];
2014                                         outi[x] = pixelbasei[(tci[1]*tciwidth+tci[0])];
2015                                 }
2016                         }
2017                         else
2018                         {
2019                                 for (; x <= endsub; x++, subtc[0] += substep[0], subtc[1] += substep[1])
2020                                 {
2021                                         tci[0] = subtc[0]>>12;
2022                                         tci[1] = subtc[1]>>12;
2023                                         tci[0] &= tciwrapmask[0];
2024                                         tci[1] &= tciwrapmask[1];
2025                                         outi[x] = pixelbasei[(tci[1]*tciwidth+tci[0])];
2026                                 }
2027                         }
2028                 }
2029         }
2030 }
2031
2032 void DPSOFTRAST_Draw_Span_TextureCubeVaryingBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char * RESTRICT out4ub, int texunitindex, int arrayindex, const float * RESTRICT zf)
2033 {
2034         // TODO: IMPLEMENT
2035         memset(out4ub, 255, span->length*4);
2036 }
2037
2038 float DPSOFTRAST_SampleShadowmap(const float *vector)
2039 {
2040         // TODO: IMPLEMENT
2041         return 1.0f;
2042 }
2043
2044 void DPSOFTRAST_Draw_Span_MultiplyVarying(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *in4f, int arrayindex, const float *zf)
2045 {
2046         int x;
2047         int startx = span->startx;
2048         int endx = span->endx;
2049         float c[4];
2050         float data[4];
2051         float slope[4];
2052         float z;
2053         data[0] = span->data[0][arrayindex][0];
2054         data[1] = span->data[0][arrayindex][1];
2055         data[2] = span->data[0][arrayindex][2];
2056         data[3] = span->data[0][arrayindex][3];
2057         slope[0] = span->data[1][arrayindex][0];
2058         slope[1] = span->data[1][arrayindex][1];
2059         slope[2] = span->data[1][arrayindex][2];
2060         slope[3] = span->data[1][arrayindex][3];
2061         for (x = startx;x < endx;x++)
2062         {
2063                 z = zf[x];
2064                 c[0] = (data[0] + slope[0]*x) * z;
2065                 c[1] = (data[1] + slope[1]*x) * z;
2066                 c[2] = (data[2] + slope[2]*x) * z;
2067                 c[3] = (data[3] + slope[3]*x) * z;
2068                 out4f[x*4+0] = in4f[x*4+0] * c[0];
2069                 out4f[x*4+1] = in4f[x*4+1] * c[1];
2070                 out4f[x*4+2] = in4f[x*4+2] * c[2];
2071                 out4f[x*4+3] = in4f[x*4+3] * c[3];
2072         }
2073 }
2074
2075 void DPSOFTRAST_Draw_Span_Varying(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, int arrayindex, const float *zf)
2076 {
2077         int x;
2078         int startx = span->startx;
2079         int endx = span->endx;
2080         float c[4];
2081         float data[4];
2082         float slope[4];
2083         float z;
2084         data[0] = span->data[0][arrayindex][0];
2085         data[1] = span->data[0][arrayindex][1];
2086         data[2] = span->data[0][arrayindex][2];
2087         data[3] = span->data[0][arrayindex][3];
2088         slope[0] = span->data[1][arrayindex][0];
2089         slope[1] = span->data[1][arrayindex][1];
2090         slope[2] = span->data[1][arrayindex][2];
2091         slope[3] = span->data[1][arrayindex][3];
2092         for (x = startx;x < endx;x++)
2093         {
2094                 z = zf[x];
2095                 c[0] = (data[0] + slope[0]*x) * z;
2096                 c[1] = (data[1] + slope[1]*x) * z;
2097                 c[2] = (data[2] + slope[2]*x) * z;
2098                 c[3] = (data[3] + slope[3]*x) * z;
2099                 out4f[x*4+0] = c[0];
2100                 out4f[x*4+1] = c[1];
2101                 out4f[x*4+2] = c[2];
2102                 out4f[x*4+3] = c[3];
2103         }
2104 }
2105
2106 void DPSOFTRAST_Draw_Span_AddBloom(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *ina4f, const float *inb4f, const float *subcolor)
2107 {
2108         int x, startx = span->startx, endx = span->endx;
2109         float c[4], localcolor[4];
2110         localcolor[0] = subcolor[0];
2111         localcolor[1] = subcolor[1];
2112         localcolor[2] = subcolor[2];
2113         localcolor[3] = subcolor[3];
2114         for (x = startx;x < endx;x++)
2115         {
2116                 c[0] = inb4f[x*4+0] - localcolor[0];if (c[0] < 0.0f) c[0] = 0.0f;
2117                 c[1] = inb4f[x*4+1] - localcolor[1];if (c[1] < 0.0f) c[1] = 0.0f;
2118                 c[2] = inb4f[x*4+2] - localcolor[2];if (c[2] < 0.0f) c[2] = 0.0f;
2119                 c[3] = inb4f[x*4+3] - localcolor[3];if (c[3] < 0.0f) c[3] = 0.0f;
2120                 out4f[x*4+0] = ina4f[x*4+0] + c[0];
2121                 out4f[x*4+1] = ina4f[x*4+1] + c[1];
2122                 out4f[x*4+2] = ina4f[x*4+2] + c[2];
2123                 out4f[x*4+3] = ina4f[x*4+3] + c[3];
2124         }
2125 }
2126
2127 void DPSOFTRAST_Draw_Span_MultiplyBuffers(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *ina4f, const float *inb4f)
2128 {
2129         int x, startx = span->startx, endx = span->endx;
2130         for (x = startx;x < endx;x++)
2131         {
2132                 out4f[x*4+0] = ina4f[x*4+0] * inb4f[x*4+0];
2133                 out4f[x*4+1] = ina4f[x*4+1] * inb4f[x*4+1];
2134                 out4f[x*4+2] = ina4f[x*4+2] * inb4f[x*4+2];
2135                 out4f[x*4+3] = ina4f[x*4+3] * inb4f[x*4+3];
2136         }
2137 }
2138
2139 void DPSOFTRAST_Draw_Span_AddBuffers(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *ina4f, const float *inb4f)
2140 {
2141         int x, startx = span->startx, endx = span->endx;
2142         for (x = startx;x < endx;x++)
2143         {
2144                 out4f[x*4+0] = ina4f[x*4+0] + inb4f[x*4+0];
2145                 out4f[x*4+1] = ina4f[x*4+1] + inb4f[x*4+1];
2146                 out4f[x*4+2] = ina4f[x*4+2] + inb4f[x*4+2];
2147                 out4f[x*4+3] = ina4f[x*4+3] + inb4f[x*4+3];
2148         }
2149 }
2150
2151 void DPSOFTRAST_Draw_Span_MixBuffers(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *ina4f, const float *inb4f)
2152 {
2153         int x, startx = span->startx, endx = span->endx;
2154         float a, b;
2155         for (x = startx;x < endx;x++)
2156         {
2157                 a = 1.0f - inb4f[x*4+3];
2158                 b = inb4f[x*4+3];
2159                 out4f[x*4+0] = ina4f[x*4+0] * a + inb4f[x*4+0] * b;
2160                 out4f[x*4+1] = ina4f[x*4+1] * a + inb4f[x*4+1] * b;
2161                 out4f[x*4+2] = ina4f[x*4+2] * a + inb4f[x*4+2] * b;
2162                 out4f[x*4+3] = ina4f[x*4+3] * a + inb4f[x*4+3] * b;
2163         }
2164 }
2165
2166 void DPSOFTRAST_Draw_Span_MixUniformColor(const DPSOFTRAST_State_Draw_Span * RESTRICT span, float *out4f, const float *in4f, const float *color)
2167 {
2168         int x, startx = span->startx, endx = span->endx;
2169         float localcolor[4], ilerp, lerp;
2170         localcolor[0] = color[0];
2171         localcolor[1] = color[1];
2172         localcolor[2] = color[2];
2173         localcolor[3] = color[3];
2174         ilerp = 1.0f - localcolor[3];
2175         lerp = localcolor[3];
2176         for (x = startx;x < endx;x++)
2177         {
2178                 out4f[x*4+0] = in4f[x*4+0] * ilerp + localcolor[0] * lerp;
2179                 out4f[x*4+1] = in4f[x*4+1] * ilerp + localcolor[1] * lerp;
2180                 out4f[x*4+2] = in4f[x*4+2] * ilerp + localcolor[2] * lerp;
2181                 out4f[x*4+3] = in4f[x*4+3] * ilerp + localcolor[3] * lerp;
2182         }
2183 }
2184
2185
2186
2187 void DPSOFTRAST_Draw_Span_MultiplyVaryingBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *in4ub, int arrayindex, const float *zf)
2188 {
2189         int x;
2190         int startx = span->startx;
2191         int endx = span->endx;
2192         float data[4];
2193         float slope[4];
2194         float z;
2195         data[2] = span->data[0][arrayindex][0];
2196         data[1] = span->data[0][arrayindex][1];
2197         data[0] = span->data[0][arrayindex][2];
2198         data[3] = span->data[0][arrayindex][3];
2199         slope[2] = span->data[1][arrayindex][0];
2200         slope[1] = span->data[1][arrayindex][1];
2201         slope[0] = span->data[1][arrayindex][2];
2202         slope[3] = span->data[1][arrayindex][3];
2203         for (x = startx;x < endx;x++)
2204         {
2205                 z = zf[x];
2206                 out4ub[x*4+0] = (int)(in4ub[x*4+0] * (data[0] + slope[0]*x) * z);
2207                 out4ub[x*4+1] = (int)(in4ub[x*4+1] * (data[1] + slope[1]*x) * z);
2208                 out4ub[x*4+2] = (int)(in4ub[x*4+2] * (data[2] + slope[2]*x) * z);
2209                 out4ub[x*4+3] = (int)(in4ub[x*4+3] * (data[3] + slope[3]*x) * z);
2210         }
2211 }
2212
2213 void DPSOFTRAST_Draw_Span_VaryingBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, int arrayindex, const float *zf)
2214 {
2215         int x;
2216         int startx = span->startx;
2217         int endx = span->endx;
2218         float data[4];
2219         float slope[4];
2220         float z;
2221         data[2] = span->data[0][arrayindex][0]*255.0f;
2222         data[1] = span->data[0][arrayindex][1]*255.0f;
2223         data[0] = span->data[0][arrayindex][2]*255.0f;
2224         data[3] = span->data[0][arrayindex][3]*255.0f;
2225         slope[2] = span->data[1][arrayindex][0]*255.0f;
2226         slope[1] = span->data[1][arrayindex][1]*255.0f;
2227         slope[0] = span->data[1][arrayindex][2]*255.0f;
2228         slope[3] = span->data[1][arrayindex][3]*255.0f;
2229         for (x = startx;x < endx;x++)
2230         {
2231                 z = zf[x];
2232                 out4ub[x*4+0] = (int)((data[0] + slope[0]*x) * z);
2233                 out4ub[x*4+1] = (int)((data[1] + slope[1]*x) * z);
2234                 out4ub[x*4+2] = (int)((data[2] + slope[2]*x) * z);
2235                 out4ub[x*4+3] = (int)((data[3] + slope[3]*x) * z);
2236         }
2237 }
2238
2239 void DPSOFTRAST_Draw_Span_AddBloomBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *ina4ub, const unsigned char *inb4ub, const float *subcolor)
2240 {
2241         int x, startx = span->startx, endx = span->endx;
2242         int c[4], localcolor[4];
2243         localcolor[2] = (int)(subcolor[0] * 255.0f);
2244         localcolor[1] = (int)(subcolor[1] * 255.0f);
2245         localcolor[0] = (int)(subcolor[2] * 255.0f);
2246         localcolor[3] = (int)(subcolor[3] * 255.0f);
2247         for (x = startx;x < endx;x++)
2248         {
2249                 c[0] = inb4ub[x*4+0] - localcolor[0];if (c[0] < 0) c[0] = 0;
2250                 c[1] = inb4ub[x*4+1] - localcolor[1];if (c[1] < 0) c[1] = 0;
2251                 c[2] = inb4ub[x*4+2] - localcolor[2];if (c[2] < 0) c[2] = 0;
2252                 c[3] = inb4ub[x*4+3] - localcolor[3];if (c[3] < 0) c[3] = 0;
2253                 c[0] += ina4ub[x*4+0];if (c[0] > 255) c[0] = 255;
2254                 c[1] += ina4ub[x*4+1];if (c[1] > 255) c[1] = 255;
2255                 c[2] += ina4ub[x*4+2];if (c[2] > 255) c[2] = 255;
2256                 c[3] += ina4ub[x*4+3];if (c[3] > 255) c[3] = 255;
2257                 out4ub[x*4+0] = c[0];
2258                 out4ub[x*4+1] = c[1];
2259                 out4ub[x*4+2] = c[2];
2260                 out4ub[x*4+3] = c[3];
2261         }
2262 }
2263
2264 void DPSOFTRAST_Draw_Span_MultiplyBuffersBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *ina4ub, const unsigned char *inb4ub)
2265 {
2266         int x, startx = span->startx, endx = span->endx;
2267         for (x = startx;x < endx;x++)
2268         {
2269                 out4ub[x*4+0] = (ina4ub[x*4+0] * inb4ub[x*4+0])>>8;
2270                 out4ub[x*4+1] = (ina4ub[x*4+1] * inb4ub[x*4+1])>>8;
2271                 out4ub[x*4+2] = (ina4ub[x*4+2] * inb4ub[x*4+2])>>8;
2272                 out4ub[x*4+3] = (ina4ub[x*4+3] * inb4ub[x*4+3])>>8;
2273         }
2274 }
2275
2276 void DPSOFTRAST_Draw_Span_AddBuffersBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *ina4ub, const unsigned char *inb4ub)
2277 {
2278         int x, startx = span->startx, endx = span->endx;
2279         int d[4];
2280         for (x = startx;x < endx;x++)
2281         {
2282                 d[0] = ina4ub[x*4+0] + inb4ub[x*4+0];if (d[0] > 255) d[0] = 255;
2283                 d[1] = ina4ub[x*4+1] + inb4ub[x*4+1];if (d[1] > 255) d[1] = 255;
2284                 d[2] = ina4ub[x*4+2] + inb4ub[x*4+2];if (d[2] > 255) d[2] = 255;
2285                 d[3] = ina4ub[x*4+3] + inb4ub[x*4+3];if (d[3] > 255) d[3] = 255;
2286                 out4ub[x*4+0] = d[0];
2287                 out4ub[x*4+1] = d[1];
2288                 out4ub[x*4+2] = d[2];
2289                 out4ub[x*4+3] = d[3];
2290         }
2291 }
2292
2293 void DPSOFTRAST_Draw_Span_TintedAddBuffersBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *ina4ub, const unsigned char *inb4ub, const float *inbtintbgra)
2294 {
2295         int x, startx = span->startx, endx = span->endx;
2296         int d[4];
2297         int b[4];
2298         b[0] = (int)(inbtintbgra[0] * 256.0f);
2299         b[1] = (int)(inbtintbgra[1] * 256.0f);
2300         b[2] = (int)(inbtintbgra[2] * 256.0f);
2301         b[3] = (int)(inbtintbgra[3] * 256.0f);
2302         for (x = startx;x < endx;x++)
2303         {
2304                 d[0] = ina4ub[x*4+0] + ((inb4ub[x*4+0]*b[0])>>8);if (d[0] > 255) d[0] = 255;
2305                 d[1] = ina4ub[x*4+1] + ((inb4ub[x*4+1]*b[1])>>8);if (d[1] > 255) d[1] = 255;
2306                 d[2] = ina4ub[x*4+2] + ((inb4ub[x*4+2]*b[2])>>8);if (d[2] > 255) d[2] = 255;
2307                 d[3] = ina4ub[x*4+3] + ((inb4ub[x*4+3]*b[3])>>8);if (d[3] > 255) d[3] = 255;
2308                 out4ub[x*4+0] = d[0];
2309                 out4ub[x*4+1] = d[1];
2310                 out4ub[x*4+2] = d[2];
2311                 out4ub[x*4+3] = d[3];
2312         }
2313 }
2314
2315 void DPSOFTRAST_Draw_Span_MixBuffersBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *ina4ub, const unsigned char *inb4ub)
2316 {
2317         int x, startx = span->startx, endx = span->endx;
2318         int a, b;
2319         for (x = startx;x < endx;x++)
2320         {
2321                 a = 256 - inb4ub[x*4+3];
2322                 b = inb4ub[x*4+3];
2323                 out4ub[x*4+0] = (ina4ub[x*4+0] * a + inb4ub[x*4+0] * b)>>8;
2324                 out4ub[x*4+1] = (ina4ub[x*4+1] * a + inb4ub[x*4+1] * b)>>8;
2325                 out4ub[x*4+2] = (ina4ub[x*4+2] * a + inb4ub[x*4+2] * b)>>8;
2326                 out4ub[x*4+3] = (ina4ub[x*4+3] * a + inb4ub[x*4+3] * b)>>8;
2327         }
2328 }
2329
2330 void DPSOFTRAST_Draw_Span_MixUniformColorBGRA8(const DPSOFTRAST_State_Draw_Span * RESTRICT span, unsigned char *out4ub, const unsigned char *in4ub, const float *color)
2331 {
2332         int x, startx = span->startx, endx = span->endx;
2333         int localcolor[4], ilerp, lerp;
2334         localcolor[2] = (int)(color[0]*255.0f);
2335         localcolor[1] = (int)(color[1]*255.0f);
2336         localcolor[0] = (int)(color[2]*255.0f);
2337         localcolor[3] = (int)(color[3]*255.0f);
2338         ilerp = 256 - localcolor[3];
2339         lerp = localcolor[3];
2340         for (x = startx;x < endx;x++)
2341         {
2342                 out4ub[x*4+0] = (in4ub[x*4+0] * ilerp + localcolor[0] * lerp)>>8;
2343                 out4ub[x*4+1] = (in4ub[x*4+1] * ilerp + localcolor[1] * lerp)>>8;
2344                 out4ub[x*4+2] = (in4ub[x*4+2] * ilerp + localcolor[2] * lerp)>>8;
2345                 out4ub[x*4+3] = (in4ub[x*4+3] * ilerp + localcolor[3] * lerp)>>8;
2346         }
2347 }
2348
2349
2350
2351 void DPSOFTRAST_VertexShader_Generic(void)
2352 {
2353         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2354         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_COLOR], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_COLOR], dpsoftrast.draw.numvertices);
2355         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices);
2356         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SPECULAR)
2357                 DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1], dpsoftrast.draw.numvertices);
2358 }
2359
2360 void DPSOFTRAST_PixelShader_Generic(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2361 {
2362         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2363         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2364         unsigned char buffer_texture_lightmapbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2365         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2366         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2367         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_DIFFUSE)
2368         {
2369                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_FIRST, 2, buffer_z);
2370                 DPSOFTRAST_Draw_Span_MultiplyVaryingBGRA8(span, buffer_FragColorbgra8, buffer_texture_colorbgra8, 1, buffer_z);
2371                 if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SPECULAR)
2372                 {
2373                         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_lightmapbgra8, GL20TU_SECOND, 2, buffer_z);
2374                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
2375                         {
2376                                 // multiply
2377                                 DPSOFTRAST_Draw_Span_MultiplyBuffersBGRA8(span, buffer_FragColorbgra8, buffer_FragColorbgra8, buffer_texture_lightmapbgra8);
2378                         }
2379                         else if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
2380                         {
2381                                 // add
2382                                 DPSOFTRAST_Draw_Span_AddBuffersBGRA8(span, buffer_FragColorbgra8, buffer_FragColorbgra8, buffer_texture_lightmapbgra8);
2383                         }
2384                         else if (dpsoftrast.shader_permutation & SHADERPERMUTATION_VERTEXTEXTUREBLEND)
2385                         {
2386                                 // alphablend
2387                                 DPSOFTRAST_Draw_Span_MixBuffersBGRA8(span, buffer_FragColorbgra8, buffer_FragColorbgra8, buffer_texture_lightmapbgra8);
2388                         }
2389                 }
2390         }
2391         else
2392                 DPSOFTRAST_Draw_Span_VaryingBGRA8(span, buffer_FragColorbgra8, 1, buffer_z);
2393         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2394 }
2395
2396
2397
2398 void DPSOFTRAST_VertexShader_PostProcess(void)
2399 {
2400         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2401         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices);
2402         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1], dpsoftrast.draw.numvertices);
2403 }
2404
2405 void DPSOFTRAST_PixelShader_PostProcess(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2406 {
2407         // TODO: optimize!!  at the very least there is no reason to use texture sampling on the frame texture
2408         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2409         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2410         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2411         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2412         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_FragColorbgra8, GL20TU_FIRST, 2, buffer_z);
2413         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_BLOOM)
2414         {
2415                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_SECOND, 3, buffer_z);
2416                 DPSOFTRAST_Draw_Span_AddBloomBGRA8(span, buffer_FragColorbgra8, buffer_FragColorbgra8, buffer_texture_colorbgra8, dpsoftrast.uniform4f + DPSOFTRAST_UNIFORM_BloomColorSubtract * 4);
2417         }
2418         DPSOFTRAST_Draw_Span_MixUniformColorBGRA8(span, buffer_FragColorbgra8, buffer_FragColorbgra8, dpsoftrast.uniform4f + DPSOFTRAST_UNIFORM_ViewTintColor * 4);
2419         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SATURATION)
2420         {
2421                 // TODO: implement saturation
2422         }
2423         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GAMMARAMPS)
2424         {
2425                 // TODO: implement gammaramps
2426         }
2427         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2428 }
2429
2430
2431
2432 void DPSOFTRAST_VertexShader_Depth_Or_Shadow(void)
2433 {
2434         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2435 }
2436
2437 void DPSOFTRAST_PixelShader_Depth_Or_Shadow(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2438 {
2439         // this is never called (because colormask is off when this shader is used)
2440         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2441         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2442         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2443         memset(buffer_FragColorbgra8, 0, span->length*4);
2444         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2445 }
2446
2447
2448
2449 void DPSOFTRAST_VertexShader_FlatColor(void)
2450 {
2451         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2452         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_TexMatrixM1);
2453 }
2454
2455 void DPSOFTRAST_PixelShader_FlatColor(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2456 {
2457         int x, startx = span->startx, endx = span->endx;
2458         int Color_Ambienti[4];
2459         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2460         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2461         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2462         Color_Ambienti[2] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+0]*256.0f);
2463         Color_Ambienti[1] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+1]*256.0f);
2464         Color_Ambienti[0] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+2]*256.0f);
2465         Color_Ambienti[3] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Alpha*4+0]        *256.0f);
2466         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2467         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_COLOR, 2, buffer_z);
2468         for (x = startx;x < endx;x++)
2469         {
2470                 buffer_FragColorbgra8[x*4+0] = (buffer_texture_colorbgra8[x*4+0] * Color_Ambienti[0])>>8;
2471                 buffer_FragColorbgra8[x*4+1] = (buffer_texture_colorbgra8[x*4+1] * Color_Ambienti[1])>>8;
2472                 buffer_FragColorbgra8[x*4+2] = (buffer_texture_colorbgra8[x*4+2] * Color_Ambienti[2])>>8;
2473                 buffer_FragColorbgra8[x*4+3] = (buffer_texture_colorbgra8[x*4+3] * Color_Ambienti[3])>>8;
2474         }
2475         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2476 }
2477
2478
2479
2480 void DPSOFTRAST_VertexShader_VertexColor(void)
2481 {
2482         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2483         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_COLOR], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_COLOR], dpsoftrast.draw.numvertices);
2484         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_TexMatrixM1);
2485 }
2486
2487 void DPSOFTRAST_PixelShader_VertexColor(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2488 {
2489         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2490         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2491         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2492         int x, startx = span->startx, endx = span->endx;
2493         float Color_Ambient[4], Color_Diffuse[4];
2494         float data[4];
2495         float slope[4];
2496         float z;
2497         int arrayindex = DPSOFTRAST_ARRAY_COLOR;
2498         data[2] = span->data[0][arrayindex][0];
2499         data[1] = span->data[0][arrayindex][1];
2500         data[0] = span->data[0][arrayindex][2];
2501         data[3] = span->data[0][arrayindex][3];
2502         slope[2] = span->data[1][arrayindex][0];
2503         slope[1] = span->data[1][arrayindex][1];
2504         slope[0] = span->data[1][arrayindex][2];
2505         slope[3] = span->data[1][arrayindex][3];
2506         Color_Ambient[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+0];
2507         Color_Ambient[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+1];
2508         Color_Ambient[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+2];
2509         Color_Ambient[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Alpha*4+0];
2510         Color_Diffuse[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+0];
2511         Color_Diffuse[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+1];
2512         Color_Diffuse[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+2];
2513         Color_Diffuse[3] = 0.0f;
2514         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2515         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_COLOR, 2, buffer_z);
2516         for (x = startx;x < endx;x++)
2517         {
2518                 z = buffer_z[x];
2519                 buffer_FragColorbgra8[x*4+0] = (int)(buffer_texture_colorbgra8[x*4+0] * (Color_Ambient[0] + ((data[0] + slope[0]*x) * z) * Color_Diffuse[0]));
2520                 buffer_FragColorbgra8[x*4+1] = (int)(buffer_texture_colorbgra8[x*4+1] * (Color_Ambient[1] + ((data[1] + slope[1]*x) * z) * Color_Diffuse[1]));
2521                 buffer_FragColorbgra8[x*4+2] = (int)(buffer_texture_colorbgra8[x*4+2] * (Color_Ambient[2] + ((data[2] + slope[2]*x) * z) * Color_Diffuse[2]));
2522                 buffer_FragColorbgra8[x*4+3] = (int)(buffer_texture_colorbgra8[x*4+3] * (Color_Ambient[3] + ((data[3] + slope[3]*x) * z) * Color_Diffuse[3]));
2523         }
2524         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2525 }
2526
2527
2528
2529 void DPSOFTRAST_VertexShader_Lightmap(void)
2530 {
2531         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2532         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_TexMatrixM1);
2533         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD4], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD4], dpsoftrast.draw.numvertices);
2534 }
2535
2536 void DPSOFTRAST_PixelShader_Lightmap(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2537 {
2538         int x, startx = span->startx, endx = span->endx;
2539         int Color_Ambienti[4], Color_Diffusei[4], Color_Glowi[4];
2540         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2541         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2542         unsigned char buffer_texture_lightmapbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2543         unsigned char buffer_texture_glowbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2544         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2545         unsigned int d[4];
2546         //unsigned char * RESTRICT pixelmask = span->pixelmask;
2547         //unsigned char * RESTRICT pixel = (unsigned char *)dpsoftrast.fb_colorpixels[0] + span->start * 4;
2548         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2549         Color_Ambienti[2] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+0] * 65536.0f);
2550         Color_Ambienti[1] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+1] * 65536.0f);
2551         Color_Ambienti[0] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+2] * 65536.0f);
2552         Color_Ambienti[3] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Alpha*4+0] * 65536.0f);
2553         Color_Diffusei[2] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+0] * 256.0f);
2554         Color_Diffusei[1] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+1] * 256.0f);
2555         Color_Diffusei[0] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+2] * 256.0f);
2556         Color_Diffusei[3] = 0;
2557         Color_Glowi[2] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+0] * 65536.0f);
2558         Color_Glowi[1] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+1] * 65536.0f);
2559         Color_Glowi[0] = (int)(dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+2] * 65536.0f);
2560         Color_Glowi[3] = 0;
2561         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_COLOR, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2562         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_lightmapbgra8, GL20TU_LIGHTMAP, DPSOFTRAST_ARRAY_TEXCOORD4, buffer_z);
2563         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GLOW)
2564         {
2565                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_glowbgra8, GL20TU_GLOW, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2566                 for (x = startx;x < endx;x++)
2567                 {
2568                         d[0] = (buffer_texture_glowbgra8[x*4+0] * Color_Glowi[0] + buffer_texture_colorbgra8[x*4+0] * (Color_Ambienti[0] + buffer_texture_lightmapbgra8[x*4+0] * Color_Diffusei[0])) >> 16;if (d[0] > 255) d[0] = 255;
2569                         d[1] = (buffer_texture_glowbgra8[x*4+1] * Color_Glowi[1] + buffer_texture_colorbgra8[x*4+1] * (Color_Ambienti[1] + buffer_texture_lightmapbgra8[x*4+1] * Color_Diffusei[1])) >> 16;if (d[1] > 255) d[1] = 255;
2570                         d[2] = (buffer_texture_glowbgra8[x*4+2] * Color_Glowi[2] + buffer_texture_colorbgra8[x*4+2] * (Color_Ambienti[2] + buffer_texture_lightmapbgra8[x*4+2] * Color_Diffusei[2])) >> 16;if (d[2] > 255) d[2] = 255;
2571                         d[3] = (buffer_texture_glowbgra8[x*4+3] * Color_Glowi[3] + buffer_texture_colorbgra8[x*4+3] * (Color_Ambienti[3] + buffer_texture_lightmapbgra8[x*4+3] * Color_Diffusei[3])) >> 16;if (d[3] > 255) d[3] = 255;
2572                         buffer_FragColorbgra8[x*4+0] = d[0];
2573                         buffer_FragColorbgra8[x*4+1] = d[1];
2574                         buffer_FragColorbgra8[x*4+2] = d[2];
2575                         buffer_FragColorbgra8[x*4+3] = d[3];
2576                 }
2577         }
2578         else
2579         {
2580                 for (x = startx;x < endx;x++)
2581                 {
2582                         d[0] = (buffer_texture_colorbgra8[x*4+0] * (Color_Ambienti[0] + buffer_texture_lightmapbgra8[x*4+0] * Color_Diffusei[0])) >> 16;if (d[0] > 255) d[0] = 255;
2583                         d[1] = (buffer_texture_colorbgra8[x*4+1] * (Color_Ambienti[1] + buffer_texture_lightmapbgra8[x*4+1] * Color_Diffusei[1])) >> 16;if (d[1] > 255) d[1] = 255;
2584                         d[2] = (buffer_texture_colorbgra8[x*4+2] * (Color_Ambienti[2] + buffer_texture_lightmapbgra8[x*4+2] * Color_Diffusei[2])) >> 16;if (d[2] > 255) d[2] = 255;
2585                         d[3] = (buffer_texture_colorbgra8[x*4+3] * (Color_Ambienti[3] + buffer_texture_lightmapbgra8[x*4+3] * Color_Diffusei[3])) >> 16;if (d[3] > 255) d[3] = 255;
2586                         buffer_FragColorbgra8[x*4+0] = d[0];
2587                         buffer_FragColorbgra8[x*4+1] = d[1];
2588                         buffer_FragColorbgra8[x*4+2] = d[2];
2589                         buffer_FragColorbgra8[x*4+3] = d[3];
2590                 }
2591         }
2592         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2593 }
2594
2595
2596
2597 void DPSOFTRAST_VertexShader_FakeLight(void)
2598 {
2599         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2600 }
2601
2602 void DPSOFTRAST_PixelShader_FakeLight(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2603 {
2604         // TODO: IMPLEMENT
2605         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2606         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2607         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2608         memset(buffer_FragColorbgra8, 0, span->length*4);
2609         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2610 }
2611
2612
2613
2614 void DPSOFTRAST_VertexShader_LightDirectionMap_ModelSpace(void)
2615 {
2616         DPSOFTRAST_VertexShader_Lightmap();
2617 }
2618
2619 void DPSOFTRAST_PixelShader_LightDirectionMap_ModelSpace(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2620 {
2621         DPSOFTRAST_PixelShader_Lightmap(span);
2622         // TODO: IMPLEMENT
2623 }
2624
2625
2626
2627 void DPSOFTRAST_VertexShader_LightDirectionMap_TangentSpace(void)
2628 {
2629         DPSOFTRAST_VertexShader_Lightmap();
2630 }
2631
2632 void DPSOFTRAST_PixelShader_LightDirectionMap_TangentSpace(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2633 {
2634         DPSOFTRAST_PixelShader_Lightmap(span);
2635         // TODO: IMPLEMENT
2636 }
2637
2638
2639
2640 void DPSOFTRAST_VertexShader_LightDirection(void)
2641 {
2642         int i;
2643         int numvertices = dpsoftrast.draw.numvertices;
2644         float LightDir[4];
2645         float LightVector[4];
2646         float EyePosition[4];
2647         float EyeVectorModelSpace[4];
2648         float EyeVector[4];
2649         float position[4];
2650         float svector[4];
2651         float tvector[4];
2652         float normal[4];
2653         LightDir[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightDir*4+0];
2654         LightDir[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightDir*4+1];
2655         LightDir[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightDir*4+2];
2656         LightDir[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightDir*4+3];
2657         EyePosition[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+0];
2658         EyePosition[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+1];
2659         EyePosition[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+2];
2660         EyePosition[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+3];
2661         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2662         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_TexMatrixM1);
2663         for (i = 0;i < numvertices;i++)
2664         {
2665                 position[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+0];
2666                 position[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+1];
2667                 position[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+2];
2668                 svector[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+0];
2669                 svector[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+1];
2670                 svector[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+2];
2671                 tvector[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+0];
2672                 tvector[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+1];
2673                 tvector[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+2];
2674                 normal[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+0];
2675                 normal[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+1];
2676                 normal[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+2];
2677                 LightVector[0] = svector[0] * LightDir[0] + svector[1] * LightDir[1] + svector[2] * LightDir[2];
2678                 LightVector[1] = tvector[0] * LightDir[0] + tvector[1] * LightDir[1] + tvector[2] * LightDir[2];
2679                 LightVector[2] = normal[0] * LightDir[0] + normal[1] * LightDir[1] + normal[2] * LightDir[2];
2680                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+0] = LightVector[0];
2681                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+1] = LightVector[1];
2682                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+2] = LightVector[2];
2683                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+3] = 0.0f;
2684                 EyeVectorModelSpace[0] = EyePosition[0] - position[0];
2685                 EyeVectorModelSpace[1] = EyePosition[1] - position[1];
2686                 EyeVectorModelSpace[2] = EyePosition[2] - position[2];
2687                 EyeVector[0] = svector[0] * EyeVectorModelSpace[0] + svector[1] * EyeVectorModelSpace[1] + svector[2] * EyeVectorModelSpace[2];
2688                 EyeVector[1] = tvector[0] * EyeVectorModelSpace[0] + tvector[1] * EyeVectorModelSpace[1] + tvector[2] * EyeVectorModelSpace[2];
2689                 EyeVector[2] = normal[0]  * EyeVectorModelSpace[0] + normal[1]  * EyeVectorModelSpace[1] + normal[2]  * EyeVectorModelSpace[2];
2690                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+0] = EyeVector[0];
2691                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+1] = EyeVector[1];
2692                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+2] = EyeVector[2];
2693                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+3] = 0.0f;
2694         }
2695 }
2696
2697 #define DPSOFTRAST_Min(a,b) ((a) < (b) ? (a) : (b))
2698 #define DPSOFTRAST_Max(a,b) ((a) > (b) ? (a) : (b))
2699 #define DPSOFTRAST_Vector3Dot(a,b) ((a)[0]*(b)[0]+(a)[1]*(b)[1]+(a)[2]*(b)[2])
2700 #define DPSOFTRAST_Vector3LengthSquared(v) (DPSOFTRAST_Vector3Dot((v),(v)))
2701 #define DPSOFTRAST_Vector3Length(v) (sqrt(DPSOFTRAST_Vector3LengthSquared(v)))
2702 #define DPSOFTRAST_Vector3Normalize(v)\
2703 do\
2704 {\
2705         float len = sqrt(DPSOFTRAST_Vector3Dot(v,v));\
2706         if (len)\
2707         {\
2708                 len = 1.0f / len;\
2709                 v[0] *= len;\
2710                 v[1] *= len;\
2711                 v[2] *= len;\
2712         }\
2713 }\
2714 while(0)
2715
2716 void DPSOFTRAST_PixelShader_LightDirection(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
2717 {
2718         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
2719         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2720         unsigned char buffer_texture_normalbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2721         unsigned char buffer_texture_glossbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2722         unsigned char buffer_texture_glowbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2723         unsigned char buffer_texture_pantsbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2724         unsigned char buffer_texture_shirtbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2725         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
2726         int x, startx = span->startx, endx = span->endx;
2727         float Color_Ambient[4], Color_Diffuse[4], Color_Specular[4], Color_Glow[4], Color_Pants[4], Color_Shirt[4], LightColor[4];
2728         float LightVectordata[4];
2729         float LightVectorslope[4];
2730         float EyeVectordata[4];
2731         float EyeVectorslope[4];
2732         float z;
2733         float diffusetex[4];
2734         float glosstex[4];
2735         float surfacenormal[4];
2736         float lightnormal[4];
2737         float eyenormal[4];
2738         float specularnormal[4];
2739         float diffuse;
2740         float specular;
2741         float SpecularPower;
2742         int d[4];
2743         Color_Glow[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+0];
2744         Color_Glow[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+1];
2745         Color_Glow[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+2];
2746         Color_Glow[3] = 0.0f;
2747         Color_Ambient[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+0];
2748         Color_Ambient[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+1];
2749         Color_Ambient[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+2];
2750         Color_Ambient[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Alpha*4+0];
2751         Color_Pants[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+0];
2752         Color_Pants[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+1];
2753         Color_Pants[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+2];
2754         Color_Pants[3] = 0.0f;
2755         Color_Shirt[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+0];
2756         Color_Shirt[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+1];
2757         Color_Shirt[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+2];
2758         Color_Shirt[3] = 0.0f;
2759         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
2760         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_COLOR, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2761         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
2762         {
2763                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_pantsbgra8, GL20TU_PANTS, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2764                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_shirtbgra8, GL20TU_SHIRT, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2765         }
2766         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GLOW)
2767         {
2768                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_glowbgra8, GL20TU_GLOW, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2769         }
2770         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SPECULAR)
2771         {
2772                 Color_Diffuse[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+0];
2773                 Color_Diffuse[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+1];
2774                 Color_Diffuse[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+2];
2775                 Color_Diffuse[3] = 0.0f;
2776                 LightColor[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+0];
2777                 LightColor[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+1];
2778                 LightColor[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+2];
2779                 LightColor[3] = 0.0f;
2780                 LightVectordata[0]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][0];
2781                 LightVectordata[1]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][1];
2782                 LightVectordata[2]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][2];
2783                 LightVectordata[3]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][3];
2784                 LightVectorslope[0] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][0];
2785                 LightVectorslope[1] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][1];
2786                 LightVectorslope[2] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][2];
2787                 LightVectorslope[3] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][3];
2788                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_normalbgra8, GL20TU_NORMAL, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2789                 Color_Specular[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+0];
2790                 Color_Specular[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+1];
2791                 Color_Specular[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+2];
2792                 Color_Specular[3] = 0.0f;
2793                 SpecularPower = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_SpecularPower*4+0] * (1.0f / 255.0f);
2794                 EyeVectordata[0]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][0];
2795                 EyeVectordata[1]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][1];
2796                 EyeVectordata[2]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][2];
2797                 EyeVectordata[3]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][3];
2798                 EyeVectorslope[0]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][0];
2799                 EyeVectorslope[1]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][1];
2800                 EyeVectorslope[2]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][2];
2801                 EyeVectorslope[3]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][3];
2802                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_glossbgra8, GL20TU_GLOSS, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2803                 for (x = startx;x < endx;x++)
2804                 {
2805                         z = buffer_z[x];
2806                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
2807                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
2808                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
2809                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
2810                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
2811                         {
2812                                 diffusetex[0] += buffer_texture_pantsbgra8[x*4+0] * Color_Pants[0] + buffer_texture_shirtbgra8[x*4+0] * Color_Shirt[0];
2813                                 diffusetex[1] += buffer_texture_pantsbgra8[x*4+1] * Color_Pants[1] + buffer_texture_shirtbgra8[x*4+1] * Color_Shirt[1];
2814                                 diffusetex[2] += buffer_texture_pantsbgra8[x*4+2] * Color_Pants[2] + buffer_texture_shirtbgra8[x*4+2] * Color_Shirt[2];
2815                                 diffusetex[3] += buffer_texture_pantsbgra8[x*4+3] * Color_Pants[3] + buffer_texture_shirtbgra8[x*4+3] * Color_Shirt[3];
2816                         }
2817                         glosstex[0] = buffer_texture_glossbgra8[x*4+0];
2818                         glosstex[1] = buffer_texture_glossbgra8[x*4+1];
2819                         glosstex[2] = buffer_texture_glossbgra8[x*4+2];
2820                         glosstex[3] = buffer_texture_glossbgra8[x*4+3];
2821                         surfacenormal[0] = buffer_texture_normalbgra8[x*4+2] * (1.0f / 128.0f) - 1.0f;
2822                         surfacenormal[1] = buffer_texture_normalbgra8[x*4+1] * (1.0f / 128.0f) - 1.0f;
2823                         surfacenormal[2] = buffer_texture_normalbgra8[x*4+0] * (1.0f / 128.0f) - 1.0f;
2824                         DPSOFTRAST_Vector3Normalize(surfacenormal);
2825
2826                         lightnormal[0] = (LightVectordata[0] + LightVectorslope[0]*x) * z;
2827                         lightnormal[1] = (LightVectordata[1] + LightVectorslope[1]*x) * z;
2828                         lightnormal[2] = (LightVectordata[2] + LightVectorslope[2]*x) * z;
2829                         DPSOFTRAST_Vector3Normalize(lightnormal);
2830
2831                         eyenormal[0] = (EyeVectordata[0] + EyeVectorslope[0]*x) * z;
2832                         eyenormal[1] = (EyeVectordata[1] + EyeVectorslope[1]*x) * z;
2833                         eyenormal[2] = (EyeVectordata[2] + EyeVectorslope[2]*x) * z;
2834                         DPSOFTRAST_Vector3Normalize(eyenormal);
2835
2836                         specularnormal[0] = lightnormal[0] + eyenormal[0];
2837                         specularnormal[1] = lightnormal[1] + eyenormal[1];
2838                         specularnormal[2] = lightnormal[2] + eyenormal[2];
2839                         DPSOFTRAST_Vector3Normalize(specularnormal);
2840
2841                         diffuse = DPSOFTRAST_Vector3Dot(surfacenormal, lightnormal);if (diffuse < 0.0f) diffuse = 0.0f;
2842                         specular = DPSOFTRAST_Vector3Dot(surfacenormal, specularnormal);if (specular < 0.0f) specular = 0.0f;
2843                         specular = pow(specular, SpecularPower * glosstex[3]);
2844                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GLOW)
2845                         {
2846                                 d[0] = (int)(buffer_texture_glowbgra8[x*4+0] * Color_Glow[0] + diffusetex[0] * Color_Ambient[0] + (diffusetex[0] * Color_Diffuse[0] * diffuse + glosstex[0] * Color_Specular[0] * specular) * LightColor[0]);if (d[0] > 255) d[0] = 255;
2847                                 d[1] = (int)(buffer_texture_glowbgra8[x*4+1] * Color_Glow[1] + diffusetex[1] * Color_Ambient[1] + (diffusetex[1] * Color_Diffuse[1] * diffuse + glosstex[1] * Color_Specular[1] * specular) * LightColor[1]);if (d[1] > 255) d[1] = 255;
2848                                 d[2] = (int)(buffer_texture_glowbgra8[x*4+2] * Color_Glow[2] + diffusetex[2] * Color_Ambient[2] + (diffusetex[2] * Color_Diffuse[2] * diffuse + glosstex[2] * Color_Specular[2] * specular) * LightColor[2]);if (d[2] > 255) d[2] = 255;
2849                                 d[3] = (int)(                                                  diffusetex[3] * Color_Ambient[3]);if (d[3] > 255) d[3] = 255;
2850                         }
2851                         else
2852                         {
2853                                 d[0] = (int)(                                                  diffusetex[0] * Color_Ambient[0] + (diffusetex[0] * Color_Diffuse[0] * diffuse + glosstex[0] * Color_Specular[0] * specular) * LightColor[0]);if (d[0] > 255) d[0] = 255;
2854                                 d[1] = (int)(                                                  diffusetex[1] * Color_Ambient[1] + (diffusetex[1] * Color_Diffuse[1] * diffuse + glosstex[1] * Color_Specular[1] * specular) * LightColor[1]);if (d[1] > 255) d[1] = 255;
2855                                 d[2] = (int)(                                                  diffusetex[2] * Color_Ambient[2] + (diffusetex[2] * Color_Diffuse[2] * diffuse + glosstex[2] * Color_Specular[2] * specular) * LightColor[2]);if (d[2] > 255) d[2] = 255;
2856                                 d[3] = (int)(                                                  diffusetex[3] * Color_Ambient[3]);if (d[3] > 255) d[3] = 255;
2857                         }
2858                         buffer_FragColorbgra8[x*4+0] = d[0];
2859                         buffer_FragColorbgra8[x*4+1] = d[1];
2860                         buffer_FragColorbgra8[x*4+2] = d[2];
2861                         buffer_FragColorbgra8[x*4+3] = d[3];
2862                 }
2863         }
2864         else if (dpsoftrast.shader_permutation & SHADERPERMUTATION_DIFFUSE)
2865         {
2866                 Color_Diffuse[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+0];
2867                 Color_Diffuse[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+1];
2868                 Color_Diffuse[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+2];
2869                 Color_Diffuse[3] = 0.0f;
2870                 LightColor[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+0];
2871                 LightColor[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+1];
2872                 LightColor[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+2];
2873                 LightColor[3] = 0.0f;
2874                 LightVectordata[0]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][0];
2875                 LightVectordata[1]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][1];
2876                 LightVectordata[2]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][2];
2877                 LightVectordata[3]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][3];
2878                 LightVectorslope[0] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][0];
2879                 LightVectorslope[1] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][1];
2880                 LightVectorslope[2] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][2];
2881                 LightVectorslope[3] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][3];
2882                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_normalbgra8, GL20TU_NORMAL, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
2883                 for (x = startx;x < endx;x++)
2884                 {
2885                         z = buffer_z[x];
2886                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
2887                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
2888                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
2889                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
2890                         surfacenormal[0] = buffer_texture_normalbgra8[x*4+2] * (1.0f / 128.0f) - 1.0f;
2891                         surfacenormal[1] = buffer_texture_normalbgra8[x*4+1] * (1.0f / 128.0f) - 1.0f;
2892                         surfacenormal[2] = buffer_texture_normalbgra8[x*4+0] * (1.0f / 128.0f) - 1.0f;
2893                         DPSOFTRAST_Vector3Normalize(surfacenormal);
2894
2895                         lightnormal[0] = (LightVectordata[0] + LightVectorslope[0]*x) * z;
2896                         lightnormal[1] = (LightVectordata[1] + LightVectorslope[1]*x) * z;
2897                         lightnormal[2] = (LightVectordata[2] + LightVectorslope[2]*x) * z;
2898                         DPSOFTRAST_Vector3Normalize(lightnormal);
2899
2900                         diffuse = DPSOFTRAST_Vector3Dot(surfacenormal, lightnormal);if (diffuse < 0.0f) diffuse = 0.0f;
2901                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GLOW)
2902                         {
2903                                 d[0] = (int)(buffer_texture_glowbgra8[x*4+0] * Color_Glow[0] + diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse * LightColor[0]));if (d[0] > 255) d[0] = 255;
2904                                 d[1] = (int)(buffer_texture_glowbgra8[x*4+1] * Color_Glow[1] + diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse * LightColor[1]));if (d[1] > 255) d[1] = 255;
2905                                 d[2] = (int)(buffer_texture_glowbgra8[x*4+2] * Color_Glow[2] + diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse * LightColor[2]));if (d[2] > 255) d[2] = 255;
2906                                 d[3] = (int)(                                                  diffusetex[3] * (Color_Ambient[3]                                             ));if (d[3] > 255) d[3] = 255;
2907                         }
2908                         else
2909                         {
2910                                 d[0] = (int)(                                                + diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse * LightColor[0]));if (d[0] > 255) d[0] = 255;
2911                                 d[1] = (int)(                                                + diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse * LightColor[1]));if (d[1] > 255) d[1] = 255;
2912                                 d[2] = (int)(                                                + diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse * LightColor[2]));if (d[2] > 255) d[2] = 255;
2913                                 d[3] = (int)(                                                  diffusetex[3] * (Color_Ambient[3]                                             ));if (d[3] > 255) d[3] = 255;
2914                         }
2915                         buffer_FragColorbgra8[x*4+0] = d[0];
2916                         buffer_FragColorbgra8[x*4+1] = d[1];
2917                         buffer_FragColorbgra8[x*4+2] = d[2];
2918                         buffer_FragColorbgra8[x*4+3] = d[3];
2919                 }
2920         }
2921         else
2922         {
2923                 for (x = startx;x < endx;x++)
2924                 {
2925                         z = buffer_z[x];
2926                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
2927                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
2928                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
2929                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
2930
2931                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_GLOW)
2932                         {
2933                                 d[0] = (int)(buffer_texture_glowbgra8[x*4+0] * Color_Glow[0] + diffusetex[0] * Color_Ambient[0]);if (d[0] > 255) d[0] = 255;
2934                                 d[1] = (int)(buffer_texture_glowbgra8[x*4+1] * Color_Glow[1] + diffusetex[1] * Color_Ambient[1]);if (d[1] > 255) d[1] = 255;
2935                                 d[2] = (int)(buffer_texture_glowbgra8[x*4+2] * Color_Glow[2] + diffusetex[2] * Color_Ambient[2]);if (d[2] > 255) d[2] = 255;
2936                                 d[3] = (int)(                                                  diffusetex[3] * Color_Ambient[3]);if (d[3] > 255) d[3] = 255;
2937                         }
2938                         else
2939                         {
2940                                 d[0] = (int)(                                                  diffusetex[0] * Color_Ambient[0]);if (d[0] > 255) d[0] = 255;
2941                                 d[1] = (int)(                                                  diffusetex[1] * Color_Ambient[1]);if (d[1] > 255) d[1] = 255;
2942                                 d[2] = (int)(                                                  diffusetex[2] * Color_Ambient[2]);if (d[2] > 255) d[2] = 255;
2943                                 d[3] = (int)(                                                  diffusetex[3] * Color_Ambient[3]);if (d[3] > 255) d[3] = 255;
2944                         }
2945                         buffer_FragColorbgra8[x*4+0] = d[0];
2946                         buffer_FragColorbgra8[x*4+1] = d[1];
2947                         buffer_FragColorbgra8[x*4+2] = d[2];
2948                         buffer_FragColorbgra8[x*4+3] = d[3];
2949                 }
2950         }
2951         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
2952 }
2953
2954
2955
2956 void DPSOFTRAST_VertexShader_LightSource(void)
2957 {
2958         int i;
2959         int numvertices = dpsoftrast.draw.numvertices;
2960         float LightPosition[4];
2961         float LightVector[4];
2962         float LightVectorModelSpace[4];
2963         float EyePosition[4];
2964         float EyeVectorModelSpace[4];
2965         float EyeVector[4];
2966         float position[4];
2967         float svector[4];
2968         float tvector[4];
2969         float normal[4];
2970         LightPosition[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightPosition*4+0];
2971         LightPosition[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightPosition*4+1];
2972         LightPosition[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightPosition*4+2];
2973         LightPosition[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightPosition*4+3];
2974         EyePosition[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+0];
2975         EyePosition[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+1];
2976         EyePosition[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+2];
2977         EyePosition[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_EyePosition*4+3];
2978         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
2979         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD0], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_TexMatrixM1);
2980         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD3], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelToLightM1);
2981         DPSOFTRAST_Array_Copy(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD4], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD4], dpsoftrast.draw.numvertices);
2982         for (i = 0;i < numvertices;i++)
2983         {
2984                 position[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+0];
2985                 position[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+1];
2986                 position[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+2];
2987                 svector[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+0];
2988                 svector[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+1];
2989                 svector[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+2];
2990                 tvector[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+0];
2991                 tvector[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+1];
2992                 tvector[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+2];
2993                 normal[0] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+0];
2994                 normal[1] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+1];
2995                 normal[2] = dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_TEXCOORD3][i*4+2];
2996                 LightVectorModelSpace[0] = LightPosition[0] - position[0];
2997                 LightVectorModelSpace[1] = LightPosition[1] - position[1];
2998                 LightVectorModelSpace[2] = LightPosition[2] - position[2];
2999                 LightVector[0] = svector[0] * LightVectorModelSpace[0] + svector[1] * LightVectorModelSpace[1] + svector[2] * LightVectorModelSpace[2];
3000                 LightVector[1] = tvector[0] * LightVectorModelSpace[0] + tvector[1] * LightVectorModelSpace[1] + tvector[2] * LightVectorModelSpace[2];
3001                 LightVector[2] = normal[0]  * LightVectorModelSpace[0] + normal[1]  * LightVectorModelSpace[1] + normal[2]  * LightVectorModelSpace[2];
3002                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+0] = LightVector[0];
3003                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+1] = LightVector[1];
3004                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+2] = LightVector[2];
3005                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD1][i*4+3] = 0.0f;
3006                 EyeVectorModelSpace[0] = EyePosition[0] - position[0];
3007                 EyeVectorModelSpace[1] = EyePosition[1] - position[1];
3008                 EyeVectorModelSpace[2] = EyePosition[2] - position[2];
3009                 EyeVector[0] = svector[0] * EyeVectorModelSpace[0] + svector[1] * EyeVectorModelSpace[1] + svector[2] * EyeVectorModelSpace[2];
3010                 EyeVector[1] = tvector[0] * EyeVectorModelSpace[0] + tvector[1] * EyeVectorModelSpace[1] + tvector[2] * EyeVectorModelSpace[2];
3011                 EyeVector[2] = normal[0]  * EyeVectorModelSpace[0] + normal[1]  * EyeVectorModelSpace[1] + normal[2]  * EyeVectorModelSpace[2];
3012                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+0] = EyeVector[0];
3013                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+1] = EyeVector[1];
3014                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+2] = EyeVector[2];
3015                 dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_TEXCOORD2][i*4+3] = 0.0f;
3016         }
3017 }
3018
3019 void DPSOFTRAST_PixelShader_LightSource(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3020 {
3021         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3022         unsigned char buffer_texture_colorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3023         unsigned char buffer_texture_normalbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3024         unsigned char buffer_texture_glossbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3025         unsigned char buffer_texture_cubebgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3026         unsigned char buffer_texture_pantsbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3027         unsigned char buffer_texture_shirtbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3028         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3029         int x, startx = span->startx, endx = span->endx;
3030         float Color_Ambient[4], Color_Diffuse[4], Color_Specular[4], Color_Glow[4], Color_Pants[4], Color_Shirt[4], LightColor[4];
3031         float CubeVectordata[4];
3032         float CubeVectorslope[4];
3033         float LightVectordata[4];
3034         float LightVectorslope[4];
3035         float EyeVectordata[4];
3036         float EyeVectorslope[4];
3037         float z;
3038         float diffusetex[4];
3039         float glosstex[4];
3040         float surfacenormal[4];
3041         float lightnormal[4];
3042         float eyenormal[4];
3043         float specularnormal[4];
3044         float diffuse;
3045         float specular;
3046         float SpecularPower;
3047         float CubeVector[4];
3048         float attenuation;
3049         int d[4];
3050         Color_Glow[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+0];
3051         Color_Glow[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+1];
3052         Color_Glow[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Glow*4+2];
3053         Color_Glow[3] = 0.0f;
3054         Color_Ambient[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+0];
3055         Color_Ambient[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+1];
3056         Color_Ambient[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Ambient*4+2];
3057         Color_Ambient[3] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Alpha*4+0];
3058         Color_Diffuse[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+0];
3059         Color_Diffuse[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+1];
3060         Color_Diffuse[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Diffuse*4+2];
3061         Color_Diffuse[3] = 0.0f;
3062         Color_Specular[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+0];
3063         Color_Specular[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+1];
3064         Color_Specular[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Specular*4+2];
3065         Color_Specular[3] = 0.0f;
3066         Color_Pants[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+0];
3067         Color_Pants[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+1];
3068         Color_Pants[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Pants*4+2];
3069         Color_Pants[3] = 0.0f;
3070         Color_Shirt[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+0];
3071         Color_Shirt[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+1];
3072         Color_Shirt[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_Color_Shirt*4+2];
3073         Color_Shirt[3] = 0.0f;
3074         LightColor[2] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+0];
3075         LightColor[1] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+1];
3076         LightColor[0] = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_LightColor*4+2];
3077         LightColor[3] = 0.0f;
3078         SpecularPower = dpsoftrast.uniform4f[DPSOFTRAST_UNIFORM_SpecularPower*4+0] * (1.0f / 255.0f);
3079         EyeVectordata[0]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][0];
3080         EyeVectordata[1]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][1];
3081         EyeVectordata[2]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][2];
3082         EyeVectordata[3]    = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD2][3];
3083         EyeVectorslope[0]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][0];
3084         EyeVectorslope[1]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][1];
3085         EyeVectorslope[2]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][2];
3086         EyeVectorslope[3]   = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD2][3];
3087         LightVectordata[0]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][0];
3088         LightVectordata[1]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][1];
3089         LightVectordata[2]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][2];
3090         LightVectordata[3]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD1][3];
3091         LightVectorslope[0] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][0];
3092         LightVectorslope[1] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][1];
3093         LightVectorslope[2] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][2];
3094         LightVectorslope[3] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD1][3];
3095         CubeVectordata[0]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD3][0];
3096         CubeVectordata[1]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD3][1];
3097         CubeVectordata[2]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD3][2];
3098         CubeVectordata[3]  = span->data[0][DPSOFTRAST_ARRAY_TEXCOORD3][3];
3099         CubeVectorslope[0] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD3][0];
3100         CubeVectorslope[1] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD3][1];
3101         CubeVectorslope[2] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD3][2];
3102         CubeVectorslope[3] = span->data[1][DPSOFTRAST_ARRAY_TEXCOORD3][3];
3103         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3104         memset(buffer_FragColorbgra8 + startx*4, 0, (endx-startx)*4); // clear first, because we skip writing black pixels, and there are a LOT of them...
3105         DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_colorbgra8, GL20TU_COLOR, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3106         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
3107         {
3108                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_pantsbgra8, GL20TU_PANTS, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3109                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_shirtbgra8, GL20TU_SHIRT, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3110         }
3111         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_CUBEFILTER)
3112                 DPSOFTRAST_Draw_Span_TextureCubeVaryingBGRA8(span, buffer_texture_cubebgra8, GL20TU_CUBE, DPSOFTRAST_ARRAY_TEXCOORD3, buffer_z);
3113         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SPECULAR)
3114         {
3115                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_normalbgra8, GL20TU_NORMAL, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3116                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_glossbgra8, GL20TU_GLOSS, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3117                 for (x = startx;x < endx;x++)
3118                 {
3119                         z = buffer_z[x];
3120                         CubeVector[0] = (CubeVectordata[0] + CubeVectorslope[0]*x) * z;
3121                         CubeVector[1] = (CubeVectordata[1] + CubeVectorslope[1]*x) * z;
3122                         CubeVector[2] = (CubeVectordata[2] + CubeVectorslope[2]*x) * z;
3123                         attenuation = 1.0f - DPSOFTRAST_Vector3LengthSquared(CubeVector);
3124                         if (attenuation < 0.01f)
3125                                 continue;
3126                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SHADOWMAP2D)
3127                         {
3128                                 attenuation *= DPSOFTRAST_SampleShadowmap(CubeVector);
3129                                 if (attenuation < 0.01f)
3130                                         continue;
3131                         }
3132
3133                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
3134                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
3135                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
3136                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
3137                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
3138                         {
3139                                 diffusetex[0] += buffer_texture_pantsbgra8[x*4+0] * Color_Pants[0] + buffer_texture_shirtbgra8[x*4+0] * Color_Shirt[0];
3140                                 diffusetex[1] += buffer_texture_pantsbgra8[x*4+1] * Color_Pants[1] + buffer_texture_shirtbgra8[x*4+1] * Color_Shirt[1];
3141                                 diffusetex[2] += buffer_texture_pantsbgra8[x*4+2] * Color_Pants[2] + buffer_texture_shirtbgra8[x*4+2] * Color_Shirt[2];
3142                                 diffusetex[3] += buffer_texture_pantsbgra8[x*4+3] * Color_Pants[3] + buffer_texture_shirtbgra8[x*4+3] * Color_Shirt[3];
3143                         }
3144                         glosstex[0] = buffer_texture_glossbgra8[x*4+0];
3145                         glosstex[1] = buffer_texture_glossbgra8[x*4+1];
3146                         glosstex[2] = buffer_texture_glossbgra8[x*4+2];
3147                         glosstex[3] = buffer_texture_glossbgra8[x*4+3];
3148                         surfacenormal[0] = buffer_texture_normalbgra8[x*4+2] * (1.0f / 128.0f) - 1.0f;
3149                         surfacenormal[1] = buffer_texture_normalbgra8[x*4+1] * (1.0f / 128.0f) - 1.0f;
3150                         surfacenormal[2] = buffer_texture_normalbgra8[x*4+0] * (1.0f / 128.0f) - 1.0f;
3151                         DPSOFTRAST_Vector3Normalize(surfacenormal);
3152
3153                         lightnormal[0] = (LightVectordata[0] + LightVectorslope[0]*x) * z;
3154                         lightnormal[1] = (LightVectordata[1] + LightVectorslope[1]*x) * z;
3155                         lightnormal[2] = (LightVectordata[2] + LightVectorslope[2]*x) * z;
3156                         DPSOFTRAST_Vector3Normalize(lightnormal);
3157
3158                         eyenormal[0] = (EyeVectordata[0] + EyeVectorslope[0]*x) * z;
3159                         eyenormal[1] = (EyeVectordata[1] + EyeVectorslope[1]*x) * z;
3160                         eyenormal[2] = (EyeVectordata[2] + EyeVectorslope[2]*x) * z;
3161                         DPSOFTRAST_Vector3Normalize(eyenormal);
3162
3163                         specularnormal[0] = lightnormal[0] + eyenormal[0];
3164                         specularnormal[1] = lightnormal[1] + eyenormal[1];
3165                         specularnormal[2] = lightnormal[2] + eyenormal[2];
3166                         DPSOFTRAST_Vector3Normalize(specularnormal);
3167
3168                         diffuse = DPSOFTRAST_Vector3Dot(surfacenormal, lightnormal);if (diffuse < 0.0f) diffuse = 0.0f;
3169                         specular = DPSOFTRAST_Vector3Dot(surfacenormal, specularnormal);if (specular < 0.0f) specular = 0.0f;
3170                         specular = pow(specular, SpecularPower * glosstex[3]);
3171                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_CUBEFILTER)
3172                         {
3173                                 // scale down the attenuation to account for the cubefilter multiplying everything by 255
3174                                 attenuation *= (1.0f / 255.0f);
3175                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse) + glosstex[0] * Color_Specular[0] * specular) * LightColor[0] * buffer_texture_cubebgra8[x*4+0] * attenuation);if (d[0] > 255) d[0] = 255;
3176                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse) + glosstex[1] * Color_Specular[1] * specular) * LightColor[1] * buffer_texture_cubebgra8[x*4+1] * attenuation);if (d[1] > 255) d[1] = 255;
3177                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse) + glosstex[2] * Color_Specular[2] * specular) * LightColor[2] * buffer_texture_cubebgra8[x*4+2] * attenuation);if (d[2] > 255) d[2] = 255;
3178                                 d[3] = (int)( diffusetex[3]                                                                                                                                                                );if (d[3] > 255) d[3] = 255;
3179                         }
3180                         else
3181                         {
3182                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse) + glosstex[0] * Color_Specular[0] * specular) * LightColor[0]                                   * attenuation);if (d[0] > 255) d[0] = 255;
3183                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse) + glosstex[1] * Color_Specular[1] * specular) * LightColor[1]                                   * attenuation);if (d[1] > 255) d[1] = 255;
3184                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse) + glosstex[2] * Color_Specular[2] * specular) * LightColor[2]                                   * attenuation);if (d[2] > 255) d[2] = 255;
3185                                 d[3] = (int)( diffusetex[3]                                                                                                                                                                );if (d[3] > 255) d[3] = 255;
3186                         }
3187                         buffer_FragColorbgra8[x*4+0] = d[0];
3188                         buffer_FragColorbgra8[x*4+1] = d[1];
3189                         buffer_FragColorbgra8[x*4+2] = d[2];
3190                         buffer_FragColorbgra8[x*4+3] = d[3];
3191                 }
3192         }
3193         else if (dpsoftrast.shader_permutation & SHADERPERMUTATION_DIFFUSE)
3194         {
3195                 DPSOFTRAST_Draw_Span_Texture2DVaryingBGRA8(span, buffer_texture_normalbgra8, GL20TU_NORMAL, DPSOFTRAST_ARRAY_TEXCOORD0, buffer_z);
3196                 for (x = startx;x < endx;x++)
3197                 {
3198                         z = buffer_z[x];
3199                         CubeVector[0] = (CubeVectordata[0] + CubeVectorslope[0]*x) * z;
3200                         CubeVector[1] = (CubeVectordata[1] + CubeVectorslope[1]*x) * z;
3201                         CubeVector[2] = (CubeVectordata[2] + CubeVectorslope[2]*x) * z;
3202                         attenuation = 1.0f - DPSOFTRAST_Vector3LengthSquared(CubeVector);
3203                         if (attenuation < 0.01f)
3204                                 continue;
3205                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SHADOWMAP2D)
3206                         {
3207                                 attenuation *= DPSOFTRAST_SampleShadowmap(CubeVector);
3208                                 if (attenuation < 0.01f)
3209                                         continue;
3210                         }
3211
3212                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
3213                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
3214                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
3215                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
3216                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
3217                         {
3218                                 diffusetex[0] += buffer_texture_pantsbgra8[x*4+0] * Color_Pants[0] + buffer_texture_shirtbgra8[x*4+0] * Color_Shirt[0];
3219                                 diffusetex[1] += buffer_texture_pantsbgra8[x*4+1] * Color_Pants[1] + buffer_texture_shirtbgra8[x*4+1] * Color_Shirt[1];
3220                                 diffusetex[2] += buffer_texture_pantsbgra8[x*4+2] * Color_Pants[2] + buffer_texture_shirtbgra8[x*4+2] * Color_Shirt[2];
3221                                 diffusetex[3] += buffer_texture_pantsbgra8[x*4+3] * Color_Pants[3] + buffer_texture_shirtbgra8[x*4+3] * Color_Shirt[3];
3222                         }
3223                         surfacenormal[0] = buffer_texture_normalbgra8[x*4+2] * (1.0f / 128.0f) - 1.0f;
3224                         surfacenormal[1] = buffer_texture_normalbgra8[x*4+1] * (1.0f / 128.0f) - 1.0f;
3225                         surfacenormal[2] = buffer_texture_normalbgra8[x*4+0] * (1.0f / 128.0f) - 1.0f;
3226                         DPSOFTRAST_Vector3Normalize(surfacenormal);
3227
3228                         lightnormal[0] = (LightVectordata[0] + LightVectorslope[0]*x) * z;
3229                         lightnormal[1] = (LightVectordata[1] + LightVectorslope[1]*x) * z;
3230                         lightnormal[2] = (LightVectordata[2] + LightVectorslope[2]*x) * z;
3231                         DPSOFTRAST_Vector3Normalize(lightnormal);
3232
3233                         diffuse = DPSOFTRAST_Vector3Dot(surfacenormal, lightnormal);if (diffuse < 0.0f) diffuse = 0.0f;
3234                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_CUBEFILTER)
3235                         {
3236                                 // scale down the attenuation to account for the cubefilter multiplying everything by 255
3237                                 attenuation *= (1.0f / 255.0f);
3238                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse)) * LightColor[0] * buffer_texture_cubebgra8[x*4+0] * attenuation);if (d[0] > 255) d[0] = 255;
3239                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse)) * LightColor[1] * buffer_texture_cubebgra8[x*4+1] * attenuation);if (d[1] > 255) d[1] = 255;
3240                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse)) * LightColor[2] * buffer_texture_cubebgra8[x*4+2] * attenuation);if (d[2] > 255) d[2] = 255;
3241                                 d[3] = (int)( diffusetex[3]                                                                                                                   );if (d[3] > 255) d[3] = 255;
3242                         }
3243                         else
3244                         {
3245                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0] + Color_Diffuse[0] * diffuse)) * LightColor[0]                                   * attenuation);if (d[0] > 255) d[0] = 255;
3246                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1] + Color_Diffuse[1] * diffuse)) * LightColor[1]                                   * attenuation);if (d[1] > 255) d[1] = 255;
3247                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2] + Color_Diffuse[2] * diffuse)) * LightColor[2]                                   * attenuation);if (d[2] > 255) d[2] = 255;
3248                                 d[3] = (int)( diffusetex[3]                                                                                                                                                                );if (d[3] > 255) d[3] = 255;
3249                         }
3250                         buffer_FragColorbgra8[x*4+0] = d[0];
3251                         buffer_FragColorbgra8[x*4+1] = d[1];
3252                         buffer_FragColorbgra8[x*4+2] = d[2];
3253                         buffer_FragColorbgra8[x*4+3] = d[3];
3254                 }
3255         }
3256         else
3257         {
3258                 for (x = startx;x < endx;x++)
3259                 {
3260                         z = buffer_z[x];
3261                         CubeVector[0] = (CubeVectordata[0] + CubeVectorslope[0]*x) * z;
3262                         CubeVector[1] = (CubeVectordata[1] + CubeVectorslope[1]*x) * z;
3263                         CubeVector[2] = (CubeVectordata[2] + CubeVectorslope[2]*x) * z;
3264                         attenuation = 1.0f - DPSOFTRAST_Vector3LengthSquared(CubeVector);
3265                         if (attenuation < 0.01f)
3266                                 continue;
3267                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_SHADOWMAP2D)
3268                         {
3269                                 attenuation *= DPSOFTRAST_SampleShadowmap(CubeVector);
3270                                 if (attenuation < 0.01f)
3271                                         continue;
3272                         }
3273
3274                         diffusetex[0] = buffer_texture_colorbgra8[x*4+0];
3275                         diffusetex[1] = buffer_texture_colorbgra8[x*4+1];
3276                         diffusetex[2] = buffer_texture_colorbgra8[x*4+2];
3277                         diffusetex[3] = buffer_texture_colorbgra8[x*4+3];
3278                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_COLORMAPPING)
3279                         {
3280                                 diffusetex[0] += buffer_texture_pantsbgra8[x*4+0] * Color_Pants[0] + buffer_texture_shirtbgra8[x*4+0] * Color_Shirt[0];
3281                                 diffusetex[1] += buffer_texture_pantsbgra8[x*4+1] * Color_Pants[1] + buffer_texture_shirtbgra8[x*4+1] * Color_Shirt[1];
3282                                 diffusetex[2] += buffer_texture_pantsbgra8[x*4+2] * Color_Pants[2] + buffer_texture_shirtbgra8[x*4+2] * Color_Shirt[2];
3283                                 diffusetex[3] += buffer_texture_pantsbgra8[x*4+3] * Color_Pants[3] + buffer_texture_shirtbgra8[x*4+3] * Color_Shirt[3];
3284                         }
3285                         if (dpsoftrast.shader_permutation & SHADERPERMUTATION_CUBEFILTER)
3286                         {
3287                                 // scale down the attenuation to account for the cubefilter multiplying everything by 255
3288                                 attenuation *= (1.0f / 255.0f);
3289                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0])) * LightColor[0] * buffer_texture_cubebgra8[x*4+0] * attenuation);if (d[0] > 255) d[0] = 255;
3290                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1])) * LightColor[1] * buffer_texture_cubebgra8[x*4+1] * attenuation);if (d[1] > 255) d[1] = 255;
3291                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2])) * LightColor[2] * buffer_texture_cubebgra8[x*4+2] * attenuation);if (d[2] > 255) d[2] = 255;
3292                                 d[3] = (int)( diffusetex[3]                                                                                      );if (d[3] > 255) d[3] = 255;
3293                         }
3294                         else
3295                         {
3296                                 d[0] = (int)((diffusetex[0] * (Color_Ambient[0])) * LightColor[0]                                   * attenuation);if (d[0] > 255) d[0] = 255;
3297                                 d[1] = (int)((diffusetex[1] * (Color_Ambient[1])) * LightColor[1]                                   * attenuation);if (d[1] > 255) d[1] = 255;
3298                                 d[2] = (int)((diffusetex[2] * (Color_Ambient[2])) * LightColor[2]                                   * attenuation);if (d[2] > 255) d[2] = 255;
3299                                 d[3] = (int)( diffusetex[3]                                                                                                                                                                );if (d[3] > 255) d[3] = 255;
3300                         }
3301                         buffer_FragColorbgra8[x*4+0] = d[0];
3302                         buffer_FragColorbgra8[x*4+1] = d[1];
3303                         buffer_FragColorbgra8[x*4+2] = d[2];
3304                         buffer_FragColorbgra8[x*4+3] = d[3];
3305                 }
3306         }
3307         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3308 }
3309
3310
3311
3312 void DPSOFTRAST_VertexShader_Refraction(void)
3313 {
3314         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
3315 }
3316
3317 void DPSOFTRAST_PixelShader_Refraction(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3318 {
3319         // TODO: IMPLEMENT
3320         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3321         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3322         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3323         memset(buffer_FragColorbgra8, 0, span->length*4);
3324         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3325 }
3326
3327
3328
3329 void DPSOFTRAST_VertexShader_Water(void)
3330 {
3331         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
3332 }
3333
3334
3335 void DPSOFTRAST_PixelShader_Water(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3336 {
3337         // TODO: IMPLEMENT
3338         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3339         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3340         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3341         memset(buffer_FragColorbgra8, 0, span->length*4);
3342         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3343 }
3344
3345
3346
3347 void DPSOFTRAST_VertexShader_ShowDepth(void)
3348 {
3349         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
3350 }
3351
3352 void DPSOFTRAST_PixelShader_ShowDepth(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3353 {
3354         // TODO: IMPLEMENT
3355         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3356         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3357         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3358         memset(buffer_FragColorbgra8, 0, span->length*4);
3359         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3360 }
3361
3362
3363
3364 void DPSOFTRAST_VertexShader_DeferredGeometry(void)
3365 {
3366         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
3367 }
3368
3369 void DPSOFTRAST_PixelShader_DeferredGeometry(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3370 {
3371         // TODO: IMPLEMENT
3372         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3373         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3374         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3375         memset(buffer_FragColorbgra8, 0, span->length*4);
3376         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3377 }
3378
3379
3380
3381 void DPSOFTRAST_VertexShader_DeferredLightSource(void)
3382 {
3383         DPSOFTRAST_Array_Transform(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.in_array4f[DPSOFTRAST_ARRAY_POSITION], dpsoftrast.draw.numvertices, dpsoftrast.uniform4f + 4*DPSOFTRAST_UNIFORM_ModelViewProjectionMatrixM1);
3384 }
3385
3386 void DPSOFTRAST_PixelShader_DeferredLightSource(const DPSOFTRAST_State_Draw_Span * RESTRICT span)
3387 {
3388         // TODO: IMPLEMENT
3389         float buffer_z[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3390         unsigned char buffer_FragColorbgra8[DPSOFTRAST_DRAW_MAXSPANLENGTH*4];
3391         DPSOFTRAST_Draw_Span_Begin(span, buffer_z);
3392         memset(buffer_FragColorbgra8, 0, span->length*4);
3393         DPSOFTRAST_Draw_Span_FinishBGRA8(span, buffer_FragColorbgra8);
3394 }
3395
3396
3397
3398 typedef struct DPSOFTRAST_ShaderModeInfo_s
3399 {
3400         int lodarrayindex;
3401         void (*Vertex)(void);
3402         void (*Span)(const DPSOFTRAST_State_Draw_Span * RESTRICT span);
3403 }
3404 DPSOFTRAST_ShaderModeInfo;
3405
3406 DPSOFTRAST_ShaderModeInfo DPSOFTRAST_ShaderModeTable[SHADERMODE_COUNT] =
3407 {
3408         {2, DPSOFTRAST_VertexShader_Generic,                        DPSOFTRAST_PixelShader_Generic,                      },
3409         {2, DPSOFTRAST_VertexShader_PostProcess,                    DPSOFTRAST_PixelShader_PostProcess,                  },
3410         {2, DPSOFTRAST_VertexShader_Depth_Or_Shadow,                DPSOFTRAST_PixelShader_Depth_Or_Shadow,              },
3411         {2, DPSOFTRAST_VertexShader_FlatColor,                      DPSOFTRAST_PixelShader_FlatColor,                    },
3412         {2, DPSOFTRAST_VertexShader_VertexColor,                    DPSOFTRAST_PixelShader_VertexColor,                  },
3413         {2, DPSOFTRAST_VertexShader_Lightmap,                       DPSOFTRAST_PixelShader_Lightmap,                     },
3414         {2, DPSOFTRAST_VertexShader_FakeLight,                      DPSOFTRAST_PixelShader_FakeLight,                    },
3415         {2, DPSOFTRAST_VertexShader_LightDirectionMap_ModelSpace,   DPSOFTRAST_PixelShader_LightDirectionMap_ModelSpace, },
3416         {2, DPSOFTRAST_VertexShader_LightDirectionMap_TangentSpace, DPSOFTRAST_PixelShader_LightDirectionMap_TangentSpace},
3417         {2, DPSOFTRAST_VertexShader_LightDirection,                 DPSOFTRAST_PixelShader_LightDirection,               },
3418         {2, DPSOFTRAST_VertexShader_LightSource,                    DPSOFTRAST_PixelShader_LightSource,                  },
3419         {2, DPSOFTRAST_VertexShader_Refraction,                     DPSOFTRAST_PixelShader_Refraction,                   },
3420         {2, DPSOFTRAST_VertexShader_Water,                          DPSOFTRAST_PixelShader_Water,                        },
3421         {2, DPSOFTRAST_VertexShader_ShowDepth,                      DPSOFTRAST_PixelShader_ShowDepth,                    },
3422         {2, DPSOFTRAST_VertexShader_DeferredGeometry,               DPSOFTRAST_PixelShader_DeferredGeometry,             },
3423         {2, DPSOFTRAST_VertexShader_DeferredLightSource,            DPSOFTRAST_PixelShader_DeferredLightSource,          }
3424 };
3425
3426
3427
3428 void DPSOFTRAST_Draw_ProcessSpans(void)
3429 {
3430         int i;
3431         int x;
3432         int startx;
3433         int endx;
3434         int numspans = dpsoftrast.draw.numspans;
3435 //      unsigned int c;
3436 //      unsigned int *colorpixel;
3437         unsigned int *depthpixel;
3438         float w;
3439         float wslope;
3440         int depth;
3441         int depthslope;
3442         unsigned int d;
3443         DPSOFTRAST_State_Draw_Span *span = dpsoftrast.draw.spanqueue;
3444         unsigned char pixelmask[DPSOFTRAST_DRAW_MAXSPANLENGTH];
3445         for (i = 0;i < numspans;i++, span++)
3446         {
3447                 w = span->data[0][DPSOFTRAST_ARRAY_TOTAL][3];
3448                 wslope = span->data[1][DPSOFTRAST_ARRAY_TOTAL][3];
3449                 if (dpsoftrast.user.depthtest && dpsoftrast.fb_depthpixels)
3450                 {
3451                         depth = (int)(w*DPSOFTRAST_DEPTHSCALE);
3452                         depthslope = (int)(wslope*DPSOFTRAST_DEPTHSCALE);
3453                         depthpixel = dpsoftrast.fb_depthpixels + span->start;
3454                         switch(dpsoftrast.fb_depthfunc)
3455                         {
3456                         default:
3457                         case GL_ALWAYS:  for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = true; break;
3458                         case GL_LESS:    for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = depthpixel[x] < d; break;
3459                         case GL_LEQUAL:  for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = depthpixel[x] <= d; break;
3460                         case GL_EQUAL:   for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = depthpixel[x] == d; break;
3461                         case GL_GEQUAL:  for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = depthpixel[x] >= d; break;
3462                         case GL_GREATER: for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = depthpixel[x] > d; break;
3463                         case GL_NEVER:   for (x = 0, d = depth;x < span->length;x++, d += depthslope) pixelmask[x] = false; break;
3464                         }
3465                         //colorpixel = dpsoftrast.fb_colorpixels[0] + span->start;
3466                         //for (x = 0;x < span->length;x++)
3467                         //      colorpixel[x] = (depthpixel[x] & 0xFF000000) ? (0x00FF0000) : (depthpixel[x] & 0x00FF0000);
3468                         // if there is no color buffer, skip pixel shader
3469                         startx = 0;
3470                         endx = span->length;
3471                         while (startx < endx && !pixelmask[startx])
3472                                 startx++;
3473                         while (endx > startx && !pixelmask[endx-1])
3474                                 endx--;
3475                         if (startx >= endx)
3476                                 continue; // no pixels to fill
3477                         span->pixelmask = pixelmask;
3478                         span->startx = startx;
3479                         span->endx = endx;
3480                         // run pixel shader if appropriate
3481                         // do this before running depthmask code, to allow the pixelshader
3482                         // to clear pixelmask values for alpha testing
3483                         if (dpsoftrast.fb_colorpixels[0] && dpsoftrast.fb_colormask)
3484                                 DPSOFTRAST_ShaderModeTable[dpsoftrast.shader_mode].Span(span);
3485                         if (dpsoftrast.user.depthmask)
3486                                 for (x = 0, d = depth;x < span->length;x++, d += depthslope)
3487                                         if (pixelmask[x])
3488                                                 depthpixel[x] = d;
3489                 }
3490                 else
3491                 {
3492                         // no depth testing means we're just dealing with color...
3493                         // if there is no color buffer, skip pixel shader
3494                         if (dpsoftrast.fb_colorpixels[0] && dpsoftrast.fb_colormask)
3495                         {
3496                                 memset(pixelmask, 1, span->length);
3497                                 span->pixelmask = pixelmask;
3498                                 span->startx = 0;
3499                                 span->endx = span->length;
3500                                 DPSOFTRAST_ShaderModeTable[dpsoftrast.shader_mode].Span(span);
3501                         }
3502                 }
3503         }
3504 }
3505
3506 void DPSOFTRAST_Draw_ProcessTriangles(int firstvertex, int numtriangles, const int *element3i, const unsigned short *element3s, unsigned char *arraymask)
3507 {
3508         int cullface = dpsoftrast.user.cullface;
3509         int width = dpsoftrast.fb_width;
3510         int height = dpsoftrast.fb_height;
3511         int i;
3512         int j;
3513         int k;
3514         int y;
3515         int e[3];
3516         int screenx[4];
3517         int screeny[4];
3518         int screenyless[4];
3519         int numpoints;
3520         int clipflags;
3521         int edge0p;
3522         int edge0n;
3523         int edge1p;
3524         int edge1n;
3525         int extent[6];
3526         int startx;
3527         int endx;
3528         float mip_edge0tc[2];
3529         float mip_edge1tc[2];
3530         float mip_edge0xy[2];
3531         float mip_edge1xy[2];
3532         float mip_edge0xymul;
3533         float mip_edge1xymul;
3534         float mip_edge0mip;
3535         float mip_edge1mip;
3536         float mipdensity;
3537         unsigned char mip[DPSOFTRAST_MAXTEXTUREUNITS];
3538         float startxf;
3539         float endxf;
3540         float edge0ylerp;
3541         float edge0yilerp;
3542         float edge1ylerp;
3543         float edge1yilerp;
3544         float edge0xf;
3545         float edge1xf;
3546         float spanilength;
3547         float startxlerp;
3548         float yc;
3549         float w;
3550         float frac;
3551         float ifrac;
3552         float trianglearea2;
3553         float triangleedge[2][4];
3554         float trianglenormal[4];
3555         float clipdist[4];
3556         float clipped[DPSOFTRAST_ARRAY_TOTAL][4][4];
3557         float screen[4][4];
3558         float proj[DPSOFTRAST_ARRAY_TOTAL][4][4];
3559         DPSOFTRAST_Texture *texture;
3560         DPSOFTRAST_State_Draw_Span *span;
3561         DPSOFTRAST_State_Draw_Span *oldspan;
3562         for (i = 0;i < numtriangles;i++)
3563         {
3564                 // generate the 3 edges of this triangle
3565                 // generate spans for the triangle - switch based on left split or right split classification of triangle
3566                 if (element3i)
3567                 {
3568                         e[0] = element3i[i*3+0] - firstvertex;
3569                         e[1] = element3i[i*3+1] - firstvertex;
3570                         e[2] = element3i[i*3+2] - firstvertex;
3571                 }
3572                 else if (element3s)
3573                 {
3574                         e[0] = element3s[i*3+0] - firstvertex;
3575                         e[1] = element3s[i*3+1] - firstvertex;
3576                         e[2] = element3s[i*3+2] - firstvertex;
3577                 }
3578                 else
3579                 {
3580                         e[0] = i*3+0;
3581                         e[1] = i*3+1;
3582                         e[2] = i*3+2;
3583                 }
3584                 triangleedge[0][0] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[0]*4+0] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+0];
3585                 triangleedge[0][1] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[0]*4+1] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+1];
3586                 triangleedge[0][2] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[0]*4+2] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+2];
3587                 triangleedge[1][0] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[2]*4+0] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+0];
3588                 triangleedge[1][1] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[2]*4+1] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+1];
3589                 triangleedge[1][2] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[2]*4+2] - dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+2];
3590                 trianglenormal[0] = triangleedge[0][1] * triangleedge[1][2] - triangleedge[0][2] * triangleedge[1][1];
3591                 trianglenormal[1] = triangleedge[0][2] * triangleedge[1][0] - triangleedge[0][0] * triangleedge[1][2];
3592                 trianglenormal[2] = triangleedge[0][0] * triangleedge[1][1] - triangleedge[0][1] * triangleedge[1][0];
3593                 trianglearea2 = trianglenormal[0] * trianglenormal[0] + trianglenormal[1] * trianglenormal[1] + trianglenormal[2] * trianglenormal[2];
3594                 // skip degenerate triangles, nothing good can come from them...
3595                 if (trianglearea2 == 0.0f)
3596                         continue;
3597                 // apply current cullface mode (this culls many triangles)
3598                 switch(cullface)
3599                 {
3600                 case GL_BACK:
3601                         if (trianglenormal[2] < 0)
3602                                 continue;
3603                         break;
3604                 case GL_FRONT:
3605                         if (trianglenormal[2] > 0)
3606                                 continue;
3607                         break;
3608                 }
3609                 // calculate distance from nearplane
3610                 clipdist[0] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[0]*4+2] + 1.0f;
3611                 clipdist[1] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[1]*4+2] + 1.0f;
3612                 clipdist[2] = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][e[2]*4+2] + 1.0f;
3613                 clipflags = 0;
3614                 if (clipdist[0] < 0.0f)
3615                         clipflags |= 1;
3616                 if (clipdist[1] < 0.0f)
3617                         clipflags |= 2;
3618                 if (clipdist[2] < 0.0f)
3619                         clipflags |= 4;
3620                 // clip triangle if necessary
3621                 switch(clipflags)
3622                 {
3623                 case 0: /*000*/
3624                         // triangle is entirely in front of nearplane
3625
3626                         // macros for clipping vertices
3627 #define CLIPPEDVERTEXLERP(k,p1,p2) \
3628                         frac = clipdist[p1] / (clipdist[p1] - clipdist[p2]);\
3629                         ifrac = 1.0f - frac;\
3630                         for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)\
3631                         {\
3632                                 /*if (arraymask[j])*/\
3633                                 {\
3634                                         clipped[j][k][0] = dpsoftrast.draw.post_array4f[j][e[p1]*4+0]*ifrac+dpsoftrast.draw.post_array4f[j][e[p2]*4+0]*frac;\
3635                                         clipped[j][k][1] = dpsoftrast.draw.post_array4f[j][e[p1]*4+1]*ifrac+dpsoftrast.draw.post_array4f[j][e[p2]*4+1]*frac;\
3636                                         clipped[j][k][2] = dpsoftrast.draw.post_array4f[j][e[p1]*4+2]*ifrac+dpsoftrast.draw.post_array4f[j][e[p2]*4+2]*frac;\
3637                                         clipped[j][k][3] = dpsoftrast.draw.post_array4f[j][e[p1]*4+3]*ifrac+dpsoftrast.draw.post_array4f[j][e[p2]*4+3]*frac;\
3638                                 }\
3639                         }\
3640                         DPSOFTRAST_Draw_ProjectVertices(screen[k], clipped[DPSOFTRAST_ARRAY_POSITION][k], 1)
3641 #define CLIPPEDVERTEXCOPY(k,p1) \
3642                         for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)\
3643                         {\
3644                                 /*if (arraymask[j])*/\
3645                                 {\
3646                                         clipped[j][k][0] = dpsoftrast.draw.post_array4f[j][e[p1]*4+0];\
3647                                         clipped[j][k][1] = dpsoftrast.draw.post_array4f[j][e[p1]*4+1];\
3648                                         clipped[j][k][2] = dpsoftrast.draw.post_array4f[j][e[p1]*4+2];\
3649                                         clipped[j][k][3] = dpsoftrast.draw.post_array4f[j][e[p1]*4+3];\
3650                                 }\
3651                         }\
3652                         screen[k][0] = dpsoftrast.draw.screencoord4f[e[p1]*4+0];\
3653                         screen[k][1] = dpsoftrast.draw.screencoord4f[e[p1]*4+1];\
3654                         screen[k][2] = dpsoftrast.draw.screencoord4f[e[p1]*4+2];\
3655                         screen[k][3] = dpsoftrast.draw.screencoord4f[e[p1]*4+3];
3656
3657                         CLIPPEDVERTEXCOPY(0,0);
3658                         CLIPPEDVERTEXCOPY(1,1);
3659                         CLIPPEDVERTEXCOPY(2,2);
3660                         numpoints = 3;
3661                         break;
3662                 case 1: /*100*/
3663                         CLIPPEDVERTEXLERP(0,0,1);
3664                         CLIPPEDVERTEXCOPY(1,1);
3665                         CLIPPEDVERTEXCOPY(2,2);
3666                         CLIPPEDVERTEXLERP(3,2,0);
3667                         numpoints = 4;
3668                         break;
3669                 case 2: /*010*/
3670                         CLIPPEDVERTEXCOPY(0,0);
3671                         CLIPPEDVERTEXLERP(1,0,1);
3672                         CLIPPEDVERTEXLERP(2,1,2);
3673                         CLIPPEDVERTEXCOPY(3,2);
3674                         numpoints = 4;
3675                         break;
3676                 case 3: /*110*/
3677                         CLIPPEDVERTEXLERP(0,1,2);
3678                         CLIPPEDVERTEXCOPY(1,2);
3679                         CLIPPEDVERTEXLERP(2,2,0);
3680                         numpoints = 3;
3681                         break;
3682                 case 4: /*001*/
3683                         CLIPPEDVERTEXCOPY(0,0);
3684                         CLIPPEDVERTEXCOPY(1,1);
3685                         CLIPPEDVERTEXLERP(2,1,2);
3686                         CLIPPEDVERTEXLERP(3,2,0);
3687                         numpoints = 4;
3688                         break;
3689                 case 5: /*101*/
3690                         CLIPPEDVERTEXLERP(0,0,1);
3691                         CLIPPEDVERTEXCOPY(1,1);
3692                         CLIPPEDVERTEXLERP(2,1,2);
3693                         numpoints = 3;
3694                         break;
3695                 case 6: /*011*/
3696                         CLIPPEDVERTEXCOPY(0,0);
3697                         CLIPPEDVERTEXLERP(1,0,1);
3698                         CLIPPEDVERTEXLERP(2,2,0);
3699                         numpoints = 3;
3700                         break;
3701                 case 7: /*111*/
3702                         // triangle is entirely behind nearplane
3703                         continue;
3704                 }
3705                 // calculate integer y coords for triangle points
3706                 screenx[0] = (int)(screen[0][0]);
3707                 screeny[0] = (int)(screen[0][1]);
3708                 screenx[1] = (int)(screen[1][0]);
3709                 screeny[1] = (int)(screen[1][1]);
3710                 screenx[2] = (int)(screen[2][0]);
3711                 screeny[2] = (int)(screen[2][1]);
3712                 screenx[3] = (int)(screen[3][0]);
3713                 screeny[3] = (int)(screen[3][1]);
3714                 // figure out the extents (bounding box) of the triangle
3715                 extent[0] = screenx[0];
3716                 extent[1] = screeny[0];
3717                 extent[2] = screenx[0];
3718                 extent[3] = screeny[0];
3719                 for (j = 1;j < numpoints;j++)
3720                 {
3721                         if (extent[0] > screenx[j]) extent[0] = screenx[j];
3722                         if (extent[1] > screeny[j]) extent[1] = screeny[j];
3723                         if (extent[2] < screenx[j]) extent[2] = screenx[j];
3724                         if (extent[3] < screeny[j]) extent[3] = screeny[j];
3725                 }
3726                 //extent[0]--;
3727                 //extent[1]--;
3728                 extent[2]++;
3729                 extent[3]++;
3730                 if (extent[0] < 0)
3731                         extent[0] = 0;
3732                 if (extent[1] < 0)
3733                         extent[1] = 0;
3734                 if (extent[2] > width)
3735                         extent[2] = width;
3736                 if (extent[3] > height)
3737                         extent[3] = height;
3738                 // skip offscreen triangles
3739                 if (extent[2] <= extent[0] || extent[3] <= extent[1])
3740                         continue;
3741                 // okay, this triangle is going to produce spans, we'd better project
3742                 // the interpolants now (this is what gives perspective texturing),
3743                 // this consists of simply multiplying all arrays by the W coord
3744                 // (which is basically 1/Z), which will be undone per-pixel
3745                 // (multiplying by Z again) to get the perspective-correct array
3746                 // values
3747                 for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
3748                 {
3749                         //if (arraymask[j])
3750                         {
3751                                 for (k = 0;k < numpoints;k++)
3752                                 {
3753                                         w = screen[k][3];
3754                                         proj[j][k][0] = clipped[j][k][0] * w;
3755                                         proj[j][k][1] = clipped[j][k][1] * w;
3756                                         proj[j][k][2] = clipped[j][k][2] * w;
3757                                         proj[j][k][3] = clipped[j][k][3] * w;
3758                                 }
3759                         }
3760                 }
3761                 // adjust texture LOD by texture density, in the simplest way possible...
3762                 mip_edge0xy[0] = screen[0][0] - screen[1][0];
3763                 mip_edge0xy[1] = screen[0][1] - screen[1][1];
3764                 mip_edge1xy[0] = screen[2][0] - screen[1][0];
3765                 mip_edge1xy[1] = screen[2][1] - screen[1][1];
3766                 mip_edge0xymul = 1.0f / (mip_edge0xy[0]*mip_edge0xy[0]+mip_edge0xy[1]*mip_edge0xy[1]);
3767                 mip_edge1xymul = 1.0f / (mip_edge1xy[0]*mip_edge1xy[0]+mip_edge1xy[1]*mip_edge1xy[1]);
3768                 for (j = 0;j < DPSOFTRAST_MAXTEXTUREUNITS;j++)
3769                 {
3770                         texture = dpsoftrast.texbound[j];
3771                         if (texture)
3772                         {
3773                                 if (texture->filter <= DPSOFTRAST_TEXTURE_FILTER_LINEAR)
3774                                 {
3775                                         mip[j] = 0;
3776                                         continue;
3777                                 }
3778                                 k = DPSOFTRAST_ShaderModeTable[dpsoftrast.shader_mode].lodarrayindex;
3779                                 mip_edge0tc[0] = (clipped[k][0][0] - clipped[k][1][0]) * texture->mipmap[0][2];
3780                                 mip_edge0tc[1] = (clipped[k][0][1] - clipped[k][1][1]) * texture->mipmap[0][3];
3781                                 mip_edge1tc[0] = (clipped[k][2][0] - clipped[k][1][0]) * texture->mipmap[0][2];
3782                                 mip_edge1tc[1] = (clipped[k][2][1] - clipped[k][1][1]) * texture->mipmap[0][3];
3783                                 mip_edge0mip = (mip_edge0tc[0]*mip_edge0tc[0]+mip_edge0tc[1]*mip_edge0tc[1]) * mip_edge0xymul;
3784                                 mip_edge1mip = (mip_edge1tc[0]*mip_edge1tc[0]+mip_edge1tc[1]*mip_edge1tc[1]) * mip_edge1xymul;
3785                                 // this will be multiplied in the texturing routine by the texture resolution
3786                                 mipdensity = mip_edge0mip < mip_edge1mip ? mip_edge0mip : mip_edge1mip;
3787                                 y = (int)(log(mipdensity)/log(2.0f));
3788                                 if (y < 0)
3789                                         y = 0;
3790                                 if (y > texture->mipmaps - 1)
3791                                         y = texture->mipmaps - 1;
3792                                 mip[j] = y;
3793                         }
3794                 }
3795                 // iterate potential spans
3796                 // TODO: optimize?  if we figured out the edge order beforehand, this
3797                 //       could do loops over the edges in the proper order rather than
3798                 //       selecting them for each span
3799                 // TODO: optimize?  the edges could have data slopes calculated
3800                 // TODO: optimize?  the data slopes could be calculated as a plane
3801                 //       (2D slopes) to avoid any interpolation along edges at all
3802                 for (y = extent[1];y < extent[3];y++)
3803                 {
3804                         // get center of pixel y
3805                         yc = y;
3806                         // do the compares all at once
3807                         screenyless[0] = y <= screeny[0];
3808                         screenyless[1] = y <= screeny[1];
3809                         screenyless[2] = y <= screeny[2];
3810                         screenyless[3] = y <= screeny[3];
3811                         if (numpoints == 4)
3812                         {
3813                                 switch(screenyless[0] + screenyless[1] * 2 + screenyless[2] * 4 + screenyless[3] * 8)
3814                                 {
3815                                 case  0: /*0000*/ continue;
3816                                 case  1: /*1000*/ edge0p = 3;edge0n = 0;edge1p = 0;edge1n = 1;break;
3817                                 case  2: /*0100*/ edge0p = 0;edge0n = 1;edge1p = 1;edge1n = 2;break;
3818                                 case  3: /*1100*/ edge0p = 3;edge0n = 0;edge1p = 1;edge1n = 2;break;
3819                                 case  4: /*0010*/ edge0p = 1;edge0n = 2;edge1p = 2;edge1n = 3;break;
3820                                 case  5: /*1010*/ edge0p = 1;edge0n = 2;edge1p = 2;edge1n = 3;break; // concave - nonsense
3821                                 case  6: /*0110*/ edge0p = 0;edge0n = 1;edge1p = 2;edge1n = 3;break;
3822                                 case  7: /*1110*/ edge0p = 3;edge0n = 0;edge1p = 2;edge1n = 3;break;
3823                                 case  8: /*0001*/ edge0p = 2;edge0n = 3;edge1p = 3;edge1n = 0;break;
3824                                 case  9: /*1001*/ edge0p = 2;edge0n = 3;edge1p = 0;edge1n = 1;break;
3825                                 case 10: /*0101*/ edge0p = 2;edge0n = 3;edge1p = 1;edge1n = 2;break; // concave - nonsense
3826                                 case 11: /*1101*/ edge0p = 2;edge0n = 3;edge1p = 1;edge1n = 2;break;
3827                                 case 12: /*0011*/ edge0p = 1;edge0n = 2;edge1p = 3;edge1n = 0;break;
3828                                 case 13: /*1011*/ edge0p = 1;edge0n = 2;edge1p = 0;edge1n = 1;break;
3829                                 case 14: /*0111*/ edge0p = 0;edge0n = 1;edge1p = 3;edge1n = 0;break;
3830                                 case 15: /*1111*/ continue;
3831                                 }
3832                         }
3833                         else
3834                         {
3835                                 switch(screenyless[0] + screenyless[1] * 2 + screenyless[2] * 4)
3836                                 {
3837                                 case 0: /*000*/ continue;
3838                                 case 1: /*100*/ edge0p = 2;edge0n = 0;edge1p = 0;edge1n = 1;break;
3839                                 case 2: /*010*/ edge0p = 0;edge0n = 1;edge1p = 1;edge1n = 2;break;
3840                                 case 3: /*110*/ edge0p = 2;edge0n = 0;edge1p = 1;edge1n = 2;break;
3841                                 case 4: /*001*/ edge0p = 1;edge0n = 2;edge1p = 2;edge1n = 0;break;
3842                                 case 5: /*101*/ edge0p = 1;edge0n = 2;edge1p = 0;edge1n = 1;break;
3843                                 case 6: /*011*/ edge0p = 0;edge0n = 1;edge1p = 2;edge1n = 0;break;
3844                                 case 7: /*111*/ continue;
3845                                 }
3846                         }
3847 #if 0
3848                 {
3849                         int foundedges = 0;
3850                         int cedge0p = 0;
3851                         int cedge0n = 0;
3852                         int cedge1p = 0;
3853                         int cedge1n = 0;
3854                         for (j = 0, k = numpoints-1;j < numpoints;k = j, j++)
3855                         {
3856                                 if (screenyless[k] && !screenyless[j])
3857                                 {
3858                                         cedge1p = k;
3859                                         cedge1n = j;
3860                                         foundedges |= 1;
3861                                 }
3862                                 else if (screenyless[j] && !screenyless[k])
3863                                 {
3864                                         cedge0p = k;
3865                                         cedge0n = j;
3866                                         foundedges |= 2;
3867                                 }
3868                         }
3869                         if (foundedges != 3)
3870                                 continue;
3871                         if (cedge0p != edge0p || cedge0n != edge0n || cedge1p != edge1p || cedge1n != edge1n)
3872                         {
3873                                 if (numpoints == 4)
3874                                         printf("case %i%i%i%i is broken %i %i %i %i != %i %i %i %i\n", screenyless[0], screenyless[1], screenyless[2], screenyless[3], cedge0p, cedge0n, cedge1p, cedge1n, edge0p, edge0n, edge1p, edge1n);
3875                                 else
3876                                         printf("case %i%i%i is broken %i %i %i %i != %i %i %i %i\n", screenyless[0], screenyless[1], screenyless[2], cedge0p, cedge0n, cedge1p, cedge1n, edge0p, edge0n, edge1p, edge1n);
3877                         }
3878                 }
3879 #endif
3880                         edge0ylerp = (yc - screen[edge0p][1]) / (screen[edge0n][1] - screen[edge0p][1]);
3881                         edge1ylerp = (yc - screen[edge1p][1]) / (screen[edge1n][1] - screen[edge1p][1]);
3882                         if (edge0ylerp < 0 || edge0ylerp > 1 || edge1ylerp < 0 || edge1ylerp > 1)
3883                                 continue;
3884                         edge0yilerp = 1.0f - edge0ylerp;
3885                         edge1yilerp = 1.0f - edge1ylerp;
3886                         edge0xf = screen[edge0p][0] * edge0yilerp + screen[edge0n][0] * edge0ylerp;
3887                         edge1xf = screen[edge1p][0] * edge1yilerp + screen[edge1n][0] * edge1ylerp;
3888                         if (edge0xf < edge1xf)
3889                         {
3890                                 startxf = edge0xf;
3891                                 endxf = edge1xf;
3892                         }
3893                         else
3894                         {
3895                                 startxf = edge1xf;
3896                                 endxf = edge0xf;
3897                         }
3898                         startx = (int)ceil(startxf);
3899                         endx = (int)ceil(endxf);
3900                         if (startx < 0)
3901                                 startx = 0;
3902                         if (endx > width)
3903                                 endx = width;
3904                         if (startx >= endx)
3905                                 continue;
3906                         if (startxf > startx || endxf < endx-1) { printf("%s:%i X wrong (%i to %i is outside %f to %f)\n", __FILE__, __LINE__, startx, endx, startxf, endxf); }
3907                         spanilength = 1.0f / (endxf - startxf);
3908                         startxlerp = startx - startxf;
3909                         span = &dpsoftrast.draw.spanqueue[dpsoftrast.draw.numspans++];
3910                         memcpy(span->mip, mip, sizeof(span->mip));
3911                         span->start = y * width + startx;
3912                         span->length = endx - startx;
3913                         j = DPSOFTRAST_ARRAY_TOTAL;
3914                         if (edge0xf < edge1xf)
3915                         {
3916                                 span->data[0][j][0] = screen[edge0p][0] * edge0yilerp + screen[edge0n][0] * edge0ylerp;
3917                                 span->data[0][j][1] = screen[edge0p][1] * edge0yilerp + screen[edge0n][1] * edge0ylerp;
3918                                 span->data[0][j][2] = screen[edge0p][2] * edge0yilerp + screen[edge0n][2] * edge0ylerp;
3919                                 span->data[0][j][3] = screen[edge0p][3] * edge0yilerp + screen[edge0n][3] * edge0ylerp;
3920                                 span->data[1][j][0] = screen[edge1p][0] * edge1yilerp + screen[edge1n][0] * edge1ylerp;
3921                                 span->data[1][j][1] = screen[edge1p][1] * edge1yilerp + screen[edge1n][1] * edge1ylerp;
3922                                 span->data[1][j][2] = screen[edge1p][2] * edge1yilerp + screen[edge1n][2] * edge1ylerp;
3923                                 span->data[1][j][3] = screen[edge1p][3] * edge1yilerp + screen[edge1n][3] * edge1ylerp;
3924                                 for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
3925                                 {
3926                                         //if (arraymask[j])
3927                                         {
3928                                                 span->data[0][j][0] = proj[j][edge0p][0] * edge0yilerp + proj[j][edge0n][0] * edge0ylerp;
3929                                                 span->data[0][j][1] = proj[j][edge0p][1] * edge0yilerp + proj[j][edge0n][1] * edge0ylerp;
3930                                                 span->data[0][j][2] = proj[j][edge0p][2] * edge0yilerp + proj[j][edge0n][2] * edge0ylerp;
3931                                                 span->data[0][j][3] = proj[j][edge0p][3] * edge0yilerp + proj[j][edge0n][3] * edge0ylerp;
3932                                                 span->data[1][j][0] = proj[j][edge1p][0] * edge1yilerp + proj[j][edge1n][0] * edge1ylerp;
3933                                                 span->data[1][j][1] = proj[j][edge1p][1] * edge1yilerp + proj[j][edge1n][1] * edge1ylerp;
3934                                                 span->data[1][j][2] = proj[j][edge1p][2] * edge1yilerp + proj[j][edge1n][2] * edge1ylerp;
3935                                                 span->data[1][j][3] = proj[j][edge1p][3] * edge1yilerp + proj[j][edge1n][3] * edge1ylerp;
3936                                         }
3937                                 }
3938                         }
3939                         else
3940                         {
3941                                 span->data[0][j][0] = screen[edge1p][0] * edge1yilerp + screen[edge1n][0] * edge1ylerp;
3942                                 span->data[0][j][1] = screen[edge1p][1] * edge1yilerp + screen[edge1n][1] * edge1ylerp;
3943                                 span->data[0][j][2] = screen[edge1p][2] * edge1yilerp + screen[edge1n][2] * edge1ylerp;
3944                                 span->data[0][j][3] = screen[edge1p][3] * edge1yilerp + screen[edge1n][3] * edge1ylerp;
3945                                 span->data[1][j][0] = screen[edge0p][0] * edge0yilerp + screen[edge0n][0] * edge0ylerp;
3946                                 span->data[1][j][1] = screen[edge0p][1] * edge0yilerp + screen[edge0n][1] * edge0ylerp;
3947                                 span->data[1][j][2] = screen[edge0p][2] * edge0yilerp + screen[edge0n][2] * edge0ylerp;
3948                                 span->data[1][j][3] = screen[edge0p][3] * edge0yilerp + screen[edge0n][3] * edge0ylerp;
3949                                 for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
3950                                 {
3951                                         //if (arraymask[j])
3952                                         {
3953                                                 span->data[0][j][0] = proj[j][edge1p][0] * edge1yilerp + proj[j][edge1n][0] * edge1ylerp;
3954                                                 span->data[0][j][1] = proj[j][edge1p][1] * edge1yilerp + proj[j][edge1n][1] * edge1ylerp;
3955                                                 span->data[0][j][2] = proj[j][edge1p][2] * edge1yilerp + proj[j][edge1n][2] * edge1ylerp;
3956                                                 span->data[0][j][3] = proj[j][edge1p][3] * edge1yilerp + proj[j][edge1n][3] * edge1ylerp;
3957                                                 span->data[1][j][0] = proj[j][edge0p][0] * edge0yilerp + proj[j][edge0n][0] * edge0ylerp;
3958                                                 span->data[1][j][1] = proj[j][edge0p][1] * edge0yilerp + proj[j][edge0n][1] * edge0ylerp;
3959                                                 span->data[1][j][2] = proj[j][edge0p][2] * edge0yilerp + proj[j][edge0n][2] * edge0ylerp;
3960                                                 span->data[1][j][3] = proj[j][edge0p][3] * edge0yilerp + proj[j][edge0n][3] * edge0ylerp;
3961                                         }
3962                                 }
3963                         }
3964                         // change data[1][n][] to be a data slope
3965                         j = DPSOFTRAST_ARRAY_TOTAL;
3966                         span->data[1][j][0] = (span->data[1][j][0] - span->data[0][j][0]) * spanilength;
3967                         span->data[1][j][1] = (span->data[1][j][1] - span->data[0][j][1]) * spanilength;
3968                         span->data[1][j][2] = (span->data[1][j][2] - span->data[0][j][2]) * spanilength;
3969                         span->data[1][j][3] = (span->data[1][j][3] - span->data[0][j][3]) * spanilength;
3970                         for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
3971                         {
3972                                 //if (arraymask[j])
3973                                 {
3974                                         span->data[1][j][0] = (span->data[1][j][0] - span->data[0][j][0]) * spanilength;
3975                                         span->data[1][j][1] = (span->data[1][j][1] - span->data[0][j][1]) * spanilength;
3976                                         span->data[1][j][2] = (span->data[1][j][2] - span->data[0][j][2]) * spanilength;
3977                                         span->data[1][j][3] = (span->data[1][j][3] - span->data[0][j][3]) * spanilength;
3978                                 }
3979                         }
3980                         // adjust the data[0][n][] to be correct for the pixel centers
3981                         // this also handles horizontal clipping where a major part of the
3982                         // span may be off the left side of the screen
3983                         j = DPSOFTRAST_ARRAY_TOTAL;
3984                         span->data[0][j][0] += span->data[1][j][0] * startxlerp;
3985                         span->data[0][j][1] += span->data[1][j][1] * startxlerp;
3986                         span->data[0][j][2] += span->data[1][j][2] * startxlerp;
3987                         span->data[0][j][3] += span->data[1][j][3] * startxlerp;
3988                         for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
3989                         {
3990                                 //if (arraymask[j])
3991                                 {
3992                                         span->data[0][j][0] += span->data[1][j][0] * startxlerp;
3993                                         span->data[0][j][1] += span->data[1][j][1] * startxlerp;
3994                                         span->data[0][j][2] += span->data[1][j][2] * startxlerp;
3995                                         span->data[0][j][3] += span->data[1][j][3] * startxlerp;
3996                                 }
3997                         }
3998                         // to keep the shader routines from needing more than a small
3999                         // buffer for pixel intermediate data, we split long spans...
4000                         while (span->length > DPSOFTRAST_DRAW_MAXSPANLENGTH)
4001                         {
4002                                 span->length = DPSOFTRAST_DRAW_MAXSPANLENGTH;
4003                                 if (dpsoftrast.draw.numspans >= DPSOFTRAST_DRAW_MAXSPANQUEUE)
4004                                 {
4005                                         DPSOFTRAST_Draw_ProcessSpans();
4006                                         dpsoftrast.draw.numspans = 0;
4007                                 }
4008                                 oldspan = span;
4009                                 span = &dpsoftrast.draw.spanqueue[dpsoftrast.draw.numspans++];
4010                                 *span = *oldspan;
4011                                 startx += DPSOFTRAST_DRAW_MAXSPANLENGTH;
4012                                 span->start = y * width + startx;
4013                                 span->length = endx - startx;
4014                                 j = DPSOFTRAST_ARRAY_TOTAL;
4015                                 span->data[0][j][0] += span->data[1][j][0] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4016                                 span->data[0][j][1] += span->data[1][j][1] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4017                                 span->data[0][j][2] += span->data[1][j][2] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4018                                 span->data[0][j][3] += span->data[1][j][3] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4019                                 for (j = 0;j < DPSOFTRAST_ARRAY_TOTAL;j++)
4020                                 {
4021                                         //if (arraymask[j])
4022                                         {
4023                                                 span->data[0][j][0] += span->data[1][j][0] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4024                                                 span->data[0][j][1] += span->data[1][j][1] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4025                                                 span->data[0][j][2] += span->data[1][j][2] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4026                                                 span->data[0][j][3] += span->data[1][j][3] * DPSOFTRAST_DRAW_MAXSPANLENGTH;
4027                                         }
4028                                 }
4029                         }
4030                         // after all that, we have a span suitable for the pixel shader...
4031                         if (dpsoftrast.draw.numspans >= DPSOFTRAST_DRAW_MAXSPANQUEUE)
4032                         {
4033                                 DPSOFTRAST_Draw_ProcessSpans();
4034                                 dpsoftrast.draw.numspans = 0;
4035                         }
4036                 }
4037                 // draw outlines over triangle for debugging
4038         //      for (j = 0, k = numpoints-1;j < numpoints;k = j, j++)
4039         //              DPSOFTRAST_Draw_DebugEdgePoints(screen[k], screen[j]);
4040         }
4041         if (dpsoftrast.draw.numspans)
4042         {
4043                 DPSOFTRAST_Draw_ProcessSpans();
4044                 dpsoftrast.draw.numspans = 0;
4045         }
4046 }
4047
4048 void DPSOFTRAST_Draw_DebugPoints(void)
4049 {
4050         int i;
4051         int x;
4052         int y;
4053         int numvertices = dpsoftrast.draw.numvertices;
4054         int w = dpsoftrast.fb_width;
4055         int bounds[4];
4056         unsigned int *pixels = dpsoftrast.fb_colorpixels[0];
4057         const float *c4f;
4058         bounds[0] = dpsoftrast.fb_viewportscissor[0];
4059         bounds[1] = dpsoftrast.fb_viewportscissor[1];
4060         bounds[2] = dpsoftrast.fb_viewportscissor[0] + dpsoftrast.fb_viewportscissor[2];
4061         bounds[3] = dpsoftrast.fb_viewportscissor[1] + dpsoftrast.fb_viewportscissor[3];
4062         for (i = 0;i < numvertices;i++)
4063         {
4064                 // check nearclip
4065                 //if (dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+3] != 1.0f)
4066                 //      continue;
4067                 x = (int)(dpsoftrast.draw.screencoord4f[i*4+0]);
4068                 y = (int)(dpsoftrast.draw.screencoord4f[i*4+1]);
4069                 //x = (int)(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+0] + 0.5f);
4070                 //y = (int)(dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+1] + 0.5f);
4071                 //x = (int)((dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+0] + 1.0f) * dpsoftrast.fb_width * 0.5f + 0.5f);
4072                 //y = (int)((dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION][i*4+1] + 1.0f) * dpsoftrast.fb_height * 0.5f + 0.5f);
4073                 if (x < bounds[0] || y < bounds[1] || x >= bounds[2] || y >= bounds[3])
4074                         continue;
4075                 c4f = dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_COLOR] + i*4;
4076                 pixels[y*w+x] = DPSOFTRAST_BGRA8_FROM_RGBA32F(c4f[0], c4f[1], c4f[2], c4f[3]);
4077         }
4078 }
4079
4080 void DPSOFTRAST_DrawTriangles(int firstvertex, int numvertices, int numtriangles, const int *element3i, const unsigned short *element3s)
4081 {
4082         unsigned char arraymask[DPSOFTRAST_ARRAY_TOTAL];
4083         arraymask[0] = true;
4084         arraymask[1] = dpsoftrast.fb_colorpixels[0] != NULL; // TODO: optimize (decide based on shadermode)
4085         arraymask[2] = dpsoftrast.pointer_texcoordf[0] != NULL;
4086         arraymask[3] = dpsoftrast.pointer_texcoordf[1] != NULL;
4087         arraymask[4] = dpsoftrast.pointer_texcoordf[2] != NULL;
4088         arraymask[5] = dpsoftrast.pointer_texcoordf[3] != NULL;
4089         arraymask[6] = dpsoftrast.pointer_texcoordf[4] != NULL;
4090         arraymask[7] = dpsoftrast.pointer_texcoordf[5] != NULL;
4091         arraymask[8] = dpsoftrast.pointer_texcoordf[6] != NULL;
4092         arraymask[9] = dpsoftrast.pointer_texcoordf[7] != NULL;
4093         DPSOFTRAST_Validate(DPSOFTRAST_VALIDATE_DRAW);
4094         DPSOFTRAST_Draw_LoadVertices(firstvertex, numvertices, true);
4095         DPSOFTRAST_ShaderModeTable[dpsoftrast.shader_mode].Vertex();
4096         DPSOFTRAST_Draw_ProjectVertices(dpsoftrast.draw.screencoord4f, dpsoftrast.draw.post_array4f[DPSOFTRAST_ARRAY_POSITION], numvertices);
4097         DPSOFTRAST_Draw_ProcessTriangles(firstvertex, numtriangles, element3i, element3s, arraymask);
4098 }
4099
4100 void DPSOFTRAST_Init(int width, int height, unsigned int *colorpixels, unsigned int *depthpixels)
4101 {
4102         union
4103         {
4104                 int i;
4105                 unsigned char b[4];
4106         }
4107         u;
4108         u.i = 1;
4109         memset(&dpsoftrast, 0, sizeof(dpsoftrast));
4110         dpsoftrast.bigendian = u.b[3];
4111         dpsoftrast.fb_width = width;
4112         dpsoftrast.fb_height = height;
4113         dpsoftrast.fb_depthpixels = depthpixels;
4114         dpsoftrast.fb_colorpixels[0] = colorpixels;
4115         dpsoftrast.fb_colorpixels[1] = NULL;
4116         dpsoftrast.fb_colorpixels[1] = NULL;
4117         dpsoftrast.fb_colorpixels[1] = NULL;
4118         dpsoftrast.texture_firstfree = 1;
4119         dpsoftrast.texture_end = 1;
4120         dpsoftrast.texture_max = 0;
4121         dpsoftrast.user.colormask[0] = 1;
4122         dpsoftrast.user.colormask[1] = 1;
4123         dpsoftrast.user.colormask[2] = 1;
4124         dpsoftrast.user.colormask[3] = 1;
4125         dpsoftrast.user.blendfunc[0] = GL_ONE;
4126         dpsoftrast.user.blendfunc[1] = GL_ZERO;
4127         dpsoftrast.user.depthmask = true;
4128         dpsoftrast.user.depthtest = true;
4129         dpsoftrast.user.depthfunc = GL_LEQUAL;
4130         dpsoftrast.user.scissortest = false;
4131         dpsoftrast.user.cullface = GL_BACK;
4132         dpsoftrast.user.alphatest = false;
4133         dpsoftrast.user.alphafunc = GL_GREATER;
4134         dpsoftrast.user.alphavalue = 0.5f;
4135         dpsoftrast.user.scissor[0] = 0;
4136         dpsoftrast.user.scissor[1] = 0;
4137         dpsoftrast.user.scissor[2] = dpsoftrast.fb_width;
4138         dpsoftrast.user.scissor[3] = dpsoftrast.fb_height;
4139         dpsoftrast.user.viewport[0] = 0;
4140         dpsoftrast.user.viewport[1] = 0;
4141         dpsoftrast.user.viewport[2] = dpsoftrast.fb_width;
4142         dpsoftrast.user.viewport[3] = dpsoftrast.fb_height;
4143         dpsoftrast.user.depthrange[0] = 0;
4144         dpsoftrast.user.depthrange[1] = 1;
4145         dpsoftrast.user.polygonoffset[0] = 0;
4146         dpsoftrast.user.polygonoffset[1] = 0;
4147         dpsoftrast.user.color[0] = 1;
4148         dpsoftrast.user.color[1] = 1;
4149         dpsoftrast.user.color[2] = 1;
4150         dpsoftrast.user.color[3] = 1;
4151         dpsoftrast.validate = -1;
4152         DPSOFTRAST_Validate(-1);
4153         dpsoftrast.validate = 0;
4154 }
4155
4156 void DPSOFTRAST_Shutdown(void)
4157 {
4158         int i;
4159         for (i = 0;i < dpsoftrast.texture_end;i++)
4160                 if (dpsoftrast.texture[i].bytes)
4161                         free(dpsoftrast.texture[i].bytes);
4162         if (dpsoftrast.texture)
4163                 free(dpsoftrast.texture);
4164         memset(&dpsoftrast, 0, sizeof(dpsoftrast));
4165 }