proc.c

实现先来先服务的算法

/*
  Name:   proc.c          进程调度模拟实验源码    存储结构链表
  Copyright: 
  Author:        Wugy 
  Date: 08-04-07 17:04
  Description: 
               实现一个有 N个进程并发执行的进程调度模拟程序。
进程调度算法：采用最高优先数优先的调度算法（即把处理机分配给优先数最高的进程）和先来先服务算法。
*/
#include "stdio.h" 
#include <stdlib.h> 
#include <conio.h> 
#define getpch(type) (type*)malloc(sizeof(type)) 
struct pcb { /* 定义进程控制块PCB */ 
       char name[10]; 
       char state; 
       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; 
  /*clrscr();  */   /*清屏*/
  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); 
    printf("\n 输入进程优先数:"); 
    scanf("%d",&p->prio); 
    printf("\n 输入进程运行时间:"); 
    scanf("%d",&p->ntime); 
    printf("\n"); 
    p->rtime=0;p->state='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("\n qname \t state \t prio \t ndtime \t runtime \n"); 
  printf("|%s\t",pr->name); 
  printf("|%c\t",pr->state); 
  printf("|%d\t",pr->prio); 
  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->prio)--; 
    p->state='r'; 
    sort(); /*调用sort函数*/ 
  } 
} 


main() /*主函数*/ 
{ 
  int len,h=0; 
  char ch; 
  input(); 
  len=space(); 
  while((len!=0)&&(ready!=NULL)) 
  { 
    ch=getchar(); 
    /*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(); 
  ch=getchar();
}