xpcidl.xsl@ 42131

Last change on this file since 42131 was 42131, checked in by vboxsync, 12 years ago
Main: fix COM/XPCOM incompatibility issues and add safearray setter support to the C binding XSLT, too
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 72.4 KB

Line
1	<?xml version="1.0"?>
2	<!-- $Id: xpcidl.xsl 42131 2012-07-12 18:16:06Z vboxsync $ -->
3
4	<!--
5	* A template to generate a XPCOM IDL compatible interface definition file
6	* from the generic interface definition expressed in XML.
7
8	Copyright (C) 2008-2012 Oracle Corporation
9
10	This file is part of VirtualBox Open Source Edition (OSE), as
11	available from http://www.virtualbox.org. This file is free software;
12	you can redistribute it and/or modify it under the terms of the GNU
13	General Public License (GPL) as published by the Free Software
14	Foundation, in version 2 as it comes in the "COPYING" file of the
15	VirtualBox OSE distribution. VirtualBox OSE is distributed in the
16	hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
17	-->
18
19	<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
20	<xsl:output method="text"/>
21
22	<xsl:strip-space elements="*"/>
23
24
25	<!--
26	// helper definitions
27	/////////////////////////////////////////////////////////////////////////////
28	-->
29
30	<!--
31	* capitalizes the first letter
32	-->
33	<xsl:template name="capitalize">
34	<xsl:param name="str" select="."/>
35	<xsl:value-of select="
36	concat(
37	translate(substring($str,1,1),'abcdefghijklmnopqrstuvwxyz','ABCDEFGHIJKLMNOPQRSTUVWXYZ'),
38	substring($str,2)
39	)
40	"/>
41	</xsl:template>
42
43	<!--
44	* uncapitalizes the first letter only if the second one is not capital
45	* otherwise leaves the string unchanged
46	-->
47	<xsl:template name="uncapitalize">
48	<xsl:param name="str" select="."/>
49	<xsl:choose>
50	<xsl:when test="not(contains('ABCDEFGHIJKLMNOPQRSTUVWXYZ', substring($str,2,1)))">
51	<xsl:value-of select="
52	concat(
53	translate(substring($str,1,1),'ABCDEFGHIJKLMNOPQRSTUVWXYZ','abcdefghijklmnopqrstuvwxyz'),
54	substring($str,2)
55	)
56	"/>
57	</xsl:when>
58	<xsl:otherwise>
59	<xsl:value-of select="string($str)"/>
60	</xsl:otherwise>
61	</xsl:choose>
62	</xsl:template>
63
64	<!--
65	* translates the string to uppercase
66	-->
67	<xsl:template name="uppercase">
68	<xsl:param name="str" select="."/>
69	<xsl:value-of select="
70	translate($str,'abcdefghijklmnopqrstuvwxyz','ABCDEFGHIJKLMNOPQRSTUVWXYZ')
71	"/>
72	</xsl:template>
73
74
75	<!--
76	* translates the string to lowercase
77	-->
78	<xsl:template name="lowercase">
79	<xsl:param name="str" select="."/>
80	<xsl:value-of select="
81	translate($str,'ABCDEFGHIJKLMNOPQRSTUVWXYZ','abcdefghijklmnopqrstuvwxyz')
82	"/>
83	</xsl:template>
84
85
86	<!--
87	// templates
88	/////////////////////////////////////////////////////////////////////////////
89	-->
90
91
92	<!--
93	* not explicitly matched elements and attributes
94	-->
95	<xsl:template match="*"/>
96
97
98	<!--
99	* header
100	-->
101	<xsl:template match="/idl">
102	<xsl:text>
103	/*
104	* DO NOT EDIT! This is a generated file.
105	*
106	* XPCOM IDL (XPIDL) definition for VirtualBox Main API (COM interfaces)
107	* generated from XIDL (XML interface definition).
108	*
109	* Source : src/VBox/Main/idl/VirtualBox.xidl
110	* Generator : src/VBox/Main/idl/xpcidl.xsl
111	*
112	* This file contains portions from the following Mozilla XPCOM files:
113	* xpcom/include/xpcom/nsID.h
114	* xpcom/include/nsIException.h
115	* xpcom/include/nsprpub/prtypes.h
116	* xpcom/include/xpcom/nsISupportsBase.h
117	*
118	* These files were originally triple-licensed (MPL/GPL2/LGPL2.1). Oracle
119	* elects to distribute this derived work under the LGPL2.1 only.
120	*/
121
122	/*
123	* Copyright (C) 2008-2012 Oracle Corporation
124	*
125	* This file is part of a free software library; you can redistribute
126	* it and/or modify it under the terms of the GNU Lesser General
127	* Public License version 2.1 as published by the Free Software
128	* Foundation and shipped in the "COPYING" file with this library.
129	* The library is distributed in the hope that it will be useful,
130	* but WITHOUT ANY WARRANTY of any kind.
131	*
132	* Oracle LGPL Disclaimer: For the avoidance of doubt, except that if
133	* any license choice other than GPL or LGPL is available it will
134	* apply instead, Oracle elects to use only the Lesser General Public
135	* License version 2.1 (LGPLv2) at this time for any software where
136	* a choice of LGPL license versions is made available with the
137	* language indicating that LGPLv2 or any later version may be used,
138	* or where a choice of which version of the LGPL is applied is
139	* otherwise unspecified.
140	*/
141
142	#ifndef ___VirtualBox_CXPCOM_h
143	#define ___VirtualBox_CXPCOM_h
144
145	#ifdef __cplusplus
146	# include "VirtualBox_XPCOM.h"
147	#else /* !__cplusplus */
148
149	#include <stddef.h>
150	#include "wchar.h"
151
152	#if defined(WIN32)
153
154	#define PR_EXPORT(__type) extern __declspec(dllexport) __type
155	#define PR_EXPORT_DATA(__type) extern __declspec(dllexport) __type
156	#define PR_IMPORT(__type) __declspec(dllimport) __type
157	#define PR_IMPORT_DATA(__type) __declspec(dllimport) __type
158
159	#define PR_EXTERN(__type) extern __declspec(dllexport) __type
160	#define PR_IMPLEMENT(__type) __declspec(dllexport) __type
161	#define PR_EXTERN_DATA(__type) extern __declspec(dllexport) __type
162	#define PR_IMPLEMENT_DATA(__type) __declspec(dllexport) __type
163
164	#define PR_CALLBACK
165	#define PR_CALLBACK_DECL
166	#define PR_STATIC_CALLBACK(__x) static __x
167
168	#elif defined(XP_BEOS)
169
170	#define PR_EXPORT(__type) extern __declspec(dllexport) __type
171	#define PR_EXPORT_DATA(__type) extern __declspec(dllexport) __type
172	#define PR_IMPORT(__type) extern __declspec(dllexport) __type
173	#define PR_IMPORT_DATA(__type) extern __declspec(dllexport) __type
174
175	#define PR_EXTERN(__type) extern __declspec(dllexport) __type
176	#define PR_IMPLEMENT(__type) __declspec(dllexport) __type
177	#define PR_EXTERN_DATA(__type) extern __declspec(dllexport) __type
178	#define PR_IMPLEMENT_DATA(__type) __declspec(dllexport) __type
179
180	#define PR_CALLBACK
181	#define PR_CALLBACK_DECL
182	#define PR_STATIC_CALLBACK(__x) static __x
183
184	#elif defined(WIN16)
185
186	#define PR_CALLBACK_DECL __cdecl
187
188	#if defined(_WINDLL)
189	#define PR_EXPORT(__type) extern __type _cdecl _export _loadds
190	#define PR_IMPORT(__type) extern __type _cdecl _export _loadds
191	#define PR_EXPORT_DATA(__type) extern __type _export
192	#define PR_IMPORT_DATA(__type) extern __type _export
193
194	#define PR_EXTERN(__type) extern __type _cdecl _export _loadds
195	#define PR_IMPLEMENT(__type) __type _cdecl _export _loadds
196	#define PR_EXTERN_DATA(__type) extern __type _export
197	#define PR_IMPLEMENT_DATA(__type) __type _export
198
199	#define PR_CALLBACK __cdecl __loadds
200	#define PR_STATIC_CALLBACK(__x) static __x PR_CALLBACK
201
202	#else /* this must be .EXE */
203	#define PR_EXPORT(__type) extern __type _cdecl _export
204	#define PR_IMPORT(__type) extern __type _cdecl _export
205	#define PR_EXPORT_DATA(__type) extern __type _export
206	#define PR_IMPORT_DATA(__type) extern __type _export
207
208	#define PR_EXTERN(__type) extern __type _cdecl _export
209	#define PR_IMPLEMENT(__type) __type _cdecl _export
210	#define PR_EXTERN_DATA(__type) extern __type _export
211	#define PR_IMPLEMENT_DATA(__type) __type _export
212
213	#define PR_CALLBACK __cdecl __loadds
214	#define PR_STATIC_CALLBACK(__x) __x PR_CALLBACK
215	#endif /* _WINDLL */
216
217	#elif defined(XP_MAC)
218
219	#define PR_EXPORT(__type) extern __declspec(export) __type
220	#define PR_EXPORT_DATA(__type) extern __declspec(export) __type
221	#define PR_IMPORT(__type) extern __declspec(export) __type
222	#define PR_IMPORT_DATA(__type) extern __declspec(export) __type
223
224	#define PR_EXTERN(__type) extern __declspec(export) __type
225	#define PR_IMPLEMENT(__type) __declspec(export) __type
226	#define PR_EXTERN_DATA(__type) extern __declspec(export) __type
227	#define PR_IMPLEMENT_DATA(__type) __declspec(export) __type
228
229	#define PR_CALLBACK
230	#define PR_CALLBACK_DECL
231	#define PR_STATIC_CALLBACK(__x) static __x
232
233	#elif defined(XP_OS2) && defined(__declspec)
234
235	#define PR_EXPORT(__type) extern __declspec(dllexport) __type
236	#define PR_EXPORT_DATA(__type) extern __declspec(dllexport) __type
237	#define PR_IMPORT(__type) __declspec(dllimport) __type
238	#define PR_IMPORT_DATA(__type) __declspec(dllimport) __type
239
240	#define PR_EXTERN(__type) extern __declspec(dllexport) __type
241	#define PR_IMPLEMENT(__type) __declspec(dllexport) __type
242	#define PR_EXTERN_DATA(__type) extern __declspec(dllexport) __type
243	#define PR_IMPLEMENT_DATA(__type) __declspec(dllexport) __type
244
245	#define PR_CALLBACK
246	#define PR_CALLBACK_DECL
247	#define PR_STATIC_CALLBACK(__x) static __x
248
249	#elif defined(XP_OS2_VACPP)
250
251	#define PR_EXPORT(__type) extern __type
252	#define PR_EXPORT_DATA(__type) extern __type
253	#define PR_IMPORT(__type) extern __type
254	#define PR_IMPORT_DATA(__type) extern __type
255
256	#define PR_EXTERN(__type) extern __type
257	#define PR_IMPLEMENT(__type) __type
258	#define PR_EXTERN_DATA(__type) extern __type
259	#define PR_IMPLEMENT_DATA(__type) __type
260	#define PR_CALLBACK _Optlink
261	#define PR_CALLBACK_DECL
262	#define PR_STATIC_CALLBACK(__x) static __x PR_CALLBACK
263
264	#else /* Unix */
265
266	# ifdef VBOX_HAVE_VISIBILITY_HIDDEN
267	# define PR_EXPORT(__type) __attribute__((visibility("default"))) extern __type
268	# define PR_EXPORT_DATA(__type) __attribute__((visibility("default"))) extern __type
269	# define PR_IMPORT(__type) extern __type
270	# define PR_IMPORT_DATA(__type) extern __type
271	# define PR_EXTERN(__type) __attribute__((visibility("default"))) extern __type
272	# define PR_IMPLEMENT(__type) __attribute__((visibility("default"))) __type
273	# define PR_EXTERN_DATA(__type) __attribute__((visibility("default"))) extern __type
274	# define PR_IMPLEMENT_DATA(__type) __attribute__((visibility("default"))) __type
275	# define PR_CALLBACK
276	# define PR_CALLBACK_DECL
277	# define PR_STATIC_CALLBACK(__x) static __x
278	# else
279	# define PR_EXPORT(__type) extern __type
280	# define PR_EXPORT_DATA(__type) extern __type
281	# define PR_IMPORT(__type) extern __type
282	# define PR_IMPORT_DATA(__type) extern __type
283	# define PR_EXTERN(__type) extern __type
284	# define PR_IMPLEMENT(__type) __type
285	# define PR_EXTERN_DATA(__type) extern __type
286	# define PR_IMPLEMENT_DATA(__type) __type
287	# define PR_CALLBACK
288	# define PR_CALLBACK_DECL
289	# define PR_STATIC_CALLBACK(__x) static __x
290	# endif
291	#endif
292
293	#if defined(_NSPR_BUILD_)
294	#define NSPR_API(__type) PR_EXPORT(__type)
295	#define NSPR_DATA_API(__type) PR_EXPORT_DATA(__type)
296	#else
297	#define NSPR_API(__type) PR_IMPORT(__type)
298	#define NSPR_DATA_API(__type) PR_IMPORT_DATA(__type)
299	#endif
300
301	typedef unsigned char PRUint8;
302	#if (defined(HPUX) && defined(__cplusplus) \
303	&& !defined(__GNUC__) && __cplusplus < 199707L) \
304	\|\| (defined(SCO) && defined(__cplusplus) \
305	&& !defined(__GNUC__) && __cplusplus == 1L)
306	typedef char PRInt8;
307	#else
308	typedef signed char PRInt8;
309	#endif
310
311	#define PR_INT8_MAX 127
312	#define PR_INT8_MIN (-128)
313	#define PR_UINT8_MAX 255U
314
315	typedef unsigned short PRUint16;
316	typedef short PRInt16;
317
318	#define PR_INT16_MAX 32767
319	#define PR_INT16_MIN (-32768)
320	#define PR_UINT16_MAX 65535U
321
322	typedef unsigned int PRUint32;
323	typedef int PRInt32;
324	#define PR_INT32(x) x
325	#define PR_UINT32(x) x ## U
326
327	#define PR_INT32_MAX PR_INT32(2147483647)
328	#define PR_INT32_MIN (-PR_INT32_MAX - 1)
329	#define PR_UINT32_MAX PR_UINT32(4294967295)
330
331	typedef long PRInt64;
332	typedef unsigned long PRUint64;
333	typedef int PRIntn;
334	typedef unsigned int PRUintn;
335
336	typedef double PRFloat64;
337	typedef size_t PRSize;
338
339	typedef ptrdiff_t PRPtrdiff;
340
341	typedef unsigned long PRUptrdiff;
342
343	typedef PRIntn PRBool;
344
345	#define PR_TRUE 1
346	#define PR_FALSE 0
347
348	typedef PRUint8 PRPackedBool;
349
350	/*
351	** Status code used by some routines that have a single point of failure or
352	** special status return.
353	*/
354	typedef enum { PR_FAILURE = -1, PR_SUCCESS = 0 } PRStatus;
355
356	#ifndef __PRUNICHAR__
357	#define __PRUNICHAR__
358	#if defined(WIN32) \|\| defined(XP_MAC)
359	typedef wchar_t PRUnichar;
360	#else
361	typedef PRUint16 PRUnichar;
362	#endif
363	#endif
364
365	typedef long PRWord;
366	typedef unsigned long PRUword;
367
368	#define nsnull 0
369	typedef PRUint32 nsresult;
370
371	#if defined(__GNUC__) && (__GNUC__ > 2)
372	#define NS_LIKELY(x) (__builtin_expect((x), 1))
373	#define NS_UNLIKELY(x) (__builtin_expect((x), 0))
374	#else
375	#define NS_LIKELY(x) (x)
376	#define NS_UNLIKELY(x) (x)
377	#endif
378
379	#define NS_FAILED(_nsresult) (NS_UNLIKELY((_nsresult) & 0x80000000))
380	#define NS_SUCCEEDED(_nsresult) (NS_LIKELY(!((_nsresult) & 0x80000000)))
381
382	#ifdef VBOX_WITH_XPCOM_NAMESPACE_CLEANUP
383	# define PR_IntervalNow VBoxNsprPR_IntervalNow
384	# define PR_TicksPerSecond VBoxNsprPR_TicksPerSecond
385	# define PR_SecondsToInterval VBoxNsprPR_SecondsToInterval
386	# define PR_MillisecondsToInterval VBoxNsprPR_MillisecondsToInterval
387	# define PR_MicrosecondsToInterval VBoxNsprPR_MicrosecondsToInterval
388	# define PR_IntervalToSeconds VBoxNsprPR_IntervalToSeconds
389	# define PR_IntervalToMilliseconds VBoxNsprPR_IntervalToMilliseconds
390	# define PR_IntervalToMicroseconds VBoxNsprPR_IntervalToMicroseconds
391	# define PR_EnterMonitor VBoxNsprPR_EnterMonitor
392	# define PR_ExitMonitor VBoxNsprPR_ExitMonitor
393	# define PR_Notify VBoxNsprPR_Notify
394	# define PR_NotifyAll VBoxNsprPR_NotifyAll
395	# define PR_Wait VBoxNsprPR_Wait
396	# define PR_NewMonitor VBoxNsprPR_NewMonitor
397	# define PR_DestroyMonitor VBoxNsprPR_DestroyMonitor
398	#endif /* VBOX_WITH_XPCOM_NAMESPACE_CLEANUP */
399
400	typedef PRUint32 PRIntervalTime;
401
402	#define PR_INTERVAL_MIN 1000UL
403	#define PR_INTERVAL_MAX 100000UL
404	#define PR_INTERVAL_NO_WAIT 0UL
405	#define PR_INTERVAL_NO_TIMEOUT 0xffffffffUL
406
407	NSPR_API(PRIntervalTime) PR_IntervalNow(void);
408	NSPR_API(PRUint32) PR_TicksPerSecond(void);
409	NSPR_API(PRIntervalTime) PR_SecondsToInterval(PRUint32 seconds);
410	NSPR_API(PRIntervalTime) PR_MillisecondsToInterval(PRUint32 milli);
411	NSPR_API(PRIntervalTime) PR_MicrosecondsToInterval(PRUint32 micro);
412	NSPR_API(PRUint32) PR_IntervalToSeconds(PRIntervalTime ticks);
413	NSPR_API(PRUint32) PR_IntervalToMilliseconds(PRIntervalTime ticks);
414	NSPR_API(PRUint32) PR_IntervalToMicroseconds(PRIntervalTime ticks);
415
416	typedef struct PRMonitor PRMonitor;
417
418	NSPR_API(PRMonitor*) PR_NewMonitor(void);
419	NSPR_API(void) PR_DestroyMonitor(PRMonitor *mon);
420	NSPR_API(void) PR_EnterMonitor(PRMonitor *mon);
421	NSPR_API(PRStatus) PR_ExitMonitor(PRMonitor *mon);
422	NSPR_API(PRStatus) PR_Wait(PRMonitor *mon, PRIntervalTime ticks);
423	NSPR_API(PRStatus) PR_Notify(PRMonitor *mon);
424	NSPR_API(PRStatus) PR_NotifyAll(PRMonitor *mon);
425
426	#ifdef VBOX_WITH_XPCOM_NAMESPACE_CLEANUP
427	# define PR_CreateThread VBoxNsprPR_CreateThread
428	# define PR_JoinThread VBoxNsprPR_JoinThread
429	# define PR_Sleep VBoxNsprPR_Sleep
430	# define PR_GetCurrentThread VBoxNsprPR_GetCurrentThread
431	# define PR_GetThreadState VBoxNsprPR_GetThreadState
432	# define PR_SetThreadPrivate VBoxNsprPR_SetThreadPrivate
433	# define PR_GetThreadPrivate VBoxNsprPR_GetThreadPrivate
434	# define PR_NewThreadPrivateIndex VBoxNsprPR_NewThreadPrivateIndex
435	# define PR_GetThreadPriority VBoxNsprPR_GetThreadPriority
436	# define PR_SetThreadPriority VBoxNsprPR_SetThreadPriority
437	# define PR_Interrupt VBoxNsprPR_Interrupt
438	# define PR_ClearInterrupt VBoxNsprPR_ClearInterrupt
439	# define PR_BlockInterrupt VBoxNsprPR_BlockInterrupt
440	# define PR_UnblockInterrupt VBoxNsprPR_UnblockInterrupt
441	# define PR_GetThreadScope VBoxNsprPR_GetThreadScope
442	# define PR_GetThreadType VBoxNsprPR_GetThreadType
443	#endif /* VBOX_WITH_XPCOM_NAMESPACE_CLEANUP */
444
445	typedef struct PRThread PRThread;
446	typedef struct PRThreadStack PRThreadStack;
447
448	typedef enum PRThreadType {
449	PR_USER_THREAD,
450	PR_SYSTEM_THREAD
451	} PRThreadType;
452
453	typedef enum PRThreadScope {
454	PR_LOCAL_THREAD,
455	PR_GLOBAL_THREAD,
456	PR_GLOBAL_BOUND_THREAD
457	} PRThreadScope;
458
459	typedef enum PRThreadState {
460	PR_JOINABLE_THREAD,
461	PR_UNJOINABLE_THREAD
462	} PRThreadState;
463
464	typedef enum PRThreadPriority
465	{
466	PR_PRIORITY_FIRST = 0, /* just a placeholder */
467	PR_PRIORITY_LOW = 0, /* the lowest possible priority */
468	PR_PRIORITY_NORMAL = 1, /* most common expected priority */
469	PR_PRIORITY_HIGH = 2, /* slightly more aggressive scheduling */
470	PR_PRIORITY_URGENT = 3, /* it does little good to have more than one */
471	PR_PRIORITY_LAST = 3 /* this is just a placeholder */
472	} PRThreadPriority;
473
474	NSPR_API(PRThread*) PR_CreateThread(PRThreadType type,
475	void (PR_CALLBACK start)(void arg),
476	void *arg,
477	PRThreadPriority priority,
478	PRThreadScope scope,
479	PRThreadState state,
480	PRUint32 stackSize);
481	NSPR_API(PRStatus) PR_JoinThread(PRThread *thread);
482	NSPR_API(PRThread*) PR_GetCurrentThread(void);
483	#ifndef NO_NSPR_10_SUPPORT
484	#define PR_CurrentThread() PR_GetCurrentThread() /* for nspr1.0 compat. */
485	#endif /* NO_NSPR_10_SUPPORT */
486	NSPR_API(PRThreadPriority) PR_GetThreadPriority(const PRThread *thread);
487	NSPR_API(void) PR_SetThreadPriority(PRThread *thread, PRThreadPriority priority);
488
489	typedef void (PR_CALLBACK PRThreadPrivateDTOR)(void priv);
490
491	NSPR_API(PRStatus) PR_NewThreadPrivateIndex(
492	PRUintn *newIndex, PRThreadPrivateDTOR destructor);
493	NSPR_API(PRStatus) PR_SetThreadPrivate(PRUintn tpdIndex, void *priv);
494	NSPR_API(void*) PR_GetThreadPrivate(PRUintn tpdIndex);
495	NSPR_API(PRStatus) PR_Interrupt(PRThread *thread);
496	NSPR_API(void) PR_ClearInterrupt(void);
497	NSPR_API(void) PR_BlockInterrupt(void);
498	NSPR_API(void) PR_UnblockInterrupt(void);
499	NSPR_API(PRStatus) PR_Sleep(PRIntervalTime ticks);
500	NSPR_API(PRThreadScope) PR_GetThreadScope(const PRThread *thread);
501	NSPR_API(PRThreadType) PR_GetThreadType(const PRThread *thread);
502	NSPR_API(PRThreadState) PR_GetThreadState(const PRThread *thread);
503
504	#ifdef VBOX_WITH_XPCOM_NAMESPACE_CLEANUP
505	# define PR_DestroyLock VBoxNsprPR_DestroyLock
506	# define PR_Lock VBoxNsprPR_Lock
507	# define PR_NewLock VBoxNsprPR_NewLock
508	# define PR_Unlock VBoxNsprPR_Unlock
509	#endif /* VBOX_WITH_XPCOM_NAMESPACE_CLEANUP */
510
511	typedef struct PRLock PRLock;
512
513	NSPR_API(PRLock*) PR_NewLock(void);
514	NSPR_API(void) PR_DestroyLock(PRLock *lock);
515	NSPR_API(void) PR_Lock(PRLock *lock);
516	NSPR_API(PRStatus) PR_Unlock(PRLock *lock);
517
518	#ifdef VBOX_WITH_XPCOM_NAMESPACE_CLEANUP
519	# define PR_NewCondVar VBoxNsprPR_NewCondVar
520	# define PR_DestroyCondVar VBoxNsprPR_DestroyCondVar
521	# define PR_WaitCondVar VBoxNsprPR_WaitCondVar
522	# define PR_NotifyCondVar VBoxNsprPR_NotifyCondVar
523	# define PR_NotifyAllCondVar VBoxNsprPR_NotifyAllCondVar
524	#endif /* VBOX_WITH_XPCOM_NAMESPACE_CLEANUP */
525
526	typedef struct PRCondVar PRCondVar;
527
528	NSPR_API(PRCondVar) PR_NewCondVar(PRLock lock);
529	NSPR_API(void) PR_DestroyCondVar(PRCondVar *cvar);
530	NSPR_API(PRStatus) PR_WaitCondVar(PRCondVar *cvar, PRIntervalTime timeout);
531	NSPR_API(PRStatus) PR_NotifyCondVar(PRCondVar *cvar);
532	NSPR_API(PRStatus) PR_NotifyAllCondVar(PRCondVar *cvar);
533
534	typedef struct PRCListStr PRCList;
535
536	struct PRCListStr {
537	PRCList *next;
538	PRCList *prev;
539	};
540
541	#ifdef VBOX_WITH_XPCOM_NAMESPACE_CLEANUP
542	# define PL_DestroyEvent VBoxNsplPL_DestroyEvent
543	# define PL_HandleEvent VBoxNsplPL_HandleEvent
544	# define PL_InitEvent VBoxNsplPL_InitEvent
545	# define PL_CreateEventQueue VBoxNsplPL_CreateEventQueue
546	# define PL_CreateMonitoredEventQueue VBoxNsplPL_CreateMonitoredEventQueue
547	# define PL_CreateNativeEventQueue VBoxNsplPL_CreateNativeEventQueue
548	# define PL_DequeueEvent VBoxNsplPL_DequeueEvent
549	# define PL_DestroyEventQueue VBoxNsplPL_DestroyEventQueue
550	# define PL_EventAvailable VBoxNsplPL_EventAvailable
551	# define PL_EventLoop VBoxNsplPL_EventLoop
552	# define PL_GetEvent VBoxNsplPL_GetEvent
553	# define PL_GetEventOwner VBoxNsplPL_GetEventOwner
554	# define PL_GetEventQueueMonitor VBoxNsplPL_GetEventQueueMonitor
555	# define PL_GetEventQueueSelectFD VBoxNsplPL_GetEventQueueSelectFD
556	# define PL_MapEvents VBoxNsplPL_MapEvents
557	# define PL_PostEvent VBoxNsplPL_PostEvent
558	# define PL_PostSynchronousEvent VBoxNsplPL_PostSynchronousEvent
559	# define PL_ProcessEventsBeforeID VBoxNsplPL_ProcessEventsBeforeID
560	# define PL_ProcessPendingEvents VBoxNsplPL_ProcessPendingEvents
561	# define PL_RegisterEventIDFunc VBoxNsplPL_RegisterEventIDFunc
562	# define PL_RevokeEvents VBoxNsplPL_RevokeEvents
563	# define PL_UnregisterEventIDFunc VBoxNsplPL_UnregisterEventIDFunc
564	# define PL_WaitForEvent VBoxNsplPL_WaitForEvent
565	# define PL_IsQueueNative VBoxNsplPL_IsQueueNative
566	# define PL_IsQueueOnCurrentThread VBoxNsplPL_IsQueueOnCurrentThread
567	# define PL_FavorPerformanceHint VBoxNsplPL_FavorPerformanceHint
568	#endif /* VBOX_WITH_XPCOM_NAMESPACE_CLEANUP */
569
570	typedef struct PLEvent PLEvent;
571	typedef struct PLEventQueue PLEventQueue;
572
573	PR_EXTERN(PLEventQueue*)
574	PL_CreateEventQueue(const char* name, PRThread* handlerThread);
575	PR_EXTERN(PLEventQueue *)
576	PL_CreateNativeEventQueue(
577	const char *name,
578	PRThread *handlerThread
579	);
580	PR_EXTERN(PLEventQueue *)
581	PL_CreateMonitoredEventQueue(
582	const char *name,
583	PRThread *handlerThread
584	);
585	PR_EXTERN(void)
586	PL_DestroyEventQueue(PLEventQueue* self);
587	PR_EXTERN(PRMonitor*)
588	PL_GetEventQueueMonitor(PLEventQueue* self);
589
590	#define PL_ENTER_EVENT_QUEUE_MONITOR(queue) \
591	PR_EnterMonitor(PL_GetEventQueueMonitor(queue))
592
593	#define PL_EXIT_EVENT_QUEUE_MONITOR(queue) \
594	PR_ExitMonitor(PL_GetEventQueueMonitor(queue))
595
596	PR_EXTERN(PRStatus) PL_PostEvent(PLEventQueue* self, PLEvent* event);
597	PR_EXTERN(void) PL_PostSynchronousEvent(PLEventQueue self, PLEvent* event);
598	PR_EXTERN(PLEvent) PL_GetEvent(PLEventQueue self);
599	PR_EXTERN(PRBool) PL_EventAvailable(PLEventQueue* self);
600
601	typedef void (PR_CALLBACK PLEventFunProc)(PLEvent event, void* data, PLEventQueue* queue);
602
603	PR_EXTERN(void) PL_MapEvents(PLEventQueue* self, PLEventFunProc fun, void* data);
604	PR_EXTERN(void) PL_RevokeEvents(PLEventQueue* self, void* owner);
605	PR_EXTERN(void) PL_ProcessPendingEvents(PLEventQueue* self);
606	PR_EXTERN(PLEvent) PL_WaitForEvent(PLEventQueue self);
607	PR_EXTERN(void) PL_EventLoop(PLEventQueue* self);
608	PR_EXTERN(PRInt32) PL_GetEventQueueSelectFD(PLEventQueue* self);
609	PR_EXTERN(PRBool) PL_IsQueueOnCurrentThread( PLEventQueue *queue );
610	PR_EXTERN(PRBool) PL_IsQueueNative(PLEventQueue *queue);
611
612	typedef void* (PR_CALLBACK PLHandleEventProc)(PLEvent self);
613	typedef void (PR_CALLBACK PLDestroyEventProc)(PLEvent self);
614	PR_EXTERN(void)
615	PL_InitEvent(PLEvent* self, void* owner,
616	PLHandleEventProc handler,
617	PLDestroyEventProc destructor);
618	PR_EXTERN(void) PL_GetEventOwner(PLEvent self);
619	PR_EXTERN(void) PL_HandleEvent(PLEvent* self);
620	PR_EXTERN(void) PL_DestroyEvent(PLEvent* self);
621	PR_EXTERN(void) PL_DequeueEvent(PLEvent* self, PLEventQueue* queue);
622	PR_EXTERN(void) PL_FavorPerformanceHint(PRBool favorPerformanceOverEventStarvation, PRUint32 starvationDelay);
623
624	struct PLEvent {
625	PRCList link;
626	PLHandleEventProc handler;
627	PLDestroyEventProc destructor;
628	void* owner;
629	void* synchronousResult;
630	PRLock* lock;
631	PRCondVar* condVar;
632	PRBool handled;
633	#ifdef PL_POST_TIMINGS
634	PRIntervalTime postTime;
635	#endif
636	#ifdef XP_UNIX
637	unsigned long id;
638	#endif /* XP_UNIX */
639	/* other fields follow... */
640	};
641
642	#if defined(XP_WIN) \|\| defined(XP_OS2)
643
644	PR_EXTERN(HWND)
645	PL_GetNativeEventReceiverWindow(
646	PLEventQueue *eqp
647	);
648	#endif /* XP_WIN \|\| XP_OS2 */
649
650	#ifdef XP_UNIX
651
652	PR_EXTERN(PRInt32)
653	PL_ProcessEventsBeforeID(PLEventQueue *aSelf, unsigned long aID);
654
655	typedef unsigned long (PR_CALLBACK PLGetEventIDFunc)(void aClosure);
656
657	PR_EXTERN(void)
658	PL_RegisterEventIDFunc(PLEventQueue *aSelf, PLGetEventIDFunc aFunc,
659	void *aClosure);
660	PR_EXTERN(void) PL_UnregisterEventIDFunc(PLEventQueue *aSelf);
661
662	#endif /* XP_UNIX */
663
664	/* Standard "it worked" return value */
665	#define NS_OK 0
666
667	#define NS_ERROR_BASE ((nsresult) 0xC1F30000)
668
669	/* Returned when an instance is not initialized */
670	#define NS_ERROR_NOT_INITIALIZED (NS_ERROR_BASE + 1)
671
672	/* Returned when an instance is already initialized */
673	#define NS_ERROR_ALREADY_INITIALIZED (NS_ERROR_BASE + 2)
674
675	/* Returned by a not implemented function */
676	#define NS_ERROR_NOT_IMPLEMENTED ((nsresult) 0x80004001L)
677
678	/* Returned when a given interface is not supported. */
679	#define NS_NOINTERFACE ((nsresult) 0x80004002L)
680	#define NS_ERROR_NO_INTERFACE NS_NOINTERFACE
681
682	#define NS_ERROR_INVALID_POINTER ((nsresult) 0x80004003L)
683	#define NS_ERROR_NULL_POINTER NS_ERROR_INVALID_POINTER
684
685	/* Returned when a function aborts */
686	#define NS_ERROR_ABORT ((nsresult) 0x80004004L)
687
688	/* Returned when a function fails */
689	#define NS_ERROR_FAILURE ((nsresult) 0x80004005L)
690
691	/* Returned when an unexpected error occurs */
692	#define NS_ERROR_UNEXPECTED ((nsresult) 0x8000ffffL)
693
694	/* Returned when a memory allocation fails */
695	#define NS_ERROR_OUT_OF_MEMORY ((nsresult) 0x8007000eL)
696
697	/* Returned when an illegal value is passed */
698	#define NS_ERROR_ILLEGAL_VALUE ((nsresult) 0x80070057L)
699	#define NS_ERROR_INVALID_ARG NS_ERROR_ILLEGAL_VALUE
700
701	/* Returned when a class doesn't allow aggregation */
702	#define NS_ERROR_NO_AGGREGATION ((nsresult) 0x80040110L)
703
704	/* Returned when an operation can't complete due to an unavailable resource */
705	#define NS_ERROR_NOT_AVAILABLE ((nsresult) 0x80040111L)
706
707	/* Returned when a class is not registered */
708	#define NS_ERROR_FACTORY_NOT_REGISTERED ((nsresult) 0x80040154L)
709
710	/* Returned when a class cannot be registered, but may be tried again later */
711	#define NS_ERROR_FACTORY_REGISTER_AGAIN ((nsresult) 0x80040155L)
712
713	/* Returned when a dynamically loaded factory couldn't be found */
714	#define NS_ERROR_FACTORY_NOT_LOADED ((nsresult) 0x800401f8L)
715
716	/* Returned when a factory doesn't support signatures */
717	#define NS_ERROR_FACTORY_NO_SIGNATURE_SUPPORT \
718	(NS_ERROR_BASE + 0x101)
719
720	/* Returned when a factory already is registered */
721	#define NS_ERROR_FACTORY_EXISTS (NS_ERROR_BASE + 0x100)
722
723
724	/**
725	* An "interface id" which can be used to uniquely identify a given
726	* interface.
727	* A "unique identifier". This is modeled after OSF DCE UUIDs.
728	*/
729
730	struct nsID {
731	PRUint32 m0;
732	PRUint16 m1;
733	PRUint16 m2;
734	PRUint8 m3[8];
735	};
736
737	typedef struct nsID nsID;
738	typedef nsID nsIID;
739
740	struct nsISupports; /* forward declaration */
741	struct nsIStackFrame; /* forward declaration */
742	struct nsIException; /* forward declaration */
743	typedef struct nsISupports nsISupports; /* forward declaration */
744	typedef struct nsIStackFrame nsIStackFrame; /* forward declaration */
745	typedef struct nsIException nsIException; /* forward declaration */
746
747	/**
748	* IID for the nsISupports interface
749	* {00000000-0000-0000-c000-000000000046}
750	*
751	* To maintain binary compatibility with COM's IUnknown, we define the IID
752	* of nsISupports to be the same as that of COM's IUnknown.
753	*/
754	#define NS_ISUPPORTS_IID \
755	{ 0x00000000, 0x0000, 0x0000, \
756	{0xc0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46} }
757
758	/**
759	* Reference count values
760	*
761	* This is the return type for AddRef() and Release() in nsISupports.
762	* IUnknown of COM returns an unsigned long from equivalent functions.
763	* The following ifdef exists to maintain binary compatibility with
764	* IUnknown.
765	*/
766
767	/**
768	* Basic component object model interface. Objects which implement
769	* this interface support runtime interface discovery (QueryInterface)
770	* and a reference counted memory model (AddRef/Release). This is
771	* modelled after the win32 IUnknown API.
772	*/
773	struct nsISupports_vtbl {
774
775	/**
776	* @name Methods
777	*/
778
779	/**
780	* A run time mechanism for interface discovery.
781	* @param aIID [in] A requested interface IID
782	* @param aInstancePtr [out] A pointer to an interface pointer to
783	* receive the result.
784	* @return NS_OK if the interface is supported by the associated
785	* instance, NS_NOINTERFACE if it is not.
786	* NS_ERROR_INVALID_POINTER if aInstancePtr is NULL.
787	*/
788	nsresult (QueryInterface)(nsISupports pThis, const nsID iid, void *resultp);
789	/**
790	* Increases the reference count for this interface.
791	* The associated instance will not be deleted unless
792	* the reference count is returned to zero.
793	*
794	* @return The resulting reference count.
795	*/
796	nsresult (AddRef)(nsISupports pThis);
797
798	/**
799	* Decreases the reference count for this interface.
800	* Generally, if the reference count returns to zero,
801	* the associated instance is deleted.
802	*
803	* @return The resulting reference count.
804	*/
805	nsresult (Release)(nsISupports pThis);
806
807	};
808
809	struct nsISupports {
810	struct nsISupports_vtbl *vtbl;
811	};
812
813	/* starting interface: nsIException */
814	#define NS_IEXCEPTION_IID_STR "f3a8d3b4-c424-4edc-8bf6-8974c983ba78"
815
816	#define NS_IEXCEPTION_IID \
817	{0xf3a8d3b4, 0xc424, 0x4edc, \
818	{ 0x8b, 0xf6, 0x89, 0x74, 0xc9, 0x83, 0xba, 0x78 }}
819
820	struct nsIException_vtbl {
821
822	/* Methods from the Class nsISupports */
823	struct nsISupports_vtbl nsisupports;
824
825	/* readonly attribute string message; */
826	nsresult (GetMessage)(nsIException pThis, PRUnichar * *aMessage);
827
828	/* readonly attribute nsresult (result; /
829	nsresult (GetResult)(nsIException pThis, nsresult *aResult);
830
831	/* readonly attribute string name; */
832	nsresult (GetName)(nsIException pThis, PRUnichar * *aName);
833
834	/* readonly attribute string filename; */
835	nsresult (GetFilename)(nsIException pThis, PRUnichar * *aFilename);
836
837	/* readonly attribute PRUint32 lineNumber; */
838	nsresult (GetLineNumber)(nsIException pThis, PRUint32 *aLineNumber);
839
840	/* readonly attribute PRUint32 columnNumber; */
841	nsresult (GetColumnNumber)(nsIException pThis, PRUint32 *aColumnNumber);
842
843	/* readonly attribute nsIStackFrame location; */
844	nsresult (GetLocation)(nsIException pThis, nsIStackFrame * *aLocation);
845
846	/* readonly attribute nsIException inner; */
847	nsresult (GetInner)(nsIException pThis, nsIException * *aInner);
848
849	/* readonly attribute nsISupports data; */
850	nsresult (GetData)(nsIException pThis, nsISupports * *aData);
851
852	/* string toString (); */
853	nsresult (ToString)(nsIException pThis, PRUnichar **_retval);
854	};
855
856	struct nsIException {
857	struct nsIException_vtbl *vtbl;
858	};
859
860	/* starting interface: nsIStackFrame */
861	#define NS_ISTACKFRAME_IID_STR "91d82105-7c62-4f8b-9779-154277c0ee90"
862
863	#define NS_ISTACKFRAME_IID \
864	{0x91d82105, 0x7c62, 0x4f8b, \
865	{ 0x97, 0x79, 0x15, 0x42, 0x77, 0xc0, 0xee, 0x90 }}
866
867	struct nsIStackFrame_vtbl {
868
869	/* Methods from the Class nsISupports */
870	struct nsISupports_vtbl nsisupports;
871
872	/* readonly attribute PRUint32 language; */
873	nsresult (GetLanguage)(nsIStackFrame pThis, PRUint32 *aLanguage);
874
875	/* readonly attribute string languageName; */
876	nsresult (GetLanguageName)(nsIStackFrame pThis, PRUnichar * *aLanguageName);
877
878	/* readonly attribute string filename; */
879	nsresult (GetFilename)(nsIStackFrame pThis, PRUnichar * *aFilename);
880
881	/* readonly attribute string name; */
882	nsresult (GetName)(nsIStackFrame pThis, PRUnichar * *aName);
883
884	/* readonly attribute PRInt32 lineNumber; */
885	nsresult (GetLineNumber)(nsIStackFrame pThis, PRInt32 *aLineNumber);
886
887	/* readonly attribute string sourceLine; */
888	nsresult (GetSourceLine)(nsIStackFrame pThis, PRUnichar * *aSourceLine);
889
890	/* readonly attribute nsIStackFrame caller; */
891	nsresult (GetCaller)(nsIStackFrame pThis, nsIStackFrame * *aCaller);
892
893	/* string toString (); */
894	nsresult (ToString)(nsIStackFrame pThis, PRUnichar **_retval);
895	};
896
897	struct nsIStackFrame {
898	struct nsIStackFrame_vtbl *vtbl;
899	};
900
901	/* starting interface: nsIEventTarget */
902	#define NS_IEVENTTARGET_IID_STR "ea99ad5b-cc67-4efb-97c9-2ef620a59f2a"
903
904	#define NS_IEVENTTARGET_IID \
905	{0xea99ad5b, 0xcc67, 0x4efb, \
906	{ 0x97, 0xc9, 0x2e, 0xf6, 0x20, 0xa5, 0x9f, 0x2a }}
907
908	struct nsIEventTarget;
909	typedef struct nsIEventTarget nsIEventTarget;
910
911	struct nsIEventTarget_vtbl {
912
913	struct nsISupports_vtbl nsisupports;
914
915	nsresult (PostEvent)(nsIEventTarget pThis, PLEvent * aEvent);
916
917	nsresult (IsOnCurrentThread)(nsIEventTarget pThis, PRBool *_retval);
918
919	};
920
921	struct nsIEventTarget {
922	struct nsIEventTarget_vtbl *vtbl;
923	};
924
925	/* starting interface: nsIEventQueue */
926	#define NS_IEVENTQUEUE_IID_STR "176afb41-00a4-11d3-9f2a-00400553eef0"
927
928	#define NS_IEVENTQUEUE_IID \
929	{0x176afb41, 0x00a4, 0x11d3, \
930	{ 0x9f, 0x2a, 0x00, 0x40, 0x05, 0x53, 0xee, 0xf0 }}
931
932	struct nsIEventQueue;
933	typedef struct nsIEventQueue nsIEventQueue;
934
935	struct nsIEventQueue_vtbl {
936
937	struct nsIEventTarget_vtbl nsieventtarget;
938
939	nsresult (InitEvent)(nsIEventQueue pThis, PLEvent * aEvent, void * owner, PLHandleEventProc handler, PLDestroyEventProc destructor);
940
941	nsresult (PostSynchronousEvent)(nsIEventQueue pThis, PLEvent * aEvent, void * *aResult);
942
943	nsresult (PendingEvents)(nsIEventQueue pThis, PRBool *_retval);
944
945	nsresult (ProcessPendingEvents)(nsIEventQueue pThis);
946
947	nsresult (EventLoop)(nsIEventQueue pThis);
948
949	nsresult (EventAvailable)(nsIEventQueue pThis, PRBool *aResult);
950
951	nsresult (GetEvent)(nsIEventQueue pThis, PLEvent * *_retval);
952
953	nsresult (HandleEvent)(nsIEventQueue pThis, PLEvent * aEvent);
954
955	nsresult (WaitForEvent)(nsIEventQueue pThis, PLEvent * *_retval);
956
957	PRInt32 (GetEventQueueSelectFD)(nsIEventQueue pThis);
958
959	nsresult (Init)(nsIEventQueue pThis, PRBool aNative);
960
961	nsresult (InitFromPRThread)(nsIEventQueue pThis, PRThread * thread, PRBool aNative);
962
963	nsresult (InitFromPLQueue)(nsIEventQueue pThis, PLEventQueue * aQueue);
964
965	nsresult (EnterMonitor)(nsIEventQueue pThis);
966
967	nsresult (ExitMonitor)(nsIEventQueue pThis);
968
969	nsresult (RevokeEvents)(nsIEventQueue pThis, void * owner);
970
971	nsresult (GetPLEventQueue)(nsIEventQueue pThis, PLEventQueue * *_retval);
972
973	nsresult (IsQueueNative)(nsIEventQueue pThis, PRBool *_retval);
974
975	nsresult (StopAcceptingEvents)(nsIEventQueue pThis);
976
977	};
978
979	struct nsIEventQueue {
980	struct nsIEventQueue_vtbl *vtbl;
981	};
982
983	</xsl:text>
984	<xsl:apply-templates/>
985	<xsl:text>
986	#endif /* !__cplusplus */
987
988	#ifdef IN_VBOXXPCOMC
989	# define VBOXXPCOMC_DECL(type) PR_EXPORT(type)
990	#else
991	# define VBOXXPCOMC_DECL(type) PR_IMPORT(type)
992	#endif
993
994	#ifdef __cplusplus
995	extern "C" {
996	#endif
997
998
999	/**
1000	* Function table for dynamic linking.
1001	* Use VBoxGetFunctions() to obtain the pointer to it.
1002	*/
1003	typedef struct VBOXXPCOMC
1004	{
1005	/** The size of the structure. */
1006	unsigned cb;
1007	/** The structure version. */
1008	unsigned uVersion;
1009
1010	unsigned int (*pfnGetVersion)(void);
1011
1012	void (pfnComInitialize)(const char pszVirtualBoxIID,
1013	IVirtualBox **ppVirtualBox,
1014	const char *pszSessionIID,
1015	ISession **ppSession);
1016	void (*pfnComUninitialize)(void);
1017
1018	void (pfnComUnallocMem)(void pv);
1019	void (pfnUtf16Free)(PRUnichar pwszString);
1020	void (pfnUtf8Free)(char pszString);
1021
1022	int (pfnUtf16ToUtf8)(const PRUnichar pwszString, char **ppszString);
1023	int (pfnUtf8ToUtf16)(const char pszString, PRUnichar **ppwszString);
1024
1025	void (pfnGetEventQueue)(nsIEventQueue *eventQueue);
1026
1027	/** Tail version, same as uVersion. */
1028	unsigned uEndVersion;
1029	} VBOXXPCOMC;
1030	/** Pointer to a const VBoxXPCOMC function table. */
1031	typedef VBOXXPCOMC const *PCVBOXXPCOM;
1032
1033	/** The current interface version.
1034	* For use with VBoxGetXPCOMCFunctions and to be found in
1035	* VBOXXPCOMC::uVersion. */
1036	#define VBOX_XPCOMC_VERSION 0x00020000U
1037
1038	VBOXXPCOMC_DECL(PCVBOXXPCOM) VBoxGetXPCOMCFunctions(unsigned uVersion);
1039	/** Typedef for VBoxGetXPCOMCFunctions. */
1040	typedef PCVBOXXPCOM (*PFNVBOXGETXPCOMCFUNCTIONS)(unsigned uVersion);
1041
1042	/** The symbol name of VBoxGetXPCOMCFunctions. */
1043	#if defined(__OS2__)
1044	# define VBOX_GET_XPCOMC_FUNCTIONS_SYMBOL_NAME "_VBoxGetXPCOMCFunctions"
1045	#else
1046	# define VBOX_GET_XPCOMC_FUNCTIONS_SYMBOL_NAME "VBoxGetXPCOMCFunctions"
1047	#endif
1048
1049
1050	#ifdef __cplusplus
1051	}
1052	#endif
1053
1054	#endif /* !___VirtualBox_CXPCOM_h */
1055	</xsl:text>
1056	</xsl:template>
1057
1058	<!--
1059	* ignore all \|if\|s except those for XPIDL target
1060	<xsl:template match="if">
1061	<xsl:if test="@target='xpidl'">
1062	<xsl:apply-templates/>
1063	</xsl:if>
1064	</xsl:template>
1065	<xsl:template match="if" mode="forward">
1066	<xsl:if test="@target='xpidl'">
1067	<xsl:apply-templates mode="forward"/>
1068	</xsl:if>
1069	</xsl:template>
1070	<xsl:template match="if" mode="forwarder">
1071	<xsl:if test="@target='midl'">
1072	<xsl:apply-templates mode="forwarder"/>
1073	</xsl:if>
1074	</xsl:template>
1075
1076	-->
1077
1078	<!--
1079	* cpp_quote
1080	<xsl:template match="cpp">
1081	<xsl:if test="text()">
1082	<xsl:text>%{C++</xsl:text>
1083	<xsl:value-of select="text()"/>
1084	<xsl:text> %} </xsl:text>
1085	</xsl:if>
1086	<xsl:if test="not(text()) and @line">
1087	<xsl:text>%{C++ </xsl:text>
1088	<xsl:value-of select="@line"/>
1089	<xsl:text> %} </xsl:text>
1090	</xsl:if>
1091	</xsl:template>
1092	-->
1093
1094
1095	<!--
1096	* #if statement (@if attribute)
1097	* @note
1098	* xpidl doesn't support any preprocessor defines other than #include
1099	* (it just ignores them), so the generated IDL will most likely be
1100	* invalid. So for now we forbid using @if attributes
1101	-->
1102	<xsl:template match="@if" mode="begin">
1103	<xsl:message terminate="yes">
1104	@if attributes are not currently allowed because xpidl lacks
1105	support for #ifdef and stuff.
1106	</xsl:message>
1107	<xsl:text>#if </xsl:text>
1108	<xsl:value-of select="."/>
1109	<xsl:text> </xsl:text>
1110	</xsl:template>
1111	<xsl:template match="@if" mode="end">
1112	<xsl:text>#endif </xsl:text>
1113	</xsl:template>
1114
1115
1116	<!--
1117	* libraries
1118	-->
1119	<xsl:template match="library">
1120	<!-- result codes -->
1121	<xsl:text> </xsl:text>
1122	<xsl:for-each select="result">
1123	<xsl:apply-templates select="."/>
1124	</xsl:for-each>
1125	<xsl:text> </xsl:text>
1126	<!-- forward declarations -->
1127	<xsl:apply-templates select="if \| interface" mode="forward"/>
1128	<xsl:text> </xsl:text>
1129	<!-- typedef'ing the struct declarations -->
1130	<xsl:apply-templates select="if \| interface" mode="typedef"/>
1131	<xsl:text> </xsl:text>
1132	<!-- all enums go first -->
1133	<xsl:apply-templates select="enum \| if/enum"/>
1134	<!-- everything else but result codes and enums -->
1135	<xsl:apply-templates select="*[not(self::result or self::enum) and
1136	not(self::if[result] or self::if[enum])]"/>
1137	<!-- -->
1138	</xsl:template>
1139
1140
1141	<!--
1142	* result codes
1143	-->
1144	<xsl:template match="result">
1145	<xsl:value-of select="concat('#define ',@name,' ',@value)"/>
1146	<xsl:text> </xsl:text>
1147	</xsl:template>
1148
1149
1150	<!--
1151	* forward declarations
1152	-->
1153	<xsl:template match="interface" mode="forward">
1154	<xsl:text>struct </xsl:text>
1155	<xsl:value-of select="@name"/>
1156	<xsl:text>; </xsl:text>
1157	</xsl:template>
1158
1159
1160	<!--
1161	* typedef'ing the struct declarations
1162	-->
1163	<xsl:template match="interface" mode="typedef">
1164	<xsl:text>typedef struct </xsl:text>
1165	<xsl:value-of select="@name"/>
1166	<xsl:text> </xsl:text>
1167	<xsl:value-of select="@name"/>
1168	<xsl:text>; </xsl:text>
1169	</xsl:template>
1170
1171
1172	<!--
1173	* interfaces
1174	-->
1175	<xsl:template match="interface">
1176	<xsl:text>/* Start of struct </xsl:text>
1177	<xsl:value-of select="@name"/>
1178	<xsl:text> Declaration */ </xsl:text>
1179	<xsl:text>#define </xsl:text>
1180	<xsl:call-template name="uppercase">
1181	<xsl:with-param name="str" select="@name"/>
1182	</xsl:call-template>
1183	<xsl:value-of select="concat('_IID_STR "',@uuid,'"')"/>
1184	<xsl:text> </xsl:text>
1185	<xsl:text>#define </xsl:text>
1186	<xsl:call-template name="uppercase">
1187	<xsl:with-param name="str" select="@name"/>
1188	</xsl:call-template>
1189	<xsl:text>_IID { \ </xsl:text>
1190	<xsl:text> 0x</xsl:text><xsl:value-of select="substring(@uuid,1,8)"/>
1191	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,10,4)"/>
1192	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,15,4)"/>
1193	<xsl:text>, \ </xsl:text>
1194	<xsl:text>{ 0x</xsl:text><xsl:value-of select="substring(@uuid,20,2)"/>
1195	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,22,2)"/>
1196	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,25,2)"/>
1197	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,27,2)"/>
1198	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,29,2)"/>
1199	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,31,2)"/>
1200	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,33,2)"/>
1201	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,35,2)"/>
1202	<xsl:text> } \ } </xsl:text>
1203	<xsl:text>struct </xsl:text>
1204	<xsl:value-of select="@name"/>
1205	<xsl:text>_vtbl { </xsl:text>
1206	<xsl:text> </xsl:text>
1207	<xsl:choose>
1208	<xsl:when test="@extends='$unknown'">struct nsISupports_vtbl nsisupports;</xsl:when>
1209	<xsl:when test="@extends='$dispatched'">struct nsISupports_vtbl nsisupports;</xsl:when>
1210	<xsl:when test="@extends='$errorinfo'">struct nsIException_vtbl nsiexception;</xsl:when>
1211	<xsl:otherwise>
1212	<xsl:text>struct </xsl:text>
1213	<xsl:value-of select="@extends"/>
1214	<xsl:text>_vtbl </xsl:text>
1215	<xsl:call-template name="lowercase">
1216	<xsl:with-param name="str" select="@extends"/>
1217	</xsl:call-template>
1218	<xsl:text>;</xsl:text>
1219	</xsl:otherwise>
1220	</xsl:choose>
1221	<xsl:text> </xsl:text>
1222	<!-- attributes (properties) -->
1223	<xsl:apply-templates select="attribute"/>
1224	<!-- methods -->
1225	<xsl:apply-templates select="method"/>
1226	<!-- 'if' enclosed elements, unsorted -->
1227	<xsl:apply-templates select="if"/>
1228	<!-- -->
1229	<xsl:text>};</xsl:text>
1230	<xsl:text> </xsl:text>
1231	<xsl:text>struct </xsl:text>
1232	<xsl:value-of select="@name"/>
1233	<xsl:text> { struct </xsl:text>
1234	<xsl:value-of select="@name"/>
1235	<xsl:text>_vtbl *vtbl; }; </xsl:text>
1236	<xsl:text>/* End of struct </xsl:text>
1237	<xsl:value-of select="@name"/>
1238	<xsl:text> Declaration */ </xsl:text>
1239	</xsl:template>
1240
1241
1242	<!--
1243	* attributes
1244	-->
1245	<xsl:template match="interface//attribute">
1246	<xsl:apply-templates select="@if" mode="begin"/>
1247	<xsl:if test="@mod='ptr'">
1248	<!-- attributes using native types must be non-scriptable
1249	<xsl:text> [noscript] </xsl:text>-->
1250	</xsl:if>
1251	<xsl:choose>
1252	<!-- safearray pseudo attribute -->
1253	<xsl:when test="@safearray='yes'">
1254	<!-- getter -->
1255	<xsl:text> nsresult (*Get</xsl:text>
1256	<xsl:call-template name="capitalize">
1257	<xsl:with-param name="str" select="@name"/>
1258	</xsl:call-template>
1259	<xsl:text>)(</xsl:text>
1260	<xsl:value-of select="../@name" />
1261	<xsl:text> *pThis, </xsl:text>
1262	<!-- array size -->
1263	<xsl:text>PRUint32 *</xsl:text>
1264	<xsl:value-of select="@name"/>
1265	<xsl:text>Size, </xsl:text>
1266	<!-- array pointer -->
1267	<xsl:apply-templates select="@type" mode="forwarder"/>
1268	<xsl:text> **</xsl:text>
1269	<xsl:value-of select="@name"/>
1270	<xsl:text>); </xsl:text>
1271	<!-- setter -->
1272	<xsl:if test="not(@readonly='yes')">
1273	<xsl:text> nsresult (*Set</xsl:text>
1274	<xsl:call-template name="capitalize">
1275	<xsl:with-param name="str" select="@name"/>
1276	</xsl:call-template>
1277	<xsl:text>)(</xsl:text>
1278	<xsl:value-of select="../@name" />
1279	<xsl:text> *pThis, </xsl:text>
1280	<!-- array size -->
1281	<xsl:text>PRUint32 </xsl:text>
1282	<xsl:value-of select="@name"/>
1283	<xsl:text>Size, </xsl:text>
1284	<!-- array pointer -->
1285	<xsl:apply-templates select="@type" mode="forwarder"/>
1286	<xsl:text> *</xsl:text>
1287	<xsl:value-of select="@name"/>
1288	<xsl:text>); </xsl:text>
1289	</xsl:if>
1290	</xsl:when>
1291	<!-- normal attribute -->
1292	<xsl:otherwise>
1293	<xsl:text> </xsl:text>
1294	<xsl:if test="@readonly='yes'">
1295	<xsl:text>nsresult (*Get</xsl:text>
1296	<xsl:call-template name="capitalize">
1297	<xsl:with-param name="str" select="@name"/>
1298	</xsl:call-template>
1299	<xsl:text>)(</xsl:text>
1300	<xsl:value-of select="../@name" />
1301	<xsl:text> *pThis, </xsl:text>
1302	<xsl:apply-templates select="@type" mode="forwarder"/>
1303	<xsl:text> *</xsl:text>
1304	<xsl:value-of select="@name"/>
1305	<xsl:text>); </xsl:text>
1306	</xsl:if>
1307	<xsl:choose>
1308	<xsl:when test="@readonly='yes'">
1309	</xsl:when>
1310	<xsl:otherwise>
1311	<xsl:text>nsresult (*Get</xsl:text>
1312	<xsl:call-template name="capitalize">
1313	<xsl:with-param name="str" select="@name"/>
1314	</xsl:call-template>
1315	<xsl:text>)(</xsl:text>
1316	<xsl:value-of select="../@name" />
1317	<xsl:text> *pThis, </xsl:text>
1318	<xsl:apply-templates select="@type" mode="forwarder"/>
1319	<xsl:text> *</xsl:text>
1320	<xsl:value-of select="@name"/>
1321	<xsl:text>); </xsl:text>
1322	<xsl:text>nsresult (*Set</xsl:text>
1323	<xsl:call-template name="capitalize">
1324	<xsl:with-param name="str" select="@name"/>
1325	</xsl:call-template>
1326	<xsl:text>)(</xsl:text>
1327	<xsl:value-of select="../@name" />
1328	<xsl:text> *pThis, </xsl:text>
1329	<xsl:apply-templates select="@type" mode="forwarder"/>
1330	<xsl:text> </xsl:text>
1331	<xsl:value-of select="@name"/>
1332	<xsl:text>); </xsl:text>
1333	</xsl:otherwise>
1334	</xsl:choose>
1335	</xsl:otherwise>
1336	</xsl:choose>
1337	<xsl:apply-templates select="@if" mode="end"/>
1338	<xsl:text> </xsl:text>
1339	</xsl:template>
1340
1341	<xsl:template match="interface//attribute" mode="forwarder">
1342
1343	<xsl:variable name="parent" select="ancestor::interface"/>
1344
1345	<xsl:apply-templates select="@if" mode="begin"/>
1346
1347	<!-- getter: COM_FORWARD_Interface_GETTER_Name_TO(smth) -->
1348	<xsl:text>#define COM_FORWARD_</xsl:text>
1349	<xsl:value-of select="$parent/@name"/>
1350	<xsl:text>_GETTER_</xsl:text>
1351	<xsl:call-template name="capitalize">
1352	<xsl:with-param name="str" select="@name"/>
1353	</xsl:call-template>
1354	<xsl:text>_TO(smth) NS_IMETHOD Get</xsl:text>
1355	<xsl:call-template name="capitalize">
1356	<xsl:with-param name="str" select="@name"/>
1357	</xsl:call-template>
1358	<xsl:text> (</xsl:text>
1359	<xsl:if test="@safearray='yes'">
1360	<xsl:text>PRUint32 * a</xsl:text>
1361	<xsl:call-template name="capitalize">
1362	<xsl:with-param name="str" select="@name"/>
1363	</xsl:call-template>
1364	<xsl:text>Size, </xsl:text>
1365	</xsl:if>
1366	<xsl:apply-templates select="@type" mode="forwarder"/>
1367	<xsl:if test="@safearray='yes'">
1368	<xsl:text> *</xsl:text>
1369	</xsl:if>
1370	<xsl:text> * a</xsl:text>
1371	<xsl:call-template name="capitalize">
1372	<xsl:with-param name="str" select="@name"/>
1373	</xsl:call-template>
1374	<xsl:text>) { return smth Get</xsl:text>
1375	<xsl:call-template name="capitalize">
1376	<xsl:with-param name="str" select="@name"/>
1377	</xsl:call-template>
1378	<xsl:text> (</xsl:text>
1379	<xsl:if test="@safearray='yes'">
1380	<xsl:text>a</xsl:text>
1381	<xsl:call-template name="capitalize">
1382	<xsl:with-param name="str" select="@name"/>
1383	</xsl:call-template>
1384	<xsl:text>Size, </xsl:text>
1385	</xsl:if>
1386	<xsl:text>a</xsl:text>
1387	<xsl:call-template name="capitalize">
1388	<xsl:with-param name="str" select="@name"/>
1389	</xsl:call-template>
1390	<xsl:text>); } </xsl:text>
1391	<!-- getter: COM_FORWARD_Interface_GETTER_Name_TO_OBJ(obj) -->
1392	<xsl:text>#define COM_FORWARD_</xsl:text>
1393	<xsl:value-of select="$parent/@name"/>
1394	<xsl:text>_GETTER_</xsl:text>
1395	<xsl:call-template name="capitalize">
1396	<xsl:with-param name="str" select="@name"/>
1397	</xsl:call-template>
1398	<xsl:text>_TO_OBJ(obj) COM_FORWARD_</xsl:text>
1399	<xsl:value-of select="$parent/@name"/>
1400	<xsl:text>_GETTER_</xsl:text>
1401	<xsl:call-template name="capitalize">
1402	<xsl:with-param name="str" select="@name"/>
1403	</xsl:call-template>
1404	<xsl:text>_TO ((obj)->) </xsl:text>
1405	<!-- getter: COM_FORWARD_Interface_GETTER_Name_TO_BASE(base) -->
1406	<xsl:text>#define COM_FORWARD_</xsl:text>
1407	<xsl:value-of select="$parent/@name"/>
1408	<xsl:text>_GETTER_</xsl:text>
1409	<xsl:call-template name="capitalize">
1410	<xsl:with-param name="str" select="@name"/>
1411	</xsl:call-template>
1412	<xsl:text>_TO_BASE(base) COM_FORWARD_</xsl:text>
1413	<xsl:value-of select="$parent/@name"/>
1414	<xsl:text>_GETTER_</xsl:text>
1415	<xsl:call-template name="capitalize">
1416	<xsl:with-param name="str" select="@name"/>
1417	</xsl:call-template>
1418	<xsl:text>_TO (base::) </xsl:text>
1419	<!-- -->
1420	<xsl:if test="not(@readonly='yes')">
1421	<!-- setter: COM_FORWARD_Interface_SETTER_Name_TO(smth) -->
1422	<xsl:text>#define COM_FORWARD_</xsl:text>
1423	<xsl:value-of select="$parent/@name"/>
1424	<xsl:text>_SETTER_</xsl:text>
1425	<xsl:call-template name="capitalize">
1426	<xsl:with-param name="str" select="@name"/>
1427	</xsl:call-template>
1428	<xsl:text>_TO(smth) NS_IMETHOD Set</xsl:text>
1429	<xsl:call-template name="capitalize">
1430	<xsl:with-param name="str" select="@name"/>
1431	</xsl:call-template>
1432	<xsl:text> (</xsl:text>
1433	<xsl:if test="@safearray='yes'">
1434	<xsl:text>PRUint32 a</xsl:text>
1435	<xsl:call-template name="capitalize">
1436	<xsl:with-param name="str" select="@name"/>
1437	</xsl:call-template>
1438	<xsl:text>Size, </xsl:text>
1439	</xsl:if>
1440	<xsl:if test="not(@safearray='yes') and (@type='string' or @type='wstring')">
1441	<xsl:text>const </xsl:text>
1442	</xsl:if>
1443	<xsl:apply-templates select="@type" mode="forwarder"/>
1444	<xsl:if test="@safearray='yes'">
1445	<xsl:text> *</xsl:text>
1446	</xsl:if>
1447	<xsl:text> a</xsl:text>
1448	<xsl:call-template name="capitalize">
1449	<xsl:with-param name="str" select="@name"/>
1450	</xsl:call-template>
1451	<xsl:text>) { return smth Set</xsl:text>
1452	<xsl:call-template name="capitalize">
1453	<xsl:with-param name="str" select="@name"/>
1454	</xsl:call-template>
1455	<xsl:text> (a</xsl:text>
1456	<xsl:call-template name="capitalize">
1457	<xsl:with-param name="str" select="@name"/>
1458	</xsl:call-template>
1459	<xsl:text>); } </xsl:text>
1460	<!-- setter: COM_FORWARD_Interface_SETTER_Name_TO_OBJ(obj) -->
1461	<xsl:text>#define COM_FORWARD_</xsl:text>
1462	<xsl:value-of select="$parent/@name"/>
1463	<xsl:text>_SETTER_</xsl:text>
1464	<xsl:call-template name="capitalize">
1465	<xsl:with-param name="str" select="@name"/>
1466	</xsl:call-template>
1467	<xsl:text>_TO_OBJ(obj) COM_FORWARD_</xsl:text>
1468	<xsl:value-of select="$parent/@name"/>
1469	<xsl:text>_SETTER_</xsl:text>
1470	<xsl:call-template name="capitalize">
1471	<xsl:with-param name="str" select="@name"/>
1472	</xsl:call-template>
1473	<xsl:text>_TO ((obj)->) </xsl:text>
1474	<!-- setter: COM_FORWARD_Interface_SETTER_Name_TO_BASE(base) -->
1475	<xsl:text>#define COM_FORWARD_</xsl:text>
1476	<xsl:value-of select="$parent/@name"/>
1477	<xsl:text>_SETTER_</xsl:text>
1478	<xsl:call-template name="capitalize">
1479	<xsl:with-param name="str" select="@name"/>
1480	</xsl:call-template>
1481	<xsl:text>_TO_BASE(base) COM_FORWARD_</xsl:text>
1482	<xsl:value-of select="$parent/@name"/>
1483	<xsl:text>_SETTER_</xsl:text>
1484	<xsl:call-template name="capitalize">
1485	<xsl:with-param name="str" select="@name"/>
1486	</xsl:call-template>
1487	<xsl:text>_TO (base::) </xsl:text>
1488	</xsl:if>
1489
1490	<xsl:apply-templates select="@if" mode="end"/>
1491
1492	</xsl:template>
1493
1494
1495	<!--
1496	* methods
1497	-->
1498	<xsl:template match="interface//method">
1499	<xsl:apply-templates select="@if" mode="begin"/>
1500	<xsl:if test="param/@mod='ptr'">
1501	<!-- methods using native types must be non-scriptable
1502	<xsl:text> [noscript] </xsl:text>-->
1503	</xsl:if>
1504	<xsl:text> nsresult (*</xsl:text>
1505	<xsl:call-template name="capitalize">
1506	<xsl:with-param name="str" select="@name"/>
1507	</xsl:call-template>
1508	<xsl:if test="param">
1509	<xsl:text>)( </xsl:text>
1510	<xsl:text> </xsl:text>
1511	<xsl:value-of select="../@name" />
1512	<xsl:text> *pThis, </xsl:text>
1513	<xsl:for-each select="param [position() != last()]">
1514	<xsl:text> </xsl:text>
1515	<xsl:apply-templates select="."/>
1516	<xsl:text>, </xsl:text>
1517	</xsl:for-each>
1518	<xsl:text> </xsl:text>
1519	<xsl:apply-templates select="param [last()]"/>
1520	<xsl:text> ); </xsl:text>
1521	</xsl:if>
1522	<xsl:if test="not(param)">
1523	<xsl:text>)(</xsl:text>
1524	<xsl:value-of select="../@name" />
1525	<xsl:text> *pThis ); </xsl:text>
1526	</xsl:if>
1527	<xsl:apply-templates select="@if" mode="end"/>
1528	<xsl:text> </xsl:text>
1529	</xsl:template>
1530
1531	<xsl:template match="interface//method" mode="forwarder">
1532
1533	<xsl:variable name="parent" select="ancestor::interface"/>
1534
1535	<xsl:apply-templates select="@if" mode="begin"/>
1536
1537	<xsl:text>#define COM_FORWARD_</xsl:text>
1538	<xsl:value-of select="$parent/@name"/>
1539	<xsl:text>_</xsl:text>
1540	<xsl:call-template name="capitalize">
1541	<xsl:with-param name="str" select="@name"/>
1542	</xsl:call-template>
1543	<xsl:text>_TO(smth) NS_IMETHOD </xsl:text>
1544	<xsl:call-template name="capitalize">
1545	<xsl:with-param name="str" select="@name"/>
1546	</xsl:call-template>
1547	<xsl:choose>
1548	<xsl:when test="param">
1549	<xsl:text> (</xsl:text>
1550	<xsl:for-each select="param [position() != last()]">
1551	<xsl:apply-templates select="." mode="forwarder"/>
1552	<xsl:text>, </xsl:text>
1553	</xsl:for-each>
1554	<xsl:apply-templates select="param [last()]" mode="forwarder"/>
1555	<xsl:text>) { return smth </xsl:text>
1556	<xsl:call-template name="capitalize">
1557	<xsl:with-param name="str" select="@name"/>
1558	</xsl:call-template>
1559	<xsl:text> (</xsl:text>
1560	<xsl:for-each select="param [position() != last()]">
1561	<xsl:if test="@safearray='yes'">
1562	<xsl:text>a</xsl:text>
1563	<xsl:call-template name="capitalize">
1564	<xsl:with-param name="str" select="@name"/>
1565	</xsl:call-template>
1566	<xsl:text>Size+++, </xsl:text>
1567	</xsl:if>
1568	<xsl:text>a</xsl:text>
1569	<xsl:call-template name="capitalize">
1570	<xsl:with-param name="str" select="@name"/>
1571	</xsl:call-template>
1572	<xsl:text>, </xsl:text>
1573	</xsl:for-each>
1574	<xsl:if test="param [last()]/@safearray='yes'">
1575	<xsl:text>a</xsl:text>
1576	<xsl:call-template name="capitalize">
1577	<xsl:with-param name="str" select="param [last()]/@name"/>
1578	</xsl:call-template>
1579	<xsl:text>Size, </xsl:text>
1580	</xsl:if>
1581	<xsl:text>a</xsl:text>
1582	<xsl:call-template name="capitalize">
1583	<xsl:with-param name="str" select="param [last()]/@name"/>
1584	</xsl:call-template>
1585	<xsl:text>); }</xsl:text>
1586	</xsl:when>
1587	<xsl:otherwise test="not(param)">
1588	<xsl:text>() { return smth </xsl:text>
1589	<xsl:call-template name="capitalize">
1590	<xsl:with-param name="str" select="@name"/>
1591	</xsl:call-template>
1592	<xsl:text>(); }</xsl:text>
1593	</xsl:otherwise>
1594	</xsl:choose>
1595	<xsl:text> </xsl:text>
1596	<!-- COM_FORWARD_Interface_Method_TO_OBJ(obj) -->
1597	<xsl:text>#define COM_FORWARD_</xsl:text>
1598	<xsl:value-of select="$parent/@name"/>
1599	<xsl:text>_</xsl:text>
1600	<xsl:call-template name="capitalize">
1601	<xsl:with-param name="str" select="@name"/>
1602	</xsl:call-template>
1603	<xsl:text>_TO_OBJ(obj) COM_FORWARD_</xsl:text>
1604	<xsl:value-of select="$parent/@name"/>
1605	<xsl:text>_</xsl:text>
1606	<xsl:call-template name="capitalize">
1607	<xsl:with-param name="str" select="@name"/>
1608	</xsl:call-template>
1609	<xsl:text>_TO ((obj)->) </xsl:text>
1610	<!-- COM_FORWARD_Interface_Method_TO_BASE(base) -->
1611	<xsl:text>#define COM_FORWARD_</xsl:text>
1612	<xsl:value-of select="$parent/@name"/>
1613	<xsl:text>_</xsl:text>
1614	<xsl:call-template name="capitalize">
1615	<xsl:with-param name="str" select="@name"/>
1616	</xsl:call-template>
1617	<xsl:text>_TO_BASE(base) COM_FORWARD_</xsl:text>
1618	<xsl:value-of select="$parent/@name"/>
1619	<xsl:text>_</xsl:text>
1620	<xsl:call-template name="capitalize">
1621	<xsl:with-param name="str" select="@name"/>
1622	</xsl:call-template>
1623	<xsl:text>_TO (base::) </xsl:text>
1624
1625	<xsl:apply-templates select="@if" mode="end"/>
1626
1627	</xsl:template>
1628
1629
1630	<!--
1631	* modules
1632	-->
1633	<xsl:template match="module">
1634	<xsl:apply-templates select="class"/>
1635	</xsl:template>
1636
1637
1638	<!--
1639	* co-classes
1640	-->
1641	<xsl:template match="module/class">
1642	<!-- class and contract id -->
1643	<xsl:text> </xsl:text>
1644	<xsl:text>#define NS_</xsl:text>
1645	<xsl:call-template name="uppercase">
1646	<xsl:with-param name="str" select="@name"/>
1647	</xsl:call-template>
1648	<xsl:text>_CID { \ </xsl:text>
1649	<xsl:text> 0x</xsl:text><xsl:value-of select="substring(@uuid,1,8)"/>
1650	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,10,4)"/>
1651	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,15,4)"/>
1652	<xsl:text>, \ </xsl:text>
1653	<xsl:text>{ 0x</xsl:text><xsl:value-of select="substring(@uuid,20,2)"/>
1654	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,22,2)"/>
1655	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,25,2)"/>
1656	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,27,2)"/>
1657	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,29,2)"/>
1658	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,31,2)"/>
1659	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,33,2)"/>
1660	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,35,2)"/>
1661	<xsl:text> } \ } </xsl:text>
1662	<xsl:text>#define NS_</xsl:text>
1663	<xsl:call-template name="uppercase">
1664	<xsl:with-param name="str" select="@name"/>
1665	</xsl:call-template>
1666	<!-- Contract ID -->
1667	<xsl:text>_CONTRACTID "@</xsl:text>
1668	<xsl:value-of select="@namespace"/>
1669	<xsl:text>/</xsl:text>
1670	<xsl:value-of select="@name"/>
1671	<xsl:text>;1" </xsl:text>
1672	<!-- CLSID_xxx declarations for XPCOM, for compatibility with Win32 -->
1673	<xsl:text>/* for compatibility with Win32 */ </xsl:text>
1674	<xsl:text>#define CLSID_</xsl:text>
1675	<xsl:value-of select="@name"/>
1676	<xsl:text> (nsCID) NS_</xsl:text>
1677	<xsl:call-template name="uppercase">
1678	<xsl:with-param name="str" select="@name"/>
1679	</xsl:call-template>
1680	<xsl:text>_CID </xsl:text>
1681	<xsl:text> </xsl:text>
1682	</xsl:template>
1683
1684
1685	<!--
1686	* enums
1687	-->
1688	<xsl:template match="enum">
1689	<xsl:text>/* Start of enum </xsl:text>
1690	<xsl:value-of select="@name"/>
1691	<xsl:text> Declaration */ </xsl:text>
1692	<xsl:text>#define </xsl:text>
1693	<xsl:call-template name="uppercase">
1694	<xsl:with-param name="str" select="@name"/>
1695	</xsl:call-template>
1696	<xsl:value-of select="concat('_IID_STR "',@uuid,'"')"/>
1697	<xsl:text> </xsl:text>
1698	<xsl:text>#define </xsl:text>
1699	<xsl:call-template name="uppercase">
1700	<xsl:with-param name="str" select="@name"/>
1701	</xsl:call-template>
1702	<xsl:text>_IID { \ </xsl:text>
1703	<xsl:text> 0x</xsl:text><xsl:value-of select="substring(@uuid,1,8)"/>
1704	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,10,4)"/>
1705	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,15,4)"/>
1706	<xsl:text>, \ </xsl:text>
1707	<xsl:text>{ 0x</xsl:text><xsl:value-of select="substring(@uuid,20,2)"/>
1708	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,22,2)"/>
1709	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,25,2)"/>
1710	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,27,2)"/>
1711	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,29,2)"/>
1712	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,31,2)"/>
1713	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,33,2)"/>
1714	<xsl:text>, 0x</xsl:text><xsl:value-of select="substring(@uuid,35,2)"/>
1715	<xsl:text> } \ } </xsl:text>
1716	<xsl:text>enum </xsl:text>
1717	<xsl:value-of select="@name"/>
1718	<xsl:text> { </xsl:text>
1719	<xsl:variable name="this" select="."/>
1720	<xsl:for-each select="const">
1721	<xsl:text> </xsl:text>
1722	<xsl:value-of select="$this/@name"/>
1723	<xsl:text>_</xsl:text>
1724	<xsl:value-of select="@name"/> = <xsl:value-of select="@value"/>
1725	<xsl:if test="position() != last()">
1726	<xsl:text>,</xsl:text>
1727	</xsl:if>
1728	<xsl:text> </xsl:text>
1729	</xsl:for-each>
1730	<xsl:text>}; </xsl:text>
1731	<xsl:text>/* End of enum </xsl:text>
1732	<xsl:value-of select="@name"/>
1733	<xsl:text> Declaration */ </xsl:text>
1734	</xsl:template>
1735
1736
1737	<!--
1738	* method parameters
1739	-->
1740	<xsl:template match="method/param">
1741	<xsl:choose>
1742	<!-- safearray parameters -->
1743	<xsl:when test="@safearray='yes'">
1744	<!-- array size -->
1745	<xsl:choose>
1746	<xsl:when test="@dir='in'">
1747	<xsl:text>PRUint32 </xsl:text>
1748	<xsl:value-of select="@name"/>
1749	<xsl:text>Size, </xsl:text>
1750	</xsl:when>
1751	<xsl:when test="@dir='out'">
1752	<xsl:text>PRUint32 *</xsl:text>
1753	<xsl:value-of select="@name"/>
1754	<xsl:text>Size, </xsl:text>
1755	</xsl:when>
1756	<xsl:when test="@dir='return'">
1757	<xsl:text>PRUint32 *</xsl:text>
1758	<xsl:value-of select="@name"/>
1759	<xsl:text>Size, </xsl:text>
1760	</xsl:when>
1761	<xsl:otherwise>
1762	<xsl:text>PRUint32 </xsl:text>
1763	<xsl:value-of select="@name"/>
1764	<xsl:text>Size, </xsl:text>
1765	</xsl:otherwise>
1766	</xsl:choose>
1767	<!-- array pointer -->
1768	<xsl:text> </xsl:text>
1769	<xsl:choose>
1770	<xsl:when test="@dir='in'">
1771	<xsl:apply-templates select="@type" mode="forwarder"/>
1772	<xsl:text>*</xsl:text>
1773	</xsl:when>
1774	<xsl:when test="@dir='out'">
1775	<xsl:apply-templates select="@type" mode="forwarder"/>
1776	<xsl:if test="@type='wstring'">
1777	<xsl:text>*</xsl:text>
1778	</xsl:if>
1779	<xsl:text>*</xsl:text>
1780	</xsl:when>
1781	<xsl:when test="@dir='return'">
1782	<xsl:apply-templates select="@type" mode="forwarder"/>
1783	<xsl:text>**</xsl:text>
1784	</xsl:when>
1785	<xsl:otherwise>
1786	<xsl:apply-templates select="@type" mode="forwarder"/>
1787	<xsl:text>*</xsl:text>
1788	</xsl:otherwise>
1789	</xsl:choose>
1790	<xsl:text> </xsl:text>
1791	<xsl:value-of select="@name"/>
1792	</xsl:when>
1793	<!-- normal and array parameters -->
1794	<xsl:otherwise>
1795	<xsl:choose>
1796	<xsl:when test="@dir='in'">
1797	<xsl:apply-templates select="@type" mode="forwarder"/>
1798	<xsl:text></xsl:text>
1799	</xsl:when>
1800	<xsl:when test="@dir='out'">
1801	<xsl:apply-templates select="@type" mode="forwarder"/>
1802	<xsl:text> *</xsl:text>
1803	</xsl:when>
1804	<xsl:when test="@dir='return'">
1805	<xsl:apply-templates select="@type" mode="forwarder"/>
1806	<xsl:text> *</xsl:text>
1807	</xsl:when>
1808	<xsl:otherwise>
1809	<xsl:apply-templates select="@type" mode="forwarder"/>
1810	<xsl:text></xsl:text>
1811	</xsl:otherwise>
1812	</xsl:choose>
1813	<xsl:text> </xsl:text>
1814	<xsl:value-of select="@name"/>
1815	</xsl:otherwise>
1816	</xsl:choose>
1817	</xsl:template>
1818
1819	<xsl:template match="method/param" mode="forwarder">
1820	<xsl:if test="@safearray='yes'">
1821	<xsl:text>PRUint32</xsl:text>
1822	<xsl:if test="@dir='out' or @dir='return'">
1823	<xsl:text> *</xsl:text>
1824	</xsl:if>
1825	<xsl:text> a</xsl:text>
1826	<xsl:call-template name="capitalize">
1827	<xsl:with-param name="str" select="@name"/>
1828	</xsl:call-template>
1829	<xsl:text>Size, </xsl:text>
1830	</xsl:if>
1831	<xsl:apply-templates select="@type" mode="forwarder"/>
1832	<xsl:if test="@dir='out' or @dir='return'">
1833	<xsl:text> *</xsl:text>
1834	</xsl:if>
1835	<xsl:if test="@safearray='yes'">
1836	<xsl:text> *</xsl:text>
1837	</xsl:if>
1838	<xsl:text> a</xsl:text>
1839	<xsl:call-template name="capitalize">
1840	<xsl:with-param name="str" select="@name"/>
1841	</xsl:call-template>
1842	</xsl:template>
1843
1844
1845	<!--
1846	* attribute/parameter type conversion
1847	-->
1848	<xsl:template match="attribute/@type \| param/@type">
1849	<xsl:variable name="self_target" select="current()/ancestor::if/@target"/>
1850
1851	<xsl:choose>
1852	<!-- modifiers (ignored for 'enumeration' attributes)-->
1853	<xsl:when test="name(current())='type' and ../@mod">
1854	<xsl:choose>
1855	<xsl:when test="../@mod='ptr'">
1856	<xsl:choose>
1857	<!-- standard types -->
1858	<!--xsl:when test=".='result'">??</xsl:when-->
1859	<xsl:when test=".='boolean'">booleanPtr</xsl:when>
1860	<xsl:when test=".='octet'">octetPtr</xsl:when>
1861	<xsl:when test=".='short'">shortPtr</xsl:when>
1862	<xsl:when test=".='unsigned short'">ushortPtr</xsl:when>
1863	<xsl:when test=".='long'">longPtr</xsl:when>
1864	<xsl:when test=".='long long'">llongPtr</xsl:when>
1865	<xsl:when test=".='unsigned long'">ulongPtr</xsl:when>
1866	<xsl:when test=".='unsigned long long'">ullongPtr</xsl:when>
1867	<xsl:otherwise>
1868	<xsl:message terminate="yes">
1869	<xsl:value-of select="concat(../../../@name,'::',../../@name,'::',../@name,': ')"/>
1870	<xsl:text>attribute 'mod=</xsl:text>
1871	<xsl:value-of select="concat('"',../@mod,'"')"/>
1872	<xsl:text>' cannot be used with type </xsl:text>
1873	<xsl:value-of select="concat('"',current(),'"!')"/>
1874	</xsl:message>
1875	</xsl:otherwise>
1876	</xsl:choose>
1877	</xsl:when>
1878	<xsl:when test="../@mod='string'">
1879	<xsl:choose>
1880	<!-- standard types -->
1881	<!--xsl:when test=".='result'">??</xsl:when-->
1882	<xsl:when test=".='uuid'">wstring</xsl:when>
1883	<xsl:otherwise>
1884	<xsl:message terminate="yes">
1885	<xsl:value-of select="concat(../../../@name,'::',../../@name,'::',../@name,': ')"/>
1886	<xsl:text>attribute 'mod=</xsl:text>
1887	<xsl:value-of select="concat('"',../@mod,'"')"/>
1888	<xsl:text>' cannot be used with type </xsl:text>
1889	<xsl:value-of select="concat('"',current(),'"!')"/>
1890	</xsl:message>
1891	</xsl:otherwise>
1892	</xsl:choose>
1893	</xsl:when>
1894	<xsl:otherwise>
1895	<xsl:message terminate="yes">
1896	<xsl:value-of select="concat(../../../@name,'::',../../@name,'::',../@name,': ')"/>
1897	<xsl:value-of select="concat('value "',../@mod,'" ')"/>
1898	<xsl:text>of attribute 'mod' is invalid!</xsl:text>
1899	</xsl:message>
1900	</xsl:otherwise>
1901	</xsl:choose>
1902	</xsl:when>
1903	<!-- no modifiers -->
1904	<xsl:otherwise>
1905	<xsl:choose>
1906	<!-- standard types -->
1907	<xsl:when test=".='result'">nsresult</xsl:when>
1908	<xsl:when test=".='boolean'">boolean</xsl:when>
1909	<xsl:when test=".='octet'">octet</xsl:when>
1910	<xsl:when test=".='short'">short</xsl:when>
1911	<xsl:when test=".='unsigned short'">unsigned short</xsl:when>
1912	<xsl:when test=".='long'">long</xsl:when>
1913	<xsl:when test=".='long long'">long long</xsl:when>
1914	<xsl:when test=".='unsigned long'">unsigned long</xsl:when>
1915	<xsl:when test=".='unsigned long long'">unsigned long long</xsl:when>
1916	<xsl:when test=".='char'">char</xsl:when>
1917	<xsl:when test=".='wchar'">wchar</xsl:when>
1918	<xsl:when test=".='string'">string</xsl:when>
1919	<xsl:when test=".='wstring'">wstring</xsl:when>
1920	<!-- UUID type -->
1921	<xsl:when test=".='uuid'">
1922	<xsl:choose>
1923	<xsl:when test="name(..)='attribute'">
1924	<xsl:choose>
1925	<xsl:when test="../@readonly='yes'">
1926	<xsl:text>nsIDPtr</xsl:text>
1927	</xsl:when>
1928	<xsl:otherwise>
1929	<xsl:message terminate="yes">
1930	<xsl:value-of select="../@name"/>
1931	<xsl:text>: Non-readonly uuid attributes are not supported!</xsl:text>
1932	</xsl:message>
1933	</xsl:otherwise>
1934	</xsl:choose>
1935	</xsl:when>
1936	<xsl:when test="name(..)='param'">
1937	<xsl:choose>
1938	<xsl:when test="../@dir='in' and not(../@safearray='yes')">
1939	<xsl:text>nsIDRef</xsl:text>
1940	</xsl:when>
1941	<xsl:otherwise>
1942	<xsl:text>nsIDPtr</xsl:text>
1943	</xsl:otherwise>
1944	</xsl:choose>
1945	</xsl:when>
1946	</xsl:choose>
1947	</xsl:when>
1948	<!-- system interface types -->
1949	<xsl:when test=".='$unknown'">nsISupports</xsl:when>
1950	<xsl:otherwise>
1951	<xsl:choose>
1952	<!-- enum types -->
1953	<xsl:when test="
1954	(ancestor::library/enum[@name=current()]) or
1955	(ancestor::library/if[@target=$self_target]/enum[@name=current()])
1956	">
1957	<xsl:text>PRUint32</xsl:text>
1958	</xsl:when>
1959	<!-- custom interface types -->
1960	<xsl:when test="
1961	(name(current())='enumerator' and
1962	((ancestor::library/enumerator[@name=current()]) or
1963	(ancestor::library/if[@target=$self_target]/enumerator[@name=current()]))
1964	) or
1965	((ancestor::library/interface[@name=current()]) or
1966	(ancestor::library/if[@target=$self_target]/interface[@name=current()])
1967	)
1968	">
1969	<xsl:value-of select="."/>
1970	</xsl:when>
1971	<!-- other types -->
1972	<xsl:otherwise>
1973	<xsl:message terminate="yes">
1974	<xsl:text>Unknown parameter type: </xsl:text>
1975	<xsl:value-of select="."/>
1976	</xsl:message>
1977	</xsl:otherwise>
1978	</xsl:choose>
1979	</xsl:otherwise>
1980	</xsl:choose>
1981	</xsl:otherwise>
1982	</xsl:choose>
1983	</xsl:template>
1984
1985	<xsl:template match="attribute/@type \| param/@type" mode="forwarder">
1986
1987	<xsl:variable name="self_target" select="current()/ancestor::if/@target"/>
1988
1989	<xsl:choose>
1990	<!-- modifiers (ignored for 'enumeration' attributes)-->
1991	<xsl:when test="name(current())='type' and ../@mod">
1992	<xsl:choose>
1993	<xsl:when test="../@mod='ptr'">
1994	<xsl:choose>
1995	<!-- standard types -->
1996	<!--xsl:when test=".='result'">??</xsl:when-->
1997	<xsl:when test=".='boolean'">PRBool *</xsl:when>
1998	<xsl:when test=".='octet'">PRUint8 *</xsl:when>
1999	<xsl:when test=".='short'">PRInt16 *</xsl:when>
2000	<xsl:when test=".='unsigned short'">PRUint16 *</xsl:when>
2001	<xsl:when test=".='long'">PRInt32 *</xsl:when>
2002	<xsl:when test=".='long long'">PRInt64 *</xsl:when>
2003	<xsl:when test=".='unsigned long'">PRUint32 *</xsl:when>
2004	<xsl:when test=".='unsigned long long'">PRUint64 *</xsl:when>
2005	<xsl:otherwise>
2006	<xsl:message terminate="yes">
2007	<xsl:value-of select="concat(../../../@name,'::',../../@name,'::',../@name,': ')"/>
2008	<xsl:text>attribute 'mod=</xsl:text>
2009	<xsl:value-of select="concat('"',../@mod,'"')"/>
2010	<xsl:text>' cannot be used with type </xsl:text>
2011	<xsl:value-of select="concat('"',current(),'"!')"/>
2012	</xsl:message>
2013	</xsl:otherwise>
2014	</xsl:choose>
2015	</xsl:when>
2016	<xsl:when test="../@mod='string'">
2017	<xsl:choose>
2018	<!-- standard types -->
2019	<!--xsl:when test=".='result'">??</xsl:when-->
2020	<xsl:when test=".='uuid'">PRUnichar *</xsl:when>
2021	<xsl:otherwise>
2022	<xsl:message terminate="yes">
2023	<xsl:value-of select="concat(../../../@name,'::',../../@name,'::',../@name,': ')"/>
2024	<xsl:text>attribute 'mod=</xsl:text>
2025	<xsl:value-of select="concat('"',../@mod,'"')"/>
2026	<xsl:text>' cannot be used with type </xsl:text>
2027	<xsl:value-of select="concat('"',current(),'"!')"/>
2028	</xsl:message>
2029	</xsl:otherwise>
2030	</xsl:choose>
2031	</xsl:when>
2032	</xsl:choose>
2033	</xsl:when>
2034	<!-- no modifiers -->
2035	<xsl:otherwise>
2036	<xsl:choose>
2037	<!-- standard types -->
2038	<xsl:when test=".='result'">nsresult</xsl:when>
2039	<xsl:when test=".='boolean'">PRBool</xsl:when>
2040	<xsl:when test=".='octet'">PRUint8</xsl:when>
2041	<xsl:when test=".='short'">PRInt16</xsl:when>
2042	<xsl:when test=".='unsigned short'">PRUint16</xsl:when>
2043	<xsl:when test=".='long'">PRInt32</xsl:when>
2044	<xsl:when test=".='long long'">PRInt64</xsl:when>
2045	<xsl:when test=".='unsigned long'">PRUint32</xsl:when>
2046	<xsl:when test=".='unsigned long long'">PRUint64</xsl:when>
2047	<xsl:when test=".='char'">char</xsl:when>
2048	<xsl:when test=".='wchar'">PRUnichar</xsl:when>
2049	<!-- string types -->
2050	<xsl:when test=".='string'">char *</xsl:when>
2051	<xsl:when test=".='wstring'">PRUnichar *</xsl:when>
2052	<!-- UUID type -->
2053	<xsl:when test=".='uuid'">
2054	<xsl:choose>
2055	<xsl:when test="name(..)='attribute'">
2056	<xsl:choose>
2057	<xsl:when test="../@readonly='yes'">
2058	<xsl:text>nsID *</xsl:text>
2059	</xsl:when>
2060	</xsl:choose>
2061	</xsl:when>
2062	<xsl:when test="name(..)='param'">
2063	<xsl:choose>
2064	<xsl:when test="../@dir='in' and not(../@safearray='yes')">
2065	<xsl:text>const nsID *</xsl:text>
2066	</xsl:when>
2067	<xsl:otherwise>
2068	<xsl:text>nsID *</xsl:text>
2069	</xsl:otherwise>
2070	</xsl:choose>
2071	</xsl:when>
2072	</xsl:choose>
2073	</xsl:when>
2074	<!-- system interface types -->
2075	<xsl:when test=".='$unknown'">nsISupports *</xsl:when>
2076	<xsl:otherwise>
2077	<xsl:choose>
2078	<!-- enum types -->
2079	<xsl:when test="
2080	(ancestor::library/enum[@name=current()]) or
2081	(ancestor::library/if[@target=$self_target]/enum[@name=current()])
2082	">
2083	<xsl:text>PRUint32</xsl:text>
2084	</xsl:when>
2085	<!-- custom interface types -->
2086	<xsl:when test="
2087	(name(current())='enumerator' and
2088	((ancestor::library/enumerator[@name=current()]) or
2089	(ancestor::library/if[@target=$self_target]/enumerator[@name=current()]))
2090	) or
2091	((ancestor::library/interface[@name=current()]) or
2092	(ancestor::library/if[@target=$self_target]/interface[@name=current()])
2093	)
2094	">
2095	<xsl:value-of select="."/>
2096	<xsl:text> *</xsl:text>
2097	</xsl:when>
2098	<!-- other types -->
2099	</xsl:choose>
2100	</xsl:otherwise>
2101	</xsl:choose>
2102	</xsl:otherwise>
2103	</xsl:choose>
2104	</xsl:template>
2105
2106	</xsl:stylesheet>
2107

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Main/cbinding/xpcidl.xsl@ 42131

Download in other formats: