实验三 进程调度模拟程序

#include <stdio.h> 
#include <stdlib.h> 
#include <conio.h> 
#define getpch(type) (type*)malloc(sizeof(type)) 
#define N 3
struct pcb { /* 定义进程控制块PCB */ 
       char name[10]; 
       char status; 
       int prio; 
       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->prio)>(ready->prio))) /*优先级最大者,插入队首*/ 
  { 
    p->link=ready; 
    ready=p; 
  } 
  else /* 进程比较优先级,插入适当的位置中*/ 
  { 
    first=ready; 
    second=first->link; 
    while(second!=NULL) 
    { 
      if((p->prio)>(second->prio)) /*若插入进程比当前进程优先数大,*/ 
      { /*插入到当前进程前面*/ 
        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; 
  printf("\n 请输入进程数:"); 
  scanf("%d",&num); 
  for(i=0;i<num;i++) 
  { 
    printf("\n 进程号No.%d:\n",i); 
    p=getpch(PCB);  /*宏(type*)malloc(sizeof(type)) */
    printf("\n 输入进程名:"); 
    scanf("%s",p->name); 
    p->prio=N;
    printf("\n 输入进程运行时间:"); 
    scanf("%d",&p->ntime); 
    printf("\n"); 
    p->rtime=0;p->status=‘r‘; 
    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("   %s\t",pr->name); 
  printf("  %c\t",pr->status); 
  printf("  %d\t",pr->prio); 
  printf("  %d\t",pr->ntime); 
  printf("   %d\t",pr->rtime); 
  printf("\n"); 
} 

void printbyprio(int prio)
{
  PCB* pr; 
  pr=ready; 
  printf("\n ****当前第%d级队列(优先数为%d)的就绪进程有:\n",(N+1)-prio,prio); /*显示就绪队列状态*/ 
  printf("\n qname \tstatus\t prio \tndtime\t runtime \n"); 
  while(pr!=NULL) 
  { 
    if (pr->prio==prio) disp(pr); 
    pr=pr->link; 
  } 
}

check() /* 显示所有进程状态函数 */ 
{ 
  PCB* pr; 
  int i;
  printf("\n------------当前正在运行的进程是:%s------------",p->name); /*显示当前运行进程*/ 
   printf("\n qname \tstatus\t prio \tndtime\t runtime \n"); 
  disp(p); 
  
  printf("\n 当前就绪队列状态为:\n"); /*显示就绪队列状态*/ 
  for(i=N;i>=1;i--)
    printbyprio(i);
} 
destroy() /*进程撤消函数(进程运行结束,撤消进程)*/ 
{ 
  printf("\n 进程 [%s] 已完成.\n",p->name); 
  free(p); 
} 


running() /* 运行函数。判断是否完成，完成则撤销，否则置就绪状态并插入就绪队列*/ 
{ 
  int slice,i;
  slice=1;
  for(i=1;i<((N+1)-p->prio);i++)
    slice=slice*2;
    
  for(i=1;i<=slice;i++)
  {
     (p->rtime)++; 
     if (p->rtime==p->ntime)
       break;
       
  }
  if(p->rtime==p->ntime) 
      destroy(); /* 调用destroy函数*/ 
  else 
  { 
    if(p->prio>1) (p->prio)--; 
    p->status=‘r‘; 
    sort(); /*调用sort函数*/ 
  } 
} 

void cteatpdisp()
/*显示(运行过程中)增加新进程后,所有就绪队列中的进程*/
{ 
 
  int i;
  printf("\n 当增加新进程后,所有就绪队列中的进程(此时无运行进程):\n"); /*显示就绪队列状态*/ 
  for(i=N;i>=1;i--)
    printbyprio(i);
}

void creatp()
{
     char temp;
     printf("\nCreat one  more process?type Y (yes)");
     scanf("%c",&temp);
     if (temp==‘y‘||temp==‘Y‘)
     {
        input();
        cteatpdisp();
     }  
}  
  
main() /*主函数*/ 
{ 
      char k;
A: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->status=‘R‘; 
    check(); 
    running(); 
    creatp();
    printf("\n 按任一键继续......"); 
    ch=getchar(); 
  } 
   printf("\n\n 进程已经完成.\n"); 
   printf("\n");
   printf("是否重新输入进程(Y or N):");
   scanf("%c",&k);
   if(k==‘Y‘)
   {
       system("cls");
       goto A;
   }
   else
       exit(0);
}