git.oblomov.eu Git - wine/blob - 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 OleRegisterServer( LPCSTR name, LPOLESERVER serverStruct,
  21                              LHSERVER *hRet, HINSTANCE 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 OleBlockServer(LHSERVER hServer)
  34 {
  35     fprintf(stdnimp,"OleBlockServer:%ld\n",hServer);
  36     return OLE_OK;
  37 }
  38
  39 /***********************************************************************
  40  *           OleUnblockServer
  41  */
  42 OLESTATUS OleUnblockServer(LHSERVER hServer, BOOL *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 OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname,
  54                                 LPOLESERVERDOC document, LHSERVERDOC *hRet)
  55 {
  56     dprintf_ole(stdnimp,"OleRegisterServerDoc:%ld,%s\n", hServer, docname);
  57     *hRet=++OLE_current_handle;
  58     return OLE_OK;
  59 }
  60
  61 /***********************************************************************
  62  *           OleRevokeServerDoc
  63  */
  64 OLESTATUS OleRevokeServerDoc(LHSERVERDOC hServerDoc)
  65 {
  66     dprintf_ole(stdnimp,"OleRevokeServerDoc:%ld\n",hServerDoc);
  67     return OLE_OK;
  68 }
  69
  70 /***********************************************************************
  71  *           OleRevokeServer
  72  */
  73 OLESTATUS OleRevokeServer(LHSERVER hServer)
  74 {
  75     dprintf_ole(stdnimp,"OleRevokeServer:%ld\n",hServer);
  76     return OLE_OK;
  77 }