]> de.git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - model_shared.c
Lots of str[n]cat, str[n]cpy, and [v]sprintf have been replaced by strlcat, strlcpy...
[xonotic/darkplaces.git] / model_shared.c
index 0ef5f31ee41e76f5370a202e0349c5cc9b23f588..4b4ea56ec81550a613068966b7f2d3f6dded80c1 100644 (file)
@@ -26,6 +26,8 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 #include "image.h"
 #include "r_shadow.h"
 
+cvar_t r_mipskins = {CVAR_SAVE, "r_mipskins", "0"};
+
 model_t *loadmodel;
 
 // LordHavoc: increased from 512 to 2048
@@ -35,6 +37,7 @@ static model_t mod_known[MAX_MOD_KNOWN];
 rtexturepool_t *mod_shared_texturepool;
 rtexture_t *r_notexture;
 rtexture_t *mod_shared_detailtextures[NUM_DETAILTEXTURES];
+rtexture_t *mod_shared_distorttexture[64];
 
 void Mod_BuildDetailTextures (void)
 {
@@ -76,6 +79,58 @@ void Mod_BuildDetailTextures (void)
        }
 }
 
+qbyte Mod_MorphDistortTexture (double y0, double y1, double y2, double y3, double morph)
+{
+       int     value = (int)(((y1 + y3 - (y0 + y2)) * morph * morph * morph) +
+                               ((2 * (y0 - y1) + y2 - y3) * morph * morph) +
+                               ((y2 - y0) * morph) +
+                               (y1));
+
+       if (value > 255)
+               value = 255;
+       if (value < 0)
+               value = 0;
+
+       return (qbyte)value;
+}
+
+void Mod_BuildDistortTexture (void)
+{
+       int x, y, i, j;
+#define DISTORTRESOLUTION 32
+       qbyte data[5][DISTORTRESOLUTION][DISTORTRESOLUTION][2];
+
+       for (i=0; i<4; i++)
+       {
+               for (y=0; y<DISTORTRESOLUTION; y++)
+               {
+                       for (x=0; x<DISTORTRESOLUTION; x++)
+                       {
+                               data[i][y][x][0] = rand () & 255;
+                               data[i][y][x][1] = rand () & 255;
+                       }
+               }
+       }
+
+       for (i=0; i<4; i++)
+       {
+               for (j=0; j<16; j++)
+               {
+                       for (y=0; y<DISTORTRESOLUTION; y++)
+                       {
+                               for (x=0; x<DISTORTRESOLUTION; x++)
+                               {
+                                       data[4][y][x][0] = Mod_MorphDistortTexture (data[(i-1)&3][y][x][0], data[i][y][x][0], data[(i+1)&3][y][x][0], data[(i+2)&3][y][x][0], 0.0625*j);
+                                       data[4][y][x][1] = Mod_MorphDistortTexture (data[(i-1)&3][y][x][1], data[i][y][x][1], data[(i+1)&3][y][x][1], data[(i+2)&3][y][x][1], 0.0625*j);
+                               }
+                       }
+                       mod_shared_distorttexture[i*16+j] = R_LoadTexture2D(mod_shared_texturepool, va("distorttexture%i", i*16+j), DISTORTRESOLUTION, DISTORTRESOLUTION, &data[4][0][0][0], TEXTYPE_DSDT, TEXF_PRECACHE, NULL);
+               }
+       }
+
+       return;
+}
+
 texture_t r_surf_notexture;
 
 void Mod_SetupNoTexture(void)
@@ -119,6 +174,7 @@ static void mod_start(void)
        mod_shared_texturepool = R_AllocTexturePool();
        Mod_SetupNoTexture();
        Mod_BuildDetailTextures();
+       Mod_BuildDistortTexture();
 }
 
 static void mod_shutdown(void)
@@ -141,13 +197,16 @@ Mod_Init
 ===============
 */
 static void Mod_Print (void);
+static void Mod_Precache (void);
 void Mod_Init (void)
 {
        Mod_BrushInit();
        Mod_AliasInit();
        Mod_SpriteInit();
 
+       Cvar_RegisterVariable(&r_mipskins);
        Cmd_AddCommand ("modellist", Mod_Print);
+       Cmd_AddCommand ("modelprecache", Mod_Precache);
 }
 
 void Mod_RenderInit(void)
@@ -183,8 +242,9 @@ Mod_LoadModel
 Loads a model
 ==================
 */
-static model_t *Mod_LoadModel (model_t *mod, qboolean crash, qboolean checkdisk, qboolean isworldmodel)
+static model_t *Mod_LoadModel(model_t *mod, qboolean crash, qboolean checkdisk, qboolean isworldmodel)
 {
+       int num;
        unsigned int crc;
        void *buf;
 
@@ -240,11 +300,10 @@ static model_t *Mod_LoadModel (model_t *mod, qboolean crash, qboolean checkdisk,
        // LordHavoc: unload the existing model in this slot (if there is one)
        Mod_UnloadModel(mod);
        mod->isworldmodel = isworldmodel;
-       mod->needload = false;
        mod->used = true;
        mod->crc = crc;
-       // errors can prevent the corresponding mod->error = false;
-       mod->error = true;
+       // errors can prevent the corresponding mod->needload = false;
+       mod->needload = true;
 
        // all models use memory, so allocate a memory pool
        mod->mempool = Mem_AllocPool(mod->name);
@@ -253,22 +312,25 @@ static model_t *Mod_LoadModel (model_t *mod, qboolean crash, qboolean checkdisk,
                mod->texturepool = R_AllocTexturePool();
 
        // call the apropriate loader
-            if (!memcmp(buf, "IDPO"    , 4)) Mod_LoadQ1AliasModel(mod, buf);
-       else if (!memcmp(buf, "IDP2"    , 4)) Mod_LoadQ2AliasModel(mod, buf);
-       else if (!memcmp(buf, "IDP3"    , 4)) Mod_LoadQ3AliasModel(mod, buf);
-       else if (!memcmp(buf, "ZYMOTIC" , 7)) Mod_LoadZymoticModel(mod, buf);
-       else if (!memcmp(buf, "IDSP"    , 4)) Mod_LoadSpriteModel (mod, buf);
-       else if (!memcmp(buf, "IBSP"    , 4)) Mod_LoadBrushModelIBSP (mod, buf);
-       else                                  Mod_LoadBrushModelQ1orHL (mod, buf);
+       num = LittleLong(*((int *)buf));
+            if (!memcmp(buf, "IDPO", 4)) Mod_IDP0_Load(mod, buf);
+       else if (!memcmp(buf, "IDP2", 4)) Mod_IDP2_Load(mod, buf);
+       else if (!memcmp(buf, "IDP3", 4)) Mod_IDP3_Load(mod, buf);
+       else if (!memcmp(buf, "IDSP", 4)) Mod_IDSP_Load(mod, buf);
+       else if (!memcmp(buf, "IBSP", 4)) Mod_IBSP_Load(mod, buf);
+       else if (!memcmp(buf, "ZYMOTICMODEL", 12)) Mod_ZYMOTICMODEL_Load(mod, buf);
+       else if (strlen(mod->name) >= 4 && !strcmp(mod->name - 4, ".map")) Mod_MAP_Load(mod, buf);
+       else if (num == BSPVERSION || num == 30) Mod_Q1BSP_Load(mod, buf);
+       else Host_Error("Mod_LoadModel: model \"%s\" is of unknown/unsupported type\n", mod->name);
 
        Mem_Free(buf);
 
        // no errors occurred
-       mod->error = false;
+       mod->needload = false;
        return mod;
 }
 
-void Mod_CheckLoaded (model_t *mod)
+void Mod_CheckLoaded(model_t *mod)
 {
        if (mod)
        {
@@ -289,20 +351,10 @@ void Mod_CheckLoaded (model_t *mod)
 Mod_ClearAll
 ===================
 */
-void Mod_ClearAll (void)
+void Mod_ClearAll(void)
 {
 }
 
-void Mod_ClearErrorModels (void)
-{
-       int i;
-       model_t *mod;
-
-       for (i = 0, mod = mod_known;i < MAX_MOD_KNOWN;i++, mod++)
-               if (mod->error)
-                       Mod_FreeModel(mod);
-}
-
 void Mod_ClearUsed(void)
 {
        int i;
@@ -341,7 +393,7 @@ Mod_FindName
 
 ==================
 */
-model_t *Mod_FindName (const char *name)
+model_t *Mod_FindName(const char *name)
 {
        int i;
        model_t *mod, *freemod;
@@ -384,11 +436,11 @@ Mod_TouchModel
 
 ==================
 */
-void Mod_TouchModel (const char *name)
+void Mod_TouchModel(const char *name)
 {
        model_t *mod;
 
-       mod = Mod_FindName (name);
+       mod = Mod_FindName(name);
        mod->used = true;
 }
 
@@ -399,9 +451,9 @@ Mod_ForName
 Loads in a model for the given name
 ==================
 */
-model_t *Mod_ForName (const char *name, qboolean crash, qboolean checkdisk, qboolean isworldmodel)
+model_t *Mod_ForName(const char *name, qboolean crash, qboolean checkdisk, qboolean isworldmodel)
 {
-       return Mod_LoadModel (Mod_FindName (name), crash, checkdisk, isworldmodel);
+       return Mod_LoadModel(Mod_FindName(name), crash, checkdisk, isworldmodel);
 }
 
 qbyte *mod_base;
@@ -414,7 +466,7 @@ qbyte *mod_base;
 Mod_Print
 ================
 */
-static void Mod_Print (void)
+static void Mod_Print(void)
 {
        int             i;
        model_t *mod;
@@ -425,6 +477,19 @@ static void Mod_Print (void)
                        Con_Printf ("%4iK %s\n", mod->mempool ? (mod->mempool->totalsize + 1023) / 1024 : 0, mod->name);
 }
 
+/*
+================
+Mod_Precache
+================
+*/
+static void Mod_Precache(void)
+{
+       if (Cmd_Argc() == 2)
+               Mod_ForName(Cmd_Argv(1), false, true, cl.worldmodel && !strcasecmp(Cmd_Argv(1), cl.worldmodel->name));
+       else
+               Con_Printf("usage: modelprecache <filename>\n");
+}
+
 int Mod_FindTriangleWithEdge(const int *elements, int numtriangles, int start, int end, int ignore)
 {
        int i, match, count;
@@ -471,108 +536,81 @@ void Mod_ValidateElements(const int *elements, int numtriangles, int numverts, c
                        Con_Printf("Mod_ValidateElements: out of bounds element detected at %s:%d\n", filename, fileline);
 }
 
-/*
-a note on the cost of executing this function:
-per triangle: 188 (83 42 13 45 4 1)
-assignments: 83 (20 3 3 3 1 4 4 1 3 4 3 4 30)
-adds: 42 (2 2 2 2 3 2 2 27)
-subtracts: 13 (3 3 3 1 3)
-multiplies: 45 (6 3 6 6 3 3 6 6 6)
-rsqrts: 4 (1 1 1 1)
-compares: 1 (1)
-per vertex: 39 (12 6 18 3)
-assignments: 12 (4 4 4)
-adds: 6 (2 2 2)
-multiplies: 18 (6 6 6)
-rsqrts: 3 (1 1 1)
-*/
+void Mod_BuildBumpVectors(const float *v0, const float *v1, const float *v2, const float *tc0, const float *tc1, const float *tc2, float *svector3f, float *tvector3f, float *normal3f)
+{
+       float f;
+       normal3f[0] = (v1[1] - v0[1]) * (v2[2] - v0[2]) - (v1[2] - v0[2]) * (v2[1] - v0[1]);
+       normal3f[1] = (v1[2] - v0[2]) * (v2[0] - v0[0]) - (v1[0] - v0[0]) * (v2[2] - v0[2]);
+       normal3f[2] = (v1[0] - v0[0]) * (v2[1] - v0[1]) - (v1[1] - v0[1]) * (v2[0] - v0[0]);
+       VectorNormalize(normal3f);
+       tvector3f[0] = ((tc1[0] - tc0[0]) * (v2[0] - v0[0]) - (tc2[0] - tc0[0]) * (v1[0] - v0[0]));
+       tvector3f[1] = ((tc1[0] - tc0[0]) * (v2[1] - v0[1]) - (tc2[0] - tc0[0]) * (v1[1] - v0[1]));
+       tvector3f[2] = ((tc1[0] - tc0[0]) * (v2[2] - v0[2]) - (tc2[0] - tc0[0]) * (v1[2] - v0[2]));
+       f = -DotProduct(tvector3f, normal3f);
+       VectorMA(tvector3f, f, normal3f, tvector3f);
+       VectorNormalize(tvector3f);
+       CrossProduct(normal3f, tvector3f, svector3f);
+}
 
+// warning: this is an expensive function!
 void Mod_BuildTextureVectorsAndNormals(int numverts, int numtriangles, const float *vertex3f, const float *texcoord2f, const int *elements, float *svector3f, float *tvector3f, float *normal3f)
 {
-       int i, tnum, voffset;
-       float vert[3][4], vec[3][4], sdir[3], tdir[3], normal[3], f, *v;
+       int i, tnum;
+       float sdir[3], tdir[3], normal[3], *v;
        const int *e;
        // clear the vectors
-       memset(svector3f, 0, numverts * sizeof(float[3]));
-       memset(tvector3f, 0, numverts * sizeof(float[3]));
-       memset(normal3f, 0, numverts * sizeof(float[3]));
+       if (svector3f)
+               memset(svector3f, 0, numverts * sizeof(float[3]));
+       if (tvector3f)
+               memset(tvector3f, 0, numverts * sizeof(float[3]));
+       if (normal3f)
+               memset(normal3f, 0, numverts * sizeof(float[3]));
        // process each vertex of each triangle and accumulate the results
        for (tnum = 0, e = elements;tnum < numtriangles;tnum++, e += 3)
        {
-               // calculate texture matrix for triangle
-               // 20 assignments
-               voffset = e[0];
-               vert[0][0] = vertex3f[voffset*3+0];
-               vert[0][1] = vertex3f[voffset*3+1];
-               vert[0][2] = vertex3f[voffset*3+2];
-               vert[0][3] = texcoord2f[voffset*2];
-               voffset = e[1];
-               vert[1][0] = vertex3f[voffset*3+0];
-               vert[1][1] = vertex3f[voffset*3+1];
-               vert[1][2] = vertex3f[voffset*3+2];
-               vert[1][3] = texcoord2f[voffset*2];
-               voffset = e[2];
-               vert[2][0] = vertex3f[voffset*3+0];
-               vert[2][1] = vertex3f[voffset*3+1];
-               vert[2][2] = vertex3f[voffset*3+2];
-               vert[2][3] = texcoord2f[voffset*2];
-               // 3 assignments, 3 subtracts
-               VectorSubtract(vert[1], vert[0], vec[0]);
-               // 3 assignments, 3 subtracts
-               VectorSubtract(vert[2], vert[0], vec[1]);
-               // 3 assignments, 3 subtracts, 6 multiplies
-               CrossProduct(vec[0], vec[1], normal);
-               // 1 assignment, 2 adds, 3 multiplies, 1 compare
-               if (DotProduct(normal, normal) >= 0.001)
+               Mod_BuildBumpVectors(vertex3f + e[0] * 3, vertex3f + e[1] * 3, vertex3f + e[2] * 3, texcoord2f + e[0] * 2, texcoord2f + e[1] * 2, texcoord2f + e[2] * 2, sdir, tdir, normal);
+               if (svector3f)
+               {
+                       for (i = 0;i < 3;i++)
+                       {
+                               svector3f[e[i]*3  ] += sdir[0];
+                               svector3f[e[i]*3+1] += sdir[1];
+                               svector3f[e[i]*3+2] += sdir[2];
+                       }
+               }
+               if (tvector3f)
                {
-                       // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-                       VectorNormalize(normal);
-                       tdir[0] = ((vert[1][3] - vert[0][3]) * (vert[2][0] - vert[0][0]) - (vert[2][3] - vert[0][3]) * (vert[1][0] - vert[0][0]));
-                       tdir[1] = ((vert[1][3] - vert[0][3]) * (vert[2][1] - vert[0][1]) - (vert[2][3] - vert[0][3]) * (vert[1][1] - vert[0][1]));
-                       tdir[2] = ((vert[1][3] - vert[0][3]) * (vert[2][2] - vert[0][2]) - (vert[2][3] - vert[0][3]) * (vert[1][2] - vert[0][2]));
-                       // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-                       VectorNormalize(tdir);
-                       // 1 assignments, 1 negates, 2 adds, 3 multiplies
-                       f = -DotProduct(tdir, normal);
-                       // 3 assignments, 3 adds, 3 multiplies
-                       VectorMA(tdir, f, normal, tdir);
-                       // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-                       VectorNormalize(tdir);
-                       // 3 assignments, 3 subtracts, 6 multiplies
-                       CrossProduct(tdir, normal, sdir);
-                       // this is probably not necessary
-                       // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-                       VectorNormalize(sdir);
-                       //
-                       VectorNegate(sdir, sdir);
-                       // accumulate matrix onto verts used by triangle
-                       // 30 assignments, 27 adds
                        for (i = 0;i < 3;i++)
                        {
-                               voffset = e[i];
-                               svector3f[voffset*3  ] += sdir[0];
-                               svector3f[voffset*3+1] += sdir[1];
-                               svector3f[voffset*3+2] += sdir[2];
-                               tvector3f[voffset*3  ] += tdir[0];
-                               tvector3f[voffset*3+1] += tdir[1];
-                               tvector3f[voffset*3+2] += tdir[2];
-                               normal3f[voffset*3  ] += normal[0];
-                               normal3f[voffset*3+1] += normal[1];
-                               normal3f[voffset*3+2] += normal[2];
+                               tvector3f[e[i]*3  ] += tdir[0];
+                               tvector3f[e[i]*3+1] += tdir[1];
+                               tvector3f[e[i]*3+2] += tdir[2];
+                       }
+               }
+               if (normal3f)
+               {
+                       for (i = 0;i < 3;i++)
+                       {
+                               normal3f[e[i]*3  ] += normal[0];
+                               normal3f[e[i]*3+1] += normal[1];
+                               normal3f[e[i]*3+2] += normal[2];
                        }
                }
        }
        // now we could divide the vectors by the number of averaged values on
        // each vertex...  but instead normalize them
-       for (i = 0, v = svector3f;i < numverts;i++, v += 3)
-               // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-               VectorNormalize(v);
-       for (i = 0, v = tvector3f;i < numverts;i++, v += 3)
-               // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-               VectorNormalize(v);
-       for (i = 0, v = normal3f;i < numverts;i++, v += 3)
-               // 4 assignments, 1 rsqrt, 2 adds, 6 multiplies
-               VectorNormalize(v);
+       // 4 assignments, 1 divide, 1 sqrt, 2 adds, 6 multiplies
+       if (svector3f)
+               for (i = 0, v = svector3f;i < numverts;i++, v += 3)
+                       VectorNormalize(v);
+       // 4 assignments, 1 divide, 1 sqrt, 2 adds, 6 multiplies
+       if (tvector3f)
+               for (i = 0, v = tvector3f;i < numverts;i++, v += 3)
+                       VectorNormalize(v);
+       // 4 assignments, 1 divide, 1 sqrt, 2 adds, 6 multiplies
+       if (normal3f)
+               for (i = 0, v = normal3f;i < numverts;i++, v += 3)
+                       VectorNormalize(v);
 }
 
 shadowmesh_t *Mod_ShadowMesh_Alloc(mempool_t *mempool, int maxverts)
@@ -651,7 +689,7 @@ void Mod_ShadowMesh_AddPolygon(mempool_t *mempool, shadowmesh_t *mesh, int numve
        /*
        int i, i1, i2, i3;
        float *v;
-       while (mesh->numverts + numverts > mesh->maxverts || mesh->numtriangles + (numverts - 2) > mesh->maxtriangles)
+       while (mesh->num_vertices + numverts > mesh->maxverts || mesh->num_triangles + (numverts - 2) > mesh->maxtriangles)
        {
                if (mesh->next == NULL)
                        mesh->next = Mod_ShadowMesh_Alloc(mempool, max(mesh->maxtriangles, numverts));
@@ -664,15 +702,15 @@ void Mod_ShadowMesh_AddPolygon(mempool_t *mempool, shadowmesh_t *mesh, int numve
        {
                i2 = i3;
                i3 = Mod_ShadowMesh_AddVertex(mesh, v);
-               mesh->elements[mesh->numtriangles * 3 + 0] = i1;
-               mesh->elements[mesh->numtriangles * 3 + 1] = i2;
-               mesh->elements[mesh->numtriangles * 3 + 2] = i3;
-               mesh->numtriangles++;
+               mesh->elements[mesh->num_triangles * 3 + 0] = i1;
+               mesh->elements[mesh->num_triangles * 3 + 1] = i2;
+               mesh->elements[mesh->num_triangles * 3 + 2] = i3;
+               mesh->num_triangles++;
        }
        */
 }
 
-void Mod_ShadowMesh_AddMesh(mempool_t *mempool, shadowmesh_t *mesh, int numverts, float *verts, int numtris, int *elements)
+void Mod_ShadowMesh_AddMesh(mempool_t *mempool, shadowmesh_t *mesh, float *verts, int numtris, int *elements)
 {
        int i;
        for (i = 0;i < numtris;i++, elements += 3)
@@ -699,7 +737,7 @@ shadowmesh_t *Mod_ShadowMesh_Finish(mempool_t *mempool, shadowmesh_t *firstmesh)
                        newmesh->next = firstmesh;
                        firstmesh = newmesh;
                        //Con_Printf("mesh\n");
-                       //for (i = 0;i < newmesh->numtriangles;i++)
+                       //for (i = 0;i < newmesh->num_triangles;i++)
                        //      Con_Printf("tri %d %d %d\n", newmesh->elements[i * 3 + 0], newmesh->elements[i * 3 + 1], newmesh->elements[i * 3 + 2]);
                        Mod_ValidateElements(newmesh->element3i, newmesh->numtriangles, newmesh->numverts, __FILE__, __LINE__);
                        Mod_BuildTriangleNeighbors(newmesh->neighbor3i, newmesh->element3i, newmesh->numtriangles);
@@ -710,8 +748,8 @@ shadowmesh_t *Mod_ShadowMesh_Finish(mempool_t *mempool, shadowmesh_t *firstmesh)
        shadowmesh_t *mesh;
        for (mesh = firstmesh;mesh;mesh = mesh->next)
        {
-               Mod_ValidateElements(mesh->elements, mesh->numtriangles, mesh->numverts, __FILE__, __LINE__);
-               Mod_BuildTriangleNeighbors(mesh->neighbors, mesh->elements, mesh->numtriangles);
+               Mod_ValidateElements(mesh->elements, mesh->num_triangles, mesh->num_vertices, __FILE__, __LINE__);
+               Mod_BuildTriangleNeighbors(mesh->neighbors, mesh->elements, mesh->num_triangles);
        }
 #endif
        return firstmesh;
@@ -784,7 +822,7 @@ static rtexture_t *GL_TextureForSkinLayer(const qbyte *in, int width, int height
 }
 
 static int detailtexturecycle = 0;
-int Mod_LoadSkinFrame (skinframe_t *skinframe, char *basename, int textureflags, int loadpantsandshirt, int usedetailtexture, int loadglowtexture)
+int Mod_LoadSkinFrame(skinframe_t *skinframe, char *basename, int textureflags, int loadpantsandshirt, int usedetailtexture, int loadglowtexture)
 {
        imageskin_t s;
        memset(skinframe, 0, sizeof(*skinframe));
@@ -794,7 +832,7 @@ int Mod_LoadSkinFrame (skinframe_t *skinframe, char *basename, int textureflags,
                skinframe->detail = mod_shared_detailtextures[(detailtexturecycle++) % NUM_DETAILTEXTURES];
        skinframe->base = R_LoadTexture2D (loadmodel->texturepool, basename, s.basepixels_width, s.basepixels_height, s.basepixels, TEXTYPE_RGBA, textureflags, NULL);
        if (s.nmappixels != NULL)
-               skinframe->nmap = R_LoadTexture2D (loadmodel->texturepool, va("%s_nmap", basename), s.basepixels_width, s.basepixels_height, s.nmappixels, TEXTYPE_RGBA, textureflags, NULL);
+               skinframe->nmap = R_LoadTexture2D (loadmodel->texturepool, va("%s_nmap", basename), s.nmappixels_width, s.nmappixels_height, s.nmappixels, TEXTYPE_RGBA, textureflags, NULL);
        if (s.glosspixels != NULL)
                skinframe->gloss = R_LoadTexture2D (loadmodel->texturepool, va("%s_gloss", basename), s.glosspixels_width, s.glosspixels_height, s.glosspixels, TEXTYPE_RGBA, textureflags, NULL);
        if (s.glowpixels != NULL && loadglowtexture)
@@ -812,7 +850,7 @@ int Mod_LoadSkinFrame (skinframe_t *skinframe, char *basename, int textureflags,
        return true;
 }
 
-int Mod_LoadSkinFrame_Internal (skinframe_t *skinframe, char *basename, int textureflags, int loadpantsandshirt, int usedetailtexture, int loadglowtexture, qbyte *skindata, int width, int height)
+int Mod_LoadSkinFrame_Internal(skinframe_t *skinframe, char *basename, int textureflags, int loadpantsandshirt, int usedetailtexture, int loadglowtexture, qbyte *skindata, int width, int height)
 {
        qbyte *temp1, *temp2;
        memset(skinframe, 0, sizeof(*skinframe));
@@ -854,3 +892,231 @@ int Mod_LoadSkinFrame_Internal (skinframe_t *skinframe, char *basename, int text
        }
        return true;
 }
+
+void Mod_GetTerrainVertex3fTexCoord2fFromRGBA(const qbyte *imagepixels, int imagewidth, int imageheight, int ix, int iy, float *vertex3f, float *texcoord2f, matrix4x4_t *pixelstepmatrix, matrix4x4_t *pixeltexturestepmatrix)
+{
+       float v[3], tc[3];
+       v[0] = ix;
+       v[1] = iy;
+       if (ix >= 0 && iy >= 0 && ix < imagewidth && iy < imageheight)
+               v[2] = (imagepixels[((iy*imagewidth)+ix)*4+0] + imagepixels[((iy*imagewidth)+ix)*4+1] + imagepixels[((iy*imagewidth)+ix)*4+2]) * (1.0f / 765.0f);
+       else
+               v[2] = 0;
+       Matrix4x4_Transform(pixelstepmatrix, v, vertex3f);
+       Matrix4x4_Transform(pixeltexturestepmatrix, v, tc);
+       texcoord2f[0] = tc[0];
+       texcoord2f[1] = tc[1];
+}
+
+void Mod_GetTerrainVertexFromRGBA(const qbyte *imagepixels, int imagewidth, int imageheight, int ix, int iy, float *vertex3f, float *svector3f, float *tvector3f, float *normal3f, float *texcoord2f, matrix4x4_t *pixelstepmatrix, matrix4x4_t *pixeltexturestepmatrix)
+{
+       float vup[3], vdown[3], vleft[3], vright[3];
+       float tcup[3], tcdown[3], tcleft[3], tcright[3];
+       float sv[3], tv[3], nl[3];
+       Mod_GetTerrainVertex3fTexCoord2fFromRGBA(imagepixels, imagewidth, imageheight, ix, iy, vertex3f, texcoord2f, pixelstepmatrix, pixeltexturestepmatrix);
+       Mod_GetTerrainVertex3fTexCoord2fFromRGBA(imagepixels, imagewidth, imageheight, ix, iy - 1, vup, tcup, pixelstepmatrix, pixeltexturestepmatrix);
+       Mod_GetTerrainVertex3fTexCoord2fFromRGBA(imagepixels, imagewidth, imageheight, ix, iy + 1, vdown, tcdown, pixelstepmatrix, pixeltexturestepmatrix);
+       Mod_GetTerrainVertex3fTexCoord2fFromRGBA(imagepixels, imagewidth, imageheight, ix - 1, iy, vleft, tcleft, pixelstepmatrix, pixeltexturestepmatrix);
+       Mod_GetTerrainVertex3fTexCoord2fFromRGBA(imagepixels, imagewidth, imageheight, ix + 1, iy, vright, tcright, pixelstepmatrix, pixeltexturestepmatrix);
+       Mod_BuildBumpVectors(vertex3f, vup, vright, texcoord2f, tcup, tcright, svector3f, tvector3f, normal3f);
+       Mod_BuildBumpVectors(vertex3f, vright, vdown, texcoord2f, tcright, tcdown, sv, tv, nl);
+       VectorAdd(svector3f, sv, svector3f);
+       VectorAdd(tvector3f, tv, tvector3f);
+       VectorAdd(normal3f, nl, normal3f);
+       Mod_BuildBumpVectors(vertex3f, vdown, vleft, texcoord2f, tcdown, tcleft, sv, tv, nl);
+       VectorAdd(svector3f, sv, svector3f);
+       VectorAdd(tvector3f, tv, tvector3f);
+       VectorAdd(normal3f, nl, normal3f);
+       Mod_BuildBumpVectors(vertex3f, vleft, vup, texcoord2f, tcleft, tcup, sv, tv, nl);
+       VectorAdd(svector3f, sv, svector3f);
+       VectorAdd(tvector3f, tv, tvector3f);
+       VectorAdd(normal3f, nl, normal3f);
+}
+
+void Mod_ConstructTerrainPatchFromRGBA(const qbyte *imagepixels, int imagewidth, int imageheight, int x1, int y1, int width, int height, int *element3i, int *neighbor3i, float *vertex3f, float *svector3f, float *tvector3f, float *normal3f, float *texcoord2f, matrix4x4_t *pixelstepmatrix, matrix4x4_t *pixeltexturestepmatrix)
+{
+       int x, y, ix, iy, *e;
+       e = element3i;
+       for (y = 0;y < height;y++)
+       {
+               for (x = 0;x < width;x++)
+               {
+                       e[0] = (y + 1) * (width + 1) + (x + 0);
+                       e[1] = (y + 0) * (width + 1) + (x + 0);
+                       e[2] = (y + 1) * (width + 1) + (x + 1);
+                       e[3] = (y + 0) * (width + 1) + (x + 0);
+                       e[4] = (y + 0) * (width + 1) + (x + 1);
+                       e[5] = (y + 1) * (width + 1) + (x + 1);
+                       e += 6;
+               }
+       }
+       Mod_BuildTriangleNeighbors(neighbor3i, element3i, width*height*2);
+       for (y = 0, iy = y1;y < height + 1;y++, iy++)
+               for (x = 0, ix = x1;x < width + 1;x++, ix++, vertex3f += 3, texcoord2f += 2, svector3f += 3, tvector3f += 3, normal3f += 3)
+                       Mod_GetTerrainVertexFromRGBA(imagepixels, imagewidth, imageheight, ix, iy, vertex3f, texcoord2f, svector3f, tvector3f, normal3f, pixelstepmatrix, pixeltexturestepmatrix);
+}
+
+skinfile_t *Mod_LoadSkinFiles(void)
+{
+       int i, words, numtags, line, tagsetsused = false, wordsoverflow;
+       char *text;
+       const char *data;
+       skinfile_t *skinfile, *first = NULL;
+       skinfileitem_t *skinfileitem;
+       char word[10][MAX_QPATH];
+       overridetagnameset_t tagsets[MAX_SKINS];
+       overridetagname_t tags[256];
+
+/*
+sample file:
+U_bodyBox,models/players/Legoman/BikerA2.tga
+U_RArm,models/players/Legoman/BikerA1.tga
+U_LArm,models/players/Legoman/BikerA1.tga
+U_armor,common/nodraw
+U_sword,common/nodraw
+U_shield,common/nodraw
+U_homb,common/nodraw
+U_backpack,common/nodraw
+U_colcha,common/nodraw
+tag_head,
+tag_weapon,
+tag_torso,
+*/
+       memset(tagsets, 0, sizeof(tagsets));
+       memset(word, 0, sizeof(word));
+       for (i = 0;i < MAX_SKINS && (data = text = FS_LoadFile(va("%s_%i.skin", loadmodel->name, i), true));i++)
+       {
+               numtags = 0;
+               skinfile = Mem_Alloc(tempmempool, sizeof(skinfile_t));
+               skinfile->next = first;
+               first = skinfile;
+               for(line = 0;;line++)
+               {
+                       // parse line
+                       if (!COM_ParseToken(&data, true))
+                               break;
+                       if (!strcmp(com_token, "\n"))
+                               continue;
+                       words = 0;
+                       wordsoverflow = false;
+                       do
+                       {
+                               if (words < 10)
+                                       strlcpy(word[words++], com_token, sizeof (word[0]));
+                               else
+                                       wordsoverflow = true;
+                       }
+                       while (COM_ParseToken(&data, true) && strcmp(com_token, "\n"));
+                       if (wordsoverflow)
+                       {
+                               Con_Printf("Mod_LoadSkinFiles: parsing error in file \"%s_%i.skin\" on line #%i: line with too many statements, skipping\n", loadmodel->name, i, line);
+                               continue;
+                       }
+                       // words is always >= 1
+                       if (!strcmp(word[0], "replace"))
+                       {
+                               if (words == 3)
+                               {
+                                       Con_DPrintf("Mod_LoadSkinFiles: parsed mesh \"%s\" shader replacement \"%s\"\n", word[1], word[2]);
+                                       skinfileitem = Mem_Alloc(tempmempool, sizeof(skinfileitem_t));
+                                       skinfileitem->next = skinfile->items;
+                                       skinfile->items = skinfileitem;
+                                       strlcpy (skinfileitem->name, word[1], sizeof (skinfileitem->name));
+                                       strlcpy (skinfileitem->replacement, word[2], sizeof (skinfileitem->replacement));
+                               }
+                               else
+                                       Con_Printf("Mod_LoadSkinFiles: parsing error in file \"%s_%i.skin\" on line #%i: wrong number of parameters to command \"%s\", see documentation in DP_GFX_SKINFILES extension in dpextensions.qc\n", loadmodel->name, i, line, word[0]);
+                       }
+                       else if (words == 2 && !strcmp(word[1], ","))
+                       {
+                               // tag name, like "tag_weapon,"
+                               Con_DPrintf("Mod_LoadSkinFiles: parsed tag #%i \"%s\"\n", numtags, word[0]);
+                               memset(tags + numtags, 0, sizeof(tags[numtags]));
+                               strlcpy (tags[numtags].name, word[0], sizeof (tags[numtags].name));
+                               numtags++;
+                       }
+                       else if (words == 3 && !strcmp(word[1], ","))
+                       {
+                               // mesh shader name, like "U_RArm,models/players/Legoman/BikerA1.tga"
+                               Con_DPrintf("Mod_LoadSkinFiles: parsed mesh \"%s\" shader replacement \"%s\"\n", word[0], word[2]);
+                               skinfileitem = Mem_Alloc(tempmempool, sizeof(skinfileitem_t));
+                               skinfileitem->next = skinfile->items;
+                               skinfile->items = skinfileitem;
+                               strlcpy (skinfileitem->name, word[0], sizeof (skinfileitem->name));
+                               strlcpy (skinfileitem->replacement, word[2], sizeof (skinfileitem->replacement));
+                       }
+                       else
+                               Con_Printf("Mod_LoadSkinFiles: parsing error in file \"%s_%i.skin\" on line #%i: does not look like tag or mesh specification, or replace command, see documentation in DP_GFX_SKINFILES extension in dpextensions.qc\n", loadmodel->name, i, line);
+               }
+               Mem_Free(text);
+
+               if (numtags)
+               {
+                       overridetagnameset_t *t;
+                       t = tagsets + i;
+                       t->num_overridetagnames = numtags;
+                       t->data_overridetagnames = Mem_Alloc(loadmodel->mempool, t->num_overridetagnames * sizeof(overridetagname_t));
+                       memcpy(t->data_overridetagnames, tags, t->num_overridetagnames * sizeof(overridetagname_t));
+                       tagsetsused = true;
+               }
+       }
+       if (tagsetsused)
+       {
+               loadmodel->data_overridetagnamesforskin = Mem_Alloc(loadmodel->mempool, i * sizeof(overridetagnameset_t));
+               memcpy(loadmodel->data_overridetagnamesforskin, tagsets, i * sizeof(overridetagnameset_t));
+       }
+       if (i)
+               loadmodel->numskins = i;
+       return first;
+}
+
+void Mod_FreeSkinFiles(skinfile_t *skinfile)
+{
+       skinfile_t *next;
+       skinfileitem_t *skinfileitem, *nextitem;
+       for (;skinfile;skinfile = next)
+       {
+               next = skinfile->next;
+               for (skinfileitem = skinfile->items;skinfileitem;skinfileitem = nextitem)
+               {
+                       nextitem = skinfileitem->next;
+                       Mem_Free(skinfileitem);
+               }
+               Mem_Free(skinfile);
+       }
+}
+
+int Mod_CountSkinFiles(skinfile_t *skinfile)
+{
+       int i;
+       for (i = 0;skinfile;skinfile = skinfile->next, i++);
+       return i;
+}
+
+int Mod_RemoveDegenerateTriangles(int numtriangles, const int *inelement3i, int *outelement3i, const float *vertex3f)
+{
+       int i, outtriangles;
+       float d, edgedir[3], temp[3];
+       // a degenerate triangle is one with no width (thickness, surface area)
+       // these are characterized by having all 3 points colinear (along a line)
+       // or having two points identical
+       for (i = 0, outtriangles = 0;i < numtriangles;i++, inelement3i += 3)
+       {
+               // calculate first edge
+               VectorSubtract(vertex3f + inelement3i[1] * 3, vertex3f + inelement3i[0] * 3, edgedir);
+               if (VectorLength2(edgedir) < 0.0001f)
+                       continue; // degenerate first edge (no length)
+               VectorNormalize(edgedir);
+               // check if third point is on the edge (colinear)
+               d = -DotProduct(vertex3f + inelement3i[2] * 3, edgedir);
+               VectorMA(vertex3f + inelement3i[2] * 3, d, edgedir, temp);
+               if (VectorLength2(temp) < 0.0001f)
+                       continue; // third point colinear with first edge
+               // valid triangle (no colinear points, no duplicate points)
+               VectorCopy(inelement3i, outelement3i);
+               outelement3i += 3;
+               outtriangles++;
+       }
+       return outtriangles;
+}
+