#!/bin/rc
# com/who - list users in com
# usage: com/who room
# requires:
#	- com/rooms

. com/env

fn usage{
	echo 'usage: com/who room'
	echo 'available rooms:'
	com/rooms
	exit usage
}

switch($#*){
case 0
	ls -lrt $location/*/who |\
	awk '{print $7, $8, $9, $10}'|\
	awk -F/ '{printf("%s — in %s since %s\n", $8, $6, $1)}'
case 1
	ls -lrt $location/$1/who |\
	awk '{print $7, $8, $9, $10}'|\
	awk -F/ '{printf("%s — since %s\n", $8, $1)}'
case *
	usage
}