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  *           OleRegisterServer
  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  *           OleBlockServer
  31  */
  32 OLESTATUS WINAPI OleBlockServer16(LHSERVER hServer)
  33 {
  34     FIXME(ole,"(%ld): stub\n",hServer);
  35     return OLE_OK;
  36 }
  37
  38 /***********************************************************************
  39  *           OleBlockServer
  40  */
  41 OLESTATUS WINAPI OleBlockServer32(LHSERVER hServer)
  42 {
  43     FIXME(ole,"(%ld): stub\n",hServer);
  44     return OLE_OK;
  45 }
  46
  47 /***********************************************************************
  48  *           OleUnblockServer
  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  *           OleUnblockServer
  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  *           OleRegisterServerDoc
  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  *           OleRevokeServerDoc
  83  */
  84 OLESTATUS WINAPI OleRevokeServerDoc16(LHSERVERDOC hServerDoc)
  85 {
  86     FIXME(ole,"%ld  - stub\n",hServerDoc);
  87     return OLE_OK;
  88 }
  89
  90 /***********************************************************************
  91  *           OleRevokeServerDoc
  92  */
  93 OLESTATUS WINAPI OleRevokeServerDoc32(LHSERVERDOC hServerDoc)
  94 {
  95     FIXME(ole,"(%ld): stub\n",hServerDoc);
  96     return OLE_OK;
  97 }
  98
  99 /***********************************************************************
 100  *           OleRevokeServer
 101  */
 102 OLESTATUS WINAPI OleRevokeServer(LHSERVER hServer)
 103 {
 104     FIXME(ole,"%ld - stub\n",hServer);
 105     return OLE_OK;
 106 }
 107
 108 OLESTATUS WINAPI OleRegisterServer32(LPCSTR svrname,LPOLESERVER olesvr,LHSERVER* hRet,HINSTANCE32 hinst,OLE_SERVER_USE osu) {
 109         FIXME(ole,"(%s,%p,%p,%08x,%d): stub!\n",svrname,olesvr,hRet,hinst,osu);
 110         *hRet=++OLE_current_handle;
 111         return OLE_OK;
 112 }
 113
 114 OLESTATUS WINAPI OleRegisterServerDoc32( LHSERVER hServer, LPCSTR docname,
 115                                          LPOLESERVERDOC document,
 116                                          LHSERVERDOC *hRet)
 117 {
 118     FIXME(ole,"(%ld,%s): stub\n", hServer, docname);
 119     *hRet=++OLE_current_handle;
 120     return OLE_OK;
 121 }
 122
 123 /***********************************************************************
 124  *           OleRenameServerDoc32
 125  *
 126  */
 127 OLESTATUS WINAPI OleRenameServerDoc32(LHSERVERDOC hDoc, LPCSTR newName)
 128 {
 129     FIXME(ole,"(%ld,%s): stub.\n",hDoc, newName);
 130     return OLE_OK;
 131 }