/*------------------------------------------------------------------------------
1||Szum(Ci)  Utemezesi fedadat megoldasa SPT ütemezési szabály alkalmazásával.
Egygépes termelésiütemezési feladat.
Az ütemezés célja a befejezési idők összegének minimalizálása, 
ezáltal az átlagos készletszint minimalizálása.
SPT Shortest Processing Time (műveleti idő szerint nemcsökkenő munkasorrend)
A megoldás optimális ütemtervet eredményez. 
-------------------------------------------------------------------------------*/


/*------------------------------------------------------------------------------
1||Tmax  Utemezesi fedadat megoldasa EDD ütemezési szabály alkalmazásával.
Egygépes termelésiütemezési feladat.
Az ütemezés célja a legnagyobb csúszás minimalizálása.
EDD Earliest Due Date (határidő szerint nemcsökkenő munkasorrend)
A megoldás optimális ütemtervet eredményez. 
------------------------------------------------------------------------------*/



#include<stdio.h>
#include<alloc.h>
#include<stdlib.h>
#include<conio.h>

typedef struct{
                int id;
                long ProcT,
                     StartT,
                     EndT,
                     T,  /* tardiness, csuszas */
                     d;  /* due date, hatariido */
              }T_JOB;

typedef struct{
               long Csum,
                    Tmax;  /* Max Tardiness */
              }T_OBJF;

void Simulation(T_JOB* job, int N, int* sch, long t);
void Evaluation(T_JOB* job, int N, T_OBJF* obj);
void print_job(T_JOB* job, int N);
void print_Gantt(T_JOB* job, int N, int* sch);
void SPT_rule(T_JOB* job, int N, int* sch);
void EDD_rule(T_JOB* job, int N, int* sch);

int main(int argc, char* argv[])
{
 T_JOB* job;
 int* sch;
 T_OBJF obj;
 int N;
 int i;

 printf("\n Kerem a munkak szamat:");
 scanf("%d", &N);
 randomize();
 job = (T_JOB*) calloc( N, sizeof(T_JOB));
 for (i=0; i<N; i++)
 {
    job[i].id = i;
    job[i].ProcT = 1 + random(20);
    job[i].d = 1 + random(10) * random(5) * N;
 }

 sch = (int*) calloc(N, sizeof(int));
 /*Ad-hoc*/
 for (i=0; i<N; i++)
 {
  sch[i]=i;
 }

 Simulation(job, N, sch, 0);
 Evaluation(job, N, &obj);
 //print_job(job, N);
 printf("\n Ad-hoc sorrend eseten Csum=%ld", obj.Csum);
 printf("\n Ad-hoc sorrend eseten Tmax=%ld", obj.Tmax);
 print_Gantt(job, N, sch);
 getch();

 /*SPT*/
 SPT_rule(job, N, sch);
 Simulation(job, N, sch, 0);
 Evaluation(job, N, &obj);
 printf("\n SPT sorrend eseten Csum=%ld", obj.Csum);
 printf("\n SPT sorrend eseten Tmax=%ld", obj.Tmax);
 print_Gantt(job, N, sch);
 getch();

/*EDD*/
 EDD_rule(job, N, sch);
 Simulation(job, N, sch, 0);
 Evaluation(job, N, &obj);
 printf("\n EDD sorrend eseten Csum=%ld", obj.Csum);
 printf("\n EDD sorrend eseten Tmax=%ld", obj.Tmax);
 print_Gantt(job, N, sch);
 getch();

 getch();



 free (sch);
 free (job);
 return 0;
}
//---------------------------------------------------------------------------
void Simulation(T_JOB* job, int N, int* sch, long t)
{
 int i;

 job[ sch[0] ].StartT = t;
 job[ sch[0] ].EndT = job[ sch[0] ].StartT + job[ sch[0] ].ProcT;
 for (i=1; i<N; i++)
 {
   job[ sch[i] ].StartT = job[ sch[i-1] ].EndT;
   job[ sch[i] ].EndT = job[ sch[i] ].StartT + job[ sch[i] ].ProcT;
 }

}

void Evaluation(T_JOB* job, int N, T_OBJF* obj)
{
  int i;
  obj->Csum = 0;
  obj->Tmax = 0;

  for (i=0; i<N; i++)
  {
    obj->Csum += job[i].EndT;
    job[i].T = max( 0, job[i].EndT - job[i].d); /*Tardiness*/
    if (i==0)
       obj->Tmax = job[i].T;
    else if ( obj->Tmax < job[i].T )
             obj->Tmax = job[i].T;
  }

}

void print_job(T_JOB* job, int N)
{
 int i;
 printf("\n id \t StartT \t ProcT \t EndT");

 for (i=0; i<N; i++)
  {
   printf("\n %d \t %ld \t %ld \t %ld",
   job[i].id,
   job[i].StartT,
   job[i].ProcT,
   job[i].EndT);
  }
}

void print_Gantt(T_JOB* job, int N, int* sch)
{
 int i;
 printf("\n sorsz \t id \t ST \t PT \t ET \t d \t T");

 for (i=0; i<N; i++)
  {
   printf("\n %d \t %d \t %ld \t %ld \t %ld \t %ld \t %ld",
   i,
   sch[i],
   job[ sch[i] ].StartT,
   job[ sch[i] ].ProcT,
   job[ sch[i] ].EndT,
   job[ sch[i] ].d,
   job[ sch[i] ].T);
  }
}


void SPT_rule(T_JOB* job, int N, int* sch)
{
  /* Shortest Processing Time*/
  int temp;
  int i, j;

  for (i=0; i<N-1; i++)
    for (j=i+1; j<N; j++)
      {
        if ( job[ sch[i] ].ProcT > job[ sch[j] ].ProcT )
          {
            temp = sch[i];
            sch[i] = sch[j];
            sch[j] = temp;
          }
      }

}

void EDD_rule(T_JOB* job, int N, int* sch)
{
  /* Earliest Due Date */
  int temp;
  int i, j;

  for (i=0; i<N-1; i++)
    for (j=i+1; j<N; j++)
      {
        if ( job[ sch[i] ].d > job[ sch[j] ].d )
          {
            temp = sch[i];
            sch[i] = sch[j];
            sch[j] = temp;
          }
      }

}