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
|
#ifndef MIDLTESTS_C_CODE
/*
* For midltests_tcp.exe you may want to
* redirect the traffic via rinetd
* with a /etc/rinetd.conf like this:
*
* 172.31.9.1 5032 172.31.9.8 5032
* 172.31.9.1 5064 172.31.9.8 5064
*
* This is useful to watch the traffic with
* a network sniffer.
*/
/*
cpp_quote("#define LISTEN_IP \"0.0.0.0\"")
cpp_quote("#define FORWARD_IP \"127.0.0.1\"")
cpp_quote("#define CONNECT_IP \"172.31.9.1\"")
*/
/*
* With midltests_tcp.exe NDR64 is enforced by default.
* For testing it might be needed to allow downgrades
* to NDR32. This is needed when you use 'pipe'.
*/
//cpp_quote("#define DONOT_FORCE_NDR64 1")
[
uuid("225b9fcb-eb3d-497b-8b0b-591f049a2507"),
ms_union,
pointer_default(unique)
]
interface midltests
{
enum level_enum { ZERO = 0, ONE = 1, TWO = 2, FOUR = 4, EIGHT = 8 };
[switch_type(enum level_enum)] union u {
[case(ZERO)];
[case(ONE)] char c;
[case(TWO)] short s;
[case(FOUR)] long l;
[case(EIGHT)] hyper h;
};
union ue switch(enum level_enum level) u {
case(ZERO):;
case(ONE): char c;
case(TWO): short s;
case(FOUR): long l;
case(EIGHT): hyper h;
};
void midltests_fn(
[in,out,ref] enum level_enum *level,
[in,switch_is(*level)] union u u,
[out,ref] union ue *ue,
[in,out,ref] char *c
);
}
#elif MIDLTESTS_C_CODE
static void midltests(void)
{
enum level_enum level;
unsigned char c = 'c';
struct ue ue;
union u u;
u.h = 0xFFFFFFFFFFFFFFFFLL;
level = ZERO;
cli_midltests_fn(&level, u, &ue, &c);
level = ONE;
cli_midltests_fn(&level, u, &ue, &c);
level = TWO;
cli_midltests_fn(&level, u, &ue, &c);
level = FOUR;
cli_midltests_fn(&level, u, &ue, &c);
level = EIGHT;
cli_midltests_fn(&level, u, &ue, &c);
}
void srv_midltests_fn(enum level_enum *level, union u u, struct ue *ue, unsigned char *c)
{
printf("srv_midltests_fn: Start\n");
ue->level = *level;
ue->u.h = u.h;
printf("srv_midltests_fn: End\n");
return;
}
#endif
|
