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