/*! 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 readKsm(EmbPattern* pattern, const char* fileName)
{
int prevStitchType = NORMAL;
char b[3];
EmbFile* file = 0;
if(!pattern) { embLog_error("format-ksm.c readKsm(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-ksm.c readKsm(), fileName argument is null\n"); return 0; }
file = embFile_open(fileName, "rb");
if(!file)
{
embLog_error("format-ksm.c readKsm(), cannot open %s for reading\n", fileName);
return 0;
}
embFile_seek(file, 0x200, SEEK_SET);
while(embFile_read(b, 1, 3, file) == 3)
{
int flags = NORMAL;
if(((prevStitchType & 0x08) == 0x08) && (b[2] & 0x08) == 0x08)
{
flags = STOP;
}
else if((b[2] & 0x1F) != 0)
{
flags = TRIM;
}
prevStitchType = b[2];
if(b[2] & 0x40)
b[1] = -b[1];
if(b[2] & 0x20)
b[0] = -b[0];
embPattern_addStitchRel(pattern, b[1] / 10.0, b[0] / 10.0, flags, 1);
}
embFile_close(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);
return 1;
}
/*! 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 readT01(EmbPattern* pattern, const char* fileName)
{
unsigned char b[3];
EmbFile* file = 0;
if(!pattern) { embLog_error("format-t01.c readt01(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-t01.c readt01(), fileName argument is null\n"); return 0; }
file = embFile_open(fileName, "rb");
if(!file)
{
embLog_error("format-t01.c readt01(), cannot open %s for reading\n", fileName);
return 0;
}
embPattern_loadExternalColorFile(pattern, fileName);
while(embFile_read(b, 1, 3, file) == 3)
{
int flags;
int x = 0;
int y = 0;
if(b[0] & 0x01)
x += 1;
if(b[0] & 0x02)
x -= 1;
if(b[0] & 0x04)
x += 9;
if(b[0] & 0x08)
x -= 9;
if(b[0] & 0x80)
y += 1;
if(b[0] & 0x40)
y -= 1;
if(b[0] & 0x20)
y += 9;
if(b[0] & 0x10)
y -= 9;
if(b[1] & 0x01)
x += 3;
if(b[1] & 0x02)
x -= 3;
if(b[1] & 0x04)
x += 27;
if(b[1] & 0x08)
x -= 27;
if(b[1] & 0x80)
y += 3;
if(b[1] & 0x40)
y -= 3;
if(b[1] & 0x20)
y += 27;
if(b[1] & 0x10)
y -= 27;
if(b[2] & 0x04)
x += 81;
if(b[2] & 0x08)
x -= 81;
if(b[2] & 0x20)
y += 81;
if(b[2] & 0x10)
y -= 81;
flags = decodeRecordFlags(b[2]);
embPattern_addStitchRel(pattern, x / 10.0, y / 10.0, flags, 1);
if(flags == END)
break;
}
embFile_close(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);
return 1;
}
int binaryReadBytes(EmbFile* file, unsigned char* destination, int count)
{
return (int) embFile_read((char*) destination, 1, count, file);
}
/*! 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 readPcs(EmbPattern* pattern, const char* fileName)
{
char allZeroColor = 1;
int i = 0;
unsigned char b[9];
double dx = 0, dy = 0;
int flags = 0, st = 0;
unsigned char version, hoopSize;
unsigned short colorCount;
EmbFile* file = 0;
if(!pattern) { embLog_error("format-pcs.c readPcs(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-pcs.c readPcs(), fileName argument is null\n"); return 0; }
file = embFile_open(fileName, "rb");
if(!file)
{
embLog_error("format-pcs.c readPcs(), cannot open %s for reading\n", fileName);
return 0;
}
version = binaryReadByte(file);
hoopSize = binaryReadByte(file); /* 0 for PCD, 1 for PCQ (MAXI), 2 for PCS with small hoop(80x80), */
/* and 3 for PCS with large hoop (115x120) */
switch(hoopSize)
{
case 2:
pattern->hoop.width = 80.0;
pattern->hoop.height = 80.0;
break;
case 3:
pattern->hoop.width = 115;
pattern->hoop.height = 120.0;
break;
}
colorCount = binaryReadUInt16(file);
for(i = 0; i < colorCount; i++)
{
EmbThread t;
t.color.r = binaryReadByte(file);
t.color.g = binaryReadByte(file);
t.color.b = binaryReadByte(file);
t.catalogNumber = "";
t.description = "";
if(t.color.r || t.color.g || t.color.b)
{
allZeroColor = 0;
}
embPattern_addThread(pattern, t);
binaryReadByte(file);
}
if(allZeroColor)
embPattern_loadExternalColorFile(pattern, fileName);
st = binaryReadUInt16(file);
/* READ STITCH RECORDS */
for(i = 0; i < st; i++)
{
flags = NORMAL;
if(embFile_read(b, 1, 9, file) != 9)
break;
if(b[8] & 0x01)
{
flags = STOP;
}
else if(b[8] & 0x04)
{
flags = TRIM;
}
else if(b[8] != 0)
{
/* TODO: ONLY INTERESTED IN THIS CASE TO LEARN MORE ABOUT THE FORMAT */
}
dx = pcsDecode(b[1], b[2], b[3]);
dy = pcsDecode(b[5], b[6], b[7]);
embPattern_addStitchAbs(pattern, dx / 10.0, dy / 10.0, flags, 1);
}
embFile_close(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);
return 1;
}
/*! 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 readBro(EmbPattern* pattern, const char* fileName)
{
unsigned char x55;
short unknown1, unknown2, unknown3, unknown4, moreBytesToEnd;
char name[8];
int stitchType;
EmbFile* file = 0;
if(!pattern) { embLog_error("format-bro.c readBro(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-bro.c readBro(), fileName argument is null\n"); return 0; }
file = embFile_open(fileName, "rb");
if(!file)
{
embLog_error("format-bro.c readBro(), cannot open %s for reading\n", fileName);
return 0;
}
embPattern_loadExternalColorFile(pattern, fileName);
x55 = binaryReadByte(file);
unknown1 = binaryReadInt16(file); /* TODO: determine what this unknown data is */
embFile_read(name, 1, 8, file);
unknown2 = binaryReadInt16(file); /* TODO: determine what this unknown data is */
unknown3 = binaryReadInt16(file); /* TODO: determine what this unknown data is */
unknown4 = binaryReadInt16(file); /* TODO: determine what this unknown data is */
moreBytesToEnd = binaryReadInt16(file);
embFile_seek(file, 0x100, SEEK_SET);
while(1)
{
short b1, b2;
stitchType = EM_NORMAL;
b1 = binaryReadByte(file);
b2 = binaryReadByte(file);
if(b1 == -128)
{
unsigned char bCode = binaryReadByte(file);
b1 = binaryReadInt16(file);
b2 = binaryReadInt16(file);
if(bCode == 2)
{
stitchType = STOP;
}
else if(bCode == 3)
{
stitchType = TRIM;
}
else if(bCode == 0x7E)
{
embPattern_addStitchRel(pattern, 0, 0, END, 1);
break;
}
}
embPattern_addStitchRel(pattern, b1 / 10.0, b2 / 10.0, stitchType, 1);
}
embFile_close(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);
return 1;
}
/*! 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 readZsk(EmbPattern* pattern, const char* fileName)
{
char b[3];
EmbFile* file = 0;
int stitchType;
unsigned char colorNumber;
if(!pattern) { embLog_error("format-zsk.c readZsk(), pattern argument is null\n"); return 0; }
if(!fileName) { embLog_error("format-zsk.c readZsk(), fileName argument is null\n"); return 0; }
file = embFile_open(fileName, "rb");
if(!file)
{
embLog_error("format-zsk.c readZsk(), cannot open %s for reading\n", fileName);
return 0;
}
embFile_seek(file, 0x230, SEEK_SET);
colorNumber = binaryReadUInt8(file);
while(colorNumber != 0)
{
EmbThread t;
t.color.r = binaryReadUInt8(file);
t.color.g = binaryReadUInt8(file);
t.color.b = binaryReadUInt8(file);
t.catalogNumber = "";
t.description = "";
embPattern_addThread(pattern, t);
embFile_seek(file, 0x48, SEEK_CUR);
colorNumber = binaryReadUInt8(file);
}
embFile_seek(file, 0x2E, SEEK_CUR);
while(embFile_read(b, 1, 3, file) == 3)
{
stitchType = NORMAL;
if (b[0] & 0x4)
{
b[2] = -b[2];
}
if (b[0] & 0x8)
{
b[1] = -b[1];
}
if (b[0] & 0x02)
{
stitchType = JUMP;
}
if(b[0] & 0x20)
{
if (b[1] == 2)
{
stitchType = TRIM;
}
else if (b[1] == -1)
{
break;
}
else
{
if (b[2] != 0)
{
colorNumber = b[2];
}
stitchType = STOP; /* TODO: need to determine what b[1] is used for.*/
embPattern_changeColor(pattern, colorNumber - 1);
}
b[1] = 0;
b[2] = 0;
}
embPattern_addStitchRel(pattern, b[1] / 10.0, b[2] / 10.0, stitchType, 0);
}
embFile_close(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);
}
return 1;
}
