b7901c773c
Stop include Bullet headers using `-isystem` for GCC/Clang as it misleads SCons into not properly rebuilding all files when headers change. This means we also need to make sure Bullet builds without warning, and current version fares fairly well, there were just a couple to fix (patch included). Increase minimum version for distro packages to 2.90 (this was never released as the "next" version after 2.89 was 3.05... but that covers it too).
1653 lines
38 KiB
C++
1653 lines
38 KiB
C++
/*
|
|
bParse
|
|
Copyright (c) 2006-2009 Charlie C & Erwin Coumans http://gamekit.googlecode.com
|
|
|
|
This software is provided 'as-is', without any express or implied warranty.
|
|
In no event will the authors be held liable for any damages arising from the use of this software.
|
|
Permission is granted to anyone to use this software for any purpose,
|
|
including commercial applications, and to alter it and redistribute it freely,
|
|
subject to the following restrictions:
|
|
|
|
1. The origin of this software must not be misrepresented; you must not claim that you wrote the original software. If you use this software in a product, an acknowledgment in the product documentation would be appreciated but is not required.
|
|
2. Altered source versions must be plainly marked as such, and must not be misrepresented as being the original software.
|
|
3. This notice may not be removed or altered from any source distribution.
|
|
*/
|
|
#include "b3File.h"
|
|
#include "b3Common.h"
|
|
#include "b3Chunk.h"
|
|
#include "b3DNA.h"
|
|
#include <math.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include "b3Defines.h"
|
|
#include "Bullet3Serialize/Bullet2FileLoader/b3Serializer.h"
|
|
#include "Bullet3Common/b3AlignedAllocator.h"
|
|
#include "Bullet3Common/b3MinMax.h"
|
|
|
|
#define B3_SIZEOFBLENDERHEADER 12
|
|
#define MAX_ARRAY_LENGTH 512
|
|
using namespace bParse;
|
|
#define MAX_STRLEN 1024
|
|
|
|
const char *getCleanName(const char *memName, char *buffer)
|
|
{
|
|
int slen = strlen(memName);
|
|
assert(slen < MAX_STRLEN);
|
|
slen = b3Min(slen, MAX_STRLEN);
|
|
for (int i = 0; i < slen; i++)
|
|
{
|
|
if (memName[i] == ']' || memName[i] == '[')
|
|
{
|
|
buffer[i] = 0; //'_';
|
|
}
|
|
else
|
|
{
|
|
buffer[i] = memName[i];
|
|
}
|
|
}
|
|
buffer[slen] = 0;
|
|
return buffer;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
bFile::bFile(const char *filename, const char headerString[7])
|
|
: mOwnsBuffer(true),
|
|
mFileBuffer(0),
|
|
mFileLen(0),
|
|
mVersion(0),
|
|
mDataStart(0),
|
|
mFileDNA(0),
|
|
mMemoryDNA(0),
|
|
mFlags(FD_INVALID)
|
|
{
|
|
for (int i = 0; i < 7; i++)
|
|
{
|
|
m_headerString[i] = headerString[i];
|
|
}
|
|
|
|
FILE *fp = fopen(filename, "rb");
|
|
if (fp)
|
|
{
|
|
fseek(fp, 0L, SEEK_END);
|
|
mFileLen = ftell(fp);
|
|
fseek(fp, 0L, SEEK_SET);
|
|
|
|
mFileBuffer = (char *)malloc(mFileLen + 1);
|
|
int bytesRead;
|
|
bytesRead = fread(mFileBuffer, mFileLen, 1, fp);
|
|
|
|
fclose(fp);
|
|
|
|
//
|
|
parseHeader();
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
bFile::bFile(char *memoryBuffer, int len, const char headerString[7])
|
|
: mOwnsBuffer(false),
|
|
mFileBuffer(0),
|
|
mFileLen(0),
|
|
mVersion(0),
|
|
mDataStart(0),
|
|
mFileDNA(0),
|
|
mMemoryDNA(0),
|
|
mFlags(FD_INVALID)
|
|
{
|
|
for (int i = 0; i < 7; i++)
|
|
{
|
|
m_headerString[i] = headerString[i];
|
|
}
|
|
mFileBuffer = memoryBuffer;
|
|
mFileLen = len;
|
|
|
|
parseHeader();
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
bFile::~bFile()
|
|
{
|
|
if (mOwnsBuffer && mFileBuffer)
|
|
{
|
|
free(mFileBuffer);
|
|
mFileBuffer = 0;
|
|
}
|
|
|
|
delete mMemoryDNA;
|
|
delete mFileDNA;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::parseHeader()
|
|
{
|
|
if (!mFileLen || !mFileBuffer)
|
|
return;
|
|
|
|
char *blenderBuf = mFileBuffer;
|
|
char header[B3_SIZEOFBLENDERHEADER + 1];
|
|
memcpy(header, blenderBuf, B3_SIZEOFBLENDERHEADER);
|
|
header[B3_SIZEOFBLENDERHEADER] = '\0';
|
|
|
|
if (strncmp(header, m_headerString, 6) != 0)
|
|
{
|
|
memcpy(header, m_headerString, B3_SIZEOFBLENDERHEADER);
|
|
return;
|
|
}
|
|
|
|
if (header[6] == 'd')
|
|
{
|
|
mFlags |= FD_DOUBLE_PRECISION;
|
|
}
|
|
|
|
char *ver = header + 9;
|
|
mVersion = atoi(ver);
|
|
if (mVersion <= 241)
|
|
{
|
|
//printf("Warning, %d not fully tested : <= 242\n", mVersion);
|
|
}
|
|
|
|
int littleEndian = 1;
|
|
littleEndian = ((char *)&littleEndian)[0];
|
|
|
|
// swap ptr sizes...
|
|
if (header[7] == '-')
|
|
{
|
|
mFlags |= FD_FILE_64;
|
|
if (!VOID_IS_8)
|
|
mFlags |= FD_BITS_VARIES;
|
|
}
|
|
else if (VOID_IS_8)
|
|
mFlags |= FD_BITS_VARIES;
|
|
|
|
// swap endian...
|
|
if (header[8] == 'V')
|
|
{
|
|
if (littleEndian == 1)
|
|
mFlags |= FD_ENDIAN_SWAP;
|
|
}
|
|
else if (littleEndian == 0)
|
|
mFlags |= FD_ENDIAN_SWAP;
|
|
|
|
mFlags |= FD_OK;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
bool bFile::ok()
|
|
{
|
|
return (mFlags & FD_OK) != 0;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::parseInternal(int verboseMode, char *memDna, int memDnaLength)
|
|
{
|
|
if ((mFlags & FD_OK) == 0)
|
|
return;
|
|
|
|
char *blenderData = mFileBuffer;
|
|
bChunkInd dna;
|
|
dna.oldPtr = 0;
|
|
|
|
char *tempBuffer = blenderData;
|
|
for (int i = 0; i < mFileLen; i++)
|
|
{
|
|
// looking for the data's starting position
|
|
// and the start of SDNA decls
|
|
|
|
if (!mDataStart && strncmp(tempBuffer, "REND", 4) == 0)
|
|
mDataStart = i;
|
|
|
|
if (strncmp(tempBuffer, "DNA1", 4) == 0)
|
|
{
|
|
// read the DNA1 block and extract SDNA
|
|
if (getNextBlock(&dna, tempBuffer, mFlags) > 0)
|
|
{
|
|
if (strncmp((tempBuffer + ChunkUtils::getOffset(mFlags)), "SDNANAME", 8) == 0)
|
|
dna.oldPtr = (tempBuffer + ChunkUtils::getOffset(mFlags));
|
|
else
|
|
dna.oldPtr = 0;
|
|
}
|
|
else
|
|
dna.oldPtr = 0;
|
|
}
|
|
// Some Bullet files are missing the DNA1 block
|
|
// In Blender it's DNA1 + ChunkUtils::getOffset() + SDNA + NAME
|
|
// In Bullet tests its SDNA + NAME
|
|
else if (strncmp(tempBuffer, "SDNANAME", 8) == 0)
|
|
{
|
|
dna.oldPtr = blenderData + i;
|
|
dna.len = mFileLen - i;
|
|
|
|
// Also no REND block, so exit now.
|
|
if (mVersion == 276) break;
|
|
}
|
|
|
|
if (mDataStart && dna.oldPtr) break;
|
|
tempBuffer++;
|
|
}
|
|
if (!dna.oldPtr || !dna.len)
|
|
{
|
|
//printf("Failed to find DNA1+SDNA pair\n");
|
|
mFlags &= ~FD_OK;
|
|
return;
|
|
}
|
|
|
|
mFileDNA = new bDNA();
|
|
|
|
///mFileDNA->init will convert part of DNA file endianness to current CPU endianness if necessary
|
|
mFileDNA->init((char *)dna.oldPtr, dna.len, (mFlags & FD_ENDIAN_SWAP) != 0);
|
|
|
|
if (mVersion == 276)
|
|
{
|
|
int i;
|
|
for (i = 0; i < mFileDNA->getNumNames(); i++)
|
|
{
|
|
if (strcmp(mFileDNA->getName(i), "int") == 0)
|
|
{
|
|
mFlags |= FD_BROKEN_DNA;
|
|
}
|
|
}
|
|
if ((mFlags & FD_BROKEN_DNA) != 0)
|
|
{
|
|
//printf("warning: fixing some broken DNA version\n");
|
|
}
|
|
}
|
|
|
|
if (verboseMode & FD_VERBOSE_DUMP_DNA_TYPE_DEFINITIONS)
|
|
mFileDNA->dumpTypeDefinitions();
|
|
|
|
mMemoryDNA = new bDNA();
|
|
int littleEndian = 1;
|
|
littleEndian = ((char *)&littleEndian)[0];
|
|
|
|
mMemoryDNA->init(memDna, memDnaLength, littleEndian == 0);
|
|
|
|
///@todo we need a better version check, add version/sub version info from FileGlobal into memory DNA/header files
|
|
if (mMemoryDNA->getNumNames() != mFileDNA->getNumNames())
|
|
{
|
|
mFlags |= FD_VERSION_VARIES;
|
|
//printf ("Warning, file DNA is different than built in, performance is reduced. Best to re-export file with a matching version/platform");
|
|
}
|
|
|
|
// as long as it kept up to date it will be ok!!
|
|
if (mMemoryDNA->lessThan(mFileDNA))
|
|
{
|
|
//printf ("Warning, file DNA is newer than built in.");
|
|
}
|
|
|
|
mFileDNA->initCmpFlags(mMemoryDNA);
|
|
|
|
parseData();
|
|
|
|
resolvePointers(verboseMode);
|
|
|
|
updateOldPointers();
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::swap(char *head, bChunkInd &dataChunk, bool ignoreEndianFlag)
|
|
{
|
|
char *data = head;
|
|
short *strc = mFileDNA->getStruct(dataChunk.dna_nr);
|
|
|
|
const char s[] = "SoftBodyMaterialData";
|
|
int szs = sizeof(s);
|
|
if (strncmp((char *)&dataChunk.code, "ARAY", 4) == 0)
|
|
{
|
|
short *oldStruct = mFileDNA->getStruct(dataChunk.dna_nr);
|
|
char *oldType = mFileDNA->getType(oldStruct[0]);
|
|
if (strncmp(oldType, s, szs) == 0)
|
|
{
|
|
return;
|
|
}
|
|
}
|
|
|
|
int len = mFileDNA->getLength(strc[0]);
|
|
|
|
for (int i = 0; i < dataChunk.nr; i++)
|
|
{
|
|
swapStruct(dataChunk.dna_nr, data, ignoreEndianFlag);
|
|
data += len;
|
|
}
|
|
}
|
|
|
|
void bFile::swapLen(char *dataPtr)
|
|
{
|
|
const bool VOID_IS_8 = ((sizeof(void *) == 8));
|
|
if (VOID_IS_8)
|
|
{
|
|
if (mFlags & FD_BITS_VARIES)
|
|
{
|
|
bChunkPtr4 *c = (bChunkPtr4 *)dataPtr;
|
|
if ((c->code & 0xFFFF) == 0)
|
|
c->code >>= 16;
|
|
B3_SWITCH_INT(c->len);
|
|
B3_SWITCH_INT(c->dna_nr);
|
|
B3_SWITCH_INT(c->nr);
|
|
}
|
|
else
|
|
{
|
|
bChunkPtr8 *c = (bChunkPtr8 *)dataPtr;
|
|
if ((c->code & 0xFFFF) == 0)
|
|
c->code >>= 16;
|
|
B3_SWITCH_INT(c->len);
|
|
B3_SWITCH_INT(c->dna_nr);
|
|
B3_SWITCH_INT(c->nr);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (mFlags & FD_BITS_VARIES)
|
|
{
|
|
bChunkPtr8 *c = (bChunkPtr8 *)dataPtr;
|
|
if ((c->code & 0xFFFF) == 0)
|
|
c->code >>= 16;
|
|
B3_SWITCH_INT(c->len);
|
|
B3_SWITCH_INT(c->dna_nr);
|
|
B3_SWITCH_INT(c->nr);
|
|
}
|
|
else
|
|
{
|
|
bChunkPtr4 *c = (bChunkPtr4 *)dataPtr;
|
|
if ((c->code & 0xFFFF) == 0)
|
|
c->code >>= 16;
|
|
B3_SWITCH_INT(c->len);
|
|
|
|
B3_SWITCH_INT(c->dna_nr);
|
|
B3_SWITCH_INT(c->nr);
|
|
}
|
|
}
|
|
}
|
|
|
|
void bFile::swapDNA(char *ptr)
|
|
{
|
|
bool swap = ((mFlags & FD_ENDIAN_SWAP) != 0);
|
|
|
|
char *data = &ptr[20];
|
|
// void bDNA::init(char *data, int len, bool swap)
|
|
int *intPtr = 0;
|
|
short *shtPtr = 0;
|
|
char *cp = 0;
|
|
int dataLen = 0;
|
|
//long nr=0;
|
|
intPtr = (int *)data;
|
|
|
|
/*
|
|
SDNA (4 bytes) (magic number)
|
|
NAME (4 bytes)
|
|
<nr> (4 bytes) amount of names (int)
|
|
<string>
|
|
<string>
|
|
*/
|
|
|
|
if (strncmp(data, "SDNA", 4) == 0)
|
|
{
|
|
// skip ++ NAME
|
|
intPtr++;
|
|
intPtr++;
|
|
}
|
|
|
|
// Parse names
|
|
if (swap)
|
|
dataLen = ChunkUtils::swapInt(*intPtr);
|
|
else
|
|
dataLen = *intPtr;
|
|
|
|
*intPtr = ChunkUtils::swapInt(*intPtr);
|
|
intPtr++;
|
|
|
|
cp = (char *)intPtr;
|
|
int i;
|
|
for (i = 0; i < dataLen; i++)
|
|
{
|
|
while (*cp) cp++;
|
|
cp++;
|
|
}
|
|
|
|
cp = b3AlignPointer(cp, 4);
|
|
|
|
/*
|
|
TYPE (4 bytes)
|
|
<nr> amount of types (int)
|
|
<string>
|
|
<string>
|
|
*/
|
|
|
|
intPtr = (int *)cp;
|
|
assert(strncmp(cp, "TYPE", 4) == 0);
|
|
intPtr++;
|
|
|
|
if (swap)
|
|
dataLen = ChunkUtils::swapInt(*intPtr);
|
|
else
|
|
dataLen = *intPtr;
|
|
|
|
*intPtr = ChunkUtils::swapInt(*intPtr);
|
|
|
|
intPtr++;
|
|
|
|
cp = (char *)intPtr;
|
|
for (i = 0; i < dataLen; i++)
|
|
{
|
|
while (*cp) cp++;
|
|
cp++;
|
|
}
|
|
|
|
cp = b3AlignPointer(cp, 4);
|
|
|
|
/*
|
|
TLEN (4 bytes)
|
|
<len> (short) the lengths of types
|
|
<len>
|
|
*/
|
|
|
|
// Parse type lens
|
|
intPtr = (int *)cp;
|
|
assert(strncmp(cp, "TLEN", 4) == 0);
|
|
intPtr++;
|
|
|
|
shtPtr = (short *)intPtr;
|
|
for (i = 0; i < dataLen; i++, shtPtr++)
|
|
{
|
|
//??????if (swap)
|
|
shtPtr[0] = ChunkUtils::swapShort(shtPtr[0]);
|
|
}
|
|
|
|
if (dataLen & 1)
|
|
shtPtr++;
|
|
|
|
/*
|
|
STRC (4 bytes)
|
|
<nr> amount of structs (int)
|
|
<typenr>
|
|
<nr_of_elems>
|
|
<typenr>
|
|
<namenr>
|
|
<typenr>
|
|
<namenr>
|
|
*/
|
|
|
|
intPtr = (int *)shtPtr;
|
|
cp = (char *)intPtr;
|
|
assert(strncmp(cp, "STRC", 4) == 0);
|
|
intPtr++;
|
|
|
|
if (swap)
|
|
dataLen = ChunkUtils::swapInt(*intPtr);
|
|
else
|
|
dataLen = *intPtr;
|
|
|
|
*intPtr = ChunkUtils::swapInt(*intPtr);
|
|
|
|
intPtr++;
|
|
|
|
shtPtr = (short *)intPtr;
|
|
for (i = 0; i < dataLen; i++)
|
|
{
|
|
//if (swap)
|
|
{
|
|
int len = shtPtr[1];
|
|
|
|
shtPtr[0] = ChunkUtils::swapShort(shtPtr[0]);
|
|
shtPtr[1] = ChunkUtils::swapShort(shtPtr[1]);
|
|
|
|
shtPtr += 2;
|
|
|
|
for (int a = 0; a < len; a++, shtPtr += 2)
|
|
{
|
|
shtPtr[0] = ChunkUtils::swapShort(shtPtr[0]);
|
|
shtPtr[1] = ChunkUtils::swapShort(shtPtr[1]);
|
|
}
|
|
}
|
|
// else
|
|
// shtPtr+= (2*shtPtr[1])+2;
|
|
}
|
|
}
|
|
|
|
void bFile::writeFile(const char *fileName)
|
|
{
|
|
FILE *f = fopen(fileName, "wb");
|
|
fwrite(mFileBuffer, 1, mFileLen, f);
|
|
fclose(f);
|
|
}
|
|
|
|
void bFile::preSwap()
|
|
{
|
|
//const bool brokenDNA = (mFlags&FD_BROKEN_DNA)!=0;
|
|
//FD_ENDIAN_SWAP
|
|
//byte 8 determines the endianness of the file, little (v) versus big (V)
|
|
int littleEndian = 1;
|
|
littleEndian = ((char *)&littleEndian)[0];
|
|
|
|
if (mFileBuffer[8] == 'V')
|
|
{
|
|
mFileBuffer[8] = 'v';
|
|
}
|
|
else
|
|
{
|
|
mFileBuffer[8] = 'V';
|
|
}
|
|
|
|
mDataStart = 12;
|
|
|
|
char *dataPtr = mFileBuffer + mDataStart;
|
|
|
|
bChunkInd dataChunk;
|
|
dataChunk.code = 0;
|
|
bool ignoreEndianFlag = true;
|
|
|
|
//we always want to swap here
|
|
|
|
int seek = getNextBlock(&dataChunk, dataPtr, mFlags);
|
|
//dataPtr += ChunkUtils::getOffset(mFlags);
|
|
char *dataPtrHead = 0;
|
|
|
|
while (1)
|
|
{
|
|
// one behind
|
|
if (dataChunk.code == B3_SDNA || dataChunk.code == B3_DNA1 || dataChunk.code == B3_TYPE || dataChunk.code == B3_TLEN || dataChunk.code == B3_STRC)
|
|
{
|
|
swapDNA(dataPtr);
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
//if (dataChunk.code == DNA1) break;
|
|
dataPtrHead = dataPtr + ChunkUtils::getOffset(mFlags);
|
|
|
|
swapLen(dataPtr);
|
|
if (dataChunk.dna_nr >= 0)
|
|
{
|
|
swap(dataPtrHead, dataChunk, ignoreEndianFlag);
|
|
}
|
|
else
|
|
{
|
|
//printf("unknown chunk\n");
|
|
}
|
|
}
|
|
|
|
// next please!
|
|
dataPtr += seek;
|
|
|
|
seek = getNextBlock(&dataChunk, dataPtr, mFlags);
|
|
if (seek < 0)
|
|
break;
|
|
}
|
|
|
|
if (mFlags & FD_ENDIAN_SWAP)
|
|
{
|
|
mFlags &= ~FD_ENDIAN_SWAP;
|
|
}
|
|
else
|
|
{
|
|
mFlags |= FD_ENDIAN_SWAP;
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
char *bFile::readStruct(char *head, bChunkInd &dataChunk)
|
|
{
|
|
bool ignoreEndianFlag = false;
|
|
|
|
if (mFlags & FD_ENDIAN_SWAP)
|
|
swap(head, dataChunk, ignoreEndianFlag);
|
|
|
|
if (!mFileDNA->flagEqual(dataChunk.dna_nr))
|
|
{
|
|
// Ouch! need to rebuild the struct
|
|
short *oldStruct, *curStruct;
|
|
char *oldType, *newType;
|
|
int oldLen, curLen, reverseOld;
|
|
|
|
oldStruct = mFileDNA->getStruct(dataChunk.dna_nr);
|
|
oldType = mFileDNA->getType(oldStruct[0]);
|
|
|
|
oldLen = mFileDNA->getLength(oldStruct[0]);
|
|
|
|
if ((mFlags & FD_BROKEN_DNA) != 0)
|
|
{
|
|
if ((strcmp(oldType, "b3QuantizedBvhNodeData") == 0) && oldLen == 20)
|
|
{
|
|
return 0;
|
|
}
|
|
if ((strcmp(oldType, "b3ShortIntIndexData") == 0))
|
|
{
|
|
int allocLen = 2;
|
|
char *dataAlloc = new char[(dataChunk.nr * allocLen) + 1];
|
|
memset(dataAlloc, 0, (dataChunk.nr * allocLen) + 1);
|
|
short *dest = (short *)dataAlloc;
|
|
const short *src = (short *)head;
|
|
for (int i = 0; i < dataChunk.nr; i++)
|
|
{
|
|
dest[i] = src[i];
|
|
if (mFlags & FD_ENDIAN_SWAP)
|
|
{
|
|
B3_SWITCH_SHORT(dest[i]);
|
|
}
|
|
}
|
|
addDataBlock(dataAlloc);
|
|
return dataAlloc;
|
|
}
|
|
}
|
|
|
|
///don't try to convert Link block data, just memcpy it. Other data can be converted.
|
|
if (strcmp("Link", oldType) != 0)
|
|
{
|
|
reverseOld = mMemoryDNA->getReverseType(oldType);
|
|
|
|
if ((reverseOld != -1))
|
|
{
|
|
// make sure it's here
|
|
//assert(reverseOld!= -1 && "getReverseType() returned -1, struct required!");
|
|
|
|
//
|
|
curStruct = mMemoryDNA->getStruct(reverseOld);
|
|
newType = mMemoryDNA->getType(curStruct[0]);
|
|
curLen = mMemoryDNA->getLength(curStruct[0]);
|
|
|
|
// make sure it's the same
|
|
assert((strcmp(oldType, newType) == 0) && "internal error, struct mismatch!");
|
|
|
|
// numBlocks * length
|
|
|
|
int allocLen = (curLen);
|
|
char *dataAlloc = new char[(dataChunk.nr * allocLen) + 1];
|
|
memset(dataAlloc, 0, (dataChunk.nr * allocLen));
|
|
|
|
// track allocated
|
|
addDataBlock(dataAlloc);
|
|
|
|
char *cur = dataAlloc;
|
|
char *old = head;
|
|
for (int block = 0; block < dataChunk.nr; block++)
|
|
{
|
|
bool fixupPointers = true;
|
|
parseStruct(cur, old, dataChunk.dna_nr, reverseOld, fixupPointers);
|
|
mLibPointers.insert(old, (bStructHandle *)cur);
|
|
|
|
cur += curLen;
|
|
old += oldLen;
|
|
}
|
|
return dataAlloc;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//printf("Link found\n");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//#define DEBUG_EQUAL_STRUCTS
|
|
#ifdef DEBUG_EQUAL_STRUCTS
|
|
short *oldStruct;
|
|
char *oldType;
|
|
oldStruct = mFileDNA->getStruct(dataChunk.dna_nr);
|
|
oldType = mFileDNA->getType(oldStruct[0]);
|
|
printf("%s equal structure, just memcpy\n", oldType);
|
|
#endif //
|
|
}
|
|
|
|
char *dataAlloc = new char[(dataChunk.len) + 1];
|
|
memset(dataAlloc, 0, dataChunk.len + 1);
|
|
|
|
// track allocated
|
|
addDataBlock(dataAlloc);
|
|
|
|
memcpy(dataAlloc, head, dataChunk.len);
|
|
return dataAlloc;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::parseStruct(char *strcPtr, char *dtPtr, int old_dna, int new_dna, bool fixupPointers)
|
|
{
|
|
if (old_dna == -1) return;
|
|
if (new_dna == -1) return;
|
|
|
|
//disable this, because we need to fixup pointers/ListBase
|
|
if (0) //mFileDNA->flagEqual(old_dna))
|
|
{
|
|
short *strc = mFileDNA->getStruct(old_dna);
|
|
int len = mFileDNA->getLength(strc[0]);
|
|
|
|
memcpy(strcPtr, dtPtr, len);
|
|
return;
|
|
}
|
|
|
|
// Ok, now build the struct
|
|
char *memType, *memName, *cpc, *cpo;
|
|
short *fileStruct, *filePtrOld, *memoryStruct, *firstStruct;
|
|
int elementLength, size, revType, old_nr, new_nr, fpLen;
|
|
short firstStructType;
|
|
|
|
// File to memory lookup
|
|
memoryStruct = mMemoryDNA->getStruct(new_dna);
|
|
fileStruct = mFileDNA->getStruct(old_dna);
|
|
firstStruct = fileStruct;
|
|
|
|
filePtrOld = fileStruct;
|
|
firstStructType = mMemoryDNA->getStruct(0)[0];
|
|
|
|
// Get number of elements
|
|
elementLength = memoryStruct[1];
|
|
memoryStruct += 2;
|
|
|
|
cpc = strcPtr;
|
|
cpo = 0;
|
|
for (int ele = 0; ele < elementLength; ele++, memoryStruct += 2)
|
|
{
|
|
memType = mMemoryDNA->getType(memoryStruct[0]);
|
|
memName = mMemoryDNA->getName(memoryStruct[1]);
|
|
|
|
size = mMemoryDNA->getElementSize(memoryStruct[0], memoryStruct[1]);
|
|
revType = mMemoryDNA->getReverseType(memoryStruct[0]);
|
|
|
|
if (revType != -1 && memoryStruct[0] >= firstStructType && memName[0] != '*')
|
|
{
|
|
cpo = getFileElement(firstStruct, memName, memType, dtPtr, &filePtrOld);
|
|
if (cpo)
|
|
{
|
|
int arrayLen = mFileDNA->getArraySizeNew(filePtrOld[1]);
|
|
old_nr = mFileDNA->getReverseType(memType);
|
|
new_nr = revType;
|
|
fpLen = mFileDNA->getElementSize(filePtrOld[0], filePtrOld[1]);
|
|
if (arrayLen == 1)
|
|
{
|
|
parseStruct(cpc, cpo, old_nr, new_nr, fixupPointers);
|
|
}
|
|
else
|
|
{
|
|
char *tmpCpc = cpc;
|
|
char *tmpCpo = cpo;
|
|
|
|
for (int i = 0; i < arrayLen; i++)
|
|
{
|
|
parseStruct(tmpCpc, tmpCpo, old_nr, new_nr, fixupPointers);
|
|
tmpCpc += size / arrayLen;
|
|
tmpCpo += fpLen / arrayLen;
|
|
}
|
|
}
|
|
cpc += size;
|
|
cpo += fpLen;
|
|
}
|
|
else
|
|
cpc += size;
|
|
}
|
|
else
|
|
{
|
|
getMatchingFileDNA(fileStruct, memName, memType, cpc, dtPtr, fixupPointers);
|
|
cpc += size;
|
|
}
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
static void getElement(int arrayLen, const char *cur, const char *old, char *oldPtr, char *curData)
|
|
{
|
|
#define b3GetEle(value, current, type, cast, size, ptr) \
|
|
if (strcmp(current, type) == 0) \
|
|
{ \
|
|
value = (*(cast *)ptr); \
|
|
ptr += size; \
|
|
}
|
|
|
|
#define b3SetEle(value, current, type, cast, size, ptr) \
|
|
if (strcmp(current, type) == 0) \
|
|
{ \
|
|
(*(cast *)ptr) = (cast)value; \
|
|
ptr += size; \
|
|
}
|
|
double value = 0.0;
|
|
|
|
for (int i = 0; i < arrayLen; i++)
|
|
{
|
|
b3GetEle(value, old, "char", char, sizeof(char), oldPtr);
|
|
b3SetEle(value, cur, "char", char, sizeof(char), curData);
|
|
b3GetEle(value, old, "short", short, sizeof(short), oldPtr);
|
|
b3SetEle(value, cur, "short", short, sizeof(short), curData);
|
|
b3GetEle(value, old, "ushort", unsigned short, sizeof(unsigned short), oldPtr);
|
|
b3SetEle(value, cur, "ushort", unsigned short, sizeof(unsigned short), curData);
|
|
b3GetEle(value, old, "int", int, sizeof(int), oldPtr);
|
|
b3SetEle(value, cur, "int", int, sizeof(int), curData);
|
|
b3GetEle(value, old, "long", int, sizeof(int), oldPtr);
|
|
b3SetEle(value, cur, "long", int, sizeof(int), curData);
|
|
b3GetEle(value, old, "float", float, sizeof(float), oldPtr);
|
|
b3SetEle(value, cur, "float", float, sizeof(float), curData);
|
|
b3GetEle(value, old, "double", double, sizeof(double), oldPtr);
|
|
b3SetEle(value, cur, "double", double, sizeof(double), curData);
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::swapData(char *data, short type, int arraySize, bool ignoreEndianFlag)
|
|
{
|
|
if (ignoreEndianFlag || (mFlags & FD_ENDIAN_SWAP))
|
|
{
|
|
if (type == 2 || type == 3)
|
|
{
|
|
short *sp = (short *)data;
|
|
for (int i = 0; i < arraySize; i++)
|
|
{
|
|
sp[0] = ChunkUtils::swapShort(sp[0]);
|
|
sp++;
|
|
}
|
|
}
|
|
if (type > 3 && type < 8)
|
|
{
|
|
char c;
|
|
char *cp = data;
|
|
for (int i = 0; i < arraySize; i++)
|
|
{
|
|
c = cp[0];
|
|
cp[0] = cp[3];
|
|
cp[3] = c;
|
|
c = cp[1];
|
|
cp[1] = cp[2];
|
|
cp[2] = c;
|
|
cp += 4;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void bFile::safeSwapPtr(char *dst, const char *src)
|
|
{
|
|
if (!src || !dst)
|
|
return;
|
|
|
|
int ptrFile = mFileDNA->getPointerSize();
|
|
int ptrMem = mMemoryDNA->getPointerSize();
|
|
|
|
if (ptrFile == ptrMem)
|
|
{
|
|
memcpy(dst, src, ptrMem);
|
|
}
|
|
else if (ptrMem == 4 && ptrFile == 8)
|
|
{
|
|
b3PointerUid *oldPtr = (b3PointerUid *)src;
|
|
b3PointerUid *newPtr = (b3PointerUid *)dst;
|
|
|
|
if (oldPtr->m_uniqueIds[0] == oldPtr->m_uniqueIds[1])
|
|
{
|
|
//Bullet stores the 32bit unique ID in both upper and lower part of 64bit pointers
|
|
//so it can be used to distinguish between .blend and .bullet
|
|
newPtr->m_uniqueIds[0] = oldPtr->m_uniqueIds[0];
|
|
}
|
|
else
|
|
{
|
|
//deal with pointers the Blender .blend style way, see
|
|
//readfile.c in the Blender source tree
|
|
b3Long64 longValue = *((b3Long64 *)src);
|
|
//endian swap for 64bit pointer otherwise truncation will fail due to trailing zeros
|
|
if (mFlags & FD_ENDIAN_SWAP)
|
|
B3_SWITCH_LONGINT(longValue);
|
|
*((int *)dst) = (int)(longValue >> 3);
|
|
}
|
|
}
|
|
else if (ptrMem == 8 && ptrFile == 4)
|
|
{
|
|
b3PointerUid *oldPtr = (b3PointerUid *)src;
|
|
b3PointerUid *newPtr = (b3PointerUid *)dst;
|
|
if (oldPtr->m_uniqueIds[0] == oldPtr->m_uniqueIds[1])
|
|
{
|
|
newPtr->m_uniqueIds[0] = oldPtr->m_uniqueIds[0];
|
|
newPtr->m_uniqueIds[1] = 0;
|
|
}
|
|
else
|
|
{
|
|
*((b3Long64 *)dst) = *((int *)src);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
printf("%d %d\n", ptrFile, ptrMem);
|
|
assert(0 && "Invalid pointer len");
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::getMatchingFileDNA(short *dna_addr, const char *lookupName, const char *lookupType, char *strcData, char *data, bool fixupPointers)
|
|
{
|
|
// find the matching memory dna data
|
|
// to the file being loaded. Fill the
|
|
// memory with the file data...
|
|
|
|
int len = dna_addr[1];
|
|
dna_addr += 2;
|
|
|
|
for (int i = 0; i < len; i++, dna_addr += 2)
|
|
{
|
|
const char *type = mFileDNA->getType(dna_addr[0]);
|
|
const char *name = mFileDNA->getName(dna_addr[1]);
|
|
|
|
int eleLen = mFileDNA->getElementSize(dna_addr[0], dna_addr[1]);
|
|
|
|
if ((mFlags & FD_BROKEN_DNA) != 0)
|
|
{
|
|
if ((strcmp(type, "short") == 0) && (strcmp(name, "int") == 0))
|
|
{
|
|
eleLen = 0;
|
|
}
|
|
}
|
|
|
|
if (strcmp(lookupName, name) == 0)
|
|
{
|
|
//int arrayLenold = mFileDNA->getArraySize((char*)name.c_str());
|
|
int arrayLen = mFileDNA->getArraySizeNew(dna_addr[1]);
|
|
//assert(arrayLenold == arrayLen);
|
|
|
|
if (name[0] == '*')
|
|
{
|
|
// cast pointers
|
|
int ptrFile = mFileDNA->getPointerSize();
|
|
int ptrMem = mMemoryDNA->getPointerSize();
|
|
safeSwapPtr(strcData, data);
|
|
|
|
if (fixupPointers)
|
|
{
|
|
if (arrayLen > 1)
|
|
{
|
|
//void **sarray = (void**)strcData;
|
|
//void **darray = (void**)data;
|
|
|
|
char *cpc, *cpo;
|
|
cpc = (char *)strcData;
|
|
cpo = (char *)data;
|
|
|
|
for (int a = 0; a < arrayLen; a++)
|
|
{
|
|
safeSwapPtr(cpc, cpo);
|
|
m_pointerFixupArray.push_back(cpc);
|
|
cpc += ptrMem;
|
|
cpo += ptrFile;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (name[1] == '*')
|
|
m_pointerPtrFixupArray.push_back(strcData);
|
|
else
|
|
m_pointerFixupArray.push_back(strcData);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// printf("skipped %s %s : %x\n",type.c_str(),name.c_str(),strcData);
|
|
}
|
|
}
|
|
|
|
else if (strcmp(type, lookupType) == 0)
|
|
memcpy(strcData, data, eleLen);
|
|
else
|
|
getElement(arrayLen, lookupType, type, data, strcData);
|
|
|
|
// --
|
|
return;
|
|
}
|
|
data += eleLen;
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
char *bFile::getFileElement(short *firstStruct, char *lookupName, char *lookupType, char *data, short **foundPos)
|
|
{
|
|
short *old = firstStruct; //mFileDNA->getStruct(old_nr);
|
|
int elementLength = old[1];
|
|
old += 2;
|
|
|
|
for (int i = 0; i < elementLength; i++, old += 2)
|
|
{
|
|
char *type = mFileDNA->getType(old[0]);
|
|
char *name = mFileDNA->getName(old[1]);
|
|
int len = mFileDNA->getElementSize(old[0], old[1]);
|
|
|
|
if (strcmp(lookupName, name) == 0)
|
|
{
|
|
if (strcmp(type, lookupType) == 0)
|
|
{
|
|
if (foundPos)
|
|
*foundPos = old;
|
|
return data;
|
|
}
|
|
return 0;
|
|
}
|
|
data += len;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void bFile::swapStruct(int dna_nr, char *data, bool ignoreEndianFlag)
|
|
{
|
|
if (dna_nr == -1) return;
|
|
|
|
short *strc = mFileDNA->getStruct(dna_nr);
|
|
//short *firstStrc = strc;
|
|
|
|
int elementLen = strc[1];
|
|
strc += 2;
|
|
|
|
short first = mFileDNA->getStruct(0)[0];
|
|
|
|
char *buf = data;
|
|
for (int i = 0; i < elementLen; i++, strc += 2)
|
|
{
|
|
char *type = mFileDNA->getType(strc[0]);
|
|
char *name = mFileDNA->getName(strc[1]);
|
|
|
|
int size = mFileDNA->getElementSize(strc[0], strc[1]);
|
|
if (strc[0] >= first && name[0] != '*')
|
|
{
|
|
int old_nr = mFileDNA->getReverseType(type);
|
|
int arrayLen = mFileDNA->getArraySizeNew(strc[1]);
|
|
if (arrayLen == 1)
|
|
{
|
|
swapStruct(old_nr, buf, ignoreEndianFlag);
|
|
}
|
|
else
|
|
{
|
|
char *tmpBuf = buf;
|
|
for (int i = 0; i < arrayLen; i++)
|
|
{
|
|
swapStruct(old_nr, tmpBuf, ignoreEndianFlag);
|
|
tmpBuf += size / arrayLen;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//int arrayLenOld = mFileDNA->getArraySize(name);
|
|
int arrayLen = mFileDNA->getArraySizeNew(strc[1]);
|
|
//assert(arrayLenOld == arrayLen);
|
|
swapData(buf, strc[0], arrayLen, ignoreEndianFlag);
|
|
}
|
|
buf += size;
|
|
}
|
|
}
|
|
|
|
void bFile::resolvePointersMismatch()
|
|
{
|
|
// printf("resolvePointersStructMismatch\n");
|
|
|
|
int i;
|
|
|
|
for (i = 0; i < m_pointerFixupArray.size(); i++)
|
|
{
|
|
char *cur = m_pointerFixupArray.at(i);
|
|
void **ptrptr = (void **)cur;
|
|
void *ptr = *ptrptr;
|
|
ptr = findLibPointer(ptr);
|
|
if (ptr)
|
|
{
|
|
//printf("Fixup pointer!\n");
|
|
*(ptrptr) = ptr;
|
|
}
|
|
else
|
|
{
|
|
// printf("pointer not found: %x\n",cur);
|
|
}
|
|
}
|
|
|
|
for (i = 0; i < m_pointerPtrFixupArray.size(); i++)
|
|
{
|
|
char *cur = m_pointerPtrFixupArray.at(i);
|
|
void **ptrptr = (void **)cur;
|
|
|
|
bChunkInd *block = m_chunkPtrPtrMap.find(*ptrptr);
|
|
if (block)
|
|
{
|
|
int ptrMem = mMemoryDNA->getPointerSize();
|
|
int ptrFile = mFileDNA->getPointerSize();
|
|
|
|
int blockLen = block->len / ptrFile;
|
|
|
|
void *onptr = findLibPointer(*ptrptr);
|
|
if (onptr)
|
|
{
|
|
char *newPtr = new char[blockLen * ptrMem];
|
|
addDataBlock(newPtr);
|
|
memset(newPtr, 0, blockLen * ptrMem);
|
|
|
|
void **onarray = (void **)onptr;
|
|
char *oldPtr = (char *)onarray;
|
|
|
|
int p = 0;
|
|
while (blockLen-- > 0)
|
|
{
|
|
b3PointerUid dp = {{0}};
|
|
safeSwapPtr((char *)dp.m_uniqueIds, oldPtr);
|
|
|
|
void **tptr = (void **)(newPtr + p * ptrMem);
|
|
*tptr = findLibPointer(dp.m_ptr);
|
|
|
|
oldPtr += ptrFile;
|
|
++p;
|
|
}
|
|
|
|
*ptrptr = newPtr;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
///this loop only works fine if the Blender DNA structure of the file matches the headerfiles
|
|
void bFile::resolvePointersChunk(const bChunkInd &dataChunk, int verboseMode)
|
|
{
|
|
bParse::bDNA *fileDna = mFileDNA ? mFileDNA : mMemoryDNA;
|
|
|
|
short int *oldStruct = fileDna->getStruct(dataChunk.dna_nr);
|
|
short oldLen = fileDna->getLength(oldStruct[0]);
|
|
//char* structType = fileDna->getType(oldStruct[0]);
|
|
|
|
char *cur = (char *)findLibPointer(dataChunk.oldPtr);
|
|
for (int block = 0; block < dataChunk.nr; block++)
|
|
{
|
|
resolvePointersStructRecursive(cur, dataChunk.dna_nr, verboseMode, 1);
|
|
cur += oldLen;
|
|
}
|
|
}
|
|
|
|
int bFile::resolvePointersStructRecursive(char *strcPtr, int dna_nr, int verboseMode, int recursion)
|
|
{
|
|
bParse::bDNA *fileDna = mFileDNA ? mFileDNA : mMemoryDNA;
|
|
|
|
char *memType;
|
|
char *memName;
|
|
short firstStructType = fileDna->getStruct(0)[0];
|
|
|
|
char *elemPtr = strcPtr;
|
|
|
|
short int *oldStruct = fileDna->getStruct(dna_nr);
|
|
|
|
int elementLength = oldStruct[1];
|
|
oldStruct += 2;
|
|
|
|
int totalSize = 0;
|
|
|
|
for (int ele = 0; ele < elementLength; ele++, oldStruct += 2)
|
|
{
|
|
memType = fileDna->getType(oldStruct[0]);
|
|
memName = fileDna->getName(oldStruct[1]);
|
|
|
|
int arrayLen = fileDna->getArraySizeNew(oldStruct[1]);
|
|
if (memName[0] == '*')
|
|
{
|
|
if (arrayLen > 1)
|
|
{
|
|
void **array = (void **)elemPtr;
|
|
for (int a = 0; a < arrayLen; a++)
|
|
{
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
for (int i = 0; i < recursion; i++)
|
|
{
|
|
printf(" ");
|
|
}
|
|
//skip the *
|
|
printf("<%s type=\"pointer\"> ", &memName[1]);
|
|
printf("%p ", array[a]);
|
|
printf("</%s>\n", &memName[1]);
|
|
}
|
|
|
|
array[a] = findLibPointer(array[a]);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
void **ptrptr = (void **)elemPtr;
|
|
void *ptr = *ptrptr;
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
for (int i = 0; i < recursion; i++)
|
|
{
|
|
printf(" ");
|
|
}
|
|
printf("<%s type=\"pointer\"> ", &memName[1]);
|
|
printf("%p ", ptr);
|
|
printf("</%s>\n", &memName[1]);
|
|
}
|
|
ptr = findLibPointer(ptr);
|
|
|
|
if (ptr)
|
|
{
|
|
// printf("Fixup pointer at 0x%x from 0x%x to 0x%x!\n",ptrptr,*ptrptr,ptr);
|
|
*(ptrptr) = ptr;
|
|
if (memName[1] == '*' && ptrptr && *ptrptr)
|
|
{
|
|
// This will only work if the given **array is continuous
|
|
void **array = (void **)*(ptrptr);
|
|
void *np = array[0];
|
|
int n = 0;
|
|
while (np)
|
|
{
|
|
np = findLibPointer(array[n]);
|
|
if (np) array[n] = np;
|
|
n++;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// printf("Cannot fixup pointer at 0x%x from 0x%x to 0x%x!\n",ptrptr,*ptrptr,ptr);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
int revType = fileDna->getReverseType(oldStruct[0]);
|
|
if (oldStruct[0] >= firstStructType) //revType != -1 &&
|
|
{
|
|
char cleanName[MAX_STRLEN];
|
|
getCleanName(memName, cleanName);
|
|
|
|
int arrayLen = fileDna->getArraySizeNew(oldStruct[1]);
|
|
int byteOffset = 0;
|
|
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
for (int i = 0; i < recursion; i++)
|
|
{
|
|
printf(" ");
|
|
}
|
|
|
|
if (arrayLen > 1)
|
|
{
|
|
printf("<%s type=\"%s\" count=%d>\n", cleanName, memType, arrayLen);
|
|
}
|
|
else
|
|
{
|
|
printf("<%s type=\"%s\">\n", cleanName, memType);
|
|
}
|
|
}
|
|
|
|
for (int i = 0; i < arrayLen; i++)
|
|
{
|
|
byteOffset += resolvePointersStructRecursive(elemPtr + byteOffset, revType, verboseMode, recursion + 1);
|
|
}
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
for (int i = 0; i < recursion; i++)
|
|
{
|
|
printf(" ");
|
|
}
|
|
printf("</%s>\n", cleanName);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//export a simple type
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
if (arrayLen > MAX_ARRAY_LENGTH)
|
|
{
|
|
printf("too long\n");
|
|
}
|
|
else
|
|
{
|
|
//printf("%s %s\n",memType,memName);
|
|
|
|
bool isIntegerType = (strcmp(memType, "char") == 0) || (strcmp(memType, "int") == 0) || (strcmp(memType, "short") == 0);
|
|
|
|
if (isIntegerType)
|
|
{
|
|
const char *newtype = "int";
|
|
int dbarray[MAX_ARRAY_LENGTH];
|
|
int *dbPtr = 0;
|
|
char *tmp = elemPtr;
|
|
dbPtr = &dbarray[0];
|
|
if (dbPtr)
|
|
{
|
|
char cleanName[MAX_STRLEN];
|
|
getCleanName(memName, cleanName);
|
|
|
|
int i;
|
|
getElement(arrayLen, newtype, memType, tmp, (char *)dbPtr);
|
|
for (i = 0; i < recursion; i++)
|
|
printf(" ");
|
|
if (arrayLen == 1)
|
|
printf("<%s type=\"%s\">", cleanName, memType);
|
|
else
|
|
printf("<%s type=\"%s\" count=%d>", cleanName, memType, arrayLen);
|
|
for (i = 0; i < arrayLen; i++)
|
|
printf(" %d ", dbPtr[i]);
|
|
printf("</%s>\n", cleanName);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
const char *newtype = "double";
|
|
double dbarray[MAX_ARRAY_LENGTH];
|
|
double *dbPtr = 0;
|
|
char *tmp = elemPtr;
|
|
dbPtr = &dbarray[0];
|
|
if (dbPtr)
|
|
{
|
|
int i;
|
|
getElement(arrayLen, newtype, memType, tmp, (char *)dbPtr);
|
|
for (i = 0; i < recursion; i++)
|
|
printf(" ");
|
|
char cleanName[MAX_STRLEN];
|
|
getCleanName(memName, cleanName);
|
|
|
|
if (arrayLen == 1)
|
|
{
|
|
printf("<%s type=\"%s\">", memName, memType);
|
|
}
|
|
else
|
|
{
|
|
printf("<%s type=\"%s\" count=%d>", cleanName, memType, arrayLen);
|
|
}
|
|
for (i = 0; i < arrayLen; i++)
|
|
printf(" %f ", dbPtr[i]);
|
|
printf("</%s>\n", cleanName);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
int size = fileDna->getElementSize(oldStruct[0], oldStruct[1]);
|
|
totalSize += size;
|
|
elemPtr += size;
|
|
}
|
|
|
|
return totalSize;
|
|
}
|
|
|
|
///Resolve pointers replaces the original pointers in structures, and linked lists by the new in-memory structures
|
|
void bFile::resolvePointers(int verboseMode)
|
|
{
|
|
bParse::bDNA *fileDna = mFileDNA ? mFileDNA : mMemoryDNA;
|
|
|
|
//char *dataPtr = mFileBuffer+mDataStart;
|
|
|
|
if (1) //mFlags & (FD_BITS_VARIES | FD_VERSION_VARIES))
|
|
{
|
|
resolvePointersMismatch();
|
|
}
|
|
|
|
{
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
printf("<?xml version=\"1.0\" encoding=\"utf-8\"?>\n");
|
|
int numitems = m_chunks.size();
|
|
printf("<bullet_physics version=%d itemcount = %d>\n", b3GetVersion(), numitems);
|
|
}
|
|
for (int i = 0; i < m_chunks.size(); i++)
|
|
{
|
|
const bChunkInd &dataChunk = m_chunks.at(i);
|
|
|
|
if (!mFileDNA || fileDna->flagEqual(dataChunk.dna_nr))
|
|
{
|
|
//dataChunk.len
|
|
short int *oldStruct = fileDna->getStruct(dataChunk.dna_nr);
|
|
char *oldType = fileDna->getType(oldStruct[0]);
|
|
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
printf(" <%s pointer=%p>\n", oldType, dataChunk.oldPtr);
|
|
|
|
resolvePointersChunk(dataChunk, verboseMode);
|
|
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
printf(" </%s>\n", oldType);
|
|
}
|
|
else
|
|
{
|
|
//printf("skipping mStruct\n");
|
|
}
|
|
}
|
|
if (verboseMode & FD_VERBOSE_EXPORT_XML)
|
|
{
|
|
printf("</bullet_physics>\n");
|
|
}
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
void *bFile::findLibPointer(void *ptr)
|
|
{
|
|
bStructHandle **ptrptr = getLibPointers().find(ptr);
|
|
if (ptrptr)
|
|
return *ptrptr;
|
|
return 0;
|
|
}
|
|
|
|
void bFile::updateOldPointers()
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < m_chunks.size(); i++)
|
|
{
|
|
bChunkInd &dataChunk = m_chunks[i];
|
|
dataChunk.oldPtr = findLibPointer(dataChunk.oldPtr);
|
|
}
|
|
}
|
|
void bFile::dumpChunks(bParse::bDNA *dna)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < m_chunks.size(); i++)
|
|
{
|
|
bChunkInd &dataChunk = m_chunks[i];
|
|
char *codeptr = (char *)&dataChunk.code;
|
|
char codestr[5] = {codeptr[0], codeptr[1], codeptr[2], codeptr[3], 0};
|
|
|
|
short *newStruct = dna->getStruct(dataChunk.dna_nr);
|
|
char *typeName = dna->getType(newStruct[0]);
|
|
printf("%3d: %s ", i, typeName);
|
|
|
|
printf("code=%s ", codestr);
|
|
|
|
printf("ptr=%p ", dataChunk.oldPtr);
|
|
printf("len=%d ", dataChunk.len);
|
|
printf("nr=%d ", dataChunk.nr);
|
|
if (dataChunk.nr != 1)
|
|
{
|
|
printf("not 1\n");
|
|
}
|
|
printf("\n");
|
|
}
|
|
|
|
#if 0
|
|
IDFinderData ifd;
|
|
ifd.success = 0;
|
|
ifd.IDname = NULL;
|
|
ifd.just_print_it = 1;
|
|
for (i=0; i<bf->m_blocks.size(); ++i)
|
|
{
|
|
BlendBlock* bb = bf->m_blocks[i];
|
|
printf("tag='%s'\tptr=%p\ttype=%s\t[%4d]", bb->tag, bb,bf->types[bb->type_index].name,bb->m_array_entries_.size());
|
|
block_ID_finder(bb, bf, &ifd);
|
|
printf("\n");
|
|
}
|
|
#endif
|
|
}
|
|
|
|
void bFile::writeChunks(FILE *fp, bool fixupPointers)
|
|
{
|
|
bParse::bDNA *fileDna = mFileDNA ? mFileDNA : mMemoryDNA;
|
|
|
|
for (int i = 0; i < m_chunks.size(); i++)
|
|
{
|
|
bChunkInd &dataChunk = m_chunks.at(i);
|
|
|
|
// Ouch! need to rebuild the struct
|
|
short *oldStruct, *curStruct;
|
|
char *oldType, *newType;
|
|
int oldLen, curLen, reverseOld;
|
|
|
|
oldStruct = fileDna->getStruct(dataChunk.dna_nr);
|
|
oldType = fileDna->getType(oldStruct[0]);
|
|
oldLen = fileDna->getLength(oldStruct[0]);
|
|
///don't try to convert Link block data, just memcpy it. Other data can be converted.
|
|
reverseOld = mMemoryDNA->getReverseType(oldType);
|
|
|
|
if ((reverseOld != -1))
|
|
{
|
|
// make sure it's here
|
|
//assert(reverseOld!= -1 && "getReverseType() returned -1, struct required!");
|
|
//
|
|
curStruct = mMemoryDNA->getStruct(reverseOld);
|
|
newType = mMemoryDNA->getType(curStruct[0]);
|
|
// make sure it's the same
|
|
assert((strcmp(oldType, newType) == 0) && "internal error, struct mismatch!");
|
|
|
|
curLen = mMemoryDNA->getLength(curStruct[0]);
|
|
dataChunk.dna_nr = reverseOld;
|
|
if (strcmp("Link", oldType) != 0)
|
|
{
|
|
dataChunk.len = curLen * dataChunk.nr;
|
|
}
|
|
else
|
|
{
|
|
// printf("keep length of link = %d\n",dataChunk.len);
|
|
}
|
|
|
|
//write the structure header
|
|
fwrite(&dataChunk, sizeof(bChunkInd), 1, fp);
|
|
|
|
short int *curStruct1;
|
|
curStruct1 = mMemoryDNA->getStruct(dataChunk.dna_nr);
|
|
assert(curStruct1 == curStruct);
|
|
|
|
char *cur = fixupPointers ? (char *)findLibPointer(dataChunk.oldPtr) : (char *)dataChunk.oldPtr;
|
|
|
|
//write the actual contents of the structure(s)
|
|
fwrite(cur, dataChunk.len, 1, fp);
|
|
}
|
|
else
|
|
{
|
|
printf("serious error, struct mismatch: don't write\n");
|
|
}
|
|
}
|
|
}
|
|
|
|
// ----------------------------------------------------- //
|
|
int bFile::getNextBlock(bChunkInd *dataChunk, const char *dataPtr, const int flags)
|
|
{
|
|
bool swap = false;
|
|
bool varies = false;
|
|
|
|
if (flags & FD_ENDIAN_SWAP)
|
|
swap = true;
|
|
if (flags & FD_BITS_VARIES)
|
|
varies = true;
|
|
|
|
if (VOID_IS_8)
|
|
{
|
|
if (varies)
|
|
{
|
|
bChunkPtr4 head;
|
|
memcpy(&head, dataPtr, sizeof(bChunkPtr4));
|
|
|
|
bChunkPtr8 chunk;
|
|
|
|
chunk.code = head.code;
|
|
chunk.len = head.len;
|
|
chunk.m_uniqueInts[0] = head.m_uniqueInt;
|
|
chunk.m_uniqueInts[1] = 0;
|
|
chunk.dna_nr = head.dna_nr;
|
|
chunk.nr = head.nr;
|
|
|
|
if (swap)
|
|
{
|
|
if ((chunk.code & 0xFFFF) == 0)
|
|
chunk.code >>= 16;
|
|
|
|
B3_SWITCH_INT(chunk.len);
|
|
B3_SWITCH_INT(chunk.dna_nr);
|
|
B3_SWITCH_INT(chunk.nr);
|
|
}
|
|
|
|
memcpy(dataChunk, &chunk, sizeof(bChunkInd));
|
|
}
|
|
else
|
|
{
|
|
bChunkPtr8 c;
|
|
memcpy(&c, dataPtr, sizeof(bChunkPtr8));
|
|
|
|
if (swap)
|
|
{
|
|
if ((c.code & 0xFFFF) == 0)
|
|
c.code >>= 16;
|
|
|
|
B3_SWITCH_INT(c.len);
|
|
B3_SWITCH_INT(c.dna_nr);
|
|
B3_SWITCH_INT(c.nr);
|
|
}
|
|
|
|
memcpy(dataChunk, &c, sizeof(bChunkInd));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (varies)
|
|
{
|
|
bChunkPtr8 head;
|
|
memcpy(&head, dataPtr, sizeof(bChunkPtr8));
|
|
|
|
bChunkPtr4 chunk;
|
|
chunk.code = head.code;
|
|
chunk.len = head.len;
|
|
|
|
if (head.m_uniqueInts[0] == head.m_uniqueInts[1])
|
|
{
|
|
chunk.m_uniqueInt = head.m_uniqueInts[0];
|
|
}
|
|
else
|
|
{
|
|
b3Long64 oldPtr = 0;
|
|
memcpy(&oldPtr, &head.m_uniqueInts[0], 8);
|
|
if (swap)
|
|
B3_SWITCH_LONGINT(oldPtr);
|
|
chunk.m_uniqueInt = (int)(oldPtr >> 3);
|
|
}
|
|
|
|
chunk.dna_nr = head.dna_nr;
|
|
chunk.nr = head.nr;
|
|
|
|
if (swap)
|
|
{
|
|
if ((chunk.code & 0xFFFF) == 0)
|
|
chunk.code >>= 16;
|
|
|
|
B3_SWITCH_INT(chunk.len);
|
|
B3_SWITCH_INT(chunk.dna_nr);
|
|
B3_SWITCH_INT(chunk.nr);
|
|
}
|
|
|
|
memcpy(dataChunk, &chunk, sizeof(bChunkInd));
|
|
}
|
|
else
|
|
{
|
|
bChunkPtr4 c;
|
|
memcpy(&c, dataPtr, sizeof(bChunkPtr4));
|
|
|
|
if (swap)
|
|
{
|
|
if ((c.code & 0xFFFF) == 0)
|
|
c.code >>= 16;
|
|
|
|
B3_SWITCH_INT(c.len);
|
|
B3_SWITCH_INT(c.dna_nr);
|
|
B3_SWITCH_INT(c.nr);
|
|
}
|
|
memcpy(dataChunk, &c, sizeof(bChunkInd));
|
|
}
|
|
}
|
|
|
|
if (dataChunk->len < 0)
|
|
return -1;
|
|
|
|
#if 0
|
|
print ("----------");
|
|
print (dataChunk->code);
|
|
print (dataChunk->len);
|
|
print (dataChunk->old);
|
|
print (dataChunk->dna_nr);
|
|
print (dataChunk->nr);
|
|
#endif
|
|
return (dataChunk->len + ChunkUtils::getOffset(flags));
|
|
}
|
|
|
|
//eof
|