660 lines
21 KiB
C
660 lines
21 KiB
C
/* -----------------------------------------------------------------------------
|
|
|
|
PicoModel Library
|
|
|
|
Copyright (c) 2002, Randy Reddig & seaw0lf
|
|
All rights reserved.
|
|
|
|
Redistribution and use in source and binary forms, with or without modification,
|
|
are permitted provided that the following conditions are met:
|
|
|
|
Redistributions of source code must retain the above copyright notice, this list
|
|
of conditions and the following disclaimer.
|
|
|
|
Redistributions in binary form must reproduce the above copyright notice, this
|
|
list of conditions and the following disclaimer in the documentation and/or
|
|
other materials provided with the distribution.
|
|
|
|
Neither the names of the copyright holders nor the names of its contributors may
|
|
be used to endorse or promote products derived from this software without
|
|
specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
|
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
|
|
ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
|
|
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
----------------------------------------------------------------------------- */
|
|
|
|
/*
|
|
Nurail: Used pm_md3.c (Randy Reddig) as a template.
|
|
*/
|
|
|
|
/* dependencies */
|
|
#include "picointernal.h"
|
|
#include "bytebool.h"
|
|
|
|
/* md2 model format */
|
|
const char *MD2_MAGIC = "IDP2";
|
|
const int MD2_VERSION = 8;
|
|
|
|
#define MD2_NUMVERTEXNORMALS 162
|
|
|
|
const int MD2_MAX_TRIANGLES = 4096;
|
|
const int MD2_MAX_VERTS = 2048;
|
|
const int MD2_MAX_FRAMES = 512;
|
|
const int MD2_MAX_MD2SKINS = 32;
|
|
const int MD2_MAX_SKINNAME = 64;
|
|
|
|
typedef struct index_LUT_s
|
|
{
|
|
short Vert;
|
|
short ST;
|
|
struct index_LUT_s *next;
|
|
|
|
} index_LUT_t;
|
|
|
|
typedef struct index_DUP_LUT_s
|
|
{
|
|
short ST;
|
|
short OldVert;
|
|
|
|
} index_DUP_LUT_t;
|
|
|
|
typedef struct
|
|
{
|
|
short s;
|
|
short t;
|
|
} md2St_t;
|
|
|
|
typedef struct
|
|
{
|
|
short index_xyz[3];
|
|
short index_st[3];
|
|
} md2Triangle_t;
|
|
|
|
typedef struct
|
|
{
|
|
byte v[3]; // scaled byte to fit in frame mins/maxs
|
|
byte lightnormalindex;
|
|
} md2XyzNormal_t;
|
|
|
|
typedef struct md2Frame_s
|
|
{
|
|
float scale[3]; // multiply byte verts by this
|
|
float translate[3]; // then add this
|
|
char name[16]; // frame name from grabbing
|
|
md2XyzNormal_t verts[1]; // variable sized
|
|
}
|
|
md2Frame_t;
|
|
|
|
|
|
/* md2 model file md2 structure */
|
|
typedef struct md2_s
|
|
{
|
|
char magic[ 4 ];
|
|
int version;
|
|
|
|
int skinWidth;
|
|
int skinHeight;
|
|
int frameSize;
|
|
|
|
int numSkins;
|
|
int numXYZ;
|
|
int numST;
|
|
int numTris;
|
|
int numGLCmds;
|
|
int numFrames;
|
|
|
|
int ofsSkins;
|
|
int ofsST;
|
|
int ofsTris;
|
|
int ofsFrames;
|
|
int ofsGLCmds;
|
|
int ofsEnd;
|
|
}
|
|
md2_t;
|
|
|
|
float md2_normals[ MD2_NUMVERTEXNORMALS ][ 3 ] =
|
|
{
|
|
{ -0.525731f, 0.000000f, 0.850651f },
|
|
{ -0.442863f, 0.238856f, 0.864188f },
|
|
{ -0.295242f, 0.000000f, 0.955423f },
|
|
{ -0.309017f, 0.500000f, 0.809017f },
|
|
{ -0.162460f, 0.262866f, 0.951056f },
|
|
{ 0.000000f, 0.000000f, 1.000000f },
|
|
{ 0.000000f, 0.850651f, 0.525731f },
|
|
{ -0.147621f, 0.716567f, 0.681718f },
|
|
{ 0.147621f, 0.716567f, 0.681718f },
|
|
{ 0.000000f, 0.525731f, 0.850651f },
|
|
{ 0.309017f, 0.500000f, 0.809017f },
|
|
{ 0.525731f, 0.000000f, 0.850651f },
|
|
{ 0.295242f, 0.000000f, 0.955423f },
|
|
{ 0.442863f, 0.238856f, 0.864188f },
|
|
{ 0.162460f, 0.262866f, 0.951056f },
|
|
{ -0.681718f, 0.147621f, 0.716567f },
|
|
{ -0.809017f, 0.309017f, 0.500000f },
|
|
{ -0.587785f, 0.425325f, 0.688191f },
|
|
{ -0.850651f, 0.525731f, 0.000000f },
|
|
{ -0.864188f, 0.442863f, 0.238856f },
|
|
{ -0.716567f, 0.681718f, 0.147621f },
|
|
{ -0.688191f, 0.587785f, 0.425325f },
|
|
{ -0.500000f, 0.809017f, 0.309017f },
|
|
{ -0.238856f, 0.864188f, 0.442863f },
|
|
{ -0.425325f, 0.688191f, 0.587785f },
|
|
{ -0.716567f, 0.681718f, -0.147621f },
|
|
{ -0.500000f, 0.809017f, -0.309017f },
|
|
{ -0.525731f, 0.850651f, 0.000000f },
|
|
{ 0.000000f, 0.850651f, -0.525731f },
|
|
{ -0.238856f, 0.864188f, -0.442863f },
|
|
{ 0.000000f, 0.955423f, -0.295242f },
|
|
{ -0.262866f, 0.951056f, -0.162460f },
|
|
{ 0.000000f, 1.000000f, 0.000000f },
|
|
{ 0.000000f, 0.955423f, 0.295242f },
|
|
{ -0.262866f, 0.951056f, 0.162460f },
|
|
{ 0.238856f, 0.864188f, 0.442863f },
|
|
{ 0.262866f, 0.951056f, 0.162460f },
|
|
{ 0.500000f, 0.809017f, 0.309017f },
|
|
{ 0.238856f, 0.864188f, -0.442863f },
|
|
{ 0.262866f, 0.951056f, -0.162460f },
|
|
{ 0.500000f, 0.809017f, -0.309017f },
|
|
{ 0.850651f, 0.525731f, 0.000000f },
|
|
{ 0.716567f, 0.681718f, 0.147621f },
|
|
{ 0.716567f, 0.681718f, -0.147621f },
|
|
{ 0.525731f, 0.850651f, 0.000000f },
|
|
{ 0.425325f, 0.688191f, 0.587785f },
|
|
{ 0.864188f, 0.442863f, 0.238856f },
|
|
{ 0.688191f, 0.587785f, 0.425325f },
|
|
{ 0.809017f, 0.309017f, 0.500000f },
|
|
{ 0.681718f, 0.147621f, 0.716567f },
|
|
{ 0.587785f, 0.425325f, 0.688191f },
|
|
{ 0.955423f, 0.295242f, 0.000000f },
|
|
{ 1.000000f, 0.000000f, 0.000000f },
|
|
{ 0.951056f, 0.162460f, 0.262866f },
|
|
{ 0.850651f, -0.525731f, 0.000000f },
|
|
{ 0.955423f, -0.295242f, 0.000000f },
|
|
{ 0.864188f, -0.442863f, 0.238856f },
|
|
{ 0.951056f, -0.162460f, 0.262866f },
|
|
{ 0.809017f, -0.309017f, 0.500000f },
|
|
{ 0.681718f, -0.147621f, 0.716567f },
|
|
{ 0.850651f, 0.000000f, 0.525731f },
|
|
{ 0.864188f, 0.442863f, -0.238856f },
|
|
{ 0.809017f, 0.309017f, -0.500000f },
|
|
{ 0.951056f, 0.162460f, -0.262866f },
|
|
{ 0.525731f, 0.000000f, -0.850651f },
|
|
{ 0.681718f, 0.147621f, -0.716567f },
|
|
{ 0.681718f, -0.147621f, -0.716567f },
|
|
{ 0.850651f, 0.000000f, -0.525731f },
|
|
{ 0.809017f, -0.309017f, -0.500000f },
|
|
{ 0.864188f, -0.442863f, -0.238856f },
|
|
{ 0.951056f, -0.162460f, -0.262866f },
|
|
{ 0.147621f, 0.716567f, -0.681718f },
|
|
{ 0.309017f, 0.500000f, -0.809017f },
|
|
{ 0.425325f, 0.688191f, -0.587785f },
|
|
{ 0.442863f, 0.238856f, -0.864188f },
|
|
{ 0.587785f, 0.425325f, -0.688191f },
|
|
{ 0.688191f, 0.587785f, -0.425325f },
|
|
{ -0.147621f, 0.716567f, -0.681718f },
|
|
{ -0.309017f, 0.500000f, -0.809017f },
|
|
{ 0.000000f, 0.525731f, -0.850651f },
|
|
{ -0.525731f, 0.000000f, -0.850651f },
|
|
{ -0.442863f, 0.238856f, -0.864188f },
|
|
{ -0.295242f, 0.000000f, -0.955423f },
|
|
{ -0.162460f, 0.262866f, -0.951056f },
|
|
{ 0.000000f, 0.000000f, -1.000000f },
|
|
{ 0.295242f, 0.000000f, -0.955423f },
|
|
{ 0.162460f, 0.262866f, -0.951056f },
|
|
{ -0.442863f, -0.238856f, -0.864188f },
|
|
{ -0.309017f, -0.500000f, -0.809017f },
|
|
{ -0.162460f, -0.262866f, -0.951056f },
|
|
{ 0.000000f, -0.850651f, -0.525731f },
|
|
{ -0.147621f, -0.716567f, -0.681718f },
|
|
{ 0.147621f, -0.716567f, -0.681718f },
|
|
{ 0.000000f, -0.525731f, -0.850651f },
|
|
{ 0.309017f, -0.500000f, -0.809017f },
|
|
{ 0.442863f, -0.238856f, -0.864188f },
|
|
{ 0.162460f, -0.262866f, -0.951056f },
|
|
{ 0.238856f, -0.864188f, -0.442863f },
|
|
{ 0.500000f, -0.809017f, -0.309017f },
|
|
{ 0.425325f, -0.688191f, -0.587785f },
|
|
{ 0.716567f, -0.681718f, -0.147621f },
|
|
{ 0.688191f, -0.587785f, -0.425325f },
|
|
{ 0.587785f, -0.425325f, -0.688191f },
|
|
{ 0.000000f, -0.955423f, -0.295242f },
|
|
{ 0.000000f, -1.000000f, 0.000000f },
|
|
{ 0.262866f, -0.951056f, -0.162460f },
|
|
{ 0.000000f, -0.850651f, 0.525731f },
|
|
{ 0.000000f, -0.955423f, 0.295242f },
|
|
{ 0.238856f, -0.864188f, 0.442863f },
|
|
{ 0.262866f, -0.951056f, 0.162460f },
|
|
{ 0.500000f, -0.809017f, 0.309017f },
|
|
{ 0.716567f, -0.681718f, 0.147621f },
|
|
{ 0.525731f, -0.850651f, 0.000000f },
|
|
{ -0.238856f, -0.864188f, -0.442863f },
|
|
{ -0.500000f, -0.809017f, -0.309017f },
|
|
{ -0.262866f, -0.951056f, -0.162460f },
|
|
{ -0.850651f, -0.525731f, 0.000000f },
|
|
{ -0.716567f, -0.681718f, -0.147621f },
|
|
{ -0.716567f, -0.681718f, 0.147621f },
|
|
{ -0.525731f, -0.850651f, 0.000000f },
|
|
{ -0.500000f, -0.809017f, 0.309017f },
|
|
{ -0.238856f, -0.864188f, 0.442863f },
|
|
{ -0.262866f, -0.951056f, 0.162460f },
|
|
{ -0.864188f, -0.442863f, 0.238856f },
|
|
{ -0.809017f, -0.309017f, 0.500000f },
|
|
{ -0.688191f, -0.587785f, 0.425325f },
|
|
{ -0.681718f, -0.147621f, 0.716567f },
|
|
{ -0.442863f, -0.238856f, 0.864188f },
|
|
{ -0.587785f, -0.425325f, 0.688191f },
|
|
{ -0.309017f, -0.500000f, 0.809017f },
|
|
{ -0.147621f, -0.716567f, 0.681718f },
|
|
{ -0.425325f, -0.688191f, 0.587785f },
|
|
{ -0.162460f, -0.262866f, 0.951056f },
|
|
{ 0.442863f, -0.238856f, 0.864188f },
|
|
{ 0.162460f, -0.262866f, 0.951056f },
|
|
{ 0.309017f, -0.500000f, 0.809017f },
|
|
{ 0.147621f, -0.716567f, 0.681718f },
|
|
{ 0.000000f, -0.525731f, 0.850651f },
|
|
{ 0.425325f, -0.688191f, 0.587785f },
|
|
{ 0.587785f, -0.425325f, 0.688191f },
|
|
{ 0.688191f, -0.587785f, 0.425325f },
|
|
{ -0.955423f, 0.295242f, 0.000000f },
|
|
{ -0.951056f, 0.162460f, 0.262866f },
|
|
{ -1.000000f, 0.000000f, 0.000000f },
|
|
{ -0.850651f, 0.000000f, 0.525731f },
|
|
{ -0.955423f, -0.295242f, 0.000000f },
|
|
{ -0.951056f, -0.162460f, 0.262866f },
|
|
{ -0.864188f, 0.442863f, -0.238856f },
|
|
{ -0.951056f, 0.162460f, -0.262866f },
|
|
{ -0.809017f, 0.309017f, -0.500000f },
|
|
{ -0.864188f, -0.442863f, -0.238856f },
|
|
{ -0.951056f, -0.162460f, -0.262866f },
|
|
{ -0.809017f, -0.309017f, -0.500000f },
|
|
{ -0.681718f, 0.147621f, -0.716567f },
|
|
{ -0.681718f, -0.147621f, -0.716567f },
|
|
{ -0.850651f, 0.000000f, -0.525731f },
|
|
{ -0.688191f, 0.587785f, -0.425325f },
|
|
{ -0.587785f, 0.425325f, -0.688191f },
|
|
{ -0.425325f, 0.688191f, -0.587785f },
|
|
{ -0.425325f, -0.688191f, -0.587785f },
|
|
{ -0.587785f, -0.425325f, -0.688191f },
|
|
{ -0.688191f, -0.587785f, -0.425325f },
|
|
};
|
|
|
|
|
|
// _md2_canload()
|
|
|
|
static int _md2_canload( PM_PARAMS_CANLOAD ){
|
|
const md2_t *md2;
|
|
|
|
/* sanity check */
|
|
if ( (size_t) bufSize < ( sizeof( *md2 ) * 2 ) ) {
|
|
return PICO_PMV_ERROR_SIZE;
|
|
}
|
|
|
|
/* set as md2 */
|
|
md2 = (const md2_t*) buffer;
|
|
|
|
/* check md2 magic */
|
|
if ( *( (const int*) md2->magic ) != *( (const int*) MD2_MAGIC ) ) {
|
|
return PICO_PMV_ERROR_IDENT;
|
|
}
|
|
|
|
/* check md2 version */
|
|
if ( _pico_little_long( md2->version ) != MD2_VERSION ) {
|
|
return PICO_PMV_ERROR_VERSION;
|
|
}
|
|
|
|
/* file seems to be a valid md2 */
|
|
return PICO_PMV_OK;
|
|
}
|
|
|
|
|
|
|
|
// _md2_load() loads a quake2 md2 model file.
|
|
|
|
|
|
static picoModel_t *_md2_load( PM_PARAMS_LOAD ){
|
|
int i, j, dups, dup_index;
|
|
index_LUT_t *p_index_LUT, *p_index_LUT2, *p_index_LUT3;
|
|
index_DUP_LUT_t *p_index_LUT_DUPS;
|
|
md2Triangle_t *p_md2Triangle;
|
|
|
|
char skinname[ MD2_MAX_SKINNAME ];
|
|
md2_t *md2;
|
|
md2St_t *texCoord;
|
|
md2Frame_t *frame;
|
|
md2Triangle_t *triangle;
|
|
md2XyzNormal_t *vertex;
|
|
|
|
picoByte_t *bb, *bb0;
|
|
picoModel_t *picoModel;
|
|
picoSurface_t *picoSurface;
|
|
picoShader_t *picoShader;
|
|
picoVec3_t xyz, normal;
|
|
picoVec2_t st;
|
|
picoColor_t color;
|
|
|
|
|
|
/* set as md2 */
|
|
bb0 = bb = (picoByte_t*) _pico_alloc( bufSize );
|
|
memcpy( bb, buffer, bufSize );
|
|
md2 = (md2_t*) bb;
|
|
|
|
/* check ident and version */
|
|
if ( *( (const int*) md2->magic ) != *( (const int*) MD2_MAGIC ) || _pico_little_long( md2->version ) != MD2_VERSION ) {
|
|
/* not an md2 file (todo: set error) */
|
|
_pico_printf( PICO_ERROR, "%s is not an MD2 File!", fileName );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
// swap md2
|
|
md2->version = _pico_little_long( md2->version );
|
|
|
|
md2->skinWidth = _pico_little_long( md2->skinWidth );
|
|
md2->skinHeight = _pico_little_long( md2->skinHeight );
|
|
md2->frameSize = _pico_little_long( md2->frameSize );
|
|
|
|
md2->numSkins = _pico_little_long( md2->numSkins );
|
|
md2->numXYZ = _pico_little_long( md2->numXYZ );
|
|
md2->numST = _pico_little_long( md2->numST );
|
|
md2->numTris = _pico_little_long( md2->numTris );
|
|
md2->numGLCmds = _pico_little_long( md2->numGLCmds );
|
|
md2->numFrames = _pico_little_long( md2->numFrames );
|
|
|
|
md2->ofsSkins = _pico_little_long( md2->ofsSkins );
|
|
md2->ofsST = _pico_little_long( md2->ofsST );
|
|
md2->ofsTris = _pico_little_long( md2->ofsTris );
|
|
md2->ofsFrames = _pico_little_long( md2->ofsFrames );
|
|
md2->ofsGLCmds = _pico_little_long( md2->ofsGLCmds );
|
|
md2->ofsEnd = _pico_little_long( md2->ofsEnd );
|
|
|
|
// do frame check
|
|
if ( md2->numFrames < 1 ) {
|
|
_pico_printf( PICO_ERROR, "%s has 0 frames!", fileName );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
if ( frameNum < 0 || frameNum >= md2->numFrames ) {
|
|
_pico_printf( PICO_ERROR, "Invalid or out-of-range MD2 frame specified" );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
// Setup Frame
|
|
frame = (md2Frame_t *) ( bb + md2->ofsFrames + ( sizeof( md2Frame_t ) * frameNum ) );
|
|
|
|
// swap frame scale and translation
|
|
for ( i = 0; i < 3; i++ )
|
|
{
|
|
frame->scale[ i ] = _pico_little_float( frame->scale[ i ] );
|
|
frame->translate[ i ] = _pico_little_float( frame->translate[ i ] );
|
|
}
|
|
|
|
// swap triangles
|
|
triangle = (md2Triangle_t *) ( (picoByte_t *) ( bb + md2->ofsTris ) );
|
|
for ( i = 0; i < md2->numTris; i++, triangle++ )
|
|
{
|
|
for ( j = 0; j < 3; j++ )
|
|
{
|
|
triangle->index_xyz[ j ] = _pico_little_short( triangle->index_xyz[ j ] );
|
|
triangle->index_st[ j ] = _pico_little_short( triangle->index_st[ j ] );
|
|
}
|
|
}
|
|
|
|
// swap st coords
|
|
texCoord = (md2St_t*) ( (picoByte_t *) ( bb + md2->ofsST ) );
|
|
for ( i = 0; i < md2->numST; i++, texCoord++ )
|
|
{
|
|
texCoord->s = _pico_little_short( texCoord->s );
|
|
texCoord->t = _pico_little_short( texCoord->t );
|
|
}
|
|
|
|
// set Skin Name
|
|
strncpy( skinname, (const char *) ( bb + md2->ofsSkins ), MD2_MAX_SKINNAME );
|
|
|
|
// Print out md2 values
|
|
_pico_printf( PICO_VERBOSE,"Skins: %d Verts: %d STs: %d Triangles: %d Frames: %d\nSkin Name \"%s\"\n", md2->numSkins, md2->numXYZ, md2->numST, md2->numTris, md2->numFrames, &skinname );
|
|
|
|
// detox Skin name
|
|
_pico_setfext( skinname, "" );
|
|
_pico_unixify( skinname );
|
|
|
|
/* create new pico model */
|
|
picoModel = PicoNewModel();
|
|
if ( picoModel == NULL ) {
|
|
_pico_printf( PICO_ERROR, "Unable to allocate a new model" );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
/* do model setup */
|
|
PicoSetModelFrameNum( picoModel, frameNum );
|
|
PicoSetModelNumFrames( picoModel, md2->numFrames ); /* sea */
|
|
PicoSetModelName( picoModel, fileName );
|
|
PicoSetModelFileName( picoModel, fileName );
|
|
|
|
// allocate new pico surface
|
|
picoSurface = PicoNewSurface( picoModel );
|
|
if ( picoSurface == NULL ) {
|
|
_pico_printf( PICO_ERROR, "Unable to allocate a new model surface" );
|
|
PicoFreeModel( picoModel );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
|
|
PicoSetSurfaceType( picoSurface, PICO_TRIANGLES );
|
|
PicoSetSurfaceName( picoSurface, frame->name );
|
|
picoShader = PicoNewShader( picoModel );
|
|
if ( picoShader == NULL ) {
|
|
_pico_printf( PICO_ERROR, "Unable to allocate a new model shader" );
|
|
PicoFreeModel( picoModel );
|
|
_pico_free( bb0 );
|
|
return NULL;
|
|
}
|
|
|
|
PicoSetShaderName( picoShader, skinname );
|
|
|
|
// associate current surface with newly created shader
|
|
PicoSetSurfaceShader( picoSurface, picoShader );
|
|
|
|
// Init LUT for Verts
|
|
p_index_LUT = (index_LUT_t *)_pico_alloc( sizeof( index_LUT_t ) * md2->numXYZ );
|
|
for ( i = 0; i < md2->numXYZ; i++ )
|
|
{
|
|
p_index_LUT[i].Vert = -1;
|
|
p_index_LUT[i].ST = -1;
|
|
p_index_LUT[i].next = NULL;
|
|
}
|
|
|
|
// Fill in Look Up Table, and allocate/fill Linked List from vert array as needed for dup STs per Vert.
|
|
dups = 0;
|
|
for ( i = 0; i < md2->numTris; i++ )
|
|
{
|
|
p_md2Triangle = (md2Triangle_t *) ( bb + md2->ofsTris + ( sizeof( md2Triangle_t ) * i ) );
|
|
for ( j = 0; j < 3; j++ )
|
|
{
|
|
if ( p_index_LUT[p_md2Triangle->index_xyz[j]].ST == -1 ) { // No Main Entry
|
|
p_index_LUT[p_md2Triangle->index_xyz[j]].ST = p_md2Triangle->index_st[j];
|
|
}
|
|
|
|
else if ( p_md2Triangle->index_st[j] == p_index_LUT[p_md2Triangle->index_xyz[j]].ST ) { // Equal to Main Entry
|
|
continue;
|
|
}
|
|
|
|
else if ( ( p_index_LUT[p_md2Triangle->index_xyz[j]].next == NULL ) ) { // Not equal to Main entry, and no LL entry
|
|
// Add first entry of LL from Main
|
|
p_index_LUT2 = (index_LUT_t *)_pico_alloc( sizeof( index_LUT_t ) );
|
|
if ( p_index_LUT2 == NULL ) {
|
|
_pico_printf( PICO_ERROR," Couldn't allocate memory!\n" );
|
|
}
|
|
p_index_LUT[p_md2Triangle->index_xyz[j]].next = (index_LUT_t *)p_index_LUT2;
|
|
p_index_LUT2->Vert = dups;
|
|
p_index_LUT2->ST = p_md2Triangle->index_st[j];
|
|
p_index_LUT2->next = NULL;
|
|
p_md2Triangle->index_xyz[j] = dups + md2->numXYZ; // Make change in Tri hunk
|
|
dups++;
|
|
}
|
|
else // Try to find in LL from Main Entry
|
|
{
|
|
p_index_LUT3 = p_index_LUT2 = p_index_LUT[p_md2Triangle->index_xyz[j]].next;
|
|
while ( ( p_index_LUT2 != NULL ) && ( p_md2Triangle->index_xyz[j] != p_index_LUT2->Vert ) ) // Walk down LL
|
|
{
|
|
p_index_LUT3 = p_index_LUT2;
|
|
p_index_LUT2 = p_index_LUT2->next;
|
|
}
|
|
p_index_LUT2 = p_index_LUT3;
|
|
|
|
if ( p_md2Triangle->index_st[j] == p_index_LUT2->ST ) { // Found it
|
|
p_md2Triangle->index_xyz[j] = p_index_LUT2->Vert + md2->numXYZ; // Make change in Tri hunk
|
|
continue;
|
|
}
|
|
|
|
if ( p_index_LUT2->next == NULL ) { // Didn't find it. Add entry to LL.
|
|
// Add the Entry
|
|
p_index_LUT3 = (index_LUT_t *)_pico_alloc( sizeof( index_LUT_t ) );
|
|
if ( p_index_LUT3 == NULL ) {
|
|
_pico_printf( PICO_ERROR," Couldn't allocate memory!\n" );
|
|
}
|
|
p_index_LUT2->next = (index_LUT_t *)p_index_LUT3;
|
|
p_index_LUT3->Vert = p_md2Triangle->index_xyz[j];
|
|
p_index_LUT3->ST = p_md2Triangle->index_st[j];
|
|
p_index_LUT3->next = NULL;
|
|
p_md2Triangle->index_xyz[j] = dups + md2->numXYZ; // Make change in Tri hunk
|
|
dups++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// malloc and build array for Dup STs
|
|
p_index_LUT_DUPS = (index_DUP_LUT_t *)_pico_alloc( sizeof( index_DUP_LUT_t ) * dups );
|
|
if ( p_index_LUT_DUPS == NULL ) {
|
|
_pico_printf( PICO_ERROR," Couldn't allocate memory!\n" );
|
|
}
|
|
|
|
dup_index = 0;
|
|
for ( i = 0; i < md2->numXYZ; i++ )
|
|
{
|
|
p_index_LUT2 = p_index_LUT[i].next;
|
|
while ( p_index_LUT2 != NULL )
|
|
{
|
|
p_index_LUT_DUPS[p_index_LUT2->Vert].OldVert = i;
|
|
p_index_LUT_DUPS[p_index_LUT2->Vert].ST = p_index_LUT2->ST;
|
|
dup_index++;
|
|
p_index_LUT2 = p_index_LUT2->next;
|
|
}
|
|
}
|
|
|
|
// Build Picomodel
|
|
triangle = (md2Triangle_t *) ( (picoByte_t *) ( bb + md2->ofsTris ) );
|
|
texCoord = (md2St_t*) ( (picoByte_t *) ( bb + md2->ofsST ) );
|
|
vertex = (md2XyzNormal_t*) ( (picoByte_t*) ( frame->verts ) );
|
|
for ( j = 0; j < md2->numTris; j++, triangle++ )
|
|
{
|
|
PicoSetSurfaceIndex( picoSurface, j * 3, triangle->index_xyz[0] );
|
|
PicoSetSurfaceIndex( picoSurface, j * 3 + 1, triangle->index_xyz[1] );
|
|
PicoSetSurfaceIndex( picoSurface, j * 3 + 2, triangle->index_xyz[2] );
|
|
}
|
|
|
|
for ( i = 0; i < md2->numXYZ; i++, vertex++ )
|
|
{
|
|
/* set vertex origin */
|
|
xyz[ 0 ] = vertex->v[0] * frame->scale[0] + frame->translate[0];
|
|
xyz[ 1 ] = vertex->v[1] * frame->scale[1] + frame->translate[1];
|
|
xyz[ 2 ] = vertex->v[2] * frame->scale[2] + frame->translate[2];
|
|
PicoSetSurfaceXYZ( picoSurface, i, xyz );
|
|
|
|
/* set normal */
|
|
normal[ 0 ] = md2_normals[vertex->lightnormalindex][0];
|
|
normal[ 1 ] = md2_normals[vertex->lightnormalindex][1];
|
|
normal[ 2 ] = md2_normals[vertex->lightnormalindex][2];
|
|
PicoSetSurfaceNormal( picoSurface, i, normal );
|
|
|
|
/* set st coords */
|
|
st[ 0 ] = ( ( texCoord[p_index_LUT[i].ST].s ) / ( (float)md2->skinWidth ) );
|
|
st[ 1 ] = ( texCoord[p_index_LUT[i].ST].t / ( (float)md2->skinHeight ) );
|
|
PicoSetSurfaceST( picoSurface, 0, i, st );
|
|
}
|
|
|
|
if ( dups ) {
|
|
for ( i = 0; i < dups; i++ )
|
|
{
|
|
j = p_index_LUT_DUPS[i].OldVert;
|
|
/* set vertex origin */
|
|
xyz[ 0 ] = frame->verts[j].v[0] * frame->scale[0] + frame->translate[0];
|
|
xyz[ 1 ] = frame->verts[j].v[1] * frame->scale[1] + frame->translate[1];
|
|
xyz[ 2 ] = frame->verts[j].v[2] * frame->scale[2] + frame->translate[2];
|
|
PicoSetSurfaceXYZ( picoSurface, i + md2->numXYZ, xyz );
|
|
|
|
/* set normal */
|
|
normal[ 0 ] = md2_normals[frame->verts[j].lightnormalindex][0];
|
|
normal[ 1 ] = md2_normals[frame->verts[j].lightnormalindex][1];
|
|
normal[ 2 ] = md2_normals[frame->verts[j].lightnormalindex][2];
|
|
PicoSetSurfaceNormal( picoSurface, i + md2->numXYZ, normal );
|
|
|
|
/* set st coords */
|
|
st[ 0 ] = ( ( texCoord[p_index_LUT_DUPS[i].ST].s ) / ( (float)md2->skinWidth ) );
|
|
st[ 1 ] = ( texCoord[p_index_LUT_DUPS[i].ST].t / ( (float)md2->skinHeight ) );
|
|
PicoSetSurfaceST( picoSurface, 0, i + md2->numXYZ, st );
|
|
}
|
|
}
|
|
|
|
/* set color */
|
|
PicoSetSurfaceColor( picoSurface, 0, 0, color );
|
|
|
|
// Free up malloc'ed LL entries
|
|
for ( i = 0; i < md2->numXYZ; i++ )
|
|
{
|
|
if ( p_index_LUT[i].next != NULL ) {
|
|
p_index_LUT2 = p_index_LUT[i].next;
|
|
do {
|
|
p_index_LUT3 = p_index_LUT2->next;
|
|
_pico_free( p_index_LUT2 );
|
|
p_index_LUT2 = p_index_LUT3;
|
|
dups--;
|
|
} while ( p_index_LUT2 != NULL );
|
|
}
|
|
}
|
|
|
|
if ( dups ) {
|
|
_pico_printf( PICO_WARNING, " Not all LL mallocs freed\n" );
|
|
}
|
|
|
|
// Free malloc'ed LUTs
|
|
_pico_free( p_index_LUT );
|
|
_pico_free( p_index_LUT_DUPS );
|
|
|
|
/* return the new pico model */
|
|
_pico_free( bb0 );
|
|
return picoModel;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* pico file format module definition */
|
|
const picoModule_t picoModuleMD2 =
|
|
{
|
|
"0.875", /* module version string */
|
|
"Quake 2 MD2", /* module display name */
|
|
"Nurail", /* author's name */
|
|
"2003 Nurail", /* module copyright */
|
|
{
|
|
"md2", NULL, NULL, NULL /* default extensions to use */
|
|
},
|
|
_md2_canload, /* validation routine */
|
|
_md2_load, /* load routine */
|
|
NULL, /* save validation routine */
|
|
NULL /* save routine */
|
|
};
|