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 = RpcBindingSetAuthInfo(IFoo_IfHandle, NULL, RPC_C_AUTHN_LEVEL_NONE,
 264                                    RPC_C_AUTHN_WINNT, NULL, RPC_C_AUTHZ_NAME);
 265     ok(status == RPC_S_OK || broken(status == RPC_S_UNKNOWN_AUTHN_SERVICE), /* win9x */
 266        "RpcBindingSetAuthInfo failed (%lu)\n", status);
 267
 268     status = RpcMgmtStopServerListening(NULL);
 269     ok(status == RPC_S_OK, "RpcMgmtStopServerListening failed (%lu)\n",
 270        status);
 271
 272     status = RpcMgmtStopServerListening(NULL);
 273     ok(status == RPC_S_OK, "RpcMgmtStopServerListening failed (%lu)\n",
 274        status);
 275
 276     status = RpcServerUnregisterIf(NULL, NULL, FALSE);
 277     ok(status == RPC_S_OK, "RpcServerUnregisterIf failed (%lu)\n", status);
 278
 279     status = RpcMgmtWaitServerListen();
 280 todo_wine {
 281     ok(status == RPC_S_OK, "RpcMgmtWaitServerListen failed (%lu)\n", status);
 282 }
 283
 284     status = RpcStringFree(&binding);
 285     ok(status == RPC_S_OK, "RpcStringFree failed (%lu)\n", status);
 286
 287     status = RpcBindingFree(&IFoo_IfHandle);
 288     ok(status == RPC_S_OK, "RpcBindingFree failed (%lu)\n", status);
 289 }
 290
 291 /* this is what's generated with MS/RPC - it includes an extra 2
 292  * bytes in the protocol floor */
 293 static const unsigned char tower_data_tcp_ip1[] =
 294 {
 295     0x05,0x00,0x13,0x00,0x0d,0x00,0xdb,0xf1,
 296     0xa4,0x47,0xca,0x67,0x10,0xb3,0x1f,0x00,
 297     0xdd,0x01,0x06,0x62,0xda,0x00,0x00,0x02,
 298     0x00,0x00,0x00,0x13,0x00,0x0d,0x04,0x5d,
 299     0x88,0x8a,0xeb,0x1c,0xc9,0x11,0x9f,0xe8,
 300     0x08,0x00,0x2b,0x10,0x48,0x60,0x02,0x00,
 301     0x02,0x00,0x00,0x00,0x01,0x00,0x0b,0x02,
 302     0x00,0x00,0x00,0x01,0x00,0x07,0x02,0x00,
 303     0x00,0x87,0x01,0x00,0x09,0x04,0x00,0x0a,
 304     0x00,0x00,0x01,
 305 };
 306 /* this is the optimal data that i think should be generated */
 307 static const unsigned char tower_data_tcp_ip2[] =
 308 {
 309     0x05,0x00,0x13,0x00,0x0d,0x00,0xdb,0xf1,
 310     0xa4,0x47,0xca,0x67,0x10,0xb3,0x1f,0x00,
 311     0xdd,0x01,0x06,0x62,0xda,0x00,0x00,0x02,
 312     0x00,0x00,0x00,0x13,0x00,0x0d,0x04,0x5d,
 313     0x88,0x8a,0xeb,0x1c,0xc9,0x11,0x9f,0xe8,
 314     0x08,0x00,0x2b,0x10,0x48,0x60,0x02,0x00,
 315     0x02,0x00,0x00,0x00,0x01,0x00,0x0b,0x00,
 316     0x00,0x01,0x00,0x07,0x02,0x00,0x00,0x87,
 317     0x01,0x00,0x09,0x04,0x00,0x0a,0x00,0x00,
 318     0x01,
 319 };
 320
 321 static void test_towers(void)
 322 {
 323     RPC_STATUS ret;
 324     twr_t *tower;
 325     static const RPC_SYNTAX_IDENTIFIER mapi_if_id = { { 0xa4f1db00, 0xca47, 0x1067, { 0xb3, 0x1f, 0x00, 0xdd, 0x01, 0x06, 0x62, 0xda } }, { 0, 0 } };
 326     static const RPC_SYNTAX_IDENTIFIER ndr_syntax = { { 0x8a885d04, 0x1ceb, 0x11c9, { 0x9f, 0xe8, 0x08, 0x00, 0x2b, 0x10, 0x48, 0x60 } }, { 2, 0 } };
 327     RPC_SYNTAX_IDENTIFIER object, syntax;
 328     char *protseq, *endpoint, *address;
 329     BOOL same;
 330
 331     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_ip_tcp", "135", "10.0.0.1", &tower);
 332     ok(ret == RPC_S_OK ||
 333        broken(ret == RPC_S_INVALID_RPC_PROTSEQ), /* Vista */
 334        "TowerConstruct failed with error %ld\n", ret);
 335     if (ret == RPC_S_INVALID_RPC_PROTSEQ)
 336     {
 337         /* Windows Vista fails with this error and crashes if we continue */
 338         skip("TowerConstruct failed, we are most likely on Windows Vista\n");
 339         return;
 340     }
 341
 342     /* first check we have the right amount of data */
 343     ok(tower->tower_length == sizeof(tower_data_tcp_ip1) ||
 344        tower->tower_length == sizeof(tower_data_tcp_ip2),
 345         "Wrong size of tower %d\n", tower->tower_length);
 346
 347     /* then do a byte-by-byte comparison */
 348     same = ((tower->tower_length == sizeof(tower_data_tcp_ip1)) &&
 349             !memcmp(&tower->tower_octet_string, tower_data_tcp_ip1, sizeof(tower_data_tcp_ip1))) ||
 350            ((tower->tower_length == sizeof(tower_data_tcp_ip2)) &&
 351             !memcmp(&tower->tower_octet_string, tower_data_tcp_ip2, sizeof(tower_data_tcp_ip2)));
 352
 353     ok(same, "Tower data differs\n");
 354     if (!same)
 355     {
 356         unsigned32 i;
 357         for (i = 0; i < tower->tower_length; i++)
 358         {
 359             if (i % 8 == 0) printf("    ");
 360             printf("0x%02x,", tower->tower_octet_string[i]);
 361             if (i % 8 == 7) printf("\n");
 362         }
 363         printf("\n");
 364     }
 365
 366     ret = TowerExplode(tower, &object, &syntax, &protseq, &endpoint, &address);
 367     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
 368     ok(!memcmp(&object, &mapi_if_id, sizeof(mapi_if_id)), "object id didn't match\n");
 369     ok(!memcmp(&syntax, &ndr_syntax, sizeof(syntax)), "syntax id didn't match\n");
 370     ok(!strcmp(protseq, "ncacn_ip_tcp"), "protseq was \"%s\" instead of \"ncacn_ip_tcp\"\n", protseq);
 371     ok(!strcmp(endpoint, "135"), "endpoint was \"%s\" instead of \"135\"\n", endpoint);
 372     ok(!strcmp(address, "10.0.0.1"), "address was \"%s\" instead of \"10.0.0.1\"\n", address);
 373
 374     I_RpcFree(protseq);
 375     I_RpcFree(endpoint);
 376     I_RpcFree(address);
 377
 378     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, NULL);
 379     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
 380
 381     I_RpcFree(tower);
 382
 383     /* test the behaviour for ip_tcp with name instead of dotted IP notation */
 384     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_ip_tcp", "135", "localhost", &tower);
 385     ok(ret == RPC_S_OK, "TowerConstruct failed with error %ld\n", ret);
 386     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, &address);
 387     ok(ret == RPC_S_OK, "TowerExplode failed with error %ld\n", ret);
 388     ok(!strcmp(address, "0.0.0.0") ||
 389        broken(!strcmp(address, "255.255.255.255")),
 390        "address was \"%s\" instead of \"0.0.0.0\"\n", address);
 391
 392     I_RpcFree(address);
 393     I_RpcFree(tower);
 394
 395     /* test the behaviour for np with no address */
 396     ret = TowerConstruct(&mapi_if_id, &ndr_syntax, "ncacn_np", "\\pipe\\test", NULL, &tower);
 397     ok(ret == RPC_S_OK, "TowerConstruct failed with error %ld\n", ret);
 398     ret = TowerExplode(tower, NULL, NULL, NULL, NULL, &address);
 399     ok(ret == RPC_S_OK ||
 400        broken(ret != RPC_S_OK), /* win2k, indeterminate */
 401        "TowerExplode failed with error %ld\n", ret);
 402     /* Windows XP SP3 sets address to NULL */
 403     ok(!address || !strcmp(address, ""), "address was \"%s\" instead of \"\"\n or NULL (XP SP3)", address);
 404
 405     I_RpcFree(address);
 406     I_RpcFree(tower);
 407 }
 408
 409 static void test_I_RpcMapWin32Status(void)
 410 {
 411     LONG win32status;
 412     RPC_STATUS rpc_status;
 413     BOOL on_win9x = FALSE;
 414     BOOL w2k3_up = FALSE;
 415
 416     /* Win9x always returns the given status */
 417     win32status = I_RpcMapWin32Status(ERROR_ACCESS_DENIED);
 418     if (win32status == ERROR_ACCESS_DENIED)
 419         on_win9x = TRUE;
 420
 421     /* Windows 2003 and Vista return STATUS_UNSUCCESSFUL if given an unknown status */
 422     win32status = I_RpcMapWin32Status(9999);
 423     if (win32status == STATUS_UNSUCCESSFUL)
 424     {
 425         trace("We are on Windows 2003 or Vista\n");
 426         w2k3_up = TRUE;
 427     }
 428
 429     /* On Windows XP-SP1 and below some statuses are not mapped and return
 430      * the given status
 431      */
 432     for (rpc_status = 0; rpc_status < 10000; rpc_status++)
 433     {
 434         LONG expected_win32status;
 435         BOOL missing = FALSE;
 436
 437         win32status = I_RpcMapWin32Status(rpc_status);
 438         switch (rpc_status)
 439         {
 440         case ERROR_SUCCESS: expected_win32status = ERROR_SUCCESS; break;
 441         case ERROR_ACCESS_DENIED: expected_win32status = STATUS_ACCESS_DENIED; break;
 442         case ERROR_INVALID_HANDLE: expected_win32status = RPC_NT_SS_CONTEXT_MISMATCH; break;
 443         case ERROR_OUTOFMEMORY: expected_win32status = STATUS_NO_MEMORY; break;
 444         case ERROR_INVALID_PARAMETER: expected_win32status = STATUS_INVALID_PARAMETER; break;
 445         case ERROR_INSUFFICIENT_BUFFER: expected_win32status = STATUS_BUFFER_TOO_SMALL; break;
 446         case ERROR_MAX_THRDS_REACHED: expected_win32status = STATUS_NO_MEMORY; break;
 447         case ERROR_NOACCESS: expected_win32status = STATUS_ACCESS_VIOLATION; break;
 448         case ERROR_NOT_ENOUGH_SERVER_MEMORY: expected_win32status = STATUS_INSUFF_SERVER_RESOURCES; break;
 449         case ERROR_WRONG_PASSWORD:  expected_win32status = STATUS_WRONG_PASSWORD; missing = TRUE; break;
 450         case ERROR_INVALID_LOGON_HOURS: expected_win32status = STATUS_INVALID_LOGON_HOURS; missing = TRUE; break;
 451         case ERROR_PASSWORD_EXPIRED: expected_win32status = STATUS_PASSWORD_EXPIRED; missing = TRUE; break;
 452         case ERROR_ACCOUNT_DISABLED: expected_win32status = STATUS_ACCOUNT_DISABLED; missing = TRUE; break;
 453         case ERROR_INVALID_SECURITY_DESCR: expected_win32status = STATUS_INVALID_SECURITY_DESCR; break;
 454         case RPC_S_INVALID_STRING_BINDING: expected_win32status = RPC_NT_INVALID_STRING_BINDING; break;
 455         case RPC_S_WRONG_KIND_OF_BINDING: expected_win32status = RPC_NT_WRONG_KIND_OF_BINDING; break;
 456         case RPC_S_INVALID_BINDING: expected_win32status = RPC_NT_INVALID_BINDING; break;
 457         case RPC_S_PROTSEQ_NOT_SUPPORTED: expected_win32status = RPC_NT_PROTSEQ_NOT_SUPPORTED; break;
 458         case RPC_S_INVALID_RPC_PROTSEQ: expected_win32status = RPC_NT_INVALID_RPC_PROTSEQ; break;
 459         case RPC_S_INVALID_STRING_UUID: expected_win32status = RPC_NT_INVALID_STRING_UUID; break;
 460         case RPC_S_INVALID_ENDPOINT_FORMAT: expected_win32status = RPC_NT_INVALID_ENDPOINT_FORMAT; break;
 461         case RPC_S_INVALID_NET_ADDR: expected_win32status = RPC_NT_INVALID_NET_ADDR; break;
 462         case RPC_S_NO_ENDPOINT_FOUND: expected_win32status = RPC_NT_NO_ENDPOINT_FOUND; break;
 463         case RPC_S_INVALID_TIMEOUT: expected_win32status = RPC_NT_INVALID_TIMEOUT; break;
 464         case RPC_S_OBJECT_NOT_FOUND: expected_win32status = RPC_NT_OBJECT_NOT_FOUND; break;
 465         case RPC_S_ALREADY_REGISTERED: expected_win32status = RPC_NT_ALREADY_REGISTERED; break;
 466         case RPC_S_TYPE_ALREADY_REGISTERED: expected_win32status = RPC_NT_TYPE_ALREADY_REGISTERED; break;
 467         case RPC_S_ALREADY_LISTENING: expected_win32status = RPC_NT_ALREADY_LISTENING; break;
 468         case RPC_S_NO_PROTSEQS_REGISTERED: expected_win32status = RPC_NT_NO_PROTSEQS_REGISTERED; break;
 469         case RPC_S_NOT_LISTENING: expected_win32status = RPC_NT_NOT_LISTENING; break;
 470         case RPC_S_UNKNOWN_MGR_TYPE: expected_win32status = RPC_NT_UNKNOWN_MGR_TYPE; break;
 471         case RPC_S_UNKNOWN_IF: expected_win32status = RPC_NT_UNKNOWN_IF; break;
 472         case RPC_S_NO_BINDINGS: expected_win32status = RPC_NT_NO_BINDINGS; break;
 473         case RPC_S_NO_PROTSEQS: expected_win32status = RPC_NT_NO_PROTSEQS; break;
 474         case RPC_S_CANT_CREATE_ENDPOINT: expected_win32status = RPC_NT_CANT_CREATE_ENDPOINT; break;
 475         case RPC_S_OUT_OF_RESOURCES: expected_win32status = RPC_NT_OUT_OF_RESOURCES; break;
 476         case RPC_S_SERVER_UNAVAILABLE: expected_win32status = RPC_NT_SERVER_UNAVAILABLE; break;
 477         case RPC_S_SERVER_TOO_BUSY: expected_win32status = RPC_NT_SERVER_TOO_BUSY; break;
 478         case RPC_S_INVALID_NETWORK_OPTIONS: expected_win32status = RPC_NT_INVALID_NETWORK_OPTIONS; break;
 479         case RPC_S_NO_CALL_ACTIVE: expected_win32status = RPC_NT_NO_CALL_ACTIVE; break;
 480         case RPC_S_CALL_FAILED: expected_win32status = RPC_NT_CALL_FAILED; break;
 481         case RPC_S_CALL_FAILED_DNE: expected_win32status = RPC_NT_CALL_FAILED_DNE; break;
 482         case RPC_S_PROTOCOL_ERROR: expected_win32status = RPC_NT_PROTOCOL_ERROR; break;
 483         case RPC_S_UNSUPPORTED_TRANS_SYN: expected_win32status = RPC_NT_UNSUPPORTED_TRANS_SYN; break;
 484         case RPC_S_UNSUPPORTED_TYPE: expected_win32status = RPC_NT_UNSUPPORTED_TYPE; break;
 485         case RPC_S_INVALID_TAG: expected_win32status = RPC_NT_INVALID_TAG; break;
 486         case RPC_S_INVALID_BOUND: expected_win32status = RPC_NT_INVALID_BOUND; break;
 487         case RPC_S_NO_ENTRY_NAME: expected_win32status = RPC_NT_NO_ENTRY_NAME; break;
 488         case RPC_S_INVALID_NAME_SYNTAX: expected_win32status = RPC_NT_INVALID_NAME_SYNTAX; break;
 489         case RPC_S_UNSUPPORTED_NAME_SYNTAX: expected_win32status = RPC_NT_UNSUPPORTED_NAME_SYNTAX; break;
 490         case RPC_S_UUID_NO_ADDRESS: expected_win32status = RPC_NT_UUID_NO_ADDRESS; break;
 491         case RPC_S_DUPLICATE_ENDPOINT: expected_win32status = RPC_NT_DUPLICATE_ENDPOINT; break;
 492         case RPC_S_UNKNOWN_AUTHN_TYPE: expected_win32status = RPC_NT_UNKNOWN_AUTHN_TYPE; break;
 493         case RPC_S_MAX_CALLS_TOO_SMALL: expected_win32status = RPC_NT_MAX_CALLS_TOO_SMALL; break;
 494         case RPC_S_STRING_TOO_LONG: expected_win32status = RPC_NT_STRING_TOO_LONG; break;
 495         case RPC_S_PROTSEQ_NOT_FOUND: expected_win32status = RPC_NT_PROTSEQ_NOT_FOUND; break;
 496         case RPC_S_PROCNUM_OUT_OF_RANGE: expected_win32status = RPC_NT_PROCNUM_OUT_OF_RANGE; break;
 497         case RPC_S_BINDING_HAS_NO_AUTH: expected_win32status = RPC_NT_BINDING_HAS_NO_AUTH; break;
 498         case RPC_S_UNKNOWN_AUTHN_SERVICE: expected_win32status = RPC_NT_UNKNOWN_AUTHN_SERVICE; break;
 499         case RPC_S_UNKNOWN_AUTHN_LEVEL: expected_win32status = RPC_NT_UNKNOWN_AUTHN_LEVEL; break;
 500         case RPC_S_INVALID_AUTH_IDENTITY: expected_win32status = RPC_NT_INVALID_AUTH_IDENTITY; break;
 501         case RPC_S_UNKNOWN_AUTHZ_SERVICE: expected_win32status = RPC_NT_UNKNOWN_AUTHZ_SERVICE; break;
 502         case EPT_S_INVALID_ENTRY: expected_win32status = EPT_NT_INVALID_ENTRY; break;
 503         case EPT_S_CANT_PERFORM_OP: expected_win32status = EPT_NT_CANT_PERFORM_OP; break;
 504         case EPT_S_NOT_REGISTERED: expected_win32status = EPT_NT_NOT_REGISTERED; break;
 505         case EPT_S_CANT_CREATE: expected_win32status = EPT_NT_CANT_CREATE; break;
 506         case RPC_S_NOTHING_TO_EXPORT: expected_win32status = RPC_NT_NOTHING_TO_EXPORT; break;
 507         case RPC_S_INCOMPLETE_NAME: expected_win32status = RPC_NT_INCOMPLETE_NAME; break;
 508         case RPC_S_INVALID_VERS_OPTION: expected_win32status = RPC_NT_INVALID_VERS_OPTION; break;
 509         case RPC_S_NO_MORE_MEMBERS: expected_win32status = RPC_NT_NO_MORE_MEMBERS; break;
 510         case RPC_S_NOT_ALL_OBJS_UNEXPORTED: expected_win32status = RPC_NT_NOT_ALL_OBJS_UNEXPORTED; break;
 511         case RPC_S_INTERFACE_NOT_FOUND: expected_win32status = RPC_NT_INTERFACE_NOT_FOUND; break;
 512         case RPC_S_ENTRY_ALREADY_EXISTS: expected_win32status = RPC_NT_ENTRY_ALREADY_EXISTS; break;
 513         case RPC_S_ENTRY_NOT_FOUND: expected_win32status = RPC_NT_ENTRY_NOT_FOUND; break;
 514         case RPC_S_NAME_SERVICE_UNAVAILABLE: expected_win32status = RPC_NT_NAME_SERVICE_UNAVAILABLE; break;
 515         case RPC_S_INVALID_NAF_ID: expected_win32status = RPC_NT_INVALID_NAF_ID; break;
 516         case RPC_S_CANNOT_SUPPORT: expected_win32status = RPC_NT_CANNOT_SUPPORT; break;
 517         case RPC_S_NO_CONTEXT_AVAILABLE: expected_win32status = RPC_NT_NO_CONTEXT_AVAILABLE; break;
 518         case RPC_S_INTERNAL_ERROR: expected_win32status = RPC_NT_INTERNAL_ERROR; break;
 519         case RPC_S_ZERO_DIVIDE: expected_win32status = RPC_NT_ZERO_DIVIDE; break;
 520         case RPC_S_ADDRESS_ERROR: expected_win32status = RPC_NT_ADDRESS_ERROR; break;
 521         case RPC_S_FP_DIV_ZERO: expected_win32status = RPC_NT_FP_DIV_ZERO; break;
 522         case RPC_S_FP_UNDERFLOW: expected_win32status = RPC_NT_FP_UNDERFLOW; break;
 523         case RPC_S_FP_OVERFLOW: expected_win32status = RPC_NT_FP_OVERFLOW; break;
 524         case RPC_S_CALL_IN_PROGRESS: expected_win32status = RPC_NT_CALL_IN_PROGRESS; break;
 525         case RPC_S_NO_MORE_BINDINGS: expected_win32status = RPC_NT_NO_MORE_BINDINGS; break;
 526         case RPC_S_CALL_CANCELLED: expected_win32status = RPC_NT_CALL_CANCELLED; missing = TRUE; break;
 527         case RPC_S_INVALID_OBJECT: expected_win32status = RPC_NT_INVALID_OBJECT; break;
 528         case RPC_S_INVALID_ASYNC_HANDLE: expected_win32status = RPC_NT_INVALID_ASYNC_HANDLE; missing = TRUE; break;
 529         case RPC_S_INVALID_ASYNC_CALL: expected_win32status = RPC_NT_INVALID_ASYNC_CALL; missing = TRUE; break;
 530         case RPC_S_GROUP_MEMBER_NOT_FOUND: expected_win32status = RPC_NT_GROUP_MEMBER_NOT_FOUND; break;
 531         case RPC_X_NO_MORE_ENTRIES: expected_win32status = RPC_NT_NO_MORE_ENTRIES; break;
 532         case RPC_X_SS_CHAR_TRANS_OPEN_FAIL: expected_win32status = RPC_NT_SS_CHAR_TRANS_OPEN_FAIL; break;
 533         case RPC_X_SS_CHAR_TRANS_SHORT_FILE: expected_win32status = RPC_NT_SS_CHAR_TRANS_SHORT_FILE; break;
 534         case RPC_X_SS_IN_NULL_CONTEXT: expected_win32status = RPC_NT_SS_IN_NULL_CONTEXT; break;
 535         case RPC_X_SS_CONTEXT_DAMAGED: expected_win32status = RPC_NT_SS_CONTEXT_DAMAGED; break;
 536         case RPC_X_SS_HANDLES_MISMATCH: expected_win32status = RPC_NT_SS_HANDLES_MISMATCH; break;
 537         case RPC_X_SS_CANNOT_GET_CALL_HANDLE: expected_win32status = RPC_NT_SS_CANNOT_GET_CALL_HANDLE; break;
 538         case RPC_X_NULL_REF_POINTER: expected_win32status = RPC_NT_NULL_REF_POINTER; break;
 539         case RPC_X_ENUM_VALUE_OUT_OF_RANGE: expected_win32status = RPC_NT_ENUM_VALUE_OUT_OF_RANGE; break;
 540         case RPC_X_BYTE_COUNT_TOO_SMALL: expected_win32status = RPC_NT_BYTE_COUNT_TOO_SMALL; break;
 541         case RPC_X_BAD_STUB_DATA: expected_win32status = RPC_NT_BAD_STUB_DATA; break;
 542         case RPC_X_PIPE_CLOSED: expected_win32status = RPC_NT_PIPE_CLOSED; missing = TRUE; break;
 543         case RPC_X_PIPE_DISCIPLINE_ERROR: expected_win32status = RPC_NT_PIPE_DISCIPLINE_ERROR; missing = TRUE; break;
 544         case RPC_X_PIPE_EMPTY: expected_win32status = RPC_NT_PIPE_EMPTY; missing = TRUE; break;
 545         case ERROR_PASSWORD_MUST_CHANGE: expected_win32status = STATUS_PASSWORD_MUST_CHANGE; missing = TRUE; break;
 546         case ERROR_ACCOUNT_LOCKED_OUT: expected_win32status = STATUS_ACCOUNT_LOCKED_OUT; missing = TRUE; break;
 547         default:
 548             if (w2k3_up)
 549                 expected_win32status = STATUS_UNSUCCESSFUL;
 550             else
 551                 expected_win32status = rpc_status;
 552         }
 553
 554         if (on_win9x)
 555             missing = TRUE;
 556
 557         ok(win32status == expected_win32status ||
 558             broken(missing && win32status == rpc_status),
 559             "I_RpcMapWin32Status(%ld) should have returned 0x%x instead of 0x%x%s\n",
 560             rpc_status, expected_win32status, win32status,
 561             broken(missing) ? " (or have returned with the given status)" : "");
 562     }
 563 }
 564
 565 static void test_RpcStringBindingParseA(void)
 566 {
 567     static unsigned char valid_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[endpoint=\\pipe\\test]";
 568     static unsigned char valid_binding2[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[\\pipe\\test]";
 569     static unsigned char invalid_uuid_binding[] = "{00000000-0000-0000-c000-000000000046}@ncacn_np:.[endpoint=\\pipe\\test]";
 570     static unsigned char invalid_ep_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np:.[endpoint=test]";
 571     static unsigned char invalid_binding[] = "00000000-0000-0000-c000-000000000046@ncacn_np";
 572     RPC_STATUS status;
 573     unsigned char *uuid;
 574     unsigned char *protseq;
 575     unsigned char *network_addr;
 576     unsigned char *endpoint;
 577     unsigned char *options;
 578
 579     /* test all parameters */
 580     status = RpcStringBindingParseA(valid_binding, &uuid, &protseq, &network_addr, &endpoint, &options);
 581     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
 582     ok(!strcmp((char *)uuid, "00000000-0000-0000-c000-000000000046"), "uuid should have been 00000000-0000-0000-C000-000000000046 instead of %s\n", uuid);
 583     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
 584     ok(!strcmp((char *)network_addr, "."), "network_addr should have been . instead of %s\n", network_addr);
 585     ok(!strcmp((char *)endpoint, "pipetest"), "endpoint should have been pipetest instead of %s\n", endpoint);
 586     todo_wine
 587     ok(options && !strcmp((char *)options, ""), "options should have been \"\" of \"%s\"\n", options);
 588     RpcStringFreeA(&uuid);
 589     RpcStringFreeA(&protseq);
 590     RpcStringFreeA(&network_addr);
 591     RpcStringFreeA(&endpoint);
 592     RpcStringFreeA(&options);
 593
 594     /* test all parameters with different type of string binding */
 595     status = RpcStringBindingParseA(valid_binding2, &uuid, &protseq, &network_addr, &endpoint, &options);
 596     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
 597     ok(!strcmp((char *)uuid, "00000000-0000-0000-c000-000000000046"), "uuid should have been 00000000-0000-0000-C000-000000000046 instead of %s\n", uuid);
 598     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
 599     ok(!strcmp((char *)network_addr, "."), "network_addr should have been . instead of %s\n", network_addr);
 600     ok(!strcmp((char *)endpoint, "pipetest"), "endpoint should have been pipetest instead of %s\n", endpoint);
 601     todo_wine
 602     ok(options && !strcmp((char *)options, ""), "options should have been \"\" of \"%s\"\n", options);
 603     RpcStringFreeA(&uuid);
 604     RpcStringFreeA(&protseq);
 605     RpcStringFreeA(&network_addr);
 606     RpcStringFreeA(&endpoint);
 607     RpcStringFreeA(&options);
 608
 609     /* test with as many parameters NULL as possible */
 610     status = RpcStringBindingParseA(valid_binding, NULL, &protseq, NULL, NULL, NULL);
 611     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
 612     ok(!strcmp((char *)protseq, "ncacn_np"), "protseq should have been ncacn_np instead of %s\n", protseq);
 613     RpcStringFreeA(&protseq);
 614
 615     /* test with invalid uuid */
 616     status = RpcStringBindingParseA(invalid_uuid_binding, NULL, &protseq, NULL, NULL, NULL);
 617     ok(status == RPC_S_INVALID_STRING_UUID, "RpcStringBindingParseA should have returned RPC_S_INVALID_STRING_UUID instead of %ld\n", status);
 618     ok(protseq == NULL, "protseq was %p instead of NULL\n", protseq);
 619
 620     /* test with invalid endpoint */
 621     status = RpcStringBindingParseA(invalid_ep_binding, NULL, &protseq, NULL, NULL, NULL);
 622     ok(status == RPC_S_OK, "RpcStringBindingParseA failed with error %ld\n", status);
 623     RpcStringFreeA(&protseq);
 624
 625     /* test with invalid binding */
 626     status = RpcStringBindingParseA(invalid_binding, &uuid, &protseq, &network_addr, &endpoint, &options);
 627     todo_wine
 628     ok(status == RPC_S_INVALID_STRING_BINDING, "RpcStringBindingParseA should have returned RPC_S_INVALID_STRING_BINDING instead of %ld\n", status);
 629     todo_wine
 630     ok(uuid == NULL, "uuid was %p instead of NULL\n", uuid);
 631     ok(protseq == NULL, "protseq was %p instead of NULL\n", protseq);
 632     todo_wine
 633     ok(network_addr == NULL, "network_addr was %p instead of NULL\n", network_addr);
 634     ok(endpoint == NULL, "endpoint was %p instead of NULL\n", endpoint);
 635     ok(options == NULL, "options was %p instead of NULL\n", options);
 636 }
 637
 638 static void test_I_RpcExceptionFilter(void)
 639 {
 640     ULONG exception;
 641     int retval;
 642     int (WINAPI *pI_RpcExceptionFilter)(ULONG) = (void *)GetProcAddress(GetModuleHandle("rpcrt4.dll"), "I_RpcExceptionFilter");
 643
 644     if (!pI_RpcExceptionFilter)
 645     {
 646         skip("I_RpcExceptionFilter not exported\n");
 647         return;
 648     }
 649
 650     for (exception = 0; exception < STATUS_REG_NAT_CONSUMPTION; exception++)
 651     {
 652         /* skip over uninteresting bits of the number space */
 653         if (exception == 2000) exception = 0x40000000;
 654         if (exception == 0x40000005) exception = 0x80000000;
 655         if (exception == 0x80000005) exception = 0xc0000000;
 656
 657         retval = pI_RpcExceptionFilter(exception);
 658         switch (exception)
 659         {
 660         case STATUS_DATATYPE_MISALIGNMENT:
 661         case STATUS_BREAKPOINT:
 662         case STATUS_ACCESS_VIOLATION:
 663         case STATUS_ILLEGAL_INSTRUCTION:
 664         case STATUS_PRIVILEGED_INSTRUCTION:
 665         case 0xc00000aa /* STATUS_INSTRUCTION_MISALIGNMENT */:
 666         case STATUS_STACK_OVERFLOW:
 667         case 0xc0000194 /* STATUS_POSSIBLE_DEADLOCK */:
 668             ok(retval == EXCEPTION_CONTINUE_SEARCH, "I_RpcExceptionFilter(0x%x) should have returned %d instead of %d\n",
 669                exception, EXCEPTION_CONTINUE_SEARCH, retval);
 670             break;
 671         case STATUS_GUARD_PAGE_VIOLATION:
 672         case STATUS_IN_PAGE_ERROR:
 673         case STATUS_HANDLE_NOT_CLOSABLE:
 674             trace("I_RpcExceptionFilter(0x%x) returned %d\n", exception, retval);
 675             break;
 676         default:
 677             ok(retval == EXCEPTION_EXECUTE_HANDLER, "I_RpcExceptionFilter(0x%x) should have returned %d instead of %d\n",
 678                exception, EXCEPTION_EXECUTE_HANDLER, retval);
 679         }
 680     }
 681 }
 682
 683 static void test_endpoint_mapper(RPC_CSTR protseq, RPC_CSTR address,
 684                                  RPC_CSTR endpoint)
 685 {
 686     static unsigned char annotation[] = "Test annotation string.";
 687     RPC_STATUS status;
 688     RPC_BINDING_VECTOR *binding_vector;
 689     handle_t handle;
 690     unsigned char *binding;
 691
 692     status = RpcServerUseProtseqEp(protseq, 20, endpoint, NULL);
 693     ok(status == RPC_S_OK || broken(status == RPC_S_PROTSEQ_NOT_SUPPORTED), /* win9x */
 694        "%s: RpcServerUseProtseqEp failed (%lu)\n", protseq, status);
 695
 696     status = RpcServerRegisterIf(IFoo_v0_0_s_ifspec, NULL, NULL);
 697     ok(status == RPC_S_OK, "%s: RpcServerRegisterIf failed (%lu)\n", protseq, status);
 698
 699     status = RpcServerInqBindings(&binding_vector);
 700     ok(status == RPC_S_OK, "%s: RpcServerInqBindings failed with error %lu\n", protseq, status);
 701
 702     status = RpcEpRegisterA(IFoo_v0_0_s_ifspec, binding_vector, NULL, annotation);
 703     ok(status == RPC_S_OK, "%s: RpcEpRegisterA failed with error %lu\n", protseq, status);
 704
 705     status = RpcStringBindingCompose(NULL, protseq, address,
 706                                      NULL, NULL, &binding);
 707     ok(status == RPC_S_OK, "%s: RpcStringBindingCompose failed (%lu)\n", protseq, status);
 708
 709     status = RpcBindingFromStringBinding(binding, &handle);
 710     ok(status == RPC_S_OK, "%s: RpcBindingFromStringBinding failed (%lu)\n", protseq, status);
 711
 712     RpcStringFree(&binding);
 713
 714     status = RpcBindingReset(handle);
 715     ok(status == RPC_S_OK, "%s: RpcBindingReset failed with error %lu\n", protseq, status);
 716
 717     RpcStringFree(&binding);
 718
 719     status = RpcEpResolveBinding(handle, IFoo_v0_0_s_ifspec);
 720     ok(status == RPC_S_OK || broken(status == RPC_S_SERVER_UNAVAILABLE), /* win9x */
 721        "%s: RpcEpResolveBinding failed with error %lu\n", protseq, status);
 722
 723     status = RpcBindingReset(handle);
 724     ok(status == RPC_S_OK, "%s: RpcBindingReset failed with error %lu\n", protseq, status);
 725
 726     status = RpcBindingFree(&handle);
 727     ok(status == RPC_S_OK, "%s: RpcBindingFree failed with error %lu\n", protseq, status);
 728
 729     status = RpcServerUnregisterIf(NULL, NULL, FALSE);
 730     ok(status == RPC_S_OK, "%s: RpcServerUnregisterIf failed (%lu)\n", protseq, status);
 731
 732     status = RpcEpUnregister(IFoo_v0_0_s_ifspec, binding_vector, NULL);
 733     ok(status == RPC_S_OK, "%s: RpcEpUnregisterA failed with error %lu\n", protseq, status);
 734
 735     status = RpcBindingVectorFree(&binding_vector);
 736     ok(status == RPC_S_OK, "%s: RpcBindingVectorFree failed with error %lu\n", protseq, status);
 737 }
 738
 739 static void test_RpcStringBindingFromBinding(void)
 740 {
 741     static unsigned char ncacn_np[] = "ncacn_np";
 742     static unsigned char address[] = ".";
 743     static unsigned char endpoint[] = "\\pipe\\wine_rpc_test";
 744     RPC_STATUS status;
 745     handle_t handle;
 746     RPC_CSTR binding;
 747
 748     status = RpcStringBindingCompose(NULL, ncacn_np, address,
 749                                      endpoint, NULL, &binding);
 750     ok(status == RPC_S_OK, "RpcStringBindingCompose failed (%lu)\n", status);
 751
 752     status = RpcBindingFromStringBinding(binding, &handle);
 753     ok(status == RPC_S_OK, "RpcBindingFromStringBinding failed (%lu)\n", status);
 754     RpcStringFree(&binding);
 755
 756     status = RpcBindingToStringBinding(handle, &binding);
 757     ok(status == RPC_S_OK, "RpcStringBindingFromBinding failed with error %lu\n", status);
 758
 759     ok(!strcmp((const char *)binding, "ncacn_np:.[\\\\pipe\\\\wine_rpc_test]"),
 760        "binding string didn't match what was expected: \"%s\"\n", binding);
 761     RpcStringFree(&binding);
 762
 763     status = RpcBindingFree(&handle);
 764     ok(status == RPC_S_OK, "RpcBindingFree failed with error %lu\n", status);
 765 }
 766
 767 static char *printGuid(char *buf, const UUID *guid)
 768 {
 769     sprintf(buf, "{%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}\n",
 770        guid->Data1, guid->Data2, guid->Data3, guid->Data4[0], guid->Data4[1],
 771        guid->Data4[2], guid->Data4[3], guid->Data4[4], guid->Data4[5],
 772        guid->Data4[6], guid->Data4[7]);
 773     return buf;
 774 }
 775
 776 static void test_UuidCreate(void)
 777 {
 778     UUID guid;
 779     BYTE version;
 780
 781     UuidCreate(&guid);
 782     version = (guid.Data3 & 0xf000) >> 12;
 783     todo_wine
 784     ok(version == 4 || broken(version == 1), "unexpected version %d\n",
 785        version);
 786     if (version == 4)
 787     {
 788         static UUID v4and = { 0, 0, 0x4000, { 0x80,0,0,0,0,0,0,0 } };
 789         static UUID v4or = { 0xffffffff, 0xffff, 0x4fff,
 790            { 0xbf,0xff,0xff,0xff,0xff,0xff,0xff,0xff } };
 791         UUID and, or;
 792         RPC_STATUS rslt;
 793         int i;
 794         char buf[39];
 795
 796         memcpy(&and, &guid, sizeof(guid));
 797         memcpy(&or, &guid, sizeof(guid));
 798         /* Generate a bunch of UUIDs and mask them.  By the end, we expect
 799          * every randomly generated bit to have been zero at least once,
 800          * resulting in no bits set in the and mask except those which are not
 801          * randomly generated:  the version number and the topmost bits of the
 802          * Data4 field (treated as big-endian.)  Similarly, we expect only
 803          * the bits which are not randomly set to be cleared in the or mask.
 804          */
 805         for (i = 0; i < 1000; i++)
 806         {
 807             LPBYTE src, dst;
 808
 809             UuidCreate(&guid);
 810             for (src = (LPBYTE)&guid, dst = (LPBYTE)&and;
 811              src - (LPBYTE)&guid < sizeof(guid); src++, dst++)
 812                 *dst &= *src;
 813             for (src = (LPBYTE)&guid, dst = (LPBYTE)&or;
 814              src - (LPBYTE)&guid < sizeof(guid); src++, dst++)
 815                 *dst |= *src;
 816         }
 817         ok(UuidEqual(&and, &v4and, &rslt),
 818            "unexpected bits set in V4 UUID: %s\n", printGuid(buf, &and));
 819         ok(UuidEqual(&or, &v4or, &rslt),
 820            "unexpected bits set in V4 UUID: %s\n", printGuid(buf, &or));
 821     }
 822     else
 823     {
 824         /* Older versions of Windows generate V1 UUIDs.  For these, there are
 825          * many stable bits, including at least the MAC address if one is
 826          * present.  Just check that Data4[0]'s most significant bits are
 827          * set as expected.
 828          */
 829         todo_wine
 830         ok((guid.Data4[0] & 0xc0) == 0x80,
 831            "unexpected value in Data4[0]: %02x\n", guid.Data4[0] & 0xc0);
 832     }
 833 }
 834
 835 START_TEST( rpc )
 836 {
 837     static unsigned char ncacn_np[] = "ncacn_np";
 838     static unsigned char ncalrpc[] = "ncalrpc";
 839     static unsigned char np_address[] = ".";
 840     static unsigned char np_endpoint[] = "\\pipe\\wine_rpc_test";
 841     static unsigned char lrpc_endpoint[] = "wine_rpc_test";
 842
 843     UuidConversionAndComparison();
 844     TestDceErrorInqText();
 845     test_rpc_ncacn_ip_tcp();
 846     test_towers();
 847     test_I_RpcMapWin32Status();
 848     test_RpcStringBindingParseA();
 849     test_I_RpcExceptionFilter();
 850     test_endpoint_mapper(ncacn_np, np_address, np_endpoint);
 851     test_endpoint_mapper(ncalrpc, NULL, lrpc_endpoint);
 852     test_RpcStringBindingFromBinding();
 853     test_UuidCreate();
 854 }