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