blob: fa132ba3b5313459f945c4f1a76a710c3ec29208 (
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
|
/*
* alarm
*
* you may think some rc script can be same effect
* I did but I realized rc script does not work cleanly.
* The bellowing has a problem. so I wrote in C
* -Kenar-
*
* #!/bin/rc
* if(~ $* 0 1)
* echo usage: alarm time command arg ...
* rfork e
* t=$1
* shift
* c=$*
* { sleep $t;
* if(test -e /proc/$pid)
* echo alarm >/proc/$pid/note
* }&
* exec $c
*
*/
#include <u.h>
#include <libc.h>
int cpid;
void
usage(void)
{
fprint(2,"usage: alarm time path arg ...\n");
exits("usage");
}
static int
notefun(void *a, char *msg)
{
USED(a);
postnote(PNGROUP, cpid, msg);
if(strcmp(msg, "alarm") == 0){
return 1;
}
return 0;
}
void
main(int argc, char *argv[])
{
char *cmd;
int t;
ARGBEGIN{
default: usage();
}ARGEND
if(*argv == nil)
usage();
t = atoi(argv[0]);
argv++;
if(*argv ==nil)
usage();
cmd = argv[0];
/* cmd must be a path, absolute or relative */
if(*cmd != '/' && strcmp(cmd, "./") != 0 && strcmp(cmd, "../") != 0)
usage();
argv[0] = strrchr(cmd,'/');
atnotify(notefun,1);
alarm(t*1000);
switch((cpid = rfork(RFFDG|RFREND|RFPROC|RFMEM|RFNOTEG))){
case -1:
sysfatal("rfork: %r");
case 0: /* child */
exec(cmd,argv);
default: /* parent */
break;
}
waitpid();
}
|
