#define NULL 0
#include 
#include 
#include 
#include 
//定義一個pcb的結構體

FILE *GroupFile[10];

typedef struct index{ 
char name; //指令
int time; //指令執行時間
}index;

struct pcb {
char filename[10]; //進程名
int id; //作業編號
int exetoIndex; //當前正在執行指令
char status; //當前狀態
int wtime; //等待時間
};

struct pcb jobpcb[100]; //pcb表


typedef struct job{
index idx[100]; //指令集
int pcbnum; //pcb編號 對應
}job;

job jobtab[100]; //作業表

char jobp[3][50]; //作業
//隊列
struct Qnode
{
int pcbnum[100]; //pcb編號 
int head,tail; 
};

struct Qnode Queue[5]; //5個隊列 0E 1R 2I 3O 4W 

void initqueue(struct Qnode *l);

//延遲
void delay( ){

long begin,end;
time(&begin);
do {
time(&end);
} while((end-begin)<=1);
}

//字符轉化為數值
int change(char *m){ 
int i,j=0;
int len=strlen(m);
for(i=0;i j=j*10+m[i]-'0';
return j;
}

//申請 pcb

int AllocPCB(){
int i;
for(i=0;i<3;i++)
if(jobpcb[i].id ==-1) break;
if(i<3)
return i;
return -1;
}
//申請job
int AllocJob(){

int i;

for(i=0;i<3;i++)
if(jobtab[i].pcbnum == -1) break;
if(i<3)
return i;
return -1;

}
//顯示指令
void displayIndex(){
int i,j;

for(i=0;i<3;i++){
printf(" Job % d \n",i+1);
for(j=0;j<10;j++)
printf(" %d %c % d \n",j+1, jobtab[i].idx[j].name,jobtab[i].idx[j].time);
}

}

//創建進程程序
int creatpcbline(){
char line[10];
inti,ll,jnum, pnum, ln=0, bpos, pos=0;
char buff[50];
char name [20];
char ch;

for(i=0;i<3;i++){
ln=0;
jnum=AllocJob();
if(jnum == -1) return 0;
pnum=AllocPCB();
if(pnum == -1) return 0;
jobtab[jnum].pcbnum=pnum;
strcpy(jobpcb[pnum].filename," "); 
jobpcb[pnum].status='r';
jobpcb[pnum].exetoIndex=0;
jobpcb[pnum].id=jnum;
jobpcb[pnum].wtime=0;
int ln=strlen(jobp[i]);
pos=0;
while(pos while(jobp[i][pos]==' ') pos++;

jobtab[jnum].idx[ln].name=jobp[i][pos++];///

while(jobp[i][pos]==' ') pos++;

bpos=0;

while(jobp[i][pos]!=' ')

buff[bpos++]=jobp[i][pos++];

buff[bpos]='\0';

jobtab[jnum].idx[ln].time=change(buff);/////

if(pos}
}
}
displayIndex();
}
/*初始化隊列
void initqueue(struct Qnode *l){ 
l->head=0;
l->tail=0;
}


//插進入隊列/
void insertqueue(struct Qnode *l,int pcbnum){
l->pcbnum[l->tail++]=pcbnum;

}

//隊列是否為空


int EmptyQueue( struct Qnode l){
if(l.head==l.tail) return 1;
return 0;
}

//刪除隊列
void outqueue(struct Qnode *l,int *pcbnum)
{
if (l->head>=l->tail ) *pcbnum=-1;
else
*pcbnum=l->pcbnum[l->head++];



}
//顯示作業
void display(){
int i,j;

for(i=0;i<5;i++){

printf(" 隊列 %d ",i); 
for(j=Queue[i].head;j 

printf("pcb 編號 %d \n\n ",Queue[i].pcbnum[j]); 




}

}






//作業入隊列
void JobEnQueueInit( int * total){

int i,num ,Index=0;

char cmd;

for( i=0;i<3;i++){

if(jobpcb[i].id>=0){
cmd=jobtab[ jobpcb[i].id ].idx[ Index ].name;

switch(cmd){
case 'c': insertqueue(&Queue[1],i); jobpcb[i].status='r'; break;
case 'i': insertqueue(& Queue[2],i);jobpcb[i].status='i'; break;

case 'o': insertqueue(& Queue[3],i);jobpcb[i].status='o'; break;
case 'w': insertqueue(& Queue[4],i);jobpcb[i].status='w'; break;
case 'h': jobpcb[i].status='h'; num=jobpcb[i].id;jobtab[num].pcbnum=-1;jobpcb[i].id=-1;
}
if(cmd== 'h') {jobpcb[i].wtime=0; total--;}
jobpcb[i].wtime=jobtab [ jobpcb[i].id ].idx[Index].time;

(*total)++;




}
}


}



void save (){


FILE *fp;

int i;
fp=fopen("pcbtable.txt","a");


fprintf(fp," 文件名 作業編號 執行到指令數 所處狀態 等待時間 \n" );

for(i=0;i<3;i++)

fprintf(fp," \t %s \t %d \t %d \t %c \t %d \n" ,
jobpcb[i].filename,jobpcb[i].id,jobpcb[i].exetoIndex,
jobpcb[i].status,jobpcb[i].wtime );

fclose(fp);



}






//作業入隊列
void JobEnQueue( int pcbnum,int Index ,int *total){

int num;
char cmd;


if(jobpcb[pcbnum].id>=0){
cmd=jobtab[ jobpcb[pcbnum].id ].idx[ Index ].name;

switch(cmd){
case 'c': insertqueue(&Queue[1],pcbnum); jobpcb[pcbnum].status='r'; break;
case 'i': insertqueue(& Queue[2],pcbnum);jobpcb[pcbnum].status='i'; break;

case 'o': insertqueue(& Queue[3],pcbnum);jobpcb[pcbnum].status='o'; break;
case 'w': insertqueue(& Queue[4],pcbnum);jobpcb[pcbnum].status='w'; break;
case 'h': jobpcb[pcbnum].status='h'; num=jobpcb[pcbnum].id;jobtab[num].pcbnum=-1;jobpcb[pcbnum].id=-1;
}
if(cmd== 'h') {
jobpcb[pcbnum].wtime=0; 
printf(" \n\t\t作業 %d 完成\n", pcbnum+1, jobpcb[ pcbnum].status);
(*total)--;
}
else jobpcb[pcbnum].wtime=jobtab [ jobpcb[pcbnum].id ].idx[Index].time;

printf(" \n\t\t作業 %d \n ", pcbnum+1);
printf("\t\t\t\t所處狀態 ： %c \n",jobpcb[ pcbnum].status);
printf("\t\t還需要時間 %d 秒\n",jobpcb[ pcbnum].wtime);



}



}

//得到隊列的首元素

int GetHead(struct Qnode l){
return l.pcbnum[l.head];
}
//執行
void run (){

int i, flag=0, time=10, pcbnum, Index=0, exenum, num, quenum;
char cmd;
int j,m,n;
int total=0;


JobEnQueueInit( &total );


save();
while( total!=0 ){ 
if(!EmptyQueue( Queue[1]) ){


outqueue(&Queue[1],&pcbnum);
insertqueue(&Queue[0], pcbnum); 



}
else pcbnum=GetHead(Queue[0]);

delay();
jobpcb[ pcbnum].status='e'; 
printf(" \n\t\t作業 %d \n",pcbnum+1);

printf(" \t\t\t所處狀態: %c \t執行了 %d 秒\n", jobpcb[ pcbnum].status, time);


for(i=0;i<3;i++){ 

if(jobpcb[i].id>=0){



//所有的作業除在就緒隊列獲執行結束的外等待時間 都間時間片 
if( jobpcb[i].status!='r'&&jobpcb[i].status!='h') jobpcb[i].wtime=jobpcb[i].wtime-time;


if(jobpcb[i].wtime<=0){ //查找所有的隊列 所在位置
for(j=0;j<5;j++){ 
for(m=Queue[j].head;m 

if(Queue[j].pcbnum[m]==i) {flag=1;break;}
}
if(flag==1) break;
}

if(flag==1){//刪除該指令

for(n=m;n Queue[j].tail--; 
jobpcb[i].exetoIndex++;
Index=jobpcb[i].exetoIndex;
JobEnQueue( i,Index,&total );

} 



}


}
}


if(!EmptyQueue( Queue[1]) ){


outqueue(&Queue[0],&pcbnum);
if(jobpcb[pcbnum].wtime>0){
insertqueue(&Queue[1], pcbnum); 
jobpcb[pcbnum].status='r';
}

}






printf(" \n\n\t\t 還有\t %d 個作業沒有完成 \n",total ); 
save();
} 


}



//初始化
void InitFile(){

int i;


strcpy (jobp[0]," c 20 i 20 o 15 h 0 ");////////////////////////改
strcpy (jobp[1]," i 10 c 20 c 10 h 0 ");
strcpy (jobp[2]," c 30 i 20 c 5 h 0 ");
for(i=0;i<100;i++){
jobpcb[i].exetoIndex=0;
strcpy(jobpcb[i].filename," ");
jobpcb[i].id=-1;
jobpcb[i].status='r';
jobpcb[i].wtime=0;
}

for(i=0;i<100;i++)
jobtab[i].pcbnum=-1;


for(i=0;i<5;i++)

initqueue(&Queue[i]);


//GroupFile[0]=fopen("1.txt","r");


//GroupFile[1]=fopen("2.txt","r");

//GroupFile[2]=fopen("3.txt","r");

}


void main(){

InitFile();
creatpcbline();
run ();

}