3 #include "cl_collision.h"
11 // LordHavoc: vertex arrays
14 float *aliasvertcolorbuf;
15 float *aliasvert; // this may point at aliasvertbuf or at vertex arrays in the mesh backend
16 float *aliasvertcolor; // this may point at aliasvertcolorbuf or at vertex arrays in the mesh backend
18 float *aliasvertcolor2;
21 zymbonematrix *zymbonepose;
23 mempool_t *gl_models_mempool;
25 void gl_models_start(void)
27 // allocate vertex processing arrays
28 gl_models_mempool = Mem_AllocPool("GL_Models");
29 aliasvert = aliasvertbuf = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
30 aliasvertcolor = aliasvertcolorbuf = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
31 aliasvertnorm = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][3]));
32 aliasvertcolor2 = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4])); // used temporarily for tinted coloring
33 zymbonepose = Mem_Alloc(gl_models_mempool, sizeof(zymbonematrix[256]));
34 aliasvertusage = Mem_Alloc(gl_models_mempool, sizeof(int[MD2MAX_VERTS]));
37 void gl_models_shutdown(void)
39 Mem_FreePool(&gl_models_mempool);
42 void gl_models_newmap(void)
46 void GL_Models_Init(void)
48 R_RegisterModule("GL_Models", gl_models_start, gl_models_shutdown, gl_models_newmap);
51 void R_AliasLerpVerts(int vertcount, float *vertices, float *normals,
52 float lerp1, const trivertx_t *verts1, const vec3_t fscale1, const vec3_t translate1,
53 float lerp2, const trivertx_t *verts2, const vec3_t fscale2, const vec3_t translate2,
54 float lerp3, const trivertx_t *verts3, const vec3_t fscale3, const vec3_t translate3,
55 float lerp4, const trivertx_t *verts4, const vec3_t fscale4, const vec3_t translate4)
58 vec3_t scale1, scale2, scale3, scale4, translate;
59 const float *n1, *n2, *n3, *n4;
63 VectorScale(fscale1, lerp1, scale1);
66 VectorScale(fscale2, lerp2, scale2);
69 VectorScale(fscale3, lerp3, scale3);
72 VectorScale(fscale4, lerp4, scale4);
73 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3 + translate4[0] * lerp4;
74 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3 + translate4[1] * lerp4;
75 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3 + translate4[2] * lerp4;
77 for (i = 0;i < vertcount;i++)
79 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + verts4->v[0] * scale4[0] + translate[0];
80 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + verts4->v[1] * scale4[1] + translate[1];
81 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + verts4->v[2] * scale4[2] + translate[2];
82 n1 = m_bytenormals[verts1->lightnormalindex];
83 n2 = m_bytenormals[verts2->lightnormalindex];
84 n3 = m_bytenormals[verts3->lightnormalindex];
85 n4 = m_bytenormals[verts4->lightnormalindex];
86 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3 + n4[0] * lerp4;
87 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3 + n4[1] * lerp4;
88 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3 + n4[2] * lerp4;
91 verts1++;verts2++;verts3++;verts4++;
96 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3;
97 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3;
98 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3;
100 for (i = 0;i < vertcount;i++)
102 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + translate[0];
103 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + translate[1];
104 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + translate[2];
105 n1 = m_bytenormals[verts1->lightnormalindex];
106 n2 = m_bytenormals[verts2->lightnormalindex];
107 n3 = m_bytenormals[verts3->lightnormalindex];
108 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3;
109 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3;
110 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3;
113 verts1++;verts2++;verts3++;
119 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2;
120 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2;
121 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2;
123 for (i = 0;i < vertcount;i++)
125 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + translate[0];
126 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + translate[1];
127 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + translate[2];
128 n1 = m_bytenormals[verts1->lightnormalindex];
129 n2 = m_bytenormals[verts2->lightnormalindex];
130 avn[0] = n1[0] * lerp1 + n2[0] * lerp2;
131 avn[1] = n1[1] * lerp1 + n2[1] * lerp2;
132 avn[2] = n1[2] * lerp1 + n2[2] * lerp2;
141 translate[0] = translate1[0] * lerp1;
142 translate[1] = translate1[1] * lerp1;
143 translate[2] = translate1[2] * lerp1;
147 // general but almost never used case
148 for (i = 0;i < vertcount;i++)
150 av[0] = verts1->v[0] * scale1[0] + translate[0];
151 av[1] = verts1->v[1] * scale1[1] + translate[1];
152 av[2] = verts1->v[2] * scale1[2] + translate[2];
153 n1 = m_bytenormals[verts1->lightnormalindex];
154 avn[0] = n1[0] * lerp1;
155 avn[1] = n1[1] * lerp1;
156 avn[2] = n1[2] * lerp1;
165 for (i = 0;i < vertcount;i++)
167 av[0] = verts1->v[0] * scale1[0] + translate[0];
168 av[1] = verts1->v[1] * scale1[1] + translate[1];
169 av[2] = verts1->v[2] * scale1[2] + translate[2];
170 VectorCopy(m_bytenormals[verts1->lightnormalindex], avn);
179 skinframe_t *R_FetchSkinFrame(const entity_render_t *ent)
181 model_t *model = ent->model;
182 unsigned int s = (unsigned int) ent->skinnum;
183 if (s >= model->numskins)
185 if (model->skinscenes[s].framecount > 1)
186 return &model->skinframes[model->skinscenes[s].firstframe + (int) (cl.time * 10) % model->skinscenes[s].framecount];
188 return &model->skinframes[model->skinscenes[s].firstframe];
191 void R_LerpMDLMD2Vertices(const entity_render_t *ent, float *vertices, float *normals)
193 const md2frame_t *frame1, *frame2, *frame3, *frame4;
194 const trivertx_t *frame1verts, *frame2verts, *frame3verts, *frame4verts;
195 const model_t *model = ent->model;
197 frame1 = &model->mdlmd2data_frames[ent->frameblend[0].frame];
198 frame2 = &model->mdlmd2data_frames[ent->frameblend[1].frame];
199 frame3 = &model->mdlmd2data_frames[ent->frameblend[2].frame];
200 frame4 = &model->mdlmd2data_frames[ent->frameblend[3].frame];
201 frame1verts = &model->mdlmd2data_pose[ent->frameblend[0].frame * model->numverts];
202 frame2verts = &model->mdlmd2data_pose[ent->frameblend[1].frame * model->numverts];
203 frame3verts = &model->mdlmd2data_pose[ent->frameblend[2].frame * model->numverts];
204 frame4verts = &model->mdlmd2data_pose[ent->frameblend[3].frame * model->numverts];
205 R_AliasLerpVerts(model->numverts, vertices, normals,
206 ent->frameblend[0].lerp, frame1verts, frame1->scale, frame1->translate,
207 ent->frameblend[1].lerp, frame2verts, frame2->scale, frame2->translate,
208 ent->frameblend[2].lerp, frame3verts, frame3->scale, frame3->translate,
209 ent->frameblend[3].lerp, frame4verts, frame4->scale, frame4->translate);
212 void R_DrawQ1Q2AliasModelCallback (const void *calldata1, int calldata2)
214 int i, c, fullbright, pantsfullbright, shirtfullbright, colormapped, tex;
215 float pantscolor[3], shirtcolor[3];
216 float fog, ifog, colorscale;
221 skinframe_t *skinframe;
222 const entity_render_t *ent = calldata1;
223 int blendfunc1, blendfunc2;
225 R_Mesh_Matrix(&ent->matrix);
228 R_Mesh_ResizeCheck(model->numverts);
230 skinframe = R_FetchSkinFrame(ent);
232 fullbright = (ent->effects & EF_FULLBRIGHT) != 0;
237 VectorSubtract(ent->origin, r_origin, diff);
238 fog = DotProduct(diff,diff);
241 fog = exp(fogdensity/fog);
246 // fog method: darken, additive fog
247 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
248 // 2. render fog as additive
252 if (ent->effects & EF_ADDITIVE)
254 blendfunc1 = GL_SRC_ALPHA;
257 else if (ent->alpha != 1.0 || skinframe->fog != NULL)
259 blendfunc1 = GL_SRC_ALPHA;
260 blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
265 blendfunc2 = GL_ZERO;
268 if (!skinframe->base && !skinframe->pants && !skinframe->shirt && !skinframe->glow)
271 memset(&m, 0, sizeof(m));
272 m.blendfunc1 = blendfunc1;
273 m.blendfunc2 = blendfunc2;
274 colorscale = r_colorscale;
275 if (gl_combine.integer)
278 m.texrgbscale[0] = 4;
280 m.tex[0] = R_GetTexture(r_notexture);
282 c_alias_polys += model->numtris;
283 for (i = 0;i < model->numverts * 2;i++)
284 varray_texcoord[0][i] = model->mdlmd2data_texcoords[i] * 8.0f;
285 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
286 R_LightModel(ent, model->numverts, varray_vertex, aliasvertnorm, varray_color, colorscale, colorscale, colorscale, false);
288 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
292 colormapped = !skinframe->merged || (ent->colormap >= 0 && skinframe->base && (skinframe->pants || skinframe->shirt));
295 // 128-224 are backwards ranges
296 c = (ent->colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12;
297 bcolor = (qbyte *) (&d_8to24table[c]);
298 pantsfullbright = c >= 224;
299 VectorScale(bcolor, (1.0f / 255.0f), pantscolor);
300 c = (ent->colormap & 0xF0);c += (c >= 128 && c < 224) ? 4 : 12;
301 bcolor = (qbyte *) (&d_8to24table[c]);
302 shirtfullbright = c >= 224;
303 VectorScale(bcolor, (1.0f / 255.0f), shirtcolor);
307 pantscolor[0] = pantscolor[1] = pantscolor[2] = shirtcolor[0] = shirtcolor[1] = shirtcolor[2] = 1;
308 pantsfullbright = shirtfullbright = false;
311 tex = colormapped ? R_GetTexture(skinframe->base) : R_GetTexture(skinframe->merged);
314 memset(&m, 0, sizeof(m));
315 m.blendfunc1 = blendfunc1;
316 m.blendfunc2 = blendfunc2;
317 colorscale = r_colorscale;
318 if (gl_combine.integer)
321 m.texrgbscale[0] = 4;
325 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
326 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
328 GL_Color(colorscale * ifog, colorscale * ifog, colorscale * ifog, ent->alpha);
332 R_LightModel(ent, model->numverts, varray_vertex, aliasvertnorm, varray_color, colorscale * ifog, colorscale * ifog, colorscale * ifog, false);
334 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
335 c_alias_polys += model->numtris;
336 blendfunc1 = GL_SRC_ALPHA;
342 if (skinframe->pants)
344 tex = R_GetTexture(skinframe->pants);
347 memset(&m, 0, sizeof(m));
348 m.blendfunc1 = blendfunc1;
349 m.blendfunc2 = blendfunc2;
350 colorscale = r_colorscale;
351 if (gl_combine.integer)
354 m.texrgbscale[0] = 4;
358 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
359 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
361 GL_Color(pantscolor[0] * colorscale * ifog, pantscolor[1] * colorscale * ifog, pantscolor[2] * colorscale * ifog, ent->alpha);
365 R_LightModel(ent, model->numverts, varray_vertex, aliasvertnorm, varray_color, pantscolor[0] * colorscale * ifog, pantscolor[1] * colorscale * ifog, pantscolor[2] * colorscale * ifog, false);
367 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
368 c_alias_polys += model->numtris;
369 blendfunc1 = GL_SRC_ALPHA;
373 if (skinframe->shirt)
375 tex = R_GetTexture(skinframe->shirt);
378 memset(&m, 0, sizeof(m));
379 m.blendfunc1 = blendfunc1;
380 m.blendfunc2 = blendfunc2;
381 colorscale = r_colorscale;
382 if (gl_combine.integer)
385 m.texrgbscale[0] = 4;
389 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
390 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
392 GL_Color(shirtcolor[0] * colorscale * ifog, shirtcolor[1] * colorscale * ifog, shirtcolor[2] * colorscale * ifog, ent->alpha);
396 R_LightModel(ent, model->numverts, varray_vertex, aliasvertnorm, varray_color, shirtcolor[0] * colorscale * ifog, shirtcolor[1] * colorscale * ifog, shirtcolor[2] * colorscale * ifog, false);
398 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
399 c_alias_polys += model->numtris;
400 blendfunc1 = GL_SRC_ALPHA;
407 tex = R_GetTexture(skinframe->glow);
410 memset(&m, 0, sizeof(m));
411 m.blendfunc1 = blendfunc1;
412 m.blendfunc2 = blendfunc2;
416 blendfunc1 = GL_SRC_ALPHA;
418 c_alias_polys += model->numtris;
419 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
420 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
421 GL_Color(ifog * r_colorscale, ifog * r_colorscale, ifog * r_colorscale, ent->alpha);
422 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
427 memset(&m, 0, sizeof(m));
428 m.blendfunc1 = GL_SRC_ALPHA;
429 m.blendfunc2 = GL_ONE;
430 m.tex[0] = R_GetTexture(skinframe->fog);
433 c_alias_polys += model->numtris;
434 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
435 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
436 GL_Color(fogcolor[0] * fog * r_colorscale, fogcolor[1] * fog * r_colorscale, fogcolor[2] * fog * r_colorscale, ent->alpha);
437 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
441 void R_DrawQ1Q2AliasModelShadowVolume(entity_render_t *ent, vec3_t relativelightorigin, float lightradius, int visiblevolume)
443 float projectdistance;
444 projectdistance = lightradius + ent->model->radius - sqrt(DotProduct(relativelightorigin, relativelightorigin));
445 if (projectdistance > 0.1)
447 R_Mesh_ResizeCheck(ent->model->numverts * 2);
448 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
449 R_Shadow_Volume(ent->model->numverts, ent->model->numtris, varray_vertex, ent->model->mdlmd2data_indices, ent->model->mdlmd2data_triangleneighbors, relativelightorigin, lightradius, projectdistance, visiblevolume);
453 extern cvar_t r_shadows;
454 void R_DrawQ1Q2AliasModelFakeShadow (entity_render_t *ent)
459 float *v, planenormal[3], planedist, dist, projection[3], floororigin[3], surfnormal[3], lightdirection[3], v2[3];
462 if (r_shadows.integer > 1)
464 float f, lightscale, lightcolor[3];
468 memset(&m, 0, sizeof(m));
469 m.blendfunc1 = GL_ONE;
470 m.blendfunc2 = GL_ONE;
472 R_Mesh_Matrix(&ent->matrix);
473 for (i = 0, sl = cl.worldmodel->lights;i < cl.worldmodel->numlights;i++, sl++)
475 if (d_lightstylevalue[sl->style] > 0)
477 VectorSubtract(ent->origin, sl->origin, temp);
478 f = DotProduct(temp,temp);
479 if (f < (ent->model->radius2 + sl->cullradius2))
482 R_Mesh_ResizeCheck(model->numverts * 2);
483 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
484 Matrix4x4_Transform(&ent->inversematrix, sl->origin, temp);
485 GL_Color(0.1 * r_colorscale, 0.025 * r_colorscale, 0.0125 * r_colorscale, 1);
486 R_Shadow_Volume(model->numverts, model->numtris, varray_vertex, model->mdlmd2data_indices, model->mdlmd2data_triangleneighbors, temp, sl->cullradius + model->radius - sqrt(f), true);
488 lightscale = d_lightstylevalue[sl->style] * (1.0f / 65536.0f);
489 VectorScale(sl->light, lightscale, lightcolor);
490 R_Shadow_VertexLight(model->numverts, varray_vertex, aliasvertnorm, temp, sl->cullradius2, sl->distbias, sl->subtract, lightcolor);
491 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
495 for (i = 0, rd = r_dlight;i < r_numdlights;i++, rd++)
499 VectorSubtract(ent->origin, rd->origin, temp);
500 f = DotProduct(temp,temp);
501 if (f < (ent->model->radius2 + rd->cullradius2))
504 R_Mesh_ResizeCheck(model->numverts * 2);
505 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
506 Matrix4x4_Transform(&ent->inversematrix, rd->origin, temp);
507 GL_Color(0.1 * r_colorscale, 0.025 * r_colorscale, 0.0125 * r_colorscale, 1);
508 R_Shadow_Volume(model->numverts, model->numtris, varray_vertex, model->mdlmd2data_indices, model->mdlmd2data_triangleneighbors, temp, rd->cullradius + model->radius - sqrt(f), true);
510 R_Shadow_VertexLight(model->numverts, varray_vertex, aliasvertnorm, temp, rd->cullradius2, LIGHTOFFSET, rd->subtract, rd->light);
511 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
519 lightdirection[0] = 0.5;
520 lightdirection[1] = 0.2;
521 lightdirection[2] = -1;
522 VectorNormalizeFast(lightdirection);
524 VectorMA(ent->origin, 65536.0f, lightdirection, v2);
525 if (CL_TraceLine(ent->origin, v2, floororigin, surfnormal, 0, false, NULL) == 1)
528 R_Mesh_Matrix(&ent->matrix);
531 R_Mesh_ResizeCheck(model->numverts);
533 memset(&m, 0, sizeof(m));
534 m.blendfunc1 = GL_SRC_ALPHA;
535 m.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
538 c_alias_polys += model->numtris;
539 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
541 // put a light direction in the entity's coordinate space
542 Matrix4x4_Transform3x3(&ent->inversematrix, lightdirection, projection);
543 VectorNormalizeFast(projection);
545 // put the plane's normal in the entity's coordinate space
546 Matrix4x4_Transform3x3(&ent->inversematrix, surfnormal, planenormal);
547 VectorNormalizeFast(planenormal);
549 // put the plane's distance in the entity's coordinate space
550 VectorSubtract(floororigin, ent->origin, floororigin);
551 planedist = DotProduct(floororigin, surfnormal) + 2;
553 dist = -1.0f / DotProduct(projection, planenormal);
554 VectorScale(projection, dist, projection);
555 for (i = 0, v = varray_vertex;i < model->numverts;i++, v += 4)
557 dist = DotProduct(v, planenormal) - planedist;
560 VectorMA(v, dist, projection, v);
562 GL_Color(0, 0, 0, 0.5);
563 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
566 int ZymoticLerpBones(int count, const zymbonematrix *bonebase, const frameblend_t *blend, const zymbone_t *bone)
569 float lerp1, lerp2, lerp3, lerp4;
570 zymbonematrix *out, rootmatrix, m;
571 const zymbonematrix *bone1, *bone2, *bone3, *bone4;
573 rootmatrix.m[0][0] = 1;
574 rootmatrix.m[0][1] = 0;
575 rootmatrix.m[0][2] = 0;
576 rootmatrix.m[0][3] = 0;
577 rootmatrix.m[1][0] = 0;
578 rootmatrix.m[1][1] = 1;
579 rootmatrix.m[1][2] = 0;
580 rootmatrix.m[1][3] = 0;
581 rootmatrix.m[2][0] = 0;
582 rootmatrix.m[2][1] = 0;
583 rootmatrix.m[2][2] = 1;
584 rootmatrix.m[2][3] = 0;
586 bone1 = bonebase + blend[0].frame * count;
587 lerp1 = blend[0].lerp;
590 bone2 = bonebase + blend[1].frame * count;
591 lerp2 = blend[1].lerp;
594 bone3 = bonebase + blend[2].frame * count;
595 lerp3 = blend[2].lerp;
599 bone4 = bonebase + blend[3].frame * count;
600 lerp4 = blend[3].lerp;
601 for (i = 0, out = zymbonepose;i < count;i++, out++)
603 // interpolate matrices
604 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3 + bone4->m[0][0] * lerp4;
605 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3 + bone4->m[0][1] * lerp4;
606 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3 + bone4->m[0][2] * lerp4;
607 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3 + bone4->m[0][3] * lerp4;
608 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3 + bone4->m[1][0] * lerp4;
609 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3 + bone4->m[1][1] * lerp4;
610 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3 + bone4->m[1][2] * lerp4;
611 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3 + bone4->m[1][3] * lerp4;
612 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3 + bone4->m[2][0] * lerp4;
613 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3 + bone4->m[2][1] * lerp4;
614 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3 + bone4->m[2][2] * lerp4;
615 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3 + bone4->m[2][3] * lerp4;
616 if (bone->parent >= 0)
617 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
619 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
630 for (i = 0, out = zymbonepose;i < count;i++, out++)
632 // interpolate matrices
633 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3;
634 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3;
635 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3;
636 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3;
637 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3;
638 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3;
639 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3;
640 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3;
641 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3;
642 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3;
643 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3;
644 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3;
645 if (bone->parent >= 0)
646 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
648 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
659 for (i = 0, out = zymbonepose;i < count;i++, out++)
661 // interpolate matrices
662 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2;
663 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2;
664 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2;
665 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2;
666 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2;
667 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2;
668 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2;
669 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2;
670 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2;
671 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2;
672 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2;
673 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2;
674 if (bone->parent >= 0)
675 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
677 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
690 for (i = 0, out = zymbonepose;i < count;i++, out++)
692 // interpolate matrices
693 m.m[0][0] = bone1->m[0][0] * lerp1;
694 m.m[0][1] = bone1->m[0][1] * lerp1;
695 m.m[0][2] = bone1->m[0][2] * lerp1;
696 m.m[0][3] = bone1->m[0][3] * lerp1;
697 m.m[1][0] = bone1->m[1][0] * lerp1;
698 m.m[1][1] = bone1->m[1][1] * lerp1;
699 m.m[1][2] = bone1->m[1][2] * lerp1;
700 m.m[1][3] = bone1->m[1][3] * lerp1;
701 m.m[2][0] = bone1->m[2][0] * lerp1;
702 m.m[2][1] = bone1->m[2][1] * lerp1;
703 m.m[2][2] = bone1->m[2][2] * lerp1;
704 m.m[2][3] = bone1->m[2][3] * lerp1;
705 if (bone->parent >= 0)
706 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
708 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
716 for (i = 0, out = zymbonepose;i < count;i++, out++)
718 if (bone->parent >= 0)
719 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &bone1->m[0][0], &out->m[0][0]);
721 R_ConcatTransforms(&rootmatrix.m[0][0], &bone1->m[0][0], &out->m[0][0]);
730 void ZymoticTransformVerts(int vertcount, float *vertex, int *bonecounts, zymvertex_t *vert)
734 zymbonematrix *matrix;
738 // FIXME: validate bonecounts at load time (must be >= 1)
739 // FIXME: need 4th component in origin, for how much of the translate to blend in
742 matrix = &zymbonepose[vert->bonenum];
743 out[0] = vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
744 out[1] = vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
745 out[2] = vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
753 matrix = &zymbonepose[vert->bonenum];
754 out[0] += vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
755 out[1] += vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
756 out[2] += vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
764 void ZymoticCalcNormals(int vertcount, float *vertex, float *normals, int shadercount, int *renderlist)
767 float *out, v1[3], v2[3], normal[3], s;
770 memset(normals, 0, sizeof(float) * vertcount * 3);
771 memset(aliasvertusage, 0, sizeof(int) * vertcount);
772 // parse render list and accumulate surface normals
781 v1[0] = vertex[a+0] - vertex[b+0];
782 v1[1] = vertex[a+1] - vertex[b+1];
783 v1[2] = vertex[a+2] - vertex[b+2];
784 v2[0] = vertex[c+0] - vertex[b+0];
785 v2[1] = vertex[c+1] - vertex[b+1];
786 v2[2] = vertex[c+2] - vertex[b+2];
787 CrossProduct(v1, v2, normal);
788 VectorNormalizeFast(normal);
789 // add surface normal to vertices
790 a = renderlist[0] * 3;
791 normals[a+0] += normal[0];
792 normals[a+1] += normal[1];
793 normals[a+2] += normal[2];
794 aliasvertusage[renderlist[0]]++;
795 a = renderlist[1] * 3;
796 normals[a+0] += normal[0];
797 normals[a+1] += normal[1];
798 normals[a+2] += normal[2];
799 aliasvertusage[renderlist[1]]++;
800 a = renderlist[2] * 3;
801 normals[a+0] += normal[0];
802 normals[a+1] += normal[1];
803 normals[a+2] += normal[2];
804 aliasvertusage[renderlist[2]]++;
808 // FIXME: precalc this
809 // average surface normals
826 void R_DrawZymoticModelMeshCallback (const void *calldata1, int calldata2)
828 float fog, ifog, colorscale;
830 int i, *renderlist, *elements;
834 const entity_render_t *ent = calldata1;
835 int shadernum = calldata2;
836 int numverts, numtriangles;
838 R_Mesh_Matrix(&ent->matrix);
840 // find the vertex index list and texture
841 m = ent->model->zymdata_header;
842 renderlist = (int *)(m->lump_render.start + (int) m);
843 for (i = 0;i < shadernum;i++)
844 renderlist += renderlist[0] * 3 + 1;
845 texture = ((rtexture_t **)(m->lump_shaders.start + (int) m))[shadernum];
847 numverts = m->numverts;
848 numtriangles = *renderlist++;
849 elements = renderlist;
850 R_Mesh_ResizeCheck(numverts);
855 VectorSubtract(ent->origin, r_origin, diff);
856 fog = DotProduct(diff,diff);
859 fog = exp(fogdensity/fog);
864 // fog method: darken, additive fog
865 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
866 // 2. render fog as additive
870 memset(&mstate, 0, sizeof(mstate));
871 if (ent->effects & EF_ADDITIVE)
873 mstate.blendfunc1 = GL_SRC_ALPHA;
874 mstate.blendfunc2 = GL_ONE;
876 else if (ent->alpha != 1.0 || R_TextureHasAlpha(texture))
878 mstate.blendfunc1 = GL_SRC_ALPHA;
879 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
883 mstate.blendfunc1 = GL_ONE;
884 mstate.blendfunc2 = GL_ZERO;
886 colorscale = r_colorscale;
887 if (gl_combine.integer)
889 mstate.texrgbscale[0] = 4;
892 mstate.tex[0] = R_GetTexture(texture);
893 R_Mesh_State(&mstate);
894 ZymoticLerpBones(m->numbones, (zymbonematrix *)(m->lump_poses.start + (int) m), ent->frameblend, (zymbone_t *)(m->lump_bones.start + (int) m));
895 ZymoticTransformVerts(numverts, varray_vertex, (int *)(m->lump_vertbonecounts.start + (int) m), (zymvertex_t *)(m->lump_verts.start + (int) m));
896 ZymoticCalcNormals(numverts, varray_vertex, aliasvertnorm, m->numshaders, (int *)(m->lump_render.start + (int) m));
897 memcpy(varray_texcoord[0], (float *)(m->lump_texcoords.start + (int) m), numverts * sizeof(float[2]));
899 R_LightModel(ent, numverts, varray_vertex, aliasvertnorm, varray_color, ifog * colorscale, ifog * colorscale, ifog * colorscale, false);
900 R_Mesh_Draw(numverts, numtriangles, elements);
901 c_alias_polys += numtriangles;
905 memset(&mstate, 0, sizeof(mstate));
906 mstate.blendfunc1 = GL_SRC_ALPHA;
907 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
908 // FIXME: need alpha mask for fogging...
909 //mstate.tex[0] = R_GetTexture(texture);
910 R_Mesh_State(&mstate);
911 GL_Color(fogcolor[0] * r_colorscale, fogcolor[1] * r_colorscale, fogcolor[2] * r_colorscale, ent->alpha * fog);
912 R_Mesh_Draw(numverts, numtriangles, elements);
913 c_alias_polys += numtriangles;
917 void R_DrawZymoticModel (entity_render_t *ent)
923 if (ent->alpha < (1.0f / 64.0f))
924 return; // basically completely transparent
928 m = ent->model->zymdata_header;
929 for (i = 0;i < m->numshaders;i++)
931 texture = ((rtexture_t **)(m->lump_shaders.start + (int) m))[i];
932 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_TextureHasAlpha(texture))
933 R_MeshQueue_AddTransparent(ent->origin, R_DrawZymoticModelMeshCallback, ent, i);
935 R_DrawZymoticModelMeshCallback(ent, i);
939 void R_DrawQ1Q2AliasModel(entity_render_t *ent)
941 if (ent->alpha < (1.0f / 64.0f))
942 return; // basically completely transparent
946 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_FetchSkinFrame(ent)->fog != NULL)
947 R_MeshQueue_AddTransparent(ent->origin, R_DrawQ1Q2AliasModelCallback, ent, 0);
949 R_DrawQ1Q2AliasModelCallback(ent, 0);