xref: /plan9/rc/bin/wloc (revision 59cc4ca53493a3c6d2349fe2b7f7c40f7dce7294)
13e12c5d1SDavid du Colombier#!/bin/rc
2*59cc4ca5SDavid du Colombier
3*59cc4ca5SDavid du Colombierrfork e
43e12c5d1SDavid du Colombierifs='
53e12c5d1SDavid du Colombier'
67dd7cddfSDavid du Colombier
77dd7cddfSDavid du Colombierfor(i in `{ls /dev/wsys}) {
8*59cc4ca5SDavid du Colombier	echo window -r `{syscall -o read 0 buf 59 < $i/window >[2] /dev/null |
9*59cc4ca5SDavid du Colombier	sed 's/............//; s/^ *//; s/  */ /g'} `{cat $i/label}
103e12c5d1SDavid du Colombier}
11