diff options
Diffstat (limited to 'testprogs/win32/midltests/valid/midltests_union_align_17.idl')
| -rw-r--r-- | testprogs/win32/midltests/valid/midltests_union_align_17.idl | 94 |
1 files changed, 94 insertions, 0 deletions
diff --git a/testprogs/win32/midltests/valid/midltests_union_align_17.idl b/testprogs/win32/midltests/valid/midltests_union_align_17.idl new file mode 100644 index 0000000..f151452 --- /dev/null +++ b/testprogs/win32/midltests/valid/midltests_union_align_17.idl @@ -0,0 +1,94 @@ +#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; + }; + + struct us { + enum level_enum level; + [switch_is(level)] union { + [case(ZERO)]; + [case(ONE)] char c; + [case(TWO)] short s; + [case(FOUR)] long l; + [case(EIGHT)] hyper h; + } u; + }; + + void midltests_fn( + [in,ref] enum level_enum *level, + [in,switch_is(*level)] union u u, + [out,ref] struct us *us, + [in,out,ref] char *c + ); +} + +#elif MIDLTESTS_C_CODE + +static void midltests(void) +{ + enum level_enum level; + char c = 'c'; + struct us us; + union u u; + u.h = 0xFFFFFFFFFFFFFFFFLL; + + level = ZERO; + cli_midltests_fn(&level, u, &us, &c); + level = ONE; + cli_midltests_fn(&level, u, &us, &c); + level = TWO; + cli_midltests_fn(&level, u, &us, &c); + level = FOUR; + cli_midltests_fn(&level, u, &us, &c); + level = EIGHT; + cli_midltests_fn(&level, u, &us, &c); +} + +void srv_midltests_fn(enum level_enum *level, union u u, struct us *us, char *c) +{ + printf("srv_midltests_fn: Start\n"); + us->level = *level; + us->u.h = u.h; + printf("srv_midltests_fn: End\n"); + return; +} + +#endif |