misc/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 "stddebug.h"
  13 #include "debug.h"
  14
  15 LONG    OLE_current_handle;
  16
  17 /***********************************************************************
  18  *           OleRegisterServer
  19  */
  20 OLESTATUS WINAPI OleRegisterServer( LPCSTR name, LPOLESERVER serverStruct,
  21                                     LHSERVER *hRet, HINSTANCE16 hServer,
  22                                     OLE_SERVER_USE use )
  23 {
  24     dprintf_ole(stdnimp,"OleRegisterServer:%s\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  *           OleBlockServer
  32  */
  33 OLESTATUS WINAPI OleBlockServer(LHSERVER hServer)
  34 {
  35     fprintf(stdnimp,"OleBlockServer:%ld\n",hServer);
  36     return OLE_OK;
  37 }
  38
  39 /***********************************************************************
  40  *           OleUnblockServer
  41  */
  42 OLESTATUS WINAPI OleUnblockServer(LHSERVER hServer, BOOL16 *block)
  43 {
  44     fprintf(stdnimp,"OleUnblockServer:%ld\n",hServer);
  45     /* no more blocked messages :) */
  46     *block=FALSE;
  47     return OLE_OK;
  48 }
  49
  50 /***********************************************************************
  51  *           OleRegisterServerDoc
  52  */
  53 OLESTATUS WINAPI OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname,
  54                                        LPOLESERVERDOC document,
  55                                        LHSERVERDOC *hRet)
  56 {
  57     dprintf_ole(stdnimp,"OleRegisterServerDoc:%ld,%s\n", hServer, docname);
  58     *hRet=++OLE_current_handle;
  59     return OLE_OK;
  60 }
  61
  62 /***********************************************************************
  63  *           OleRevokeServerDoc
  64  */
  65 OLESTATUS WINAPI OleRevokeServerDoc(LHSERVERDOC hServerDoc)
  66 {
  67     dprintf_ole(stdnimp,"OleRevokeServerDoc:%ld\n",hServerDoc);
  68     return OLE_OK;
  69 }
  70
  71 /***********************************************************************
  72  *           OleRevokeServer
  73  */
  74 OLESTATUS WINAPI OleRevokeServer(LHSERVER hServer)
  75 {
  76     dprintf_ole(stdnimp,"OleRevokeServer:%ld\n",hServer);
  77     return OLE_OK;
  78 }