git.oblomov.eu Git - wine/blob - dlls/olesvr/olesvr_main.c

   1 /*
   2  *      OLESVR library
   3  *
   4  *      Copyright 1995  Martin von Loewis
   5  */
   6
   7 /*      At the moment, these are only empty stubs.
   8  */
   9
  10 #include "config.h"
  11
  12 #include "ole.h"
  13
  14 #include "debugtools.h"
  15
  16 DEFAULT_DEBUG_CHANNEL(ole);
  17
  18 static LONG OLE_current_handle;
  19
  20 /******************************************************************************
  21  *              OleRegisterServer       [OLESVR.2]
  22  */
  23 OLESTATUS WINAPI OleRegisterServer16( LPCSTR name, LPOLESERVER serverStruct,
  24                                       LHSERVER *hRet, HINSTANCE16 hServer,
  25                                       OLE_SERVER_USE use )
  26 {
  27     FIXME("(%s,...): stub\n",name);
  28     *hRet=++OLE_current_handle;
  29     /* return OLE_ERROR_MEMORY, OLE_ERROR_PROTECT_ONLY if you want it fail*/
  30     return OLE_OK;
  31 }
  32
  33 /******************************************************************************
  34  *              OleBlockServer  [OLESVR.4]
  35  */
  36 OLESTATUS WINAPI OleBlockServer16(LHSERVER hServer)
  37 {
  38     FIXME("(%ld): stub\n",hServer);
  39     return OLE_OK;
  40 }
  41
  42 /******************************************************************************
  43  *              OleBlockServer  [OLESVR32.4]
  44  */
  45 OLESTATUS WINAPI OleBlockServer(LHSERVER hServer)
  46 {
  47     FIXME("(%ld): stub\n",hServer);
  48     return OLE_OK;
  49 }
  50
  51 /******************************************************************************
  52  *              OleUnblockServer        [OLESVR.5]
  53  */
  54 OLESTATUS WINAPI OleUnblockServer16(LHSERVER hServer, BOOL16 *block)
  55 {
  56     FIXME("(%ld): stub\n",hServer);
  57     /* no more blocked messages :) */
  58     *block=FALSE;
  59     return OLE_OK;
  60 }
  61
  62 /******************************************************************************
  63  *              OleUnblockServer        [OLESVR32.5]
  64  */
  65 OLESTATUS WINAPI OleUnblockServer(LHSERVER hServer, BOOL *block)
  66 {
  67     FIXME("(%ld): stub\n",hServer);
  68     /* no more blocked messages :) */
  69     *block=FALSE;
  70     return OLE_OK;
  71 }
  72
  73 /***********************************************************************
  74  *              OleRegisterServerDoc    [OLESVR.6]
  75  */
  76 OLESTATUS WINAPI OleRegisterServerDoc16( LHSERVER hServer, LPCSTR docname,
  77                                          LPOLESERVERDOC document,
  78                                          LHSERVERDOC *hRet)
  79 {
  80     FIXME("(%ld,%s): stub\n",hServer, docname);
  81     *hRet=++OLE_current_handle;
  82     return OLE_OK;
  83 }
  84
  85 /******************************************************************************
  86  *              OleRevokeServerDoc      [OLESVR.7]
  87  */
  88 OLESTATUS WINAPI OleRevokeServerDoc16(LHSERVERDOC hServerDoc)
  89 {
  90     FIXME("%ld  - stub\n",hServerDoc);
  91     return OLE_OK;
  92 }
  93
  94 /******************************************************************************
  95  *              OleRevokeServerDoc      [OLESVR32.7]
  96  */
  97 OLESTATUS WINAPI OleRevokeServerDoc(LHSERVERDOC hServerDoc)
  98 {
  99     FIXME("(%ld): stub\n",hServerDoc);
 100     return OLE_OK;
 101 }
 102
 103 /******************************************************************************
 104  *              OleRevokeServer [OLESVR.3]
 105  */
 106 OLESTATUS WINAPI OleRevokeServer16(LHSERVER hServer)
 107 {
 108     FIXME("%ld - stub\n",hServer);
 109     return OLE_OK;
 110 }
 111
 112 /******************************************************************************
 113  * OleRegisterServer [OLESVR32.2]
 114  */
 115 OLESTATUS WINAPI OleRegisterServer(LPCSTR svrname,LPOLESERVER olesvr,LHSERVER* hRet,HINSTANCE hinst,OLE_SERVER_USE osu) {
 116         FIXME("(%s,%p,%p,%08x,%d): stub!\n",svrname,olesvr,hRet,hinst,osu);
 117         *hRet=++OLE_current_handle;
 118         return OLE_OK;
 119 }
 120
 121 /******************************************************************************
 122  * OleRegisterServerDoc [OLESVR32.6]
 123  */
 124 OLESTATUS WINAPI OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname,
 125                                          LPOLESERVERDOC document,
 126                                          LHSERVERDOC *hRet)
 127 {
 128     FIXME("(%ld,%s): stub\n", hServer, docname);
 129     *hRet=++OLE_current_handle;
 130     return OLE_OK;
 131 }
 132
 133 /******************************************************************************
 134  *              OleRenameServerDoc      [OLESVR32.8]
 135  *
 136  */
 137 OLESTATUS WINAPI OleRenameServerDoc(LHSERVERDOC hDoc, LPCSTR newName)
 138 {
 139     FIXME("(%ld,%s): stub.\n",hDoc, newName);
 140     return OLE_OK;
 141 }