152 lines
4.5 KiB
C
152 lines
4.5 KiB
C
/*
|
|
* OLECLI library
|
|
*
|
|
* Copyright 1995 Martin von Loewis
|
|
*/
|
|
|
|
/* At the moment, these are only empty stubs.
|
|
*/
|
|
|
|
#include "windows.h"
|
|
#include "ole.h"
|
|
#include "gdi.h"
|
|
#include "stddebug.h"
|
|
#include "debug.h"
|
|
|
|
extern LONG OLE_current_handle;
|
|
|
|
/***********************************************************************
|
|
* OleRegisterClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRegisterClientDoc16(LPCSTR classname, LPCSTR docname,
|
|
LONG reserved, LHCLIENTDOC *hRet )
|
|
{
|
|
fprintf(stdnimp,"OleRegisterClientDoc:%s %s\n",classname,docname);
|
|
*hRet=++OLE_current_handle;
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleRegisterClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRegisterClientDoc32(LPCSTR classname, LPCSTR docname,
|
|
LONG reserved, LHCLIENTDOC *hRet )
|
|
{
|
|
fprintf(stdnimp,"OleRegisterClientDoc:%s %s\n",classname,docname);
|
|
*hRet=++OLE_current_handle;
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleRenameClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRenameClientDoc16(LHCLIENTDOC hDoc, LPCSTR newName)
|
|
{
|
|
fprintf(stdnimp,"OleRenameClientDoc: %ld %s\n",hDoc, newName);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleRenameClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRenameClientDoc32(LHCLIENTDOC hDoc, LPCSTR newName)
|
|
{
|
|
fprintf(stdnimp,"OleRenameClientDoc: %ld %s\n",hDoc, newName);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleRevokeClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRevokeClientDoc16(LHCLIENTDOC hServerDoc)
|
|
{
|
|
fprintf(stdnimp,"OleRevokeClientDoc:%ld\n",hServerDoc);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleRevokeClientDoc
|
|
*/
|
|
OLESTATUS WINAPI OleRevokeClientDoc32(LHCLIENTDOC hServerDoc)
|
|
{
|
|
fprintf(stdnimp,"OleRevokeClientDoc:%ld\n",hServerDoc);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleCreateLinkFromClip32
|
|
*/
|
|
OLESTATUS WINAPI OleCreateLinkFromClip32(
|
|
LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname,
|
|
LPOLEOBJECT *lpoleob,OLEOPT_RENDER render,OLECLIPFORMAT clipformat
|
|
) {
|
|
fprintf(stdnimp,"OleCreateLinkFromClip(%s,%p,%08lx,%s,%p,%d,%ld),stub!\n",
|
|
name,olecli,hclientdoc,xname,lpoleob,render,clipformat
|
|
);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleQueryLinkFromClip32
|
|
*/
|
|
OLESTATUS WINAPI OleQueryLinkFromClip32(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) {
|
|
fprintf(stdnimp,"OleQueryLinkFromClip(%s,%d,%ld),stub!\n",
|
|
name,render,clipformat
|
|
);
|
|
return OLE_OK;
|
|
}
|
|
/***********************************************************************
|
|
* OleQueryCreateFromClip32
|
|
*/
|
|
OLESTATUS WINAPI OleQueryCreateFromClip32(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) {
|
|
fprintf(stdnimp,"OleQueryCreateFromClip(%s,%d,%ld),stub!\n",
|
|
name,render,clipformat
|
|
);
|
|
return OLE_OK;
|
|
}
|
|
|
|
|
|
/***********************************************************************
|
|
* OleIsDcMeta
|
|
*/
|
|
BOOL16 WINAPI OleIsDcMeta(HDC16 hdc)
|
|
{
|
|
dprintf_ole(stddeb,"OleIsDCMeta(%04x)\n",hdc);
|
|
return GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ) != 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleSetHostNames
|
|
*/
|
|
OLESTATUS WINAPI OleSetHostNames32(LPOLEOBJECT oleob,LPCSTR name1,LPCSTR name2) {
|
|
fprintf(stdnimp,"OleSetHostNames(%p,%s,%s),stub\n",oleob,name1,name2);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleQueryType32
|
|
*/
|
|
OLESTATUS WINAPI OleQueryType32(LPOLEOBJECT oleob,LONG*xlong) {
|
|
fprintf(stdnimp,"OleQueryType(%p,%p),stub!\n",oleob,xlong);
|
|
if (!oleob)
|
|
return 0x10;
|
|
fprintf(stddeb,"Calling OLEOBJECT.QueryType (%p) (%p,%p)\n",
|
|
oleob->lpvtbl->QueryType,oleob,xlong
|
|
);
|
|
return oleob->lpvtbl->QueryType(oleob,xlong);
|
|
}
|
|
|
|
/***********************************************************************
|
|
* OleCreateFromClip
|
|
*/
|
|
OLESTATUS WINAPI OleCreateFromClip32(
|
|
LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname,
|
|
LPOLEOBJECT *lpoleob,OLEOPT_RENDER render, OLECLIPFORMAT clipformat
|
|
) {
|
|
fprintf(stdnimp,"OleCreateLinkFromClip(%s,%p,%08lx,%s,%p,%d,%ld),stub!\n",
|
|
name,olecli,hclientdoc,xname,lpoleob,render,clipformat
|
|
);
|
|
/* clipb type, object kreieren entsprechend etc. */
|
|
return OLE_OK;
|
|
}
|