#include "stdio.h"
#include <stdlib.h>
#include <conio.h>
#define getpch(type)(type*)malloc(sizeof(type))
#define NUll 0

struct pcb{     /*定義進程控制塊PCB*/
char name[10];
char state;
int super;
int ntime;
int rtime;
struct pcb* link;
}*ready=NULL,*p;
typedef struct pcb PCB;

sort()/*建立對進程進行優(yōu)先級排列函數*/
{
PCB *head;
int insert=0;
if(ready==NULL)/*插入隊首*/
{
p->link=ready;
ready=p;
}
else/*插入隊尾*/
{
head=ready;
while(head->link)
head=head->link;
head->link=p;
p->link=NULL;
insert=1;
}
}
input()/*建立進程控制塊函數*/
{
int i,num;
system("cls");
printf("\n請輸入進程數量:");
scanf("%d",&num);
for(i=0;i<num;i++)
{
printf("\n進程號No.%d:\n",i);
p=getpch(PCB);
printf("\n輸入進程名:");
scanf("%s",p->name);
printf("\n輸入進程運行時間:");
scanf("%d",&p->ntime);
printf("\n");
p->rtime=0;p->state='w';
p->link=NULL;
sort();/*調用sort函數*/
}
}

int space()
{
int l=0;PCB*pr=ready;
while(pr!=NULL)
{
l++;
pr=pr->link;
}
return(l);
}

disp(PCB *pr)/*建立進程現實函數，用于顯示當前進程*/
{
printf("\n 進程名\t 狀態(tài)\t 進程運行總時間\t 距離完成時間 \n");
printf(" |%s   \t",pr->name);
printf(" |%c  \t",pr->state);
printf(" |%d     \t",pr->ntime);
printf(" |%d     \t",pr->ntime-pr->rtime-1);
printf("\n");
}

disp(PCB *pr)/*建立進程現實函數，用于顯示就緒進程*/
{
printf("\n 進程名\t 狀態(tài)\t 進程運行總時間\t 距離完成時間 \n");
printf(" |%s   \t",pr->name);
printf(" |%c  \t",pr->state);
printf(" |%d     \t",pr->ntime);
printf(" |%d     \t",pr->ntime-pr->rtime);
printf("\n");
}

check()/*建立進程查看函數*/
{
PCB *pr;
printf("\n ****當前正在運行的進程是:%s",p->name);/*顯示當前運行的進程*/
disp(p);
pr=ready;
printf("\n****當前就緒隊列狀態(tài)為:\n");/*顯示就緒隊列狀態(tài)*/
while(pr!=NULL)
{
disp(pr);
pr=pr->link;
}
}

destroy()/*建立進程撤銷函數(進程運行結束，撤銷進程)*/
{
printf("\n進程[%s]已完成.\n",p->name);
free(p);
}

running()/*建立進程就緒函數(進程運行時間到，置就緒狀態(tài))*/
{
(p->rtime)++;
if(p->ntime-p->rtime<=0)
destroy();/*調用destroy函數*/
else 
{
(p->super)--;
p->state='w';
sort();/*調用sort函數*/
}
}

main()
{
int len,h=0;
char ch;
input();
len=space();
while((len!=0)&&(ready!=NULL))
{
ch=getchar();
h++;
printf("\n當前運行進程:%d\n",h);
p=ready;
ready=p->link;
p->link=NULL;
p->state='R';
check();
running();
printf("\n按任意鍵繼續(xù)...");
ch=getchar();
}
printf("\n\n 進程已經完成\n");
ch=getchar();
}