ref: 031f5756aba3d07939a7eee6b2adf02f0a2d1d8d
dir: /rc/bin/wloc/
#!/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}
}