//---------------------------------------------------------------------------------------------
// Importo le librerie necessarie...
//---------------------------------------------------------------------------------------------
#include <stdio.h>
#include <stdlib.h>
#include <process.h>
#include <windows.h>
#include <conio.h>
#include <time.h>



//---------------------------------------------------------------------------------------------
// Definisco le funzioni e procedure...
//---------------------------------------------------------------------------------------------
#define randomize srand((unsigned)time(NULL))
#define GetRandom(min,max) ((rand()%(int)(max)+(min)))



//---------------------------------------------------------------------------------------------
// Definisco le variabili globali e le costanti...
//---------------------------------------------------------------------------------------------
#define T 2000                                //definisco un tempo di percorrenza tra 2 porti
#define max_T1 10                            //definisco il carico massimo del traghetto T1
#define max_T2 20                            //definisco il carico massimo del traghetto T2
HANDLE H_Mutex_A;                            //definisco un handle per l'isola A
int porto[2];                                //variabile che mi indica dove è attraccato il traghetto Tn
CRITICAL_SECTION stampa;                    //no comment

void Trag1();
void Trag2();



//---------------------------------------------------------------------------------------------
// MAIN...
//---------------------------------------------------------------------------------------------
void main()
{
    //inizializzo la critical section
    InitializeCriticalSection(&stampa);

    //Creo il mutex
    H_Mutex_A = CreateMutex(NULL,false,NULL);

    //inizializzo le posizioni di partenza dei traghetti
    porto[0] = 0;    //il traghetto T1 parte dalla terra ferma
    porto[1] = 0;    //il traghetto T2 parte dal porto dell'isola B

    //Creo i due thread dei traghetti
    CreateThread(NULL,0,(LPTHREAD_START_ROUTINE) Trag1,NULL,0,NULL);
    CreateThread(NULL,0,(LPTHREAD_START_ROUTINE) Trag2,NULL,0,NULL);

    while (getch() != 'q');
}



//---------------------------------------------------------------------------------------------
// Trag1...
//---------------------------------------------------------------------------------------------
void Trag1()
{
    int carico = 0;                //variabile che mi indica il carico attuale del traghetto
    int finito;                    //variabile che mi indica se ho finito di caricare
    int temp;                    //variabile per il carico da aggiungere

    while (1)
    {
        //controllo se il traghetto è nella terra ferma
        if (porto[0] == 0)
        {
            //il traghetto è attraccato al porto di terra ferma con carico = 0
            carico = 0;
            finito = 0;

            //finchè non è completamente carico non parte
            while ( (carico < max_T1) && (finito == 0) )
            {
                //arriva un carico
                randomize;
                temp = GetRandom(1,5);

                if ( (carico+temp) <= max_T1)
                {
                    carico = carico + temp;
                }
                else
                {
                    finito = 1;
                }
            }

            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T1 ha caricato %d\n",carico);

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            //una volta carico,deve partire per il porto dell'isola A
            //controllo se il porto dell'isola A è libero
            if ( porto[1] == 0 )
            {
                WaitForSingleObject(H_Mutex_A,INFINITE);

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("il porto A e' libero,il traghetto T1,carico di merda,parte...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);

                    Sleep(T);
                    porto[0] = 1;

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);
               
                    printf("il traghetto T1 e' arrivato al porto dell'isola A,scarica la merce...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);
            }

            //altrimenti,costringo il traghetto T2 a levarsi dalle palle.
            else
            {
                //indico a T2 che T1 sta partendo per il porto dell'isola A
                porto[0] = 1;

                WaitForSingleObject(H_Mutex_A,INFINITE);

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("nel porto A c'era T2,lo mando a cagar,e parto...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);

                    Sleep(T);
                   
                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("il traghetto T1 e' arrivato al porto dell'isola A,scarica la merce...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);


            }

        }
        //controllo se il traghetto si trova nel porto dell'isola A
        else
        {
            //il taghetto è attraccato al porto dell'isola A con carico = 0
            carico = 0;
            finito = 0;

            //parte o quando è completamente carico,o quando T2 chiede l'attracco al porto A.
            while ( ( carico < max_T1 ) && ( porto[1] == 0) && (finito == 0) )
            {
                //arriva un carico
                randomize;
                temp = GetRandom(1,5);

                if ( (carico+temp) <= max_T1)
                {
                    carico = carico + temp;
                }
                else
                {
                    finito = 1;
                }
            }
            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T1 ha caricato %d\n",carico);

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            ReleaseMutex(H_Mutex_A);

            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T1 e' partito dal porto dell'isola A\n");

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            Sleep(T);
            porto[0] = 0;
        }
    }
}



//---------------------------------------------------------------------------------------------
// Trag2...
//---------------------------------------------------------------------------------------------
void Trag2()
{
    int carico = 0;                //variabile che mi indica il carico attuale del traghetto
    int finito;                    //variabile che mi indica se ho finito di caricare
    int temp;                    //variabile per il carico da aggiungere

    while (1)
    {
        //controllo se il traghetto è nella terra ferma
        if (porto[1] == 0)
        {
            //il traghetto è attraccato al porto di terra ferma con carico = 0
            carico = 0;
            finito = 0;

            //finchè non è completamente carico non parte
            while ( (carico < max_T2) && (finito == 0) )
            {
                //arriva un carico
                randomize;
                temp = GetRandom(1,5);

                if ( (carico+temp) <= max_T2)
                {
                    carico = carico + temp;
                }
                else
                {
                    finito = 1;
                }
            }

            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T2 ha caricato %d\n",carico);

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            //una volta carico,deve partire per il porto dell'isola A
            //controllo se il porto dell'isola A è libero
            if ( porto[0] == 0 )
            {
                WaitForSingleObject(H_Mutex_A,INFINITE);

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("il porto A e' libero,il traghetto T2,carico di merda,parte...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);

                    Sleep(T);
                    porto[1] = 1;

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);
               
                    printf("il traghetto T2 e' arrivato al porto dell'isola A,scarica la merce...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);
            }

            //altrimenti,costringo il traghetto T1 a levarsi dalle palle.
            else
            {
                //indico a T1 che T2 sta partendo per il porto dell'isola A
                porto[1] = 1;

                WaitForSingleObject(H_Mutex_A,INFINITE);

                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("nel porto A c'era T1,lo mando a cagar,e parto...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);

                    Sleep(T);
                   
                //entro nella critical section     <-------------------------------------------------------------------------
                EnterCriticalSection(&stampa);

                    printf("il traghetto T2 e' arrivato al porto dell'isola A,scarica la merce...\n");

                //esco dalla critical section     <-------------------------------------------------------------------------
                LeaveCriticalSection(&stampa);


            }

        }
        //controllo se il traghetto si trova nel porto dell'isola A
        else
        {
            //il taghetto è attraccato al porto dell'isola A con carico = 0
            carico = 0;
            finito = 0;

            //parte o quando è completamente carico,o quando T2 chiede l'attracco al porto A.
            while ( ( carico < max_T2 ) && ( porto[0] == 0) && (finito == 0) )
            {
                //arriva un carico
                randomize;
                temp = GetRandom(1,5);

                if ( (carico+temp) <= max_T2)
                {
                    carico = carico + temp;
                }
                else
                {
                    finito = 1;
                }
            }
            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T2 ha caricato %d\n",carico);

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            ReleaseMutex(H_Mutex_A);

            //entro nella critical section     <-------------------------------------------------------------------------
            EnterCriticalSection(&stampa);

                printf("il traghetto T2 e' partito dal porto dell'isola A\n");

            //esco dalla critical section     <-------------------------------------------------------------------------
            LeaveCriticalSection(&stampa);

            Sleep(T);
            porto[1] = 0;
        }
    }
}