X-Git-Url: http://git.xonotic.org/?a=blobdiff_plain;f=model_alias.c;h=2d25e27bca20007b4454fd074f8851dbb868f5fb;hb=4a14d162b12e843464f90f705c57dae8a5693964;hp=44e716e367ef0cb2617152cc264f53afcd7df097;hpb=b843f9e493cdf6ab6b6feb71bfebe4572a67a422;p=xonotic%2Fdarkplaces.git diff --git a/model_alias.c b/model_alias.c index 44e716e3..2d25e27b 100644 --- a/model_alias.c +++ b/model_alias.c @@ -8,7 +8,7 @@ of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. @@ -19,718 +19,1401 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include "quakedef.h" +#include "image.h" +#include "r_shadow.h" -/* -=============== -Mod_AliasInit -=============== -*/ void Mod_AliasInit (void) { } -aliashdr_t *pheader; - -typedef struct +void Mod_Alias_GetMesh_Vertex3f(const model_t *model, const frameblend_t *frameblend, const surfmesh_t *mesh, float *out3f) { - int v[3]; - vec3_t normal; -} temptris_t; -temptris_t *temptris; -//stvert_t stverts[MAXALIASVERTS]; -//mtriangle_t triangles[MAXALIASTRIS]; - -// a pose is a single set of vertexes. a frame may be -// an animating sequence of poses -//trivertx_t *poseverts[MAXALIASFRAMES]; -int posenum; - -byte **player_8bit_texels_tbl; -byte *player_8bit_texels; - -float aliasbboxmin[3], aliasbboxmax[3]; // LordHavoc: proper bounding box considerations - -// LordHavoc: changed to use the normals from the model data itself -#define NUMVERTEXNORMALS 162 -extern float r_avertexnormals[NUMVERTEXNORMALS][3]; -void Mod_ConvertAliasVerts (int numverts, int numtris, vec3_t scale, vec3_t translate, trivertx_t *v, trivert2 *out) -{ - int i; - vec3_t temp; - for (i = 0;i < numverts;i++) + if (mesh->num_vertexboneweights) { - VectorCopy(v[i].v, out[i].v); - temp[0] = v[i].v[0] * scale[0] + translate[0]; - temp[1] = v[i].v[1] * scale[1] + translate[1]; - temp[2] = v[i].v[2] * scale[2] + translate[2]; - // update bounding box - if (temp[0] < aliasbboxmin[0]) aliasbboxmin[0] = temp[0]; - if (temp[1] < aliasbboxmin[1]) aliasbboxmin[1] = temp[1]; - if (temp[2] < aliasbboxmin[2]) aliasbboxmin[2] = temp[2]; - if (temp[0] > aliasbboxmax[0]) aliasbboxmax[0] = temp[0]; - if (temp[1] > aliasbboxmax[1]) aliasbboxmax[1] = temp[1]; - if (temp[2] > aliasbboxmax[2]) aliasbboxmax[2] = temp[2]; - out[i].n[0] = (signed char) (r_avertexnormals[v[i].lightnormalindex][0] * 127.0); - out[i].n[1] = (signed char) (r_avertexnormals[v[i].lightnormalindex][1] * 127.0); - out[i].n[2] = (signed char) (r_avertexnormals[v[i].lightnormalindex][2] * 127.0); - } - /* - int i, j; - vec3_t t1, t2; - struct - { - vec3_t v; - vec3_t normal; - int count; - } tempvert[MD2MAX_VERTS]; - temptris_t *tris; - // decompress vertices - for (i = 0;i < numverts;i++) - { - VectorCopy(v[i].v, out[i].v); - tempvert[i].v[0] = v[i].v[0] * scale[0] + translate[0]; - tempvert[i].v[1] = v[i].v[1] * scale[1] + translate[1]; - tempvert[i].v[2] = v[i].v[2] * scale[2] + translate[2]; - tempvert[i].normal[0] = tempvert[i].normal[1] = tempvert[i].normal[2] = 0; - tempvert[i].count = 0; - // update bounding box - if (tempvert[i].v[0] < aliasbboxmin[0]) aliasbboxmin[0] = tempvert[i].v[0]; - if (tempvert[i].v[1] < aliasbboxmin[1]) aliasbboxmin[1] = tempvert[i].v[1]; - if (tempvert[i].v[2] < aliasbboxmin[2]) aliasbboxmin[2] = tempvert[i].v[2]; - if (tempvert[i].v[0] > aliasbboxmax[0]) aliasbboxmax[0] = tempvert[i].v[0]; - if (tempvert[i].v[1] > aliasbboxmax[1]) aliasbboxmax[1] = tempvert[i].v[1]; - if (tempvert[i].v[2] > aliasbboxmax[2]) aliasbboxmax[2] = tempvert[i].v[2]; - } - // calculate surface normals - tris = temptris; - for (i = 0;i < numtris;i++) - { - VectorSubtract(tempvert[tris->v[0]].v, tempvert[tris->v[1]].v, t1); - VectorSubtract(tempvert[tris->v[2]].v, tempvert[tris->v[1]].v, t2); - CrossProduct(t1, t2, tris->normal); - VectorNormalize(tris->normal); - // add surface normal to vertices - for (j = 0;j < 3;j++) + int i, k, blends; + surfmeshvertexboneweight_t *v; + float *out, *matrix, m[12], bonepose[256][12]; + // vertex weighted skeletal + // interpolate matrices and concatenate them to their parents + for (i = 0;i < model->num_bones;i++) { - VectorAdd(tris->normal, tempvert[tris->v[j]].normal, tempvert[tris->v[j]].normal); - tempvert[tris->v[j]].count++; + for (k = 0;k < 12;k++) + m[k] = 0; + for (blends = 0;blends < 4 && frameblend[blends].lerp > 0;blends++) + { + matrix = model->data_poses + (frameblend[blends].frame * model->num_bones + i) * 12; + for (k = 0;k < 12;k++) + m[k] += matrix[k] * frameblend[blends].lerp; + } + if (model->data_bones[i].parent >= 0) + R_ConcatTransforms(bonepose[model->data_bones[i].parent], m, bonepose[i]); + else + for (k = 0;k < 12;k++) + bonepose[i][k] = m[k]; + } + // blend the vertex bone weights + memset(out3f, 0, mesh->num_vertices * sizeof(float[3])); + v = mesh->data_vertexboneweights; + for (i = 0;i < mesh->num_vertexboneweights;i++, v++) + { + out = out3f + v->vertexindex * 3; + matrix = bonepose[v->boneindex]; + // FIXME: this can very easily be optimized with SSE or 3DNow + out[0] += v->origin[0] * matrix[0] + v->origin[1] * matrix[1] + v->origin[2] * matrix[ 2] + v->origin[3] * matrix[ 3]; + out[1] += v->origin[0] * matrix[4] + v->origin[1] * matrix[5] + v->origin[2] * matrix[ 6] + v->origin[3] * matrix[ 7]; + out[2] += v->origin[0] * matrix[8] + v->origin[1] * matrix[9] + v->origin[2] * matrix[10] + v->origin[3] * matrix[11]; } - tris++; } - // average normals and write out 1.7bit format - for (i = 0;i < pheader->numtris;i++) + else { - VectorNormalize(tempvert[i].normal); - out[i].n[0] = (signed char) (tempvert[i].normal[0] * 127.0); - out[i].n[1] = (signed char) (tempvert[i].normal[1] * 127.0); - out[i].n[2] = (signed char) (tempvert[i].normal[2] * 127.0); + int i, vertcount; + float lerp1, lerp2, lerp3, lerp4; + const float *vertsbase, *verts1, *verts2, *verts3, *verts4; + // vertex morph + vertsbase = mesh->data_morphvertex3f; + vertcount = mesh->num_vertices; + verts1 = vertsbase + frameblend[0].frame * vertcount * 3; + lerp1 = frameblend[0].lerp; + if (frameblend[1].lerp) + { + verts2 = vertsbase + frameblend[1].frame * vertcount * 3; + lerp2 = frameblend[1].lerp; + if (frameblend[2].lerp) + { + verts3 = vertsbase + frameblend[2].frame * vertcount * 3; + lerp3 = frameblend[2].lerp; + if (frameblend[3].lerp) + { + verts4 = vertsbase + frameblend[3].frame * vertcount * 3; + lerp4 = frameblend[3].lerp; + for (i = 0;i < vertcount * 3;i++) + VectorMAMAMAM(lerp1, verts1 + i, lerp2, verts2 + i, lerp3, verts3 + i, lerp4, verts4 + i, out3f + i); + } + else + for (i = 0;i < vertcount * 3;i++) + VectorMAMAM(lerp1, verts1 + i, lerp2, verts2 + i, lerp3, verts3 + i, out3f + i); + } + else + for (i = 0;i < vertcount * 3;i++) + VectorMAM(lerp1, verts1 + i, lerp2, verts2 + i, out3f + i); + } + else + memcpy(out3f, verts1, vertcount * sizeof(float[3])); } - */ } -/* -================= -Mod_LoadAliasFrame -================= -*/ -void * Mod_LoadAliasFrame (void * pin, maliasframedesc_t *frame) +int Mod_Alias_GetTagMatrix(const model_t *model, int poseframe, int tagindex, matrix4x4_t *outmatrix) { - trivertx_t *pinframe; - int i; - daliasframe_t *pdaliasframe; - - pdaliasframe = (daliasframe_t *)pin; - - strcpy (frame->name, pdaliasframe->name); - frame->firstpose = posenum; - frame->numposes = 1; - - for (i=0 ; i<3 ; i++) + const float *boneframe; + float tempbonematrix[12], bonematrix[12]; + Matrix4x4_CreateIdentity(outmatrix); + if (model->num_bones) { - // these are byte values, so we don't have to worry about - // endianness - frame->bboxmin.v[i] = pdaliasframe->bboxmin.v[i]; - frame->bboxmax.v[i] = pdaliasframe->bboxmax.v[i]; // LordHavoc: was setting bboxmin a second time (bug) + if (tagindex < 0 || tagindex >= model->num_bones) + return 4; + if (poseframe >= model->num_poses) + return 6; + boneframe = model->data_poses + poseframe * model->num_bones * 12; + memcpy(bonematrix, boneframe + tagindex * 12, sizeof(float[12])); + while (model->data_bones[tagindex].parent >= 0) + { + memcpy(tempbonematrix, bonematrix, sizeof(float[12])); + R_ConcatTransforms(boneframe + model->data_bones[tagindex].parent * 12, tempbonematrix, bonematrix); + tagindex = model->data_bones[tagindex].parent; + } + outmatrix->m[0][0] = bonematrix[0]; + outmatrix->m[0][1] = bonematrix[1]; + outmatrix->m[0][2] = bonematrix[2]; + outmatrix->m[0][3] = bonematrix[3]; + outmatrix->m[1][0] = bonematrix[4]; + outmatrix->m[1][1] = bonematrix[5]; + outmatrix->m[1][2] = bonematrix[6]; + outmatrix->m[1][3] = bonematrix[7]; + outmatrix->m[2][0] = bonematrix[8]; + outmatrix->m[2][1] = bonematrix[9]; + outmatrix->m[2][2] = bonematrix[10]; + outmatrix->m[2][3] = bonematrix[11]; + outmatrix->m[3][0] = 0; + outmatrix->m[3][1] = 0; + outmatrix->m[3][2] = 0; + outmatrix->m[3][3] = 1; } - - pinframe = (trivertx_t *)(pdaliasframe + 1); - -// poseverts[posenum] = pinframe; - Mod_ConvertAliasVerts(pheader->numverts, pheader->numtris, pheader->scale, pheader->scale_origin, pinframe, (void *)((int) pheader + pheader->posedata + sizeof(trivert2) * pheader->numverts * posenum)); -// // LordHavoc: copy the frame data -// memcpy((void *)((int) pheader + pheader->posedata + sizeof(trivertx_t) * pheader->numverts * posenum), pinframe, sizeof(trivertx_t) * pheader->numverts); - posenum++; - - pinframe += pheader->numverts; - - return (void *)pinframe; + else if (model->num_tags) + { + if (tagindex < 0 || tagindex >= model->num_tags) + return 4; + if (poseframe >= model->num_tagframes) + return 6; + *outmatrix = model->data_tags[poseframe * model->num_tags + tagindex].matrix; + } + return 0; } +int Mod_Alias_GetTagIndexForName(const model_t *model, unsigned int skin, const char *tagname) +{ + int i; + if (model->data_overridetagnamesforskin && skin < (unsigned int)model->numskins && model->data_overridetagnamesforskin[(unsigned int)skin].num_overridetagnames) + for (i = 0;i < model->data_overridetagnamesforskin[skin].num_overridetagnames;i++) + if (!strcasecmp(tagname, model->data_overridetagnamesforskin[skin].data_overridetagnames[i].name)) + return i + 1; + if (model->num_bones) + for (i = 0;i < model->num_bones;i++) + if (!strcasecmp(tagname, model->data_bones[i].name)) + return i + 1; + if (model->num_tags) + for (i = 0;i < model->num_tags;i++) + if (!strcasecmp(tagname, model->data_tags[i].name)) + return i + 1; + return 0; +} -/* -================= -Mod_LoadAliasGroup -================= -*/ -void *Mod_LoadAliasGroup (void * pin, maliasframedesc_t *frame) +static void Mod_Alias_Mesh_CompileFrameZero(surfmesh_t *mesh) { - daliasgroup_t *pingroup; - int i, numframes; - daliasinterval_t *pin_intervals; - void *ptemp; - - pingroup = (daliasgroup_t *)pin; + frameblend_t frameblend[4] = {{0, 1}, {0, 0}, {0, 0}, {0, 0}}; + mesh->data_vertex3f = Mem_Alloc(loadmodel->mempool, mesh->num_vertices * sizeof(float[3][4])); + mesh->data_svector3f = mesh->data_vertex3f + mesh->num_vertices * 3; + mesh->data_tvector3f = mesh->data_vertex3f + mesh->num_vertices * 6; + mesh->data_normal3f = mesh->data_vertex3f + mesh->num_vertices * 9; + Mod_Alias_GetMesh_Vertex3f(loadmodel, frameblend, mesh, mesh->data_vertex3f); + Mod_BuildTextureVectorsAndNormals(0, mesh->num_vertices, mesh->num_triangles, mesh->data_vertex3f, mesh->data_texcoordtexture2f, mesh->data_element3i, mesh->data_svector3f, mesh->data_tvector3f, mesh->data_normal3f); +} - numframes = LittleLong (pingroup->numframes); +static void Mod_MDLMD2MD3_TraceBox(model_t *model, int frame, trace_t *trace, const vec3_t boxstartmins, const vec3_t boxstartmaxs, const vec3_t boxendmins, const vec3_t boxendmaxs, int hitsupercontentsmask) +{ + int i, linetrace; + float segmentmins[3], segmentmaxs[3]; + frameblend_t frameblend[4]; + msurface_t *surface; + surfmesh_t *mesh; + colbrushf_t *thisbrush_start = NULL, *thisbrush_end = NULL; + matrix4x4_t startmatrix, endmatrix; + memset(trace, 0, sizeof(*trace)); + trace->fraction = 1; + trace->realfraction = 1; + trace->hitsupercontentsmask = hitsupercontentsmask; + segmentmins[0] = min(boxstartmins[0], boxendmins[0]); + segmentmins[1] = min(boxstartmins[1], boxendmins[1]); + segmentmins[2] = min(boxstartmins[2], boxendmins[2]); + segmentmaxs[0] = max(boxstartmaxs[0], boxendmaxs[0]); + segmentmaxs[1] = max(boxstartmaxs[1], boxendmaxs[1]); + segmentmaxs[2] = max(boxstartmaxs[2], boxendmaxs[2]); + linetrace = VectorCompare(boxstartmins, boxstartmaxs) && VectorCompare(boxendmins, boxendmaxs); + if (!linetrace) + { + // box trace, performed as brush trace + Matrix4x4_CreateIdentity(&startmatrix); + Matrix4x4_CreateIdentity(&endmatrix); + thisbrush_start = Collision_BrushForBox(&startmatrix, boxstartmins, boxstartmaxs); + thisbrush_end = Collision_BrushForBox(&endmatrix, boxendmins, boxendmaxs); + } + memset(frameblend, 0, sizeof(frameblend)); + frameblend[0].frame = frame; + frameblend[0].lerp = 1; + for (i = 0, surface = model->data_surfaces;i < model->num_surfaces;i++, surface++) + { + mesh = surface->groupmesh; + Mod_Alias_GetMesh_Vertex3f(model, frameblend, mesh, varray_vertex3f); + if (linetrace) + Collision_TraceLineTriangleMeshFloat(trace, boxstartmins, boxendmins, mesh->num_triangles, mesh->data_element3i, varray_vertex3f, SUPERCONTENTS_SOLID, segmentmins, segmentmaxs); + else + Collision_TraceBrushTriangleMeshFloat(trace, thisbrush_start, thisbrush_end, mesh->num_triangles, mesh->data_element3i, varray_vertex3f, SUPERCONTENTS_SOLID, segmentmins, segmentmaxs); + } +} - frame->firstpose = posenum; - frame->numposes = numframes; +static void Mod_CalcAliasModelBBoxes (void) +{ + int vnum, meshnum; + float dist, yawradius, radius; + surfmesh_t *mesh; + float *v; + VectorClear(loadmodel->normalmins); + VectorClear(loadmodel->normalmaxs); + yawradius = 0; + radius = 0; + for (meshnum = 0;meshnum < loadmodel->num_surfaces;meshnum++) + { + mesh = loadmodel->meshlist[meshnum]; + for (vnum = 0, v = mesh->data_morphvertex3f;vnum < mesh->num_vertices * mesh->num_morphframes;vnum++, v += 3) + { + if (loadmodel->normalmins[0] > v[0]) loadmodel->normalmins[0] = v[0]; + if (loadmodel->normalmins[1] > v[1]) loadmodel->normalmins[1] = v[1]; + if (loadmodel->normalmins[2] > v[2]) loadmodel->normalmins[2] = v[2]; + if (loadmodel->normalmaxs[0] < v[0]) loadmodel->normalmaxs[0] = v[0]; + if (loadmodel->normalmaxs[1] < v[1]) loadmodel->normalmaxs[1] = v[1]; + if (loadmodel->normalmaxs[2] < v[2]) loadmodel->normalmaxs[2] = v[2]; + dist = v[0] * v[0] + v[1] * v[1]; + if (yawradius < dist) + yawradius = dist; + dist += v[2] * v[2]; + if (radius < dist) + radius = dist; + } + } + radius = sqrt(radius); + yawradius = sqrt(yawradius); + loadmodel->yawmins[0] = loadmodel->yawmins[1] = -yawradius; + loadmodel->yawmaxs[0] = loadmodel->yawmaxs[1] = yawradius; + loadmodel->yawmins[2] = loadmodel->normalmins[2]; + loadmodel->yawmaxs[2] = loadmodel->normalmaxs[2]; + loadmodel->rotatedmins[0] = loadmodel->rotatedmins[1] = loadmodel->rotatedmins[2] = -radius; + loadmodel->rotatedmaxs[0] = loadmodel->rotatedmaxs[1] = loadmodel->rotatedmaxs[2] = radius; + loadmodel->radius = radius; + loadmodel->radius2 = radius * radius; +} - for (i=0 ; i<3 ; i++) +static void Mod_ConvertAliasVerts (int inverts, vec3_t scale, vec3_t translate, trivertx_t *v, float *out3f, int *vertremap) +{ + int i, j; + vec3_t temp; + for (i = 0;i < inverts;i++) { - // these are byte values, so we don't have to worry about endianness - frame->bboxmin.v[i] = pingroup->bboxmin.v[i]; - frame->bboxmax.v[i] = pingroup->bboxmax.v[i]; // LordHavoc: was setting bboxmin a second time (bug) + if (vertremap[i] < 0 && vertremap[i+inverts] < 0) // only used vertices need apply... + continue; + temp[0] = v[i].v[0] * scale[0] + translate[0]; + temp[1] = v[i].v[1] * scale[1] + translate[1]; + temp[2] = v[i].v[2] * scale[2] + translate[2]; + j = vertremap[i]; // not onseam + if (j >= 0) + VectorCopy(temp, out3f + j * 3); + j = vertremap[i+inverts]; // onseam + if (j >= 0) + VectorCopy(temp, out3f + j * 3); } +} - pin_intervals = (daliasinterval_t *)(pingroup + 1); +static void Mod_MDL_LoadFrames (qbyte* datapointer, int inverts, vec3_t scale, vec3_t translate, int *vertremap) +{ + int i, f, pose, groupframes; + float interval; + daliasframetype_t *pframetype; + daliasframe_t *pinframe; + daliasgroup_t *group; + daliasinterval_t *intervals; + animscene_t *scene; + pose = 0; + scene = loadmodel->animscenes; + for (f = 0;f < loadmodel->numframes;f++) + { + pframetype = (daliasframetype_t *)datapointer; + datapointer += sizeof(daliasframetype_t); + if (LittleLong (pframetype->type) == ALIAS_SINGLE) + { + // a single frame is still treated as a group + interval = 0.1f; + groupframes = 1; + } + else + { + // read group header + group = (daliasgroup_t *)datapointer; + datapointer += sizeof(daliasgroup_t); + groupframes = LittleLong (group->numframes); - frame->interval = LittleFloat (pin_intervals->interval); + // intervals (time per frame) + intervals = (daliasinterval_t *)datapointer; + datapointer += sizeof(daliasinterval_t) * groupframes; - pin_intervals += numframes; + interval = LittleFloat (intervals->interval); // FIXME: support variable framerate groups + if (interval < 0.01f) + { + Con_Printf("%s has an invalid interval %f, changing to 0.1\n", loadmodel->name, interval); + interval = 0.1f; + } + } - ptemp = (void *)pin_intervals; + // get scene name from first frame + pinframe = (daliasframe_t *)datapointer; - for (i=0 ; inumverts, pheader->numtris, pheader->scale, pheader->scale_origin, (void *)((daliasframe_t *)ptemp + 1), (void *)((int) pheader + pheader->posedata + sizeof(trivert2) * pheader->numverts * posenum)); -// // LordHavoc: copy the frame data -// memcpy((void *)((int) pheader + pheader->posedata + sizeof(trivertx_t) * pheader->numverts * posenum), (void *)((daliasframe_t *)ptemp + 1), sizeof(trivertx_t) * pheader->numverts); - posenum++; + strcpy(scene->name, pinframe->name); + scene->firstframe = pose; + scene->framecount = groupframes; + scene->framerate = 1.0f / interval; + scene->loop = true; + scene++; - ptemp = (trivertx_t *)((daliasframe_t *)ptemp + 1) + pheader->numverts; + // read frames + for (i = 0;i < groupframes;i++) + { + pinframe = (daliasframe_t *)datapointer; + datapointer += sizeof(daliasframe_t); + Mod_ConvertAliasVerts(inverts, scale, translate, (trivertx_t *)datapointer, loadmodel->meshlist[0]->data_morphvertex3f + pose * loadmodel->meshlist[0]->num_vertices * 3, vertremap); + datapointer += sizeof(trivertx_t) * inverts; + pose++; + } } - - return ptemp; } -//========================================================= - -/* -================= -Mod_FloodFillSkin - -Fill background pixels so mipmapping doesn't have haloes - Ed -================= -*/ - -typedef struct +static skinframe_t missingskinframe; +static void Mod_BuildAliasSkinFromSkinFrame(texture_t *skin, skinframe_t *skinframe) { - short x, y; -} floodfill_t; - -extern unsigned d_8to24table[]; - -// must be a power of 2 -#define FLOODFILL_FIFO_SIZE 0x1000 -#define FLOODFILL_FIFO_MASK (FLOODFILL_FIFO_SIZE - 1) - -#define FLOODFILL_STEP( off, dx, dy ) \ -{ \ - if (pos[off] == fillcolor) \ - { \ - pos[off] = 255; \ - fifo[inpt].x = x + (dx), fifo[inpt].y = y + (dy); \ - inpt = (inpt + 1) & FLOODFILL_FIFO_MASK; \ - } \ - else if (pos[off] != 255) fdc = pos[off]; \ + // hack + if (skinframe == NULL) + { + skinframe = &missingskinframe; + memset(skinframe, 0, sizeof(*skinframe)); + skinframe->base = r_texture_notexture; + } + + skin->skin = *skinframe; + skin->currentframe = skin; + skin->basematerialflags = MATERIALFLAG_WALL; + if (skin->skin.fog) + skin->basematerialflags |= MATERIALFLAG_ALPHA | MATERIALFLAG_TRANSPARENT; + skin->currentmaterialflags = skin->basematerialflags; } -void Mod_FloodFillSkin( byte *skin, int skinwidth, int skinheight ) +static void Mod_BuildAliasSkinsFromSkinFiles(texture_t *skin, skinfile_t *skinfile, char *meshname, char *shadername) { - byte fillcolor = *skin; // assume this is the pixel to fill - floodfill_t fifo[FLOODFILL_FIFO_SIZE]; - int inpt = 0, outpt = 0; - int filledcolor = -1; - int i; - - if (filledcolor == -1) - { - filledcolor = 0; - // attempt to find opaque black - for (i = 0; i < 256; ++i) - if (d_8to24table[i] == (255 << 0)) // alpha 1.0 + int i; + skinfileitem_t *skinfileitem; + skinframe_t tempskinframe; + if (skinfile) + { + // the skin += loadmodel->num_surfaces part of this is because data_textures on alias models is arranged as [numskins][numsurfaces] + for (i = 0;skinfile;skinfile = skinfile->next, i++, skin += loadmodel->num_surfaces) + { + memset(skin, 0, sizeof(*skin)); + for (skinfileitem = skinfile->items;skinfileitem;skinfileitem = skinfileitem->next) { - filledcolor = i; - break; + // leave the skin unitialized (nodraw) if the replacement is "common/nodraw" or "textures/common/nodraw" + if (!strcmp(skinfileitem->name, meshname) && strcmp(skinfileitem->replacement, "common/nodraw") && strcmp(skinfileitem->replacement, "textures/common/nodraw")) + { + memset(&tempskinframe, 0, sizeof(tempskinframe)); + if (Mod_LoadSkinFrame(&tempskinframe, skinfileitem->replacement, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_ALPHA | TEXF_CLAMP | TEXF_PRECACHE | TEXF_PICMIP, true, false, true)) + Mod_BuildAliasSkinFromSkinFrame(skin, &tempskinframe); + else + { + if (cls.state != ca_dedicated) + Con_Printf("mesh \"%s\": failed to load skin #%i \"%s\", falling back to mesh's internal shader name \"%s\"\n", meshname, i, skinfileitem->replacement, shadername); + if (Mod_LoadSkinFrame(&tempskinframe, shadername, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_ALPHA | TEXF_CLAMP | TEXF_PRECACHE | TEXF_PICMIP, true, false, true)) + Mod_BuildAliasSkinFromSkinFrame(skin, &tempskinframe); + else + { + if (cls.state != ca_dedicated) + Con_Printf("failed to load skin \"%s\"\n", shadername); + Mod_BuildAliasSkinFromSkinFrame(skin, NULL); + } + } + } } + } + } + else + { + memset(&tempskinframe, 0, sizeof(tempskinframe)); + if (Mod_LoadSkinFrame(&tempskinframe, shadername, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_ALPHA | TEXF_CLAMP | TEXF_PRECACHE | TEXF_PICMIP, true, false, true)) + Mod_BuildAliasSkinFromSkinFrame(skin, &tempskinframe); + else + { + if (cls.state != ca_dedicated) + Con_Printf("failed to load mesh \"%s\" shader \"%s\"\n", meshname, shadername); + Mod_BuildAliasSkinFromSkinFrame(skin, NULL); + } } +} + +#define BOUNDI(VALUE,MIN,MAX) if (VALUE < MIN || VALUE >= MAX) Host_Error("model %s has an invalid ##VALUE (%d exceeds %d - %d)\n", loadmodel->name, VALUE, MIN, MAX); +#define BOUNDF(VALUE,MIN,MAX) if (VALUE < MIN || VALUE >= MAX) Host_Error("model %s has an invalid ##VALUE (%f exceeds %f - %f)\n", loadmodel->name, VALUE, MIN, MAX); +extern void R_Q1BSP_Draw(entity_render_t *ent); +extern void R_Q1BSP_DrawShadowVolume(entity_render_t *ent, vec3_t relativelightorigin, float lightradius, int numsurfaces, const int *surfacelist, const vec3_t lightmins, const vec3_t lightmaxs); +extern void R_Q1BSP_DrawLight(entity_render_t *ent, float *lightcolor, int numsurfaces, const int *surfacelist); +void Mod_IDP0_Load(model_t *mod, void *buffer) +{ + int i, j, version, totalskins, skinwidth, skinheight, groupframes, groupskins, numverts; + float scales, scalet, scale[3], translate[3], interval; + msurface_t *surface; + qbyte *data; + mdl_t *pinmodel; + stvert_t *pinstverts; + dtriangle_t *pintriangles; + daliasskintype_t *pinskintype; + daliasskingroup_t *pinskingroup; + daliasskininterval_t *pinskinintervals; + daliasframetype_t *pinframetype; + daliasgroup_t *pinframegroup; + qbyte *datapointer, *startframes, *startskins; + char name[MAX_QPATH]; + skinframe_t tempskinframe; + animscene_t *tempskinscenes; + texture_t *tempaliasskins; + float *vertst; + int *vertonseam, *vertremap; + skinfile_t *skinfiles; + + datapointer = buffer; + pinmodel = (mdl_t *)datapointer; + datapointer += sizeof(mdl_t); - // can't fill to filled color or to transparent color (used as visited marker) - if ((fillcolor == filledcolor) || (fillcolor == 255)) + version = LittleLong (pinmodel->version); + if (version != ALIAS_VERSION) + Host_Error ("%s has wrong version number (%i should be %i)", + loadmodel->name, version, ALIAS_VERSION); + + loadmodel->type = mod_alias; + loadmodel->DrawSky = NULL; + loadmodel->Draw = R_Q1BSP_Draw; + loadmodel->DrawShadowVolume = R_Q1BSP_DrawShadowVolume; + loadmodel->DrawLight = R_Q1BSP_DrawLight; + loadmodel->TraceBox = Mod_MDLMD2MD3_TraceBox; + + loadmodel->num_surfaces = 1; + loadmodel->nummodelsurfaces = loadmodel->num_surfaces; + loadmodel->nummeshes = loadmodel->num_surfaces; + data = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * sizeof(msurface_t) + loadmodel->num_surfaces * sizeof(int) + loadmodel->nummeshes * sizeof(surfmesh_t *) + loadmodel->nummeshes * sizeof(surfmesh_t)); + loadmodel->data_surfaces = (void *)data;data += loadmodel->num_surfaces * sizeof(msurface_t); + loadmodel->surfacelist = (void *)data;data += loadmodel->num_surfaces * sizeof(int); + loadmodel->meshlist = (void *)data;data += loadmodel->num_surfaces * sizeof(surfmesh_t *); + for (i = 0;i < loadmodel->num_surfaces;i++) { - //printf( "not filling skin from %d to %d\n", fillcolor, filledcolor ); - return; + loadmodel->surfacelist[i] = i; + loadmodel->meshlist[i] = (void *)data;data += sizeof(surfmesh_t); } - fifo[inpt].x = 0, fifo[inpt].y = 0; - inpt = (inpt + 1) & FLOODFILL_FIFO_MASK; + loadmodel->numskins = LittleLong(pinmodel->numskins); + BOUNDI(loadmodel->numskins,0,65536); + skinwidth = LittleLong (pinmodel->skinwidth); + BOUNDI(skinwidth,0,65536); + skinheight = LittleLong (pinmodel->skinheight); + BOUNDI(skinheight,0,65536); + numverts = LittleLong(pinmodel->numverts); + BOUNDI(numverts,0,65536); + loadmodel->meshlist[0]->num_triangles = LittleLong(pinmodel->numtris); + BOUNDI(loadmodel->meshlist[0]->num_triangles,0,65536); + loadmodel->numframes = LittleLong(pinmodel->numframes); + BOUNDI(loadmodel->numframes,0,65536); + loadmodel->synctype = LittleLong (pinmodel->synctype); + BOUNDI(loadmodel->synctype,0,2); + loadmodel->flags = LittleLong (pinmodel->flags); + + for (i = 0;i < 3;i++) + { + scale[i] = LittleFloat (pinmodel->scale[i]); + translate[i] = LittleFloat (pinmodel->scale_origin[i]); + } - while (outpt != inpt) + startskins = datapointer; + totalskins = 0; + for (i = 0;i < loadmodel->numskins;i++) { - int x = fifo[outpt].x, y = fifo[outpt].y; - int fdc = filledcolor; - byte *pos = &skin[x + skinwidth * y]; + pinskintype = (daliasskintype_t *)datapointer; + datapointer += sizeof(daliasskintype_t); + if (LittleLong(pinskintype->type) == ALIAS_SKIN_SINGLE) + groupskins = 1; + else + { + pinskingroup = (daliasskingroup_t *)datapointer; + datapointer += sizeof(daliasskingroup_t); + groupskins = LittleLong(pinskingroup->numskins); + datapointer += sizeof(daliasskininterval_t) * groupskins; + } + + for (j = 0;j < groupskins;j++) + { + datapointer += skinwidth * skinheight; + totalskins++; + } + } + + pinstverts = (stvert_t *)datapointer; + datapointer += sizeof(stvert_t) * numverts; + + pintriangles = (dtriangle_t *)datapointer; + datapointer += sizeof(dtriangle_t) * loadmodel->meshlist[0]->num_triangles; - outpt = (outpt + 1) & FLOODFILL_FIFO_MASK; + startframes = datapointer; + loadmodel->meshlist[0]->num_morphframes = 0; + for (i = 0;i < loadmodel->numframes;i++) + { + pinframetype = (daliasframetype_t *)datapointer; + datapointer += sizeof(daliasframetype_t); + if (LittleLong (pinframetype->type) == ALIAS_SINGLE) + groupframes = 1; + else + { + pinframegroup = (daliasgroup_t *)datapointer; + datapointer += sizeof(daliasgroup_t); + groupframes = LittleLong(pinframegroup->numframes); + datapointer += sizeof(daliasinterval_t) * groupframes; + } - if (x > 0) FLOODFILL_STEP( -1, -1, 0 ); - if (x < skinwidth - 1) FLOODFILL_STEP( 1, 1, 0 ); - if (y > 0) FLOODFILL_STEP( -skinwidth, 0, -1 ); - if (y < skinheight - 1) FLOODFILL_STEP( skinwidth, 0, 1 ); - skin[x + skinwidth * y] = fdc; + for (j = 0;j < groupframes;j++) + { + datapointer += sizeof(daliasframe_t); + datapointer += sizeof(trivertx_t) * numverts; + loadmodel->meshlist[0]->num_morphframes++; + } } -} -/* -=============== -Mod_LoadAllSkins -=============== -*/ -void *Mod_LoadAllSkins (int numskins, daliasskintype_t *pskintype, int bytesperpixel) -{ - int i, j, k; - char name[32]; - int s; - byte *skin; - byte *texels; - daliasskingroup_t *pinskingroup; - int groupskins; - daliasskininterval_t *pinskinintervals; - - skin = (byte *)(pskintype + 1); + // store texture coordinates into temporary array, they will be stored + // after usage is determined (triangle data) + vertst = Mem_Alloc(tempmempool, numverts * 2 * sizeof(float[2])); + vertremap = Mem_Alloc(tempmempool, numverts * 3 * sizeof(int)); + vertonseam = vertremap + numverts * 2; - if (numskins < 1 || numskins > MAX_SKINS) - Host_Error ("Mod_LoadAliasModel: Invalid # of skins: %d\n", numskins); + scales = 1.0 / skinwidth; + scalet = 1.0 / skinheight; + for (i = 0;i < numverts;i++) + { + vertonseam[i] = LittleLong(pinstverts[i].onseam); + vertst[i*2+0] = (LittleLong(pinstverts[i].s) + 0.5) * scales; + vertst[i*2+1] = (LittleLong(pinstverts[i].t) + 0.5) * scalet; + vertst[(i+numverts)*2+0] = vertst[i*2+0] + 0.5; + vertst[(i+numverts)*2+1] = vertst[i*2+1]; + } - s = pheader->skinwidth * pheader->skinheight; +// load triangle data + loadmodel->meshlist[0]->data_element3i = Mem_Alloc(loadmodel->mempool, sizeof(int[3]) * loadmodel->meshlist[0]->num_triangles); - for (i = 0;i < numskins;i++) + // read the triangle elements + for (i = 0;i < loadmodel->meshlist[0]->num_triangles;i++) + for (j = 0;j < 3;j++) + loadmodel->meshlist[0]->data_element3i[i*3+j] = LittleLong(pintriangles[i].vertindex[j]); + // validate (note numverts is used because this is the original data) + Mod_ValidateElements(loadmodel->meshlist[0]->data_element3i, loadmodel->meshlist[0]->num_triangles, numverts, __FILE__, __LINE__); + // now butcher the elements according to vertonseam and tri->facesfront + // and then compact the vertex set to remove duplicates + for (i = 0;i < loadmodel->meshlist[0]->num_triangles;i++) + if (!LittleLong(pintriangles[i].facesfront)) // backface + for (j = 0;j < 3;j++) + if (vertonseam[loadmodel->meshlist[0]->data_element3i[i*3+j]]) + loadmodel->meshlist[0]->data_element3i[i*3+j] += numverts; + // count the usage + // (this uses vertremap to count usage to save some memory) + for (i = 0;i < numverts*2;i++) + vertremap[i] = 0; + for (i = 0;i < loadmodel->meshlist[0]->num_triangles*3;i++) + vertremap[loadmodel->meshlist[0]->data_element3i[i]]++; + // build remapping table and compact array + loadmodel->meshlist[0]->num_vertices = 0; + for (i = 0;i < numverts*2;i++) { - if (pskintype->type == ALIAS_SKIN_SINGLE) + if (vertremap[i]) { - if (bytesperpixel == 1) - Mod_FloodFillSkin( skin, pheader->skinwidth, pheader->skinheight ); - - // save 8 bit texels for the player model to remap - // if (!strcmp(loadmodel->name,"progs/player.mdl")) { - texels = Hunk_AllocName(s, loadname); - pheader->texels[i] = texels - (byte *)pheader; - memcpy (texels, (byte *)(pskintype + 1), s); - // } - sprintf (name, "%s_%i", loadmodel->name, i); - pheader->gl_texturenum[i][0] = - pheader->gl_texturenum[i][1] = - pheader->gl_texturenum[i][2] = - pheader->gl_texturenum[i][3] = - GL_LoadTexture (name, pheader->skinwidth, pheader->skinheight, (byte *)(pskintype + 1), true, false, bytesperpixel); - pskintype = (daliasskintype_t *)((byte *)(pskintype+1) + s); + vertremap[i] = loadmodel->meshlist[0]->num_vertices; + vertst[loadmodel->meshlist[0]->num_vertices*2+0] = vertst[i*2+0]; + vertst[loadmodel->meshlist[0]->num_vertices*2+1] = vertst[i*2+1]; + loadmodel->meshlist[0]->num_vertices++; } else + vertremap[i] = -1; // not used at all + } + // remap the elements to the new vertex set + for (i = 0;i < loadmodel->meshlist[0]->num_triangles * 3;i++) + loadmodel->meshlist[0]->data_element3i[i] = vertremap[loadmodel->meshlist[0]->data_element3i[i]]; + // store the texture coordinates + loadmodel->meshlist[0]->data_texcoordtexture2f = Mem_Alloc(loadmodel->mempool, sizeof(float[2]) * loadmodel->meshlist[0]->num_vertices); + for (i = 0;i < loadmodel->meshlist[0]->num_vertices;i++) + { + loadmodel->meshlist[0]->data_texcoordtexture2f[i*2+0] = vertst[i*2+0]; + loadmodel->meshlist[0]->data_texcoordtexture2f[i*2+1] = vertst[i*2+1]; + } + +// load the frames + loadmodel->animscenes = Mem_Alloc(loadmodel->mempool, sizeof(animscene_t) * loadmodel->numframes); + loadmodel->meshlist[0]->data_morphvertex3f = Mem_Alloc(loadmodel->mempool, sizeof(float[3]) * loadmodel->meshlist[0]->num_morphframes * loadmodel->meshlist[0]->num_vertices); + loadmodel->meshlist[0]->data_neighbor3i = Mem_Alloc(loadmodel->mempool, loadmodel->meshlist[0]->num_triangles * sizeof(int[3])); + Mod_MDL_LoadFrames (startframes, numverts, scale, translate, vertremap); + Mod_BuildTriangleNeighbors(loadmodel->meshlist[0]->data_neighbor3i, loadmodel->meshlist[0]->data_element3i, loadmodel->meshlist[0]->num_triangles); + Mod_CalcAliasModelBBoxes(); + Mod_Alias_Mesh_CompileFrameZero(loadmodel->meshlist[0]); + + Mem_Free(vertst); + Mem_Free(vertremap); + + // load the skins + skinfiles = Mod_LoadSkinFiles(); + loadmodel->skinscenes = Mem_Alloc(loadmodel->mempool, loadmodel->numskins * sizeof(animscene_t)); + loadmodel->num_textures = loadmodel->num_surfaces; + loadmodel->data_textures = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * totalskins * sizeof(texture_t)); + if (skinfiles) + { + Mod_BuildAliasSkinsFromSkinFiles(loadmodel->data_textures, skinfiles, "default", ""); + Mod_FreeSkinFiles(skinfiles); + for (i = 0;i < loadmodel->numskins;i++) + { + loadmodel->skinscenes[i].firstframe = i; + loadmodel->skinscenes[i].framecount = 1; + loadmodel->skinscenes[i].loop = true; + loadmodel->skinscenes[i].framerate = 10; + } + } + else + { + totalskins = 0; + datapointer = startskins; + for (i = 0;i < loadmodel->numskins;i++) { - // animating skin group. yuck. - pskintype++; - pinskingroup = (daliasskingroup_t *)pskintype; - groupskins = LittleLong (pinskingroup->numskins); - pinskinintervals = (daliasskininterval_t *)(pinskingroup + 1); + pinskintype = (daliasskintype_t *)datapointer; + datapointer += sizeof(daliasskintype_t); + + if (pinskintype->type == ALIAS_SKIN_SINGLE) + { + groupskins = 1; + interval = 0.1f; + } + else + { + pinskingroup = (daliasskingroup_t *)datapointer; + datapointer += sizeof(daliasskingroup_t); - pskintype = (void *)(pinskinintervals + groupskins); + groupskins = LittleLong (pinskingroup->numskins); + + pinskinintervals = (daliasskininterval_t *)datapointer; + datapointer += sizeof(daliasskininterval_t) * groupskins; + + interval = LittleFloat(pinskinintervals[0].interval); + if (interval < 0.01f) + { + Con_Printf("%s has an invalid interval %f, changing to 0.1\n", loadmodel->name, interval); + interval = 0.1f; + } + } + + sprintf(loadmodel->skinscenes[i].name, "skin %i", i); + loadmodel->skinscenes[i].firstframe = totalskins; + loadmodel->skinscenes[i].framecount = groupskins; + loadmodel->skinscenes[i].framerate = 1.0f / interval; + loadmodel->skinscenes[i].loop = true; for (j = 0;j < groupskins;j++) { - if (bytesperpixel == 1) - Mod_FloodFillSkin( skin, pheader->skinwidth, pheader->skinheight ); - if (j == 0) - { - texels = Hunk_AllocName(s, loadname); - pheader->texels[i] = texels - (byte *)pheader; - memcpy (texels, (byte *)(pskintype), s); - } - sprintf (name, "%s_%i_%i", loadmodel->name, i,j); - pheader->gl_texturenum[i][j&3] = - GL_LoadTexture (name, pheader->skinwidth, pheader->skinheight, (byte *)(pskintype), true, false, bytesperpixel); - pskintype = (daliasskintype_t *)((byte *)(pskintype) + s); + if (groupskins > 1) + sprintf (name, "%s_%i_%i", loadmodel->name, i, j); + else + sprintf (name, "%s_%i", loadmodel->name, i); + if (!Mod_LoadSkinFrame(&tempskinframe, name, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_CLAMP | TEXF_ALPHA | TEXF_PICMIP, true, false, true)) + Mod_LoadSkinFrame_Internal(&tempskinframe, name, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_CLAMP | TEXF_ALPHA | TEXF_PICMIP, true, false, r_fullbrights.integer, (qbyte *)datapointer, skinwidth, skinheight); + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + totalskins * loadmodel->num_surfaces, &tempskinframe); + datapointer += skinwidth * skinheight; + totalskins++; } - k = j; - for (;j < 4;j++) - pheader->gl_texturenum[i][j&3] = pheader->gl_texturenum[i][j - k]; + } + // check for skins that don't exist in the model, but do exist as external images + // (this was added because yummyluv kept pestering me about support for it) + while (Mod_LoadSkinFrame(&tempskinframe, va("%s_%i", loadmodel->name, loadmodel->numskins), (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_CLAMP | TEXF_ALPHA | TEXF_PICMIP, true, false, true)) + { + // expand the arrays to make room + tempskinscenes = loadmodel->skinscenes; + loadmodel->skinscenes = Mem_Alloc(loadmodel->mempool, (loadmodel->numskins + 1) * sizeof(animscene_t)); + memcpy(loadmodel->skinscenes, tempskinscenes, loadmodel->numskins * sizeof(animscene_t)); + Mem_Free(tempskinscenes); + + tempaliasskins = loadmodel->data_textures; + loadmodel->data_textures = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * (totalskins + 1) * sizeof(texture_t)); + memcpy(loadmodel->data_textures, tempaliasskins, loadmodel->num_surfaces * totalskins * sizeof(texture_t)); + Mem_Free(tempaliasskins); + + // store the info about the new skin + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + totalskins * loadmodel->num_surfaces, &tempskinframe); + strcpy(loadmodel->skinscenes[loadmodel->numskins].name, name); + loadmodel->skinscenes[loadmodel->numskins].firstframe = totalskins; + loadmodel->skinscenes[loadmodel->numskins].framecount = 1; + loadmodel->skinscenes[loadmodel->numskins].framerate = 10.0f; + loadmodel->skinscenes[loadmodel->numskins].loop = true; + + //increase skin counts + loadmodel->numskins++; + totalskins++; } } - return (void *)pskintype; + surface = loadmodel->data_surfaces; + surface->texture = loadmodel->data_textures; + surface->groupmesh = loadmodel->meshlist[0]; + surface->num_firsttriangle = 0; + surface->num_triangles = surface->groupmesh->num_triangles; + surface->num_firstvertex = 0; + surface->num_vertices = surface->groupmesh->num_vertices; } -//========================================================================= - -//void GL_MakeAliasModelDisplayLists (model_t *m, aliashdr_t *hdr); - -/* -================= -Mod_LoadAliasModel -================= -*/ -#define BOUNDI(VALUE,MIN,MAX) if (VALUE < MIN || VALUE >= MAX) Host_Error("model %s has an invalid VALUE (%d exceeds %d - %d)\n", mod->name, VALUE, MIN, MAX); -#define BOUNDF(VALUE,MIN,MAX) if (VALUE < MIN || VALUE >= MAX) Host_Error("model %s has an invalid VALUE (%g exceeds %g - %g)\n", mod->name, VALUE, MIN, MAX); -void Mod_LoadAliasModel (model_t *mod, void *buffer) +static void Mod_MD2_ConvertVerts (vec3_t scale, vec3_t translate, trivertx_t *v, float *out3f, int numverts, int *vertremap) { - int i, j, version, numframes, size, start, end, total; - mdl_t *pinmodel; - stvert_t *pinstverts; - dtriangle_t *pintriangles; - daliasframetype_t *pframetype; - daliasskintype_t *pskintype; - // LordHavoc: 32bit textures - int bytesperpixel; - unsigned short *poutvertindices; - float *pouttexcoords, scales, scalet; - temptris_t *tris; - - start = Hunk_LowMark (); + int i; + trivertx_t *in; + for (i = 0;i < numverts;i++, out3f += 3) + { + in = v + vertremap[i]; + out3f[0] = in->v[0] * scale[0] + translate[0]; + out3f[1] = in->v[1] * scale[1] + translate[1]; + out3f[2] = in->v[2] * scale[2] + translate[2]; + } +} - if (!temptris) - temptris = malloc(sizeof(temptris_t) * MD2MAX_TRIANGLES); +void Mod_IDP2_Load(model_t *mod, void *buffer) +{ + int i, j, k, hashindex, num, numxyz, numst, xyz, st, skinwidth, skinheight, *vertremap, version, end, numverts; + float *stverts, s, t, scale[3], translate[3]; + qbyte *data; + msurface_t *surface; + md2_t *pinmodel; + qbyte *base, *datapointer; + md2frame_t *pinframe; + char *inskin; + md2triangle_t *intri; + unsigned short *inst; + struct md2verthash_s + { + struct md2verthash_s *next; + int xyz; + float st[2]; + } + *hash, **md2verthash, *md2verthashdata; + skinframe_t tempskinframe; + skinfile_t *skinfiles; - pinmodel = (mdl_t *)buffer; + pinmodel = buffer; + base = buffer; version = LittleLong (pinmodel->version); - if (version != ALIAS_VERSION && version != ALIAS32_VERSION) - Host_Error ("%s has wrong version number (%i should be %i or %i)", - mod->name, version, ALIAS_VERSION, ALIAS32_VERSION); - - mod->type = ALIASTYPE_MDL; - -// -// allocate space for a working header, plus all the data except the frames, -// skin and group info -// -// size = sizeof (aliashdr_t) + (LittleLong (pinmodel->numframes) - 1) * sizeof (pinmodel->frames[0])); - size = sizeof (aliashdr_t); - size += LittleLong (pinmodel->numverts) * sizeof(float[2][2]); - size += LittleLong (pinmodel->numtris) * sizeof(unsigned short[3]); - size += LittleLong (pinmodel->numframes) * (sizeof(trivert2) * LittleLong (pinmodel->numverts) + sizeof(maliasframedesc_t)); - BOUNDI(size,256,4194304); - pheader = Hunk_AllocName (size, loadname); - - mod->flags = LittleLong (pinmodel->flags); - mod->type = mod_alias; - -// endian-adjust and copy the data, starting with the alias model header - pheader->boundingradius = LittleFloat (pinmodel->boundingradius); - BOUNDF(pheader->boundingradius,0,65536); - pheader->numskins = LittleLong (pinmodel->numskins); - BOUNDI(pheader->numskins,0,256); - pheader->skinwidth = LittleLong (pinmodel->skinwidth); - BOUNDI(pheader->skinwidth,0,4096); - pheader->skinheight = LittleLong (pinmodel->skinheight); - BOUNDI(pheader->skinheight,0,1024); -//LordHavoc: 32bit textures - bytesperpixel = version == ALIAS32_VERSION ? 4 : 1; - -// if (pheader->skinheight > MAX_LBM_HEIGHT) -// Host_Error ("model %s has a skin taller than %d", mod->name, MAX_LBM_HEIGHT); - - pheader->numverts = LittleLong (pinmodel->numverts); - BOUNDI(pheader->numverts,0,MAXALIASVERTS); - /* - if (pheader->numverts <= 0) - Host_Error ("model %s has no vertices", mod->name); - if (pheader->numverts > MAXALIASVERTS) - Host_Error ("model %s has too many vertices", mod->name); - */ - - pheader->numtris = LittleLong (pinmodel->numtris); - BOUNDI(pheader->numtris,0,65536); -// if (pheader->numtris <= 0) -// Host_Error ("model %s has no triangles", mod->name); - - pheader->numframes = LittleLong (pinmodel->numframes); - BOUNDI(pheader->numframes,0,65536); - numframes = pheader->numframes; -// if (numframes < 1) -// Host_Error ("Mod_LoadAliasModel: Invalid # of frames: %d\n", numframes); - - pheader->size = LittleFloat (pinmodel->size) * ALIAS_BASE_SIZE_RATIO; - BOUNDF(pheader->size,0,65536); - mod->synctype = LittleLong (pinmodel->synctype); - BOUNDI(pheader->synctype,0,2); - mod->numframes = pheader->numframes; - - for (i=0 ; i<3 ; i++) - { - pheader->scale[i] = LittleFloat (pinmodel->scale[i]); - BOUNDF(pheader->scale[i],0,65536); - pheader->scale_origin[i] = LittleFloat (pinmodel->scale_origin[i]); - BOUNDF(pheader->scale_origin[i],-65536,65536); - pheader->eyeposition[i] = LittleFloat (pinmodel->eyeposition[i]); - BOUNDF(pheader->eyeposition[i],-65536,65536); - } - -// load the skins - pskintype = (daliasskintype_t *)&pinmodel[1]; - pskintype = Mod_LoadAllSkins (pheader->numskins, pskintype, bytesperpixel); - -// load base s and t vertices - pinstverts = (stvert_t *)pskintype; - pouttexcoords = (float *)&pheader->frames[numframes]; - pheader->texcoords = (int) pouttexcoords - (int) pheader; - - // LordHavoc: byteswap and convert stvert data - scales = 1.0 / pheader->skinwidth; - scalet = 1.0 / pheader->skinheight; - for (i = 0;i < pheader->numverts;i++) + if (version != MD2ALIAS_VERSION) + Host_Error ("%s has wrong version number (%i should be %i)", + loadmodel->name, version, MD2ALIAS_VERSION); + + loadmodel->type = mod_alias; + loadmodel->DrawSky = NULL; + loadmodel->Draw = R_Q1BSP_Draw; + loadmodel->DrawShadowVolume = R_Q1BSP_DrawShadowVolume; + loadmodel->DrawLight = R_Q1BSP_DrawLight; + loadmodel->TraceBox = Mod_MDLMD2MD3_TraceBox; + + if (LittleLong(pinmodel->num_tris) < 1 || LittleLong(pinmodel->num_tris) > 65536) + Host_Error ("%s has invalid number of triangles: %i", loadmodel->name, LittleLong(pinmodel->num_tris)); + if (LittleLong(pinmodel->num_xyz) < 1 || LittleLong(pinmodel->num_xyz) > 65536) + Host_Error ("%s has invalid number of vertices: %i", loadmodel->name, LittleLong(pinmodel->num_xyz)); + if (LittleLong(pinmodel->num_frames) < 1 || LittleLong(pinmodel->num_frames) > 65536) + Host_Error ("%s has invalid number of frames: %i", loadmodel->name, LittleLong(pinmodel->num_frames)); + if (LittleLong(pinmodel->num_skins) < 0 || LittleLong(pinmodel->num_skins) > 256) + Host_Error ("%s has invalid number of skins: %i", loadmodel->name, LittleLong(pinmodel->num_skins)); + + end = LittleLong(pinmodel->ofs_end); + if (LittleLong(pinmodel->num_skins) >= 1 && (LittleLong(pinmodel->ofs_skins) <= 0 || LittleLong(pinmodel->ofs_skins) >= end)) + Host_Error ("%s is not a valid model", loadmodel->name); + if (LittleLong(pinmodel->ofs_st) <= 0 || LittleLong(pinmodel->ofs_st) >= end) + Host_Error ("%s is not a valid model", loadmodel->name); + if (LittleLong(pinmodel->ofs_tris) <= 0 || LittleLong(pinmodel->ofs_tris) >= end) + Host_Error ("%s is not a valid model", loadmodel->name); + if (LittleLong(pinmodel->ofs_frames) <= 0 || LittleLong(pinmodel->ofs_frames) >= end) + Host_Error ("%s is not a valid model", loadmodel->name); + if (LittleLong(pinmodel->ofs_glcmds) <= 0 || LittleLong(pinmodel->ofs_glcmds) >= end) + Host_Error ("%s is not a valid model", loadmodel->name); + + loadmodel->num_surfaces = 1; + loadmodel->nummodelsurfaces = loadmodel->num_surfaces; + loadmodel->nummeshes = loadmodel->num_surfaces; + data = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * sizeof(msurface_t) + loadmodel->num_surfaces * sizeof(int) + loadmodel->nummeshes * sizeof(surfmesh_t *) + loadmodel->nummeshes * sizeof(surfmesh_t)); + loadmodel->data_surfaces = (void *)data;data += loadmodel->num_surfaces * sizeof(msurface_t); + loadmodel->surfacelist = (void *)data;data += loadmodel->num_surfaces * sizeof(int); + loadmodel->meshlist = (void *)data;data += loadmodel->num_surfaces * sizeof(surfmesh_t *); + for (i = 0;i < loadmodel->num_surfaces;i++) { - pouttexcoords[i*2] = LittleLong (pinstverts[i].s) * scales; - pouttexcoords[i*2+1] = LittleLong (pinstverts[i].t) * scalet; - pouttexcoords[(i+pheader->numverts)*2] = LittleLong (pinstverts[i].s) * scales + 0.5; - pouttexcoords[(i+pheader->numverts)*2+1] = LittleLong (pinstverts[i].t) * scalet; - if (pouttexcoords[i*2] >= 0.5) // already a back side coordinate + loadmodel->surfacelist[i] = i; + loadmodel->meshlist[i] = (void *)data;data += sizeof(surfmesh_t); + } + + loadmodel->numskins = LittleLong(pinmodel->num_skins); + numxyz = LittleLong(pinmodel->num_xyz); + numst = LittleLong(pinmodel->num_st); + loadmodel->meshlist[0]->num_triangles = LittleLong(pinmodel->num_tris); + loadmodel->numframes = LittleLong(pinmodel->num_frames); + loadmodel->meshlist[0]->num_morphframes = loadmodel->numframes; + loadmodel->animscenes = Mem_Alloc(loadmodel->mempool, loadmodel->numframes * sizeof(animscene_t)); + + loadmodel->flags = 0; // there are no MD2 flags + loadmodel->synctype = ST_RAND; + + // load the skins + inskin = (void*)(base + LittleLong(pinmodel->ofs_skins)); + skinfiles = Mod_LoadSkinFiles(); + if (skinfiles) + { + loadmodel->num_textures = loadmodel->num_surfaces; + loadmodel->data_textures = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t)); + Mod_BuildAliasSkinsFromSkinFiles(loadmodel->data_textures, skinfiles, "default", ""); + Mod_FreeSkinFiles(skinfiles); + } + else if (loadmodel->numskins) + { + // skins found (most likely not a player model) + loadmodel->num_textures = loadmodel->num_surfaces; + loadmodel->data_textures = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t)); + for (i = 0;i < loadmodel->numskins;i++, inskin += MD2_SKINNAME) { - pouttexcoords[i*2] -= 0.5; - pouttexcoords[(i+pheader->numverts)*2] -= 0.5; + if (Mod_LoadSkinFrame(&tempskinframe, inskin, (r_mipskins.integer ? TEXF_MIPMAP : 0) | TEXF_ALPHA | TEXF_CLAMP | TEXF_PRECACHE | TEXF_PICMIP, true, false, true)) + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + i * loadmodel->num_surfaces, &tempskinframe); + else + { + Con_Printf("%s is missing skin \"%s\"\n", loadmodel->name, inskin); + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + i * loadmodel->num_surfaces, NULL); + } } - BOUNDF(pouttexcoords[i*2],0,1); - BOUNDF(pouttexcoords[i*2+1],0,1); - BOUNDF(pouttexcoords[(i+pheader->numverts)*2],0,1); - BOUNDF(pouttexcoords[(i+pheader->numverts)*2+1],0,1); + } + else + { + // no skins (most likely a player model) + loadmodel->numskins = 1; + loadmodel->num_textures = loadmodel->num_surfaces; + loadmodel->data_textures = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t)); + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures, NULL); } -// load triangle data - pintriangles = (dtriangle_t *)&pinstverts[pheader->numverts]; - poutvertindices = (unsigned short *)&pouttexcoords[pheader->numverts*4]; - pheader->vertindices = (int) poutvertindices - (int) pheader; - // LordHavoc: sort triangles into front and back lists - // so they can be drawn refering to different texture coordinate arrays, - // but sharing vertex data - pheader->frontfaces = 0; - pheader->backfaces = 0; - tris = temptris; - for (i=0 ; inumtris ; i++) - { - if (LittleLong(pintriangles[i].facesfront)) + loadmodel->skinscenes = Mem_Alloc(loadmodel->mempool, sizeof(animscene_t) * loadmodel->numskins); + for (i = 0;i < loadmodel->numskins;i++) + { + loadmodel->skinscenes[i].firstframe = i; + loadmodel->skinscenes[i].framecount = 1; + loadmodel->skinscenes[i].loop = true; + loadmodel->skinscenes[i].framerate = 10; + } + + // load the triangles and stvert data + inst = (void*)(base + LittleLong(pinmodel->ofs_st)); + intri = (void*)(base + LittleLong(pinmodel->ofs_tris)); + skinwidth = LittleLong(pinmodel->skinwidth); + skinheight = LittleLong(pinmodel->skinheight); + + stverts = Mem_Alloc(tempmempool, numst * sizeof(float[2])); + s = 1.0f / skinwidth; + t = 1.0f / skinheight; + for (i = 0;i < numst;i++) + { + j = (unsigned short) LittleShort(inst[i*2+0]); + k = (unsigned short) LittleShort(inst[i*2+1]); + if (j >= skinwidth || k >= skinheight) { - pheader->frontfaces++; - for (j=0 ; j<3 ; j++) - *poutvertindices++ = LittleLong (pintriangles[i].vertindex[j]); + Con_Printf("%s has an invalid skin coordinate (%i %i) on vert %i, changing to 0 0\n", loadmodel->name, j, k, i); + j = 0; + k = 0; } - for (j=0 ; j<3 ; j++) - tris->v[j] = LittleLong (pintriangles[i].vertindex[j]); - tris++; + stverts[i*2+0] = j * s; + stverts[i*2+1] = k * t; } - for (i=0 ; inumtris ; i++) + + md2verthash = Mem_Alloc(tempmempool, 256 * sizeof(hash)); + md2verthashdata = Mem_Alloc(tempmempool, loadmodel->meshlist[0]->num_triangles * 3 * sizeof(*hash)); + // swap the triangle list + num = 0; + loadmodel->meshlist[0]->data_element3i = Mem_Alloc(loadmodel->mempool, loadmodel->meshlist[0]->num_triangles * sizeof(int[3])); + for (i = 0;i < loadmodel->meshlist[0]->num_triangles;i++) { - if (!LittleLong(pintriangles[i].facesfront)) + for (j = 0;j < 3;j++) { - pheader->backfaces++; - for (j=0 ; j<3 ; j++) - *poutvertindices++ = LittleLong (pintriangles[i].vertindex[j]); + xyz = (unsigned short) LittleShort (intri[i].index_xyz[j]); + st = (unsigned short) LittleShort (intri[i].index_st[j]); + if (xyz >= numxyz) + { + Con_Printf("%s has an invalid xyz index (%i) on triangle %i, resetting to 0\n", loadmodel->name, xyz, i); + xyz = 0; + } + if (st >= numst) + { + Con_Printf("%s has an invalid st index (%i) on triangle %i, resetting to 0\n", loadmodel->name, st, i); + st = 0; + } + s = stverts[st*2+0]; + t = stverts[st*2+1]; + hashindex = (xyz * 17 + st) & 255; + for (hash = md2verthash[hashindex];hash;hash = hash->next) + if (hash->xyz == xyz && hash->st[0] == s && hash->st[1] == t) + break; + if (hash == NULL) + { + hash = md2verthashdata + num++; + hash->xyz = xyz; + hash->st[0] = s; + hash->st[1] = t; + hash->next = md2verthash[hashindex]; + md2verthash[hashindex] = hash; + } + loadmodel->meshlist[0]->data_element3i[i*3+j] = (hash - md2verthashdata); } } -// load the frames - posenum = 0; - pheader->posedata = (int) poutvertindices - (int) pheader; - pframetype = (daliasframetype_t *)&pintriangles[pheader->numtris]; - - // LordHavoc: doing proper bbox for model - aliasbboxmin[0] = aliasbboxmin[1] = aliasbboxmin[2] = 1000000000; - aliasbboxmax[0] = aliasbboxmax[1] = aliasbboxmax[2] = -1000000000; + Mem_Free(stverts); - for (i=0 ; imeshlist[0]->num_vertices = numverts; + vertremap = Mem_Alloc(loadmodel->mempool, num * sizeof(int)); + loadmodel->meshlist[0]->data_texcoordtexture2f = Mem_Alloc(loadmodel->mempool, num * sizeof(float[2])); + for (i = 0;i < num;i++) { - aliasframetype_t frametype; - - frametype = LittleLong (pframetype->type); - - if (frametype == ALIAS_SINGLE) - pframetype = (daliasframetype_t *) Mod_LoadAliasFrame (pframetype + 1, &pheader->frames[i]); - else - pframetype = (daliasframetype_t *) Mod_LoadAliasGroup (pframetype + 1, &pheader->frames[i]); + hash = md2verthashdata + i; + vertremap[i] = hash->xyz; + loadmodel->meshlist[0]->data_texcoordtexture2f[i*2+0] = hash->st[0]; + loadmodel->meshlist[0]->data_texcoordtexture2f[i*2+1] = hash->st[1]; } - pheader->numposes = posenum; + Mem_Free(md2verthash); + Mem_Free(md2verthashdata); - // LordHavoc: fixed model bbox - was //FIXME: do this right - //mod->mins[0] = mod->mins[1] = mod->mins[2] = -16; - //mod->maxs[0] = mod->maxs[1] = mod->maxs[2] = 16; - for (j = 0;j < 3;j++) + // load the frames + datapointer = (base + LittleLong(pinmodel->ofs_frames)); + loadmodel->meshlist[0]->data_morphvertex3f = Mem_Alloc(loadmodel->mempool, numverts * loadmodel->meshlist[0]->num_morphframes * sizeof(float[3])); + for (i = 0;i < loadmodel->meshlist[0]->num_morphframes;i++) { - mod->mins[j] = aliasbboxmin[j]; - mod->maxs[j] = aliasbboxmax[j]; + pinframe = (md2frame_t *)datapointer; + datapointer += sizeof(md2frame_t); + for (j = 0;j < 3;j++) + { + scale[j] = LittleFloat(pinframe->scale[j]); + translate[j] = LittleFloat(pinframe->translate[j]); + } + Mod_MD2_ConvertVerts(scale, translate, (void *)datapointer, loadmodel->meshlist[0]->data_morphvertex3f + i * numverts * 3, numverts, vertremap); + datapointer += numxyz * sizeof(trivertx_t); + + strcpy(loadmodel->animscenes[i].name, pinframe->name); + loadmodel->animscenes[i].firstframe = i; + loadmodel->animscenes[i].framecount = 1; + loadmodel->animscenes[i].framerate = 10; + loadmodel->animscenes[i].loop = true; } -// move the complete, relocatable alias model to the cache - end = Hunk_LowMark (); - total = end - start; - - Cache_Alloc (&mod->cache, total, loadname); - if (!mod->cache.data) - return; - memcpy (mod->cache.data, pheader, total); + Mem_Free(vertremap); + + loadmodel->meshlist[0]->data_neighbor3i = Mem_Alloc(loadmodel->mempool, loadmodel->meshlist[0]->num_triangles * sizeof(int[3])); + Mod_BuildTriangleNeighbors(loadmodel->meshlist[0]->data_neighbor3i, loadmodel->meshlist[0]->data_element3i, loadmodel->meshlist[0]->num_triangles); + Mod_CalcAliasModelBBoxes(); + Mod_Alias_Mesh_CompileFrameZero(loadmodel->meshlist[0]); - Hunk_FreeToLowMark (start); + surface = loadmodel->data_surfaces; + surface->groupmesh = loadmodel->meshlist[0]; + surface->texture = loadmodel->data_textures; + surface->num_firsttriangle = 0; + surface->num_triangles = surface->groupmesh->num_triangles; + surface->num_firstvertex = 0; + surface->num_vertices = surface->groupmesh->num_vertices; } -/* -================= -Mod_LoadQ2AliasModel -================= -*/ -int loadtextureimage (int texnum, char* filename, qboolean complain, int matchwidth, int matchheight); -void Mod_LoadQ2AliasModel (model_t *mod, void *buffer) +void Mod_IDP3_Load(model_t *mod, void *buffer) { - int i, j, version, size, *pinglcmd, *poutglcmd, start, end, total, framesize; - md2_t *pinmodel; - md2mem_t *pheader; - md2triangle_t *pintriangles, *pouttriangles; - md2frame_t *pinframe; - md2memframe_t *poutframe; - char *pinskins; - temptris_t *tris; - - start = Hunk_LowMark (); - - if (!temptris) - temptris = malloc(sizeof(temptris_t) * MD2MAX_TRIANGLES); - - pinmodel = (md2_t *)buffer; - + int i, j, k, version; + qbyte *data; + msurface_t *surface; + surfmesh_t *mesh; + md3modelheader_t *pinmodel; + md3frameinfo_t *pinframe; + md3mesh_t *pinmesh; + md3tag_t *pintag; + skinfile_t *skinfiles; + + pinmodel = buffer; + + if (memcmp(pinmodel->identifier, "IDP3", 4)) + Host_Error ("%s is not a MD3 (IDP3) file\n", loadmodel->name); version = LittleLong (pinmodel->version); - if (version != MD2ALIAS_VERSION) + if (version != MD3VERSION) Host_Error ("%s has wrong version number (%i should be %i)", - mod->name, version, MD2ALIAS_VERSION); - - mod->type = mod_alias; - mod->aliastype = ALIASTYPE_MD2; - - framesize = sizeof(md2memframe_t) + LittleLong(pinmodel->num_xyz) * sizeof(trivert2); - // LordHavoc: calculate size for in memory version - size = sizeof(md2mem_t) - + LittleLong(pinmodel->num_st) * sizeof(md2stvert_t) - + LittleLong(pinmodel->num_tris) * sizeof(md2triangle_t) - + LittleLong(pinmodel->num_frames) * framesize - + LittleLong(pinmodel->num_glcmds) * sizeof(int); - if (size <= 0 || size >= MD2MAX_SIZE) - Host_Error ("%s is not a valid model", mod->name); - pheader = Hunk_AllocName (size, loadname); - - mod->flags = 0; // there are no MD2 flags - mod->numframes = LittleLong(pinmodel->num_frames); - mod->synctype = ST_RAND; - - if (LittleLong(pinmodel->num_skins) >= 1 && (LittleLong(pinmodel->ofs_skins <= 0) || LittleLong(pinmodel->ofs_skins) >= LittleLong(pinmodel->ofs_end))) - Host_Error ("%s is not a valid model", mod->name); - if (LittleLong(pinmodel->ofs_st <= 0) || LittleLong(pinmodel->ofs_st) >= LittleLong(pinmodel->ofs_end)) - Host_Error ("%s is not a valid model", mod->name); - if (LittleLong(pinmodel->ofs_tris <= 0) || LittleLong(pinmodel->ofs_tris) >= LittleLong(pinmodel->ofs_end)) - Host_Error ("%s is not a valid model", mod->name); - if (LittleLong(pinmodel->ofs_frames <= 0) || LittleLong(pinmodel->ofs_frames) >= LittleLong(pinmodel->ofs_end)) - Host_Error ("%s is not a valid model", mod->name); - if (LittleLong(pinmodel->ofs_glcmds <= 0) || LittleLong(pinmodel->ofs_glcmds) >= LittleLong(pinmodel->ofs_end)) - Host_Error ("%s is not a valid model", mod->name); - - if (LittleLong(pinmodel->num_tris < 1) || LittleLong(pinmodel->num_tris) > MD2MAX_TRIANGLES) - Host_Error ("%s has invalid number of triangles: %i", mod->name, LittleLong(pinmodel->num_tris)); - if (LittleLong(pinmodel->num_xyz < 1) || LittleLong(pinmodel->num_xyz) > MD2MAX_VERTS) - Host_Error ("%s has invalid number of vertices: %i", mod->name, LittleLong(pinmodel->num_xyz)); - if (LittleLong(pinmodel->num_frames < 1) || LittleLong(pinmodel->num_frames) > 256) //MD2MAX_FRAMES) - Host_Error ("%s has invalid number of frames: %i", mod->name, LittleLong(pinmodel->num_frames)); - if (LittleLong(pinmodel->num_skins < 0) || LittleLong(pinmodel->num_skins) > MD2MAX_SKINS) - Host_Error ("%s has invalid number of skins: %i", mod->name, LittleLong(pinmodel->num_skins)); - - pheader->framesize = framesize; - pheader->num_skins = LittleLong(pinmodel->num_skins); - pheader->num_xyz = LittleLong(pinmodel->num_xyz); - pheader->num_st = LittleLong(pinmodel->num_st); - pheader->num_tris = LittleLong(pinmodel->num_tris); - pheader->num_frames = LittleLong(pinmodel->num_frames); - pheader->num_glcmds = LittleLong(pinmodel->num_glcmds); - -// load the skins - if (pheader->num_skins) - { - pinskins = (void*)((int) pinmodel + LittleLong(pinmodel->ofs_skins)); - for (i = 0;i < pheader->num_skins;i++) + loadmodel->name, version, MD3VERSION); + + skinfiles = Mod_LoadSkinFiles(); + if (loadmodel->numskins < 1) + loadmodel->numskins = 1; + + loadmodel->type = mod_alias; + loadmodel->DrawSky = NULL; + loadmodel->Draw = R_Q1BSP_Draw; + loadmodel->DrawShadowVolume = R_Q1BSP_DrawShadowVolume; + loadmodel->DrawLight = R_Q1BSP_DrawLight; + loadmodel->TraceBox = Mod_MDLMD2MD3_TraceBox; + loadmodel->flags = LittleLong(pinmodel->flags); + loadmodel->synctype = ST_RAND; + + // set up some global info about the model + loadmodel->numframes = LittleLong(pinmodel->num_frames); + loadmodel->num_surfaces = LittleLong(pinmodel->num_meshes); + + // make skinscenes for the skins (no groups) + loadmodel->skinscenes = Mem_Alloc(loadmodel->mempool, sizeof(animscene_t) * loadmodel->numskins); + for (i = 0;i < loadmodel->numskins;i++) + { + loadmodel->skinscenes[i].firstframe = i; + loadmodel->skinscenes[i].framecount = 1; + loadmodel->skinscenes[i].loop = true; + loadmodel->skinscenes[i].framerate = 10; + } + + // load frameinfo + loadmodel->animscenes = Mem_Alloc(loadmodel->mempool, loadmodel->numframes * sizeof(animscene_t)); + for (i = 0, pinframe = (md3frameinfo_t *)((qbyte *)pinmodel + LittleLong(pinmodel->lump_frameinfo));i < loadmodel->numframes;i++, pinframe++) + { + strcpy(loadmodel->animscenes[i].name, pinframe->name); + loadmodel->animscenes[i].firstframe = i; + loadmodel->animscenes[i].framecount = 1; + loadmodel->animscenes[i].framerate = 10; + loadmodel->animscenes[i].loop = true; + } + + // load tags + loadmodel->num_tagframes = loadmodel->numframes; + loadmodel->num_tags = LittleLong(pinmodel->num_tags); + loadmodel->data_tags = Mem_Alloc(loadmodel->mempool, loadmodel->num_tagframes * loadmodel->num_tags * sizeof(aliastag_t)); + for (i = 0, pintag = (md3tag_t *)((qbyte *)pinmodel + LittleLong(pinmodel->lump_tags));i < loadmodel->num_tagframes * loadmodel->num_tags;i++, pintag++) + { + strcpy(loadmodel->data_tags[i].name, pintag->name); + Matrix4x4_CreateIdentity(&loadmodel->data_tags[i].matrix); + for (j = 0;j < 3;j++) { - pheader->gl_texturenum[i] = loadtextureimage (-1, pinskins, TRUE, 0, 0); - pinskins += MD2MAX_SKINNAME; + for (k = 0;k < 3;k++) + loadmodel->data_tags[i].matrix.m[j][k] = LittleFloat(pintag->rotationmatrix[k * 3 + j]); + loadmodel->data_tags[i].matrix.m[j][3] = LittleFloat(pintag->origin[j]); } + //Con_Printf("model \"%s\" frame #%i tag #%i \"%s\"\n", loadmodel->name, i / loadmodel->num_tags, i % loadmodel->num_tags, loadmodel->data_tags[i].name); } -// load triangles - pintriangles = (void*)((int) pinmodel + LittleLong(pinmodel->ofs_tris)); - pouttriangles = (void*)&pheader[1]; - pheader->ofs_tris = (int) pouttriangles - (int) pheader; - tris = temptris; - // swap the triangle list - for (i=0 ; inum_tris ; i++) + // load meshes + loadmodel->nummodelsurfaces = loadmodel->num_surfaces; + loadmodel->nummeshes = loadmodel->num_surfaces; + loadmodel->num_textures = loadmodel->num_surfaces; + data = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * sizeof(msurface_t) + loadmodel->num_surfaces * sizeof(int) + loadmodel->nummeshes * sizeof(surfmesh_t *) + loadmodel->nummeshes * sizeof(surfmesh_t) + loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t)); + loadmodel->data_surfaces = (void *)data;data += loadmodel->num_surfaces * sizeof(msurface_t); + loadmodel->surfacelist = (void *)data;data += loadmodel->num_surfaces * sizeof(int); + loadmodel->meshlist = (void *)data;data += loadmodel->num_surfaces * sizeof(surfmesh_t *); + loadmodel->data_textures = (void *)data;data += loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t); + for (i = 0;i < loadmodel->num_surfaces;i++) { - for (j=0 ; j<3 ; j++) + loadmodel->surfacelist[i] = i; + loadmodel->meshlist[i] = (void *)data;data += sizeof(surfmesh_t); + } + for (i = 0, pinmesh = (md3mesh_t *)((qbyte *)pinmodel + LittleLong(pinmodel->lump_meshes));i < loadmodel->num_surfaces;i++, pinmesh = (md3mesh_t *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_end))) + { + if (memcmp(pinmesh->identifier, "IDP3", 4)) + Host_Error("Mod_IDP3_Load: invalid mesh identifier (not IDP3)\n"); + mesh = loadmodel->meshlist[i]; + mesh->num_morphframes = LittleLong(pinmesh->num_frames); + mesh->num_vertices = LittleLong(pinmesh->num_vertices); + mesh->num_triangles = LittleLong(pinmesh->num_triangles); + mesh->data_element3i = Mem_Alloc(loadmodel->mempool, mesh->num_triangles * sizeof(int[3])); + mesh->data_neighbor3i = Mem_Alloc(loadmodel->mempool, mesh->num_triangles * sizeof(int[3])); + mesh->data_texcoordtexture2f = Mem_Alloc(loadmodel->mempool, mesh->num_vertices * sizeof(float[2])); + mesh->data_morphvertex3f = Mem_Alloc(loadmodel->mempool, mesh->num_vertices * mesh->num_morphframes * sizeof(float[3])); + for (j = 0;j < mesh->num_triangles * 3;j++) + mesh->data_element3i[j] = LittleLong(((int *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_elements)))[j]); + for (j = 0;j < mesh->num_vertices;j++) + { + mesh->data_texcoordtexture2f[j * 2 + 0] = LittleFloat(((float *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_texcoords)))[j * 2 + 0]); + mesh->data_texcoordtexture2f[j * 2 + 1] = LittleFloat(((float *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_texcoords)))[j * 2 + 1]); + } + for (j = 0;j < mesh->num_vertices * mesh->num_morphframes;j++) { - tris->v[j] = pouttriangles->index_xyz[j] = LittleShort (pintriangles->index_xyz[j]); - pouttriangles->index_st[j] = LittleShort (pintriangles->index_st[j]); - if (pouttriangles->index_xyz[j] >= pheader->num_xyz) - Host_Error ("%s has invalid vertex indices", mod->name); - if (pouttriangles->index_st[j] >= pheader->num_st) - Host_Error ("%s has invalid vertex indices", mod->name); + mesh->data_morphvertex3f[j * 3 + 0] = LittleShort(((short *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_framevertices)))[j * 4 + 0]) * (1.0f / 64.0f); + mesh->data_morphvertex3f[j * 3 + 1] = LittleShort(((short *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_framevertices)))[j * 4 + 1]) * (1.0f / 64.0f); + mesh->data_morphvertex3f[j * 3 + 2] = LittleShort(((short *)((qbyte *)pinmesh + LittleLong(pinmesh->lump_framevertices)))[j * 4 + 2]) * (1.0f / 64.0f); } - pintriangles++; - pouttriangles++; - tris++; + + Mod_ValidateElements(mesh->data_element3i, mesh->num_triangles, mesh->num_vertices, __FILE__, __LINE__); + Mod_BuildTriangleNeighbors(mesh->data_neighbor3i, mesh->data_element3i, mesh->num_triangles); + Mod_Alias_Mesh_CompileFrameZero(mesh); + + if (LittleLong(pinmesh->num_shaders) >= 1) + Mod_BuildAliasSkinsFromSkinFiles(loadmodel->data_textures + i, skinfiles, pinmesh->name, ((md3shader_t *)((qbyte *) pinmesh + LittleLong(pinmesh->lump_shaders)))->name); + else + for (j = 0;j < loadmodel->numskins;j++) + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + i + j * loadmodel->num_surfaces, NULL); + + surface = loadmodel->data_surfaces + i; + surface->groupmesh = mesh; + surface->texture = loadmodel->data_textures + i; + surface->num_firsttriangle = 0; + surface->num_triangles = mesh->num_triangles; + surface->num_firstvertex = 0; + surface->num_vertices = mesh->num_vertices; } + Mod_CalcAliasModelBBoxes(); + Mod_FreeSkinFiles(skinfiles); +} - // LordHavoc: doing proper bbox for model - aliasbboxmin[0] = aliasbboxmin[1] = aliasbboxmin[2] = 1000000000; - aliasbboxmax[0] = aliasbboxmax[1] = aliasbboxmax[2] = -1000000000; +void Mod_ZYMOTICMODEL_Load(model_t *mod, void *buffer) +{ + zymtype1header_t *pinmodel, *pheader; + qbyte *pbase; + int i, j, k, l, numposes, *bonecount, *vertbonecounts, count, *renderlist, *renderlistend, *outelements, *remapvertices; + float modelradius, corner[2], *poses, *intexcoord2f, *outtexcoord2f; + zymvertex_t *verts, *vertdata; + zymscene_t *scene; + zymbone_t *bone; + char *shadername; + skinfile_t *skinfiles; + qbyte *data; + msurface_t *surface; + surfmesh_t *mesh; + + pinmodel = (void *)buffer; + pbase = buffer; + if (memcmp(pinmodel->id, "ZYMOTICMODEL", 12)) + Host_Error ("Mod_ZYMOTICMODEL_Load: %s is not a zymotic model\n"); + if (BigLong(pinmodel->type) != 1) + Host_Error ("Mod_ZYMOTICMODEL_Load: only type 1 (skeletal pose) models are currently supported (name = %s)\n", loadmodel->name); + + loadmodel->type = mod_alias; + loadmodel->DrawSky = NULL; + loadmodel->Draw = R_Q1BSP_Draw; + loadmodel->DrawShadowVolume = R_Q1BSP_DrawShadowVolume; + loadmodel->DrawLight = R_Q1BSP_DrawLight; + loadmodel->TraceBox = Mod_MDLMD2MD3_TraceBox; + loadmodel->flags = 0; // there are no flags on zym models + loadmodel->synctype = ST_RAND; + + // byteswap header + pheader = pinmodel; + pheader->type = BigLong(pinmodel->type); + pheader->filesize = BigLong(pinmodel->filesize); + pheader->mins[0] = BigFloat(pinmodel->mins[0]); + pheader->mins[1] = BigFloat(pinmodel->mins[1]); + pheader->mins[2] = BigFloat(pinmodel->mins[2]); + pheader->maxs[0] = BigFloat(pinmodel->maxs[0]); + pheader->maxs[1] = BigFloat(pinmodel->maxs[1]); + pheader->maxs[2] = BigFloat(pinmodel->maxs[2]); + pheader->radius = BigFloat(pinmodel->radius); + pheader->numverts = BigLong(pinmodel->numverts); + pheader->numtris = BigLong(pinmodel->numtris); + pheader->numshaders = BigLong(pinmodel->numshaders); + pheader->numbones = BigLong(pinmodel->numbones); + pheader->numscenes = BigLong(pinmodel->numscenes); + pheader->lump_scenes.start = BigLong(pinmodel->lump_scenes.start); + pheader->lump_scenes.length = BigLong(pinmodel->lump_scenes.length); + pheader->lump_poses.start = BigLong(pinmodel->lump_poses.start); + pheader->lump_poses.length = BigLong(pinmodel->lump_poses.length); + pheader->lump_bones.start = BigLong(pinmodel->lump_bones.start); + pheader->lump_bones.length = BigLong(pinmodel->lump_bones.length); + pheader->lump_vertbonecounts.start = BigLong(pinmodel->lump_vertbonecounts.start); + pheader->lump_vertbonecounts.length = BigLong(pinmodel->lump_vertbonecounts.length); + pheader->lump_verts.start = BigLong(pinmodel->lump_verts.start); + pheader->lump_verts.length = BigLong(pinmodel->lump_verts.length); + pheader->lump_texcoords.start = BigLong(pinmodel->lump_texcoords.start); + pheader->lump_texcoords.length = BigLong(pinmodel->lump_texcoords.length); + pheader->lump_render.start = BigLong(pinmodel->lump_render.start); + pheader->lump_render.length = BigLong(pinmodel->lump_render.length); + pheader->lump_shaders.start = BigLong(pinmodel->lump_shaders.start); + pheader->lump_shaders.length = BigLong(pinmodel->lump_shaders.length); + pheader->lump_trizone.start = BigLong(pinmodel->lump_trizone.start); + pheader->lump_trizone.length = BigLong(pinmodel->lump_trizone.length); + + loadmodel->numframes = pheader->numscenes; + loadmodel->num_surfaces = pheader->numshaders; + + skinfiles = Mod_LoadSkinFiles(); + if (loadmodel->numskins < 1) + loadmodel->numskins = 1; + + // make skinscenes for the skins (no groups) + loadmodel->skinscenes = Mem_Alloc(loadmodel->mempool, sizeof(animscene_t) * loadmodel->numskins); + for (i = 0;i < loadmodel->numskins;i++) + { + loadmodel->skinscenes[i].firstframe = i; + loadmodel->skinscenes[i].framecount = 1; + loadmodel->skinscenes[i].loop = true; + loadmodel->skinscenes[i].framerate = 10; + } -// load the frames - pinframe = (void*) ((int) pinmodel + LittleLong(pinmodel->ofs_frames)); - poutframe = (void*) pouttriangles; - pheader->ofs_frames = (int) poutframe - (int) pheader; - for (i=0 ; inum_frames ; i++) + // model bbox + modelradius = pheader->radius; + for (i = 0;i < 3;i++) { - for (j = 0;j < 3;j++) - { - poutframe->scale[j] = LittleFloat(pinframe->scale[j]); - poutframe->translate[j] = LittleFloat(pinframe->translate[j]); - } - Mod_ConvertAliasVerts (pheader->num_xyz, pheader->num_tris, poutframe->scale, poutframe->translate, &pinframe->verts[0], &poutframe->verts[0]); - pinframe = (void*) &pinframe->verts[j]; - poutframe = (void*) &poutframe->verts[j]; + loadmodel->normalmins[i] = pheader->mins[i]; + loadmodel->normalmaxs[i] = pheader->maxs[i]; + loadmodel->rotatedmins[i] = -modelradius; + loadmodel->rotatedmaxs[i] = modelradius; + } + corner[0] = max(fabs(loadmodel->normalmins[0]), fabs(loadmodel->normalmaxs[0])); + corner[1] = max(fabs(loadmodel->normalmins[1]), fabs(loadmodel->normalmaxs[1])); + loadmodel->yawmaxs[0] = loadmodel->yawmaxs[1] = sqrt(corner[0]*corner[0]+corner[1]*corner[1]); + if (loadmodel->yawmaxs[0] > modelradius) + loadmodel->yawmaxs[0] = loadmodel->yawmaxs[1] = modelradius; + loadmodel->yawmins[0] = loadmodel->yawmins[1] = -loadmodel->yawmaxs[0]; + loadmodel->yawmins[2] = loadmodel->normalmins[2]; + loadmodel->yawmaxs[2] = loadmodel->normalmaxs[2]; + loadmodel->radius = modelradius; + loadmodel->radius2 = modelradius * modelradius; + + // go through the lumps, swapping things + + //zymlump_t lump_scenes; // zymscene_t scene[numscenes]; // name and other information for each scene (see zymscene struct) + loadmodel->animscenes = Mem_Alloc(loadmodel->mempool, sizeof(animscene_t) * loadmodel->numframes); + scene = (void *) (pheader->lump_scenes.start + pbase); + numposes = pheader->lump_poses.length / pheader->numbones / sizeof(float[3][4]); + for (i = 0;i < pheader->numscenes;i++) + { + memcpy(loadmodel->animscenes[i].name, scene->name, 32); + loadmodel->animscenes[i].firstframe = BigLong(scene->start); + loadmodel->animscenes[i].framecount = BigLong(scene->length); + loadmodel->animscenes[i].framerate = BigFloat(scene->framerate); + loadmodel->animscenes[i].loop = (BigLong(scene->flags) & ZYMSCENEFLAG_NOLOOP) == 0; + if ((unsigned int) loadmodel->animscenes[i].firstframe >= (unsigned int) numposes) + Host_Error("%s scene->firstframe (%i) >= numposes (%i)\n", loadmodel->name, loadmodel->animscenes[i].firstframe, numposes); + if ((unsigned int) loadmodel->animscenes[i].firstframe + (unsigned int) loadmodel->animscenes[i].framecount > (unsigned int) numposes) + Host_Error("%s scene->firstframe (%i) + framecount (%i) >= numposes (%i)\n", loadmodel->name, loadmodel->animscenes[i].firstframe, loadmodel->animscenes[i].framecount, numposes); + if (loadmodel->animscenes[i].framerate < 0) + Host_Error("%s scene->framerate (%f) < 0\n", loadmodel->name, loadmodel->animscenes[i].framerate); + scene++; + } + + //zymlump_t lump_poses; // float pose[numposes][numbones][3][4]; // animation data + loadmodel->num_poses = pheader->lump_poses.length / sizeof(float[3][4]); + loadmodel->data_poses = Mem_Alloc(loadmodel->mempool, pheader->lump_poses.length); + poses = (void *) (pheader->lump_poses.start + pbase); + for (i = 0;i < pheader->lump_poses.length / 4;i++) + loadmodel->data_poses[i] = BigFloat(poses[i]); + + //zymlump_t lump_bones; // zymbone_t bone[numbones]; + loadmodel->num_bones = pheader->numbones; + loadmodel->data_bones = Mem_Alloc(loadmodel->mempool, pheader->numbones * sizeof(aliasbone_t)); + bone = (void *) (pheader->lump_bones.start + pbase); + for (i = 0;i < pheader->numbones;i++) + { + memcpy(loadmodel->data_bones[i].name, bone[i].name, sizeof(bone[i].name)); + loadmodel->data_bones[i].flags = BigLong(bone[i].flags); + loadmodel->data_bones[i].parent = BigLong(bone[i].parent); + if (loadmodel->data_bones[i].parent >= i) + Host_Error("%s bone[%i].parent >= %i\n", loadmodel->name, i, i); + } + + //zymlump_t lump_vertbonecounts; // int vertbonecounts[numvertices]; // how many bones influence each vertex (separate mainly to make this compress better) + vertbonecounts = Mem_Alloc(loadmodel->mempool, pheader->numverts * sizeof(int)); + bonecount = (void *) (pheader->lump_vertbonecounts.start + pbase); + for (i = 0;i < pheader->numverts;i++) + { + vertbonecounts[i] = BigLong(bonecount[i]); + if (vertbonecounts[i] < 1) + Host_Error("%s bonecount[%i] < 1\n", loadmodel->name, i); } - // LordHavoc: model bbox - for (j = 0;j < 3;j++) + //zymlump_t lump_verts; // zymvertex_t vert[numvertices]; // see vertex struct + verts = Mem_Alloc(loadmodel->mempool, pheader->lump_verts.length); + vertdata = (void *) (pheader->lump_verts.start + pbase); + for (i = 0;i < pheader->lump_verts.length / (int) sizeof(zymvertex_t);i++) { - mod->mins[j] = aliasbboxmin[j]; - mod->maxs[j] = aliasbboxmax[j]; + verts[i].bonenum = BigLong(vertdata[i].bonenum); + verts[i].origin[0] = BigFloat(vertdata[i].origin[0]); + verts[i].origin[1] = BigFloat(vertdata[i].origin[1]); + verts[i].origin[2] = BigFloat(vertdata[i].origin[2]); } - // load the draw list - pinglcmd = (void*) ((int) pinmodel + LittleLong(pinmodel->ofs_glcmds)); - poutglcmd = (void*) poutframe; - pheader->ofs_glcmds = (int) poutglcmd - (int) pheader; - for (i = 0;i < pheader->num_glcmds;i++) - *poutglcmd++ = LittleLong(*pinglcmd++); + //zymlump_t lump_texcoords; // float texcoords[numvertices][2]; + outtexcoord2f = Mem_Alloc(loadmodel->mempool, pheader->numverts * sizeof(float[2])); + intexcoord2f = (void *) (pheader->lump_texcoords.start + pbase); + for (i = 0;i < pheader->numverts;i++) + { + outtexcoord2f[i*2+0] = BigFloat(intexcoord2f[i*2+0]); + // flip T coordinate for OpenGL + outtexcoord2f[i*2+1] = 1 - BigFloat(intexcoord2f[i*2+1]); + } + + //zymlump_t lump_trizone; // byte trizone[numtris]; // see trizone explanation + //loadmodel->alias.zymdata_trizone = Mem_Alloc(loadmodel->mempool, pheader->numtris); + //memcpy(loadmodel->alias.zymdata_trizone, (void *) (pheader->lump_trizone.start + pbase), pheader->numtris); + + loadmodel->nummodelsurfaces = loadmodel->num_surfaces; + loadmodel->nummeshes = loadmodel->num_surfaces; + loadmodel->num_textures = loadmodel->num_surfaces; + data = Mem_Alloc(loadmodel->mempool, loadmodel->num_surfaces * sizeof(msurface_t) + loadmodel->num_surfaces * sizeof(int) + loadmodel->nummeshes * sizeof(surfmesh_t *) + loadmodel->nummeshes * sizeof(surfmesh_t) + loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t)); + loadmodel->data_surfaces = (void *)data;data += loadmodel->num_surfaces * sizeof(msurface_t); + loadmodel->surfacelist = (void *)data;data += loadmodel->num_surfaces * sizeof(int); + loadmodel->meshlist = (void *)data;data += loadmodel->num_surfaces * sizeof(surfmesh_t *); + loadmodel->data_textures = (void *)data;data += loadmodel->num_surfaces * loadmodel->numskins * sizeof(texture_t); + for (i = 0;i < loadmodel->num_surfaces;i++) + { + loadmodel->surfacelist[i] = i; + loadmodel->meshlist[i] = (void *)data;data += sizeof(surfmesh_t); + } + + //zymlump_t lump_shaders; // char shadername[numshaders][32]; // shaders used on this model + //zymlump_t lump_render; // int renderlist[rendersize]; // sorted by shader with run lengths (int count), shaders are sequentially used, each run can be used with glDrawElements (each triangle is 3 int indices) + // byteswap, validate, and swap winding order of tris + count = pheader->numshaders * sizeof(int) + pheader->numtris * sizeof(int[3]); + if (pheader->lump_render.length != count) + Host_Error("%s renderlist is wrong size (%i bytes, should be %i bytes)\n", loadmodel->name, pheader->lump_render.length, count); + renderlist = (void *) (pheader->lump_render.start + pbase); + renderlistend = (void *) ((qbyte *) renderlist + pheader->lump_render.length); + for (i = 0;i < loadmodel->num_surfaces;i++) + { + if (renderlist >= renderlistend) + Host_Error("%s corrupt renderlist (wrong size)\n", loadmodel->name); + count = BigLong(*renderlist);renderlist++; + if (renderlist + count * 3 > renderlistend || (i == pheader->numshaders - 1 && renderlist + count * 3 != renderlistend)) + Host_Error("%s corrupt renderlist (wrong size)\n", loadmodel->name); + mesh = loadmodel->meshlist[i]; + mesh->num_triangles = count; + mesh->data_element3i = Mem_Alloc(loadmodel->mempool, mesh->num_triangles * sizeof(int[3])); + mesh->data_neighbor3i = Mem_Alloc(loadmodel->mempool, mesh->num_triangles * sizeof(int[3])); + outelements = mesh->data_element3i; + for (j = 0;j < mesh->num_triangles;j++) + { + outelements[2] = BigLong(renderlist[0]); + outelements[1] = BigLong(renderlist[1]); + outelements[0] = BigLong(renderlist[2]); + if ((unsigned int)outelements[0] >= (unsigned int)pheader->numverts + || (unsigned int)outelements[1] >= (unsigned int)pheader->numverts + || (unsigned int)outelements[2] >= (unsigned int)pheader->numverts) + Host_Error("%s corrupt renderlist (out of bounds index)\n", loadmodel->name); + renderlist += 3; + outelements += 3; + } + remapvertices = Mem_Alloc(loadmodel->mempool, pheader->numverts * sizeof(int)); + mesh->num_vertices = Mod_BuildVertexRemapTableFromElements(mesh->num_triangles * 3, mesh->data_element3i, pheader->numverts, remapvertices); + for (j = 0;j < mesh->num_triangles * 3;j++) + mesh->data_element3i[j] = remapvertices[mesh->data_element3i[j]]; + Mod_BuildTriangleNeighbors(mesh->data_neighbor3i, mesh->data_element3i, mesh->num_triangles); + mesh->data_texcoordtexture2f = Mem_Alloc(loadmodel->mempool, mesh->num_vertices * sizeof(float[2])); + for (j = 0;j < pheader->numverts;j++) + { + if (remapvertices[j] >= 0) + { + mesh->data_texcoordtexture2f[remapvertices[j]*2+0] = outtexcoord2f[j*2+0]; + mesh->data_texcoordtexture2f[remapvertices[j]*2+1] = outtexcoord2f[j*2+1]; + } + } + mesh->num_vertexboneweights = 0; + for (j = 0;j < mesh->num_vertices;j++) + if (remapvertices[j] >= 0) + mesh->num_vertexboneweights += vertbonecounts[remapvertices[j]]; + mesh->data_vertexboneweights = Mem_Alloc(loadmodel->mempool, mesh->num_vertexboneweights * sizeof(surfmeshvertexboneweight_t)); + mesh->num_vertexboneweights = 0; + // note this vertexboneweight ordering requires that the remapvertices array is sequential numbers (separated by -1 values for omitted vertices) + l = 0; + for (j = 0;j < mesh->num_vertices;j++) + { + if (remapvertices[j] < 0) + { + l += vertbonecounts[j]; + continue; + } + for (k = 0;k < vertbonecounts[j];k++) + { + // this format really should have had a per vertexweight weight value... + mesh->data_vertexboneweights[mesh->num_vertexboneweights].vertexindex = remapvertices[j]; + mesh->data_vertexboneweights[mesh->num_vertexboneweights].boneindex = verts[l].bonenum; + mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[3] = 1.0f / vertbonecounts[j]; + mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[0] = verts[l].origin[0] * mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[3]; + mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[1] = verts[l].origin[1] * mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[3]; + mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[2] = verts[l].origin[2] * mesh->data_vertexboneweights[mesh->num_vertexboneweights].origin[3]; + mesh->num_vertexboneweights++; + l++; + } + } + + Mod_ValidateElements(mesh->data_element3i, mesh->num_triangles, mesh->num_vertices, __FILE__, __LINE__); + Mod_BuildTriangleNeighbors(mesh->data_neighbor3i, mesh->data_element3i, mesh->num_triangles); + Mod_Alias_Mesh_CompileFrameZero(mesh); -// move the complete, relocatable alias model to the cache - end = Hunk_LowMark (); - total = end - start; - - Cache_Alloc (&mod->cache, total, loadname); - if (!mod->cache.data) - return; - memcpy (mod->cache.data, pheader, total); + // since zym models do not have named sections, reuse their shader + // name as the section name + shadername = (char *) (pheader->lump_shaders.start + pbase) + i * 32; + if (shadername[0]) + Mod_BuildAliasSkinsFromSkinFiles(loadmodel->data_textures + i, skinfiles, shadername, shadername); + else + for (j = 0;j < loadmodel->numskins;j++) + Mod_BuildAliasSkinFromSkinFrame(loadmodel->data_textures + i + j * loadmodel->num_surfaces, NULL); + + surface = loadmodel->data_surfaces + i; + surface->groupmesh = mesh; + surface->texture = loadmodel->data_textures + i; + surface->num_firsttriangle = 0; + surface->num_triangles = mesh->num_triangles; + surface->num_firstvertex = 0; + surface->num_vertices = mesh->num_vertices; + } - Hunk_FreeToLowMark (start); + Mem_Free(vertbonecounts); + Mem_Free(verts); + Mem_Free(outtexcoord2f); } +