/*------------------------------------------------------------------------------
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<conio.h>
#include<stdlib.h>
#include<alloc.h>

typedef struct {
                int id;
                long ProcT,
                     StartT,
                     EndT,
                     T, /*Tardiness, csuszas*/
                     d; /*Due Date, hatarido*/
                } T_JOB;

typedef struct {
                long Csum,
                     Tmax;
                } T_OBJ;

void Simulation(T_JOB* job, int N, int* sch, long t);
void Evaluation(T_JOB* job, int N, T_OBJ* obj);
void SPT_rule(T_JOB* job, int N, int* sch);
void EDD_rule(T_JOB* job, int N, int* sch);
void Print_Gantt(T_JOB* job, int N, int* sch);

int main(int argc, char* argv[])
{
 T_JOB* job;
 T_OBJ obj;
 int* sch;
 int N; //job-ok szama
 int i;
 long Csum;

 printf("Kerem a munkak szamat:");
 scanf("%d", &N);

 sch = (int*) calloc(N, sizeof(int));
 job = (T_JOB*) calloc(N, sizeof(T_JOB));
 randomize();
 for (i=0; i<N; i++)
 {
   job[i].id = i;
   job[i].ProcT = 1 + random(200);
   job[i].d = 1 + random(50) * random(5) * N;
   sch[i]=job[i].id;
   /* Figyelem */
   printf("\n ProcT = %ld \n", job[i].ProcT );
 }
 /*Ad-hoc sorrend*/
 Simulation(job, N, sch, 0);
 Evaluation(job, N, &obj);
 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 sorrend*/
 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 sorrend*/
 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();

 free (job);
 free (sch);

 getch();

 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_OBJ* 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);
      if ( i==0 )
          obj->Tmax = job[i].T;
      else if ( obj->Tmax < job[i].T )
              obj->Tmax = job[i].T;
    }

}

void SPT_rule(T_JOB* job, int N, int* sch)
{
  int i, j;
  int temp;
  /* Shortest Processing Time */
  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)
{
  int i, j;
  int temp;
  /* Earliaes Due Date */
  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;
         }

}

void Print_Gantt(T_JOB* job, int N, int* sch)
{
  int i;

  printf("\n sorsz \t job \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 );
  }
}