Initial revision

git-svn-id: file:///srv/svn/joey/bsdgames-trunk@5099 a4a2c43b-8ac3-0310-8836-e0e880c912e2

tests/pom.test

@@ -0,0 +1,84 @@
+#!/bin/sh
+# pom.test - test functionality of pom.
+#
+# Copyright (c) 1999 Joseph Samuel Myers.
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 1. Redistributions of source code must retain the above copyright
+#    notice, this list of conditions and the following disclaimer.
+# 2. Redistributions in binary form must reproduce the above copyright
+#    notice, this list of conditions and the following disclaimer in the
+#    documentation and/or other materials provided with the distribution.
+# 3. The name of the author may not be used to endorse or promote products
+#    derived from this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
+# BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
+# AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+# OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+# SUCH DAMAGE.
+
+set -e
+
+. tests/common
+
+testexec pom pom/pom
+
+# Test dates from Astronomical Almanac 1998, rounded to nearest hour.
+# Should add dates from other years.
+
+# We should also test the fraction illuminated given by the program, but
+# it isn't really accurate enough to do this reliably and the Astronomical
+# Almanac only gives these figures to 2 decimal places (like pom) so I don't
+# know which are border cases and which are good tests.
+
+export TZ=UTC0
+
+testno 1
+pom/pom 1998010514 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998fq1
+rm -f test.out
+
+testno 2
+pom/pom 1998011217 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998fm1
+rm -f test.out
+
+testno 3
+pom/pom 1998012020 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998lq1
+rm -f test.out
+
+testno 4
+pom/pom 1998012806 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998nm1
+rm -f test.out
+
+testno 5
+pom/pom 1998102010 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998nm2
+rm -f test.out
+
+testno 6
+pom/pom 1998102812 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998fq2
+rm -f test.out
+
+testno 7
+pom/pom 1998110405 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998fm2
+rm -f test.out
+
+testno 8
+pom/pom 1998111100 >test.out 2>&1 || failtest
+compare test.out tests/pom.1998lq2
+rm -f test.out