dlls/olecli.dll16/olecli.c

   1 /*
   2  *      OLECLI library
   3  *
   4  *      Copyright 1995  Martin von Loewis
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 /*      At the moment, these are only empty stubs.
  22  */
  23
  24 #include <stdarg.h>
  25
  26 #include "windef.h"
  27 #include "wine/windef16.h"
  28 #include "wine/winbase16.h"
  29 #include "winbase.h"
  30 #include "wingdi.h"
  31 #include "wownt32.h"
  32 #include "objbase.h"
  33 #include "olecli.h"
  34 #include "wine/debug.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(ole);
  37
  38 typedef struct _OLEOBJECTVTBL16 {
  39     void CALLBACK *(*QueryProtocol)(_LPOLEOBJECT,LPCOLESTR16);
  40     OLESTATUS      (CALLBACK *Release)(_LPOLEOBJECT);
  41     OLESTATUS      (CALLBACK *Show)(_LPOLEOBJECT,BOOL16);
  42     OLESTATUS      (CALLBACK *DoVerb)(_LPOLEOBJECT,UINT16,BOOL16,BOOL16);
  43     OLESTATUS      (CALLBACK *GetData)(_LPOLEOBJECT,OLECLIPFORMAT,HANDLE16 *);
  44     OLESTATUS      (CALLBACK *SetData)(_LPOLEOBJECT,OLECLIPFORMAT,HANDLE16);
  45     OLESTATUS      (CALLBACK *SetTargetDevice)(_LPOLEOBJECT,HGLOBAL16);
  46     OLESTATUS      (CALLBACK *SetBounds)(_LPOLEOBJECT,LPRECT16);
  47     OLESTATUS      (CALLBACK *EnumFormats)(_LPOLEOBJECT,OLECLIPFORMAT);
  48     OLESTATUS      (CALLBACK *SetColorScheme)(_LPOLEOBJECT,struct tagLOGPALETTE*);
  49     OLESTATUS      (CALLBACK *Delete)(_LPOLEOBJECT);
  50     OLESTATUS      (CALLBACK *SetHostNames)(_LPOLEOBJECT,LPCOLESTR16,LPCOLESTR16);
  51     OLESTATUS      (CALLBACK *SaveToStream)(_LPOLEOBJECT,struct _OLESTREAM*);
  52     OLESTATUS      (CALLBACK *Clone)(_LPOLEOBJECT,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT *);
  53     OLESTATUS      (CALLBACK *CopyFromLink)(_LPOLEOBJECT,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT *);
  54     OLESTATUS      (CALLBACK *Equal)(_LPOLEOBJECT,_LPOLEOBJECT);
  55     OLESTATUS      (CALLBACK *CopyToClipBoard)(_LPOLEOBJECT);
  56     OLESTATUS      (CALLBACK *Draw)(_LPOLEOBJECT,HDC16,LPRECT16,LPRECT16,HDC16);
  57     OLESTATUS      (CALLBACK *Activate)(_LPOLEOBJECT,UINT16,BOOL16,BOOL16,HWND16,LPRECT16);
  58     OLESTATUS      (CALLBACK *Execute)(_LPOLEOBJECT,HGLOBAL16,UINT16);
  59     OLESTATUS      (CALLBACK *Close)(_LPOLEOBJECT);
  60     OLESTATUS      (CALLBACK *Update)(_LPOLEOBJECT);
  61     OLESTATUS      (CALLBACK *Reconnect)(_LPOLEOBJECT);
  62     OLESTATUS      (CALLBACK *ObjectConvert)(_LPOLEOBJECT,LPCOLESTR16,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT*);
  63     OLESTATUS      (CALLBACK *GetLinkUpdateOptions)(_LPOLEOBJECT,LPOLEOPT_UPDATE);
  64     OLESTATUS      (CALLBACK *SetLinkUpdateOptions)(_LPOLEOBJECT,OLEOPT_UPDATE);
  65     OLESTATUS      (CALLBACK *Rename)(_LPOLEOBJECT,LPCOLESTR16);
  66     OLESTATUS      (CALLBACK *QueryName)(_LPOLEOBJECT,LPSTR,LPUINT16);
  67     OLESTATUS      (CALLBACK *QueryType)(_LPOLEOBJECT,LPLONG);
  68     OLESTATUS      (CALLBACK *QueryBounds)(_LPOLEOBJECT,LPRECT16);
  69     OLESTATUS      (CALLBACK *QuerySize)(_LPOLEOBJECT,LPDWORD);
  70     OLESTATUS      (CALLBACK *QueryOpen)(_LPOLEOBJECT);
  71     OLESTATUS      (CALLBACK *QueryOutOfDate)(_LPOLEOBJECT);
  72     OLESTATUS      (CALLBACK *QueryReleaseStatus)(_LPOLEOBJECT);
  73     OLESTATUS      (CALLBACK *QueryReleaseError)(_LPOLEOBJECT);
  74     OLE_RELEASE_METHOD (CALLBACK *QueryReleaseMethod)(_LPOLEOBJECT);
  75     OLESTATUS      (CALLBACK *RequestData)(_LPOLEOBJECT,OLECLIPFORMAT);
  76     OLESTATUS      (CALLBACK *ObjectLong)(_LPOLEOBJECT,UINT16,LPLONG);
  77 } OLEOBJECTVTBL;
  78 typedef OLEOBJECTVTBL *LPOLEOBJECTVTBL;
  79
  80 typedef struct _OLEOBJECT
  81 {
  82     const OLEOBJECTVTBL *lpvtbl;
  83 } OLEOBJECT16;
  84
  85 static LONG OLE_current_handle;
  86
  87 /******************************************************************************
  88  *              OleSavedClientDoc       [OLECLI.45]
  89  */
  90 OLESTATUS WINAPI OleSavedClientDoc16(LHCLIENTDOC hDoc)
  91 {
  92     FIXME("(%ld: stub\n", hDoc);
  93     return OLE_OK;
  94 }
  95
  96 /******************************************************************************
  97  *              OleRegisterClientDoc    [OLECLI.41]
  98  */
  99 OLESTATUS WINAPI OleRegisterClientDoc16(LPCSTR classname, LPCSTR docname,
 100                                         LONG reserved, LHCLIENTDOC *hRet )
 101 {
 102     FIXME("(%s,%s,...): stub\n",classname,docname);
 103     *hRet=++OLE_current_handle;
 104     return OLE_OK;
 105 }
 106
 107 /******************************************************************************
 108  *              OleRenameClientDoc      [OLECLI.43]
 109  */
 110 OLESTATUS WINAPI OleRenameClientDoc16(LHCLIENTDOC hDoc, LPCSTR newName)
 111 {
 112     FIXME("(%ld,%s,...): stub\n",hDoc, newName);
 113     return OLE_OK;
 114 }
 115
 116 /******************************************************************************
 117  *              OleRevokeClientDoc      [OLECLI.42]
 118  */
 119 OLESTATUS WINAPI OleRevokeClientDoc16(LHCLIENTDOC hServerDoc)
 120 {
 121     FIXME("(%ld): stub\n",hServerDoc);
 122     return OLE_OK;
 123 }
 124
 125 /******************************************************************************
 126  *              OleRevertClientDoc      [OLECLI.44]
 127  */
 128 OLESTATUS WINAPI OleRevertClientDoc16(LHCLIENTDOC hServerDoc)
 129 {
 130     FIXME("(%ld): stub\n", hServerDoc);
 131     return OLE_OK;
 132 }
 133
 134 /******************************************************************************
 135  *              OleEnumObjects  [OLECLI.47]
 136  */
 137 OLESTATUS WINAPI OleEnumObjects16(LHCLIENTDOC hServerDoc, SEGPTR data)
 138 {
 139     FIXME("(%ld, %04x:%04x): stub\n", hServerDoc, HIWORD(data),
 140         LOWORD(data));
 141     return OLE_OK;
 142 }
 143
 144 /******************************************************************************
 145  *           OleCreateLinkFromClip      [OLECLI.11]
 146  */
 147 OLESTATUS WINAPI OleCreateLinkFromClip16( LPCSTR name, SEGPTR olecli, LHCLIENTDOC hclientdoc,
 148                                           LPCSTR xname, SEGPTR lpoleob, UINT16 render,
 149                                           UINT16 clipformat )
 150 {
 151         FIXME("(%s, %04x:%04x, %ld, %s, %04x:%04x, %d, %d): stub!\n",
 152               name, HIWORD(olecli), LOWORD(olecli), hclientdoc, xname, HIWORD(lpoleob),
 153               LOWORD(lpoleob), render, clipformat);
 154         return OLE_OK;
 155 }
 156
 157 /******************************************************************************
 158  *           OleQueryLinkFromClip       [OLECLI.9]
 159  */
 160 OLESTATUS WINAPI OleQueryLinkFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat)
 161 {
 162         FIXME("(%s, %d, %d): stub!\n", name, render, clipformat);
 163         return OLE_OK;
 164 }
 165
 166 /******************************************************************************
 167  *           OleQueryCreateFromClip     [OLECLI.10]
 168  */
 169 OLESTATUS WINAPI OleQueryCreateFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat)
 170 {
 171         FIXME("(%s, %d, %d): stub!\n", name, render, clipformat);
 172         return OLE_OK;
 173 }
 174
 175 /******************************************************************************
 176  *              OleIsDcMeta     [OLECLI.60]
 177  */
 178 BOOL16 WINAPI OleIsDcMeta16(HDC16 hdc)
 179 {
 180     return GetObjectType( HDC_32(hdc) ) == OBJ_METADC;
 181 }
 182
 183 /******************************************************************************
 184  *              OleQueryType    [OLECLI.14]
 185  */
 186 OLESTATUS WINAPI OleQueryType16(_LPOLEOBJECT oleob,  SEGPTR xlong) {
 187         FIXME("(%p, %p): stub!\n", oleob, MapSL(xlong));
 188         return OLE_OK;
 189 }
 190
 191 /******************************************************************************
 192  *              OleCreateFromClip       [OLECLI.12]
 193  */
 194 OLESTATUS WINAPI OleCreateFromClip16( LPCSTR name, SEGPTR olecli, LHCLIENTDOC hclientdoc,
 195                                       LPCSTR xname, SEGPTR lpoleob,
 196                                       UINT16 render, UINT16 clipformat )
 197 {
 198         FIXME("(%s, %04x:%04x, %ld, %s, %04x:%04x, %d, %d): stub!\n",
 199               name, HIWORD(olecli), LOWORD(olecli), hclientdoc, xname, HIWORD(lpoleob),
 200               LOWORD(lpoleob), render, clipformat);
 201         return OLE_OK;
 202 }