dlls/oleaut32/tests/tmarshal.idl

   1 /*
   2  * Copyright (C) 2005 Robert Shearman
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  *
  18  */
  19
  20 #include "tmarshal_dispids.h"
  21 import "ocidl.idl";
  22
  23 [
  24   uuid(d96d8a3e-78b6-4c8d-8f27-059db959be8a),
  25   version(1.0),
  26   helpstring("Test Typelib")
  27 ]
  28 library TestTypelib
  29 {
  30     importlib("stdole2.tlb");
  31
  32     typedef enum tagSTATE
  33     {
  34         STATE_UNWIDGETIFIED = 1,
  35         STATE_WIDGETIFIED
  36     } STATE;
  37
  38     typedef struct tagMYSTRUCT
  39     {
  40         INT field1;
  41         ULONGLONG field2;
  42         UINT uarr[8];
  43     } MYSTRUCT;
  44
  45     coclass ApplicationObject2;
  46
  47     [
  48         odl,
  49         uuid(12345678-1234-4321-1234-121212121212)
  50     ]
  51     interface ISomethingFromDispatch : IDispatch
  52     {
  53         HRESULT anotherfn(void);
  54     }
  55
  56     [
  57         odl,
  58         oleautomation,
  59         dual,
  60         uuid(3f7e06fe-0bce-46f0-8b7d-3a68393c7967)
  61     ]
  62     interface ItestDual : IDispatch
  63     {
  64         HRESULT test();
  65     }
  66
  67     [
  68         odl,
  69         uuid(3f7e06fe-0bce-46f0-8b7d-3a68393c7968)
  70     ]
  71     interface ITestSecondIface : IUnknown
  72     {
  73         HRESULT test();
  74     }
  75
  76     [
  77         odl,
  78         oleautomation,
  79         dual,
  80         uuid(3f7e06fe-0bce-46f0-8b7d-3a68393c7969)
  81     ]
  82     interface ITestSecondDisp : IDispatch
  83     {
  84         HRESULT test();
  85     }
  86
  87     [
  88         odl,
  89         uuid(a1f8cae3-c947-4c5f-b57d-c87b9b5f3586),
  90         oleautomation,
  91         dual
  92     ]
  93     interface IWidget : IDispatch
  94     {
  95         [propput, id(DISPID_TM_NAME)]
  96         HRESULT Name([in] BSTR name);
  97         [propget, id(DISPID_TM_NAME)]
  98         HRESULT Name([out, retval] BSTR *name);
  99
 100         [id(DISPID_TM_DOSOMETHING)]
 101         HRESULT DoSomething([in] double number, [out] BSTR *str1, [in, defaultvalue("")] BSTR str2, [in, optional] VARIANT *opt);
 102
 103         [propget, id(DISPID_TM_STATE)]
 104         HRESULT State([out, retval] STATE *state);
 105         [propput, id(DISPID_TM_STATE)]
 106         HRESULT State([in] STATE state);
 107
 108         [id(DISPID_TM_MAP)]
 109         HRESULT Map([in] BSTR bstrId, [out, retval] BSTR *sValue);
 110
 111         [id(DISPID_TM_SETOLECOLOR)]
 112         HRESULT SetOleColor([in] OLE_COLOR val);
 113
 114         [id(DISPID_TM_GETOLECOLOR)]
 115         HRESULT GetOleColor([out, retval] OLE_COLOR *pVal);
 116
 117         [propget, id(DISPID_TM_CLONE)]
 118         HRESULT Clone([out, retval] IWidget **ppVal);
 119
 120         [propget, id(DISPID_TM_CLONEDISPATCH)]
 121         HRESULT CloneDispatch([out, retval] IDispatch **ppVal);
 122
 123         [propget, id(DISPID_TM_CLONECOCLASS)]
 124         HRESULT CloneCoclass([out, retval] ApplicationObject2 **ppVal);
 125
 126         [propget, id(DISPID_VALUE)]
 127         HRESULT Value([in] VARIANT *value, [out, retval] VARIANT *retval);
 128
 129         [id(DISPID_TM_ARRAY)]
 130         HRESULT Array([in] SAFEARRAY(BSTR) values);
 131
 132         [id(DISPID_TM_VARARRAYPTR)]
 133         HRESULT VariantArrayPtr([in] SAFEARRAY(VARIANT) *values);
 134
 135         [id(DISPID_TM_VARCARRAY)]
 136         HRESULT VariantCArray([in] ULONG count, [in, out] VARIANT values[2]);
 137
 138         [id(DISPID_TM_VARIANT)]
 139         HRESULT Variant([in] VARIANT var);
 140
 141         [vararg, id(DISPID_TM_VARARG)]
 142         HRESULT VarArg([in] int numexpect, [in] SAFEARRAY(VARIANT) values);
 143
 144         [id(DISPID_TM_STRUCTARGS)]
 145         HRESULT StructArgs([in] MYSTRUCT byval, [in] MYSTRUCT *byptr, [in] MYSTRUCT arr[5]);
 146
 147         [id(DISPID_TM_ERROR)]
 148         HRESULT Error();
 149
 150         [propget, id(DISPID_TM_CLONEINTERFACE)]
 151         HRESULT CloneInterface([out, retval] ISomethingFromDispatch **ppVal);
 152
 153         [id(DISPID_TM_PROP_WITH_LCID), propput]
 154         HRESULT prop_with_lcid([in,lcid] long lcid, [in] INT i);
 155
 156         [id(DISPID_TM_PROP_WITH_LCID), propget]
 157         HRESULT prop_with_lcid([in,lcid] long lcid, [out,retval] INT *i);
 158
 159         [id(DISPID_TM_PROP_INT), propget]
 160         HRESULT prop_int([out,retval] INT *i);
 161
 162         [id(DISPID_TM_PROP_UINT), propget]
 163         HRESULT prop_uint([out,retval] UINT *i);
 164
 165         [id(DISPID_TM_BYREF_UINT)]
 166         HRESULT ByRefUInt([in, out] UINT *i);
 167
 168         [id(DISPID_TM_PROP_OPT_ARG), propput]
 169         HRESULT prop_opt_arg([in,optional] INT opt, [in] INT i);
 170
 171         [id(DISPID_TM_PROP_REQ_ARG), propput]
 172         HRESULT prop_req_arg([in] INT req, [in] INT i);
 173
 174         [id(DISPID_TM_RESTRICTED), restricted]
 175         HRESULT _restrict([out, retval] INT *i);
 176
 177         [id(DISPID_TM_NEG_RESTRICTED), restricted]
 178         HRESULT neg_restrict([out, retval] INT *i);
 179     }
 180
 181     [
 182         odl,
 183         uuid(a1f8cae3-c947-3c5f-a57c-c88b9b6f3586),
 184         oleautomation,
 185         dual
 186     ]
 187     interface IStaticWidget : IDispatch
 188     {
 189         [id(DISPID_TM_TESTDUAL)]
 190         HRESULT TestDual([in] ItestDual *p);
 191
 192         [id(DISPID_TM_TESTSECONDIFACE)]
 193         HRESULT TestSecondIface([in] ITestSecondIface *p);
 194     }
 195
 196     [
 197         odl,
 198         uuid(a028db05-30f0-4b93-b17a-41c72f831d84),
 199 #if 0 /* FIXME: commented out as causes widl to generate incorrect typelib */
 200         dual,
 201 #endif
 202         oleautomation
 203     ]
 204     interface IKindaEnumWidget : IUnknown
 205     {
 206         HRESULT Next(
 207                      [out] IWidget **widget);
 208
 209         HRESULT Count(
 210                       [out] unsigned long *count);
 211
 212         HRESULT Reset();
 213
 214         HRESULT Clone(
 215                       [out] IKindaEnumWidget **ppenum);
 216     }
 217
 218     [
 219         odl,
 220         uuid(a028db06-30f0-4b93-b17a-41c72f831d84),
 221     ]
 222     interface INonOleAutomation : IUnknown
 223     {
 224         [id(DISPID_NOA_BSTRRET)]
 225         BSTR BstrRet();
 226
 227         [id(DISPID_NOA_ERROR)]
 228         HRESULT Error();
 229     }
 230
 231
 232     [
 233         dllname("comm.drv"),
 234         uuid(d377f60b-8639-4261-8ee7-75c8340d2cc9),
 235     ]
 236     module BadModule
 237     {
 238         [
 239             entry("Foo"),
 240         ]
 241         HRESULT BadModuleFoo();
 242     };
 243
 244     [
 245         dllname("oleaut32.dll"),
 246         uuid(d377f60c-8639-4261-8ee7-75c8340d2cc9),
 247     ]
 248     module BadEntry
 249     {
 250         [
 251             entry("Foo"),
 252         ]
 253         HRESULT BadEntryFoo();
 254     };
 255
 256     [
 257         uuid(bb171948-10ec-407a-9a57-2f85f797ff1a),
 258         appobject,
 259     ]
 260     coclass ApplicationObject2
 261     {
 262         interface IWidget;
 263         [source] interface IWidget;
 264     };
 265
 266     [
 267         odl,
 268         uuid(375f8a9d-33d0-44f3-b972-61f8407899e0)
 269     ]
 270         interface ItestIF1 : IUnknown
 271     {
 272         HRESULT fn1([in] int x);
 273         HRESULT fn2([out,retval] int *x);
 274     }
 275
 276     [
 277         odl,
 278         uuid(094056a3-666f-4956-be12-1859668310b8)
 279     ]
 280     interface ItestIF2 : ItestIF1
 281     {
 282         HRESULT fn3([in] int y);
 283     }
 284
 285     [
 286         odl,
 287         uuid(33baba09-2e68-43ab-81fe-d84b403df2e5)
 288     ]
 289     dispinterface ItestIF3
 290     {
 291         interface ItestIF2;
 292     }
 293
 294     [
 295         odl,
 296         uuid(a01005c7-7491-42eb-94f3-668e37ce60a6)
 297     ]
 298     dispinterface ItestIF4
 299     {
 300         properties:
 301         methods:
 302         [id(0x1c)] HRESULT fn([in] int z);
 303     }
 304
 305     [
 306         odl,
 307         uuid(4ab61e25-c09f-4239-8f7f-7a018ea0199f),
 308         dual
 309     ]
 310     interface ItestIF5 : ItestIF2
 311     {
 312         [id(0x1234)] HRESULT fn4([in] int a);
 313         [id(0x1235)] HRESULT fn5([in] int a);
 314     }
 315
 316     [
 317         odl,
 318         uuid(ec236d8e-2cc7-44f2-b394-36c86ff3da74)
 319     ]
 320     interface ItestIF6 : IDispatch
 321     {
 322         [id(0x1234)] HRESULT fn4([in] int a);
 323         [id(0x1235)] HRESULT fn5([in] int a);
 324     }
 325
 326     [
 327         odl,
 328         uuid(f711b105-554d-4751-818c-46fcc5d7c0d5),
 329         dual
 330     ]
 331     interface ItestIF7 : ItestIF6
 332     {
 333         [id(0x1236)] HRESULT fn6([in] GUID a);
 334     }
 335
 336     [
 337         odl,
 338         uuid(bdfa260b-ef40-43d3-b071-cddec919f132)
 339     ]
 340         interface ItestIF8
 341     {
 342         HRESULT fn1([in] int x);
 343         HRESULT fn2([out,retval] int *x);
 344     }
 345
 346     [
 347         odl,
 348         uuid(51033a23-dc37-4f19-aa34-4d8a670458a0)
 349
 350     ]
 351     interface ItestIF9 : ItestIF8
 352     {
 353         HRESULT fn3([in] int y);
 354     }
 355
 356     [
 357         odl,
 358         uuid(2e8f14fe-0bce-42f0-8b7d-3af8393c7967)
 359     ]
 360     dispinterface ItestIF10
 361     {
 362         interface ItestIF9;
 363     }
 364
 365     [
 366         odl,
 367         uuid(7d9e9371-482e-4944-9b19-511fc705236f)
 368     ]
 369     dispinterface ItestIF11
 370     {
 371         interface ItestIF7;
 372     }
 373
 374 };