#! /bin/sh
#----------------------------------------------------------------------------
# list-groups - list groups
#
# Copyright (c) 2001-2003 Frank Meyer <frank@eisfair.org>
#
# Creation:	04.11.2001  fm
# Last Update:  19.07.2003  fm
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#----------------------------------------------------------------------------

gotoyx () { echo -e "\033[$1;$2H\c"; }
echoyx () { echo -e "\033[$1;$2H\c"; shift; shift; echo -e "$*\c"; }

IFS=':'

clrhome
colecho "List groups" gn
echo
colecho "    Group     Gid" x x br

tty=`tty`
row=4

while read line
do
    set -- $line
    group="$1"
    gid="$3"

    echoyx $row  5 $group	# group
    echoyx $row 15 $gid		# gid

    row=`expr $row + 1`
    if [ $row = 21 ]
    then
	echo
	echo
	/var/install/bin/anykey <$tty
	clrhome
	colecho "List groups" gn
	echo
	colecho "    Group     Gid" x x br
	row=4
    fi
done </etc/group
echo
echo
/var/install/bin/anykey