4 * Copyright 2001 Ove Kåven, TransGaming Technologies
5 * Copyright 2004 Filip Navara
6 * Copyright 2006-2008 Robert Shearman (for CodeWeavers)
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/port.h"
39 #include "wine/debug.h"
40 #include "wine/exception.h"
42 #include "rpc_server.h"
43 #include "rpc_assoc.h"
44 #include "rpc_message.h"
46 #include "ncastatus.h"
48 WINE_DEFAULT_DEBUG_CHANNEL(rpc
);
50 typedef struct _RpcPacket
52 struct _RpcConnection
* conn
;
57 typedef struct _RpcObjTypeMap
59 /* FIXME: a hash table would be better. */
60 struct _RpcObjTypeMap
*next
;
65 static RpcObjTypeMap
*RpcObjTypeMaps
;
67 /* list of type RpcServerProtseq */
68 static struct list protseqs
= LIST_INIT(protseqs
);
69 static struct list server_interfaces
= LIST_INIT(server_interfaces
);
71 static CRITICAL_SECTION server_cs
;
72 static CRITICAL_SECTION_DEBUG server_cs_debug
=
75 { &server_cs_debug
.ProcessLocksList
, &server_cs_debug
.ProcessLocksList
},
76 0, 0, { (DWORD_PTR
)(__FILE__
": server_cs") }
78 static CRITICAL_SECTION server_cs
= { &server_cs_debug
, -1, 0, 0, 0, 0 };
80 static CRITICAL_SECTION listen_cs
;
81 static CRITICAL_SECTION_DEBUG listen_cs_debug
=
84 { &listen_cs_debug
.ProcessLocksList
, &listen_cs_debug
.ProcessLocksList
},
85 0, 0, { (DWORD_PTR
)(__FILE__
": listen_cs") }
87 static CRITICAL_SECTION listen_cs
= { &listen_cs_debug
, -1, 0, 0, 0, 0 };
89 /* whether the server is currently listening */
90 static BOOL std_listen
;
91 /* number of manual listeners (calls to RpcServerListen) */
92 static LONG manual_listen_count
;
93 /* total listeners including auto listeners */
94 static LONG listen_count
;
98 static inline RpcObjTypeMap
*LookupObjTypeMap(UUID
*ObjUuid
)
100 RpcObjTypeMap
*rslt
= RpcObjTypeMaps
;
104 if (! UuidCompare(ObjUuid
, &rslt
->Object
, &dummy
)) break;
111 static inline UUID
*LookupObjType(UUID
*ObjUuid
)
113 RpcObjTypeMap
*map
= LookupObjTypeMap(ObjUuid
);
120 static RpcServerInterface
* RPCRT4_find_interface(UUID
* object
,
121 const RPC_SYNTAX_IDENTIFIER
* if_id
,
124 UUID
* MgrType
= NULL
;
125 RpcServerInterface
* cif
;
129 MgrType
= LookupObjType(object
);
130 EnterCriticalSection(&server_cs
);
131 LIST_FOR_EACH_ENTRY(cif
, &server_interfaces
, RpcServerInterface
, entry
) {
132 if (!memcmp(if_id
, &cif
->If
->InterfaceId
, sizeof(RPC_SYNTAX_IDENTIFIER
)) &&
133 (check_object
== FALSE
|| UuidEqual(MgrType
, &cif
->MgrTypeUuid
, &status
)) &&
135 InterlockedIncrement(&cif
->CurrentCalls
);
139 LeaveCriticalSection(&server_cs
);
140 if (&cif
->entry
== &server_interfaces
) cif
= NULL
;
141 TRACE("returning %p for object %s, if_id { %d.%d %s }\n", cif
,
142 debugstr_guid(object
), if_id
->SyntaxVersion
.MajorVersion
,
143 if_id
->SyntaxVersion
.MinorVersion
, debugstr_guid(&if_id
->SyntaxGUID
));
147 static void RPCRT4_release_server_interface(RpcServerInterface
*sif
)
149 if (!InterlockedDecrement(&sif
->CurrentCalls
) &&
151 /* sif must have been removed from server_interfaces before
152 * CallsCompletedEvent is set */
153 if (sif
->CallsCompletedEvent
)
154 SetEvent(sif
->CallsCompletedEvent
);
155 HeapFree(GetProcessHeap(), 0, sif
);
159 static RPC_STATUS
process_bind_packet(RpcConnection
*conn
, RpcPktBindHdr
*hdr
, RPC_MESSAGE
*msg
)
162 RpcServerInterface
* sif
;
163 RpcPktHdr
*response
= NULL
;
165 /* FIXME: do more checks! */
166 if (hdr
->max_tsize
< RPC_MIN_PACKET_SIZE
||
167 !UuidIsNil(&conn
->ActiveInterface
.SyntaxGUID
, &status
) ||
168 conn
->server_binding
) {
169 TRACE("packet size less than min size, or active interface syntax guid non-null\n");
172 /* create temporary binding */
173 if (RPCRT4_MakeBinding(&conn
->server_binding
, conn
) == RPC_S_OK
&&
174 RpcServerAssoc_GetAssociation(rpcrt4_conn_get_name(conn
),
175 conn
->NetworkAddr
, conn
->Endpoint
,
176 conn
->NetworkOptions
,
178 &conn
->server_binding
->Assoc
) == RPC_S_OK
)
179 sif
= RPCRT4_find_interface(NULL
, &hdr
->abstract
, FALSE
);
184 TRACE("rejecting bind request on connection %p\n", conn
);
185 /* Report failure to client. */
186 response
= RPCRT4_BuildBindNackHeader(NDR_LOCAL_DATA_REPRESENTATION
,
187 RPC_VER_MAJOR
, RPC_VER_MINOR
);
189 TRACE("accepting bind request on connection %p for %s\n", conn
,
190 debugstr_guid(&hdr
->abstract
.SyntaxGUID
));
193 response
= RPCRT4_BuildBindAckHeader(NDR_LOCAL_DATA_REPRESENTATION
,
196 conn
->server_binding
->Assoc
->assoc_group_id
,
198 RESULT_ACCEPT
, REASON_NONE
,
199 &sif
->If
->TransferSyntax
);
201 /* save the interface for later use */
202 conn
->ActiveInterface
= hdr
->abstract
;
203 conn
->MaxTransmissionSize
= hdr
->max_tsize
;
205 RPCRT4_release_server_interface(sif
);
209 status
= RPCRT4_Send(conn
, response
, NULL
, 0);
211 status
= ERROR_OUTOFMEMORY
;
212 RPCRT4_FreeHeader(response
);
217 static RPC_STATUS
process_request_packet(RpcConnection
*conn
, RpcPktRequestHdr
*hdr
, RPC_MESSAGE
*msg
)
220 RpcPktHdr
*response
= NULL
;
221 RpcServerInterface
* sif
;
222 RPC_DISPATCH_FUNCTION func
;
225 NDR_SCONTEXT context_handle
;
226 void *buf
= msg
->Buffer
;
228 /* fail if the connection isn't bound with an interface */
229 if (UuidIsNil(&conn
->ActiveInterface
.SyntaxGUID
, &status
)) {
230 /* FIXME: should send BindNack instead */
231 response
= RPCRT4_BuildFaultHeader(NDR_LOCAL_DATA_REPRESENTATION
,
234 RPCRT4_Send(conn
, response
, NULL
, 0);
235 RPCRT4_FreeHeader(response
);
239 if (hdr
->common
.flags
& RPC_FLG_OBJECT_UUID
) {
240 object_uuid
= (UUID
*)(hdr
+ 1);
245 sif
= RPCRT4_find_interface(object_uuid
, &conn
->ActiveInterface
, TRUE
);
247 WARN("interface %s no longer registered, returning fault packet\n", debugstr_guid(&conn
->ActiveInterface
.SyntaxGUID
));
248 response
= RPCRT4_BuildFaultHeader(NDR_LOCAL_DATA_REPRESENTATION
,
251 RPCRT4_Send(conn
, response
, NULL
, 0);
252 RPCRT4_FreeHeader(response
);
255 msg
->RpcInterfaceInformation
= sif
->If
;
256 /* copy the endpoint vector from sif to msg so that midl-generated code will use it */
257 msg
->ManagerEpv
= sif
->MgrEpv
;
258 if (object_uuid
!= NULL
) {
259 RPCRT4_SetBindingObject(msg
->Handle
, object_uuid
);
262 /* find dispatch function */
263 msg
->ProcNum
= hdr
->opnum
;
264 if (sif
->Flags
& RPC_IF_OLE
) {
265 /* native ole32 always gives us a dispatch table with a single entry
266 * (I assume that's a wrapper for IRpcStubBuffer::Invoke) */
267 func
= *sif
->If
->DispatchTable
->DispatchTable
;
269 if (msg
->ProcNum
>= sif
->If
->DispatchTable
->DispatchTableCount
) {
270 WARN("invalid procnum (%d/%d)\n", msg
->ProcNum
, sif
->If
->DispatchTable
->DispatchTableCount
);
271 response
= RPCRT4_BuildFaultHeader(NDR_LOCAL_DATA_REPRESENTATION
,
274 RPCRT4_Send(conn
, response
, NULL
, 0);
275 RPCRT4_FreeHeader(response
);
277 func
= sif
->If
->DispatchTable
->DispatchTable
[msg
->ProcNum
];
280 /* put in the drep. FIXME: is this more universally applicable?
281 perhaps we should move this outward... */
282 msg
->DataRepresentation
=
283 MAKELONG( MAKEWORD(hdr
->common
.drep
[0], hdr
->common
.drep
[1]),
284 MAKEWORD(hdr
->common
.drep
[2], hdr
->common
.drep
[3]));
289 RPCRT4_SetThreadCurrentCallHandle(msg
->Handle
);
293 WARN("exception caught with code 0x%08x = %d\n", GetExceptionCode(), GetExceptionCode());
295 if (GetExceptionCode() == STATUS_ACCESS_VIOLATION
)
296 status
= ERROR_NOACCESS
;
298 status
= GetExceptionCode();
299 response
= RPCRT4_BuildFaultHeader(msg
->DataRepresentation
,
300 RPC2NCA_STATUS(status
));
302 RPCRT4_SetThreadCurrentCallHandle(NULL
);
304 /* release any unmarshalled context handles */
305 while ((context_handle
= RPCRT4_PopThreadContextHandle()) != NULL
)
306 RpcServerAssoc_ReleaseContextHandle(conn
->server_binding
->Assoc
, context_handle
, TRUE
);
309 response
= RPCRT4_BuildResponseHeader(msg
->DataRepresentation
,
312 /* send response packet */
314 status
= RPCRT4_Send(conn
, response
, exception
? NULL
: msg
->Buffer
,
315 exception
? 0 : msg
->BufferLength
);
316 RPCRT4_FreeHeader(response
);
318 ERR("out of memory\n");
320 msg
->RpcInterfaceInformation
= NULL
;
321 RPCRT4_release_server_interface(sif
);
323 if (msg
->Buffer
== buf
) buf
= NULL
;
324 TRACE("freeing Buffer=%p\n", buf
);
330 static void RPCRT4_process_packet(RpcConnection
* conn
, RpcPktHdr
* hdr
, RPC_MESSAGE
* msg
)
334 msg
->Handle
= (RPC_BINDING_HANDLE
)conn
->server_binding
;
336 switch (hdr
->common
.ptype
) {
338 TRACE("got bind packet\n");
340 status
= process_bind_packet(conn
, &hdr
->bind
, msg
);
344 TRACE("got request packet\n");
346 status
= process_request_packet(conn
, &hdr
->request
, msg
);
350 FIXME("unhandled packet type %u\n", hdr
->common
.ptype
);
355 I_RpcFree(msg
->Buffer
);
356 RPCRT4_FreeHeader(hdr
);
357 HeapFree(GetProcessHeap(), 0, msg
);
360 static DWORD CALLBACK
RPCRT4_worker_thread(LPVOID the_arg
)
362 RpcPacket
*pkt
= the_arg
;
363 RPCRT4_process_packet(pkt
->conn
, pkt
->hdr
, pkt
->msg
);
364 HeapFree(GetProcessHeap(), 0, pkt
);
368 static DWORD CALLBACK
RPCRT4_io_thread(LPVOID the_arg
)
370 RpcConnection
* conn
= the_arg
;
376 TRACE("(%p)\n", conn
);
379 msg
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(RPC_MESSAGE
));
381 status
= RPCRT4_Receive(conn
, &hdr
, msg
);
382 if (status
!= RPC_S_OK
) {
383 WARN("receive failed with error %x\n", status
);
384 HeapFree(GetProcessHeap(), 0, msg
);
388 packet
= HeapAlloc(GetProcessHeap(), 0, sizeof(RpcPacket
));
390 I_RpcFree(msg
->Buffer
);
391 RPCRT4_FreeHeader(hdr
);
392 HeapFree(GetProcessHeap(), 0, msg
);
398 if (!QueueUserWorkItem(RPCRT4_worker_thread
, packet
, WT_EXECUTELONGFUNCTION
)) {
399 ERR("couldn't queue work item for worker thread, error was %d\n", GetLastError());
400 I_RpcFree(msg
->Buffer
);
401 RPCRT4_FreeHeader(hdr
);
402 HeapFree(GetProcessHeap(), 0, msg
);
403 HeapFree(GetProcessHeap(), 0, packet
);
409 RPCRT4_DestroyConnection(conn
);
413 void RPCRT4_new_client(RpcConnection
* conn
)
415 HANDLE thread
= CreateThread(NULL
, 0, RPCRT4_io_thread
, conn
, 0, NULL
);
417 DWORD err
= GetLastError();
418 ERR("failed to create thread, error=%08x\n", err
);
419 RPCRT4_DestroyConnection(conn
);
421 /* we could set conn->thread, but then we'd have to make the io_thread wait
422 * for that, otherwise the thread might finish, destroy the connection, and
423 * free the memory we'd write to before we did, causing crashes and stuff -
424 * so let's implement that later, when we really need conn->thread */
426 CloseHandle( thread
);
429 static DWORD CALLBACK
RPCRT4_server_thread(LPVOID the_arg
)
434 RpcServerProtseq
* cps
= the_arg
;
436 BOOL set_ready_event
= FALSE
;
438 TRACE("(the_arg == ^%p)\n", the_arg
);
441 objs
= cps
->ops
->get_wait_array(cps
, objs
, &count
);
445 /* signal to function that changed state that we are now sync'ed */
446 SetEvent(cps
->server_ready_event
);
447 set_ready_event
= FALSE
;
451 res
= cps
->ops
->wait_for_new_connection(cps
, count
, objs
);
453 if (res
== -1 || (res
== 0 && !std_listen
))
456 cps
->ops
->free_wait_array(cps
, objs
);
457 EnterCriticalSection(&cps
->cs
);
458 for (conn
= cps
->conn
; conn
; conn
= conn
->Next
)
459 RPCRT4_CloseConnection(conn
);
460 LeaveCriticalSection(&cps
->cs
);
462 if (res
== 0 && !std_listen
)
463 SetEvent(cps
->server_ready_event
);
467 set_ready_event
= TRUE
;
472 /* tells the server thread that the state has changed and waits for it to
473 * make the changes */
474 static void RPCRT4_sync_with_server_thread(RpcServerProtseq
*ps
)
476 /* make sure we are the only thread sync'ing the server state, otherwise
477 * there is a race with the server thread setting an older state and setting
478 * the server_ready_event when the new state hasn't yet been applied */
479 WaitForSingleObject(ps
->mgr_mutex
, INFINITE
);
481 ps
->ops
->signal_state_changed(ps
);
483 /* wait for server thread to make the requested changes before returning */
484 WaitForSingleObject(ps
->server_ready_event
, INFINITE
);
486 ReleaseMutex(ps
->mgr_mutex
);
489 static RPC_STATUS
RPCRT4_start_listen_protseq(RpcServerProtseq
*ps
, BOOL auto_listen
)
491 RPC_STATUS status
= RPC_S_OK
;
492 HANDLE server_thread
;
494 EnterCriticalSection(&listen_cs
);
495 if (ps
->is_listening
) goto done
;
497 if (!ps
->mgr_mutex
) ps
->mgr_mutex
= CreateMutexW(NULL
, FALSE
, NULL
);
498 if (!ps
->server_ready_event
) ps
->server_ready_event
= CreateEventW(NULL
, FALSE
, FALSE
, NULL
);
499 server_thread
= CreateThread(NULL
, 0, RPCRT4_server_thread
, ps
, 0, NULL
);
502 status
= RPC_S_OUT_OF_RESOURCES
;
505 ps
->is_listening
= TRUE
;
506 CloseHandle(server_thread
);
509 LeaveCriticalSection(&listen_cs
);
513 static RPC_STATUS
RPCRT4_start_listen(BOOL auto_listen
)
515 RPC_STATUS status
= RPC_S_ALREADY_LISTENING
;
516 RpcServerProtseq
*cps
;
520 EnterCriticalSection(&listen_cs
);
521 if (auto_listen
|| (manual_listen_count
++ == 0))
524 if (++listen_count
== 1)
527 LeaveCriticalSection(&listen_cs
);
531 EnterCriticalSection(&server_cs
);
532 LIST_FOR_EACH_ENTRY(cps
, &protseqs
, RpcServerProtseq
, entry
)
534 status
= RPCRT4_start_listen_protseq(cps
, TRUE
);
535 if (status
!= RPC_S_OK
)
538 /* make sure server is actually listening on the interface before
540 RPCRT4_sync_with_server_thread(cps
);
542 LeaveCriticalSection(&server_cs
);
548 static void RPCRT4_stop_listen(BOOL auto_listen
)
550 EnterCriticalSection(&listen_cs
);
551 if (auto_listen
|| (--manual_listen_count
== 0))
553 if (listen_count
!= 0 && --listen_count
== 0) {
554 RpcServerProtseq
*cps
;
557 LeaveCriticalSection(&listen_cs
);
559 LIST_FOR_EACH_ENTRY(cps
, &protseqs
, RpcServerProtseq
, entry
)
560 RPCRT4_sync_with_server_thread(cps
);
564 assert(listen_count
>= 0);
566 LeaveCriticalSection(&listen_cs
);
569 static RPC_STATUS
RPCRT4_use_protseq(RpcServerProtseq
* ps
, LPSTR endpoint
)
573 status
= ps
->ops
->open_endpoint(ps
, endpoint
);
574 if (status
!= RPC_S_OK
)
579 status
= RPCRT4_start_listen_protseq(ps
, FALSE
);
580 if (status
== RPC_S_OK
)
581 RPCRT4_sync_with_server_thread(ps
);
587 /***********************************************************************
588 * RpcServerInqBindings (RPCRT4.@)
590 RPC_STATUS WINAPI
RpcServerInqBindings( RPC_BINDING_VECTOR
** BindingVector
)
594 RpcServerProtseq
* ps
;
598 TRACE("(*BindingVector == ^%p)\n", *BindingVector
);
600 ERR("(BindingVector == NULL!!?)\n");
602 EnterCriticalSection(&server_cs
);
603 /* count connections */
605 LIST_FOR_EACH_ENTRY(ps
, &protseqs
, RpcServerProtseq
, entry
) {
606 EnterCriticalSection(&ps
->cs
);
607 for (conn
= ps
->conn
; conn
; conn
= conn
->Next
)
609 LeaveCriticalSection(&ps
->cs
);
612 /* export bindings */
613 *BindingVector
= HeapAlloc(GetProcessHeap(), 0,
614 sizeof(RPC_BINDING_VECTOR
) +
615 sizeof(RPC_BINDING_HANDLE
)*(count
-1));
616 (*BindingVector
)->Count
= count
;
618 LIST_FOR_EACH_ENTRY(ps
, &protseqs
, RpcServerProtseq
, entry
) {
619 EnterCriticalSection(&ps
->cs
);
620 for (conn
= ps
->conn
; conn
; conn
= conn
->Next
) {
621 RPCRT4_MakeBinding((RpcBinding
**)&(*BindingVector
)->BindingH
[count
],
625 LeaveCriticalSection(&ps
->cs
);
629 *BindingVector
= NULL
;
630 status
= RPC_S_NO_BINDINGS
;
632 LeaveCriticalSection(&server_cs
);
636 /***********************************************************************
637 * RpcServerUseProtseqEpA (RPCRT4.@)
639 RPC_STATUS WINAPI
RpcServerUseProtseqEpA( RPC_CSTR Protseq
, UINT MaxCalls
, RPC_CSTR Endpoint
, LPVOID SecurityDescriptor
)
643 TRACE( "(%s,%u,%s,%p)\n", Protseq
, MaxCalls
, Endpoint
, SecurityDescriptor
);
645 /* This should provide the default behaviour */
646 policy
.Length
= sizeof( policy
);
647 policy
.EndpointFlags
= 0;
650 return RpcServerUseProtseqEpExA( Protseq
, MaxCalls
, Endpoint
, SecurityDescriptor
, &policy
);
653 /***********************************************************************
654 * RpcServerUseProtseqEpW (RPCRT4.@)
656 RPC_STATUS WINAPI
RpcServerUseProtseqEpW( RPC_WSTR Protseq
, UINT MaxCalls
, RPC_WSTR Endpoint
, LPVOID SecurityDescriptor
)
660 TRACE( "(%s,%u,%s,%p)\n", debugstr_w( Protseq
), MaxCalls
, debugstr_w( Endpoint
), SecurityDescriptor
);
662 /* This should provide the default behaviour */
663 policy
.Length
= sizeof( policy
);
664 policy
.EndpointFlags
= 0;
667 return RpcServerUseProtseqEpExW( Protseq
, MaxCalls
, Endpoint
, SecurityDescriptor
, &policy
);
670 /***********************************************************************
671 * alloc_serverprotoseq (internal)
673 * Must be called with server_cs held.
675 static RPC_STATUS
alloc_serverprotoseq(UINT MaxCalls
, char *Protseq
, RpcServerProtseq
**ps
)
677 const struct protseq_ops
*ops
= rpcrt4_get_protseq_ops(Protseq
);
681 FIXME("protseq %s not supported\n", debugstr_a(Protseq
));
682 return RPC_S_PROTSEQ_NOT_SUPPORTED
;
687 return RPC_S_OUT_OF_RESOURCES
;
688 (*ps
)->MaxCalls
= MaxCalls
;
689 (*ps
)->Protseq
= Protseq
;
693 InitializeCriticalSection(&(*ps
)->cs
);
694 (*ps
)->is_listening
= FALSE
;
695 (*ps
)->mgr_mutex
= NULL
;
696 (*ps
)->server_ready_event
= NULL
;
698 list_add_head(&protseqs
, &(*ps
)->entry
);
700 TRACE("new protseq %p created for %s\n", *ps
, Protseq
);
705 /* must be called with server_cs held */
706 static void destroy_serverprotoseq(RpcServerProtseq
*ps
)
708 RPCRT4_strfree(ps
->Protseq
);
709 DeleteCriticalSection(&ps
->cs
);
710 CloseHandle(ps
->mgr_mutex
);
711 CloseHandle(ps
->server_ready_event
);
712 list_remove(&ps
->entry
);
713 HeapFree(GetProcessHeap(), 0, ps
);
716 /* Finds a given protseq or creates a new one if one doesn't already exist */
717 static RPC_STATUS
RPCRT4_get_or_create_serverprotseq(UINT MaxCalls
, char *Protseq
, RpcServerProtseq
**ps
)
720 RpcServerProtseq
*cps
;
722 EnterCriticalSection(&server_cs
);
724 LIST_FOR_EACH_ENTRY(cps
, &protseqs
, RpcServerProtseq
, entry
)
725 if (!strcmp(cps
->Protseq
, Protseq
))
727 TRACE("found existing protseq object for %s\n", Protseq
);
729 LeaveCriticalSection(&server_cs
);
733 status
= alloc_serverprotoseq(MaxCalls
, Protseq
, ps
);
735 LeaveCriticalSection(&server_cs
);
740 /***********************************************************************
741 * RpcServerUseProtseqEpExA (RPCRT4.@)
743 RPC_STATUS WINAPI
RpcServerUseProtseqEpExA( RPC_CSTR Protseq
, UINT MaxCalls
, RPC_CSTR Endpoint
, LPVOID SecurityDescriptor
,
744 PRPC_POLICY lpPolicy
)
746 char *szps
= (char*)Protseq
, *szep
= (char*)Endpoint
;
747 RpcServerProtseq
* ps
;
750 TRACE("(%s,%u,%s,%p,{%u,%u,%u})\n", debugstr_a(szps
), MaxCalls
,
751 debugstr_a(szep
), SecurityDescriptor
,
752 lpPolicy
->Length
, lpPolicy
->EndpointFlags
, lpPolicy
->NICFlags
);
754 status
= RPCRT4_get_or_create_serverprotseq(MaxCalls
, RPCRT4_strdupA(szps
), &ps
);
755 if (status
!= RPC_S_OK
)
758 return RPCRT4_use_protseq(ps
, szep
);
761 /***********************************************************************
762 * RpcServerUseProtseqEpExW (RPCRT4.@)
764 RPC_STATUS WINAPI
RpcServerUseProtseqEpExW( RPC_WSTR Protseq
, UINT MaxCalls
, RPC_WSTR Endpoint
, LPVOID SecurityDescriptor
,
765 PRPC_POLICY lpPolicy
)
767 RpcServerProtseq
* ps
;
771 TRACE("(%s,%u,%s,%p,{%u,%u,%u})\n", debugstr_w( Protseq
), MaxCalls
,
772 debugstr_w( Endpoint
), SecurityDescriptor
,
773 lpPolicy
->Length
, lpPolicy
->EndpointFlags
, lpPolicy
->NICFlags
);
775 status
= RPCRT4_get_or_create_serverprotseq(MaxCalls
, RPCRT4_strdupWtoA(Protseq
), &ps
);
776 if (status
!= RPC_S_OK
)
779 EndpointA
= RPCRT4_strdupWtoA(Endpoint
);
780 status
= RPCRT4_use_protseq(ps
, EndpointA
);
781 RPCRT4_strfree(EndpointA
);
785 /***********************************************************************
786 * RpcServerUseProtseqA (RPCRT4.@)
788 RPC_STATUS WINAPI
RpcServerUseProtseqA(RPC_CSTR Protseq
, unsigned int MaxCalls
, void *SecurityDescriptor
)
790 TRACE("(Protseq == %s, MaxCalls == %d, SecurityDescriptor == ^%p)\n", debugstr_a((char*)Protseq
), MaxCalls
, SecurityDescriptor
);
791 return RpcServerUseProtseqEpA(Protseq
, MaxCalls
, NULL
, SecurityDescriptor
);
794 /***********************************************************************
795 * RpcServerUseProtseqW (RPCRT4.@)
797 RPC_STATUS WINAPI
RpcServerUseProtseqW(RPC_WSTR Protseq
, unsigned int MaxCalls
, void *SecurityDescriptor
)
799 TRACE("Protseq == %s, MaxCalls == %d, SecurityDescriptor == ^%p)\n", debugstr_w(Protseq
), MaxCalls
, SecurityDescriptor
);
800 return RpcServerUseProtseqEpW(Protseq
, MaxCalls
, NULL
, SecurityDescriptor
);
803 void RPCRT4_destroy_all_protseqs(void)
805 RpcServerProtseq
*cps
, *cursor2
;
807 if (listen_count
!= 0)
810 EnterCriticalSection(&server_cs
);
811 LIST_FOR_EACH_ENTRY_SAFE(cps
, cursor2
, &protseqs
, RpcServerProtseq
, entry
)
813 if (listen_count
!= 0)
814 RPCRT4_sync_with_server_thread(cps
);
815 destroy_serverprotoseq(cps
);
817 LeaveCriticalSection(&server_cs
);
820 /***********************************************************************
821 * RpcServerRegisterIf (RPCRT4.@)
823 RPC_STATUS WINAPI
RpcServerRegisterIf( RPC_IF_HANDLE IfSpec
, UUID
* MgrTypeUuid
, RPC_MGR_EPV
* MgrEpv
)
825 TRACE("(%p,%s,%p)\n", IfSpec
, debugstr_guid(MgrTypeUuid
), MgrEpv
);
826 return RpcServerRegisterIf2( IfSpec
, MgrTypeUuid
, MgrEpv
, 0, RPC_C_LISTEN_MAX_CALLS_DEFAULT
, (UINT
)-1, NULL
);
829 /***********************************************************************
830 * RpcServerRegisterIfEx (RPCRT4.@)
832 RPC_STATUS WINAPI
RpcServerRegisterIfEx( RPC_IF_HANDLE IfSpec
, UUID
* MgrTypeUuid
, RPC_MGR_EPV
* MgrEpv
,
833 UINT Flags
, UINT MaxCalls
, RPC_IF_CALLBACK_FN
* IfCallbackFn
)
835 TRACE("(%p,%s,%p,%u,%u,%p)\n", IfSpec
, debugstr_guid(MgrTypeUuid
), MgrEpv
, Flags
, MaxCalls
, IfCallbackFn
);
836 return RpcServerRegisterIf2( IfSpec
, MgrTypeUuid
, MgrEpv
, Flags
, MaxCalls
, (UINT
)-1, IfCallbackFn
);
839 /***********************************************************************
840 * RpcServerRegisterIf2 (RPCRT4.@)
842 RPC_STATUS WINAPI
RpcServerRegisterIf2( RPC_IF_HANDLE IfSpec
, UUID
* MgrTypeUuid
, RPC_MGR_EPV
* MgrEpv
,
843 UINT Flags
, UINT MaxCalls
, UINT MaxRpcSize
, RPC_IF_CALLBACK_FN
* IfCallbackFn
)
845 PRPC_SERVER_INTERFACE If
= IfSpec
;
846 RpcServerInterface
* sif
;
849 TRACE("(%p,%s,%p,%u,%u,%u,%p)\n", IfSpec
, debugstr_guid(MgrTypeUuid
), MgrEpv
, Flags
, MaxCalls
,
850 MaxRpcSize
, IfCallbackFn
);
851 TRACE(" interface id: %s %d.%d\n", debugstr_guid(&If
->InterfaceId
.SyntaxGUID
),
852 If
->InterfaceId
.SyntaxVersion
.MajorVersion
,
853 If
->InterfaceId
.SyntaxVersion
.MinorVersion
);
854 TRACE(" transfer syntax: %s %d.%d\n", debugstr_guid(&If
->TransferSyntax
.SyntaxGUID
),
855 If
->TransferSyntax
.SyntaxVersion
.MajorVersion
,
856 If
->TransferSyntax
.SyntaxVersion
.MinorVersion
);
857 TRACE(" dispatch table: %p\n", If
->DispatchTable
);
858 if (If
->DispatchTable
) {
859 TRACE(" dispatch table count: %d\n", If
->DispatchTable
->DispatchTableCount
);
860 for (i
=0; i
<If
->DispatchTable
->DispatchTableCount
; i
++) {
861 TRACE(" entry %d: %p\n", i
, If
->DispatchTable
->DispatchTable
[i
]);
863 TRACE(" reserved: %ld\n", If
->DispatchTable
->Reserved
);
865 TRACE(" protseq endpoint count: %d\n", If
->RpcProtseqEndpointCount
);
866 TRACE(" default manager epv: %p\n", If
->DefaultManagerEpv
);
867 TRACE(" interpreter info: %p\n", If
->InterpreterInfo
);
869 sif
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(RpcServerInterface
));
872 sif
->MgrTypeUuid
= *MgrTypeUuid
;
873 sif
->MgrEpv
= MgrEpv
;
875 memset(&sif
->MgrTypeUuid
, 0, sizeof(UUID
));
876 sif
->MgrEpv
= If
->DefaultManagerEpv
;
879 sif
->MaxCalls
= MaxCalls
;
880 sif
->MaxRpcSize
= MaxRpcSize
;
881 sif
->IfCallbackFn
= IfCallbackFn
;
883 EnterCriticalSection(&server_cs
);
884 list_add_head(&server_interfaces
, &sif
->entry
);
885 LeaveCriticalSection(&server_cs
);
887 if (sif
->Flags
& RPC_IF_AUTOLISTEN
)
888 RPCRT4_start_listen(TRUE
);
893 /***********************************************************************
894 * RpcServerUnregisterIf (RPCRT4.@)
896 RPC_STATUS WINAPI
RpcServerUnregisterIf( RPC_IF_HANDLE IfSpec
, UUID
* MgrTypeUuid
, UINT WaitForCallsToComplete
)
898 PRPC_SERVER_INTERFACE If
= IfSpec
;
901 BOOL completed
= TRUE
;
902 RpcServerInterface
*cif
;
905 TRACE("(IfSpec == (RPC_IF_HANDLE)^%p (%s), MgrTypeUuid == %s, WaitForCallsToComplete == %u)\n",
906 IfSpec
, debugstr_guid(&If
->InterfaceId
.SyntaxGUID
), debugstr_guid(MgrTypeUuid
), WaitForCallsToComplete
);
908 EnterCriticalSection(&server_cs
);
909 LIST_FOR_EACH_ENTRY(cif
, &server_interfaces
, RpcServerInterface
, entry
) {
910 if ((!IfSpec
|| !memcmp(&If
->InterfaceId
, &cif
->If
->InterfaceId
, sizeof(RPC_SYNTAX_IDENTIFIER
))) &&
911 UuidEqual(MgrTypeUuid
, &cif
->MgrTypeUuid
, &status
)) {
912 list_remove(&cif
->entry
);
913 TRACE("unregistering cif %p\n", cif
);
914 if (cif
->CurrentCalls
) {
917 if (WaitForCallsToComplete
)
918 cif
->CallsCompletedEvent
= event
= CreateEventW(NULL
, FALSE
, FALSE
, NULL
);
924 LeaveCriticalSection(&server_cs
);
927 ERR("not found for object %s\n", debugstr_guid(MgrTypeUuid
));
928 return RPC_S_UNKNOWN_IF
;
932 HeapFree(GetProcessHeap(), 0, cif
);
934 /* sif will be freed when the last call is completed, so be careful not to
935 * touch that memory here as that could happen before we get here */
936 WaitForSingleObject(event
, INFINITE
);
943 /***********************************************************************
944 * RpcServerUnregisterIfEx (RPCRT4.@)
946 RPC_STATUS WINAPI
RpcServerUnregisterIfEx( RPC_IF_HANDLE IfSpec
, UUID
* MgrTypeUuid
, int RundownContextHandles
)
948 FIXME("(IfSpec == (RPC_IF_HANDLE)^%p, MgrTypeUuid == %s, RundownContextHandles == %d): stub\n",
949 IfSpec
, debugstr_guid(MgrTypeUuid
), RundownContextHandles
);
954 /***********************************************************************
955 * RpcObjectSetType (RPCRT4.@)
958 * ObjUuid [I] "Object" UUID
959 * TypeUuid [I] "Type" UUID
962 * RPC_S_OK The call succeeded
963 * RPC_S_INVALID_OBJECT The provided object (nil) is not valid
964 * RPC_S_ALREADY_REGISTERED The provided object is already registered
966 * Maps "Object" UUIDs to "Type" UUID's. Passing the nil UUID as the type
967 * resets the mapping for the specified object UUID to nil (the default).
968 * The nil object is always associated with the nil type and cannot be
969 * reassigned. Servers can support multiple implementations on the same
970 * interface by registering different end-point vectors for the different
971 * types. There's no need to call this if a server only supports the nil
972 * type, as is typical.
974 RPC_STATUS WINAPI
RpcObjectSetType( UUID
* ObjUuid
, UUID
* TypeUuid
)
976 RpcObjTypeMap
*map
= RpcObjTypeMaps
, *prev
= NULL
;
979 TRACE("(ObjUUID == %s, TypeUuid == %s).\n", debugstr_guid(ObjUuid
), debugstr_guid(TypeUuid
));
980 if ((! ObjUuid
) || UuidIsNil(ObjUuid
, &dummy
)) {
981 /* nil uuid cannot be remapped */
982 return RPC_S_INVALID_OBJECT
;
985 /* find the mapping for this object if there is one ... */
987 if (! UuidCompare(ObjUuid
, &map
->Object
, &dummy
)) break;
991 if ((! TypeUuid
) || UuidIsNil(TypeUuid
, &dummy
)) {
992 /* ... and drop it from the list */
995 prev
->next
= map
->next
;
997 RpcObjTypeMaps
= map
->next
;
998 HeapFree(GetProcessHeap(), 0, map
);
1001 /* ... , fail if we found it ... */
1003 return RPC_S_ALREADY_REGISTERED
;
1004 /* ... otherwise create a new one and add it in. */
1005 map
= HeapAlloc(GetProcessHeap(), 0, sizeof(RpcObjTypeMap
));
1006 map
->Object
= *ObjUuid
;
1007 map
->Type
= *TypeUuid
;
1010 prev
->next
= map
; /* prev is the last map in the linklist */
1012 RpcObjTypeMaps
= map
;
1018 /***********************************************************************
1019 * RpcServerRegisterAuthInfoA (RPCRT4.@)
1021 RPC_STATUS WINAPI
RpcServerRegisterAuthInfoA( RPC_CSTR ServerPrincName
, ULONG AuthnSvc
, RPC_AUTH_KEY_RETRIEVAL_FN GetKeyFn
,
1024 FIXME( "(%s,%u,%p,%p): stub\n", ServerPrincName
, AuthnSvc
, GetKeyFn
, Arg
);
1026 return RPC_S_UNKNOWN_AUTHN_SERVICE
; /* We don't know any authentication services */
1029 /***********************************************************************
1030 * RpcServerRegisterAuthInfoW (RPCRT4.@)
1032 RPC_STATUS WINAPI
RpcServerRegisterAuthInfoW( RPC_WSTR ServerPrincName
, ULONG AuthnSvc
, RPC_AUTH_KEY_RETRIEVAL_FN GetKeyFn
,
1035 FIXME( "(%s,%u,%p,%p): stub\n", debugstr_w( ServerPrincName
), AuthnSvc
, GetKeyFn
, Arg
);
1037 return RPC_S_UNKNOWN_AUTHN_SERVICE
; /* We don't know any authentication services */
1040 /***********************************************************************
1041 * RpcServerListen (RPCRT4.@)
1043 RPC_STATUS WINAPI
RpcServerListen( UINT MinimumCallThreads
, UINT MaxCalls
, UINT DontWait
)
1045 RPC_STATUS status
= RPC_S_OK
;
1047 TRACE("(%u,%u,%u)\n", MinimumCallThreads
, MaxCalls
, DontWait
);
1049 if (list_empty(&protseqs
))
1050 return RPC_S_NO_PROTSEQS_REGISTERED
;
1052 status
= RPCRT4_start_listen(FALSE
);
1054 if (DontWait
|| (status
!= RPC_S_OK
)) return status
;
1056 return RpcMgmtWaitServerListen();
1059 /***********************************************************************
1060 * RpcMgmtServerWaitListen (RPCRT4.@)
1062 RPC_STATUS WINAPI
RpcMgmtWaitServerListen( void )
1066 EnterCriticalSection(&listen_cs
);
1069 LeaveCriticalSection(&listen_cs
);
1070 return RPC_S_NOT_LISTENING
;
1073 LeaveCriticalSection(&listen_cs
);
1075 FIXME("not waiting for server calls to finish\n");
1080 /***********************************************************************
1081 * RpcMgmtStopServerListening (RPCRT4.@)
1083 RPC_STATUS WINAPI
RpcMgmtStopServerListening ( RPC_BINDING_HANDLE Binding
)
1085 TRACE("(Binding == (RPC_BINDING_HANDLE)^%p)\n", Binding
);
1088 FIXME("client-side invocation not implemented.\n");
1089 return RPC_S_WRONG_KIND_OF_BINDING
;
1092 RPCRT4_stop_listen(FALSE
);
1097 /***********************************************************************
1098 * RpcMgmtEnableIdleCleanup (RPCRT4.@)
1100 RPC_STATUS WINAPI
RpcMgmtEnableIdleCleanup(void)
1102 FIXME("(): stub\n");
1106 /***********************************************************************
1107 * I_RpcServerStartListening (RPCRT4.@)
1109 RPC_STATUS WINAPI
I_RpcServerStartListening( HWND hWnd
)
1111 FIXME( "(%p): stub\n", hWnd
);
1116 /***********************************************************************
1117 * I_RpcServerStopListening (RPCRT4.@)
1119 RPC_STATUS WINAPI
I_RpcServerStopListening( void )
1121 FIXME( "(): stub\n" );
1126 /***********************************************************************
1127 * I_RpcWindowProc (RPCRT4.@)
1129 UINT WINAPI
I_RpcWindowProc( void *hWnd
, UINT Message
, UINT wParam
, ULONG lParam
)
1131 FIXME( "(%p,%08x,%08x,%08x): stub\n", hWnd
, Message
, wParam
, lParam
);
1136 /***********************************************************************
1137 * RpcMgmtInqIfIds (RPCRT4.@)
1139 RPC_STATUS WINAPI
RpcMgmtInqIfIds(RPC_BINDING_HANDLE Binding
, RPC_IF_ID_VECTOR
**IfIdVector
)
1141 FIXME("(%p,%p): stub\n", Binding
, IfIdVector
);
1142 return RPC_S_INVALID_BINDING
;
1145 /***********************************************************************
1146 * RpcMgmtInqStats (RPCRT4.@)
1148 RPC_STATUS WINAPI
RpcMgmtInqStats(RPC_BINDING_HANDLE Binding
, RPC_STATS_VECTOR
**Statistics
)
1150 RPC_STATS_VECTOR
*stats
;
1152 FIXME("(%p,%p)\n", Binding
, Statistics
);
1154 if ((stats
= HeapAlloc(GetProcessHeap(), 0, sizeof(RPC_STATS_VECTOR
))))
1157 stats
->Stats
[0] = 0;
1158 *Statistics
= stats
;
1161 return RPC_S_OUT_OF_RESOURCES
;
1164 /***********************************************************************
1165 * RpcMgmtStatsVectorFree (RPCRT4.@)
1167 RPC_STATUS WINAPI
RpcMgmtStatsVectorFree(RPC_STATS_VECTOR
**StatsVector
)
1169 FIXME("(%p)\n", StatsVector
);
1173 HeapFree(GetProcessHeap(), 0, *StatsVector
);
1174 *StatsVector
= NULL
;
1179 /***********************************************************************
1180 * RpcMgmtEpEltInqBegin (RPCRT4.@)
1182 RPC_STATUS WINAPI
RpcMgmtEpEltInqBegin(RPC_BINDING_HANDLE Binding
, ULONG InquiryType
,
1183 RPC_IF_ID
*IfId
, ULONG VersOption
, UUID
*ObjectUuid
, RPC_EP_INQ_HANDLE
* InquiryContext
)
1185 FIXME("(%p,%u,%p,%u,%p,%p): stub\n",
1186 Binding
, InquiryType
, IfId
, VersOption
, ObjectUuid
, InquiryContext
);
1187 return RPC_S_INVALID_BINDING
;
1190 /***********************************************************************
1191 * RpcMgmtIsServerListening (RPCRT4.@)
1193 RPC_STATUS WINAPI
RpcMgmtIsServerListening(RPC_BINDING_HANDLE Binding
)
1195 FIXME("(%p): stub\n", Binding
);
1196 return RPC_S_INVALID_BINDING
;
1199 /***********************************************************************
1200 * RpcMgmtSetServerStackSize (RPCRT4.@)
1202 RPC_STATUS WINAPI
RpcMgmtSetServerStackSize(ULONG ThreadStackSize
)
1204 FIXME("(0x%x): stub\n", ThreadStackSize
);
1208 /***********************************************************************
1209 * I_RpcGetCurrentCallHandle (RPCRT4.@)
1211 RPC_BINDING_HANDLE WINAPI
I_RpcGetCurrentCallHandle(void)
1214 return RPCRT4_GetThreadCurrentCallHandle();