1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
// $Id$
//
// This file contains few valuetypes to show and test truncatable feature of
// valuetype.
//
module OBV_TruncatableTest
{
//
// Base valuetype.
//
valuetype BaseValue
{
public unsigned long basic_data;
};
//
// Valuetype with one-level truncatable inheritence.
//
valuetype TValue1 : truncatable BaseValue
{
public unsigned long data1;
};
//
// Valuetype with multi-level truncatable inheritence.
//
valuetype TValue2 : truncatable TValue1
{
public unsigned long data2;
};
//
// Valuetype with multi-level inheritence, but not all truncatable.
//
valuetype TValue3 : TValue1
{
public unsigned long data3;
};
//
// An valuetype nested in a valuetype.
//
valuetype NestedValue
{
public long data;
};
//
// Truncatable valuetype with nested valuetype.
//
valuetype TValue4 : truncatable BaseValue
{
public NestedValue nv4;
public unsigned long data4;
};
//
// More complex truncatable valuetype.
//
valuetype TValue5 : truncatable TValue4
{
public string str1;
public unsigned long data5;
public NestedValue nv5;
public string str2;
};
//
// No data valuetype with truncatable parent.
valuetype TValue6 : truncatable BaseValue
{
};
//
// Interface to pass valuetypes.
//
interface Test
{
//NOTE: the "desc" parameter helps verify that truncated values are skipped properly.
// the output is "<id>: <input desc>"
void op1 (in string id, in BaseValue iv, out BaseValue ov, inout string desc);
void op2 (in TValue1 iv, in string id, out TValue1 ov, inout string desc);
void op3 (in string id, in TValue4 iv, out TValue4 ov, inout string desc);
BaseValue op4 (in string id,
in TValue1 iv1,
in short x,
in TValue4 iv2,
in TValue4 iv3,
in TValue1 iv4,
inout string desc);
// Shutdown the romote ORB
oneway void shutdown ();
};
};
|