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