dlls/oleaut32/typelib.h

   1 /*
   2  * typelib.h  internal wine data structures
   3  * used to decode typelib's
   4  *
   5  * Copyright 1999 Rein KLazes
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21 #ifndef _WINE_TYPELIB_H
  22 #define _WINE_TYPELIB_H
  23
  24 #include <stdarg.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "oleauto.h"
  29
  30 #define HELPDLLFLAG (0x0100)
  31 #define DO_NOT_SEEK (-1)
  32
  33 #define MSFT_HREFTYPE_INTHISFILE(href) (!((href) & 3))
  34 #define MSFT_HREFTYPE_INDEX(href) ((href) /sizeof(MSFT_TypeInfoBase))
  35
  36 /*-------------------------FILE STRUCTURES-----------------------------------*/
  37
  38 /* There are two known file formats, those created with ICreateTypeLib
  39  * have the signature "SLTG" as their first four bytes, while those created
  40  * with ICreateTypeLib2 have "MSFT".
  41  */
  42
  43 /*****************************************************
  44  *                MSFT typelibs
  45  *
  46  * These are TypeLibs created with ICreateTypeLib2
  47  *
  48  */
  49
  50 /*
  51  * structure of the typelib type2 header
  52  * it is at the beginning of a type lib file
  53  *
  54  */
  55
  56 #define MSFT_SIGNATURE 0x5446534D /* "MSFT" */
  57
  58 typedef struct tagMSFT_Header {
  59 /*0x00*/INT   magic1;       /* 0x5446534D "MSFT" */
  60         INT   magic2;       /* 0x00010002 version nr? */
  61         INT   posguid;      /* position of libid in guid table  */
  62                             /* (should be,  else -1) */
  63         INT   lcid;         /* locale id */
  64 /*0x10*/INT   lcid2;
  65         INT   varflags;     /* (largely) unknown flags ,seems to be always 41 */
  66                             /* becomes 0x51 with a helpfile defined */
  67                             /* if help dll defined it's 0x151 */
  68                             /* update : the lower nibble is syskind */
  69         INT   version;      /* set with SetVersion() */
  70         INT   flags;        /* set with SetFlags() */
  71 /*0x20*/INT   nrtypeinfos;  /* number of typeinfo's (till so far) */
  72         INT   helpstring;   /* position of help string in stringtable */
  73         INT   helpstringcontext;
  74         INT   helpcontext;
  75 /*0x30*/INT   nametablecount;   /* number of names in name table */
  76         INT   nametablechars;   /* nr of characters in name table */
  77         INT   NameOffset;       /* offset of name in name table */
  78         INT   helpfile;         /* position of helpfile in stringtable */
  79 /*0x40*/INT   CustomDataOffset; /* if -1 no custom data, else it is offset */
  80                                 /* in customer data/guid offset table */
  81         INT   res44;            /* unknown always: 0x20 (guid hash size?) */
  82         INT   res48;            /* unknown always: 0x80 (name hash size?) */
  83         INT   dispatchpos;      /* HREFTYPE to IDispatch, or -1 if no IDispatch */
  84 /*0x50*/INT   nimpinfos;        /* number of impinfos */
  85 } MSFT_Header;
  86
  87 /* segments in the type lib file have a structure like this: */
  88 typedef struct tagMSFT_pSeg {
  89         INT   offset;       /* absolute offset in file */
  90         INT   length;       /* length of segment */
  91         INT   res08;        /* unknown always -1 */
  92         INT   res0c;        /* unknown always 0x0f in the header */
  93                             /* 0x03 in the typeinfo_data */
  94 } MSFT_pSeg;
  95
  96 /* layout of the main segment directory */
  97 typedef struct tagMSFT_SegDir {
  98 /*1*/MSFT_pSeg pTypeInfoTab; /* each type info get an entry of 0x64 bytes */
  99                              /* (25 ints) */
 100 /*2*/MSFT_pSeg pImpInfo;     /* table with info for imported types */
 101 /*3*/MSFT_pSeg pImpFiles;    /* import libraries */
 102 /*4*/MSFT_pSeg pRefTab;      /* References table */
 103 /*5*/MSFT_pSeg pGuidHashTab; /* always exists, always same size (0x80) */
 104                              /* hash table with offsets to guid */
 105 /*6*/MSFT_pSeg pGuidTab;     /* all guids are stored here together with  */
 106                              /* offset in some table???? */
 107 /*7*/MSFT_pSeg pNameHashTab; /* always created, always same size (0x200) */
 108                              /* hash table with offsets to names */
 109 /*8*/MSFT_pSeg pNametab;     /* name tables */
 110 /*9*/MSFT_pSeg pStringtab;   /* string table */
 111 /*A*/MSFT_pSeg pTypdescTab;  /* table with type descriptors */
 112 /*B*/MSFT_pSeg pArrayDescriptions;
 113 /*C*/MSFT_pSeg pCustData;    /* data table, used for custom data and default */
 114                              /* parameter values */
 115 /*D*/MSFT_pSeg pCDGuids;     /* table with offsets for the guids and into */
 116                              /* the customer data table */
 117 /*E*/MSFT_pSeg res0e;        /* unknown */
 118 /*F*/MSFT_pSeg res0f;        /* unknown  */
 119 } MSFT_SegDir;
 120
 121
 122 /* base type info data */
 123 typedef struct tagMSFT_TypeInfoBase {
 124 /*000*/ INT   typekind;             /*  it is the TKIND_xxx */
 125                                     /* some byte alignment stuff */
 126         INT     memoffset;          /* points past the file, if no elements */
 127         INT     res2;               /* zero if no element, N*0x40 */
 128         INT     res3;               /* -1 if no element, (N-1)*0x38 */
 129 /*010*/ INT     res4;               /* always? 3 */
 130         INT     res5;               /* always? zero */
 131         INT     cElement;           /* counts elements, HI=cVars, LO=cFuncs */
 132         INT     res7;               /* always? zero */
 133 /*020*/ INT     res8;               /* always? zero */
 134         INT     res9;               /* always? zero */
 135         INT     resA;               /* always? zero */
 136         INT     posguid;            /* position in guid table */
 137 /*030*/ INT     flags;              /* Typeflags */
 138         INT     NameOffset;         /* offset in name table */
 139         INT     version;            /* element version */
 140         INT     docstringoffs;      /* offset of docstring in string tab */
 141 /*040*/ INT     helpstringcontext;  /*  */
 142         INT     helpcontext;    /* */
 143         INT     oCustData;          /* offset in customer data table */
 144 #ifdef WORDS_BIGENDIAN
 145         INT16   cbSizeVft;      /* virtual table size, including inherits */
 146         INT16   cImplTypes;     /* nr of implemented interfaces */
 147 #else
 148         INT16   cImplTypes;     /* nr of implemented interfaces */
 149         INT16   cbSizeVft;      /* virtual table size, including inherits */
 150 #endif
 151 /*050*/ INT     size;           /* size in bytes, at least for structures */
 152         /* FIXME: name of this field */
 153         INT     datatype1;      /* position in type description table */
 154                                 /* or in base interfaces */
 155                                 /* if coclass: offset in reftable */
 156                                 /* if interface: reference to inherited if */
 157                                 /* if module: offset to dllname in name table */
 158         INT     datatype2;      /* for interfaces: hiword is num of inherited funcs */
 159                                 /*                 loword is num of inherited interfaces */
 160         INT     res18;          /* always? 0 */
 161 /*060*/ INT     res19;          /* always? -1 */
 162 } MSFT_TypeInfoBase;
 163
 164 /* layout of an entry with information on imported types */
 165 typedef struct tagMSFT_ImpInfo {
 166     INT     flags;          /* bits 0 - 15:  count */
 167                             /* bit  16:      if set oGuid is an offset to Guid */
 168                             /*               if clear oGuid is a typeinfo index in the specified typelib */
 169                             /* bits 24 - 31: TKIND of reference */
 170     INT     oImpFile;       /* offset in the Import File table */
 171     INT     oGuid;          /* offset in Guid table or typeinfo index (see bit 16 of res0) */
 172 } MSFT_ImpInfo;
 173
 174 #define MSFT_IMPINFO_OFFSET_IS_GUID 0x00010000
 175
 176 /* function description data */
 177 typedef struct {
 178     INT   Info;         /* record size including some extra stuff */
 179     INT   DataType;     /* data type of the member, eg return of function */
 180     INT   Flags;        /* something to do with attribute flags (LOWORD) */
 181 #ifdef WORDS_BIGENDIAN
 182     INT16 funcdescsize; /* size of reconstituted FUNCDESC and related structs */
 183     INT16 VtableOffset; /* offset in vtable */
 184 #else
 185     INT16 VtableOffset; /* offset in vtable */
 186     INT16 funcdescsize; /* size of reconstituted FUNCDESC and related structs */
 187 #endif
 188     INT   FKCCIC;       /* bit string with the following  */
 189                         /* meaning (bit 0 is the msb): */
 190                         /* bit 2 indicates that oEntry is numeric */
 191                         /* bit 3 that parameter has default values */
 192                         /* calling convention (bits 4-7 ) */
 193                         /* bit 8 indicates that custom data is present */
 194                         /* Invocation kind (bits 9-12 ) */
 195                         /* function kind (eg virtual), bits 13-15  */
 196 #ifdef WORDS_BIGENDIAN
 197     INT16 nroargs;      /* nr of optional arguments */
 198     INT16 nrargs;       /* number of arguments (including optional ????) */
 199 #else
 200     INT16 nrargs;       /* number of arguments (including optional ????) */
 201     INT16 nroargs;      /* nr of optional arguments */
 202 #endif
 203
 204     /* optional attribute fields, the number of them is variable */
 205     INT   HelpContext;
 206     INT   oHelpString;
 207     INT   oEntry;       /* either offset in string table or numeric as it is */
 208     INT   res9;         /* unknown (-1) */
 209     INT   resA;         /* unknown (-1) */
 210     INT   HelpStringContext;
 211     /* these are controlled by a bit set in the FKCCIC field  */
 212     INT   oCustData;        /* custom data for function */
 213     INT   oArgCustData[1];  /* custom data per argument */
 214 } MSFT_FuncRecord;
 215
 216 /* after this may follow an array with default value pointers if the
 217  * appropriate bit in the FKCCIC field has been set:
 218  * INT   oDefaultValue[nrargs];
 219  */
 220
 221     /* Parameter info one per argument*/
 222 typedef struct {
 223         INT   DataType;
 224         INT   oName;
 225         INT   Flags;
 226     } MSFT_ParameterInfo;
 227
 228 /* Variable description data */
 229 typedef struct {
 230     INT   Info;         /* record size including some extra stuff */
 231     INT   DataType;     /* data type of the variable */
 232     INT   Flags;        /* VarFlags (LOWORD) */
 233 #ifdef WORDS_BIGENDIAN
 234     INT16 vardescsize;  /* size of reconstituted VARDESC and related structs */
 235     INT16 VarKind;      /* VarKind */
 236 #else
 237     INT16 VarKind;      /* VarKind */
 238     INT16 vardescsize;  /* size of reconstituted VARDESC and related structs */
 239 #endif
 240     INT   OffsValue;    /* value of the variable or the offset  */
 241                         /* in the data structure */
 242     /* optional attribute fields, the number of them is variable */
 243     /* controlled by record length */
 244     INT   HelpContext;
 245     INT   HelpString;
 246     INT   res9;         /* unknown (-1) */
 247     INT   oCustData;        /* custom data for variable */
 248     INT   HelpStringContext;
 249 } MSFT_VarRecord;
 250
 251 /* Structure of the reference data  */
 252 typedef struct {
 253     INT   reftype;  /* either offset in type info table, then it's */
 254                     /* a multiple of 64 */
 255                     /* or offset in the external reference table */
 256                     /* with an offset of 1 */
 257     INT   flags;
 258     INT   oCustData;    /* custom data */
 259     INT   onext;    /* next offset, -1 if last */
 260 } MSFT_RefRecord;
 261
 262 /* this is how a guid is stored */
 263 typedef struct {
 264     GUID guid;
 265     INT   hreftype;     /* -2 for the typelib guid, typeinfo offset
 266                            for typeinfo guid, low two bits are 01 if
 267                            this is an imported typeinfo, low two bits
 268                            are 10 if this is an imported typelib (used
 269                            by imported typeinfos) */
 270     INT   next_hash;    /* offset to next guid in the hash bucket */
 271 } MSFT_GuidEntry;
 272 /* some data preceding entries in the name table */
 273 typedef struct {
 274     INT   hreftype;     /* is -1 if name is for neither a typeinfo,
 275                            a variable, or a function (that is, name
 276                            is for a typelib or a function parameter).
 277                            otherwise is the offset of the first
 278                            typeinfo that this name refers to (either
 279                            to the typeinfo itself or to a member of
 280                            the typeinfo */
 281     INT   next_hash;    /* offset to next name in the hash bucket */
 282     INT   namelen;      /* only lower 8 bits are valid */
 283                         /* 0x1000 if name is only used once as a variable name */
 284                         /* 0x2000 if name is a variable in an enumeration */
 285                         /* 0x3800 if name is typeinfo name */
 286 } MSFT_NameIntro;
 287 /* the custom data table directory has entries like this */
 288 typedef struct {
 289     INT   GuidOffset;
 290     INT   DataOffset;
 291     INT   next;     /* next offset in the table, -1 if it's the last */
 292 } MSFT_CDGuid;
 293
 294
 295 /***********************************************************
 296  *
 297  *                SLTG typelibs.
 298  *
 299  * These are created with ICreateTypeLib
 300  *
 301  */
 302
 303 #include "pshpack1.h"
 304
 305 typedef struct {
 306 /*00*/  DWORD SLTG_magic;       /* 0x47544c53  == "SLTG" */
 307 /*04*/  WORD nrOfFileBlks;      /* no of SLTG_BlkEntry's + 1 */
 308 /*06*/  WORD res06;             /* ?? always 9 */
 309 /*08*/  WORD res08;             /* some kind of len/offset ?? */
 310 /*0a*/  WORD first_blk;         /* 1 based index into blk entries that
 311                                    corresponds to first block in file */
 312 /*0c*/  GUID guid;              /* always 000204ff-0000-0000-c000-000000000046 */
 313 /*1c*/  DWORD res1c;            /* always 0x00000044 */
 314 /*20*/  DWORD res20;            /* always 0xffff0000 */
 315 } SLTG_Header;
 316
 317 /* This gets followed by a list of block entries */
 318 typedef struct {
 319 /*00*/  DWORD len;
 320 /*04*/  WORD index_string; /* offs from start of SLTG_Magic to index string */
 321 /*06*/  WORD next;
 322 } SLTG_BlkEntry;
 323
 324 /* The order of the blocks in the file is given by starting at Block
 325    entry first_blk and stepping through using the next pointer */
 326
 327 /* These then get followed by this magic */
 328 typedef struct {
 329 /*00*/ CHAR CompObj_magic[9];   /* always "\1CompObj" */
 330 /*09*/ CHAR dir_magic[4];       /* always "dir" */
 331 } SLTG_Magic;
 332
 333 #define SLTG_COMPOBJ_MAGIC "\1CompObj"
 334 #define SLTG_DIR_MAGIC "dir"
 335
 336 /* Next we have SLTG_Header.nrOfFileBlks - 2 of Index strings.  These
 337 are presumably unique to within the file and look something like
 338 "AAAAAAAAAA" with the first character incremented from 'A' to ensure
 339 uniqueness.  I guess successive chars increment when we need to wrap
 340 the first one. */
 341
 342 typedef struct {
 343 /*00*/ CHAR string[11];
 344 } SLTG_Index;
 345
 346
 347 /* This is followed by SLTG_pad9 */
 348 typedef struct {
 349 /*00*/ CHAR pad[9];     /* 9 '\0's */
 350 } SLTG_Pad9;
 351
 352
 353 /* Now we have the noOfFileBlks - 1 worth of blocks. The length of
 354 each block is given by its entry in SLTG_BlkEntry. */
 355
 356 /* type SLTG_NAME in rather like a BSTR except that the length in
 357 bytes is given by the first WORD and the string contains 8bit chars */
 358
 359 typedef WORD SLTG_Name;
 360
 361 /* The main library block looks like this.  This one seems to come last */
 362
 363 typedef struct {
 364 /*00*/  WORD magic;             /* 0x51cc */
 365 /*02*/  WORD res02;             /* 0x0003, 0x0004 */
 366 /*04*/  WORD name;              /* offset to name in name table */
 367 /*06*/  SLTG_Name res06;        /* maybe this is just WORD == 0xffff */
 368         SLTG_Name helpstring;
 369         SLTG_Name helpfile;
 370         DWORD helpcontext;
 371         WORD syskind;           /* == 1 for win32, 0 for win16 */
 372         WORD lcid;              /* == 0x409, 0x809 etc */
 373         DWORD res12;            /* == 0 */
 374         WORD libflags;          /* LIBFLAG_* */
 375         WORD maj_vers;
 376         WORD min_vers;
 377         GUID uuid;
 378 } SLTG_LibBlk;
 379
 380 #define SLTG_LIBBLK_MAGIC 0x51cc
 381
 382 /* we then get 0x40 bytes worth of 0xffff or small numbers followed by
 383    nrOfFileBlks - 2 of these */
 384 typedef struct {
 385         WORD small_no;
 386         SLTG_Name index_name; /* This refers to a name in the directory */
 387         SLTG_Name other_name; /* Another one of these weird names */
 388         WORD res1a;           /* 0xffff */
 389         WORD name_offs;       /* offset to name in name table */
 390         WORD more_bytes;      /* if this is non-zero we get this many
 391                                  bytes before the next element, which seem
 392                                  to reference the docstring of the type ? */
 393         WORD res20;           /* 0xffff */
 394         DWORD helpcontext;
 395         WORD res26;           /* 0xffff */
 396         GUID uuid;
 397 } SLTG_OtherTypeInfo;
 398
 399 /* Next we get WORD 0x0003 followed by a DWORD which if we add to
 400 0x216 gives the offset to the name table from the start of the LibBlk
 401 struct */
 402
 403 typedef struct {
 404 /*00*/  WORD magic;             /* 0x0501 */
 405 /*02*/  DWORD href_table;       /* if not 0xffffffff, then byte offset from
 406                                    beginning of struct to href table */
 407 /*06*/  DWORD res06;            /* 0xffffffff */
 408 /*0a*/  DWORD elem_table;       /* offset to members */
 409 /*0e*/  DWORD res0e;            /* 0xffffffff */
 410 /*12*/  WORD major_version;     /* major version number */
 411 /*14*/  WORD minor_version;     /* minor version number */
 412 /*16*/  DWORD res16;    /* 0xfffe0000 or 0xfffc0000 (on dual interfaces?) */
 413 /*1a*/  BYTE typeflags1;/* 0x02 | top 5 bits hold l5sbs of TYPEFLAGS */
 414 /*1b*/  BYTE typeflags2;/* TYPEFLAGS >> 5 */
 415 /*1c*/  BYTE typeflags3;/* 0x02*/
 416 /*1d*/  BYTE typekind;  /* 0x03 == TKIND_INTERFACE etc. */
 417 /*1e*/  DWORD res1e;    /* 0x00000000 or 0xffffffff */
 418 } SLTG_TypeInfoHeader;
 419
 420 #define SLTG_TIHEADER_MAGIC 0x0501
 421
 422 typedef struct {
 423 /*00*/  WORD cFuncs;
 424 /*02*/  WORD cVars;
 425 /*04*/  WORD cImplTypes;
 426 /*06*/  WORD res06; /* always 0000 */
 427 /*08*/  WORD funcs_off; /* offset to functions (starting from the member header) */
 428 /*0a*/  WORD vars_off; /* offset to vars (starting from the member header) */
 429 /*0c*/  WORD impls_off; /* offset to implemented types (starting from the member header) */
 430 /*0e*/  WORD funcs_bytes; /* bytes used by function data */
 431 /*10*/  WORD vars_bytes; /* bytes used by var data */
 432 /*12*/  WORD impls_bytes; /* bytes used by implemented type data */
 433 /*14*/  WORD tdescalias_vt; /* for TKIND_ALIAS */
 434 /*16*/  WORD res16; /* always ffff */
 435 /*18*/  WORD res18; /* always 0000 */
 436 /*1a*/  WORD res1a; /* always 0000 */
 437 /*1c*/  WORD simple_alias; /* tdescalias_vt is a vt rather than an offset? */
 438 /*1e*/  WORD res1e; /* always 0000 */
 439 /*20*/  WORD cbSizeInstance;
 440 /*22*/  WORD cbAlignment;
 441 /*24*/  WORD res24;
 442 /*26*/  WORD res26;
 443 /*28*/  WORD cbSizeVft;
 444 /*2a*/  WORD res2a; /* always ffff */
 445 /*2c*/  WORD res2c; /* always ffff */
 446 /*2e*/  WORD res2e; /* always ffff */
 447 /*30*/  WORD res30; /* always ffff */
 448 /*32*/  WORD res32;
 449 /*34*/  WORD res34;
 450 } SLTG_TypeInfoTail;
 451
 452 typedef struct {
 453 /*00*/ WORD res00; /* 0x0001 sometimes 0x0003 ?? */
 454 /*02*/ WORD res02; /* 0xffff */
 455 /*04*/ BYTE res04; /* 0x01 */
 456 /*05*/ DWORD cbExtra; /* No of bytes that follow */
 457 } SLTG_MemberHeader;
 458
 459 typedef struct {
 460 /*00*/  WORD magic;     /* 0x120a */
 461 /*02*/  WORD next;      /* offset in bytes to next block from start of block
 462                            group, 0xffff if last item */
 463 /*04*/  WORD name;      /* offset to name within name table */
 464 /*06*/  WORD value;     /* offset to value from start of block group */
 465 /*08*/  WORD res08;     /* 0x56 */
 466 /*0a*/  DWORD memid;    /* memid */
 467 /*0e*/  WORD helpcontext;/* 0xfffe == no context, 0x0001 == stored in EnumInfo struct, else offset
 468                             to value from start of block group */
 469 /*10*/  WORD helpstring;/* offset from start of block group to string offset */
 470 } SLTG_EnumItem;
 471
 472 #define SLTG_ENUMITEM_MAGIC 0x120a
 473
 474 typedef struct {
 475         BYTE magic;     /* 0x4c, 0xcb or 0x8b with optional SLTG_FUNCTION_FLAGS_PRESENT flag */
 476         BYTE inv;       /* high nibble is INVOKE_KIND, low nibble = 2 */
 477         WORD next;      /* byte offset from beginning of group to next fn */
 478         WORD name;      /* Offset within name table to name */
 479         DWORD dispid;   /* dispid */
 480         WORD helpcontext; /* helpcontext (again 1 is special) */
 481         WORD helpstring;/* helpstring offset to offset */
 482         WORD arg_off;   /* offset to args from start of block */
 483         BYTE nacc;      /* lowest 3bits are CALLCONV, rest are no of args */
 484         BYTE retnextopt;/* if 0x80 bit set ret type follows else next WORD
 485                            is offset to ret type. No of optional args is
 486                            middle 6 bits */
 487         WORD rettype;   /* return type VT_?? or offset to ret type */
 488         WORD vtblpos;   /* position in vtbl? */
 489         WORD funcflags; /* present if magic & 0x20 */
 490 /* Param list starts, repeat next two as required */
 491 #if 0
 492         WORD  name;     /* offset to 2nd letter of name */
 493         WORD+ type;     /* VT_ of param */
 494 #endif
 495 } SLTG_Function;
 496
 497 #define SLTG_FUNCTION_FLAGS_PRESENT 0x20
 498 #define SLTG_FUNCTION_MAGIC 0x4c
 499 #define SLTG_DISPATCH_FUNCTION_MAGIC 0xcb
 500 #define SLTG_STATIC_FUNCTION_MAGIC 0x8b
 501
 502 typedef struct {
 503 /*00*/  BYTE magic;             /* 0xdf */
 504 /*01*/  BYTE res01;             /* 0x00 */
 505 /*02*/  DWORD res02;            /* 0xffffffff */
 506 /*06*/  DWORD res06;            /* 0xffffffff */
 507 /*0a*/  DWORD res0a;            /* 0xffffffff */
 508 /*0e*/  DWORD res0e;            /* 0xffffffff */
 509 /*12*/  DWORD res12;            /* 0xffffffff */
 510 /*16*/  DWORD res16;            /* 0xffffffff */
 511 /*1a*/  DWORD res1a;            /* 0xffffffff */
 512 /*1e*/  DWORD res1e;            /* 0xffffffff */
 513 /*22*/  DWORD res22;            /* 0xffffffff */
 514 /*26*/  DWORD res26;            /* 0xffffffff */
 515 /*2a*/  DWORD res2a;            /* 0xffffffff */
 516 /*2e*/  DWORD res2e;            /* 0xffffffff */
 517 /*32*/  DWORD res32;            /* 0xffffffff */
 518 /*36*/  DWORD res36;            /* 0xffffffff */
 519 /*3a*/  DWORD res3a;            /* 0xffffffff */
 520 /*3e*/  DWORD res3e;            /* 0xffffffff */
 521 /*42*/  WORD  res42;            /* 0xffff */
 522 /*44*/  DWORD number;           /* this is 8 times the number of refs */
 523 /*48*/  /* Now we have number bytes (8 for each ref) of SLTG_UnknownRefInfo */
 524
 525 /*50*/  WORD res50;             /* 0xffff */
 526 /*52*/  BYTE res52;             /* 0x01 */
 527 /*53*/  DWORD res53;            /* 0x00000000 */
 528 /*57*/  SLTG_Name names[1];
 529   /*    Now we have number/8 SLTG_Names (first WORD is no of bytes in the ascii
 530    *    string).  Strings look like "*\Rxxxx*#n".  If xxxx == ffff then the
 531    *    ref refers to the nth type listed in this library (0 based).  Else
 532    *    the xxxx (which maybe fewer than 4 digits) is the offset into the name
 533    *    table to a string "*\G{<guid>}#1.0#0#C:\WINNT\System32\stdole32.tlb#"
 534    *    The guid is the typelib guid; the ref again refers to the nth type of
 535    *    the imported typelib.
 536    */
 537
 538 /*xx*/ BYTE resxx;              /* 0xdf */
 539
 540 } SLTG_RefInfo;
 541
 542 #define SLTG_REF_MAGIC 0xdf
 543
 544 typedef struct {
 545         WORD res00;     /* 0x0001 */
 546         BYTE res02;     /* 0x02 */
 547         BYTE res03;     /* 0x40 if internal ref, 0x00 if external ? */
 548         WORD res04;     /* 0xffff */
 549         WORD res06;     /* 0x0000, 0x0013 or 0xffff ?? */
 550 } SLTG_UnknownRefInfo;
 551
 552 typedef struct {
 553   WORD res00; /* 0x004a */
 554   WORD next;  /* byte offs to next interface */
 555   WORD res04; /* 0xffff */
 556   BYTE impltypeflags; /* IMPLTYPEFLAG_* */
 557   BYTE res07; /* 0x80 */
 558   WORD res08; /* 0x0012, 0x0028 ?? */
 559   WORD ref;   /* number in ref table ? */
 560   WORD res0c; /* 0x4000 */
 561   WORD res0e; /* 0xfffe */
 562   WORD res10; /* 0xffff */
 563   WORD res12; /* 0x001d */
 564   WORD pos_in_table; /* 0x0, 0x4, ? */
 565 } SLTG_ImplInfo;
 566
 567 #define SLTG_IMPL_MAGIC 0x004a
 568
 569 typedef struct {
 570   BYTE magic; /* 0x0a */
 571   BYTE flags;
 572   WORD next;
 573   WORD name;
 574   WORD byte_offs; /* pos in struct, or offset to const type or const data (if flags & 0x08) */
 575   WORD type; /* if flags & 0x02 this is the type, else offset to type */
 576   DWORD memid;
 577   WORD helpcontext; /* ?? */
 578   WORD helpstring; /* ?? */
 579   WORD varflags; /* only present if magic & 0x02 */
 580 } SLTG_Variable;
 581
 582 #define SLTG_VAR_MAGIC 0x0a
 583 #define SLTG_VAR_WITH_FLAGS_MAGIC 0x2a
 584
 585
 586 /* CARRAYs look like this
 587 WORD type == VT_CARRAY
 588 WORD offset from start of block to SAFEARRAY
 589 WORD typeofarray
 590 */
 591
 592 #include "poppack.h"
 593
 594 /* The OLE Automation ProxyStub Interface Class (aka Typelib Marshaler) */
 595 DEFINE_OLEGUID( CLSID_PSDispatch,    0x00020420, 0x0000, 0x0000 );
 596 DEFINE_OLEGUID( CLSID_PSEnumVariant, 0x00020421, 0x0000, 0x0000 );
 597 DEFINE_OLEGUID( CLSID_PSTypeInfo,    0x00020422, 0x0000, 0x0000 );
 598 DEFINE_OLEGUID( CLSID_PSTypeLib,     0x00020423, 0x0000, 0x0000 );
 599 DEFINE_OLEGUID( CLSID_PSOAInterface, 0x00020424, 0x0000, 0x0000 );
 600 DEFINE_OLEGUID( CLSID_PSTypeComp,    0x00020425, 0x0000, 0x0000 );
 601
 602 /*---------------------------END--------------------------------------------*/
 603 #endif