/*

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

#include <memspyengineclientinterface.h>

//KernelObjects

#include <memspy/driver/memspydriverenumerationsshared.h>

// IMPLEMENTATION

EXPORT_C RMemSpySession::RMemSpySession()

    {

    }

EXPORT_C TInt RMemSpySession::Connect()

    {

	TInt error(KErrNone);

	for (TInt i=0; i<2; i++) // Two retries max

		{

		TInt error = CreateSession(KMemSpyServerName, TVersion(KMemSpyVersion, 0, 0));

		if (error != KErrNotFound && error != KErrServerTerminated)

			return error;

		error = StartServer();

		if (error != KErrNone && error != KErrAlreadyExists)

			return error;

		}

	return error;	

    }

TInt RMemSpySession::StartServer()

	{

	RProcess server;

	_LIT(KCommand, "start");

	const TUid KServerUid3 = {0xE5883BC2};

	TInt error = server.Create(KMemSpyServerName, KCommand);//, KServerUid3);

	if (error != KErrNone)

		return error;

	TRequestStatus startStatus, stopStatus;

	server.Logon(stopStatus);

	if (stopStatus != KRequestPending)

		{

		User::WaitForRequest(stopStatus);

		server.Kill(0);

		server.Close();

		return stopStatus.Int();

		}

	server.Rendezvous(startStatus);

	server.Resume();

	User::WaitForRequest(startStatus, stopStatus);

	if (startStatus == KRequestPending)

		{

		// not started yet, i.e. stopStatus was signaled

		server.Close();

		return stopStatus.Int();

		}

	// Rendezvous was called - the server is ready

	// We first need to cancel Logon

	server.LogonCancel(stopStatus);

	// We don't need this anymore

	server.Close();

	// Wait for LogonCancel to complete

	User::WaitForRequest(stopStatus);

	// Everything went OK

	return KErrNone;

	}

EXPORT_C void RMemSpySession::GetProcessesL(RArray<CMemSpyApiProcess*> &aProcesses, TSortType aSortType)

	{

	TPckgBuf<TInt> count;

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpGetProcessCount, TIpcArgs(&count)));

	TInt requestedCount = count();

	HBufC8* buffer = HBufC8::NewLC(requestedCount * sizeof(TMemSpyProcessData));

	TPtr8 bufferPtr(buffer->Des());

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpGetProcesses, TIpcArgs(&count, &bufferPtr)));

	aProcesses.Reset();

	TInt receivedCount = Min(count(), requestedCount);

	for(TInt i=0, offset = 0; i<requestedCount; i++, offset+=sizeof(TMemSpyProcessData))

		{

		TPckgBuf<TMemSpyProcessData> data;

		data.Copy(bufferPtr.Ptr()+offset, sizeof(TMemSpyProcessData));

		aProcesses.AppendL(CMemSpyApiProcess::NewLC(data()));

		}

	CleanupStack::Pop(aProcesses.Count());

	CleanupStack::PopAndDestroy(buffer);

	}

EXPORT_C TProcessId RMemSpySession::GetProcessIdByNameL(const TDesC& aProcessName)

	{

	TPckgBuf<TProcessId> procId;

	User::LeaveIfError(SendReceive(EMemSpyClienServerOpGetProcessIdByName, 

			TIpcArgs(&aProcessName, &procId)));

	return procId();

	}

EXPORT_C TInt RMemSpySession::ProcessSystemPermanentOrCritical( TProcessId aId, TBool aValue )

	{

	TPckgBuf<TProcessId> arg1( aId );

	TPckgBuf<TBool> arg2( aValue );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpProcessSystemPermanentOrCritical, args );

	return error;

	}

EXPORT_C TInt RMemSpySession::EndProcess( TProcessId aId, TMemSpyEndType aType )

	{

	TPckgBuf<TProcessId> arg1( aId );

	TPckgBuf<TMemSpyEndType> arg2( aType );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpEndProcess, args );

	return error;

	}

EXPORT_C TInt RMemSpySession::SwitchToProcess( TProcessId aId, TBool aBrought )

	{

	TPckgBuf<TProcessId> arg1( aId );

	TPckgBuf<TBool> arg2( aBrought );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpSwitchToProcess, args );

	return error;	

	}

EXPORT_C void RMemSpySession::GetThreadsL(TProcessId aProcessId, RArray<CMemSpyApiThread*> &aThreads, TSortType aSortType)

	{

	TPckgBuf<TInt> count;

	TPckgBuf<TProcessId> pid(aProcessId);

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpGetThreadCount, TIpcArgs(&count, &pid)));

	TInt requestedCount = count();

	HBufC8* buffer = HBufC8::NewLC(requestedCount * sizeof(TMemSpyThreadData));

	TPtr8 bufferPtr(buffer->Des());

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpGetThreads, TIpcArgs(&count, &bufferPtr, &pid)));

	aThreads.Reset();

	TInt receivedCount = Min(count(), requestedCount);

	for(TInt i=0, offset = 0; i<requestedCount; i++, offset+=sizeof(TMemSpyThreadData))

		{

		TPckgBuf<TMemSpyThreadData> data;

		data.Copy(bufferPtr.Ptr()+offset, sizeof(TMemSpyThreadData));

		aThreads.AppendL(CMemSpyApiThread::NewLC(data()));

		}

	CleanupStack::Pop(aThreads.Count());

	CleanupStack::PopAndDestroy(buffer);

	}

EXPORT_C void RMemSpySession::SetThreadPriorityL(TThreadId aId, TInt aPriority)

	{

	TPckgBuf<TThreadId> arg1( aId );

	TPckgBuf<TInt> arg2( aPriority );

	User::LeaveIfError(SendReceive( EMemSpyClientServerOpSetThreadPriority, TIpcArgs(&arg1, &arg2)));

	}

EXPORT_C TInt RMemSpySession::ThreadSystemPermanentOrCritical( TThreadId aId, TBool aValue )

	{

	TPckgBuf<TThreadId> arg1( aId );

	TPckgBuf<TBool> arg2( aValue );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpThreadSystemPermanentOrCritical, args );

	return error;

	}

EXPORT_C TInt RMemSpySession::EndThread( TThreadId aId, TMemSpyEndType aType )

	{

	TPckgBuf<TThreadId> arg1( aId );

	TPckgBuf<TMemSpyEndType> arg2( aType );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpEndThread, args );

	return error;

	}

EXPORT_C TInt RMemSpySession::SwitchToThread( TThreadId aId, TBool aBrought )

	{

	TPckgBuf<TThreadId> arg1( aId );

	TPckgBuf<TBool> arg2( aBrought );

	TIpcArgs args( &arg1, &arg2 );

	TInt error = SendReceive( EMemSpyClientServerOpSwitchToThread, args );

	return error;	

	}

EXPORT_C TInt RMemSpySession::GetInfoItemType( TInt aIndex, TThreadId aId, TMemSpyThreadInfoItemType &aType )

	{

	TPckgBuf<TInt> arg1( aIndex );

	TPckgBuf<TThreadId> arg2( aId );

	TPckgBuf<TMemSpyThreadInfoItemType> arg3;

	TIpcArgs args( &arg1, &arg2, &arg3 );

	TInt error = SendReceive( EMemSpyClientServerOpGetInfoItemType, args );

	aType = arg3();

	return error;

	}

	{

	TPckgBuf<TThreadId> id( aId );	

	TPckgBuf<TMemSpyThreadInfoItemType> type( aType );

	TPckgBuf<TInt> count;	

	TInt error = SendReceive( EMemSpyClientServerOpGetThreadInfoItemsCount, TIpcArgs( &id, &type, &count ) );

	TInt itemCount = count();

	if( error == KErrNone )

		{		

		if( itemCount == 0 )

			{

			aInfoItems.Reset();

			}

		else

			{

			HBufC8* buffer = HBufC8::NewLC( itemCount * sizeof(TMemSpyThreadInfoItemData) );

			TPtr8 bufferPtr(buffer->Des());

			TPckgBuf<TInt> requestedCount( itemCount );

			TIpcArgs args( &requestedCount, &id, &type, &bufferPtr );

			TInt error = SendReceive( EMemSpyClientServerOpGetThreadInfoItems, args );

			for(TInt i=0, offset = 0; i < itemCount; i++, offset+=sizeof(TMemSpyThreadInfoItemData))

				{

				TPckgBuf<TMemSpyThreadInfoItemData> data;

				data.Copy(bufferPtr.Ptr()+offset, sizeof(TMemSpyThreadInfoItemData));

				}

			CleanupStack::PopAndDestroy(buffer);

			}

	}

//Kernel Objects specific operations

	{		

	TPckgBuf<TInt> count;

	}

EXPORT_C TInt RMemSpySession::GetKernelObjectItems( RArray<CMemSpyApiKernelObjectItem*> &aKernelObjectItems, TMemSpyDriverContainerType aForContainer )

	{

	TPckgBuf<TInt> count;

		}

	}

EXPORT_C void RMemSpySession::OutputAllContainerContents()

	{

	SendReceive( EMemSpyClientServerOpOutputAllContainerContents );

	}

//Heap specific operations

	{

	CMemSpyApiHeap* aHeap;

	HBufC8* buffer = HBufC8::NewLC( sizeof(TMemSpyHeapData) );

	TPtr8 bufferPtr(buffer->Des());

	TIpcArgs args( &bufferPtr );

	CleanupStack::PopAndDestroy(buffer);

	return aHeap;

	}

EXPORT_C void RMemSpySession::DumpKernelHeap()

	{

	SendReceive( EMemSpyClientServerOpDumpKernelHeap );

	}

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpHeapData | KMemSpyOpFlagsIncludesThreadId,

			TIpcArgs(KMemSpyClientServerThreadIdKernel)));

	}

	{

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpHeapData | KMemSpyOpFlagsIncludesThreadId,

			TIpcArgs(aThreadId)));

	}

	User::LeaveIfError(SendReceive(EMemSpyClientServerOpHeapCellListing | KMemSpyOpFlagsIncludesThreadId,

			TIpcArgs(aThreadId)));

	}

	{