Release 981025.
[wine/gsoc-2012-control.git] / ole / olecli.c
blob5f70f0476137b33f84110c19e9d106444b9934e3
1 /*
2 * OLECLI library
4 * Copyright 1995 Martin von Loewis
5 */
7 /* At the moment, these are only empty stubs.
8 */
10 #include "windows.h"
11 #include "ole.h"
12 #include "gdi.h"
13 #include "debug.h"
15 extern LONG OLE_current_handle;
17 /******************************************************************************
18 * OleRegisterClientDoc16 [OLECLI.41]
20 OLESTATUS WINAPI OleRegisterClientDoc16(LPCSTR classname, LPCSTR docname,
21 LONG reserved, LHCLIENTDOC *hRet )
23 FIXME(ole,"(%s,%s,...): stub\n",classname,docname);
24 *hRet=++OLE_current_handle;
25 return OLE_OK;
28 /******************************************************************************
29 * OleRegisterClientDoc32 [OLECLI32.41]
31 OLESTATUS WINAPI OleRegisterClientDoc32(LPCSTR classname, LPCSTR docname,
32 LONG reserved, LHCLIENTDOC *hRet )
34 FIXME(ole,"(%s,%s,...): stub\n",classname,docname);
35 *hRet=++OLE_current_handle;
36 return OLE_OK;
39 /******************************************************************************
40 * OleRenameClientDoc16 [OLECLI.43]
42 OLESTATUS WINAPI OleRenameClientDoc16(LHCLIENTDOC hDoc, LPCSTR newName)
44 FIXME(ole,"(%ld,%s,...): stub\n",hDoc, newName);
45 return OLE_OK;
48 /******************************************************************************
49 * OleRenameClientDoc32 [OLECLI32.43]
51 OLESTATUS WINAPI OleRenameClientDoc32(LHCLIENTDOC hDoc, LPCSTR newName)
53 FIXME(ole,"(%ld,%s,...): stub\n",hDoc, newName);
54 return OLE_OK;
57 /******************************************************************************
58 * OleRevokeClientDoc16 [OLECLI.42]
60 OLESTATUS WINAPI OleRevokeClientDoc16(LHCLIENTDOC hServerDoc)
62 FIXME(ole,"(%ld): stub\n",hServerDoc);
63 return OLE_OK;
66 /******************************************************************************
67 * OleRevokeClientDoc32 [OLECLI32.42]
69 OLESTATUS WINAPI OleRevokeClientDoc32(LHCLIENTDOC hServerDoc)
71 FIXME(ole,"(%ld): stub\n",hServerDoc);
72 return OLE_OK;
75 /******************************************************************************
76 * OleCreateLinkFromClip32 [OLECLI32.11]
78 OLESTATUS WINAPI OleCreateLinkFromClip32(
79 LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname,
80 LPOLEOBJECT *lpoleob,OLEOPT_RENDER render,OLECLIPFORMAT clipformat
81 ) {
82 FIXME(ole,"(%s,%p,%08lx,%s,%p,%d,%ld): stub!\n",
83 name,olecli,hclientdoc,xname,lpoleob,render,clipformat);
84 return OLE_OK;
87 /******************************************************************************
88 * OleQueryLinkFromClip32 [OLECLI32.9]
90 OLESTATUS WINAPI OleQueryLinkFromClip32(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) {
91 FIXME(ole,"(%s,%d,%ld): stub!\n",name,render,clipformat);
92 return OLE_OK;
94 /******************************************************************************
95 * OleQueryCreateFromClip32 [OLECLI32.10]
97 OLESTATUS WINAPI OleQueryCreateFromClip32(LPCSTR name,OLEOPT_RENDER render,OLECLIPFORMAT clipformat) {
98 FIXME(ole,"(%s,%d,%ld): stub!\n",name,render,clipformat);
99 return OLE_OK;
103 /******************************************************************************
104 * OleIsDcMeta16 [OLECLI.60]
106 BOOL16 WINAPI OleIsDcMeta16(HDC16 hdc)
108 TRACE(ole,"(%04x)\n",hdc);
109 if (GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ) != 0) {
110 GDI_HEAP_UNLOCK( hdc );
111 return TRUE;
113 return FALSE;
117 /******************************************************************************
118 * OleIsDcMeta32 [OLECLI32.60]
120 BOOL32 WINAPI OleIsDcMeta32(HDC32 hdc)
122 TRACE(ole,"(%04x)\n",hdc);
123 if (GDI_GetObjPtr( hdc, METAFILE_DC_MAGIC ) != 0) {
124 GDI_HEAP_UNLOCK( hdc );
125 return TRUE;
127 return FALSE;
131 /******************************************************************************
132 * OleSetHostNames32 [OLECLI32.15]
134 OLESTATUS WINAPI OleSetHostNames32(LPOLEOBJECT oleob,LPCSTR name1,LPCSTR name2) {
135 FIXME(ole,"(%p,%s,%s): stub\n",oleob,name1,name2);
136 return OLE_OK;
139 /******************************************************************************
140 * OleQueryType32 [OLECLI32.14]
142 OLESTATUS WINAPI OleQueryType32(LPOLEOBJECT oleob,LONG*xlong) {
143 FIXME(ole,"(%p,%p): stub!\n",oleob,xlong);
144 if (!oleob)
145 return 0x10;
146 TRACE(ole,"Calling OLEOBJECT.QueryType (%p) (%p,%p)\n",
147 oleob->lpvtbl->QueryType,oleob,xlong);
148 return oleob->lpvtbl->QueryType(oleob,xlong);
151 /******************************************************************************
152 * OleCreateFromClip32 [OLECLI32.12]
154 OLESTATUS WINAPI OleCreateFromClip32(
155 LPCSTR name,LPOLECLIENT olecli,LHCLIENTDOC hclientdoc,LPCSTR xname,
156 LPOLEOBJECT *lpoleob,OLEOPT_RENDER render, OLECLIPFORMAT clipformat
158 FIXME(ole,"(%s,%p,%08lx,%s,%p,%d,%ld): stub!\n",
159 name,olecli,hclientdoc,xname,lpoleob,render,clipformat);
160 /* clipb type, object kreieren entsprechend etc. */
161 return OLE_OK;