/*
* Copyright 2008, 2011, 2014 Free Software Foundation, Inc.
*
* This software is distributed under the terms of the GNU Affero Public License.
* See the COPYING file in the main directory for details.
*
* This use of this software may be subject to additional restrictions.
* See the LEGAL file in the main directory for details.

	This program is free software: you can redistribute it and/or modify
	it under the terms of the GNU Affero General Public License as published by
	the Free Software Foundation, either version 3 of the License, or
	(at your option) any later version.

	This program is distributed in the hope that it will be useful,
	but WITHOUT ANY WARRANTY; without even the implied warranty of
	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
	GNU Affero General Public License for more details.

	You should have received a copy of the GNU Affero General Public License
	along with this program.  If not, see <http://www.gnu.org/licenses/>.

*/


#ifndef THREADS_H
#define THREADS_H

#include <pthread.h>
#include <iostream>
#include <assert.h>
#include <unistd.h>

class Mutex;


/**@name Multithreaded access for standard streams. */
//@{

extern int gMutexLogLevel;	// The mutexes cannot call gConfig or gGetLoggingLevel so we have to get the log level indirectly.

/**@name Functions for gStreamLock. */
//@{
extern Mutex gStreamLock;	///< global lock for cout and cerr
void lockCerr();		///< call prior to writing cerr
void unlockCerr();		///< call after writing cerr
void lockCout();		///< call prior to writing cout
void unlockCout();		///< call after writing cout
//@}

/**@name Macros for standard messages. */
//@{
#define COUT(text) { lockCout(); std::cout << text; unlockCout(); }
#define CERR(text) { lockCerr(); std::cerr << __FILE__ << ":" << __LINE__ << ": " << text; unlockCerr(); }
#ifdef NDEBUG
#define DCOUT(text) {}
#define OBJDCOUT(text) {}
#else
#define DCOUT(text) { COUT(__FILE__ << ":" << __LINE__ << " " << text); }
#define OBJDCOUT(text) { DCOUT(this << " " << text); } 
#endif
//@}
//@}



/**@defgroup C++ wrappers for pthread mechanisms. */
//@{

/** A class for recursive mutexes based on pthread_mutex. */
class Mutex {

	private:

	pthread_mutex_t mMutex;
	pthread_mutexattr_t mAttribs;
	int mLockCnt;
	int mMutexLogLevel;	// We cant use LOG inside the Mutex because LOG itself uses mutexes, so get the LOG level at mutex creation time
						// and use it for this mutex from then on.

	static const int maxLocks = 5;		// Just the maximum number of recursive locks we report during debugging, not the max possible.
	const char *mLockerFile[maxLocks];
	unsigned mLockerLine[maxLocks];
	const char *lockerFile() { int i = mLockCnt-1; return (i >= 0 && i < maxLocks) ? mLockerFile[i] : NULL; }
	//unused: bool anyDebugging() { for (int i = 0; i < maxLocks; i++) { if (mLockerFile[i]) return true; return false; } }

	// pthread_mutex_trylock returns 0 and trylock returns true if the lock was acquired.
	bool trylock();

	public:

	Mutex();

	~Mutex();

	void _lock() { pthread_mutex_lock(&mMutex); }
	void lock();

	// (pat) Like the above but report blocking; to see report you must set both Log.Level to DEBUG for both Threads.cpp and the file.
	void lock(const char *file, unsigned line);

	std::string mutext() const;

	// Returns true if the lock was acquired, or false if it timed out.
	bool timedlock(int msecs);

	void unlock();

	// (pat) I use this to assert that the Mutex is locked on entry to some method that requres it, but only in debug mode.
	int lockcnt() { return mLockCnt; }

	friend class Signal;

};

/** A class for reader/writer based on pthread_rwlock. */
class RWLock {

	private:

	pthread_rwlock_t mRWLock;
	pthread_rwlockattr_t mAttribs;

	public:

	RWLock();

	~RWLock();

	void wlock() { pthread_rwlock_wrlock(&mRWLock); }
	void rlock() { pthread_rwlock_rdlock(&mRWLock); }

	bool trywlock() { return pthread_rwlock_trywrlock(&mRWLock)==0; }
	bool tryrlock() { return pthread_rwlock_tryrdlock(&mRWLock)==0; }

	void unlock() { pthread_rwlock_unlock(&mRWLock); }

};


#if 0
// (pat) NOT FINISHED OR TESTED.  A pointer that releases a specified mutex when it goes out of scope.
template<class PointsTo>
class ScopedPointer {
	Mutex &mControllingMutex;	// A pointer to the mutex for the object being protected.
	PointsTo *mPtr;

	public:
	ScopedPointer(Mutex& wMutex) :mControllingMutex(wMutex) { mControllingMutex.lock(); }
	// Requisite Copy Constructor:  The mutex is already locked, but we need to lock it again because the
	// other ScopedPointer is about to go out of scope and will call unlock.
	ScopedPointer(ScopedPointer &other) :mControllingMutex(other.mControllingMutex) { mControllingMutex.lock(); }
	~ScopedPointer() { mControllingMutex.unlock(); }

	// You are allowed to assign and derference the underlying pointer - it still holds the Mutex locked.
	PointsTo *operator->() const { return mPtr; }
	PointsTo * operator=(PointsTo *other) { mPtr = other; }
	PointsTo& operator*() { return *mPtr; }
};
#endif

class ScopedLock {

	private:
	Mutex& mMutex;

	public:
	ScopedLock(Mutex& wMutex) :mMutex(wMutex) { mMutex.lock(); }
	// Like the above but report blocking; to see report you must set both Log.Level to DEBUG for both Threads.cpp and the file.
	ScopedLock(Mutex& wMutex,const char *file, unsigned line):mMutex(wMutex) { mMutex.lock(file,line); }
	~ScopedLock() { mMutex.unlock(); }

};




/** A C++ interthread signal based on pthread condition variables. */
class Signal {

	private:

	mutable pthread_cond_t mSignal;

	public:

	Signal() { int s = pthread_cond_init(&mSignal,NULL); assert(!s); }

	~Signal() { pthread_cond_destroy(&mSignal); }

	/**
		Block for the signal up to the cancellation timeout.
		Under Linux, spurious returns are possible.
	*/
	void wait(Mutex& wMutex, long timeout) const;

	/**
		Block for the signal.
		Under Linux, spurious returns are possible.
	*/
	void wait(Mutex& wMutex) const
		{ pthread_cond_wait(&mSignal,&wMutex.mMutex); }

	void signal() { pthread_cond_signal(&mSignal); }

	void broadcast() { pthread_cond_broadcast(&mSignal); }

};



#define START_THREAD(thread,function,argument) \
	thread.start((void *(*)(void*))function, (void*)argument);

/** A C++ wrapper for pthread threads.  */
class Thread {

	private:

	pthread_t mThread;
	pthread_attr_t mAttrib;
	// FIXME -- Can this be reduced now?
	size_t mStackSize;
	

	public:

	/** Create a thread in a non-running state. */
	Thread(size_t wStackSize = (65536*4)):mThread((pthread_t)0) {
		pthread_attr_init(&mAttrib);	// (pat) moved this here.
		mStackSize=wStackSize;
	}

	/**
		Destroy the Thread.
		It should be stopped and joined.
	*/
	// (pat) If the Thread is destroyed without being started, then mAttrib is undefined.  Oops.
	~Thread() { pthread_attr_destroy(&mAttrib); }


	/** Start the thread on a task. */
	void start(void *(*task)(void*), void *arg);

	/** Join a thread that will stop on its own. */
	void join() { int s = pthread_join(mThread,NULL); assert(!s); mThread = 0; }

};




#endif
// vim: ts=4 sw=4