#!/bin/sh
################################################################
#
#  [# Edit, Date, User, Module #]
#
#  test-script for monopoly-template
#
here=`pwd`
if test $? -ne 0 ; then exit 1; fi
tmp=/tmp/$$
mkdir $tmp
if test $? -ne 0 ; then exit 1; fi
cd $tmp
if test $? -ne 0 ; then exit 1; fi

fail()
{
	echo FAILED 1>&2
	cd $here
	chmod u+w `find $tmp -type d -print`
	rm -rf $tmp
	exit 1
}

pass()
{
	cd $here
	chmod u+w `find $tmp -type d -print`
	rm -rf $tmp
	exit 0
}

trap 'fail' 1 2 3 15

###  Enter argument list for `monopoly' here ###
arglist='checkStubs'

/public/public/monopoly/diffpp > test.in 2>/dev/null << 'endOfSampleInput'

DeedIndex
 StationDeed  Key fdsaf end end
 UtilityDeed  Key gfdgf end end
 PropertyDeed Key sfsgf end end
 StationDeed  Key gtrgd end end
 StationDeed  Key gddgr end end
 UtilityDeed  Key  gfg  end end
 PropertyDeed Key   i   end end
 UtilityDeed  Key weffe end end
 PropertyDeed Key sffdd end end
end

Game
 DeedIndex
  StationDeed  Key gtrgd end end
  StationDeed  Key gddgr end end
  UtilityDeed  Key  gfg  end end
  StationDeed  Key fdsaf end end
  UtilityDeed  Key gfdgf end end
  PropertyDeed Key sfsgf end end
  PropertyDeed Key   i   end end
  UtilityDeed  Key weffe end end
  PropertyDeed Key sffdd end end
 end
 Dice 4 6 end
end

endOfSampleInput
if test $? -ne 0 ; then fail; fi

/public/public/monopoly/diffpp > test.ok 2>/dev/null << 'endOfExpectedOutput'

StationDeed Key <nil> end end
UtilityDeed Key <nil> end end
PropertyDeed Key <nil> end end
Deed Key <nil> end end
DeedIndex end

DeedIndex
 StationDeed  Key fdsaf end end
 UtilityDeed  Key gfdgf end end
 PropertyDeed Key sfsgf end end
 StationDeed  Key gtrgd end end
 StationDeed  Key gddgr end end
 UtilityDeed  Key  gfg  end end
 PropertyDeed Key   i   end end
 UtilityDeed  Key weffe end end
 PropertyDeed Key sffdd end end
end

Game
 DeedIndex
  StationDeed  Key gtrgd end end
  StationDeed  Key gddgr end end
  UtilityDeed  Key  gfg  end end
  StationDeed  Key fdsaf end end
  UtilityDeed  Key gfdgf end end
  PropertyDeed Key sfsgf end end
  PropertyDeed Key   i   end end
  UtilityDeed  Key weffe end end
  PropertyDeed Key sffdd end end
 end
 Dice 4 6 end
end

endOfExpectedOutput
if test $? -ne 0 ; then fail; fi

$here/monopoly $arglist < test.in | /public/public/monopoly/diffpp > test.out 2>/dev/null
if test $? -ne 0 ; then fail; fi

diff test.ok test.out
if test $? -ne 0 ; then fail; fi

# it probably worked
pass