Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

909 lines
25 KiB

/*++
Copyright (c) 1991-1992 Microsoft Corporation
Module Name:
Xport.c
Abstract:
This module contains support for the ServerTransport catagory of
APIs for the NT server service.
Author:
David Treadwell (davidtr) 10-Mar-1991
Revision History:
--*/
#include "srvsvcp.h"
#include "ssreg.h"
#include <tstr.h>
//
// Forward declarations.
//
LPSERVER_TRANSPORT_INFO_3
CaptureSvti3 (
IN DWORD Level,
IN LPTRANSPORT_INFO Svti,
OUT PULONG CapturedSvtiLength
);
NET_API_STATUS NET_API_FUNCTION
I_NetrServerTransportAddEx (
IN DWORD Level,
IN LPTRANSPORT_INFO Buffer
)
{
NET_API_STATUS error;
LPSERVER_TRANSPORT_INFO_3 capturedSvti3;
LPSTR TransportAddress; // Pointer to transport address within capturedSvti1
ULONG capturedSvtiLength;
PSERVER_REQUEST_PACKET srp;
PNAME_LIST_ENTRY service;
PTRANSPORT_LIST_ENTRY transport;
BOOLEAN serviceAllocated = FALSE;
LPTSTR DomainName = NULL;
ULONG Flags = 0;
DWORD len;
if( Level >= 1 && Buffer->Transport1.svti1_domain != NULL ) {
DomainName = Buffer->Transport1.svti1_domain;
if( STRLEN( DomainName ) > DNLEN ) {
return ERROR_INVALID_PARAMETER;
}
}
if( Level >= 2 && Buffer->Transport2.svti2_flags != 0 ) {
Flags = Buffer->Transport2.svti2_flags;
//
// Make sure valid flags are passed in
//
if( Flags & (~SVTI2_REMAP_PIPE_NAMES) ) {
return ERROR_INVALID_PARAMETER;
}
}
//
// Capture the transport request buffer and form the full transport
// address.
//
capturedSvti3 = CaptureSvti3( Level, Buffer, &capturedSvtiLength );
if ( capturedSvti3 == NULL ) {
return ERROR_NOT_ENOUGH_MEMORY;
}
TransportAddress = capturedSvti3->svti3_transportaddress;
OFFSET_TO_POINTER( TransportAddress, capturedSvti3 );
//
// Make sure this name isn't already bound for the transport
//
(VOID)RtlAcquireResourceExclusive( &SsData.SsServerInfoResource, TRUE );
if( DomainName == NULL ) {
DomainName = SsData.DomainNameBuffer;
}
for( service = SsData.SsServerNameList; service != NULL; service = service->Next ) {
if( service->TransportAddressLength != capturedSvti3->svti3_transportaddresslength ) {
continue;
}
if( !RtlEqualMemory( service->TransportAddress,
TransportAddress,
capturedSvti3->svti3_transportaddresslength
) ) {
continue;
}
for( transport=service->Transports; transport != NULL; transport=transport->Next ) {
if( !STRCMPI( transport->TransportName, Buffer->Transport0.svti0_transportname ) ) {
//
// Error... this transport is already bound to the address
//
RtlReleaseResource( &SsData.SsServerInfoResource );
MIDL_user_free( capturedSvti3 );
return ERROR_DUP_NAME;
}
}
break;
}
//
// Counting on success, ensure we can allocate space for the new entry
//
if( service == NULL ) {
len = sizeof( *service ) + sizeof( SsData.DomainNameBuffer );
service = MIDL_user_allocate( len );
if( service == NULL ) {
RtlReleaseResource( &SsData.SsServerInfoResource );
MIDL_user_free( capturedSvti3 );
return ERROR_NOT_ENOUGH_MEMORY;
}
RtlZeroMemory( service, len );
service->DomainName = (LPTSTR)( service + 1 );
serviceAllocated = TRUE;
}
len = sizeof( *transport ) +
(STRLEN( Buffer->Transport0.svti0_transportname ) + sizeof(CHAR)) * sizeof( TCHAR );
transport = MIDL_user_allocate( len );
if( transport == NULL ) {
RtlReleaseResource( &SsData.SsServerInfoResource );
if( serviceAllocated ) {
MIDL_user_free( service );
}
MIDL_user_free( capturedSvti3 );
return ERROR_NOT_ENOUGH_MEMORY;
}
RtlZeroMemory( transport, len );
//
// Get a SRP in which to send the request.
//
srp = SsAllocateSrp( );
if ( srp == NULL ) {
RtlReleaseResource( &SsData.SsServerInfoResource );
if( serviceAllocated ) {
MIDL_user_free( service );
}
MIDL_user_free( transport );
MIDL_user_free( capturedSvti3 );
return ERROR_NOT_ENOUGH_MEMORY;
}
//
// Add any user-supplied flags
//
if (Flags & SVTI2_REMAP_PIPE_NAMES) {
srp->Flags |= SRP_XADD_REMAP_PIPE_NAMES;
}
//
// Check if this is the primary machine name
//
if((capturedSvti3->svti3_transportaddresslength ==
SsData.SsServerTransportAddressLength)
&&
RtlEqualMemory(SsData.SsServerTransportAddress,
TransportAddress,
SsData.SsServerTransportAddressLength) )
{
srp->Flags |= SRP_XADD_PRIMARY_MACHINE;
}
//
// Send the request on to the server.
//
error = SsServerFsControl(
FSCTL_SRV_NET_SERVER_XPORT_ADD,
srp,
capturedSvti3,
capturedSvtiLength
);
//
// Free the SRP
//
SsFreeSrp( srp );
if( error != NO_ERROR ) {
RtlReleaseResource( &SsData.SsServerInfoResource );
if( serviceAllocated ) {
MIDL_user_free( service );
}
MIDL_user_free( transport );
MIDL_user_free( capturedSvti3 );
return error;
}
//
// Everything worked. Add it to the NAME_LIST
//
transport->TransportName = (LPTSTR)(transport + 1 );
STRCPY( transport->TransportName, Buffer->Transport0.svti0_transportname );
transport->Next = service->Transports;
service->Transports = transport;
if( serviceAllocated ) {
RtlCopyMemory( service->TransportAddress,
TransportAddress,
capturedSvti3->svti3_transportaddresslength );
service->TransportAddress[ capturedSvti3->svti3_transportaddresslength ] = '\0';
service->TransportAddressLength = capturedSvti3->svti3_transportaddresslength;
STRCPY( service->DomainName, DomainName );
service->Next = SsData.SsServerNameList;
//
// If this is the first transport and name added to the server, it must be the primary
// name
//
if( SsData.SsServerNameList == NULL ) {
service->PrimaryName = 1;
}
SsData.SsServerNameList = service;
}
RtlReleaseResource( &SsData.SsServerInfoResource );
MIDL_user_free( capturedSvti3 );
SsSetExportedServerType( service, FALSE, FALSE );
return NO_ERROR;
}
NET_API_STATUS NET_API_FUNCTION
NetrServerTransportAddEx (
IN LPTSTR ServerName,
IN DWORD Level,
IN LPTRANSPORT_INFO Buffer
)
{
NET_API_STATUS error;
PNAME_LIST_ENTRY service;
ULONG Flags;
ServerName;
//
// Make sure that the level is valid.
//
if ( Level != 0 && Level != 1 && Level != 2 && Level != 3 ) {
return ERROR_INVALID_LEVEL;
}
if( Buffer->Transport0.svti0_transportname == NULL ||
Buffer->Transport0.svti0_transportaddress == NULL ||
Buffer->Transport0.svti0_transportaddresslength == 0 ||
Buffer->Transport0.svti0_transportaddresslength >= sizeof(service->TransportAddress) ) {
return ERROR_INVALID_PARAMETER;
}
if( Level >= 2 && Buffer->Transport2.svti2_flags != 0 ) {
Flags = Buffer->Transport2.svti2_flags;
if (Flags & ~(SVTI2_REMAP_PIPE_NAMES)) {
return ERROR_INVALID_PARAMETER;
}
}
//
// Make sure that the caller is allowed to set information in the
// server.
//
if( SsData.SsInitialized ) {
error = SsCheckAccess(
&SsConfigInfoSecurityObject,
SRVSVC_CONFIG_INFO_SET
);
if ( error != NO_ERROR ) {
return ERROR_ACCESS_DENIED;
}
}
return I_NetrServerTransportAddEx ( Level, Buffer );
} // NetrServerTransportAddEx
NET_API_STATUS NET_API_FUNCTION
NetrServerTransportAdd (
IN LPTSTR ServerName,
IN DWORD Level,
IN LPSERVER_TRANSPORT_INFO_0 Buffer
)
{
if( Level != 0 ) {
return ERROR_INVALID_LEVEL;
}
return NetrServerTransportAddEx( ServerName, 0, (LPTRANSPORT_INFO)Buffer );
}
//
// This routine is called from xsproc when the server delivers us a PNP unbind
// notification. This routine unbinds all server names from the named transport
//
VOID
I_NetServerTransportDel(
IN PUNICODE_STRING TransportName
)
{
PSERVER_TRANSPORT_INFO_3 capturedSvti3;
ULONG capturedSvtiLength;
PSERVER_REQUEST_PACKET srp;
PNAME_LIST_ENTRY service;
PNAME_LIST_ENTRY sbackp = NULL;
PTRANSPORT_LIST_ENTRY transport;
PTRANSPORT_LIST_ENTRY tbackp = NULL;
NET_API_STATUS error;
//
// Allocate the SERVER_TRANSPORT_INFO_3 structure and initialize it with
// the name of the transport we wish to delete
//
capturedSvtiLength = sizeof( SERVER_TRANSPORT_INFO_3 ) +
TransportName->Length + sizeof(WCHAR);
capturedSvti3 = MIDL_user_allocate( capturedSvtiLength );
if( capturedSvti3 == NULL ) {
return;
}
RtlZeroMemory( capturedSvti3, capturedSvtiLength );
capturedSvti3->svti3_transportname = (LPTSTR)(capturedSvti3+1);
RtlCopyMemory( capturedSvti3->svti3_transportname,
TransportName->Buffer,
TransportName->Length
);
POINTER_TO_OFFSET( capturedSvti3->svti3_transportname, capturedSvti3 );
//
// Get a SRP in which to send the request.
//
srp = SsAllocateSrp( );
if ( srp == NULL ) {
MIDL_user_free( capturedSvti3 );
return;
}
//
// Send the request on to the server.
//
error = SsServerFsControl(
FSCTL_SRV_NET_SERVER_XPORT_DEL,
srp,
capturedSvti3,
capturedSvtiLength
);
//
// Free the SRP and svti
//
SsFreeSrp( srp );
if( error != NO_ERROR ) {
MIDL_user_free( capturedSvti3 );
return;
}
OFFSET_TO_POINTER( capturedSvti3->svti3_transportname, capturedSvti3 );
//
// Now that we've deleted the transport from the server, delete it from
// our own internal structures
//
(VOID)RtlAcquireResourceExclusive( &SsData.SsServerInfoResource, TRUE );
//
// Remove the entry from the SsData.SsServerNameList. If it's the last transport for
// the NAME_LIST_ENTRY, delete the NAME_LIST_ENTRY as well. These lists are
// expected to be quite short, and this operation is infrequent,
// so the inefficiency of rescans should be of no consequence.
//
outer_scan:
for( service = SsData.SsServerNameList, sbackp = NULL;
service != NULL;
sbackp = service, service = service->Next ) {
inner_scan:
for( transport=service->Transports, tbackp = NULL;
transport != NULL;
tbackp=transport, transport=transport->Next ) {
if( STRCMPI( transport->TransportName, capturedSvti3->svti3_transportname ) ) {
continue;
}
//
// This is the one...remove it from the list
//
if( tbackp == NULL ) {
service->Transports = transport->Next;
} else {
tbackp->Next = transport->Next;
}
MIDL_user_free( transport );
goto inner_scan;
}
//
// If this NAME_LIST_ENTRY no longer has any transports, delete it
//
if( service->Transports == NULL ) {
if( sbackp == NULL ) {
SsData.SsServerNameList = service->Next;
} else {
sbackp->Next = service->Next;
}
//
// If this was the last NAME_LIST_ENTRY, save the ServiceBits
// in case another transport comes back later
//
if( SsData.SsServerNameList == NULL && SsData.ServiceBits == 0 ) {
SsData.ServiceBits = service->ServiceBits;
}
MIDL_user_free( service );
goto outer_scan;
}
}
RtlReleaseResource( &SsData.SsServerInfoResource );
MIDL_user_free( capturedSvti3 );
}
NET_API_STATUS NET_API_FUNCTION
NetrServerTransportDelEx (
IN LPTSTR ServerName,
IN DWORD Level,
IN LPTRANSPORT_INFO Buffer
)
{
NET_API_STATUS error;
LPSERVER_TRANSPORT_INFO_3 capturedSvti3;
LPSTR TransportAddress; // Pointer to transport address within capturedSvti1
ULONG capturedSvtiLength;
PSERVER_REQUEST_PACKET srp;
PNAME_LIST_ENTRY service;
PNAME_LIST_ENTRY sbackp = NULL;
PTRANSPORT_LIST_ENTRY transport;
PTRANSPORT_LIST_ENTRY tbackp = NULL;
ServerName;
//
// Make sure that the level is valid.
//
if ( Level != 0 && Level != 1 ) {
return ERROR_INVALID_LEVEL;
}
if( Buffer->Transport0.svti0_transportname == NULL ||
Buffer->Transport0.svti0_transportaddress == NULL ||
Buffer->Transport0.svti0_transportaddresslength == 0 ||
Buffer->Transport0.svti0_transportaddresslength >= sizeof(service->TransportAddress) ) {
return ERROR_INVALID_PARAMETER;
}
//
// Make sure that the caller is allowed to set information in the
// server.
//
if( SsData.SsInitialized ) {
error = SsCheckAccess(
&SsConfigInfoSecurityObject,
SRVSVC_CONFIG_INFO_SET
);
if ( error != NO_ERROR ) {
return ERROR_ACCESS_DENIED;
}
}
//
// Capture the transport request buffer and form the full transport
// address.
//
capturedSvti3 = CaptureSvti3( Level, Buffer, &capturedSvtiLength );
if ( capturedSvti3 == NULL ) {
return ERROR_NOT_ENOUGH_MEMORY;
}
TransportAddress = capturedSvti3->svti3_transportaddress;
OFFSET_TO_POINTER( TransportAddress, capturedSvti3 );
//
// Get an SRP in which to send the request.
//
srp = SsAllocateSrp( );
if ( srp == NULL ) {
MIDL_user_free( capturedSvti3 );
return ERROR_NOT_ENOUGH_MEMORY;
}
//
// Send the request on to the server.
//
error = SsServerFsControl(
FSCTL_SRV_NET_SERVER_XPORT_DEL,
srp,
capturedSvti3,
capturedSvtiLength
);
//
// Free the SRP and svti
//
SsFreeSrp( srp );
if( error != NO_ERROR ) {
MIDL_user_free( capturedSvti3 );
return error;
}
(VOID)RtlAcquireResourceExclusive( &SsData.SsServerInfoResource, TRUE );
//
// Remove the entry from the SsData.SsServerNameList. If it's the last transport for
// the NAME_LIST_ENTRY, delete the NAME_LIST_ENTRY as well.
//
for( service = SsData.SsServerNameList; service != NULL; sbackp = service, service = service->Next ) {
//
// Walk the list until we find the NAME_LIST_ENTRY having the transportaddress
// of interest
//
if( service->TransportAddressLength != capturedSvti3->svti3_transportaddresslength ) {
continue;
}
if( !RtlEqualMemory( service->TransportAddress,
TransportAddress,
capturedSvti3->svti3_transportaddresslength ) ) {
continue;
}
//
// This is the correct NAME_LIST_ENTRY, now find the TRANSPORT_LIST_ENTRY of interest
//
for( transport=service->Transports; transport != NULL; tbackp=transport, transport=transport->Next ) {
if( STRCMPI( transport->TransportName, Buffer->Transport0.svti0_transportname ) ) {
continue;
}
//
// This is the one...remove it from the list
//
if( tbackp == NULL ) {
service->Transports = transport->Next;
} else {
tbackp->Next = transport->Next;
}
MIDL_user_free( transport );
break;
}
//
// If this NAME_LIST_ENTRY no longer has any transports, delete it
//
if( service->Transports == NULL ) {
if( sbackp == NULL ) {
SsData.SsServerNameList = service->Next;
} else {
sbackp->Next = service->Next;
}
//
// If this was the last NAME_LIST_ENTRY, save the ServiceBits
// in case another transport comes back later
//
if( SsData.SsServerNameList == NULL && SsData.ServiceBits == 0 ) {
SsData.ServiceBits = service->ServiceBits;
}
MIDL_user_free( service );
}
break;
}
RtlReleaseResource( &SsData.SsServerInfoResource );
MIDL_user_free( capturedSvti3 );
return NO_ERROR;
} // NetrServerTransportDelEx
NET_API_STATUS NET_API_FUNCTION
NetrServerTransportDel (
IN LPTSTR ServerName,
IN DWORD Level,
IN LPSERVER_TRANSPORT_INFO_0 Buffer
)
{
// To protect us from penetration bugs, all calls that come in over
// this interface are marshalled and treated as InfoLevel 0. To truly
// use Info Level 1, you need to use the new RPC interface, which is done
// automatically for Whistler+ (NT 5.1)
return NetrServerTransportDelEx( ServerName, 0, (LPTRANSPORT_INFO)Buffer );
}
NET_API_STATUS NET_API_FUNCTION
NetrServerTransportEnum (
IN LPTSTR ServerName,
IN LPSERVER_XPORT_ENUM_STRUCT InfoStruct,
IN DWORD PreferredMaximumLength,
OUT LPDWORD TotalEntries,
IN OUT LPDWORD ResumeHandle OPTIONAL
)
{
NET_API_STATUS error;
PSERVER_REQUEST_PACKET srp;
ServerName;
if (InfoStruct == NULL) {
return ERROR_INVALID_PARAMETER;
}
//
// Make sure that the level is valid.
//
if ( InfoStruct->Level != 0 && InfoStruct->Level != 1 ) {
return ERROR_INVALID_LEVEL;
}
if (InfoStruct->XportInfo.Level0 == NULL) {
return ERROR_INVALID_PARAMETER;
}
//
// Make sure that the caller is allowed to get information from the
// server.
//
if( SsData.SsInitialized ) {
error = SsCheckAccess(
&SsTransportEnumSecurityObject,
SRVSVC_CONFIG_USER_INFO_GET
);
if ( error != NO_ERROR ) {
return ERROR_ACCESS_DENIED;
}
}
//
// Set up the input parameters in the request buffer.
//
srp = SsAllocateSrp( );
if ( srp == NULL ) {
return ERROR_NOT_ENOUGH_MEMORY;
}
srp->Level = InfoStruct->Level;
if ( ARGUMENT_PRESENT( ResumeHandle ) ) {
srp->Parameters.Get.ResumeHandle = *ResumeHandle;
} else {
srp->Parameters.Get.ResumeHandle = 0;
}
if (InfoStruct->XportInfo.Level0->Buffer != NULL) {
// The InfoStruct is defined as a parameter. However the Buffer
// parameter is only used as out. In these cases we need to free
// the buffer allocated by RPC if the client had specified a non
// NULL value for it.
MIDL_user_free(InfoStruct->XportInfo.Level0->Buffer);
InfoStruct->XportInfo.Level0->Buffer = NULL;
}
//
// Get the data from the server. This routine will allocate the
// return buffer and handle the case where PreferredMaximumLength ==
// -1.
//
error = SsServerFsControlGetInfo(
FSCTL_SRV_NET_SERVER_XPORT_ENUM,
srp,
(PVOID *)&InfoStruct->XportInfo.Level0->Buffer,
PreferredMaximumLength
);
//
// Set up return information.
//
InfoStruct->XportInfo.Level0->EntriesRead = srp->Parameters.Get.EntriesRead;
*TotalEntries = srp->Parameters.Get.TotalEntries;
if ( srp->Parameters.Get.EntriesRead > 0 && ARGUMENT_PRESENT( ResumeHandle ) ) {
*ResumeHandle = srp->Parameters.Get.ResumeHandle;
}
SsFreeSrp( srp );
return error;
} // NetrServerTransportEnum
LPSERVER_TRANSPORT_INFO_3
CaptureSvti3 (
IN DWORD Level,
IN LPTRANSPORT_INFO Svti,
OUT PULONG CapturedSvtiLength
)
{
LPSERVER_TRANSPORT_INFO_3 capturedSvti;
PCHAR variableData;
ULONG transportNameLength;
CHAR TransportAddressBuffer[MAX_PATH];
LPBYTE TransportAddress;
DWORD TransportAddressLength;
LPTSTR DomainName;
DWORD domainLength;
//
// If a server transport name is specified, use it, otherwise
// use the default server name on the transport.
//
// Either way, the return transport address is normalized into a netbios address
//
if ( Svti->Transport0.svti0_transportaddress == NULL ) {
TransportAddress = SsData.SsServerTransportAddress;
TransportAddressLength = SsData.SsServerTransportAddressLength;
Svti->Transport0.svti0_transportaddresslength = TransportAddressLength;
} else {
//
// Normalize the transport address.
//
TransportAddress = TransportAddressBuffer;
TransportAddressLength = min( Svti->Transport0.svti0_transportaddresslength,
sizeof( TransportAddressBuffer ));
RtlCopyMemory( TransportAddress,
Svti->Transport0.svti0_transportaddress,
TransportAddressLength );
if ( TransportAddressLength < NETBIOS_NAME_LEN ) {
RtlCopyMemory( TransportAddress + TransportAddressLength,
" ",
NETBIOS_NAME_LEN - TransportAddressLength );
TransportAddressLength = NETBIOS_NAME_LEN;
} else {
TransportAddressLength = NETBIOS_NAME_LEN;
}
}
transportNameLength = SIZE_WSTR( Svti->Transport0.svti0_transportname );
if( Level == 0 || Svti->Transport1.svti1_domain == NULL ) {
DomainName = SsData.DomainNameBuffer;
} else {
DomainName = Svti->Transport1.svti1_domain;
}
domainLength = SIZE_WSTR( DomainName );
//
// Allocate enough space to hold the captured buffer, including the
// full transport name/address and domain name
//
*CapturedSvtiLength = sizeof(*capturedSvti) +
transportNameLength + TransportAddressLength + domainLength;
capturedSvti = MIDL_user_allocate( *CapturedSvtiLength );
if ( capturedSvti == NULL ) {
return NULL;
}
RtlZeroMemory( capturedSvti, *CapturedSvtiLength );
//
// Copy in the domain name
//
variableData = (PCHAR)( capturedSvti + 1 );
capturedSvti->svti3_domain = (PWCH)variableData;
RtlCopyMemory( variableData,
DomainName,
domainLength
);
variableData += domainLength;
POINTER_TO_OFFSET( capturedSvti->svti3_domain, capturedSvti );
//
// Copy the transport name
//
capturedSvti->svti3_transportname = (PWCH)variableData;
RtlCopyMemory(
variableData,
Svti->Transport3.svti3_transportname,
transportNameLength
);
variableData += transportNameLength;
POINTER_TO_OFFSET( capturedSvti->svti3_transportname, capturedSvti );
//
// Copy the transport address
//
capturedSvti->svti3_transportaddress = variableData;
capturedSvti->svti3_transportaddresslength = TransportAddressLength;
RtlCopyMemory(
variableData,
TransportAddress,
TransportAddressLength
);
variableData += TransportAddressLength;
POINTER_TO_OFFSET( capturedSvti->svti3_transportaddress, capturedSvti );
if( Level >= 3 ) {
capturedSvti->svti3_passwordlength = Svti->Transport3.svti3_passwordlength;
RtlCopyMemory( capturedSvti->svti3_password,
Svti->Transport3.svti3_password,
sizeof( capturedSvti->svti3_password )
);
}
return capturedSvti;
} // CaptureSvti3