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