145 |
|
/* send acknowledgement */ |
146 |
|
disp_result(DS_ACKNOW, 0, NULL); |
147 |
|
return(disp_check(1)); /* block on following request */ |
148 |
+ |
case DR_KILL: /* kill computation process(es) */ |
149 |
+ |
if (msg.nbytes) |
150 |
+ |
error(INTERNAL, "bad DR_KILL from display process"); |
151 |
+ |
if (nprocs > 0) { |
152 |
+ |
done_packets(flush_queue()); |
153 |
+ |
if (end_rtrace()) |
154 |
+ |
error(WARNING, "bad status returned by rtrace"); |
155 |
+ |
} else |
156 |
+ |
error(WARNING, "no rtrace process to kill"); |
157 |
+ |
break; |
158 |
+ |
case DR_RESTART: /* restart computation process(es) */ |
159 |
+ |
if (msg.nbytes) |
160 |
+ |
error(INTERNAL, "bad DR_RESTART from display process"); |
161 |
+ |
if (ncprocs > nprocs) { |
162 |
+ |
checkrad(); |
163 |
+ |
if (start_rtrace() < 1) |
164 |
+ |
error(WARNING, "cannot restart rtrace"); |
165 |
+ |
} else if (nprocs > 0) |
166 |
+ |
error(WARNING, "rtrace already runnning"); |
167 |
+ |
else |
168 |
+ |
error(WARNING, "holodeck not open for writing"); |
169 |
+ |
break; |
170 |
+ |
case DR_CLOBBER: /* clobber holodeck */ |
171 |
+ |
if (msg.nbytes) |
172 |
+ |
error(INTERNAL, "bad DR_CLOBBER from display process"); |
173 |
+ |
if (!force || !ncprocs) |
174 |
+ |
error(WARNING, "request to clobber holodeck denied"); |
175 |
+ |
else { |
176 |
+ |
error(WARNING, "clobbering holodeck contents"); |
177 |
+ |
hdclobber(NULL); |
178 |
+ |
} |
179 |
+ |
break; |
180 |
|
case DR_SHUTDOWN: /* shut down program */ |
181 |
|
if (msg.nbytes) |
182 |
|
error(INTERNAL, "bad DR_SHUTDOWN from display process"); |