void vmsDataFile::LoadFromFile(vmsFile &file, vmsDataFileItem &item)
{
file.ReadString (item.strName);
int enType;
file.ReadInt (enType);
int i; double f; __int64 i64; fsString str;
LPBYTE pb; int nSize;
switch (enType)
{
case VVT_EMPTY: break;
case VVT_INT: file.ReadInt (i); item.vt = i; break;
case VVT_DOUBLE: file.ReadDouble (f); item.vt = f; break;
case VVT_INT64: file.ReadInt64 (i64); item.vt = i64; break;
case VVT_ASTRING: file.ReadString (str); item.vt = str; break;
case VVT_LPBYTE:
file.ReadInt (nSize);
pb = new BYTE [nSize];
file.Read (pb, nSize);
item.vt.set (pb, nSize);
delete [] pb;
break;
default: ASSERT (false);
}
}
void vmsFileUtil::ReadString(vmsFile &file, fsString &str)
{
int l = 0;
file.Read (&l, sizeof (l));
if (l > 100 * 1024 * 1024)
throw ERROR_BAD_FORMAT;
char* psz = new char [l+1];
try {
file.Read (psz, l);
psz [l] = 0;
} catch (DWORD dw) {
delete [] psz;
throw dw;
}
str = psz;
delete [] psz;
}
void vmsFileUtil::ReadHeader(vmsFile& file, fsString& strDesc, WORD &wVersion)
{
ReadString (file, strDesc);
file.Read (&wVersion, sizeof (WORD));
}
