windows-xp/Source/XPSP1/NT/inetsrv/iis/setup/osrc/initapp.cpp

#include "stdafx.h"
#include <ole2.h>
#include "ocmanage.h"
#include "log.h"
#include <winnetwk.h>
#include <setupapi.h>
#ifdef _CHICAGO_
    #include <winsock2.h>
#endif

const TCHAR REG_PRODUCTOPTIONS[] = _T("System\\CurrentControlSet\\Control\\ProductOptions");
const TCHAR UNATTEND_FILE_SECTION[] = _T("InternetServer");
const TCHAR REG_SETUP_UNINSTALLINFO[] = _T("UninstallInfo");

extern int g_GlobalDebugLevelFlag;
extern int g_GlobalDebugLevelFlag_WasSetByUnattendFile;
extern int g_CheckIfMetabaseValueWasWritten;
extern MyLogFile g_MyLogFile;

void Check_For_DebugServiceFlag(void)
{
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szEntry[_MAX_PATH] = _T("");

    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return;}

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // Look for our special setting
    //
    *szEntry = NULL;
    if ( SetupFindFirstLine(g_pTheApp->m_hUnattendFile, szSectionName, _T("DebugService"), &Context) ) 
    {
        SetupGetStringField(&Context, 1, szEntry, _MAX_PATH, NULL);
        if (0 == _tcsicmp(szEntry, _T("1")) || 0 == _tcsicmp(szEntry, _T("true")) )
        {
            SetupSetStringId_Wrapper(g_pTheApp->m_hInfHandle, 34101, szEntry);
        }
    }
    return;
}

void Check_For_DebugLevel(void)
{
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szEntry[_MAX_PATH] = _T("");

    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return;}

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // Look for our special setting
    //
    *szEntry = NULL;
    if ( SetupFindFirstLine(g_pTheApp->m_hUnattendFile, szSectionName, _T("DebugLevel"), &Context) ) 
        {
        SetupGetStringField(&Context, 1, szEntry, _MAX_PATH, NULL);

        if (IsValidNumber((LPCTSTR)szEntry)) 
            {
                g_GlobalDebugLevelFlag = _ttoi((LPCTSTR) szEntry);
                g_GlobalDebugLevelFlag_WasSetByUnattendFile = TRUE;

                iisDebugOut((LOG_TYPE_PROGRAM_FLOW, _T("DebugLevel=%d."),g_GlobalDebugLevelFlag));
            }

            if (g_GlobalDebugLevelFlag >= LOG_TYPE_TRACE_WIN32_API )
            {
                g_CheckIfMetabaseValueWasWritten = TRUE;
            }
        }

    return;
}

void Check_Custom_IIS_INF(void)
{
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szFullPathedFilename0[_MAX_PATH] = _T("");
    TCHAR szFullPathedFilename[_MAX_PATH] = _T("");

    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return;}

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // Look for our special setting
    //
    *szFullPathedFilename = NULL;
    if ( SetupFindFirstLine(g_pTheApp->m_hUnattendFile, szSectionName, _T("AlternateIISINF"), &Context) ) 
        {SetupGetStringField(&Context, 1, szFullPathedFilename, _MAX_PATH, NULL);}
    if (*szFullPathedFilename)
    {
        // check szFullPathedFilename for an string substitutions...
        // %windir%, etc...
        _tcscpy(szFullPathedFilename0, szFullPathedFilename);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szFullPathedFilename0, szFullPathedFilename, sizeof(szFullPathedFilename)/sizeof(TCHAR)))
            {_tcscpy(szFullPathedFilename,szFullPathedFilename0);}
        if (!IsFileExist(szFullPathedFilename))
        {
            iisDebugOut((LOG_TYPE_WARN, _T("Check_Custom_IIS_INF:AlternateIISINF=%s.Not Valid.ignoring unattend value. WARNING.\n"),szFullPathedFilename));
            goto Check_Custom_IIS_INF_Exit;
        }

        // try to open the alternate iis.inf file.
        g_pTheApp->m_hInfHandleAlternate = INVALID_HANDLE_VALUE;
        // Get a handle to it.
        g_pTheApp->m_hInfHandleAlternate = SetupOpenInfFile(szFullPathedFilename, NULL, INF_STYLE_WIN4, NULL);
        if (!g_pTheApp->m_hInfHandleAlternate || g_pTheApp->m_hInfHandleAlternate == INVALID_HANDLE_VALUE)
            {
            iisDebugOut((LOG_TYPE_WARN, _T("Check_Custom_IIS_INF: SetupOpenInfFile failed on file: %s.\n"),szFullPathedFilename));
            goto Check_Custom_IIS_INF_Exit;
            }

        iisDebugOut((LOG_TYPE_PROGRAM_FLOW, _T("Check_Custom_IIS_INF:AlternateIISINF=%s\n"),szFullPathedFilename));
    }

Check_Custom_IIS_INF_Exit:
    return;
}


void Check_Custom_WWW_or_FTP_Path(void)
{
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szValue0[_MAX_PATH] = _T("");
    TCHAR szValue[_MAX_PATH] = _T("");


    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return;}

    //iisDebugOut((LOG_TYPE_TRACE, _T("Check_Custom_WWW_or_FTP_Path:start\n")));

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // FTP
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("PathFTPRoot"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}
        if (IsValidDirectoryName(szValue))
        {
            iisDebugOut((LOG_TYPE_TRACE, _T("Check_Custom_WWW_or_FTP_Path:Unattendfilepath:PathFTPRoot=%s\n"),szValue));
            CustomFTPRoot(szValue);
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_PATH_FTP;
        }
        else
        {
            iisDebugOut((LOG_TYPE_WARN, _T("Check_Custom_WWW_or_FTP_Path:Unattendfilepath:PathFTPRoot=%s.Not Valid.ignoring unattend value. WARNING.\n"),szValue));
        }
    }

    //
    // WWW
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("PathWWWRoot"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}
        if (IsValidDirectoryName(szValue))
        {
            iisDebugOut((LOG_TYPE_TRACE, _T("Check_Custom_WWW_or_FTP_Path:Unattendfilepath:PathWWWRoot=%s\n"),szValue));
            CustomWWWRoot(szValue);
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_PATH_WWW;
        }
        else
        {
            iisDebugOut((LOG_TYPE_WARN, _T("Check_Custom_WWW_or_FTP_Path:Unattendfilepath:PathFTPRoot=%s.Not Valid.ignoring unattend value. WARNING.\n"),szValue));
        }
    }

    //iisDebugOut((LOG_TYPE_TRACE, _T("Check_Custom_WWW_or_FTP_Path:end\n")));
    return;
}


CInitApp::CInitApp()
{
    m_err = 0;
    m_hInfHandle = NULL;
    m_hInfHandleAlternate = NULL;
    m_bAllowMessageBoxPopups = TRUE;
    m_bThereWereErrorsChkLogfile = FALSE;
    m_bThereWereErrorsFromMTS = FALSE;
    m_bWin95Migration = FALSE;

    // Product name and application name
    m_csAppName = _T("");
    m_csIISGroupName = _T("");

    // account + passwd for anonymous user
    m_csGuestName = _T("");
    m_csGuestPassword = _T("");
    m_csWAMAccountName = _T("");
    m_csWAMAccountPassword = _T("");
    m_csWWWAnonyName = _T("");
    m_csWWWAnonyPassword = _T("");
    m_csFTPAnonyName = _T("");
    m_csFTPAnonyPassword = _T("");

    dwUnattendConfig = 0;

    m_csWAMAccountName_Unattend = _T("");
    m_csWAMAccountPassword_Unattend = _T("");
    m_csWWWAnonyName_Unattend = _T("");
    m_csWWWAnonyPassword_Unattend = _T("");
    m_csFTPAnonyName_Unattend = _T("");
    m_csFTPAnonyPassword_Unattend = _T("");

    m_csWAMAccountName_Remove = _T("");
    m_csWWWAnonyName_Remove = _T("");
    m_csFTPAnonyName_Remove = _T("");

    // machine status
    m_csMachineName = _T("");
    m_csUsersDomain = _T("");
    m_csUsersAccount = _T("");

    m_fUninstallMapList_Dirty = FALSE;

    m_csWinDir = _T("");
    m_csSysDir = _T("");
    m_csSysDrive = _T("");

    m_csPathSource = _T("");
    m_csPathOldInetsrv = _T("");  // the primary destination used by previous iis/pws products
    m_csPathInetsrv = _T("");  // the primary destination defaults to m_csSysDir\inetsrv
    m_csPathInetpub = _T("");
    m_csPathFTPRoot = _T("");
    m_csPathWWWRoot = _T("");
    m_csPathWebPub = _T("");
    m_csPathProgramFiles = _T("");
    m_csPathIISSamples = _T("");
    m_csPathScripts = _T("");
    m_csPathASPSamp = _T("");
    m_csPathAdvWorks = _T("");
    m_csPathIASDocs = _T("");
    m_csPathOldPWSFiles = _T("");
    m_csPathOldPWSSystemFiles = _T("");

    m_dwOSServicePack = 0;
    m_eOS = OS_OTHERS;                  // OS_W95, OS_NT, OS_OTHERS
    m_fNT5 = FALSE;
    m_fW95 = FALSE;                 // TRUE if Win95 (build xxx) or greater

    m_eNTOSType = OT_NT_UNKNOWN;           // OT_PDC, OT_SAM, OT_BDC, OT_NTS, OT_NTW
    m_csPlatform = _T("");

    m_fTCPIP = FALSE;               // TRUE if TCP/IP is installed

    m_eUpgradeType = UT_NONE;       //  UT_NONE, UT_10, UT_20, etc.
    m_bUpgradeTypeHasMetabaseFlag = FALSE;
    m_eInstallMode = IM_FRESH;      // IM_FRESH, IM_MAINTENANCE, IM_UPGRADE
    m_dwSetupMode = SETUPMODE_CUSTOM;
    m_bRefreshSettings = FALSE;
    m_bPleaseDoNotInstallByDefault = FALSE;

    m_fNTOperationFlags=0;
    m_fNTGuiMode=0;
    m_fNtWorkstation=0;
    m_fInvokedByNT = 0;

    m_fUnattended = FALSE;
    m_csUnattendFile = _T("");
    m_hUnattendFile = NULL;

    m_fEULA = FALSE;

    // TRUE if m_csPathOldInetsrv != m_csPathInetsrv, which means, 
    // we need to migrate the old inetsrv to the new one that is system32\inetsrv.
    m_fMoveInetsrv = FALSE;

    m_csPathSrcDir = _T("");
    m_csMissingFile = _T("");
    m_csMissingFilePath = _T("");
    m_fWebDownload = FALSE;
}

CInitApp::~CInitApp()
{
}

// The one and only CInitApp object <Global variable>
// --------------------------------------------------
BOOL CInitApp::GetMachineName()
{
    TCHAR buf[ CNLEN + 10 ];
    DWORD dwLen = CNLEN + 10;

    m_csMachineName = _T("");

    // Get computername
    if ( GetComputerName( buf, &dwLen ))
    {
        if ( buf[0] != _T('\\') )
        {
            m_csMachineName = _T("\\");
            m_csMachineName += _T("\\");
        }
        m_csMachineName += buf;
    }
    else
    {
        m_err = IDS_CANNOT_GET_MACHINE_NAME;
    }

    return ( !(m_csMachineName.IsEmpty()) );
}


// Return TRUE, if NT or Win95
// --------------------------------------------------
BOOL CInitApp::GetOS()
{
    OSVERSIONINFO VerInfo;
    VerInfo.dwOSVersionInfoSize = sizeof( OSVERSIONINFO );
    GetVersionEx( &VerInfo );

    switch (VerInfo.dwPlatformId) 
    {
    case VER_PLATFORM_WIN32_NT:
        m_eOS = OS_NT;
        break;
    case VER_PLATFORM_WIN32_WINDOWS:
        m_eOS = OS_W95;
        break;
    default:
        m_eOS = OS_OTHERS;
        break;
    }

    if ( m_eOS == OS_OTHERS ) {m_err = IDS_OS_NOT_SUPPORT;}
    return (m_eOS != OS_OTHERS);
}

// Support NT 4.0 (SP3) or greater
// --------------------------------------------------

BOOL CInitApp::GetOSVersion()
/*++

Routine Description:

    This function detects OS version. NT5 or greater is required to run this setup.

Arguments:

    None

Return Value:

    BOOL
    return FALSE, if we fails to detect the OS version, 
                  or it is a NT version which is smaller than v5.0

--*/
{
    BOOL fReturn = FALSE;

    if ( m_eOS == OS_NT )
    {
        OSVERSIONINFO vInfo;

        vInfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
        if ( GetVersionEx(&vInfo) )
        {
            // NT5 or greater is required.
            if ( vInfo.dwMajorVersion < 5 ) 
            {
        m_err = IDS_NT5_NEEDED;
        return FALSE;
            }
            if ( vInfo.dwMajorVersion == 5 )
            {
                m_fNT5 = TRUE;
                fReturn = TRUE;
            }
        }
    }

    // this line may be used for win98
    if (m_eOS == OS_W95) {fReturn = TRUE;}

    if ( !fReturn ) {m_err = IDS_OS_VERSION_NOT_SUPPORTED;}

    return (fReturn);
}

// find out it's a NTS, PDC, BDC, NTW, SAM(PDC)
// --------------------------------------------------
BOOL CInitApp::GetOSType()
{
    BOOL fReturn = TRUE;

    if ( m_eOS == OS_NT )
    {
#ifndef _CHICAGO_
        // If we are in NT guimode setup
        // then the registry key stuff is not yet setup
        // use the passed in ocmanage.dll stuff to determine
        // what we are installing upon.
        if (g_pTheApp->m_fNTGuiMode)
        {
            if (g_pTheApp->m_fNtWorkstation) {m_eNTOSType = OT_NTW;}
            else {m_eNTOSType = OT_NTS;}
        }
        else
        {

            m_eNTOSType = OT_NTS; // default to stand-alone NTS

            CRegKey regProductPath( HKEY_LOCAL_MACHINE, REG_PRODUCTOPTIONS, KEY_READ);
            if ( (HKEY)regProductPath )
            {
                CString strProductType;
                LONG lReturnedErrCode = regProductPath.QueryValue( _T("ProductType"), strProductType );
                if (lReturnedErrCode == ERROR_SUCCESS) 
                {
                    strProductType.MakeUpper();

                    // ToDo: Sam ?
                    if (strProductType == _T("WINNT")) 
                    {
                        m_eNTOSType = OT_NTW;
                    }
                    else if (strProductType == _T("SERVERNT")) 
                    {
                        m_eNTOSType = OT_NTS;
                    }
                    else if (strProductType == _T("LANMANNT"))
                    {
                        m_eNTOSType = OT_PDC_OR_BDC;
                    }
                    else 
                    {
                        iisDebugOutSafeParams((LOG_TYPE_ERROR, _T("ProductType=%1!s! (UnKnown). FAILER to detect ProductType\n"), strProductType));
                        fReturn = FALSE;
                    }
                }
                else 
                {
                    // Shoot, we can't get the registry key,
                    // let's try using the ocmanage.dll passed in stuff.
                    if (g_pTheApp->m_fNTGuiMode)
                    {
                        if (g_pTheApp->m_fNtWorkstation) {m_eNTOSType = OT_NTW;}
                        else {m_eNTOSType = OT_NTS;}
                    }
                    else
                    {
                        GetErrorMsg(lReturnedErrCode, REG_PRODUCTOPTIONS);
                        m_eNTOSType = OT_NTS; // default to stand-alone NTS
                    }
                }
            }
            else
            {
                // Shoot, we can't get the registry key,
                // let's try using the ocmanage.dll passed in stuff.
                if (g_pTheApp->m_fNTGuiMode)
                {
                    if (g_pTheApp->m_fNtWorkstation) {m_eNTOSType = OT_NTW;}
                    else {m_eNTOSType = OT_NTS;}
                }
                else
                {
                    GetErrorMsg(ERROR_CANTOPEN, REG_PRODUCTOPTIONS);
                }
            }
        }
#endif //_CHICAGO_            
    }

    if ( !fReturn )
        m_err = IDS_CANNOT_DETECT_OS_TYPE;

    return(fReturn);
}

// Get WinDir and SysDir of the machine
//  WinDir = C:\winnt           SysDir = C:\Winnt\system32
// --------------------------------------------------
BOOL CInitApp::GetSysDirs()
{
    BOOL fReturn = TRUE;

    TCHAR buf[_MAX_PATH];

    GetWindowsDirectory( buf, _MAX_PATH);
    m_csWinDir = buf;

    GetSystemDirectory( buf, _MAX_PATH);
    m_csSysDir = buf;

    buf[2] = _T('\0');  // now buf contains the system drive letter
    m_csSysDrive = buf;
    return fReturn;
}

// Return true if tcp installed on win95
// --------------------------------------------------
#ifdef _CHICAGO_
BOOL W95TcpInstalled()
{
    WORD wVersionRequested = MAKEWORD(1, 1);
    WSADATA wsaData;
    SOCKET sock;

    if (WSAStartup(wVersionRequested, &wsaData))
          return (FALSE);
    if ((LOBYTE(wsaData.wVersion) != 1 || HIBYTE(wsaData.wVersion) != 1))
        return (FALSE);

    sock = socket( AF_INET, SOCK_STREAM, 0 );

    if (sock == INVALID_SOCKET)
        return FALSE;

    closesocket( sock );
    return (TRUE);
}
#endif

BOOL CInitApp::IsTCPIPInstalled()
/*++

Routine Description:

    This function detects whether TCP/IP is installed, 
    and set m_fTCPIP appropriately.

Arguments:

    None

Return Value:

    BOOL
    set m_fTCPIP appropriately, and always return TRUE here. 
    m_fTCPIP will be used later.

--*/
{
#ifdef _CHICAGO_
    m_fTCPIP = W95TcpInstalled();
#else
    // NT 5.0 STUFF
    m_fTCPIP = TCPIP_Check_Temp_Hack();
#endif //_CHICAGO_

    return TRUE;
}



BOOL CInitApp::SetInstallMode()
{
    BOOL fReturn = TRUE;
    int iTempInstallFreshNT = TRUE;
    m_eInstallMode = IM_FRESH;
    m_eUpgradeType = UT_NONE;
    m_bUpgradeTypeHasMetabaseFlag = FALSE;

    // -----------------------------------
    // Get the install mode from NT setup (g_pTheApp->m_fNTUpgrade_Mode)
    // Can either be:  
    // 1. SETUPMODE_FRESH. user clicked on fresh option and wants to install NT5 fresh
    //    a. install iis fresh. do not attempt to upgrade the old iis stuff.
    // 2. SETUPMODE_UPGRADE. user clicked on upgrade option and wants to upgrade to NT5
    //    a. upgrade any iis installations
    //    b. if no old iis detected, then do not install iis
    // 3. SETUPMODE_MAINTENANCE.  user is running setup from the control panel add/remove.
    // -----------------------------------
    if (!m_fInvokedByNT)
    {
        // if we are not guimode or in add/remove
        // then we must be running standalone.
        // if we are running standalone, then everything is
        // either fresh or maintenance.
        m_eInstallMode = IM_FRESH;
        m_eUpgradeType = UT_NONE;
        if (TRUE == AreWeCurrentlyInstalled())
        {
            m_eInstallMode = IM_MAINTENANCE;
            m_eUpgradeType = UT_NONE;
            m_bUpgradeTypeHasMetabaseFlag = TRUE;
        }
        else
        {
            CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
            if ((HKEY) regINetStp)
            {
                // This must be an upgrade....
                if (SetUpgradeType() == TRUE)
                {
                    iisDebugOut((LOG_TYPE_TRACE, _T("SetInstallMode=SETUPMODE_UPGRADE.Upgrading.\n")));
                }
                else
                {
                    iisDebugOut((LOG_TYPE_TRACE, _T("SetInstallMode=SETUPMODE_UPGRADE.NothingToUpgrade.\n")));
                }
            }
        }

        goto SetInstallMode_Exit;
    }

    // --------------------------------
    // Check if we are in the ADD/REMOVE mode...
    // --------------------------------
    if (g_pTheApp->m_fNTOperationFlags & SETUPOP_STANDALONE)
    {
        //
        // We are in add remove...
        //
        iisDebugOut((LOG_TYPE_TRACE, _T("SetInstallMode=IM_MAINTENANCE\n")));
        m_eInstallMode = IM_MAINTENANCE;
        m_eUpgradeType = UT_NONE;
        m_bUpgradeTypeHasMetabaseFlag = FALSE;
        goto SetInstallMode_Exit;
    }

    // --------------------------------
    //
    // FRESH IIS install
    // 
    // if we are not in NT upgrade
    // then set everything to do a fresh!
    //
    // --------------------------------
    iTempInstallFreshNT = TRUE;
    if (g_pTheApp->m_fNTOperationFlags & SETUPOP_WIN31UPGRADE){iTempInstallFreshNT = FALSE;}
    if (g_pTheApp->m_fNTOperationFlags & SETUPOP_WIN95UPGRADE){iTempInstallFreshNT = FALSE;}
    if (g_pTheApp->m_fNTOperationFlags & SETUPOP_NTUPGRADE){iTempInstallFreshNT = FALSE;}
    if (iTempInstallFreshNT)
    {
        iisDebugOut((LOG_TYPE_TRACE, _T("SetInstallMode=IM_FRESH\n")));
        m_eInstallMode = IM_FRESH;
        m_eUpgradeType = UT_NONE;
        m_bUpgradeTypeHasMetabaseFlag = FALSE;
        goto SetInstallMode_Exit;
    }
    
    // --------------------------------
    //
    // UPGRADE iis install
    //
    // if we get here then the user checked the "upgrade" button and
    // is trying to upgrade from an earlier WIN95/NT351/NT4/NT5 installation.
    //
    // --------------------------------
    //
    // Set Upgrade ONLY if there are iis components to upgrade!
    // do not install if there is nothing to upgrade
    ProcessSection(g_pTheApp->m_hInfHandle, _T("Set_Upgrade_Type_chk"));

    // if we processed the upgrade section from the inf and
    // we are still in a fresh install, then call this other
    // function to make sure we catch known iis upgrade types.
    if (g_pTheApp->m_eUpgradeType == UT_NONE)
        {SetUpgradeType();}

SetInstallMode_Exit:
    if (m_fInvokedByNT){DefineSetupModeOnNT();}
    return fReturn;
}


void CInitApp::DefineSetupModeOnNT()
/*++

Routine Description:

    This function defines IIS setup mode when invoked by NT5.

    NOTE:
    Since IIS setup does not run as a standalone program on NT5, 
    user won't see buttons like Minimum, Typical, Custom, 
    AddRemove, Reinstall, RemoveAll, UpgradeOnly, UpgradePlus 
    any more. Hence, we have a totally different way to decide 
    what mode the setup is running in.

Arguments:

    none

Return Value:

    set m_dwSetupMode appropriately.

--*/
{
    if (m_fInvokedByNT) {
        switch (m_eInstallMode) {
        case IM_FRESH:
            m_dwSetupMode = SETUPMODE_CUSTOM;
            break;
        case IM_MAINTENANCE:
            if (m_fNTGuiMode) {
                // invoked in NT GUI mode setup
                // treat minor os upgrade like a reinstall
                m_dwSetupMode = SETUPMODE_REINSTALL;
                m_bRefreshSettings = TRUE;
            } else {
                // invoked by ControlPanel\AddRemoveApplet
                m_dwSetupMode = SETUPMODE_ADDREMOVE;
            }
            break;
        case IM_UPGRADE:
            m_dwSetupMode = SETUPMODE_ADDEXTRACOMPS;
            break;
        default:
            break;
        }
    }

    return;
}

void GetVRootValue( CString strRegPath, CString csName, LPTSTR szRegName, CString &csRegValue)
{
    CString csRegName;

    strRegPath +=_T("\\Parameters\\Virtual Roots");
    CRegKey regVR( HKEY_LOCAL_MACHINE, strRegPath, KEY_READ);

    csRegName = szRegName;

    if ( (HKEY) regVR )
    {
        regVR.m_iDisplayWarnings = FALSE;

        csRegName = csName;
        if ( regVR.QueryValue( csName, csRegValue ) != ERROR_SUCCESS )
        {
            csName += _T(",");
            if ( regVR.QueryValue(csName, csRegValue) != ERROR_SUCCESS )
            {
                // well, we need to scan all the keys
                CRegValueIter regEnum( regVR );
                CString strName;
                DWORD dwType;
                int nLen = csName.GetLength();

                while ( regEnum.Next( &strName, &dwType ) == ERROR_SUCCESS )
                {
                    CString strLeft = strName.Left(nLen);
                    if ( strLeft.CompareNoCase(csName) == 0)
                    {
                        csRegName = strName;
                        regVR.QueryValue( strName, csRegValue );
                        break;
                    }
                }
            }
        }
        // remove the ending ",,something"
        int cPos = csRegValue.Find(_T(','));
        if ( cPos != (-1))
        {
            csRegValue = csRegValue.Left( cPos );
        }
    }
}


void CInitApp::DeriveInetpubFromWWWRoot(void)
{
    TCHAR szParentDir[_MAX_PATH];

    // Try to figure out InetPub Root
    // ------------------------------
    // Get inetpub dir from wwwroot
    // take the m_csPathWWWRoot and back off one dir to find it.
    InetGetFilePath(m_csPathWWWRoot, szParentDir);
    if ((IsFileExist(szParentDir)))
    {
        m_csPathInetpub = szParentDir;
        iisDebugOutSafeParams((LOG_TYPE_TRACE, _T("Old InetPub='%1!s!'.  Exists.  so we'll use it.\n"), m_csPathInetpub));
    }
    else
    {
        iisDebugOutSafeParams((LOG_TYPE_WARN, _T("Old InetPub='%1!s!'.  Does not exist.  we'll use the default. WARNING.\n"), szParentDir));
    }

    return;
}



void CInitApp::GetOldInetSrvDir(void)
{
    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);

    // Get old InetSrv dir
    // -------------------
    m_csPathOldInetsrv = m_csPathInetsrv;
    if ((HKEY)regINetStp) 
    {
        // Get the old inetsrv dir, and check if it's different
        regINetStp.m_iDisplayWarnings = FALSE;
        regINetStp.QueryValue( _T("InstallPath"), m_csPathOldInetsrv);
        if (-1 != m_csPathOldInetsrv.Find(_T('%')) )
        {
            // there is a '%' in the string
            TCHAR szTempDir[_MAX_PATH];
            _tcscpy(szTempDir, m_csPathOldInetsrv);
            if (ExpandEnvironmentStrings( (LPCTSTR)m_csPathOldInetsrv, szTempDir, sizeof(szTempDir)/sizeof(TCHAR)))
                {m_csPathOldInetsrv = szTempDir;}
        }
        m_fMoveInetsrv = (m_csPathOldInetsrv.CompareNoCase(m_csPathInetsrv) != 0);
    }

    return;
}


void CInitApp::GetOldWWWRootDir(void)
{
    CString csOldWWWRoot;
    //
    // Try to get it from the old iis2,3,4 setup location if it's there.
    //
    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    if ((HKEY) regINetStp) 
    {
        //
        // get the old wwwroot from the registry if there.
        //
        regINetStp.m_iDisplayWarnings = FALSE;
        regINetStp.QueryValue(_T("PathWWWRoot"), csOldWWWRoot);
        if (-1 != csOldWWWRoot.Find(_T('%')) )
        {
            // there is a '%' in the string
            TCHAR szTempDir[_MAX_PATH];
            _tcscpy(szTempDir, csOldWWWRoot);
            if (ExpandEnvironmentStrings( (LPCTSTR)csOldWWWRoot, szTempDir, sizeof(szTempDir)/sizeof(TCHAR)))
                {csOldWWWRoot = szTempDir;}
        }

        // The old wwwRoot may be a network drive.
        // what to do then?
        // at least check if we can access it!
        if ((IsFileExist(csOldWWWRoot)))
        {
            TCHAR szParentDir[_MAX_PATH];
            iisDebugOutSafeParams((LOG_TYPE_TRACE, _T("Old WWWRoot='%1!s!'.  Exists.  so we'll use it.\n"), csOldWWWRoot));
            m_csPathWWWRoot = csOldWWWRoot;
        }
        else
        {
            iisDebugOutSafeParams((LOG_TYPE_WARN, _T("OldWWWRoot='%1!s!'.  Does not exist.  we'll use the default. WARNING.\n"), csOldWWWRoot));
        }
    }

    //
    // Try to get it from the old iis2,3,4 Actual W3svc Service location if it's there.
    // and overwrite anything that we got from setup -- since w3svc is what is actually used!
    //
    GetVRootValue(REG_W3SVC, _T("/"), _T("/"), m_csPathWWWRoot);

    return;
}

void CInitApp::GetOldIISSamplesLocation(void)
{
    //
    // Try to get it from the old iis2,3,4 setup location if it's there.
    //
    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    if ((HKEY)regINetStp)
    {
        //
        // Get the location of the where the samples were installed.
        //
        m_csPathIISSamples.Empty();
        regINetStp.m_iDisplayWarnings = FALSE;
        regINetStp.QueryValue( _T("/IISSamples"), m_csPathIISSamples );
        if (-1 != m_csPathIISSamples.Find(_T('%')) )
        {
            // there is a '%' in the string
            TCHAR szTempDir[_MAX_PATH];
            _tcscpy(szTempDir, m_csPathIISSamples);
            if (ExpandEnvironmentStrings( (LPCTSTR)m_csPathIISSamples, szTempDir, sizeof(szTempDir)/sizeof(TCHAR)))
                {m_csPathIISSamples = szTempDir;}
        }
        if ( m_csPathIISSamples.IsEmpty()) 
        {
            //
            // if Samples path is empty then this an Upgrade, 
            // Guess where to put Sample Site
            //
            TCHAR szParentDir[_MAX_PATH], szDir[_MAX_PATH];
            //
            // Get the parent Dir path
            //
            InetGetFilePath((LPCTSTR)m_csPathWWWRoot, szParentDir);
            //
            // Append the samples dir to parent path
            //
            AppendDir(szParentDir, _T("iissamples"), szDir);
            m_csPathIISSamples = szDir;
        }
    }

//#ifdef _CHICAGO_
    if (m_eUpgradeType == UT_10_W95) 
    {
        TCHAR szParentDir[_MAX_PATH], szDir[_MAX_PATH];
        InetGetFilePath(m_csPathWWWRoot, szParentDir);
        AppendDir(szParentDir, _T("iissamples"), szDir);
        m_csPathIISSamples = szDir;
        AppendDir(szParentDir, _T("webpub"), szDir);
        m_csPathWebPub = szDir;
    }
//#endif //_CHICAGO_

    return;
}

void CInitApp::GetOldIISDirs(void)
{
    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    
    //
    // get values from the previous setup for II2/4 upgrade
    //

    // Try to get old WWW Root from the service itself
    // -----------------------
    GetOldWWWRootDir();
    // Set Inetpub from whatever we got from www root
    DeriveInetpubFromWWWRoot();

    // Reset Vars relying on Inetpub
    // -----------------------------
    m_csPathFTPRoot = m_csPathInetpub + _T("\\ftproot");
    m_csPathIISSamples = m_csPathInetpub + _T("\\iissamples");
    m_csPathScripts = m_csPathInetpub + _T("\\Scripts");
    m_csPathWebPub = m_csPathInetpub + _T("\\webpub");
    m_csPathASPSamp = m_csPathInetpub + _T("\\ASPSamp");
    m_csPathAdvWorks = m_csPathInetpub + _T("\\ASPSamp\\AdvWorks");

    // Try to get old FTP Root from the service itself
    // -----------------------
    GetVRootValue(REG_MSFTPSVC, _T("/"), _T("/"), m_csPathFTPRoot);

    // Get old iis samples location
    // ----------------------------
    GetOldIISSamplesLocation();

    // Get iis 3.0 locations.
    // ----------------------
    GetVRootValue(REG_W3SVC, _T("/Scripts"), _T("/Scripts"), m_csPathScripts);
    GetVRootValue(REG_W3SVC, _T("/ASPSamp"), _T("/ASPSamp"), m_csPathASPSamp);
    GetVRootValue(REG_W3SVC, _T("/AdvWorks"), _T("/AdvWorks"), m_csPathAdvWorks);
    GetVRootValue(REG_W3SVC, _T("/IASDocs"), _T("/IASDocs"), m_csPathIASDocs);

    // Get old InetSrv dir
    // -------------------
    GetOldInetSrvDir();

    return;
}



void CInitApp::SetInetpubDerivatives()
{
    m_csPathFTPRoot = m_csPathInetpub + _T("\\ftproot");
    m_csPathWWWRoot = m_csPathInetpub + _T("\\wwwroot");
    m_csPathWebPub = m_csPathInetpub + _T("\\webpub");
    m_csPathIISSamples = m_csPathInetpub + _T("\\iissamples");
    m_csPathScripts = m_csPathInetpub + _T("\\scripts");
    m_csPathASPSamp = m_csPathInetpub + _T("\\ASPSamp");
    m_csPathAdvWorks = m_csPathInetpub + _T("\\ASPSamp\\AdvWorks");

    switch (m_eInstallMode) 
    {
        case IM_DEGRADE:
        case IM_FRESH:
            // use the initialized values
            break;
        case IM_UPGRADE:
        case IM_MAINTENANCE:
            {
                // override, what ever we just set above!
                GetOldIISDirs();
                break;
            }
    }
}

void CInitApp::SetInetpubDir()
{
    m_csPathInetpub = m_csSysDrive + _T("\\Inetpub");
    // Check if the user wants to override this with a unattend setting
    Check_Custom_InetPub();
}

void CInitApp::ResetWAMPassword()
{
    LPTSTR pszPassword = NULL;
    // create a iwam password
    pszPassword = CreatePassword(LM20_PWLEN+1);
    if (pszPassword)
    {
        m_csWAMAccountPassword = pszPassword;
        GlobalFree(pszPassword);pszPassword = NULL;
    }
}

// Init/Set m_csGuestName, m_csGuestPassword, destinations
// -------------------------------------------------------
void CInitApp::SetSetupParams()
{
    // check if the debug level is set in the unattend file
    // ----------------------------------------------------
    Check_For_DebugLevel();

    // init m_csGuestName as IUSR_MachineName, init m_csGuestPassword as a random password
    TCHAR szGuestName[UNLEN+1];
    memset( (PVOID)szGuestName, 0, sizeof(szGuestName));

    CString csMachineName;
    csMachineName = m_csMachineName;
    csMachineName = csMachineName.Right(csMachineName.GetLength() - 2);
    LPTSTR pszPassword = NULL;

    // create a default guest name
    CString strDefGuest;
    MyLoadString( IDS_GUEST_NAME, strDefGuest);
    strDefGuest += csMachineName;
    _tcsncpy( szGuestName, (LPCTSTR) strDefGuest, LM20_UNLEN+1);
    m_csGuestName = szGuestName;
    // create a default guest password
    pszPassword = CreatePassword(LM20_PWLEN+1);
    if (pszPassword)
    {
        m_csGuestPassword = pszPassword;
        GlobalFree(pszPassword);pszPassword = NULL;
    }

    // Set the ftp/www users to use this default specified one...
    m_csWWWAnonyName = m_csGuestName;
    m_csWWWAnonyPassword = m_csGuestPassword;
    m_csFTPAnonyName = m_csGuestName;
    m_csFTPAnonyPassword = m_csGuestPassword;


     // init all 4 destinations
    m_csPathInetsrv = m_csSysDir + _T("\\inetsrv");

    m_csPathIASDocs = m_csPathInetsrv + _T("\\Docs");
    m_csPathProgramFiles = m_csSysDrive + _T("\\Program Files");
    CRegKey regCurrentVersion(HKEY_LOCAL_MACHINE, _T("Software\\Microsoft\\Windows\\CurrentVersion"), KEY_READ);
    if ( (HKEY)regCurrentVersion ) 
    {
        if (regCurrentVersion.QueryValue(_T("ProgramFilesDir"), m_csPathProgramFiles) != 0)
            {m_csPathProgramFiles = m_csSysDrive + _T("\\Program Files");}
        else
        {
            if (-1 != m_csPathProgramFiles.Find(_T('%')) )
            {
                // there is a '%' in the string
                TCHAR szTempDir[_MAX_PATH];
                _tcscpy(szTempDir, m_csPathProgramFiles);
                if (ExpandEnvironmentStrings( (LPCTSTR)m_csPathProgramFiles, szTempDir, sizeof(szTempDir)/sizeof(TCHAR)))
                    {
                    m_csPathProgramFiles = szTempDir;
                    }
            }
        }
    }

    CRegKey regCurrentVersionSetup(HKEY_LOCAL_MACHINE, _T("Software\\Microsoft\\Windows\\CurrentVersion\\Setup"), KEY_READ);
    if ( (HKEY)regCurrentVersionSetup ) 
    {
        // Get NT installation path
        if (regCurrentVersionSetup.QueryValue(_T("SourcePath"), m_csPathNTSrcDir) != 0)
            {m_csPathNTSrcDir = m_csSysDrive + _T("\\$WIN_NT$.~LS");}
        else
        {
            if (-1 != m_csPathNTSrcDir.Find(_T('%')) )
            {
                // there is a '%' in the string
                TCHAR szTempDir[_MAX_PATH];
                _tcscpy(szTempDir, m_csPathNTSrcDir);
                if (ExpandEnvironmentStrings( (LPCTSTR)m_csPathNTSrcDir, szTempDir, sizeof(szTempDir)/sizeof(TCHAR)))
                    {
                    m_csPathNTSrcDir = szTempDir;
                    }
            }
        }
    }


//#ifdef _CHICAGO_
    if (m_eUpgradeType == UT_10_W95) 
    {
        BOOL bOSR2 = TRUE; 
        CRegKey regVersion(HKEY_LOCAL_MACHINE, _T("SOFTWARE\\Microsoft\\Windows\\CurrentVersion"), KEY_READ);
        if ((HKEY)regVersion) 
        {
            CString csString;
            // VersionNumber for OSR2 is 4.00.1111
            // VersionNumber for the original win95 is 4.00.950
            if (regVersion.QueryValue(_T("VersionNumber"), csString) == ERROR_SUCCESS) 
            {
                if (csString.Compare(_T("4.00.950")) == 0)
                    bOSR2 = FALSE;
            }
        }

        if (!bOSR2) 
        {
            g_pTheApp->m_csPathOldPWSFiles = m_csPathProgramFiles + _T("\\WebSvr");
            g_pTheApp->m_csPathOldPWSSystemFiles = m_csPathProgramFiles + _T("\\WebSvr\\System");
        }
        else 
        {
            g_pTheApp->m_csPathOldPWSFiles = m_csPathProgramFiles + _T("\\Personal Web Server");
            g_pTheApp->m_csPathOldPWSSystemFiles = m_csPathProgramFiles + _T("\\Personal Web Server\\WebServer");
        }
    }
//#endif //_CHICAGO

    return;
}

// Get Platform info
void CInitApp::GetPlatform()
{
    if ( m_eOS == OS_NT)
    {
        SYSTEM_INFO si;
        GetSystemInfo( &si );
        m_csPlatform = _T("x86");
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_INTEL) {m_csPlatform = _T("x86");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_IA64) {m_csPlatform = _T("IA64");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_AMD64) {m_csPlatform = _T("IA64");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_ALPHA) {m_csPlatform = _T("ALPHA");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_MIPS) {m_csPlatform = _T("MIPS");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_PPC) {m_csPlatform = _T("PPC");}
        if (si.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_UNKNOWN) {m_csPlatform = _T("UNKNOWN");}

        // save the number of processors for this machine.
        m_dwNumberOfProcessors = si.dwNumberOfProcessors;

/* old
        TCHAR *p = _tgetenv(_T("PROCESSOR_ARCHITECTURE"));
        if ( p ) 
            {m_csPlatform = p;}
        else
            {m_csPlatform = _T("x86");}
*/
    }
    return;
}

BOOL CInitApp::GetMachineStatus()
{
    if ( ( !GetMachineName() )  ||    // m_csMachineName
         ( !GetOS() )           ||    // m_fOSNT
         ( !GetOSVersion() )    ||    // NT 4.0 (Build 1381) or greater
         ( !GetOSType() )       ||    // m_eOSType = NT_SRV or NT_WKS
         ( !GetSysDirs() )      ||    // m_csWinDir. m_csSysDir
         ( !IsTCPIPInstalled()) ||    // errmsg: if NO TCPIP is installed
         ( !SetInstallMode()) )       // errmsg: if down grade the product      
    {
        return FALSE;
    }

    SetSetupParams(); // Guest account, destinations
    ReGetMachineAndAccountNames();
    ResetWAMPassword();
    SetInetpubDir();
    SetInetpubDerivatives();
    UnInstallList_RegRead(); // Get Uninstall information
    UnInstallList_SetVars(); // set member variables for uninstall info
    // check for any unattend file\custom settings.
    Check_Unattend_Settings();

    GetPlatform();

    GetUserDomain();

    return TRUE;
}

int CInitApp::MsgBox(HWND hWnd, int iID, UINT nType, BOOL bGlobalTitle)
{
    if (iID == -1) {return IDOK;}

    CString csMsg, csTitle;
    MyLoadString(iID, csMsg);
    csTitle = m_csAppName;
    iisDebugOutSafeParams((LOG_TYPE_WARN, _T("CInitApp::MsgBox('%1!s!')\n"), csMsg));

    return (::MessageBoxEx(NULL, (LPCTSTR)csMsg, csTitle, nType | MB_SETFOREGROUND, MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT)));
}

int CInitApp::MsgBox2(HWND hWnd, int iID,CString csInsertionString,UINT nType)
{
    if (iID == -1) {return IDOK;}
    CString csFormat, csMsg, csTitle;
    MyLoadString(iID, csFormat);
    csMsg.Format(csFormat, csInsertionString);
    csTitle = m_csAppName;
    iisDebugOutSafeParams((LOG_TYPE_WARN, _T("CInitApp::MsgBox2('%1!s!')\n"), csMsg));

    return (::MessageBoxEx(NULL, (LPCTSTR)csMsg, csTitle, nType | MB_SETFOREGROUND, MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT)));
}

BOOL CInitApp::InitApplication()
// Return Value:
// TRUE: application is initiliazed correctly, continue processing
// FALSE: application is missing some required parameters, like the correct OS, TCPIP, etc.
//        setup should be terminated.
{
    BOOL fReturn = FALSE;

    do {
        // Get Machine Status: 
        // m_eInstallMode(Fresh, Maintenance, Upgrade, Degrade), 
        // m_eUpgradeType(PROD 2.0, PROD 3.0)

        if ( !GetMachineStatus() )
        {
            CString csMsg;
            MyLoadString(m_err, csMsg);
            ::MessageBoxEx(NULL, (LPCTSTR)csMsg, (LPCTSTR) g_pTheApp->m_csAppName , MB_SETFOREGROUND, MAKELANGID(LANG_NEUTRAL, SUBLANG_SYS_DEFAULT));

            iisDebugOutSafeParams((LOG_TYPE_ERROR, _T("GetMachineStatus(); MessageBoxEx('%1!s!') FAILER\n"), csMsg));
            break;
        }

        if ( g_pTheApp->m_eInstallMode == IM_MAINTENANCE )
            {g_pTheApp->m_fEULA = TRUE;}

        fReturn = TRUE;

    } while (0);

    return fReturn;
}



// open the tcp/ip registry key 
// if it's there then tcp/ip is installed
int TCPIP_Check_Temp_Hack(void)
{
    int TheReturn = FALSE;

    CRegKey regTheKey(HKEY_LOCAL_MACHINE,_T("System\\CurrentControlSet\\Services\\Tcpip"),KEY_READ);
    if ((HKEY) regTheKey)
    {
        TheReturn = TRUE;
    }

    if (FALSE == TheReturn)
    {
        iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("DETECT:TCPIP not Installed (yet), but we'll proceed as if it were.")));
        TheReturn = TRUE;
    }
    
    return TheReturn;
}

void GetUserDomain(void)
{
    HANDLE hProcess, hAccessToken;
    TCHAR InfoBuffer[1000],szAccountName[200], szDomainName[200];
    
    PTOKEN_USER pTokenUser = (PTOKEN_USER)InfoBuffer;
    DWORD dwInfoBufferSize,dwAccountSize = sizeof(szAccountName), dwDomainSize = sizeof(szDomainName);
    SID_NAME_USE snu;

    hProcess = GetCurrentProcess();
    OpenProcessToken(hProcess,TOKEN_READ,&hAccessToken);
    GetTokenInformation(hAccessToken,TokenUser,InfoBuffer,1000, &dwInfoBufferSize);
    if (LookupAccountSid(NULL, pTokenUser->User.Sid, szAccountName,&dwAccountSize,szDomainName, &dwDomainSize, &snu))
    {
        if (dwDomainSize)
        {
            g_pTheApp->m_csUsersDomain = szDomainName;
            //_tcscpy(g_szUsersDomain, szDomainName);
        }
        else 
        {
            g_pTheApp->m_csUsersDomain = _T(" ");
            //_tcscpy(g_szUsersDomain, _T(" "));
        }

        if (dwDomainSize)
        {
            g_pTheApp->m_csUsersAccount = szAccountName;
            //_tcscpy(g_szUsersAccount, szAccountName);        
        }
        else
        {
            g_pTheApp->m_csUsersAccount = _T(" ");
        }
    }
}

// This function should only be called in FRESH NT5 setup.
void CInitApp::ReGetMachineAndAccountNames()
{
    GetMachineName();

    // re-calculate the IUSR_ and IWAM_ account names
    TCHAR szGuestName[UNLEN+1];
    memset( (PVOID)szGuestName, 0, sizeof(szGuestName));

    CString csMachineName;
    csMachineName = m_csMachineName;
    csMachineName = csMachineName.Right(csMachineName.GetLength() - 2);
    CString strDefGuest;

    MyLoadString( IDS_GUEST_NAME, strDefGuest);
    strDefGuest += csMachineName;
    _tcsncpy( szGuestName, (LPCTSTR) strDefGuest, LM20_UNLEN+1);
    m_csGuestName = szGuestName;

    MyLoadString( IDS_WAM_ACCOUNT_NAME, strDefGuest);
    strDefGuest += csMachineName;
    _tcsncpy( szGuestName, (LPCTSTR) strDefGuest, LM20_UNLEN+1);
    m_csWAMAccountName = szGuestName;
}

void CInitApp::DumpAppVars(void)
{
    int iDoOnlyInThisMode = LOG_TYPE_TRACE;

    // only do this if the debug mode is trace.
    if (g_GlobalDebugLevelFlag >= iDoOnlyInThisMode)
    {

    iisDebugOut((iDoOnlyInThisMode, _T("=======================\n")));
   
    // machine status
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csMachineName=%1!s!\n"), m_csMachineName));
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csUsersDomain=%1!s!\n"), m_csUsersDomain));
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csUsersAccount=%1!s!\n"), m_csUsersAccount));

    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csWinDir=%1!s!\n"), m_csWinDir));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csSysDir=%1!s!\n"), m_csSysDir));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csSysDrive=%1!s!\n"), m_csSysDrive));;

    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathNTSrcDir=%1!s!\n"), m_csPathNTSrcDir));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathSource=%1!s!\n"), m_csPathSource));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathOldInetsrv=%1!s!\n"), m_csPathOldInetsrv));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathInetsrv=%1!s!\n"), m_csPathInetsrv));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathInetpub=%1!s!\n"), m_csPathInetpub));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathFTPRoot=%1!s!\n"), m_csPathFTPRoot));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathWWWRoot=%1!s!\n"), m_csPathWWWRoot));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathWebPub=%1!s!\n"), m_csPathWebPub));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathProgramFiles=%1!s!\n"), m_csPathProgramFiles));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathIISSamples=%1!s!\n"), m_csPathIISSamples));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathScripts=%1!s!\n"), m_csPathScripts));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathASPSamp=%1!s!\n"), m_csPathASPSamp));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathAdvWorks=%1!s!\n"), m_csPathAdvWorks));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathIASDocs=%1!s!\n"), m_csPathIASDocs));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathOldPWSFiles=%1!s!\n"), m_csPathOldPWSFiles));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathOldPWSSystemFiles=%1!s!\n"), m_csPathOldPWSSystemFiles));;
    
    if (m_eOS == OS_NT) {iisDebugOut((iDoOnlyInThisMode, _T("OS=NT\n")));}
    if (m_eOS == OS_W95) {iisDebugOut((iDoOnlyInThisMode, _T("OS=W95\n")));}
    if (m_eOS == OS_OTHERS) {iisDebugOut((iDoOnlyInThisMode, _T("OS=OTHER\n")));}

    if (m_eNTOSType == OT_NTW){iisDebugOut((iDoOnlyInThisMode, _T("m_eNTOSType=OT_NTW (Workstation)\n")));}
    if (m_eNTOSType == OT_NTS){iisDebugOut((iDoOnlyInThisMode, _T("m_eNTOSType=OT_NTS (Server)\n")));}
    if (m_eNTOSType == OT_PDC_OR_BDC){iisDebugOut((iDoOnlyInThisMode, _T("m_eNTOSType=OT_PDC_OR_BDC (Primary/Backup Domain Controller)\n")));}

    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPlatform=%1!s!\n"), m_csPlatform));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_dwNumberOfProcessors=%1!d!\n"), m_dwNumberOfProcessors));;

    if (m_fNT5) {iisDebugOut((iDoOnlyInThisMode, _T("OSVersion=5\n")));}
    if (m_fW95) {iisDebugOut((iDoOnlyInThisMode, _T("OSVersion=Win95\n")));}
    iisDebugOut((iDoOnlyInThisMode, _T("m_dwOSBuild=%d\n"), m_dwOSBuild));
    iisDebugOut((iDoOnlyInThisMode, _T("m_dwOSServicePack=0x%x\n"), m_dwOSServicePack));
    iisDebugOut((iDoOnlyInThisMode, _T("m_fTCPIP Exists=%d\n"), m_fTCPIP));

    if (m_eUpgradeType == UT_NONE){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_NONE\n")));}
    if (m_eUpgradeType == UT_10_W95){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_10_W95\n")));}
    if (m_eUpgradeType == UT_351){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_351\n")));}
    if (m_eUpgradeType == UT_10){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_10\n")));}
    if (m_eUpgradeType == UT_20){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_20\n")));}
    if (m_eUpgradeType == UT_30){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_30\n")));}
    if (m_eUpgradeType == UT_40){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_40\n")));}
    if (m_eUpgradeType == UT_50){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_50\n")));}
    if (m_eUpgradeType == UT_51){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_51\n")));}
    if (m_eUpgradeType == UT_60){iisDebugOut((iDoOnlyInThisMode, _T("m_eUpgradeType=UT_60\n")));}

    if (m_eInstallMode == IM_FRESH){iisDebugOut((iDoOnlyInThisMode, _T("m_eInstallMode=IM_FRESH\n")));}
    if (m_eInstallMode == IM_UPGRADE){iisDebugOut((iDoOnlyInThisMode, _T("m_eInstallMode=IM_UPGRADE\n")));}
    if (m_eInstallMode == IM_MAINTENANCE){iisDebugOut((iDoOnlyInThisMode, _T("m_eInstallMode=IM_MAINTENANCE\n")));}
    if (m_eInstallMode == IM_DEGRADE){iisDebugOut((iDoOnlyInThisMode, _T("m_eInstallMode=IM_DEGRADE\n")));}

    if (m_dwSetupMode & SETUPMODE_UPGRADE){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_UPGRADE\n")));}
    if (m_dwSetupMode == SETUPMODE_UPGRADEONLY){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_UPGRADE | SETUPMODE_UPGRADEONLY\n")));}
    if (m_dwSetupMode == SETUPMODE_ADDEXTRACOMPS){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_UPGRADE | SETUPMODE_ADDEXTRACOMPS\n")));}
    if (m_dwSetupMode & SETUPMODE_UPGRADE){iisDebugOut((iDoOnlyInThisMode, _T("m_bUpgradeTypeHasMetabaseFlag=%d\n"),m_bUpgradeTypeHasMetabaseFlag));}

    if (m_dwSetupMode & SETUPMODE_MAINTENANCE){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_MAINTENANCE\n")));}
    if (m_dwSetupMode == SETUPMODE_ADDREMOVE){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_MAINTENANCE | SETUPMODE_ADDREMOVE\n")));}
    if (m_dwSetupMode == SETUPMODE_REINSTALL){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_MAINTENANCE | SETUPMODE_REINSTALL\n")));}
    if (m_dwSetupMode == SETUPMODE_REMOVEALL){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_MAINTENANCE | SETUPMODE_REMOVEALL\n")));}

    if (m_dwSetupMode & SETUPMODE_FRESH){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_FRESH\n")));}
    if (m_dwSetupMode == SETUPMODE_MINIMAL){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_FRESH | SETUPMODE_MINIMAL\n")));}
    if (m_dwSetupMode == SETUPMODE_TYPICAL){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_FRESH | SETUPMODE_TYPICAL\n")));}
    if (m_dwSetupMode == SETUPMODE_CUSTOM){iisDebugOut((iDoOnlyInThisMode, _T("m_dwSetupMode=SETUPMODE_FRESH | SETUPMODE_CUSTOM\n")));}

    iisDebugOut((iDoOnlyInThisMode, _T("m_bPleaseDoNotInstallByDefault=%d\n"), m_bPleaseDoNotInstallByDefault));
    
    //if (m_bRefreshSettings == TRUE){iisDebugOut((iDoOnlyInThisMode, _T("m_bRefreshSettings=refresh files + refresh all settings\n")));}
    //if (m_bRefreshSettings == FALSE){iisDebugOut((iDoOnlyInThisMode, _T("m_bRefreshSettings=refresh files only\n")));}

    if (m_eAction == AT_DO_NOTHING){iisDebugOut((iDoOnlyInThisMode, _T("m_eAction=AT_DO_NOTHING\n")));}
    if (m_eAction == AT_REMOVE){iisDebugOut((iDoOnlyInThisMode, _T("m_eAction=AT_REMOVE\n")));}
    if (m_eAction == AT_INSTALL_FRESH){iisDebugOut((iDoOnlyInThisMode, _T("m_eAction=AT_INSTALL_FRESH\n")));}
    if (m_eAction == AT_INSTALL_UPGRADE){iisDebugOut((iDoOnlyInThisMode, _T("m_eAction=AT_INSTALL_UPGRADE\n")));}
    if (m_eAction == AT_INSTALL_REINSTALL){iisDebugOut((iDoOnlyInThisMode, _T("m_eAction=AT_INSTALL_REINSTALL\n")));}

    iisDebugOut((iDoOnlyInThisMode, _T("m_fNTOperationFlags=0x%x\n"), m_fNTOperationFlags));
    iisDebugOut((iDoOnlyInThisMode, _T("m_fNTGuiMode=%d\n"), m_fNTGuiMode));
    iisDebugOut((iDoOnlyInThisMode, _T("m_fInvokedByNT=%d\n"), m_fInvokedByNT));
    iisDebugOut((iDoOnlyInThisMode, _T("m_fNtWorkstation=%d\n"), m_fNtWorkstation));

    iisDebugOut((iDoOnlyInThisMode, _T("m_fUnattended=%d\n"), m_fUnattended));
    iisDebugOut((iDoOnlyInThisMode, _T("m_csUnattendFile=%s\n"), m_csUnattendFile));;
    iisDebugOutSafeParams((iDoOnlyInThisMode, _T("m_csPathSrcDir=%1!s!\n"), m_csPathSrcDir));;
    iisDebugOut((iDoOnlyInThisMode, _T("=======================\n")));

    }
    return;
}


int AreWeCurrentlyInstalled()
{
    int iReturn = FALSE;
    DWORD dwMajorVersion = 0;

    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    if ((HKEY) regINetStp)
    {
        LONG lReturnedErrCode = regINetStp.QueryValue(_T("MajorVersion"), dwMajorVersion);
        if (lReturnedErrCode == ERROR_SUCCESS)
        {
            if (dwMajorVersion == 5) 
            {
                iReturn = TRUE;
            }
        }
    }
    return iReturn;
}


#define sz_PreviousIISVersion_string _T("PreviousIISVersion")
int CInitApp::SetUpgradeType(void)
{
    int iReturn = FALSE;
    DWORD dwMajorVersion = 0;
    DWORD dwMinorVersion = 0;
    CString csFrontPage;

    m_eInstallMode = IM_UPGRADE;
    m_eUpgradeType = UT_NONE;
    m_bUpgradeTypeHasMetabaseFlag = FALSE;
    m_bPleaseDoNotInstallByDefault = TRUE;

    CRegKey regINetStp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    if ((HKEY) regINetStp)
    {
        LONG lReturnedErrCode = regINetStp.QueryValue(_T("MajorVersion"), dwMajorVersion);
        if (lReturnedErrCode == ERROR_SUCCESS)
        {
            if (dwMajorVersion <= 1)
            {
                m_eUpgradeType = UT_10;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = FALSE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.\n"),sz_PreviousIISVersion_string, dwMajorVersion));
                goto SetUpgradeType_Exit;
            }
            if (dwMajorVersion == 2)
            {
                m_eUpgradeType = UT_20;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = FALSE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.\n"),sz_PreviousIISVersion_string, dwMajorVersion));
                goto SetUpgradeType_Exit;
            }
            if (dwMajorVersion == 3)
            {
                m_eUpgradeType = UT_30;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = FALSE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.\n"),sz_PreviousIISVersion_string, dwMajorVersion));
                goto SetUpgradeType_Exit;
            }
            if (dwMajorVersion == 4)
            {
                CString csSetupString;
                m_eUpgradeType = UT_40; 
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = TRUE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                regINetStp.m_iDisplayWarnings = FALSE;
                if (regINetStp.QueryValue(_T("SetupString"), csSetupString) == NERR_Success) 
                {
                    if (csSetupString.CompareNoCase(_T("K2 RTM")) != 0) 
                    {
                        // Error: upgrade not supported on K2 Beta versions
                        // Do a fresh if it's k2 beta2!!!!
                        m_eInstallMode = IM_FRESH;
                        m_eUpgradeType = UT_NONE;
                        m_bUpgradeTypeHasMetabaseFlag = FALSE;
                        m_bPleaseDoNotInstallByDefault = FALSE;
                        iReturn = FALSE;
                        iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.Beta2.\n"),sz_PreviousIISVersion_string, dwMajorVersion));
                        goto SetUpgradeType_Exit;
                    }
                }
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.\n"),sz_PreviousIISVersion_string, dwMajorVersion));
                goto SetUpgradeType_Exit;
            }
            if (dwMajorVersion == 5) 
            {
                // There is a previous version of iis5 on the machine...
                // Could be they are upgrading from nt5Workstation to and nt5Server machine!
                // or from and server to a workstation!  what a nightmare!!!
                //m_eInstallMode = IM_FRESH;
                m_eUpgradeType = UT_50;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = TRUE;
                m_bPleaseDoNotInstallByDefault = FALSE;

                regINetStp.m_iDisplayWarnings = FALSE;
                if (regINetStp.QueryValue(_T("MinorVersion"), dwMinorVersion) == NERR_Success) 
                {
                    if (dwMinorVersion >= 1)
                    {
	                m_eUpgradeType = UT_51;
        	        m_eInstallMode = IM_UPGRADE;
                	m_bUpgradeTypeHasMetabaseFlag = TRUE;
	                m_bPleaseDoNotInstallByDefault = FALSE;
                    }
                }
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.0x%x\n"),sz_PreviousIISVersion_string, dwMajorVersion,dwMinorVersion));
                goto SetUpgradeType_Exit;
            }
            if (dwMajorVersion == 6) 
            {
                // There is a previous version of iis5 on the machine...
                // Could be they are upgrading from nt5Workstation to and nt5Server machine!
                // or from and server to a workstation!  what a nightmare!!!
                //m_eInstallMode = IM_FRESH;
                m_eUpgradeType = UT_60;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = TRUE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.0x%x\n"),sz_PreviousIISVersion_string, dwMajorVersion,dwMinorVersion));
                goto SetUpgradeType_Exit;
            }

            if (dwMajorVersion > 6)
            {
                m_eInstallMode = IM_UPGRADE;
                m_eUpgradeType = UT_60;
                m_bUpgradeTypeHasMetabaseFlag = FALSE;
                m_bPleaseDoNotInstallByDefault = TRUE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=0x%x.0x%x\n"),sz_PreviousIISVersion_string, dwMajorVersion,dwMinorVersion));
                goto SetUpgradeType_Exit;
            }

            // if we get here, then that means
            // that we found a version like 7.0 or something
            // which we should not upgrade since it is newer than us.
            // but hey we're in upgrade mode, so we should set something
            m_eInstallMode = IM_UPGRADE;
            m_eUpgradeType = UT_NONE;
            m_bUpgradeTypeHasMetabaseFlag = FALSE;
            m_bPleaseDoNotInstallByDefault = TRUE;
            iReturn = FALSE;
            iisDebugOut((LOG_TYPE_TRACE, _T("%s=some other iis version\n"),sz_PreviousIISVersion_string));
        }
    }

    // -----------------------------------
    //
    // Check for other Rogue versions of IIS
    // 
    // win95 pws 1.0
    // win95 fontpage installed pws 1.0 (actually totally different from pws 1.0)
    //
    // on NT5 we are able to upgrade from:
    //   Win95 pws 1.0
    //   Win95 pws 4.0
    // on win95 pws 1.0, there was no inetstp dir
    // so we must check other things.
    // -----------------------------------
    {
    CRegKey regW3SVC(HKEY_LOCAL_MACHINE, REG_WWWPARAMETERS, KEY_READ);
    if ((HKEY)regW3SVC) 
    {
        CByteArray baMajorVersion;
        regW3SVC.m_iDisplayWarnings = FALSE;
        if (regW3SVC.QueryValue(_T("MajorVersion"), baMajorVersion) == NERR_Success) 
        {
            // Check if we can read the MajorVersion value should be set to '\0' if pws 1.0
            if (baMajorVersion[0] == '\0')
            {
                m_eUpgradeType = UT_10_W95;
                m_eInstallMode = IM_UPGRADE;
                m_bUpgradeTypeHasMetabaseFlag = FALSE;
                m_bPleaseDoNotInstallByDefault = FALSE;
                iReturn = TRUE;
                iisDebugOut((LOG_TYPE_TRACE, _T("%s=1.\n"),sz_PreviousIISVersion_string));
                goto SetUpgradeType_Exit;
            }
        }
    }
    }

    //
    // on win 95 there could be an
    // installation of frontpg pws version 1.0
    // we don't support upgrading this, so we'll do a fresh if we ever get here.
    //
    csFrontPage = g_pTheApp->m_csSysDir + _T("\\frontpg.ini");
    if (IsFileExist(csFrontPage)) 
    {
        TCHAR buf[_MAX_PATH];
        GetPrivateProfileString(_T("FrontPage 1.1"), _T("PWSRoot"), _T(""), buf, _MAX_PATH, csFrontPage);
        if (*buf && IsFileExist(buf)) 
        {
            m_eInstallMode = IM_FRESH;
            m_eUpgradeType = UT_NONE;
            m_bUpgradeTypeHasMetabaseFlag = FALSE;
            m_bPleaseDoNotInstallByDefault = FALSE;
            iReturn = TRUE;
            iisDebugOut((LOG_TYPE_TRACE, _T("%s=1.FrontPage Installation.\n"),sz_PreviousIISVersion_string));
            goto SetUpgradeType_Exit;
        }
    }

    //
    // This could be an upgrade from WinNT 3.51
    // which could have an FTPSVC installed.
    // if it's here then install ftp.
    // Software\Microsoft\FTPSVC
    //
    {
    CRegKey regNT351FTP(HKEY_LOCAL_MACHINE, _T("Software\\Microsoft\\FTPSVC"), KEY_READ);
    if ((HKEY) regNT351FTP)
    {
        m_eUpgradeType = UT_351;
        m_eInstallMode = IM_UPGRADE;
        m_bUpgradeTypeHasMetabaseFlag = FALSE;
        m_bPleaseDoNotInstallByDefault = FALSE;
        iReturn = TRUE;
        iisDebugOut((LOG_TYPE_TRACE, _T("%s=NT351.ftp.\n"),sz_PreviousIISVersion_string));
        goto SetUpgradeType_Exit;
    }
    }

    // if we get here...then
    // 1. we were not able to open the inetsrv reg
    // 2. did not find an old pws 1.0 installation
    // 3. did not find an old frontpg pws installation.
    // 4. did not find nt 3.51 FTPSVC installed.

    // since this is supposed to set the upgrade type, and there is nothing to upgrade...
    // then we will Not install.....
    //iisDebugOut((LOG_TYPE_PROGRAM_FLOW, _T("FRESH FRESH FRESH\n")));
    m_eInstallMode = IM_UPGRADE;
    m_eUpgradeType = UT_NONE;
    m_bUpgradeTypeHasMetabaseFlag = FALSE;
    m_bPleaseDoNotInstallByDefault = TRUE;
    iisDebugOut((LOG_TYPE_TRACE, _T("%s=None.\n"),sz_PreviousIISVersion_string));
    iReturn = FALSE;

SetUpgradeType_Exit:
    return iReturn;
}


int CInitApp::Check_Custom_InetPub(void)
{
    int iReturn = FALSE;
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szValue0[_MAX_PATH] = _T("");
    TCHAR szValue[_MAX_PATH] = _T("");

    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return iReturn;}

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // InetPub
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("PathInetpub"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}
        if (IsValidDirectoryName(szValue))
        {
            iisDebugOut((LOG_TYPE_TRACE, _T("Check_Custom_InetPub:PathInetpub=%s\n"),szValue));
            m_csPathInetpub = szValue;
            iReturn = TRUE;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_PATH_INETPUB;
        }
        else
        {
            iisDebugOut((LOG_TYPE_WARN, _T("Check_Custom_InetPub:PathInetpub=%s.Not Valid.ignoring unattend value. WARNING.\n"),szValue));
        }
    }
    return iReturn;
}


void CInitApp::Check_Unattend_Settings(void)
{
    // if there are unattended values specified for the ftp or www root,
    // then set them here.
    Check_Custom_WWW_or_FTP_Path();
    DeriveInetpubFromWWWRoot();

    // Check if there is an alternate iis.inf specified in the unattend file.
    // this way the user can change sections in the iis.inf file without changing the iis.inf file itself
    Check_Custom_IIS_INF();

    // Check if the user wants to use a specific iusr\iwam name.
    Check_Custom_Users();

    // Check if user wants applications setup in inprocess by default (not pooled out of process)

    return;
}

void Check_Custom_Users(void)
{
    INFCONTEXT Context;
    TCHAR szSectionName[_MAX_PATH];
    TCHAR szValue0[_MAX_PATH] = _T("");
    TCHAR szValue[_MAX_PATH] = _T("");

    // Do this only if unattended install
    if (!g_pTheApp->m_fUnattended) {return;}

    // The section name to look for in the unattended file
    _tcscpy(szSectionName, UNATTEND_FILE_SECTION);

    //
    // IUSR:  BOTH FTP AND WWW
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        if (_tcsicmp(szValue, _T("")) != 0)
        {
            // assign it to the appropriate member variables.
            g_pTheApp->m_csWWWAnonyName_Unattend = szValue;
            g_pTheApp->m_csFTPAnonyName_Unattend = szValue;

            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WWW_USER_NAME;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_FTP_USER_NAME;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr specified for ftp/www\n")));
        }
    }

    //
    // IUSR:  BOTH FTP AND WWW password
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR_PASS"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        // assign it to the appropriate member variables.
        if (_tcsicmp(szValue, _T("")) != 0)
        {
            g_pTheApp->m_csWWWAnonyPassword_Unattend = szValue;
            g_pTheApp->m_csFTPAnonyPassword_Unattend = szValue;

            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WWW_USER_PASS;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_FTP_USER_PASS;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr pass specified for ftp/www\n"))); 
        }
    }

    //
    // IUSR: FTP
    // If there a value specified here, then it will override the one taken from "IUSR"
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR_FTP"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        if (_tcsicmp(szValue, _T("")) != 0)
        {
            // assign it to the appropriate member variables.
            g_pTheApp->m_csFTPAnonyName_Unattend = szValue;
            //g_pTheApp->m_csFTPAnonyPassword_Unattend = _T("");

            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_FTP_USER_NAME;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr specified for ftp\n"))); 
        }
    }
    //
    // IUSR: FTP password
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR_FTP_PASS"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        if (_tcsicmp(szValue, _T("")) != 0)
        {
            // assign it to the appropriate member variables.
            g_pTheApp->m_csFTPAnonyPassword_Unattend = szValue;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_FTP_USER_PASS;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr pass specified for ftp\n"))); 
        }
    }

    //
    // IUSR: WWW
    // If there a value specified here, then it will override the one taken from "IUSR"
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR_WWW"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}
        // assign it to the appropriate member variables.
        g_pTheApp->m_csWWWAnonyName_Unattend = szValue;
        g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WWW_USER_NAME;
        //g_pTheApp->m_csWWWAnonyPassword_Unattend = _T("");
        iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr specified for www\n"))); 
    }
    //
    // IUSR: WWW password
    // If there a value specified here, then it will override the one taken from "IUSR"
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IUSR_WWW_PASS"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        if (_tcsicmp(szValue, _T("")) != 0)
        {
            // assign it to the appropriate member variables.
            g_pTheApp->m_csWWWAnonyPassword_Unattend = szValue;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WWW_USER_PASS;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iusr pass specified for www\n"))); 
        }
    }

    //
    // IWAM: WWW
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IWAM"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        // assign it to the appropriate member variables.
        g_pTheApp->m_csWAMAccountName_Unattend = szValue;
        //g_pTheApp->m_csWAMAccountPassword_Unattend = _T("");
        g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WAM_USER_NAME;

        iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iwam specified\n"))); 
    }
    //
    // IWAM: WWW password
    //
    *szValue = NULL;
    if ( SetupFindFirstLine_Wrapped(g_pTheApp->m_hUnattendFile, szSectionName, _T("IWAM_PASS"), &Context) ) 
        {SetupGetStringField(&Context, 1, szValue, _MAX_PATH, NULL);}
    if (*szValue)
    {
        // check szValue for an string substitutions...
        // %windir%, etc...
        _tcscpy(szValue0, szValue);
        if (!ExpandEnvironmentStrings( (LPCTSTR)szValue0, szValue, sizeof(szValue)/sizeof(TCHAR)))
            {_tcscpy(szValue,szValue0);}

        if (_tcsicmp(szValue, _T("")) != 0)
        {
            // assign it to the appropriate member variables.
            g_pTheApp->m_csWAMAccountPassword_Unattend = szValue;
            g_pTheApp->dwUnattendConfig |= USER_SPECIFIED_INFO_WAM_USER_PASS;

            iisDebugOut((LOG_TYPE_TRACE, _T("(unattend) Custom iwam pass specified\n"))); 
        }
    }

    return;
}


// reads the registry and fills up the list
void CInitApp::UnInstallList_RegRead()
{
    int iGetOut = FALSE;
    CString csBoth;
    CString csKey;
    CString csData;

    CRegKey regInetstp( HKEY_LOCAL_MACHINE, REG_INETSTP, KEY_READ);
    if ((HKEY) regInetstp)
    {
        int iPosition1;
        int iPosition2;
        int iPosition3;
        int iLength;
        CString csUninstallInfo;
        LONG lReturnedErrCode = regInetstp.QueryValue( REG_SETUP_UNINSTALLINFO, csUninstallInfo);
        if (lReturnedErrCode == ERROR_SUCCESS)
        {
            // add a "," to the end for parsing...
            iLength = csUninstallInfo.GetLength();
            if (iLength == 0)
            {
                goto UnInstallList_RegRead_Exit;
            }
            csUninstallInfo += _T(",");

            iPosition1 = 0;
#ifdef _CHICAGO_
            // quick fix so that it compiles under ansi
            // i guess Find(parm1,parm2) under ansi doesn't take 2 parms
#else
            iPosition1 = 0;
            iPosition2 = csUninstallInfo.Find(_T(','),iPosition1);
            iPosition3 = csUninstallInfo.Find(_T(','),iPosition2+1);
            if (-1 == iPosition3){iPosition3 = iLength + 1;}
            
            // loop thru and add to our list!
            iGetOut = FALSE;
            while (iGetOut == FALSE)
            {
                csKey = csUninstallInfo.Mid(iPosition1, iPosition2 - iPosition1);
                csData = csUninstallInfo.Mid(iPosition2+1, iPosition3 - (iPosition2 + 1));
                csKey.MakeUpper(); // uppercase the key
                //iisDebugOut((LOG_TYPE_TRACE, _T("  UnInstallList_RegRead: %s=%s\n"),csKey,csData));

                // add to our list
                m_cmssUninstallMapList.SetAt(csKey, csData);

                iPosition1 = iPosition3+1;
                iPosition2 = csUninstallInfo.Find(_T(','),iPosition1);
                if (-1 == iPosition2){iGetOut = TRUE;}
                
                iPosition3 = csUninstallInfo.Find(_T(','),iPosition2+1);
                if (-1 == iPosition3)
                {
                    iPosition3 = iLength + 1;
                    iGetOut = TRUE;
                }
            }
#endif
        }
    }
UnInstallList_RegRead_Exit:
    m_fUninstallMapList_Dirty = FALSE;
    return;
}

void CInitApp::UnInstallList_RegWrite()
{
    int i = 0;
    POSITION pos;
    CString csKey;
    CString csData;
    CString csAllData;
    csAllData = _T("");

    if (TRUE == m_fUninstallMapList_Dirty)
    {
        // loop thru the list to see if, we already have this entry
        if (m_cmssUninstallMapList.IsEmpty())
        {
            CRegKey regInetstp(REG_INETSTP,HKEY_LOCAL_MACHINE);
            if ((HKEY) regInetstp)
                {regInetstp.DeleteValue(REG_SETUP_UNINSTALLINFO);}
            //iisDebugOut((LOG_TYPE_TRACE, _T("  UnInstallList_RegWrite: empty\n")));
        }
        else
        {
            pos = m_cmssUninstallMapList.GetStartPosition();
            while (pos)
            {
                i++;
                csKey.Empty();
                csData.Empty();
                m_cmssUninstallMapList.GetNextAssoc(pos, csKey, csData);
                if (i > 1)
                {
                    csAllData += _T(",");
                }
                csAllData += csKey;
                csAllData += _T(",");
                csAllData += csData;
            }
            // write out csAllData
            CRegKey regInetstp(REG_INETSTP,HKEY_LOCAL_MACHINE);
            if ((HKEY) regInetstp)
            {
                regInetstp.SetValue(REG_SETUP_UNINSTALLINFO,csAllData);
            }
            else
            {
                iisDebugOut((LOG_TYPE_TRACE, _T("UnInstallList_RegWrite: failed! not writen!!!\n")));
            }
        }
    }
}

void CInitApp::UnInstallList_Add(CString csItemUniqueKeyName,CString csDataToAdd)
{
    CString csGottenValue;

    csItemUniqueKeyName.MakeUpper(); // uppercase the key
    if (TRUE == m_cmssUninstallMapList.Lookup(csItemUniqueKeyName, csGottenValue))
    {
        // found the key, replace the value
        m_cmssUninstallMapList.SetAt(csItemUniqueKeyName, csDataToAdd);
    }
    else
    {
        // add the key and value pair
        m_cmssUninstallMapList.SetAt(csItemUniqueKeyName, csDataToAdd);
    }

    iisDebugOut((LOG_TYPE_TRACE, _T("UnInstallList_Add:please addkey=%s,%s\n"),csItemUniqueKeyName,csDataToAdd));
    m_fUninstallMapList_Dirty = TRUE;
}

void CInitApp::UnInstallList_DelKey(CString csItemUniqueKeyName)
{
    iisDebugOut((LOG_TYPE_TRACE, _T("UnInstallList_DelKey:please delkey=%s\n"),csItemUniqueKeyName));
    csItemUniqueKeyName.MakeUpper(); // uppercase the key
    m_cmssUninstallMapList.RemoveKey(csItemUniqueKeyName);
    m_fUninstallMapList_Dirty = TRUE;
}


void CInitApp::UnInstallList_DelData(CString csDataValue)
{
    POSITION pos;
    CString csKey;
    CString csData;
    
    // loop thru the list to see if, we already have this entry
    if (m_cmssUninstallMapList.IsEmpty())
    {
    }
    else
    {
        pos = m_cmssUninstallMapList.GetStartPosition();
        while (pos)
        {
            csKey.Empty();
            csData.Empty();
            m_cmssUninstallMapList.GetNextAssoc(pos, csKey, csData);
            if ( _tcsicmp(csData, csDataValue) == 0)
            {
                UnInstallList_DelKey(csKey);
            }
        }
    }
}


void CInitApp::UnInstallList_Dump()
{
    POSITION pos;
    CString csKey;
    CString csData;
    
    // loop thru the list to see if, we already have this entry
    if (m_cmssUninstallMapList.IsEmpty())
    {
        //iisDebugOut((LOG_TYPE_TRACE, _T("  UnInstallList_Dump: empty\n")));
    }
    else
    {
        pos = m_cmssUninstallMapList.GetStartPosition();
        while (pos)
        {
            csKey.Empty();
            csData.Empty();
            m_cmssUninstallMapList.GetNextAssoc(pos, csKey, csData);
            iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("  UnInstallList_Dump: %s=%s\n"), csKey, csData));
        }
    }
}

// Get values from list into our Variables!
void CInitApp::UnInstallList_SetVars()
{
    POSITION pos;
    CString csKey;
    CString csData;
    
    // loop thru the list to see if, we already have this entry
    if (m_cmssUninstallMapList.IsEmpty())
    {
        //iisDebugOut((LOG_TYPE_TRACE, _T("  UnInstallList_Dump: empty\n")));
    }
    else
    {
        pos = m_cmssUninstallMapList.GetStartPosition();
        while (pos)
        {
            csKey.Empty();
            csData.Empty();
            m_cmssUninstallMapList.GetNextAssoc(pos, csKey, csData);

            if ( _tcsicmp(csKey, _T("IUSR_WAM")) == 0)
            {
                m_csWAMAccountName_Remove = csData;
                iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("UnInstallList_SetVars: m_csWAMAccountName_Remove=%s\n"), m_csWAMAccountName_Remove));
            }
            else if ( _tcsicmp(csKey, _T("IUSR_WWW")) == 0)
            {
                m_csWWWAnonyName_Remove = csData;
                iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("UnInstallList_SetVars: m_csWWWAnonyName_Remove=%s\n"), m_csWWWAnonyName_Remove));
            }
            else if ( _tcsicmp(csKey, _T("IUSR_FTP")) == 0)
            {
                m_csFTPAnonyName_Remove = csData;
                iisDebugOut((LOG_TYPE_TRACE_WIN32_API, _T("UnInstallList_SetVars: m_csFTPAnonyName_Remove=%s\n"), m_csFTPAnonyName_Remove));
            }
        }
    }
}


CString CInitApp::UnInstallList_QueryKey(CString csItemUniqueKeyName)
{
    CString csGottenValue;
    csGottenValue.Empty();

    csItemUniqueKeyName.MakeUpper(); // uppercase the key
    m_cmssUninstallMapList.Lookup(csItemUniqueKeyName, csGottenValue);

    return csGottenValue;
}