/*

* 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 <aknlists.h>

#include <aknsettingitemlist.h>

#include <akntitle.h>

#include "CTcIAPManager.h"

#include "CTcSettingsDialog.h"

#include "TTcSettings.h"

#include "TestClient.hrh"

#include <TestClient.rsg>

CTcSettingsDialog::CTcSettingsDialog( TTcSettings& aSettings )

	: iSettings( aSettings ),

	  iSettingItems( 2, EFalse, 1 )	// granularity, isnumered, 1st ordinal

	{

	}

CTcSettingsDialog::~CTcSettingsDialog()

	{

	// Delete setting items

	iSettingItems.ResetAndDestroy();

	// Set title pane text back to default, ignore any errors

	TRAP_IGNORE( SetTitleL( -1 ) )

	delete iIAPManager;

	}

void CTcSettingsDialog::ConstructL()

	{

	// Use base class to construct our menubar

	CAknDialog::ConstructL( R_TC_SETTINGS_MENUBAR );

	iIAPManager = CTcIAPManager::NewL();

	// Make sure there's at least one IAP

	if( iIAPManager->Count() == 0 )

		{

		User::Leave( KErrNotSupported );

		}

	}

void CTcSettingsDialog::PreLayoutDynInitL()

	{

	TInt id( 0 );

 	HBufC* itemTitle;

	CAknSettingItem* settingItem;

	// Create and initialize Bearer setting item from the resource file.

	CAknEnumeratedTextPopupSettingItem* textSettingItem =

								new( ELeave ) CAknEnumeratedTextPopupSettingItem( 0, iSettings.iBearerType );

	CleanupStack::PushL( textSettingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_MODE_TITLE );

	textSettingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_MODE_PAGE, EAknCtPopupField, 0, R_TC_SETTINGS_MODE_TEXTS );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( textSettingItem );

	CleanupStack::Pop(); // textSettingItem

	// Create and initialize remote tcp address setting item from the resource file.

	iSettings.iTCPRemoteAddr.Output( iRemoteAddrText );

	settingItem = new( ELeave ) CAknTextSettingItem( 0, iRemoteAddrText );

	CleanupStack::PushL( settingItem );

	_LIT(KEmptyItemText, "None");

	settingItem->SetEmptyItemTextL(KEmptyItemText);

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_TCPREMOTEADDR_TITLE );

	settingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_TCPREMOTEADDR_PAGE, -1 );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( settingItem );

	CleanupStack::Pop(); // settingitem

	// Create and initialize TCP port setting item from the resource file.

	settingItem = new( ELeave ) CAknIntegerEdwinSettingItem( 0, iSettings.iTCPPort );

	CleanupStack::PushL( settingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_TCPPORT_TITLE );

	settingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_TCPPORT_PAGE, EEikCtEdwin );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( settingItem );

	CleanupStack::Pop(); // settingitem

	// Create and initialize IAP name setting item from the resource file.

	TUint32 tmpId( iSettings.iIAPId );

	iSettings.iIAPId = 0;

	textSettingItem = new( ELeave ) CAknEnumeratedTextPopupSettingItem( 0, iSettings.iIAPId );

	CleanupStack::PushL( textSettingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_IAPNAME_TITLE );

	textSettingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_IAPNAME_PAGE, EAknCtPopupField, 0, R_TC_SETTINGS_IAPNAME_TEXTS );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( textSettingItem );

	CleanupStack::Pop(); // textSettingItem

	// Get text array from setting item

	CArrayPtr< CAknEnumeratedText >* texts = textSettingItem->EnumeratedTextArray();

	CAknEnumeratedText* dummy = texts->At( 0 );

	texts->Delete( 0 );

	delete dummy;

	// Populate text array from IAP Manager

	TInt count = iIAPManager->Count();

	for( TInt i = 0; i < count; i++ )

		{

		// Read IAP id and name

		TInt iapId = iIAPManager->Id( i );

		TBuf< 64 > text16;

		text16.Copy( iIAPManager->Name( i ) );

		HBufC* text = text16.AllocLC();

		// Create enumerated text item

		CAknEnumeratedText* enumeratedText = new( ELeave ) CAknEnumeratedText( iapId, text );

		CleanupStack::Pop( text );

		// Store text item to the array

		CleanupStack::PushL( enumeratedText );

		texts->AppendL( enumeratedText );

		CleanupStack::Pop( enumeratedText );

		}

	// Make sure iIAPId is a valid one

	// (the setting list item won't work otherwise);

	// Somebody might have removed our previously selected IAP

	// - in that case the first IAP is selected instead.

	iSettings.iIAPId = iIAPManager->Id( 0 );

	for( TInt j = 0; j < count; j++ )

		{

		if( tmpId == iIAPManager->Id( j ) )

			{

			iSettings.iIAPId = tmpId;

			break;

			}

		}

	textSettingItem->LoadL();

    // Create and initialize CSY name setting item from the resource file.

    textSettingItem = new( ELeave ) CAknEnumeratedTextPopupSettingItem( 0, iSettings.iCSYName );

	CleanupStack::PushL( textSettingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_CSYNAME_TITLE );

	textSettingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_MODE_PAGE, EAknCtPopupField, 0, R_TC_SETTINGS_CSYNAME_TEXTS );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( textSettingItem );

	CleanupStack::Pop(); // textSettingItem

	// Create and initialize Comm port setting item from the resource file.

    textSettingItem = new( ELeave ) CAknEnumeratedTextPopupSettingItem( 0, iSettings.iCommPort );

	CleanupStack::PushL( textSettingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_CSYNAME_TITLE );

	textSettingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_COMMPORT_PAGE, EAknCtPopupField, 0, R_TC_SETTINGS_COMMPORT_TEXTS );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( textSettingItem );

	CleanupStack::Pop(); // textSettingItem

	// Create and initialize Baudrate setting item from the resource file.

	settingItem = new( ELeave ) CAknIntegerEdwinSettingItem( 0, iSettings.iBaudrate );

	CleanupStack::PushL( settingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_BAUDRATE_TITLE );

	settingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_BAUDRATE_PAGE, EEikCtEdwin );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( settingItem );

	CleanupStack::Pop(); // settingitem

	// Create and initialize AutoConnect setting item from the resource file.

	settingItem = new( ELeave ) CAknBinaryPopupSettingItem( 0, iSettings.iAutoConnect );

	CleanupStack::PushL( settingItem );

	itemTitle = iCoeEnv->AllocReadResourceLC( R_TC_SETTINGS_AUTOCONNECT_TITLE );

	settingItem->ConstructL( EFalse, id++, *itemTitle, NULL, R_TC_SETTINGS_AUTOCONNECT_PAGE, EAknCtPopupField, 0, R_TC_SETTINGS_AUTOCONNECT_TEXTS );

	CleanupStack::PopAndDestroy(); // itemTitle

	iSettingItems.AppendL( settingItem );

	CleanupStack::Pop(); // settingitem

	// Give the setting item list to the listbox, retain ownership

	CAknSettingStyleListBox* lb = ListBoxL();

	CTextListBoxModel* model = lb->Model();

	model->SetItemTextArray( &iSettingItems );

	model->SetOwnershipType( ELbmDoesNotOwnItemArray );

	iSettingItems.RecalculateVisibleIndicesL();

	// Register for listbox notifications

	lb->SetListBoxObserver( this );

	// Create scroll indicators

	lb->CreateScrollBarFrameL();

	lb->ScrollBarFrame()->SetScrollBarVisibilityL( CEikScrollBarFrame::EOff,

												   CEikScrollBarFrame::EAuto );

	// Update listbox and scroll indicators

	lb->HandleItemAdditionL();

	lb->UpdateScrollBarsL();

	// Now that we're fully constructed, change the title pane text

	SetTitleL( R_TC_SETTINGS_DLG_TITLE );

	}

TBool CTcSettingsDialog::OkToExitL( TInt aKeycode )

	{

	if( aKeycode == EAknSoftkeyOptions )

		{

		DisplayMenuL();

		return EFalse;

		}

	else

		{

		// Save remote address to settings 

		// or show error note if address is invalid

		if (KErrNone != iSettings.iTCPRemoteAddr.Input(iRemoteAddrText))

				{

				_LIT(KInvalidAddressText, "Invalid remote IP");

				CEikonEnv::Static()->AlertWin(KInvalidAddressText);

				return EFalse;

				}

		// Save settings to file

		TInt count = iSettingItems.Count();

		for( TInt i = 0; i < count; i++ )

				{

				iSettingItems.At( i )->StoreL();

				}

		iSettings.Store();

		}

	return ETrue;

	}

void CTcSettingsDialog::HandleListBoxEventL( CEikListBox* aListBox,

											 TListBoxEvent aEventType )

	{

	// Edit in popup mode if ProcessCommandL( ECmdChange ) has requested so

	TBool isPopUp( EFalse );

	if( aEventType == EEventEditingStarted )

		{

		isPopUp = ETrue;

		}

	// Start editing (if there's an item to edit :-)

	TInt index( aListBox->CurrentItemIndex() );

	if( index >=0 )	// index is -1 if there are no items in the list

		{

        iSettingItems.At( index )->EditItemL( isPopUp );

        aListBox->DrawItem( index );

		}

	}

void CTcSettingsDialog::SetTitleL( TInt aResourceId ) const

	{

	// Get pointer to the title pane

	CAknTitlePane* title =

		static_cast< CAknTitlePane* >(

			CEikonEnv::Static()

				->AppUiFactory()

					->StatusPane()

						->ControlL( TUid::Uid( EEikStatusPaneUidTitle ) ) );

	// Make sure we have a valid pointer

	User::LeaveIfNull( title );

	// Reset the text back to default or set a new one

	if( aResourceId == -1 )

		{

		title->SetTextToDefaultL();

		}

	else

		{

		// Read the title text from resource file and put it to the title pane

		HBufC* titleText = iCoeEnv->AllocReadResourceLC( aResourceId );

		title->SetTextL( *titleText );

		CleanupStack::PopAndDestroy(); // titleText

		}

	}

void CTcSettingsDialog::ProcessCommandL( TInt aCommandId )

	{

	// Close the popup menu now.

	HideMenu();

	switch( aCommandId )

		{

		case ECmdChange:

			{

			HandleListBoxEventL( ListBoxL(), EEventEditingStarted );

			break;

			}

		case EEikCmdExit:

			{

			TryExitL( EAknSoftkeyExit );

			break;

			}

		default:

			{

			// Forward to application UI by default

			CEikonEnv::Static()->EikAppUi()->HandleCommandL( aCommandId );

			}

		}

	}

TKeyResponse CTcSettingsDialog::OfferKeyEventL( const TKeyEvent& aKeyEvent,

												TEventCode aType )

	{

	// Make settings permanent on each keypress,

	// i.e. store values from setting items to TTcSettings

	TInt count = iSettingItems.Count();

	for( TInt i = 0; i < count; i++ )

		{

		iSettingItems.At( i )->StoreL();

		}

	// Save to file. This is done to ensure that settings are not lost

	// if the power is lost unexpectedly.

	iSettings.Store();

	// Forward to the base class

	return CAknDialog::OfferKeyEventL( aKeyEvent, aType );

	}

CAknSettingStyleListBox* CTcSettingsDialog::ListBoxL() const

	{

	CAknSettingStyleListBox* lb =

		static_cast< CAknSettingStyleListBox* >( Control( ECtrlSettingsList ) );

	User::LeaveIfNull( lb );

	return lb;

	}