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.
 
 
 
 
 
 

291 lines
9.4 KiB

//*********************************************************************
//* Microsoft Windows **
//* Copyright(c) Microsoft Corp., 1994 **
//*********************************************************************
//
// TCPCFG.C - Functions to read and set TCP/IP configuration
//
// HISTORY:
//
// 11/27/94 jeremys Created.
// 96/02/29 markdu Replaced call to RNAGetIPInfo with call to
// GetIPInfo in rnacall.c
// 96/03/23 markdu Removed Get/ApplyInstanceTcpInfo functions.
// 96/03/24 markdu Replaced memset with ZeroMemory for consistency.
// 96/03/25 markdu Removed connectoid name parameter from
// Get/ApplyGlobalTcpInfo functions since they should not
// be setting per-connectoid stuff anymore.
// Renamed ApplyGlobalTcpInfo to ClearGlobalTcpInfo, and
// changed function to just clear the settings.
// Renamed GetGlobalTcpInfo to IsThereGlobalTcpInfo, and
// changed function to just get the settings.
// 96/04/04 markdu Added pfNeedsRestart to WarnIfServerBound, and
// added function RemoveIfServerBound.
// 96/04/23 markdu NASH BUG 18748 Initialize reboot variable before
// returning.
// 96/05/26 markdu Use lpTurnOffFileSharing and lpIsFileSharingTurnedOn.
//
#include "wizard.h"
extern ICFGTURNOFFFILESHARING lpIcfgTurnOffFileSharing;
extern ICFGISFILESHARINGTURNEDON lpIcfgIsFileSharingTurnedOn;
/*******************************************************************
NAME: WarnIfServerBound
SYNOPSIS: Checks to see if file server (VSERVER) is bound
to TCP/IP instance used for Internet. If so,
warns the user and recommends that she let us
remove the binding. Removes the binding if user
gives go-ahead.
ENTRY: hDlg - parent window
dwCardFlags - an INSTANCE_xxx flag to specify what
card type to check server-TCP/IP bindings for
pfNeedsRestart - set to TRUE if we need a restart
NOTES: This is important because if we don't unbind server
from instances of TCP/IP we install, user could be
inadvertently sharing files over the Internet.
Calls worker function DetectModifyTCPIPBindings to
do work.
********************************************************************/
HRESULT WarnIfServerBound(HWND hDlg,DWORD dwCardFlags,BOOL* pfNeedsRestart)
{
HRESULT err = ERROR_SUCCESS;
// 96/04/23 markdu NASH BUG 18748 Initialize reboot variable before
// returning.
// Default to no restart.
ASSERT(pfNeedsRestart);
*pfNeedsRestart = FALSE;
// this function may get called more than once (to guarantee we
// call it regardless of how pages are navigated), set a flag
// so we don't warn user more than once
static BOOL fWarned = FALSE;
if (fWarned)
{
return ERROR_SUCCESS;
}
// check to see if file server is bound to TCP/IP instance used
// to connect to the internet
BOOL fSharingOn;
HRESULT hr = lpIcfgIsFileSharingTurnedOn(INSTANCE_PPPDRIVER, &fSharingOn);
//
// 5/12/97 jmazner Olympus #3442 IE #30886
// TEMP TODO at the moment, icfgnt doesn't implement FileSharingTurnedOn
// Until it does, assume that on NT file sharing is always off.
//
if( IsNT() )
{
DEBUGMSG("Ignoring return code from IcfgIsFileSharingTurnedOn");
fSharingOn = FALSE;
}
if ((ERROR_SUCCESS == hr) && (TRUE == fSharingOn))
{
// if so, warn the user and ask if we should remove it
BUFFER Msg(MAX_RES_LEN+1); // allocate buffer for part of message
ASSERT(Msg);
if (!Msg)
{
return ERROR_NOT_ENOUGH_MEMORY; // out of memory
}
// message is long and takes 2 strings, so load the 2nd resource and
// use it as an insertable parameter into the first string
LoadSz(IDS_WARN_SERVER_BOUND1,Msg.QueryPtr(),Msg.QuerySize());
if (MsgBoxParam(hDlg,IDS_WARN_SERVER_BOUND,MB_ICONEXCLAMATION,MB_YESNO,
Msg.QueryPtr()) == IDYES)
{
// remove the binding
err = lpIcfgTurnOffFileSharing(dwCardFlags, hDlg);
ASSERT(err == ERROR_SUCCESS);
if (ERROR_SUCCESS == err)
{
// We need to restart.
*pfNeedsRestart = TRUE;
}
}
}
fWarned = TRUE;
return err;
}
/*******************************************************************
NAME: RemoveIfServerBound
SYNOPSIS: Checks to see if file server (VSERVER) is bound
to TCP/IP instance used for Internet. If so,
informs the user that we cannot continue unless we
remove the binding. Removes the binding if user
gives go-ahead.
ENTRY: hDlg - parent window
dwCardFlags - an INSTANCE_xxx flag to specify what
card type to check server-TCP/IP bindings for
pfNeedsRestart - set to TRUE if we need a restart
NOTES: This is important because if we don't unbind server
from instances of TCP/IP we install, user could be
inadvertently sharing files over the Internet.
Calls worker function DetectModifyTCPIPBindings to
do work.
********************************************************************/
HRESULT RemoveIfServerBound(HWND hDlg,DWORD dwCardFlags,BOOL* pfNeedsRestart)
{
HRESULT err = ERROR_SUCCESS;
// Default to no restart.
ASSERT(pfNeedsRestart);
*pfNeedsRestart = FALSE;
// check to see if file server is bound to TCP/IP instance used
// to connect to the internet
BOOL fSharingOn;
HRESULT hr = lpIcfgIsFileSharingTurnedOn(INSTANCE_PPPDRIVER, &fSharingOn);
if ((ERROR_SUCCESS == hr) && (TRUE == fSharingOn))
{
// if so, warn the user and ask if we should remove it
BUFFER Msg(MAX_RES_LEN+1); // allocate buffer for part of message
ASSERT(Msg);
if (!Msg)
{
return ERROR_NOT_ENOUGH_MEMORY; // out of memory
}
// message is long and takes 2 strings, so load the 2nd resource and
// use it as an insertable parameter into the first string
LoadSz(IDS_REMOVE_SERVER_BOUND1,Msg.QueryPtr(),Msg.QuerySize());
if (MsgBoxParam(hDlg,IDS_REMOVE_SERVER_BOUND,MB_ICONEXCLAMATION,MB_OKCANCEL,
Msg.QueryPtr()) == IDOK)
{
// remove the binding
err = lpIcfgTurnOffFileSharing(dwCardFlags, hDlg);
ASSERT(err == ERROR_SUCCESS);
if (ERROR_SUCCESS == err)
{
// We need to restart.
*pfNeedsRestart = TRUE;
}
}
else
{
// user cancelled.
err = ERROR_CANCELLED;
}
}
return err;
}
#define FIELD_LEN 3
#define NUM_FIELDS 4
/*******************************************************************
NAME: IPStrToLong
SYNOPSIS: Translates a text string to a numeric IPADDRESS
ENTRY: pszAddress - text string with ip address
pipAddress - IPADDRESS to translate into
EXIT: TRUE if successful, FALSE if the string is invalid
NOTES: borrowed from net setup TCP/IP UI
********************************************************************/
BOOL IPStrToLong(LPCTSTR pszAddress,IPADDRESS * pipAddress)
{
LPTSTR pch = (LPTSTR) pszAddress;
TCHAR szField[FIELD_LEN+1];
int nFields = 0;
int nFieldLen = 0;
BYTE nFieldVal[NUM_FIELDS];
BOOL fContinue = TRUE;
ASSERT(pszAddress);
ASSERT(pipAddress);
*pipAddress = (IPADDRESS) 0;
// retrieve the numeric value for each of the four fields
while (fContinue) {
if (!(*pch)) fContinue = FALSE;
if (*pch == '.' || !*pch) {
if (nFields >= NUM_FIELDS) return FALSE; // invalid pszAddress
*(szField+nFieldLen) = '\0'; // null-terminate
UINT uFieldVal = (UINT) myatoi(szField); // convert string to int
if (uFieldVal > 255)
return FALSE; // field is > 255, invalid
nFieldVal[nFields] = (BYTE) uFieldVal;
nFields++;
nFieldLen = 0;
pch++;
} else {
if (! ((*pch >= '0') && (*pch <= '9')) )
return FALSE; // non-numeric character, invalid pszAddress
*(szField + nFieldLen) = *pch;
nFieldLen++;
pch++;
if (nFieldLen > FIELD_LEN) return FALSE; // invalid pszAddress
}
}
if (nFields < NUM_FIELDS) return FALSE; // invalid szAddress
// build an address from the fields
*pipAddress = (IPADDRESS)MAKEIPADDRESS(nFieldVal[0],nFieldVal[1],nFieldVal[2],
nFieldVal[3]);
return TRUE;
}
/*******************************************************************
NAME: IPLongToStr
SYNOPSIS: Translates a single numeric IP address to a text string
ENTRY: ipAddress - numeric IP address to translate from
pszAddress - buffer for translated string
cbAddress - size of pszAddress buffer
EXIT: TRUE if successful, FALSE if the buffer is too short
NOTES: borrowed from net setup TCP/IP UI
********************************************************************/
BOOL IPLongToStr(IPADDRESS ipAddress,LPTSTR pszAddress,UINT cbAddress)
{
ASSERT(pszAddress);
if (cbAddress < IP_ADDRESS_LEN + 1)
return FALSE;
wsprintf(pszAddress,TEXT("%u.%u.%u.%u"),
(BYTE) (ipAddress>>24),(BYTE) (ipAddress>>16),
(BYTE) (ipAddress>>8), (BYTE) ipAddress);
return TRUE;
}