#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() /* 建立對進程進行優先級排列函數*/ 

{ 

PCB *first, *second; 

int insert=0; 

if((ready==NULL)||((p->super)>(ready->super))) /*優先級最大者,插入隊首*/ 

{ 

p->link=ready; 

ready=p; 

} 

else /* 進程比較優先級,插入適當的位置中*/ 

{ 

first=ready; 

second=first->link; 

while(second!=NULL) 

{ 

if((p->super)>(second->super)) /*若插入進程比當前進程優先數大,*/ 

{ /*插入到當前進程前面*/ 

p->link=second; 

first->link=p; 

second=NULL; 

insert=1; 

} 

else /* 插入進程優先數最低,則插入到隊尾*/ 

{ 

first=first->link; 

second=second->link; 

} 

} 

if(insert==0) first->link=p; 

} 

} 

///////////////////////////////////////////////////////////////
input() /* 建立進程控制塊函數*/ 

{ 

int i,num; 

//clrscr(); /*清屏*/ 

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->super); 

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 qname \t state \t super \t ndtime \t runtime \n"); 

printf("|%s\t",pr->name); 

printf("|%c\t",pr->state); 

printf("|%d\t",pr->super); 

printf("|%d\t",pr->ntime); 

printf("|%d\t",pr->rtime); 

printf("\n"); 

} 
//////////////////////////////////////////////////////////
check() /* 建立進程查看函數 */ 

{ 

PCB* pr; 

printf("\n **** 當前正在運行的進程是:%s",p->name); /*顯示當前運行進程*/ 

disp(p); 

pr=ready; 

printf("\n ****當前就緒隊列狀態為:\n"); /*顯示就緒隊列狀態*/ 

while(pr!=NULL) 

{ 

disp(pr); 

pr=pr->link; 

} 

} 

destroy() /*建立進程撤消函數(進程運行結束,撤消進程)*/ 

{ 

printf("\n 進程 [%s] 已完成.\n",p->name); 

free(p); 

} 

running() /* 建立進程就緒函數(進程運行時間到,置就緒狀態*/ 

{ 

(p->rtime)++; 

if(p->rtime==p->ntime) 

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 The execute number:%d \n",h); 

p=ready; 

ready=p->link; 

p->link=NULL; 

p->state='R'; 

check(); 

running(); 

printf("\n 按任一鍵繼續......"); 

ch=getchar(); 

} 

printf("\n\n 進程已經完成.\n"); 

ch=getchar(); 

}