1 files changed, 10 insertions, 0 deletions
diff --git a/rc/bin/wloc b/rc/bin/wloc
new file mode 100755
index 000000000..cd743d2ae
--- /dev/null
+++ b/rc/bin/wloc
@@ -0,0 +1,10 @@
+#!/bin/rc
+
+rfork e
+ifs='
+'
+
+for(i in `{ls /dev/wsys}) {
+	echo window -r `{syscall -o read 0 buf 59 < $i/window >[2] /dev/null |
+	sed 's/............//; s/^ *//; s/  */ /g'} `{cat $i/label}
+}