STXXL (GIT-copy)

#ifndef HEADER_STXXL_DEBUG
#define HEADER_STXXL_DEBUG

/***************************************************************************
 *            debug.h
 *
 *  Thu Dec 30 14:52:00 2004
 *  Copyright  2004  Roman Dementiev
 *  Email dementiev@ira.uka.de
 ****************************************************************************/

#include "../common/utils.h"
#include "../common/mutex.h"
#include <map>

#ifdef BOOST_MSVC
#include <hash_map>
#else
#include <ext/hash_map>
#endif

__STXXL_BEGIN_NAMESPACE 

class debugmon
{
	struct tag
	{
		bool ongoing;
		char * end;
		size_t size;
	};
	struct hash_fct
	{
		inline size_t operator () (char * arg) const
		{
			return long(arg);
		}
	};
	struct eqt
	{
		inline bool operator () (char * arg1, char * arg2) const
		{
			return arg1 == arg2;
		}
	};
	#ifdef BOOST_MSVC
	struct my_hash_comp
	{
		size_t operator()(char * arg) const
		{	
			return long(arg);
		}
		bool operator()(char * a, char * b) const
		{
			return (long(a)<long(b));
		}
		enum
		{	// parameters for hash table
			bucket_size = 4,	// 0 < bucket_size
			min_buckets = 8
		};	// min_buckets = 2 ^^ N, 0 < N

	};
	stdext::hash_map<char *, tag, my_hash_comp > tags;
	#else
	__gnu_cxx::hash_map<char *, tag, hash_fct, eqt > tags;
	#endif
	
	#ifdef STXXL_BOOST_THREADS
	boost::mutex mutex1;
	#else
	mutex mutex1;
	#endif
	
	static debugmon * instance;
	
	inline debugmon() {}
public:
	
	void block_allocated(char * ptr, char * end, size_t size);
	void block_deallocated(char * ptr);
	void io_started(char * ptr);
	void io_finished(char * ptr);

	inline static debugmon *get_instance ()
	{
			if (!instance)
				instance = new debugmon ();
			return instance;
	}
};

__STXXL_END_NAMESPACE

#endif