4 * Copyright 2000 Huw D M Davies for CodeWeavers
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.
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.
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
20 * WINE RPC TODO's (and a few TODONT's)
22 * - Ove's decreasingly incomplete widl is an IDL compiler for wine. For widl
23 * to be wine's only IDL compiler, a fair bit of work remains to be done.
24 * until then we have used some midl-generated stuff. (What?)
25 * widl currently doesn't generate stub/proxy files required by wine's (O)RPC
26 * capabilities -- nor does it make those lovely format strings :(
27 * The MS MIDL compiler does some really esoteric stuff. Of course Ove has
28 * started with the less esoteric stuff. There are also lots of nice
29 * comments in there if you want to flex your bison and help build this monster.
31 * - RPC has a quite featureful error handling mechanism; basically none of this is
32 * implemented right now. We also have deficiencies on the compiler side, where
33 * wine's __TRY / __EXCEPT / __FINALLY macros are not even used for RpcTryExcept & co,
34 * due to syntactic differences! (we can fix it with widl by using __TRY)
36 * - There are several different memory allocation schemes for MSRPC.
37 * I don't even understand what they all are yet, much less have them
38 * properly implemented. Surely we are supposed to be doing something with
39 * the user-provided allocation/deallocation functions, but so far,
40 * I don't think we are doing this...
42 * - MSRPC provides impersonation capabilities which currently are not possible
43 * to implement in wine. At the very least we should implement the authorization
44 * API's & gracefully ignore the irrelevant stuff (to an extent we already do).
46 * - Some transports are not yet implemented. The existing transport implementations
47 * are incomplete and may be bug-infested.
49 * - The various transports that we do support ought to be supported in a more
50 * object-oriented manner, as in DCE's RPC implementation, instead of cluttering
51 * up the code with conditionals like we do now.
53 * - Data marshalling: So far, only the beginnings of a full implementation
54 * exist in wine. NDR protocol itself is documented, but the MS API's to
55 * convert data-types in memory into NDR are not. This is challenging work,
56 * and has supposedly been "at the top of Greg's queue" for several months now.
58 * - ORPC is RPC for OLE; once we have a working RPC framework, we can
59 * use it to implement out-of-process OLE client/server communications.
60 * ATM there is maybe a disconnect between the marshalling in the OLE DLLs
61 * and the marshalling going on here [TODO: well, is there or not?]
63 * - In-source API Documentation, at least for those functions which we have
64 * implemented, but preferably for everything we can document, would be nice,
65 * since some of this stuff is quite obscure.
67 * - Name services... [TODO: what about them]
69 * - Protocol Towers: Totally unimplemented.... I think.
71 * - Context Handle Rundown: whatever that is.
73 * - Nested RPC's: Totally unimplemented.
75 * - Statistics: we are supposed to be keeping various counters. we aren't.
77 * - Async RPC: Unimplemented.
79 * - XML/http RPC: Somewhere there's an XML fiend that wants to do this! Betcha
80 * we could use these as a transport for RPC's across computers without a
81 * permissions and/or licensing crisis.
83 * - The NT "ports" API, aka LPC. Greg claims this is on his radar. Might (or
84 * might not) enable users to get some kind of meaningful result out of
85 * NT-based native rpcrt4's. Commonly-used transport for self-to-self RPC's.
87 * - ...? More stuff I haven't thought of. If you think of more RPC todo's
88 * drop me an e-mail <gmturner007@ameritech.net> or send a patch to the
89 * wine-patches mailing list.
100 #include "winerror.h"
104 #include "winternl.h"
106 #include "iphlpapi.h"
107 #include "wine/unicode.h"
112 #include "rpcproxy.h"
114 #include "rpc_binding.h"
115 #include "rpcss_np_client.h"
117 #include "wine/debug.h"
119 WINE_DEFAULT_DEBUG_CHANNEL(rpc
);
121 static UUID uuid_nil
;
122 static HANDLE master_mutex
;
124 HANDLE
RPCRT4_GetMasterMutex(void)
129 static CRITICAL_SECTION uuid_cs
;
130 static CRITICAL_SECTION_DEBUG critsect_debug
=
133 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
134 0, 0, { (DWORD_PTR
)(__FILE__
": uuid_cs") }
136 static CRITICAL_SECTION uuid_cs
= { &critsect_debug
, -1, 0, 0, 0, 0 };
138 static CRITICAL_SECTION threaddata_cs
;
139 static CRITICAL_SECTION_DEBUG threaddata_cs_debug
=
141 0, 0, &threaddata_cs
,
142 { &threaddata_cs_debug
.ProcessLocksList
, &threaddata_cs_debug
.ProcessLocksList
},
143 0, 0, { (DWORD_PTR
)(__FILE__
": threaddata_cs") }
145 static CRITICAL_SECTION threaddata_cs
= { &threaddata_cs_debug
, -1, 0, 0, 0, 0 };
147 struct list threaddata_list
= LIST_INIT(threaddata_list
);
154 RpcConnection
*connection
;
157 /***********************************************************************
161 * hinstDLL [I] handle to the DLL's instance
163 * lpvReserved [I] reserved, must be NULL
170 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID lpvReserved
)
172 struct threaddata
*tdata
;
175 case DLL_PROCESS_ATTACH
:
176 master_mutex
= CreateMutexA( NULL
, FALSE
, RPCSS_MASTER_MUTEX_NAME
);
178 ERR("Failed to create master mutex\n");
181 case DLL_THREAD_DETACH
:
182 tdata
= NtCurrentTeb()->ReservedForNtRpc
;
185 EnterCriticalSection(&threaddata_cs
);
186 list_remove(&tdata
->entry
);
187 LeaveCriticalSection(&threaddata_cs
);
189 DeleteCriticalSection(&tdata
->cs
);
190 if (tdata
->connection
)
191 ERR("tdata->connection should be NULL but is still set to %p\n", tdata
);
192 HeapFree(GetProcessHeap(), 0, tdata
);
196 case DLL_PROCESS_DETACH
:
197 CloseHandle(master_mutex
);
205 /*************************************************************************
206 * RpcStringFreeA [RPCRT4.@]
208 * Frees a character string allocated by the RPC run-time library.
212 * S_OK if successful.
214 RPC_STATUS WINAPI
RpcStringFreeA(RPC_CSTR
* String
)
216 HeapFree( GetProcessHeap(), 0, *String
);
221 /*************************************************************************
222 * RpcStringFreeW [RPCRT4.@]
224 * Frees a character string allocated by the RPC run-time library.
228 * S_OK if successful.
230 RPC_STATUS WINAPI
RpcStringFreeW(RPC_WSTR
* String
)
232 HeapFree( GetProcessHeap(), 0, *String
);
237 /*************************************************************************
238 * RpcRaiseException [RPCRT4.@]
240 * Raises an exception.
242 void WINAPI
RpcRaiseException(RPC_STATUS exception
)
244 /* FIXME: translate exception? */
245 RaiseException(exception
, 0, 0, NULL
);
248 /*************************************************************************
249 * UuidCompare [RPCRT4.@]
252 * UUID *Uuid1 [I] Uuid to compare
253 * UUID *Uuid2 [I] Uuid to compare
254 * RPC_STATUS *Status [O] returns RPC_S_OK
257 * -1 if Uuid1 is less than Uuid2
258 * 0 if Uuid1 and Uuid2 are equal
259 * 1 if Uuid1 is greater than Uuid2
261 int WINAPI
UuidCompare(UUID
*Uuid1
, UUID
*Uuid2
, RPC_STATUS
*Status
)
265 TRACE("(%s,%s)\n", debugstr_guid(Uuid1
), debugstr_guid(Uuid2
));
269 if (!Uuid1
) Uuid1
= &uuid_nil
;
270 if (!Uuid2
) Uuid2
= &uuid_nil
;
272 if (Uuid1
== Uuid2
) return 0;
274 if (Uuid1
->Data1
!= Uuid2
->Data1
)
275 return Uuid1
->Data1
< Uuid2
->Data1
? -1 : 1;
277 if (Uuid1
->Data2
!= Uuid2
->Data2
)
278 return Uuid1
->Data2
< Uuid2
->Data2
? -1 : 1;
280 if (Uuid1
->Data3
!= Uuid2
->Data3
)
281 return Uuid1
->Data3
< Uuid2
->Data3
? -1 : 1;
283 for (i
= 0; i
< 8; i
++) {
284 if (Uuid1
->Data4
[i
] < Uuid2
->Data4
[i
])
286 if (Uuid1
->Data4
[i
] > Uuid2
->Data4
[i
])
293 /*************************************************************************
294 * UuidEqual [RPCRT4.@]
297 * UUID *Uuid1 [I] Uuid to compare
298 * UUID *Uuid2 [I] Uuid to compare
299 * RPC_STATUS *Status [O] returns RPC_S_OK
304 int WINAPI
UuidEqual(UUID
*Uuid1
, UUID
*Uuid2
, RPC_STATUS
*Status
)
306 TRACE("(%s,%s)\n", debugstr_guid(Uuid1
), debugstr_guid(Uuid2
));
307 return !UuidCompare(Uuid1
, Uuid2
, Status
);
310 /*************************************************************************
311 * UuidIsNil [RPCRT4.@]
314 * UUID *Uuid [I] Uuid to compare
315 * RPC_STATUS *Status [O] retuns RPC_S_OK
320 int WINAPI
UuidIsNil(UUID
*Uuid
, RPC_STATUS
*Status
)
322 TRACE("(%s)\n", debugstr_guid(Uuid
));
323 if (!Uuid
) return TRUE
;
324 return !UuidCompare(Uuid
, &uuid_nil
, Status
);
327 /*************************************************************************
328 * UuidCreateNil [RPCRT4.@]
331 * UUID *Uuid [O] returns a nil UUID
336 RPC_STATUS WINAPI
UuidCreateNil(UUID
*Uuid
)
342 /* Number of 100ns ticks per clock tick. To be safe, assume that the clock
343 resolution is at least 1000 * 100 * (1/1000000) = 1/10 of a second */
344 #define TICKS_PER_CLOCK_TICK 1000
345 #define SECSPERDAY 86400
346 #define TICKSPERSEC 10000000
347 /* UUID system time starts at October 15, 1582 */
348 #define SECS_15_OCT_1582_TO_1601 ((17 + 30 + 31 + 365 * 18 + 5) * SECSPERDAY)
349 #define TICKS_15_OCT_1582_TO_1601 ((ULONGLONG)SECS_15_OCT_1582_TO_1601 * TICKSPERSEC)
351 static void RPC_UuidGetSystemTime(ULONGLONG
*time
)
355 GetSystemTimeAsFileTime(&ft
);
357 *time
= ((ULONGLONG
)ft
.dwHighDateTime
<< 32) | ft
.dwLowDateTime
;
358 *time
+= TICKS_15_OCT_1582_TO_1601
;
361 /* Assume that a hardware address is at least 6 bytes long */
362 #define ADDRESS_BYTES_NEEDED 6
364 static RPC_STATUS
RPC_UuidGetNodeAddress(BYTE
*address
)
367 DWORD status
= RPC_S_OK
;
369 ULONG buflen
= sizeof(IP_ADAPTER_INFO
);
370 PIP_ADAPTER_INFO adapter
= HeapAlloc(GetProcessHeap(), 0, buflen
);
372 if (GetAdaptersInfo(adapter
, &buflen
) == ERROR_BUFFER_OVERFLOW
) {
373 HeapFree(GetProcessHeap(), 0, adapter
);
374 adapter
= HeapAlloc(GetProcessHeap(), 0, buflen
);
377 if (GetAdaptersInfo(adapter
, &buflen
) == NO_ERROR
) {
378 for (i
= 0; i
< ADDRESS_BYTES_NEEDED
; i
++) {
379 address
[i
] = adapter
->Address
[i
];
382 /* We can't get a hardware address, just use random numbers.
383 Set the multicast bit to prevent conflicts with real cards. */
385 for (i
= 0; i
< ADDRESS_BYTES_NEEDED
; i
++) {
386 address
[i
] = rand() & 0xff;
390 status
= RPC_S_UUID_LOCAL_ONLY
;
393 HeapFree(GetProcessHeap(), 0, adapter
);
397 /*************************************************************************
398 * UuidCreate [RPCRT4.@]
400 * Creates a 128bit UUID.
404 * RPC_S_OK if successful.
405 * RPC_S_UUID_LOCAL_ONLY if UUID is only locally unique.
407 * FIXME: No compensation for changes across reloading
408 * this dll or across reboots (e.g. clock going
409 * backwards and swapped network cards). The RFC
410 * suggests using NVRAM for storing persistent
413 RPC_STATUS WINAPI
UuidCreate(UUID
*Uuid
)
415 static int initialised
, count
;
418 static ULONGLONG timelast
;
419 static WORD sequence
;
422 static BYTE address
[MAX_ADAPTER_ADDRESS_LENGTH
];
424 EnterCriticalSection(&uuid_cs
);
427 RPC_UuidGetSystemTime(&timelast
);
428 count
= TICKS_PER_CLOCK_TICK
;
430 sequence
= ((rand() & 0xff) << 8) + (rand() & 0xff);
433 status
= RPC_UuidGetNodeAddress(address
);
437 /* Generate time element of the UUID. Account for going faster
438 than our clock as well as the clock going backwards. */
440 RPC_UuidGetSystemTime(&time
);
441 if (time
> timelast
) {
445 if (time
< timelast
) {
446 sequence
= (sequence
+ 1) & 0x1fff;
450 if (count
< TICKS_PER_CLOCK_TICK
) {
459 /* Pack the information into the UUID structure. */
461 Uuid
->Data1
= (unsigned long)(time
& 0xffffffff);
462 Uuid
->Data2
= (unsigned short)((time
>> 32) & 0xffff);
463 Uuid
->Data3
= (unsigned short)((time
>> 48) & 0x0fff);
465 /* This is a version 1 UUID */
466 Uuid
->Data3
|= (1 << 12);
468 Uuid
->Data4
[0] = sequence
& 0xff;
469 Uuid
->Data4
[1] = (sequence
& 0x3f00) >> 8;
470 Uuid
->Data4
[1] |= 0x80;
472 Uuid
->Data4
[2] = address
[0];
473 Uuid
->Data4
[3] = address
[1];
474 Uuid
->Data4
[4] = address
[2];
475 Uuid
->Data4
[5] = address
[3];
476 Uuid
->Data4
[6] = address
[4];
477 Uuid
->Data4
[7] = address
[5];
479 LeaveCriticalSection(&uuid_cs
);
481 TRACE("%s\n", debugstr_guid(Uuid
));
486 /*************************************************************************
487 * UuidCreateSequential [RPCRT4.@]
489 * Creates a 128bit UUID.
493 * RPC_S_OK if successful.
494 * RPC_S_UUID_LOCAL_ONLY if UUID is only locally unique.
497 RPC_STATUS WINAPI
UuidCreateSequential(UUID
*Uuid
)
499 return UuidCreate(Uuid
);
503 /*************************************************************************
504 * UuidHash [RPCRT4.@]
506 * Generates a hash value for a given UUID
508 * Code based on FreeDCE implementation
511 unsigned short WINAPI
UuidHash(UUID
*uuid
, RPC_STATUS
*Status
)
513 BYTE
*data
= (BYTE
*)uuid
;
514 short c0
= 0, c1
= 0, x
, y
;
517 if (!uuid
) data
= (BYTE
*)(uuid
= &uuid_nil
);
519 TRACE("(%s)\n", debugstr_guid(uuid
));
521 for (i
=0; i
<sizeof(UUID
); i
++) {
536 /*************************************************************************
537 * UuidToStringA [RPCRT4.@]
539 * Converts a UUID to a string.
541 * UUID format is 8 hex digits, followed by a hyphen then three groups of
542 * 4 hex digits each followed by a hyphen and then 12 hex digits
546 * S_OK if successful.
547 * S_OUT_OF_MEMORY if unsuccessful.
549 RPC_STATUS WINAPI
UuidToStringA(UUID
*Uuid
, RPC_CSTR
* StringUuid
)
551 *StringUuid
= HeapAlloc( GetProcessHeap(), 0, sizeof(char) * 37);
554 return RPC_S_OUT_OF_MEMORY
;
556 if (!Uuid
) Uuid
= &uuid_nil
;
558 sprintf( (char*)*StringUuid
, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
559 Uuid
->Data1
, Uuid
->Data2
, Uuid
->Data3
,
560 Uuid
->Data4
[0], Uuid
->Data4
[1], Uuid
->Data4
[2],
561 Uuid
->Data4
[3], Uuid
->Data4
[4], Uuid
->Data4
[5],
562 Uuid
->Data4
[6], Uuid
->Data4
[7] );
567 /*************************************************************************
568 * UuidToStringW [RPCRT4.@]
570 * Converts a UUID to a string.
572 * S_OK if successful.
573 * S_OUT_OF_MEMORY if unsuccessful.
575 RPC_STATUS WINAPI
UuidToStringW(UUID
*Uuid
, RPC_WSTR
* StringUuid
)
579 if (!Uuid
) Uuid
= &uuid_nil
;
581 sprintf(buf
, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
582 Uuid
->Data1
, Uuid
->Data2
, Uuid
->Data3
,
583 Uuid
->Data4
[0], Uuid
->Data4
[1], Uuid
->Data4
[2],
584 Uuid
->Data4
[3], Uuid
->Data4
[4], Uuid
->Data4
[5],
585 Uuid
->Data4
[6], Uuid
->Data4
[7] );
587 *StringUuid
= RPCRT4_strdupAtoW(buf
);
590 return RPC_S_OUT_OF_MEMORY
;
595 static const BYTE hex2bin
[] =
597 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x00 */
598 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x10 */
599 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x20 */
600 0,1,2,3,4,5,6,7,8,9,0,0,0,0,0,0, /* 0x30 */
601 0,10,11,12,13,14,15,0,0,0,0,0,0,0,0,0, /* 0x40 */
602 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x50 */
603 0,10,11,12,13,14,15 /* 0x60 */
606 /***********************************************************************
607 * UuidFromStringA (RPCRT4.@)
609 RPC_STATUS WINAPI
UuidFromStringA(RPC_CSTR s
, UUID
*uuid
)
613 if (!s
) return UuidCreateNil( uuid
);
615 if (strlen((char*)s
) != 36) return RPC_S_INVALID_STRING_UUID
;
617 if ((s
[8]!='-') || (s
[13]!='-') || (s
[18]!='-') || (s
[23]!='-'))
618 return RPC_S_INVALID_STRING_UUID
;
622 if ((i
== 8)||(i
== 13)||(i
== 18)||(i
== 23)) continue;
623 if (s
[i
] > 'f' || (!hex2bin
[s
[i
]] && s
[i
] != '0')) return RPC_S_INVALID_STRING_UUID
;
626 /* in form XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX */
628 uuid
->Data1
= (hex2bin
[s
[0]] << 28 | hex2bin
[s
[1]] << 24 | hex2bin
[s
[2]] << 20 | hex2bin
[s
[3]] << 16 |
629 hex2bin
[s
[4]] << 12 | hex2bin
[s
[5]] << 8 | hex2bin
[s
[6]] << 4 | hex2bin
[s
[7]]);
630 uuid
->Data2
= hex2bin
[s
[9]] << 12 | hex2bin
[s
[10]] << 8 | hex2bin
[s
[11]] << 4 | hex2bin
[s
[12]];
631 uuid
->Data3
= hex2bin
[s
[14]] << 12 | hex2bin
[s
[15]] << 8 | hex2bin
[s
[16]] << 4 | hex2bin
[s
[17]];
633 /* these are just sequential bytes */
634 uuid
->Data4
[0] = hex2bin
[s
[19]] << 4 | hex2bin
[s
[20]];
635 uuid
->Data4
[1] = hex2bin
[s
[21]] << 4 | hex2bin
[s
[22]];
636 uuid
->Data4
[2] = hex2bin
[s
[24]] << 4 | hex2bin
[s
[25]];
637 uuid
->Data4
[3] = hex2bin
[s
[26]] << 4 | hex2bin
[s
[27]];
638 uuid
->Data4
[4] = hex2bin
[s
[28]] << 4 | hex2bin
[s
[29]];
639 uuid
->Data4
[5] = hex2bin
[s
[30]] << 4 | hex2bin
[s
[31]];
640 uuid
->Data4
[6] = hex2bin
[s
[32]] << 4 | hex2bin
[s
[33]];
641 uuid
->Data4
[7] = hex2bin
[s
[34]] << 4 | hex2bin
[s
[35]];
646 /***********************************************************************
647 * UuidFromStringW (RPCRT4.@)
649 RPC_STATUS WINAPI
UuidFromStringW(RPC_WSTR s
, UUID
*uuid
)
653 if (!s
) return UuidCreateNil( uuid
);
655 if (strlenW(s
) != 36) return RPC_S_INVALID_STRING_UUID
;
657 if ((s
[8]!='-') || (s
[13]!='-') || (s
[18]!='-') || (s
[23]!='-'))
658 return RPC_S_INVALID_STRING_UUID
;
662 if ((i
== 8)||(i
== 13)||(i
== 18)||(i
== 23)) continue;
663 if (s
[i
] > 'f' || (!hex2bin
[s
[i
]] && s
[i
] != '0')) return RPC_S_INVALID_STRING_UUID
;
666 /* in form XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX */
668 uuid
->Data1
= (hex2bin
[s
[0]] << 28 | hex2bin
[s
[1]] << 24 | hex2bin
[s
[2]] << 20 | hex2bin
[s
[3]] << 16 |
669 hex2bin
[s
[4]] << 12 | hex2bin
[s
[5]] << 8 | hex2bin
[s
[6]] << 4 | hex2bin
[s
[7]]);
670 uuid
->Data2
= hex2bin
[s
[9]] << 12 | hex2bin
[s
[10]] << 8 | hex2bin
[s
[11]] << 4 | hex2bin
[s
[12]];
671 uuid
->Data3
= hex2bin
[s
[14]] << 12 | hex2bin
[s
[15]] << 8 | hex2bin
[s
[16]] << 4 | hex2bin
[s
[17]];
673 /* these are just sequential bytes */
674 uuid
->Data4
[0] = hex2bin
[s
[19]] << 4 | hex2bin
[s
[20]];
675 uuid
->Data4
[1] = hex2bin
[s
[21]] << 4 | hex2bin
[s
[22]];
676 uuid
->Data4
[2] = hex2bin
[s
[24]] << 4 | hex2bin
[s
[25]];
677 uuid
->Data4
[3] = hex2bin
[s
[26]] << 4 | hex2bin
[s
[27]];
678 uuid
->Data4
[4] = hex2bin
[s
[28]] << 4 | hex2bin
[s
[29]];
679 uuid
->Data4
[5] = hex2bin
[s
[30]] << 4 | hex2bin
[s
[31]];
680 uuid
->Data4
[6] = hex2bin
[s
[32]] << 4 | hex2bin
[s
[33]];
681 uuid
->Data4
[7] = hex2bin
[s
[34]] << 4 | hex2bin
[s
[35]];
685 /***********************************************************************
686 * DllRegisterServer (RPCRT4.@)
689 HRESULT WINAPI
DllRegisterServer( void )
691 FIXME( "(): stub\n" );
695 static BOOL
RPCRT4_StartRPCSS(void)
697 PROCESS_INFORMATION pi
;
702 ZeroMemory(&pi
, sizeof(PROCESS_INFORMATION
));
703 ZeroMemory(&si
, sizeof(STARTUPINFOA
));
704 si
.cb
= sizeof(STARTUPINFOA
);
706 /* apparently it's not OK to use a constant string below */
707 CopyMemory(cmd
, "rpcss", 6);
709 /* FIXME: will this do the right thing when run as a test? */
710 rslt
= CreateProcessA(
711 NULL
, /* executable */
712 cmd
, /* command line */
713 NULL
, /* process security attributes */
714 NULL
, /* primary thread security attributes */
715 FALSE
, /* inherit handles */
716 0, /* creation flags */
717 NULL
, /* use parent's environment */
718 NULL
, /* use parent's current directory */
719 &si
, /* STARTUPINFO pointer */
720 &pi
/* PROCESS_INFORMATION */
724 CloseHandle(pi
.hProcess
);
725 CloseHandle(pi
.hThread
);
731 /***********************************************************************
732 * RPCRT4_RPCSSOnDemandCall (internal)
734 * Attempts to send a message to the RPCSS process
735 * on the local machine, invoking it if necessary.
736 * For remote RPCSS calls, use.... your imagination.
739 * msg [I] pointer to the RPCSS message
740 * vardata_payload [I] pointer vardata portion of the RPCSS message
741 * reply [O] pointer to reply structure
747 BOOL
RPCRT4_RPCSSOnDemandCall(PRPCSS_NP_MESSAGE msg
, char *vardata_payload
, PRPCSS_NP_REPLY reply
)
749 HANDLE client_handle
;
753 TRACE("(msg == %p, vardata_payload == %p, reply == %p)\n", msg
, vardata_payload
, reply
);
755 client_handle
= RPCRT4_RpcssNPConnect();
757 while (INVALID_HANDLE_VALUE
== client_handle
) {
758 /* start the RPCSS process */
759 if (!RPCRT4_StartRPCSS()) {
760 ERR("Unable to start RPCSS process.\n");
763 /* wait for a connection (w/ periodic polling) */
764 for (i
= 0; i
< 60; i
++) {
766 client_handle
= RPCRT4_RpcssNPConnect();
767 if (INVALID_HANDLE_VALUE
!= client_handle
) break;
769 /* we are only willing to try twice */
773 if (INVALID_HANDLE_VALUE
== client_handle
) {
775 ERR("Unable to connect to RPCSS process!\n");
776 SetLastError(RPC_E_SERVER_DIED_DNE
);
780 /* great, we're connected. now send the message */
782 if (!RPCRT4_SendReceiveNPMsg(client_handle
, msg
, vardata_payload
, reply
)) {
783 ERR("Something is amiss: RPC_SendReceive failed.\n");
786 CloseHandle(client_handle
);
791 #define MAX_RPC_ERROR_TEXT 256
793 /******************************************************************************
794 * DceErrorInqTextW (rpcrt4.@)
797 * 1. On passing a NULL pointer the code does bomb out.
798 * 2. The size of the required buffer is not defined in the documentation.
799 * It appears to be 256.
800 * 3. The function is defined to return RPC_S_INVALID_ARG but I don't know
801 * of any value for which it does.
802 * 4. The MSDN documentation currently declares that the second argument is
803 * unsigned char *, even for the W version. I don't believe it.
805 RPC_STATUS RPC_ENTRY
DceErrorInqTextW (RPC_STATUS e
, RPC_WSTR buffer
)
808 count
= FormatMessageW (FORMAT_MESSAGE_FROM_SYSTEM
|
809 FORMAT_MESSAGE_IGNORE_INSERTS
,
810 NULL
, e
, 0, buffer
, MAX_RPC_ERROR_TEXT
, NULL
);
813 count
= FormatMessageW (FORMAT_MESSAGE_FROM_SYSTEM
|
814 FORMAT_MESSAGE_IGNORE_INSERTS
,
815 NULL
, RPC_S_NOT_RPC_ERROR
, 0, buffer
, MAX_RPC_ERROR_TEXT
, NULL
);
818 ERR ("Failed to translate error\n");
819 return RPC_S_INVALID_ARG
;
825 /******************************************************************************
826 * DceErrorInqTextA (rpcrt4.@)
828 RPC_STATUS RPC_ENTRY
DceErrorInqTextA (RPC_STATUS e
, RPC_CSTR buffer
)
831 WCHAR bufferW
[MAX_RPC_ERROR_TEXT
];
832 if ((status
= DceErrorInqTextW (e
, bufferW
)) == RPC_S_OK
)
834 if (!WideCharToMultiByte(CP_ACP
, 0, bufferW
, -1, (LPSTR
)buffer
, MAX_RPC_ERROR_TEXT
,
837 ERR ("Failed to translate error\n");
838 status
= RPC_S_INVALID_ARG
;
844 /******************************************************************************
845 * I_RpcAllocate (rpcrt4.@)
847 void * WINAPI
I_RpcAllocate(unsigned int Size
)
849 return HeapAlloc(GetProcessHeap(), 0, Size
);
852 /******************************************************************************
853 * I_RpcFree (rpcrt4.@)
855 void WINAPI
I_RpcFree(void *Object
)
857 HeapFree(GetProcessHeap(), 0, Object
);
860 /******************************************************************************
861 * I_RpcMapWin32Status (rpcrt4.@)
863 LONG WINAPI
I_RpcMapWin32Status(RPC_STATUS status
)
865 FIXME("(%ld): stub\n", status
);
869 /******************************************************************************
870 * RpcErrorStartEnumeration (rpcrt4.@)
872 RPC_STATUS RPC_ENTRY
RpcErrorStartEnumeration(void** EnumHandle
)
874 FIXME("(%p): stub\n", EnumHandle
);
875 return RPC_S_ENTRY_NOT_FOUND
;
878 /******************************************************************************
879 * RpcMgmtSetCancelTimeout (rpcrt4.@)
881 RPC_STATUS RPC_ENTRY
RpcMgmtSetCancelTimeout(LONG Timeout
)
883 FIXME("(%d): stub\n", Timeout
);
887 void RPCRT4_SetThreadCurrentConnection(RpcConnection
*Connection
)
889 struct threaddata
*tdata
= NtCurrentTeb()->ReservedForNtRpc
;
892 tdata
= HeapAlloc(GetProcessHeap(), 0, sizeof(*tdata
));
895 InitializeCriticalSection(&tdata
->cs
);
896 tdata
->thread_id
= GetCurrentThreadId();
897 tdata
->connection
= Connection
;
899 EnterCriticalSection(&threaddata_cs
);
900 list_add_tail(&threaddata_list
, &tdata
->entry
);
901 LeaveCriticalSection(&threaddata_cs
);
903 NtCurrentTeb()->ReservedForNtRpc
= tdata
;
907 EnterCriticalSection(&tdata
->cs
);
908 tdata
->connection
= Connection
;
909 LeaveCriticalSection(&tdata
->cs
);
912 /******************************************************************************
913 * RpcCancelThread (rpcrt4.@)
915 RPC_STATUS RPC_ENTRY
RpcCancelThread(void* ThreadHandle
)
918 struct threaddata
*tdata
;
920 TRACE("(%p)\n", ThreadHandle
);
922 target_tid
= GetThreadId(ThreadHandle
);
924 return RPC_S_INVALID_ARG
;
926 EnterCriticalSection(&threaddata_cs
);
927 LIST_FOR_EACH_ENTRY(tdata
, &threaddata_list
, struct threaddata
, entry
)
928 if (tdata
->thread_id
== target_tid
)
930 EnterCriticalSection(&tdata
->cs
);
931 if (tdata
->connection
) rpcrt4_conn_cancel_call(tdata
->connection
);
932 LeaveCriticalSection(&tdata
->cs
);
935 LeaveCriticalSection(&threaddata_cs
);