/*

* 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 "MemSpyViewKernelHeap.h"

// Engine includes

#include <memspy/engine/memspyengine.h>

#include <memspy/engine/memspyengineobjectprocess.h>

#include <memspy/engine/memspyengineobjectthread.h>

#include <memspy/engine/memspyengineobjectcontainer.h>

#include <memspy/engine/memspyengineobjectthreadinfoobjects.h>

#include <memspy/engine/memspyengineobjectthreadinfocontainer.h>

#include <memspy/engine/memspyenginehelperheap.h>

#include <memspy/engine/memspyengineoutputlist.h>

#include <memspysession.h>

#include <memspy/api/memspyapiheap.h>

// User includes

#include "MemSpyUiUtils.h"

#include "MemSpyViewKernel.h"

#include "MemSpyContainerObserver.h"

// Constants

const TInt KMemSpyBufferSize = 20;

// Literal constants

_LIT(KMemSpyHexFormat, "0x%08x");

_LIT(KMemSpyUnsignedFormat, "%u");

_LIT(KMemSpyDecFormat, "%d");

_LIT(KMemSpyLongFormat, "%Ld");

_LIT(KMemSpyCaptionYes, "Yes");

_LIT(KMemSpyCaptionNo, "No");

CMemSpyViewKernelHeap::CMemSpyViewKernelHeap( RMemSpySession& aSession, MMemSpyViewObserver& aObserver ) //cigasto: remember to uncomment from MMP!

:   CMemSpyViewBase( aSession, aObserver )

    {

    }

CMemSpyViewKernelHeap::~CMemSpyViewKernelHeap()

    {

    }

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

    {

    _LIT( KTitle, "Kernel Heap" );

    SetTitleL( KTitle );

    //

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

    }

void CMemSpyViewKernelHeap::RefreshL()

    {

    SetListBoxModelL();

    CMemSpyViewBase::RefreshL();

    }

TMemSpyViewType CMemSpyViewKernelHeap::ViewType() const

    {

    return EMemSpyViewTypeKernelHeap;

    }

CMemSpyViewBase* CMemSpyViewKernelHeap::PrepareParentViewL()

    {

    CMemSpyViewKernel* parent = new(ELeave) CMemSpyViewKernel( iMemSpySession, iObserver );

    CleanupStack::PushL( parent );

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

    CleanupStack::Pop( parent );

    return parent;

    }

CMemSpyViewBase* CMemSpyViewKernelHeap::PrepareChildViewL()

    {	

    CMemSpyViewBase* child = NULL;

    return child;    

    }

void CMemSpyViewKernelHeap::SetListBoxModelL()

    {	

	CMemSpyApiHeap* iHeap;

	iHeap = iMemSpySession.GetHeap( );

	CDesCArrayFlat* model = new (ELeave) CDesC16ArrayFlat( 22 );

	model = FormatModel( iHeap );	

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

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

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

	}

TBool CMemSpyViewKernelHeap::HandleCommandL( TInt aCommand )

    {

    TBool handled = ETrue;

    //

    switch ( aCommand )

        {

    case EMemSpyCmdKernelHeapDump:

        OnCmdDumpKernelHeapL();

        break;

    default:

        handled = CMemSpyViewBase::HandleCommandL( aCommand );

        break;

        }

    //

    return handled;

    }

void CMemSpyViewKernelHeap::OnCmdDumpKernelHeapL()

    {	

    iMemSpySession.DumpKernelHeap();

    }

//CDesCArrayFlat* CMemSpyViewKernelHeap::FormatModel( RArray<CMemSpyApiHeap*> &aHeap )

CDesCArrayFlat* CMemSpyViewKernelHeap::FormatModel( CMemSpyApiHeap* aHeap )

	{

	CDesCArrayFlat* model = new (ELeave) CDesC16ArrayFlat( 2 );

	if (aHeap) 

	    {

        _LIT( KItem0, "Heap type" );		   	  

        _LIT( KItem1, "Heap size" );	  

        _LIT( KItem8b, "Heap base address" );	        	       

        _LIT( KItem1b, "Shared" );	        

        _LIT( KItem2, "Chunk size" );

        _LIT( KItem3, "Alloc. count" );

        _LIT( KItem4, "Free. count" );

        _LIT( KItem5, "Biggest alloc." );

        _LIT( KItem6, "Biggest free" );

        _LIT( KItem6a, "Total alloc." );

        _LIT( KItem6b, "Total free" );

        _LIT( KItem7, "Slack free space" );

        _LIT( KItem8a, "Fragmentation" );

        _LIT( KItem13, "Header size (A)" );

        _LIT( KItem14, "Header size (F)" );

        _LIT( KItem9a, "Overhead (alloc)" );

        _LIT( KItem9b, "Overhead (free)" );

        _LIT( KItem9c, "Overhead (total)" );

        _LIT( KItem9d, "Overhead" );

        _LIT( KItem10, "Min. length" );

        _LIT( KItem11, "Max. length" );

        _LIT( KItem12, "Debug Allocator Library" );

        HBufC* hItem = FormatItem( KItem0, aHeap->Type() );

        TPtr pItem(hItem->Des());

        model->AppendL( pItem );

        pItem.Zero();	

        hItem = FormatItem( KItem1, aHeap->Size() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();	

        TUint address( aHeap->BaseAddress() );	

        hItem = FormatItem( KItem8b, address );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        if(aHeap->Shared()) //Yes / No value formatting		

            hItem = FormatItem( KItem1b, KMemSpyCaptionYes );		

        else		

            hItem = FormatItem( KItem1b, KMemSpyCaptionNo );	

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem2, aHeap->ChunkSize() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem3, aHeap->AllocationsCount() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem4, aHeap->FreeCount() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem5, aHeap->BiggestAllocation() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem6, aHeap->BiggestFree() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem6a, aHeap->TotalAllocations() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem6b, aHeap->TotalFree() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem7, aHeap->SlackFreeSpace() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        TReal iOneHundred( aHeap->Size() );

        TReal iValue( aHeap->Fragmentation() );	

        hItem = FormatPercentageItem( KItem8a, iOneHundred, iValue );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem13, aHeap->HeaderSizeA() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem14, aHeap->HeaderSizeF() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem9a, aHeap->AllocationOverhead() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem9b, aHeap->FreeOverhead() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem9c, aHeap->TotalOverhead() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        TReal iOverhead( aHeap->Overhead() );	

        hItem = FormatPercentageItem( KItem9d, iOneHundred, iOverhead );	

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem10, aHeap->MinLength() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        hItem = FormatItem( KItem11, aHeap->MaxLength() );

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

        if( aHeap->DebugAllocatorLibrary() )		

            hItem = FormatItem( KItem12, KMemSpyCaptionYes );		

        else

            hItem = FormatItem( KItem12, KMemSpyCaptionNo );	

        pItem = hItem->Des();

        model->AppendL( pItem );

        pItem.Zero();

	    }

	else

	    {

        HBufC* hItem = FormatItem( _L("Not Found"), _L("") );

        TPtr pItem(hItem->Des());

        model->AppendL( pItem );

        pItem.Zero();	    

	    }

	return model;

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, const TDesC& aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( aValue );

	return retBuf;

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, TInt aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

    val.Format( KMemSpyDecFormat, aValue );

    pRetBuf.Append( _L("\t") );

    pRetBuf.Append( aCaption );

    pRetBuf.Append( _L("\t\t") );

    pRetBuf.Append( val );    

	return retBuf;

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, TUint aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

    //val.Format( KMemSpyDecFormat, aValue );

	val.Format( KMemSpyHexFormat, aValue );

    pRetBuf.Append( _L("\t") );

    pRetBuf.Append( aCaption );

    pRetBuf.Append( _L("\t\t") );

    pRetBuf.Append( val );    

	return retBuf;	

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, const TInt64& aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

	val.Format( KMemSpyLongFormat, aValue );

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( val );    

	return retBuf;	

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, TAny* aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

	val.Format( KMemSpyHexFormat, aValue );

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( val );    

	return retBuf;	

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, TUint* aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

	val.Format( KMemSpyHexFormat, aValue );

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( val );    

	return retBuf;	

	}

HBufC* CMemSpyViewKernelHeap::FormatItem( const TDesC& aCaption, TUint8* aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

	TBuf<KMemSpyBufferSize> val;

	val.Format( KMemSpyHexFormat, aValue );

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( val );    

	return retBuf;	

	}

HBufC* CMemSpyViewKernelHeap::FormatPercentageItem( const TDesC& aCaption, TReal aOneHundredPercentValue, TReal aValue )

	{

	HBufC* retBuf = HBufC::NewL( KMaxName );	//buffer for formatted item

	TPtr pRetBuf( retBuf->Des() );

	pRetBuf.Zero();

    const TReal value = (TInt) (( aValue / aOneHundredPercentValue) * 100.0); // percentage value calculation    

    _LIT(KPercentFormat, "%3.2f %%");

    TMemSpyPercentText val;

    val.Format( KPercentFormat, value );

	pRetBuf.Append( _L("\t") );

	pRetBuf.Append( aCaption );

	pRetBuf.Append( _L("\t\t") );

	pRetBuf.Append( val );    

	return retBuf;

	}