// Copyright (c) 2000-2009 Nokia Corporation and/or its subsidiary(-ies).

 // All rights reserved.

 // This component and the accompanying materials are made available

 // under the terms of the License "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 "analyse.h"

 #include "distribution.h"

 #include "output.h"

 #ifdef __MSVCDOTNET__

 #include <ostream>

 #include <iomanip>

 #else //!__MSVCDOTNET__

 #include <ostream.h>

 #include <iomanip.h>

 #endif //__MSVCDOTNET__

 #include <algorithm>

 // class Distribution

 namespace {

 int* BucketBox(int aSize)

 	{

 	int* buckets = new int[aSize];

 	memset(buckets, 0, sizeof(int) * aSize);

 	return buckets;

 	}

 class BucketTotals

 	{

 private:

 	class Generator

 		{

 	public:

 		inline Generator()

 			:iValue(0)

 			{}

 		inline int operator()()

 			{return iValue++;}

 	private:

 		int iValue;

 		};

 	class Sorter

 		{

 	public:

 		inline Sorter(const int* aTotals)

 			:iTotals(aTotals)

 			{}

 		inline bool operator()(int aLhs, int aRhs) const

 			{return (iTotals[aLhs] > iTotals[aRhs]);}

 	private:

 		const int* iTotals;

 		};

 public:

 	BucketTotals(Distribution::Data& aData, int aSize);

 	~BucketTotals();

 	void Sort();

 //

 	inline int Total() const;

 	inline int Map(int aBucket) const;

 	inline int operator[](int aBucket) const;

 	inline Result Sample(int aSample) const;

 private:

 	void Total(Distribution::Data& aData);

 private:

 	int iSize;

 	int* iTotals;

 	int* iOrdering;

 	int iTotal;

 	};

 BucketTotals::BucketTotals(Distribution::Data& aData, int aSize)

 	:iSize(aSize), iTotals(BucketBox(aSize)), iOrdering(BucketBox(aSize))

 	{

 	Total(aData);

 	std::generate_n(iOrdering, iSize, Generator());

 	}

 BucketTotals::~BucketTotals()

 	{

 	delete [] iTotals;

 	delete [] iOrdering;

 	}

 void BucketTotals::Total(Distribution::Data& aData)

 	{

 	int total = 0;

 	for (Distribution::Data::iterator p = aData.begin(), e = aData.end(); p != e; ++p)

 		{

 		const int* box = p->iBuckets;

 		int threadTotal = 0;

 		for (int j = p->iBucketsLength; --j >=0;)

 			{

 			threadTotal += box[j];

 			iTotals[j] += box[j];

 			}

 		p->iTotal = threadTotal;

 		total += threadTotal;

 		}

 	iTotal = total;

 	}

 void BucketTotals::Sort()

 	{

 	std::sort(iOrdering, iOrdering + iSize, Sorter(iTotals));

 	}

 inline int BucketTotals::Total() const

 	{return iTotal;}

 inline int BucketTotals::Map(int aBucket) const

 	{return iOrdering[aBucket];}

 inline int BucketTotals::operator[](int aBucket) const

 	{return iTotals[iOrdering[aBucket]];}

 inline Result BucketTotals::Sample(int aSample) const

 	{return Result(aSample, iTotal);}

 };

 inline Distribution::ThreadData::ThreadData(const Thread& aThread, int aSize)

 	:iThread(&aThread), iBuckets(BucketBox(aSize)), iTotal(0), iBucketsLength(aSize)

 	{}

 inline Distribution::ThreadData::ThreadData(int aCutoff)

 	:iTotal(aCutoff)

 	{}

 inline bool Distribution::ThreadData::operator<(const Distribution::ThreadData& aRhs) const

 	{return (iTotal > aRhs.iTotal);}

 Distribution::Distribution(CodeSpace& aCodeSpace, double aCutOff)

 	:iCodeSpace(aCodeSpace), iCutOff(aCutOff)

 	{

 	cout << "Profile distribution\n\n";

 	}

 void Distribution::Sample(unsigned , const Thread& aThread, PC aPc)

 //

 // Collect the sample in the bucket as allocated by the code space

 //

 	{

 	if (aThread.iIndex == iData.size())

 		iData.push_back(ThreadData(aThread,iCodeSpace.Size()));

 	///

 	int bucket = iCodeSpace.Bucket(aPc);

 	if (bucket >= iData[aThread.iIndex].iBucketsLength)

 		{

 		int* new_buckets = new int[bucket+1];

 		memset(new_buckets, 0, sizeof(int) * (bucket+1));

 		memcpy(new_buckets, iData[aThread.iIndex].iBuckets, sizeof(int) * iData[aThread.iIndex].iBucketsLength);

 		delete [] iData[aThread.iIndex].iBuckets;

 		iData[aThread.iIndex].iBuckets = new_buckets;

 		iData[aThread.iIndex].iBucketsLength = bucket+1;

 		}

 	++iData[aThread.iIndex].iBuckets[bucket];

 	}

 void Distribution::Complete(unsigned aTotal, unsigned aActive)

 	{

 	// accumulate thread and bucket totals

 	const int nbuckets = iCodeSpace.Size();

 	BucketTotals totals(iData, nbuckets);

 	if (iCodeSpace.Ordering() == CodeSpace::ERandom)

 		totals.Sort();

 	int cutoff = int(iCutOff * totals.Total() * 0.01);

 	std::sort(iData.begin(), iData.end());

 	iData.erase(std::upper_bound(iData.begin(), iData.end(), ThreadData(cutoff)), iData.end());

 //

 	cout.setf(ios::fixed, ios::floatfield);

 	cout.precision(2);

 //

 	cout << "Samples: " << aTotal << '\n';

 	cout << " Active: " << aActive << "  (" << double(aActive*100)/aTotal << "%)\n";

 	cout << "Counted: " << totals.Total() << "  (" << double(totals.Total()*100)/aTotal << "%)\n\n";

 	cout << setfill(' ');

 //

 	Data::iterator p, e;

 	if (!Analyse::Option(Analyse::ETotalOnly))

 		{

 		if (Analyse::Format() != Analyse::EExcel)

 			{

 			cout << "ID  Thread name\n";

 			char id = 'A';

 			for (p = iData.begin(), e = iData.end(); p != e; ++p)

 				cout << id++ << "   " << *p->iThread << '\n';

 			cout << '\n';

 			id = 'A';

 			for (p = iData.begin(), e = iData.end(); p != e; ++p)

 				cout << setw(4) << id++ << "    ";

 			cout << "  total\n\n";

 			for (p = iData.begin(), e = iData.end(); p != e; ++p)

 				cout << totals.Sample(p->iTotal) << " ";

 			cout << "  " << totals.Sample(totals.Total()) << "  total\n\n";

 			}

 		else

 			{

 			cout.precision(5);

 			for (p = iData.begin(), e = iData.end(); p != e; ++p)

 				cout << '\t' << *p->iThread;

 			cout << "\ttotal\n";

 			}

 		}

 	if (cutoff == 0 && iCodeSpace.Ordering() != CodeSpace::ELinear)

 		cutoff = 1;

 	for (int ix = 0; ix< nbuckets; ++ix)

 		{

 		int total = totals[ix];

 		if (total >= cutoff)

 			{

 			int jx = totals.Map(ix);

 			if (jx == CodeSpace::KOtherBucket && Analyse::Option(Analyse::ENoOther))

 				continue;

 			if (Analyse::Format() == Analyse::EExcel)

 				{

 				cout << iCodeSpace.Name(jx);

 				if (!Analyse::Option(Analyse::ETotalOnly))

 					{

 					for (p = iData.begin(), e = iData.end(); p != e; ++p)

 						cout << '\t' << totals.Sample(jx>=p->iBucketsLength ? 0 : p->iBuckets[jx]);

 					}

 				cout << '\t' << totals.Sample(total) << '\n';

 				}

 			else

 				{

 				if (!Analyse::Option(Analyse::ETotalOnly))

 					{

 					for (p = iData.begin(), e = iData.end(); p != e; ++p)

 						cout << totals.Sample(jx>=p->iBucketsLength ? 0 : p->iBuckets[jx]) << " ";

 					cout << "  ";

 					}

 				cout << totals.Sample(total) << "  " << iCodeSpace.Name(jx) << '\n';

 				}

 			}

 		}

 	if (!Analyse::Option(Analyse::ETotalOnly))

 		{

 		if (Analyse::Format() == Analyse::EExcel)

 			{

 			cout << "total";

 			for (p = iData.begin(), e = iData.end(); p != e; ++p)

 				cout << '\t' << totals.Sample(p->iTotal);

 			cout << '\t' << totals.Sample(totals.Total()) << '\n';

 			}

 		}

 	}