xref: /original-bsd/sys/tahoe/tahoe/sys_machdep.c (revision 07d71086)
1 /*
2  * Copyright (c) 1988 Regents of the University of California.
3  * All rights reserved.  The Berkeley software License Agreement
4  * specifies the terms and conditions for redistribution.
5  *
6  *	@(#)sys_machdep.c	7.3 (Berkeley) 08/14/89
7  */
8 
9 #include "param.h"
10 #include "systm.h"
11 #include "user.h"
12 #include "ioctl.h"
13 #include "file.h"
14 #include "proc.h"
15 #include "kernel.h"
16 #include "mtio.h"
17 #include "buf.h"
18 
19 #include "pte.h"
20 
21 #ifdef TRACE
22 int	nvualarm;
23 
24 vtrace()
25 {
26 	register struct a {
27 		int	request;
28 		int	value;
29 	} *uap;
30 	int vdoualarm();
31 
32 	uap = (struct a *)u.u_ap;
33 	switch (uap->request) {
34 
35 	case VTR_DISABLE:		/* disable a trace point */
36 	case VTR_ENABLE:		/* enable a trace point */
37 		if (uap->value < 0 || uap->value >= TR_NFLAGS)
38 			u.u_error = EINVAL;
39 		else {
40 			u.u_r.r_val1 = traceflags[uap->value];
41 			traceflags[uap->value] = uap->request;
42 		}
43 		break;
44 
45 	case VTR_VALUE:		/* return a trace point setting */
46 		if (uap->value < 0 || uap->value >= TR_NFLAGS)
47 			u.u_error = EINVAL;
48 		else
49 			u.u_r.r_val1 = traceflags[uap->value];
50 		break;
51 
52 	case VTR_UALARM:	/* set a real-time ualarm, less than 1 min */
53 		if (uap->value <= 0 || uap->value > 60 * hz ||
54 		    nvualarm > 5)
55 			u.u_error = EINVAL;
56 		else {
57 			nvualarm++;
58 			timeout(vdoualarm, (caddr_t)u.u_procp->p_pid,
59 			    uap->value);
60 		}
61 		break;
62 
63 	case VTR_STAMP:
64 		trace(TR_STAMP, uap->value, u.u_procp->p_pid);
65 		break;
66 	}
67 }
68 
69 vdoualarm(arg)
70 	int arg;
71 {
72 	register struct proc *p;
73 
74 	p = pfind(arg);
75 	if (p)
76 		psignal(p, 16);
77 	nvualarm--;
78 }
79 #endif
80