vwemirror/TeslaRel410
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
e610a2a3aa5dc072ddfdc996905251a5bb830da1
TeslaRel410/BORLAND/BC45/SOURCE/OCF/BOCOLE/BOLEDEFS.H
T
CydandClaude Fable 5 63312e07f9 source410: literal 4.10 source reconstruction + BC++ 4.52 fleet toolchain archived 
- BORLAND/: Borland C++ 4.52 (chosen over 4.5 by byte-match: CODE/RP/CW32.LIB
  is identical to 4.52's install lib). BCC32/TLINK32/TLIB/MAKE run natively on
  Win11; CODE/BT/OPT.MAK is the shipped BTL4OPT.EXE's exact flag recipe
  (extender = Borland PowerPack DPMI32, not Phar Lap TNT).
- restoration/source410/: the literal 1995-form reconstruction of the missing
  BT game source (never mixed into CODE/). Round 1-3 state:
  * 6 of 10 surviving original TUs COMPILE CLEAN under the period toolchain
    (BTMSSN, BTCNSL, BTSCNRL, BTTEAM, BTL4MODE, BTL4ARND) - first builds
    since 1996.
  * BT_L4/BTL4APP.CPP pilot reconstruction: 12/12 functions, Fail() lands on
    its binary-recorded line 400 exactly.
  * BT/BTCNSL.HPP: console wire IDs recovered from the binary's ctors
    (Killed=9, Damaged=10, ScoreUpdate=13, DeathWithoutHonor=15 [T1];
    TeamScore=12 flagged [T4]).
  * MUNGA/: 8 engine-header backfills back-dated from the BT412 WinTesla tree
    (VDATA numbering decomp-verified; AUDREND's OpenAL-era virtual removed -
    the period compiler is the drift detector).
  * Tooling: backdate.py (WinTesla->1995 header transform), compile410.sh
    (per-TU verification sweep under authentic OPT.MAK flags).
  * README: corrected roadmap - MECH.HPP is the capstone grown with the mech
    TU reconstructions; BTREG.CPP green = the header-family milestone.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
2026-07-19 07:33:26 -05:00

375 lines
10 KiB
C++
Raw Blame History

//
//**************************************************************************
//
// BOleDefs.h -- Contains the main constants and structures used by Bolero
// to encapsulate OLE2 compound document functionality.
//
// Copyright (c) 1993,94 by Borland International, Inc. All rights reserved
//
//**************************************************************************
#ifndef BOLEDEFS_H
#define BOLEDEFS_H
#include <bolever.h>
#include <bcom.h>
#ifdef WIN32
#define BOLEDLL TEXT("BOLE32.DLL")
#else
#define BOLEDLL TEXT("BOLE16.DLL")
#endif
#ifdef WIN32
#include "pshpack8.h"
#endif
#define BOLEBIND TEXT("CREATECLASSMGR")
/*
* Useful OLE2.H declarations
*/
#if !defined(WIN32) && !defined (__WINDOWS_H) && !defined (_INC_WINDOWS)
typedef struct tagPOINT
{
int x;
int y;
} POINT;
typedef POINT FAR* LPPOINT;
typedef struct tagRECT
{
int left;
int top;
int right;
int bottom;
} RECT;
typedef RECT FAR* LPRECT;
#endif
#if !defined (_OLE2_H_)
#ifdef WIN32
#define LPRECTL PRECTL
#else
typedef struct FARSTRUCT tagRECTL
{
long left;
long top;
long right;
long bottom;
} RECTL, FAR* LPRECTL;
typedef struct FARSTRUCT tagPOINTL {
LONG x;
LONG y;
} POINTL;
#endif
#ifndef LPCRECT
typedef const RECT FAR* LPCRECT;
#endif
#ifndef LPCRECTL
typedef const RECTL FAR* LPCRECTL;
#endif
// opaque pass throughs
struct _ICLASS IMoniker;
struct _ICLASS IStorage;
struct _ICLASS IDataObject;
#endif
typedef const SIZE FAR* LPCSIZE;
#if ((defined __BORLANDC__) && (!defined WIN32))
#pragma option -po-
#endif
class _ICLASS IBContainer; // forward reference
#if ((defined __BORLANDC__) && (!defined WIN32))
#pragma option -po.
#endif
/*
* BOLERO linking and embedding parameter typedefs
*/
typedef long Coord;
#define HIMETRIC_PER_INCH 2540 // number HIMETRIC units per inch
// MAP_PIX_TO_LOGHIM / MAP_LOGHIM_TO_PIX --
//
// The OLE2-defined macros for these guys don't round. Our versions
// add half the denominator so that the truncated result of the integer
// division is rounded to the nearest integer. e.g. 9/10 truncates to 0,
// instead of rounding to 1, so add 5/10 which makes 14/10 which truncates
// to 1 which simulates rounding.
//
#ifdef MAP_PIX_TO_LOGHIM
#undef MAP_PIX_TO_LOGHIM
#endif
#define MAP_PIX_TO_LOGHIM(pixel, pixelsPerInch) \
((ULONG) ((((ULONG)HIMETRIC_PER_INCH) * pixel + (pixelsPerInch >> 1)) / pixelsPerInch))
#ifdef MAP_LOGHIM_TO_PIX
#undef MAP_LOGHIM_TO_PIX
#endif
#define MAP_LOGHIM_TO_PIX(hiMetric, pixelsPerInch) \
(UINT) ((((double) hiMetric) * pixelsPerInch + (HIMETRIC_PER_INCH >> 1)) / HIMETRIC_PER_INCH)
#if defined(INIT_BGUID)
#define DEFINE_BOLEGUID(name, l) \
EXTERN_C __export const GUID CDECL FAR name = { l, 0, 0, {0xC0,0,0,0,0,0,0,0x46} }
#else
#define DEFINE_BOLEGUID(name, l) \
EXTERN_C const GUID CDECL FAR name
#endif
DEFINE_BOLEGUID(IID_IBPart, 0x02A104L);
DEFINE_BOLEGUID(IID_IBSite, 0x02A105L);
DEFINE_BOLEGUID(IID_IBContainer, 0x02A106L);
DEFINE_BOLEGUID(IID_IBDocument, 0x02A107L);
DEFINE_BOLEGUID(IID_IBService, 0x02A108L);
DEFINE_BOLEGUID(IID_IBApplication, 0x02A109L);
DEFINE_BOLEGUID(IID_IBClassMgr, 0x02A10AL);
DEFINE_BOLEGUID(IID_IBLinkInfo, 0x02A10BL);
DEFINE_BOLEGUID(IID_IBLinkable, 0x02A10CL);
DEFINE_BOLEGUID(IID_IBRootLinkable, 0x02A10DL);
DEFINE_BOLEGUID(IID_IBContains, 0x02A10EL);
DEFINE_BOLEGUID(IID_BOleDocument, 0x02A10FL);
DEFINE_BOLEGUID(IID_BOlePart, 0x02A110L);
DEFINE_BOLEGUID(IID_IBDataConsumer, 0x02A111L);
DEFINE_BOLEGUID(IID_IBDataProvider, 0x02A112L);
DEFINE_BOLEGUID(IID_IBWindow, 0x02A113L);
DEFINE_BOLEGUID(IID_IBDataNegotiator,0x02A114L);
DEFINE_BOLEGUID(IID_IBDropDest, 0x02A115L);
DEFINE_BOLEGUID(IID_BOleShadowData, 0x02A116L);
DEFINE_BOLEGUID(IID_IBClass, 0x02A117L);
DEFINE_BOLEGUID(IID_IBOverrideBrowseLinks, 0x02A118L);
DEFINE_BOLEGUID(IID_BOleSite, 0x02A119L);
DEFINE_BOLEGUID(IID_IBSite2, 0x02A11AL);
DEFINE_BOLEGUID(IID_IBOverrideHelpButton, 0x02A11BL);
DEFINE_BOLEGUID(IID_IBDataProvider2, 0x02A11CL);
DEFINE_BOLEGUID(IID_IBPart2, 0x02A11DL);
// Bolero Class ids for instantiating bolero objects (helpers)
typedef ULONG BCID;
const BCID cidBOleService = 1L; //
const BCID cidBOleDocument = 2L; // helper for containers
const BCID cidBOlePart = 3L; // helper for sites
const BCID cidBOleSite = 4L; // helper for parts
const BCID cidBOleInProcSite = 5L; // helper for parts
const BCID cidBOleContainer = 6L; // helper for part documents
const BCID cidBOleData = 7L; // helper for data transfer
const BCID cidBOleFactory = 8L; // helper for class factory
const BCID cidBOleShadowData = 9L; // helper for non delayed rendering
const BCID cidBOleInProcHandler = 10L; // helper for dll handler parts
//const BCID cidBOlePart2 = 11L; // helper for parts
typedef enum {
BOLE_MED_NULL = 0,
BOLE_MED_HGLOBAL = 1,
BOLE_MED_FILE = 2,
BOLE_MED_STREAM = 4,
BOLE_MED_STORAGE = 8,
BOLE_MED_GDI = 16,
BOLE_MED_MFPICT = 32, // leave room for any new OLE mediums
BOLE_MED_STATIC = 1024
} BOleMedium;
typedef enum {
BOLE_HELP_EXIT,
BOLE_HELP_ENTER,
BOLE_HELP_GET
} BOleHelp;
typedef enum {
BOLE_MOUSEENTER = 1,
BOLE_MOUSECONTAINED = 2,
BOLE_MOUSEEXIT = 3
} BOleMouseAction;
typedef enum {
BOLE_DROP_NONE = 0,
BOLE_DROP_COPY = 1,
BOLE_DROP_MOVE = 2,
BOLE_DROP_LINK = 4
} BOleDropAction;
typedef enum {
BOLE_CONTENT = 1,
BOLE_THUMBNAIL = 2,
BOLE_ICON = 4,
BOLE_DOCPRINT = 8,
BOLE_DEFAULT = 16,
BOLE_ASPECT_MAINTAIN = 32,
BOLE_CLIP = 64
} BOleAspect;
typedef enum {
BOLE_DRAW_NONE = 0,
BOLE_DRAW_SHADINGONLY = 1,
BOLE_DRAW_SHOWOBJECTS = 2
} BOleDraw;
typedef enum {
BOLE_SCROLL_UP = 1,
BOLE_SCROLL_DOWN = 2,
BOLE_SCROLL_LEFT = 4,
BOLE_SCROLL_RIGHT = 8
} BOleScroll;
typedef enum {
BOLE_NAME_LONG = 1,
BOLE_NAME_SHORT = 2,
BOLE_NAME_APP = 3
} BOlePartName;
typedef enum {
BOLE_HELP_BROWSE,
BOLE_HELP_BROWSECLIPBOARD,
BOLE_HELP_CONVERT,
BOLE_HELP_BROWSELINKS,
BOLE_HELP_CHANGEICON,
BOLE_HELP_FILEOPEN,
BOLE_HELP_SOURCESET,
BOLE_HELP_ICONFILEOPEN
} BOleDialogHelp;
typedef enum {
BOLE_ENABLE_PASTE = 1,
BOLE_ENABLE_PASTELINK = 2,
BOLE_ENABLE_BROWSECLIPBOARD = 4,
BOLE_ENABLE_BROWSELINKS = 8
} BOleMenuEnable;
typedef enum {
BOLE_INVAL_DATA = 1,
BOLE_INVAL_VIEW = 2,
BOLE_INVAL_PERSISTENT = 4
} BOleInvalidate;
typedef struct FAR {
LPCOLESTR typeName;
LPCOLESTR verbName;
UINT verbIndex;
BOOL fCanDirty;
} BOleVerb;
typedef struct FAR {
LONG width[6];
} BOleMenuWidths;
typedef struct FAR {
UINT fmtId;
OLECHAR fmtName[32];
OLECHAR fmtResultName[32];
BOleMedium fmtMedium;
BOOL fmtIsLinkable;
} BOleFormat;
typedef enum {
BOLE_CONVERT_TO_CLSID = 1,
BOLE_ACTIVATE_AS_CLSID = 2,
BOLE_ASPECT_TO_ICON = 4,
BOLE_ASPECT_TO_CONTENT = 8
} BOleConvertAction;
typedef enum {
BOLE_LINK,
BOLE_EMBED,
BOLE_EMBED_ASMETAFILE,
BOLE_EMBED_ASBITMAP
} InitHow;
typedef enum {
BOLE_FILE,
BOLE_STORAGE,
BOLE_DATAOBJECT,
BOLE_NEW,
BOLE_HANDLE
} InitWhere;
typedef struct FAR {
InitHow How;
InitWhere Where;
IBContainer FAR* pContainer;
HICON hIcon;
IStorage *pStorage;
union {
struct { // where == BOLE_FILE
LPCOLESTR pPath;
} whereFile;
struct { // where == BOLE_DATAOBJECT
IDataObject *pData;
} whereData;
struct { // where == BOLE_NEW
BCID cid;
//
} whereNew;
struct { // where == BOLE_HANDLE
HANDLE data;
UINT dataFormat;
} whereHandle;
};
inline LONG ReleaseDataObject()
{ return ((Where == BOLE_DATAOBJECT) && whereData.pData) ?
((IUnknown *)whereData.pData)->Release() :
0;
}
} BOleInitInfo;
typedef enum {
BOLE_UPDATE_AUTO = 1,
BOLE_UPDATE_MANUAL = 3
} BOleLinkUpdate;
typedef struct FAR {
ULONG xN; // numerator in x direction
ULONG xD; // denominator in x direction
ULONG yN; // numerator in y direction
ULONG yD; // denominator in y direction
} BOleScaleFactor;
// This tagged union allows macro record/playback on the Convert dialog
//
typedef struct FAR {
BOleConvertAction action;
CLSID clsidNew;
HGLOBAL hIcon;
} BOleConvertInfo;
// Entry Points
//
extern "C" {
extern HRESULT PASCAL FAR _export CreateClassMgr (PIUnknown FAR*pCM, PIUnknown pOut, IMalloc FAR*);
}
inline PIUnknown CreateClassMgr( PIUnknown pOut = NULLP, IMalloc FAR* pMalloc = NULLP)
{
PIUnknown tmpCM;
return CreateClassMgr(&tmpCM, pOut, pMalloc) == NOERROR ? tmpCM : NULLP;
}
#ifdef WIN32
#include "poppack.h"
#endif
#endif
Reference in New Issue View Git Blame Copy Permalink