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 WINAPI OleRegisterServer(
  21         LPCSTR  name,
  22         LPOLESERVER serverStruct,
  23         LHSERVER FAR *hRet,
  24         HINSTANCE hServer,
  25         OLE_SERVER_USE use)
  26 {
  27     dprintf_ole(stdnimp,"OleRegisterServer:%s\n",name);
  28     *hRet=++OLE_current_handle;
  29     /* return OLE_ERROR_MEMORY, OLE_ERROR_PROTECT_ONLY if you want it fail*/
  30     return OLE_OK;
  31 }
  32
  33 /***********************************************************************
  34  *           OleBlockServer
  35  */
  36 OLESTATUS WINAPI OleBlockServer(LHSERVER hServer)
  37 {
  38     fprintf(stdnimp,"OleBlockServer:%ld\n",hServer);
  39     return OLE_OK;
  40 }
  41
  42 /***********************************************************************
  43  *           OleUnblockServer
  44  */
  45 OLESTATUS WINAPI OleUnblockServer(LHSERVER hServer, BOOL FAR *block)
  46 {
  47     fprintf(stdnimp,"OleUnblockServer:%ld\n",hServer);
  48     /* no more blocked messages :) */
  49     *block=FALSE;
  50     return OLE_OK;
  51 }
  52
  53 /***********************************************************************
  54  *           OleRegisterServerDoc
  55  */
  56 OLESTATUS WINAPI OleRegisterServerDoc(
  57         LHSERVER hServer,
  58         LPCSTR docname,
  59         LPOLESERVERDOC document,
  60         LHSERVERDOC FAR *hRet)
  61 {
  62     dprintf_ole(stdnimp,"OleRegisterServerDoc:%ld,%s\n", hServer, docname);
  63     *hRet=++OLE_current_handle;
  64     return OLE_OK;
  65 }
  66
  67 /***********************************************************************
  68  *           OleRevokeServerDoc
  69  */
  70 OLESTATUS WINAPI OleRevokeServerDoc(LHSERVERDOC hServerDoc)
  71 {
  72     dprintf_ole(stdnimp,"OleRevokeServerDoc:%ld\n",hServerDoc);
  73     return OLE_OK;
  74 }
  75
  76 /***********************************************************************
  77  *           OleRevokeServer
  78  */
  79 OLESTATUS WINAPI OleRevokeServer(LHSERVER hServer)
  80 {
  81     dprintf_ole(stdnimp,"OleRevokeServer:%ld\n",hServer);
  82     return OLE_OK;
  83 }