blob: c5b784ecb41585dba25cc89daa39b883e0b65936 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
|
/***********************************************************************
*
* Name: sys_sppt.c
*
* Purpose: Support Routines for Modules 3 and 4 of MPX-PC
*
* Sample Call:
* sys_init()
* sys_exit()
*
* Procedures In Module:
* sys_init - Sets up interrupt vector 60 for MPX-PC
* sys_exit - Resets interrupt vector 60 and exits to DOS
*
*
****************************************************************************/
#include <stdio.h>
#include <dos.h>
#include "mpx.h"
void interrupt (*vect60)(); /* Storage for DOS int 60h */
/* interrupt vector. */
void sys_init()
{
/* set up interrupt vector for MPX sys_calls */
vect60 = getvect(0x60);
setvect(0x60,&sys_call);
// set up the clock
clock_open();
// set up com
com_open(&com_eflag, 1200);
// set up printer
prt_open(&prt_eflag);
// set up con
con_open(&con_eflag);
}
void sys_exit()
{
// restore the clock
clock_close();
com_close();
con_close();
prt_close();
/* restore interrupt vector 60 and exit */
setvect(0x60,vect60);
exit();
}
// dispatch the process at the head of the ready queue
void interrupt dispatch()
{
disable();
if (DEBUG_PRINTS) {printf("in dispatch \n ");}
// TODO fix this.. .cop is null when we start
cop = ready_queue_locked;
// skip over suspended processes
while (cop != NULL && cop->suspend == SUSPENDED) {
cop = cop -> next;
}
if (DEBUG_PRINTS){
if (cop == NULL) {
printf("!!cop null?!!!\n");
} else {
printf("cop - %s\n", cop->name);
}
}
remove_pcb(&ready_queue_locked, cop);
enable();
_SP = cop -> stack_ptr;
}
void interrupt sys_call()
{
static parm *parm_add;
if (DEBUG_PRINTS) {printf("in sys_call \n ");}
/* Save stack pointer for current process */
cop->stack_ptr = _SP;
/* Get address of sys_call parameters */
parm_add = _SP + 0x1c; // parameter offset = 0x1C
/* Note that you should save this parameter address
somewhere in the pcb as suggested below*/
cop->parm_add = parm_add;
_SP = &sys_stack[STACK_SIZE-1];
// find out if the process wants to die... and kill it
if (parm_add->op_number == EXIT_CODE) {
strcpy(cop->name,"averill");
//TODO: CHECK IF THE PCB HAS IO PENDING
freemem(cop->loadaddr);
free_pcb(pcb_list, cop);
} else {
IO_sched(cop);
}
dispatch();
}
|