able/windows-nt
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity
windows-nt/Source/XPSP1/NT/base/mvdm/wow16/ole/client/dll.h

959 lines
39 KiB
C
Raw Normal View History

Add source files
2020-09-26 03:20:57 -05:00
/****************************** Module Header ******************************\
* Module Name: dll.h
*
* PURPOSE: Private definitions file for ole.c
*
* Created: 1990
*
* Copyright (c) 1990, 1991 Microsoft Corporation
*
* History:
* Raor, Srinik (../../90,91) Original
*
\***************************************************************************/
#define OLE_INTERNAL
#include "cmacs.h"
#include "ole.h"
/////////////////////////////////////////////////////////////////////////////
// //
// Defines, Object methods table and Structures. //
// //
/////////////////////////////////////////////////////////////////////////////
#ifndef HUGE
#define HUGE huge
#endif
// Different OS version numbers. One of these values will be in the HIWORD
// of the OLE version field
#define OS_WIN16 0x0000
#define OS_MAC 0x0001
#define OS_WIN32 0x0002
// Characteristics Type Field
#define CT_NULL 0L
#define CT_LINK 1L
#define CT_EMBEDDED 2L
#define CT_STATIC 3L
#define CT_OLDLINK 4L
#define CT_PICTURE 5L
#define OLE_NO 0 // for boolean query functions
#define OLE_YES 1 // for boolean query functions
#define MAX_STR 256
#define MAX_NET_NAME MAX_STR
#define INVALID_INDEX -1
#define MAX_ATOM 256
#define NUM_RENDER 3
#define PROTOCOL_EDIT ((LPSTR)"StdFileEditing")
#define PROTOCOL_STATIC ((LPSTR)"Static")
#define PROTOCOL_EXECUTE ((LPSTR)"StdExecute")
#define READ_ACCESS 0
#define WRITE_ACCESS 1
#define POPUP_NETDLG 1
extern WORD CheckPointer (LPVOID, int);
WORD FARINTERNAL FarCheckPointer (LPVOID, int);
#define PROBE_OLDLINK(lpobj){\
if (lpobj->bOldLink)\
return OLE_ERROR_OBJECT;\
}
#define PROBE_READ(lp){\
if (!CheckPointer(lp, READ_ACCESS))\
return OLE_ERROR_ADDRESS; \
}
#define PROBE_WRITE(lp){\
if (!CheckPointer(lp, WRITE_ACCESS))\
return OLE_ERROR_ADDRESS; \
}
#define FARPROBE_READ(lp){\
if (!FarCheckPointer(lp, READ_ACCESS))\
return OLE_ERROR_ADDRESS; \
}
#define FARPROBE_WRITE(lp){\
if (!FarCheckPointer(lp, WRITE_ACCESS))\
return OLE_ERROR_ADDRESS; \
}
#define PROBE_MODE(bProtMode) {\
if (!bProtMode) \
return OLE_ERROR_PROTECT_ONLY; \
}
extern OLECLIPFORMAT cfBinary;
extern OLECLIPFORMAT cfOwnerLink;
extern OLECLIPFORMAT cfObjectLink;
extern OLECLIPFORMAT cfLink;
extern OLECLIPFORMAT cfNative;
extern ATOM aStdHostNames;
extern ATOM aStdTargetDevice ;
extern ATOM aStdDocDimensions;
extern ATOM aStdDocName;
extern ATOM aStdColorScheme;
extern ATOM aNullArg;
extern ATOM aSave;
extern ATOM aChange;
extern ATOM aClose;
extern ATOM aPackage;
extern HANDLE hInstDLL;
extern DWORD dwVerToFile;
extern DWORD dwVerFromFile;
extern WORD wWinVer;
extern BOOL bProtMode;
// Used by QuerySize() API;
extern DWORD dwObjSize;
extern OLESTREAM dllStream;
extern BOOL bWLO;
////////////////////////////////////////////////////////////////////////////
//
// Note: Whenever this table is changed, then we need to update the
// method table in ole.h. Otherwise we are in trouble.
//
////////////////////////////////////////////////////////////////////////////
typedef struct _OLEOBJECTVTBL{
LPVOID (FAR PASCAL *QueryProtocol) (LPVOID, LPSTR);
OLESTATUS (FAR PASCAL *Release) (LPVOID);
OLESTATUS (FAR PASCAL *Show) (LPVOID, BOOL);
OLESTATUS (FAR PASCAL *DoVerb) (LPVOID, WORD, BOOL, BOOL);
OLESTATUS (FAR PASCAL *GetData) (LPVOID, OLECLIPFORMAT, LPHANDLE);
OLESTATUS (FAR PASCAL *SetData) (LPVOID, OLECLIPFORMAT, HANDLE);
OLESTATUS (FAR PASCAL *SetTargetDevice) (LPVOID, HANDLE);
OLESTATUS (FAR PASCAL *SetBounds) (LPVOID, LPRECT);
OLECLIPFORMAT (FAR PASCAL *EnumFormats) (LPVOID, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *SetColorScheme) (LPVOID, LPLOGPALETTE);
OLESTATUS (FAR PASCAL *Delete) (LPVOID);
OLESTATUS (FAR PASCAL *SetHostNames) (LPVOID, LPSTR, LPSTR);
OLESTATUS (FAR PASCAL *SaveToStream) (LPVOID, LPOLESTREAM);
OLESTATUS (FAR PASCAL *Clone) (LPVOID, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPVOID);
OLESTATUS (FAR PASCAL *CopyFromLink) (LPVOID, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPVOID);
OLESTATUS (FAR PASCAL *Equal) (LPVOID, LPVOID);
OLESTATUS (FAR PASCAL *CopyToClipboard) (LPVOID);
OLESTATUS (FAR PASCAL *Draw) (LPVOID, HDC, LPRECT, LPRECT, HDC);
OLESTATUS (FAR PASCAL *Activate) (LPVOID, WORD, BOOL, BOOL, HWND, LPRECT);
OLESTATUS (FAR PASCAL *Execute) (LPVOID, HANDLE, WORD);
OLESTATUS (FAR PASCAL *Close) (LPVOID);
OLESTATUS (FAR PASCAL *Update) (LPVOID);
OLESTATUS (FAR PASCAL *Reconnect) (LPVOID);
OLESTATUS (FAR PASCAL *ObjectConvert) (LPVOID, LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *);
OLESTATUS (FAR PASCAL *GetLinkUpdateOptions) (LPVOID, OLEOPT_UPDATE FAR *);
OLESTATUS (FAR PASCAL *SetLinkUpdateOptions) (LPVOID, OLEOPT_UPDATE);
OLESTATUS (FAR PASCAL *Rename) (LPVOID, LPSTR);
OLESTATUS (FAR PASCAL *QueryName) (LPVOID, LPSTR, WORD FAR *);
OLESTATUS (FAR PASCAL *QueryType) (LPVOID, LPLONG);
OLESTATUS (FAR PASCAL *QueryBounds) (LPVOID, LPRECT);
OLESTATUS (FAR PASCAL *QuerySize) (LPVOID, DWORD FAR *);
OLESTATUS (FAR PASCAL *QueryOpen) (LPVOID);
OLESTATUS (FAR PASCAL *QueryOutOfDate) (LPVOID);
OLESTATUS (FAR PASCAL *QueryReleaseStatus) (LPVOID);
OLESTATUS (FAR PASCAL *QueryReleaseError) (LPVOID);
OLE_RELEASE_METHOD (FAR PASCAL *QueryReleaseMethod) (LPVOID);
OLESTATUS (FAR PASCAL *RequestData) (LPVOID, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *ObjectLong) (LPVOID, WORD, LPLONG);
OLESTATUS (FAR PASCAL *ChangeData) (LPVOID, HANDLE, LPOLECLIENT, BOOL);
} OLEOBJECTVTBL;
typedef OLEOBJECTVTBL FAR *LPOLEOBJECTVTBL;
typedef struct _OLEOBJECT { /*object */
LPOLEOBJECTVTBL lpvtbl;
char objId[2];
HOBJECT hobj;
LPOLECLIENT lpclient;
LONG ctype;
LONG cx;
LONG cy;
LONG mm;
int iTable; // Index into the dll table
ATOM aObjName; //** Client
LHCLIENTDOC lhclientdoc; // Document
LPOLEOBJECT lpPrevObj; // related
LPOLEOBJECT lpNextObj; //** fileds
LPOLEOBJECT lpParent; // NULL for LE or Static objects.
} OBJECT;
typedef struct _CF_NAME_ATOM {
char * cfName;
ATOM cfAtom;
} CF_NAME_ATOM;
extern CF_NAME_ATOM cfNameAtom[];
typedef struct _METADC {
int xMwo;
int yMwo;
int xMwe;
int yMwe;
int xre;
int yre;
struct _METADC * pNext;
} METADC, *PMETADC;
typedef struct _METAINFO {
METADC headDc;
int xwo;
int ywo;
int xwe;
int ywe;
int xro;
int yro;
} METAINFO, *PMETAINFO;
typedef struct OBJECT_MF { /* object_mf */
OBJECT head;
DWORD sizeBytes;
METAFILEPICT mfp;
HANDLE hmfp;
BOOL fMetaDC;
OLESTATUS error;
int nRecord;
PMETAINFO pMetaInfo;
PMETADC pCurMdc;
} OBJECT_MF;
typedef OBJECT_MF FAR * LPOBJECT_MF;
typedef struct
{
OBJECT head;
DWORD sizeBytes;
int xSize; // width in pixels
int ySize; // height in pixels
HBITMAP hBitmap;
} OBJECT_BM;
typedef OBJECT_BM FAR * LPOBJECT_BM;
typedef struct _OBJECT_DIB {
OBJECT head;
DWORD sizeBytes;
int xSize;
int ySize;
HANDLE hDIB;
} OBJECT_DIB;
typedef OBJECT_DIB FAR * LPOBJECT_DIB;
typedef struct
{
OBJECT head;
OLECLIPFORMAT cfFormat;
ATOM aClass;
DWORD sizeBytes;
HANDLE hData;
} OBJECT_GEN;
typedef OBJECT_GEN FAR * LPOBJECT_GEN;
typedef struct _RENDER_ENTRY { /* dll_entry */
LPSTR lpClass;
ATOM aClass;
OLESTATUS (FARINTERNAL *Load) (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
} RENDER_ENTRY;
typedef struct _DLL_ENTRY {
ATOM aDll; /* global atom for dll name with full path */
HANDLE hDll; /* handle to the dll module */
int cObj; /* count of objects, unload dll when this is 0 */
OLESTATUS (FAR PASCAL *Load) (LPOLESTREAM, LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG, ATOM, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *Clip) (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
OLESTATUS (FAR PASCAL *Link) (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *CreateFromTemplate) (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *Create) (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *CreateFromFile) (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *CreateLinkFromFile) (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS (FAR PASCAL *CreateInvisible) (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, BOOL);
} DLL_ENTRY;
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in OLE.C //
// //
/////////////////////////////////////////////////////////////////////////////
BOOL INTERNAL CheckObject(LPOLEOBJECT);
BOOL FARINTERNAL FarCheckObject(LPOLEOBJECT);
OLESTATUS INTERNAL LeQueryCreateFromClip (LPSTR, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in DEFCREAT.C //
// //
/////////////////////////////////////////////////////////////////////////////
OLESTATUS FAR PASCAL DefLoadFromStream (LPOLESTREAM, LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG, ATOM, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreateFromClip (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
OLESTATUS FAR PASCAL DefCreateLinkFromClip (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreateFromTemplate (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreate (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreateFromFile (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreateLinkFromFile (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL DefCreateInvisible (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, BOOL);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in PBHANDLR.C //
// //
/////////////////////////////////////////////////////////////////////////////
OLESTATUS FAR PASCAL PbLoadFromStream (LPOLESTREAM, LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG, ATOM, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreateFromClip (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
OLESTATUS FAR PASCAL PbCreateLinkFromClip (LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreateFromTemplate (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreate (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreateFromFile (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreateLinkFromFile (LPSTR, LPOLECLIENT, LPSTR, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FAR PASCAL PbCreateInvisible (LPSTR, LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, BOOL);
/////////////////////////////////////////////////////////////////////////////
// //
// Defines common for le.c, ledde.c, dde.c, doc.c //
// //
/////////////////////////////////////////////////////////////////////////////
// Constants for chekcing whether the instance is SrvrDLL instance.
#define WW_LPTR 0 // ptr tosrvr/doc/item
#define WW_LE 4 // signature
#define WW_HANDLE 6 // instance handle
#define WC_LE 0x4c45 // LE chars
// command flags
#define ACT_SHOW 0x0001 // show the window
#define ACT_ACTIVATE 0x0002 // activate
#define ACT_DOVERB 0x0004 // Run the item
#define ACT_ADVISE 0x0008 // advise for data
#define ACT_REQUEST 0x0010 // request for data
#define ACT_CLOSE 0x0020 // request for advise only on close
#define ACT_UNLAUNCH 0x0040 // unload the server after all the
#define ACT_TERMSRVR 0x0080 // terminate server
#define ACT_TERMDOC 0x0100 // terminate document
#define ACT_NATIVE 0x0200 // only for LNKed objects, if we
// need native data.
#define ACT_MINIMIZE 0x0400 // launch the app minimized
#define ACT_NOLAUNCH 0x0800 // don't launch the server
#define LN_TEMPLATE 0x0000 // create from template
#define LN_NEW 0x1000 // create new
#define LN_EMBACT 0x2000 // activate emb
#define LN_LNKACT 0x3000 // activate link
#define LN_MASK 0xf000 // launch mask
#define LN_SHIFT 12 // shift count for LN_MASK
typedef struct _EDIT_DDE { /* edit_dde */
HANDLE hInst;
int extraTerm;
HWND hClient;
HWND hServer;
BOOL bTerminating;
BOOL bAbort;
BOOL bCallLater; // used in request cases. if this is FALSE
// then OLE_CHANGED is sent to client
int awaitAck;
HANDLE hopt; // Memory block I may have to free
int nAdviseClose; // count of outstanding advises on closes
int nAdviseSave; // count of outstanding advises on save
HANDLE hData; // Poked data/ temp for holding the
// handle in DDE messages
// busy parameters
LONG lParam; // lparam value in case we need to
// repost the message
WORD msg; // busy repost message
WORD wTimer; // timer id.
} EDIT_DDE;
typedef EDIT_DDE NEAR *PEDIT_DDE;
typedef EDIT_DDE FAR *LPEDIT_DDE;
typedef struct _OBJECT_LE { /* object_le */
OBJECT head;
ATOM app;
ATOM topic;
ATOM item;
ATOM aServer;
BOOL bOldLink; // whether a linked object for old link
BOOL bOleServer; // server which supports the verbs
WORD verb; // verb nuymber;
WORD fCmd; // Command flags;
OLEOPT_UPDATE optUpdate;
OLEOPT_UPDATE optNew; // new update options
LPSTR lptemplate; // ptr to the template string, if
// create from template
ATOM aNetName; // network name on which the doc is
char cDrive; // local drive for that network
DWORD dwNetInfo; // LOW WORD = Net type
// HIGH WORD = Driver version
LPOLEOBJECT lpobjPict;
LONG lAppData; // apps data
LONG lHandlerData; // handler data
HANDLE hnative;
HANDLE hLink;
HANDLE hhostNames; // host name block
HANDLE htargetDevice; // target device info
HANDLE hdocDimensions; // document dimensions
HANDLE hextraData; // reqestdata handle
WORD cfExtra; // extra format data
HANDLE hlogpal; // logiccal palette
WORD oldasyncCmd; // previous asynchronous command
WORD asyncCmd; // asynchronous command
BOOL endAsync; // true if we need to send END_RELEASE.
BOOL bAsync; // true if async command on.
WORD mainRtn; // main async routine
WORD subRtn; // step within the main async routine
WORD mainErr; // failure error
WORD subErr; // step error
WORD errHint; // ;error hint
BOOL bSvrClosing; // TRUE - server in the process of
// closing down
BOOL bUnlaunchLater; // Call EmbLnkDelete from EndAsyncCmd
// if this flag is TRUE
HANDLE hSysEdit; // handle to system edit.
PEDIT_DDE pSysEdit; // near ptr to system edit.
HANDLE hDocEdit; // handle to doc level channel
PEDIT_DDE pDocEdit; // near ptr to the doc level channel
} OBJECT_LE;
typedef OBJECT_LE FAR * LPOBJECT_LE;
typedef struct _CLIENTDOC { /* object_le */
char docId[2];
LPOLEOBJECT lpHeadObj;
LPOLEOBJECT lpTailObj;
ATOM aClass;
ATOM aDoc;
HANDLE hdoc;
struct _CLIENTDOC FAR * lpPrevDoc;
struct _CLIENTDOC FAR * lpNextDoc;
} CLIENTDOC;
typedef CLIENTDOC FAR * LPCLIENTDOC;
typedef struct _HOSTNAMES {
WORD clientNameOffset;
WORD documentNameOffset;
BYTE data[];
} HOSTNAMES;
typedef HOSTNAMES FAR * LPHOSTNAMES;
typedef struct _BOUNDSRECT {
WORD defaultWidth;
WORD defaultHeight;
WORD maxWidth;
WORD maxHeight;
} BOUNDSRECT;
typedef BOUNDSRECT FAR *LPBOUNDSRECT;
// AwaitAck values
#define AA_REQUEST 1
#define AA_ADVISE 2
#define AA_POKE 3
#define AA_EXECUTE 4
#define AA_UNADVISE 5
#define AA_INITIATE 6
// Bits for Positive WM_DDE_ACK
#define POSITIVE_ACK 0x8000
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in LE.C //
// //
/////////////////////////////////////////////////////////////////////////////
LPVOID FARINTERNAL LeQueryProtocol (LPOBJECT_LE, LPSTR);
OLESTATUS FARINTERNAL LeRelease (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeClone (LPOBJECT_LE, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOBJECT_LE FAR *);
OLESTATUS FARINTERNAL LeCopyFromLink (LPOBJECT_LE, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOBJECT_LE FAR *);
OLESTATUS FARINTERNAL LeEqual (LPOBJECT_LE, LPOBJECT_LE);
OLESTATUS FARINTERNAL LeCopy (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeQueryBounds (LPOBJECT_LE, LPRECT);
OLESTATUS FARINTERNAL LeDraw (LPOBJECT_LE, HDC, LPRECT, LPRECT, HDC);
OLECLIPFORMAT FARINTERNAL LeEnumFormat (LPOBJECT_LE, OLECLIPFORMAT);
OLESTATUS FARINTERNAL LeGetData (LPOBJECT_LE, OLECLIPFORMAT, HANDLE FAR *);
OLESTATUS FARINTERNAL LeRequestData (LPOBJECT_LE, OLECLIPFORMAT);
OLESTATUS FARINTERNAL LeQueryOutOfDate (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeObjectConvert (LPOBJECT_LE, LPSTR, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *);
OLESTATUS FARINTERNAL LeChangeData (LPOBJECT_LE, HANDLE, LPOLECLIENT, BOOL);
LPOBJECT_LE FARINTERNAL LeCreateBlank(LHCLIENTDOC, LPSTR, LONG);
void FARINTERNAL SetExtents (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeSaveToStream (LPOBJECT_LE, LPOLESTREAM);
OLESTATUS FARINTERNAL LeLoadFromStream (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG, ATOM, OLECLIPFORMAT);
OLESTATUS INTERNAL LeStreamRead (LPOLESTREAM, LPOBJECT_LE);
OLESTATUS INTERNAL LeStreamWrite (LPOLESTREAM, LPOBJECT_LE);
int FARINTERNAL ContextCallBack (LPVOID, OLE_NOTIFICATION);
void INTERNAL DeleteObjectAtoms (LPOBJECT_LE);
void FARINTERNAL DeleteExtraData (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeGetUpdateOptions (LPOBJECT_LE, OLEOPT_UPDATE FAR *);
OLESTATUS FARINTERNAL LnkPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, OLECLIPFORMAT);
OLESTATUS FARINTERNAL EmbPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
BOOL INTERNAL SetLink (LPOBJECT_LE, HANDLE, LPSTR FAR *);
HANDLE INTERNAL GetLink (LPOBJECT_LE);
void FARINTERNAL SetEmbeddedTopic (LPOBJECT_LE);
OLESTATUS FAR PASCAL LeQueryReleaseStatus (LPOBJECT_LE);
OLESTATUS FAR PASCAL LeQueryReleaseError (LPOBJECT_LE);
OLE_RELEASE_METHOD FAR PASCAL LeQueryReleaseMethod (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeQueryType (LPOBJECT_LE, LPLONG);
OLESTATUS FARINTERNAL LeObjectLong (LPOBJECT_LE, WORD, LPLONG);
void SetNetDrive (LPOBJECT_LE);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in LEDDE.C //
// //
/////////////////////////////////////////////////////////////////////////////
OLESTATUS FARINTERNAL LeDoVerb (LPOBJECT_LE, WORD, BOOL, BOOL);
OLESTATUS FARINTERNAL LeShow (LPOBJECT_LE, BOOL);
OLESTATUS FARINTERNAL LeQueryOpen (LPOBJECT_LE);
BOOL INTERNAL QueryOpen (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeActivate (LPOBJECT_LE, WORD, BOOL, BOOL, HWND, LPRECT);
OLESTATUS FARINTERNAL LeUpdate (LPOBJECT_LE);
OLESTATUS FARINTERNAL EmbOpen (LPOBJECT_LE, BOOL, BOOL, HWND, LPRECT);
OLESTATUS FARINTERNAL EmbUpdate (LPOBJECT_LE);
OLESTATUS FARINTERNAL EmbOpenUpdate (LPOBJECT_LE);
OLESTATUS FARINTERNAL LnkOpen (LPOBJECT_LE, BOOL, BOOL, HWND, LPRECT);
OLESTATUS FARINTERNAL LnkUpdate (LPOBJECT_LE);
OLESTATUS FARINTERNAL LnkOpenUpdate (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeClose (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeReconnect (LPOBJECT_LE);
OLESTATUS INTERNAL PokeNativeData (LPOBJECT_LE);
BOOL INTERNAL PostMessageToServer (PEDIT_DDE, WORD, LONG);
OLESTATUS FARINTERNAL LeCreateFromTemplate (LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FARINTERNAL LeCreate (LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT);
OLESTATUS FARINTERNAL LeCreateInvisible (LPOLECLIENT, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, BOOL);
OLESTATUS FARINTERNAL CreateFromClassOrTemplate (LPOLECLIENT, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, WORD, LPSTR, LHCLIENTDOC, LPSTR);
OLESTATUS FARINTERNAL CreateEmbLnkFromFile (LPOLECLIENT, LPSTR, LPSTR, LPSTR, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
OLESTATUS FARINTERNAL LeSetUpdateOptions (LPOBJECT_LE, OLEOPT_UPDATE);
void INTERNAL AdvisePict (LPOBJECT_LE, ATOM);
void INTERNAL UnAdvisePict (LPOBJECT_LE);
int INTERNAL GetPictType (LPOBJECT_LE);
void INTERNAL AdviseOn (LPOBJECT_LE, int, ATOM);
void INTERNAL UnAdviseOn (LPOBJECT_LE, int);
void INTERNAL RequestOn (LPOBJECT_LE, int);
void INTERNAL RequestPict (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeSetHostNames (LPOBJECT_LE, LPSTR, LPSTR);
OLESTATUS INTERNAL PokeHostNames (LPOBJECT_LE);
OLESTATUS INTERNAL SetHostNamesHandle (LPOBJECT_LE, LPSTR, LPSTR);
void INTERNAL FreePokeData (LPOBJECT_LE, PEDIT_DDE);
OLESTATUS INTERNAL SendPokeData (LPOBJECT_LE, ATOM, HANDLE, OLECLIPFORMAT);
OLESTATUS FARINTERNAL LeSetTargetDevice (LPOBJECT_LE, HANDLE);
OLESTATUS INTERNAL PokeTargetDeviceInfo (LPOBJECT_LE);
OLESTATUS INTERNAL PokeDocDimensions (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeSetBounds (LPOBJECT_LE, LPRECT);
OLESTATUS FARINTERNAL LeSetData (LPOBJECT_LE, OLECLIPFORMAT, HANDLE);
BOOL INTERNAL SendSrvrMainCmd (LPOBJECT_LE, LPSTR);
ATOM INTERNAL ExtendAtom (LPOBJECT_LE, ATOM);
BOOL INTERNAL CreatePictObject (LHCLIENTDOC, LPSTR, LPOBJECT_LE, OLEOPT_RENDER, OLECLIPFORMAT, LPSTR);
BOOL INTERNAL IsSrvrDLLwnd (HWND, HANDLE);
OLESTATUS INTERNAL ChangeDocAndItem (LPOBJECT_LE, HANDLE);
BOOL QueryUnlaunch (LPOBJECT_LE);
BOOL QueryClose (LPOBJECT_LE);
OLESTATUS FARINTERNAL LeSetColorScheme (LPOBJECT_LE, LPLOGPALETTE);
OLESTATUS INTERNAL PokeColorScheme (LPOBJECT_LE);
OLESTATUS FARINTERNAL ProbeAsync (LPOBJECT_LE);
BOOL INTERNAL IsServerValid (LPOBJECT_LE);
BOOL INTERNAL IsWindowValid (HWND);
OLESTATUS FARINTERNAL LeExecute (LPOBJECT_LE, HANDLE, WORD);
void INTERNAL FreeGDIdata (HANDLE, OLECLIPFORMAT);
BOOL INTERNAL CanPutHandleInPokeBlock (LPOBJECT_LE, OLECLIPFORMAT);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in DDE.C //
// //
/////////////////////////////////////////////////////////////////////////////
long FARINTERNAL DocWndProc(HWND, unsigned, WORD, LONG );
long FARINTERNAL SrvrWndProc(HWND, unsigned, WORD, LONG );
BOOL INTERNAL CheckAtomValid (ATOM);
void INTERNAL HandleAckInitMsg (PEDIT_DDE, HWND);
BOOL INTERNAL HandleAck (LPOBJECT_LE, PEDIT_DDE, DWORD);
void INTERNAL HandleDataMsg (LPOBJECT_LE, HANDLE, ATOM);
void INTERNAL HandleTermMsg (LPOBJECT_LE, PEDIT_DDE, HWND, BOOL);
void INTERNAL HandleTimerMsg (LPOBJECT_LE, PEDIT_DDE);
void INTERNAL SetData (LPOBJECT_LE, HANDLE, int);
BOOL INTERNAL DeleteBusyData (LPOBJECT_LE, PEDIT_DDE);
void INTERNAL DeleteAbortData (LPOBJECT_LE, PEDIT_DDE);
BOOL INTERNAL WaitDDE (HWND, BOOL);
BOOL INTERNAL WaitDDEAck (PEDIT_DDE);
BOOL INTERNAL InitSrvrConv (LPOBJECT_LE, HANDLE);
void INTERNAL TermSrvrConv (LPOBJECT_LE);
void INTERNAL DeleteSrvrEdit (LPOBJECT_LE);
BOOL INTERNAL SrvrExecute (LPOBJECT_LE, HANDLE);
void INTERNAL SendStdExit (LPOBJECT_LE);
void INTERNAL SendStdClose (LPOBJECT_LE);
void INTERNAL SendStdExit (LPOBJECT_LE);
BOOL FARINTERNAL InitDocConv (LPOBJECT_LE, BOOL);
BOOL INTERNAL DocExecute (LPOBJECT_LE, HANDLE);
void INTERNAL TermDocConv (LPOBJECT_LE);
void INTERNAL DeleteDocEdit (LPOBJECT_LE);
HANDLE INTERNAL LeLaunchApp (LPOBJECT_LE);
HANDLE INTERNAL LoadApp (LPSTR, WORD);
int INTERNAL ScanItemOptions (ATOM, int FAR *);
void INTERNAL ChangeDocName (LPOBJECT_LE, LPSTR);
BOOL INTERNAL CanCallback (LPOBJECT_LE, int);
void FARINTERNAL CallEmbLnkDelete (LPOBJECT_LE);
/////////////////////////////////////////////////////////////////////////////
// //
// Picture Object routines used by routines in other modules //
// //
/////////////////////////////////////////////////////////////////////////////
LPOBJECT_BM FARINTERNAL BmCreateBlank (LHCLIENTDOC, LPSTR, LONG);
OLESTATUS FARINTERNAL BmLoadFromStream (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
OLESTATUS FARINTERNAL BmPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
LPOBJECT_DIB FARINTERNAL DibCreateBlank (LHCLIENTDOC, LPSTR, LONG);
LPOBJECT_DIB FARINTERNAL DibCreateObject (HANDLE, LPOLECLIENT, BOOL, LHCLIENTDOC, LPSTR, LONG);
OLESTATUS FARINTERNAL DibLoadFromStream (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
OLESTATUS FARINTERNAL DibPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
LPOBJECT_MF FARINTERNAL MfCreateBlank (LHCLIENTDOC, LPSTR, LONG);
LPOBJECT_MF FARINTERNAL MfCreateObject (HANDLE, LPOLECLIENT, BOOL, LHCLIENTDOC, LPSTR, LONG);
OLESTATUS FARINTERNAL MfLoadFromStream (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
OLESTATUS FARINTERNAL MfPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG);
LPOBJECT_GEN FARINTERNAL GenCreateBlank (LHCLIENTDOC, LPSTR, LONG, ATOM);
OLESTATUS FARINTERNAL GenLoadFromStream (LPOLESTREAM, LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LONG, ATOM, OLECLIPFORMAT);
OLESTATUS FARINTERNAL GenPaste (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, LPSTR, OLECLIPFORMAT, LONG);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in MAIN.C //
// //
/////////////////////////////////////////////////////////////////////////////
void FARINTERNAL UnloadDll (void);
int FARINTERNAL LoadDll (LPSTR);
void FARINTERNAL DecreaseHandlerObjCount (int);
void FARINTERNAL RemoveLinkStringFromTopic (LPOBJECT_LE);
OLESTATUS FARINTERNAL CreatePictFromClip (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LPSTR, LONG);
OLESTATUS FARINTERNAL CreatePackageFromClip (LPOLECLIENT, LHCLIENTDOC, LPSTR, LPOLEOBJECT FAR *, OLEOPT_RENDER, OLECLIPFORMAT, LONG);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in UTILS.C //
// //
/////////////////////////////////////////////////////////////////////////////
BOOL PutStrWithLen (LPOLESTREAM, LPSTR);
BOOL GetStrWithLen (LPOLESTREAM, LPSTR);
ATOM GetAtomFromStream (LPOLESTREAM);
BOOL PutAtomIntoStream (LPOLESTREAM, ATOM);
BOOL GetBytes (LPOLESTREAM, LPSTR, LONG);
BOOL PutBytes (LPOLESTREAM, LPSTR, LONG);
BOOL QueryApp (LPSTR, LPSTR, LPSTR);
HANDLE MapStrToH (LPSTR);
void UtilMemClr (PSTR, WORD);
BOOL QueryHandler (WORD);
OLESTATUS INTERNAL FileExists (LPOBJECT_LE);
ATOM FARINTERNAL GetAppAtom (LPSTR);
HANDLE FARINTERNAL DuplicateGlobal (HANDLE, WORD);
HANDLE FARINTERNAL CopyData (LPSTR, DWORD);
ATOM FARINTERNAL DuplicateAtom (ATOM);
BOOL FARINTERNAL UtilQueryProtocol (LPOBJECT_LE, LPSTR);
BOOL FARINTERNAL CmpGlobals (HANDLE, HANDLE);
void FARINTERNAL ConvertToHimetric(LPPOINT);
BOOL FARINTERNAL QueryVerb (LPOBJECT_LE, WORD, LPSTR, LONG);
BOOL FARINTERNAL MapExtToClass (LPSTR, LPSTR, int);
int FARINTERNAL GlobalGetAtomLen (ATOM);
void FARINTERNAL UtilMemCpy (LPSTR, LPSTR, DWORD);
BOOL FARINTERNAL UtilMemCmp (LPSTR, LPSTR, DWORD);
BOOL FARINTERNAL IsObjectBlank (LPOBJECT_LE);
OLESTATUS FARINTERNAL ObjQueryName (LPOLEOBJECT, LPSTR, WORD FAR *);
OLESTATUS FARINTERNAL ObjRename (LPOLEOBJECT, LPSTR);
void INTERNAL SetExeAtom (LPOBJECT_LE);
// !!!make a routine and let the macro call the routine
// definitions related to the asynchronous operations.
#define WAIT_FOR_ASYNC_MSG(lpobj) { \
lpobj->subRtn++; \
if (lpobj->bAsync){ \
lpobj->endAsync = TRUE; \
return OLE_WAIT_FOR_RELEASE; \
} \
}
#define STEP_NOP(lpobj) lpobj->subRtn++;
// !!! Assumes all the creates are in order
#define PROBE_CREATE_ASYNC(lpobj) \
if (lpobj->asyncCmd >= OLE_CREATE && \
lpobj->asyncCmd <= OLE_CREATEINVISIBLE) {\
if(ProbeAsync(lpobj) == OLE_BUSY)\
return OLE_BUSY;\
}
#define PROBE_OBJECT_BLANK(lpobj) \
if (lpobj->asyncCmd >= OLE_CREATE && \
lpobj->asyncCmd <= OLE_CREATEFROMFILE) { \
if ((ProbeAsync(lpobj) == OLE_BUSY) && IsObjectBlank(lpobj)) \
return OLE_ERROR_BLANK;\
}
#define PROBE_ASYNC(lpobj)\
if(ProbeAsync(lpobj) == OLE_BUSY)\
return OLE_BUSY;
#define IS_SVRCLOSING(lpobj)\
((lpobj->bUnlaunchLater || lpobj->bSvrClosing) ? TRUE : FALSE)
#define PROBE_SVRCLOSING(lpobj)\
if (IS_SVRCLOSING(lpobj)) \
return OLE_ERROR_NOT_OPEN; \
#define CLEAR_STEP_ERROR(lpobj) lpobj->subErr = OLE_OK;
#define SKIP_TO(a, b) if (a) goto b;
#define RESETERR(lpobj) lpobj->mainErr = OLE_OK
#define SETSTEP(lpobj, no) lpobj->subRtn = no
#define SETERRHINT(lpobj, no) lpobj->errHint = no
#define CLEARASYNCCMD(lpobj) lpobj->asyncCmd = OLE_NONE
// routines.
BOOL ProcessErr (LPOBJECT_LE);
void InitAsyncCmd (LPOBJECT_LE, WORD, WORD);
void NextAsyncCmd (LPOBJECT_LE, WORD);
void ScheduleAsyncCmd (LPOBJECT_LE);
OLESTATUS EndAsyncCmd (LPOBJECT_LE);
OLESTATUS DocShow (LPOBJECT_LE);
OLESTATUS DocRun (LPOBJECT_LE);
void SendStdShow (LPOBJECT_LE);
OLESTATUS EmbLnkClose (LPOBJECT_LE);
OLESTATUS LnkSetUpdateOptions (LPOBJECT_LE);
OLESTATUS EmbSrvrUnlaunch (LPOBJECT_LE);
OLESTATUS LnkChangeLnk (LPOBJECT_LE);
OLESTATUS RequestData (LPOBJECT_LE, OLECLIPFORMAT);
OLESTATUS FARINTERNAL EmbLnkDelete(LPOBJECT_LE);
void FARINTERNAL FarInitAsyncCmd(LPOBJECT_LE, WORD, WORD);
// async command routines.
#define EMBLNKDELETE 1
#define LNKOPENUPDATE 2
#define DOCSHOW 3
#define EMBOPENUPDATE 4
#define EMBLNKCLOSE 5
#define LNKSETUPDATEOPTIONS 6
#define LNKCHANGELNK 7
#define REQUESTDATA 8
#define DOCRUN 9
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in DOC.C //
// //
/////////////////////////////////////////////////////////////////////////////
BOOL FARINTERNAL CheckClientDoc (LPCLIENTDOC);
void FARINTERNAL DocAddObject (LPCLIENTDOC, LPOLEOBJECT, LPSTR);
void FARINTERNAL DocDeleteObject (LPOLEOBJECT);
LPOLEOBJECT INTERNAL DocGetNextObject (LPCLIENTDOC, LPOLEOBJECT);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in NET.C //
// //
/////////////////////////////////////////////////////////////////////////////
#define IDD_DRIVE 500
#define IDD_PASSWORD 501
#define IDD_PATH 502
#define IDS_NETERR 600
#define IDS_NETCONERRMSG 601
#define IDS_FILENOTFOUNDMSG 602
#define IDS_BADPATHMSG 603
OLESTATUS FARINTERNAL SetNetName (LPOBJECT_LE);
BOOL FARINTERNAL SetNextNetDrive (LPOBJECT_LE, int FAR *, LPSTR);
OLESTATUS FARINTERNAL CheckNetDrive (LPOBJECT_LE, BOOL);
OLESTATUS INTERNAL FixNet (LPOBJECT_LE, LPSTR, BOOL);
OLESTATUS INTERNAL ConnectNet (LPOBJECT_LE, LPSTR);
BOOL FARINTERNAL ChangeTopic (LPOBJECT_LE);
VOID INTERNAL FillDrives (HWND);
int FAR PASCAL ConnectDlgProc(HWND, WORD, WORD, DWORD);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in OLE.ASM //
// //
/////////////////////////////////////////////////////////////////////////////
WORD GetGDIds (DWORD);
WORD IsMetaDC (HDC, WORD);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in ERROR.C //
// //
/////////////////////////////////////////////////////////////////////////////
OLESTATUS FARINTERNAL ObjQueryType (LPOLEOBJECT, LPLONG);
OLESTATUS FARINTERNAL ObjQuerySize (LPOLEOBJECT, DWORD FAR *);
DWORD PASCAL FAR DllPut (LPOLESTREAM, LPSTR, DWORD);
HANDLE FARINTERNAL DuplicateGDIdata (HANDLE, OLECLIPFORMAT);
/////////////////////////////////////////////////////////////////////////////
// //
// Routines in BM.C //
// //
/////////////////////////////////////////////////////////////////////////////
HBITMAP FARINTERNAL BmDuplicate (HBITMAP, DWORD FAR *, LPBITMAP);
Reference in a new issue Copy permalink