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
);
195 case DLL_PROCESS_DETACH
:
196 CloseHandle(master_mutex
);
204 /*************************************************************************
205 * RpcStringFreeA [RPCRT4.@]
207 * Frees a character string allocated by the RPC run-time library.
211 * S_OK if successful.
213 RPC_STATUS WINAPI
RpcStringFreeA(RPC_CSTR
* String
)
215 HeapFree( GetProcessHeap(), 0, *String
);
220 /*************************************************************************
221 * RpcStringFreeW [RPCRT4.@]
223 * Frees a character string allocated by the RPC run-time library.
227 * S_OK if successful.
229 RPC_STATUS WINAPI
RpcStringFreeW(RPC_WSTR
* String
)
231 HeapFree( GetProcessHeap(), 0, *String
);
236 /*************************************************************************
237 * RpcRaiseException [RPCRT4.@]
239 * Raises an exception.
241 void WINAPI
RpcRaiseException(RPC_STATUS exception
)
243 /* FIXME: translate exception? */
244 RaiseException(exception
, 0, 0, NULL
);
247 /*************************************************************************
248 * UuidCompare [RPCRT4.@]
251 * UUID *Uuid1 [I] Uuid to compare
252 * UUID *Uuid2 [I] Uuid to compare
253 * RPC_STATUS *Status [O] returns RPC_S_OK
256 * -1 if Uuid1 is less than Uuid2
257 * 0 if Uuid1 and Uuid2 are equal
258 * 1 if Uuid1 is greater than Uuid2
260 int WINAPI
UuidCompare(UUID
*Uuid1
, UUID
*Uuid2
, RPC_STATUS
*Status
)
264 TRACE("(%s,%s)\n", debugstr_guid(Uuid1
), debugstr_guid(Uuid2
));
268 if (!Uuid1
) Uuid1
= &uuid_nil
;
269 if (!Uuid2
) Uuid2
= &uuid_nil
;
271 if (Uuid1
== Uuid2
) return 0;
273 if (Uuid1
->Data1
!= Uuid2
->Data1
)
274 return Uuid1
->Data1
< Uuid2
->Data1
? -1 : 1;
276 if (Uuid1
->Data2
!= Uuid2
->Data2
)
277 return Uuid1
->Data2
< Uuid2
->Data2
? -1 : 1;
279 if (Uuid1
->Data3
!= Uuid2
->Data3
)
280 return Uuid1
->Data3
< Uuid2
->Data3
? -1 : 1;
282 for (i
= 0; i
< 8; i
++) {
283 if (Uuid1
->Data4
[i
] < Uuid2
->Data4
[i
])
285 if (Uuid1
->Data4
[i
] > Uuid2
->Data4
[i
])
292 /*************************************************************************
293 * UuidEqual [RPCRT4.@]
296 * UUID *Uuid1 [I] Uuid to compare
297 * UUID *Uuid2 [I] Uuid to compare
298 * RPC_STATUS *Status [O] returns RPC_S_OK
303 int WINAPI
UuidEqual(UUID
*Uuid1
, UUID
*Uuid2
, RPC_STATUS
*Status
)
305 TRACE("(%s,%s)\n", debugstr_guid(Uuid1
), debugstr_guid(Uuid2
));
306 return !UuidCompare(Uuid1
, Uuid2
, Status
);
309 /*************************************************************************
310 * UuidIsNil [RPCRT4.@]
313 * UUID *Uuid [I] Uuid to compare
314 * RPC_STATUS *Status [O] retuns RPC_S_OK
319 int WINAPI
UuidIsNil(UUID
*Uuid
, RPC_STATUS
*Status
)
321 TRACE("(%s)\n", debugstr_guid(Uuid
));
322 if (!Uuid
) return TRUE
;
323 return !UuidCompare(Uuid
, &uuid_nil
, Status
);
326 /*************************************************************************
327 * UuidCreateNil [RPCRT4.@]
330 * UUID *Uuid [O] returns a nil UUID
335 RPC_STATUS WINAPI
UuidCreateNil(UUID
*Uuid
)
341 /* Number of 100ns ticks per clock tick. To be safe, assume that the clock
342 resolution is at least 1000 * 100 * (1/1000000) = 1/10 of a second */
343 #define TICKS_PER_CLOCK_TICK 1000
344 #define SECSPERDAY 86400
345 #define TICKSPERSEC 10000000
346 /* UUID system time starts at October 15, 1582 */
347 #define SECS_15_OCT_1582_TO_1601 ((17 + 30 + 31 + 365 * 18 + 5) * SECSPERDAY)
348 #define TICKS_15_OCT_1582_TO_1601 ((ULONGLONG)SECS_15_OCT_1582_TO_1601 * TICKSPERSEC)
350 static void RPC_UuidGetSystemTime(ULONGLONG
*time
)
354 GetSystemTimeAsFileTime(&ft
);
356 *time
= ((ULONGLONG
)ft
.dwHighDateTime
<< 32) | ft
.dwLowDateTime
;
357 *time
+= TICKS_15_OCT_1582_TO_1601
;
360 /* Assume that a hardware address is at least 6 bytes long */
361 #define ADDRESS_BYTES_NEEDED 6
363 static RPC_STATUS
RPC_UuidGetNodeAddress(BYTE
*address
)
366 DWORD status
= RPC_S_OK
;
368 ULONG buflen
= sizeof(IP_ADAPTER_INFO
);
369 PIP_ADAPTER_INFO adapter
= HeapAlloc(GetProcessHeap(), 0, buflen
);
371 if (GetAdaptersInfo(adapter
, &buflen
) == ERROR_BUFFER_OVERFLOW
) {
372 HeapFree(GetProcessHeap(), 0, adapter
);
373 adapter
= HeapAlloc(GetProcessHeap(), 0, buflen
);
376 if (GetAdaptersInfo(adapter
, &buflen
) == NO_ERROR
) {
377 for (i
= 0; i
< ADDRESS_BYTES_NEEDED
; i
++) {
378 address
[i
] = adapter
->Address
[i
];
381 /* We can't get a hardware address, just use random numbers.
382 Set the multicast bit to prevent conflicts with real cards. */
384 for (i
= 0; i
< ADDRESS_BYTES_NEEDED
; i
++) {
385 address
[i
] = rand() & 0xff;
389 status
= RPC_S_UUID_LOCAL_ONLY
;
392 HeapFree(GetProcessHeap(), 0, adapter
);
396 /*************************************************************************
397 * UuidCreate [RPCRT4.@]
399 * Creates a 128bit UUID.
403 * RPC_S_OK if successful.
404 * RPC_S_UUID_LOCAL_ONLY if UUID is only locally unique.
406 * FIXME: No compensation for changes across reloading
407 * this dll or across reboots (e.g. clock going
408 * backwards and swapped network cards). The RFC
409 * suggests using NVRAM for storing persistent
412 RPC_STATUS WINAPI
UuidCreate(UUID
*Uuid
)
414 static int initialised
, count
;
417 static ULONGLONG timelast
;
418 static WORD sequence
;
421 static BYTE address
[MAX_ADAPTER_ADDRESS_LENGTH
];
423 EnterCriticalSection(&uuid_cs
);
426 RPC_UuidGetSystemTime(&timelast
);
427 count
= TICKS_PER_CLOCK_TICK
;
429 sequence
= ((rand() & 0xff) << 8) + (rand() & 0xff);
432 status
= RPC_UuidGetNodeAddress(address
);
436 /* Generate time element of the UUID. Account for going faster
437 than our clock as well as the clock going backwards. */
439 RPC_UuidGetSystemTime(&time
);
440 if (time
> timelast
) {
444 if (time
< timelast
) {
445 sequence
= (sequence
+ 1) & 0x1fff;
449 if (count
< TICKS_PER_CLOCK_TICK
) {
458 /* Pack the information into the UUID structure. */
460 Uuid
->Data1
= (unsigned long)(time
& 0xffffffff);
461 Uuid
->Data2
= (unsigned short)((time
>> 32) & 0xffff);
462 Uuid
->Data3
= (unsigned short)((time
>> 48) & 0x0fff);
464 /* This is a version 1 UUID */
465 Uuid
->Data3
|= (1 << 12);
467 Uuid
->Data4
[0] = sequence
& 0xff;
468 Uuid
->Data4
[1] = (sequence
& 0x3f00) >> 8;
469 Uuid
->Data4
[1] |= 0x80;
471 Uuid
->Data4
[2] = address
[0];
472 Uuid
->Data4
[3] = address
[1];
473 Uuid
->Data4
[4] = address
[2];
474 Uuid
->Data4
[5] = address
[3];
475 Uuid
->Data4
[6] = address
[4];
476 Uuid
->Data4
[7] = address
[5];
478 LeaveCriticalSection(&uuid_cs
);
480 TRACE("%s\n", debugstr_guid(Uuid
));
485 /*************************************************************************
486 * UuidCreateSequential [RPCRT4.@]
488 * Creates a 128bit UUID.
492 * RPC_S_OK if successful.
493 * RPC_S_UUID_LOCAL_ONLY if UUID is only locally unique.
496 RPC_STATUS WINAPI
UuidCreateSequential(UUID
*Uuid
)
498 return UuidCreate(Uuid
);
502 /*************************************************************************
503 * UuidHash [RPCRT4.@]
505 * Generates a hash value for a given UUID
507 * Code based on FreeDCE implementation
510 unsigned short WINAPI
UuidHash(UUID
*uuid
, RPC_STATUS
*Status
)
512 BYTE
*data
= (BYTE
*)uuid
;
513 short c0
= 0, c1
= 0, x
, y
;
516 if (!uuid
) data
= (BYTE
*)(uuid
= &uuid_nil
);
518 TRACE("(%s)\n", debugstr_guid(uuid
));
520 for (i
=0; i
<sizeof(UUID
); i
++) {
535 /*************************************************************************
536 * UuidToStringA [RPCRT4.@]
538 * Converts a UUID to a string.
540 * UUID format is 8 hex digits, followed by a hyphen then three groups of
541 * 4 hex digits each followed by a hyphen and then 12 hex digits
545 * S_OK if successful.
546 * S_OUT_OF_MEMORY if unsuccessful.
548 RPC_STATUS WINAPI
UuidToStringA(UUID
*Uuid
, RPC_CSTR
* StringUuid
)
550 *StringUuid
= HeapAlloc( GetProcessHeap(), 0, sizeof(char) * 37);
553 return RPC_S_OUT_OF_MEMORY
;
555 if (!Uuid
) Uuid
= &uuid_nil
;
557 sprintf( (char*)*StringUuid
, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
558 Uuid
->Data1
, Uuid
->Data2
, Uuid
->Data3
,
559 Uuid
->Data4
[0], Uuid
->Data4
[1], Uuid
->Data4
[2],
560 Uuid
->Data4
[3], Uuid
->Data4
[4], Uuid
->Data4
[5],
561 Uuid
->Data4
[6], Uuid
->Data4
[7] );
566 /*************************************************************************
567 * UuidToStringW [RPCRT4.@]
569 * Converts a UUID to a string.
571 * S_OK if successful.
572 * S_OUT_OF_MEMORY if unsuccessful.
574 RPC_STATUS WINAPI
UuidToStringW(UUID
*Uuid
, RPC_WSTR
* StringUuid
)
578 if (!Uuid
) Uuid
= &uuid_nil
;
580 sprintf(buf
, "%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x",
581 Uuid
->Data1
, Uuid
->Data2
, Uuid
->Data3
,
582 Uuid
->Data4
[0], Uuid
->Data4
[1], Uuid
->Data4
[2],
583 Uuid
->Data4
[3], Uuid
->Data4
[4], Uuid
->Data4
[5],
584 Uuid
->Data4
[6], Uuid
->Data4
[7] );
586 *StringUuid
= RPCRT4_strdupAtoW(buf
);
589 return RPC_S_OUT_OF_MEMORY
;
594 static const BYTE hex2bin
[] =
596 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x00 */
597 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x10 */
598 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x20 */
599 0,1,2,3,4,5,6,7,8,9,0,0,0,0,0,0, /* 0x30 */
600 0,10,11,12,13,14,15,0,0,0,0,0,0,0,0,0, /* 0x40 */
601 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0x50 */
602 0,10,11,12,13,14,15 /* 0x60 */
605 /***********************************************************************
606 * UuidFromStringA (RPCRT4.@)
608 RPC_STATUS WINAPI
UuidFromStringA(RPC_CSTR s
, UUID
*uuid
)
612 if (!s
) return UuidCreateNil( uuid
);
614 if (strlen((char*)s
) != 36) return RPC_S_INVALID_STRING_UUID
;
616 if ((s
[8]!='-') || (s
[13]!='-') || (s
[18]!='-') || (s
[23]!='-'))
617 return RPC_S_INVALID_STRING_UUID
;
621 if ((i
== 8)||(i
== 13)||(i
== 18)||(i
== 23)) continue;
622 if (s
[i
] > 'f' || (!hex2bin
[s
[i
]] && s
[i
] != '0')) return RPC_S_INVALID_STRING_UUID
;
625 /* in form XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX */
627 uuid
->Data1
= (hex2bin
[s
[0]] << 28 | hex2bin
[s
[1]] << 24 | hex2bin
[s
[2]] << 20 | hex2bin
[s
[3]] << 16 |
628 hex2bin
[s
[4]] << 12 | hex2bin
[s
[5]] << 8 | hex2bin
[s
[6]] << 4 | hex2bin
[s
[7]]);
629 uuid
->Data2
= hex2bin
[s
[9]] << 12 | hex2bin
[s
[10]] << 8 | hex2bin
[s
[11]] << 4 | hex2bin
[s
[12]];
630 uuid
->Data3
= hex2bin
[s
[14]] << 12 | hex2bin
[s
[15]] << 8 | hex2bin
[s
[16]] << 4 | hex2bin
[s
[17]];
632 /* these are just sequential bytes */
633 uuid
->Data4
[0] = hex2bin
[s
[19]] << 4 | hex2bin
[s
[20]];
634 uuid
->Data4
[1] = hex2bin
[s
[21]] << 4 | hex2bin
[s
[22]];
635 uuid
->Data4
[2] = hex2bin
[s
[24]] << 4 | hex2bin
[s
[25]];
636 uuid
->Data4
[3] = hex2bin
[s
[26]] << 4 | hex2bin
[s
[27]];
637 uuid
->Data4
[4] = hex2bin
[s
[28]] << 4 | hex2bin
[s
[29]];
638 uuid
->Data4
[5] = hex2bin
[s
[30]] << 4 | hex2bin
[s
[31]];
639 uuid
->Data4
[6] = hex2bin
[s
[32]] << 4 | hex2bin
[s
[33]];
640 uuid
->Data4
[7] = hex2bin
[s
[34]] << 4 | hex2bin
[s
[35]];
645 /***********************************************************************
646 * UuidFromStringW (RPCRT4.@)
648 RPC_STATUS WINAPI
UuidFromStringW(RPC_WSTR s
, UUID
*uuid
)
652 if (!s
) return UuidCreateNil( uuid
);
654 if (strlenW(s
) != 36) return RPC_S_INVALID_STRING_UUID
;
656 if ((s
[8]!='-') || (s
[13]!='-') || (s
[18]!='-') || (s
[23]!='-'))
657 return RPC_S_INVALID_STRING_UUID
;
661 if ((i
== 8)||(i
== 13)||(i
== 18)||(i
== 23)) continue;
662 if (s
[i
] > 'f' || (!hex2bin
[s
[i
]] && s
[i
] != '0')) return RPC_S_INVALID_STRING_UUID
;
665 /* in form XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX */
667 uuid
->Data1
= (hex2bin
[s
[0]] << 28 | hex2bin
[s
[1]] << 24 | hex2bin
[s
[2]] << 20 | hex2bin
[s
[3]] << 16 |
668 hex2bin
[s
[4]] << 12 | hex2bin
[s
[5]] << 8 | hex2bin
[s
[6]] << 4 | hex2bin
[s
[7]]);
669 uuid
->Data2
= hex2bin
[s
[9]] << 12 | hex2bin
[s
[10]] << 8 | hex2bin
[s
[11]] << 4 | hex2bin
[s
[12]];
670 uuid
->Data3
= hex2bin
[s
[14]] << 12 | hex2bin
[s
[15]] << 8 | hex2bin
[s
[16]] << 4 | hex2bin
[s
[17]];
672 /* these are just sequential bytes */
673 uuid
->Data4
[0] = hex2bin
[s
[19]] << 4 | hex2bin
[s
[20]];
674 uuid
->Data4
[1] = hex2bin
[s
[21]] << 4 | hex2bin
[s
[22]];
675 uuid
->Data4
[2] = hex2bin
[s
[24]] << 4 | hex2bin
[s
[25]];
676 uuid
->Data4
[3] = hex2bin
[s
[26]] << 4 | hex2bin
[s
[27]];
677 uuid
->Data4
[4] = hex2bin
[s
[28]] << 4 | hex2bin
[s
[29]];
678 uuid
->Data4
[5] = hex2bin
[s
[30]] << 4 | hex2bin
[s
[31]];
679 uuid
->Data4
[6] = hex2bin
[s
[32]] << 4 | hex2bin
[s
[33]];
680 uuid
->Data4
[7] = hex2bin
[s
[34]] << 4 | hex2bin
[s
[35]];
684 /***********************************************************************
685 * DllRegisterServer (RPCRT4.@)
688 HRESULT WINAPI
DllRegisterServer( void )
690 FIXME( "(): stub\n" );
694 static BOOL
RPCRT4_StartRPCSS(void)
696 PROCESS_INFORMATION pi
;
701 ZeroMemory(&pi
, sizeof(PROCESS_INFORMATION
));
702 ZeroMemory(&si
, sizeof(STARTUPINFOA
));
703 si
.cb
= sizeof(STARTUPINFOA
);
705 /* apparently it's not OK to use a constant string below */
706 CopyMemory(cmd
, "rpcss", 6);
708 /* FIXME: will this do the right thing when run as a test? */
709 rslt
= CreateProcessA(
710 NULL
, /* executable */
711 cmd
, /* command line */
712 NULL
, /* process security attributes */
713 NULL
, /* primary thread security attributes */
714 FALSE
, /* inherit handles */
715 0, /* creation flags */
716 NULL
, /* use parent's environment */
717 NULL
, /* use parent's current directory */
718 &si
, /* STARTUPINFO pointer */
719 &pi
/* PROCESS_INFORMATION */
723 CloseHandle(pi
.hProcess
);
724 CloseHandle(pi
.hThread
);
730 /***********************************************************************
731 * RPCRT4_RPCSSOnDemandCall (internal)
733 * Attempts to send a message to the RPCSS process
734 * on the local machine, invoking it if necessary.
735 * For remote RPCSS calls, use.... your imagination.
738 * msg [I] pointer to the RPCSS message
739 * vardata_payload [I] pointer vardata portion of the RPCSS message
740 * reply [O] pointer to reply structure
746 BOOL
RPCRT4_RPCSSOnDemandCall(PRPCSS_NP_MESSAGE msg
, char *vardata_payload
, PRPCSS_NP_REPLY reply
)
748 HANDLE client_handle
;
752 TRACE("(msg == %p, vardata_payload == %p, reply == %p)\n", msg
, vardata_payload
, reply
);
754 client_handle
= RPCRT4_RpcssNPConnect();
756 while (INVALID_HANDLE_VALUE
== client_handle
) {
757 /* start the RPCSS process */
758 if (!RPCRT4_StartRPCSS()) {
759 ERR("Unable to start RPCSS process.\n");
762 /* wait for a connection (w/ periodic polling) */
763 for (i
= 0; i
< 60; i
++) {
765 client_handle
= RPCRT4_RpcssNPConnect();
766 if (INVALID_HANDLE_VALUE
!= client_handle
) break;
768 /* we are only willing to try twice */
772 if (INVALID_HANDLE_VALUE
== client_handle
) {
774 ERR("Unable to connect to RPCSS process!\n");
775 SetLastError(RPC_E_SERVER_DIED_DNE
);
779 /* great, we're connected. now send the message */
781 if (!RPCRT4_SendReceiveNPMsg(client_handle
, msg
, vardata_payload
, reply
)) {
782 ERR("Something is amiss: RPC_SendReceive failed.\n");
785 CloseHandle(client_handle
);
790 #define MAX_RPC_ERROR_TEXT 256
792 /******************************************************************************
793 * DceErrorInqTextW (rpcrt4.@)
796 * 1. On passing a NULL pointer the code does bomb out.
797 * 2. The size of the required buffer is not defined in the documentation.
798 * It appears to be 256.
799 * 3. The function is defined to return RPC_S_INVALID_ARG but I don't know
800 * of any value for which it does.
801 * 4. The MSDN documentation currently declares that the second argument is
802 * unsigned char *, even for the W version. I don't believe it.
804 RPC_STATUS RPC_ENTRY
DceErrorInqTextW (RPC_STATUS e
, RPC_WSTR buffer
)
807 count
= FormatMessageW (FORMAT_MESSAGE_FROM_SYSTEM
|
808 FORMAT_MESSAGE_IGNORE_INSERTS
,
809 NULL
, e
, 0, buffer
, MAX_RPC_ERROR_TEXT
, NULL
);
812 count
= FormatMessageW (FORMAT_MESSAGE_FROM_SYSTEM
|
813 FORMAT_MESSAGE_IGNORE_INSERTS
,
814 NULL
, RPC_S_NOT_RPC_ERROR
, 0, buffer
, MAX_RPC_ERROR_TEXT
, NULL
);
817 ERR ("Failed to translate error\n");
818 return RPC_S_INVALID_ARG
;
824 /******************************************************************************
825 * DceErrorInqTextA (rpcrt4.@)
827 RPC_STATUS RPC_ENTRY
DceErrorInqTextA (RPC_STATUS e
, RPC_CSTR buffer
)
830 WCHAR bufferW
[MAX_RPC_ERROR_TEXT
];
831 if ((status
= DceErrorInqTextW (e
, bufferW
)) == RPC_S_OK
)
833 if (!WideCharToMultiByte(CP_ACP
, 0, bufferW
, -1, (LPSTR
)buffer
, MAX_RPC_ERROR_TEXT
,
836 ERR ("Failed to translate error\n");
837 status
= RPC_S_INVALID_ARG
;
843 /******************************************************************************
844 * I_RpcAllocate (rpcrt4.@)
846 void * WINAPI
I_RpcAllocate(unsigned int Size
)
848 return HeapAlloc(GetProcessHeap(), 0, Size
);
851 /******************************************************************************
852 * I_RpcFree (rpcrt4.@)
854 void WINAPI
I_RpcFree(void *Object
)
856 HeapFree(GetProcessHeap(), 0, Object
);
859 /******************************************************************************
860 * I_RpcMapWin32Status (rpcrt4.@)
862 LONG WINAPI
I_RpcMapWin32Status(RPC_STATUS status
)
864 FIXME("(%ld): stub\n", status
);
868 /******************************************************************************
869 * RpcErrorStartEnumeration (rpcrt4.@)
871 RPC_STATUS RPC_ENTRY
RpcErrorStartEnumeration(void** EnumHandle
)
873 FIXME("(%p): stub\n", EnumHandle
);
874 return RPC_S_ENTRY_NOT_FOUND
;
877 /******************************************************************************
878 * RpcMgmtSetCancelTimeout (rpcrt4.@)
880 RPC_STATUS RPC_ENTRY
RpcMgmtSetCancelTimeout(LONG Timeout
)
882 FIXME("(%d): stub\n", Timeout
);
886 void RPCRT4_SetThreadCurrentConnection(RpcConnection
*Connection
)
888 struct threaddata
*tdata
= NtCurrentTeb()->ReservedForNtRpc
;
891 tdata
= HeapAlloc(GetProcessHeap(), 0, sizeof(*tdata
));
894 InitializeCriticalSection(&tdata
->cs
);
895 tdata
->thread_id
= GetCurrentThreadId();
896 tdata
->connection
= Connection
;
898 EnterCriticalSection(&threaddata_cs
);
899 list_add_tail(&threaddata_list
, &tdata
->entry
);
900 LeaveCriticalSection(&threaddata_cs
);
902 NtCurrentTeb()->ReservedForNtRpc
= tdata
;
906 EnterCriticalSection(&tdata
->cs
);
907 tdata
->connection
= Connection
;
908 LeaveCriticalSection(&tdata
->cs
);
911 /******************************************************************************
912 * RpcCancelThread (rpcrt4.@)
914 RPC_STATUS RPC_ENTRY
RpcCancelThread(void* ThreadHandle
)
917 struct threaddata
*tdata
;
919 TRACE("(%p)\n", ThreadHandle
);
921 target_tid
= GetThreadId(ThreadHandle
);
923 return RPC_S_INVALID_ARG
;
925 EnterCriticalSection(&threaddata_cs
);
926 LIST_FOR_EACH_ENTRY(tdata
, &threaddata_list
, struct threaddata
, entry
)
927 if (tdata
->thread_id
== target_tid
)
929 rpcrt4_conn_cancel_call(tdata
->connection
);
932 LeaveCriticalSection(&threaddata_cs
);