rpcrt4: Save the previous BufferLength in test_ndr_buffer and use it when testing...
[wine] / dlls / rpcrt4 / tests / rpc.c
1 /*
2  * Unit test suite for rpc functions
3  *
4  * Copyright 2002 Greg Turner
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include <stdarg.h>
22 #include <stdio.h>
23
24 #include <ntstatus.h>
25 #define WIN32_NO_STATUS
26 #include "wine/test.h"
27 #include <windef.h>
28 #include <winbase.h>
29 #include <winnt.h>
30 #include <winerror.h>
31
32 #include "rpc.h"
33 #include "rpcdce.h"
34
35 typedef unsigned int unsigned32;
36 typedef struct twr_t
37     {
38     unsigned32 tower_length;
39     /* [size_is] */ byte tower_octet_string[ 1 ];
40     }   twr_t;
41
42 RPC_STATUS WINAPI TowerExplode(const twr_t *tower, RPC_SYNTAX_IDENTIFIER *object, RPC_SYNTAX_IDENTIFIER *syntax, char **protseq, char **endpoint, char **address);
43 RPC_STATUS WINAPI TowerConstruct(const RPC_SYNTAX_IDENTIFIER *object, const RPC_SYNTAX_IDENTIFIER *syntax, const char *protseq, const char *endpoint, const char *address, twr_t **tower);
44
45 static UUID Uuid_Table[10] = {
46   { 0x00000000, 0x0000, 0x0000, {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00} }, /* 0 (null) */
47   { 0xdeadbeef, 0xdead, 0xbeef, {0x10, 0x21, 0x35, 0x56, 0x89, 0xa0, 0xf4, 0x8a} }, /* 1 */
48   { 0xabadfeed, 0x49ff, 0xbead, {0x8a, 0xf4, 0xa0, 0x89, 0x56, 0x35, 0x21, 0x10} }, /* 2 */
49   { 0x93da375c, 0x1324, 0x1355, {0x87, 0xff, 0x49, 0x44, 0x34, 0x44, 0x22, 0x19} }, /* 3 */
50   { 0xdeadbeef, 0xdead, 0xbeef, {0x10, 0x21, 0x35, 0x56, 0x89, 0xa0, 0xf4, 0x8b} }, /* 4 (~1) */
51   { 0x9badfeed, 0x49ff, 0xbead, {0x8a, 0xf4, 0xa0, 0x89, 0x56, 0x35, 0x21, 0x10} }, /* 5 (~2) */
52   { 0x00000000, 0x0001, 0x0000, {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00} }, /* 6 (~0) */
53   { 0x00000000, 0x0000, 0x0000, {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01} }, /* 7 (~0) */
54   { 0x12312312, 0x1231, 0x1231, {0x12, 0x34, 0x56, 0x78, 0x9a, 0xbc, 0xde, 0xff} }, /* 8 */
55   { 0x11111111, 0x1111, 0x1111, {0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11} }  /* 9 */
56 };
57
58 /* index of "10" means "NULL" */
59 static BOOL Uuid_Comparison_Grid[11][11] = {
60   { TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE  },
61   { FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE },
62   { FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE },
63   { FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE },
64   { FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE },
65   { FALSE, FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE },
66   { FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE, FALSE },
67   { FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE, FALSE },
68   { FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE, FALSE },
69   { FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE,  FALSE },
70   { TRUE,  FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE  }
71 };
72
73 static void UuidConversionAndComparison(void) {
74     CHAR strx[100], x;
75     LPSTR str = strx;
76     WCHAR wstrx[100], wx;
77     LPWSTR wstr = wstrx;
78
79     UUID Uuid1, Uuid2, *PUuid1, *PUuid2;
80     RPC_STATUS rslt;
81
82     int i1,i2;
83
84     /* Uuid Equality */
85     for (i1 = 0; i1 < 11; i1++)
86         for (i2 = 0; i2 < 11; i2++) {
87             if (i1 < 10) {
88                 Uuid1 = Uuid_Table[i1]; 
89                 PUuid1 = &Uuid1;
90             } else {
91                 PUuid1 = NULL;
92             }        
93             if (i2 < 10) {
94                 Uuid2 = Uuid_Table[i2];
95                 PUuid2 = &Uuid2;
96             } else {
97                 PUuid2 = NULL;
98             }
99             ok( (UuidEqual(PUuid1, PUuid2, &rslt) == Uuid_Comparison_Grid[i1][i2]), "UUID Equality\n" );
100         }
101
102     /* Uuid to String to Uuid (char) */
103     for (i1 = 0; i1 < 10; i1++) {
104         Uuid1 = Uuid_Table[i1];
105         ok( (UuidToStringA(&Uuid1, (unsigned char**)&str) == RPC_S_OK), "Simple UUID->String copy\n" );
106         ok( (UuidFromStringA((unsigned char*)str, &Uuid2) == RPC_S_OK), "Simple String->UUID copy from generated UUID String\n" );
107         ok( UuidEqual(&Uuid1, &Uuid2, &rslt), "Uuid -> String -> Uuid transform\n" );
108         /* invalid uuid tests  -- size of valid UUID string=36 */
109         for (i2 = 0; i2 < 36; i2++) {
110             x = str[i2];
111             str[i2] = 'g'; /* whatever, but "g" is a good boundary condition */
112             ok( (UuidFromStringA((unsigned char*)str, &Uuid1) == RPC_S_INVALID_STRING_UUID), "Invalid UUID String\n" );
113             str[i2] = x; /* change it back so remaining tests are interesting. */
114         }
115         RpcStringFree((unsigned char **)&str);
116     }
117
118     /* Uuid to String to Uuid (wchar) */
119     for (i1 = 0; i1 < 10; i1++) {
120         Uuid1 = Uuid_Table[i1];
121         rslt=UuidToStringW(&Uuid1, &wstr);
122         if (rslt==RPC_S_CANNOT_SUPPORT) {
123             /* Must be Win9x (no Unicode support), skip the tests */
124             break;
125         }
126         ok( (rslt == RPC_S_OK), "Simple UUID->WString copy\n" );
127         ok( (UuidFromStringW(wstr, &Uuid2) == RPC_S_OK), "Simple WString->UUID copy from generated UUID String\n" );
128         ok( UuidEqual(&Uuid1, &Uuid2, &rslt), "Uuid -> WString -> Uuid transform\n" );
129         /* invalid uuid tests  -- size of valid UUID string=36 */
130         for (i2 = 0; i2 < 36; i2++) {
131             wx = wstr[i2];
132             wstr[i2] = 'g'; /* whatever, but "g" is a good boundary condition */
133             ok( (UuidFromStringW(wstr, &Uuid1) == RPC_S_INVALID_STRING_UUID), "Invalid UUID WString\n" );
134             wstr[i2] = wx; /* change it back so remaining tests are interesting. */
135         }
136         RpcStringFreeW(&wstr);
137     }
138 }
139
140 static void TestDceErrorInqText (void)
141 {
142     char bufferInvalid [1024];
143     char buffer [1024]; /* The required size is not documented but would
144                          * appear to be 256.
145                          */
146     DWORD dwCount;
147
148     dwCount = FormatMessageA (FORMAT_MESSAGE_FROM_SYSTEM | 
149               FORMAT_MESSAGE_IGNORE_INSERTS,
150               NULL, RPC_S_NOT_RPC_ERROR, 0, bufferInvalid,
151               sizeof(bufferInvalid)/sizeof(bufferInvalid[0]), NULL);
152
153     /* A random sample of DceErrorInqText */
154     /* 0 is success */
155     ok ((DceErrorInqTextA (0, (unsigned char*)buffer) == RPC_S_OK),
156             "DceErrorInqTextA(0...)\n");
157     /* A real RPC_S error */
158     ok ((DceErrorInqTextA (RPC_S_INVALID_STRING_UUID, (unsigned char*)buffer) == RPC_S_OK),
159             "DceErrorInqTextA(valid...)\n");
160
161     if (dwCount)
162     {
163         /* A message for which FormatMessage should fail
164          * which should return RPC_S_OK and the 
165          * fixed "not valid" message
166          */
167         ok ((DceErrorInqTextA (35, (unsigned char*)buffer) == RPC_S_OK &&
168                     strcmp (buffer, bufferInvalid) == 0),
169                 "DceErrorInqTextA(unformattable...)\n");
170         /* One for which FormatMessage should succeed but 
171          * DceErrorInqText should "fail"
172          * 3814 is generally quite a long message
173          */
174         ok ((DceErrorInqTextA (3814, (unsigned char*)buffer) == RPC_S_OK &&
175                     strcmp (buffer, bufferInvalid) == 0),
176                 "DceErrorInqTextA(deviation...)\n");
177     }
178     else
179         ok (0, "Cannot set up for DceErrorInqText\n");
180 }
181
182 static RPC_DISPATCH_FUNCTION IFoo_table[] =
183 {
184     0
185 };
186
187 static RPC_DISPATCH_TABLE IFoo_v0_0_DispatchTable =
188 {
189     0,
190     IFoo_table
191 };
192
193 static const RPC_SERVER_INTERFACE IFoo___RpcServerInterface =
194 {
195     sizeof(RPC_SERVER_INTERFACE),
196     {{0x00000000,0x0000,0x0000,{0x00,0x00,0x00,0x00,0x00,0x00,0x12,0x34}},{0,0}},
197     {{0x8a885d04,0x1ceb,0x11c9,{0x9f,0xe8,0x08,0x00,0x2b,0x10,0x48,0x60}},{2,0}},
198     &IFoo_v0_0_DispatchTable,
199     0,
200     0,
201     0,
202     0,
203     0,
204 };
205
206 static RPC_IF_HANDLE IFoo_v0_0_s_ifspec = (RPC_IF_HANDLE)& IFoo___RpcServerInterface;
207
208 static void test_rpc_ncacn_ip_tcp(void)
209 {
210     RPC_STATUS status;
211     unsigned char *binding;
212     handle_t IFoo_IfHandle;
213     static unsigned char foo[] = "foo";
214     static unsigned char ncacn_ip_tcp[] = "ncacn_ip_tcp";
215     static unsigned char address[] = "127.0.0.1";
216     static unsigned char endpoint[] = "4114";
217
218     status = RpcNetworkIsProtseqValid(foo);
219     ok(status == RPC_S_INVALID_RPC_PROTSEQ, "return wrong\n");
220
221     status = RpcNetworkIsProtseqValid(ncacn_ip_tcp);
222     ok(status == RPC_S_OK, "return wrong\n");
223
224     status = RpcMgmtStopServerListening(NULL);
225 todo_wine {
226     ok(status == RPC_S_NOT_LISTENING,
227        "wrong RpcMgmtStopServerListening error (%lu)\n", status);
228 }
229
230     status = RpcMgmtWaitServerListen();
231     ok(status == RPC_S_NOT_LISTENING,
232        "wrong RpcMgmtWaitServerListen error status (%lu)\n", status);
233
234     status = RpcServerListen(1, 20, FALSE);
235     ok(status == RPC_S_NO_PROTSEQS_REGISTERED,
236        "wrong RpcServerListen error (%lu)\n", status);
237
238     status = RpcServerUseProtseqEp(ncacn_ip_tcp, 20, endpoint, NULL);
239     ok(status == RPC_S_OK, "RpcServerUseProtseqEp failed (%lu)\n", status);
240
241     status = RpcServerRegisterIf(IFoo_v0_0_s_ifspec, NULL, NULL);
242     ok(status == RPC_S_OK, "RpcServerRegisterIf failed (%lu)\n", status);
243
244     status = RpcServerListen(1, 20, TRUE);
245 todo_wine {
246     ok(status == RPC_S_OK, "RpcServerListen failed (%lu)\n", status);
247 }
248
249     status = RpcServerListen(1, 20, TRUE);
250 todo_wine {
251     ok(status == RPC_S_ALREADY_LISTENING,
252        "wrong RpcServerListen error (%lu)\n", status);
253 }
254
255     status = RpcStringBindingCompose(NULL, ncacn_ip_tcp, address,
256                                      endpoint, NULL, &binding);
257     ok(status == RPC_S_OK, "RpcStringBindingCompose failed (%lu)\n", status);
258
259     status = RpcBindingFromStringBinding(binding, &IFoo_IfHandle);
260     ok(status == RPC_S_OK, "RpcBindingFromStringBinding failed (%lu)\n",
261        status);
262
263     status = RpcMgmtStopServerListening(NULL);
264     ok(status == RPC_S_OK, "RpcMgmtStopServerListening failed (%lu)\n",
265        status);
266
267     status = RpcMgmtStopServerListening(NULL);
268     ok(status == RPC_S_OK, "RpcMgmtStopServerListening failed (%lu)\n",
269        status);
270
271     status = RpcServerUnregisterIf(NULL, NULL, FALSE);
272     ok(status == RPC_S_OK, "RpcServerUnregisterIf failed (%lu)\n", status);
273
274     status = RpcMgmtWaitServerListen();
275 todo_wine {
276     ok(status == RPC_S_OK, "RpcMgmtWaitServerListen failed (%lu)\n", status);
277 }
278
279     status = RpcStringFree(&binding);
280     ok(status == RPC_S_OK, "RpcStringFree failed (%lu)\n", status);
281
282     status = RpcBindingFree(&IFoo_IfHandle);
283     ok(status == RPC_S_OK, "RpcBindingFree failed (%lu)\n", status);
284 }
285
286 /* this is what's generated with MS/RPC - it includes an extra 2
287  * bytes in the protocol floor */
288 static const unsigned char tower_data_tcp_ip1[] =
289 {
290     0x05,0x00,0x13,0x00,0x0d,0x00,0xdb,0xf1,
291     0xa4,0x47,0xca,0x67,0x10,0xb3,0x1f,0x00,
292     0xdd,0x01,0x06,0x62,0xda,0x00,0x00,0x02,
293     0x00,0x00,0x00,0x13,0x00,0x0d,0x04,0x5d,
294     0x88,0x8a,0xeb,0x1c,0xc9,0x11,0x9f,0xe8,
295     0x08,0x00,0x2b,0x10,0x48,0x60,0x02,0x00,
296     0x02,0x00,0x00,0x00,0x01,0x00,0x0b,0x02,
297     0x00,0x00,0x00,0x01,0x00,0x07,0x02,0x00,
298     0x00,0x87,0x01,0x00,0x09,0x04,0x00,0x0a,
299     0x00,0x00,0x01,
300 };
301 /* this is the optimal data that i think should be generated */
302 static const unsigned char tower_data_tcp_ip2[] =
303 {
304     0x05,0x00,0x13,0x00,0x0d,0x00,0xdb,0xf1,
305     0xa4,0x47,0xca,0x67,0x10,0xb3,0x1f,0x00,
306     0xdd,0x01,0x06,0x62,0xda,0x00,0x00,0x02,
307     0x00,0x00,0x00,0x13,0x00,0x0d,0x04,0x5d,
308     0x88,0x8a,0xeb,0x1c,0xc9,0x11,0x9f,0xe8,
309     0x08,0x00,0x2b,0x10,0x48,0x60,0x02,0x00,
310     0x02,0x00,0x00,0x00,0x01,0x00,0x0b,0x00,
311     0x00,0x01,0x00,0x07,0x02,0x00,0x00,0x87,
312     0x01,0x00,0x09,0x04,0x00,0x0a,0x00,0x00,
313     0x01,
314 };
315
316 static void test_towers(void)
317 {
318     RPC_STATUS ret;
319     twr_t *tower;
320     static const RPC_SYNTAX_IDENTIFIER mapi_if_id = { { 0xa4f1db00, 0xca47, 0x1067, { 0xb3, 0x1f, 0x00, 0xdd, 0x01, 0x06, 0x62, 0xda } }, { 0, 0 } };
321     static const RPC_SYNTAX_IDENTIFIER ndr_syntax = { { 0x8a885d04, 0x1ceb, 0x11c9, { 0x9f, 0xe8, 0x08, 0x00, 0x2b, 0x10, 0x48, 0x60 } }, { 2, 0 } };
322     RPC_SYNTAX_IDENTIFIER object, syntax;
323     char *protseq, *endpoint, *address;
324     BOOL same;
325
326     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_ip_tcp", "135", "10.0.0.1", &tower);
327     ok(ret == RPC_S_OK, "TowerConstruct failed with error %ld\n", ret);
328     if (ret == RPC_S_INVALID_RPC_PROTSEQ)
329     {
330         /* Windows Vista fails with this error and crashes if we continue */
331         skip("TowerConstruct failed, we are most likely on Windows Vista\n");
332         return;
333     }
334
335     /* first check we have the right amount of data */
336     ok(tower->tower_length == sizeof(tower_data_tcp_ip1) ||
337        tower->tower_length == sizeof(tower_data_tcp_ip2),
338         "Wrong size of tower %d\n", tower->tower_length);
339
340     /* then do a byte-by-byte comparison */
341     same = ((tower->tower_length == sizeof(tower_data_tcp_ip1)) &&
342             !memcmp(&tower->tower_octet_string, tower_data_tcp_ip1, sizeof(tower_data_tcp_ip1))) ||
343            ((tower->tower_length == sizeof(tower_data_tcp_ip2)) &&
344             !memcmp(&tower->tower_octet_string, tower_data_tcp_ip2, sizeof(tower_data_tcp_ip2)));
345
346     ok(same, "Tower data differs\n");
347     if (!same)
348     {
349         unsigned32 i;
350         for (i = 0; i < tower->tower_length; i++)
351         {
352             if (i % 8 == 0) printf("    ");
353             printf("0x%02x,", tower->tower_octet_string[i]);
354             if (i % 8 == 7) printf("\n");
355         }
356         printf("\n");
357     }
358
359     ret = TowerExplode(tower, &object, &syntax, &protseq, &endpoint, &address);
360     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
361     ok(!memcmp(&object, &mapi_if_id, sizeof(mapi_if_id)), "object id didn't match\n");
362     ok(!memcmp(&syntax, &ndr_syntax, sizeof(syntax)), "syntax id didn't match\n");
363     ok(!strcmp(protseq, "ncacn_ip_tcp"), "protseq was \"%s\" instead of \"ncacn_ip_tcp\"\n", protseq);
364     ok(!strcmp(endpoint, "135"), "endpoint was \"%s\" instead of \"135\"\n", endpoint);
365     ok(!strcmp(address, "10.0.0.1"), "address was \"%s\" instead of \"10.0.0.1\"\n", address);
366
367     I_RpcFree(protseq);
368     I_RpcFree(endpoint);
369     I_RpcFree(address);
370
371     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, NULL);
372     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
373
374     I_RpcFree(tower);
375
376     /* test the behaviour for ip_tcp with name instead of dotted IP notation */
377     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_ip_tcp", "135", "localhost", &tower);
378     ok(ret == RPC_S_OK, "TowerConstruct failed with error %ld\n", ret);
379     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, &address);
380     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
381     ok(!strcmp(address, "0.0.0.0"), "address was \"%s\" instead of \"0.0.0.0\"\n", address);
382
383     I_RpcFree(address);
384     I_RpcFree(tower);
385
386     /* test the behaviour for np with no address */
387     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_np", "\\pipe\\test", NULL, &tower);
388     ok(ret == RPC_S_OK, "TowerConstruct failed with error %ld\n", ret);
389     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, &address);
390     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
391     /* Windows XP SP3 sets address to NULL */
392     ok(!address || !strcmp(address, ""), "address was \"%s\" instead of \"\"\n or NULL (XP SP3)", address);
393
394     I_RpcFree(address);
395     I_RpcFree(tower);
396 }
397
398 static void test_I_RpcMapWin32Status(void)
399 {
400     LONG win32status;
401     RPC_STATUS rpc_status;
402     BOOL on_win9x = FALSE;
403     BOOL w2k3_up = FALSE;
404
405     /* Win9x always returns the given status */
406     win32status = I_RpcMapWin32Status(ERROR_ACCESS_DENIED);
407     if (win32status == ERROR_ACCESS_DENIED)
408         on_win9x = TRUE;
409
410     /* Windows 2003 and Vista return STATUS_UNSUCCESSFUL if given an unknown status */
411     win32status = I_RpcMapWin32Status(9999);
412     if (win32status == STATUS_UNSUCCESSFUL)
413     {
414         trace("We are on Windows 2003 or Vista\n");
415         w2k3_up = TRUE;
416     }
417
418     /* On Windows XP-SP1 and below some statuses are not mapped and return
419      * the given status
420      */
421     for (rpc_status = 0; rpc_status < 10000; rpc_status++)
422     {
423         LONG expected_win32status;
424         BOOL missing = FALSE;
425
426         win32status = I_RpcMapWin32Status(rpc_status);
427         switch (rpc_status)
428         {
429         case ERROR_SUCCESS: expected_win32status = ERROR_SUCCESS; break;
430         case ERROR_ACCESS_DENIED: expected_win32status = STATUS_ACCESS_DENIED; break;
431         case ERROR_INVALID_HANDLE: expected_win32status = RPC_NT_SS_CONTEXT_MISMATCH; break;
432         case ERROR_OUTOFMEMORY: expected_win32status = STATUS_NO_MEMORY; break;
433         case ERROR_INVALID_PARAMETER: expected_win32status = STATUS_INVALID_PARAMETER; break;
434         case ERROR_INSUFFICIENT_BUFFER: expected_win32status = STATUS_BUFFER_TOO_SMALL; break;
435         case ERROR_MAX_THRDS_REACHED: expected_win32status = STATUS_NO_MEMORY; break;
436         case ERROR_NOACCESS: expected_win32status = STATUS_ACCESS_VIOLATION; break;
437         case ERROR_NOT_ENOUGH_SERVER_MEMORY: expected_win32status = STATUS_INSUFF_SERVER_RESOURCES; break;
438         case ERROR_WRONG_PASSWORD:  expected_win32status = STATUS_WRONG_PASSWORD; missing = TRUE; break;
439         case ERROR_INVALID_LOGON_HOURS: expected_win32status = STATUS_INVALID_LOGON_HOURS; missing = TRUE; break;
440         case ERROR_PASSWORD_EXPIRED: expected_win32status = STATUS_PASSWORD_EXPIRED; missing = TRUE; break;
441         case ERROR_ACCOUNT_DISABLED: expected_win32status = STATUS_ACCOUNT_DISABLED; missing = TRUE; break;
442         case ERROR_INVALID_SECURITY_DESCR: expected_win32status = STATUS_INVALID_SECURITY_DESCR; break;
443         case RPC_S_INVALID_STRING_BINDING: expected_win32status = RPC_NT_INVALID_STRING_BINDING; break;
444         case RPC_S_WRONG_KIND_OF_BINDING: expected_win32status = RPC_NT_WRONG_KIND_OF_BINDING; break;
445         case RPC_S_INVALID_BINDING: expected_win32status = RPC_NT_INVALID_BINDING; break;
446         case RPC_S_PROTSEQ_NOT_SUPPORTED: expected_win32status = RPC_NT_PROTSEQ_NOT_SUPPORTED; break;
447         case RPC_S_INVALID_RPC_PROTSEQ: expected_win32status = RPC_NT_INVALID_RPC_PROTSEQ; break;
448         case RPC_S_INVALID_STRING_UUID: expected_win32status = RPC_NT_INVALID_STRING_UUID; break;
449         case RPC_S_INVALID_ENDPOINT_FORMAT: expected_win32status = RPC_NT_INVALID_ENDPOINT_FORMAT; break;
450         case RPC_S_INVALID_NET_ADDR: expected_win32status = RPC_NT_INVALID_NET_ADDR; break;
451         case RPC_S_NO_ENDPOINT_FOUND: expected_win32status = RPC_NT_NO_ENDPOINT_FOUND; break;
452         case RPC_S_INVALID_TIMEOUT: expected_win32status = RPC_NT_INVALID_TIMEOUT; break;
453         case RPC_S_OBJECT_NOT_FOUND: expected_win32status = RPC_NT_OBJECT_NOT_FOUND; break;
454         case RPC_S_ALREADY_REGISTERED: expected_win32status = RPC_NT_ALREADY_REGISTERED; break;
455         case RPC_S_TYPE_ALREADY_REGISTERED: expected_win32status = RPC_NT_TYPE_ALREADY_REGISTERED; break;
456         case RPC_S_ALREADY_LISTENING: expected_win32status = RPC_NT_ALREADY_LISTENING; break;
457         case RPC_S_NO_PROTSEQS_REGISTERED: expected_win32status = RPC_NT_NO_PROTSEQS_REGISTERED; break;
458         case RPC_S_NOT_LISTENING: expected_win32status = RPC_NT_NOT_LISTENING; break;
459         case RPC_S_UNKNOWN_MGR_TYPE: expected_win32status = RPC_NT_UNKNOWN_MGR_TYPE; break;
460         case RPC_S_UNKNOWN_IF: expected_win32status = RPC_NT_UNKNOWN_IF; break;
461         case RPC_S_NO_BINDINGS: expected_win32status = RPC_NT_NO_BINDINGS; break;
462         case RPC_S_NO_PROTSEQS: expected_win32status = RPC_NT_NO_PROTSEQS; break;
463         case RPC_S_CANT_CREATE_ENDPOINT: expected_win32status = RPC_NT_CANT_CREATE_ENDPOINT; break;
464         case RPC_S_OUT_OF_RESOURCES: expected_win32status = RPC_NT_OUT_OF_RESOURCES; break;
465         case RPC_S_SERVER_UNAVAILABLE: expected_win32status = RPC_NT_SERVER_UNAVAILABLE; break;
466         case RPC_S_SERVER_TOO_BUSY: expected_win32status = RPC_NT_SERVER_TOO_BUSY; break;
467         case RPC_S_INVALID_NETWORK_OPTIONS: expected_win32status = RPC_NT_INVALID_NETWORK_OPTIONS; break;
468         case RPC_S_NO_CALL_ACTIVE: expected_win32status = RPC_NT_NO_CALL_ACTIVE; break;
469         case RPC_S_CALL_FAILED: expected_win32status = RPC_NT_CALL_FAILED; break;
470         case RPC_S_CALL_FAILED_DNE: expected_win32status = RPC_NT_CALL_FAILED_DNE; break;
471         case RPC_S_PROTOCOL_ERROR: expected_win32status = RPC_NT_PROTOCOL_ERROR; break;
472         case RPC_S_UNSUPPORTED_TRANS_SYN: expected_win32status = RPC_NT_UNSUPPORTED_TRANS_SYN; break;
473         case RPC_S_UNSUPPORTED_TYPE: expected_win32status = RPC_NT_UNSUPPORTED_TYPE; break;
474         case RPC_S_INVALID_TAG: expected_win32status = RPC_NT_INVALID_TAG; break;
475         case RPC_S_INVALID_BOUND: expected_win32status = RPC_NT_INVALID_BOUND; break;
476         case RPC_S_NO_ENTRY_NAME: expected_win32status = RPC_NT_NO_ENTRY_NAME; break;
477         case RPC_S_INVALID_NAME_SYNTAX: expected_win32status = RPC_NT_INVALID_NAME_SYNTAX; break;
478         case RPC_S_UNSUPPORTED_NAME_SYNTAX: expected_win32status = RPC_NT_UNSUPPORTED_NAME_SYNTAX; break;
479         case RPC_S_UUID_NO_ADDRESS: expected_win32status = RPC_NT_UUID_NO_ADDRESS; break;
480         case RPC_S_DUPLICATE_ENDPOINT: expected_win32status = RPC_NT_DUPLICATE_ENDPOINT; break;
481         case RPC_S_UNKNOWN_AUTHN_TYPE: expected_win32status = RPC_NT_UNKNOWN_AUTHN_TYPE; break;
482         case RPC_S_MAX_CALLS_TOO_SMALL: expected_win32status = RPC_NT_MAX_CALLS_TOO_SMALL; break;
483         case RPC_S_STRING_TOO_LONG: expected_win32status = RPC_NT_STRING_TOO_LONG; break;
484         case RPC_S_PROTSEQ_NOT_FOUND: expected_win32status = RPC_NT_PROTSEQ_NOT_FOUND; break;
485         case RPC_S_PROCNUM_OUT_OF_RANGE: expected_win32status = RPC_NT_PROCNUM_OUT_OF_RANGE; break;
486         case RPC_S_BINDING_HAS_NO_AUTH: expected_win32status = RPC_NT_BINDING_HAS_NO_AUTH; break;
487         case RPC_S_UNKNOWN_AUTHN_SERVICE: expected_win32status = RPC_NT_UNKNOWN_AUTHN_SERVICE; break;
488         case RPC_S_UNKNOWN_AUTHN_LEVEL: expected_win32status = RPC_NT_UNKNOWN_AUTHN_LEVEL; break;
489         case RPC_S_INVALID_AUTH_IDENTITY: expected_win32status = RPC_NT_INVALID_AUTH_IDENTITY; break;
490         case RPC_S_UNKNOWN_AUTHZ_SERVICE: expected_win32status = RPC_NT_UNKNOWN_AUTHZ_SERVICE; break;
491         case EPT_S_INVALID_ENTRY: expected_win32status = EPT_NT_INVALID_ENTRY; break;
492         case EPT_S_CANT_PERFORM_OP: expected_win32status = EPT_NT_CANT_PERFORM_OP; break;
493         case EPT_S_NOT_REGISTERED: expected_win32status = EPT_NT_NOT_REGISTERED; break;
494         case EPT_S_CANT_CREATE: expected_win32status = EPT_NT_CANT_CREATE; break;
495         case RPC_S_NOTHING_TO_EXPORT: expected_win32status = RPC_NT_NOTHING_TO_EXPORT; break;
496         case RPC_S_INCOMPLETE_NAME: expected_win32status = RPC_NT_INCOMPLETE_NAME; break;
497         case RPC_S_INVALID_VERS_OPTION: expected_win32status = RPC_NT_INVALID_VERS_OPTION; break;
498         case RPC_S_NO_MORE_MEMBERS: expected_win32status = RPC_NT_NO_MORE_MEMBERS; break;
499         case RPC_S_NOT_ALL_OBJS_UNEXPORTED: expected_win32status = RPC_NT_NOT_ALL_OBJS_UNEXPORTED; break;
500         case RPC_S_INTERFACE_NOT_FOUND: expected_win32status = RPC_NT_INTERFACE_NOT_FOUND; break;
501         case RPC_S_ENTRY_ALREADY_EXISTS: expected_win32status = RPC_NT_ENTRY_ALREADY_EXISTS; break;
502         case RPC_S_ENTRY_NOT_FOUND: expected_win32status = RPC_NT_ENTRY_NOT_FOUND; break;
503         case RPC_S_NAME_SERVICE_UNAVAILABLE: expected_win32status = RPC_NT_NAME_SERVICE_UNAVAILABLE; break;
504         case RPC_S_INVALID_NAF_ID: expected_win32status = RPC_NT_INVALID_NAF_ID; break;
505         case RPC_S_CANNOT_SUPPORT: expected_win32status = RPC_NT_CANNOT_SUPPORT; break;
506         case RPC_S_NO_CONTEXT_AVAILABLE: expected_win32status = RPC_NT_NO_CONTEXT_AVAILABLE; break;
507         case RPC_S_INTERNAL_ERROR: expected_win32status = RPC_NT_INTERNAL_ERROR; break;
508         case RPC_S_ZERO_DIVIDE: expected_win32status = RPC_NT_ZERO_DIVIDE; break;
509         case RPC_S_ADDRESS_ERROR: expected_win32status = RPC_NT_ADDRESS_ERROR; break;
510         case RPC_S_FP_DIV_ZERO: expected_win32status = RPC_NT_FP_DIV_ZERO; break;
511         case RPC_S_FP_UNDERFLOW: expected_win32status = RPC_NT_FP_UNDERFLOW; break;
512         case RPC_S_FP_OVERFLOW: expected_win32status = RPC_NT_FP_OVERFLOW; break;
513         case RPC_S_CALL_IN_PROGRESS: expected_win32status = RPC_NT_CALL_IN_PROGRESS; break;
514         case RPC_S_NO_MORE_BINDINGS: expected_win32status = RPC_NT_NO_MORE_BINDINGS; break;
515         case RPC_S_CALL_CANCELLED: expected_win32status = RPC_NT_CALL_CANCELLED; missing = TRUE; break;
516         case RPC_S_INVALID_OBJECT: expected_win32status = RPC_NT_INVALID_OBJECT; break;
517         case RPC_S_INVALID_ASYNC_HANDLE: expected_win32status = RPC_NT_INVALID_ASYNC_HANDLE; missing = TRUE; break;
518         case RPC_S_INVALID_ASYNC_CALL: expected_win32status = RPC_NT_INVALID_ASYNC_CALL; missing = TRUE; break;
519         case RPC_S_GROUP_MEMBER_NOT_FOUND: expected_win32status = RPC_NT_GROUP_MEMBER_NOT_FOUND; break;
520         case RPC_X_NO_MORE_ENTRIES: expected_win32status = RPC_NT_NO_MORE_ENTRIES; break;
521         case RPC_X_SS_CHAR_TRANS_OPEN_FAIL: expected_win32status = RPC_NT_SS_CHAR_TRANS_OPEN_FAIL; break;
522         case RPC_X_SS_CHAR_TRANS_SHORT_FILE: expected_win32status = RPC_NT_SS_CHAR_TRANS_SHORT_FILE; break;
523         case RPC_X_SS_IN_NULL_CONTEXT: expected_win32status = RPC_NT_SS_IN_NULL_CONTEXT; break;
524         case RPC_X_SS_CONTEXT_DAMAGED: expected_win32status = RPC_NT_SS_CONTEXT_DAMAGED; break;
525         case RPC_X_SS_HANDLES_MISMATCH: expected_win32status = RPC_NT_SS_HANDLES_MISMATCH; break;
526         case RPC_X_SS_CANNOT_GET_CALL_HANDLE: expected_win32status = RPC_NT_SS_CANNOT_GET_CALL_HANDLE; break;
527         case RPC_X_NULL_REF_POINTER: expected_win32status = RPC_NT_NULL_REF_POINTER; break;
528         case RPC_X_ENUM_VALUE_OUT_OF_RANGE: expected_win32status = RPC_NT_ENUM_VALUE_OUT_OF_RANGE; break;
529         case RPC_X_BYTE_COUNT_TOO_SMALL: expected_win32status = RPC_NT_BYTE_COUNT_TOO_SMALL; break;
530         case RPC_X_BAD_STUB_DATA: expected_win32status = RPC_NT_BAD_STUB_DATA; break;
531         case RPC_X_PIPE_CLOSED: expected_win32status = RPC_NT_PIPE_CLOSED; missing = TRUE; break;
532         case RPC_X_PIPE_DISCIPLINE_ERROR: expected_win32status = RPC_NT_PIPE_DISCIPLINE_ERROR; missing = TRUE; break;
533         case RPC_X_PIPE_EMPTY: expected_win32status = RPC_NT_PIPE_EMPTY; missing = TRUE; break;
534         case ERROR_PASSWORD_MUST_CHANGE: expected_win32status = STATUS_PASSWORD_MUST_CHANGE; missing = TRUE; break;
535         case ERROR_ACCOUNT_LOCKED_OUT: expected_win32status = STATUS_ACCOUNT_LOCKED_OUT; missing = TRUE; break;
536         default:
537             if (w2k3_up)
538                 expected_win32status = STATUS_UNSUCCESSFUL;
539             else
540                 expected_win32status = rpc_status;
541         }
542
543         if (on_win9x)
544             missing = TRUE;
545
546         ok(win32status == expected_win32status ||
547             broken(missing && win32status == rpc_status),
548             "I_RpcMapWin32Status(%ld) should have returned 0x%x instead of 0x%x%s\n",
549             rpc_status, expected_win32status, win32status,
550             broken(missing) ? " (or have returned with the given status)" : "");
551     }
552 }
553
554 static void test_RpcStringBindingParseA(void)
555 {
556     static unsigned char valid_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[endpoint=\\pipe\\test]";
557     static unsigned char valid_binding2[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[\\pipe\\test]";
558     static unsigned char invalid_uuid_binding[] = "{00000000-0000-0000-c000-000000000046}@ncacn_np:.[endpoint=\\pipe\\test]";
559     static unsigned char invalid_ep_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[endpoint=test]";
560     static unsigned char invalid_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np";
561     RPC_STATUS status;
562     unsigned char *uuid;
563     unsigned char *protseq;
564     unsigned char *network_addr;
565     unsigned char *endpoint;
566     unsigned char *options;
567
568     /* test all parameters */
569     status = RpcStringBindingParseA(valid_binding, &uuid, &protseq, &network_addr, &endpoint, &options);
570     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
571     ok(!strcmp((char *)uuid, "00000000-0000-0000-c000-000000000046"), "uuid should have been 00000000-0000-0000-C000-000000000046 instead of %s\n", uuid);
572     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
573     ok(!strcmp((char *)network_addr, "."), "network_addr should have been . instead of %s\n", network_addr);
574     todo_wine
575     ok(!strcmp((char *)endpoint, "pipetest"), "endpoint should have been pipetest instead of %s\n", endpoint);
576     todo_wine
577     ok(options && !strcmp((char *)options, ""), "options should have been \"\" of \"%s\"\n", options);
578     RpcStringFreeA(&uuid);
579     RpcStringFreeA(&protseq);
580     RpcStringFreeA(&network_addr);
581     RpcStringFreeA(&endpoint);
582     RpcStringFreeA(&options);
583
584     /* test all parameters with different type of string binding */
585     status = RpcStringBindingParseA(valid_binding2, &uuid, &protseq, &network_addr, &endpoint, &options);
586     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
587     ok(!strcmp((char *)uuid, "00000000-0000-0000-c000-000000000046"), "uuid should have been 00000000-0000-0000-C000-000000000046 instead of %s\n", uuid);
588     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
589     ok(!strcmp((char *)network_addr, "."), "network_addr should have been . instead of %s\n", network_addr);
590     todo_wine
591     ok(!strcmp((char *)endpoint, "pipetest"), "endpoint should have been pipetest instead of %s\n", endpoint);
592     todo_wine
593     ok(options && !strcmp((char *)options, ""), "options should have been \"\" of \"%s\"\n", options);
594     RpcStringFreeA(&uuid);
595     RpcStringFreeA(&protseq);
596     RpcStringFreeA(&network_addr);
597     RpcStringFreeA(&endpoint);
598     RpcStringFreeA(&options);
599
600     /* test with as many parameters NULL as possible */
601     status = RpcStringBindingParseA(valid_binding, NULL, &protseq, NULL, NULL, NULL);
602     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
603     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
604     RpcStringFreeA(&protseq);
605
606     /* test with invalid uuid */
607     status = RpcStringBindingParseA(invalid_uuid_binding, NULL, &protseq, NULL, NULL, NULL);
608     todo_wine
609     ok(status == RPC_S_INVALID_STRING_UUID, "RpcStringBindingParseA should have returned RPC_S_INVALID_STRING_UUID instead of %ld\n", status);
610     todo_wine
611     ok(protseq == NULL, "protseq was %p instead of NULL\n", protseq);
612
613     /* test with invalid endpoint */
614     status = RpcStringBindingParseA(invalid_ep_binding, NULL, &protseq, NULL, NULL, NULL);
615     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
616     RpcStringFreeA(&protseq);
617
618     /* test with invalid binding */
619     status = RpcStringBindingParseA(invalid_binding, &uuid, &protseq, &network_addr, &endpoint, &options);
620     todo_wine
621     ok(status == RPC_S_INVALID_STRING_BINDING, "RpcStringBindingParseA should have returned RPC_S_INVALID_STRING_BINDING instead of %ld\n", status);
622     todo_wine
623     ok(uuid == NULL, "uuid was %p instead of NULL\n", uuid);
624     ok(protseq == NULL, "protseq was %p instead of NULL\n", protseq);
625     todo_wine
626     ok(network_addr == NULL, "network_addr was %p instead of NULL\n", network_addr);
627     ok(endpoint == NULL, "endpoint was %p instead of NULL\n", endpoint);
628     ok(options == NULL, "options was %p instead of NULL\n", options);
629 }
630
631 static void test_I_RpcExceptionFilter(void)
632 {
633     ULONG exception;
634     int retval;
635     int (WINAPI *pI_RpcExceptionFilter)(ULONG) = (void *)GetProcAddress(GetModuleHandle("rpcrt4.dll"), "I_RpcExceptionFilter");
636
637     if (!pI_RpcExceptionFilter)
638     {
639         skip("I_RpcExceptionFilter not exported\n");
640         return;
641     }
642
643     for (exception = 0; exception < STATUS_REG_NAT_CONSUMPTION; exception++)
644     {
645         /* skip over uninteresting bits of the number space */
646         if (exception == 2000) exception = 0x40000000;
647         if (exception == 0x40000005) exception = 0x80000000;
648         if (exception == 0x80000005) exception = 0xc0000000;
649
650         retval = pI_RpcExceptionFilter(exception);
651         switch (exception)
652         {
653         case STATUS_DATATYPE_MISALIGNMENT:
654         case STATUS_BREAKPOINT:
655         case STATUS_ACCESS_VIOLATION:
656         case STATUS_ILLEGAL_INSTRUCTION:
657         case STATUS_PRIVILEGED_INSTRUCTION:
658         case 0xc00000aa /* STATUS_INSTRUCTION_MISALIGNMENT */:
659         case STATUS_STACK_OVERFLOW:
660         case 0xc0000194 /* STATUS_POSSIBLE_DEADLOCK */:
661             ok(retval == EXCEPTION_CONTINUE_SEARCH, "I_RpcExceptionFilter(0x%x) should have returned %d instead of %d\n",
662                exception, EXCEPTION_CONTINUE_SEARCH, retval);
663             break;
664         case STATUS_IN_PAGE_ERROR:
665         case STATUS_HANDLE_NOT_CLOSABLE:
666             trace("I_RpcExceptionFilter(0x%x) returned %d\n", exception, retval);
667             break;
668         default:
669             ok(retval == EXCEPTION_EXECUTE_HANDLER, "I_RpcExceptionFilter(0x%x) should have returned %d instead of %d\n",
670                exception, EXCEPTION_EXECUTE_HANDLER, retval);
671         }
672     }
673 }
674
675 START_TEST( rpc )
676 {
677     trace ( " ** Uuid Conversion and Comparison Tests **\n" );
678     UuidConversionAndComparison();
679     trace ( " ** DceErrorInqText **\n");
680     TestDceErrorInqText();
681     test_rpc_ncacn_ip_tcp();
682     test_towers();
683     test_I_RpcMapWin32Status();
684     test_RpcStringBindingParseA();
685     test_I_RpcExceptionFilter();
686 }