int readPhb(EmbPattern* pattern, const char* fileName)
{
unsigned int fileOffset;
short colorCount;
FILE* file = 0;
int i;
file = fopen(fileName, "rb");
if(!file)
{
return 0;
}
fseek(file, 0x71, SEEK_SET);
colorCount = binaryReadInt16(file);
for(i = 0; i < colorCount; i++)
{
EmbThread t = pecThreads[binaryReadByte(file)];
embPattern_addThread(pattern, t);
}
/* TODO: check that file begins with #PHB */
fseek(file, 0x54, SEEK_SET);
fileOffset = 0x52;
fileOffset += binaryReadUInt32(file);
fseek(file, fileOffset, SEEK_SET);
fileOffset += binaryReadUInt32(file) + 2;
fseek(file, fileOffset, SEEK_SET);
fileOffset += binaryReadUInt32(file);
fseek(file, fileOffset + 14, SEEK_SET); /* 28 */
colorCount = (short)binaryReadByte(file);
for(i = 0; i< colorCount; i++)
{
binaryReadByte(file);
}
binaryReadInt32(file); /* bytes to end of file */
binaryReadInt32(file);
binaryReadByte(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
readPecStitches(pattern, file);
embPattern_addStitchRel(pattern, 0.0, 0.0, END, 1);
fclose(file);
embPattern_flipVertical(pattern);
return 1; /*TODO: finish ReadPhb */
}
/*! Reads a file with the given \a fileName and loads the data into \a pattern.
* Returns \c true if successful, otherwise returns \c false. */
int readPhc(EmbPattern* pattern, const char* fileName)
{
int colorChanges, version, bytesInSection2;
unsigned short pecOffset, bytesInSection, bytesInSection3;
char pecAdd;
FILE* file = 0;
int i;
if(!pattern) { embLog_error("format-phc.c readPhc(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-phc.c readPhc(), fileName argument is null\n"); return 0; }
file = fopen(fileName, "rb");
if(!file)
{
embLog_error("format-phc.c readPhc(), cannot open %s for reading\n", fileName);
return 0;
}
fseek(file, 0x07, SEEK_SET);
version = binaryReadByte(file) - 0x30; /* converting from ansi number */
fseek(file, 0x4D, SEEK_SET);
colorChanges = binaryReadUInt16(file);
for(i = 0; i < colorChanges; i++)
{
EmbThread t = pecThreads[(int)binaryReadByte(file)];
embPattern_addThread(pattern, t);
}
fseek(file, 0x2B, SEEK_SET);
pecAdd = binaryReadByte(file);
binaryReadUInt32(file); /* file length */
pecOffset = binaryReadUInt16(file);
fseek(file, pecOffset + pecAdd, SEEK_SET);
bytesInSection = binaryReadUInt16(file);
fseek(file, bytesInSection, SEEK_CUR);
bytesInSection2 = binaryReadUInt32(file);
fseek(file, bytesInSection2, SEEK_CUR);
bytesInSection3 = binaryReadUInt16(file);
fseek(file, bytesInSection3 + 0x12, SEEK_CUR);
readPecStitches(pattern, file);
fclose(file);
/* Check for an END stitch and add one if it is not present */
if(pattern->lastStitch->stitch.flags != END)
embPattern_addStitchRel(pattern, 0, 0, END, 1);
embPattern_flipVertical(pattern);
return 1; /*TODO: finish ReadPhc */
}
int readMax(EmbPattern* pattern, const char* fileName)
{
int i;
unsigned char b[8];
double dx = 0, dy = 0;
int flags = 0;
int stitchCount;
FILE* file;
file = fopen(fileName, "rb");
if(file == 0)
{
return 0;
}
fseek(file, 0xD5, SEEK_SET);
stitchCount = binaryReadUInt32(file);
/* READ STITCH RECORDS */
for(i = 0; i < stitchCount; i++)
{
flags = NORMAL;
if(fread(b, 1, 8, file) != 8)
break;
dx = maxDecode(b[0], b[1], b[2]);
dy = maxDecode(b[4], b[5], b[6]);
embPattern_addStitchAbs(pattern, dx / 10.0, dy / 10.0, flags, 1);
}
embPattern_addStitchRel(pattern, 0, 0, END, 1);
embPattern_flipVertical(pattern);
fclose(file);
return 1;
}
bcf_directory_entry* CompoundFileDirectoryEntry(FILE* file)
{
bcf_directory_entry* dir = (bcf_directory_entry*)malloc(sizeof(bcf_directory_entry));
if(!dir) { embLog_error("compound-file-directory.c CompoundFileDirectoryEntry(), cannot allocate memory for dir\n"); } /* TODO: avoid crashing. null pointer will be accessed */
memset(dir->directoryEntryName, 0, 32);
parseDirectoryEntryName(file, dir);
dir->next = 0;
dir->directoryEntryNameLength = binaryReadUInt16(file);
dir->objectType = (unsigned char)binaryReadByte(file);
if( (dir->objectType != ObjectTypeStorage) &&
(dir->objectType != ObjectTypeStream) &&
(dir->objectType != ObjectTypeRootEntry))
{
embLog_error("compound-file-directory.c CompoundFileDirectoryEntry(), unexpected object type: %d\n", dir->objectType);
return 0;
}
dir->colorFlag = (unsigned char)binaryReadByte(file);
dir->leftSiblingId = binaryReadUInt32(file);
dir->rightSiblingId = binaryReadUInt32(file);
dir->childId = binaryReadUInt32(file);
readCLSID(file, dir);
dir->stateBits = binaryReadUInt32(file);
dir->creationTime = parseTime(file);
dir->modifiedTime = parseTime(file);
dir->startingSectorLocation = binaryReadUInt32(file);
dir->streamSize = binaryReadUInt32(file); /* This should really be __int64 or long long, but for our uses we should never run into an issue */
dir->streamSizeHigh = binaryReadUInt32(file); /* top portion of int64 */
return dir;
}
/*! Reads a file with the given \a fileName and loads the data into \a pattern.
* Returns \c true if successful, otherwise returns \c false. */
int readPhb(EmbPattern* pattern, const char* fileName)
{
unsigned int fileOffset;
short colorCount;
FILE* file = 0;
int i;
if(!pattern) { embLog_error("format-phb.c readPhb(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-phb.c readPhb(), fileName argument is null\n"); return 0; }
file = fopen(fileName, "rb");
if(!file)
{
embLog_error("format-phb.c readPhb(), cannot open %s for reading\n", fileName);
return 0;
}
fseek(file, 0x71, SEEK_SET);
colorCount = binaryReadInt16(file);
for(i = 0; i < colorCount; i++)
{
EmbThread t = pecThreads[(int)binaryReadByte(file)];
embPattern_addThread(pattern, t);
}
/* TODO: check that file begins with #PHB */
fseek(file, 0x54, SEEK_SET);
fileOffset = 0x52;
fileOffset += binaryReadUInt32(file);
fseek(file, fileOffset, SEEK_SET);
fileOffset += binaryReadUInt32(file) + 2;
fseek(file, fileOffset, SEEK_SET);
fileOffset += binaryReadUInt32(file);
fseek(file, fileOffset + 14, SEEK_SET); /* 28 */
colorCount = (short)binaryReadByte(file);
for(i = 0; i< colorCount; i++)
{
binaryReadByte(file);
}
binaryReadInt32(file); /* bytes to end of file */
binaryReadInt32(file);
binaryReadByte(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
binaryReadInt16(file);
readPecStitches(pattern, file);
fclose(file);
/* Check for an END stitch and add one if it is not present */
if(pattern->lastStitch->stitch.flags != END)
embPattern_addStitchRel(pattern, 0, 0, END, 1);
embPattern_flipVertical(pattern);
return 1; /*TODO: finish ReadPhb */
}
