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.
 
 
 
 
 
 

981 lines
30 KiB

//++
//
// Copyright (C) Microsoft Corporation, 1987 - 1999
//
// Module Name:
//
// browser.c
//
// Abstract:
//
// Queries into network drivers
//
// Author:
//
// Anilth - 4-20-1998
//
// Environment:
//
// User mode only.
// Contains NT-specific code.
//
// Revision History:
//
//--
#include "precomp.h"
#include "malloc.h"
#include "nbtutil.h"
NET_API_STATUS GetBrowserTransportList(OUT PLMDR_TRANSPORT_LIST *TransportList);
//$review (nsun) there is a recursive calling of this function
NTSTATUS
NettestBrowserSendDatagram(
IN PLIST_ENTRY listNetbtTransports,
IN PDSROLE_PRIMARY_DOMAIN_INFO_BASIC pPrimaryDomainInfo,
IN PVOID ContextDomainInfo,
IN ULONG IpAddress,
IN LPWSTR UnicodeDestinationName,
IN DGRECEIVER_NAME_TYPE NameType,
IN LPWSTR pswzTransportName,
IN LPSTR OemMailslotName,
IN PVOID Buffer,
IN ULONG BufferSize
);
BOOL MailslotTest(NETDIAG_PARAMS* pParams,
IN LPWSTR DestinationName,
NETDIAG_RESULT* pResults);
BOOL
BrowserTest(
NETDIAG_PARAMS* pParams,
NETDIAG_RESULT* pResults
)
/*++
Routine Description:
Determine the machines role and membership.
Arguments:
None.
Return Value:
TRUE: Test suceeded.
FALSE: Test failed
--*/
{
NET_API_STATUS NetStatus;
HRESULT hrRetVal = S_OK;
BOOL BrowserIsUp = TRUE;
BOOL RedirIsUp = TRUE;
PLMDR_TRANSPORT_LIST TransportList = NULL;
PLMDR_TRANSPORT_LIST TransportEntry;
LONG NetbtTransportCount;
LONG RealNetbtTransportCount;
PNETBT_TRANSPORT NetbtTransport;
BOOL PrintIt;
PWKSTA_TRANSPORT_INFO_0 pWti0 = NULL;
DWORD EntriesRead;
DWORD TotalEntries;
DWORD i;
WCHAR DestinationName[MAX_PATH+1];
BOOL MailslotTested = FALSE;
PTESTED_DOMAIN TestedDomain;
PLIST_ENTRY ListEntry;
USES_CONVERSION;
PrintStatusMessage( pParams, 4, IDS_BROWSER_STATUS_MSG );
pResults->Browser.fPerformed = TRUE;
InitializeListHead( &pResults->Browser.lmsgOutput );
//
// Ensure the workstation service is running.
//
NetStatus = IsServiceStarted( _T("LanmanWorkstation") );
if ( NetStatus != NO_ERROR )
{
//IDS_BROWSER_13001 " [FATAL] Workstation service is not running. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet,
IDS_BROWSER_13001, NetStatusToString(NetStatus) );
hrRetVal = S_OK;
goto Cleanup;
}
if (!pResults->Global.fHasNbtEnabledInterface)
{
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Verbose,
IDS_BROWSER_NETBT_DISABLED);
pResults->Browser.fPerformed = FALSE;
hrRetVal = S_OK;
goto Cleanup;
}
//
// Get the transports bound to the Redir
//
if ( pParams->fReallyVerbose )
{
//IDS_BROWSER_13002 " List of transports currently bound to the Redir\n"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_ReallyVerbose, IDS_BROWSER_13002 );
}
else if ( pParams->fVerbose )
{
//IDS_BROWSER_13003 " List of NetBt transports currently bound to the Redir\n"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_Verbose, IDS_BROWSER_13003 );
}
NetStatus = NetWkstaTransportEnum(
NULL,
0,
(LPBYTE *)&pWti0,
0xFFFFFFFF, // MaxPreferredLength
&EntriesRead,
&TotalEntries,
NULL ); // Optional resume handle
if (NetStatus != NERR_Success)
{
//IDS_BROWSER_13004 " [FATAL] Unable to retrieve transport list from Redir. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13004, NetStatusToString(NetStatus) );
hrRetVal = S_FALSE;
RedirIsUp = FALSE;
}
else
{
NetbtTransportCount = 0;
RealNetbtTransportCount = 0;
for ( i = 0; i < EntriesRead; i++ )
{
UNICODE_STRING ustrTransportName;
LPTSTR pszTransportName;
RtlInitUnicodeString( &ustrTransportName, (LPWSTR)pWti0[i].wkti0_transport_name );
// Strip off the "\Device\" off of the beginning of
// the string
pszTransportName = W2T(MapGuidToServiceNameW(ustrTransportName.Buffer + 8));
PrintIt = FALSE;
if ( ustrTransportName.Length >= sizeof(NETBT_DEVICE_PREFIX) &&
_wcsnicmp( ustrTransportName.Buffer, NETBT_DEVICE_PREFIX, (sizeof(NETBT_DEVICE_PREFIX)/sizeof(WCHAR)-1)) == 0 )
{
//
// Determine if this Netbt transport really exists.
//
NetbtTransport = FindNetbtTransport( pResults, ustrTransportName.Buffer );
if ( NetbtTransport == NULL )
{
//IDS_BROWSER_13005 " [FATAL] Transport %s is bound to the redir but is not a configured NetbtTransport."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13005, pszTransportName );
hrRetVal = S_FALSE;
}
else
{
if ( NetbtTransport->Flags & BOUND_TO_REDIR )
{
//IDS_BROWSER_13006 " [WARNING] Transport %s is bound to redir more than once."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Verbose, IDS_BROWSER_13006, pszTransportName );
}
else
{
NetbtTransport->Flags |= BOUND_TO_REDIR;
RealNetbtTransportCount ++;
}
}
//
// Count the found transports.
//
NetbtTransportCount ++;
if ( pParams->fVerbose ) {
PrintIt = TRUE;
}
}
//IDS_BROWSER_13007 " %s\n"
AddMessageToList( &pResults->Browser.lmsgOutput, PrintIt ? Nd_Verbose : Nd_ReallyVerbose, IDS_BROWSER_13007, pszTransportName);//&ustrTransportName );
}
//
// Ensure the redir is bound to some Netbt transports.
//
if ( NetbtTransportCount == 0 )
{
//IDS_BROWSER_13008 " [FATAL] The redir isn't bound to any NetBt transports."
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13008);
hrRetVal = S_FALSE;
RedirIsUp = FALSE;
}
else
{
//IDS_BROWSER_13009 " The redir is bound to %ld NetBt transport%s.\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Verbose,
IDS_BROWSER_13009,
NetbtTransportCount,
NetbtTransportCount > 1 ? "s" : "" );
}
//
// Ensure the redir is bound to all of the Netbt transports.
//
if ( RealNetbtTransportCount != pResults->NetBt.cTransportCount )
{
//IDS_BROWSER_13010 " [FATAL] The redir is only bound to %ld of the %ld NetBt transports."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet,
IDS_BROWSER_13010,
RealNetbtTransportCount,
pResults->NetBt.cTransportCount );
hrRetVal = S_FALSE;
}
}
//
// Get the transports bound to the browser.
//
//IDS_BROWSER_13011 "\n"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_Verbose, IDS_BROWSER_13011);
if ( pParams->fReallyVerbose )
//IDS_BROWSER_13012 " List of transports currently bound to the browser\n"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_ReallyVerbose, IDS_BROWSER_13012 );
else if ( pParams->fVerbose )
//IDS_BROWSER_13013 " List of NetBt transports currently bound to the browser\n"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_Verbose, IDS_BROWSER_13013 );
NetStatus = GetBrowserTransportList(&TransportList);
if (NetStatus != NERR_Success)
{
//IDS_BROWSER_13014 " [FATAL] Unable to retrieve transport list from browser. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13014, NetStatusToString(NetStatus) );
hrRetVal = S_FALSE;
BrowserIsUp = FALSE;
}
else
{
TransportEntry = TransportList;
NetbtTransportCount = 0;
RealNetbtTransportCount = 0;
while (TransportEntry != NULL)
{
UNICODE_STRING ustrTransportName;
LPTSTR pszTransportName;
ustrTransportName.Buffer = TransportEntry->TransportName;
ustrTransportName.Length = (USHORT)TransportEntry->TransportNameLength;
ustrTransportName.MaximumLength = (USHORT)TransportEntry->TransportNameLength;
pszTransportName = W2T(MapGuidToServiceNameW(ustrTransportName.Buffer + 8));
PrintIt = FALSE;
if ( ustrTransportName.Length >= sizeof(NETBT_DEVICE_PREFIX) &&
_wcsnicmp( ustrTransportName.Buffer, NETBT_DEVICE_PREFIX, (sizeof(NETBT_DEVICE_PREFIX)/sizeof(WCHAR)-1)) == 0 )
{
//
// Determine if this Netbt transport really exists.
//
NetbtTransport = FindNetbtTransport( pResults, ustrTransportName.Buffer );
if ( NetbtTransport == NULL )
{
//IDS_BROWSER_13015 " [FATAL] Transport %s is bound to the browser but is not a configured NetbtTransport."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13015, pszTransportName );
hrRetVal = S_FALSE;
}
else
{
if ( NetbtTransport->Flags & BOUND_TO_BOWSER )
{
//IDS_BROWSER_13016 " [FATAL] Transport %s is bound to browser more than once."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13016, pszTransportName );
hrRetVal = S_FALSE;
}
else
{
NetbtTransport->Flags |= BOUND_TO_BOWSER;
RealNetbtTransportCount ++;
}
}
//
// Count the found transports.
//
NetbtTransportCount ++;
if ( pParams->fVerbose )
PrintIt = TRUE;
}
//IDS_BROWSER_13017 " %s\n"
AddMessageToList( &pResults->Browser.lmsgOutput,
PrintIt ? Nd_Verbose : Nd_ReallyVerbose,
IDS_BROWSER_13017, pszTransportName );
if (TransportEntry->NextEntryOffset == 0)
{
TransportEntry = NULL;
}
else
{
TransportEntry = (PLMDR_TRANSPORT_LIST)((PCHAR)TransportEntry+TransportEntry->NextEntryOffset);
}
}
if ( NetbtTransportCount == 0 )
{
//IDS_BROWSER_13018 " [FATAL] The browser isn't bound to any NetBt transports"
AddMessageToListId( &pResults->Browser.lmsgOutput, Nd_Quiet,
IDS_BROWSER_13018 );
hrRetVal = S_FALSE;
BrowserIsUp = FALSE;
}
else
{
//IDS_BROWSER_13019 " The browser is bound to %ld NetBt transport%s.\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Verbose,
IDS_BROWSER_13019,
NetbtTransportCount,
NetbtTransportCount > 1 ? "s" : "" );
}
//
// Ensure the browser is bound to all of the Netbt transports.
//
if ( RealNetbtTransportCount != pResults->NetBt.cTransportCount )
{
//IDS_BROWSER_13020 " [FATAL] The browser is only bound to %ld of the %ld NetBt transports."
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet,
IDS_BROWSER_13020,
RealNetbtTransportCount,
pResults->NetBt.cTransportCount );
hrRetVal = FALSE;
}
}
//
// Ensure we can send mailslot messages. (DsGetDcName uses them.)
//
// Try sending to each of the tested domains.
//
for ( ListEntry = pResults->Global.listTestedDomains.Flink ;
ListEntry != &pResults->Global.listTestedDomains ;
ListEntry = ListEntry->Flink )
{
//
// Only test this domain if it is has a Netbios domain name
//
TestedDomain = CONTAINING_RECORD( ListEntry, TESTED_DOMAIN, Next );
if ( TestedDomain->NetbiosDomainName != NULL )
{
//
// Send the message to the <DomainName>[1C] name
//
wcscpy( DestinationName, TestedDomain->NetbiosDomainName );
wcscat( DestinationName, L"*" );
if ( !MailslotTest( pParams, DestinationName, pResults ) ) {
hrRetVal = S_FALSE;
}
else
{
USES_CONVERSION;
//IDS_BROWSER_13021 "Mailslot test for %s passed.\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_ReallyVerbose, IDS_BROWSER_13021, W2CT(DestinationName));
}
MailslotTested = TRUE;
}
}
//
// If we still haven't tested mailslots,
// test them by sending the message to our own computername.
//
//#ifdef notdef // crashes build 1728
if ( !MailslotTested ) {
wcscpy( DestinationName, pResults->Global.swzNetBiosName );
if ( !MailslotTest( pParams, DestinationName, pResults ) ) {
hrRetVal = S_FALSE;
}
MailslotTested = TRUE;
}
//#endif // notdef // crashes build 1728
Cleanup:
if ( pWti0 )
{
NetApiBufferFree( pWti0 );
}
if ( TransportList != NULL )
{
NetApiBufferFree(TransportList);
}
if ( FHrOK(hrRetVal) )
{
PrintStatusMessage(pParams, 0, IDS_GLOBAL_PASS_NL);
}
else
{
PrintStatusMessage(pParams, 0, IDS_GLOBAL_FAIL_NL);
}
pResults->Browser.hrTestResult = hrRetVal;
return hrRetVal;
}
NET_API_STATUS
GetBrowserTransportList(
OUT PLMDR_TRANSPORT_LIST *TransportList
)
/*++
Routine Description:
This routine returns the list of transports bound into the browser.
Arguments:
OUT PLMDR_TRANSPORT_LIST *TransportList - Transport list to return.
Return Value:
NET_API_STATUS - NERR_Success or reason for failure.
--*/
{
NET_API_STATUS NetStatus;
HANDLE BrowserHandle;
LMDR_REQUEST_PACKET RequestPacket;
NetStatus = OpenBrowser(&BrowserHandle);
if (NetStatus != NERR_Success) {
DebugMessage2(" [FATAL] Unable to open browser driver. [%s]\n", NetStatusToString(NetStatus) );
return NetStatus;
}
RequestPacket.Version = LMDR_REQUEST_PACKET_VERSION_DOM;
RequestPacket.Type = EnumerateXports;
RtlInitUnicodeString(&RequestPacket.TransportName, NULL);
RtlInitUnicodeString(&RequestPacket.EmulatedDomainName, NULL);
NetStatus = DeviceControlGetInfo(
BrowserHandle,
IOCTL_LMDR_ENUMERATE_TRANSPORTS,
&RequestPacket,
sizeof(RequestPacket),
(PVOID *)TransportList,
0xffffffff,
4096,
NULL);
NtClose(BrowserHandle);
return NetStatus;
}
BOOL
MailslotTest(
NETDIAG_PARAMS* pParams,
IN LPWSTR DestinationName,
NETDIAG_RESULT* pResults
)
/*++
Routine Description:
Ensure we can send mailslot messages.
Test both via redir and browser.
Don't test responses (since that really tests if the DC is up).
Arguments:
DestinationName - Name to send the message to
Name ends in * if destination is the [1c] name.
Return Value:
TRUE: Test suceeded.
FALSE: Test failed
--*/
{
BOOL RetVal = TRUE;
NET_API_STATUS NetStatus;
NTSTATUS Status;
HANDLE ResponseMailslotHandle = NULL;
TCHAR ResponseMailslotName[MAX_PATH+1];
WCHAR NetlogonMailslotName[MAX_PATH+1];
WCHAR BrowserDestinationName[MAX_PATH+1];
DWORD BrowserDestinationNameLen;
DGRECEIVER_NAME_TYPE NameType;
PVOID PingMessage = NULL;
ULONG PingMessageSize = 0;
//
// Open a mailslot to get ping responses on.
//
//
NetStatus = NetpLogonCreateRandomMailslot( ResponseMailslotName,
&ResponseMailslotHandle );
if (NetStatus != NO_ERROR ) {
//IDS_BROWSER_13022 " [FATAL] Cannot create temp mailslot. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13022, NetStatusToString(NetStatus) );
RetVal = FALSE;
goto Cleanup;
}
//
// Allocate a mailslot message to send
//
NetStatus = NetpDcBuildPing (
FALSE, // Not only PDC
0, // Retry count
pResults->Global.swzNetBiosName, //replace GlobalNetbiosComputerName,
NULL, // No Account name
ResponseMailslotName,
0, // no AllowableAccountControlBits,
NULL, // No Domain SID
0, // Not NT Version 5
&PingMessage,
&PingMessageSize );
if ( NetStatus != NO_ERROR ) {
//IDS_BROWSER_13023 " [FATAL] Cannot allocate mailslot message. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13023,
NetStatusToString(NetStatus) );
RetVal = FALSE;
goto Cleanup;
}
//
// Build the destination mailslot name.
//
NetlogonMailslotName[0] = '\\';
NetlogonMailslotName[1] = '\\';
wcscpy(NetlogonMailslotName + 2, DestinationName );
wcscat( NetlogonMailslotName, NETLOGON_LM_MAILSLOT_W );
//
// Send the mailslot via the redir.
//
NetStatus = NetpLogonWriteMailslot(
NetlogonMailslotName,
(PCHAR)PingMessage,
PingMessageSize );
if ( NetStatus != NO_ERROR ) {
//IDS_BROWSER_13024 " [FATAL] Cannot send mailslot message to '%ws' via redir. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13024,
NetlogonMailslotName, NetStatusToString(NetStatus) );
RetVal = FALSE;
goto Cleanup;
}
//
// Send the mailslot via the browser
//
// Avoid this test if this build has an old value for the IOCTL function
// code to the browser.
//
if ( _ttoi(pResults->Global.pszCurrentBuildNumber) < NTBUILD_BOWSER )
{
if ( pParams->fReallyVerbose ) {
//IDS_BROWSER_13025 " Cannot sending mailslot messages via the browser since this machine is running build %ld. [Test skipped.]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13025, pResults->Global.pszCurrentBuildNumber );
}
}
else
{
wcscpy( BrowserDestinationName, DestinationName );
BrowserDestinationNameLen = wcslen(BrowserDestinationName);
if ( BrowserDestinationName[BrowserDestinationNameLen-1] == L'*' )
{
BrowserDestinationName[BrowserDestinationNameLen-1] = L'\0';
NameType = DomainName; // [1c] name
}
else
{
NameType = PrimaryDomain; // [00] name
}
Status = NettestBrowserSendDatagram(
&pResults->NetBt.Transports,
pResults->Global.pPrimaryDomainInfo,
NULL,
ALL_IP_TRANSPORTS,
BrowserDestinationName,
NameType,
NULL, // All transports
NETLOGON_LM_MAILSLOT_A,
PingMessage,
PingMessageSize );
if ( !NT_SUCCESS(Status) )
{
NetStatus = NetpNtStatusToApiStatus(Status);
//IDS_BROWSER_13026 " [FATAL] Cannot send mailslot message to '%ws' via browser. [%s]\n"
AddMessageToList( &pResults->Browser.lmsgOutput, Nd_Quiet, IDS_BROWSER_13026,
DestinationName, NetStatusToString(NetStatus) );
RetVal = FALSE;
goto Cleanup;
}
}
Cleanup:
if ( PingMessage != NULL ) {
NetpMemoryFree( PingMessage );
}
if ( ResponseMailslotHandle != NULL ) {
CloseHandle(ResponseMailslotHandle);
}
return RetVal;
}
NTSTATUS
NettestBrowserSendDatagram(
IN PLIST_ENTRY plistNetbtTransports,
IN PDSROLE_PRIMARY_DOMAIN_INFO_BASIC pPrimaryDomainInfo,
IN PVOID ContextDomainInfo,
IN ULONG IpAddress,
IN LPWSTR UnicodeDestinationName,
IN DGRECEIVER_NAME_TYPE NameType,
IN LPWSTR TransportName,
IN LPSTR OemMailslotName,
IN PVOID Buffer,
IN ULONG BufferSize
)
/*++
Routine Description:
Send the specified mailslot message to the specified mailslot on the
specified server on the specified transport..
Arguments:
DomainInfo - Hosted domain sending the datagram
IpAddress - IpAddress of the machine to send the message to.
If zero, UnicodeDestinationName must be specified.
If ALL_IP_TRANSPORTS, UnicodeDestination must be specified but the datagram
will only be sent on IP transports.
UnicodeDestinationName -- Name of the server to send to.
NameType -- Type of name represented by UnicodeDestinationName.
TransportName -- Name of the transport to send on.
Use NULL to send on all transports.
OemMailslotName -- Name of the mailslot to send to.
Buffer -- Specifies a pointer to the mailslot message to send.
BufferSize -- Size in bytes of the mailslot message
Return Value:
Status of the operation.
STATUS_NETWORK_UNREACHABLE: Cannot write to network.
--*/
{
PLMDR_REQUEST_PACKET RequestPacket = NULL;
NET_API_STATUS NetStatus;
DWORD OemMailslotNameSize;
DWORD TransportNameSize;
DWORD DestinationNameSize;
WCHAR IpAddressString[NL_IP_ADDRESS_LENGTH+1];
ULONG Information;
HANDLE BrowserHandle = NULL;
NTSTATUS Status;
LPBYTE Where;
LONG test;
//
// If the transport isn't specified,
// send on all transports.
//
if ( TransportName == NULL ) {
ULONG i;
PLIST_ENTRY ListEntry;
NTSTATUS SavedStatus = STATUS_NETWORK_UNREACHABLE;
//
// Loop through the list of netbt transports finding this one.
//
for ( ListEntry = plistNetbtTransports->Flink ;
ListEntry != plistNetbtTransports ;
ListEntry = ListEntry->Flink ) {
PNETBT_TRANSPORT NetbtTransport;
//
// If the transport names match,
// return the entry
//
NetbtTransport = CONTAINING_RECORD( ListEntry, NETBT_TRANSPORT, Next );
//
// Skip deleted transports.
//
if ( (NetbtTransport->Flags & BOUND_TO_BOWSER) == 0 ) {
continue;
}
Status = NettestBrowserSendDatagram(
plistNetbtTransports,
pPrimaryDomainInfo,
ContextDomainInfo,
IpAddress,
UnicodeDestinationName,
NameType,
NetbtTransport->pswzTransportName,
OemMailslotName,
Buffer,
BufferSize );
if ( NT_SUCCESS(Status) ) {
// If any transport works, we've been successful
SavedStatus = STATUS_SUCCESS;
} else {
// Remember the real reason for the failure instead of the default failure status
// Remember only the first failure.
if ( SavedStatus == STATUS_NETWORK_UNREACHABLE ) {
SavedStatus = Status;
}
}
}
return SavedStatus;
}
//
// Open a handle to the browser.
//
NetStatus = OpenBrowser(&BrowserHandle);
if (NetStatus != NERR_Success) {
DebugMessage2(" [FATAL] Unable to open browser driver. [%s]\n", NetStatusToString(NetStatus));
Status = NetpApiStatusToNtStatus( NetStatus );
goto Cleanup;
}
//
// Allocate a request packet.
//
OemMailslotNameSize = strlen(OemMailslotName) + 1;
TransportNameSize = (wcslen(TransportName) + 1) * sizeof(WCHAR);
if ( UnicodeDestinationName == NULL ) {
return STATUS_INTERNAL_ERROR;
}
DestinationNameSize = wcslen(UnicodeDestinationName) * sizeof(WCHAR);
RequestPacket = NetpMemoryAllocate(
sizeof(LMDR_REQUEST_PACKET) +
TransportNameSize +
OemMailslotNameSize +
DestinationNameSize + sizeof(WCHAR) +
(wcslen( pPrimaryDomainInfo->DomainNameFlat ) + 1) * sizeof(WCHAR) +
sizeof(WCHAR)) ; // For alignment
if (RequestPacket == NULL) {
Status = STATUS_NO_MEMORY;
goto Cleanup;
}
//
// Fill in the Request Packet.
//
RequestPacket->Type = Datagram;
RequestPacket->Parameters.SendDatagram.DestinationNameType = NameType;
//
// Fill in the name of the machine to send the mailslot message to.
//
RequestPacket->Parameters.SendDatagram.NameLength = DestinationNameSize;
Where = (LPBYTE) RequestPacket->Parameters.SendDatagram.Name;
RtlCopyMemory( Where, UnicodeDestinationName, DestinationNameSize );
Where += DestinationNameSize;
//
// Fill in the name of the mailslot to send to.
//
RequestPacket->Parameters.SendDatagram.MailslotNameLength =
OemMailslotNameSize;
strcpy( Where, OemMailslotName);
Where += OemMailslotNameSize;
Where = ROUND_UP_POINTER( Where, ALIGN_WCHAR );
//
// Fill in the TransportName
//
wcscpy( (LPWSTR) Where, TransportName);
RtlInitUnicodeString( &RequestPacket->TransportName, (LPWSTR) Where );
Where += TransportNameSize;
//
// Copy the hosted domain name to the request packet.
//
//If the machine doesn't belong to a domain, we shouldn't get to here
assert(pPrimaryDomainInfo->DomainNameFlat);
if (pPrimaryDomainInfo->DomainNameFlat)
{
wcscpy( (LPWSTR)Where,
pPrimaryDomainInfo->DomainNameFlat );
RtlInitUnicodeString( &RequestPacket->EmulatedDomainName,
(LPWSTR)Where );
Where += (wcslen( pPrimaryDomainInfo->DomainNameFlat ) + 1) * sizeof(WCHAR);
}
//
// Send the request to the browser.
//
NetStatus = BrDgReceiverIoControl(
BrowserHandle,
IOCTL_LMDR_WRITE_MAILSLOT,
RequestPacket,
(ULONG)(Where - (LPBYTE)RequestPacket),
Buffer,
BufferSize,
&Information );
if ( NetStatus != NO_ERROR ) {
Status = NetpApiStatusToNtStatus( NetStatus );
}
//
// Free locally used resources.
//
Cleanup:
if ( BrowserHandle != NULL ) {
NtClose(BrowserHandle);
}
if ( RequestPacket != NULL ) {
NetpMemoryFree( RequestPacket );
}
return Status;
}
void BrowserGlobalPrint(NETDIAG_PARAMS *pParams, NETDIAG_RESULT *pResults)
{
if (pParams->fVerbose || !FHrOK(pResults->Browser.hrTestResult))
{
PrintNewLine(pParams, 2);
PrintTestTitleResult(pParams,
IDS_BROWSER_LONG,
IDS_BROWSER_SHORT,
pResults->Browser.fPerformed,
pResults->Browser.hrTestResult,
0);
}
PrintMessageList(pParams, &pResults->Browser.lmsgOutput);
}
void BrowserPerInterfacePrint(NETDIAG_PARAMS *pParams, NETDIAG_RESULT *pResults, INTERFACE_RESULT *pInterfaceResults)
{
//no per interface results
}
void BrowserCleanup(NETDIAG_PARAMS *pParams, NETDIAG_RESULT *pResults)
{
MessageListCleanUp(&pResults->Browser.lmsgOutput);
}