kvirc/src/modules/setup/setupwizard.cpp

//===============================================================================
//
//   File : setupwizard.cpp
//   Creation date : Sat Oct  6 02:06:53 2001 GMT by Szymon Stefanek
//
//   This file is part of the KVirc irc client distribution
//   Copyright (C) 2001-2004 Szymon Stefanek (pragma at kvirc dot net)
//
//   This program is FREE software. You can redistribute it and/or
//   modify it under the terms of the GNU General Public License
//   as published by the Free Software Foundation; either version 2
//   of the License, or (at your opinion) any later version.
//
//   This program is distributed in the HOPE that it will be USEFUL,
//   but WITHOUT ANY WARRANTY; without even the implied warranty of
//   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
//   See the GNU General Public License for more details.
//
//   You should have received a copy of the GNU General Public License
//   along with this program. If not, write to the Free Software Foundation,
//   Inc. ,51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
//
//==============================================================================

bool g_bFoundMirc;

#include "setupwizard.h"

#include "kvi_app.h"
#include "kvi_locale.h"
#include "kvi_fileutils.h"
#include "kvi_defaults.h"
#include "kvi_msgbox.h"
#include "kvi_tal_filedialog.h"
#include "kvi_qstring.h"
#include "kvi_env.h"
#include "kvi_options.h"
#include "kvi_config.h"

#include <kvi_tal_textedit.h>
#include <tqmessagebox.h>
#include <tqdir.h>
#include <tqpushbutton.h>
#include <tqvalidator.h>
#include <tqtextcodec.h>
#include <tqlayout.h>
#include "kvi_tal_hbox.h" 

#ifdef COMPILE_ON_WINDOWS
	#include <windows.h>
	#include <winnls.h>  // for MultiByteToWideChar
	#include <objbase.h> // CoCreateInstance , CoInitialize & CO.
	#include <shlobj.h>  // IShellLink IPersistFile & CO.
#else
	#include <unistd.h>  // for symlink()
#endif

#ifdef COMPILE_USE_QT4
	#include <TQDesktopWidget>
#endif

// libkvisetup.cpp
extern TQString g_szChoosenIncomingDirectory;
//extern int g_iThemeToApply;
extern bool bNeedToApplyDefaults;
extern unsigned int uPort;
extern TQString szHost;
extern TQString szUrl;
extern TQString szMircServers;
extern TQString szMircIni;

#ifdef COMPILE_ON_WINDOWS
	#define KVI_LOCAL_KVIRC_SUBDIRECTORY_NAME "KVIrc"
#else
	#define KVI_LOCAL_KVIRC_SUBDIRECTORY_NAME ".kvirc"
#endif

KviSetupPage::KviSetupPage(KviSetupWizard * w)
: TQWidget(w)
{
	TQGridLayout * g = new TQGridLayout(this);

	//setBackgroundColor(TQColor(255,0,0));

	// we need this to set localized text on buttons (see QT doc/ KviTalWizard class)
	w->KviTalWizard::backButton()->setText(__tr2qs("< &Back"));
	w->KviTalWizard::nextButton()->setText(__tr2qs("&Next >"));
	w->KviTalWizard::finishButton()->setText(__tr2qs("Finish"));
	w->KviTalWizard::cancelButton()->setText(__tr2qs("Cancel"));
	//w->KviTalWizard::helpButton()->setText(__tr2qs("Help"));

	m_pPixmapLabel = new TQLabel(this);
	g->addWidget(m_pPixmapLabel,0,0);

	m_pPixmapLabel->setPixmap(*(w->m_pLabelPixmap));
	m_pPixmapLabel->setFixedSize(w->m_pLabelPixmap->size());
	m_pPixmapLabel->setFrameStyle(TQFrame::Sunken | TQFrame::StyledPanel);
	m_pPixmapLabel->setMargin(0);

	g->setSpacing(8);
	g->setMargin(0);

	m_pVBox = new KviTalVBox(this);
	m_pVBox->setSpacing(4);
	m_pVBox->setMargin(0);
	//m_pVBox->setSizePolicy(TQSizePolicy(TQSizePolicy::Expanding));
	//m_pVBox->setBackgroundColor(TQColor(0,80,0));
	//m_pVBox->setMaximumHeight(450);
	g->addWidget(m_pVBox,0,1);
	
	g->setColStretch(1,1);

	TQLabel * l = new TQLabel(m_pVBox);
	l->setAlignment(TQt::AlignAuto | TQt::AlignTop);
	/*
	TQString szHeader = "<table border=\"0\" cellpadding=\"4\" cellspacing=\"0\" style=\"margin:0px;padding:0px;\" width=\"100%\"><tr><td bgcolor=\"#303030\">" \
			"<h1><font color=\"#FFFFFF\">KVIrc " KVI_VERSION "</font></h1>" \
			"</td></tr></table>";
	*/
	TQString szHeader = "<h1><font color=\"#FFFFFF\">&nbsp;KVIrc " KVI_VERSION "</font></h1>";
	l->setText(szHeader);
	l->setFrameStyle(TQFrame::Sunken | TQFrame::StyledPanel);
	l->setAlignment(TQt::AlignAuto | TQt::AlignVCenter);
	l->setMargin(0);
	l->setBackgroundColor(TQColor(48,48,48));

	m_pTextLabel = new TQLabel(m_pVBox);
#ifdef COMPILE_USE_QT4
	m_pTextLabel->setWordWrap(true);
#endif
	m_pTextLabel->setAlignment(TQt::AlignJustify | TQt::AlignTop);
	m_pVBox->setStretchFactor(m_pTextLabel,1);
}

KviSetupPage::~KviSetupPage()
{
}


KviSetupWizard::KviSetupWizard()
: KviTalWizard(0)
{
	setModal(true);

	g_bFoundMirc = false;
	TQString szLabelText;

	TQString szImagePath;
	g_pApp->getGlobalKvircDirectory(szImagePath,KviApp::Pics,"kvi_setup_label.png");

	m_pLabelPixmap = new TQPixmap(szImagePath);
	if(m_pLabelPixmap->isNull())
	{
		delete m_pLabelPixmap;
		m_pLabelPixmap = new TQPixmap(250,450);
	}

	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Welcome

	m_pWelcome = new KviSetupPage(this);

	// here we go...
	TQString szText  = __tr2qs("<p>" \
			"<h2>Welcome :)</h2>" \
			"This is your first time running this version of KVIrc.<br>" \
			"This wizard will guide you through the few steps " \
			"required to complete the setup.<br><br>" \
			"If you had a previous version of KVIrc installed, no worries. You will " \
			"have a chance to preserve the old configuration." \
			"</p>" \
			"<p>Click \"<b>Next</b>\" to proceed.</p>");

	m_pWelcome->m_pTextLabel->setText(szText);

	addPage(m_pWelcome,__tr2qs("Welcome to KVIrc"));

	setBackEnabled(m_pWelcome,false);
	setHelpEnabled(m_pWelcome,false);


	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// License
#ifndef COMPILE_ON_WINDOWS //it have been already shown by installer
	KviSetupPage * m_pLicense = new KviSetupPage(this);
	m_pLicense->m_pTextLabel->setText(__tr2qs( \
			"<p>All of the files in this distribution are covered by the GPL. " \
			"In human terms this can be read as follows:<br>" \
			"<ul>" \
			"<li><b>KVIrc is free</b>, use it, have fun! <b>:)</b></li>" \
			"<li>If you use <b>any</b> part of KVIrc in your own project, you <b>must</b> release that project under the same license.</li>" \
			"</ul></p>" \
			"<p>The \"legalese\" version of the license is shown in the box below.</p>"));

	KviTalTextEdit * ed = new KviTalTextEdit(m_pLicense->m_pVBox);
	ed->setReadOnly(true);
	ed->setWordWrap(KviTalTextEdit::NoWrap);
	TQString szLicense;
	TQString szLicensePath;
	g_pApp->getGlobalKvircDirectory(szLicensePath,KviApp::License,"EULA");
	if(!KviFileUtils::loadFile(szLicensePath,szLicense))
	{
		szLicense = __tr("Oops... can't find the license file.\n" \
						"It MUST be included in the distribution...\n" \
						"Please report to <pragma at kvirc dot net>");
	}
	ed->setText(szLicense);
	
	m_pLicense->m_pVBox->setStretchFactor(ed,1);

	addPage(m_pLicense,__tr2qs("Dreaded License Agreement"));

	setHelpEnabled(m_pLicense,false);

	setCaption(__tr2qs("KVIrc Setup"));
#else
	m_pLicense = 0;
#endif
/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Directories

	m_pDirectory = new KviSetupPage(this);

	m_pDirectory->m_pTextLabel->setText(__tr2qs("<p>Please choose a folder for " \
		"KVIrc to store its settings and other data, and another for downloaded files. " \
		"Make sure that you have permission to write to both folders.<br><br>" \
		"The suggested locations are fine in most cases, so if you don't know what " \
		"is this about, just click \"<b>Next</b>\".<br><br>" \
		"If you had a previous version of KVIrc installed, you can choose " \
		"the existing directory for the settings, and your configuration " \
		"will be preserved." \
		"</p>"));

	addPage(m_pDirectory,__tr2qs("Application Folders"));

	TQString tmp;

	m_pDirButtonGroup = new KviTalVButtonGroup(__tr2qs("Store configuration in folder"),m_pDirectory->m_pVBox);
	m_pDirUsePrev = new TQRadioButton(__tr2qs("Use settings folder from previous installation"),m_pDirButtonGroup);
	connect(m_pDirUsePrev,TQT_SIGNAL(clicked()),this,TQT_SLOT(oldDirClicked()));
	
	m_pOldPathBox = new KviTalHBox(m_pDirButtonGroup);
	m_pOldDataPathEdit = new TQLineEdit(m_pOldPathBox);
	connect(m_pOldDataPathEdit,TQT_SIGNAL(textChanged ( const TQString & )),this,TQT_SLOT(oldDataTextChanged ( const TQString & )));
	
	TQPushButton * pb = new TQPushButton(__tr2qs("&Browse..."),m_pOldPathBox);
	connect(pb,TQT_SIGNAL(clicked()),this,TQT_SLOT(chooseOldDataPath()));
	m_pOldPathBox->setSpacing(3);
	m_pOldPathBox->setStretchFactor(m_pOldDataPathEdit,1);
	
	m_pDirUseNew = new TQRadioButton(__tr2qs("Use new settings folder"),m_pDirButtonGroup);
	connect(m_pDirUseNew,TQT_SIGNAL(clicked()),this,TQT_SLOT(newDirClicked()));
	
	TQLabel* l = new TQLabel(m_pDirButtonGroup);
	l->setText(__tr2qs("Settings folder:"));

	m_pNewPathBox = new KviTalHBox(m_pDirButtonGroup);
	m_pDataPathEdit = new TQLineEdit(m_pNewPathBox);
	
	pb = new TQPushButton(__tr2qs("&Browse..."),m_pNewPathBox);
	connect(pb,TQT_SIGNAL(clicked()),this,TQT_SLOT(chooseDataPath()));

	m_pNewPathBox->setSpacing(3);
	m_pNewPathBox->setStretchFactor(m_pDataPathEdit,1);

#ifdef COMPILE_ON_WINDOWS
	tmp = TQTextCodec::codecForLocale()->toUnicode(getenv( "APPDATA" ));
	if(tmp.isEmpty())
		tmp = TQDir::homeDirPath();
#else 
	tmp = TQDir::homeDirPath();
#endif //COMPILE_ON_WINDOWS
	KviTQString::ensureLastCharIs(tmp,KVI_PATH_SEPARATOR_CHAR);
	tmp.append(KVI_LOCAL_KVIRC_SUBDIRECTORY_NAME);
	KviFileUtils::adjustFilePath(tmp);
	m_pDataPathEdit->setText(tmp);



	l = new TQLabel(m_pDirButtonGroup);
	l->setText(__tr2qs("Download files to folder:"));


	m_pNewIncomingBox = new KviTalHBox(m_pDirButtonGroup);

	m_pIncomingPathEdit = new TQLineEdit(m_pNewIncomingBox);
	
	pb = new TQPushButton(__tr2qs("&Browse..."),m_pNewIncomingBox);
	connect(pb,TQT_SIGNAL(clicked()),this,TQT_SLOT(chooseIncomingPath()));

	m_pNewIncomingBox->setSpacing(3);
	m_pNewIncomingBox->setStretchFactor(m_pIncomingPathEdit,1);

	tmp = TQDir::homeDirPath();
	KviTQString::ensureLastCharIs(tmp,KVI_PATH_SEPARATOR_CHAR);
	tmp.append(KVI_DEFAULT_INCOMING_SUBDIRECTORY_NAME);
	KviFileUtils::adjustFilePath(tmp);
	m_pIncomingPathEdit->setText(tmp);
	
	m_pDirUseNew->toggle();
	newDirClicked();

#ifdef COMPILE_ON_WINDOWS
	m_pDirMakePortable = new TQRadioButton(__tr2qs("All settings in  shared program folder (portable)")
			,m_pDirButtonGroup);
#endif
	// Pragma: Unused, takes only space.
	//m_pDirRestore = new TQRadioButton(__tr2qs("Restore from backup archive"),m_pDirButtonGroup);
	//m_pDirRestore->setEnabled(FALSE);
	
	//l = new TQLabel(m_pDirectory->m_pVBox,"<b> </b>");

	//m_pDirectory->m_pVBox->setStretchFactor(m_pDirectory->m_pTextLabel,1);

	setHelpEnabled(m_pDirectory,false);

	connect(m_pDataPathEdit,TQT_SIGNAL(textChanged ( const TQString & )),this,TQT_SLOT(newDataTextChanged ( const TQString & )));
	connect(m_pIncomingPathEdit,TQT_SIGNAL(textChanged ( const TQString & )),this,TQT_SLOT(newIncomingTextChanged ( const TQString & )));

	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Identity

	m_pIdentity = new KviSetupPage(this);

	m_pIdentity->m_pTextLabel->setText(__tr2qs("Please choose a Nickname.<br><br>" \
		"Your nickname is the name that other IRC users will know you by. " \
		"It can't contain spaces or punctuation. Some IRC networks will shorten your nickname if it is more than 32 characters " \
		"long.<br><br>"
		"If in doubt, just enter the first nick that comes to mind. " \
		"You will be able to change it later in the Identity properties, or with the /NICK command."));

	TQString nick;
	char * nnn = kvi_getenv("USER");
	if(nnn)nick = nnn;
	else nick = "newbie";
	if(nick.isEmpty())nick = "newbie";
	if(nick == "root")nick = "newbie";
//m_pIdentity->m_pVBox
//__tr2qs("Basic Properties")
	KviTalGroupBox * gbox = new KviTalGroupBox(1,Qt::Horizontal,TQString(),m_pIdentity->m_pVBox);

	m_pNickSelector = new KviStringSelector(gbox,__tr2qs("Nickname:"),&(KVI_OPTION_STRING(KviOption_stringNickname1)),true);
	m_pNickSelector->setMinimumLabelWidth(120);
	
	TQValidator * v = new TQRegExpValidator(TQRegExp("[^-0-9 ][^ ]*"),TQT_TQOBJECT(gbox));
	m_pNickSelector->setValidator(v);

	TQString szOptionalCtcpUserInfo = __tr2qs("This field is optional and will appear as part of the CTCP USERINFO reply.");
	TQString szCenterBegin("<center>");
	TQString szCenterEnd("</center>");
	TQString szTrailing = "<br><br>" + szOptionalCtcpUserInfo + szCenterEnd;

	gbox = new KviTalGroupBox(1,Qt::Horizontal,__tr2qs("Profile"),m_pIdentity->m_pVBox);

	m_pRealNameSelector = new KviStringSelector(gbox,__tr2qs("Real name:"),&(KVI_OPTION_STRING(KviOption_stringRealname)),true);
	m_pRealNameSelector->setMinimumLabelWidth(120);

	KviTalHBox* hb = new KviTalHBox(gbox);
	hb->setSpacing(4);
	
	l = new TQLabel(__tr2qs("Age:"),hb);
	l->setMinimumWidth(120);
	
	m_pAgeCombo = new TQComboBox(hb);
	
	m_pAgeCombo->insertItem(__tr2qs("Unspecified"));
	unsigned int i;
	for(i=1;i<120;i++)
	{
		TQString tmp;
		tmp.setNum(i);
		m_pAgeCombo->insertItem(tmp);
	}

	bool bOk;
	i = KVI_OPTION_STRING(KviOption_stringCtcpUserInfoAge).toUInt(&bOk);
	if(!bOk)i = 0;
	if(i > 120)i = 120;
	m_pAgeCombo->setCurrentItem(i);

	hb->setStretchFactor(m_pAgeCombo,1);


	hb = new KviTalHBox(gbox);
	hb->setSpacing(4);
	
	l = new TQLabel(__tr2qs("Gender:"),hb);
	l->setMinimumWidth(120);

	m_pGenderCombo = new TQComboBox(hb);

	m_pGenderCombo->insertItem(__tr2qs("Unspecified"));
	m_pGenderCombo->insertItem(__tr2qs("Female"));
	m_pGenderCombo->insertItem(__tr2qs("Male"));

	if(KviTQString::equalCI(KVI_OPTION_STRING(KviOption_stringCtcpUserInfoGender),"Male"))
		m_pGenderCombo->setCurrentItem(2);
	else if(KviTQString::equalCI(KVI_OPTION_STRING(KviOption_stringCtcpUserInfoGender),"Female"))
		m_pGenderCombo->setCurrentItem(1);
	else
		m_pGenderCombo->setCurrentItem(0);

	hb->setStretchFactor(m_pGenderCombo,1);

	m_pLocationSelector = new KviStringSelector(gbox,__tr2qs("Location:"),&(KVI_OPTION_STRING(KviOption_stringCtcpUserInfoLocation)),true);
	m_pLocationSelector->setMinimumLabelWidth(120);

	m_pLanguagesSelector = new KviStringSelector(gbox,__tr2qs("Languages:"),&(KVI_OPTION_STRING(KviOption_stringCtcpUserInfoLanguages)),true);
	m_pLanguagesSelector->setMinimumLabelWidth(120);

	//m_pOtherInfoSelector = new KviStringSelector(gbox,__tr2qs("Other:"),&(KVI_OPTION_STRING(KviOption_stringCtcpUserInfoOther)),true);
	//m_pOtherInfoSelector->setMinimumLabelWidth(120);

	addPage(m_pIdentity,__tr2qs("Identity"));

	//l = new TQLabel(m_pIdentity->m_pVBox,"<b> </b>");

	setHelpEnabled(m_pIdentity,false);

	
	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Default theme
/*	m_pTheme = new KviSetupPage(this);
	m_pTheme->m_pTextLabel->setText(__tr2qs( \
		"<p>Here you can choose the default appearance of KVIrc.<br><br>" \
		"The Fancy Theme uses icons, a transparent background and a lot of colors. " \
		"The Minimalist Theme is designed for low-color displays " \
		"or for \"console\" extremists; it's more or less white text on a black background.<br><br>" \
		"If you had a previous version of KVIrc installed, you can choose to not apply any theme " \
		"in order to preserve your current visual settings.<br><br>" \
		"If you don't know what to choose, just use the default.</p>"));

	m_pThemeButtonGroup = new KviTalVButtonGroup(m_pTheme->m_pVBox);
	
	KviTalHBox* pThemesHb = new KviTalHBox(m_pThemeButtonGroup);

	KviTalVBox* pThemesVb = new KviTalVBox(pThemesHb);
	
	TQString szThemeImagePath;
	g_pApp->getGlobalKvircDirectory(szThemeImagePath,KviApp::Pics,"kvi_setup_theme_hires.png");
	
	TQPixmap* pHiResPixmap = new TQPixmap(szThemeImagePath);
	if(pHiResPixmap->isNull())
	{
		delete pHiResPixmap;
		pHiResPixmap= new TQPixmap(250,200);
	}
	
	TQLabel* pPixmapLabelHiRes = new TQLabel(pThemesVb);

	pPixmapLabelHiRes->setPixmap(*pHiResPixmap);
	pPixmapLabelHiRes->setFixedSize(pHiResPixmap->size());
	pPixmapLabelHiRes->setFrameStyle(TQFrame::Sunken | TQFrame::StyledPanel);
	pPixmapLabelHiRes->setMargin(0);
	
	m_pThemeHiRes = new TQRadioButton(__tr2qs("&Fancy Theme"),pThemesVb);
	
	pThemesVb = new KviTalVBox(pThemesHb);
	g_pApp->getGlobalKvircDirectory(szThemeImagePath,KviApp::Pics,"kvi_setup_theme_lowres.png");
	TQPixmap* pLowResPixmap = new TQPixmap(szThemeImagePath);
	if(pLowResPixmap->isNull())
	{
		delete pLowResPixmap;
		pLowResPixmap= new TQPixmap(250,200);
	}
	
	TQLabel* pPixmapLabelLowRes = new TQLabel(pThemesVb);

	pPixmapLabelLowRes->setPixmap(*pLowResPixmap);
	pPixmapLabelLowRes->setFixedSize(pLowResPixmap->size());
	pPixmapLabelLowRes->setFrameStyle(TQFrame::Sunken | TQFrame::StyledPanel);
	pPixmapLabelLowRes->setMargin(0);
	
	m_pThemeLoRes  = new TQRadioButton(__tr2qs("&Minimalist Theme"),pThemesVb);
	m_pThemeNone = new TQRadioButton(__tr2qs("&Don't apply any theme"),m_pThemeButtonGroup);
	m_pThemeButtonGroup->insert(m_pThemeHiRes);
	m_pThemeButtonGroup->insert(m_pThemeLoRes);
	
	m_pThemeHiRes->setChecked(true);

	addPage(m_pTheme,__tr2qs("Default Theme"));

	setHelpEnabled(m_pTheme,false);*/

	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Desktop integration

	m_pDesktopIntegration = new KviSetupPage(this);

	szText  = __tr2qs( \
				"<p>" \
					"Here you can choose how much KVIrc will integrate with " \
					"your system." \
					"<br><br>" \
					"The default settings are fine for most users so if " \
					"you're in doubt just click \"<b>Next</b>\" and go to the next screen." \
				"</p>");

	m_pDesktopIntegration->m_pTextLabel->setText(szText);

	addPage(m_pDesktopIntegration,__tr2qs("Desktop Integration"));

#ifdef COMPILE_ON_WINDOWS
	m_pCreateUrlHandlers = new TQCheckBox(__tr2qs("Make KVIrc default IRC client"),m_pDesktopIntegration->m_pVBox);
	m_pCreateUrlHandlers->setChecked(true);
#endif
#ifdef COMPILE_TDE_SUPPORT
	m_pCreateDesktopShortcut = new TQCheckBox(__tr2qs("Create desktop shortcut"),m_pDesktopIntegration->m_pVBox);
	m_pCreateDesktopShortcut->setChecked(true);
#endif

#ifdef COMPILE_ON_WINDOWS
	m_pUseMircServerList = new TQRadioButton(__tr2qs("Import server list from mIRC"),m_pDesktopIntegration->m_pVBox);
	m_pUseMircServerList->setEnabled(false);
#endif

	setHelpEnabled(m_pDesktopIntegration,false);

	/*
	/////////////////////////////////////////////////////////////////////////////////////////////////////////////
	// Server config
	m_pServers = new KviSetupPage(this);

	m_pServers->m_pTextLabel->setText(__tr2qs( \
			"Now you should specify an IRC server, to be connected to it"));


	m_pServersButtonGroup = new KviTalVButtonGroup(__tr2qs("Choose a server to connect"),m_pServers->m_pVBox);
	
	m_pServersChooseFromList = new TQRadioButton(__tr2qs("Choose from built-in server list"),m_pServersButtonGroup);
	
	m_pServersSpecifyManually = new TQRadioButton(__tr2qs("Specify server manually"),m_pServersButtonGroup);
	hb = new KviTalHBox(m_pServersButtonGroup);
	
	m_uServerPort=6667;
	m_pServerHostSelector = new KviStringSelector(hb,__tr2qs("Server:"),&m_szServerHost,true);
	m_pServerPortSelector = new KviUIntSelector(hb,__tr2qs("Port:"),&m_uServerPort,1,65536,6667,true,false);
	
	
	m_pServersOpenIrcUrl = new TQRadioButton(__tr2qs("Open irc:// or irc6:// URL"),m_pServersButtonGroup);
	m_szServerUrl="irc://";
	m_pServerUrlSelector = new KviStringSelector(m_pServersButtonGroup,__tr2qs("URL:"),&m_szServerUrl,true);

	*/
/*
	m_pServersLoadConfig = new TQRadioButton(__tr2qs("Use server config"),m_pServersButtonGroup);
	m_pServersLoadConfig->setEnabled(FALSE);
	m_pServerConfigSelector = new KviFileSelector(m_pServersButtonGroup,__tr2qs("Config file:"),&m_szServerConfigFile,true);
	m_pServerConfigSelector->setEnabled(FALSE);
*/
	/*
	m_pServersChooseFromList->toggle();
	addPage(m_pServers,__tr2qs("Choose a server to connect"));
	*/
	setFinishEnabled(m_pDesktopIntegration,true);
	setHelpEnabled(m_pDesktopIntegration,false);

	// Preconfigured values
#ifdef COMPILE_ON_WINDOWS
	TQString szTmp;
	g_pApp->getGlobalKvircDirectory(szTmp,KviApp::Config,"preinstalled.kvc");
	if(KviFileUtils::fileExists(szTmp))
	{
		KviConfig cfg(szTmp,KviConfig::Read);
		cfg.setGroup("Setup");
		if(cfg.readBoolEntry("hideServerList",FALSE))
		{
			//setPageEnabled(m_pServers,false);
			//setFinishEnabled(m_pIdentity,true);
			KVI_OPTION_BOOL(KviOption_boolShowChannelsJoinOnIrc) = false;
			KVI_OPTION_BOOL(KviOption_boolShowServersConnectDialogOnStart) = false;
		}
		int iDir;
		iDir=cfg.readIntEntry("settingsDir",-1);
		if(iDir>0) {
			switch(iDir)
			{
				case 1:
					m_pDirUseNew->toggle();
					setPageEnabled(m_pDirectory,false);
					break;
				case 2:
					m_pDirMakePortable->toggle();
					setPageEnabled(m_pDirectory,false);
					break;
			}
		}
	}

	//mIRC import
	#define QUERY_BUFFER 2048
	char* buffer;
	DWORD len = QUERY_BUFFER;
	buffer = (char*)malloc(len*sizeof(char));
	HKEY hKey;
	TQString szMircDir;

	if(RegOpenKeyEx(HKEY_CLASSES_ROOT,"ChatFile\\DefaultIcon",0,KEY_READ,&hKey) == ERROR_SUCCESS )
	{
		if( RegQueryValueEx( hKey,0,0,0,(LPBYTE)buffer,&len) == ERROR_SUCCESS)
		{
			szMircDir = TQString::fromLocal8Bit(buffer,len);

			szMircDir.remove('"');
			TQString szMircFile = KviFileUtils::extractFileName(szMircDir);
			szMircFile = szMircFile.left(szMircFile.length()-4); //cut off ".exe"
			szMircDir = KviFileUtils::extractFilePath(szMircDir);

			szMircIni = szMircDir + "/" + szMircFile + ".ini";

			if(!KviFileUtils::fileExists(szMircIni))
				szMircIni = szMircDir + "/mirc.ini";

			if(!KviFileUtils::fileExists(szMircIni))
				szMircIni = szMircDir + "/pirc.ini";

			if(KviFileUtils::fileExists(szMircIni)){
				KviConfig cfg(szMircIni,KviConfig::Read,true);
				if(cfg.hasGroup("mirc"))
				{
					g_bFoundMirc = true;
					cfg.setGroup("mirc");
					m_pNickSelector->setText(cfg.readTQStringEntry("nick",KVI_OPTION_STRING(KviOption_stringNickname1)));
					m_pRealNameSelector->setText(cfg.readTQStringEntry("user",KVI_OPTION_STRING(KviOption_stringRealname)));
					KVI_OPTION_STRING(KviOption_stringNickname2) = 
						cfg.readTQStringEntry("anick",KVI_OPTION_STRING(KviOption_stringNickname2));
					KVI_OPTION_STRING(KviOption_stringUsername)  = 
						cfg.readTQStringEntry("email",KVI_OPTION_STRING(KviOption_stringUsername)).section('@',0,0);

					if(cfg.hasGroup("files"))
					{
						m_szMircServerIniFile = cfg.readTQStringEntry("servers","servers.ini");
						m_szMircServerIniFile.prepend('/');
						m_szMircServerIniFile.prepend(szMircDir);
						if(KviFileUtils::fileExists(m_szMircServerIniFile))
						{
							m_pUseMircServerList->setEnabled(true);
							m_pUseMircServerList->setChecked(true);
						}
					}
					//KviMessageBox::information(__tr2qs("Setup found existing mIRC installation. It will try to import "
					//	"some of mIRC settings and serverlist. If you don't want to do it, unselect import in setup pages"));
				}
			}
		}
	}
	free(buffer);

#endif

	//setMinimumSize(630,450);
}


KviSetupWizard::~KviSetupWizard()
{
	delete m_pLabelPixmap;
}

void KviSetupWizard::showEvent(TQShowEvent *e)
{
	int w = TQApplication::desktop()->width();
	int h = TQApplication::desktop()->height();

	int ww = width();
	int wh = height();

	if(w < 800)
	{
		// 640x480
		if(ww < 630)ww = 630;
	} else {
		if(ww < 770)ww = 770;
	}
	
	//wh = sizeHint().height();
	
	setGeometry((w - ww) / 2,(h - wh) / 2,ww,wh);

	KviTalWizard::showEvent(e);
}

void KviSetupWizard::oldDirClicked()
{
	m_pOldPathBox->setEnabled(true);
	m_pNewPathBox->setEnabled(false);
	m_pNewIncomingBox->setEnabled(false);
	
	if(m_pIdentity) setPageEnabled(m_pIdentity,false);
//	if(m_pTheme) setPageEnabled(m_pTheme,false);
	if(m_pServers) setPageEnabled(m_pServers,false);
	
	if(m_pOldDataPathEdit->text().isEmpty()) setNextEnabled(m_pDirectory,false);
	else setNextEnabled(m_pDirectory,true);
}

void KviSetupWizard::oldDataTextChanged ( const TQString & str)
{
	setNextEnabled(m_pDirectory,!str.isEmpty());
}

void KviSetupWizard::newDataTextChanged ( const TQString & str)
{
	setNextEnabled(m_pDirectory,!str.isEmpty() && !m_pIncomingPathEdit->text().isEmpty());
}

void KviSetupWizard::newIncomingTextChanged ( const TQString & str)
{
	setNextEnabled(m_pDirectory,!str.isEmpty() && !m_pDataPathEdit->text().isEmpty());
}

void KviSetupWizard::newDirClicked()
{
	m_pOldPathBox->setEnabled(false);
	m_pNewPathBox->setEnabled(true);
	m_pNewIncomingBox->setEnabled(true);
	
	if(m_pIdentity) setPageEnabled(m_pIdentity,true);
//	if(m_pTheme) setPageEnabled(m_pTheme,true);
	if(m_pServers) setPageEnabled(m_pServers,true);
	
	if(m_pDataPathEdit->text().isEmpty() || m_pIncomingPathEdit->text().isEmpty()) setNextEnabled(m_pDirectory,false);
	else setNextEnabled(m_pDirectory,true);
}
void KviSetupWizard::chooseOldDataPath()
{
	TQString szBuffer = KviTalFileDialog::getExistingDirectoryPath(m_pDataPathEdit->text(),__tr2qs("Choose an Old Configuration Folder - KVIrc Setup"),0);
	if(!szBuffer.isEmpty())
	{
		KviTQString::ensureLastCharIs(szBuffer,KVI_PATH_SEPARATOR_CHAR);
		if(!g_pApp->checkLocalKvircDirectory(szBuffer))
		{
			if(
				TQMessageBox::question(
				this,
				__tr2qs("Do not overwrite folder? - KVIrc"),
				tqtr("A folder %1 seems to be not a valid KVIrc settings folder."
					"Do you want to use it anyway?")
					.arg( szBuffer ),
				__tr2qs("&Yes"), __tr2qs("&No"),
				TQString(), 0, 1 ) == 0
			) {
				m_pOldDataPathEdit->setText(szBuffer);
			}
		} else {
			m_pOldDataPathEdit->setText(szBuffer);
		}
	}
}

void KviSetupWizard::chooseDataPath()
{
	TQString szBuffer = KviTalFileDialog::getExistingDirectoryPath(m_pDataPathEdit->text(),__tr2qs("Choose a Configuration Folder - KVIrc Setup"),0);
	if(!szBuffer.isEmpty())
	{
		KviTQString::ensureLastCharIs(szBuffer,KVI_PATH_SEPARATOR_CHAR);
		m_pDataPathEdit->setText(szBuffer);
	}
}

void KviSetupWizard::chooseIncomingPath()
{
	//TQString szBuffer = TQFileDialog::getExistingDirectory(m_pIncomingPathEdit->text(),0,0,__tr2qs("Choose the download folder"));
	TQString szBuffer = KviTalFileDialog::getExistingDirectoryPath(m_pIncomingPathEdit->text(),__tr2qs("Choose a Download Folder - KVIrc Setup"),0);
	if(!szBuffer.isEmpty())
	{
		m_pIncomingPathEdit->setText(szBuffer);
	}
}


void KviSetupWizard::makeLink()
{
#ifdef COMPILE_ON_WINDOWS
	// Let's make a link on the desktop :)
	// You need this horrible snippet of code to create a shortcut!!!!
	//
	// you have to:
	// - dig in the registry , 
	// - trigger the entire COM subsystem
	// - bring up a couple of OLE interfaces....
	// - use some obscure functions like MultiByteToWideChar
	// - and the finally drop the entire OLE+COM interface in the garbadge
	// ...
	// Isn't this horrible ? (compared to symlink()!)
	//

	// Well..let's go (please note that we don't handle most possible errors!
	// otherwise there would be 150 lines for a stupid symlink!)

	HKEY hCU;
    DWORD lpType;
    ULONG ulSize = MAX_PATH;
	char szLink[MAX_PATH];

	// Dig in the registry looking up the Desktop path
    if(RegOpenKeyEx(HKEY_CURRENT_USER,
		"Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders", 
		0,KEY_QUERY_VALUE,&hCU) == ERROR_SUCCESS)
	{
		RegQueryValueEx(hCU,"Desktop",NULL,&lpType,
        (unsigned char *)&szLink,&ulSize);
		RegCloseKey(hCU);
    }

	// Build our paths
	TQString szLinkTarget = szLink;
	szLinkTarget.append("\\kvirc.lnk");

	TQString szKvircExec = g_pApp->m_szGlobalKvircDir;
	szKvircExec.append("\\kvirc.exe");

	// Trigger a horrible machinery
	CoInitialize(NULL); // we need COM+OLE

	// Fiddle with an obscure shell interface
	IShellLink* psl;

    // Get a pointer to the IShellLink interface: this is kinda ugly :)
    if(CoCreateInstance(CLSID_ShellLink,NULL,CLSCTX_INPROC_SERVER,
				IID_IShellLink,(void **)&psl) == S_OK)
	{
		// just for fun , lookup another shell interface

		IPersistFile* ppf;

		// Query IShellLink for the IPersistFile interface for 
		// saving the shell link in persistent storage.
		if(psl->QueryInterface(IID_IPersistFile,(void **)&ppf) == S_OK)
		{
			WORD wsz[MAX_PATH];
			// Set the path to the shell link target.
			psl->SetPath(TQTextCodec::codecForLocale()->fromUnicode(szKvircExec).data());
			// Set the description of the shell link.
			psl->SetDescription("kvirc");
	        // Ensure string is ANSI.
			MultiByteToWideChar(CP_ACP,0,TQTextCodec::codecForLocale()->fromUnicode(szLinkTarget).data(),-1,(LPWSTR)wsz,MAX_PATH);
			// Save the link via the IPersistFile::Save method.
			ppf->Save((LPCOLESTR)wsz,true);    
			ppf->Release();
		}
		psl->Release();
	}
	// And throw OLE & Co. in the garbadge
	CoUninitialize();
#endif //COMPILE_ON_WINDOWS

#ifdef COMPILE_TDE_SUPPORT
	TQString tmp = TQDir::homeDirPath();
	KviTQString::ensureLastCharIs(tmp,KVI_PATH_SEPARATOR_CHAR);
	tmp.append("Desktop");
	KviTQString::ensureLastCharIs(tmp,KVI_PATH_SEPARATOR_CHAR);
	tmp.append("kvirc.desktop");

	TQString contents = "[Desktop Entry]\n" \
		"GenericName=IRC Client\n" \
		"Comment=Connect to Internet Relay Chat\n" \
		"Exec=kvirc -m %u\n" \
		"Icon=kvirc\n" \
		"MapNotify=true\n" \
		"Name=KVIrc 3\n" \
		"Terminal=false\n" \
		"Type=Application\n" \
		"X-KDE-SubstituteUID=false\n";

	KviFileUtils::writeFile(tmp,contents,false);
#endif //COMPILE_TDE_SUPPORT

}

void KviSetupWizard::setUrlHandlers()
{
#ifdef COMPILE_ON_WINDOWS
	TQString szReg = "REGEDIT4\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc]\r\n" \
		"@=\"URL:IRC Protocol\"\r\n" \
		"\"IRC Protocol\"=\"http://www.kvirc.net/\"\r\n" \
		"\"EditFlags\"=hex:02,00,00,00\r\n" \
		"\"URL Protocol\"=""\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc\\DefaultIcon]\r\n" \
		"@=\"\\\"@KVIRCEXECUTABLE@\\\"\"\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc\\shell]\r\n" \
		"@=\"\"\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc\\shell\\open]\r\n" \
		"\"EditFlags\"=hex:01,00,00,00\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc\\shell\\open\\command]\r\n" \
		"@=\"\\\"@KVIRCEXECUTABLE@\\\" %1\"\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc6]\r\n" \
		"@=\"URL:IRC6 Protocol\"\r\n" \
		"\"IRC6 Protocol\"=\"http://www.kvirc.net/\"\r\n" \
		"\"EditFlags\"=hex:02,00,00,00\r\n" \
		"\"URL Protocol\"=""\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc6\\DefaultIcon]\r\n" \
		"@=\"\\\"@KVIRCEXECUTABLE@\\\"\"\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc6\\shell]\r\n" \
		"@=\"\"\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc6\\shell\\open]\r\n" \
		"\"EditFlags\"=hex:01,00,00,00\r\n" \
		"\r\n" \
		"[HKEY_CLASSES_ROOT\\irc6\\shell\\open\\command]\r\n" \
		"@=\"\\\"@KVIRCEXECUTABLE@\\\" %1\"\r\n";

	TQString szKvircExec = g_pApp->m_szGlobalKvircDir;
	szKvircExec.append("\\kvirc.exe");
	szKvircExec.replace("\\","\\\\");

	szReg.replace("@KVIRCEXECUTABLE@",TQTextCodec::codecForLocale()->fromUnicode(szKvircExec));

	TQString szRegFile = g_pApp->m_szGlobalKvircDir;
	szRegFile.append("\\kvirc.reg");

	KviFileUtils::writeFile(szRegFile,szReg,false);

	TQString szCmd = "regedit /S \"";
	szCmd += szRegFile;
	szCmd += "\"";

	WinExec(TQTextCodec::codecForLocale()->fromUnicode(szCmd).data(),SW_SHOW);
#endif
}

void KviSetupWizard::reject()
{
	if(TQMessageBox::warning(this,__tr2qs("Abort Setup - KVIrc Setup"),
		__tr2qs("You have chosen to abort the setup.<br>KVIrc cannot run until you complete this procedure.<br><br>Do you really wish to abort?"),
		TQMessageBox::Yes,TQMessageBox::No|TQMessageBox::Default|TQMessageBox::Escape) != TQMessageBox::Yes)return;

	KviTalWizard::reject();
}

void KviSetupWizard::accept()
{
	TQString szDir;
	
	if(m_pDirUsePrev->isOn())
	{
		bNeedToApplyDefaults=false;
		g_pApp->m_szLocalKvircDir =  m_pOldDataPathEdit->text();
	} else {
		bNeedToApplyDefaults=true;
		if(m_pDirUseNew->isOn()) {
			szDir = m_pDataPathEdit->text();
		} 
#ifdef COMPILE_ON_WINDOWS
		else { //portable
			szDir = g_pApp->applicationDirPath()+KVI_PATH_SEPARATOR_CHAR+"Settings";
		}
#endif

		KviFileUtils::adjustFilePath(szDir);
		KviTQString::ensureLastCharIs(szDir,KVI_PATH_SEPARATOR_CHAR);
		if(!KviFileUtils::directoryExists(szDir))
		{
			if(!KviFileUtils::makeDir(szDir))
			{
				KviMessageBox::warning(__tr("Cannot create directory %s.\n" \
					"You may not have write permission " \
					"for that path. Please go back and choose another directory."));
				setCurrentPage(m_pDirectory);
				return;
			}
		} /*else {
			kvi_infoBox(__tr("Kvirc setup"),
				__tr("The directory '%s' already exists.\n" \
				"(maybe from a previous Kvirc installation)\n"\
				"If you experience any problems try deleting the old directory:\n" \
				"the setup program will be started automatically again."),szDir.ptr());
		}*/
	
		g_pApp->m_szLocalKvircDir = szDir;
		KviFileUtils::adjustFilePath(g_pApp->m_szLocalKvircDir);

		if(m_pDirUseNew->isOn()) {
			szDir = m_pIncomingPathEdit->text();
		} 
#ifdef COMPILE_ON_WINDOWS
		else { //portable
			szDir = g_pApp->applicationDirPath()+KVI_PATH_SEPARATOR_CHAR+"Downloads";
		}
#endif

		KviFileUtils::adjustFilePath(szDir);
		if(!KviFileUtils::directoryExists(szDir))
		{
			if(!KviFileUtils::makeDir(szDir))
			{
				KviMessageBox::warning(__tr("Cannot create directory %s.\n" \
					"You may not have write permission " \
					"for that path. Please go back and choose another directory."));
				setCurrentPage(m_pDirectory);
				return;
			}
		}

		g_szChoosenIncomingDirectory = szDir;
	
#ifndef COMPILE_ON_WINDOWS
		// Make local->global link
		TQString localPath = TQString("%1/global").arg(g_pApp->m_szLocalKvircDir);
		unlink(TQTextCodec::codecForLocale()->fromUnicode(localPath).data());
		symlink(TQTextCodec::codecForLocale()->fromUnicode(g_pApp->m_szGlobalKvircDir).data(),TQTextCodec::codecForLocale()->fromUnicode(localPath).data());
#endif
	
#ifdef COMPILE_TDE_SUPPORT
		if(m_pCreateDesktopShortcut->isChecked())
			makeLink();
#endif
	
#ifdef COMPILE_ON_WINDOWS
		if(m_pCreateUrlHandlers->isChecked())
			setUrlHandlers();
#endif
	
/*		if(m_pTheme)
		{
			if(m_pThemeButtonGroup->selected() == m_pThemeHiRes)
			{
				g_iThemeToApply = THEME_APPLY_HIRES;
			} else if(m_pThemeButtonGroup->selected() == m_pThemeLoRes)
			{
				g_iThemeToApply = THEME_APPLY_LORES;
			} else {
				g_iThemeToApply = THEME_APPLY_NONE;
			}
		}
*/		
		if(m_pIdentity)
		{
			m_pNickSelector->commit();
			m_pRealNameSelector->commit();
			m_pLocationSelector->commit();
			m_pLanguagesSelector->commit();
			//m_pOtherInfoSelector->commit();
			
			KVI_OPTION_STRING(KviOption_stringNickname1).stripWhiteSpace();
			KVI_OPTION_STRING(KviOption_stringNickname1).replace(" ","");
			
			if(KVI_OPTION_STRING(KviOption_stringNickname1).length() > 32)
			{
				TQString tmp = KVI_OPTION_STRING(KviOption_stringNickname1).left(32);
				KVI_OPTION_STRING(KviOption_stringNickname1) = tmp;
			}
		
			if(KVI_OPTION_STRING(KviOption_stringNickname1).isEmpty())KVI_OPTION_STRING(KviOption_stringNickname1) = "newbie";
		
			TQString szNickPart;
			if(KVI_OPTION_STRING(KviOption_stringNickname1).length() < 31)
			{
				szNickPart = KVI_OPTION_STRING(KviOption_stringNickname1);
			} else {
				szNickPart = KVI_OPTION_STRING(KviOption_stringNickname1).left(30);
			}
		
			TQString alt = szNickPart;
			alt.prepend("|"); // <-- this is an erroneous nickname on IrcNet :/
			alt.append("|");
			if(!g_bFoundMirc)
				KVI_OPTION_STRING(KviOption_stringNickname2) = alt;
			alt = szNickPart;
			alt.prepend("_");
			alt.append("_");
			KVI_OPTION_STRING(KviOption_stringNickname3) = alt;
			alt = szNickPart;
			alt.append("2");
			KVI_OPTION_STRING(KviOption_stringNickname4) = alt;
			
			int i = m_pAgeCombo->currentItem();
			if(i < 0)i = 0;
			if(i > 120)i = 120;
			if(i <= 0)KVI_OPTION_STRING(KviOption_stringCtcpUserInfoAge) = "";
			else KVI_OPTION_STRING(KviOption_stringCtcpUserInfoAge).setNum(i);
			
			switch(m_pGenderCombo->currentItem())
			{
				case 1:
					// this should be in english
					KVI_OPTION_STRING(KviOption_stringCtcpUserInfoGender) = "Female";
				break;
				case 2:
					// this should be in english
					KVI_OPTION_STRING(KviOption_stringCtcpUserInfoGender) = "Male";
				break;
				default:
					KVI_OPTION_STRING(KviOption_stringCtcpUserInfoGender) = "";
				break;
			}
			/*
			m_pServerHostSelector->commit();
			m_pServerUrlSelector->commit();
			//m_pServerConfigSelector->commit();
			m_pServerPortSelector->commit();
			
			if(m_pServersSpecifyManually->isOn())
			{
				KVI_OPTION_BOOL(KviOption_boolShowServersConnectDialogOnStart) = FALSE;
				szHost = m_szServerHost;
				uPort=m_uServerPort;
			} else if(m_pServersOpenIrcUrl->isOn())
			{
				KVI_OPTION_BOOL(KviOption_boolShowServersConnectDialogOnStart) = FALSE;
				szUrl=m_szServerUrl;
			}
			*/
#ifdef COMPILE_ON_WINDOWS
			if(m_pUseMircServerList->isEnabled() && m_pUseMircServerList->isOn())
				szMircServers = m_szMircServerIniFile;
#endif
		}
	}
#ifdef COMPILE_ON_WINDOWS
	if(m_pDirMakePortable->isOn())
	{
		KviFileUtils::writeFile(g_pApp->applicationDirPath()+KVI_PATH_SEPARATOR_CHAR+"portable","true");
	} else {
#endif
		g_pApp->saveKvircDirectory();
#ifdef COMPILE_ON_WINDOWS
	}
#endif
	KviTalWizard::accept();
}

#include "setupwizard.moc"