xwords/xwords4/relay/scripts/showinplay.sh
Eric House 31fa2ea442 turn on feature where sent messages are marked rather than deleted.
Make default 'epoch' rather than NULL so constraint will work to
prevent duplicates, and fix insertion SQL to not violate constraint.
2013-09-25 06:38:10 -07:00

55 lines
1.5 KiB
Bash
Executable file

#!/bin/sh
set -e -u
FILTER=""
LIMIT=10000
usage() {
echo "usage: $0 [--limit <n>] [--filter]"
exit 1
}
while [ $# -gt 0 ]; do
case $1 in
--limit)
LIMIT=$2
shift
;;
--filter)
FILTER=1
;;
*) usage
;;
esac
shift
done
QUERY="WHERE NOT -NTOTAL = sum_array(nperdevice)"
echo -n "Device (pid) count: $(pidof xwords | wc | awk '{print $2}')"
echo "; relay pid[s]: $(pidof xwrelay)"
echo "Row count:" $(psql -t xwgames -c "select count(*) FROM games $QUERY;")
# Games
echo "SELECT dead as d,connname,cid,room,lang as lg,clntVers as cv ,ntotal as t,nperdevice as nPerDev,nsents as snts, seeds,devids,tokens,ack, mtimes "\
"FROM games $QUERY ORDER BY NOT dead, connname LIMIT $LIMIT;" \
| psql xwgames
# Messages
echo "SELECT connname, hid, devid, count(*), sum(msglen) "\
"FROM msgs WHERE stime = 'epoch' "\
"AND (connname IN (SELECT connname from games where not games.dead group by connname) "\
"OR devid IN (SELECT unnest(devids) from games where not games.dead)) "\
"GROUP BY connname, hid, devid ORDER BY connname LIMIT $LIMIT;" \
| psql xwgames
# Devices
LINE="SELECT id, model, osvers, array_length(mtimes, 1) as mcnt, mtimes[1] as mtime, array_length(devTypes, 1) as dcnt, devTypes[1] as dTyp, devids[1] as devid FROM devices "
if [ -n "$FILTER" ]; then
LINE="${LINE} WHERE id IN (select UNNEST(devids) FROM games $QUERY)"
fi
LINE="$LINE ORDER BY mtimes[1] DESC LIMIT $LIMIT;"
echo "$LINE" | psql xwgames