进程实验教学文稿.pptVIP

进程管理实验; 进程调度算法采用剥夺式最高优先数法。各进程的优先数通过键盘输入予以静态设置。调度程序每次总是选择优先数最小（优先权最高）的就绪进程投入执行。先从r状态进程中选择，再从t状态进程中选择。当现行进程唤醒某个等待进程，且被唤醒进程的优先数小于现行进程时，则剥夺现行进程的执行权。 各进程在使用临界资源S1和S2时，通过调用信号量sem1和sem2上的P、V操作来实现同步。阻塞和唤醒操作负责完成从进程的执行态到等待态以及从等待态到就绪态的转换。 系统启动后，在完成必要的系统初始化后便执行进程调度程序。当执行进程因“时间片中断”，或被排斥使用临界资源，或唤醒某个进程时，立即进行进程调度。当3个进程都处于完成状态后，系统退出运行。 ; （1）每个进程有一个进程控制块PCB，内容包括： id 进程标识号，id＝0，1，2； status 进程状态，可为e，r，t，w，c； priority 进程优先数； nextwr 等待链指针，指示在同一信号量上等待的下一个进程的标识号。 （2）信号量semaphore，对应于临界资源S1和S2分别有sem1和sem2，均为互斥信号量，内容包括： value 信号量，初值为1； firstwr 等待链首指针，指示在同一信号量上等待的下一个进程的标识数。 ; （3）现场保留区，用数组savearea[3][4]表示。即每个进程都有一个大小为4个单元的保留区，用来保存被“中断”时的现场信息，如通用寄存器的内容和断点地址等。 此外，系统中还用到下列主要全程变量： exe 执行进程指针，其值为进程标识号； i 用来模拟一个通用寄存器； addr 用来模拟程序计数器； s1,s2 两个公共变量，用作共享临界资源 ;const MAXPRI=100; NIL=-1; TYPE procp=record {PCB类型} id:integer; status:char; {进程号,进程状态} nextwr:integer; mess:message; {等待号,消息队指针} inum:integer; addr:char; {运行次数,返回地址} priority:integer; end; {优先数} message=^messagetp; {指向消息块指针类型} messagetp=record {消息块类型(信息,指针,发送者号)} num:integer; next:message; pro:integer; end; semaphorel=record {信号量类型(信号量,等待队头号)} value:integer; firstwr:integer; end; VAR pcb:array[1..3] of procb; {PCB表} sem:array[1..2] of semaphorel; {信号量表} addr:char; i,seed,exe:integer; {当前进程地址,运行次数,随机变量,当前运行进程号};var q,p:message; 工作指针 begin new(p); p^.num:=snum; 申请消息块,写入缓冲 p^.next:=NIL; p^.pro:=sender; 下一指针置空,置发送者 writeln(send message to process ,receiver); writeln(process ,sender,already run ,snum, times); q:=pcb[receiver].mess; q指向接收者消息等待队列首 if(q=NIL) then pcb[receiver].mess:=p q空则p插入队首 else begin while(q^.nextNIL) do q:=q^.next; q移到队尾 q^.next:=p; 将p链接到