| 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_rtrace(); |
| 153 |
+ |
else |
| 154 |
+ |
error(WARNING, "no rtrace process to kill"); |
| 155 |
+ |
break; |
| 156 |
+ |
case DR_RESTART: /* restart computation process(es) */ |
| 157 |
+ |
if (msg.nbytes) |
| 158 |
+ |
error(INTERNAL, "bad DR_RESTART from display process"); |
| 159 |
+ |
if (ncprocs > nprocs) |
| 160 |
+ |
new_rtrace(); |
| 161 |
+ |
else if (nprocs > 0) |
| 162 |
+ |
error(WARNING, "rtrace already runnning"); |
| 163 |
+ |
else |
| 164 |
+ |
error(WARNING, "holodeck not open for writing"); |
| 165 |
+ |
break; |
| 166 |
+ |
case DR_CLOBBER: /* clobber holodeck */ |
| 167 |
+ |
if (msg.nbytes) |
| 168 |
+ |
error(INTERNAL, "bad DR_CLOBBER from display process"); |
| 169 |
+ |
if (!force || !ncprocs) |
| 170 |
+ |
error(WARNING, "request to clobber holodeck denied"); |
| 171 |
+ |
else { |
| 172 |
+ |
error(WARNING, "clobbering holodeck contents"); |
| 173 |
+ |
hdclobber(NULL); |
| 174 |
+ |
} |
| 175 |
+ |
break; |
| 176 |
|
case DR_SHUTDOWN: /* shut down program */ |
| 177 |
|
if (msg.nbytes) |
| 178 |
|
error(INTERNAL, "bad DR_SHUTDOWN from display process"); |