aboutsummaryrefslogtreecommitdiff
path: root/sys_sppt.c
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();
}