commit 1b77d48

dm: create a handler script for dtach

 1@@ -0,0 +1,44 @@
 2+#!/bin/rc
 3+
 4+# Create/list/attach/detach applications using dtach
 5+
 6+flag e+
 7+
 8+sockdir=/tmp/dm
 9+keyseq=
10+
11+fn list {
12+    find $sockdir -type s
13+    exit 0
14+}
15+
16+fn usage {
17+    printf 'dm [-hl] <alias> [command]\n'
18+}
19+
20+test -d $sockdir || mkdir -p $sockdir
21+
22+if (~ $1 -l || ~ $1 -h) {
23+	switch($1) {
24+		case -l 
25+			list
26+		case -h 
27+			usage && exit 0
28+	}
29+}
30+
31+switch($#*) {
32+	case 0 
33+		list
34+	case 1 
35+		method=a
36+	case * 
37+		method=A
38+}
39+
40+name=$1
41+shift
42+
43+socket=$sockdir/$name
44+
45+dtach -$method $socket -e $keyseq -r winch $*