--- a/memana/analyzetoolclient/dynamicmemoryhook/src/analyzetoolfastlog.cpp Thu Feb 11 15:52:57 2010 +0200
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,298 +0,0 @@
-/*
-* 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 <e32debug.h> // RDebug
-#include <analyzetool/analyzetooltraceconstants.h>
-#include "analyzetoolfastlog.h"
-#include "atlog.h"
-
-// Local time function.
-TInt64 CurrentTime()
- {
- LOGSTR1( "ATFL CurrentTime()" );
- TTime time;
- time.UniversalTime();
- return time.Int64() - KMicroSecondsAt1970;
- }
-
-TInt ATFastLogProcessStarted( const TDesC8& aProcessName,
- TUint aProcessId,
- TUint32 aIsDebug )
- {
- LOGSTR1( "ATFL ATFastLogProcessStarted()" );
- // Convert process name to 16-bit descriptor.
- TBuf<KMaxProcessName> processName;
- processName.Copy( aProcessName );
- // Buffer to trace.
- TBuf<KProcessStartBufLength> buffer;
- // Format process name and id.
- buffer.Format( KProcessStart16, &processName, aProcessId );
- // Timestamp.
- buffer.AppendNum( CurrentTime(), EHex ) ;
- // Append udeb/urel information to the process start.
- buffer.Append( KSpaceXti );
- buffer.AppendNum( aIsDebug, EHex );
- // Append version number.
- buffer.Append( KSpaceXti );
- buffer.AppendNum( KATTraceVersion, EHex );
- // Log to XTI.
- RDebug::Print( KXtiMessage, aProcessId ,&buffer );
- return KErrNone;
- }
-
-TInt ATFastLogProcessEnded( TUint aProcessId,
- TUint aHandleLeakCount )
- {
- LOGSTR1( "ATFL ATFastLogProcessEnded()" );
- // Handle leaks.
- if ( aHandleLeakCount > 0 )
- {
- // Buffer to trace.
- TBuf<KHandleLeakBufLength> buffer2;
- buffer2.Format( KHandleLeak16, &KUnknownModule16, aHandleLeakCount );
- // Trace it.
- RDebug::Print( KXtiMessage, aProcessId, &buffer2 );
- }
- // Process end trace.
- TBuf<KProcessEndBufLength> buffer;
- buffer.Format( KProcessEnd16, aProcessId );
- buffer.AppendNum( CurrentTime(), EHex);
- buffer.Append( KNewLineXti );
- RDebug::Print( KXtiMessage, aProcessId, &buffer );
- return KErrNone;
- }
-
-TInt ATFastLogDllLoaded( TUint aProcessId,
- const TDesC8& aDllName,
- TUint32 aStartAddress,
- TUint32 aEndAddress )
- {
- LOGSTR1( "ATFL ATFastLogDllLoaded()" );
- // Timestamp.
- TInt64 time = CurrentTime();
- // Convert dll name to 16-bit descriptor.
- TBuf<KMaxLibraryName> dll;
- dll.Copy( aDllName );
- // Buffer to trace.
- TBuf<KDllLoadBufLength> buffer;
- buffer.Format( KDllLoad16, &dll, time, aStartAddress, aEndAddress );
- RDebug::Print( KXtiMessage, aProcessId, &buffer );
- return KErrNone;
- }
-
-TInt ATFastLogDllUnloaded( TUint aProcessId, const TDesC8& aDllName, TUint32 aStartAddress,
- TUint32 aEndAddress )
- {
- LOGSTR1( "ATFL ATFastLogDllUnloaded()" );
- // Timestamp.
- TInt64 time = CurrentTime();
- // Convert dll name to 16-bit descriptor.
- TBuf<KMaxLibraryName> dll;
- dll.Copy( aDllName );
- // Buffer to trace.
- TBuf<KDllLoadBufLength> buffer;
- buffer.Format( KDllUnload16, &dll, time, aStartAddress, aEndAddress );
- RDebug::Print( KXtiMessage, aProcessId, &buffer );
- return KErrNone;
- }
-
-TInt ATFastLogMemoryAllocated( TUint aProcessId, TUint32 aMemAddress,
- TFixedArray<TUint32, KATMaxCallstackLength>& aCallstack,
- TInt aSize )
- {
- LOGSTR1( "ATFL ATFastLogMemoryAllocated()" );
- // ALLOCH <Memory address> <Time stamp> <Allocation size> <Call stack address count>
- // <Call stack address> <Call stack address> ...
-
- // Timestamp.
- TInt64 time = CurrentTime();
-
- // Trace buffer and pointer to it.
- TBufC<KMemAllocBufLength> buffer;
- TPtr ptr( buffer.Des() );
- // Append the tag implying a memory allocation line in the data file
- ptr.Append( KMemoryAllocHeader );
-
- // Append the start address of this allocation in the 32-bit (max 8 characters)
- // hexadecimal text format.
- ptr.AppendNum( aMemAddress, EHex );
-
- // Append the current time in the 64-bit (max 16 characters) hexadecimal text
- // format
- ptr.Append( KSpaceXti );
- ptr.AppendNum( time, EHex );
-
- // Append the size of the allocation in the 32-bit (max 8 characters) hexadecimal
- // text format.
- ptr.Append( KSpaceXti );
- ptr.AppendNum( aSize, EHex );
-
- // Search call stack for address count.
- TInt addrCount(0);
- for ( TInt j = 0; j < aCallstack.Count() ; j++ )
- {
- if ( aCallstack.At(j) == 0 )
- break;
- addrCount++;
- }
- // Current position in call stack.
- TInt addrPos( 0 );
-
- // Append address count.
- ptr.Append( KSpaceXti );
- ptr.AppendNum( addrCount, EHex );
-
- // Calculate last item length
- TInt lastItemLength( KXtiMessage().Length() + KHexa32Length +
- KSpaceLength + KNewlineLength );
-
- TUint packetNumber( 1 );
-
- // Go through all call stack's memory addresses associated with
- // this memory allocation
- for ( TInt j = 0; j < addrCount; j++ )
- {
- // ALLOCF <Memory address> <Time stamp> <Packet number>
- // <Call stack address> <Call stack address> ...
- if ( ptr.Length() <= 0 )
- {
- // Create alloc fragment message header
- ptr.Append( KMemoryAllocFragment );
- ptr.AppendNum( aMemAddress, EHex );
- ptr.Append( KSpaceXti );
- ptr.AppendNum( time, EHex );
- ptr.Append( KSpaceXti );
- ptr.AppendNum( packetNumber, EHex );
- // Increase packet number
- packetNumber++;
- }
-
- // Append call stack address.
- ptr.AppendFormat( KHexaNumberXti, aCallstack.At( addrPos ) );
-
- // Move the call stack position.
- addrPos++;
-
- // Check if buffer max length exceed
- if ( lastItemLength + ptr.Length() >= KMemAllocBufLength )
- {
- ptr.Append( KNewLineXti );
- // Log through XTI channel
- RDebug::Print( KXtiMessage, aProcessId, &buffer );
- // Empty XTI buffer
- ptr.Delete( 0, ptr.MaxLength() );
- }
- }
- // Send last message if exists.
- if ( ptr.Length() > 0 )
- {
- ptr.Append( KNewLineXti );
- RDebug::Print( KXtiMessage, aProcessId, &buffer);
- }
- return KErrNone;
- }
-
-
-TInt ATFastLogMemoryFreed( TUint aProcessId, TUint32 aMemAddress,
- TFixedArray<TUint32, KATMaxCallstackLength>& aFreeCallstack )
- {
- LOGSTR1( "ATFL ATFastLogMemoryFreed()" );
- // FREEH <Memory address> <Time tamp> <Call stack address count> <Call stack address>
- // <Call stack address> ...
-
- // Timestamp.
- TInt64 time = CurrentTime();
-
- // Trace buffer and pointer to it.
- TBufC<KMemFreedBufLength> buffer;
- TPtr ptr( buffer.Des() );
-
- // Append the tag implying a memory allocation line in the data file
- ptr.Append( KMemoryFreedHeader );
-
- // Append the start address of this allocation in the 32-bit (max 8 characters)
- // hexadecimal text format.
- ptr.AppendNum( aMemAddress, EHex );
-
- // Append timestamp;
- ptr.Append( KSpaceXti );
- ptr.AppendNum( time, EHex);
-
- // Search call stack for address count.
- TInt addrCount(0);
- for ( TInt j = 0; j < aFreeCallstack.Count() ; j++ )
- {
- if ( aFreeCallstack.At(j) == 0 )
- break;
- addrCount++;
- }
- // Current position in call stack.
- TInt addrPos( 0 );
-
- // Append address count.
- ptr.Append( KSpaceXti );
- ptr.AppendNum( addrCount, EHex );
-
- // Calculate last item length
- TInt lastItemLength( KXtiMessage().Length() + KHexa32Length +
- KSpaceLength + KNewlineLength );
-
- TUint packetNumber( 1 );
-
- // Go through all call stack's memory addresses associated with
- // this memory allocation
- for ( TInt j = 0; j < addrCount; j++ )
- {
- // ALLOCF <Memory address> <Time stamp> <Packet number>
- // <Call stack address> <Call stack address> ...
- if ( ptr.Length() <= 0 )
- {
- // Create alloc fragment message header
- ptr.Append( KMemoryFreedFragment );
- ptr.AppendNum( aMemAddress, EHex );
- ptr.Append( KSpaceXti );
- ptr.AppendNum( packetNumber, EHex );
- // Increase packet number
- packetNumber++;
- }
-
- // Append call stack address.
- ptr.AppendFormat( KHexaNumberXti, aFreeCallstack.At( addrPos ) );
-
- // Move the call stack position.
- addrPos++;
-
- // Check if buffer max length exceed
- if ( lastItemLength + ptr.Length() >= KMemFreedBufLength )
- {
- ptr.Append( KNewLineXti );
- // Log through XTI channel
- RDebug::Print( KXtiMessage, aProcessId, &buffer );
- // Empty XTI buffer
- ptr.Delete( 0, ptr.MaxLength() );
- }
- }
- // Send last message if exists.
- if ( ptr.Length() > 0 )
- {
- ptr.Append( KNewLineXti );
- RDebug::Print( KXtiMessage, aProcessId, &buffer);
- }
- return KErrNone;
- }
-