#include <iostream>
#include <time.h>
#include <cstdlib>
#include "simulation.h"
#include "random.h"


#define t_piti negexp(1/(30.0f*60.0f))
#define t_obsluha real()*60+60
#define t_sim 10*60*60

#define pocet_hostu 15
#define pocet_stamgastu 5


using namespace std;
 
class THost : public CProcess {
	private:
		int id;
		virtual void Run();
	public:
		THost(int n) {id = n;};
		int getID() {return id;};
};

class TStamgast : public CProcess {
	private:
		int id;
		virtual void Run();
	public:
		TStamgast(int n) {id = n;};
		int getID() {return id;};
};

class THostinsky : public CProcess {
	virtual void Run();
};

template<class T>
class Stat {
	private:
		T suma;
		T max;
		int pocet;
	public:
		Stat() {suma=0; max=0; pocet=0;};
		void addItem(T item) {pocet++; suma+=item; if(item > max) max=item;};
		T getMax() {return max;};
		double getAvg() {return suma/(double) pocet;};
};
	

CHead		*Hosti;				// Fronta hostu
CHead		*Stamgasti;			// Fronta stamgastu
THostinsky	*Hostinsky;			// Obsluha

Stat<TIME>	*CekaniStamgasti;	// Statistika cekani stamgastu
Stat<TIME>	*CekaniHosti;		// Statistika cekani hostu
Stat<int>	*FrontaStamgasti;	// Statistika fronty stamgastu
Stat<int>	*FrontaHosti;		// Statistika fronty hostu


void THost::Run() {
	TIME start;
	
	while (true) {
		cout << Time() << ": Pozadavek hosta " << getID() << endl;
		start = Time();
	
		if (Hosti->Empty()) {
			Into(Hosti);
			Hostinsky->ActivateAt(Time());
		} else
			Into(Hosti);

		FrontaHosti->addItem(Hosti->Cardinal());
		Passivate();

		cout << Time() << ": Vyrizeni pozadavku hosta " << getID() << endl;
		CekaniHosti->addItem(Time()-start);
		Hold(t_piti);
	}
}

void TStamgast::Run() {
	TIME start;

	while (true) {
		cout << Time() << ": Pozadavek stamgasta " << getID() << endl;
		start = Time();

		if (Stamgasti->Empty()) {
			Into(Stamgasti);
			Hostinsky->ActivateAt(Time());
		} else
			Into(Stamgasti);
		
		FrontaStamgasti->addItem(Stamgasti->Cardinal());
		Passivate();

		cout << Time() << ": Vyrizeni pozadavku stamgasta " << getID() << endl;
		CekaniStamgasti->addItem(Time()-start);	
		Hold(t_piti);
	}
}

void THostinsky::Run() {
	THost* H;
	TStamgast* S;

	while(true) {
		if (!Stamgasti->Empty()) {
			S = (TStamgast*) Stamgasti->First();

			cout << Time() << ": Zacatek obsluhy stamgasta " << S->getID() << endl;

			S->Out();
			Hold(t_obsluha);
			S->ActivateAt(Time());
			
			cout << Time() << ": Konec obsluhy stamgasta " << S->getID() << endl;
			
			continue;
		}
		if (!Hosti->Empty()) {
			H = (THost*) Hosti->First();
			
			cout << Time() << ": Zacatek obsluhy hosta " << H->getID() << endl;
			
			H->Out();
			Hold(t_obsluha);
			H->ActivateAt(Time());
			
			cout << Time() << ": Konec obsluhy hosta " << H->getID() << endl;
			
			continue;
		}	
		Passivate();
	}
}


void CSimulation::Run() {
	srand((unsigned) time( NULL ));

	Hostinsky = new THostinsky();
	Hosti = new CHead();
	Stamgasti = new CHead();
	
	CekaniStamgasti = new Stat<TIME>();
	CekaniHosti = new Stat<TIME>();
	FrontaStamgasti = new Stat<int>(); 
	FrontaHosti = new Stat<int>();	

	for (int i=0; i < pocet_hostu ; i++)
		(new THost(i))->ActivateAt(Time()+t_piti);

	for (int i=0; i < pocet_stamgastu ; i++)
		(new TStamgast(i))->ActivateAt(Time()+t_piti);

	Hold(t_sim);

	cout << endl << "---------- STATISTIKY ----------" << endl;
	cout << "Prumerna/maximalni doba cekani [s] hostu: "
	     << CekaniHosti->getAvg() << " / " << CekaniHosti->getMax() << endl;
	cout << "Prumerna/maximalni doba cekani [s] stamgastu: "
	     << CekaniStamgasti->getAvg() << " / " << CekaniStamgasti->getMax() << endl;
	cout << "Prumerny/maximalni pocet cekajicich hostu: "
	     << FrontaHosti->getAvg() << " / " << FrontaHosti->getMax() << endl;
	cout << "Prumerny/maximalni pocet cekajicich stamgastu: "
	     << FrontaStamgasti->getAvg() << " / " << FrontaStamgasti->getMax() << endl;
	cout << "Pocet nevyrizenych objednavek: "
	     << Hosti->Cardinal() + Stamgasti->Cardinal() << endl;
	cout << endl;
	
	exit(0);
};