// Copyright (c) 2005-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:

//

/**

 @file

 @internalTechnology

*/

#include <e32base.h>

#include <bluetooth/logger.h>

#ifdef __FLOG_ACTIVE

_LIT8(KSubsystem, "BT");

_LIT8(KLogCmpt, LOG_COMPONENT_LOGGER);

#endif

/**

This constant is used to direct how to pad the logged text to ensure it

lines up, as tab characters are involved, lining up requires knowledge of

how many spaces a tab character is viewed as.

*/

#ifdef __FLOG_ACTIVE

const TUint KTabWidthInViewer = 4;

const TUint KMaxTabsLength = 1 + KMaxTagLength/KTabWidthInViewer;

#endif

NONSHARABLE_CLASS(TLogData)

	{

	public:

#ifdef __FLOG_ACTIVE

		TLogData();

		void SetLogTags(const TDesC8& aCmpt);

		TInt iAccessCount;

		RFileLogger iLogEngine;

		TBuf8<KMaxTagLength> iCurrentComponent;

		TBuf8<KMaxTabsLength> iInitTabPad;

		TUint iIndent;

#endif

	};

#ifdef __FLOG_ACTIVE

TLogData::TLogData()

	: iAccessCount(0), iCurrentComponent(KNullDesC8), iIndent(0)

	{}

void TLogData::SetLogTags(const TDesC8& aCmpt)

	{

	if (aCmpt != iCurrentComponent)

		{

		iCurrentComponent = aCmpt.Left(KMaxTagLength);

		TInt numPadChars = KMaxTagLength-iCurrentComponent.Length(); // must be >=0

		TInt padTabs = (numPadChars/KTabWidthInViewer) + ((numPadChars%KTabWidthInViewer > 0) ? 1 : 0);

		iInitTabPad.Zero();

		iInitTabPad.Fill('\t', padTabs);

		iLogEngine.SetLogTags(KSubsystem, iCurrentComponent);

		}

	}

#endif

#define GETLOG TLogData* __logger = static_cast<TLogData*>(Dll::Tls());

EXPORT_C /*static*/ TInt CBtLog::Connect()

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (!__logger)

		{

		CBtLog::Write(KLogCmpt, _L8("Opening new logger connection"));

		__logger = new TLogData();

		if (!__logger)

			{

			CBtLog::Write(KLogCmpt, _L8("Opening logger connection failed, no memory"));

			return KErrNoMemory;

			}

		__logger->iLogEngine.Connect();

		Dll::SetTls(__logger);

		}

	__logger->iAccessCount++;

	CBtLog::WriteFormat(KLogCmpt, _L8("Opening -- %d instances now open"), __logger->iAccessCount);

	return KErrNone;

#else

	return KErrNotSupported;

#endif

	}

EXPORT_C /*static*/ void CBtLog::Close()

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		TInt& count = __logger->iAccessCount;

		if (count)

			{

			count--;

			CBtLog::WriteFormat(KLogCmpt, _L8("Closing -- %d instance(s) left open"), count);

			if (!count)

				{

				__logger->iLogEngine.Close();

				delete __logger;

				Dll::SetTls(NULL);

				CBtLog::Write(KLogCmpt, _L8("Fully closed and deleted, now flogging statically."));

				}

			}

		else

			{

			CBtLog::Write(KLogCmpt, _L8("Not closing -- not opened"));

			}

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::Write(const TDesC8& IF_FLOGGING(aCmpt), const TDesC8& IF_FLOGGING(aText))

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.Write(aText);

		}

	else

		{

		RFileLogger::Write(KSubsystem, aCmpt, aText);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::WriteFormat(const TDesC8& IF_FLOGGING(aCmpt), TRefByValue<const TDesC8> IF_FLOGGING(aFmt), ...)

	{

#ifdef __FLOG_ACTIVE

	VA_LIST list;

	VA_START(list, aFmt);

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.WriteFormat(aFmt, list);

		}

	else

		{

		RFileLogger::WriteFormat(KSubsystem, aCmpt, aFmt, list);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::WriteFormat(const TDesC8& IF_FLOGGING(aCmpt), TRefByValue<const TDesC8> IF_FLOGGING(aFmt), VA_LIST& IF_FLOGGING(aList))

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.WriteFormat(aFmt, aList);

		}

	else

		{

		RFileLogger::WriteFormat(KSubsystem, aCmpt, aFmt, aList);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::Write(const TDesC8& IF_FLOGGING(aCmpt), const TDesC16& IF_FLOGGING(aText))

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.Write(aText);

		}

	else

		{

		RFileLogger::WriteFormat(KSubsystem, aCmpt, aText);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::WriteFormat(const TDesC8& IF_FLOGGING(aCmpt), TRefByValue<const TDesC16> IF_FLOGGING(aFmt), ...)

	{

#ifdef __FLOG_ACTIVE

	VA_LIST list;

	VA_START(list, aFmt);

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.WriteFormat(aFmt, list);

		}

	else

		{

		RFileLogger::WriteFormat(KSubsystem, aCmpt, aFmt, list);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::WriteFormat(const TDesC8& IF_FLOGGING(aCmpt), TRefByValue<const TDesC16> IF_FLOGGING(aFmt), VA_LIST& IF_FLOGGING(aList))

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.WriteFormat(aFmt, aList);

		}

	else

		{

		RFileLogger::WriteFormat(KSubsystem, aCmpt, aFmt, aList);

		}

#endif

	}

EXPORT_C /*static*/ void CBtLog::HexDump(const TDesC8& IF_FLOGGING(aCmpt), const TText* IF_FLOGGING(aHeader), const TText* IF_FLOGGING(aMargin), const TUint8* IF_FLOGGING(aPtr), TInt IF_FLOGGING(aLen))

	{

#ifdef __FLOG_ACTIVE

	GETLOG;

	if (__logger)

		{

		__logger->SetLogTags(aCmpt);

		__logger->iLogEngine.HexDump(aHeader, aMargin, aPtr, aLen);

		}

	else

		{

		RFileLogger::HexDump(KSubsystem, aCmpt, TPtrC8(aPtr, aLen), KNullDesC8);

		}

#endif

	}

/**

Leave (if error) verbosely- log name of file and line number just before 

leaving.

@param aFile The file we're leaving from.

@param aLine The line number we're leaving from.

@param aReason The leave code.

*/

EXPORT_C void VerboseLeaveIfErrorL(const TDesC8& IF_FLOGGING(aCpt), 

						  char* IF_FLOGGING(aFile), 

						  TInt IF_FLOGGING(aLine), 

						  TInt IF_FLOGGING(aReason))

	{

#ifdef __FLOG_ACTIVE

	// only leave if non-zero value

	if ( aReason >= KErrNone )

		{

		return;

		}

	_LIT8(KLeavePrefix, "LEAVE: ");

	TPtrC8 fullFileName((const TUint8*)aFile);

	TPtrC8 fileName(fullFileName.Ptr()+fullFileName.LocateReverse('\\')+1);

	TBuf8<256> buf;

	buf.Append(KLeavePrefix);

	buf.AppendFormat(_L8("aReason = %d [file %S, line %d]"), aReason, &fileName, 

		aLine);

	CBtLog::Write(aCpt, buf);

	// finally

	User::Leave(aReason);

#endif

	}

/**

Leave verbosely- log name of file and line number just before

leaving.

@param aFile The file we're leaving from.

@param aLine The line number we're leaving from.

@param aReason The leave code.

*/

EXPORT_C void VerboseLeaveL(const TDesC8& IF_FLOGGING(aCpt),

						  char* IF_FLOGGING(aFile),

						  TInt IF_FLOGGING(aLine),

						  TInt IF_FLOGGING(aReason))

	{

#ifdef __FLOG_ACTIVE

	_LIT8(KLeavePrefix, "LEAVE: ");

	TPtrC8 fullFileName((const TUint8*)aFile);

	TPtrC8 fileName(fullFileName.Ptr()+fullFileName.LocateReverse('\\')+1);

	TBuf8<256> buf;

	buf.Append(KLeavePrefix);

	buf.AppendFormat(_L8("aReason = %d [file %S, line %d]"), aReason, &fileName,

		aLine);

	CBtLog::Write(aCpt, buf);

	// finally

	User::Leave(aReason);

#endif

	}

/**

Panic verbosely- log name of file and line number just before panicking.

@param aFile The file that's panicking.

@param aLine The line number that's panicking.

@param aReason The panic code.

@param aPanicName The text of the panic code.

@param aPanicCategory The panic category.

*/

EXPORT_C void VerbosePanic(const TDesC8& IF_FLOGGING(aCpt), 

				  char* IF_FLOGGING(aFile), 

				  TInt IF_FLOGGING(aLine), 

				  TInt IF_FLOGGING(aPanicCode), 

				  TText8* IF_FLOGGING(aPanicName),

				  const TDesC& IF_FLOGGING(aPanicCategory))

	{

#ifdef __FLOG_ACTIVE

	_LIT8(KPanicPrefix, "PANIC: code ");

	TPtrC8 fullFileName((const TUint8*)aFile);

	TPtrC8 fileName(fullFileName.Ptr()+fullFileName.LocateReverse('\\')+1);

	TBuf8<256> buf;

	buf.Append(KPanicPrefix);

	buf.AppendFormat(_L8("%d = %s [file %S, line %d]"), 

		aPanicCode, 

		aPanicName, 

		&fileName, 

		aLine);

	CBtLog::Write(aCpt, buf);

	// finally

	User::Panic(aPanicCategory, aPanicCode);

#endif

	}

/**

Panic the given message verbosely- log name of file and line number just

before panicking.

@param aMsg Message to panic.

@param aFile The file that's panicking.

@param aLine The line number that's panicking.

@param aReason The panic code.

@param aPanicName The text of the panic code.

@param aPanicCategory The panic category.

*/

EXPORT_C void VerboseMsgPanic(const TDesC8& IF_FLOGGING(aCpt),

								char* IF_FLOGGING(aFile),

								TInt  IF_FLOGGING(aLine),

								const RMessage2& aMsg,

								const TDesC& aCat,

								TInt  aPanicCode)

	{

#ifdef __FLOG_ACTIVE

	_LIT8(KPanicPrefix, "PANICKING CLIENT: code ");

	TPtrC8 fullFileName((const TUint8*)aFile);

	TPtrC8 fileName(fullFileName.Ptr()+fullFileName.LocateReverse('\\')+1);

	TBuf8<256> buf;

	buf.Append(KPanicPrefix);

	buf.AppendFormat(_L8("%d [file %S, line %d]"),

		aPanicCode,

		&fileName,

		aLine);

	CBtLog::Write(aCpt, buf);

#endif

	// finally

	aMsg.Panic(aCat, aPanicCode);

	}

#ifdef __FLOG_ACTIVE

_LIT8(KInstrumentIn, "%S%S>>%S this = [0x%08x]");

_LIT8(KInstrumentOut, "%S%S<<%S");

_LIT8(KInstrumentStaticIn, "%S%S>>%S static");

_LIT8(KInstrumentStaticOut, "%S%S<<%S");

#define BT_LOGGER_INDENT_CHAR ' '

TUint TLoggerBase::PreIncrementIndent()

	{

	GETLOG;

	return (__logger ? ++(__logger->iIndent) : 0);

	}

TUint TLoggerBase::PostDecrementIndent()

	{

	GETLOG;

	return (__logger && (__logger->iIndent > 0) ? (__logger->iIndent)-- : 0);

	}

TUint TLoggerBase::Indent()

	{

	GETLOG;

	return (__logger ? (__logger->iIndent) : 0);

	}

#endif

#ifdef __FLOG_ACTIVE

EXPORT_C TFunctionLogger::TFunctionLogger(const TDesC8& aCpt, const TDesC8& aString, TAny* aThis)

	{

	GETLOG;

	iCpt.Set(aCpt);

	iString.Set(aString);

	if (PreIncrementIndent() < KMaxIndent)

		{

		iIndentBuf.Fill(BT_LOGGER_INDENT_CHAR, Indent());

		}

	TPtrC8 initPad(KNullDesC8);

	if(__logger)

		{

		__logger->SetLogTags(iCpt);

		initPad.Set(__logger->iInitTabPad);

		}

	CBtLog::WriteFormat(iCpt, KInstrumentIn, &initPad, &iIndentBuf, &iString, aThis);

	}

EXPORT_C TFunctionLogger::~TFunctionLogger()

	{

	GETLOG;

	if (Indent() < KMaxIndent)

		{

		iIndentBuf.Fill(BT_LOGGER_INDENT_CHAR, PostDecrementIndent());

		}

	else

		{

		PostDecrementIndent();

		}

	TPtrC8 initPad(KNullDesC8);

	if(__logger)

		{

		__logger->SetLogTags(iCpt);

		initPad.Set(__logger->iInitTabPad);

		}

	CBtLog::WriteFormat(iCpt, KInstrumentOut, &initPad, &iIndentBuf, &iString);

	}

EXPORT_C TStaticFunctionLogger::TStaticFunctionLogger(const TDesC8& aCpt, const TDesC8& aString)

	{

	GETLOG;

	iCpt.Set(aCpt);

	iString.Set(aString);

	if (PreIncrementIndent() < KMaxIndent)

		{

		iIndentBuf.Fill(BT_LOGGER_INDENT_CHAR, Indent());

		}

	TPtrC8 initPad(KNullDesC8);

	if(__logger)

		{

		__logger->SetLogTags(iCpt);

		initPad.Set(__logger->iInitTabPad);

		}

	CBtLog::WriteFormat(iCpt, KInstrumentStaticIn, &initPad, &iIndentBuf, &iString);

	}

EXPORT_C TStaticFunctionLogger::~TStaticFunctionLogger()

	{

	GETLOG;

	if (Indent() < KMaxIndent)

		{

		iIndentBuf.Fill(BT_LOGGER_INDENT_CHAR, PostDecrementIndent());

		}

	else

		{

		PostDecrementIndent();

		}

	TPtrC8 initPad(KNullDesC8);

	if(__logger)

		{

		__logger->SetLogTags(iCpt);

		initPad.Set(__logger->iInitTabPad);

		}

	CBtLog::WriteFormat(iCpt, KInstrumentStaticOut, &initPad, &iIndentBuf, &iString);

	}

#else

#ifdef __UREL_RDEBUG_PRINT

#include <e32debug.h>

EXPORT_C TFunctionLogger::TFunctionLogger(const TDesC8& aCpt, const TDesC8& aString, TAny* aThis)

	{

	iCpt.Set(aCpt);

	iString.Set(aString);

	TBuf8<1024> buf;

	buf.Format(_L8("%S >>%S this = [0x%08x]"), &iCpt, &iString, aThis);