#!/bin/sh 

# $Header: /sanguine/homes/zeus/Blind-2.48/scripts/RCS/ADDNEW,v 2.48 1999/03/14 01:04:10 zeus Exp zeus $

# $Log: ADDNEW,v $
# Revision 2.48  1999/03/14 01:04:10  zeus
# *** empty log message ***
#

if [ -f ./X-ref ] ; then
  # Create mirror of all listed pairs
  awk -F: '{printf ("%s:%s\n",$2,$1)}' ./X-ref > /tmp/X-ref.$$
  # Make sure everyone can forward to GM/themselves
  awk -F: '{printf ("%s:GM\n%s:%s\n",$1,$1,$1)}' ./X-ref >> /tmp/X-ref.$$
  awk -F: '{printf ("%s:pageGM\n%s:%s\n",$1,$1,$1)}' ./X-ref >> /tmp/X-ref.$$
  # Append current list, sort and make unique.
  cat ./X-ref >> /tmp/X-ref.$$ && sort -u /tmp/X-ref.$$ > ./X-ref

  # Verify valid users
  awk -F: '{print $1}' X-ref.$$ | uniq > /tmp/listed.$$
  for x in `cat /tmp/listed.$$` ; do
    /bin/grep "^$x" races:players > /dev/null || echo "Warning! $x not in player file"
  done 
  exit 0
else
  echo "X-ref missing"
  exit 1
fi
/bin/rm /tmp/listed.$$ /tmp/X-ref.$$
