d3dxof: Implement object parsing in text mode.

This commit is contained in:
Christian Costa 2008-09-16 22:22:28 +02:00 committed by Alexandre Julliard
parent b1412422ad
commit 364d69d78d
2 changed files with 418 additions and 19 deletions

View File

@ -79,15 +79,8 @@ WINE_DEFAULT_DEBUG_CHANNEL(d3dxof);
#define CLSIDFMT "<%08X-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X>"
typedef struct {
/* Buffer to parse */
LPBYTE buffer;
DWORD rem_bytes;
/* Misc info */
BOOL txt;
BYTE value[100];
IDirectXFileImpl* pdxf;
} parse_buffer;
#define MAX_INPUT_SIZE 1000000
#define MAX_DATA_SIZE 100000
static const struct IDirectXFileVtbl IDirectXFile_Vtbl;
static const struct IDirectXFileBinaryVtbl IDirectXFileBinary_Vtbl;
@ -97,6 +90,9 @@ static const struct IDirectXFileEnumObjectVtbl IDirectXFileEnumObject_Vtbl;
static const struct IDirectXFileObjectVtbl IDirectXFileObject_Vtbl;
static const struct IDirectXFileSaveObjectVtbl IDirectXFileSaveObject_Vtbl;
static BOOL parse_object_parts(parse_buffer * buf, BOOL allow_optional);
static BOOL parse_object(parse_buffer * buf);
HRESULT IDirectXFileImpl_Create(IUnknown* pUnkOuter, LPVOID* ppObj)
{
IDirectXFileImpl* object;
@ -254,6 +250,28 @@ static HRESULT WINAPI IDirectXFileImpl_CreateEnumObject(IDirectXFile* iface, LPV
object->source = dwLoadOptions;
object->hFile = hFile;
object->pDirectXFile = This;
object->buf.pdxf = This;
object->buf.txt = TRUE;
object->buf.cur_subobject = 0;
object->buf.buffer = HeapAlloc(GetProcessHeap(), 0, MAX_INPUT_SIZE+1);
if (!object->buf.buffer)
{
WARN("Out of memory\n");
hr = DXFILEERR_BADALLOC;
goto error;
}
ReadFile(hFile, object->buf.buffer, MAX_INPUT_SIZE+1, &object->buf.rem_bytes, NULL);
if (object->buf.rem_bytes > MAX_INPUT_SIZE)
{
FIXME("File size > %d not supported yet\n", MAX_INPUT_SIZE);
HeapFree(GetProcessHeap(), 0, object->buf.buffer);
hr = DXFILEERR_PARSEERROR;
goto error;
}
TRACE("Read %d bytes\n", object->buf.rem_bytes);
*ppEnumObj = (LPDIRECTXFILEENUMOBJECT)object;
@ -500,7 +518,7 @@ static BOOL is_name(parse_buffer* buf)
BOOL error = 0;
while (!is_separator(c = *(buf->buffer+pos)))
{
if (!(((c >= 'a') && (c <= 'z')) || ((c >= 'A') && (c <= 'Z')) || ((c >= '0') && (c <= '9'))))
if (!(((c >= 'a') && (c <= 'z')) || ((c >= 'A') && (c <= 'Z')) || ((c >= '0') && (c <= '9')) || (c == '_')))
error = 1;
tmp[pos++] = c;
}
@ -521,6 +539,36 @@ static BOOL is_name(parse_buffer* buf)
return TRUE;
}
static BOOL is_float(parse_buffer* buf)
{
char tmp[50];
DWORD pos = 0;
char c;
float decimal;
BOOL dot = 0;
while (!is_separator(c = *(buf->buffer+pos)))
{
if (!((!pos && (c == '-')) || ((c >= '0') && (c <= '9')) || (!dot && (c == '.'))))
return FALSE;
if (c == '.')
dot = TRUE;
tmp[pos++] = c;
}
tmp[pos] = 0;
buf->buffer += pos;
buf->rem_bytes -= pos;
sscanf(tmp, "%f", &decimal);
TRACE("Found float %s - %f\n", tmp, decimal);
*(float*)buf->value = decimal;
return TRUE;
}
static BOOL is_integer(parse_buffer* buf)
{
char tmp[50];
@ -608,6 +656,11 @@ static WORD parse_TOKEN_dbg_opt(parse_buffer * buf, BOOL show_token)
token = TOKEN_INTEGER;
break;
}
if (is_float(buf))
{
token = TOKEN_FLOAT;
break;
}
if (is_name(buf))
{
token = TOKEN_NAME;
@ -973,7 +1026,7 @@ static HRESULT WINAPI IDirectXFileImpl_RegisterTemplates(IDirectXFile* iface, LP
buf.txt = FALSE;
buf.pdxf = This;
FIXME("(%p/%p)->(%p,%d) partial stub!\n", This, iface, pvData, cbSize);
TRACE("(%p/%p)->(%p,%d)\n", This, iface, pvData, cbSize);
if (!pvData)
return DXFILEERR_BADVALUE;
@ -1281,18 +1334,28 @@ static HRESULT WINAPI IDirectXFileDataImpl_GetName(IDirectXFileData* iface, LPST
{
IDirectXFileDataImpl *This = (IDirectXFileDataImpl *)iface;
FIXME("(%p/%p)->(%p,%p) stub!\n", This, iface, pstrNameBuf, pdwBufLen);
TRACE("(%p/%p)->(%p,%p)\n", This, iface, pstrNameBuf, pdwBufLen);
return DXFILEERR_BADVALUE;
if (!pstrNameBuf)
return DXFILEERR_BADVALUE;
strcpy(pstrNameBuf, This->pobj->name);
return DXFILE_OK;
}
static HRESULT WINAPI IDirectXFileDataImpl_GetId(IDirectXFileData* iface, LPGUID pGuid)
{
IDirectXFileDataImpl *This = (IDirectXFileDataImpl *)iface;
FIXME("(%p/%p)->(%p) stub!\n", This, iface, pGuid);
TRACE("(%p/%p)->(%p)\n", This, iface, pGuid);
return DXFILEERR_BADVALUE;
if (!pGuid)
return DXFILEERR_BADVALUE;
memcpy(pGuid, &This->pobj->class_id, 16);
return DXFILE_OK;
}
/*** IDirectXFileData methods ***/
@ -1300,18 +1363,38 @@ static HRESULT WINAPI IDirectXFileDataImpl_GetData(IDirectXFileData* iface, LPCS
{
IDirectXFileDataImpl *This = (IDirectXFileDataImpl *)iface;
FIXME("(%p/%p)->(%s,%p,%p) stub!\n", This, iface, szMember, pcbSize, ppvData);
TRACE("(%p/%p)->(%s,%p,%p)\n", This, iface, szMember, pcbSize, ppvData);
return DXFILEERR_BADVALUE;
if (!pcbSize || !ppvData)
return DXFILEERR_BADVALUE;
if (szMember)
{
FIXME("Specifying a member is not supported yet!\n");
return DXFILEERR_BADVALUE;
}
*pcbSize = This->pobj->size;
*ppvData = This->pobj->pdata;
return DXFILE_OK;
}
static HRESULT WINAPI IDirectXFileDataImpl_GetType(IDirectXFileData* iface, const GUID** pguid)
{
IDirectXFileDataImpl *This = (IDirectXFileDataImpl *)iface;
static GUID guid;
FIXME("(%p/%p)->(%p) stub!\n", This, iface, pguid);
TRACE("(%p/%p)->(%p)\n", This, iface, pguid);
return DXFILEERR_BADVALUE;
if (!pguid)
return DXFILEERR_BADVALUE;
/* Native dll returns object guid instead of object template one */
memcpy(&guid, &This->pobj->class_id, 16);
*pguid = &guid;
return DXFILE_OK;
}
static HRESULT WINAPI IDirectXFileDataImpl_GetNextObject(IDirectXFileData* iface, LPDIRECTXFILEOBJECT* ppChildObj)
@ -1320,6 +1403,9 @@ static HRESULT WINAPI IDirectXFileDataImpl_GetNextObject(IDirectXFileData* iface
FIXME("(%p/%p)->(%p) stub!\n", This, iface, ppChildObj);
if (This->cur_enum_object >= This->pobj->nb_childs)
return DXFILEERR_NOMOREOBJECTS;
return DXFILEERR_BADVALUE;
}
@ -1521,6 +1607,246 @@ static ULONG WINAPI IDirectXFileEnumObjectImpl_Release(IDirectXFileEnumObject* i
return ref;
}
static BOOL parse_object_members_list(parse_buffer * buf)
{
DWORD token;
int i;
xtemplate* pt = buf->pxt[buf->level];
DWORD last_dword = 0;
for (i = 0; i < pt->nb_members; i++)
{
int nb_elems, k;
if (pt->members[i].nb_dims > 1)
{
FIXME("Arrays with dimension > 1 not yet supported\n");
return FALSE;
}
else if (pt->members[i].nb_dims)
{
if (!pt->members[i].dim_fixed[0])
{
if (!i)
{
FIXME("Array with variable must be preceded by the size\n");
return FALSE;
}
nb_elems = last_dword;
/*FIXME("Arrays with variable size not yet supported\n");
return FALSE;*/
}
else
nb_elems = pt->members[i].dim_value[0];
}
else
nb_elems = 1;
for (k = 0; k < nb_elems; k++)
{
if (k)
{
if (parse_TOKEN(buf) != TOKEN_COMMA)
return FALSE;
}
if (pt->members[i].type == TOKEN_NAME)
{
int j;
TRACE("Found suboject %s\n", buf->pdxf->xtemplates[pt->members[i].idx_template].name);
buf->level++;
/* To do template lookup */
for (j = 0; j < buf->pdxf->nb_xtemplates; j++)
{
if (!strcmp(buf->pdxf->xtemplates[pt->members[i].idx_template].name, buf->pdxf->xtemplates[j].name))
{
buf->pxt[buf->level] = &buf->pdxf->xtemplates[j];
break;
}
}
if (j == buf->pdxf->nb_xtemplates)
{
FIXME("Unknown template %s\n", (char*)buf->value);
buf->level--;
return FALSE;
}
TRACE("Enter %s\n", buf->pdxf->xtemplates[pt->members[i].idx_template].name);
if (!parse_object_parts(buf, FALSE))
{
buf->level--;
return FALSE;
}
buf->level--;
/*if (parse_TOKEN(buf) != TOKEN_SEMICOLON)
return FALSE;*/
}
else
{
token = check_TOKEN(buf);
if (token == TOKEN_INTEGER)
{
parse_TOKEN(buf);
last_dword = *(DWORD*)buf->value;
TRACE("%s = %d\n", pt->members[i].name, *(DWORD*)buf->value);
/* Assume larger size */
if ((buf->cur_pdata - buf->pxo->pdata + 4) > MAX_DATA_SIZE)
{
WARN("Buffer too small\n");
return FALSE;
}
if (pt->members[i].type == TOKEN_WORD)
{
*(((WORD*)(buf->cur_pdata))) = (WORD)(*(DWORD*)buf->value);
buf->cur_pdata += 2;
}
else if (pt->members[i].type == TOKEN_DWORD)
{
*(((DWORD*)(buf->cur_pdata))) = (DWORD)(*(DWORD*)buf->value);
buf->cur_pdata += 4;
}
else
{
FIXME("Token %d not supported\n", pt->members[i].type);
return FALSE;
}
}
else if (token == TOKEN_FLOAT)
{
parse_TOKEN(buf);
TRACE("%s = %f\n", pt->members[i].name, *(float*)buf->value);
/* Assume larger size */
if ((buf->cur_pdata - buf->pxo->pdata + 4) > MAX_DATA_SIZE)
{
WARN("Buffer too small\n");
return FALSE;
}
if (pt->members[i].type == TOKEN_FLOAT)
{
*(((float*)(buf->cur_pdata))) = (float)(*(float*)buf->value);
buf->cur_pdata += 4;
}
else
{
FIXME("Token %d not supported\n", pt->members[i].type);
return FALSE;
}
}
else
return FALSE;
}
}
token = parse_TOKEN(buf);
if (token != TOKEN_SEMICOLON)
{
/* Allow comma instead of semicolon in some specific cases */
if (!((token == TOKEN_COMMA) && ((i+1) < pt->nb_members) && (pt->members[i].type == pt->members[i+1].type)
&& (!pt->members[i].nb_dims) && (!pt->members[i+1].nb_dims)))
return FALSE;
}
}
return TRUE;
}
static BOOL parse_object_parts(parse_buffer * buf, BOOL allow_optional)
{
if (!parse_object_members_list(buf))
return FALSE;
if (allow_optional)
{
/* Skip trailing semicolon */
while (check_TOKEN(buf) == TOKEN_SEMICOLON)
parse_TOKEN(buf);
while (1)
{
if (check_TOKEN(buf) == TOKEN_OBRACE)
{
parse_TOKEN(buf);
if (parse_TOKEN(buf) != TOKEN_NAME)
return FALSE;
if (parse_TOKEN(buf) != TOKEN_CBRACE)
return FALSE;
}
else if (check_TOKEN(buf) == TOKEN_NAME)
{
TRACE("Enter optional %s\n", (char*)buf->value);
buf->level++;
if (!parse_object(buf))
{
buf->level--;
return FALSE;
}
buf->level--;
}
else
break;
}
}
return TRUE;
}
static BOOL parse_object(parse_buffer * buf)
{
int i;
if (parse_TOKEN(buf) != TOKEN_NAME)
return FALSE;
/* To do template lookup */
for (i = 0; i < buf->pdxf->nb_xtemplates; i++)
{
if (!strcmp((char*)buf->value, buf->pdxf->xtemplates[i].name))
{
buf->pxt[buf->level] = &buf->pdxf->xtemplates[i];
break;
}
}
if (i == buf->pdxf->nb_xtemplates)
{
FIXME("Unknown template %s\n", (char*)buf->value);
return FALSE;
}
if (check_TOKEN(buf) == TOKEN_NAME)
{
parse_TOKEN(buf);
strcpy(buf->pxo->name, (char*)buf->value);
}
else
buf->pxo->name[0] = 0;
if (parse_TOKEN(buf) != TOKEN_OBRACE)
return FALSE;
if (check_TOKEN(buf) == TOKEN_GUID)
{
parse_TOKEN(buf);
memcpy(&buf->pxo->class_id, buf->value, 16);
}
else
memset(&buf->pxo->class_id, 0, 16);
if (!parse_object_parts(buf, TRUE))
return FALSE;
if (parse_TOKEN(buf) != TOKEN_CBRACE)
return FALSE;
if (buf->txt)
{
/* Go to the next object */
while (buf->rem_bytes && is_space(*buf->buffer))
{
buf->buffer++;
buf->rem_bytes--;
}
}
return TRUE;
}
/*** IDirectXFileEnumObject methods ***/
static HRESULT WINAPI IDirectXFileEnumObjectImpl_GetNextDataObject(IDirectXFileEnumObject* iface, LPDIRECTXFILEDATA* ppDataObj)
{
@ -1530,10 +1856,40 @@ static HRESULT WINAPI IDirectXFileEnumObjectImpl_GetNextDataObject(IDirectXFileE
FIXME("(%p/%p)->(%p) stub!\n", This, iface, ppDataObj);
/*printf("%d\n", This->buf.rem_bytes);*/
if (!This->buf.rem_bytes)
return DXFILEERR_NOMOREOBJECTS;
hr = IDirectXFileDataImpl_Create(&object);
if (!SUCCEEDED(hr))
return hr;
This->buf.pxo = &This->xobjects[This->nb_xobjects][This->buf.cur_subobject];
TRACE("Start %d %d\n", This->nb_xobjects, This->buf.cur_subobject);
This->buf.pxo->pdata = HeapAlloc(GetProcessHeap(), 0, MAX_DATA_SIZE);
if (!This->buf.pxo->pdata)
{
WARN("Out of memory\n");
return DXFILEERR_BADALLOC;
}
This->buf.cur_pdata = This->buf.pxo->pdata;
This->buf.level = 0;
This->buf.pxo->pdata = This->buf.cur_pdata;
if (!parse_object(&This->buf))
{
TRACE("Object is not correct\n");
HeapFree(GetProcessHeap(), 0, This->buf.pxo->pdata);
return DXFILEERR_PARSEERROR;
}
This->buf.pxo->size = This->buf.cur_pdata - This->buf.pxo->pdata;
object->pobj = This->buf.pxo;
*ppDataObj = (LPDIRECTXFILEDATA)object;
return DXFILE_OK;

View File

@ -38,6 +38,8 @@
#define MAX_MEMBERS 50
#define MAX_CHILDS 10
#define MAX_TEMPLATES 200
#define MAX_OBJECTS 200
#define MAX_SUBOBJECTS 20
typedef struct {
DWORD type;
@ -58,6 +60,26 @@ typedef struct {
member members[MAX_MEMBERS];
} xtemplate;
typedef struct {
char name[MAX_NAME_LEN];
LPBYTE start;
ULONG size;
} xobject_member;
struct _xobject {
char name[MAX_NAME_LEN];
GUID class_id;
GUID type;
LPBYTE pdata;
DWORD size;
ULONG nb_members;
xobject_member members[MAX_MEMBERS];
ULONG nb_childs;
struct _xobject * childs[MAX_CHILDS];
};
typedef struct _xobject xobject;
typedef struct {
IDirectXFile lpVtbl;
LONG ref;
@ -73,6 +95,8 @@ typedef struct {
typedef struct {
IDirectXFileData lpVtbl;
LONG ref;
xobject* pobj;
int cur_enum_object;
} IDirectXFileDataImpl;
typedef struct {
@ -85,11 +109,30 @@ typedef struct {
LONG ref;
} IDirectXFileObjectImpl;
typedef struct {
/* Buffer to parse */
LPBYTE buffer;
DWORD rem_bytes;
/* Misc info */
BOOL txt;
ULONG cur_subobject;
LPBYTE cur_pdata;
BYTE value[100];
IDirectXFileImpl* pdxf;
xobject* pxo;
xtemplate* pxt[MAX_SUBOBJECTS];
ULONG level;
} parse_buffer;
typedef struct {
IDirectXFileEnumObject lpVtbl;
LONG ref;
DXFILELOADOPTIONS source;
HANDLE hFile;
parse_buffer buf;
IDirectXFileImpl* pDirectXFile;
ULONG nb_xobjects;
xobject xobjects[MAX_OBJECTS][MAX_SUBOBJECTS];
} IDirectXFileEnumObjectImpl;
typedef struct {