开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 模拟服务器 > 查看源码
OleAuto.h
资源名称：SwordOnline.rar　[点击查看]
上传用户：dzyhzl
上传日期：2019-04-29
资源大小：56270k
文件大小：47k
源码类别：

模拟服务器

开发平台：

C/C++

OleAuto.h：源码内容
  1. //+---------------------------------------------------------------------------
  2. //
  3. //  Microsoft Windows
  4. //  Copyright (c) Microsoft Corporation. All rights reserved.
  5. //
  6. //  File:       oleauto.h
  7. //
  8. //  Contents:   Defines Ole Automation support function prototypes, constants
  9. //
  10. //----------------------------------------------------------------------------
  12. #if !defined( _OLEAUTO_H_ )
  13. #define _OLEAUTO_H_
  15. #if _MSC_VER > 1000
  16. #pragma once
  17. #endif
  19. // Set packing to 8 for ISV, and Win95 support
  20. #ifndef RC_INVOKED
  21. #include <pshpack8.h>
  22. #endif // RC_INVOKED
  24. //  Definition of the OLE Automation APIs, and macros.
  26. #ifdef _OLEAUT32_
  27. #define WINOLEAUTAPI        STDAPI
  28. #define WINOLEAUTAPI_(type) STDAPI_(type)
  29. #else
  30. #define WINOLEAUTAPI        EXTERN_C DECLSPEC_IMPORT HRESULT STDAPICALLTYPE
  31. #define WINOLEAUTAPI_(type) EXTERN_C DECLSPEC_IMPORT type STDAPICALLTYPE
  32. #endif
  34. EXTERN_C const IID IID_StdOle;
  36. #define STDOLE_MAJORVERNUM  0x1
  37. #define STDOLE_MINORVERNUM  0x0
  38. #define STDOLE_LCID         0x0000
  40. // Version # of stdole2.tlb
  41. #define STDOLE2_MAJORVERNUM 0x2
  42. #define STDOLE2_MINORVERNUM 0x0
  43. #define STDOLE2_LCID        0x0000
  45. /* if not already picked up from olenls.h */
  46. #ifndef _LCID_DEFINED
  47. typedef DWORD LCID;
  48. # define _LCID_DEFINED
  49. #endif
  51. #ifndef BEGIN_INTERFACE
  52. #define BEGIN_INTERFACE
  53. #define END_INTERFACE
  54. #endif
  56. /* pull in the MIDL generated header */
  57. #include <oaidl.h>
  60. /*---------------------------------------------------------------------*/
  61. /*                            BSTR API                                 */
  62. /*---------------------------------------------------------------------*/
  64. WINOLEAUTAPI_(BSTR) SysAllocString(const OLECHAR *);
  65. WINOLEAUTAPI_(INT)  SysReAllocString(BSTR *, const OLECHAR *);
  66. WINOLEAUTAPI_(BSTR) SysAllocStringLen(const OLECHAR *, UINT);
  67. WINOLEAUTAPI_(INT)  SysReAllocStringLen(BSTR *, const OLECHAR *, UINT);
  68. WINOLEAUTAPI_(void) SysFreeString(BSTR);
  69. WINOLEAUTAPI_(UINT) SysStringLen(BSTR);
  71. #if (defined (_WIN32) || defined (_WIN64))
  72. WINOLEAUTAPI_(UINT) SysStringByteLen(BSTR bstr);
  73. WINOLEAUTAPI_(BSTR) SysAllocStringByteLen(LPCSTR psz, UINT len);
  74. #endif
  76. /*---------------------------------------------------------------------*/
  77. /*                            Time API                                 */
  78. /*---------------------------------------------------------------------*/
  80. WINOLEAUTAPI_(INT) DosDateTimeToVariantTime(USHORT wDosDate, USHORT wDosTime, DOUBLE * pvtime);
  82. WINOLEAUTAPI_(INT) VariantTimeToDosDateTime(DOUBLE vtime, USHORT * pwDosDate, USHORT * pwDosTime);
  84. #if (defined (_WIN32) || defined (_WIN64))
  85. WINOLEAUTAPI_(INT) SystemTimeToVariantTime(LPSYSTEMTIME lpSystemTime, DOUBLE *pvtime);
  86. WINOLEAUTAPI_(INT) VariantTimeToSystemTime(DOUBLE vtime, LPSYSTEMTIME lpSystemTime);
  87. #endif
  90. /*---------------------------------------------------------------------*/
  91. /*                          SafeArray API                              */
  92. /*---------------------------------------------------------------------*/
  94. WINOLEAUTAPI SafeArrayAllocDescriptor(UINT cDims, SAFEARRAY ** ppsaOut);
  95. WINOLEAUTAPI SafeArrayAllocDescriptorEx(VARTYPE vt, UINT cDims, SAFEARRAY ** ppsaOut);
  96. WINOLEAUTAPI SafeArrayAllocData(SAFEARRAY * psa);
  97. WINOLEAUTAPI_(SAFEARRAY *) SafeArrayCreate(VARTYPE vt, UINT cDims, SAFEARRAYBOUND * rgsabound);
  98. WINOLEAUTAPI_(SAFEARRAY *) SafeArrayCreateEx(VARTYPE vt, UINT cDims, SAFEARRAYBOUND * rgsabound, PVOID pvExtra);
  99. WINOLEAUTAPI SafeArrayCopyData(SAFEARRAY *psaSource, SAFEARRAY *psaTarget);
  100. WINOLEAUTAPI SafeArrayDestroyDescriptor(SAFEARRAY * psa);
  101. WINOLEAUTAPI SafeArrayDestroyData(SAFEARRAY * psa);
  102. WINOLEAUTAPI SafeArrayDestroy(SAFEARRAY * psa);
  103. WINOLEAUTAPI SafeArrayRedim(SAFEARRAY * psa, SAFEARRAYBOUND * psaboundNew);
  104. WINOLEAUTAPI_(UINT) SafeArrayGetDim(SAFEARRAY * psa);
  105. WINOLEAUTAPI_(UINT) SafeArrayGetElemsize(SAFEARRAY * psa);
  106. WINOLEAUTAPI SafeArrayGetUBound(SAFEARRAY * psa, UINT nDim, LONG * plUbound);
  107. WINOLEAUTAPI SafeArrayGetLBound(SAFEARRAY * psa, UINT nDim, LONG * plLbound);
  108. WINOLEAUTAPI SafeArrayLock(SAFEARRAY * psa);
  109. WINOLEAUTAPI SafeArrayUnlock(SAFEARRAY * psa);
  110. WINOLEAUTAPI SafeArrayAccessData(SAFEARRAY * psa, void HUGEP** ppvData);
  111. WINOLEAUTAPI SafeArrayUnaccessData(SAFEARRAY * psa);
  112. WINOLEAUTAPI SafeArrayGetElement(SAFEARRAY * psa, LONG * rgIndices, void * pv);
  113. WINOLEAUTAPI SafeArrayPutElement(SAFEARRAY * psa, LONG * rgIndices, void * pv);
  114. WINOLEAUTAPI SafeArrayCopy(SAFEARRAY * psa, SAFEARRAY ** ppsaOut);
  115. WINOLEAUTAPI SafeArrayPtrOfIndex(SAFEARRAY * psa, LONG * rgIndices, void ** ppvData);
  116. WINOLEAUTAPI SafeArraySetRecordInfo(SAFEARRAY * psa, IRecordInfo * prinfo);
  117. WINOLEAUTAPI SafeArrayGetRecordInfo(SAFEARRAY * psa, IRecordInfo ** prinfo);
  118. WINOLEAUTAPI SafeArraySetIID(SAFEARRAY * psa, REFGUID guid);
  119. WINOLEAUTAPI SafeArrayGetIID(SAFEARRAY * psa, GUID * pguid);
  120. WINOLEAUTAPI SafeArrayGetVartype(SAFEARRAY * psa, VARTYPE * pvt);
  121. WINOLEAUTAPI_(SAFEARRAY *) SafeArrayCreateVector(VARTYPE vt, LONG lLbound, ULONG cElements);
  122. WINOLEAUTAPI_(SAFEARRAY *) SafeArrayCreateVectorEx(VARTYPE vt, LONG lLbound, ULONG cElements, PVOID pvExtra);
  124. /*---------------------------------------------------------------------*/
  125. /*                           VARIANT API                               */
  126. /*---------------------------------------------------------------------*/
  128. WINOLEAUTAPI_(void) VariantInit(VARIANTARG * pvarg);
  129. WINOLEAUTAPI VariantClear(VARIANTARG * pvarg);
  130. WINOLEAUTAPI VariantCopy(VARIANTARG * pvargDest, VARIANTARG * pvargSrc);
  131. WINOLEAUTAPI VariantCopyInd(VARIANT * pvarDest, VARIANTARG * pvargSrc);
  132. WINOLEAUTAPI VariantChangeType(VARIANTARG * pvargDest,
  133.                 VARIANTARG * pvarSrc, USHORT wFlags, VARTYPE vt);
  134. WINOLEAUTAPI VariantChangeTypeEx(VARIANTARG * pvargDest,
  135.                 VARIANTARG * pvarSrc, LCID lcid, USHORT wFlags, VARTYPE vt);
  137. // Flags for VariantChangeType/VariantChangeTypeEx
  138. #define VARIANT_NOVALUEPROP      0x01
  139. #define VARIANT_ALPHABOOL        0x02 // For VT_BOOL to VT_BSTR conversions,
  140.                                       // convert to "True"/"False" instead of
  141.                                       // "-1"/"0"
  142. #define VARIANT_NOUSEROVERRIDE   0x04 // For conversions to/from VT_BSTR,
  143.       // passes LOCALE_NOUSEROVERRIDE
  144.       // to core coercion routines
  145. #define VARIANT_CALENDAR_HIJRI   0x08
  146. #define VARIANT_LOCALBOOL        0x10 // For VT_BOOL to VT_BSTR and back,
  147.                                       // convert to local language rather than
  148.                                       // English
  149. #define VARIANT_CALENDAR_THAI 0x20  // SOUTHASIA calendar support
  150. #define VARIANT_CALENDAR_GREGORIAN 0x40  // SOUTHASIA calendar support
  151. #define VARIANT_USE_NLS                 0x80  // NLS function call support
  152. /*---------------------------------------------------------------------*/
  153. /*                Vector <-> Bstr conversion APIs                      */
  154. /*---------------------------------------------------------------------*/
  156. WINOLEAUTAPI VectorFromBstr (BSTR bstr, SAFEARRAY ** ppsa);
  157. WINOLEAUTAPI BstrFromVector (SAFEARRAY *psa, BSTR *pbstr);
  159. /*---------------------------------------------------------------------*/
  160. /*                     Variant API Flags                               */
  161. /*---------------------------------------------------------------------*/
  163. /* Any of the coersion functions that converts either from or to a string
  164.  * takes an additional lcid and dwFlags arguments. The lcid argument allows
  165.  * locale specific parsing to occur.  The dwFlags allow additional function
  166.  * specific condition to occur.  All function that accept the dwFlags argument
  167.  * can include either 0 or LOCALE_NOUSEROVERRIDE flag.
  168.  */
  170. /* The VarDateFromStr and VarBstrFromDate functions also accept the
  171.  * VAR_TIMEVALUEONLY and VAR_DATEVALUEONLY flags
  172.  */
  173. #define VAR_TIMEVALUEONLY       ((DWORD)0x00000001)    /* return time value */
  174. #define VAR_DATEVALUEONLY       ((DWORD)0x00000002)    /* return date value */
  176. /* VarDateFromUdate() only */
  177. #define VAR_VALIDDATE           ((DWORD)0x00000004)
  179. /* Accepted by all date & format APIs */
  180. #define VAR_CALENDAR_HIJRI      ((DWORD)0x00000008)    /* use Hijri calender */
  182. /* Booleans can optionally be accepted in localized form. Pass VAR_LOCALBOOL
  183.  * into VarBoolFromStr and VarBstrFromBool to use localized boolean names
  184.  */
  185. #define VAR_LOCALBOOL           ((DWORD)0x00000010)
  187. /* When passed into VarFormat and VarFormatFromTokens, prevents substitution
  188.  * of formats in the case where a string is passed in that can not be
  189.  * coverted into the desired type. (for ex, 'Format("Hello", "General Number")')
  190.  */
  191. #define VAR_FORMAT_NOSUBSTITUTE ((DWORD)0x00000020)
  193. /*
  194.  * For VarBstrFromDate only - forces years to be 4 digits rather than shortening
  195.  * to 2-digits when the years is in the date window.
  196.  */
  197. #define VAR_FOURDIGITYEARS ((DWORD)0x00000040)
  199. /*
  200.  * Use NLS functions to format date, currency, time, and number.
  201.  */
  202. #ifndef LOCALE_USE_NLS
  203. #define LOCALE_USE_NLS 0x10000000
  204. #endif
  206. // SOUTHASIA START
  207. /* SOUTHASIA 
  208.  * For VarBstrFromDate only - forces years to be 4 digits rather than shortening
  209.  * to 2-digits when the years is in the date window.
  210.  */
  211. #define VAR_CALENDAR_THAI    ((DWORD)0x00000080)
  212. #define VAR_CALENDAR_GREGORIAN ((DWORD)0x00000100)
  213. //SOUTHASIA END
  215. #define VTDATEGRE_MAX 2958465   /* Dec 31, 9999, 0:0:0 in Gregorain Calendar */
  216. #define VTDATEGRE_MIN -657434   /* Jan  1,  100, 0:0:0 in Gregorain Calendar */
  217. /*---------------------------------------------------------------------*/
  218. /*                     VARTYPE Coercion API                            */
  219. /*---------------------------------------------------------------------*/
  221. /* Note: The routines that convert *from* a string are defined
  222.  * to take a OLECHAR* rather than a BSTR because no allocation is
  223.  * required, and this makes the routines a bit more generic.
  224.  * They may of course still be passed a BSTR as the strIn param.
  225.  */
  227. WINOLEAUTAPI VarUI1FromI2(SHORT sIn, BYTE * pbOut);
  228. WINOLEAUTAPI VarUI1FromI4(LONG lIn, BYTE * pbOut);
  229. WINOLEAUTAPI VarUI1FromI8(LONG64 i64In, BYTE FAR* pbOut);
  230. WINOLEAUTAPI VarUI1FromR4(FLOAT fltIn, BYTE * pbOut);
  231. WINOLEAUTAPI VarUI1FromR8(DOUBLE dblIn, BYTE * pbOut);
  232. WINOLEAUTAPI VarUI1FromCy(CY cyIn, BYTE * pbOut);
  233. WINOLEAUTAPI VarUI1FromDate(DATE dateIn, BYTE * pbOut);
  234. WINOLEAUTAPI VarUI1FromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, BYTE * pbOut);
  235. WINOLEAUTAPI VarUI1FromDisp(IDispatch * pdispIn, LCID lcid, BYTE * pbOut);
  236. WINOLEAUTAPI VarUI1FromBool(VARIANT_BOOL boolIn, BYTE * pbOut);
  237. WINOLEAUTAPI VarUI1FromI1(CHAR cIn, BYTE *pbOut);
  238. WINOLEAUTAPI VarUI1FromUI2(USHORT uiIn, BYTE *pbOut);
  239. WINOLEAUTAPI VarUI1FromUI4(ULONG ulIn, BYTE *pbOut);
  240. WINOLEAUTAPI VarUI1FromUI8(ULONG64 ui64In, BYTE FAR* pbOut);
  241. WINOLEAUTAPI VarUI1FromDec(DECIMAL *pdecIn, BYTE *pbOut);
  243. WINOLEAUTAPI VarI2FromUI1(BYTE bIn, SHORT * psOut);
  244. WINOLEAUTAPI VarI2FromI4(LONG lIn, SHORT * psOut);
  245. WINOLEAUTAPI VarI2FromI8(LONG64 i64In, SHORT FAR* psOut);
  246. WINOLEAUTAPI VarI2FromR4(FLOAT fltIn, SHORT * psOut);
  247. WINOLEAUTAPI VarI2FromR8(DOUBLE dblIn, SHORT * psOut);
  248. WINOLEAUTAPI VarI2FromCy(CY cyIn, SHORT * psOut);
  249. WINOLEAUTAPI VarI2FromDate(DATE dateIn, SHORT * psOut);
  250. WINOLEAUTAPI VarI2FromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, SHORT * psOut);
  251. WINOLEAUTAPI VarI2FromDisp(IDispatch * pdispIn, LCID lcid, SHORT * psOut);
  252. WINOLEAUTAPI VarI2FromBool(VARIANT_BOOL boolIn, SHORT * psOut);
  253. WINOLEAUTAPI VarI2FromI1(CHAR cIn, SHORT *psOut);
  254. WINOLEAUTAPI VarI2FromUI2(USHORT uiIn, SHORT *psOut);
  255. WINOLEAUTAPI VarI2FromUI4(ULONG ulIn, SHORT *psOut);
  256. WINOLEAUTAPI VarI2FromUI8(ULONG64 ui64In, SHORT FAR* psOut);
  257. WINOLEAUTAPI VarI2FromDec(DECIMAL *pdecIn, SHORT *psOut);
  259. WINOLEAUTAPI VarI4FromUI1(BYTE bIn, LONG * plOut);
  260. WINOLEAUTAPI VarI4FromI2(SHORT sIn, LONG * plOut);
  261. WINOLEAUTAPI VarI4FromI8(LONG64 i64In, LONG FAR* plOut);
  262. WINOLEAUTAPI VarI4FromR4(FLOAT fltIn, LONG * plOut);
  263. WINOLEAUTAPI VarI4FromR8(DOUBLE dblIn, LONG * plOut);
  264. WINOLEAUTAPI VarI4FromCy(CY cyIn, LONG * plOut);
  265. WINOLEAUTAPI VarI4FromDate(DATE dateIn, LONG * plOut);
  266. WINOLEAUTAPI VarI4FromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, LONG * plOut);
  267. WINOLEAUTAPI VarI4FromDisp(IDispatch * pdispIn, LCID lcid, LONG * plOut);
  268. WINOLEAUTAPI VarI4FromBool(VARIANT_BOOL boolIn, LONG * plOut);
  269. WINOLEAUTAPI VarI4FromI1(CHAR cIn, LONG *plOut);
  270. WINOLEAUTAPI VarI4FromUI2(USHORT uiIn, LONG *plOut);
  271. WINOLEAUTAPI VarI4FromUI4(ULONG ulIn, LONG *plOut);
  272. WINOLEAUTAPI VarI4FromUI8(ULONG64 ui64In, LONG FAR* plOut);
  273. WINOLEAUTAPI VarI4FromDec(DECIMAL *pdecIn, LONG *plOut);
  274. WINOLEAUTAPI VarI4FromInt(INT intIn, LONG *plOut);
  276. /******************************************/
  278. WINOLEAUTAPI VarI8FromUI1(BYTE bIn, LONG64 FAR* pi64Out);
  279. WINOLEAUTAPI VarI8FromI2(SHORT sIn, LONG64 FAR* pi64Out);
  280. WINOLEAUTAPI VarI8FromI4(LONG lIn, LONG64 FAR* pi64Out);
  281. WINOLEAUTAPI VarI8FromR4(FLOAT fltIn, LONG64 FAR* pi64Out);
  282. WINOLEAUTAPI VarI8FromR8(DOUBLE dblIn, LONG64 FAR* pi64Out);
  283. WINOLEAUTAPI VarI8FromCy(CY cyIn, LONG64 FAR* pi64Out);
  284. WINOLEAUTAPI VarI8FromDate(DATE dateIn, LONG64 FAR* pi64Out);
  285. WINOLEAUTAPI VarI8FromStr(OLECHAR FAR* strIn, LCID lcid, unsigned long dwFlags, LONG64 FAR* pi64Out);
  286. WINOLEAUTAPI VarI8FromDisp(IDispatch FAR* pdispIn, LCID lcid, LONG64 FAR* pi64Out);
  287. WINOLEAUTAPI VarI8FromBool(VARIANT_BOOL boolIn, LONG64 FAR* pi64Out);
  288. WINOLEAUTAPI VarI8FromI1(CHAR cIn, LONG64 FAR* pi64Out);
  289. WINOLEAUTAPI VarI8FromUI2(USHORT uiIn, LONG64 FAR* pi64Out);
  290. WINOLEAUTAPI VarI8FromUI4(ULONG ulIn, LONG64 FAR* pi64Out);
  291. WINOLEAUTAPI VarI8FromUI8(ULONG64 ui64In, LONG64 FAR* pi64Out);
  292. WINOLEAUTAPI VarI8FromDec(DECIMAL *pdecIn, LONG64 FAR* pi64Out);
  293. WINOLEAUTAPI VarI8FromInt(INT intIn, LONG64 FAR* pi64Out);
  295. /*********************/
  299. WINOLEAUTAPI VarR4FromUI1(BYTE bIn, FLOAT * pfltOut);
  300. WINOLEAUTAPI VarR4FromI2(SHORT sIn, FLOAT * pfltOut);
  301. WINOLEAUTAPI VarR4FromI4(LONG lIn, FLOAT * pfltOut);
  302. WINOLEAUTAPI VarR4FromI8(LONG64 i64In, FLOAT FAR* pfltOut);
  303. WINOLEAUTAPI VarR4FromR8(DOUBLE dblIn, FLOAT * pfltOut);
  304. WINOLEAUTAPI VarR4FromCy(CY cyIn, FLOAT * pfltOut);
  305. WINOLEAUTAPI VarR4FromDate(DATE dateIn, FLOAT * pfltOut);
  306. WINOLEAUTAPI VarR4FromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, FLOAT *pfltOut);
  307. WINOLEAUTAPI VarR4FromDisp(IDispatch * pdispIn, LCID lcid, FLOAT * pfltOut);
  308. WINOLEAUTAPI VarR4FromBool(VARIANT_BOOL boolIn, FLOAT * pfltOut);
  309. WINOLEAUTAPI VarR4FromI1(CHAR cIn, FLOAT *pfltOut);
  310. WINOLEAUTAPI VarR4FromUI2(USHORT uiIn, FLOAT *pfltOut);
  311. WINOLEAUTAPI VarR4FromUI4(ULONG ulIn, FLOAT *pfltOut);
  312. WINOLEAUTAPI VarR4FromUI8(ULONG64 ui64In, FLOAT FAR* pfltOut);
  313. WINOLEAUTAPI VarR4FromDec(DECIMAL *pdecIn, FLOAT *pfltOut);
  315. WINOLEAUTAPI VarR8FromUI1(BYTE bIn, DOUBLE * pdblOut);
  316. WINOLEAUTAPI VarR8FromI2(SHORT sIn, DOUBLE * pdblOut);
  317. WINOLEAUTAPI VarR8FromI4(LONG lIn, DOUBLE * pdblOut);
  318. WINOLEAUTAPI VarR8FromI8(LONG64 i64In, DOUBLE FAR* pdblOut);
  319. WINOLEAUTAPI VarR8FromR4(FLOAT fltIn, DOUBLE * pdblOut);
  320. WINOLEAUTAPI VarR8FromCy(CY cyIn, DOUBLE * pdblOut);
  321. WINOLEAUTAPI VarR8FromDate(DATE dateIn, DOUBLE * pdblOut);
  322. WINOLEAUTAPI VarR8FromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, DOUBLE *pdblOut);
  323. WINOLEAUTAPI VarR8FromDisp(IDispatch * pdispIn, LCID lcid, DOUBLE * pdblOut);
  324. WINOLEAUTAPI VarR8FromBool(VARIANT_BOOL boolIn, DOUBLE * pdblOut);
  325. WINOLEAUTAPI VarR8FromI1(CHAR cIn, DOUBLE *pdblOut);
  326. WINOLEAUTAPI VarR8FromUI2(USHORT uiIn, DOUBLE *pdblOut);
  327. WINOLEAUTAPI VarR8FromUI4(ULONG ulIn, DOUBLE *pdblOut);
  328. WINOLEAUTAPI VarR8FromUI8(ULONG64 ui64In, DOUBLE FAR* pdblOut);
  329. WINOLEAUTAPI VarR8FromDec(DECIMAL *pdecIn, DOUBLE *pdblOut);
  331. WINOLEAUTAPI VarDateFromUI1(BYTE bIn, DATE * pdateOut);
  332. WINOLEAUTAPI VarDateFromI2(SHORT sIn, DATE * pdateOut);
  333. WINOLEAUTAPI VarDateFromI4(LONG lIn, DATE * pdateOut);
  334. WINOLEAUTAPI VarDateFromI8(LONG64 i64In, DATE FAR* pdateOut);
  335. WINOLEAUTAPI VarDateFromR4(FLOAT fltIn, DATE * pdateOut);
  336. WINOLEAUTAPI VarDateFromR8(DOUBLE dblIn, DATE * pdateOut);
  337. WINOLEAUTAPI VarDateFromCy(CY cyIn, DATE * pdateOut);
  338. WINOLEAUTAPI VarDateFromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, DATE *pdateOut);
  339. WINOLEAUTAPI VarDateFromDisp(IDispatch * pdispIn, LCID lcid, DATE * pdateOut);
  340. WINOLEAUTAPI VarDateFromBool(VARIANT_BOOL boolIn, DATE * pdateOut);
  341. WINOLEAUTAPI VarDateFromI1(CHAR cIn, DATE *pdateOut);
  342. WINOLEAUTAPI VarDateFromUI2(USHORT uiIn, DATE *pdateOut);
  343. WINOLEAUTAPI VarDateFromUI4(ULONG ulIn, DATE *pdateOut);
  344. WINOLEAUTAPI VarDateFromUI8(ULONG64 ui64In, DATE FAR* pdateOut);
  345. WINOLEAUTAPI VarDateFromDec(DECIMAL *pdecIn, DATE *pdateOut);
  347. WINOLEAUTAPI VarCyFromUI1(BYTE bIn, CY * pcyOut);
  348. WINOLEAUTAPI VarCyFromI2(SHORT sIn, CY * pcyOut);
  349. WINOLEAUTAPI VarCyFromI4(LONG lIn, CY * pcyOut);
  350. WINOLEAUTAPI VarCyFromI8(LONG64 i64In, CY FAR* pcyOut);
  351. WINOLEAUTAPI VarCyFromR4(FLOAT fltIn, CY * pcyOut);
  352. WINOLEAUTAPI VarCyFromR8(DOUBLE dblIn, CY * pcyOut);
  353. WINOLEAUTAPI VarCyFromDate(DATE dateIn, CY * pcyOut);
  354. WINOLEAUTAPI VarCyFromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, CY * pcyOut);
  355. WINOLEAUTAPI VarCyFromDisp(IDispatch * pdispIn, LCID lcid, CY * pcyOut);
  356. WINOLEAUTAPI VarCyFromBool(VARIANT_BOOL boolIn, CY * pcyOut);
  357. WINOLEAUTAPI VarCyFromI1(CHAR cIn, CY *pcyOut);
  358. WINOLEAUTAPI VarCyFromUI2(USHORT uiIn, CY *pcyOut);
  359. WINOLEAUTAPI VarCyFromUI4(ULONG ulIn, CY *pcyOut);
  360. WINOLEAUTAPI VarCyFromUI8(ULONG64 ui64In, CY FAR* pcyOut);
  361. WINOLEAUTAPI VarCyFromDec(DECIMAL *pdecIn, CY *pcyOut);
  363. WINOLEAUTAPI VarBstrFromUI1(BYTE bVal, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  364. WINOLEAUTAPI VarBstrFromI2(SHORT iVal, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  365. WINOLEAUTAPI VarBstrFromI4(LONG lIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  366. WINOLEAUTAPI VarBstrFromI8(LONG64 i64In, LCID lcid, unsigned long dwFlags, BSTR FAR* pbstrOut);
  367. WINOLEAUTAPI VarBstrFromR4(FLOAT fltIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  368. WINOLEAUTAPI VarBstrFromR8(DOUBLE dblIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  369. WINOLEAUTAPI VarBstrFromCy(CY cyIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  370. WINOLEAUTAPI VarBstrFromDate(DATE dateIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  371. WINOLEAUTAPI VarBstrFromDisp(IDispatch * pdispIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  372. WINOLEAUTAPI VarBstrFromBool(VARIANT_BOOL boolIn, LCID lcid, ULONG dwFlags, BSTR * pbstrOut);
  373. WINOLEAUTAPI VarBstrFromI1(CHAR cIn, LCID lcid, ULONG dwFlags, BSTR *pbstrOut);
  374. WINOLEAUTAPI VarBstrFromUI2(USHORT uiIn, LCID lcid, ULONG dwFlags, BSTR *pbstrOut);
  375. WINOLEAUTAPI VarBstrFromUI4(ULONG ulIn, LCID lcid, ULONG dwFlags, BSTR *pbstrOut);
  376. WINOLEAUTAPI VarBstrFromUI8(ULONG64 ui64In, LCID lcid, unsigned long dwFlags, BSTR FAR* pbstrOut);
  377. WINOLEAUTAPI VarBstrFromDec(DECIMAL *pdecIn, LCID lcid, ULONG dwFlags, BSTR *pbstrOut);
  379. WINOLEAUTAPI VarBoolFromUI1(BYTE bIn, VARIANT_BOOL * pboolOut);
  380. WINOLEAUTAPI VarBoolFromI2(SHORT sIn, VARIANT_BOOL * pboolOut);
  381. WINOLEAUTAPI VarBoolFromI4(LONG lIn, VARIANT_BOOL * pboolOut);
  382. WINOLEAUTAPI VarBoolFromI8(LONG64 i64In, VARIANT_BOOL FAR* pboolOut);
  383. WINOLEAUTAPI VarBoolFromR4(FLOAT fltIn, VARIANT_BOOL * pboolOut);
  384. WINOLEAUTAPI VarBoolFromR8(DOUBLE dblIn, VARIANT_BOOL * pboolOut);
  385. WINOLEAUTAPI VarBoolFromDate(DATE dateIn, VARIANT_BOOL * pboolOut);
  386. WINOLEAUTAPI VarBoolFromCy(CY cyIn, VARIANT_BOOL * pboolOut);
  387. WINOLEAUTAPI VarBoolFromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags, VARIANT_BOOL * pboolOut);
  388. WINOLEAUTAPI VarBoolFromDisp(IDispatch * pdispIn, LCID lcid, VARIANT_BOOL * pboolOut);
  389. WINOLEAUTAPI VarBoolFromI1(CHAR cIn, VARIANT_BOOL *pboolOut);
  390. WINOLEAUTAPI VarBoolFromUI2(USHORT uiIn, VARIANT_BOOL *pboolOut);
  391. WINOLEAUTAPI VarBoolFromUI4(ULONG ulIn, VARIANT_BOOL *pboolOut);
  392. WINOLEAUTAPI VarBoolFromUI8(ULONG64 i64In, VARIANT_BOOL FAR* pboolOut);
  393. WINOLEAUTAPI VarBoolFromDec(DECIMAL *pdecIn, VARIANT_BOOL *pboolOut);
  395. WINOLEAUTAPI VarI1FromUI1(BYTE bIn, CHAR *pcOut);
  396. WINOLEAUTAPI VarI1FromI2(SHORT uiIn, CHAR *pcOut);
  397. WINOLEAUTAPI VarI1FromI4(LONG lIn, CHAR *pcOut);
  398. WINOLEAUTAPI VarI1FromI8(LONG64 i64In, CHAR *pcOut);
  399. WINOLEAUTAPI VarI1FromR4(FLOAT fltIn, CHAR *pcOut);
  400. WINOLEAUTAPI VarI1FromR8(DOUBLE dblIn, CHAR *pcOut);
  401. WINOLEAUTAPI VarI1FromDate(DATE dateIn, CHAR *pcOut);
  402. WINOLEAUTAPI VarI1FromCy(CY cyIn, CHAR *pcOut);
  403. WINOLEAUTAPI VarI1FromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, CHAR *pcOut);
  404. WINOLEAUTAPI VarI1FromDisp(IDispatch *pdispIn, LCID lcid, CHAR *pcOut);
  405. WINOLEAUTAPI VarI1FromBool(VARIANT_BOOL boolIn, CHAR *pcOut);
  406. WINOLEAUTAPI VarI1FromUI2(USHORT uiIn, CHAR *pcOut);
  407. WINOLEAUTAPI VarI1FromUI4(ULONG ulIn, CHAR *pcOut);
  408. WINOLEAUTAPI VarI1FromUI8(ULONG64 i64In, CHAR *pcOut);
  409. WINOLEAUTAPI VarI1FromDec(DECIMAL *pdecIn, CHAR *pcOut);
  411. WINOLEAUTAPI VarUI2FromUI1(BYTE bIn, USHORT *puiOut);
  412. WINOLEAUTAPI VarUI2FromI2(SHORT uiIn, USHORT *puiOut);
  413. WINOLEAUTAPI VarUI2FromI4(LONG lIn, USHORT *puiOut);
  414. WINOLEAUTAPI VarUI2FromI8(LONG64 i64In, USHORT *puiOut);
  415. WINOLEAUTAPI VarUI2FromR4(FLOAT fltIn, USHORT *puiOut);
  416. WINOLEAUTAPI VarUI2FromR8(DOUBLE dblIn, USHORT *puiOut);
  417. WINOLEAUTAPI VarUI2FromDate(DATE dateIn, USHORT *puiOut);
  418. WINOLEAUTAPI VarUI2FromCy(CY cyIn, USHORT *puiOut);
  419. WINOLEAUTAPI VarUI2FromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, USHORT *puiOut);
  420. WINOLEAUTAPI VarUI2FromDisp(IDispatch *pdispIn, LCID lcid, USHORT *puiOut);
  421. WINOLEAUTAPI VarUI2FromBool(VARIANT_BOOL boolIn, USHORT *puiOut);
  422. WINOLEAUTAPI VarUI2FromI1(CHAR cIn, USHORT *puiOut);
  423. WINOLEAUTAPI VarUI2FromUI4(ULONG ulIn, USHORT *puiOut);
  424. WINOLEAUTAPI VarUI2FromUI8(ULONG64 i64In, USHORT *puiOut);
  425. WINOLEAUTAPI VarUI2FromDec(DECIMAL *pdecIn, USHORT *puiOut);
  427. WINOLEAUTAPI VarUI4FromUI1(BYTE bIn, ULONG *pulOut);
  428. WINOLEAUTAPI VarUI4FromI2(SHORT uiIn, ULONG *pulOut);
  429. WINOLEAUTAPI VarUI4FromI4(LONG lIn, ULONG *pulOut);
  430. WINOLEAUTAPI VarUI4FromI8(LONG64 i64In, ULONG *plOut);
  431. WINOLEAUTAPI VarUI4FromR4(FLOAT fltIn, ULONG *pulOut);
  432. WINOLEAUTAPI VarUI4FromR8(DOUBLE dblIn, ULONG *pulOut);
  433. WINOLEAUTAPI VarUI4FromDate(DATE dateIn, ULONG *pulOut);
  434. WINOLEAUTAPI VarUI4FromCy(CY cyIn, ULONG *pulOut);
  435. WINOLEAUTAPI VarUI4FromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, ULONG *pulOut);
  436. WINOLEAUTAPI VarUI4FromDisp(IDispatch *pdispIn, LCID lcid, ULONG *pulOut);
  437. WINOLEAUTAPI VarUI4FromBool(VARIANT_BOOL boolIn, ULONG *pulOut);
  438. WINOLEAUTAPI VarUI4FromI1(CHAR cIn, ULONG *pulOut);
  439. WINOLEAUTAPI VarUI4FromUI2(USHORT uiIn, ULONG *pulOut);
  440. WINOLEAUTAPI VarUI4FromUI8(ULONG64 ui64In, ULONG *plOut);
  441. WINOLEAUTAPI VarUI4FromDec(DECIMAL *pdecIn, ULONG *pulOut);
  443. /******************************************/
  445. WINOLEAUTAPI VarUI8FromUI1(BYTE bIn, ULONG64 FAR* pi64Out);
  446. WINOLEAUTAPI VarUI8FromI2(SHORT sIn, ULONG64 FAR* pi64Out);
  447. WINOLEAUTAPI VarUI8FromI4(LONG lIn, ULONG64 FAR* pi64Out);
  448. WINOLEAUTAPI VarUI8FromI8(LONG64 ui64In, ULONG64 FAR* pi64Out);
  449. WINOLEAUTAPI VarUI8FromR4(FLOAT fltIn, ULONG64 FAR* pi64Out);
  450. WINOLEAUTAPI VarUI8FromR8(DOUBLE dblIn, ULONG64 FAR* pi64Out);
  451. WINOLEAUTAPI VarUI8FromCy(CY cyIn, ULONG64 FAR* pi64Out);
  452. WINOLEAUTAPI VarUI8FromDate(DATE dateIn, ULONG64 FAR* pi64Out);
  453. WINOLEAUTAPI VarUI8FromStr(OLECHAR FAR* strIn, LCID lcid, unsigned long dwFlags, ULONG64 FAR* pi64Out);
  454. WINOLEAUTAPI VarUI8FromDisp(IDispatch FAR* pdispIn, LCID lcid, ULONG64 FAR* pi64Out);
  455. WINOLEAUTAPI VarUI8FromBool(VARIANT_BOOL boolIn, ULONG64 FAR* pi64Out);
  456. WINOLEAUTAPI VarUI8FromI1(CHAR cIn, ULONG64 FAR* pi64Out);
  457. WINOLEAUTAPI VarUI8FromUI2(USHORT uiIn, ULONG64 FAR* pi64Out);
  458. WINOLEAUTAPI VarUI8FromUI4(ULONG ulIn, ULONG64 FAR* pi64Out);
  459. WINOLEAUTAPI VarUI8FromDec(DECIMAL *pdecIn, ULONG64 FAR* pi64Out);
  460. WINOLEAUTAPI VarUI8FromInt(INT intIn, ULONG64 FAR* pi64Out);
  462. /*********************/
  466. WINOLEAUTAPI VarDecFromUI1(BYTE bIn, DECIMAL *pdecOut);
  467. WINOLEAUTAPI VarDecFromI2(SHORT uiIn, DECIMAL *pdecOut);
  468. WINOLEAUTAPI VarDecFromI4(LONG lIn, DECIMAL *pdecOut);
  469. WINOLEAUTAPI VarDecFromI8(LONG64 i64In, DECIMAL *pdecOut);
  470. WINOLEAUTAPI VarDecFromR4(FLOAT fltIn, DECIMAL *pdecOut);
  471. WINOLEAUTAPI VarDecFromR8(DOUBLE dblIn, DECIMAL *pdecOut);
  472. WINOLEAUTAPI VarDecFromDate(DATE dateIn, DECIMAL *pdecOut);
  473. WINOLEAUTAPI VarDecFromCy(CY cyIn, DECIMAL *pdecOut);
  474. WINOLEAUTAPI VarDecFromStr(OLECHAR *strIn, LCID lcid, ULONG dwFlags, DECIMAL *pdecOut);
  475. WINOLEAUTAPI VarDecFromDisp(IDispatch *pdispIn, LCID lcid, DECIMAL *pdecOut);
  476. WINOLEAUTAPI VarDecFromBool(VARIANT_BOOL boolIn, DECIMAL *pdecOut);
  477. WINOLEAUTAPI VarDecFromI1(CHAR cIn, DECIMAL *pdecOut);
  478. WINOLEAUTAPI VarDecFromUI2(USHORT uiIn, DECIMAL *pdecOut);
  479. WINOLEAUTAPI VarDecFromUI4(ULONG ulIn, DECIMAL *pdecOut);
  480. WINOLEAUTAPI VarDecFromUI8(ULONG64 ui64In, DECIMAL *pdecOut);
  482. #define VarUI4FromUI4(in, pOut) (*(pOut) = (in))
  483. #define VarI4FromI4(in, pOut)   (*(pOut) = (in))
  485. WINOLEAUTAPI VarI4FromI8(LONG64 i64In, LONG *plOut);
  486. WINOLEAUTAPI VarI4FromUI8(ULONG64 ui64In, LONG *plOut);
  488. #define VarUI8FromUI8(in, pOut) (*(pOut) = (in))
  489. #define VarI8FromI8(in, pOut)   (*(pOut) = (in))
  492. #define VarUI1FromInt       VarUI1FromI4
  493. #define VarUI1FromUint      VarUI1FromUI4
  494. #define VarI2FromInt        VarI2FromI4
  495. #define VarI2FromUint       VarI2FromUI4
  496. #define VarI4FromInt        VarI4FromI4
  497. #define VarI4FromUint       VarI4FromUI4
  498. #define VarI8FromInt        VarI8FromI4
  499. #define VarI8FromUint       VarI8FromUI4
  500. #define VarR4FromInt        VarR4FromI4
  501. #define VarR4FromUint       VarR4FromUI4
  502. #define VarR8FromInt        VarR8FromI4
  503. #define VarR8FromUint       VarR8FromUI4
  504. #define VarDateFromInt      VarDateFromI4
  505. #define VarDateFromUint     VarDateFromUI4
  506. #define VarCyFromInt        VarCyFromI4
  507. #define VarCyFromUint       VarCyFromUI4
  508. #define VarBstrFromInt      VarBstrFromI4
  509. #define VarBstrFromUint     VarBstrFromUI4
  510. #define VarBoolFromInt      VarBoolFromI4
  511. #define VarBoolFromUint     VarBoolFromUI4
  512. #define VarI1FromInt        VarI1FromI4
  513. #define VarI1FromUint       VarI1FromUI4
  514. #define VarUI2FromInt       VarUI2FromI4
  515. #define VarUI2FromUint      VarUI2FromUI4
  516. #define VarUI4FromInt       VarUI4FromI4
  517. #define VarUI4FromUint      VarUI4FromUI4
  518. #define VarDecFromInt       VarDecFromI4
  519. #define VarDecFromUint      VarDecFromUI4
  520. #define VarIntFromUI1       VarI4FromUI1
  521. #define VarIntFromI2        VarI4FromI2
  522. #define VarIntFromI4        VarI4FromI4
  523. #define VarIntFromI8        VarI4FromI8
  524. #define VarIntFromR4        VarI4FromR4
  525. #define VarIntFromR8        VarI4FromR8
  526. #define VarIntFromDate      VarI4FromDate
  527. #define VarIntFromCy        VarI4FromCy
  528. #define VarIntFromStr       VarI4FromStr
  529. #define VarIntFromDisp      VarI4FromDisp
  530. #define VarIntFromBool      VarI4FromBool
  531. #define VarIntFromI1        VarI4FromI1
  532. #define VarIntFromUI2       VarI4FromUI2
  533. #define VarIntFromUI4       VarI4FromUI4
  534. #define VarIntFromUI8       VarI4FromUI8
  535. #define VarIntFromDec       VarI4FromDec
  536. #define VarIntFromUint      VarI4FromUI4
  537. #define VarUintFromUI1      VarUI4FromUI1
  538. #define VarUintFromI2       VarUI4FromI2
  539. #define VarUintFromI4       VarUI4FromI4
  540. #define VarUintFromI8       VarUI4FromI8
  541. #define VarUintFromR4       VarUI4FromR4
  542. #define VarUintFromR8       VarUI4FromR8
  543. #define VarUintFromDate     VarUI4FromDate
  544. #define VarUintFromCy       VarUI4FromCy
  545. #define VarUintFromStr      VarUI4FromStr
  546. #define VarUintFromDisp     VarUI4FromDisp
  547. #define VarUintFromBool     VarUI4FromBool
  548. #define VarUintFromI1       VarUI4FromI1
  549. #define VarUintFromUI2      VarUI4FromUI2
  550. #define VarUintFromUI4      VarUI4FromUI4
  551. #define VarUintFromUI8      VarUI4FromUI8
  552. #define VarUintFromDec      VarUI4FromDec
  553. #define VarUintFromInt      VarUI4FromI4
  555. /* Mac Note: On the Mac, the coersion functions support the
  556.  * Symantec C++ calling convention for float/double. To support
  557.  * float/double arguments compiled with the MPW C compiler,
  558.  * use the following APIs to move MPW float/double values into
  559.  * a VARIANT.
  560.  */
  562. /*---------------------------------------------------------------------*/
  563. /*            New VARIANT <-> string parsing functions                 */
  564. /*---------------------------------------------------------------------*/
  566. typedef struct {
  567.     INT   cDig;
  568.     ULONG dwInFlags;
  569.     ULONG dwOutFlags;
  570.     INT   cchUsed;
  571.     INT   nBaseShift;
  572.     INT   nPwr10;
  573. } NUMPARSE;
  575. /* flags used by both dwInFlags and dwOutFlags:
  576.  */
  577. #define NUMPRS_LEADING_WHITE    0x0001
  578. #define NUMPRS_TRAILING_WHITE   0x0002
  579. #define NUMPRS_LEADING_PLUS     0x0004
  580. #define NUMPRS_TRAILING_PLUS    0x0008
  581. #define NUMPRS_LEADING_MINUS    0x0010
  582. #define NUMPRS_TRAILING_MINUS   0x0020
  583. #define NUMPRS_HEX_OCT          0x0040
  584. #define NUMPRS_PARENS           0x0080
  585. #define NUMPRS_DECIMAL          0x0100
  586. #define NUMPRS_THOUSANDS        0x0200
  587. #define NUMPRS_CURRENCY         0x0400
  588. #define NUMPRS_EXPONENT         0x0800
  589. #define NUMPRS_USE_ALL          0x1000
  590. #define NUMPRS_STD              0x1FFF
  592. /* flags used by dwOutFlags only:
  593.  */
  594. #define NUMPRS_NEG              0x10000
  595. #define NUMPRS_INEXACT          0x20000
  597. /* flags used by VarNumFromParseNum to indicate acceptable result types:
  598.  */
  599. #define VTBIT_I1        (1 << VT_I1)
  600. #define VTBIT_UI1       (1 << VT_UI1)
  601. #define VTBIT_I2        (1 << VT_I2)
  602. #define VTBIT_UI2       (1 << VT_UI2)
  603. #define VTBIT_I4        (1 << VT_I4)
  604. #define VTBIT_UI4       (1 << VT_UI4)
  605. #define VTBIT_I8 (1 << VT_I8)
  606. #define VTBIT_UI8 (1 << VT_UI8)
  607. #define VTBIT_R4        (1 << VT_R4)
  608. #define VTBIT_R8        (1 << VT_R8)
  609. #define VTBIT_CY        (1 << VT_CY)
  610. #define VTBIT_DECIMAL   (1 << VT_DECIMAL)
  613. WINOLEAUTAPI VarParseNumFromStr(OLECHAR * strIn, LCID lcid, ULONG dwFlags,
  614.             NUMPARSE * pnumprs, BYTE * rgbDig);
  616. WINOLEAUTAPI VarNumFromParseNum(NUMPARSE * pnumprs, BYTE * rgbDig,
  617.             ULONG dwVtBits, VARIANT * pvar);
  619. /*---------------------------------------------------------------------*/
  620. /*                     VARTYPE Math API                                */
  621. /*---------------------------------------------------------------------*/
  623. STDAPI VarAdd(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  624. STDAPI VarAnd(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  625. STDAPI VarCat(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  626. STDAPI VarDiv(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  627. STDAPI VarEqv(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  628. STDAPI VarIdiv(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  629. STDAPI VarImp(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  630. STDAPI VarMod(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  631. STDAPI VarMul(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  632. STDAPI VarOr(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  633. STDAPI VarPow(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  634. STDAPI VarSub(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  635. STDAPI VarXor(LPVARIANT pvarLeft, LPVARIANT pvarRight, LPVARIANT pvarResult);
  637. STDAPI VarAbs(LPVARIANT pvarIn, LPVARIANT pvarResult);
  638. STDAPI VarFix(LPVARIANT pvarIn, LPVARIANT pvarResult);
  639. STDAPI VarInt(LPVARIANT pvarIn, LPVARIANT pvarResult);
  640. STDAPI VarNeg(LPVARIANT pvarIn, LPVARIANT pvarResult);
  641. STDAPI VarNot(LPVARIANT pvarIn, LPVARIANT pvarResult);
  643. STDAPI VarRound(LPVARIANT pvarIn, int cDecimals, LPVARIANT pvarResult);
  645. // dwFlags passed to CompareString if a string compare
  646. STDAPI VarCmp(LPVARIANT pvarLeft, LPVARIANT pvarRight, LCID lcid, ULONG dwFlags);
  648. #ifdef __cplusplus
  649. extern "C++" {
  650. // Add wrapper for old ATL headers to call
  651. __inline
  652. HRESULT
  653. STDAPICALLTYPE
  654. VarCmp(LPVARIANT pvarLeft, LPVARIANT pvarRight, LCID lcid) {
  655.     return VarCmp(pvarLeft, pvarRight, lcid, 0);
  656. }
  657. } // extern "C++"
  658. #endif
  661. // Decimal math
  662. //
  663. STDAPI VarDecAdd(LPDECIMAL pdecLeft, LPDECIMAL pdecRight, LPDECIMAL pdecResult);
  664. STDAPI VarDecDiv(LPDECIMAL pdecLeft, LPDECIMAL pdecRight, LPDECIMAL pdecResult);
  665. STDAPI VarDecMul(LPDECIMAL pdecLeft, LPDECIMAL pdecRight, LPDECIMAL pdecResult);
  666. STDAPI VarDecSub(LPDECIMAL pdecLeft, LPDECIMAL pdecRight, LPDECIMAL pdecResult);
  668. STDAPI VarDecAbs(LPDECIMAL pdecIn, LPDECIMAL pdecResult);
  669. STDAPI VarDecFix(LPDECIMAL pdecIn, LPDECIMAL pdecResult);
  670. STDAPI VarDecInt(LPDECIMAL pdecIn, LPDECIMAL pdecResult);
  671. STDAPI VarDecNeg(LPDECIMAL pdecIn, LPDECIMAL pdecResult);
  673. STDAPI VarDecRound(LPDECIMAL pdecIn, int cDecimals, LPDECIMAL pdecResult);
  675. STDAPI VarDecCmp(LPDECIMAL pdecLeft, LPDECIMAL pdecRight);
  676. STDAPI VarDecCmpR8(LPDECIMAL pdecLeft, double dblRight);
  679. // Currency math
  680. //
  681. STDAPI VarCyAdd(CY cyLeft, CY cyRight, LPCY pcyResult);
  682. STDAPI VarCyMul(CY cyLeft, CY cyRight, LPCY pcyResult);
  683. STDAPI VarCyMulI4(CY cyLeft, long lRight, LPCY pcyResult);
  684. STDAPI VarCyMulI8(CY cyLeft, LONG64 lRight, LPCY pcyResult);
  685. STDAPI VarCySub(CY cyLeft, CY cyRight, LPCY pcyResult);
  687. STDAPI VarCyAbs(CY cyIn, LPCY pcyResult);
  688. STDAPI VarCyFix(CY cyIn, LPCY pcyResult);
  689. STDAPI VarCyInt(CY cyIn, LPCY pcyResult);
  690. STDAPI VarCyNeg(CY cyIn, LPCY pcyResult);
  692. STDAPI VarCyRound(CY cyIn, int cDecimals, LPCY pcyResult);
  694. STDAPI VarCyCmp(CY cyLeft, CY cyRight);
  695. STDAPI VarCyCmpR8(CY cyLeft, double dblRight);
  698. // Misc support functions
  699. //
  700. STDAPI VarBstrCat(BSTR bstrLeft, BSTR bstrRight, LPBSTR pbstrResult);
  701. STDAPI VarBstrCmp(BSTR bstrLeft, BSTR bstrRight, LCID lcid, ULONG dwFlags); // dwFlags passed to CompareString
  702. STDAPI VarR8Pow(double dblLeft, double dblRight, double *pdblResult);
  703. STDAPI VarR4CmpR8(float fltLeft, double dblRight);
  704. STDAPI VarR8Round(double dblIn, int cDecimals, double *pdblResult);
  707. // Compare results.  These are returned as a SUCCESS HResult.  Subtracting
  708. // one gives the usual values of -1 for Less Than, 0 for Equal To, +1 for
  709. // Greater Than.
  710. //
  711. #define VARCMP_LT   0
  712. #define VARCMP_EQ   1
  713. #define VARCMP_GT   2
  714. #define VARCMP_NULL 3
  716. // VT_HARDTYPE tells the compare routine that the argument is a literal or
  717. // otherwise declared of that specific type.  It causes comparison rules to 
  718. // change. For example, if a hard-type string is compared to a variant (not hard
  719. // -type) number, the number is converted to string.  If a hard-type number is 
  720. // compared to a variant string, the string is converted to number.  If they're 
  721. // both variant, then number < string.
  722. #define VT_HARDTYPE VT_RESERVED
  724. /*---------------------------------------------------------------------*/
  725. /*                   New date functions                                */
  726. /*---------------------------------------------------------------------*/
  728. /* The UDATE structure is used with VarDateFromUdate() and VarUdateFromDate().
  729.  * It represents an "unpacked date".
  730.  */
  731. typedef struct {
  732.     SYSTEMTIME st;
  733.     USHORT  wDayOfYear;
  734. } UDATE;
  736. /* APIs to "pack" and "unpack" dates.
  737.  * NOTE: Ex version of VarDateFromUdate obeys 2 digit year setting in
  738.  * control panel.
  739.  */
  740. WINOLEAUTAPI VarDateFromUdate(UDATE *pudateIn, ULONG dwFlags, DATE *pdateOut);
  741. WINOLEAUTAPI VarDateFromUdateEx(UDATE *pudateIn, LCID lcid, ULONG dwFlags, DATE *pdateOut);
  742. WINOLEAUTAPI VarUdateFromDate(DATE dateIn, ULONG dwFlags, UDATE *pudateOut);
  744. /* API to retrieve the secondary(altername) month names
  745.    Useful for Hijri, Polish and Russian alternate month names
  746. */   
  747. WINOLEAUTAPI GetAltMonthNames(LCID lcid, LPOLESTR * * prgp);
  749. /*---------------------------------------------------------------------*/
  750. /*                 Format                                              */
  751. /*---------------------------------------------------------------------*/
  753. WINOLEAUTAPI VarFormat(LPVARIANT pvarIn, LPOLESTR pstrFormat, int iFirstDay, int iFirstWeek, ULONG dwFlags, BSTR *pbstrOut);
  754. WINOLEAUTAPI VarFormatDateTime(LPVARIANT pvarIn, int iNamedFormat, ULONG dwFlags, BSTR *pbstrOut);
  755. WINOLEAUTAPI VarFormatNumber(LPVARIANT pvarIn, int iNumDig, int iIncLead, int iUseParens, int iGroup, ULONG dwFlags, BSTR *pbstrOut);
  756. WINOLEAUTAPI VarFormatPercent(LPVARIANT pvarIn, int iNumDig, int iIncLead, int iUseParens, int iGroup, ULONG dwFlags, BSTR *pbstrOut);
  757. WINOLEAUTAPI VarFormatCurrency(LPVARIANT pvarIn, int iNumDig, int iIncLead, int iUseParens, int iGroup, ULONG dwFlags, BSTR *pbstrOut);
  759. WINOLEAUTAPI VarWeekdayName(int iWeekday, int fAbbrev, int iFirstDay, ULONG dwFlags, BSTR *pbstrOut);
  760. WINOLEAUTAPI VarMonthName(int iMonth, int fAbbrev, ULONG dwFlags, BSTR *pbstrOut);
  762. WINOLEAUTAPI VarFormatFromTokens(LPVARIANT pvarIn, LPOLESTR pstrFormat, LPBYTE pbTokCur, ULONG dwFlags, BSTR *pbstrOut, LCID lcid);
  763. WINOLEAUTAPI VarTokenizeFormatString(LPOLESTR pstrFormat, LPBYTE rgbTok, int cbTok, int iFirstDay, int iFirstWeek, LCID lcid, int *pcbActual);
  765. /*---------------------------------------------------------------------*/
  766. /*                 ITypeLib                                            */
  767. /*---------------------------------------------------------------------*/
  769. typedef ITypeLib * LPTYPELIB;
  772. /*---------------------------------------------------------------------*/
  773. /*                ITypeInfo                                            */
  774. /*---------------------------------------------------------------------*/
  777. typedef LONG DISPID;
  778. typedef DISPID MEMBERID;
  780. #define MEMBERID_NIL DISPID_UNKNOWN
  781. #define ID_DEFAULTINST  -2
  784. /* Flags for IDispatch::Invoke */
  785. #define DISPATCH_METHOD         0x1
  786. #define DISPATCH_PROPERTYGET    0x2
  787. #define DISPATCH_PROPERTYPUT    0x4
  788. #define DISPATCH_PROPERTYPUTREF 0x8
  790. typedef ITypeInfo * LPTYPEINFO;
  793. /*---------------------------------------------------------------------*/
  794. /*                ITypeComp                                            */
  795. /*---------------------------------------------------------------------*/
  797. typedef ITypeComp * LPTYPECOMP;
  800. /*---------------------------------------------------------------------*/
  801. /*             ICreateTypeLib                                          */
  802. /*---------------------------------------------------------------------*/
  804. typedef ICreateTypeLib * LPCREATETYPELIB;
  806. typedef ICreateTypeInfo * LPCREATETYPEINFO;
  808. /*---------------------------------------------------------------------*/
  809. /*             TypeInfo API                                            */
  810. /*---------------------------------------------------------------------*/
  812. /* compute a 16bit hash value for the given name
  813.  */
  814. #if (defined (_WIN32) || defined (_WIN64))
  815. WINOLEAUTAPI_(ULONG) LHashValOfNameSysA(SYSKIND syskind, LCID lcid,
  816.             LPCSTR szName);
  817. #endif
  819. WINOLEAUTAPI_(ULONG)
  820. LHashValOfNameSys(SYSKIND syskind, LCID lcid, const OLECHAR * szName);
  822. #define LHashValOfName(lcid, szName) 
  823.             LHashValOfNameSys(SYS_WIN32, lcid, szName)
  825. #define WHashValOfLHashVal(lhashval) 
  826.             ((USHORT) (0x0000ffff & (lhashval)))
  828. #define IsHashValCompatible(lhashval1, lhashval2) 
  829.             ((BOOL) ((0x00ff0000 & (lhashval1)) == (0x00ff0000 & (lhashval2))))
  831. /* load the typelib from the file with the given filename
  832.  */
  833. WINOLEAUTAPI LoadTypeLib(const OLECHAR  *szFile, ITypeLib ** pptlib);
  835. /* Control how a type library is registered
  836.  */
  837. typedef enum tagREGKIND
  838. {
  839.     REGKIND_DEFAULT,
  840.     REGKIND_REGISTER,
  841.     REGKIND_NONE
  842. } REGKIND;
  845. // Constants for specifying format in which TLB should be loaded 
  846. // (the default format is 32-bit on WIN32 and 64-bit on WIN64)
  847. #define LOAD_TLB_AS_32BIT 0x20
  848. #define LOAD_TLB_AS_64BIT 0x40
  849. #define MASK_TO_RESET_TLB_BITS ~(LOAD_TLB_AS_32BIT | LOAD_TLB_AS_64BIT)
  851. WINOLEAUTAPI LoadTypeLibEx(LPCOLESTR szFile, REGKIND regkind,
  852.             ITypeLib ** pptlib);
  854. /* load registered typelib
  855.  */
  856. WINOLEAUTAPI LoadRegTypeLib(REFGUID rguid, WORD wVerMajor, WORD wVerMinor,
  857.             LCID lcid, ITypeLib ** pptlib);
  859. /* get path to registered typelib
  860.  */
  861. WINOLEAUTAPI QueryPathOfRegTypeLib(REFGUID guid, USHORT wMaj, USHORT wMin,
  862.             LCID lcid, LPBSTR lpbstrPathName);
  864. /* add typelib to registry
  865.  */
  866. WINOLEAUTAPI RegisterTypeLib(ITypeLib * ptlib, OLECHAR  *szFullPath,
  867.             OLECHAR  *szHelpDir);
  869. /* remove typelib from registry
  870.  */
  872. WINOLEAUTAPI UnRegisterTypeLib(REFGUID libID, WORD wVerMajor,
  873.             WORD wVerMinor, LCID lcid, SYSKIND syskind);
  875. WINOLEAUTAPI CreateTypeLib(SYSKIND syskind, const OLECHAR  *szFile,
  876.             ICreateTypeLib ** ppctlib);
  878. WINOLEAUTAPI CreateTypeLib2(SYSKIND syskind, LPCOLESTR szFile,
  879.             ICreateTypeLib2 **ppctlib);
  882. /*---------------------------------------------------------------------*/
  883. /*           IDispatch implementation support                          */
  884. /*---------------------------------------------------------------------*/
  886. typedef IDispatch * LPDISPATCH;
  888. typedef struct tagPARAMDATA {
  889.     OLECHAR * szName;   /* parameter name */
  890.     VARTYPE vt;         /* parameter type */
  891. } PARAMDATA, * LPPARAMDATA;
  893. typedef struct tagMETHODDATA {
  894.     OLECHAR * szName;   /* method name */
  895.     PARAMDATA * ppdata; /* pointer to an array of PARAMDATAs */
  896.     DISPID dispid;      /* method ID */
  897.     UINT iMeth;         /* method index */
  898.     CALLCONV cc;        /* calling convention */
  899.     UINT cArgs;         /* count of arguments */
  900.     WORD wFlags;        /* same wFlags as on IDispatch::Invoke() */
  901.     VARTYPE vtReturn;
  902. } METHODDATA, * LPMETHODDATA;
  904. typedef struct tagINTERFACEDATA {
  905.     METHODDATA * pmethdata;  /* pointer to an array of METHODDATAs */
  906.     UINT cMembers;      /* count of members */
  907. } INTERFACEDATA, * LPINTERFACEDATA;
  911. /* Locate the parameter indicated by the given position, and
  912.  * return it coerced to the given target VARTYPE (vtTarg).
  913.  */
  914. WINOLEAUTAPI DispGetParam(DISPPARAMS * pdispparams, UINT position,
  915.             VARTYPE vtTarg, VARIANT * pvarResult, UINT * puArgErr);
  917. /* Automatic TypeInfo driven implementation of IDispatch::GetIDsOfNames()
  918.  */
  919. WINOLEAUTAPI DispGetIDsOfNames(ITypeInfo * ptinfo, OLECHAR ** rgszNames,
  920.             UINT cNames, DISPID * rgdispid);
  922. /* Automatic TypeInfo driven implementation of IDispatch::Invoke()
  923.  */
  924. WINOLEAUTAPI DispInvoke(void * _this, ITypeInfo * ptinfo, DISPID dispidMember,
  925.             WORD wFlags, DISPPARAMS * pparams, VARIANT * pvarResult,
  926.             EXCEPINFO * pexcepinfo, UINT * puArgErr);
  928. /* Construct a TypeInfo from an interface data description
  929.  */
  930. WINOLEAUTAPI CreateDispTypeInfo(INTERFACEDATA * pidata, LCID lcid,
  931.             ITypeInfo ** pptinfo);
  933. /* Create an instance of the standard TypeInfo driven IDispatch
  934.  * implementation.
  935.  */
  936. WINOLEAUTAPI CreateStdDispatch(IUnknown * punkOuter, void * pvThis,
  937.             ITypeInfo * ptinfo, IUnknown ** ppunkStdDisp);
  939. /* Low-level helper for IDispatch::Invoke() provides machine independence
  940.  * for customized Invoke().
  941.  */
  942. WINOLEAUTAPI DispCallFunc(void * pvInstance, ULONG_PTR oVft, CALLCONV cc,
  943.             VARTYPE vtReturn, UINT  cActuals, VARTYPE * prgvt,
  944.             VARIANTARG ** prgpvarg, VARIANT * pvargResult);
  947. /*---------------------------------------------------------------------*/
  948. /*            Active Object Registration API                           */
  949. /*---------------------------------------------------------------------*/
  951. /* flags for RegisterActiveObject */
  952. #define ACTIVEOBJECT_STRONG 0x0
  953. #define ACTIVEOBJECT_WEAK 0x1
  955. WINOLEAUTAPI RegisterActiveObject(IUnknown * punk, REFCLSID rclsid,
  956.             DWORD dwFlags, DWORD * pdwRegister);
  958. WINOLEAUTAPI RevokeActiveObject(DWORD dwRegister, void * pvReserved);
  960. WINOLEAUTAPI GetActiveObject(REFCLSID rclsid, void * pvReserved,
  961.             IUnknown ** ppunk);
  963. /*---------------------------------------------------------------------*/
  964. /*                           ErrorInfo API                             */
  965. /*---------------------------------------------------------------------*/
  967. WINOLEAUTAPI SetErrorInfo(ULONG dwReserved, IErrorInfo * perrinfo);
  968. WINOLEAUTAPI GetErrorInfo(ULONG dwReserved, IErrorInfo ** pperrinfo);
  969. WINOLEAUTAPI CreateErrorInfo(ICreateErrorInfo ** pperrinfo);
  971. /*---------------------------------------------------------------------*/
  972. /*           User Defined Data types support                           */
  973. /*---------------------------------------------------------------------*/
  975. WINOLEAUTAPI GetRecordInfoFromTypeInfo(ITypeInfo * pTypeInfo,
  976.             IRecordInfo ** ppRecInfo);
  978. WINOLEAUTAPI GetRecordInfoFromGuids(REFGUID rGuidTypeLib,
  979.             ULONG uVerMajor, ULONG uVerMinor, LCID lcid,
  980.             REFGUID rGuidTypeInfo, IRecordInfo ** ppRecInfo);
  982. /*---------------------------------------------------------------------*/
  983. /*                           MISC API                                  */
  984. /*---------------------------------------------------------------------*/
  986. WINOLEAUTAPI_(ULONG) OaBuildVersion(void);
  988. WINOLEAUTAPI_(void) ClearCustData(LPCUSTDATA pCustData);
  990. // Declare variant access functions.
  992. #if __STDC__ || defined(NONAMELESSUNION)
  993. #define V_UNION(X, Y)   ((X)->n1.n2.n3.Y)
  994. #define V_VT(X)         ((X)->n1.n2.vt)
  995. #define V_RECORDINFO(X) ((X)->n1.n2.n3.brecVal.pRecInfo)
  996. #define V_RECORD(X)     ((X)->n1.n2.n3.brecVal.pvRecord)
  997. #else
  998. #define V_UNION(X, Y)   ((X)->Y)
  999. #define V_VT(X)         ((X)->vt)
  1000. #define V_RECORDINFO(X) ((X)->pRecInfo)
  1001. #define V_RECORD(X)     ((X)->pvRecord)
  1002. #endif
  1004. /* Variant access macros
  1005.  */
  1006. #define V_ISBYREF(X)     (V_VT(X)&VT_BYREF)
  1007. #define V_ISARRAY(X)     (V_VT(X)&VT_ARRAY)
  1008. #define V_ISVECTOR(X)    (V_VT(X)&VT_VECTOR)
  1009. #define V_NONE(X)        V_I2(X)
  1011. #define V_UI1(X)         V_UNION(X, bVal)
  1012. #define V_UI1REF(X)      V_UNION(X, pbVal)
  1013. #define V_I2(X)          V_UNION(X, iVal)
  1014. #define V_I2REF(X)       V_UNION(X, piVal)
  1015. #define V_I4(X)          V_UNION(X, lVal)
  1016. #define V_I4REF(X)       V_UNION(X, plVal)
  1017. #define V_I8(X)          V_UNION(X, llVal)
  1018. #define V_I8REF(X)       V_UNION(X, pllVal)
  1019. #define V_R4(X)          V_UNION(X, fltVal)
  1020. #define V_R4REF(X)       V_UNION(X, pfltVal)
  1021. #define V_R8(X)          V_UNION(X, dblVal)
  1022. #define V_R8REF(X)       V_UNION(X, pdblVal)
  1023. #define V_I1(X)          V_UNION(X, cVal)
  1024. #define V_I1REF(X)       V_UNION(X, pcVal)
  1025. #define V_UI2(X)         V_UNION(X, uiVal)
  1026. #define V_UI2REF(X)      V_UNION(X, puiVal)
  1027. #define V_UI4(X)         V_UNION(X, ulVal)
  1028. #define V_UI4REF(X)      V_UNION(X, pulVal)
  1029. #define V_UI8(X)         V_UNION(X, ullVal)
  1030. #define V_UI8REF(X)      V_UNION(X, pullVal)
  1031. #define V_INT(X)         V_UNION(X, intVal)
  1032. #define V_INTREF(X)      V_UNION(X, pintVal)
  1033. #define V_UINT(X)        V_UNION(X, uintVal)
  1034. #define V_UINTREF(X)     V_UNION(X, puintVal)
  1036. #ifdef _WIN64
  1037. #define V_INT_PTR(X)        V_UNION(X, llVal)
  1038. #define V_UINT_PTR(X)       V_UNION(X, ullVal)
  1039. #define V_INT_PTRREF(X)     V_UNION(X, pllVal)
  1040. #define V_UINT_PTRREF(X)    V_UNION(X, pullVal)
  1041. #else
  1042. #define V_INT_PTR(X)        V_UNION(X, lVal)
  1043. #define V_UINT_PTR(X)       V_UNION(X, ulVal)
  1044. #define V_INT_PTRREF(X)     V_UNION(X, plVal)
  1045. #define V_UINT_PTRREF(X)    V_UNION(X, pulVal)
  1046. #endif
  1048. #define V_CY(X)          V_UNION(X, cyVal)
  1049. #define V_CYREF(X)       V_UNION(X, pcyVal)
  1050. #define V_DATE(X)        V_UNION(X, date)
  1051. #define V_DATEREF(X)     V_UNION(X, pdate)
  1052. #define V_BSTR(X)        V_UNION(X, bstrVal)
  1053. #define V_BSTRREF(X)     V_UNION(X, pbstrVal)
  1054. #define V_DISPATCH(X)    V_UNION(X, pdispVal)
  1055. #define V_DISPATCHREF(X) V_UNION(X, ppdispVal)
  1056. #define V_ERROR(X)       V_UNION(X, scode)
  1057. #define V_ERRORREF(X)    V_UNION(X, pscode)
  1058. #define V_BOOL(X)        V_UNION(X, boolVal)
  1059. #define V_BOOLREF(X)     V_UNION(X, pboolVal)
  1060. #define V_UNKNOWN(X)     V_UNION(X, punkVal)
  1061. #define V_UNKNOWNREF(X)  V_UNION(X, ppunkVal)
  1062. #define V_VARIANTREF(X)  V_UNION(X, pvarVal)
  1063. #define V_ARRAY(X)       V_UNION(X, parray)
  1064. #define V_ARRAYREF(X)    V_UNION(X, pparray)
  1065. #define V_BYREF(X)       V_UNION(X, byref)
  1067. #define V_DECIMAL(X)     V_UNION(X, decVal)
  1068. #define V_DECIMALREF(X)  V_UNION(X, pdecVal)
  1070. #ifndef RC_INVOKED
  1071. #include <poppack.h>
  1072. #endif // RC_INVOKED
  1074. #endif     // __OLEAUTO_H__