/*

* Copyright (c) 2004 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:  Implementation.

*

*/

#include <bldvariant.hrh>

#include <uikon.hrh>	// EEikCmdExit

#include <eikmenup.h>

#include <eikdoc.h>

#include <barsread.h>

#ifdef __SERIES60_

#include <errorui.h>

#include <aknquerydialog.h>

#else

#ifdef _SERIES_90_

#include <cknconf.h>

#else

#include <eikinfo.h>

#endif

#include <eikcore.rsg>

#endif

#include "CTcBearer.h"

#include "TTcBtFactory.h"

#include "TTcTcpFactory.h"

#include "TTcSerialFactory.h"

#include "CTcTestRunner.h"

#include "CTcWatcher.h"

#include "CTcAppUi.h"

#include "CTcContainer.h"

#include "CTcSettingsDialog.h"

#include "CTcBacklight.h"

#include "TestClientConstants.h"

#include "TestClient.hrh"

#include <TestClient.rsg>

CTcAppUi::CTcAppUi()

	{

	}

CTcAppUi::~CTcAppUi()

	{

	// These must be deleted first, they might generate some observer

	// calls to the container

	delete iRunner;

	delete iBearer;

#ifdef __SERIES60_

	delete iErrorUi;

#endif

	// Remove the container from the control stack and destroy

	if( iContainer )

		{

		RemoveFromStack( iContainer );

		delete iContainer;

		}

	delete iWatcher;

	delete iBacklight;

	}

void CTcAppUi::ConstructL()

	{

	// Have to use this one with the SIP stack

	CCoeEnv::Static()->DisableExitChecks( ETrue );

#ifdef __SERIES60_

    // Skin support is required by S60 3.0 sdk (wk02 and later?)

	BaseConstructL( EAknEnableSkin );	

#else

    BaseConstructL();

#endif

	// Load settings

	iSettings.Load();

#ifdef __SERIES60_

	// Construct error ui

	iErrorUi = CErrorUI::NewL();

#endif

	// Construct our main view

	iContainer = CTcContainer::NewL( ClientRect() );

	AddToStackL( iContainer );

	// If this is the first we are running, automatically display settings.

	if( iSettings.iIsFirstRun )

		{

		iSettings.iIsFirstRun = EFalse;

		CmdSettingsL();

		}

	// Initiate connect if AutoConnect is requested by user settings

	if( iSettings.iAutoConnect )

		{

		CmdConnectL();

		}

	else

		{

		SetStatus( KTcNotConnected );

		}

/*  causes crash!! 

	iWatcher = CTcWatcher::NewL( Document()->Application()->DllName(),

								 KWatcherTimeout );*/

	iBacklight = CTcBacklight::NewL();

	}

void CTcAppUi::HandleCommandL( TInt aCommand )

	{

	// Dispatch commands

	switch( aCommand )

		{

		case ECmdConnect:

			{

			CmdConnectL();

			break;

			}

		case ECmdDisconnect:

			{

			CmdDisconnect();

			break;

			}

		case ECmdSettings:

			{

			CmdSettingsL();

			break;

			}

		case ECmdLocalAddress:

			{

			CmdLocalAddressL();

			break;

			}

		case EEikCmdExit:

			{

			Exit();

			break;

			}

		default:

			{

			// do nothing

			break;

			}

		}

	}

void CTcAppUi::DynInitMenuPaneL( TInt aResourceId, CEikMenuPane* aMenuPane )

	{

	switch( aResourceId )

		{

		// Hide "Connect" in connected mode and "Disconnect" in disconnected mode

		case R_TC_MENU:

			{

			TBool state( EFalse );

			if( iBearer )

				{

				state = ETrue;

				}

			aMenuPane->SetItemDimmed( ECmdConnect, state );

			aMenuPane->SetItemDimmed( ECmdDisconnect, !state );

			aMenuPane->SetItemDimmed( ECmdLocalAddress, !state );

			break;

			}

		default:

			{

			// not for us..

			break;

			}

		}

	}

void CTcAppUi::BearerCompletion( MTcBearerObserver::TOperation aOp,

							     TInt aStatus )

	{

	// If there are any errors, disconnect and show an appropriate error note

	if( aStatus != KErrNone )

		{

		ShowErrorNote( aStatus );

		CmdDisconnect();

		return;

		}

	switch( aOp )

		{

		// Bearer is now listening for incoming connections

		case MTcBearerObserver::EListen:

			{

			SetStatus( KTcListening );

			break;

			}

		case MTcBearerObserver::EConnecting:

		    {

		    SetStatus( KTcConnecting );

		    break;

		    }

		// Bearer is now connected

		case MTcBearerObserver::EConnect:

			{

			SetStatus( KTcConnected );

			TRAPD( err,

				{

				// CTcTestRunner takes observer role for iBearer

				iRunner = CTcTestRunner::NewL( *iBearer, *this, iSettings.iIAPId );

				// Start test case runner

				iRunner->Start();

				} );

			// Report any errors and disconnect

			if( err != KErrNone )

				{

				ShowErrorNote( err );

				CmdDisconnect();

				}

			break;

			}

		default:

			{

			// do nothing for other events (basically not encountered)

			break;

			}

		}

	}

void CTcAppUi::NotifyDisconnect()

	{

	// Test Runner has detected a remote disconnect, connect again

	TRAP_IGNORE( CmdConnectL() )

	}

void CTcAppUi::NotifyStatusChange()

	{

	// iRunner may be NULL if CTestRunner construction failed but

	// it still caused a status change notification.

	if( iRunner )

		{

		// Test Runner status has changed, update main view labels

		iContainer->Update( *iRunner );

		}

	}

void CTcAppUi::CmdConnectL()

	{

	// Make sure we're properly disconnected

	CmdDisconnect();

	SetStatus( KTcInitializing );

	// Create bearer

	TTcSettingsBearerType btype = static_cast<TTcSettingsBearerType>( iSettings.iBearerType );

	switch ( btype )

	    {

	    case EBearerBluetooth:

	        {

	        TTcBtFactory factory;

		    iBearer = CTcBearer::NewL( factory );

	        break;

	        }

	    case EBearerTCP:

	        {

	        TTcTcpFactory factory( iSettings.iTCPPort, iSettings.iIAPId );

		    iBearer = CTcBearer::NewL( factory );

	        break;

	        }

	    case EBearerSerial:

	        {

	        HBufC* csyName = ReadFromResourceArrayLC( R_TC_SETTINGS_CSYNAME, iSettings.iCSYName );

	        HBufC* commPort = ReadFromResourceArrayLC( R_TC_SETTINGS_COMMPORT, iSettings.iCommPort );

	        TTcSerialFactory factory( *csyName, *commPort, iSettings.iBaudrate ); 

	        CleanupStack::PopAndDestroy( 2 );

		    iBearer = CTcBearer::NewL( factory );

	        break;

	        }

	    default:

	        {

	        User::Leave( KErrArgument );

	        break;

	        }

	    }

	// Register for bearer events (->CTcAppUi::BearerCompletion)

	iBearer->SetObserver( this );

	// Start the connect sequence

	TInetAddr* addr = NULL;

	if ( !iSettings.iTCPRemoteAddr.IsUnspecified() )

	    {

	    addr = new ( ELeave ) TInetAddr;

	    if(iSettings.iTCPRemoteAddr.Family() == KAfInet6)

	        {

	        addr->SetAddress( iSettings.iTCPRemoteAddr.Ip6Address() );

	        }

	    else

	        {

	        addr->SetAddress( iSettings.iTCPRemoteAddr.Address() );

	        }

	    addr->SetPort( iSettings.iTCPPort );

	    }

	TRAPD( err, iBearer->ConnectL( addr ) );

	if( err != KErrNone )

		{

		delete addr;

		CmdDisconnect();

		User::Leave( err );

		}

    delete addr;

	}

void CTcAppUi::CmdDisconnect()

	{

	SetStatus( KTcNotConnected );

	// Delete Test Runner and Bearer

	delete iRunner;

	iRunner = NULL;

	delete iBearer;

	iBearer = NULL;

	}

void CTcAppUi::CmdSettingsL()

	{

	// Construct the settings dialog

	CTcSettingsDialog* dlg = new( ELeave ) CTcSettingsDialog( iSettings );

	CleanupStack::PushL( dlg );

	dlg->ConstructL();

	CleanupStack::Pop();	// dlg

	// ..and display it. It is automatically deleted

	dlg->ExecuteLD( R_TC_SETTINGS_DLG );

	}

void CTcAppUi::CmdLocalAddressL()

	{

	// Fetch local address(es)

	TBuf<200> address;

	iBearer->GetLocalAddressL( address );

	address.Insert( 0, _L("Local IP:\n") );

#ifdef __SERIES60_

	// Construct and show a query dialog

	CAknQueryDialog* dlg = new( ELeave ) CAknQueryDialog;

	dlg->ExecuteLD( R_TC_LOCAL_ADDRESS_DLG, address );

#else

#ifdef _SERIES_90_

	// Construct and show a confirmation dialog

	CCknConfirmationDialog::RunDlgWithDefaultIconLD( address, R_EIK_BUTTONS_CONTINUE );

#else

	CEikInfoDialog::RunDlgLD( _L("Local IP"), address, CEikInfoDialog::EAllowEnter );

#endif

#endif

	}

void CTcAppUi::SetStatus( const TDesC8& aText )

	{

	iContainer->UpdateStatus( aText );

	}

#ifdef __SERIES60_

HBufC* CTcAppUi::ReadFromResourceArrayLC( TInt aResourceId, TInt aSettingIndex )

    {

    __ASSERT_ALWAYS( aSettingIndex >= 0, User::Leave( KErrArgument ) );

    TResourceReader reader;

    CEikonEnv::Static()->CreateResourceReaderLC( reader, aResourceId );

    TInt numberOfItems = reader.ReadInt16(); // item count

    __ASSERT_ALWAYS( aSettingIndex < numberOfItems, User::Leave( KErrArgument ) );

    TBool done( EFalse );

    HBufC* temp = 0;

    for ( TInt i = 0; i < numberOfItems && !done; i++ )

        {

        TInt value = reader.ReadInt16();  

        TPtrC text = reader.ReadTPtrC();

        if ( i == aSettingIndex )

            {

            done = ETrue;

            temp = text.AllocL();

            }

        }

    CleanupStack::PopAndDestroy(); // reader

    CleanupStack::PushL( temp );

    return temp;

    }

#else

HBufC* CTcAppUi::ReadFromResourceArrayLC( TInt aResourceId, TInt aSettingIndex )

    {

    __ASSERT_ALWAYS( aSettingIndex >= 0, User::Leave( KErrArgument ) );

    CDesC16ArrayFlat* array = iCoeEnv->ReadDesC16ArrayResourceL( aResourceId );

    CleanupStack::PushL( array );

    __ASSERT_ALWAYS( aSettingIndex < array->MdcaCount(), User::Leave( KErrArgument ) );

    HBufC* temp = array->MdcaPoint( aSettingIndex ).AllocL();

    CleanupStack::PopAndDestroy( array );

    CleanupStack::PushL( temp );

    return temp;

    }

#endif

void CTcAppUi::ShowErrorNote( TInt aStatus )

	{

	if( aStatus != KErrNone )

		{

#ifdef __SERIES60_

		// If we run out of memory (etc.), just ignore the error

		TRAP_IGNORE( iErrorUi->ShowGlobalErrorNoteL( aStatus ) )

#else

		// Construct and show a confirmation dialog

		TBuf< 32 > errorMsg;

		errorMsg.Format( _L("Fatal error: %d"), aStatus );

#ifdef _SERIES_90_

		TRAP_IGNORE( CCknConfirmationDialog::RunDlgWithDefaultIconLD( errorMsg, R_EIK_BUTTONS_CONTINUE ) )

#else

		TRAP_IGNORE( CEikInfoDialog::RunDlgLD( _L("Error"), errorMsg, CEikInfoDialog::EAllowEnter ) )

#endif

#endif

		}

	}