git.oblomov.eu Git - wine/blob - 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     } MYSTRUCT;
  43
  44     coclass ApplicationObject2;
  45
  46     [
  47         odl,
  48         uuid(12345678-1234-4321-1234-121212121212)
  49     ]
  50     interface ISomethingFromDispatch : IDispatch
  51     {
  52         HRESULT anotherfn(void);
  53     }
  54
  55     [
  56         odl,
  57         oleautomation,
  58         dual,
  59         uuid(3f7e06fe-0bce-46f0-8b7d-3a68393c7967)
  60     ]
  61     interface ItestDual : IDispatch
  62     {
  63         HRESULT test();
  64     }
  65
  66     [
  67         odl,
  68         uuid(a1f8cae3-c947-4c5f-b57d-c87b9b5f3586),
  69         oleautomation,
  70         dual
  71     ]
  72     interface IWidget : IDispatch
  73     {
  74         [propput, id(DISPID_TM_NAME)]
  75         HRESULT Name([in] BSTR name);
  76         [propget, id(DISPID_TM_NAME)]
  77         HRESULT Name([out, retval] BSTR *name);
  78
  79         [id(DISPID_TM_DOSOMETHING)]
  80         HRESULT DoSomething([in] double number, [out] BSTR *str1, [in, defaultvalue("")] BSTR str2, [in, optional] VARIANT *opt);
  81
  82         [propget, id(DISPID_TM_STATE)]
  83         HRESULT State([out, retval] STATE *state);
  84         [propput, id(DISPID_TM_STATE)]
  85         HRESULT State([in] STATE state);
  86
  87         [id(DISPID_TM_MAP)]
  88         HRESULT Map([in] BSTR bstrId, [out, retval] BSTR *sValue);
  89
  90         [id(DISPID_TM_SETOLECOLOR)]
  91         HRESULT SetOleColor([in] OLE_COLOR val);
  92
  93         [id(DISPID_TM_GETOLECOLOR)]
  94         HRESULT GetOleColor([out, retval] OLE_COLOR *pVal);
  95
  96         [propget, id(DISPID_TM_CLONE)]
  97         HRESULT Clone([out, retval] IWidget **ppVal);
  98
  99         [propget, id(DISPID_TM_CLONEDISPATCH)]
 100         HRESULT CloneDispatch([out, retval] IDispatch **ppVal);
 101
 102         [propget, id(DISPID_TM_CLONECOCLASS)]
 103         HRESULT CloneCoclass([out, retval] ApplicationObject2 **ppVal);
 104
 105         [propget, id(DISPID_VALUE)]
 106         HRESULT Value([in] VARIANT *value, [out, retval] VARIANT *retval);
 107
 108         [id(DISPID_TM_ARRAY)]
 109         HRESULT Array([in] SAFEARRAY(BSTR) values);
 110
 111         [id(DISPID_TM_VARARRAYPTR)]
 112         HRESULT VariantArrayPtr([in] SAFEARRAY(VARIANT) *values);
 113
 114         [id(DISPID_TM_VARIANT)]
 115         HRESULT Variant([in] VARIANT var);
 116
 117         [vararg, id(DISPID_TM_VARARG)]
 118         HRESULT VarArg([in] int numexpect, [in] SAFEARRAY(VARIANT) values);
 119
 120         [id(DISPID_TM_STRUCTARGS)]
 121         HRESULT StructArgs([in] MYSTRUCT byval, [in] MYSTRUCT *byptr, [in] MYSTRUCT arr[5]);
 122
 123         [id(DISPID_TM_ERROR)]
 124         HRESULT Error();
 125
 126         [propget, id(DISPID_TM_CLONEINTERFACE)]
 127         HRESULT CloneInterface([out, retval] ISomethingFromDispatch **ppVal);
 128
 129         [id(DISPID_TM_PROP_WITH_LCID), propput]
 130         HRESULT prop_with_lcid([in,lcid] long lcid, [in] INT i);
 131
 132         [id(DISPID_TM_PROP_WITH_LCID), propget]
 133         HRESULT prop_with_lcid([in,lcid] long lcid, [out,retval] INT *i);
 134
 135         [id(DISPID_TM_PROP_INT), propget]
 136         HRESULT prop_int([out,retval] INT *i);
 137
 138         [id(DISPID_TM_PROP_UINT), propget]
 139         HRESULT prop_uint([out,retval] UINT *i);
 140
 141         [id(DISPID_TM_BYREF_UINT)]
 142         HRESULT ByRefUInt([in, out] UINT *i);
 143     }
 144
 145     [
 146         odl,
 147         uuid(a1f8cae3-c947-3c5f-a57c-c88b9b6f3586),
 148         oleautomation,
 149         dual
 150     ]
 151     interface IStaticWidget : IDispatch
 152     {
 153         [id(DISPID_TM_TESTDUAL)]
 154         HRESULT TestDual([in] ItestDual *p);
 155     }
 156
 157     [
 158         odl,
 159         uuid(a028db05-30f0-4b93-b17a-41c72f831d84),
 160 #if 0 /* FIXME: commented out as causes widl to generate incorrect typelib */
 161         dual,
 162 #endif
 163         oleautomation
 164     ]
 165     interface IKindaEnumWidget : IUnknown
 166     {
 167         HRESULT Next(
 168                      [out] IWidget **widget);
 169
 170         HRESULT Count(
 171                       [out] unsigned long *count);
 172
 173         HRESULT Reset();
 174
 175         HRESULT Clone(
 176                       [out] IKindaEnumWidget **ppenum);
 177     }
 178
 179     [
 180         odl,
 181         uuid(a028db06-30f0-4b93-b17a-41c72f831d84),
 182     ]
 183     interface INonOleAutomation : IUnknown
 184     {
 185         [id(DISPID_NOA_BSTRRET)]
 186         BSTR BstrRet();
 187
 188         [id(DISPID_NOA_ERROR)]
 189         HRESULT Error();
 190     }
 191
 192
 193     [
 194         dllname("comm.drv"),
 195         uuid(d377f60b-8639-4261-8ee7-75c8340d2cc9),
 196     ]
 197     module BadModule
 198     {
 199         [
 200             entry("Foo"),
 201         ]
 202         HRESULT BadModuleFoo();
 203     };
 204
 205     [
 206         dllname("oleaut32.dll"),
 207         uuid(d377f60c-8639-4261-8ee7-75c8340d2cc9),
 208     ]
 209     module BadEntry
 210     {
 211         [
 212             entry("Foo"),
 213         ]
 214         HRESULT BadEntryFoo();
 215     };
 216
 217     [
 218         uuid(bb171948-10ec-407a-9a57-2f85f797ff1a),
 219         appobject,
 220     ]
 221     coclass ApplicationObject2
 222     {
 223         interface IWidget;
 224         [source] interface IWidget;
 225     };
 226
 227     [
 228         odl,
 229         uuid(375f8a9d-33d0-44f3-b972-61f8407899e0)
 230     ]
 231         interface ItestIF1 : IUnknown
 232     {
 233         HRESULT fn1([in] int x);
 234         HRESULT fn2([out,retval] int *x);
 235     }
 236
 237     [
 238         odl,
 239         uuid(094056a3-666f-4956-be12-1859668310b8)
 240     ]
 241     interface ItestIF2 : ItestIF1
 242     {
 243         HRESULT fn3([in] int y);
 244     }
 245
 246     [
 247         odl,
 248         uuid(33baba09-2e68-43ab-81fe-d84b403df2e5)
 249     ]
 250     dispinterface ItestIF3
 251     {
 252         interface ItestIF2;
 253     }
 254
 255     [
 256         odl,
 257         uuid(a01005c7-7491-42eb-94f3-668e37ce60a6)
 258     ]
 259     dispinterface ItestIF4
 260     {
 261         properties:
 262         methods:
 263         [id(0x1c)] HRESULT fn([in] int z);
 264     }
 265
 266     [
 267         odl,
 268         uuid(4ab61e25-c09f-4239-8f7f-7a018ea0199f),
 269         dual
 270     ]
 271     interface ItestIF5 : ItestIF2
 272     {
 273         [id(0x1234)] HRESULT fn4([in] int a);
 274         [id(0x1235)] HRESULT fn5([in] int a);
 275     }
 276
 277     [
 278         odl,
 279         uuid(ec236d8e-2cc7-44f2-b394-36c86ff3da74)
 280     ]
 281     interface ItestIF6 : IDispatch
 282     {
 283         [id(0x1234)] HRESULT fn4([in] int a);
 284         [id(0x1235)] HRESULT fn5([in] int a);
 285     }
 286
 287     [
 288         odl,
 289         uuid(f711b105-554d-4751-818c-46fcc5d7c0d5),
 290         dual
 291     ]
 292     interface ItestIF7 : ItestIF6
 293     {
 294         [id(0x1236)] HRESULT fn6([in] GUID a);
 295     }
 296
 297     [
 298         odl,
 299         uuid(bdfa260b-ef40-43d3-b071-cddec919f132)
 300     ]
 301         interface ItestIF8
 302     {
 303         HRESULT fn1([in] int x);
 304         HRESULT fn2([out,retval] int *x);
 305     }
 306
 307     [
 308         odl,
 309         uuid(51033a23-dc37-4f19-aa34-4d8a670458a0)
 310
 311     ]
 312     interface ItestIF9 : ItestIF8
 313     {
 314         HRESULT fn3([in] int y);
 315     }
 316
 317     [
 318         odl,
 319         uuid(2e8f14fe-0bce-42f0-8b7d-3af8393c7967)
 320     ]
 321     dispinterface ItestIF10
 322     {
 323         interface ItestIF9;
 324     }
 325
 326     [
 327         odl,
 328         uuid(7d9e9371-482e-4944-9b19-511fc705236f)
 329     ]
 330     dispinterface ItestIF11
 331     {
 332         interface ItestIF7;
 333     }
 334
 335 };