/*

* Copyright (c) 2009 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:

*

*/

#include "MemSpyViewWindowGroups.h"

// System includes

#include <eikclbd.h>

#include <aknmessagequerydialog.h>

#include <aknnotewrappers.h>

// Engine includes

#include <memspy/engine/memspyengine.h>

#include <memspy/engine/memspyengineobjectcontainer.h>

#include <memspy/engine/memspyengineobjectthread.h>

// User includes

#include "MemSpyUiUtils.h"

#include "MemSpyViewMainMenu.h"

#include "MemSpyContainerObserver.h"

// Literal constants

const TInt KMaxInfoLength = 128;

CMemSpyViewWindowGroups::CMemSpyViewWindowGroups( CMemSpyEngine& aEngine, MMemSpyViewObserver& aObserver )

:   CMemSpyViewBase( aEngine, aObserver )

    {

    }

CMemSpyViewWindowGroups::~CMemSpyViewWindowGroups()

    {

    delete iWindowGroupList;

    }

void CMemSpyViewWindowGroups::ConstructL( const TRect& aRect, CCoeControl& aContainer, TAny* aSelectionRune )

    {

    _LIT( KTitle, "Window Groups" );

    SetTitleL( KTitle );

    //

    CMemSpyViewBase::ConstructL( aRect, aContainer, aSelectionRune );

    }

CEikListBox* CMemSpyViewWindowGroups::ConstructListBoxL()

    {

    delete iListBox;

    iListBox = NULL;

    CAknSingleNumberStyleListBox* listbox = new (ELeave) CAknSingleNumberStyleListBox();

    iListBox = listbox;

    listbox->ConstructL( this, EAknListBoxSelectionList | EAknListBoxLoopScrolling );

    listbox->SetContainerWindowL( *this );

    listbox->CreateScrollBarFrameL( ETrue );

    SetListBoxModelL();

    listbox->ScrollBarFrame()->SetScrollBarVisibilityL( CEikScrollBarFrame::EOff, CEikScrollBarFrame::EAuto );

    listbox->SetListBoxObserver( this );

    listbox->ItemDrawer()->ColumnData()->EnableMarqueeL( ETrue );

    listbox->SetObserver( this );

    return listbox;

    }

void CMemSpyViewWindowGroups::RefreshL()

    {

    SetListBoxModelL();

    CMemSpyViewBase::RefreshL();

    }

TMemSpyViewType CMemSpyViewWindowGroups::ViewType() const

    {

    return EMemSpyViewTypeWindowGroups;

    }

CMemSpyViewBase* CMemSpyViewWindowGroups::PrepareParentViewL()

    {

    CMemSpyViewMainMenu* parent = new(ELeave) CMemSpyViewMainMenu( iEngine, iObserver );

    CleanupStack::PushL( parent );

    parent->ConstructL( Rect(), *Parent(), (TAny*) ViewType() );

    CleanupStack::Pop( parent );

    return parent;

    }

CMemSpyViewBase* CMemSpyViewWindowGroups::PrepareChildViewL()

    {

    CMemSpyViewBase* child = NULL;

    if ( iListBox && 

         iListBox->Model()->NumberOfItems() && 

         iListBox->CurrentItemIndex() > KErrNotFound )

        {

        DetailsL();

        }

    return child;

    }

void CMemSpyViewWindowGroups::SetListBoxModelL()

    {

    // Take ownership of new model

    MMemSpyEngineHelperWindowServer& windowServerManager = iEngine.HelperWindowServer();

    MMemSpyEngineWindowGroupList* windowGroupList = windowServerManager.WindowGroupListL();

    delete iWindowGroupList;

    iWindowGroupList = windowGroupList;

    // Set up list box

    CAknSingleNumberStyleListBox* listbox = static_cast< CAknSingleNumberStyleListBox* >( iListBox );

    listbox->Model()->SetItemTextArray( iWindowGroupList );

    listbox->Model()->SetOwnershipType( ELbmDoesNotOwnItemArray );

    }

TBool CMemSpyViewWindowGroups::HandleCommandL( TInt aCommand )

    {

    TBool handled = ETrue;

    //

    switch ( aCommand )

        {

        case EMemSpyCmdWindowGroupTerminate:

            {

            TRAPD( err, OnCmdEndL( aCommand ) );

            CAknConfirmationNote* note = new(ELeave) CAknConfirmationNote( ETrue );

            if ( err )

                {

                note->ExecuteLD( _L("Cannot terminate task") );

                }

            else

                {

                note->ExecuteLD( _L("Task terminated") );

                }

            break;

            }

        case EMemSpyCmdWindowGroupSwitchTo:

            {

            TRAPD( err, OnCmdSwitchToL() );

            if ( err )

                {

                CAknConfirmationNote* note = new(ELeave) CAknConfirmationNote( ETrue );

                note->ExecuteLD( _L("Cannot bring to foreground") );

                }

            break;

            }

        case EMemSpyCmdWindowGroupEnd:

            {

            TRAPD( err, OnCmdEndL( aCommand ) );

            CAknConfirmationNote* note = new(ELeave) CAknConfirmationNote( ETrue );

            if ( err )

                {

                note->ExecuteLD( _L("Cannot end task") );

                }

            else

                {

                note->ExecuteLD( _L("Task exited") );

                }

            break;

            }

        case EMemSpyCmdWindowGroupPanic:

            {

            TRAPD( err, OnCmdEndL( aCommand ) );

            CAknConfirmationNote* note = new(ELeave) CAknConfirmationNote( ETrue );

            if ( err )

                {

                note->ExecuteLD( _L("Cannot panic task") );

                }

            else

                {

                note->ExecuteLD( _L("Task panic'ed") );

                }

            break;

            }

        default:

            {

            handled = CMemSpyViewBase::HandleCommandL( aCommand );

            break;        

            }

        }

    //

    return handled;

    }

void CMemSpyViewWindowGroups::OnCmdSwitchToL()

    {

    MMemSpyEngineHelperWindowServer& windowServerManager = iEngine.HelperWindowServer();

    TInt id = iWindowGroupList->At( iListBox->CurrentItemIndex() ).iId;

    windowServerManager.SwitchToL( id );

    }

void CMemSpyViewWindowGroups::OnCmdEndL( TInt aCommand )

    {

    TBool doTerminate = ETrue;

    CMemSpyEngineObjectContainer& container = iEngine.Container();

    TThreadId id = iWindowGroupList->At( iListBox->CurrentItemIndex() ).iThreadId;

    // Try to find the thread in question...

    CMemSpyProcess* process = NULL;

    CMemSpyThread* thread = NULL; 

    User::LeaveIfError( container.ProcessAndThreadByThreadId( id, process, thread ) );

    if ( thread )

        {

        thread->Open();

        //

        if  ( thread->IsSystemPermanent() || thread->IsSystemCritical() )

            {

            CAknQueryDialog* importDialog = CAknQueryDialog::NewL();

            doTerminate = ( importDialog->ExecuteLD( R_MEMSPY_PANIC_SYSTEM_CRITICAL_THREAD_OR_PROCESS ) );

            }

        //

        if  ( doTerminate )

            {

            switch ( aCommand )

                {

                case EMemSpyCmdWindowGroupTerminate:

                    {

                    thread->TerminateL();

                    break;

                    }

                case EMemSpyCmdWindowGroupEnd:

                    {

                    thread->KillL();

                    break;

                    }

                case EMemSpyCmdWindowGroupPanic:

                    {

                    thread->PanicL();

                    break;

                    }

                default:

                    {

                    // Programming error

                    __ASSERT_ALWAYS( EFalse, User::Panic( _L("MemSpy-View"), 0 ) );

                    }                

                }

            }                

        }

    RefreshL();

    }

void CMemSpyViewWindowGroups::DetailsL()

    {

    HBufC* messageBuf = HBufC::NewLC( 4096 );

    TPtr messagePtr = messageBuf->Des();

    // Fetch data from helper

    TMemSpyEngineWindowGroupDetails selectedObject;

    MMemSpyEngineHelperWindowServer& windowServerManager = iEngine.HelperWindowServer();

    TInt id = iWindowGroupList->At( iListBox->CurrentItemIndex() ).iId;

    windowServerManager.GetWindowGroupDetailsL( id, selectedObject );

    // Append info to string buffer

    AppendFormatString( messagePtr, _L("WG ID: %d\n"), selectedObject.iId );

    AppendFormatString( messagePtr, _L("Client ThreadId: %Lu\n"), selectedObject.iThreadId.Id() );

    TFullName name;

    name.Copy( selectedObject.iFullName );

    AppendFormatString( messagePtr, _L("Thr: %S\n"), &name );

    name.Zero();

    AppendFormatString( messagePtr, _L("Priority: %d\n"), selectedObject.iPriority );

    AppendFormatString( messagePtr, _L("Handle: 0x%08X\n"), selectedObject.iWindowGroupHandle );

    name.Copy( selectedObject.iName );

    AppendFormatString( messagePtr, _L("Name: %S\n"), &name );

    name.Zero();

    AppendFormatString( messagePtr, _L("UID: 0x%08X\n"), selectedObject.iUID );

    AppendFormatString( messagePtr, _L("IsBusy: %d\n"), selectedObject.iIsBusy );

    AppendFormatString( messagePtr, _L("IsSystem: %d\n"), selectedObject.iIsSystem );

    AppendFormatString( messagePtr, _L("IsHidden: %d\n"), selectedObject.iIsHidden );

    name.Copy( selectedObject.iCaption );

    AppendFormatString( messagePtr, _L("Caption: %S\n"), &name );

    name.Zero();

    name.Copy( selectedObject.iDocName );

    AppendFormatString( messagePtr, _L("Docname: %S"), &name );

    name.Zero();

    // Display the buffer on a dialog

    CAknMessageQueryDialog* dialog = new(ELeave) CAknMessageQueryDialog( CAknQueryDialog::ENoTone );

    dialog->PrepareLC( R_MEMSPY_KERNEL_OBJECT_DETAILS_DIALOG );

    TFileName headerText;

    headerText.Copy( selectedObject.iFullName );

    dialog->SetHeaderTextL( headerText );

    dialog->SetMessageTextL( messagePtr );

    dialog->RunLD();

    CleanupStack::PopAndDestroy( messageBuf );

    }

void CMemSpyViewWindowGroups::AppendFormatString( TPtr& aPtr, TRefByValue<const TDesC> aFmt, ... )

    {

    TBuf<KMaxInfoLength> infoString;

    VA_LIST list;

    VA_START ( list, aFmt );

    infoString.FormatList( aFmt, list );

    aPtr.Append( infoString );

    }