1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
|
/** BEGIN COPYRIGHT BLOCK
* Copyright 2001 Sun Microsystems, Inc.
* Portions copyright 1999, 2001-2003 Netscape Communications Corporation.
* All rights reserved.
* END COPYRIGHT BLOCK **/
#include <windows.h>
#include "nt/ntos.h"
/*---------------------------------------------------------------------------*\
*
* Function: GetServerDefaultHostName
*
* Purpose: This function gets the default host name
*
* Input:
*
* Returns:
*
* Comments:
\*---------------------------------------------------------------------------*/
DWORD NS_WINAPI
TCPIP_GetDefaultHostName( LPTSTR lpszFullHostName, LPTSTR lpszHostName, LPTSTR lpszDomainName )
{
char * szKey;
char * szName;
DWORD dwValueType;
DWORD dwIpHostSize = 256;
char szIpHost[256];
DWORD dwIpDomainSize = 256;
char szIpDomain[256];
BOOL bWinNT;
/* get operating system */
switch ( INFO_GetOperatingSystem() ) {
case OS_WIN95: bWinNT = FALSE; break;
case OS_WINNT: bWinNT = TRUE; break;
default: return TCPIP_UNSUPPORTED_OS;
}
#if 0
int lastError;
WSADATA WSAData;
if ( WSAStartup( 0x0101, &WSAData ) != 0 ) {
lastError = WSAGetLastError();
m_pMainWnd->MessageBox ( "TCP/IP must be installed.\nUse the Network Icon in Control Panel" );
return FALSE;
}
lastError = gethostname ( szIpHost, sizeof(szIpHost) );
#endif
/* get list of all keys under Netscape */
if ( bWinNT )
szKey = "SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters";
else
szKey = "SYSTEM\\CurrentControlSet\\Services\\Vxd\\MSTCP";
if( !REG_CheckIfKeyExists( HKEY_LOCAL_MACHINE, szKey ) ) {
return TCPIP_NO_TCPIP;
}
/* get host name for computer. May have to get DHCP host name if empty */
szName = "Hostname";
if( !REG_GetRegistryParameter( HKEY_LOCAL_MACHINE, szKey, szName, &dwValueType, (LPBYTE)szIpHost, &dwIpHostSize ) ) {
szIpHost[0] = '\0';
}
/* get domain name for computer. May have to get DHCP host name if empty */
szName = "Domain";
if( !REG_GetRegistryParameter( HKEY_LOCAL_MACHINE, szKey, szName, &dwValueType, (LPBYTE)szIpDomain, &dwIpDomainSize ) ) {
dwIpDomainSize = 0;
}
if ( dwIpDomainSize == 0 ) {
szName = "DhcpDomain";
if( !REG_GetRegistryParameter( HKEY_LOCAL_MACHINE, szKey, szName, &dwValueType, (LPBYTE)szIpDomain, &dwIpDomainSize ) ) {
dwIpDomainSize = 0;
}
}
if ( lpszHostName )
strcpy ( lpszHostName, szIpHost );
strcpy ( lpszFullHostName, szIpHost );
if ( lpszDomainName ) {
if ( dwIpDomainSize == 0 )
*lpszDomainName = '\0';
else {
strcpy ( lpszDomainName, szIpDomain );
strcat ( lpszFullHostName, "." );
strcat ( lpszFullHostName, lpszDomainName );
}
}
return TCPIP_NO_ERROR;
}
/*---------------------------------------------------------------------------*\
*
* Function: TCPIP_VerifyHostName
*
* Purpose: This function validates the host name
*
* Input:
*
* Returns:
*
* Comments:
\*---------------------------------------------------------------------------*/
DWORD NS_WINAPI
TCPIP_VerifyHostName( LPCTSTR lpszHostName )
{
struct hostent *ent;
WSADATA wsd;
int lastError;
if(WSAStartup(MAKEWORD(1, 1), &wsd) != 0)
return TCPIP_NO_WINSOCK_DLL;
ent = gethostbyname ( lpszHostName );
lastError = WSAGetLastError();
WSACleanup();
if ( ent == NULL ) {
switch ( lastError ) {
case WSANOTINITIALISED: // A successful WSAStartup must occur before using this function.
break;
case WSAENETDOWN: // The Windows Sockets implementation has detected that the network subsystem has failed.
return TCPIP_NETWORK_DOWN;
case WSAHOST_NOT_FOUND: // Authoritative Answer Host not found.
return TCPIP_HOST_NOT_FOUND;
case WSATRY_AGAIN: // Non-Authoritative Host not found, or SERVERFAIL.
return TCPIP_HOST_SERVER_DOWN;
case WSANO_RECOVERY: // Nonrecoverable errors: FORMERR, REFUSED, NOTIMP.
return TCPIP_NETWORK_ERROR;
case WSANO_DATA: // Valid name, no data record of requested type.
return TCPIP_HOST_VALID_NAME;
case WSAEINPROGRESS: // A blocking Windows Sockets operation is in progress.
return TCPIP_NETWORK_ERROR;
case WSAEINTR: // The (blocking) call was canceled using
return TCPIP_NETWORK_ERROR;
default:
return TCPIP_NETWORK_ERROR;
}
}
return TCPIP_NO_ERROR;
}
|
