incomingconnectionscontrols.cpp

Web VNC samples delphi

// Copyright (C) 2004 TightVNC Development Team. All Rights Reserved.
//
//  TightVNC 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 option) 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., 59 Temple Place - Suite 330, Boston, MA  02111-1307,
//  USA.
//
// TightVNC homepage on the Web: http://www.tightvnc.com/

// IncomingConnectionsControls.cpp: implementation of the IncomingConnectionsControls class.


#include "IncomingConnectionsControls.h"
#include "WinVNC.h"

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

IncomingConnectionsControls::IncomingConnectionsControls(HWND hwnd, vncServer *server)
{
	m_server = server;
	m_hwnd = hwnd;
	Init();
}

void IncomingConnectionsControls::Validate(BOOL InitApply)
{
	BOOL bAccept = IsChecked(IDC_CONNECT_SOCK);
	BOOL bAuto = IsChecked(IDC_PORTNO_AUTO);
	Enable(IDC_PASSWORD_LABEL, bAccept);
	Enable(IDC_PASSWORD_VIEWONLY_LABEL, bAccept);
	Enable(IDC_PASSWORD, bAccept);
	Enable(IDC_PASSWORD_VIEWONLY, bAccept);
			
	if (bAuto && !InitApply) {
		SetDlgItemText(m_hwnd, IDC_PORTRFB, "");
		SetDlgItemText(m_hwnd, IDC_PORTHTTP, "");
		SetDlgItemText(m_hwnd, IDC_DISPLAYNO, "");
	}
	if (!bAuto && !InitApply)
		InitPortSettings(FALSE);
	if (InitApply)
		InitPortSettings(TRUE);
		
	BOOL bDisplay = IsChecked(IDC_SPECDISPLAY);
	BOOL bPorts = IsChecked(IDC_SPECPORT);
	
	Enable(IDC_PORTNO_AUTO, bAccept);
	Enable(IDC_SPECPORT, bAccept);	
	Enable(IDC_SPECDISPLAY, bAccept);
	Enable(IDC_DISPLAYNO, bAccept && bDisplay);	
	Enable(IDC_PORTRFB, bAccept && bPorts);
	Enable(IDC_MAIN_LABEL, bAccept && bPorts);
	Enable(IDC_PORTHTTP, bAccept && bPorts);
	Enable(IDC_HTTP_LABEL, bAccept && bPorts);
	Enable(IDC_STATIC_AND, bAccept && bPorts);
	
	HWND hFocus = GetFocus();
	if (hFocus == GetDlgItem(m_hwnd, IDC_CONNECT_SOCK)) {
		SetFocus(GetDlgItem(m_hwnd, IDC_PASSWORD));
		SendMessage(GetDlgItem(m_hwnd, IDC_PASSWORD), EM_SETSEL, 0, (LPARAM)-1);
	}	
	
	if (hFocus == GetDlgItem(m_hwnd, IDC_SPECDISPLAY)) {
		SetFocus(GetDlgItem(m_hwnd, IDC_DISPLAYNO));
		SendMessage(GetDlgItem(m_hwnd, IDC_DISPLAYNO), EM_SETSEL, 0, (LPARAM)-1);
	}

	if (hFocus == GetDlgItem(m_hwnd, IDC_SPECPORT)) {
		SetFocus(GetDlgItem(m_hwnd, IDC_PORTRFB));
		SendMessage(GetDlgItem(m_hwnd, IDC_PORTRFB), EM_SETSEL, 0, (LPARAM)-1);
	}
}

void IncomingConnectionsControls::Apply()
{	
	// Save the password if one was entered
	BOOL isShort = SetPasswordSettings(IDC_PASSWORD);

	// Save the password (view only) if one was entered
	BOOL isShortViewOnly = SetPasswordSettings(IDC_PASSWORD_VIEWONLY);

	// Warn about passwords longer than eight characters
	if (!isShort || !isShortViewOnly) {
		MessageBox(NULL, 
				   "WARNING: You have entered passwords of length exceeding\n"
				   "eight characters, but the standard VNC authentication scheme\n"
				   "does not support such long passwords.\n\n"
				   "Your passwords will be truncated to just eight characters.",
				   szAppName, MB_ICONEXCLAMATION | MB_OK);
	}

	// Save the new settings to the server
	m_server->SetAutoPortSelect(IsChecked(IDC_PORTNO_AUTO));
	
	// Save port numbers if we're not auto selecting
	if (!m_server->AutoPortSelect()) {
		if (IsChecked(IDC_SPECDISPLAY)) {
			// Display number was specified
			BOOL ok;
			UINT display = GetDlgItemInt(m_hwnd, IDC_DISPLAYNO, &ok, TRUE);
			if (ok)
				m_server->SetPorts(DISPLAY_TO_PORT(display),
				DISPLAY_TO_HPORT(display));
		} else {
			// Assuming that port numbers were specified
			BOOL ok1, ok2;
			UINT port_rfb = GetDlgItemInt(m_hwnd, IDC_PORTRFB, &ok1, TRUE);
			UINT port_http = GetDlgItemInt(m_hwnd, IDC_PORTHTTP, &ok2, TRUE);
			if (port_rfb != port_http) {
				if (ok1 && ok2)
					m_server->SetPorts(port_rfb, port_http);
			} else {
				MessageBox(NULL, 
						   "WARNING: You have entered equal RFB and HTTP port numbers.\n\n"
						   "Your changes to port numbers will not be saved.",
						   szAppName, MB_ICONEXCLAMATION | MB_OK);
			}
		}
	}
	
	m_server->SockConnect(IsChecked(IDC_CONNECT_SOCK));
	
	// Wallpaper handling
	m_server->EnableRemoveWallpaper(IsChecked(IDC_REMOVE_WALLPAPER));

	m_server->SetBlankScreen(IsChecked(IDC_BLANK_SCREEN));
	
	// Enabling/disabling file transfers
	m_server->EnableFileTransfers(IsChecked(IDC_ENABLE_FILE_TRANSFERS));
	
	Validate(TRUE);
}

void IncomingConnectionsControls::Init()
{
	BOOL bConnectSock = m_server->SockConnected();

	SetChecked(IDC_CONNECT_SOCK, bConnectSock);
	SetChecked(IDC_ENABLE_FILE_TRANSFERS, m_server->FileTransfersEnabled());
	SetChecked(IDC_REMOVE_WALLPAPER, m_server->RemoveWallpaperEnabled());
	SetChecked(IDC_BLANK_SCREEN, m_server->GetBlankScreen());

	SetDlgItemText(m_hwnd, IDC_PASSWORD, "~~~~~~~~");			
	SetDlgItemText(m_hwnd, IDC_PASSWORD_VIEWONLY, "~~~~~~~~");

	if (bConnectSock) {
		SetFocus(GetDlgItem(m_hwnd, IDC_PASSWORD));
		SendDlgItemMessage(m_hwnd, IDC_PASSWORD, EM_SETSEL, 0, (LPARAM)-1);
	} else {
		SetFocus(GetDlgItem(m_hwnd, IDC_CONNECT_SOCK));
	}

	Validate(TRUE);
}

void IncomingConnectionsControls::InitPortSettings(BOOL CheckedButton)
{
	BOOL bAutoPort = m_server->AutoPortSelect();
	UINT port_rfb = m_server->GetPort();
	UINT port_http = m_server->GetHttpPort();
	int d1 = PORT_TO_DISPLAY(port_rfb);
	int d2 = HPORT_TO_DISPLAY(port_http);
	BOOL bValidDisplay = (d1 == d2 && d1 >= 0 && d1 <= 99);
	if (bValidDisplay) {
		SetDlgItemInt(m_hwnd, IDC_DISPLAYNO, d1, FALSE);
	} else {
		SetDlgItemText(m_hwnd, IDC_DISPLAYNO, "");
	}
	SetDlgItemInt(m_hwnd, IDC_PORTRFB, port_rfb, FALSE);
	SetDlgItemInt(m_hwnd, IDC_PORTHTTP, port_http, FALSE);
	if (CheckedButton) {
		SetChecked(IDC_PORTNO_AUTO, bAutoPort);
		SetChecked(IDC_SPECDISPLAY, (!bAutoPort && bValidDisplay));
		SetChecked(IDC_SPECPORT, (!bAutoPort && !bValidDisplay));
	}
}

BOOL IncomingConnectionsControls::SetPasswordSettings(DWORD idEditBox)
{
	char passwd[MAXPWLEN+2];
	int len = GetDlgItemText(m_hwnd, idEditBox, (LPSTR)&passwd, MAXPWLEN+2);
	passwd[MAXPWLEN+1] = '\0';
	if (strcmp(passwd, "~~~~~~~~") != 0) {
		if (len == 0) {
			vncPasswd::FromClear crypt;
			if (idEditBox == IDC_PASSWORD)
				m_server->SetPassword(TRUE, crypt);
			if (idEditBox == IDC_PASSWORD_VIEWONLY)
				m_server->SetPasswordViewOnly(TRUE, crypt);
		} else {
			vncPasswd::FromText crypt(passwd);
			if (idEditBox == IDC_PASSWORD)
				m_server->SetPassword(TRUE, crypt);
			if (idEditBox == IDC_PASSWORD_VIEWONLY)
				m_server->SetPasswordViewOnly(TRUE, crypt);
		}		
	}
	return (len <= MAXPWLEN);
}

IncomingConnectionsControls::~IncomingConnectionsControls()
{
}