Changes by David Megginson.

it is only built if it doesn't already exist on the user's platform.
gdbm is a set of database routines that use extendible hashing and works
similar to the standard UNIX dbm routines.  This guarantees the availability
of gdbm to any application that uses SimGear.

Makefile.am

@@ -0,0 +1,14 @@
+EXTRA_DIST	= mksymlinks.sh acsite.m4 acconfig.h
+
+SUBDIRS		= simgear
+
+#
+# Rule to build RPM distribution package
+#
+rpm: dist
+	cp $(PACKAGE)-$(VERSION).tar.gz /usr/src/packages/SOURCES
+	rpm -ba @PACKAGE@.spec
+
+dist-hook:
+	tar cf - simgear/metar | (cd $(distdir); tar xvf -)
+

NEWS

@@ -0,0 +1,27 @@
+New in 0.0.7
+* March 29, 2000
+* Added support for RedHat package building contributed by Habibie 
+  <habibie@MailandNews.com>
+* Added gdbm to SimGear.  Many systems will already have gdbm installed so
+  it is only built if it doesn't already exist on the user's platform.
+  gdbm is a set of database routines that use extendible hashing and works
+  similar to the standard UNIX dbm routines.  This guarantees the availability
+  of gdbm to any application that uses SimGear.
+* Optimizations and bullet proofing of magnetic variation code by Norman 
+  Vine and Ed Williams
+
+New in 0.0.6
+* March 27, 2000
+* Added Nima World Magnetic Model 2000 contributed by Ed Williams
+* Fixes for MSVC++
+
+New in 0.0.5
+* March 17, 2000
+* Restructured directory layout to facilitate windows/mac IDE builds.
+
+New in 0.0.4
+* Removed mat3.h and friends (we now use plib's sg lib for these sorts of 
+  things.)
+
+New in 0.0.3
+* Release that conincides with FlightGear-0.7.2

SimGear.spec.in

@@ -0,0 +1,76 @@
+%define ver	@VERSION@
+%define rel	1
+%define prefix	/usr
+
+Summary:	Simulator Construction Gear.
+Name:		@PACKAGE@
+Version:	%ver
+Release:	%rel
+Copyright:	LGPL
+Group:		Libraries/Graphics
+Source:		%{name}-%{version}.tar.gz
+#URL:		
+BuildRoot:	/tmp/%{name}-%{version}-%{rel}-root
+Packager:	Fill In As You Wish
+Docdir:		%{prefix}/doc
+
+%description
+This package contains a tools and libraries useful for constructing 
+simulation and visualization applications such as FlightGear or TerraGear. 
+
+Authors:
+	N/A
+
+%prep
+%setup -n %{name}-%{version}
+
+
+%build
+# Needed for snapshot releases.
+if [ ! -f configure ]; then
+	CFLAGS="$RPM_OPT_FLAGS" ./autogen.sh --prefix=%prefix
+else
+	CFLAGS="$RPM_OPT_FLAGS" ./configure --prefix=%prefix
+fi
+
+if [ "$SMP" != "" ]; then
+	JSMP	= '"MAKE=make -k -j $SMP"'
+fi
+
+make ${JSMP};
+
+
+%install
+[ -d ${RPM_BUILD_ROOT} ] && rm -rf ${RPM_BUILD_ROOT}
+
+make prefix=${RPM_BUILD_ROOT}%{prefix} install
+
+#
+# Generating file lists and store them in file-lists
+# Starting with the directory listings
+#
+find ${RPM_BUILD_ROOT}%{prefix}/{bin,include,lib} -type d | sed "s#^${RPM_BUILD_ROOT}#\%attr (-\,root\,root) \%dir #" > file-lists
+%{?ETCDR:find ${RPM_BUILD_ROOT}%{!?SYSCF:%{prefix}}/etc -type d | sed "s#^${RPM_BUILD_ROOT}#\%attr (-\,root\,root) \%dir #" >> file-lists}
+
+#
+# Then, the file listings
+#
+echo "%defattr (-, root, root)" >> file-lists
+%{?ETCDR:find ${RPM_BUILD_ROOT}%{!?SYSCF:%{prefix}}/etc/%{name}.conf -type f | sed -e "s#^${RPM_BUILD_ROOT}#%config #g" >> file-lists}
+find ${RPM_BUILD_ROOT}%{prefix} -type f | sed -e "s#^${RPM_BUILD_ROOT}##g" >> file-lists
+
+
+%clean
+(cd ..; rm -rf %{name}-%{version} ${RPM_BUILD_ROOT})
+
+
+%files -f file-lists
+%defattr (-, root, root)
+%doc AUTHORS
+%doc COPYING
+%doc ChangeLog
+%doc INSTALL
+%doc NEWS
+%doc README
+%doc %{name}.spec.in
+

acconfig.h

@@ -0,0 +1,330 @@
+/* acconfig.h
+   This file is in the public domain.
+
+   Descriptive text for the C preprocessor macros that
+   the distributed Autoconf macros can define.
+   No software package will use all of them; autoheader copies the ones
+   your configure.in uses into your configuration header file templates.
+
+   The entries are in sort -df order: alphabetical, case insensitive,
+   ignoring punctuation (such as underscores).  Although this order
+   can split up related entries, it makes it easier to check whether
+   a given entry is in the file.
+
+   Leave the following blank line there!!  Autoheader needs it.  */
+
+
+/* Define if on AIX 3.
+   System headers sometimes define this.
+   We just want to avoid a redefinition error message.  */
+#ifndef _ALL_SOURCE
+#undef _ALL_SOURCE
+#endif
+
+/* Define if using alloca.c.  */
+#undef C_ALLOCA
+
+/* Define if type char is unsigned and you are not using gcc.  */
+#ifndef __CHAR_UNSIGNED__
+#undef __CHAR_UNSIGNED__
+#endif
+
+/* Define if the closedir function returns void instead of int.  */
+#undef CLOSEDIR_VOID
+
+/* Define to empty if the keyword does not work.  */
+#undef const
+
+/* Define to one of _getb67, GETB67, getb67 for Cray-2 and Cray-YMP systems.
+   This function is required for alloca.c support on those systems.  */
+#undef CRAY_STACKSEG_END
+
+/* Define for DGUX with <sys/dg_sys_info.h>.  */
+#undef DGUX
+
+/* Define if you have <dirent.h>.  */
+#undef DIRENT
+
+/* Define to enable audio support */
+#undef ENABLE_AUDIO_SUPPORT
+
+/* Define to enable GLUT joystick support (limited to 3 axes) */
+#undef ENABLE_GLUT_JOYSTICK
+   
+/* Define to enable plib joystick support (recommended) */
+#undef ENABLE_PLIB_JOYSTICK
+   
+/* Define to eliminate all trace of debugging messages such as for a 
+   release build */
+#undef FG_NDEBUG
+   
+/* Define to include Oliver's networking support */
+#undef FG_NETWORK_OLK
+   
+/* Define to avoid Christian's new weather code */
+#undef FG_OLD_WEATHER
+   
+/* Define if we are building FGFS (should always be defined) */
+#undef FGFS
+   
+/* Define to enable 3dfx/glide render in a window hack under unix.
+   This probably won't work under windows. */
+#undef XMESA
+#undef FX
+
+/* Define to the type of elements in the array set by `getgroups'.
+   Usually this is either `int' or `gid_t'.  */
+#undef GETGROUPS_T
+
+/* Define if the `getloadavg' function needs to be run setuid or setgid.  */
+#undef GETLOADAVG_PRIVILEGED
+
+/* Define if the `getpgrp' function takes no argument.  */
+#undef GETPGRP_VOID
+
+/* Define to `int' if <sys/types.h> doesn't define.  */
+#undef gid_t
+
+/* Define if you have alloca, as a function or macro.  */
+#undef HAVE_ALLOCA
+
+/* Define if you have <alloca.h> and it should be used (not on Ultrix).  */
+#undef HAVE_ALLOCA_H
+
+/* Define if you external variables daylight.  */
+#undef HAVE_DAYLIGHT
+
+/* Define if you don't have vprintf but do have _doprnt.  */
+#undef HAVE_DOPRNT
+
+/* Define if your system has a working fnmatch function.  */
+#undef HAVE_FNMATCH
+
+/* Define if your system has its own `getloadavg' function.  */
+#undef HAVE_GETLOADAVG
+
+/* Define if you have getrusage() */
+#undef HAVE_GETRUSAGE
+
+/* Define if you have the getmntent function.  */
+#undef HAVE_GETMNTENT
+
+/* Define if you have the gpc library and headers installed.  */
+#undef HAVE_GPC_H
+
+/* Define if the `long double' type works.  */
+#undef HAVE_LONG_DOUBLE
+
+/* Define if you support file names longer than 14 characters.  */
+#undef HAVE_LONG_FILE_NAMES
+
+/* Define if you have a working `mmap' system call.  */
+#undef HAVE_MMAP
+
+/* Define if system calls automatically restart after interruption
+   by a signal.  */
+#undef HAVE_RESTARTABLE_SYSCALLS
+
+/* Define if you have rint() which rounds to closest int but returns
+   result as a double data type.  */
+#undef HAVE_RINT
+
+/* Define if your struct stat has st_blksize.  */
+#undef HAVE_ST_BLKSIZE
+
+/* Define if your struct stat has st_blocks.  */
+#undef HAVE_ST_BLOCKS
+
+/* Define if you have the strcoll function and it is properly defined.  */
+#undef HAVE_STRCOLL
+
+/* Define if your struct stat has st_rdev.  */
+#undef HAVE_ST_RDEV
+
+/* Define if you have the strftime function.  */
+#undef HAVE_STRFTIME
+
+/* Define if you have <sys/param.h>  */
+#undef HAVE_SYS_PARAM_H
+
+/* Define if you have <sys/stat.h> that is POSIX.1 compatible.  */
+#undef HAVE_SYS_STAT_H
+
+/* Define if you have <sys/wait.h> that is POSIX.1 compatible.  */
+#undef HAVE_SYS_WAIT_H
+
+/* Define if you have timegm() */
+#undef HAVE_TIMEGM
+
+/* Define if you external variables timezone.  */
+#undef HAVE_TIMEZONE
+
+/* Define if your struct tm has tm_zone.  */
+#undef HAVE_TM_ZONE
+
+/* Define if you don't have tm_zone but do have the external array
+   tzname.  */
+#undef HAVE_TZNAME
+
+/* Define if you have <unistd.h>.  */
+#undef HAVE_UNISTD_H
+
+/* Define if utime(file, NULL) sets file's timestamp to the present.  */
+#undef HAVE_UTIME_NULL
+
+/* Define if you have <vfork.h>.  */
+#undef HAVE_VFORK_H
+
+/* Define if you have the vprintf function.  */
+#undef HAVE_VPRINTF
+
+/* Define if you have the wait3 system call.  */
+#undef HAVE_WAIT3
+
+/* Define if you have gdbm installed system wide.  */
+#undef HAVE_GDBM
+
+/* Define if you have zlib installed system wide.  */
+#undef HAVE_ZLIB
+
+/* Define as __inline if that's what the C compiler calls it.  */
+#undef inline
+
+/* Define if int is 16 bits instead of 32.  */
+#undef INT_16_BITS
+
+/* Define if long int is 64 bits.  */
+#undef LONG_64_BITS
+
+/* Define if major, minor, and makedev are declared in <mkdev.h>.  */
+#undef MAJOR_IN_MKDEV
+
+/* Define if major, minor, and makedev are declared in <sysmacros.h>.  */
+#undef MAJOR_IN_SYSMACROS
+
+/* Define if on MINIX.  */
+#undef _MINIX
+
+/* Define to `int' if <sys/types.h> doesn't define.  */
+#undef mode_t
+
+/* Define if you don't have <dirent.h>, but have <ndir.h>.  */
+#undef NDIR
+
+/* Define if you have <memory.h>, and <string.h> doesn't declare the
+   mem* functions.  */
+#undef NEED_MEMORY_H
+
+/* Define if your struct nlist has an n_un member.  */
+#undef NLIST_NAME_UNION
+
+/* Define if you have <nlist.h>.  */
+#undef NLIST_STRUCT
+
+/* Define if your C compiler doesn't accept -c and -o together.  */
+#undef NO_MINUS_C_MINUS_O
+
+/* Define to `long' if <sys/types.h> doesn't define.  */
+#undef off_t
+
+/* Define to package name */
+#undef PACKAGE
+
+/* Define to `int' if <sys/types.h> doesn't define.  */
+#undef pid_t
+
+/* Define if the system does not provide POSIX.1 features except
+   with this defined.  */
+#undef _POSIX_1_SOURCE
+
+/* Define if you need to in order for stat and other things to work.  */
+#undef _POSIX_SOURCE
+
+/* Define as the return type of signal handlers (int or void).  */
+#undef RETSIGTYPE
+
+/* Define if the `setpgrp' function takes no argument.  */
+#undef SETPGRP_VOID
+
+/* Define if the setvbuf function takes the buffering type as its second
+   argument and the buffer pointer as the third, as on System V
+   before release 3.  */
+#undef SETVBUF_REVERSED
+
+/* Define to `unsigned' if <sys/types.h> doesn't define.  */
+#undef size_t
+
+/* If using the C implementation of alloca, define if you know the
+   direction of stack growth for your system; otherwise it will be
+   automatically deduced at run-time.
+	STACK_DIRECTION > 0 => grows toward higher addresses
+	STACK_DIRECTION < 0 => grows toward lower addresses
+	STACK_DIRECTION = 0 => direction of growth unknown
+ */
+#undef STACK_DIRECTION
+
+/* Define if the `S_IS*' macros in <sys/stat.h> do not work properly.  */
+#undef STAT_MACROS_BROKEN
+
+/* Define if you have the ANSI C header files.  */
+#undef STDC_HEADERS
+
+/* Define on System V Release 4.  */
+#undef SVR4
+
+/* Define if you don't have <dirent.h>, but have <sys/dir.h>.  */
+#undef SYSDIR
+
+/* Define if you don't have <dirent.h>, but have <sys/ndir.h>.  */
+#undef SYSNDIR
+
+/* Define if `sys_siglist' is declared by <signal.h>.  */
+#undef SYS_SIGLIST_DECLARED
+
+/* Define if you can safely include both <sys/time.h> and <time.h>.  */
+#undef TIME_WITH_SYS_TIME
+
+/* Define if your <sys/time.h> declares struct tm.  */
+#undef TM_IN_SYS_TIME
+
+/* Define to `int' if <sys/types.h> doesn't define.  */
+#undef uid_t
+
+/* Define for Encore UMAX.  */
+#undef UMAX
+
+/* Define for Encore UMAX 4.3 that has <inq_status/cpustats.h>
+   instead of <sys/cpustats.h>.  */
+#undef UMAX4_3
+
+/* Define if you do not have <strings.h>, index, bzero, etc..  */
+#undef USG
+
+/* Define to version number */
+#undef VERSION
+
+/* Define vfork as fork if vfork does not work.  */
+#undef vfork
+
+/* Define if the closedir function returns void instead of int.  */
+#undef VOID_CLOSEDIR
+
+/* Define if compiling on a Winbloze (95, NT, etc.) platform */
+#undef WIN32
+
+/* Define if your processor stores words with the most significant
+   byte first (like Motorola and SPARC, unlike Intel and VAX).  */
+#undef WORDS_BIGENDIAN
+
+/* Define if the X Window System is missing or not being used.  */
+#undef X_DISPLAY_MISSING
+
+/* Define if lex declares yytext as a char * by default, not a char[].  */
+#undef YYTEXT_POINTER
+
+
+/* Leave that blank line there!!  Autoheader needs it.
+   If you're adding to this file, keep in mind:
+   The entries are in sort -df order: alphabetical, case insensitive,
+   ignoring punctuation (such as underscores).  */
+

aclocal.m4

@@ -0,0 +1,140 @@
+dnl aclocal.m4 generated automatically by aclocal 1.4
+
+dnl Copyright (C) 1994, 1995-8, 1999 Free Software Foundation, Inc.
+dnl This file is free software; the Free Software Foundation
+dnl gives unlimited permission to copy and/or distribute it,
+dnl with or without modifications, as long as this notice is preserved.
+
+dnl This program is distributed in the hope that it will be useful,
+dnl but WITHOUT ANY WARRANTY, to the extent permitted by law; without
+dnl even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+dnl PARTICULAR PURPOSE.
+
+# Do all the work for Automake.  This macro actually does too much --
+# some checks are only needed if your package does certain things.
+# But this isn't really a big deal.
+
+# serial 1
+
+dnl Usage:
+dnl AM_INIT_AUTOMAKE(package,version, [no-define])
+
+AC_DEFUN(AM_INIT_AUTOMAKE,
+[AC_REQUIRE([AC_PROG_INSTALL])
+PACKAGE=[$1]
+AC_SUBST(PACKAGE)
+VERSION=[$2]
+AC_SUBST(VERSION)
+dnl test to see if srcdir already configured
+if test "`cd $srcdir && pwd`" != "`pwd`" && test -f $srcdir/config.status; then
+  AC_MSG_ERROR([source directory already configured; run "make distclean" there first])
+fi
+ifelse([$3],,
+AC_DEFINE_UNQUOTED(PACKAGE, "$PACKAGE", [Name of package])
+AC_DEFINE_UNQUOTED(VERSION, "$VERSION", [Version number of package]))
+AC_REQUIRE([AM_SANITY_CHECK])
+AC_REQUIRE([AC_ARG_PROGRAM])
+dnl FIXME This is truly gross.
+missing_dir=`cd $ac_aux_dir && pwd`
+AM_MISSING_PROG(ACLOCAL, aclocal, $missing_dir)
+AM_MISSING_PROG(AUTOCONF, autoconf, $missing_dir)
+AM_MISSING_PROG(AUTOMAKE, automake, $missing_dir)
+AM_MISSING_PROG(AUTOHEADER, autoheader, $missing_dir)
+AM_MISSING_PROG(MAKEINFO, makeinfo, $missing_dir)
+AC_REQUIRE([AC_PROG_MAKE_SET])])
+
+#
+# Check to make sure that the build environment is sane.
+#
+
+AC_DEFUN(AM_SANITY_CHECK,
+[AC_MSG_CHECKING([whether build environment is sane])
+# Just in case
+sleep 1
+echo timestamp > conftestfile
+# Do `set' in a subshell so we don't clobber the current shell's
+# arguments.  Must try -L first in case configure is actually a
+# symlink; some systems play weird games with the mod time of symlinks
+# (eg FreeBSD returns the mod time of the symlink's containing
+# directory).
+if (
+   set X `ls -Lt $srcdir/configure conftestfile 2> /dev/null`
+   if test "[$]*" = "X"; then
+      # -L didn't work.
+      set X `ls -t $srcdir/configure conftestfile`
+   fi
+   if test "[$]*" != "X $srcdir/configure conftestfile" \
+      && test "[$]*" != "X conftestfile $srcdir/configure"; then
+
+      # If neither matched, then we have a broken ls.  This can happen
+      # if, for instance, CONFIG_SHELL is bash and it inherits a
+      # broken ls alias from the environment.  This has actually
+      # happened.  Such a system could not be considered "sane".
+      AC_MSG_ERROR([ls -t appears to fail.  Make sure there is not a broken
+alias in your environment])
+   fi
+
+   test "[$]2" = conftestfile
+   )
+then
+   # Ok.
+   :
+else
+   AC_MSG_ERROR([newly created file is older than distributed files!
+Check your system clock])
+fi
+rm -f conftest*
+AC_MSG_RESULT(yes)])
+
+dnl AM_MISSING_PROG(NAME, PROGRAM, DIRECTORY)
+dnl The program must properly implement --version.
+AC_DEFUN(AM_MISSING_PROG,
+[AC_MSG_CHECKING(for working $2)
+# Run test in a subshell; some versions of sh will print an error if
+# an executable is not found, even if stderr is redirected.
+# Redirect stdin to placate older versions of autoconf.  Sigh.
+if ($2 --version) < /dev/null > /dev/null 2>&1; then
+   $1=$2
+   AC_MSG_RESULT(found)
+else
+   $1="$3/missing $2"
+   AC_MSG_RESULT(missing)
+fi
+AC_SUBST($1)])
+
+# Define a conditional.
+
+AC_DEFUN(AM_CONDITIONAL,
+[AC_SUBST($1_TRUE)
+AC_SUBST($1_FALSE)
+if $2; then
+  $1_TRUE=
+  $1_FALSE='#'
+else
+  $1_TRUE='#'
+  $1_FALSE=
+fi])
+
+# Like AC_CONFIG_HEADER, but automatically create stamp file.
+
+AC_DEFUN(AM_CONFIG_HEADER,
+[AC_PREREQ([2.12])
+AC_CONFIG_HEADER([$1])
+dnl When config.status generates a header, we must update the stamp-h file.
+dnl This file resides in the same directory as the config header
+dnl that is generated.  We must strip everything past the first ":",
+dnl and everything past the last "/".
+AC_OUTPUT_COMMANDS(changequote(<<,>>)dnl
+ifelse(patsubst(<<$1>>, <<[^ ]>>, <<>>), <<>>,
+<<test -z "<<$>>CONFIG_HEADERS" || echo timestamp > patsubst(<<$1>>, <<^\([^:]*/\)?.*>>, <<\1>>)stamp-h<<>>dnl>>,
+<<am_indx=1
+for am_file in <<$1>>; do
+  case " <<$>>CONFIG_HEADERS " in
+  *" <<$>>am_file "*<<)>>
+    echo timestamp > `echo <<$>>am_file | sed -e 's%:.*%%' -e 's%[^/]*$%%'`stamp-h$am_indx
+    ;;
+  esac
+  am_indx=`expr "<<$>>am_indx" + 1`
+done<<>>dnl>>)
+changequote([,]))])
+

acsite.m4

@@ -0,0 +1,394 @@
+dnl
+dnl originally from ncftp 2.3.0
+dnl added wi_EXTRA_PDIR and wi_ANSI_C
+dnl $Id$
+dnl
+AC_DEFUN(wi_EXTRA_IDIR, [
+incdir="$1"
+if test -r $incdir ; then
+	case "$CPPFLAGS" in
+		*-I${incdir}*)
+			# echo "   + already had $incdir" 1>&6
+			;;
+		*)
+			if test "$CPPFLAGS" = "" ; then
+				CPPFLAGS="-I$incdir"
+			else
+				CPPFLAGS="$CPPFLAGS -I$incdir"
+			fi
+			echo "   + found $incdir" 1>&6
+			;;
+	esac
+fi
+])
+dnl
+dnl
+dnl
+dnl
+AC_DEFUN(wi_EXTRA_LDIR, [
+mylibdir="$1"
+if test -r $mylibdir ; then
+	case "$LDFLAGS" in
+		*-L${mylibdir}*)
+			# echo "   + already had $mylibdir" 1>&6
+			;;
+		*)
+			if test "$LDFLAGS" = "" ; then
+				LDFLAGS="-L$mylibdir"
+			else
+				LDFLAGS="$LDFLAGS -L$mylibdir"
+			fi
+			echo "   + found $mylibdir" 1>&6
+			;;
+	esac
+fi
+])
+dnl
+dnl __FP__
+dnl
+dnl
+AC_DEFUN(wi_EXTRA_PDIR, [
+progdir="$1"
+if test -r $progdir ; then
+	case "$PATH" in
+		*:${progdir}*)
+			# echo "   + already had $progdir" 1>&6
+			;;
+		*${progdir}:*)
+			# echo "   + already had $progdir" 1>&6
+			;;
+		*)
+			if test "$PATH" = "" ; then
+				PATH="$progdir"
+			else
+				PATH="$PATH:$progdir"
+			fi
+			echo "   + found $progdir" 1>&6
+			;;
+	esac
+fi
+])
+dnl
+dnl
+dnl If you want to also look for include and lib subdirectories in the
+dnl $HOME tree, you supply "yes" as the first argument to this macro.
+dnl
+dnl If you want to look for subdirectories in include/lib directories,
+dnl you pass the names in argument 3, otherwise pass a dash.
+dnl
+AC_DEFUN(wi_EXTRA_DIRS, [echo "checking for extra include and lib directories..." 1>&6
+ifelse([$1], yes, [dnl
+b1=`cd .. ; pwd`
+b2=`cd ../.. ; pwd`
+exdirs="$HOME $j $b1 $b2 $prefix $2"
+],[dnl
+exdirs="$prefix $2"
+])
+subexdirs="$3"
+if test "$subexdirs" = "" ; then
+	subexdirs="-"
+fi
+for subexdir in $subexdirs ; do
+if test "$subexdir" = "-" ; then
+	subexdir=""
+else
+	subexdir="/$subexdir"
+fi
+for exdir in $exdirs ; do
+	if test "$exdir" != "/usr" || test "$subexdir" != ""; then
+		incdir="${exdir}/include${subexdir}"
+		wi_EXTRA_IDIR($incdir)
+
+		mylibdir="${exdir}/lib${subexdir}"
+		wi_EXTRA_LDIR($mylibdir)
+
+		progdir="${exdir}/bin${subexdirr}"
+		wi_EXTRA_PDIR($progdir)
+	fi
+done
+done
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_HPUX_CFLAGS,
+[AC_MSG_CHECKING(if HP-UX ansi C compiler flags are needed)
+AC_REQUIRE([AC_PROG_CC])
+os=`uname -s | tr '[A-Z]' '[a-z]'`
+ac_cv_hpux_flags=no
+if test "$os" = hp-ux ; then
+	if test "$ac_cv_prog_gcc" = yes ; then
+		if test "$CFLAGS" != "" ; then
+			# Shouldn't be in there.
+			CFLAGS=`echo "$CFLAGS" | sed 's/-Aa//g'`
+		fi
+	else
+		# If you're not using gcc, then you better have a cc/c89
+		# that is usable.  If you have the barebones compiler, it
+		# won't work.  The good compiler uses -Aa for the ANSI
+		# compatible stuff.
+		x=`echo $CFLAGS | grep 'Aa' 2>/dev/null`
+		if test "$x" = "" ; then
+			CFLAGS="$CFLAGS -Aa"
+		fi
+		ac_cv_hpux_flags=yes
+	fi
+	# Also add _HPUX_SOURCE to get the extended namespace.
+	x=`echo $CFLAGS | grep '_HPUX_SOURCE' 2>/dev/null`
+	if test "$x" = "" ; then
+		CFLAGS="$CFLAGS -D_HPUX_SOURCE"
+	fi
+fi
+AC_MSG_RESULT($ac_cv_hpux_flags)
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_CFLAGS, [AC_REQUIRE([AC_PROG_CC])
+wi_HPUX_CFLAGS
+	if test "$CFLAGS" = "" ; then
+		CFLAGS="-O"
+	elif test "$ac_cv_prog_gcc" = "yes" ; then
+		case "$CFLAGS" in
+			*"-g -O"*)
+				#echo "using -g as default gcc CFLAGS" 1>&6
+				CFLAGS=`echo $CFLAGS | sed 's/-g\ -O/-O/'`
+				;;
+			*"-O -g"*)
+				# Leave the -g, but remove all -O options.
+				#echo "using -g as default gcc CFLAGS" 1>&6
+				CFLAGS=`echo $CFLAGS | sed 's/-O\ -g/-O/'`
+				;;
+		esac
+	fi
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_PROTOTYPES, [
+AC_MSG_CHECKING(if the compiler supports function prototypes)
+AC_TRY_COMPILE(,[extern void exit(int status);],[wi_cv_prototypes=yes
+AC_DEFINE(PROTOTYPES)],wi_cv_prototypes=no)
+AC_MSG_RESULT($wi_cv_prototypes)
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_ANSI_C, [
+AC_MSG_CHECKING(ANSI-style function definitions)
+AC_TRY_COMPILE(,[int blubb(int x) { return 0; }],[wi_cv_ansi_funcs=yes
+AC_DEFINE(ANSI_FUNCS)],wi_cv_ansi_funcs=no)
+AC_MSG_RESULT($wi_cv_ansi_funcs)
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_HEADER_SYS_SELECT_H, [
+# See if <sys/select.h> is includable after <sys/time.h>
+if test "$ac_cv_header_sys_time_h" = no ; then
+AC_CHECK_HEADERS(sys/time.h sys/select.h)
+else
+AC_CHECK_HEADERS(sys/select.h)
+fi
+if test "$ac_cv_header_sys_select_h" = yes ; then
+	AC_MSG_CHECKING([if <sys/select.h> is compatible with <sys/time.h>])
+	selecth=yes
+	if test "$ac_cv_header_sys_time_h" = yes ; then
+		AC_TRY_COMPILE([#include <sys/time.h>
+		#include <sys/select.h>],[
+		fd_set a;
+		struct timeval tmval;
+
+		tmval.tv_sec = 0;],selecth=yes,selecth=no)
+
+		if test "$selecth" = yes ; then
+			AC_DEFINE(CAN_USE_SYS_SELECT_H)
+		fi
+	fi
+	AC_MSG_RESULT($selecth)
+fi
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_LIB_RESOLV, [
+# See if we could access two well-known sites without help of any special
+# libraries, like resolv.
+
+AC_TRY_RUN([
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <netdb.h>
+ 
+main()
+{
+	struct hostent *hp1, *hp2;
+	int result;
+
+	hp1 = gethostbyname("gatekeeper.dec.com");
+	hp2 = gethostbyname("ftp.ncsa.uiuc.edu");
+	result = ((hp1 != (struct hostent *) 0) && (hp2 != (struct hostent *) 0));
+	exit(! result);
+}],look_for_resolv=no,look_for_resolv=yes,look_for_resolv=yes)
+
+AC_MSG_CHECKING([if we need to look for -lresolv])
+AC_MSG_RESULT($look_for_resolv)
+if test "$look_for_resolv" = yes ; then
+AC_CHECK_LIB(resolv,main)
+else
+	ac_cv_lib_resolv=no
+fi
+])
+dnl
+dnl
+dnl
+
+AC_DEFUN(wi_LIB_NSL, [
+AC_MSG_CHECKING(if we can use -lnsl)
+ac_save_LIBS="$LIBS";
+LIBS="$LIBS -lnsl";
+AC_CACHE_VAL(r_cv_use_libnsl, [
+AC_TRY_RUN(
+main() { if (getpwuid(getuid())) exit(0); exit(-1); },
+nc_cv_use_libnsl=yes, nc_cv_use_libnsl=no, nc_cv_use_libnsl=no)
+])
+if test "$nc_cv_use_libnsl" = "no"; then LIBS="$ac_save_LIBS"; fi
+AC_MSG_RESULT($nc_cv_use_libnsl)
+])dnl
+
+dnl
+dnl
+dnl
+
+AC_DEFUN(nc_PATH_PROG_ZCAT, [
+AC_PATH_PROG(GZCAT,gzcat)
+AC_PATH_PROG(ZCAT,zcat)
+if test "x$GZCAT" = x ; then
+	if test "x$ZCAT" != x ; then
+		# See if zcat is really gzcat.  gzcat has a --version option, regular
+		# zcat does not.
+		AC_MSG_CHECKING(if zcat is really gzcat in disguise)
+		if $ZCAT --version 2> /dev/null ; then
+			AC_DEFINE_UNQUOTED(GZCAT, "$ZCAT")
+			AC_MSG_RESULT(yes)
+		else
+			AC_MSG_RESULT(no)
+		fi
+	fi
+else
+	AC_DEFINE_UNQUOTED(GZCAT, "$GZCAT")
+fi
+
+if test "x$ZCAT" != x ; then
+	AC_DEFINE_UNQUOTED(ZCAT, "$ZCAT")
+fi
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_SYSV_EXTRA_DIRS, [
+# Use System V because their curses extensions are required.  This must
+# be done early so we use the -I and -L in the library checks also.
+# This is mostly a Solaris/SunOS hack.  Note that doing this will also
+# use all of the other System V libraries and headers.
+
+AC_MSG_CHECKING(for alternative System V libraries)
+if test -f /usr/5include/curses.h ; then
+	CPPFLAGS="$CPPFLAGS -I/usr/5include"
+	LDFLAGS="$LDFLAGS -L/usr/5lib"
+	AC_MSG_RESULT(yes)
+else
+	AC_MSG_RESULT(no)
+fi
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_DEFINE_UNAME, [
+# Get first 127 chars of all uname information.  Some folks have
+# way too much stuff there, so grab only the first 127.
+unam=`uname -a 2>/dev/null | cut -c1-127`
+if test "$unam" != "" ; then
+	AC_DEFINE_UNQUOTED(UNAME, "$unam")
+fi
+])
+dnl
+dnl
+dnl
+AC_DEFUN(wi_READLINE_WITH_NCURSES, [
+# Readline and Ncurses could both define "backspace".
+# Warn about this if we have both things in our definitions list.
+
+if test "$ac_cv_lib_readline" = yes && test "$ac_cv_lib_ncurses" = yes ; then
+
+AC_MSG_CHECKING(if readline and ncurses will link together)
+j="$LIBS"
+LIBS="-lreadline -lncurses"
+AC_TRY_LINK(,[
+readline("prompt");
+endwin();
+],k=yes,k=no)
+if test "$k" = no ; then
+	AC_MSG_RESULT(no)
+	# Remove '-lreadline' from LIBS.
+	LIBS=`echo $j | sed s/-lreadline//g`
+	ac_cv_lib_readline=no
+	AC_WARN([The versions of GNU readline and ncurses you have installed on this system
+can't be used together, because they use the same symbol, backspace. If
+possible, recompile one of the libraries with -Dbackspace=back_space, then
+re-run configure.])
+
+else
+	AC_MSG_RESULT(yes)
+	LIBS="$j"
+fi
+
+fi
+])
+dnl
+dnl
+dnl
+
+dnl AC_EXT_DAYLIGHT
+dnl Check for an external variable daylight. Stolen from w3c-libwww.
+AC_DEFUN(AC_EXT_DAYLIGHT,
+[ AC_MSG_CHECKING(int daylight variable)
+AC_TRY_COMPILE([#include <time.h>], [return daylight;],
+  have_daylight=yes,
+  have_daylight=no)
+AC_MSG_RESULT($have_daylight)
+])dnl
+
+dnl AC_EXT_TIMEZONE
+dnl Check for an external variable timezone. Stolen from tcl-8.0.
+AC_DEFUN(AC_EXT_TIMEZONE,
+[
+#
+# Its important to include time.h in this check, as some systems (like convex)
+# have timezone functions, etc.
+#
+have_timezone=no
+AC_MSG_CHECKING([long timezone variable])
+AC_TRY_COMPILE([#include <time.h>],
+        [extern long timezone;
+         timezone += 1;
+         exit (0);],
+        [have_timezone=yes
+         AC_MSG_RESULT(yes)],
+         AC_MSG_RESULT(no))
+
+#
+# On some systems (eg IRIX 6.2), timezone is a time_t and not a long.
+#
+if test "$have_timezone" = no; then
+   AC_MSG_CHECKING([time_t timezone variable])
+   AC_TRY_COMPILE([#include <time.h>],
+        [extern time_t timezone;
+         timezone += 1;
+         exit (0);],
+        [have_timezone=yes
+         AC_MSG_RESULT(yes)],
+         AC_MSG_RESULT(no))
+fi
+])dnl

configure.in

@@ -0,0 +1,288 @@
+dnl Process this file with aclocal ; automake -a ; autoconf to produce a 
+dnl working configure script.
+dnl
+dnl $Id$
+
+AC_INIT(simgear/bucket/newbucket.cxx)
+
+dnl Initialize the automake stuff
+AM_INIT_AUTOMAKE(SimGear, 0.0.8)
+
+dnl Checks for programs.
+AC_PROG_MAKE_SET
+AC_PROG_CC
+AC_PROG_CXX
+AC_PROG_RANLIB
+AC_PROG_INSTALL
+AC_PROG_LN_S
+
+if echo $includedir | egrep "simgear$" > /dev/null; then
+    echo "includedir is" $includedir "libdir is" $libdir
+else
+    includedir="${includedir}/simgear"
+    echo "includedir changed to" $includedir "libdir is" $libdir
+fi
+
+
+dnl Run configure in the gdbm subdir
+dnl AC_CONFIG_SUBDIRS( simgear/gdbm )
+
+
+dnl Specify if we want logging (testing build) or not (release build)
+# set logging default value
+# with_logging=yes
+AC_ARG_WITH(logging, [  --with-logging          Include logging output (default)])
+if test "x$with_logging" = "xno" ; then
+    AC_DEFINE(FG_NDEBUG)
+fi
+
+dnl specify if we are building with "checker"
+AC_ARG_WITH(efence, [  --with-efence           Specify if we are building with "electric-fence"])
+
+if test "x$with_efence" = "xyes" ; then
+    echo "Building with efence"
+    LIBS= "$LIBS -lefence"
+fi
+
+dnl Check for MS Windows environment
+AC_CHECK_HEADER(windows.h)
+
+dnl extra library and include directories
+EXTRA_DIRS="/usr/local /usr/local/plib /usr/X11R6"
+
+if test -d /opt/X11R6 ; then
+     EXTRA_DIRS="$EXTRA_DIRS /opt/X11R6"
+fi
+
+if test "x$ac_cv_header_windows_h" = "xyes" ; then
+    EXTRA_DIRS="${EXTRA_DIRS} `pwd`/Win32"
+# elif test `uname -s` = "SunOS" ; then
+#   EXTRA_DIRS="${EXTRA_DIRS} `pwd`/SunOS"
+fi
+wi_EXTRA_DIRS(no, ${EXTRA_DIRS})
+
+dnl Using AM_CONDITIONAL is a step out of the protected little 
+dnl automake fold so it is potentially dangerous.  But, we are
+dnl beginning to run into cases where the standard checks are not
+dnl enough.  AM_CONDITIONALS are then referenced to conditionally
+dnl build a Makefile.in from a Makefile.am which lets us define custom
+dnl includes, compile alternative source files, etc.
+
+dnl Enable serial support on Unix type systems
+AM_CONDITIONAL(ENABLE_UNIX_SERIAL, true)
+
+dnl Check for X11 (fancy)
+AC_PATH_XTRA
+
+dnl Checks for libraries.
+
+null_LIBS="$LIBS"
+
+AC_CHECK_LIB(m, cos)
+
+base_LIBS="$LIBS"
+
+AC_CHECK_LIB(socket, socket)
+AC_CHECK_LIB(X11, XCreateWindow)
+AC_CHECK_LIB(Xext, XShmCreateImage)
+AC_CHECK_LIB(Xi, XGetExtensionVersion)
+AC_CHECK_LIB(ICE, IceOpenConnection)
+AC_CHECK_LIB(SM, SmcOpenConnection)
+AC_CHECK_LIB(Xt, XtMalloc)
+AC_CHECK_LIB(Xmu, XmuLookupStandardColormap)
+
+dnl check for OpenGL related libraries
+
+if test "x$ac_cv_header_windows_h" != "xyes" ; then
+    dnl Reasonable stuff for non-windoze variants ... :-)
+
+    AC_CHECK_LIB(GLcore, glNewList)
+    if test "x$ac_cv_lib_GLcore_glNewList" = "xno" ; then
+	dnl if no GLcore, check for GL
+	AC_CHECK_LIB(GL, glNewList)
+	if test "x$ac_cv_lib_GL_glNewList" = "xno" ; then
+	    dnl if no GL, check for MesaGL
+	    AC_CHECK_LIB(MesaGL, glNewList)
+	fi
+    else
+	dnl if GLcore found, then also check for GL
+	AC_CHECK_LIB(GL, glXCreateContext)
+    fi
+
+    dnl if using mesa, check for xmesa.h
+    if test "x$ac_cv_lib_MesaGL_glNewList" = "xyes" ; then
+	AC_CHECK_HEADER(GL/xmesa.h)
+	if test "x$ac_cv_header_GL_xmesa_h" = "xyes"; then
+	    AC_DEFINE( XMESA )
+            AC_DEFINE( FX )
+        fi
+    fi
+
+    AC_CHECK_LIB(GLU, gluLookAt)
+    if test "x$ac_cv_lib_GLU_gluLookAt" = "xno" ; then
+	dnl if no GLU, check for MesaGLU
+	AC_CHECK_LIB(MesaGLU, gluLookAt)
+    fi
+
+    dnl check for glut
+    AC_CHECK_LIB(glut, glutGetModifiers)
+
+    dnl test for glutGameModeString, but avoid adding glut a second time into
+    dnl the list of libraries
+    save_LIBS="$LIBS"
+    AC_CHECK_LIB(glut, glutGameModeString)
+    LIBS="$save_LIBS"
+else
+    dnl Win32 is a little wierd because it has to try to handle the various
+    dnl winbloze-isms.  We'll just do this manually for now.
+
+    echo Win32 specific hacks...
+    AC_DEFINE(WIN32)
+
+    dnl force a failed check since we will be building under windoze
+    AM_CONDITIONAL(ENABLE_XMESA_FX, test "no" = "yes")
+
+    dnl just define these to true and hope for the best
+    ac_cv_lib_glut_glutGetModifiers="yes"
+    ac_cv_lib_glut_glutGameModeString="yes"
+
+    if test "x$with_sgi_opengl" = "xyes" ; then
+        echo "Building with glut.dll, glu.dll, and opengl.dll"
+	WIN32_GLUT=glut
+	WIN32_GLU=glu
+	WIN32_OPENGL=opengl
+    else 
+	echo "Building with glut32.dll, glu32.dll, and opengl32.dll"
+	WIN32_GLUT=glut32
+	WIN32_GLU=glu32
+	WIN32_OPENGL=opengl32
+    fi
+
+    LIBS="$LIBS -l${WIN32_GLUT} -l${WIN32_GLU} -l${WIN32_OPENGL}"
+    LIBS="$LIBS -luser32 -lgdi32"
+    echo "Will link apps with $LIBS"
+fi
+
+if test "x$ac_cv_lib_glut_glutGetModifiers" = "xno"; then
+    echo 
+    echo "Unable to find the necessary OpenGL or GLUT libraries."
+    echo "See config.log for automated test details and results ..."
+    exit 1
+fi
+
+if test "x$ac_cv_lib_glut_glutGameModeString" = "xno"; then
+    echo
+    echo "Your version of glut doesn't support game mode."
+    echo "You need to fetch and install the latest version of glut from:"
+    echo
+    echo "    http://reality.sgi.com/opengl/glut3/glut3.html"
+    exit 1
+fi
+
+opengl_LIBS="$LIBS"
+LIBS="$base_LIBS"
+
+AC_SUBST(base_LIBS)
+AC_SUBST(opengl_LIBS)
+
+AM_CONDITIONAL(HAVE_XWINDOWS, test "x$ac_cv_lib_X11_XCreateWindow" = "xyes" )
+
+dnl Check for "plib" without which we cannot go on
+AC_CHECK_HEADER(plib/pu.h)
+if test "x$ac_cv_header_plib_pu_h" != "xyes"; then
+    echo
+    echo "You *must* have the plib library installed on your system to build"
+    echo "the FGFS simulator!"
+    echo
+    echo "Please see README.plib for more details."
+    echo
+    echo "configure aborted."
+    exit
+fi
+
+dnl Check for system installed gdbm
+AC_CHECK_HEADER(gdbm.h)
+if test "x$ac_cv_header_gdbm_h" = "xyes"; then
+    AC_DEFINE( HAVE_GDBM )
+else
+    echo "no gdbm found, configuring and building."
+fi
+AM_CONDITIONAL(HAVE_GDBM, test "x$ac_cv_header_gdbm_h" = "xyes" )
+
+dnl Check for system installed zlib
+AC_CHECK_HEADER(zlib.h)
+if test "x$ac_cv_header_zlib_h" = "xyes"; then
+    AC_DEFINE( HAVE_ZLIB )
+else
+    echo "no zlib found, building."
+fi
+AM_CONDITIONAL(HAVE_ZLIB, test "x$ac_cv_header_zlib_h" = "xyes" )
+
+dnl Checks for header files.
+AC_HEADER_STDC
+AC_CHECK_HEADERS( \
+	fcntl.h getopt.h malloc.h memory.h stdlib.h sys/param.h sys/stat.h \
+        sys/time.h sys/timeb.h unistd.h windows.h winbase.h values.h )
+
+dnl Checks for typedefs, structures, and compiler characteristics.
+AC_C_CONST
+AC_TYPE_SIZE_T
+AC_HEADER_TIME
+AC_STRUCT_TM
+
+dnl Checks for library functions.
+AC_TYPE_SIGNAL
+AC_FUNC_VPRINTF
+AC_CHECK_FUNCS( ftime gettimeofday timegm memcpy bcopy mktime strstr rand \
+	random setitimer getitimer signal GetLocalTime rint getrusage )
+
+AM_CONFIG_HEADER(simgear/config.h)
+
+AC_OUTPUT( \
+	Makefile \
+	SimGear.spec \
+	simgear/Makefile \
+	simgear/version.h \
+	simgear/bucket/Makefile \
+	simgear/debug/Makefile \
+	simgear/gdbm/Makefile \
+	simgear/magvar/Makefile \
+	simgear/math/Makefile \
+	simgear/misc/Makefile \
+	simgear/screen/Makefile \
+	simgear/serial/Makefile \
+	simgear/xgl/Makefile \
+	simgear/zlib/Makefile \
+)
+
+AC_OUTPUT_COMMANDS([
+	if test "x$ac_cv_header_windows_h" = "xyes" ; then
+		cp simgear/gdbm/autoconf.h.cygwin32 simgear/gdbm/autoconf.h
+	fi
+])
+
+echo ""
+echo "Configure Summary"
+echo "================="
+
+echo "Prefix: $prefix"
+
+if test "x$with_logging" != "x"; then
+    echo "Debug messages: $with_logging"
+else
+    echo "Debug messages: yes"
+fi
+
+if test "x$with_efence" != "x"; then
+    echo "Electric fence: $with_efence"
+else
+    echo "Electric fence: no"
+fi
+
+if test "x$ac_cv_header_gdbm_h" != "xyes"; then
+   echo "Building gdbm"
+fi
+
+if test "x$ac_cv_header_zlib_h" != "xyes"; then
+   echo "Building zlib"
+fi

mksymlinks.sh

@@ -0,0 +1,42 @@
+#! /bin/sh
+
+echo ""
+echo "running $0 to rebuild simgear include links"
+
+# toast the old directory
+rm -rf src/simgear
+mkdir src/simgear
+mkdir src/simgear/bucket
+mkdir src/simgear/debug
+mkdir src/simgear/math
+mkdir src/simgear/misc
+mkdir src/simgear/screen
+mkdir src/simgear/serial
+mkdir src/simgear/xgl
+mkdir src/simgear/zlib
+
+# build new links
+ln -s ../include/compiler.h src/simgear/compiler.h
+ln -s ../include/constants.h src/simgear/constants.h
+ln -s ../include/fg_traits.hxx src/simgear/fg_traits.hxx
+ln -s ../include/fg_zlib.h src/simgear/fg_zlib.h
+ln -s ../include/version.h src/simgear/version.h
+
+ln -s ../../bucket/newbucket.hxx src/simgear/bucket/newbucket.hxx
+
+ln -s ../../debug/debug_types.h src/simgear/debug/debug_types.h
+ln -s ../../debug/logstream.hxx src/simgear/debug/logstream.hxx
+
+ln -s ../../math/fg_memory.h src/simgear/math/fg_memory.h
+ln -s ../../math/fg_types.hxx src/simgear/math/fg_types.hxx
+ln -s ../../math/point3d.hxx src/simgear/math/point3d.hxx
+ln -s ../../math/polar3d.hxx src/simgear/math/polar3d.hxx
+
+ln -s ../../misc/fgpath.hxx src/simgear/misc/fgpath.hxx
+ln -s ../../misc/fgstream.hxx src/simgear/misc/fgstream.hxx
+ln -s ../../misc/zfstream.hxx src/simgear/misc/zfstream.hxx
+
+ln -s ../../xgl/xgl.h src/simgear/xgl/xgl.h
+
+ln -s ../../zlib/zlib.h src/simgear/zlib/zlib.h
+ln -s ../../zlib/zconf.h src/simgear/zlib/zconf.h

simgear/Makefile.am

@@ -0,0 +1,38 @@
+if ENABLE_UNIX_SERIAL
+SERIAL_DIRS = serial
+else
+SERIAL_DIRS =
+endif
+
+if HAVE_GDBM
+GDBM_DIRS =
+else
+GDBM_DIRS = gdbm
+endif
+
+if HAVE_ZLIB
+ZLIB_DIRS =
+else
+ZLIB_DIRS = zlib
+endif
+
+METAR_DIRS =
+# METAR_DIRS = metar
+
+EXTRA_DIST = version.h.in
+
+include_HEADERS = compiler.h constants.h fg_traits.hxx fg_zlib.h version.h
+
+SUBDIRS = \
+	bucket \
+	debug \
+	$(GDBM_DIRS) \
+	magvar \
+	math \
+	$(METAR_DIRS) \
+	misc \
+	screen \
+	$(SERIAL_DIRS) \
+	xgl \
+	$(ZLIB_DIRS)
+

simgear/bucket/Makefile.am

@@ -0,0 +1,17 @@
+includedir = @includedir@/bucket
+
+lib_LIBRARIES = libsgbucket.a
+
+include_HEADERS = newbucket.hxx
+
+libsgbucket_a_SOURCES = newbucket.cxx
+
+# noinst_PROGRAMS = testbucket
+
+# testbucket_SOURCES = testbucket.cxx
+
+# testbucket_LDADD = \
+# 	$(top_builddir)/bucket/libsgbucket.a \
+# 	$(top_builddir)/misc/libsgmisc.a
+
+INCLUDES += -I$(top_builddir)

simgear/bucket/newbucket.cxx

@@ -0,0 +1,155 @@
+/**************************************************************************
+ * newbucket.hxx -- new bucket routines for better world modeling
+ *
+ * Written by Curtis L. Olson, started February 1999.
+ *
+ * Copyright (C) 1999  Curtis L. Olson - curt@flightgear.org
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ **************************************************************************/
+
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+
+#include <math.h>
+
+#include <simgear/misc/fgpath.hxx>
+
+#include "newbucket.hxx"
+
+
+// Build the path name for this bucket
+string FGBucket::gen_base_path() const {
+    // long int index;
+    int top_lon, top_lat, main_lon, main_lat;
+    char hem, pole;
+    char raw_path[256];
+
+    top_lon = lon / 10;
+    main_lon = lon;
+    if ( (lon < 0) && (top_lon * 10 != lon) ) {
+	top_lon -= 1;
+    }
+    top_lon *= 10;
+    if ( top_lon >= 0 ) {
+	hem = 'e';
+    } else {
+	hem = 'w';
+	top_lon *= -1;
+    }
+    if ( main_lon < 0 ) {
+	main_lon *= -1;
+    }
+    
+    top_lat = lat / 10;
+    main_lat = lat;
+    if ( (lat < 0) && (top_lat * 10 != lat) ) {
+	top_lat -= 1;
+    }
+    top_lat *= 10;
+    if ( top_lat >= 0 ) {
+	pole = 'n';
+    } else {
+	pole = 's';
+	top_lat *= -1;
+    }
+    if ( main_lat < 0 ) {
+	main_lat *= -1;
+    }
+
+    sprintf(raw_path, "%c%03d%c%02d/%c%03d%c%02d", 
+	    hem, top_lon, pole, top_lat, 
+	    hem, main_lon, pole, main_lat);
+
+    FGPath path( raw_path );
+
+    return path.str();
+}
+
+
+// find the bucket which is offset by the specified tile units in the
+// X & Y direction.  We need the current lon and lat to resolve
+// ambiguities when going from a wider tile to a narrower one above or
+// below.  This assumes that we are feeding in
+FGBucket fgBucketOffset( double dlon, double dlat, int dx, int dy ) {
+    FGBucket result( dlon, dlat );
+    double clat = result.get_center_lat() + dy * FG_BUCKET_SPAN;
+
+    // walk dy units in the lat direction
+    result.set_bucket( dlon, clat );
+
+    // find the lon span for the new latitude
+    double span = bucket_span( clat );
+
+    // walk dx units in the lon direction
+    double tmp = dlon + dx * span;
+    while ( tmp < -180.0 ) {
+	tmp += 360.0;
+    }
+    while ( tmp >= 180.0 ) {
+	tmp -= 360.0;
+    }
+    result.set_bucket( tmp, clat );
+
+    return result;
+}
+
+
+// calculate the offset between two buckets
+void fgBucketDiff( const FGBucket& b1, const FGBucket& b2, int *dx, int *dy ) {
+
+    // Latitude difference
+    double c1_lat = b1.get_center_lat();
+    double c2_lat = b2.get_center_lat();
+    double diff_lat = c2_lat - c1_lat;
+
+#ifdef HAVE_RINT
+    *dy = (int)rint( diff_lat / FG_BUCKET_SPAN );
+#else
+    if ( diff_lat > 0 ) {
+	*dy = (int)( diff_lat / FG_BUCKET_SPAN + 0.5 );
+    } else {
+	*dy = (int)( diff_lat / FG_BUCKET_SPAN - 0.5 );
+    }
+#endif
+
+    // longitude difference
+    double c1_lon = b1.get_center_lon();
+    double c2_lon = b2.get_center_lon();
+    double diff_lon = c2_lon - c1_lon;
+    double span;
+    if ( bucket_span(c1_lat) <= bucket_span(c2_lat) ) {
+	span = bucket_span(c1_lat);
+    } else {
+	span = bucket_span(c2_lat);
+    }
+
+#ifdef HAVE_RINT
+    *dx = (int)rint( diff_lon / span );
+#else
+    if ( diff_lon > 0 ) {
+	*dx = (int)( diff_lon / span + 0.5 );
+    } else {
+	*dx = (int)( diff_lon / span - 0.5 );
+    }
+#endif
+}
+
+

simgear/bucket/newbucket.hxx

@@ -0,0 +1,351 @@
+/**************************************************************************
+ * newbucket.hxx -- new bucket routines for better world modeling
+ *
+ * Written by Curtis L. Olson, started February 1999.
+ *
+ * Copyright (C) 1999  Curtis L. Olson - curt@flightgear.org
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ **************************************************************************/
+
+
+#ifndef _NEWBUCKET_HXX
+#define _NEWBUCKET_HXX
+
+#include <simgear/compiler.h>
+#include <simgear/constants.h>
+
+#ifdef FG_HAVE_STD_INCLUDES
+#  include <cmath>
+#  include <cstdio> // sprintf()
+#  include <iostream>
+#else
+#  include <math.h>
+#  include <stdio.h> // sprintf()
+#  include <iostream.h>
+#endif
+
+// I don't understand ... <math.h> or <cmath> should be included
+// already depending on how you defined FG_HAVE_STD_INCLUDES, but I
+// can go ahead and add this -- CLO
+#ifdef __MWERKS__
+#  include <math.h> // needed fabs()
+#endif
+
+#include STL_STRING
+
+FG_USING_STD(string);
+
+#if ! defined( FG_HAVE_NATIVE_SGI_COMPILERS )
+FG_USING_STD(ostream);
+#endif
+
+
+
+#define FG_BUCKET_SPAN      0.125   // 1/8 of a degree
+#define FG_HALF_BUCKET_SPAN 0.0625  // 1/2 of 1/8 of a degree = 1/16 = 0.0625
+
+class FGBucket;
+ostream& operator<< ( ostream&, const FGBucket& );
+bool operator== ( const FGBucket&, const FGBucket& );
+
+class FGBucket {
+
+private:
+    double cx, cy;  // centerpoint (lon, lat) in degrees of bucket
+    int lon;        // longitude index (-180 to 179)
+    int lat;        // latitude index (-90 to 89)
+    int x;          // x subdivision (0 to 7)
+    int y;          // y subdivision (0 to 7)
+
+public:
+    
+    // default constructor
+    FGBucket();
+
+    // create a bucket which would contain the specified lon/lat
+    FGBucket(const double lon, const double lat);
+
+    // create a bucket based on "long int" index
+    FGBucket(const long int bindex);
+
+    // create an impossible bucket if false
+    FGBucket(const bool is_good);
+
+    ~FGBucket();
+
+    // Set the bucket params for the specified lat and lon
+    void set_bucket( double dlon, double dlat );
+    void make_bad ( void );
+
+    // Generate the unique scenery tile index for this bucket
+    long int gen_index();
+    string gen_index_str() const;
+
+    // Build the path name for this bucket
+    string gen_base_path() const;
+
+    // return the center lon of a tile
+    double get_center_lon() const;
+
+    // return width of the tile
+    double get_width() const;
+
+    // return the center lat of a tile
+    double get_center_lat() const;
+
+    // return height of the tile
+    double get_height() const;
+
+    // Informational methods
+    inline int get_lon() const { return lon; }
+    inline int get_lat() const { return lat; }
+    inline int get_x() const { return x; }
+    inline int get_y() const { return y; }
+
+    // friends
+    friend ostream& operator<< ( ostream&, const FGBucket& );
+    friend bool operator== ( const FGBucket&, const FGBucket& );
+};
+
+
+// return the horizontal tile span factor based on latitude
+inline double bucket_span( double l ) {
+    if ( l >= 89.0 ) {
+	return 360.0;
+    } else if ( l >= 88.0 ) {
+	return 8.0;
+    } else if ( l >= 86.0 ) {
+	return 4.0;
+    } else if ( l >= 83.0 ) {
+	return 2.0;
+    } else if ( l >= 76.0 ) {
+	return 1.0;
+    } else if ( l >= 62.0 ) {
+	return 0.5;
+    } else if ( l >= 22.0 ) {
+	return 0.25;
+    } else if ( l >= -22.0 ) {
+	return 0.125;
+    } else if ( l >= -62.0 ) {
+	return 0.25;
+    } else if ( l >= -76.0 ) {
+	return 0.5;
+    } else if ( l >= -83.0 ) {
+	return 1.0;
+    } else if ( l >= -86.0 ) {
+	return 2.0;
+    } else if ( l >= -88.0 ) {
+	return 4.0;
+    } else if ( l >= -89.0 ) {
+	return 8.0;
+    } else {
+	return 360.0;
+    }
+}
+
+
+// Set the bucket params for the specified lat and lon
+inline void FGBucket::set_bucket( double dlon, double dlat ) {
+    //
+    // latitude first
+    //
+    double span = bucket_span( dlat );
+    double diff = dlon - (double)(int)dlon;
+
+    // cout << "diff = " << diff << "  span = " << span << endl;
+
+    if ( (dlon >= 0) || (fabs(diff) < FG_EPSILON) ) {
+	lon = (int)dlon;
+    } else {
+	lon = (int)dlon - 1;
+    }
+
+    // find subdivision or super lon if needed
+    if ( span < FG_EPSILON ) {
+	// polar cap
+	lon = 0;
+	x = 0;
+    } else if ( span <= 1.0 ) {
+	x = (int)((dlon - lon) / span);
+    } else {
+	if ( (dlon >= 0) || (fabs(diff) < FG_EPSILON) ) {
+	    lon = (int)( (int)(lon / span) * span);
+	} else {
+	    // cout << " lon = " << lon 
+	    //  << "  tmp = " << (int)((lon-1) / span) << endl;
+	    lon = (int)( (int)((lon + 1) / span) * span - span);
+	    if ( lon < -180 ) {
+		lon = -180;
+	    }
+	}
+	x = 0;
+    }
+
+    //
+    // then latitude
+    //
+    diff = dlat - (double)(int)dlat;
+
+    if ( (dlat >= 0) || (fabs(diff) < FG_EPSILON) ) {
+	lat = (int)dlat;
+    } else {
+	lat = (int)dlat - 1;
+    }
+    y = (int)((dlat - lat) * 8);
+}
+
+
+// default constructor
+inline FGBucket::FGBucket() {}
+
+
+// constructor for specified location
+inline FGBucket::FGBucket(const double dlon, const double dlat) {
+    set_bucket(dlon, dlat);
+}
+
+
+// create an impossible bucket if false
+inline FGBucket::FGBucket(const bool is_good) {
+    set_bucket(0.0, 0.0);
+    if ( !is_good ) {
+	lon = -1000;
+    }
+}
+    
+
+// Parse a unique scenery tile index and find the lon, lat, x, and y
+inline FGBucket::FGBucket(const long int bindex) {
+    long int index = bindex;
+
+    lon = index >> 14;
+    index -= lon << 14;
+    lon -= 180;
+    
+    lat = index >> 6;
+    index -= lat << 6;
+    lat -= 90;
+    
+    y = index >> 3;
+    index -= y << 3;
+
+    x = index;
+}
+
+
+// default destructor
+inline FGBucket::~FGBucket() {}
+
+
+// Generate the unique scenery tile index for this bucket
+// 
+// The index is constructed as follows:
+// 
+// 9 bits - to represent 360 degrees of longitude (-180 to 179)
+// 8 bits - to represent 180 degrees of latitude (-90 to 89)
+//
+// Each 1 degree by 1 degree tile is further broken down into an 8x8
+// grid.  So we also need:
+//
+// 3 bits - to represent x (0 to 7)
+// 3 bits - to represent y (0 to 7)
+
+inline long int FGBucket::gen_index() {
+    return ((lon + 180) << 14) + ((lat + 90) << 6) + (y << 3) + x;
+}
+
+inline string FGBucket::gen_index_str() const {
+    char tmp[20];
+    sprintf(tmp, "%ld", 
+	    (((long)lon + 180) << 14) + ((lat + 90) << 6) + (y << 3) + x);
+    return (string)tmp;
+}
+
+
+// return the center lon of a tile
+inline double FGBucket::get_center_lon() const {
+    double span = bucket_span( lat + y / 8.0 + FG_HALF_BUCKET_SPAN );
+
+    if ( span >= 1.0 ) {
+	return lon + span / 2.0;
+    } else {
+	return lon + x * span + span / 2.0;
+    }
+}
+
+
+// return the center lat of a tile
+inline double FGBucket::get_center_lat() const {
+    return lat + y / 8.0 + FG_HALF_BUCKET_SPAN;
+}
+
+
+// return width of the tile
+inline double FGBucket::get_width() const {
+    return bucket_span( get_center_lat() );
+}
+
+
+// return height of the tile
+inline double FGBucket::get_height() const {
+    return FG_BUCKET_SPAN;
+}
+
+
+// create an impossible bucket
+inline void FGBucket::make_bad( void ) {
+    set_bucket(0.0, 0.0);
+	lon = -1000;
+}
+    
+
+// offset a bucket struct by the specified tile units in the X & Y
+// direction
+FGBucket fgBucketOffset( double dlon, double dlat, int x, int y );
+
+
+// calculate the offset between two buckets
+void fgBucketDiff( const FGBucket& b1, const FGBucket& b2, int *dx, int *dy );
+
+
+/*
+// Given a lat/lon, fill in the local tile index array
+void fgBucketGenIdxArray(fgBUCKET *p1, fgBUCKET *tiles, int width, int height);
+*/
+
+
+inline ostream&
+operator<< ( ostream& out, const FGBucket& b )
+{
+    return out << b.lon << ":" << b.x << ", " << b.lat << ":" << b.y;
+}
+
+
+inline bool
+operator== ( const FGBucket& b1, const FGBucket& b2 )
+{
+    return ( b1.lon == b2.lon &&
+	     b1.lat == b2.lat &&
+	     b1.x == b2.x &&
+	     b1.y == b2.y );
+}
+
+
+#endif // _NEWBUCKET_HXX
+
+

simgear/compiler.h

@@ -0,0 +1,303 @@
+/**************************************************************************
+ * compiler.h -- C++ Compiler Portability Macros
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ **************************************************************************/
+
+#ifndef _COMPILER_H
+#define _COMPILER_H
+
+// What this file does.
+//  (1)  Defines macros for some STL includes which may be affected
+//       by file name length limitations.
+//  (2)  Defines macros for some features not supported by all C++ compilers.
+//  (3)  Defines 'explicit' as a null macro if the compiler doesn't support
+//       the explicit keyword.
+//  (4)  Defines 'typename' as a null macro if the compiler doesn't support
+//       the typename keyword.
+//  (5)  Defines bool, true and false if the compiler doesn't do so.
+//  (6)  Defines FG_EXPLICIT_FUNCTION_TMPL_ARGS if the compiler
+//       supports calling a function template by providing its template
+//       arguments explicitly.
+//  (7)  Defines FG_NEED_AUTO_PTR if STL doesn't provide auto_ptr<>.
+//  (8)  Defines FG_NO_ARROW_OPERATOR if the compiler is unable
+//       to support operator->() for iterators.
+//  (9)  Defines FG_USE_EXCEPTIONS if the compiler supports exceptions.
+//       Note: no FlightGear code uses exceptions.
+//  (10) Define FG_NAMESPACES if the compiler supports namespaces.
+//  (11) FG_MATH_FN_IN_NAMESPACE_STD -- not used??
+//  (12) Define FG_HAVE_STD if std namespace is supported.
+//  (13) Defines FG_CLASS_PARTIAL_SPECIALIZATION if the compiler 
+//       supports partial specialization of class templates.
+//  (14) Defines FG_HAVE_STD_INCLUDES to use ISO C++ Standard headers.
+//  (15) Defines FG_HAVE_STREAMBUF if <streambuf> of <streambuf.h> are present.
+//  (16) Define FG_MATH_EXCEPTION_CLASH if math.h defines an exception class
+//       that clashes with the one defined in <stdexcept>.
+
+#ifdef __GNUC__
+#  if __GNUC__ == 2 
+#    if __GNUC_MINOR__ < 8
+
+       // g++-2.7.x
+#      define STL_ALGORITHM  <algorithm>
+#      define STL_FUNCTIONAL <functional>
+#      define STL_IOMANIP    <iomanip.h>
+#      define STL_IOSTREAM   <iostream.h>
+#      define STL_FSTREAM    <fstream.h>
+#      define STL_STDEXCEPT  <stdexcept>
+#      define STL_STRING     <string>
+#      define STL_STRSTREAM  <strstream.h>
+
+#      define FG_NEED_AUTO_PTR
+#      define FG_NO_DEFAULT_TEMPLATE_ARGS
+#      define FG_INCOMPLETE_FUNCTIONAL
+#      define FG_NO_ARROW_OPERATOR
+
+#    elif __GNUC_MINOR__ >= 8
+
+       // g++-2.8.x and egcs-1.x
+#      define FG_EXPLICIT_FUNCTION_TMPL_ARGS
+#      define FG_NEED_AUTO_PTR
+#      define FG_MEMBER_TEMPLATES
+#      define FG_NAMESPACES
+#      define FG_HAVE_STD
+#      define FG_HAVE_STREAMBUF
+#      define FG_CLASS_PARTIAL_SPECIALIZATION
+
+#      define STL_ALGORITHM  <algorithm>
+#      define STL_FUNCTIONAL <functional>
+#      define STL_IOMANIP    <iomanip>
+#      define STL_IOSTREAM   <iostream>
+#      define STL_FSTREAM    <fstream>
+#      define STL_STDEXCEPT  <stdexcept>
+#      define STL_STRING     <string>
+#      define STL_STRSTREAM  <strstream>
+
+#    endif
+#  else
+#    error Time to upgrade. GNU compilers < 2.7 not supported
+#  endif
+#endif
+
+//
+// Metrowerks 
+//
+#if defined(__MWERKS__)
+/*
+  CodeWarrior compiler from Metrowerks, Inc.
+*/
+#  define FG_HAVE_TRAITS
+#  define FG_HAVE_STD_INCLUDES
+#  define FG_HAVE_STD
+#  define FG_NAMESPACES
+
+#  define STL_ALGORITHM  <algorithm>
+#  define STL_FUNCTIONAL <functional>
+#  define STL_IOMANIP    <iomanip>
+#  define STL_IOSTREAM   <iostream>
+#  define STL_FSTREAM    <fstream>
+#  define STL_STDEXCEPT  <stdexcept>
+#  define STL_STRING     <string>
+
+// Temp:
+#  define bcopy(from, to, n) memcpy(to, from, n)
+
+// -rp- please use FG_MEM_COPY everywhere !
+#  define FG_MEM_COPY(to,from,n) memcpy(to, from, n)
+
+// -dw- currently used glut has no game mode stuff
+#  define GLUT_WRONG_VERSION
+#endif
+
+//
+// Microsoft compilers.
+//
+#ifdef _MSC_VER
+#  if _MSC_VER == 1200 // msvc++ 6.0
+#    define FG_NAMESPACES
+#    define FG_HAVE_STD
+#    define FG_HAVE_STD_INCLUDES
+#    define FG_HAVE_STREAMBUF
+
+#    define STL_ALGORITHM  <algorithm>
+#    define STL_FUNCTIONAL <functional>
+#    define STL_IOMANIP    <iomanip>
+#    define STL_IOSTREAM   <iostream>
+#    define STL_FSTREAM    <fstream>
+#    define STL_STDEXCEPT  <stdexcept>
+#    define STL_STRING     <string>
+#    define STL_STRSTREAM  <strstream>
+
+#    pragma warning(disable: 4786) // identifier was truncated to '255' characters
+#    pragma warning(disable: 4244) // conversion from double to float
+#    pragma warning(disable: 4305) //
+
+#  elif _MSC_VER == 1100 // msvc++ 5.0
+#    error MSVC++ 5.0 still to be supported...
+#  else
+#    error What version of MSVC++ is this?
+#  endif
+#endif
+
+#ifdef __BORLANDC__
+# if defined(HAVE_SGI_STL_PORT)
+
+// Use quotes around long file names to get around Borland's include hackery
+
+#  define STL_ALGORITHM  "algorithm"
+#  define STL_FUNCTIONAL "functional"
+
+#  define FG_MATH_EXCEPTION_CLASH
+
+# else
+
+#  define STL_ALGORITHM  <algorithm>
+#  define STL_FUNCTIONAL <functional>
+#  define STL_IOMANIP    <iomanip>
+#  define STL_STDEXCEPT  <stdexcept>
+#  define STL_STRSTREAM  <strstream>
+
+#  define FG_INCOMPLETE_FUNCTIONAL
+
+# endif // HAVE_SGI_STL_PORT
+
+#  define STL_IOSTREAM   <iostream>
+#  define STL_FSTREAM    <fstream>
+#  define STL_STRING     <string>
+#  define FG_NO_DEFAULT_TEMPLATE_ARGS
+#  define FG_NAMESPACES
+// #  define FG_HAVE_STD
+
+#endif // __BORLANDC__
+
+//
+// Native SGI compilers
+//
+
+#if defined ( sgi ) && !defined( __GNUC__ )
+#  define FG_HAVE_NATIVE_SGI_COMPILERS
+
+#  define FG_EXPLICIT_FUNCTION_TMPL_ARGS
+#  define FG_NEED_AUTO_PTR
+#  define FG_MEMBER_TEMPLATES
+#  define FG_NAMESPACES
+#  define FG_HAVE_STD
+#  define FG_CLASS_PARTIAL_SPECIALIZATION
+
+#  define STL_ALGORITHM  <algorithm>
+#  define STL_FUNCTIONAL <functional>
+#  define STL_IOMANIP    <iomanip.h>
+#  define STL_IOSTREAM   <iostream.h>
+#  define STL_FSTREAM    <fstream.h>
+#  define STL_STDEXCEPT  <stdexcept>
+#  define STL_STRING     <string>
+#  define STL_STRSTREAM  <strstream>
+
+#endif // Native SGI compilers
+
+
+#if defined ( sun )
+#  include <strings.h>
+#  include <memory.h>
+#  if defined ( __cplusplus )
+     // typedef unsigned int size_t;
+     extern "C" {
+       extern void *memmove(void *, const void *, size_t);
+     }
+#  else
+     extern void *memmove(void *, const void *, size_t);
+#  endif // __cplusplus
+#endif // sun
+
+//
+// No user modifiable definitions beyond here.
+//
+
+#ifdef FG_NEED_EXPLICIT
+#  define explicit
+#endif
+
+#ifdef FG_NEED_TYPENAME
+#  define typename
+#endif
+
+#ifdef FG_NEED_MUTABLE
+#  define mutable
+#endif
+
+#ifdef FG_NEED_BOOL
+   typedef int bool;
+#  define true 1
+#  define false 0
+#endif
+
+#ifdef FG_EXPLICIT_FUNCTION_TMPL_ARGS
+#  define FG_NULL_TMPL_ARGS <>
+#else
+#  define FG_NULL_TMPL_ARGS
+#endif
+
+#ifdef FG_CLASS_PARTIAL_SPECIALIZATION
+# define FG_TEMPLATE_NULL template<>
+#else
+# define FG_TEMPLATE_NULL
+#endif
+
+// FG_NO_NAMESPACES is a hook so that users can disable namespaces
+// without having to edit library headers.
+#if defined(FG_NAMESPACES) && !defined(FG_NO_NAMESPACES)
+#   define FG_NAMESPACE(X) namespace X {
+#   define FG_NAMESPACE_END }
+#   define FG_USING_NAMESPACE(X) using namespace X
+# else
+#   define FG_NAMESPACE(X)
+#   define FG_NAMESPACE_END
+#   define FG_USING_NAMESPACE(X)
+#endif
+
+# ifdef FG_HAVE_STD
+#  define FG_USING_STD(X) using std::X
+#  define STD std
+# else
+#  define FG_USING_STD(X) 
+#  define STD
+# endif
+
+// Additional <functional> implementation from SGI STL 3.11
+// Adapter function objects: pointers to member functions
+#ifdef FG_INCOMPLETE_FUNCTIONAL
+
+template <class _Ret, class _Tp>
+class const_mem_fun_ref_t
+#ifndef __BORLANDC__
+    : public unary_function<_Tp,_Ret>
+#endif // __BORLANDC__
+{
+public:
+  explicit const_mem_fun_ref_t(_Ret (_Tp::*__pf)() const) : _M_f(__pf) {}
+  _Ret operator()(const _Tp& __r) const { return (__r.*_M_f)(); }
+private:
+  _Ret (_Tp::*_M_f)() const;
+};
+
+template <class _Ret, class _Tp>
+inline const_mem_fun_ref_t<_Ret,_Tp> mem_fun_ref(_Ret (_Tp::*__f)() const)
+  { return const_mem_fun_ref_t<_Ret,_Tp>(__f); }
+
+#endif // FG_INCOMPLETE_FUNCTIONAL
+
+#endif // _COMPILER_H

simgear/config.h.in

@@ -0,0 +1,211 @@
+/* simgear/config.h.in.  Generated automatically from configure.in by autoheader.  */
+
+/* Define to empty if the keyword does not work.  */
+#undef const
+
+/* Define if you don't have vprintf but do have _doprnt.  */
+#undef HAVE_DOPRNT
+
+/* Define if you have the vprintf function.  */
+#undef HAVE_VPRINTF
+
+/* Define as the return type of signal handlers (int or void).  */
+#undef RETSIGTYPE
+
+/* Define to `unsigned' if <sys/types.h> doesn't define.  */
+#undef size_t
+
+/* Define if you have the ANSI C header files.  */
+#undef STDC_HEADERS
+
+/* Define if you can safely include both <sys/time.h> and <time.h>.  */
+#undef TIME_WITH_SYS_TIME
+
+/* Define if your <sys/time.h> declares struct tm.  */
+#undef TM_IN_SYS_TIME
+
+/* Define if the X Window System is missing or not being used.  */
+#undef X_DISPLAY_MISSING
+
+/* Define to empty if the keyword does not work.  */
+#undef const
+
+   
+/* Define to eliminate all trace of debugging messages such as for a 
+   release build */
+#undef FG_NDEBUG
+
+   
+/* Define to enable 3dfx/glide render in a window hack under unix.
+   This probably won't work under windows. */
+#undef XMESA
+#undef FX
+
+/* Define if you don't have vprintf but do have _doprnt.  */
+#undef HAVE_DOPRNT
+
+/* Define if you have the vprintf function.  */
+#undef HAVE_VPRINTF
+
+/* Define if you have gdbm installed system wide.  */
+#undef HAVE_GDBM
+
+/* Define if you have zlib installed system wide.  */
+#undef HAVE_ZLIB
+
+/* Define as the return type of signal handlers (int or void).  */
+#undef RETSIGTYPE
+
+/* Define to `unsigned' if <sys/types.h> doesn't define.  */
+#undef size_t
+
+/* Define if you have the ANSI C header files.  */
+#undef STDC_HEADERS
+
+/* Define if you can safely include both <sys/time.h> and <time.h>.  */
+#undef TIME_WITH_SYS_TIME
+
+/* Define if your <sys/time.h> declares struct tm.  */
+#undef TM_IN_SYS_TIME
+
+/* Define if compiling on a Winbloze (95, NT, etc.) platform */
+#undef WIN32
+
+/* Define if the X Window System is missing or not being used.  */
+#undef X_DISPLAY_MISSING
+
+/* Define if you have the GetLocalTime function.  */
+#undef HAVE_GETLOCALTIME
+
+/* Define if you have the bcopy function.  */
+#undef HAVE_BCOPY
+
+/* Define if you have the ftime function.  */
+#undef HAVE_FTIME
+
+/* Define if you have the getitimer function.  */
+#undef HAVE_GETITIMER
+
+/* Define if you have the getrusage function.  */
+#undef HAVE_GETRUSAGE
+
+/* Define if you have the gettimeofday function.  */
+#undef HAVE_GETTIMEOFDAY
+
+/* Define if you have the memcpy function.  */
+#undef HAVE_MEMCPY
+
+/* Define if you have the mktime function.  */
+#undef HAVE_MKTIME
+
+/* Define if you have the rand function.  */
+#undef HAVE_RAND
+
+/* Define if you have the random function.  */
+#undef HAVE_RANDOM
+
+/* Define if you have the rint function.  */
+#undef HAVE_RINT
+
+/* Define if you have the setitimer function.  */
+#undef HAVE_SETITIMER
+
+/* Define if you have the signal function.  */
+#undef HAVE_SIGNAL
+
+/* Define if you have the strstr function.  */
+#undef HAVE_STRSTR
+
+/* Define if you have the timegm function.  */
+#undef HAVE_TIMEGM
+
+/* Define if you have the <fcntl.h> header file.  */
+#undef HAVE_FCNTL_H
+
+/* Define if you have the <getopt.h> header file.  */
+#undef HAVE_GETOPT_H
+
+/* Define if you have the <malloc.h> header file.  */
+#undef HAVE_MALLOC_H
+
+/* Define if you have the <memory.h> header file.  */
+#undef HAVE_MEMORY_H
+
+/* Define if you have the <stdlib.h> header file.  */
+#undef HAVE_STDLIB_H
+
+/* Define if you have the <sys/param.h> header file.  */
+#undef HAVE_SYS_PARAM_H
+
+/* Define if you have the <sys/stat.h> header file.  */
+#undef HAVE_SYS_STAT_H
+
+/* Define if you have the <sys/time.h> header file.  */
+#undef HAVE_SYS_TIME_H
+
+/* Define if you have the <sys/timeb.h> header file.  */
+#undef HAVE_SYS_TIMEB_H
+
+/* Define if you have the <unistd.h> header file.  */
+#undef HAVE_UNISTD_H
+
+/* Define if you have the <values.h> header file.  */
+#undef HAVE_VALUES_H
+
+/* Define if you have the <winbase.h> header file.  */
+#undef HAVE_WINBASE_H
+
+/* Define if you have the <windows.h> header file.  */
+#undef HAVE_WINDOWS_H
+
+/* Define if you have the GL library (-lGL).  */
+#undef HAVE_LIBGL
+
+/* Define if you have the GLU library (-lGLU).  */
+#undef HAVE_LIBGLU
+
+/* Define if you have the GLcore library (-lGLcore).  */
+#undef HAVE_LIBGLCORE
+
+/* Define if you have the ICE library (-lICE).  */
+#undef HAVE_LIBICE
+
+/* Define if you have the MesaGL library (-lMesaGL).  */
+#undef HAVE_LIBMESAGL
+
+/* Define if you have the MesaGLU library (-lMesaGLU).  */
+#undef HAVE_LIBMESAGLU
+
+/* Define if you have the SM library (-lSM).  */
+#undef HAVE_LIBSM
+
+/* Define if you have the X11 library (-lX11).  */
+#undef HAVE_LIBX11
+
+/* Define if you have the Xext library (-lXext).  */
+#undef HAVE_LIBXEXT
+
+/* Define if you have the Xi library (-lXi).  */
+#undef HAVE_LIBXI
+
+/* Define if you have the Xmu library (-lXmu).  */
+#undef HAVE_LIBXMU
+
+/* Define if you have the Xt library (-lXt).  */
+#undef HAVE_LIBXT
+
+/* Define if you have the glut library (-lglut).  */
+#undef HAVE_LIBGLUT
+
+/* Define if you have the m library (-lm).  */
+#undef HAVE_LIBM
+
+/* Define if you have the socket library (-lsocket).  */
+#undef HAVE_LIBSOCKET
+
+/* Name of package */
+#undef PACKAGE
+
+/* Version number of package */
+#undef VERSION
+

simgear/constants.h

@@ -0,0 +1,143 @@
+// constants.h -- various constant definitions
+//
+// Written by Curtis Olson, started February 2000.
+//
+// Copyright (C) 2000  Curtis L. Olson  - curt@flightgear.org
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _SUPPORTGEAR_CONSTANTS_H
+#define _SUPPORTGEAR_CONSTANTS_H
+
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <simgear/compiler.h>
+
+#ifdef FG_HAVE_STD_INCLUDES
+#  include <cmath>
+#else
+#  ifdef FG_MATH_EXCEPTION_CLASH
+#    define exception C_exception
+#  endif
+#  include <math.h>
+#endif
+
+
+// Make sure PI is defined in its various forms
+
+// PI, only PI, and nothing but PI
+#ifdef M_PI
+#  define  FG_PI    M_PI
+#else
+#  define  FG_PI    3.14159265358979323846
+#endif
+
+// 2 * PI
+#define FG_2PI      6.28318530717958647692
+
+// PI / 2
+#ifdef M_PI_2
+#  define  FG_PI_2  M_PI_2
+#else
+#  define  FG_PI_2  1.57079632679489661923
+#endif
+
+// PI / 4
+#define FG_PI_4     0.78539816339744830961
+
+#ifndef M_E
+#  define M_E     2.7182818284590452354
+#endif
+
+// ONE_SECOND is pi/180/60/60, or about 100 feet at earths' equator
+#define ONE_SECOND 4.848136811E-6
+
+
+// Radius of Earth in kilometers at the equator.  Another source had
+// 6378.165 but this is probably close enough
+#define EARTH_RAD 6378.155
+
+
+// Earth parameters for WGS 84, taken from LaRCsim/ls_constants.h
+
+// Value of earth radius from [8]
+#define EQUATORIAL_RADIUS_FT 20925650.    // ft
+#define EQUATORIAL_RADIUS_M   6378138.12  // meter
+// Radius squared
+#define RESQ_FT 437882827922500.          // ft
+#define RESQ_M   40680645877797.1344      // meter
+
+// Value of earth flattening parameter from ref [8] 
+//
+//      Note: FP = f
+//            E  = 1-f
+//            EPS = sqrt(1-(1-f)^2)
+//
+              
+#define FP    0.003352813178
+#define E     0.996647186
+#define EPS   0.081819221
+#define INVG  0.031080997
+
+// Time Related Parameters
+
+#define MJD0  2415020.0
+#define J2000 (2451545.0 - MJD0)
+#define SIDRATE         .9972695677
+
+
+// Conversions
+
+// Degrees to Radians
+#define DEG_TO_RAD       0.017453292          // deg*pi/180 = rad
+
+// Radians to Degrees
+#define RAD_TO_DEG       57.29577951          // rad*180/pi = deg
+
+// Arc seconds to radians                     // (arcsec*pi)/(3600*180) = rad
+#define ARCSEC_TO_RAD    4.84813681109535993589e-06 
+
+// Radians to arc seconds                     // (rad*3600*180)/pi = arcsec
+#define RAD_TO_ARCSEC    206264.806247096355156
+
+// Feet to Meters
+#define FEET_TO_METER    0.3048
+
+// Meters to Feet
+#define METER_TO_FEET    3.28083989501312335958  
+
+// Meters to Nautical Miles, 1 nm = 6076.11549 feet
+#define METER_TO_NM      0.00053995680
+
+// Nautical Miles to Meters
+#define NM_TO_METER      1852.0000
+
+// Radians to Nautical Miles, 1 nm = 1/60 of a degree
+#define NM_TO_RAD        0.00029088820866572159
+
+// Nautical Miles to Radians
+#define RAD_TO_NM        3437.7467707849392526
+
+// For divide by zero avoidance, this will be close enough to zero
+#define FG_EPSILON 0.0000001
+
+
+#endif // _SUPPORTGEAR_CONSTANTS_H

simgear/debug/Makefile.am

@@ -0,0 +1,11 @@
+includedir = @includedir@/debug
+
+EXTRA_DIST = logtest.cxx
+
+lib_LIBRARIES = libsgdebug.a
+
+include_HEADERS = debug_types.h logstream.hxx
+
+libsgdebug_a_SOURCES = logstream.cxx
+
+INCLUDES += -I$(top_builddir)

simgear/debug/debug_types.h

@@ -0,0 +1,38 @@
+// NB: To add a dbg_class, add it here, and add it to the structure in
+// fg_debug.c
+
+typedef enum {
+    FG_NONE      = 0x00000000,
+
+    FG_TERRAIN   = 0x00000001,
+    FG_ASTRO     = 0x00000002,
+    FG_FLIGHT    = 0x00000004,
+    FG_INPUT     = 0x00000008,
+    FG_GL        = 0x00000010,
+    FG_VIEW      = 0x00000020,
+    FG_COCKPIT   = 0x00000040,
+    FG_GENERAL   = 0x00000080,
+    FG_MATH      = 0x00000100,
+    FG_EVENT     = 0x00000200,
+    FG_AIRCRAFT  = 0x00000400,
+    FG_AUTOPILOT = 0x00000800,
+    FG_IO        = 0x00001000,
+    FG_CLIPPER   = 0x00002000,
+    FG_NETWORK   = 0x00004000,
+    FG_UNDEFD    = 0x00008000, // For range checking
+
+    FG_ALL     = 0xFFFFFFFF
+} fgDebugClass;
+
+
+// NB: To add a priority, add it here.
+typedef enum {
+    FG_BULK,	    // For frequent messages
+    FG_DEBUG, 	    // Less frequent debug type messages
+    FG_INFO,        // Informatory messages
+    FG_WARN,	    // Possible impending problem
+    FG_ALERT       // Very possible impending problem
+    // FG_EXIT,        // Problem (no core)
+    // FG_ABORT        // Abandon ship (core)
+} fgDebugPriority;
+

simgear/debug/logstream.cxx

@@ -0,0 +1,63 @@
+// Stream based logging mechanism.
+//
+// Written by Bernie Bright, 1998
+//
+// Copyright (C) 1998  Bernie Bright - bbright@c031.aone.net.au
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+#include "logstream.hxx"
+
+bool            logbuf::logging_enabled = true;
+fgDebugClass    logbuf::logClass        = FG_NONE;
+fgDebugPriority logbuf::logPriority     = FG_INFO;
+streambuf*      logbuf::sbuf            = NULL;
+
+logbuf::logbuf()
+{
+//     if ( sbuf == NULL )
+// 	sbuf = cerr.rdbuf();
+}
+
+logbuf::~logbuf()
+{
+    if ( sbuf )
+	    sync();
+}
+
+void
+logbuf::set_sb( streambuf* sb )
+{
+    if ( sbuf )
+	    sync();
+
+    sbuf = sb;
+}
+
+void
+logbuf::set_log_level( fgDebugClass c, fgDebugPriority p )
+{
+    logClass = c;
+    logPriority = p;
+}
+
+void
+logstream::setLogLevels( fgDebugClass c, fgDebugPriority p )
+{
+    logbuf::set_log_level( c, p );
+}
+

simgear/debug/logstream.hxx

@@ -0,0 +1,220 @@
+// Stream based logging mechanism.
+//
+// Written by Bernie Bright, 1998
+//
+// Copyright (C) 1998  Bernie Bright - bbright@c031.aone.net.au
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+#ifndef _LOGSTREAM_H
+#define _LOGSTREAM_H
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+
+#include <simgear/compiler.h>
+
+#ifdef FG_HAVE_STD_INCLUDES
+# include <streambuf>
+# include <iostream>
+#else
+# include <iostream.h>
+# include <simgear/fg_traits.hxx>
+#endif
+
+#include <simgear/debug/debug_types.h>
+
+#ifndef FG_HAVE_NATIVE_SGI_COMPILERS
+FG_USING_STD(streambuf);
+FG_USING_STD(ostream);
+FG_USING_STD(cerr);
+FG_USING_STD(endl);
+#endif
+
+#ifdef __MWERKS__
+#  define cerr std::cerr
+#  define endl std::endl
+FG_USING_STD(iostream);
+#endif
+
+//
+// TODO:
+//
+// 1. Change output destination. Done.
+// 2. Make logbuf thread safe.
+// 3. Read environment for default debugClass and debugPriority.
+//
+
+//-----------------------------------------------------------------------------
+//
+// logbuf is an output-only streambuf with the ability to disable sets of
+// messages at runtime. Only messages with priority >= logbuf::logPriority
+// and debugClass == logbuf::logClass are output.
+//
+class logbuf : public streambuf
+{
+public:
+
+#ifndef FG_HAVE_STD_INCLUDES
+    typedef char_traits<char>           traits_type;
+    typedef char_traits<char>::int_type int_type;
+    typedef char_traits<char>::pos_type pos_type;
+    typedef char_traits<char>::off_type off_type;
+#endif
+//     logbuf( streambuf* sb ) : sbuf(sb) {}
+    logbuf();
+    ~logbuf();
+
+    // Is logging enabled?
+    bool enabled() { return logging_enabled; }
+
+    // Set the logging level of subsequent messages.
+    void set_log_state( fgDebugClass c, fgDebugPriority p );
+
+    // Set the global logging level.
+    static void set_log_level( fgDebugClass c, fgDebugPriority p );
+
+    //
+    void set_sb( streambuf* sb );
+
+protected:
+
+    inline virtual int sync();
+    int_type overflow( int ch );
+//     int xsputn( const char* s, istreamsize n );
+
+private:
+
+    // The streambuf used for actual output. Defaults to cerr.rdbuf().
+    static streambuf* sbuf;
+
+    static bool logging_enabled;
+    static fgDebugClass logClass;
+    static fgDebugPriority logPriority;
+
+private:
+
+    // Not defined.
+    logbuf( const logbuf& );
+    void operator= ( const logbuf& );
+};
+
+inline int
+logbuf::sync()
+{
+#ifdef FG_HAVE_STD_INCLUDES
+	return sbuf->pubsync();
+#else
+	return sbuf->sync();
+#endif
+}
+
+inline void
+logbuf::set_log_state( fgDebugClass c, fgDebugPriority p )
+{
+    logging_enabled = ((c & logClass) != 0 && p >= logPriority);
+}
+
+inline logbuf::int_type
+logbuf::overflow( int c )
+{
+    return logging_enabled ? sbuf->sputc(c) : (EOF == 0 ? 1: 0);
+}
+
+//-----------------------------------------------------------------------------
+//
+// logstream manipulator for setting the log level of a message.
+//
+struct loglevel
+{
+    loglevel( fgDebugClass c, fgDebugPriority p )
+	: logClass(c), logPriority(p) {}
+
+    fgDebugClass logClass;
+    fgDebugPriority logPriority;
+};
+
+//-----------------------------------------------------------------------------
+//
+// A helper class that ensures a streambuf and ostream are constructed and
+// destroyed in the correct order.  The streambuf must be created before the
+// ostream but bases are constructed before members.  Thus, making this class
+// a private base of logstream, declared to the left of ostream, we ensure the
+// correct order of construction and destruction.
+//
+struct logstream_base
+{
+//     logstream_base( streambuf* sb ) : lbuf(sb) {}
+    logstream_base() {}
+
+    logbuf lbuf;
+};
+
+//-----------------------------------------------------------------------------
+//
+// 
+//
+class logstream : private logstream_base, public ostream
+{
+public:
+    // The default is to send messages to cerr.
+    logstream( ostream& out )
+// 	: logstream_base(out.rdbuf()),
+	: logstream_base(),
+	  ostream(&lbuf) { lbuf.set_sb(out.rdbuf());}
+
+    void set_output( ostream& out ) { lbuf.set_sb( out.rdbuf() ); }
+
+    // Set the global log class and priority level.
+     void setLogLevels( fgDebugClass c, fgDebugPriority p );
+
+    // Output operator to capture the debug level and priority of a message.
+    inline ostream& operator<< ( const loglevel& l );
+};
+
+inline ostream&
+logstream::operator<< ( const loglevel& l )
+{
+    lbuf.set_log_state( l.logClass, l.logPriority );
+    return *this;
+}
+
+//-----------------------------------------------------------------------------
+//
+// Return the one and only logstream instance.
+// We use a function instead of a global object so we are assured that cerr
+// has been initialised.
+//
+inline logstream&
+fglog()
+{
+    static logstream logstrm( cerr );
+    return logstrm;
+}
+
+#ifdef FG_NDEBUG
+# define FG_LOG(C,P,M)
+#elif defined( __MWERKS__ )
+# define FG_LOG(C,P,M) ::fglog() << ::loglevel(C,P) << M << std::endl
+#else
+# define FG_LOG(C,P,M) fglog() << loglevel(C,P) << M << endl
+#endif
+
+#endif // _LOGSTREAM_H
+

simgear/debug/logtest.cxx

@@ -0,0 +1,34 @@
+#include <string>
+#include "Debug/logstream.hxx"
+
+int
+main( int argc, char* argv[] )
+{
+    fglog().setLogLevels( FG_ALL, FG_INFO );
+
+    FG_LOG( FG_TERRAIN, FG_BULK,  "terrain::bulk" ); // shouldnt appear
+    FG_LOG( FG_TERRAIN, FG_DEBUG, "terrain::debug" ); // shouldnt appear
+    FG_LOG( FG_TERRAIN, FG_INFO,  "terrain::info" );
+    FG_LOG( FG_TERRAIN, FG_WARN,  "terrain::warn" );
+    FG_LOG( FG_TERRAIN, FG_ALERT, "terrain::alert" );
+
+    int i = 12345;
+    long l = 54321L;
+    double d = 3.14159;
+    string s = "Hello world!";
+
+    FG_LOG( FG_EVENT, FG_INFO, "event::info "
+				 << "i=" << i
+				 << ", l=" << l
+				 << ", d=" << d
+	                         << ", d*l=" << d*l
+				 << ", s=\"" << s << "\"" );
+
+    // This shouldn't appear in log output:
+    FG_LOG( FG_EVENT, FG_DEBUG, "event::debug "
+	    << "- this should be seen - "
+	    << "d=" << d
+	    << ", s=\"" << s << "\"" );
+
+    return 0;
+}

simgear/ephemeris/Makefile.am

@@ -1,7 +1,8 @@
-noinst_LIBRARIES = libAstro.a
+noinst_LIBRARIES = libEphemeris.a
 
-libAstro_a_SOURCES = \
+libEphemeris_a_SOURCES = \
 	celestialBody.cxx celestialBody.hxx \
+	ephemeris.cxx ephemeris.hxx \
 	jupiter.cxx jupiter.hxx \
 	mars.cxx mars.hxx \
 	mercury.cxx mercury.hxx \
@@ -9,11 +10,9 @@ libAstro_a_SOURCES = \
 	neptune.cxx neptune.hxx \
 	pluto.hxx \
 	saturn.cxx saturn.hxx \
-	sky.cxx sky.hxx \
-	solarsystem.cxx solarsystem.hxx \
 	star.cxx star.hxx \
 	stars.cxx stars.hxx \
 	uranus.cxx uranus.hxx \
 	venus.cxx venus.hxx
 
-INCLUDES += -I$(top_builddir) -I$(top_builddir)/Lib -I$(top_builddir)/Simulator
+INCLUDES += -I$(top_builddir) -I$(top_builddir)/src

simgear/ephemeris/celestialBody.cxx

@@ -22,15 +22,17 @@
  * $Id$
  **************************************************************************/
 
-#include "celestialBody.hxx"
-#include "star.hxx"
-#include <Debug/logstream.hxx>
+#include <simgear/debug/logstream.hxx>
 
 #ifdef FG_MATH_EXCEPTION_CLASH
 #  define exception c_exception
 #endif
 #include <math.h>
 
+#include "celestialBody.hxx"
+#include "star.hxx"
+
+
 /**************************************************************************
  * void CelestialBody::updatePosition(fgTIME *t, Star *ourSun)
  *
@@ -85,8 +87,8 @@ void CelestialBody::updatePosition(FGTime *t, Star *ourSun)
   ze = yg * sin(ecl) + zg * cos(ecl);
   rightAscension = atan2(ye, xe);
   declination = atan2(ze, sqrt(xe*xe + ye*ye));
-  FG_LOG(FG_GENERAL, FG_INFO, "Planet found at : " 
-	 << rightAscension << " (ra), " << declination << " (dec)" );
+  /* FG_LOG(FG_GENERAL, FG_INFO, "Planet found at : " 
+	 << rightAscension << " (ra), " << declination << " (dec)" ); */
 
   //calculate some variables specific to calculating the magnitude 
   //of the planet

simgear/ephemeris/celestialBody.hxx

@@ -31,15 +31,16 @@
 #endif                                   
 
 
+#include <simgear/constants.h>
+
 #include <Time/fg_time.hxx>
-#include <Include/fg_constants.h>
 
 class Star;
 
 class CelestialBody
 {
-protected:              // make the data protected, in order to give the inherited
-                        // classes direct access to the data
+protected:              // make the data protected, in order to give the
+                        //  inherited classes direct access to the data
   double NFirst;       	/* longitude of the ascending node first part */
   double NSec;		/* longitude of the ascending node second part */
   double iFirst;       	/* inclination to the ecliptic first part */
@@ -71,8 +72,17 @@ public:
 		double af, double as,
 		double ef, double es,
 		double Mf, double Ms, FGTime *t);
+  CelestialBody(double Nf, double Ns,
+		double If, double Is,
+		double wf, double ws,
+		double af, double as,
+		double ef, double es,
+		double Mf, double Ms);
   void getPos(double *ra, double *dec);
   void getPos(double *ra, double *dec, double *magnitude);
+  double getRightAscension();
+  double getDeclination();
+  double getMagnitude();
   double getLon();
   double getLat(); 
   void updatePosition(FGTime *t, Star *ourSun);
@@ -114,6 +124,21 @@ inline CelestialBody::CelestialBody(double Nf, double Ns,
   updateOrbElements(t);
 };
 
+inline CelestialBody::CelestialBody(double Nf, double Ns,
+				    double If, double Is,
+				    double wf, double ws,
+				    double af, double as,
+				    double ef, double es,
+				    double Mf, double Ms)
+{
+  NFirst = Nf;     NSec = Ns;
+  iFirst = If;     iSec = Is;
+  wFirst = wf;     wSec = ws;
+  aFirst = af;     aSec = as;
+  eFirst = ef;     eSec = es;
+  MFirst = Mf;     MSec = Ms;
+};
+
 /****************************************************************************
  * inline void CelestialBody::updateOrbElements(FGTime *t)
  * given the current time, this private member calculates the actual 
@@ -170,6 +195,10 @@ inline void CelestialBody::getPos(double* ra, double* dec, double* magn)
   *magn = magnitude;
 }
 
+inline double CelestialBody::getRightAscension() { return rightAscension; }
+inline double CelestialBody::getDeclination() { return declination; }
+inline double CelestialBody::getMagnitude() { return magnitude; }
+
 inline double CelestialBody::getLon()
 {
   return lonEcl;

simgear/ephemeris/ephemeris.cxx

@@ -0,0 +1,82 @@
+// ephemeris.cxx -- Top level class for calculating current positions of
+//                  astronomical objects
+//
+// Written by Curtis Olson, started March 2000.
+//
+// Copyright (C) 2000  Curtis L. Olson - curt@flightgear.org
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#include "ephemeris.hxx"
+
+
+// Constructor
+FGEphemeris::FGEphemeris( const string &path ) {
+    our_sun = new Star;
+    moon = new Moon;
+    mercury = new Mercury;
+    venus = new Venus;
+    mars = new Mars;
+    jupiter = new Jupiter;
+    saturn = new Saturn;
+    uranus = new Uranus;
+    neptune = new Neptune;
+    stars = new FGStars( FGPath(path) );
+}
+
+
+// Destructor
+FGEphemeris::~FGEphemeris( void ) {
+    delete our_sun;
+    delete moon;
+    delete mercury;
+    delete venus;
+    delete mars;
+    delete jupiter;
+    delete saturn;
+    delete uranus;
+    delete neptune;
+    delete stars;
+}
+
+
+// Update (recalculate) the positions of all objects for the specified
+// time
+void FGEphemeris::update( FGTime *t, double lat ) {
+    // update object positions
+    our_sun->updatePosition( t );
+    moon->updatePosition( t, lat, our_sun );
+    mercury->updatePosition( t, our_sun );
+    venus->updatePosition( t, our_sun );
+    mars->updatePosition( t, our_sun );
+    jupiter->updatePosition( t, our_sun );
+    saturn->updatePosition( t, our_sun );
+    uranus->updatePosition( t, our_sun );
+    neptune->updatePosition( t, our_sun );
+
+    // update planets list
+    nplanets = 7;
+    mercury->getPos( &planets[0][0], &planets[0][1], &planets[0][2] );
+    venus  ->getPos( &planets[1][0], &planets[1][1], &planets[1][2] );
+    mars   ->getPos( &planets[2][0], &planets[2][1], &planets[2][2] );
+    jupiter->getPos( &planets[3][0], &planets[3][1], &planets[3][2] );
+    saturn ->getPos( &planets[4][0], &planets[4][1], &planets[4][2] );
+    uranus ->getPos( &planets[5][0], &planets[5][1], &planets[5][2] );
+    neptune->getPos( &planets[6][0], &planets[6][1], &planets[6][2] );
+}
+

simgear/ephemeris/ephemeris.hxx

@@ -0,0 +1,112 @@
+// ephemeris.hxx -- Top level class for calculating current positions of
+//                  astronomical objects
+//
+// Written by Curtis Olson, started March 2000.
+//
+// Copyright (C) 2000  Curtis L. Olson - curt@flightgear.org
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _EPHEMERIS_HXX
+#define _EPHEMERIS_HXX
+
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <plib/sg.h>
+
+#include <Time/fg_time.hxx>
+
+#include "star.hxx"
+#include "moon.hxx"
+#include "mercury.hxx"
+#include "venus.hxx"
+#include "mars.hxx"
+#include "jupiter.hxx"
+#include "saturn.hxx"
+#include "uranus.hxx"
+#include "neptune.hxx"
+#include "stars.hxx"
+
+
+class FGEphemeris {
+
+    Star *our_sun;
+    Moon *moon;
+    Mercury *mercury;
+    Venus *venus;
+    Mars *mars;
+    Jupiter *jupiter;
+    Saturn *saturn;
+    Uranus *uranus;
+    Neptune *neptune;
+
+    // 9 planets, minus earth, minus pluto which we don't draw = 7
+    // planets[i][0] = Right Ascension
+    // planets[i][1] = Declination
+    // planets[i][2] = Magnitude
+    int nplanets;
+    sgdVec3 planets[7];
+
+    FGStars *stars;
+
+public:
+
+    // Constructor
+    FGEphemeris( const string &path );
+
+    // Destructor
+    ~FGEphemeris( void );
+
+    // Update (recalculate) the positions of all objects for the
+    // specified time
+    void update(FGTime *t, double lat);
+
+    // sun
+    inline Star *get_sun() const { return our_sun; }
+    inline double getSunRightAscension() const {
+	return our_sun->getRightAscension();
+    }
+    inline double getSunDeclination() const {
+	return our_sun->getDeclination();
+    }
+
+    // moon
+    inline Moon *get_moon() const { return moon; }
+    inline double getMoonRightAscension() const {
+	return moon->getRightAscension();
+    }
+    inline double getMoonDeclination() const {
+	return moon->getDeclination();
+    }
+
+    // planets
+    inline int getNumPlanets() const { return nplanets; }
+    inline sgdVec3 *getPlanets() { return planets; }
+
+    // planets
+    inline int getNumStars() const { return stars->getNumStars(); }
+    inline sgdVec3 *getStars() { return stars->getStars(); }
+};
+
+
+#endif // _EPHEMERIS_HXX
+
+

simgear/ephemeris/jupiter.cxx

@@ -47,6 +47,16 @@ Jupiter::Jupiter(FGTime *t) :
 {
 }
 
+Jupiter::Jupiter() :
+  CelestialBody(100.4542,  2.7685400E-5,	
+		1.3030,   -1.557E-7,
+		273.8777,  1.6450500E-5,
+		5.2025600, 0.000000,
+		0.048498,  4.469E-9,
+		19.89500,  0.08308530010)
+{
+}
+
 /*************************************************************************
  * void Jupiter::updatePosition(FGTime *t, Star *ourSun)
  * 

simgear/ephemeris/jupiter.hxx

@@ -32,6 +32,7 @@ class Jupiter : public CelestialBody
 {
 public:
   Jupiter (FGTime *t);
+  Jupiter ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/ephemeris/mars.cxx

@@ -45,6 +45,15 @@ Mars::Mars(FGTime *t) :
 		18.60210,  0.52402077660, t)
 {
 }
+Mars::Mars() :
+  CelestialBody(49.55740,  2.1108100E-5,
+		1.8497,   -1.78E-8,
+		286.5016,  2.9296100E-5,
+		1.5236880, 0.000000,
+		0.093405,  2.516E-9,
+		18.60210,  0.52402077660)
+{
+}
 /*************************************************************************
  * void Mars::updatePosition(FGTime *t, Star *ourSun)
  * 

simgear/ephemeris/mars.hxx

@@ -32,6 +32,7 @@ class Mars : public CelestialBody
 {
 public:
   Mars ( FGTime *t);
+  Mars ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/ephemeris/mercury.cxx

@@ -45,6 +45,15 @@ Mercury::Mercury(FGTime *t) :
                   168.6562,  4.09233443680, t)
 {
 }
+Mercury::Mercury() :
+  CelestialBody (48.33130,   3.2458700E-5,
+                  7.0047,    5.00E-8,
+                  29.12410,  1.0144400E-5,
+                  0.3870980, 0.000000,
+                  0.205635,  5.59E-10,
+                  168.6562,  4.09233443680)
+{
+}
 /*************************************************************************
  * void Mercury::updatePosition(FGTime *t, Star *ourSun)
  * 

simgear/ephemeris/mercury.hxx

@@ -32,6 +32,7 @@ class Mercury : public CelestialBody
 {
 public:
   Mercury ( FGTime *t);
+  Mercury ();
   void updatePosition(FGTime *t, Star* ourSun);
 };
 

simgear/ephemeris/moon.cxx

@@ -22,14 +22,13 @@
  * $Id$
  **************************************************************************/
 
-#include <FDM/flight.hxx>
 
 #include <string.h>
-#include "moon.hxx"
 
-#include <Debug/logstream.hxx>
+#include <simgear/debug/logstream.hxx>
+#include <simgear/misc/fgpath.hxx>
+
 #include <Main/options.hxx>
-#include <Misc/fgpath.hxx>
 #include <Objects/texload.h>
 
 #ifdef __BORLANDC__
@@ -37,6 +36,10 @@
 #endif
 #include <math.h>
 
+#include <FDM/flight.hxx>
+
+#include "moon.hxx"
+
 
 /*************************************************************************
  * Moon::Moon(FGTime *t)
@@ -54,136 +57,21 @@ Moon::Moon(FGTime *t) :
 		0.054900,  0.000000,
 		115.3654,  13.0649929509, t)
 {
-  int width, height;
-  
-  FG_LOG( FG_GENERAL, FG_INFO, "Initializing Moon Texture");
-#ifdef GL_VERSION_1_1
-  xglGenTextures(1, &moon_texid);
-  xglBindTexture(GL_TEXTURE_2D, moon_texid);
-#elif GL_EXT_texture_object
-  xglGenTexturesEXT(1, &moon_texid);
-  xglBindTextureEXT(GL_TEXTURE_2D, moon_texid);
-#else
-#  error port me
-#endif
-
-  glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
-
-  // load in the texture data
-  FGPath tpath( current_options.get_fg_root() );
-  tpath.append( "Textures" );
-  tpath.append( "moon.rgb" );
-
-  if ( (moon_texbuf = read_rgb_texture(tpath.c_str(), &width, &height)) 
-       == NULL )
-  {
-    // Try compressed
-    FGPath fg_tpath = tpath;
-    fg_tpath.append( ".gz" );
-    if ( (moon_texbuf = read_rgb_texture(fg_tpath.c_str(), &width, &height)) 
-	 == NULL )
-    {
-	FG_LOG( FG_GENERAL, FG_ALERT, 
-		"Error in loading moon texture " << tpath.str() );
-	exit(-1);
-    } 
-  } 
-
-  glTexImage2D( GL_TEXTURE_2D,
-		0,
-		GL_RGB,
-		256, 256,
-		0,
-		GL_RGB, GL_UNSIGNED_BYTE,
-		moon_texbuf);
-
-  // setup the halo texture
-  FG_LOG( FG_GENERAL, FG_INFO, "Initializing Moon Texture");
-#ifdef GL_VERSION_1_1
-  xglGenTextures(1, &moon_halotexid);
-  xglBindTexture(GL_TEXTURE_2D, moon_halotexid);
-#elif GL_EXT_texture_object
-  xglGenTexturesEXT(1, &moon_halotexid);
-  xglBindTextureEXT(GL_TEXTURE_2D, moon_halotexid);
-#else
-#  error port me
-#endif
-
-  glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
-  setHalo();
-  glTexImage2D( GL_TEXTURE_2D,
-		0,
-		GL_RGBA,
-		256, 256,
-		0,
-		GL_RGBA, GL_UNSIGNED_BYTE,
-		moon_halotexbuf);
-  moonObject = gluNewQuadric();
 }
 
+Moon::Moon() :
+  CelestialBody(125.1228, -0.0529538083,
+		5.1454,    0.00000,
+		318.0634,  0.1643573223,
+		60.266600, 0.000000,
+		0.054900,  0.000000,
+		115.3654,  13.0649929509)
+{
+}
+
+
 Moon::~Moon()
 {
-  //delete moonObject;
-  delete moon_texbuf;
-  delete moon_halotexbuf;
-}
-
-
-static int texWidth = 256;	/* 64x64 is plenty */
-
-void Moon::setHalo()
-{
-  int texSize;
-  //void *textureBuf;
-  GLubyte *p;
-  int i,j;
-  double radius;
-  
-  texSize = texWidth*texWidth;
-  
-  moon_halotexbuf = new GLubyte[texSize*4];
-  if (!moon_halotexbuf) 
-    return;  // Ugly!
-  
-  p = moon_halotexbuf;
-  
-  radius = (double)(texWidth / 2);
-  
-  for (i=0; i < texWidth; i++) {
-    for (j=0; j < texWidth; j++) {
-      double x, y, d;
-	    
-      x = fabs((double)(i - (texWidth / 2)));
-      y = fabs((double)(j - (texWidth / 2)));
-
-      d = sqrt((x * x) + (y * y));
-      if (d < radius) 
-	{
-	  double t = 1.0 - (d / radius); // t is 1.0 at center, 0.0 at edge */
-	  // inverse square looks nice 
-	  *p = (int)((double)0xff * (t * t));
-	  *(p+1) = (int)((double) 0xff * (t*t));
-	  *(p+2) = (int)((double) 0xff * (t*t));
-	  *(p+3) = 0x11;
-	} 
-      else
-	{
-	  *p = 0x00;
-	  *(p+1) = 0x00;
-	  *(p+2) = 0x00;
-	  *(p+3) = 0x11;
-	}
-      p += 4;
-    }
-  }
-  //gluBuild2DMipmaps(GL_TEXTURE_2D, 1, texWidth, texWidth, 
-  //	    GL_LUMINANCE,
-  //	    GL_UNSIGNED_BYTE, textureBuf);
-  //free(textureBuf);
 }
 
 
@@ -193,7 +81,7 @@ void Moon::setHalo()
  * the position of the moon as seen from the current position on the surface
  * of the moon. 
  ****************************************************************************/
-void Moon::updatePosition(FGTime *t, Star *ourSun)
+void Moon::updatePosition(FGTime *t, double lat, Star *ourSun)
 {
   double 
     eccAnom, ecl, actTime,
@@ -258,7 +146,7 @@ void Moon::updatePosition(FGTime *t, Star *ourSun)
   r += (-0.58 * cos(M - 2*D)
 	-0.46 * cos(2*D)
 	);
-  FG_LOG(FG_GENERAL, FG_INFO, "Running moon update");
+  // FG_LOG(FG_GENERAL, FG_INFO, "Running moon update");
   xg = r * cos(lonEcl) * cos(latEcl);
   yg = r * sin(lonEcl) * cos(latEcl);
   zg = r *               sin(latEcl);
@@ -285,11 +173,11 @@ void Moon::updatePosition(FGTime *t, Star *ourSun)
   // FG_LOG( FG_GENERAL, FG_INFO, "r = " << r << " mpar = " << mpar );
   // FG_LOG( FG_GENERAL, FG_INFO, "lat = " << f->get_Latitude() );
 
-  gclat = f->get_Latitude() - 0.003358 * 
-      sin (2 * DEG_TO_RAD * f->get_Latitude() );
+  gclat = lat - 0.003358 * 
+      sin (2 * DEG_TO_RAD * lat );
   // FG_LOG( FG_GENERAL, FG_INFO, "gclat = " << gclat );
 
-  rho = 0.99883 + 0.00167 * cos(2 * DEG_TO_RAD * f->get_Latitude());
+  rho = 0.99883 + 0.00167 * cos(2 * DEG_TO_RAD * lat);
   // FG_LOG( FG_GENERAL, FG_INFO, "rho = " << rho );
   
   if (geoRa < 0)
@@ -309,92 +197,3 @@ void Moon::updatePosition(FGTime *t, Star *ourSun)
 	  "Ra = (" << (RAD_TO_DEG *rightAscension) 
 	  << "), Dec= (" << (RAD_TO_DEG *declination) << ")" ); */
 }
-
-
-/************************************************************************
- * void Moon::newImage()
- *
- * This function regenerates a new visual image of the moon, which is added to
- * solarSystem display list.
- *
- * Arguments: Right Ascension and declination
- *
- * return value: none
- **************************************************************************/
-void Moon::newImage()
-{
-  fgLIGHT *l = &cur_light_params;
-  float moon_angle = l->moon_angle;
-  
-  /*double x_2, x_4, x_8, x_10;
-  GLfloat ambient;
-  GLfloat amb[4];*/
-  int moonSize = 550;
-
-  GLfloat moonColor[4] = {0.85, 0.75, 0.35, 1.0};
-  GLfloat black[4] = {0.0, 0.0, 0.0, 1.0};
-  GLfloat white[4] = {1.0, 1.0, 1.0, 0.0};
-  
-  if( moon_angle*RAD_TO_DEG < 100 ) 
-    {
-      FG_LOG( FG_ASTRO, FG_INFO, "Generating Moon Image" );
-
-      xglPushMatrix();
-      {
-	xglRotatef(((RAD_TO_DEG * rightAscension)- 90.0), 0.0, 0.0, 1.0);
-	xglRotatef((RAD_TO_DEG * declination), 1.0, 0.0, 0.0);
-	
-	FG_LOG( FG_GENERAL, FG_INFO, 
-		"Ra = (" << (RAD_TO_DEG *rightAscension) 
-		<< "), Dec= (" << (RAD_TO_DEG *declination) << ")" );
-	xglTranslatef(0.0, 60000.0, 0.0);
-	glEnable(GL_BLEND);	// BLEND ENABLED
-
-	// Draw the halo...
-	if (current_options.get_textures())
-	  {
-	    glBlendFunc(GL_SRC_ALPHA, GL_ONE);
-	    glEnable(GL_TEXTURE_2D); // TEXTURE ENABLED
-	    glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);  
-	    glBindTexture(GL_TEXTURE_2D, moon_halotexid);
-	  
-	    glBegin(GL_QUADS);
-	    glTexCoord2f(0.0f, 0.0f); glVertex3f(-5000, 0.0, -5000);
-	    glTexCoord2f(1.0f, 0.0f); glVertex3f( 5000, 0.0, -5000);
-	    glTexCoord2f(1.0f, 1.0f); glVertex3f( 5000, 0.0,  5000);
-	    glTexCoord2f(0.0f, 1.0f); glVertex3f(-5000, 0.0,  5000);
-	    glEnd();
-	  }
-	
-	xglEnable(GL_LIGHTING);	// LIGHTING ENABLED
-	xglEnable( GL_LIGHT0 );
-	// set lighting parameters
-	xglLightfv(GL_LIGHT0, GL_AMBIENT, white );
-	xglLightfv(GL_LIGHT0, GL_DIFFUSE, white );
-	// Enable( GL_CULL_FACE );
-	xglMaterialfv(GL_FRONT, GL_AMBIENT, black);
-	xglMaterialfv(GL_FRONT, GL_DIFFUSE, moonColor); 
-	//glEnable(GL_TEXTURE_2D);
-	
-	glBlendFunc(GL_ONE, GL_ONE);
-	
-	//glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE); 
-	// Draw the moon-proper
-	
-	if (current_options.get_textures())
-	  {
-	    glBindTexture(GL_TEXTURE_2D, moon_texid);                         
-	    gluQuadricTexture(moonObject, GL_TRUE );
-	  }
-	gluSphere(moonObject,  moonSize, 12, 12 );
-	glDisable(GL_TEXTURE_2D); // TEXTURE DISABLED
-	glDisable(GL_BLEND);	// BLEND DISABLED
-      }
-      xglPopMatrix();
-      glDisable(GL_LIGHTING);	// Lighting Disabled.
-      
-    }
-  else
-    {
-    }
-}

simgear/ephemeris/moon.hxx

@@ -24,8 +24,10 @@
 #ifndef _MOON_HXX_
 #define _MOON_HXX_
 
+
+#include <simgear/constants.h>
+
 #include <Aircraft/aircraft.hxx>
-#include <Include/fg_constants.h>
 #include <Main/views.hxx>
 #include <Time/fg_time.hxx>
 
@@ -34,22 +36,27 @@
 
 class Moon : public CelestialBody
 {
-private:
-  void TexInit();  // This should move to the constructor eventually.
 
-  GLUquadricObj *moonObject;
-  GLuint Sphere;
-  GLuint moon_texid;
-  GLuint moon_halotexid;
-  GLubyte *moon_texbuf;
-  GLubyte *moon_halotexbuf;
+private:
+
+    // void TexInit();  // This should move to the constructor eventually.
+
+    // GLUquadricObj *moonObject;
+    // GLuint Sphere;
+    // GLuint moon_texid;
+    // GLuint moon_halotexid;
+    // GLubyte *moon_texbuf;
+    // GLubyte *moon_halotexbuf;
   
-  void setHalo();
+    // void setHalo();
+
 public:
-  Moon ( FGTime *t);
-  ~Moon();
-  void updatePosition(FGTime *t, Star *ourSun);
-  void newImage();
+
+    Moon( FGTime *t);
+    Moon();
+    ~Moon();
+    void updatePosition(FGTime *t, double lat, Star *ourSun);
+    // void newImage();
 };
 
 

simgear/ephemeris/neptune.cxx

@@ -45,6 +45,15 @@ Neptune::Neptune(FGTime *t) :
 		260.2471,   0.00599514700, t)
 {
 }
+Neptune::Neptune() :
+  CelestialBody(131.7806,   3.0173000E-5,
+		1.7700,	   -2.550E-7,
+		272.8461,  -6.027000E-6,	
+		30.058260,  3.313E-8,
+		0.008606,   2.150E-9,
+		260.2471,   0.00599514700)
+{
+}
 /*************************************************************************
  * void Neptune::updatePosition(FGTime *t, Star *ourSun)
  * 

simgear/ephemeris/neptune.hxx

@@ -32,6 +32,7 @@ class Neptune : public CelestialBody
 {
 public:
   Neptune ( FGTime *t);
+  Neptune ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/ephemeris/pluto.hxx

@@ -30,7 +30,8 @@
 class Pluto : public CelestialBody
 {
 public:
-  Pluto ( FGTime t);
+  Pluto ( FGTime *t);
+  Pluto ();
 };
 
 #endif // _PLUTO_HXX_

simgear/ephemeris/saturn.cxx

@@ -45,6 +45,15 @@ Saturn::Saturn(FGTime *t) :
 		316.9670,   0.03344422820, t)
 {
 }
+Saturn::Saturn() :
+  CelestialBody(113.6634,   2.3898000E-5,
+		2.4886,	   -1.081E-7,
+		339.3939,   2.9766100E-5,
+		9.5547500,  0.000000,
+		0.055546,  -9.499E-9,
+		316.9670,   0.03344422820)
+{
+}
 
 /*************************************************************************
  * void Saturn::updatePosition(FGTime *t, Star *ourSun)

simgear/ephemeris/saturn.hxx

@@ -32,6 +32,7 @@ class Saturn : public CelestialBody
 {
 public:
   Saturn ( FGTime *t);
+  Saturn ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/ephemeris/sky.cxx

@@ -1,367 +0,0 @@
-// sky.cxx -- model sky with an upside down "bowl"
-//
-// Written by Curtis Olson, started December 1997.
-//
-// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
-//
-// 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.
-//
-// This program is distributed in the hope that it will be useful, but
-// WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-// General Public License for more details.
-//
-// You should have received a copy of the GNU General Public License
-// along with this program; if not, write to the Free Software
-// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-//
-// $Id$
-
-
-#ifdef HAVE_CONFIG_H
-#  include <config.h>
-#endif
-
-#ifdef HAVE_WINDOWS_H
-#  include <windows.h>
-#endif
-
-#include <math.h>
-
-#include <GL/glut.h>
-#include <XGL/xgl.h>
-
-#include <Aircraft/aircraft.hxx>
-#include <Debug/logstream.hxx>
-#include <FDM/flight.hxx>
-#include <Include/fg_constants.h>
-#include <Main/views.hxx>
-#include <Math/fg_random.h>
-#include <Time/event.hxx>
-#include <Time/fg_time.hxx>
-
-#include "sky.hxx"
-
-
-#ifdef __MWERKS__
-#  pragma global_optimizer off
-#endif
-
-
-// in meters of course
-#define CENTER_ELEV   25000.0
-
-#define INNER_RADIUS  50000.0
-#define INNER_ELEV    20000.0
-
-#define MIDDLE_RADIUS 70000.0
-#define MIDDLE_ELEV    8000.0
-
-#define OUTER_RADIUS  80000.0
-#define OUTER_ELEV        0.0
-
-#define BOTTOM_RADIUS 50000.0
-#define BOTTOM_ELEV   -2000.0
-
-
-static float inner_vertex[12][3];
-static float middle_vertex[12][3];
-static float outer_vertex[12][3];
-static float bottom_vertex[12][3];
-
-static float inner_color[12][4];
-static float middle_color[12][4];
-static float outer_color[12][4];
-
-
-// Calculate the sky structure vertices
-void fgSkyVerticesInit( void ) {
-    float theta;
-    int i;
-
-    FG_LOG(FG_ASTRO, FG_INFO, "  Generating the sky dome vertices.");
-
-    for ( i = 0; i < 12; i++ ) {
-	theta = (i * 30.0) * DEG_TO_RAD;
-	
-	inner_vertex[i][0] = cos(theta) * INNER_RADIUS;
-	inner_vertex[i][1] = sin(theta) * INNER_RADIUS;
-	inner_vertex[i][2] = INNER_ELEV;
-	
-	// printf("    %.2f %.2f\n", cos(theta) * INNER_RADIUS, 
-	//        sin(theta) * INNER_RADIUS);
-
-	middle_vertex[i][0] = cos((double)theta) * MIDDLE_RADIUS;
-	middle_vertex[i][1] = sin((double)theta) * MIDDLE_RADIUS;
-	middle_vertex[i][2] = MIDDLE_ELEV;
-	    
-	outer_vertex[i][0] = cos((double)theta) * OUTER_RADIUS;
-	outer_vertex[i][1] = sin((double)theta) * OUTER_RADIUS;
-	outer_vertex[i][2] = OUTER_ELEV;
-	    
-	bottom_vertex[i][0] = cos((double)theta) * BOTTOM_RADIUS;
-	bottom_vertex[i][1] = sin((double)theta) * BOTTOM_RADIUS;
-	bottom_vertex[i][2] = BOTTOM_ELEV;
-    }
-}
-
-
-// (Re)calculate the sky colors at each vertex
-void fgSkyColorsInit( void ) {
-    fgLIGHT *l;
-    double sun_angle, diff;
-    double outer_param[3], outer_amt[3], outer_diff[3];
-    double middle_param[3], middle_amt[3], middle_diff[3];
-    int i, j;
-
-    l = &cur_light_params;
-
-    FG_LOG( FG_ASTRO, FG_INFO, 
-	    "  Generating the sky colors for each vertex." );
-
-    // setup for the possibility of sunset effects
-    sun_angle = l->sun_angle * RAD_TO_DEG;
-    // fgPrintf( FG_ASTRO, FG_INFO, 
-    //           "  Sun angle in degrees = %.2f\n", sun_angle);
-
-    if ( (sun_angle > 80.0) && (sun_angle < 100.0) ) {
-	// 0.0 - 0.4
-	outer_param[0] = (10.0 - fabs(90.0 - sun_angle)) / 20.0;
-	outer_param[1] = (10.0 - fabs(90.0 - sun_angle)) / 40.0;
-	outer_param[2] = -(10.0 - fabs(90.0 - sun_angle)) / 30.0;
-	// outer_param[2] = 0.0;
-
-	middle_param[0] = (10.0 - fabs(90.0 - sun_angle)) / 40.0;
-	middle_param[1] = (10.0 - fabs(90.0 - sun_angle)) / 80.0;
-	middle_param[2] = 0.0;
-
-	outer_diff[0] = outer_param[0] / 6.0;
-	outer_diff[1] = outer_param[1] / 6.0;
-	outer_diff[2] = outer_param[2] / 6.0;
-
-	middle_diff[0] = middle_param[0] / 6.0;
-	middle_diff[1] = middle_param[1] / 6.0;
-	middle_diff[2] = middle_param[2] / 6.0;
-    } else {
-	outer_param[0] = outer_param[1] = outer_param[2] = 0.0;
-	middle_param[0] = middle_param[1] = middle_param[2] = 0.0;
-
-	outer_diff[0] = outer_diff[1] = outer_diff[2] = 0.0;
-	middle_diff[0] = middle_diff[1] = middle_diff[2] = 0.0;
-    }
-    // printf("  outer_red_param = %.2f  outer_red_diff = %.2f\n", 
-    //        outer_red_param, outer_red_diff);
-
-    // calculate transition colors between sky and fog
-    for ( j = 0; j < 3; j++ ) {
-	outer_amt[j] = outer_param[j];
-	middle_amt[j] = middle_param[j];
-    }
-
-    for ( i = 0; i < 6; i++ ) {
-	for ( j = 0; j < 3; j++ ) {
-	    diff = l->sky_color[j] - l->fog_color[j];
-
-	    // printf("sky = %.2f  fog = %.2f  diff = %.2f\n", 
-	    //        l->sky_color[j], l->fog_color[j], diff);
-
-	    inner_color[i][j] = l->sky_color[j] - diff * 0.3;
-	    middle_color[i][j] = l->sky_color[j] - diff * 0.9 + middle_amt[j];
-	    outer_color[i][j] = l->fog_color[j] + outer_amt[j];
-
-	    if ( inner_color[i][j] > 1.00 ) { inner_color[i][j] = 1.00; }
-	    if ( inner_color[i][j] < 0.10 ) { inner_color[i][j] = 0.10; }
-	    if ( middle_color[i][j] > 1.00 ) { middle_color[i][j] = 1.00; }
-	    if ( middle_color[i][j] < 0.10 ) { middle_color[i][j] = 0.10; }
-	    if ( outer_color[i][j] > 1.00 ) { outer_color[i][j] = 1.00; }
-	    if ( outer_color[i][j] < 0.10 ) { outer_color[i][j] = 0.10; }
-	}
-	inner_color[i][3] = middle_color[i][3] = outer_color[i][3] = 
-	    l->sky_color[3];
-
-	for ( j = 0; j < 3; j++ ) {
-	    outer_amt[j] -= outer_diff[j];
-	    middle_amt[j] -= middle_diff[j];
-	}
-
-	/*
-	printf("inner_color[%d] = %.2f %.2f %.2f %.2f\n", i, inner_color[i][0],
-	       inner_color[i][1], inner_color[i][2], inner_color[i][3]);
-	printf("middle_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	       middle_color[i][0], middle_color[i][1], middle_color[i][2], 
-	       middle_color[i][3]);
-	printf("outer_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	       outer_color[i][0], outer_color[i][1], outer_color[i][2], 
-	       outer_color[i][3]);
-	*/
-    }
-
-    for ( j = 0; j < 3; j++ ) {
-	outer_amt[j] = 0.0;
-	middle_amt[j] = 0.0;
-    }
-
-    for ( i = 6; i < 12; i++ ) {
-
-	for ( j = 0; j < 3; j++ ) {
-	    diff = l->sky_color[j] - l->fog_color[j];
-
-	    // printf("sky = %.2f  fog = %.2f  diff = %.2f\n", 
-	    //        l->sky_color[j], l->fog_color[j], diff);
-
-	    inner_color[i][j] = l->sky_color[j] - diff * 0.3;
-	    middle_color[i][j] = l->sky_color[j] - diff * 0.9 + middle_amt[j];
-	    outer_color[i][j] = l->fog_color[j] + outer_amt[j];
-
-	    if ( inner_color[i][j] > 1.00 ) { inner_color[i][j] = 1.00; }
-	    if ( inner_color[i][j] < 0.10 ) { inner_color[i][j] = 0.10; }
-	    if ( middle_color[i][j] > 1.00 ) { middle_color[i][j] = 1.00; }
-	    if ( middle_color[i][j] < 0.10 ) { middle_color[i][j] = 0.10; }
-	    if ( outer_color[i][j] > 1.00 ) { outer_color[i][j] = 1.00; }
-	    if ( outer_color[i][j] < 0.15 ) { outer_color[i][j] = 0.15; }
-	}
-	inner_color[i][3] = middle_color[i][3] = outer_color[i][3] = 
-	    l->sky_color[3];
-
-	for ( j = 0; j < 3; j++ ) {
-	    outer_amt[j] += outer_diff[j];
-	    middle_amt[j] += middle_diff[j];
-	}
-
-	/*
-	printf("inner_color[%d] = %.2f %.2f %.2f %.2f\n", i, inner_color[i][0],
-	       inner_color[i][1], inner_color[i][2], inner_color[i][3]);
-	printf("middle_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	       middle_color[i][0], middle_color[i][1], middle_color[i][2], 
-	       middle_color[i][3]);
-	printf("outer_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	       outer_color[i][0], outer_color[i][1], outer_color[i][2], 
-	       outer_color[i][3]);
-	*/
-    }
-}
-
-
-// Initialize the sky structure and colors
-void fgSkyInit( void ) {
-    FG_LOG( FG_ASTRO, FG_INFO, "Initializing the sky" );
-
-    fgSkyVerticesInit();
-
-    // regester fgSkyColorsInit() as an event to be run periodically
-    global_events.Register( "fgSkyColorsInit()", fgSkyColorsInit, 
-		            fgEVENT::FG_EVENT_READY, 30000);
-}
-
-
-// Draw the Sky
-void fgSkyRender( void ) {
-    FGInterface *f;
-    fgLIGHT *l;
-    float inner_color[4];
-    float middle_color[4];
-    float outer_color[4];
-    double diff;
-    int i;
-
-    f = current_aircraft.fdm_state;
-    l = &cur_light_params;
-
-    // printf("Rendering the sky.\n");
-
-    // calculate the proper colors
-    for ( i = 0; i < 3; i++ ) {
-	diff = l->sky_color[i] - l->adj_fog_color[i];
-
-	// printf("sky = %.2f  fog = %.2f  diff = %.2f\n", 
-	//        l->sky_color[j], l->adj_fog_color[j], diff);
-
-	inner_color[i] = l->sky_color[i] - diff * 0.3;
-	middle_color[i] = l->sky_color[i] - diff * 0.9;
-	outer_color[i] = l->adj_fog_color[i];
-    }
-    inner_color[3] = middle_color[3] = outer_color[3] = l->adj_fog_color[3];
-
-    xglPushMatrix();
-
-    // Translate to view position
-    Point3D zero_elev = current_view.get_cur_zero_elev();
-    xglTranslatef( zero_elev.x(), zero_elev.y(), zero_elev.z() );
-    // printf("  Translated to %.2f %.2f %.2f\n", 
-    //        zero_elev.x, zero_elev.y, zero_elev.z );
-
-    // Rotate to proper orientation
-    // printf("  lon = %.2f  lat = %.2f\n", FG_Longitude * RAD_TO_DEG,
-    //        FG_Latitude * RAD_TO_DEG);
-    xglRotatef( f->get_Longitude() * RAD_TO_DEG, 0.0, 0.0, 1.0 );
-    xglRotatef( 90.0 - f->get_Latitude() * RAD_TO_DEG, 0.0, 1.0, 0.0 );
-    xglRotatef( l->sun_rotation * RAD_TO_DEG, 0.0, 0.0, 1.0 );
-
-    // Draw inner/center section of sky*/
-    xglBegin( GL_TRIANGLE_FAN );
-    xglColor4fv(l->sky_color);
-    xglVertex3f(0.0, 0.0, CENTER_ELEV);
-    for ( i = 11; i >= 0; i-- ) {
-	xglColor4fv( inner_color );
-	xglVertex3fv( inner_vertex[i] );
-    }
-    xglColor4fv( inner_color );
-    xglVertex3fv( inner_vertex[11] );
-    xglEnd();
-
-    // Draw the middle ring
-    xglBegin( GL_TRIANGLE_STRIP );
-    for ( i = 0; i < 12; i++ ) {
-	xglColor4fv( middle_color );
-	// printf("middle_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	//        middle_color[i][0], middle_color[i][1], middle_color[i][2], 
-	//        middle_color[i][3]);
-	// xglColor4f(1.0, 0.0, 0.0, 1.0);
-	xglVertex3fv( middle_vertex[i] );
-	xglColor4fv( inner_color );
-	// printf("inner_color[%d] = %.2f %.2f %.2f %.2f\n", i, 
-	//        inner_color[i][0], inner_color[i][1], inner_color[i][2], 
-	//        inner_color[i][3]);
-	// xglColor4f(0.0, 0.0, 1.0, 1.0);
-	xglVertex3fv( inner_vertex[i] );
-    }
-    xglColor4fv( middle_color );
-    // xglColor4f(1.0, 0.0, 0.0, 1.0);
-    xglVertex3fv( middle_vertex[0] );
-    xglColor4fv( inner_color );
-    // xglColor4f(0.0, 0.0, 1.0, 1.0);
-    xglVertex3fv( inner_vertex[0] );
-    xglEnd();
-
-    // Draw the outer ring
-    xglBegin( GL_TRIANGLE_STRIP );
-    for ( i = 0; i < 12; i++ ) {
-	xglColor4fv( outer_color );
-	xglVertex3fv( outer_vertex[i] );
-	xglColor4fv( middle_color );
-	xglVertex3fv( middle_vertex[i] );
-    }
-    xglColor4fv( outer_color );
-    xglVertex3fv( outer_vertex[0] );
-    xglColor4fv( middle_color );
-    xglVertex3fv( middle_vertex[0] );
-    xglEnd();
-
-    // Draw the bottom skirt
-    xglBegin( GL_TRIANGLE_STRIP );
-    xglColor4fv( outer_color );
-    for ( i = 0; i < 12; i++ ) {
-	xglVertex3fv( bottom_vertex[i] );
-	xglVertex3fv( outer_vertex[i] );
-    }
-    xglVertex3fv( bottom_vertex[0] );
-    xglVertex3fv( outer_vertex[0] );
-    xglEnd();
-
-    xglPopMatrix();
-}
-
-

simgear/ephemeris/solarsystem.cxx

@@ -1,215 +0,0 @@
-/**************************************************************************
- * solarsystem.cxx
- * Written by Durk Talsma. Originally started October 1997, for distribution  
- * with the FlightGear project. Version 2 was written in August and 
- * September 1998. This code is based upon algorithms and data kindly 
- * provided by Mr. Paul Schlyter. (pausch@saaf.se). 
- *
- * 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.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- *
- * $Id$
- **************************************************************************/
-
-#ifdef HAVE_CONFIG_H
-#  include <config.h>
-#endif
-
-#ifdef HAVE_WINDOWS_H
-#  include <windows.h>
-#endif
-
-#ifdef __BORLANDC__
-#  define exception c_exception
-#endif
-#include <math.h>
-
-#include <GL/glut.h>
-#include <XGL/xgl.h>
-#include <Debug/logstream.hxx>
-#include <Time/sunpos.hxx>
-#include <Time/moonpos.hxx>
-#include "solarsystem.hxx"
-
-/***************************************************************************
- * default constructor for class  SolarSystem:   
- * or course there can only be one way to create an entire solar system -:) )
- * the FGTime argument is needed to properly initialize the the current orbital
- * elements
- *************************************************************************/
-SolarSystem::SolarSystem(FGTime *t)
-{
-  if (theSolarSystem)
-    {
-      FG_LOG( FG_GENERAL, FG_ALERT, "Error: only one solarsystem allowed" );
-      exit(-1);
-    }
-  theSolarSystem = this;
-  ourSun     = new Star(t);   
-  earthsMoon = new Moon(t);
-  mercury    = new Mercury(t);
-  venus      = new Venus(t);
-  mars       = new Mars(t);
-  jupiter    = new Jupiter(t);
-  saturn     = new Saturn(t);
-  uranus     = new Uranus(t);
-  neptune    = new Neptune(t);
-
-  displayList = 0;
-};
-
-/**************************************************************************
- * the destructor for class SolarSystem;
- **************************************************************************/
-SolarSystem::~SolarSystem()
-{
-  delete ourSun;
-  delete earthsMoon;
-  delete mercury;
-  delete venus;
-  delete mars;
-  delete jupiter;
-  delete saturn;
-  delete uranus;
-  delete neptune;
-}
-/****************************************************************************
- * void SolarSystem::rebuild()
- *
- * this member function updates the positions for the sun, moon, and planets,
- * and then rebuilds the display list. 
- *
- * arguments: none
- * return value: none
- ***************************************************************************/
-void SolarSystem::rebuild()
-{
-  //fgLIGHT *l = &cur_light_params;
-  FGTime *t = FGTime::cur_time_params;  
-  //float x, y, z;
-  //double sun_angle;
-  double ra, dec;
-  //double x_2, x_4, x_8, x_10;*/
-  double magnitude;
-  //GLfloat ambient;
-  //GLfloat amb[4];
-  
-  glDisable(GL_LIGHTING);
-
-  // Step 1: update all the positions
-  ourSun->updatePosition(t);
-  earthsMoon->updatePosition(t, ourSun);
-  mercury->updatePosition(t, ourSun);
-  venus->updatePosition(t, ourSun);
-  mars->updatePosition(t, ourSun);
-  jupiter->updatePosition(t, ourSun);
-  saturn->updatePosition(t, ourSun);
-  uranus->updatePosition(t, ourSun);
-  neptune->updatePosition(t, ourSun);
-  
-  fgUpdateSunPos();   // get the right sun angle (especially important when 
-                      // running for the first time).
-  fgUpdateMoonPos();
-
-  if (displayList)
-    xglDeleteLists(displayList, 1);
-
-  displayList = xglGenLists(1);
-
-  FG_LOG( FG_ASTRO, FG_INFO, "Rebuilding astro display list" );
-
-  // Step 2: rebuild the display list
-  xglNewList( displayList, GL_COMPILE);
-  {
-    // Step 2a: Add the moon...
-    // Not that it is preferred to draw the moon first, and the sun next, in order to mime a
-    // solar eclipse. This is yet untested though...
-    // Euhh, actually the ecplise doesn't work...
-
-    earthsMoon->newImage();
-    // Step 2b:  Add the sun
-    ourSun->newImage();
-    // Step 2c: Add the planets
-    xglBegin(GL_POINTS);
-    mercury->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    venus  ->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    mars   ->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    jupiter->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    saturn ->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    uranus ->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    neptune->getPos(&ra, &dec, &magnitude);addPlanetToList(ra, dec, magnitude);
-    xglEnd();
-    xglEnable(GL_LIGHTING);
-  }
-  xglEndList();
-}
-
-/*****************************************************************************
- * double SolarSystem::scaleMagnitude(double magn)
- * This private member function rescales the original magnitude, as used in the
- * astronomical sense of the word, into a value used by OpenGL to draw a 
- * convincing Star or planet
- * 
- * Argument: the astronomical magnitude
- *
- * return value: the rescaled magnitude
- ****************************************************************************/
-double SolarSystem::scaleMagnitude(double magn)
-{
-  double magnitude = (0.0 - magn) / 5.0 + 1.0;
-  magnitude = magnitude * 0.7 + (3 * 0.1);
-  if (magnitude > 1.0) magnitude = 1.0;
-  if (magnitude < 0.0) magnitude = 0.0;
-  return magnitude;
-}
-
-/***************************************************************************
- * void SolarSytem::addPlanetToList(double ra, double dec, double magn);
- *
- * This private member function first causes the magnitude to be properly
- * rescaled, and then adds the planet to the display list.
- * 
- * arguments: Right Ascension, declination, and magnitude
- *
- * return value: none
- **************************************************************************/
-void SolarSystem::addPlanetToList(double ra, double dec, double magn)
-{
-  double
-    magnitude = scaleMagnitude ( magn );
-
-  fgLIGHT *l = &cur_light_params;
-
-  if ((double) (l->sun_angle - FG_PI_2) > 
-      ((magnitude - 1.0) * - 20 * DEG_TO_RAD)) 
-    {
-      xglColor3f (magnitude, magnitude, magnitude);
-      xglVertex3f( 50000.0 * cos (ra) * cos (dec),
-		   50000.0 * sin (ra) * cos (dec),
-		   50000.0 * sin (dec));
-    }
-}
-
-
-SolarSystem* SolarSystem::theSolarSystem = 0;
-
-/******************************************************************************
- * void solarSystemRebuild()
- * this a just a wrapper function, provided for use as an interface to the 
- * event manager
- *****************************************************************************/
-void solarSystemRebuild()
-{
-  SolarSystem::theSolarSystem->rebuild();
-}

simgear/ephemeris/solarsystem.hxx

@@ -1,91 +0,0 @@
-/**************************************************************************
- * solarsystem.hxx
- * Written by Durk Talsma. Originally started October 1997, for distribution  
- * with the FlightGear project. Version 2 was written in August and 
- * September 1998. This code is based upon algorithms and data kindly 
- * provided by Mr. Paul Schlyter. (pausch@saaf.se). 
- *
- * 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.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- *
- * $Id$
- **************************************************************************/
-#ifndef _SOLARSYSTEM_H_
-#define _SOLARSYSTEM_H_
-
-#include <Time/light.hxx>
-#include <Time/fg_time.hxx>
-#include <Main/views.hxx>
-
-#include "star.hxx"
-#include "moon.hxx"
-#include "mercury.hxx"
-#include "venus.hxx"
-#include "mars.hxx"
-#include "jupiter.hxx"
-#include "saturn.hxx"
-#include "uranus.hxx"
-#include "neptune.hxx"
-#include "pluto.hxx"
-
-
-class SolarSystem
-{
-private:
-  Star*    ourSun;
-  Moon*    earthsMoon;
-  Mercury* mercury;
-  Venus*   venus;
-  Mars*    mars;
-  Jupiter* jupiter;
-  Saturn*  saturn;
-  Uranus*  uranus;
-  Neptune* neptune;
-  //Pluto*   pluto;
-  
-  GLint displayList;
-  double scaleMagnitude(double magn);
-  void addPlanetToList(double ra, double dec, double magn);
-
-
-public:
-  SolarSystem(FGTime *t);
-  CelestialBody *getSun();
-  CelestialBody *getMoon();
-  ~SolarSystem();
-
-  static SolarSystem *theSolarSystem;  // thanks to Bernie Bright!
-  void rebuild();
-  friend void solarSystemRebuild();
-  void draw();
-};
-
-inline CelestialBody* SolarSystem::getSun()
-{
-  return ourSun;
-}
-
-inline CelestialBody* SolarSystem::getMoon()
-{
-  return earthsMoon;
-}
-
-inline void SolarSystem::draw()
-{
-  xglCallList(displayList);
-}
-  
-extern void solarSystemRebuild();
-
-#endif // _SOLARSYSTEM_H_

simgear/ephemeris/star.cxx

@@ -22,16 +22,21 @@
  * $Id$
  **************************************************************************/
 
+
 #ifdef __BORLANDC__
 #  define exception c_exception
 #endif
 #include <math.h>
+
+#include <simgear/debug/logstream.hxx>
+
 #include <Time/sunpos.hxx>
-#include <Debug/logstream.hxx>
 #include <Time/light.hxx>
 #include <Main/options.hxx>
+
 #include "star.hxx"
 
+
 /*************************************************************************
  * Star::Star(FGTime *t)
  * Public constructor for class Star
@@ -42,110 +47,34 @@
  * problems on sun systems 
  ************************************************************************/
 Star::Star(FGTime *t) :
-  CelestialBody (0.000000,  0.0000000000,
-		 0.0000,    0.00000,
-		 282.9404,  4.7093500E-5,	
-		 1.0000000, 0.000000,	
-		 0.016709,  -1.151E-9,
-		 356.0470,  0.98560025850, t)
+    CelestialBody (0.000000,  0.0000000000,
+		   0.0000,    0.00000,
+		   282.9404,  4.7093500E-5,	
+		   1.0000000, 0.000000,	
+		   0.016709,  -1.151E-9,
+		   356.0470,  0.98560025850, t)
 {
-    
-  FG_LOG( FG_GENERAL, FG_INFO, "Initializing Sun Texture");
-#ifdef GL_VERSION_1_1
-  xglGenTextures(1, &sun_texid);
-  xglBindTexture(GL_TEXTURE_2D, sun_texid);
-#elif GL_EXT_texture_object
-  xglGenTexturesEXT(1, &sun_texid);
-  xglBindTextureEXT(GL_TEXTURE_2D, sun_texid);
-#else
-#  error port me
-#endif
+    distance = 0.0;
+}
 
-  glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
-  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
-  setTexture();
-  glTexImage2D( GL_TEXTURE_2D,
-		0,
-		GL_RGBA,
-		256, 256,
-		0,
-		GL_RGBA, GL_UNSIGNED_BYTE,
-		sun_texbuf);
-     
-  SunObject = gluNewQuadric();
-  if(SunObject == NULL)
-    {
-      printf("gluNewQuadric(SunObject) failed  !\n");
-      exit(0);
-    }
-  
-  //SunList = 0;
-  distance = 0.0;
+Star::Star() :
+    CelestialBody (0.000000,  0.0000000000,
+		   0.0000,    0.00000,
+		   282.9404,  4.7093500E-5,	
+		   1.0000000, 0.000000,	
+		   0.016709,  -1.151E-9,
+		   356.0470,  0.98560025850)
+{
+    distance = 0.0;
 }
 
 Star::~Star()
 {
-  //delete SunObject;
-  delete [] sun_texbuf;
 }
 
 
-
-static int texWidth = 256;	/* 64x64 is plenty */
-
-void Star::setTexture()
-{
-  int texSize;
-  //void *textureBuf;
-  GLubyte *p;
-  int i,j;
-  double radius;
-  
-  texSize = texWidth*texWidth;
-  
-  sun_texbuf = new GLubyte[texSize*4];
-  if (!sun_texbuf) 
-    return;  // Ugly!
-  
-  p = sun_texbuf;
-  
-  radius = (double)(texWidth / 2);
-  
-  for (i=0; i < texWidth; i++) {
-    for (j=0; j < texWidth; j++) {
-      double x, y, d;
-	    
-      x = fabs((double)(i - (texWidth / 2)));
-      y = fabs((double)(j - (texWidth / 2)));
-
-      d = sqrt((x * x) + (y * y));
-      if (d < radius) 
-	{
-	  double t = 1.0 - (d / radius); // t is 1.0 at center, 0.0 at edge */
-	  // inverse square looks nice 
-	  *p = (int)((double)0xff * (t * t));
-	  *(p+1) = (int)((double) 0xff * (t*t));
-	  *(p+2) = (int)((double) 0xff * (t*t));
-	  *(p+3) = (int)((double) 0xff * (t*t));
-	} 
-      else
-	{
-	  *p = 0x00;
-	  *(p+1) = 0x00;
-	  *(p+2) = 0x00;
-	  *(p+3) = 0x00;
-	}
-      p += 4;
-    }
-  }
-  //gluBuild2DMipmaps(GL_TEXTURE_2D, 1, texWidth, texWidth, 
-  //	    GL_LUMINANCE,
-  //	    GL_UNSIGNED_BYTE, textureBuf);
-  //free(textureBuf);
-}
 /*************************************************************************
- * void Jupiter::updatePosition(FGTime *t, Star *ourSun)
+ * void Star::updatePosition(FGTime *t, Star *ourSun)
  * 
  * calculates the current position of our sun.
  *************************************************************************/
@@ -186,86 +115,3 @@ void Star::updatePosition(FGTime *t)
   rightAscension = atan2 (ye, xe);
   declination = atan2 (ze, sqrt (xe*xe + ye*ye));
 }
-  
-void Star::newImage(void)
-{
-  /*static float stars[3];
-  stars[0] = 0.0;
-  stars[1] = 0.0;
-  stars[2] = 1.0;*/
-
-  fgLIGHT *l = &cur_light_params;
-  float sun_angle = l->sun_angle;
-  
-  if( sun_angle*RAD_TO_DEG < 100 ) { // else no need to draw sun
-    
-    
-    double x_2, x_4, x_8, x_10;
-    GLfloat ambient;
-    GLfloat amb[4];
-    int sun_size = 550;
-    
-    // daily variation sun gets larger near horizon
-    /*if(sun_angle*RAD_TO_DEG > 84.0 && sun_angle*RAD_TO_DEG < 95)
-      {
-      double sun_grow = 9*fabs(94-sun_angle*RAD_TO_DEG);
-      sun_size = (int)(sun_size + sun_size * cos(sun_grow*DEG_TO_RAD));
-      }*/
-    x_2 = sun_angle * sun_angle;
-    x_4 = x_2 * x_2;
-    x_8 = x_4 * x_4;
-    x_10 = x_8 * x_2;
-    ambient = (float)(0.4 * pow (1.1, - x_10 / 30.0));
-    if (ambient < 0.3) ambient = 0.3;
-    if (ambient > 1.0) ambient = 1.0;
-    
-    amb[0] = ((ambient * 6.0)  - 1.0); // minimum value = 0.8
-    amb[1] = ((ambient * 11.0) - 3.0); // minimum value = 0.3
-    amb[2] = ((ambient * 12.0) - 3.6); // minimum value = 0.0
-    amb[3] = 1.00;
-    
-    if (amb[0] > 1.0) amb[0] = 1.0;
-    if (amb[1] > 1.0) amb[1] = 1.0;
-    if (amb[2] > 1.0) amb[2] = 1.0;
-    xglColor3fv(amb);
-    glPushMatrix();
-    {
-      xglRotatef(((RAD_TO_DEG * rightAscension)- 90.0), 0.0, 0.0, 1.0);
-      xglRotatef((RAD_TO_DEG * declination), 1.0, 0.0, 0.0);
-      xglTranslatef(0,60000,0);
-      if (current_options.get_textures())
-	{
-	  glEnable(GL_TEXTURE_2D);                                             // TEXTURE ENABLED
-	  glEnable(GL_BLEND);                                                  // BLEND ENABLED
-	  
-	  glBlendFunc(GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
-	  glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);  
-	  glBindTexture(GL_TEXTURE_2D, sun_texid);
-
-	  glBegin(GL_QUADS);
-	  glTexCoord2f(0.0f, 0.0f); glVertex3f(-5000, 0.0, -5000);
-	  glTexCoord2f(1.0f, 0.0f); glVertex3f( 5000, 0.0, -5000);
-	  glTexCoord2f(1.0f, 1.0f); glVertex3f( 5000, 0.0,  5000);
-	  glTexCoord2f(0.0f, 1.0f); glVertex3f(-5000, 0.0,  5000);
-	  glEnd();
-	}
-      xglDisable(GL_TEXTURE_2D); // TEXTURE DISABLED
-      xglDisable(GL_BLEND);	// BLEND DISABLED
-    }
-
-    glPopMatrix();
-    glDisable(GL_LIGHTING);	//LIGHTING DISABLED
-    glDisable(GL_BLEND);	//BLEND DISABLED
-    glPushMatrix();
-    {     
-      xglRotatef(((RAD_TO_DEG * rightAscension)- 90.0), 0.0, 0.0, 1.0);
-      xglRotatef((RAD_TO_DEG * declination), 1.0, 0.0, 0.0);
-      xglColor4fv(amb);
-      xglTranslatef(0,60000,0);
-      gluSphere( SunObject,  sun_size, 10, 10 );
-      }
-    glPopMatrix();
-    glDisable(GL_TEXTURE_2D);                                             // TEXTURE DISABLED
-    glDisable(GL_BLEND);                                                  // BLEND DISABLED  
-  }
-}

simgear/ephemeris/star.hxx

@@ -24,35 +24,31 @@
 #ifndef _STAR_HXX_
 #define _STAR_HXX_
 
+
 #include <Time/fg_time.hxx>
 #include "celestialBody.hxx"
 
 
 class Star : public CelestialBody
 {
+
 private:
-  //double longitude;  // the sun's true longitude - this is depreciated by
-                       // CelestialBody::lonEcl 
-  double xs, ys;     // the sun's rectangular geocentric coordinates
-  double distance;   // the sun's distance to the earth
-   GLUquadricObj *SunObject;
-  GLuint sun_texid;
-  GLubyte *sun_texbuf;
 
-  void setTexture();
+    double xs, ys;     // the sun's rectangular geocentric coordinates
+    double distance;   // the sun's distance to the earth
+
 public:
-  Star (FGTime *t);
-  ~Star();
-  void updatePosition(FGTime *t);
-  double getM();
-  double getw();
-  //double getLon();
-  double getxs();
-  double getys();
-  double getDistance();
-  void newImage();
-};
 
+    Star (FGTime *t);
+    Star ();
+    ~Star();
+    void updatePosition(FGTime *t);
+    double getM();
+    double getw();
+    double getxs();
+    double getys();
+    double getDistance();
+};
 
 
 inline double Star::getM()

simgear/ephemeris/stars.cxx

@@ -1,8 +1,8 @@
-// stars.cxx -- data structures and routines for managing and rendering stars.
+// stars.cxx -- manage star data
 //
-// Written by Curtis Olson, started August 1997.
+// Written by Curtis Olson, started March 2000.
 //
-// Copyright (C) 1997  Curtis L. Olson  - curt@me.umn.edu
+// Copyright (C) 2000  Curtis L. Olson - curt@flightgear.org
 //
 // This program is free software; you can redistribute it and/or
 // modify it under the terms of the GNU General Public License as
@@ -19,249 +19,100 @@
 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 //
 // $Id$
-//*************************************************************************/
 
 
-#ifdef HAVE_CONFIG_H
-#  include <config.h>
-#endif
-
-#ifdef HAVE_WINDOWS_H
-#  include <windows.h>
-#endif
-
-#include "Include/compiler.h"
-#ifdef FG_HAVE_STD_INCLUDES
-#  include <cmath>
-#  include <cstdio>
-#  include <cstring>
-#  include <ctime>
-#else
-#  include <math.h>
-#  include <stdio.h>
-#  include <string.h>
-#  include <time.h>
-#endif
-
-#include <string>
-
-#include <GL/glut.h>
-#include <XGL/xgl.h>
-
-#include <Aircraft/aircraft.hxx>
-#include <Debug/logstream.hxx>
-#include <Include/fg_constants.h>
-#include <Misc/fgpath.hxx>
-#include <Misc/fgstream.hxx>
-#include <Misc/stopwatch.hxx>
-#include <Main/options.hxx>
-#include <Main/views.hxx>
-#include <Time/fg_time.hxx>
-#include "Misc/stopwatch.hxx"
+#include <simgear/debug/logstream.hxx>
+#include <simgear/misc/fgstream.hxx>
 
 #include "stars.hxx"
 
-FG_USING_STD(getline);
 
-#define EpochStart           (631065600)
-#define DaysSinceEpoch(secs) (((secs)-EpochStart)*(1.0/(24*3600)))
-#define FG_MAX_STARS 3500
+// Constructor
+FGStars::FGStars() {
+}
 
-// Define four structures, each with varying amounts of stars
-static GLint stars[FG_STAR_LEVELS];
+FGStars::FGStars( FGPath path ) {
+    data_path = FGPath( path );
+    load();
+}
 
 
-// Initialize the Star Management Subsystem
-int fgStarsInit( void ) {
+// Destructor
+FGStars::~FGStars() {
+}
+
+
+bool FGStars::load() {
+
     // -dw- avoid local data > 32k error by dynamic allocation of the
     // array, problem for some compilers
-    Point3D *starlist = new Point3D[FG_MAX_STARS];
-    // struct CelestialCoord pltPos;
-    double right_ascension, declination, magnitude;
-    double min_magnitude[FG_STAR_LEVELS];
-    // double ra_save, decl_save;
-    // double ra_save1, decl_save1;
-    int i, j, starcount, count;
+    stars = new sgdVec3[FG_MAX_STARS];
 
-    FG_LOG( FG_ASTRO, FG_INFO, "Initializing stars" );
+     // build the full path name to the stars data base file
+    data_path.append( "stars" );
+    FG_LOG( FG_ASTRO, FG_INFO, "  Loading stars from " << data_path.str() );
 
-    if ( FG_STAR_LEVELS < 4 ) {
-	FG_LOG( FG_ASTRO, FG_ALERT, "Big whups in stars.cxx" );
+    fg_gzifstream in( data_path.str() );
+    if ( ! in.is_open() ) {
+	FG_LOG( FG_ASTRO, FG_ALERT, "Cannot open star file: "
+		<< data_path.str() );
 	exit(-1);
     }
 
-    // build the full path name to the stars data base file
-    FGPath path ( current_options.get_fg_root() );
-    path.append( "Astro/stars" );
-    FG_LOG( FG_ASTRO, FG_INFO, "  Loading stars from " << path.str() );
+    double ra, dec, mag;
+    char c;
+    string name;
 
-    fg_gzifstream in( path.str() );
-    if ( ! in ) {
-	FG_LOG( FG_ASTRO, FG_ALERT, "Cannot open star file: " << path.str() );
-	exit(-1);
-    }
-
-    starcount = 0;
-
-    StopWatch timer;
-    timer.start();
+    nstars = 0;
 
     // read in each line of the file
-    while ( ! in.eof() && starcount < FG_MAX_STARS )
-    {
+    while ( ! in.eof() && nstars < FG_MAX_STARS ) {
 	in >> skipcomment;
-	string name;
-	getline( in, name, ',' );
-	in >> starlist[starcount];
-	++starcount;
-    }
 
-    timer.stop();
-    FG_LOG( FG_ASTRO, FG_INFO, 
-	    "Loaded " << starcount << " stars in "
-	    << timer.elapsedSeconds() << " seconds" );
+        getline( in, name, ',' );
+	// cout << "  data = " << name << endl;
 
-    min_magnitude[0] = 4.2;
-    min_magnitude[1] = 3.6;
-    min_magnitude[2] = 3.0;
-    min_magnitude[3] = 2.4;
-    min_magnitude[4] = 1.8;
-    min_magnitude[5] = 1.2;
-    min_magnitude[6] = 0.6;
-    min_magnitude[7] = 0.0;
-
-    // build the various star display lists
-    for ( i = 0; i < FG_STAR_LEVELS; i++ ) {
-
-	stars[i] = xglGenLists(1);
-	xglNewList( stars[i], GL_COMPILE );
-	xglBegin( GL_POINTS );
-
-	count = 0;
-
-	for ( j = 0; j < starcount; j++ ) {
-	    magnitude = starlist[j].z();
-	    // printf("magnitude = %.2f\n", magnitude);
-
-	    if ( magnitude < min_magnitude[i] ) {
-		right_ascension = starlist[j].x();
-		declination = starlist[j].y();
-
-		count++;
-
-		// scale magnitudes to (0.0 - 1.0)
-		magnitude = (0.0 - magnitude) / 5.0 + 1.0;
-		
-		// scale magnitudes again so they look ok
-		if ( magnitude > 1.0 ) { magnitude = 1.0; }
-		if ( magnitude < 0.0 ) { magnitude = 0.0; }
-		// magnitude =
-		//     magnitude * 0.7 + (((FG_STAR_LEVELS - 1) - i) * 0.042);
-		  
-		magnitude = magnitude * 0.9 + 
-		    (((FG_STAR_LEVELS - 1) - i) * 0.014);
-		// printf("  Found star: %d %s, %.3f %.3f %.3f\n", count,
-		//        name, right_ascension, declination, magnitude);
-		    
-		xglColor3f( magnitude, magnitude, magnitude );
-		//xglColor3f(0,0,0);*/
-		xglVertex3f( 50000.0*cos(right_ascension)*cos(declination),
-			     50000.0*sin(right_ascension)*cos(declination),
-			     50000.0*sin(declination) );
+	// read name and first comma
+	while ( in.get(c) ) {
+	    if ( (c != ' ') && (c != ',') ) {
+		// push back on the stream
+		in.putback(c);
+		break;
 	    }
-	} // while
-
-	xglEnd();
-
-	/*
-	xglBegin(GL_LINE_LOOP);
-        xglColor3f(1.0, 0.0, 0.0);
-	xglVertex3f( 50000.0 * cos(ra_save-0.2) * cos(decl_save-0.2),
-		    50000.0 * sin(ra_save-0.2) * cos(decl_save-0.2),
-		    50000.0 * sin(decl_save-0.2) );
-	xglVertex3f( 50000.0 * cos(ra_save+0.2) * cos(decl_save-0.2),
-		    50000.0 * sin(ra_save+0.2) * cos(decl_save-0.2),
-		    50000.0 * sin(decl_save-0.2) );
- 	xglVertex3f( 50000.0 * cos(ra_save+0.2) * cos(decl_save+0.2),
-		    50000.0 * sin(ra_save+0.2) * cos(decl_save+0.2),
-		    50000.0 * sin(decl_save+0.2) );
- 	xglVertex3f( 50000.0 * cos(ra_save-0.2) * cos(decl_save+0.2),
-		    50000.0 * sin(ra_save-0.2) * cos(decl_save+0.2),
-		    50000.0 * sin(decl_save+0.2) );
-	xglEnd();
-	*/
-
-	/*
-	xglBegin(GL_LINE_LOOP);
-        xglColor3f(0.0, 1.0, 0.0);
-	xglVertex3f( 50000.0 * cos(ra_save1-0.2) * cos(decl_save1-0.2),
-		    50000.0 * sin(ra_save1-0.2) * cos(decl_save1-0.2),
-		    50000.0 * sin(decl_save1-0.2) );
-	xglVertex3f( 50000.0 * cos(ra_save1+0.2) * cos(decl_save1-0.2),
-		    50000.0 * sin(ra_save1+0.2) * cos(decl_save1-0.2),
-		    50000.0 * sin(decl_save1-0.2) );
- 	xglVertex3f( 50000.0 * cos(ra_save1+0.2) * cos(decl_save1+0.2),
-		    50000.0 * sin(ra_save1+0.2) * cos(decl_save1+0.2),
-		    50000.0 * sin(decl_save1+0.2) );
- 	xglVertex3f( 50000.0 * cos(ra_save1-0.2) * cos(decl_save1+0.2),
-		    50000.0 * sin(ra_save1-0.2) * cos(decl_save1+0.2),
-		    50000.0 * sin(decl_save1+0.2) );
-	xglEnd();
-	*/
-
-	xglEndList();
-	    
-	FG_LOG( FG_ASTRO, FG_INFO,
-		"  Loading " << count << " stars brighter than " 
-		<< min_magnitude[i] );
-    }
-
-    return 1;  // OK, we got here because initialization worked.
-}
-
-
-// Draw the Stars
-void fgStarsRender( void ) {
-    FGInterface *f;
-    fgLIGHT *l;
-    FGTime *t;
-    int i;
-
-    f = current_aircraft.fdm_state;
-    l = &cur_light_params;
-    t = FGTime::cur_time_params;
-
-    // FG_PI_2 + 0.1 is about 6 degrees after sundown and before sunrise
-
-    // t->sun_angle = 3.0; // to force stars to be drawn (for testing)
-
-    // render the stars
-    if ( l->sun_angle > (FG_PI_2 + 5 * DEG_TO_RAD ) ) {
-	// determine which star structure to draw
-	if ( l->sun_angle > (FG_PI_2 + 10.0 * DEG_TO_RAD ) ) {
-	    i = 0;
-	} else if ( l->sun_angle > (FG_PI_2 + 8.8 * DEG_TO_RAD ) ) {
-	    i = 1;
-	} else if ( l->sun_angle > (FG_PI_2 + 7.5 * DEG_TO_RAD ) ) {
-	    i = 2;
-	} else if ( l->sun_angle > (FG_PI_2 + 7.0 * DEG_TO_RAD ) ) {
-	    i = 3;
-	} else if ( l->sun_angle > (FG_PI_2 + 6.5 * DEG_TO_RAD ) ) {
-	    i = 4;
-	} else if ( l->sun_angle > (FG_PI_2 + 6.0 * DEG_TO_RAD ) ) {
-	    i = 5;
-	} else if ( l->sun_angle > (FG_PI_2 + 5.5 * DEG_TO_RAD ) ) {
-	    i = 6;
-	} else {
-	    i = 7;
 	}
 
-	// printf("RENDERING STARS = %d (night)\n", i);
+	in >> ra;
 
-	xglCallList(stars[i]);
-    } else {
-	// printf("not RENDERING STARS (day)\n");
+	// read past optional comma
+	while ( in.get(c) ) {
+	    if ( (c != ' ') && (c != ',') ) {
+		// push back on the stream
+		in.putback(c);
+		break;
+	    }
+	}
+
+	in >> dec;
+
+	// read past optional comma
+	while ( in.get(c) ) {
+	    if ( (c != ' ') && (c != ',') ) {
+		// push back on the stream
+		in.putback(c);
+		break;
+	    }
+	}
+
+	in >> mag;
+
+	// cout << " star data = " << ra << " " << dec << " " << mag << endl;
+
+	sgdSetVec3( stars[nstars], ra, dec, mag );
+
+	++nstars;
     }
+
+    FG_LOG( FG_ASTRO, FG_INFO, "  Loaded " << nstars << " stars" );
+
+    return true;
 }
-
-

simgear/ephemeris/stars.hxx

@@ -1,8 +1,8 @@
-// stars.hxx -- data structures and routines for managing and rendering stars.
+// stars.hxx -- manage star data
 //
-// Written by Curtis Olson, started August 1997.
+// Written by Curtis Olson, started March 2000.
 //
-// Copyright (C) 1997  Curtis L. Olson  - curt@me.umn.edu
+// Copyright (C) 2000  Curtis L. Olson - curt@flightgear.org
 //
 // This program is free software; you can redistribute it and/or
 // modify it under the terms of the GNU General Public License as
@@ -25,23 +25,37 @@
 #define _STARS_HXX
 
 
-#ifndef __cplusplus                                                          
-# error This library requires C++
-#endif                                   
+#include <plib/sg.h>
 
-#include <Time/fg_time.hxx>
+#include <simgear/misc/fgpath.hxx>
 
-#define FG_STAR_LEVELS 8         // how many star transitions
 
-// Initialize the Star Management Subsystem
-int fgStarsInit( void );
+#define FG_MAX_STARS 850
 
-// Draw the Stars
-void fgStarsRender( void );
 
-// [no longer used?] extern FGTime cur_time_params;
+class FGStars {
+
+    int nstars;
+    sgdVec3 *stars;
+    
+    FGPath data_path;
+
+public:
+
+    // Constructor
+    FGStars();
+    FGStars( FGPath path );
+
+    // Destructor
+    ~FGStars();
+
+    // load the stars database
+    bool load();
+
+    // stars
+    inline int getNumStars() const { return nstars; }
+    inline sgdVec3 *getStars() { return stars; }
+};
 
 
 #endif // _STARS_HXX
-
-

simgear/ephemeris/uranus.cxx

@@ -45,6 +45,15 @@ Uranus::Uranus(FGTime *t) :
 		142.5905,   0.01172580600, t)
 {
 }
+Uranus::Uranus() :
+  CelestialBody(74.00050,   1.3978000E-5,
+		0.7733,     1.900E-8,
+		96.66120,   3.0565000E-5,
+		19.181710, -1.55E-8,
+		0.047318,   7.450E-9,
+		142.5905,   0.01172580600)
+{
+}
 
 /*************************************************************************
  * void Uranus::updatePosition(FGTime *t, Star *ourSun)

simgear/ephemeris/uranus.hxx

@@ -32,6 +32,7 @@ class Uranus : public CelestialBody
 {
 public:
   Uranus ( FGTime *t);
+  Uranus ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/ephemeris/venus.cxx

@@ -45,6 +45,15 @@ Venus::Venus(FGTime *t) :
 		48.00520,  1.60213022440, t)
 {
 }
+Venus::Venus() :
+  CelestialBody(76.67990,  2.4659000E-5, 
+		3.3946,    2.75E-8,
+		54.89100,  1.3837400E-5,
+		0.7233300, 0.000000,
+		0.006773, -1.302E-9,
+		48.00520,  1.60213022440)
+{
+}
 
 /*************************************************************************
  * void Venus::updatePosition(FGTime *t, Star *ourSun)

simgear/ephemeris/venus.hxx

@@ -32,6 +32,7 @@ class Venus : public CelestialBody
 {
 public:
   Venus ( FGTime *t);
+  Venus ();
   void updatePosition(FGTime *t, Star *ourSun);
 };
 

simgear/fg_traits.hxx

@@ -0,0 +1,23 @@
+#ifndef _FG_TRAITS_HXX
+#define _FG_TRAITS_HXX
+
+#include <simgear/compiler.h>
+
+#ifndef FG_HAVE_TRAITS
+
+// Dummy up some char traits for now.
+template<class charT> struct char_traits{};
+
+FG_TEMPLATE_NULL
+struct char_traits<char>
+{
+    typedef char      char_type;
+    typedef int       int_type;
+    typedef streampos pos_type;
+    typedef streamoff off_type;
+
+    static int_type eof() { return EOF; }
+};
+#endif // FG_HAVE_TRAITS
+
+#endif // _FG_TRAITS_HXX

simgear/fg_zlib.h

@@ -0,0 +1,86 @@
+/**************************************************************************
+ * fg_zlib.h -- a zlib wrapper to replace zlib calls with normal uncompressed
+ *              calls for systems that have problems building zlib.
+ *
+ * Written by Curtis Olson, started April 1998.
+ *
+ * Copyright (C) 1998  Curtis L. Olson  - curt@me.umn.edu
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ **************************************************************************/
+
+
+#ifndef _FG_ZLIB_H
+#define _FG_ZLIB_H
+
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+
+#ifdef AVOID_USING_ZLIB
+
+  #include <stdio.h>
+
+  #define fgFile FILE *
+
+  /* fgFile fgopen(char *filename, const char *flags) */
+  #define fgopen(P, F)  (fopen((P), (F)))
+
+  /* int fgseek(fgFile *file, long offset, int whence) */
+  #define fgseek(F, O, W)  (fseek((F), (O), (W)))
+
+  /* fgread(fgFile file, void *buf, int size); */
+  #define fgread(F, B, S)  (fread((B), (S), 1, (F)))
+
+  /* int fggets(fgFile fd, char *buffer, int len) */
+  #define fggets(F, B, L)  (fgets((B), (L), (F)))
+
+  /* int fgclose(fgFile fd) */
+  #define fgclose(F)  (fclose((F)))
+#else
+
+#ifdef HAVE_ZLIB
+  #include <zlib.h>
+#else
+  #include <simgear/zlib/zlib.h>
+#endif
+
+  #define fgFile gzFile
+
+  /* fgFile fgopen(char *filename, const char *flags) */
+  #define fgopen(P, F)  (gzopen((P), (F)))
+
+  /* int fgseek(fgFile *file, long offset, int whence) */
+  #define fgseek(F, O, W)  (gzseek((F), (O), (W)))
+
+  /* fgread(fgFile file, void *buf, int size); */
+  #define fgread(F, B, S)  (gzread((F), (B), (S)))
+
+  /* int fggets(fgFile fd, char *buffer, int len) */
+  #define fggets(F, B, L)  (gzgets((F), (B), (L)))
+
+  /* int fgclose(fgFile fd) */
+  #define fgclose(F)  (gzclose((F)))
+
+#endif /* #ifdef AVOID_USING_ZLIB #else #endif */
+
+
+#endif /* _FG_ZLIB_H */
+
+

simgear/magvar/Makefile.am

@@ -0,0 +1,15 @@
+includedir = @includedir@/magvar
+
+lib_LIBRARIES = libsgmagvar.a
+
+include_HEADERS = magvar.hxx
+
+libsgmagvar_a_SOURCES = magvar.cxx
+
+noinst_PROGRAMS = testmagvar
+
+testmagvar_SOURCES = testmagvar.cxx
+
+testmagvar_LDADD = $(top_builddir)/simgear/magvar/libsgmagvar.a
+
+INCLUDES += -I$(top_builddir)

simgear/magvar/magvar.cxx

@@ -0,0 +1,464 @@
+// magvar.cxx -- compute local magnetic variation given position,
+//               altitude, and date
+//
+// This is an implementation of the NIMA (formerly DMA) WMM2000
+//
+//    http://www.nima.mil/GandG/ngdc-wmm2000.html
+//
+// Copyright (C) 2000  Edward A Williams <Ed_Williams@compuserve.com>
+//
+// Adapted from Excel 3.0 version 3/27/94 EAW
+// Recoded in C++ by Starry Chan
+// WMM95 added and rearranged in ANSI-C EAW 7/9/95
+// Put shell around program and made Borland & GCC compatible EAW 11/22/95
+// IGRF95 added 2/96 EAW
+// WMM2000 IGR2000 added 2/00 EAW
+// Released under GPL 3/26/00 EAW
+// Adaptions and modifications for the SimGear project  3/27/2000 CLO
+//
+// Removed all pow() calls and made static roots[][] arrays to
+// save many sqrt() calls on subsequent invocations
+// left old code as SGMagVarOrig() for testing purposes
+// 3/28/2000  Norman Vine -- nhv@yahoo.com
+//
+// Put in some bullet-proofing to handle magnetic and geographic poles.
+// 3/28/2000 EAW
+
+//  The routine uses a spherical harmonic expansion of the magnetic
+// potential up to twelfth order, together with its time variation, as
+// described in Chapter 4 of "Geomagnetism, Vol 1, Ed. J.A.Jacobs,
+// Academic Press (London 1987)". The program first converts geodetic
+// coordinates (lat/long on elliptic earth and altitude) to spherical
+// geocentric (spherical lat/long and radius) coordinates. Using this,
+// the spherical (B_r, B_theta, B_phi) magnetic field components are
+// computed from the model. These are finally referred to surface (X, Y,
+// Z) coordinates.
+//
+//   Fields are accurate to better than 200nT, variation and dip to
+// better than 0.5 degrees, with the exception of the declination near
+// the magnetic poles (where it is ill-defined) where the error may reach
+// 4 degrees or more.
+//
+//   Variation is undefined at both the geographic and  
+// magnetic poles, even though the field itself is well-behaved. To
+// avoid the routine blowing up, latitude entries corresponding to
+// the geographic poles are slightly offset. At the magnetic poles,
+// the routine returns zero variation.
+
+
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+
+#include "magvar.hxx"
+
+
+#define	max(a,b)	(((a) > (b)) ? (a) : (b))
+
+static const double pi = 3.14159265358979;
+static const double a = 6378.16;	/* major radius (km) IAU66 ellipsoid */
+static const double f = 1.0 / 298.25;	/* inverse flattening IAU66 ellipsoid */
+static const double b = 6378.16 * (1.0 -1.0 / 298.25 );
+/* minor radius b=a*(1-f) */
+static const double r_0 = 6371.2;	/* "mean radius" for spherical harmonic expansion */
+
+static double gnm_wmm2000[13][13] =
+{
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-29616.0, -1722.7, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-2266.7, 3070.2, 1677.6, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {1322.4, -2291.5, 1255.9, 724.8, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {932.1, 786.3, 250.6, -401.5, 106.2, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-211.9, 351.6, 220.8, -134.5, -168.8, -13.3, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {73.8, 68.2, 74.1, -163.5, -3.8, 17.1, -85.1, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {77.4, -73.9, 2.2, 35.7, 7.3, 5.2, 8.4, -1.5, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {23.3, 7.3, -8.5, -6.6, -16.9, 8.6, 4.9, -7.8, -7.6, 0.0, 0.0, 0.0, 0.0},
+    {5.7, 8.5, 2.0, -9.8, 7.6, -7.0, -2.0, 9.2, -2.2, -6.6, 0.0, 0.0, 0.0},
+    {-2.2, -5.7, 1.6, -3.7, -0.6, 4.1, 2.2, 2.2, 4.6, 2.3, 0.1, 0.0, 0.0},
+    {3.3, -1.1, -2.4, 2.6, -1.3, -1.7, -0.6, 0.4, 0.7, -0.3, 2.3, 4.2, 0.0},
+    {-1.5, -0.2, -0.3, 0.5, 0.2, 0.9, -1.4, 0.6, -0.6, -1.0, -0.3, 0.3, 0.4},
+};
+
+static double hnm_wmm2000[13][13]=
+{
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 5194.5, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -2484.8, -467.9, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -224.7, 293.0, -486.5, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 273.3, -227.9, 120.9, -302.7, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 42.0, 173.8, -135.0, -38.6, 105.2, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -17.4, 61.2, 63.2, -62.9, 0.2, 43.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -62.3, -24.5, 8.9, 23.4, 15.0, -27.6, -7.8, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 12.4, -20.8, 8.4, -21.2, 15.5, 9.1, -15.5, -5.4, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -20.4, 13.9, 12.0, -6.2, -8.6, 9.4, 5.0, -8.4, 3.2, 0.0, 0.0, 0.0},
+    {0.0, 0.9, -0.7, 3.9, 4.8, -5.3, -1.0, -2.4, 1.3, -2.3, -6.4, 0.0, 0.0},
+    {0.0, -1.5, 0.7, -1.1, -2.3, 1.3, -0.6, -2.8, -1.6, -0.1, -1.9, 1.4, 0.0},
+    {0.0, -1.0, 0.7, 2.2, -2.5, -0.2, 0.0, -0.2, 0.0, 0.2, -0.9, -0.2, 1.0},
+};
+
+static double gtnm_wmm2000[13][13]=
+{
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {14.7, 11.1, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-13.6, -0.7, -1.8, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.3, -4.3, 0.9, -8.4, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-1.6, 0.9, -7.6, 2.2, -3.2, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-0.9, -0.2, -2.5, -2.7, -0.9, 1.7, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {1.2, 0.2, 1.7, 1.6, -0.1, -0.3, 0.8, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-0.4, -0.8, -0.2, 1.1, 0.4, 0.0, -0.2, -0.2, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {-0.3, 0.6, -0.8, 0.3, -0.2, 0.5, 0.0, -0.6, 0.1, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+};
+
+static double htnm_wmm2000[13][13]=
+{
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -20.4, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -21.5, -9.6, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 6.4, -1.3, -13.3, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 2.3, 0.7, 3.7, -0.5, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 2.1, 2.3, 3.1, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -0.3, -1.7, -0.9, -1.0, -0.1, 1.9, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 1.4, 0.2, 0.7, 0.4, -0.3, -0.8, -0.1, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, -0.5, 0.1, -0.2, 0.0, 0.1, -0.1, 0.3, 0.2, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+    {0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0},
+};
+
+static const int nmax = 12;
+
+static double P[13][13];
+static double DP[13][13];
+static double gnm[13][13];
+static double hnm[13][13];
+static double sm[13];
+static double cm[13];
+
+static double root[13];
+static double roots[13][13][2];
+
+/* Convert date to Julian day    1950-2049 */
+unsigned long int yymmdd_to_julian_days( int yy, int mm, int dd )
+{
+    unsigned long jd;
+ 
+    yy = (yy < 50) ? (2000 + yy) : (1900 + yy);
+    jd = dd - 32075L + 1461L * (yy + 4800L + (mm - 14) / 12 ) / 4;
+    jd = jd + 367L * (mm - 2 - (mm - 14) / 12*12) / 12;
+    jd = jd - 3 * ((yy + 4900L + (mm - 14) / 12) / 100) / 4;
+
+    /* printf("julian date = %d\n", jd ); */
+    return jd;
+} 
+
+
+/* Convert degrees to radians */
+double deg_to_rad( double deg )
+{
+    return deg*pi/180.;
+}
+
+
+/* Convert radians to degrees */
+double rad_to_deg( double rad )
+{
+    return rad*180./pi;
+}
+	     
+
+/*
+ * return variation (in radians) given geodetic latitude (radians),
+ * longitude(radians), height (km) and (Julian) date
+ * N and E lat and long are positive, S and W negative
+*/
+
+double SGMagVar( double lat, double lon, double h, long dat, double* field )
+{
+    /* output field B_r,B_th,B_phi,B_x,B_y,B_z */
+    int n,m;
+    /* reference dates */
+    long date0_wmm2000 = yymmdd_to_julian_days(0,1,1);
+
+    double yearfrac,sr,r,theta,c,s,psi,fn,fn_0,B_r,B_theta,B_phi,X,Y,Z;
+    double sinpsi, cospsi, inv_s;
+
+    static int been_here = 0;
+
+    double sinlat = sin(lat);
+    double coslat = cos(lat);
+
+    /* convert to geocentric coords: */
+    // sr = sqrt(pow(a*coslat,2.0)+pow(b*sinlat,2.0));
+    sr = sqrt(a*a*coslat*coslat + b*b*sinlat*sinlat);
+    /* sr is effective radius */
+    theta = atan2(coslat * (h*sr + a*a),
+		  sinlat * (h*sr + b*b));
+    /* theta is geocentric co-latitude */
+
+    r = h*h + 2.0*h * sr +
+	(a*a*a*a - ( a*a*a*a - b*b*b*b ) * sinlat*sinlat ) / 
+	(a*a - (a*a - b*b) * sinlat*sinlat );
+
+    r = sqrt(r);
+
+    /* r is geocentric radial distance */
+    c = cos(theta);
+    s = sin(theta);
+    /* protect against zero divide at geographic poles */
+    inv_s =  1.0 / (s + (s == 0.)*1.0e-8); 
+
+    /* zero out arrays */
+    for ( n = 0; n <= nmax; n++ ) {
+	for ( m = 0; m <= n; m++ ) {
+	    P[n][m] = 0;
+	    DP[n][m] = 0;
+	}
+    }
+
+    /* diagonal elements */
+    P[0][0] = 1;
+    P[1][1] = s;
+    DP[0][0] = 0;
+    DP[1][1] = c;
+    P[1][0] = c ;
+    DP[1][0] = -s;
+
+    // these values will not change for subsequent function calls
+    if( !been_here ) {
+	for ( n = 2; n <= nmax; n++ ) {
+	    root[n] = sqrt((2.0*n-1) / (2.0*n));
+	}
+
+	for ( m = 0; m <= nmax; m++ ) {
+	    double mm = m*m;
+	    for ( n = max(m + 1, 2); n <= nmax; n++ ) {
+		roots[m][n][0] = sqrt((n-1)*(n-1) - mm);
+		roots[m][n][1] = 1.0 / sqrt( n*n - mm);
+	    }
+	}
+	been_here = 1;
+    }
+
+    for ( n=2; n <= nmax; n++ ) {
+	// double root = sqrt((2.0*n-1) / (2.0*n));
+	P[n][n] = P[n-1][n-1] * s * root[n];
+	DP[n][n] = (DP[n-1][n-1] * s + P[n-1][n-1] * c) *
+	    root[n];
+    }
+
+    /* lower triangle */
+    for ( m = 0; m <= nmax; m++ ) {
+	// double mm = m*m;
+	for ( n = max(m + 1, 2); n <= nmax; n++ ) {
+	    // double root1 = sqrt((n-1)*(n-1) - mm);
+	    // double root2 = 1.0 / sqrt( n*n - mm);
+	    P[n][m] = (P[n-1][m] * c * (2.0*n-1) -
+		       P[n-2][m] * roots[m][n][0]) *
+		roots[m][n][1];
+
+	    DP[n][m] = ((DP[n-1][m] * c - P[n-1][m] * s) *
+			(2.0*n-1) - DP[n-2][m] * roots[m][n][0]) *
+		roots[m][n][1];
+	}
+    }
+
+    /* compute gnm, hnm at dat */
+    /* WMM2000 */
+    yearfrac = (dat - date0_wmm2000) / 365.25;
+    for ( n = 1; n <= nmax; n++ ) {
+	for ( m = 0; m <= nmax; m++ ) {
+	    gnm[n][m] = gnm_wmm2000[n][m] + yearfrac * gtnm_wmm2000[n][m];
+	    hnm[n][m] = hnm_wmm2000[n][m] + yearfrac * htnm_wmm2000[n][m];
+	}
+    }
+
+    /* compute sm (sin(m lon) and cm (cos(m lon)) */
+    for ( m = 0; m <= nmax; m++ ) {
+	sm[m] = sin(m * lon);
+	cm[m] = cos(m * lon);
+    }
+
+    /* compute B fields */
+    B_r = 0.0;
+    B_theta = 0.0;
+    B_phi = 0.0;
+    fn_0 = r_0/r;
+    fn = fn_0 * fn_0;
+
+    for ( n = 1; n <= nmax; n++ ) {
+	double c1_n=0;
+	double c2_n=0;
+	double c3_n=0;
+	for ( m = 0; m <= n; m++ ) {
+	    double tmp = (gnm[n][m] * cm[m] + hnm[n][m] * sm[m]); 
+	    c1_n=c1_n + tmp * P[n][m];
+	    c2_n=c2_n + tmp * DP[n][m];
+	    c3_n=c3_n + m * (gnm[n][m] * sm[m] - hnm[n][m] * cm[m]) * P[n][m];
+	}
+	// fn=pow(r_0/r,n+2.0);
+	fn *= fn_0;
+	B_r = B_r + (n + 1) * c1_n * fn;
+	B_theta = B_theta - c2_n * fn;
+	B_phi = B_phi + c3_n * fn * inv_s;
+    }
+
+    /* Find geodetic field components: */
+    psi = theta - ((pi / 2.0) - lat);
+    sinpsi = sin(psi);
+    cospsi = cos(psi);
+    X = -B_theta * cospsi - B_r * sinpsi;
+    Y = B_phi;
+    Z = B_theta * sinpsi - B_r * cospsi;
+
+    field[0]=B_r;
+    field[1]=B_theta;
+    field[2]=B_phi;
+    field[3]=X;
+    field[4]=Y;
+    field[5]=Z;   /* output fields */
+
+    /* find variation in radians */
+    /* return zero variation at magnetic pole X=Y=0. */
+    /* E is positive */
+    return (X != 0. || Y != 0.) ? atan2(Y, X) : (double) 0.;  
+}
+
+
+#ifdef TEST_NHV_HACKS
+double SGMagVarOrig( double lat, double lon, double h, long dat, double* field )
+{
+    /* output field B_r,B_th,B_phi,B_x,B_y,B_z */
+    int n,m;
+    /* reference dates */
+    long date0_wmm2000 = yymmdd_to_julian_days(0,1,1);
+
+    double yearfrac,sr,r,theta,c,s,psi,fn,B_r,B_theta,B_phi,X,Y,Z;
+
+    /* convert to geocentric coords: */
+    sr = sqrt(pow(a*cos(lat),2.0)+pow(b*sin(lat),2.0));
+    /* sr is effective radius */
+    theta = atan2(cos(lat) * (h * sr + a * a),
+		  sin(lat) * (h * sr + b * b));
+    /* theta is geocentric co-latitude */
+
+    r = h * h + 2.0*h * sr +
+	(pow(a,4.0) - (pow(a,4.0) - pow(b,4.0)) * pow(sin(lat),2.0)) / 
+	(a * a - (a * a - b * b) * pow(sin(lat),2.0));
+
+    r = sqrt(r);
+
+    /* r is geocentric radial distance */
+    c = cos(theta);
+    s = sin(theta);
+
+    /* zero out arrays */
+    for ( n = 0; n <= nmax; n++ ) {
+	for ( m = 0; m <= n; m++ ) {
+	    P[n][m] = 0;
+	    DP[n][m] = 0;
+	}
+    }
+
+    /* diagonal elements */
+    P[0][0] = 1;
+    P[1][1] = s;
+    DP[0][0] = 0;
+    DP[1][1] = c;
+    P[1][0] = c ;
+    DP[1][0] = -s;
+
+    for ( n = 2; n <= nmax; n++ ) {
+	P[n][n] = P[n-1][n-1] * s * sqrt((2.0*n-1) / (2.0*n));
+	DP[n][n] = (DP[n-1][n-1] * s + P[n-1][n-1] * c) *
+	    sqrt((2.0*n-1) / (2.0*n));
+    }
+
+    /* lower triangle */
+    for ( m = 0; m <= nmax; m++ ) {
+	for ( n = max(m + 1, 2); n <= nmax; n++ ) {
+	    P[n][m] = (P[n-1][m] * c * (2.0*n-1) - P[n-2][m] *
+		       sqrt(1.0*(n-1)*(n-1) - m * m)) /
+		sqrt(1.0* n * n - m * m);
+	    DP[n][m] = ((DP[n-1][m] * c - P[n-1][m] * s) *
+			(2.0*n-1) - DP[n-2][m] *
+			sqrt(1.0*(n-1) * (n-1) - m * m)) /
+		sqrt(1.0* n * n - m * m);
+	}
+    }
+
+    /* compute gnm, hnm at dat */
+    /* WMM2000 */
+    yearfrac = (dat - date0_wmm2000) / 365.25;
+    for ( n = 1; n <= nmax; n++ ) {
+	for ( m = 0; m <= nmax; m++ ) {
+	    gnm[n][m] = gnm_wmm2000[n][m] + yearfrac * gtnm_wmm2000[n][m];
+	    hnm[n][m] = hnm_wmm2000[n][m] + yearfrac * htnm_wmm2000[n][m];
+	}
+    }
+
+    /* compute sm (sin(m lon) and cm (cos(m lon)) */
+    for ( m = 0; m <= nmax; m++ ) {
+	sm[m] = sin(m * lon);
+	cm[m] = cos(m * lon);
+    }
+
+    /* compute B fields */
+    B_r = 0.0;
+    B_theta = 0.0;
+    B_phi = 0.0;
+
+    for ( n = 1; n <= nmax; n++ ) {
+	double c1_n=0;
+	double c2_n=0;
+	double c3_n=0;
+	for ( m = 0; m <= n; m++ ) {
+	    c1_n=c1_n + (gnm[n][m] * cm[m] + hnm[n][m] * sm[m]) * P[n][m];
+	    c2_n=c2_n + (gnm[n][m] * cm[m] + hnm[n][m] * sm[m]) * DP[n][m];
+	    c3_n=c3_n + m * (gnm[n][m] * sm[m] - hnm[n][m] * cm[m]) * P[n][m];
+	}
+	fn=pow(r_0/r,n+2.0);
+	B_r = B_r + (n + 1) * c1_n * fn;
+	B_theta = B_theta - c2_n * fn;
+	B_phi = B_phi + c3_n * fn / s;
+    }
+
+    /* Find geodetic field components: */
+    psi = theta - (pi / 2.0 - lat);
+    X = -B_theta * cos(psi) - B_r * sin(psi);
+    Y = B_phi;
+    Z = B_theta * sin(psi) - B_r * cos(psi);
+
+    field[0]=B_r;
+    field[1]=B_theta;
+    field[2]=B_phi;
+    field[3]=X;
+    field[4]=Y;
+    field[5]=Z;   /* output fields */
+
+    /* find variation, leave in radians! */
+    return atan2(Y, X);  /* E is positive */
+}
+#endif // TEST_NHV_HACKS

simgear/magvar/magvar.hxx

@@ -0,0 +1,56 @@
+// magvar.hxx -- compute local magnetic variation given position,
+//               altitude, and date
+//
+// This is an implimentation of the NIMA WMM 2000
+//
+//    http://www.nima.mil/GandG/ngdc-wmm2000.html
+//
+// Copyright (C) 2000  Edward A Williams <Ed_Williams@compuserve.com>
+//
+// Adapted from Excel 3.0 version 3/27/94 EAW
+// Recoded in C++ by Starry Chan
+// WMM95 added and rearranged in ANSI-C EAW 7/9/95
+// Put shell around program and made Borland & GCC compatible EAW 11/22/95
+// IGRF95 added 2/96 EAW
+// WMM2000 IGR2000 added 2/00 EAW
+// Released under GPL 3/26/00 EAW
+// Adaptions and modifications for the SimGear project  3/27/2000 CLO
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef SG_MAGVAR_HXX
+#define SG_MAGVAR_HXX
+
+
+/* Convert date to Julian day    1950-2049 */
+unsigned long int yymmdd_to_julian_days( int yy, int mm, int dd );
+
+/* Convert degrees to radians */
+double deg_to_rad( double deg );
+
+/* Convert radians to degrees */
+double rad_to_deg( double rad );
+
+/* return variation (in degrees) given geodetic latitude (radians), longitude
+(radians) ,height (km) and (Julian) date
+N and E lat and long are positive, S and W negative
+*/
+double SGMagVar( double lat, double lon, double h, long dat, double* field );
+
+
+#endif // SG_MAGVAR_HXX

simgear/magvar/testmagvar.cxx

@@ -0,0 +1,56 @@
+/* 2/14/00 fixed help message- dip angle (down positive), variation (E positive) */
+
+#include	<stdio.h>
+#include	<stdlib.h>
+#include	<math.h>
+
+#include "magvar.hxx"
+
+
+int main(int argc, char *argv[])
+{
+  /* args are double lat_deg, double lon_deg, double h, 
+                   int mm, int dd, int yy,int model */
+  /* output N, E, down components of B (nTesla)
+     dip angle (down positive), variation (E positive) */
+double lat_deg,lon_deg,h,var;
+int model,yy,mm,dd;
+double field[6];
+
+if ((argc != 8) && (argc !=7)) {
+fprintf(stdout,"Usage: mag lat_deg lon_deg h mm dd yy [model]\n");
+fprintf(stdout,"N latitudes, E longitudes positive degrees, h in km, mm dd yy is date\n");
+fprintf(stdout,"model 1,2,3,4,5,6,7 <=> IGRF90,WMM85,WMM90,WMM95,IGRF95,WMM2000,IGRF2000\n");
+fprintf(stdout,"Default model is IGRF2000, valid 1/1/00 - 12/31/05\n");
+fprintf(stdout,"Output Bx (N) By (E) Bz (down) (in nTesla) dip (degrees down positive)\n");
+fprintf(stdout,"variation (degrees E positive)\n");
+exit(1);
+}
+
+lat_deg=strtod(argv[1],NULL);
+lon_deg=strtod(argv[2],NULL);
+h=      strtod(argv[3],NULL);
+mm=     (int)strtol(argv[4],NULL,10);
+dd=     (int)strtol(argv[5],NULL,10);
+yy=     (int)strtol(argv[6],NULL,10);
+if (argc == 8){
+  model=  (int)strtol(argv[7],NULL,10);
+}else{
+  model=7;
+}
+
+
+var = SGMagVar( deg_to_rad(lat_deg), deg_to_rad(lon_deg), h,
+                yymmdd_to_julian_days(yy,mm,dd), field );
+
+fprintf(stdout,"%6.0lf %6.0lf %6.0lf\n", field[0], field[1], field[2] );
+fprintf(stdout,"%6.0lf %6.0lf %6.0lf\n", field[3], field[4], field[5] );
+fprintf(stdout,"%6.0lf %6.0lf %6.0lf %4.2lf %4.2lf \n",
+  field[3],field[4],field[5],
+  rad_to_deg(atan(field[5]/pow(field[3]*field[3]+field[4]*field[4],0.5))),
+  rad_to_deg(var));
+exit(0);
+}
+  
+  
+

simgear/math/Makefile.am

@@ -0,0 +1,32 @@
+includedir = @includedir@/math
+
+if HAVE_ZLIB
+ZLIB_INCL =
+else
+ZLIB_INCL = -I$(top_builddir)/src/zlib
+endif
+
+lib_LIBRARIES = libsgmath.a
+
+include_HEADERS = \
+	fg_geodesy.hxx \
+	fg_memory.h \
+	fg_random.h \
+	fg_types.hxx \
+	interpolater.hxx \
+	leastsqs.hxx \
+	point3d.hxx \
+	polar3d.hxx \
+	vector.hxx
+
+EXTRA_DIST = linintp2.h linintp2.inl sphrintp.h sphrintp.inl
+
+libsgmath_a_SOURCES = \
+	fg_geodesy.cxx \
+	fg_random.c \
+	interpolater.cxx \
+	leastsqs.cxx \
+	polar3d.cxx \
+	vector.cxx
+
+INCLUDES += -I$(top_builddir) $(ZLIB_INCL)

simgear/math/fg_geodesy.cxx

@@ -0,0 +1,446 @@
+// fg_geodesy.cxx -- routines to convert between geodetic and geocentric 
+//                   coordinate systems.
+//
+// Copied and adapted directly from LaRCsim/ls_geodesy.c
+//
+// See below for the complete original LaRCsim comments.
+//
+// $Id$
+
+#include <simgear/compiler.h>
+
+#ifdef FG_HAVE_STD_INCLUDES
+# include <cmath>
+# include <cerrno>
+#else
+# include <math.h>
+# include <errno.h>
+#endif
+
+#include <simgear/constants.h>
+#include <simgear/debug/logstream.hxx>
+
+#include "point3d.hxx"
+#include "fg_geodesy.hxx"
+
+#ifndef FG_HAVE_NATIVE_SGI_COMPILERS
+FG_USING_STD(cout);
+#endif
+
+// ONE_SECOND is pi/180/60/60, or about 100 feet at earths' equator
+#define ONE_SECOND 4.848136811E-6
+
+
+// fgGeocToGeod(lat_geoc, radius, *lat_geod, *alt, *sea_level_r)
+//     INPUTS:	
+//         lat_geoc	Geocentric latitude, radians, + = North
+//         radius	C.G. radius to earth center (meters)
+//
+//     OUTPUTS:
+//         lat_geod	Geodetic latitude, radians, + = North
+//         alt		C.G. altitude above mean sea level (meters)
+//         sea_level_r	radius from earth center to sea level at
+//                      local vertical (surface normal) of C.G. (meters)
+
+
+void fgGeocToGeod( double lat_geoc, double radius, double
+		   *lat_geod, double *alt, double *sea_level_r )
+{
+    double t_lat, x_alpha, mu_alpha, delt_mu, r_alpha, l_point, rho_alpha;
+    double sin_mu_a, denom,delt_lambda, lambda_sl, sin_lambda_sl;
+
+    if( ( (FG_PI_2 - lat_geoc) < ONE_SECOND )        // near North pole
+	|| ( (FG_PI_2 + lat_geoc) < ONE_SECOND ) )   // near South pole
+    {
+	*lat_geod = lat_geoc;
+	*sea_level_r = EQUATORIAL_RADIUS_M*E;
+	*alt = radius - *sea_level_r;
+    } else {
+	t_lat = tan(lat_geoc);
+	x_alpha = E*EQUATORIAL_RADIUS_M/sqrt(t_lat*t_lat + E*E);
+	double tmp = RESQ_M - x_alpha * x_alpha;
+	if ( tmp < 0.0 ) { tmp = 0.0; }
+	mu_alpha = atan2(sqrt(tmp),E*x_alpha);
+	if (lat_geoc < 0) mu_alpha = - mu_alpha;
+	sin_mu_a = sin(mu_alpha);
+	delt_lambda = mu_alpha - lat_geoc;
+	r_alpha = x_alpha/cos(lat_geoc);
+	l_point = radius - r_alpha;
+	*alt = l_point*cos(delt_lambda);
+
+	// check for domain error
+	if ( errno == EDOM ) {
+	    FG_LOG( FG_GENERAL, FG_ALERT, "Domain ERROR in fgGeocToGeod!!!!" );
+	    *alt = 0.0;
+	}
+
+	denom = sqrt(1-EPS*EPS*sin_mu_a*sin_mu_a);
+	rho_alpha = EQUATORIAL_RADIUS_M*(1-EPS)/
+	    (denom*denom*denom);
+	delt_mu = atan2(l_point*sin(delt_lambda),rho_alpha + *alt);
+	*lat_geod = mu_alpha - delt_mu;
+	lambda_sl = atan( E*E * tan(*lat_geod) ); // SL geoc. latitude
+	sin_lambda_sl = sin( lambda_sl );
+	*sea_level_r = 
+	    sqrt(RESQ_M / (1 + ((1/(E*E))-1)*sin_lambda_sl*sin_lambda_sl));
+
+	// check for domain error
+	if ( errno == EDOM ) {
+	    FG_LOG( FG_GENERAL, FG_ALERT, "Domain ERROR in fgGeocToGeod!!!!" );
+	    *sea_level_r = 0.0;
+	}
+    }
+
+}
+
+
+// fgGeodToGeoc( lat_geod, alt, *sl_radius, *lat_geoc )
+//     INPUTS:	
+//         lat_geod	Geodetic latitude, radians, + = North
+//         alt		C.G. altitude above mean sea level (meters)
+//
+//     OUTPUTS:
+//         sl_radius	SEA LEVEL radius to earth center (meters)
+//                      (add Altitude to get true distance from earth center.
+//         lat_geoc	Geocentric latitude, radians, + = North
+//
+
+
+void fgGeodToGeoc( double lat_geod, double alt, double *sl_radius,
+		      double *lat_geoc )
+{
+    double lambda_sl, sin_lambda_sl, cos_lambda_sl, sin_mu, cos_mu, px, py;
+    
+    lambda_sl = atan( E*E * tan(lat_geod) ); // sea level geocentric latitude
+    sin_lambda_sl = sin( lambda_sl );
+    cos_lambda_sl = cos( lambda_sl );
+    sin_mu = sin(lat_geod);                  // Geodetic (map makers') latitude
+    cos_mu = cos(lat_geod);
+    *sl_radius = 
+	sqrt(RESQ_M / (1 + ((1/(E*E))-1)*sin_lambda_sl*sin_lambda_sl));
+    py = *sl_radius*sin_lambda_sl + alt*sin_mu;
+    px = *sl_radius*cos_lambda_sl + alt*cos_mu;
+    *lat_geoc = atan2( py, px );
+}
+
+
+// Direct and inverse distance functions 
+//
+// Proceedings of the 7th International Symposium on Geodetic
+// Computations, 1985
+//
+// "The Nested Coefficient Method for Accurate Solutions of Direct and
+// Inverse Geodetic Problems With Any Length"
+//
+// Zhang Xue-Lian
+// pp 747-763
+//
+// modified for FlightGear to use WGS84 only -- Norman Vine
+
+#define GEOD_INV_PI FG_PI
+
+// s == distance
+// az = azimuth
+
+// for WGS_84 a = 6378137.000, rf = 298.257223563;
+
+static double M0( double e2 ) {
+    //double e4 = e2*e2;
+    return GEOD_INV_PI*(1.0 - e2*( 1.0/4.0 + e2*( 3.0/64.0 + 
+						  e2*(5.0/256.0) )))/2.0;
+}
+
+
+// given, alt, lat1, lon1, az1 and distance (s), calculate lat2, lon2
+// and az2.  Lat, lon, and azimuth are in degrees.  distance in meters
+int geo_direct_wgs_84 ( double alt, double lat1, double lon1, double az1, 
+			double s, double *lat2, double *lon2,  double *az2 )
+{
+    double a = 6378137.000, rf = 298.257223563;
+    double RADDEG = (GEOD_INV_PI)/180.0, testv = 1.0E-10;
+    double f = ( rf > 0.0 ? 1.0/rf : 0.0 );
+    double b = a*(1.0-f);
+    double e2 = f*(2.0-f);
+    double phi1 = lat1*RADDEG, lam1 = lon1*RADDEG;
+    double sinphi1 = sin(phi1), cosphi1 = cos(phi1);
+    double azm1 = az1*RADDEG;
+    double sinaz1 = sin(azm1), cosaz1 = cos(azm1);
+	
+	
+    if( fabs(s) < 0.01 ) {	// distance < centimeter => congruency
+	*lat2 = lat1;
+	*lon2 = lon1;
+	*az2 = 180.0 + az1;
+	if( *az2 > 360.0 ) *az2 -= 360.0;
+	return 0;
+    } else if( cosphi1 ) {	// non-polar origin
+	// u1 is reduced latitude
+	double tanu1 = sqrt(1.0-e2)*sinphi1/cosphi1;
+	double sig1 = atan2(tanu1,cosaz1);
+	double cosu1 = 1.0/sqrt( 1.0 + tanu1*tanu1 ), sinu1 = tanu1*cosu1;
+	double sinaz =  cosu1*sinaz1, cos2saz = 1.0-sinaz*sinaz;
+	double us = cos2saz*e2/(1.0-e2);
+
+	// Terms
+	double	ta = 1.0+us*(4096.0+us*(-768.0+us*(320.0-175.0*us)))/16384.0,
+	    tb = us*(256.0+us*(-128.0+us*(74.0-47.0*us)))/1024.0,
+	    tc = 0;
+
+	// FIRST ESTIMATE OF SIGMA (SIG)
+	double first = s/(b*ta);  // !!
+	double sig = first;
+	double c2sigm, sinsig,cossig, temp,denom,rnumer, dlams, dlam;
+	do {
+	    c2sigm = cos(2.0*sig1+sig);
+	    sinsig = sin(sig); cossig = cos(sig);
+	    temp = sig;
+	    sig = first + 
+		tb*sinsig*(c2sigm+tb*(cossig*(-1.0+2.0*c2sigm*c2sigm) - 
+				      tb*c2sigm*(-3.0+4.0*sinsig*sinsig)
+				      *(-3.0+4.0*c2sigm*c2sigm)/6.0)
+			   /4.0);
+	} while( fabs(sig-temp) > testv);
+
+	// LATITUDE OF POINT 2
+	// DENOMINATOR IN 2 PARTS (TEMP ALSO USED LATER)
+	temp = sinu1*sinsig-cosu1*cossig*cosaz1;
+	denom = (1.0-f)*sqrt(sinaz*sinaz+temp*temp);
+
+	// NUMERATOR
+	rnumer = sinu1*cossig+cosu1*sinsig*cosaz1;
+	*lat2 = atan2(rnumer,denom)/RADDEG;
+
+	// DIFFERENCE IN LONGITUDE ON AUXILARY SPHERE (DLAMS )
+	rnumer = sinsig*sinaz1;
+	denom = cosu1*cossig-sinu1*sinsig*cosaz1;
+	dlams = atan2(rnumer,denom);
+
+	// TERM C
+	tc = f*cos2saz*(4.0+f*(4.0-3.0*cos2saz))/16.0;
+
+	// DIFFERENCE IN LONGITUDE
+	dlam = dlams-(1.0-tc)*f*sinaz*(sig+tc*sinsig*
+				       (c2sigm+
+					tc*cossig*(-1.0+2.0*
+						   c2sigm*c2sigm)));
+	*lon2 = (lam1+dlam)/RADDEG;
+	if (*lon2 > 180.0  ) *lon2 -= 360.0;
+	if (*lon2 < -180.0 ) *lon2 += 360.0;
+
+	// AZIMUTH - FROM NORTH
+	*az2 = atan2(-sinaz,temp)/RADDEG;
+	if ( fabs(*az2) < testv ) *az2 = 0.0;
+	if( *az2 < 0.0) *az2 += 360.0;
+	return 0;
+    } else {			// phi1 == 90 degrees, polar origin
+	double dM = a*M0(e2) - s;
+	double paz = ( phi1 < 0.0 ? 180.0 : 0.0 );
+	return geo_direct_wgs_84( alt, 0.0, lon1, paz, dM,lat2,lon2,az2 );
+    } 
+}
+
+
+// given alt, lat1, lon1, lat2, lon2, calculate starting and ending
+// az1, az2 and distance (s).  Lat, lon, and azimuth are in degrees.
+// distance in meters
+int geo_inverse_wgs_84( double alt, double lat1, double lon1, double lat2,
+			double lon2, double *az1, double *az2, double *s )
+{
+    double a = 6378137.000, rf = 298.257223563;
+    int iter=0;
+    double RADDEG = (GEOD_INV_PI)/180.0, testv = 1.0E-10;
+    double f = ( rf > 0.0 ? 1.0/rf : 0.0 );
+    double b = a*(1.0-f);
+    // double e2 = f*(2.0-f); // unused in this routine
+    double phi1 = lat1*RADDEG, lam1 = lon1*RADDEG;
+    double sinphi1 = sin(phi1), cosphi1 = cos(phi1);
+    double phi2 = lat2*RADDEG, lam2 = lon2*RADDEG;
+    double sinphi2 = sin(phi2), cosphi2 = cos(phi2);
+	
+    if( (fabs(lat1-lat2) < testv && 
+	 ( fabs(lon1-lon2) < testv) || fabs(lat1-90.0) < testv ) )
+    {	
+	// TWO STATIONS ARE IDENTICAL : SET DISTANCE & AZIMUTHS TO ZERO */
+	*az1 = 0.0; *az2 = 0.0; *s = 0.0;
+	return 0;
+    } else if(  fabs(cosphi1) < testv ) {
+	// initial point is polar
+	int k = geo_inverse_wgs_84( alt, lat2,lon2,lat1,lon1, az1,az2,s );
+	k = k; // avoid compiler error since return result is unused
+	b = *az1; *az1 = *az2; *az2 = b;
+	return 0;
+    } else if( fabs(cosphi2) < testv ) {
+	// terminal point is polar
+	int k = geo_inverse_wgs_84( alt, lat1,lon1,lat1,lon1+180.0, 
+				    az1,az2,s );
+	k = k; // avoid compiler error since return result is unused
+	*s /= 2.0;
+	*az2 = *az1 + 180.0;
+	if( *az2 > 360.0 ) *az2 -= 360.0; 
+	return 0;
+    } else if( (fabs( fabs(lon1-lon2) - 180 ) < testv) && 
+	       (fabs(lat1+lat2) < testv) ) 
+    {
+	// Geodesic passes through the pole (antipodal)
+	double s1,s2;
+	geo_inverse_wgs_84( alt, lat1,lon1, lat1,lon2, az1,az2, &s1 );
+	geo_inverse_wgs_84( alt, lat2,lon2, lat1,lon2, az1,az2, &s2 );
+	*az2 = *az1;
+	*s = s1 + s2;
+	return 0;
+    } else {
+	// antipodal and polar points don't get here
+	double dlam = lam2 - lam1, dlams = dlam;
+	double sdlams,cdlams, sig,sinsig,cossig, sinaz,
+	    cos2saz, c2sigm;
+	double tc,temp, us,rnumer,denom, ta,tb;
+	double cosu1,sinu1, sinu2,cosu2;
+
+	// Reduced latitudes
+	temp = (1.0-f)*sinphi1/cosphi1;
+	cosu1 = 1.0/sqrt(1.0+temp*temp);
+	sinu1 = temp*cosu1;
+	temp = (1.0-f)*sinphi2/cosphi2;
+	cosu2 = 1.0/sqrt(1.0+temp*temp);
+	sinu2 = temp*cosu2;
+    
+	do {
+	    sdlams = sin(dlams), cdlams = cos(dlams);
+	    sinsig = sqrt(cosu2*cosu2*sdlams*sdlams+
+			  (cosu1*sinu2-sinu1*cosu2*cdlams)*
+			  (cosu1*sinu2-sinu1*cosu2*cdlams));
+	    cossig = sinu1*sinu2+cosu1*cosu2*cdlams;
+	    
+	    sig = atan2(sinsig,cossig);
+	    sinaz = cosu1*cosu2*sdlams/sinsig;
+	    cos2saz = 1.0-sinaz*sinaz;
+	    c2sigm = (sinu1 == 0.0 || sinu2 == 0.0 ? cossig : 
+		      cossig-2.0*sinu1*sinu2/cos2saz);
+	    tc = f*cos2saz*(4.0+f*(4.0-3.0*cos2saz))/16.0;
+	    temp = dlams;
+	    dlams = dlam+(1.0-tc)*f*sinaz*
+		(sig+tc*sinsig*
+		 (c2sigm+tc*cossig*(-1.0+2.0*c2sigm*c2sigm)));
+	    if (fabs(dlams) > GEOD_INV_PI && iter++ > 50) {
+		return iter;
+	    }
+	} while ( fabs(temp-dlams) > testv);
+
+	us = cos2saz*(a*a-b*b)/(b*b); // !!
+	// BACK AZIMUTH FROM NORTH
+	rnumer = -(cosu1*sdlams);
+	denom = sinu1*cosu2-cosu1*sinu2*cdlams;
+	*az2 = atan2(rnumer,denom)/RADDEG;
+	if( fabs(*az2) < testv ) *az2 = 0.0;
+	if(*az2 < 0.0) *az2 += 360.0;
+
+	// FORWARD AZIMUTH FROM NORTH
+	rnumer = cosu2*sdlams;
+	denom = cosu1*sinu2-sinu1*cosu2*cdlams;
+	*az1 = atan2(rnumer,denom)/RADDEG;
+	if( fabs(*az1) < testv ) *az1 = 0.0;
+	if(*az1 < 0.0) *az1 += 360.0;
+
+	// Terms a & b
+	ta = 1.0+us*(4096.0+us*(-768.0+us*(320.0-175.0*us)))/
+	    16384.0;
+	tb = us*(256.0+us*(-128.0+us*(74.0-47.0*us)))/1024.0;
+
+	// GEODETIC DISTANCE
+	*s = b*ta*(sig-tb*sinsig*
+		   (c2sigm+tb*(cossig*(-1.0+2.0*c2sigm*c2sigm)-tb*
+			       c2sigm*(-3.0+4.0*sinsig*sinsig)*
+			       (-3.0+4.0*c2sigm*c2sigm)/6.0)/
+		    4.0));
+	return 0;
+    }
+}
+
+
+/***************************************************************************
+
+	TITLE:	ls_geodesy
+	
+----------------------------------------------------------------------------
+
+	FUNCTION:	Converts geocentric coordinates to geodetic positions
+
+----------------------------------------------------------------------------
+
+	MODULE STATUS:	developmental
+
+----------------------------------------------------------------------------
+
+	GENEALOGY:	Written as part of LaRCSim project by E. B. Jackson
+
+----------------------------------------------------------------------------
+
+	DESIGNED BY:	E. B. Jackson
+	
+	CODED BY:	E. B. Jackson
+	
+	MAINTAINED BY:	E. B. Jackson
+
+----------------------------------------------------------------------------
+
+	MODIFICATION HISTORY:
+	
+	DATE	PURPOSE						BY
+	
+	930208	Modified to avoid singularity near polar region.	EBJ
+	930602	Moved backwards calcs here from ls_step.		EBJ
+	931214	Changed erroneous Latitude and Altitude variables to 
+		*lat_geod and *alt in routine ls_geoc_to_geod.		EBJ
+	940111	Changed header files from old ls_eom.h style to ls_types, 
+		and ls_constants.  Also replaced old DATA type with new
+		SCALAR type.						EBJ
+
+	CURRENT RCS HEADER:
+
+$Header$
+ * Revision 1.5  1994/01/11  18:47:05  bjax
+ * Changed include files to use types and constants, not ls_eom.h
+ * Also changed DATA type to SCALAR type.
+ *
+ * Revision 1.4  1993/12/14  21:06:47  bjax
+ * Removed global variable references Altitude and Latitude.   EBJ
+ *
+ * Revision 1.3  1993/06/02  15:03:40  bjax
+ * Made new subroutine for calculating geodetic to geocentric; changed name
+ * of forward conversion routine from ls_geodesy to ls_geoc_to_geod.
+ *
+
+----------------------------------------------------------------------------
+
+	REFERENCES:
+
+		[ 1]	Stevens, Brian L.; and Lewis, Frank L.: "Aircraft 
+			Control and Simulation", Wiley and Sons, 1992.
+			ISBN 0-471-61397-5		      
+
+
+----------------------------------------------------------------------------
+
+	CALLED BY:	ls_aux
+
+----------------------------------------------------------------------------
+
+	CALLS TO:
+
+----------------------------------------------------------------------------
+
+	INPUTS:	
+		lat_geoc	Geocentric latitude, radians, + = North
+		radius		C.G. radius to earth center, ft
+
+----------------------------------------------------------------------------
+
+	OUTPUTS:
+		lat_geod	Geodetic latitude, radians, + = North
+		alt		C.G. altitude above mean sea level, ft
+		sea_level_r	radius from earth center to sea level at
+				local vertical (surface normal) of C.G.
+
+--------------------------------------------------------------------------*/
+
+

simgear/math/fg_geodesy.hxx

@@ -0,0 +1,175 @@
+// fg_geodesy.hxx -- routines to convert between geodetic and geocentric 
+//                   coordinate systems.
+//
+// Copied and adapted directly from LaRCsim/ls_geodesy.c
+//
+// See below for the complete original LaRCsim comments.
+//
+// $Id$
+
+
+#ifndef _FG_GEODESY_HXX
+#define _FG_GEODESY_HXX
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+
+#include <simgear/math/point3d.hxx>
+#include <simgear/math/polar3d.hxx>
+
+
+// fgGeocToGeod(lat_geoc, radius, *lat_geod, *alt, *sea_level_r)
+//     INPUTS:	
+//         lat_geoc	Geocentric latitude, radians, + = North
+//         radius	C.G. radius to earth center (meters)
+//
+//     OUTPUTS:
+//         lat_geod	Geodetic latitude, radians, + = North
+//         alt		C.G. altitude above mean sea level (meters)
+//         sea_level_r	radius from earth center to sea level at
+//                      local vertical (surface normal) of C.G. (meters)
+
+void fgGeocToGeod( double lat_geoc, double radius, double
+		   *lat_geod, double *alt, double *sea_level_r );
+
+
+// fgGeodToGeoc( lat_geod, alt, *sl_radius, *lat_geoc )
+//     INPUTS:	
+//         lat_geod	Geodetic latitude, radians, + = North
+//         alt		C.G. altitude above mean sea level (meters)
+//
+//     OUTPUTS:
+//         sl_radius	SEA LEVEL radius to earth center (meters)
+//                      (add Altitude to get true distance from earth center.
+//         lat_geoc	Geocentric latitude, radians, + = North
+//
+
+void fgGeodToGeoc( double lat_geod, double alt, double *sl_radius,
+		      double *lat_geoc );
+
+
+// convert a geodetic point lon(radians), lat(radians), elev(meter) to
+// a cartesian point
+
+inline Point3D fgGeodToCart(const Point3D& geod) {
+    double gc_lon, gc_lat, sl_radius;
+
+    // printf("A geodetic point is (%.2f, %.2f, %.2f)\n", 
+    //        geod[0], geod[1], geod[2]);
+
+    gc_lon = geod.lon();
+    fgGeodToGeoc(geod.lat(), geod.radius(), &sl_radius, &gc_lat);
+
+    // printf("A geocentric point is (%.2f, %.2f, %.2f)\n", gc_lon, 
+    //        gc_lat, sl_radius+geod[2]);
+
+    Point3D pp = Point3D( gc_lon, gc_lat, sl_radius + geod.radius());
+    return fgPolarToCart3d(pp);
+}
+
+
+// given, alt, lat1, lon1, az1 and distance (s), calculate lat2, lon2
+// and az2.  Lat, lon, and azimuth are in degrees.  distance in meters
+int geo_direct_wgs_84 ( double alt, double lat1, double lon1, double az1, 
+			double s, double *lat2, double *lon2,  double *az2 );
+
+
+// given alt, lat1, lon1, lat2, lon2, calculate starting and ending
+// az1, az2 and distance (s).  Lat, lon, and azimuth are in degrees.
+// distance in meters
+int geo_inverse_wgs_84( double alt, double lat1, double lon1, double lat2,
+			double lon2, double *az1, double *az2, double *s );
+
+
+/***************************************************************************
+
+	TITLE:	ls_geodesy
+	
+----------------------------------------------------------------------------
+
+	FUNCTION:	Converts geocentric coordinates to geodetic positions
+
+----------------------------------------------------------------------------
+
+	MODULE STATUS:	developmental
+
+----------------------------------------------------------------------------
+
+	GENEALOGY:	Written as part of LaRCSim project by E. B. Jackson
+
+----------------------------------------------------------------------------
+
+	DESIGNED BY:	E. B. Jackson
+	
+	CODED BY:	E. B. Jackson
+	
+	MAINTAINED BY:	E. B. Jackson
+
+----------------------------------------------------------------------------
+
+	MODIFICATION HISTORY:
+	
+	DATE	PURPOSE						BY
+	
+	930208	Modified to avoid singularity near polar region.	EBJ
+	930602	Moved backwards calcs here from ls_step.		EBJ
+	931214	Changed erroneous Latitude and Altitude variables to 
+		*lat_geod and *alt in routine ls_geoc_to_geod.		EBJ
+	940111	Changed header files from old ls_eom.h style to ls_types, 
+		and ls_constants.  Also replaced old DATA type with new
+		SCALAR type.						EBJ
+
+	CURRENT RCS HEADER:
+
+$Header$
+
+ * Revision 1.5  1994/01/11  18:47:05  bjax
+ * Changed include files to use types and constants, not ls_eom.h
+ * Also changed DATA type to SCALAR type.
+ *
+ * Revision 1.4  1993/12/14  21:06:47  bjax
+ * Removed global variable references Altitude and Latitude.   EBJ
+ *
+ * Revision 1.3  1993/06/02  15:03:40  bjax
+ * Made new subroutine for calculating geodetic to geocentric; changed name
+ * of forward conversion routine from ls_geodesy to ls_geoc_to_geod.
+ *
+
+----------------------------------------------------------------------------
+
+	REFERENCES:
+
+		[ 1]	Stevens, Brian L.; and Lewis, Frank L.: "Aircraft 
+			Control and Simulation", Wiley and Sons, 1992.
+			ISBN 0-471-61397-5		      
+
+
+----------------------------------------------------------------------------
+
+	CALLED BY:	ls_aux
+
+----------------------------------------------------------------------------
+
+	CALLS TO:
+
+----------------------------------------------------------------------------
+
+	INPUTS:	
+		lat_geoc	Geocentric latitude, radians, + = North
+		radius		C.G. radius to earth center, ft
+
+----------------------------------------------------------------------------
+
+	OUTPUTS:
+		lat_geod	Geodetic latitude, radians, + = North
+		alt		C.G. altitude above mean sea level, ft
+		sea_level_r	radius from earth center to sea level at
+				local vertical (surface normal) of C.G.
+
+--------------------------------------------------------------------------*/
+
+
+#endif // _FG_GEODESY_HXX

simgear/math/fg_memory.h

@@ -0,0 +1,59 @@
+// fg_memory.h -- memcpy/bcopy portability declarations
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _FG_MEMORY_H
+#define _FG_MEMORY_H
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#ifdef HAVE_MEMCPY
+
+#  ifdef HAVE_MEMORY_H
+#    include <memory.h>
+#  endif
+
+#  define fgmemcmp            memcmp
+#  define fgmemcpy            memcpy
+#  define fgmemzero(dest,len) memset(dest,0,len)
+
+#elif defined(HAVE_BCOPY)
+
+#  define fgmemcmp              bcmp
+#  define fgmemcpy(dest,src,n)  bcopy(src,dest,n)
+#  define fgmemzero             bzero
+
+#else
+
+/* 
+ * Neither memcpy() or bcopy() available.
+ * Use substitutes provided be zlib.
+ */
+
+#  include <zutil.h>
+#  define fgmemcmp zmemcmp
+#  define fgmemcpy zmemcpy
+#  define fgmemzero zmemzero
+
+#endif
+
+#endif // _FG_MEMORY_H
+
+

simgear/math/fg_random.c

@@ -0,0 +1,71 @@
+// fg_random.c -- routines to handle random number generation
+//
+// Written by Curtis Olson, started July 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <stdio.h>
+#include <stdlib.h>         // for random(), srandom()
+#include <time.h>           // for time() to seed srandom()        
+
+#include "fg_random.h"
+
+#ifndef HAVE_RAND
+#  ifdef sgi
+#    undef RAND_MAX
+#    define RAND_MAX 2147483647
+#  endif
+#endif
+
+#ifdef __SUNPRO_CC
+    extern "C" {
+	long int random(void);
+	void srandom(unsigned int seed);
+    }
+#endif
+
+
+// Seed the random number generater with time() so we don't see the
+// same sequence every time
+void fg_srandom(void) {
+    // fgPrintf( FG_MATH, FG_INFO, "Seeding random number generater\n");
+
+#ifdef HAVE_RAND
+    srand(time(NULL));
+#else
+    srandom(time(NULL));
+#endif                                       
+}
+
+
+// return a random number between [0.0, 1.0)
+double fg_random(void) {
+#ifdef HAVE_RAND
+    return(rand() / (double)RAND_MAX);
+#else
+    return(random() / (double)RAND_MAX);
+#endif
+}
+
+

simgear/math/fg_random.h

@@ -1,6 +1,6 @@
-// sky.hxx -- model sky with an upside down "bowl"
+// fg_random.h -- routines to handle random number generation
 //
-// Written by Curtis Olson, started December 1997.
+// Written by Curtis Olson, started July 1997.
 //
 // Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
 //
@@ -21,33 +21,28 @@
 // $Id$
 
 
-#ifndef _SKY_HXX
-#define _SKY_HXX
+#ifndef _FG_RANDOM_H
+#define _FG_RANDOM_H
 
 
-#ifndef __cplusplus                                                          
-# error This library requires C++
+#ifdef __cplusplus                                                          
+extern "C" {                            
 #endif                                   
 
 
-#include <ssg.h>		// plib include
+// Seed the random number generater with time() so we don't see the
+// same sequence every time
+void fg_srandom(void);
+
+// return a random number between [0.0, 1.0)
+double fg_random(void);
 
 
-class fgSky : ssgLeaf
-{
-};
+#ifdef __cplusplus
+}
+#endif
 
 
-// (Re)generate the display list
-void fgSkyInit( void );
-
-// (Re)calculate the sky colors at each vertex
-void fgSkyColorsInit( void );
-
-// Draw the Sky
-void fgSkyRender( void );
-
-
-#endif // _SKY_HXX
+#endif // _FG_RANDOM_H
 
 

simgear/math/fg_types.hxx

@@ -0,0 +1,73 @@
+// fg_types.hxx -- commonly used types I don't want to have to keep redefining
+//
+// Written by Curtis Olson, started March 1999.
+//
+// Copyright (C) 1999  Curtis L. Olson  - curt@flightgear.org
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _FG_TYPES_HXX
+#define _FG_TYPES_HXX
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+
+#include <simgear/compiler.h>
+
+#include STL_STRING
+#include <vector>
+
+#include <simgear/math/point3d.hxx>
+
+FG_USING_STD(vector);
+FG_USING_STD(string);
+
+
+typedef vector < int > int_list;
+typedef int_list::iterator int_list_iterator;
+typedef int_list::const_iterator const_int_list_iterator;
+
+typedef vector < Point3D > point_list;
+typedef point_list::iterator point_list_iterator;
+typedef point_list::const_iterator const_point_list_iterator;
+
+typedef vector < string > string_list;
+typedef string_list::iterator string_list_iterator;
+typedef string_list::const_iterator const_string_list_iterator;
+
+
+class point2d {
+public:
+    union {
+	double x;
+	double dist;
+	double lon;
+    };
+    union {
+	double y;
+	double theta;
+	double lat;
+    };
+};
+
+
+#endif // _FG_TYPES_HXX
+

simgear/math/interpolater.cxx

@@ -0,0 +1,107 @@
+//
+// interpolater.cxx -- routines to handle linear interpolation from a table of
+//                     x,y   The table must be sorted by "x" in ascending order
+//
+// Written by Curtis Olson, started April 1998.
+//
+// Copyright (C) 1998  Curtis L. Olson  - curt@me.umn.edu
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#include <simgear/compiler.h>
+
+#ifdef __MWERKS__
+#include <stdlib.h> // for exit()
+#endif
+
+#include STL_STRING
+
+#include <simgear/fg_zlib.h>
+#include <simgear/debug/logstream.hxx>
+#include <simgear/misc/fgstream.hxx>
+
+#include "interpolater.hxx"
+
+
+// Constructor -- loads the interpolation table from the specified
+// file
+fgINTERPTABLE::fgINTERPTABLE( const string& file ) {
+    FG_LOG( FG_MATH, FG_INFO, "Initializing Interpolator for " << file );
+
+    fg_gzifstream in( file );
+    if ( !in ) {
+        FG_LOG( FG_GENERAL, FG_ALERT, "Cannot open file: " << file );
+	exit(-1);
+    }
+
+    size = 0;
+    in >> skipcomment;
+    while ( in ) {
+	if ( size < MAX_TABLE_SIZE ) {
+	    in >> table[size][0] >> table[size][1];
+	    size++;
+	} else {
+            FG_LOG( FG_MATH, FG_ALERT,
+		    "fgInterpolateInit(): Exceed max table size = "
+		    << MAX_TABLE_SIZE );
+	    exit(-1);
+	}
+    }
+}
+
+
+// Given an x value, linearly interpolate the y value from the table
+double fgINTERPTABLE::interpolate(double x) {
+    int i;
+    double y;
+
+    i = 0;
+
+    while ( (x > table[i][0]) && (i < size) ) {
+	i++;
+    }
+
+    // printf ("i = %d ", i);
+
+    if ( (i == 0) && (x < table[0][0]) ) {
+	FG_LOG( FG_MATH, FG_ALERT, 
+		"fgInterpolateInit(): lookup error, x to small = " << x );
+	return(0.0);
+    }
+
+    if ( x > table[i][0] ) {
+	FG_LOG( FG_MATH, FG_ALERT, 
+		"fgInterpolateInit(): lookup error, x to big = " << x );
+	return(0.0);
+    }
+
+    // y = y1 + (y0 - y1)(x - x1) / (x0 - x1)
+    y = table[i][1] + 
+	( (table[i-1][1] - table[i][1]) * 
+	  (x - table[i][0]) ) /
+	(table[i-1][0] - table[i][0]);
+
+    return(y);
+}
+
+
+// Destructor
+fgINTERPTABLE::~fgINTERPTABLE( void ) {
+}
+
+

simgear/math/interpolater.hxx

@@ -0,0 +1,62 @@
+//
+// interpolater.hxx -- routines to handle linear interpolation from a table of
+//                     x,y   The table must be sorted by "x" in ascending order
+//
+// Written by Curtis Olson, started April 1998.
+//
+// Copyright (C) 1998  Curtis L. Olson  - curt@me.umn.edu
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _INTERPOLATER_H
+#define _INTERPOLATER_H
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+#include <simgear/compiler.h>
+
+#include STL_STRING
+FG_USING_STD(string);
+
+#define MAX_TABLE_SIZE 32
+
+
+class fgINTERPTABLE {
+    int size;
+    double table[MAX_TABLE_SIZE][2];
+
+public:
+
+    // Constructor -- loads the interpolation table from the specified
+    // file
+    fgINTERPTABLE( const string& file );
+
+    // Given an x value, linearly interpolate the y value from the table
+    double interpolate(double x);
+
+    // Destructor
+    ~fgINTERPTABLE( void );
+};
+
+
+#endif // _INTERPOLATER_H
+
+

simgear/math/leastsqs.cxx

@@ -0,0 +1,135 @@
+// leastsqs.c -- Implements a simple linear least squares best fit routine
+//
+// Written by Curtis Olson, started September 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+//
+
+
+#include <stdio.h>
+
+#include "leastsqs.hxx"
+
+
+/* 
+Least squares fit:
+
+y = b0 + b1x
+
+     n*sum(xi*yi) - (sum(xi)*sum(yi))
+b1 = --------------------------------
+     n*sum(xi^2) - (sum(xi))^2
+
+
+b0 = sum(yi)/n - b1*(sum(xi)/n)
+*/
+
+double sum_xi, sum_yi, sum_xi_2, sum_xi_yi;
+int sum_n;
+
+void least_squares(double *x, double *y, int n, double *m, double *b) {
+    int i;
+
+    sum_xi = sum_yi = sum_xi_2 = sum_xi_yi = 0.0;
+    sum_n = n;
+
+    for ( i = 0; i < n; i++ ) {
+	sum_xi += x[i];
+	sum_yi += y[i];
+	sum_xi_2 += x[i] * x[i];
+	sum_xi_yi += x[i] * y[i];
+    }
+
+    /* printf("sum(xi)=%.2f  sum(yi)=%.2f  sum(xi^2)=%.2f  sum(xi*yi)=%.2f\n",
+	   sum_xi, sum_yi, sum_xi_2, sum_xi_yi); */
+
+    *m = ( (double)sum_n * sum_xi_yi - sum_xi * sum_yi ) / 
+	( (double)sum_n * sum_xi_2 - sum_xi * sum_xi );
+    *b = (sum_yi / (double)sum_n) - (*m) * (sum_xi / (double)sum_n);
+
+    /* printf("slope = %.2f  intercept = %.2f\n", *m, *b); */
+}
+
+
+/* incrimentally update existing values with a new data point */
+void least_squares_update(double x, double y, double *m, double *b) {
+    ++sum_n;
+
+    sum_xi += x;
+    sum_yi += y;
+    sum_xi_2 += x * x;
+    sum_xi_yi += x * y;
+
+    /* printf("sum(xi)=%.2f  sum(yi)=%.2f  sum(xi^2)=%.2f  sum(xi*yi)=%.2f\n",
+	   sum_xi, sum_yi, sum_xi_2, sum_xi_yi); */
+
+    *m = ( (double)sum_n * sum_xi_yi - sum_xi * sum_yi ) / 
+	( (double)sum_n * sum_xi_2 - sum_xi * sum_xi );
+    *b = (sum_yi / (double)sum_n) - (*m) * (sum_xi / (double)sum_n);
+
+    /* printf("slope = %.2f  intercept = %.2f\n", *m, *b); */
+}
+
+
+/* 
+  return the least squares error:
+
+              (y[i] - y_hat[i])^2
+              -------------------
+                      n
+ */
+double least_squares_error(double *x, double *y, int n, double m, double b) {
+    int i;
+    double error, sum;
+
+    sum = 0.0;
+
+    for ( i = 0; i < n; i++ ) {
+	error = y[i] - (m * x[i] + b);
+	sum += error * error;
+	// printf("%.2f %.2f\n", error, sum);
+    }
+
+    return ( sum / (double)n );
+}
+
+
+/* 
+  return the maximum least squares error:
+
+              (y[i] - y_hat[i])^2
+ */
+double least_squares_max_error(double *x, double *y, int n, double m, double b){
+    int i;
+    double error, max_error;
+
+    max_error = 0.0;
+
+    for ( i = 0; i < n; i++ ) {
+	error = y[i] - (m * x[i] + b);
+	error = error * error;
+	if ( error > max_error ) {
+	    max_error = error;
+	}
+    }
+
+    return ( max_error );
+}
+
+

simgear/math/leastsqs.hxx

@@ -0,0 +1,73 @@
+// leastsqs.h -- Implements a simple linear least squares best fit routine
+//
+// Written by Curtis Olson, started September 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+///
+
+
+#ifndef _LEASTSQS_H
+#define _LEASTSQS_H
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+
+/* 
+Least squares fit:
+
+y = b0 + b1x
+
+     n*sum(xi*yi) - (sum(xi)*sum(yi))
+b1 = --------------------------------
+     n*sum(xi^2) - (sum(xi))^2
+
+
+b0 = sum(yi)/n - b1*(sum(xi)/n)
+*/
+
+void least_squares(double *x, double *y, int n, double *m, double *b);
+
+/* incrimentally update existing values with a new data point */
+void least_squares_update(double x, double y, double *m, double *b);
+
+
+/* 
+  return the least squares error:
+
+              (y[i] - y_hat[i])^2
+              -------------------
+                      n
+*/
+double least_squares_error(double *x, double *y, int n, double m, double b);
+
+
+/* 
+  return the maximum least squares error:
+
+              (y[i] - y_hat[i])^2
+*/
+double least_squares_max_error(double *x, double *y, int n, double m, double b);
+
+
+#endif // _LEASTSQS_H
+
+

simgear/math/linintp2.h

@@ -0,0 +1,110 @@
+/*
+  WARNING - Do not remove this header.
+
+  This code is a templated version of the 'magic-software' spherical
+  interpolation code by Dave Eberly. The original (un-hacked) code can be
+  obtained from here: http://www.magic-software.com/gr_appr.htm
+  This code is derived from linintp2.h/cpp and sphrintp.h/cpp.
+
+  Dave Eberly says that the conditions for use are:
+
+  * You may distribute the original source code to others at no charge.
+
+  * You may modify the original source code and distribute it to others at
+    no charge. The modified code must be documented to indicate that it is
+    not part of the original package.
+
+  * You may use this code for non-commercial purposes. You may also
+    incorporate this code into commercial packages. However, you may not
+    sell any of your source code which contains my original and/or modified
+    source code. In such a case, you need to factor out my code and freely
+    distribute it.
+
+  * The original code comes with absolutely no warranty and no guarantee is
+    made that the code is bug-free.
+
+  This does not seem incompatible with GPL - so this modified version
+  is hereby placed under GPL along with the rest of FlightGear.
+
+                              Christian Mayer
+*/
+
+#ifndef LININTP2_H
+#define LININTP2_H
+
+template<class T>
+class mgcLinInterp2D
+{
+public:
+    mgcLinInterp2D (int _numPoints, double* x, double* y, T* _f);
+
+    ~mgcLinInterp2D ();
+
+    double XMin () { return xmin; }
+    double XMax () { return xmax; }
+    double XRange () { return xmax-xmin; }
+    double YMin () { return ymin; }
+    double YMax () { return ymax; }
+    double YRange () { return ymax-ymin; }
+
+    int PointCount () { return numPoints; }
+    void GetPoint (int i, double& x, double& y);
+
+    int EdgeCount () { return numEdges; }
+    void GetEdge (int i, double& x0, double& y0, double& x1, double& y1);
+
+    int TriangleCount () { return numTriangles; }
+    void GetTriangle (int i, double& x0, double& y0, double& x1, double& y1,
+        double& x2, double& y2);
+
+    int Evaluate (double x, double y, T& F);
+    
+private:
+    typedef struct
+    {
+        double x, y;
+    }
+    Vertex;
+
+    typedef struct
+    {
+        int vertex[3];  // listed in counterclockwise order
+
+        int adj[3];
+            // adj[0] points to triangle sharing edge (vertex[0],vertex[1])
+            // adj[1] points to triangle sharing edge (vertex[1],vertex[2])
+            // adj[2] points to triangle sharing edge (vertex[2],vertex[0])
+    }
+    Triangle;
+
+    typedef struct 
+    {
+        int vertex[2];
+        int triangle[2];
+        int index[2];
+    } 
+    Edge;
+
+    int numPoints;
+    double** point;
+    double** tmppoint;
+    T* f;
+
+    double xmin, xmax, ymin, ymax;
+
+
+    int numEdges;
+    Edge* edge;
+
+    int numTriangles;
+    Triangle* triangle;
+
+    int Delaunay2D ();
+    void ComputeBarycenter (Vertex& v0, Vertex& v1, Vertex& v2, Vertex& ver, 
+                            double c[3]);
+    int InTriangle (Vertex& v0, Vertex& v1, Vertex& v2, Vertex& test);
+};
+
+#include "linintp2.inl"
+
+#endif

simgear/math/linintp2.inl

@@ -0,0 +1,540 @@
+/*
+  WARNING - Do not remove this header.
+
+  This code is a templated version of the 'magic-software' spherical
+  interpolation code by Dave Eberly. The original (un-hacked) code can be
+  obtained from here: http://www.magic-software.com/gr_appr.htm
+  This code is derived from linintp2.h/cpp and sphrintp.h/cpp.
+
+  Dave Eberly says that the conditions for use are:
+
+  * You may distribute the original source code to others at no charge.
+
+  * You may modify the original source code and distribute it to others at
+    no charge. The modified code must be documented to indicate that it is
+    not part of the original package.
+
+  * You may use this code for non-commercial purposes. You may also
+    incorporate this code into commercial packages. However, you may not
+    sell any of your source code which contains my original and/or modified
+    source code. In such a case, you need to factor out my code and freely
+    distribute it.
+
+  * The original code comes with absolutely no warranty and no guarantee is
+    made that the code is bug-free.
+
+  This does not seem incompatible with GPL - so this modified version
+  is hereby placed under GPL along with the rest of FlightGear.
+
+                              Christian Mayer
+*/
+
+#include <float.h>
+#include <math.h>
+#include <stdlib.h>
+#include "linintp2.h"
+
+//---------------------------------------------------------------------------
+template<class T>
+mgcLinInterp2D<T>::mgcLinInterp2D (int _numPoints, double* x, double* y, 
+                                   T* _f)
+{
+    if ( (numPoints = _numPoints) < 3 )
+    {
+        point = 0;
+        edge = 0;
+        triangle = 0;
+        numTriangles = 0;
+        return;
+    }
+
+    cout << "[ 20%] allocating memory                                              \r";
+
+    point = new double*[numPoints];
+    tmppoint = new double*[numPoints+3];
+    f = new T[numPoints];
+    int i;
+    for (i = 0; i < numPoints; i++)
+        point[i] = new double[2];
+    for (i = 0; i < numPoints+3; i++)
+        tmppoint[i] = new double[2];
+    for (i = 0; i < numPoints; i++)
+    {
+        point[i][0] = tmppoint[i][0] = x[i];
+        point[i][1] = tmppoint[i][1] = y[i];
+
+	f[i] = _f[i];
+    }
+
+    cout << "[ 30%] creating delaunay diagram                                      \r";
+
+    Delaunay2D();
+}
+//---------------------------------------------------------------------------
+template<class T>
+mgcLinInterp2D<T>::~mgcLinInterp2D ()
+{
+    if ( numPoints < 3 )
+        return;
+
+    int i;
+
+    if ( point )
+    {
+        for (i = 0; i < numPoints; i++)
+            delete[] point[i];
+        delete[] point;
+    }
+    if ( tmppoint )
+    {
+        for (i = 0; i < numPoints+3; i++)
+            delete[] tmppoint[i];
+        delete[] tmppoint;
+    }
+
+    delete[] f;
+    delete[] edge;
+    delete[] triangle;
+}
+//---------------------------------------------------------------------------
+template<class T>
+void mgcLinInterp2D<T>::ComputeBarycenter (Vertex& v0, Vertex& v1, Vertex& v2, 
+                                           Vertex& ver, double c[3])
+{
+    double A0 = v0.x-v2.x, B0 = v0.y-v2.y;
+    double A1 = v1.x-v2.x, B1 = v1.y-v2.y;
+    double A2 = ver.x-v2.x, B2 = ver.y-v2.y;
+
+    double m00 = A0*A0+B0*B0, m01 = A0*A1+B0*B1, m11 = A1*A1+B1*B1;
+    double r0 = A2*A0+B2*B0, r1 = A2*A1+B2*B1;
+    double det = m00*m11-m01*m01;
+
+    c[0] = (m11*r0-m01*r1)/det;
+    c[1] = (m00*r1-m01*r0)/det;
+    c[2] = 1-c[0]-c[1];
+}
+//---------------------------------------------------------------------------
+template<class T>
+int mgcLinInterp2D<T>::InTriangle (Vertex& v0, Vertex& v1, Vertex& v2, 
+                                   Vertex& test)
+{
+    const double eps = 1e-08;
+    double tx, ty, nx, ny;
+
+    // test against normal to first edge
+    tx = test.x - v0.x;
+    ty = test.y - v0.y;
+    nx = v0.y - v1.y;
+    ny = v1.x - v0.x;
+    if ( tx*nx + ty*ny < -eps )
+        return 0;
+
+    // test against normal to second edge
+    tx = test.x - v1.x;
+    ty = test.y - v1.y;
+    nx = v1.y - v2.y;
+    ny = v2.x - v1.x;
+    if ( tx*nx + ty*ny < -eps )
+        return 0;
+
+    // test against normal to third edge
+    tx = test.x - v2.x;
+    ty = test.y - v2.y;
+    nx = v2.y - v0.y;
+    ny = v0.x - v2.x;
+    if ( tx*nx + ty*ny < -eps )
+        return 0;
+
+    return 1;
+}
+//---------------------------------------------------------------------------
+template<class T>
+int mgcLinInterp2D<T>::Evaluate (double x, double y, T& F)
+{
+    Vertex ver = { x, y };
+    // determine which triangle contains the target point
+
+    int i; 
+    Vertex v0, v1, v2;
+    for (i = 0; i < numTriangles; i++)
+    {
+        Triangle& t = triangle[i];
+        v0.x = point[t.vertex[0]][0];
+        v0.y = point[t.vertex[0]][1];
+        v1.x = point[t.vertex[1]][0];
+        v1.y = point[t.vertex[1]][1];
+        v2.x = point[t.vertex[2]][0];
+        v2.y = point[t.vertex[2]][1];
+
+        if ( InTriangle(v0,v1,v2,ver) )
+            break;
+    }
+
+    if ( i == numTriangles )  // point is outside interpolation region
+    {
+	return 0;
+    }
+
+    Triangle& t = triangle[i];  // (x,y) is in this triangle
+
+    // compute barycentric coordinates with respect to subtriangle
+    double bary[3];
+    ComputeBarycenter(v0,v1,v2,ver,bary);
+
+    // compute barycentric combination of function values at vertices
+    F = bary[0]*f[t.vertex[0]]+bary[1]*f[t.vertex[1]]+bary[2]*f[t.vertex[2]];
+
+    return 1;
+}
+//---------------------------------------------------------------------------
+template<class T>
+int mgcLinInterp2D<T>::Delaunay2D ()
+{
+    int result;
+
+    const double EPSILON = 1e-12;
+    const int TSIZE = 75;
+    const double RANGE = 10.0;
+
+    xmin = tmppoint[0][0];
+    xmax = xmin;
+    ymin = tmppoint[0][1];
+    ymax = ymin;
+
+    int i;
+    for (i = 0; i < numPoints; i++)
+    {
+        double value = tmppoint[i][0];
+        if ( xmax < value )
+            xmax = value;
+        if ( xmin > value )
+            xmin = value;
+
+        value = tmppoint[i][1];
+        if ( ymax < value )
+            ymax = value;
+        if ( ymin > value )
+            ymin = value;
+    }
+
+    double xrange = xmax-xmin, yrange = ymax-ymin;
+    double maxrange = xrange;
+    if ( maxrange < yrange )
+        maxrange = yrange;
+
+    // need to scale the data later to do a correct triangle count
+    double maxrange2 = maxrange*maxrange;
+
+    // tweak the points by very small random numbers
+    double bgs = EPSILON*maxrange;
+    srand(367);   
+    for (i = 0; i < numPoints; i++) 
+    {
+        tmppoint[i][0] += bgs*(0.5 - rand()/double(RAND_MAX));
+        tmppoint[i][1] += bgs*(0.5 - rand()/double(RAND_MAX));
+    }
+
+    double wrk[2][3] =
+    {
+        { 5*RANGE, -RANGE, -RANGE },
+        { -RANGE, 5*RANGE, -RANGE }
+    };
+    for (i = 0; i < 3; i++)
+    {
+        tmppoint[numPoints+i][0] = xmin+xrange*wrk[0][i];
+        tmppoint[numPoints+i][1] = ymin+yrange*wrk[1][i];
+    }
+
+    int i0, i1, i2, i3, i4, i5, i6, i7, i8, i9, i11;
+    int nts, ii[3];
+    double xx;
+
+    int tsz = 2*TSIZE;
+    int** tmp = new int*[tsz+1];
+    tmp[0] = new int[2*(tsz+1)];
+    for (i0 = 1; i0 < tsz+1; i0++)
+        tmp[i0] = tmp[0] + 2*i0;
+    i1 = 2*(numPoints + 2);
+
+    int* id = new int[i1];
+    for (i0 = 0; i0 < i1; i0++) 
+        id[i0] = i0; 
+
+    int** a3s = new int*[i1];
+    a3s[0] = new int[3*i1];
+    for (i0 = 1; i0 < i1; i0++)
+        a3s[i0] = a3s[0] + 3*i0;
+    a3s[0][0] = numPoints;
+    a3s[0][1] = numPoints+1;
+    a3s[0][2] = numPoints+2;
+
+    double** ccr = new double*[i1];  // circumscribed centers and radii
+    ccr[0] = new double[3*i1];
+    for (i0 = 1; i0 < i1; i0++)
+        ccr[i0] = ccr[0] + 3*i0;
+    ccr[0][0] = 0.0;
+    ccr[0][1] = 0.0;
+    ccr[0][2] = FLT_MAX;
+
+    nts = 1;  // number of triangles
+    i4 = 1;
+
+    cout << "[ 40%] create triangulation                                     \r";
+
+    // compute triangulation
+    for (i0 = 0; i0 < numPoints; i0++)
+    {  
+        i1 = i7 = -1;
+        i9 = 0;
+        for (i11 = 0; i11 < nts; i11++)
+        {
+            i1++;
+            while ( a3s[i1][0] < 0 ) 
+                i1++;
+            xx = ccr[i1][2];
+            for (i2 = 0; i2 < 2; i2++)
+            {  
+                double z = tmppoint[i0][i2]-ccr[i1][i2];
+                xx -= z*z;
+                if ( xx < 0 ) 
+                    goto Corner3;
+            }
+            i9--;
+            i4--;
+            id[i4] = i1;
+            for (i2 = 0; i2 < 3; i2++)
+            {  
+                ii[0] = 0;
+                if (ii[0] == i2) 
+                    ii[0]++;
+                for (i3 = 1; i3 < 2; i3++)
+                {  
+                    ii[i3] = ii[i3-1] + 1;
+                    if (ii[i3] == i2) 
+                        ii[i3]++;
+                }
+                if ( i7 > 1 )
+                {  
+                    i8 = i7;
+                    for (i3 = 0; i3 <= i8; i3++)
+                    {  
+                        for (i5 = 0; i5 < 2; i5++) 
+                            if ( a3s[i1][ii[i5]] != tmp[i3][i5] ) 
+                                goto Corner1;
+                        for (i6 = 0; i6 < 2; i6++) 
+                            tmp[i3][i6] = tmp[i8][i6];
+                        i7--;
+                        goto Corner2;
+Corner1:;
+                    }
+                }
+                if ( ++i7 > tsz )
+                {
+                    // temporary storage exceeded, increase TSIZE
+                    result = 0;
+                    goto ExitDelaunay;
+                }
+                for (i3 = 0; i3 < 2; i3++) 
+                    tmp[i7][i3] = a3s[i1][ii[i3]];
+Corner2:;
+            }
+            a3s[i1][0] = -1;
+Corner3:;
+        }
+
+        for (i1 = 0; i1 <= i7; i1++)
+        {  
+            for (i2 = 0; i2 < 2; i2++)
+                for (wrk[i2][2] = 0, i3 = 0; i3 < 2; i3++)
+                {  
+                    wrk[i2][i3] = tmppoint[tmp[i1][i2]][i3]-tmppoint[i0][i3];
+                    wrk[i2][2] += 
+                        0.5*wrk[i2][i3]*(tmppoint[tmp[i1][i2]][i3]+
+                        tmppoint[i0][i3]);
+                }
+
+            xx = wrk[0][0]*wrk[1][1]-wrk[1][0]*wrk[0][1];
+            ccr[id[i4]][0] = (wrk[0][2]*wrk[1][1]-wrk[1][2]*wrk[0][1])/xx;
+            ccr[id[i4]][1] = (wrk[0][0]*wrk[1][2]-wrk[1][0]*wrk[0][2])/xx;
+
+            for (ccr[id[i4]][2] = 0, i2 = 0; i2 < 2; i2++) 
+            {  
+                double z = tmppoint[i0][i2]-ccr[id[i4]][i2];
+                ccr[id[i4]][2] += z*z;
+                a3s[id[i4]][i2] = tmp[i1][i2];
+            }
+
+            a3s[id[i4]][2] = i0;
+            i4++;
+            i9++;
+        }
+        nts += i9;
+    }
+
+    // count the number of triangles
+    cout << "[ 50%] count the number of triangles                                  \r";
+
+    numTriangles = 0;
+    i0 = -1;
+    for (i11 = 0; i11 < nts; i11++)
+    {  
+        i0++;
+        while ( a3s[i0][0] < 0 ) 
+            i0++;
+        if ( a3s[i0][0] < numPoints )
+        {  
+            for (i1 = 0; i1 < 2; i1++) 
+                for (i2 = 0; i2 < 2; i2++) 
+                    wrk[i1][i2] = 
+                        tmppoint[a3s[i0][i1]][i2]-tmppoint[a3s[i0][2]][i2];
+
+            if ( fabs(wrk[0][0]*wrk[1][1]-wrk[0][1]*wrk[1][0]) > EPSILON*maxrange2 )
+                numTriangles++;
+        }
+    }
+
+    // create the triangles
+    cout << "[ 60%] create the triangles                                         \r";
+
+    triangle = new Triangle[numTriangles];
+
+    numTriangles = 0;
+    i0 = -1;
+    for (i11 = 0; i11 < nts; i11++)
+    {  
+        i0++;
+        while ( a3s[i0][0] < 0 ) 
+            i0++;
+        if ( a3s[i0][0] < numPoints )
+        {  
+            for (i1 = 0; i1 < 2; i1++) 
+                for (i2 = 0; i2 < 2; i2++) 
+                    wrk[i1][i2] = 
+                        tmppoint[a3s[i0][i1]][i2]-tmppoint[a3s[i0][2]][i2];
+            xx = wrk[0][0]*wrk[1][1]-wrk[0][1]*wrk[1][0];
+            if ( fabs(xx) > EPSILON*maxrange2 )
+            {  
+                int delta = xx < 0 ? 1 : 0;
+                Triangle& tri = triangle[numTriangles];
+                tri.vertex[0] = a3s[i0][0];
+                tri.vertex[1] = a3s[i0][1+delta];
+                tri.vertex[2] = a3s[i0][2-delta];
+                tri.adj[0] = -1;
+                tri.adj[1] = -1;
+                tri.adj[2] = -1;
+                numTriangles++;
+            }
+        }
+    }
+
+    // build edge table
+    cout << "[ 70%] build the edge table                                       \r";
+
+    numEdges = 0;
+    edge = new Edge[3*numTriangles];
+
+    int j, j0, j1;
+    for (i = 0; i < numTriangles; i++)
+    {
+	if ( (i%500) == 0)
+	    cout << "[ 7" << 10*i/numTriangles << "%] build the edge table                                       \r";
+
+        Triangle& t = triangle[i];
+
+        for (j0 = 0, j1 = 1; j0 < 3; j0++, j1 = (j1+1)%3)
+        {
+            for (j = 0; j < numEdges; j++)
+            {
+                Edge& e = edge[j];
+                if ( (t.vertex[j0] == e.vertex[0] 
+                   && t.vertex[j1] == e.vertex[1])
+                ||   (t.vertex[j0] == e.vertex[1] 
+                   && t.vertex[j1] == e.vertex[0]) )
+                    break;
+            }
+            if ( j == numEdges )  // add edge to table
+            {
+                edge[j].vertex[0] = t.vertex[j0];
+                edge[j].vertex[1] = t.vertex[j1];
+                edge[j].triangle[0] = i;
+                edge[j].index[0] = j0;
+                edge[j].triangle[1] = -1;
+                numEdges++;
+            }
+            else  // edge already exists, add triangle to table
+            {
+                edge[j].triangle[1] = i;
+                edge[j].index[1] = j0;
+            }
+        }
+    }
+
+    // establish links between adjacent triangles
+    cout << "[ 80%] establishing links between adjacent triangles                                       \r";
+
+    for (i = 0; i < numEdges; i++)
+    {
+        if ( edge[i].triangle[1] != -1 )
+        {
+            j0 = edge[i].triangle[0];
+            j1 = edge[i].triangle[1];
+            triangle[j0].adj[edge[i].index[0]] = j1;
+            triangle[j1].adj[edge[i].index[1]] = j0;
+        }
+    }
+
+    result = 1;
+
+ExitDelaunay:;
+    delete[] tmp[0];
+    delete[] tmp;
+    delete[] id;
+    delete[] a3s[0];
+    delete[] a3s;
+    delete[] ccr[0];
+    delete[] ccr;
+
+    cout << "[ 90%] finsishes delauney triangulation                            \r";
+
+    return result;
+}
+//---------------------------------------------------------------------------
+template<class T>
+void mgcLinInterp2D<T>::GetPoint (int i, double& x, double& y)
+{
+    // assumes i is valid [can use PointCount() before passing i]
+    x = point[i][0];
+    y = point[i][1];
+}
+//---------------------------------------------------------------------------
+template<class T>
+void mgcLinInterp2D<T>::GetEdge (int i, double& x0, double& y0, double& x1,
+                                 double& y1)
+{
+    // assumes i is valid [can use EdgeCount() before passing i]
+    int v0 = edge[i].vertex[0], v1 = edge[i].vertex[1];
+
+    x0 = point[v0][0];
+    y0 = point[v0][1];
+    x1 = point[v1][0];
+    y1 = point[v1][1];
+}
+//---------------------------------------------------------------------------
+template<class T>
+void mgcLinInterp2D<T>::GetTriangle (int i, double& x0, double& y0, double& x1,
+                                     double& y1, double& x2, double& y2)
+{
+    // assumes i is valid [can use TriangleCount() before passing i]
+    int v0 = triangle[i].vertex[0];
+    int v1 = triangle[i].vertex[1];
+    int v2 = triangle[i].vertex[2];
+
+    x0 = point[v0][0];
+    y0 = point[v0][1];
+    x1 = point[v1][0];
+    y1 = point[v1][1];
+    x2 = point[v2][0];
+    y2 = point[v2][1];
+}
+//---------------------------------------------------------------------------
+

simgear/math/point3d.hxx

@@ -0,0 +1,341 @@
+// point3d.hxx -- a 3d point class.  
+//
+// Adapted from algebra3 by Jean-Francois Doue, started October 1998.
+//
+// Copyright (C) 1998  Curtis L. Olson  - curt@me.umn.edu
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _POINT3D_HXX
+#define _POINT3D_HXX
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+#include <simgear/compiler.h>
+
+#ifdef FG_MATH_EXCEPTION_CLASH
+# define exception c_exception
+#endif
+
+#ifdef FG_HAVE_STD_INCLUDES
+# include <iostream>
+# include <cassert>
+# include <cmath>
+#else
+# include <iostream.h>
+# include <assert.h>
+# include <math.h>
+#endif
+
+// I don't understand ... <math.h> or <cmath> should be included
+// already depending on how you defined FG_HAVE_STD_INCLUDES, but I
+// can go ahead and add this -- CLO
+#ifdef __MWERKS__
+FG_USING_NAMESPACE(std);
+#endif
+
+#ifndef FG_HAVE_NATIVE_SGI_COMPILERS
+FG_USING_STD(ostream);
+FG_USING_STD(istream);
+#endif
+
+
+const double fgPoint3_Epsilon = 0.0000001;
+
+enum {PX, PY, PZ};		    // axes
+
+// Kludge for msvc++ 6.0 - requires forward decls of friend functions.
+class Point3D;
+istream& operator>> ( istream&, Point3D& );
+ostream& operator<< ( ostream&, const Point3D& );
+Point3D operator- (const Point3D& p);	            // -p1
+bool operator== (const Point3D& a, const Point3D& b);  // p1 == p2?
+
+
+///////////////////////////
+//
+// 3D Point
+//
+///////////////////////////
+
+class Point3D {
+
+protected:
+
+    double n[3];
+
+public:
+
+    // Constructors
+
+    Point3D();
+    Point3D(const double x, const double y, const double z);
+    explicit Point3D(const double d);
+    Point3D(const Point3D &p);
+
+    // Assignment operators
+
+    Point3D& operator = ( const Point3D& p );	 // assignment of a Point3D
+    Point3D& operator += ( const Point3D& p );	 // incrementation by a Point3D
+    Point3D& operator -= ( const Point3D& p );	 // decrementation by a Point3D
+    Point3D& operator *= ( const double d );     // multiplication by a constant
+    Point3D& operator /= ( const double d );	 // division by a constant
+
+    void setx(const double x);
+    void sety(const double y);
+    void setz(const double z);
+
+    // Queries 
+
+    double& operator [] ( int i);		 // indexing
+    double operator[] (int i) const;		 // read-only indexing
+
+    inline const double *get_n() const { return n; };
+    double x() const;      // cartesian x
+    double y() const;      // cartesian y
+    double z() const;      // cartesian z
+
+    double lon() const;    // polar longitude
+    double lat() const;    // polar latitude
+    double radius() const; // polar radius
+    double elev() const;   // geodetic elevation (if specifying a surface point)
+
+    // friends
+    friend Point3D operator - (const Point3D& p);	            // -p1
+    friend bool operator == (const Point3D& a, const Point3D& b);  // p1 == p2?
+    friend istream& operator>> ( istream&, Point3D& );
+    friend ostream& operator<< ( ostream&, const Point3D& );
+
+    // Special functions
+    double distance3D(const Point3D& a) const;        // distance between
+    double distance3Dsquared(const Point3D& a) const; // distance between ^ 2
+};
+
+
+// input from stream
+inline istream&
+operator >> ( istream& in, Point3D& p)
+{
+    char c;
+
+    in >> p.n[PX];
+
+    // read past optional comma
+    while ( in.get(c) ) {
+	if ( (c != ' ') && (c != ',') ) {
+	    // push back on the stream
+	    in.putback(c);
+	    break;
+	}
+    }
+	
+    in >> p.n[PY];
+
+    // read past optional comma
+    while ( in.get(c) ) {
+	if ( (c != ' ') && (c != ',') ) {
+	    // push back on the stream
+	    in.putback(c);
+	    break;
+	}
+    }
+	
+    in >> p.n[PZ];
+
+    return in;
+}
+
+inline ostream&
+operator<< ( ostream& out, const Point3D& p )
+{
+    return out << p.n[PX] << ", " << p.n[PY] << ", " << p.n[PZ];
+}
+
+///////////////////////////
+//
+// Point3D Member functions
+//
+///////////////////////////
+
+// CONSTRUCTORS
+
+inline Point3D::Point3D() {}
+
+inline Point3D::Point3D(const double x, const double y, const double z)
+{
+    n[PX] = x; n[PY] = y; n[PZ] = z;
+}
+
+inline Point3D::Point3D(const double d)
+{
+    n[PX] = n[PY] = n[PZ] = d;
+}
+
+inline Point3D::Point3D(const Point3D& p)
+{
+    n[PX] = p.n[PX]; n[PY] = p.n[PY]; n[PZ] = p.n[PZ];
+}
+
+// ASSIGNMENT OPERATORS
+
+inline Point3D& Point3D::operator = (const Point3D& p)
+{
+    n[PX] = p.n[PX]; n[PY] = p.n[PY]; n[PZ] = p.n[PZ]; return *this;
+}
+
+inline Point3D& Point3D::operator += ( const Point3D& p )
+{
+    n[PX] += p.n[PX]; n[PY] += p.n[PY]; n[PZ] += p.n[PZ]; return *this;
+}
+
+inline Point3D& Point3D::operator -= ( const Point3D& p )
+{
+    n[PX] -= p.n[PX]; n[PY] -= p.n[PY]; n[PZ] -= p.n[PZ]; return *this;
+}
+
+inline Point3D& Point3D::operator *= ( const double d )
+{
+    n[PX] *= d; n[PY] *= d; n[PZ] *= d; return *this;
+}
+
+inline Point3D& Point3D::operator /= ( const double d )
+{
+    double d_inv = 1./d; n[PX] *= d_inv; n[PY] *= d_inv; n[PZ] *= d_inv;
+    return *this;
+}
+
+inline void Point3D::setx(const double x) {
+    n[PX] = x;
+}
+
+inline void Point3D::sety(const double y) {
+    n[PY] = y;
+}
+
+inline void Point3D::setz(const double z) {
+    n[PZ] = z;
+}
+
+// QUERIES
+
+inline double& Point3D::operator [] ( int i)
+{
+    assert(! (i < PX || i > PZ));
+    return n[i];
+}
+
+inline double Point3D::operator [] ( int i) const {
+    assert(! (i < PX || i > PZ));
+    return n[i];
+}
+
+
+inline double Point3D::x() const { return n[PX]; }
+
+inline double Point3D::y() const { return n[PY]; }
+
+inline double Point3D::z() const { return n[PZ]; }
+
+inline double Point3D::lon() const { return n[PX]; }
+
+inline double Point3D::lat() const { return n[PY]; }
+
+inline double Point3D::radius() const { return n[PZ]; }
+
+inline double Point3D::elev() const { return n[PZ]; }
+
+
+// FRIENDS
+
+inline Point3D operator - (const Point3D& a)
+{
+    return Point3D(-a.n[PX],-a.n[PY],-a.n[PZ]);
+}
+
+inline Point3D operator + (const Point3D& a, const Point3D& b)
+{
+    return Point3D(a) += b;
+}
+
+inline Point3D operator - (const Point3D& a, const Point3D& b)
+{
+    return Point3D(a) -= b;
+}
+
+inline Point3D operator * (const Point3D& a, const double d)
+{
+    return Point3D(a) *= d;
+}
+
+inline Point3D operator * (const double d, const Point3D& a)
+{
+    return a*d;
+}
+
+inline Point3D operator / (const Point3D& a, const double d)
+{
+    return Point3D(a) *= (1.0 / d );
+}
+
+inline bool operator == (const Point3D& a, const Point3D& b)
+{
+    return
+	fabs(a.n[PX] - b.n[PX]) < fgPoint3_Epsilon &&
+	fabs(a.n[PY] - b.n[PY]) < fgPoint3_Epsilon &&
+	fabs(a.n[PZ] - b.n[PZ]) < fgPoint3_Epsilon;
+}
+
+inline bool operator != (const Point3D& a, const Point3D& b)
+{
+    return !(a == b);
+}
+
+// Special functions
+
+inline double
+Point3D::distance3D(const Point3D& a ) const
+{
+    double x, y, z;
+
+    x = n[PX] - a.n[PX];
+    y = n[PY] - a.n[PY];
+    z = n[PZ] - a.n[PZ];
+
+    return sqrt(x*x + y*y + z*z);
+}
+
+
+inline double
+Point3D::distance3Dsquared(const Point3D& a ) const
+{
+    double x, y, z;
+
+    x = n[PX] - a.n[PX];
+    y = n[PY] - a.n[PY];
+    z = n[PZ] - a.n[PZ];
+
+    return(x*x + y*y + z*z);
+}
+
+
+#endif // _POINT3D_HXX
+
+

simgear/math/polar3d.cxx

@@ -0,0 +1,61 @@
+// polar.cxx -- routines to deal with polar math and transformations
+//
+// Written by Curtis Olson, started June 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#include <math.h>
+#include <stdio.h>
+
+#include <simgear/constants.h>
+
+#include "polar3d.hxx"
+
+
+// Find the Altitude above the Ellipsoid (WGS84) given the Earth
+// Centered Cartesian coordinate vector Distances are specified in
+// meters.
+double fgGeodAltFromCart(const Point3D& cp)
+{
+    double t_lat, x_alpha, mu_alpha;
+    double lat_geoc, radius;
+    double result;
+
+    lat_geoc = FG_PI_2 - atan2( sqrt(cp.x()*cp.x() + cp.y()*cp.y()), cp.z() );
+    radius = sqrt( cp.x()*cp.x() + cp.y()*cp.y() + cp.z()*cp.z() );
+	
+    if( ( (FG_PI_2 - lat_geoc) < ONE_SECOND )        // near North pole
+	|| ( (FG_PI_2 + lat_geoc) < ONE_SECOND ) )   // near South pole
+    {
+	result = radius - EQUATORIAL_RADIUS_M*E;
+    } else {
+	t_lat = tan(lat_geoc);
+	x_alpha = E*EQUATORIAL_RADIUS_M/sqrt(t_lat*t_lat + E*E);
+	mu_alpha = atan2(sqrt(RESQ_M - x_alpha*x_alpha),E*x_alpha);
+	if (lat_geoc < 0) {
+	    mu_alpha = - mu_alpha;
+	}
+	result = (radius - x_alpha/cos(lat_geoc))*cos(mu_alpha - lat_geoc);
+    }
+
+    return(result);
+}
+
+

simgear/math/polar3d.hxx

@@ -0,0 +1,101 @@
+// polar.hxx -- routines to deal with polar math and transformations
+//
+// Written by Curtis Olson, started June 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _POLAR_HXX
+#define _POLAR_HXX
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+
+#include <simgear/constants.h>
+#include <simgear/math/point3d.hxx>
+
+
+// Find the Altitude above the Ellipsoid (WGS84) given the Earth
+// Centered Cartesian coordinate vector Distances are specified in
+// meters.
+double fgGeodAltFromCart(const Point3D& cp);
+
+
+// Convert a polar coordinate to a cartesian coordinate.  Lon and Lat
+// must be specified in radians.  The FG convention is for distances
+// to be specified in meters
+inline Point3D fgPolarToCart3d(const Point3D& p) {
+    double tmp = cos( p.lat() ) * p.radius();
+
+    return Point3D( cos( p.lon() ) * tmp,
+		    sin( p.lon() ) * tmp,
+		    sin( p.lat() ) * p.radius() );
+}
+
+
+// Convert a cartesian coordinate to polar coordinates (lon/lat
+// specified in radians.  Distances are specified in meters.
+inline Point3D fgCartToPolar3d(const Point3D& cp) {
+    return Point3D( atan2( cp.y(), cp.x() ),
+		    FG_PI_2 - 
+		    atan2( sqrt(cp.x()*cp.x() + cp.y()*cp.y()), cp.z() ),
+		    sqrt(cp.x()*cp.x() + cp.y()*cp.y() + cp.z()*cp.z()) );
+}
+
+
+// calc new lon/lat given starting lon/lat, and offset radial, and
+// distance.  NOTE: starting point is specifed in radians, distance is
+// specified in meters (and converted internally to radians)
+// ... assumes a spherical world
+inline Point3D calc_lon_lat( const Point3D& orig, double course, double dist ) {
+    Point3D result;
+
+    // lat=asin(sin(lat1)*cos(d)+cos(lat1)*sin(d)*cos(tc))
+    // IF (cos(lat)=0)
+    //   lon=lon1      // endpoint a pole
+    // ELSE
+    //   lon=mod(lon1-asin(sin(tc)*sin(d)/cos(lat))+pi,2*pi)-pi
+    // ENDIF
+
+    // printf("calc_lon_lat()  offset.theta = %.2f offset.dist = %.2f\n",
+    //        offset.theta, offset.dist);
+
+    dist *= METER_TO_NM * NM_TO_RAD;
+    
+    result.sety( asin( sin(orig.y()) * cos(dist) + 
+		       cos(orig.y()) * sin(dist) * cos(course) ) );
+
+    if ( cos(result.y()) < FG_EPSILON ) {
+        result.setx( orig.x() );      // endpoint a pole
+    } else {
+        result.setx( 
+	    fmod(orig.x() - asin( sin(course) * sin(dist) / 
+				  cos(result.y()) ) + FG_PI, FG_2PI) - FG_PI );
+    }
+
+    return result;
+}
+
+
+#endif // _POLAR_HXX
+
+

simgear/math/sphrintp.h

@@ -0,0 +1,78 @@
+/*
+  WARNING - Do not remove this header.
+
+  This code is a templated version of the 'magic-software' spherical
+  interpolation code by Dave Eberly. The original (un-hacked) code can be
+  obtained from here: http://www.magic-software.com/gr_appr.htm
+  This code is derived from linintp2.h/cpp and sphrintp.h/cpp.
+
+  Dave Eberly says that the conditions for use are:
+
+  * You may distribute the original source code to others at no charge.
+
+  * You may modify the original source code and distribute it to others at
+    no charge. The modified code must be documented to indicate that it is
+    not part of the original package.
+
+  * You may use this code for non-commercial purposes. You may also
+    incorporate this code into commercial packages. However, you may not
+    sell any of your source code which contains my original and/or modified
+    source code. In such a case, you need to factor out my code and freely
+    distribute it.
+
+  * The original code comes with absolutely no warranty and no guarantee is
+    made that the code is bug-free.
+
+  This does not seem incompatible with GPL - so this modified version
+  is hereby placed under GPL along with the rest of FlightGear.
+
+                              Christian Mayer
+*/
+
+#ifndef SPHRINTP_H
+#define SPHRINTP_H
+
+#include "linintp2.h"
+#include <plib/sg.h>
+
+template<class T>
+class SphereInterpolate
+{
+public:
+    SphereInterpolate (int n, const double* x, const double* y,
+	const double* z, const T* f);
+    SphereInterpolate (int n, const sgVec2* p, const T* f);
+   
+    ~SphereInterpolate ();
+    
+    void GetSphericalCoords (const double x, const double y, const double z,
+	double& thetaAngle, double& phiAngle) const;
+    
+    int Evaluate (const double x, const double y, const double z, T& f) const;
+    int Evaluate (const double thetaAngle, const double phiAngle, T& f) const;
+
+    T Evaluate(const sgVec2& p) const
+    {
+	T retval;
+	Evaluate(p[1], p[0], retval);
+	return retval;
+    }
+ 
+    T Evaluate(const sgVec3& p) const
+    {
+	T retval;
+	Evaluate(p[1], p[0], retval);
+	return retval;
+    }
+
+protected:
+    int numPoints;
+    double* theta;
+    double* phi;
+    T* func;
+    mgcLinInterp2D<T>* pInterp;
+};
+
+#include "sphrintp.inl"
+
+#endif

simgear/math/sphrintp.inl

@@ -0,0 +1,172 @@
+/*
+  WARNING - Do not remove this header.
+
+  This code is a templated version of the 'magic-software' spherical
+  interpolation code by Dave Eberly. The original (un-hacked) code can be
+  obtained from here: http://www.magic-software.com/gr_appr.htm
+  This code is derived from linintp2.h/cpp and sphrintp.h/cpp.
+
+  Dave Eberly says that the conditions for use are:
+
+  * You may distribute the original source code to others at no charge.
+
+  * You may modify the original source code and distribute it to others at
+    no charge. The modified code must be documented to indicate that it is
+    not part of the original package.
+
+  * You may use this code for non-commercial purposes. You may also
+    incorporate this code into commercial packages. However, you may not
+    sell any of your source code which contains my original and/or modified
+    source code. In such a case, you need to factor out my code and freely
+    distribute it.
+
+  * The original code comes with absolutely no warranty and no guarantee is
+    made that the code is bug-free.
+
+  This does not seem incompatible with GPL - so this modified version
+  is hereby placed under GPL along with the rest of FlightGear.
+
+                              Christian Mayer
+*/
+
+#include <math.h>
+#include "sphrintp.h"
+
+static const double PI = 4.0*atan(1.0);
+static const double TWOPI = 2.0*PI;
+
+//---------------------------------------------------------------------------
+template<class T>
+SphereInterpolate<T>::SphereInterpolate (int n, const double* x,
+				         const double* y, const double* z,
+				         const T* f)
+{
+    // Assumes (x[i],y[i],z[i]) is unit length for all 0 <= i < n.
+    // For complete spherical coverage, include the two antipodal points
+    // (0,0,1,f(0,0,1)) and (0,0,-1,f(0,0,-1)) in the data set.
+    
+    cout << "Initialising spherical interpolator.\n";
+    cout << "[  0%] Allocating memory                                           \r";
+
+    theta = new double[3*n];
+    phi = new double[3*n];
+    func = new T[3*n];
+    
+    // convert data to spherical coordinates
+    int i;
+    T empty;
+
+    for (i = 0; i < n; i++)
+    {
+	GetSphericalCoords(x[i],y[i],z[i],theta[i],phi[i]);
+	func[i] = f[i];
+    }
+    
+    // use periodicity to get wrap-around in the Delaunay triangulation
+    cout << "[ 10%] copying vertices for wrap-around\r";
+    int j, k;
+    for (i = 0, j = n, k = 2*n; i < n; i++, j++, k++)
+    {
+	theta[j] = theta[i]+TWOPI;
+	theta[k] = theta[i]-TWOPI;
+	phi[j] = phi[i];
+	phi[k] = phi[i];
+	func[j] = func[i];
+	func[k] = func[i];
+    }
+    
+    pInterp = new mgcLinInterp2D<T>(3*n,theta,phi,func);
+
+    cout << "[100%] Finished initialising spherical interpolator.                   \n";
+}
+
+template<class T>
+SphereInterpolate<T>::SphereInterpolate (int n, const sgVec2* p, const T* f)
+{
+    // Assumes (x[i],y[i],z[i]) is unit length for all 0 <= i < n.
+    // For complete spherical coverage, include the two antipodal points
+    // (0,0,1,f(0,0,1)) and (0,0,-1,f(0,0,-1)) in the data set.
+    cout << "Initialising spherical interpolator.\n";
+    cout << "[  0%] Allocating memory                                           \r";
+
+    theta = new double[3*n];
+    phi = new double[3*n];
+    func = new T[3*n];
+
+    // convert data to spherical coordinates
+    cout << "[ 10%] copying vertices for wrap-around                              \r";
+
+    int i, j, k;
+    for (i = 0, j = n, k = 2*n; i < n; i++, j++, k++)
+    {
+	phi[i] = p[i][0];
+	theta[i] = p[i][1];
+	func[i] = f[i];
+
+	// use periodicity to get wrap-around in the Delaunay triangulation
+	phi[j] = phi[i];
+	phi[k] = phi[i];
+	theta[j] = theta[i]+TWOPI;
+	theta[k] = theta[i]-TWOPI;
+	func[j] = func[i];
+	func[k] = func[i];
+    }
+    
+    pInterp = new mgcLinInterp2D<T>(3*n,theta,phi,func);
+
+    cout << "[100%] Finished initialising spherical interpolator.                   \n";
+}
+//---------------------------------------------------------------------------
+template<class T>
+SphereInterpolate<T>::~SphereInterpolate ()
+{
+    delete pInterp;
+    delete[] theta;
+    delete[] phi;
+    delete[] func;
+}
+//---------------------------------------------------------------------------
+template<class T>
+void SphereInterpolate<T>::GetSphericalCoords (const double x, const double y, const double z,
+					       double& thetaAngle,
+					       double& phiAngle) const
+{
+    // Assumes (x,y,z) is unit length.  Returns -PI <= thetaAngle <= PI
+    // and 0 <= phiAngle <= PI.
+    
+    if ( z < 1.0f )
+    {
+	if ( z > -1.0f )
+	{
+	    thetaAngle = atan2(y,x);
+	    phiAngle = acos(z);
+	}
+	else
+	{
+	    thetaAngle = -PI;
+	    phiAngle = PI;
+	}
+    }
+    else
+    {
+	thetaAngle = -PI;
+	phiAngle = 0.0f;
+    }
+}
+//---------------------------------------------------------------------------
+template<class T>
+int SphereInterpolate<T>::Evaluate (const double x, const double y, const double z, T& f) const 
+{
+    // assumes (x,y,z) is unit length
+    
+    double thetaAngle, phiAngle;
+    GetSphericalCoords(x,y,z,thetaAngle,phiAngle);
+    return pInterp->Evaluate(thetaAngle,phiAngle,f);
+}
+//---------------------------------------------------------------------------
+template<class T>
+int SphereInterpolate<T>::Evaluate (const double thetaAngle, const double phiAngle, T& f) const 
+{
+    return pInterp->Evaluate(thetaAngle,phiAngle,f);
+}
+//---------------------------------------------------------------------------

simgear/math/vector.cxx

@@ -0,0 +1,83 @@
+// vector.cxx -- additional vector routines
+//
+// Written by Curtis Olson, started December 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#include <math.h>
+#include <stdio.h>
+
+// #include <Include/fg_types.h>
+
+#include "vector.hxx"
+
+
+// Given a point p, and a line through p0 with direction vector d,
+// find the shortest distance (squared) from the point to the line
+double sgPointLineDistSquared( const sgVec3 p, const sgVec3 p0,
+			       const sgVec3 d ) {
+
+    sgVec3 u, u1, v;
+    double ud, dd, tmp;
+    
+    // u = p - p0
+    sgSubVec3(u, p, p0);
+
+    // calculate the projection, u1, of u along d.
+    // u1 = ( dot_prod(u, d) / dot_prod(d, d) ) * d;
+    ud = sgScalarProductVec3(u, d);
+    dd = sgScalarProductVec3(d, d);
+    tmp = ud / dd;
+
+    sgScaleVec3(u1, d, tmp);;
+
+    // v = u - u1 = vector from closest point on line, p1, to the
+    // original point, p.
+    sgSubVec3(v, u, u1);
+
+    return ( sgScalarProductVec3(v, v) );
+}
+
+
+// Given a point p, and a line through p0 with direction vector d,
+// find the shortest distance (squared) from the point to the line
+double sgdPointLineDistSquared( const sgdVec3 p, const sgdVec3 p0,
+				const sgdVec3 d ) {
+
+    sgdVec3 u, u1, v;
+    double ud, dd, tmp;
+    
+    // u = p - p0
+    sgdSubVec3(u, p, p0);
+
+    // calculate the projection, u1, of u along d.
+    // u1 = ( dot_prod(u, d) / dot_prod(d, d) ) * d;
+    ud = sgdScalarProductVec3(u, d);
+    dd = sgdScalarProductVec3(d, d);
+    tmp = ud / dd;
+
+    sgdScaleVec3(u1, d, tmp);;
+
+    // v = u - u1 = vector from closest point on line, p1, to the
+    // original point, p.
+    sgdSubVec3(v, u, u1);
+
+    return ( sgdScalarProductVec3(v, v) );
+}

simgear/math/vector.hxx

@@ -0,0 +1,99 @@
+// vector.hxx -- additional vector routines
+//
+// Written by Curtis Olson, started December 1997.
+//
+// Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
+//
+// 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.
+//
+// This program is distributed in the hope that it will be useful, but
+// WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+//
+// $Id$
+
+
+#ifndef _VECTOR_HXX
+#define _VECTOR_HXX
+
+
+#ifndef __cplusplus                                                          
+# error This library requires C++
+#endif                                   
+
+#ifdef HAVE_CONFIG_H
+#  include <config.h>
+#endif
+
+#include <simgear/compiler.h>
+
+#include <plib/sg.h>
+
+
+inline void sgmap_vec_onto_cur_surface_plane( sgVec3 normal, 
+					      sgVec3 v0, 
+					      sgVec3 vec,
+					      sgVec3 result )
+{
+    sgVec3 u1, v, tmp;
+
+    // calculate a vector "u1" representing the shortest distance from
+    // the plane specified by normal and v0 to a point specified by
+    // "vec".  "u1" represents both the direction and magnitude of
+    // this desired distance.
+
+    // u1 = ( (normal <dot> vec) / (normal <dot> normal) ) * normal
+
+    sgScaleVec3( u1,
+		 normal,
+		 ( sgScalarProductVec3(normal, vec) /
+		   sgScalarProductVec3(normal, normal)
+		   )
+		 );
+
+    // printf("  vec = %.2f, %.2f, %.2f\n", vec[0], vec[1], vec[2]);
+    // printf("  v0 = %.2f, %.2f, %.2f\n", v0[0], v0[1], v0[2]);
+    // printf("  u1 = %.2f, %.2f, %.2f\n", u1[0], u1[1], u1[2]);
+   
+    // calculate the vector "v" which is the vector "vec" mapped onto
+    // the plane specified by "normal" and "v0".
+
+    // v = v0 + vec - u1
+
+    sgAddVec3(tmp, v0, vec);
+    sgSubVec3(v, tmp, u1);
+    // printf("  v = %.2f, %.2f, %.2f\n", v[0], v[1], v[2]);
+
+    // Calculate the vector "result" which is "v" - "v0" which is a
+    // directional vector pointing from v0 towards v
+
+    // result = v - v0
+
+    sgSubVec3(result, v, v0);
+    // printf("  result = %.2f, %.2f, %.2f\n", 
+    // result[0], result[1], result[2]);
+}
+
+
+// Given a point p, and a line through p0 with direction vector d,
+// find the shortest distance (squared) from the point to the line
+double sgPointLineDistSquared( const sgVec3 p, const sgVec3 p0,
+			       const sgVec3 d );
+
+// Given a point p, and a line through p0 with direction vector d,
+// find the shortest distance (squared) from the point to the line
+double sgdPointLineDistSquared( const sgdVec3 p, const sgdVec3 p0,
+				const sgdVec3 d );
+
+
+#endif // _VECTOR_HXX
+
+

simgear/metar/Antoi.cpp

@@ -0,0 +1,73 @@
+#pragma comment(compiler)
+#pragma comment(date)
+#pragma comment(timestamp)
+ 
+#include <stdlib.h>
+ 
+#pragma title("antoi - char array to integer")
+#pragma pagesize (80)
+ 
+#pragma page(1)
+/********************************************************************/
+/*                                                                  */
+/*  Title:         antoi                                            */
+/*  Date:          Jan 28, 1991                                     */
+/*  Organization:  W/OSO242 - Graphics and Display Section          */
+/*  Programmer:    Allan Darling                                    */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      This function will convert a character array     */
+/*                 (string) of length (len) into an integer.        */
+/*                 The integer is created via a call to the         */
+/*                 function atoi.  This function extends the        */
+/*                 functionality of atoi by removing the            */
+/*                 requirement for a sentinal delimited string      */
+/*                 as input.                                        */
+/*                                                                  */
+/*  Input: - Pointer to an array of characters.                     */
+/*         - Integer indicating the number of character to include  */
+/*           in the conversion.                                     */
+/*                                                                  */
+/*  Output:- An integer corresponding to the value in the character */
+/*           array or MAXNEG (-2147483648) if the function is       */
+/*           unable to acquire system storage.                      */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None                                             */
+/*                                                                  */
+/********************************************************************/
+ 
+int antoi(char * string, int len)
+{
+ 
+    /*******************/
+    /* local variables */
+    /*******************/
+ 
+    char * tmpstr;
+    int i,
+        retval;
+ 
+ 
+    /*****************/
+    /* function body */
+    /*****************/
+ 
+    tmpstr = (char *)malloc((len+1) * sizeof(char));
+ 
+    if (tmpstr == NULL) return (-2147483648);
+ 
+    for (i = 0; i < len; i++)
+       tmpstr[i] = string[i];
+ 
+    tmpstr[len] = '\0';
+ 
+    retval = atoi(tmpstr);
+ 
+    free(tmpstr);
+ 
+    return(retval);
+ 
+} /* end antoi */
+ 
+#pragma page(1)

simgear/metar/Charcmp.cpp

@@ -0,0 +1,172 @@
+#pragma comment (compiler)
+//#pragma comment (date)
+//#pragma comment (timestamp)
+#pragma pagesize(80)
+ 
+#include "Local.h"     /* standard header file */
+ 
+#pragma subtitle(" ")
+#pragma page(1)
+#pragma subtitle("charcmp - characters compare with patterns  ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         charcmp                                          */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          12 Dec 1995                                      */
+/*  Programmer:    CINDY L. CHONG                                   */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      This function will compare each character in the */
+/*                 string match with each character in the pattern  */
+/*                 which is made up of characters.   The str can    */
+/*                 be longer than the pattern.                      */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 None.                                            */
+/*                                                                  */
+/*  Input:         str is a pointer to char                         */
+/*                 pattern is a pointer to char                     */
+/*                                                                  */
+/*  Output:        Return true if str matches pattern,              */
+/*                 otherwise, return false                          */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+ 
+bool charcmp(char *str, char *pattern)
+{
+ 
+ 
+   /**********************************************************/
+   /* Loop while str and pattern is not equal to null, then  */
+   /* inscreases str and pattern by one                      */
+   /**********************************************************/
+ 
+   for (; *pattern != '\0'; pattern++)
+   {
+      if (*str == '\0')
+         return FALSE;
+ 
+      /************************************************************/
+      /* If pattern match str, then increase str and jump out the */
+      /* case and read next char of the str and pattern           */
+      /************************************************************/
+ 
+      if ( isspace(*pattern) )
+         pattern = nxtalpha(pattern);
+ 
+      switch( *pattern )
+      {
+         case 'c':
+            if ( !isalnum(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'a':
+            if ( !isalpha(*str) )
+            {
+               return FALSE;
+            }
+            str++;
+            break;
+ 
+         case 'n':
+            if ( !iscntrl(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'd':
+            if ( !isdigit(*str) )
+            {
+               return FALSE;
+            }
+            str++;
+            break;
+ 
+         case 'g':
+            if ( !isgraph(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'i':
+            if ( !islower(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'p':
+            if ( !isprint(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 't':
+            if ( !ispunct(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'w':
+            if ( !isspace(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'u':
+            if ( !isupper(*str++) )
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 's':
+            if (*str++ != ' ')
+            {
+               return FALSE;
+            }
+            break;
+ 
+         case 'm':
+            if ( !isspace(*str) )
+            {
+               return FALSE;
+            }
+            else
+            {
+               while ( isspace(*str) )
+                  str++;
+            }
+            break;
+ 
+         case '\'':
+            pattern++;
+            if (*pattern != *str)
+            {
+               return FALSE;
+            }
+            pattern++;
+            str++;
+            break;
+ 
+         default:
+            return FALSE;
+ 
+      } /* end switch */
+ 
+   } /* end for */
+ 
+   return (TRUE);
+}

simgear/metar/Drvmetar.c

@@ -0,0 +1,544 @@
+#include "Metar.h"
+ 
+#pragma page(1)
+#pragma subtitle(" ")
+#pragma subtitle("subtitle - description                       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         dRVMETAR                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          28 Oct 1994                                      */
+/*  Programmer:    CARL MCCALLA                                     */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      DRVMETAR is a main routine that acts a driver    */
+/*                 for testing the METAR Decoder function.          */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 None.                                            */
+/*                 DcdMETAR                                         */
+/*                 prtDcdMetar                                      */
+/*                 Sec0MTSm                                         */
+/*                 Sec1MTSm                                         */
+/*                                                                  */
+/*  Input:         None                                             */
+/*                                                                  */
+/*  Output:        None                                             */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+main()
+{
+   char bltn_prefix[20];
+   static char *string[] =
+  {
+  "KAST 221156Z COR 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+ 
+  "KAST COR 221156Z 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+ 
+  "KAST COR 221156Z 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+ 
+  "KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+ 
+  "KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 6//// 70109 T00890084 10100 20089 55005",
+ 
+   NULL,
+ 
+ 
+ "EPIT 1755 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1/2V3/4",
+ 
+   "KFAR 181154Z 10003KT 1/4SM HZ CLR 16/13 A2988 RMK AO2 "
+   "SLP117 56012 10345 20226 T01610133 $",
+ 
+   "KFAR 181154Z 10003KT 1/SM HZ CLR 16/13 A2988 RMK AO2 "
+   "SLP117 56012 10345 20226 T01610133 $",
+ 
+ 
+ 
+ 
+"RKSS 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
+ 
+"RKSS 1200 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
+ 
+"RKSS 1130Z 23011KT 1100 R14R/P1500N R14L/P1500N BR SCT010 BKN030 "
+"BKN080 21/21 Q1006 NOSIG",
+ 
+"RKSS 1130Z 23011KT 1100 R14R/P1500 R14L/P1500 BR SCT010 BKN030 "
+"BKN080 21/21 Q1006 NOSIG",
+ 
+NULL,
+   "KFAR 181154Z 10003KT 4SM HZ CLR 16/13 A2988 RMK AO2 "
+   "SLP117 56012 1//// 2//// T01610133 $",
+ 
+   "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+   "SF6SC1 VSBY RDCE DUE LO CLD SLP186",
+ 
+   "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+   "SF6SC1 VSBY RDCE DUE10 LO CLD SLP186",
+ 
+   "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+   "SF6SC1 VSBY RDCE DUE9 LO CLD SLP186",
+ 
+   "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+   "SF6SC1 VSBY RDCE FZDZE10 LO CLD SLP186",
+ 
+   "CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+   "SF6SC1 VSBY RDCE FZDZE9 LO CLD SLP186",
+ 
+ 
+ 
+ 
+ 
+"MKJP 1400Z 13011KT 9999 FEW022 30/XX Q1015",
+"MKJP 1400Z 13011KT 9999 FEW022 M30/XX Q1015",
+"MKJP 1400Z 13011KT 9999 FEW022 MM/XX Q1015",
+"MKJP 1400Z 13011KT 9999 FEW022 MM/30 Q1015",
+"MKJP 1400Z 13011KT 9999 FEW022 MM/M30 Q1015",
+ 
+ 
+ 
+ 
+  "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 BKN045 OVC090 "
+  "SCT120 FEW250 RMK OCNL LTGICCG OHD",
+ 
+  "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
+  "RMK TEMPO 8000 -SHRA BKN015 FRQ LTG VC",
+ 
+  "EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
+  "RMK TEMPO 8000 -SHRA BKN015 LTG DSNT W",
+ 
+ 
+  "METAR KLAX 281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
+  "+TS BLPY FEW/// SCT000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
+  "TORNADO B13E45 6 NE MOV E A02 PK WND 18515/45 "
+  "WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "VIS 2 1/2 RY11 "
+  "DVR/1000V1600FT "
+  "OCNL LTG VCY STN "
+  "RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
+  "PRESFR PRESRR SLP013 FG FEW/// HZ SCT000 VIS NW 2 1/2 GR 3/4 "
+  "VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
+  "FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
+  "933125 98096 P 0125 60225 70565 "
+  "T00261015 10369 21026 "
+  "404800360 52101 VISNO RY05 CHINO RY27 PNO RVRNO "
+  "PWINO FZRANO TSNO $",
+ 
+ 
+  "KBOS 251356Z 26011KT 10SM CLR 12/02 A2995 RMK AO2 SC VCNTY "
+  "STN SSE-NNW SCT CI ABV SLP141 T01220023",
+ 
+  "EFHK 36009KT 340V060 CAVOK 12/M02 Q1013 NOSIG",
+  "EGKK 24011KT 210V300 9999 SCT020 BKN045 12/06 Q1007 NOSIG",
+  "EGPD 31018KT 8000 RA FEW013 BKN021 OVC045 06/04 Q0994 NOSIG",
+  "EKCH 16012KT CAVOK 20/07 Q1006 NOSIG",
+  "ESKN 10014KT 9000 BR SCT100 14/04 Q1010",
+  "LOWW 231450Z 14017KT CAVOK 23/07 Q1010 NOSIG",
+ 
+ 
+  "METAR CYCH 171500Z CCA 30017KT 2SM -SN BKN006",
+ 
+  "METAR CYOW 171500Z CCA 30017KT 2SM -SN BKN006 OVC020 00/M02 "
+  "A2957 RMK S35F4NS1 /S01/ SNW WET SNW MELTG ON GRND CIG 5-7 "
+  "SLP018",
+ 
+  "KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
+  " TSB0159E30 TS SE MOV NE",
+ 
+  "KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+  "AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
+  " TSE0159 TS SE",
+ 
+  "KHVR 1756Z 31007KT 5SM -SN SCT011 BKN024 OVC030 M05/M08 A3056 "
+  "RMK AOA 933004 "
+  "BKN V SCT TNO PCPN 000 $ SLP389 4/015 60002 "
+  "T10501077 11050 21078 51010",
+ 
+  "SPECI KGFI 041420Z AUTO 18030KT 3 1/2SM RVRNO TS -RA BKN008 OVC060 "
+  "26/22 A2991 RMK A02 RA15TSB20 PRESFR SLP 101 P 0000 T02640218",
+ 
+  "METAR KCLE 281156Z 170100G135KT 110V180  M1/4SM "
+  "R01L/P6000FT +TSSHRA VCFG "
+  "BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "CIG 1000V1500 PRESFR FRQ LTG CG NW "
+  "RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
+  "T1263 "
+  "VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+  "CYQR 161700Z 15015KT 15SM SCT045 SCT090 BKN250 10/03 A2955 "
+  "RMK SC1AC2C11 OB TAKEN H+ 5 DUE AWOS FAILURE SLP027",
+ 
+ 
+ 
+ 
+ "KPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1V2",
+ 
+ 
+ 
+ 
+ 
+  "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP 701 P 0254 199/182",
+ 
+  "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP701 P0254 199/182",
+ 
+"KHLN 281156Z AUTO 27005KT 10SM OVC023 07/05 A3011 RMK AOA OVC V "
+"BKN $ SLP202 60000 70001 T00670050 10122 20061 53003",
+ 
+"KPHX 281156Z 12004KT 10SM CLR 15/05 A2996 RMK AOA SLP135 T01500050 "
+"10250 20150 53006",
+"KFCA 281156Z 30003KT 10SM CLR 06/02 A3009 RMK AO TNO $ SLP191 "
+"T00610023 10167 20056 53003",
+"KAST 281156Z 00000KT 10SM BKN095 09/08 A2997 RMK AOA SLP150 "
+"T00940084 10161 20094 52005 ",
+"KHVR 281156Z 03003KT 10SM OVC020 09/07 A3010 RMK AO TNO ZRNO "
+"$ SLP194 T00940073 10156 20089 51005",
+"KGGW 281156Z 35006KT 5SM BR OVC010 10/09 A3003 RMK AOA $ SLP177 "
+"70003 T01000095 10156 20110 53008",
+"KELY 1153Z AUTO 14004KT 10SM SCT075 01/M01 A3011 RMK AOA TNO ZRNO "
+"SLP171 70001 T00061011 10139 21006 51005",
+"KFLG 281156Z 29006KT 10SM CLR 04/M01 A3012 RMK AO TNO SLP147 "
+"T00391011 21006 51004",
+"KGTF 281156Z 27005KT 7SM BKN080 04/04 A3010 RMK AOA SLP205 "
+"T00440045 10117 20039 51006",
+ 
+"K13A 1918Z 20011KT 26/M06 RMK AO PKWND 020/RNO 644V264 T02611061",
+ 
+"KP88 1919Z 09001KT 14/03 RMK AO / PKWND 002/RNO 158 Z T01440034",
+ 
+"K40B 1924Z 29004KT 15/M07 RMK AO PKWND 011/RM MV263 T01501072",
+ 
+   "KGGW 1756Z 33018KT 10SM OVC015 M03/M06 A3041 RMK AOA SLP338 "
+   "4/007 60002 T10281055 11028 21072 51009",
+   "KPHX 1756Z 130004KT 10SM CLR 18/M03 A3001 RMK AOA SLP154 "
+   "T01781033 10178 20067 58007",
+   "KFCA 1756Z 29005KT 10SM CLR 05/M11 A3049 RMK AOA TNO SLP352 "
+   "T00501111 10050 21044 50004",
+   "KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 "
+   "T01110045 10111 20000 50002",
+   "KELY 1753Z 34010KT 10SM CLR 01/M07 A3022 RMK AOA TNO ZRNO "
+   "SLP240 T00111066 10011 21078 58007",
+   "KFLG 1756Z 07006KT 10SM CLR 06/M12 A3009 RMK AO TNO ZRNO "
+   "SLP178 T00561122 10061 21100 58005",
+   "KGTF 1756Z 35010KT 1/2SM -SN FG VV09 M06/M08 A3051 RMK AOA "
+   "933004 SFC VSBY 3/4 "
+   "PCPN M SLP393 60010 T10611077 11044 21067 53013",
+   "KHLN 1756Z 35012KT 10SM SCT032 OVC060 M02/M09 A3048 RMK AOA "
+   "SLP369 60000 T10171094 11017 21061 53006",
+   "KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 61104 "
+   "71235 T01110045 10111 20000 401720056 58002",
+  "METAR KLAX 04281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
+  "+TS BLPY FEW000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
+  "TORNADO B13 DSNT NE A02 PK WND 18515/45 "
+  "WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "VIS 2 1/2 RY11 OCNL LTG VCY STN "
+  "RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
+  "PRESFR PRESRR SLP013 FG FEW000 VIS NW2 1/2 GR 3/4 "
+  "VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
+  "FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
+  "933125 98096 P 0125 60225 70565 "
+  "T00261015 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+ 
+ 
+  "METAR KGFI 041356Z AUTO 17012KT 130V210 3 1/2SM R15L/0500FT -RA "
+  "SCT050 OVC110 26/18 A2991 RMK FUNNEL CLOUDS A02 RAB30 "
+  "SLP 101 GR M1/4 VIRGA SCT V BKN P 0010 T02640178",
+ 
+  "METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 "
+  "RMK WATERSPOUTS VCY STN NW A02 SLP 101 10288 20243 52021 $ ",
+ 
+  "SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "A2900 RMK A02A PK WND 18056/28 OCNL LTG AP "
+  "RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP 701 P 0254 T01990182",
+ 
+  "KABE 281900Z NIL",
+ 
+  "METAR KPIT NIL",
+ 
+  "METAR KCLE 04281156Z 170100G135KT 110V180  M1/4SM "
+  "R01L/P6000FT +TSSHRA VCFG "
+  "BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "CIG 1000V1500 PRESFR FRQ LTG CG NW "
+  "RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
+  "T1263 "
+  "VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+  "METAR KPHL 040256Z AUTO 170100G135KT 130V210  1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+  "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 LTG DSNT "
+  "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP037 GR 2 3/4 "
+  "VIRGA E 8/365 4/178 P 0125 70565 21026 T0263 10369 60225 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+  "SPECI KGFI 041420Z AUTO 18030KT 2 1/2SM RVRNO TS -RA BKN008 "
+  "OVC060 25/22 A2991 RMK A02 LTG DSNT W "
+  "RAB15TSB20 PRESFR SLP101 P 0000 "
+  "254/218",
+ 
+  "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+  "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR M1/4 "
+  "VIRGA SE 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+ 
+ 
+ 
+  "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+  "FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+  "VIRGA 35 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
+  "VIRGA 35 8/365 4/178 P 0125 21026 70565 10369 60225 T0263 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+ 
+  "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+  "FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 18515/45 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+  "VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO $",
+ 
+  "METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+  "R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+  "FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 185150/1345 "
+  "WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+  "RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+  "VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
+  "404800360 52101 PWINO FZRANO TSNO",
+ 
+ 
+ 
+  "METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 RMK "
+  "A02 SLP 101 10288 20243 52021",
+  "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP 701 P 0254 M199/M182",
+ 
+  "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP 701 P 0254 M199/182",
+ 
+  "SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+  "M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+  "SLP 701 P 0254 199/M182",
+ 
+ "METAR APIT 171755Z AUTO 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 4/369 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 8/563 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1 1/2V2 SLP875 SGB1213E1225",
+ 
+ "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+ "          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK SLP056 "
+ "RAE0123",
+ 
+ "SPECI APIT 171755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 8/321 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1 SLP875 FGB1713",
+ 
+ "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1V2 SLP875",
+ 
+ 
+ "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1 1/2V2 1/2 SLP875",
+ 
+ "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1V2 1/2 SLP875",
+ 
+ 
+ "EGPF 1720Z 00000KT 9999 -SHRA STC014 SCT020CB BNK024 12/09 "
+ "Q1003 NOSIG",
+ 
+ "NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
+ "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+ "     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
+ "DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
+ "DAAT 1830Z 30010KT CAVOK 29/06 Q1019",
+ 
+ "GQPP 1800Z 34023KT 3000 DRSA SKC 24/20 Q1011 NSG",
+ "DAAG 1830Z 06006KT 9999 SCT020 25/22 Q1015",
+ "DABB 1830Z 04010KT 9999 SCT030TCU SCT033CB 27/18 Q1017",
+ "DABC 1830Z 00000KT 9999 SCT026TCU SCT036CB 22/18 Q1020 RETS",
+ 
+ "NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
+ "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+ "          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK K",
+ "NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+ "     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
+ "DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
+ 
+ "GFLL 1900Z NIL",
+ 
+ "GOOY 1800Z 03006G17KT 340V080 6000 TSRA BKN016 BKN030CB "
+ "BKN133 26/23 Q1013 NOSIG",
+ 
+ "GCXO 1930Z 32018KT 8000 SCT003 SCT007 18/16 Q1019",
+ 
+ "APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1 1/2V2",
+ 
+ "BPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1V2",
+ 
+ "CPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1V2 1/2",
+ 
+ "DPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 1 1/2V2 1/2",
+ 
+ 
+ "FPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 3/4V2 1/2",
+ 
+ "GPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+ "R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+ "RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+ "PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+ "CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+ "SFC VIS 1 1/2 VIS 3/4V3",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/M16 A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/16 A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/M16 A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/M16 A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/16 A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/MM A2992",
+ 
+ "KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+ "TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/MM A2992",
+ 
+        NULL};
+ 
+   /***************************/
+   /* DECLARE LOCAL VARIABLES */
+   /***************************/
+ 
+   Decoded_METAR Metar;
+   Decoded_METAR *Mptr = &Metar;
+   int j,
+       ErReturn;
+   static char *synopRTRN = NULL;
+ 
+ 
+   /***************************************************/
+   /* START BODY OF MAIN ROUTINE FOR CALLING DcdMETAR */
+   /***************************************************/
+ 
+   j = 0;
+ 
+   while( string[j] != NULL)
+   {
+            /*-- PRINT INPUT METAR REPORT ----------------------------*/
+      printf("INPUT METAR REPORT: %s\n",string[j] );
+ 
+            /*-- DECODE INPUT REPORT ---------------------------------*/
+      if ( (ErReturn = DcdMETAR( string[ j ], Mptr )) != 0 )
+         printf("DcdMETAR:  Error Return Number: %d\n",ErReturn);
+ 
+            /*-- PRINT DECODED METAR REPORT ELEMENTS -----------------*/
+      prtDMETR( Mptr );
+ 
+      j++;
+ 
+   }
+ 
+}

simgear/metar/Fracpart.cpp

@@ -0,0 +1,63 @@
+#include "Local.h"     /* standard header file */
+#include "Metar.h"
+ 
+#pragma subtitle(" ")
+#pragma page(1)
+#pragma subtitle("subtitle - description                       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         fracPart                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          13 Jun 1995                                      */
+/*  Programmer:    CARL MCCALLA                                     */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      Convert a character string fraction into a       */
+/*                 decimal (floating point) number.                 */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 None.                                            */
+/*                                                                  */
+/*  Input:         string - a pointer to a character string frac-   */
+/*                          tion.                                   */
+/*  Output:        A decimal (floating point) number.               */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+ 
+float fracPart( char *string )
+{
+ 
+   /***************************/
+   /* DECLARE LOCAL VARIABLES */
+   /***************************/
+ 
+   char buf[ 6 ],
+        *slash;
+ 
+   float numerator,
+         denominator;
+ 
+   /*************************/
+   /* START BODY OF ROUTINE */
+   /*************************/
+ 
+   slash = strchr(string, '/');
+ 
+   memset(buf , '\0', 6);
+   strncpy( buf, string, slash-string);
+ 
+   numerator = (float) atoi(buf);
+ 
+   memset(buf , '\0', 6);
+   strcpy( buf, slash+1);
+ 
+   denominator = (float) atoi(buf);
+ 
+   return (numerator/denominator);
+ 
+}
+ 

simgear/metar/Makefile.am

@@ -0,0 +1,12 @@
+includedir = @includedir@/metar
+
+lib_LIBRARIES = libsgmetar.a
+
+libsgmetar_a_SOURCES = \
+	Antoi.cpp Charcmp.cpp Dcdmetar.cpp Dcdmtrmk.cpp Drvmetar.c \
+	Fracpart.cpp Local.h Metar.h \
+	MetarReport.cpp MetarReport.h \
+	MetarStation.cpp MetarStation.h \
+	Prtdmetr.cpp Stspack2.cpp Stspack3.cpp
+
+INCLUDES += -I$(top_builddir)

simgear/metar/Metar.dsp

@@ -0,0 +1,149 @@
+# Microsoft Developer Studio Project File - Name="Metar" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Static Library" 0x0104
+
+CFG=Metar - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "Metar.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "Metar.mak" CFG="Metar - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "Metar - Win32 Release" (based on "Win32 (x86) Static Library")
+!MESSAGE "Metar - Win32 Debug" (based on "Win32 (x86) Static Library")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""
+# PROP Scc_LocalPath ""
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "Metar - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_MBCS" /D "_LIB" /YX /FD /c
+# ADD CPP /nologo /G6 /W3 /GX /Zi /O2 /I "..\..\..\lib" /I "..\lib" /I "..\..\lib" /I "..\..\..\..\lib" /I ".." /I "..\.." /I "..\..\.." /I "..\..\..\.." /I "..\include" /I "..\..\include" /I "..\..\..\include" /I "..\..\..\..\include" /D "WIN32" /D "NDEBUG" /D "_MBCS" /D "_LIB" /FD /c
+# SUBTRACT CPP /YX
+# ADD BASE RSC /l 0x409 /d "NDEBUG"
+# ADD RSC /l 0x409 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LIB32=link.exe -lib
+# ADD BASE LIB32 /nologo
+# ADD LIB32 /nologo
+
+!ELSEIF  "$(CFG)" == "Metar - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_MBCS" /D "_LIB" /YX /FD /GZ /c
+# ADD CPP /nologo /G6 /W3 /Gm /GX /Zi /Od /I "..\..\..\lib" /I "..\lib" /I "..\..\lib" /I "..\..\..\..\lib" /I ".." /I "..\.." /I "..\..\.." /I "..\..\..\.." /I "..\include" /I "..\..\include" /I "..\..\..\include" /I "..\..\..\..\include" /D "WIN32" /D "_DEBUG" /D "_MBCS" /D "_LIB" /FD /c
+# ADD BASE RSC /l 0x409 /d "_DEBUG"
+# ADD RSC /l 0x409 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LIB32=link.exe -lib
+# ADD BASE LIB32 /nologo
+# ADD LIB32 /nologo
+
+!ENDIF 
+
+# Begin Target
+
+# Name "Metar - Win32 Release"
+# Name "Metar - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\Antoi.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Charcmp.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Dcdmetar.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Dcdmtrmk.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Fracpart.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\MetarReport.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\MetarStation.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Prtdmetr.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Stspack2.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\Stspack3.cpp
+# End Source File
+# End Group
+# Begin Group "Header Files"
+
+# PROP Default_Filter "h;hpp;hxx;hm;inl"
+# Begin Source File
+
+SOURCE=.\LOCAL.H
+# End Source File
+# Begin Source File
+
+SOURCE=.\METAR.H
+# End Source File
+# Begin Source File
+
+SOURCE=.\MetarReport.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\MetarStation.h
+# End Source File
+# End Group
+# End Target
+# End Project

simgear/metar/Metar.h

@@ -0,0 +1,265 @@
+#ifndef METARX
+#define METARX
+ 
+/********************************************************************/
+/*                                                                  */
+/*  Title:         METAR H                                          */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          19 Jan 1996                                      */
+/*  Programmer:    CARL MCCALLA                                     */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      METAR Decoder Header File.                       */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+ 
+ 
+#include "Local.h"     /* standard header file */
+ 
+ 
+/*********************************************/
+/*                                           */
+/* RUNWAY VISUAL RANGE STRUCTURE DECLARATION */
+/*       AND VARIABLE TYPE DEFINITION        */
+/*                                           */
+/*********************************************/
+ 
+typedef struct runway_VisRange {
+   char runway_designator[6];
+   bool vrbl_visRange;
+   bool below_min_RVR;
+   bool above_max_RVR;
+   int  visRange;
+   int  Max_visRange;
+   int  Min_visRange;
+}  Runway_VisRange;
+ 
+/***********************************************/
+/*                                             */
+/* DISPATCH VISUAL RANGE STRUCTURE DECLARATION */
+/*       AND VARIABLE TYPE DEFINITION          */
+/*                                             */
+/***********************************************/
+ 
+typedef struct dispatch_VisRange {
+   bool vrbl_visRange;
+   bool below_min_DVR;
+   bool above_max_DVR;
+   int  visRange;
+   int  Max_visRange;
+   int  Min_visRange;
+}  Dispatch_VisRange;
+ 
+/*****************************************/
+/*                                       */
+/* CLOUD CONDITION STRUCTURE DECLARATION */
+/*      AND VARIABLE TYPE DEFINITION     */
+/*                                       */
+/*****************************************/
+ 
+typedef struct cloud_Conditions {
+   char cloud_type[5];
+   char cloud_hgt_char[4];
+   char other_cld_phenom[4];
+   int  cloud_hgt_meters;
+}  Cloud_Conditions;
+ 
+/*****************************************/
+/*                                       */
+/* WIND GROUP DATA STRUCTURE DECLARATION */
+/*      AND VARIABLE TYPE DEFINITION     */
+/*                                       */
+/*****************************************/
+ 
+typedef struct windstruct {
+   char windUnits[ 4 ];
+   bool windVRB;
+   int windDir;
+   int windSpeed;
+   int windGust;
+} WindStruct;
+ 
+/*****************************************/
+/*                                       */
+/* RECENT WX GROUP STRUCTURE DECLARATION */
+/*      AND VARIABLE TYPE DEFINITION     */
+/*                                       */
+/*****************************************/
+ 
+typedef struct recent_wx {
+   char Recent_weather[ 5 ];
+   int  Bhh;
+   int  Bmm;
+   int  Ehh;
+   int  Emm;
+} Recent_Wx;
+ 
+/***************************************/
+/*                                     */
+/* DECODED METAR STRUCTURE DECLARATION */
+/*     AND VARIABLE TYPE DEFINITION    */
+/*                                     */
+/***************************************/
+ 
+typedef struct decoded_METAR {
+   char synoptic_cloud_type[ 6 ];
+   char snow_depth_group[ 6 ];
+   char codeName[ 6 ];
+   char stnid[5];
+   char horiz_vsby[5];
+   char dir_min_horiz_vsby[3];
+   char vsby_Dir[ 3 ];
+   char WxObstruct[10][8];
+   char autoIndicator[5];
+   char VSBY_2ndSite_LOC[10];
+   char SKY_2ndSite_LOC[10];
+   char SKY_2ndSite[10];
+   char SectorVsby_Dir[ 3 ];
+   char ObscurAloft[ 12 ];
+   char ObscurAloftSkyCond[ 12 ];
+   char VrbSkyBelow[ 4 ];
+   char VrbSkyAbove[ 4 ];
+   char LTG_DIR[ 3 ];
+   char CloudLow;
+   char CloudMedium;
+   char CloudHigh;
+   char CIG_2ndSite_LOC[10];
+   char VIRGA_DIR[3];
+   char TornadicType[15];
+   char TornadicLOC[10];
+   char TornadicDIR[4];
+   char TornadicMovDir[3];
+   char CHINO_LOC[6];
+   char VISNO_LOC[6];
+   char PartialObscurationAmt[2][7];
+   char PartialObscurationPhenom[2][12];
+   char SfcObscuration[6][10];
+   char charPrevailVsby[12];
+   char charVertVsby[10];
+   char TS_LOC[3];
+   char TS_MOVMNT[3];
+ 
+   bool Indeterminant3_6HrPrecip;
+   bool CIGNO;
+   bool SLPNO;
+   bool ACFTMSHP;
+   bool NOSPECI;
+   bool FIRST;
+   bool LAST;
+   bool SunSensorOut;
+   bool AUTO;
+   bool COR;
+   bool NIL_rpt;
+   bool CAVOK;
+   bool RVRNO;
+   bool A_altstng;
+   bool Q_altstng;
+   bool VIRGA;
+   bool VOLCASH;
+   bool GR;
+   bool CHINO;
+   bool VISNO;
+   bool PNO;
+   bool PWINO;
+   bool FZRANO;
+   bool TSNO;
+   bool DollarSign;
+   bool PRESRR;
+   bool PRESFR;
+   bool Wshft_FROPA;
+   bool OCNL_LTG;
+   bool FRQ_LTG;
+   bool CNS_LTG;
+   bool CG_LTG;
+   bool IC_LTG;
+   bool CC_LTG;
+   bool CA_LTG;
+   bool DSNT_LTG;
+   bool AP_LTG;
+   bool VcyStn_LTG;
+   bool OVHD_LTG;
+   bool LightningVCTS;
+   bool LightningTS;
+ 
+   int  TornadicDistance;
+   int  ob_hour;
+   int  ob_minute;
+   int  ob_date;
+   int minWnDir;
+   int maxWnDir;
+   int VertVsby;
+   int temp;
+   int dew_pt_temp;
+   int QFE;
+   int hectoPasc_altstng;
+   int char_prestndcy;
+   int minCeiling;
+   int maxCeiling;
+   int WshfTime_hour;
+   int WshfTime_minute;
+   int min_vrbl_wind_dir;
+   int max_vrbl_wind_dir;
+   int PKWND_dir;
+   int PKWND_speed;
+   int PKWND_hour;
+   int PKWND_minute;
+   int SKY_2ndSite_Meters;
+   int Ceiling;
+   int Estimated_Ceiling;
+   int SNINCR;
+   int SNINCR_TotalDepth;
+   int SunshineDur;
+   int ObscurAloftHgt;
+   int VrbSkyLayerHgt;
+   int Num8thsSkyObscured;
+   int CIG_2ndSite_Meters;
+   int snow_depth;
+   int BTornadicHour;
+   int BTornadicMinute;
+   int ETornadicHour;
+   int ETornadicMinute;
+ 
+ 
+   float SectorVsby;
+   float WaterEquivSnow;
+   float VSBY_2ndSite;
+   float prevail_vsbySM;
+   float prevail_vsbyM;
+   float prevail_vsbyKM;
+   float prestndcy;
+   float precip_amt;
+   float precip_24_amt;
+   float maxtemp;
+   float mintemp;
+   float max24temp;
+   float min24temp;
+   float minVsby;
+   float maxVsby;
+   float hourlyPrecip;
+   float TWR_VSBY;
+   float SFC_VSBY;
+   float Temp_2_tenths;
+   float DP_Temp_2_tenths;
+   float SLP;
+   float GR_Size;
+ 
+   double inches_altstng;
+ 
+   Runway_VisRange RRVR[12];
+   Dispatch_VisRange DVR;
+   Recent_Wx ReWx[3];
+   WindStruct winData;
+   Cloud_Conditions cldTypHgt[6];
+ 
+}  Decoded_METAR;
+ 
+#define MAXWXSYMBOLS 10       /*-- NOT TO EXCEED 10 PRES. WX GRPS --*/
+#define MAXTOKENS    500      /*--  RPT NOT TO EXCEED 500 GRPS   --*/
+ 
+void prtDMETR( Decoded_METAR *Mptr );
+int DcdMETAR( char *string, Decoded_METAR *Mptr );
+ 
+#endif

simgear/metar/MetarReport.cpp

@@ -0,0 +1,259 @@
+// Metar report implementation class code
+
+#include "MetarReport.h"
+#include "Metar.h"
+
+CMetarReport::CMetarReport(
+   char *s ) :
+		m_DecodedReport( 0 )
+{
+	m_DecodedReport = new Decoded_METAR;
+	DcdMETAR( s, (Decoded_METAR *)m_DecodedReport );
+}
+
+
+CMetarReport::~CMetarReport()
+{
+}
+
+static int DecodeDirChars( char* c )
+{
+	int r = 0;
+
+	if ( c[0] )
+	{
+		if ( c[0] == 'E' ) r = 90;
+		else if ( c[0] == 'S' ) r = 180;
+		else if ( c[0] == 'W' ) r = 270;
+
+		if ( r == 0 )
+		{
+			if ( c[1] == 'E' ) r = 45;
+			else if ( c[1] == 'W' ) r = 315;
+		}
+		else if ( r = 180 )
+		{
+			if ( c[1] == 'E' ) r = 135;
+			else if ( c[1] == 'W' ) r = 225;
+		}
+	}
+	return r;
+}
+
+char *CMetarReport::StationID()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->stnid;
+}
+
+int CMetarReport::WindDirection()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->winData.windDir;
+}
+
+int CMetarReport::WindSpeed()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->winData.windSpeed;
+}
+
+int CMetarReport::WindGustSpeed()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->winData.windGust;
+}
+
+int CMetarReport::LightningDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->LTG_DIR );
+}
+
+char CMetarReport::CloudLow()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CloudLow;
+}
+
+char CMetarReport::CloudMedium()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CloudMedium;
+}
+
+char CMetarReport::CloudHigh()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CloudHigh;
+}
+
+int CMetarReport::VirgaDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->VIRGA_DIR );
+}
+
+int CMetarReport::TornadicDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->TornadicDIR );
+}
+
+int CMetarReport::TornadicMovementDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->TornadicMovDir );
+}
+
+int CMetarReport::ThunderStormDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->TS_LOC );
+}
+
+int CMetarReport::ThunderStormMovementDirection()
+{
+	return DecodeDirChars( ((Decoded_METAR *)m_DecodedReport)->TS_MOVMNT );
+}
+
+bool CMetarReport::Virga()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->VIRGA;
+}
+
+bool CMetarReport::VolcanicAsh()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->VOLCASH;
+}
+
+bool CMetarReport::Hail()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->GR;
+}
+
+bool CMetarReport::OccationalLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->OCNL_LTG;
+}
+
+bool CMetarReport::FrequentLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->FRQ_LTG;
+}
+
+bool CMetarReport::ContinuousLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CNS_LTG;
+}
+
+bool CMetarReport::CloudToGroundLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CG_LTG;
+}
+
+bool CMetarReport::InterCloudLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->IC_LTG;
+}
+
+bool CMetarReport::CloudToCloudLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CC_LTG;
+}
+
+bool CMetarReport::CloudToAirLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->CA_LTG;
+}
+
+bool CMetarReport::DistantLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->DSNT_LTG;
+}
+
+bool CMetarReport::AirportLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->AP_LTG;
+}
+
+bool CMetarReport::VicinityLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->VcyStn_LTG;
+}
+
+bool CMetarReport::OverheadLightning()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->OVHD_LTG;
+}
+
+int CMetarReport::Temperature()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->temp;
+}
+
+int CMetarReport::DewpointTemperature()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->dew_pt_temp;
+}
+
+int CMetarReport::VerticalVisibility() // Meters
+{
+	return ((Decoded_METAR *)m_DecodedReport)->VertVsby;
+}
+
+int CMetarReport::Ceiling()
+{
+	return FEET_TO_METER * ((Decoded_METAR *)m_DecodedReport)->Ceiling;
+}
+
+int CMetarReport::EstimatedCeiling()
+{
+	return FEET_TO_METER * ((Decoded_METAR *)m_DecodedReport)->Estimated_Ceiling;
+}
+
+int CMetarReport::VariableSkyLayerHeight()
+{
+	return FEET_TO_METER * ((Decoded_METAR *)m_DecodedReport)->VrbSkyLayerHgt;
+}
+
+int CMetarReport::SnowDepthInches()
+{
+	return ((Decoded_METAR *)m_DecodedReport)->snow_depth;
+}
+
+
+std::ostream&
+operator << ( ostream& out, CMetarReport& p )
+{
+    return out 
+	<< "StationID " << p.StationID()
+	<< " WindDirection " << p.WindDirection()
+	<< " WindSpeed " << p.WindSpeed()
+	<< " WindGustSpeed " << p.WindGustSpeed() << std::endl
+	<< "CloudLow " << p.CloudLow()
+	<< " CloudMedium " << p.CloudMedium()
+	<< " CloudHigh " << p.CloudHigh() << std::endl
+	<< "TornadicDirection " << p.TornadicDirection()
+	<< " TornadicMovementDirection " << p.TornadicMovementDirection() << std::endl
+	<< "ThunderStormDirection " << p.ThunderStormDirection()
+	<< " ThunderStormMovementDirection " << p.ThunderStormMovementDirection() << std::endl
+	<< "Virga " << p.Virga()
+	<< " VirgaDirection " << p.VirgaDirection() << std::endl
+	<< "VolcanicAsh " << p.VolcanicAsh() << std::endl
+	<< "Hail " << p.Hail() << std::endl
+	<< "LightningDirection " << p.LightningDirection()
+	<< " OccationalLightning " << p.OccationalLightning()
+	<< " FrequentLightning " << p.FrequentLightning()
+	<< " ContinuousLightning " << p.ContinuousLightning() << std::endl
+	<< "CloudToGroundLightning " << p.CloudToGroundLightning()
+	<< " InterCloudLightning " << p.InterCloudLightning()
+	<< " CloudToCloudLightning " << p.CloudToCloudLightning()
+	<< " CloudToAirLightning " << p.CloudToAirLightning() << std::endl
+	<< "DistantLightning " << p.DistantLightning()
+	<< " AirportLightning " << p.AirportLightning()
+	<< " VicinityLightning " << p.VicinityLightning()
+	<< " OverheadLightning " << p.OverheadLightning() << std::endl
+	<< "VerticalVisibility " << p.VerticalVisibility() << std::endl // Meters
+	<< "Temperature " << p.Temperature() 
+	<< " DewpointTemperature " << p.DewpointTemperature() << std::endl
+	<< "Ceiling " << p.Ceiling()
+	<< " EstimatedCeiling " << p.EstimatedCeiling()
+	<< " VariableSkyLayerHeight " << p.VariableSkyLayerHeight() << std::endl
+	<< "SnowDepthInches " << p.SnowDepthInches() << std::endl
+	;
+}
+
+
+void CMetarReport::dump()
+{
+	prtDMETR( (Decoded_METAR *)m_DecodedReport );
+}

simgear/metar/MetarReport.h

@@ -0,0 +1,111 @@
+// Class encapulating the metar report information
+//
+// Individual METAR reports are found in this directory:
+//   ftp://weather.noaa.gov/data/observations/metar/stations
+//
+
+#ifndef _MetarReport_
+#define _MetarReport_
+
+#include <iostream>
+#include <string>
+#include <vector>
+#include <simgear/math/point3d.hxx>
+#include <simgear/math/polar3d.hxx>
+
+class CMetarReport
+{
+	// Typedefs, enumerations
+
+	// Attributes
+private:
+	void *m_DecodedReport;
+		// A void pointer which is cast to the correct type in the cpp file.
+		// I don't want the ugly metar structure and header files dragged into
+		// every report user program file.
+		// Probably should be a smart pointer if copy constructor and assignment
+		// is allowed.
+
+	// Operations
+
+public:
+	CMetarReport( 
+		char *s );
+			// Constructor
+
+	~CMetarReport();
+			// Destructor
+
+	char *StationID();
+
+	// Directions in degrees
+	// Speed in knots
+	// Altitude in meters
+	// Temperature in centigrade
+
+	int WindDirection();
+	int WindSpeed();
+	int WindGustSpeed();
+
+	// Add cloud more cloud info...
+	// Cloud code characters...
+	char CloudLow();
+	char CloudMedium();
+	char CloudHigh();
+
+	bool Virga();
+	int VirgaDirection();
+
+	int TornadicDirection();	
+	int TornadicMovementDirection();
+
+	int ThunderStormDirection();
+	int ThunderStormMovementDirection();
+	
+	bool VolcanicAsh();
+	bool Hail();
+
+	int LightningDirection();
+	bool OccationalLightning();
+	bool FrequentLightning();
+	bool ContinuousLightning();
+	bool Lightning()
+	{ 
+		return OccationalLightning() || FrequentLightning() || ContinuousLightning();
+	}
+
+	bool CloudToGroundLightning();
+	bool InterCloudLightning();
+	bool CloudToCloudLightning();
+	bool CloudToAirLightning();
+
+	bool DistantLightning();
+	bool AirportLightning();
+	bool OverheadLightning();
+	bool VicinityLightning();
+
+	int Temperature();
+	int DewpointTemperature();
+
+	int VerticalVisibility();
+	int Ceiling();
+	int EstimatedCeiling();
+	int VariableSkyLayerHeight();
+
+	int SnowDepthInches();
+ 
+ 	void dump();
+
+private:
+	CMetarReport(
+		const CMetarReport &rNewObj );
+			// Copy constructor.  Not implemented.
+
+	CMetarReport &operator =(
+		const CMetarReport &rObj );
+			// Assignment operator.  Not implemented.
+};
+
+std::ostream& operator << ( std::ostream&, CMetarReport& );
+
+#endif

simgear/metar/MetarStation.cpp

@@ -0,0 +1,231 @@
+// Metar station implementation code
+
+#include <stdio.h>
+
+#include "MetarStation.h"
+#include <algorithm>
+#define TESTPROG
+#ifndef TESTPROG
+// options is too tightly integrated into FlightGear to use in a test program
+#include <Main/options.hxx>
+#endif
+#include <simgear/misc/fgpath.hxx>
+
+
+std::vector< CMetarStation *> METAR_Stations;
+
+int CMetarStation::initialized( CMetarStation::initialize() );
+
+std::string CMetarStation::tempName;
+
+
+double CMetarStation::decodeDMS( char *b )
+{
+	double r = 0;
+	double m = 0;
+	double s = 0;
+	if ( *b )
+	{
+		// Degrees
+		r = (*b - '0') * 10.0; b++;
+		r += (*b - '0'); b++;
+		if ( *b != '-' )
+		{
+			r *= 10;
+			r += (*b - '0'); b++;
+		}
+		b++;
+		// Minutes
+		m = (*b - '0') * 10.0; b++;
+		m += (*b - '0'); b++;
+		r += m/60.0;
+		if ( *b == '-' )
+		{
+			// Seconds
+			b++;
+			s = (*b - '0') * 10.0; b++;
+			s += (*b - '0'); b++;
+		}
+		r += s/3600.0;
+		// Direction (E W N S)
+		if ( *b == 'W' || *b == 'S' ) r = -r;
+	}
+	return r * DEG_TO_RAD;
+}
+
+
+CMetarStation::CMetarStation( 
+	char *s )
+{
+	char *t;
+	t = strchr( s, ';' ); *t = 0; t++;
+	m_ID = s;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_number = atoi( s ) * 1000;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_number += atoi( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_name = s;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_state = s;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_country = s;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	m_region = atoi( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double latitude = decodeDMS( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double longitude = decodeDMS( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double ulatitude = decodeDMS( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double ulongitude = decodeDMS( s );
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double altitude = atoi( s ) * FEET_TO_METER;
+	s = t; t = strchr( s, ';' ); *t = 0; t++;
+	double ualtitude = atoi( s ) * FEET_TO_METER;
+	Point3D p( longitude, latitude, altitude+EQUATORIAL_RADIUS_M );
+	m_locationPolar = p;
+	m_locationCart = fgPolarToCart3d( p );
+	Point3D up( ulongitude, ulatitude, ualtitude+EQUATORIAL_RADIUS_M );
+	m_upperLocationPolar = up;
+	m_upperLocationCart = fgPolarToCart3d( up );
+	s = t;
+	m_pFlag = s[0];
+}
+		// Constructor
+		// Decodes METAR station string of this format:
+		// KPUB;72;464;Pueblo, Pueblo Memorial Airport;CO;United States;4;38-17-24N;104-29-54W;38-17-03N;104-29-43W;1440;1420;P
+
+
+int CMetarStation::initialize()
+{
+	// Read the list of metar stations, decoding and adding to global list.
+
+	CMetarStation *m;
+	char buf[256];
+
+	// Goto the Flight Gear installation directory
+#ifdef TESTPROG
+    FGPath weatherPath( "/mkv/Build/FlightGear" );
+#else
+    FGPath weatherPath( current_options.get_fg_root() );
+#endif
+
+    weatherPath.append( "Weather/MetarStations" );
+	// Open the metar station list
+	FILE *f = fopen( weatherPath.c_str(), "r" );
+	
+
+	if ( f != NULL )
+	{
+		// Read each line, create an instance of a station, and add it to the vector
+		while ( fgets( buf, 256, f) != NULL && feof( f ) == 0 )
+		{
+			//std::cout << buf << std::endl;
+			m = new CMetarStation( buf );
+			//m->dump();
+			METAR_Stations.push_back( m );
+		}
+	
+		// Close the list
+		fclose( f );
+		std::cout << METAR_Stations.size() << " Metar stations" << std::endl;
+		return 1;
+	}
+	else
+	{
+		std::cout << "Could not open MetarStations file " << std::endl;
+		return 0;
+	}
+}
+
+
+int CMetarStation::sameName( CMetarStation *m )
+{
+	return m->m_ID == tempName;
+}
+
+
+CMetarStation *CMetarStation::find( std::string stationID )
+{
+	tempName = stationID;
+	CMetarStation **m = std::find_if( METAR_Stations.begin(), METAR_Stations.end(), sameName );
+	if ( m != METAR_Stations.end() ) return *m;
+	return 0;
+}
+
+double bestDist;
+CMetarStation *bestStation;
+Point3D curLocation;
+
+void findHelper( CMetarStation *s )
+{
+	double dist = s->locationCart().distance3Dsquared( curLocation );
+	if (dist < bestDist )
+	{
+		bestDist = dist;
+		bestStation = s;
+	}
+}
+
+CMetarStation *CMetarStation::find( Point3D locationCart )
+{
+	bestDist = 99999999;
+	bestStation = 0;
+	curLocation = locationCart;
+
+	for_each( findHelper );
+	return bestStation;
+}
+
+
+void CMetarStation::for_each( void f( CMetarStation *s ) )
+{
+	std::for_each( METAR_Stations.begin(), METAR_Stations.end(), f );
+}
+
+
+void CMetarStation::dump()
+{
+	std::cout << "ID:" << ID();
+	std::cout << std::endl;
+	std::cout << "number:" << number();
+	std::cout << std::endl;
+	std::cout << "name:" << name();
+	std::cout << std::endl;
+	std::cout << "state:" << state();
+	std::cout << std::endl;
+	std::cout << "country:" << country();
+	std::cout << std::endl;
+	std::cout << "region:" << region();
+	std::cout << std::endl;
+	std::cout << "Location (cart):" << locationCart();
+	std::cout << std::endl;
+	std::cout << "Location (polar):" << locationPolar();
+	std::cout << std::endl;
+	std::cout << "Upper Location (cart):" << upperLocationCart();
+	std::cout << std::endl;
+	std::cout << "Upper Location (polar):" << upperLocationPolar();
+	std::cout << std::endl;
+	std::cout << "P flag:" << pFlag();
+	std::cout << std::endl;
+}
+
+std::ostream&
+operator << ( ostream& out, const CMetarStation& p )
+{
+    return out 
+		<< "ID:" << p.m_ID << std::endl
+		<< "number:" << p.m_number << std::endl
+		<< "name:" << p.m_name << std::endl
+		<< "state:" << p.m_state << std::endl
+		<< "country:" << p.m_country << std::endl
+		<< "region:" << p.m_region << std::endl
+		<< "Location (cart):" << p.m_locationCart << std::endl
+		<< "Location (polar):" << p.m_locationCart << std::endl
+		<< "Upper Location (cart):" << p.m_upperLocationCart << std::endl
+		<< "Upper Location (polar):" << p.m_upperLocationPolar << std::endl
+		<< "P flag:" << p.m_pFlag << std::endl;
+}
+

simgear/metar/MetarStation.h

@@ -0,0 +1,87 @@
+// Class encapulating the metar station information
+//
+// METAR station information is kept in this file:
+//   http://www.nws.noaa.gov/pub/stninfo/nsd_cccc.gz
+//   http://www.nws.noaa.gov/pub/stninfo/nsd_cccc.txt
+// This class looks for the file FG_ROOT/Weather/MetarStations instread of nsd_cccc.
+
+#ifndef _MetarStation_
+#define _MetarStation_
+
+#include <iostream>
+#include <string>
+#include <vector>
+#include <simgear/math/point3d.hxx>
+#include <simgear/math/polar3d.hxx>
+//using namespace std;
+
+class CMetarStation
+{
+	// Attributes
+private:
+	std::string m_ID;
+	unsigned long m_number;
+	std::string m_name;
+	std::string m_state;
+	std::string m_country;
+	int m_region;
+	Point3D m_locationPolar;
+	Point3D m_upperLocationPolar;
+	Point3D m_locationCart;
+	Point3D m_upperLocationCart;
+	int m_altitude;
+	int m_upperAltitude;
+	char m_pFlag;
+
+	static int initialized;
+	static std::string tempName;
+
+	// Operations
+private:
+	double decodeDMS( char *b );
+	static int sameName( CMetarStation *m );
+
+	CMetarStation( 
+		char *s );
+			// Constructor
+
+	~CMetarStation()
+	{
+	}
+			// Destructor
+
+public:
+	std::string &ID() { return m_ID; }
+	unsigned long number() { return m_number; }
+	std::string &name() { return m_name; }
+	std::string &state() { return m_state; }
+	std::string &country() { return m_country; }
+	int region() { return m_region; }
+	Point3D &locationPolar() { return m_locationPolar; }
+	Point3D &upperLocationPolar() { return m_upperLocationPolar; }
+	Point3D &locationCart() { return m_locationCart; }
+	Point3D &upperLocationCart() { return m_upperLocationCart; }
+	char pFlag() { return m_pFlag; }
+			// Get attributes
+
+    friend std::ostream& operator << ( std::ostream&, const CMetarStation& );
+	void dump();
+	
+	static CMetarStation *find( std::string stationID );
+	static CMetarStation *find( Point3D locationCart );
+	static void for_each( void f( CMetarStation *s ) );
+
+private:
+	CMetarStation(
+		const CMetarStation &rNewObj );
+			// Copy constructor.  Not implemented.
+
+	CMetarStation &operator =(
+		const CMetarStation &rObj );
+			// Assignment operator.  Not implemented.
+
+	static int initialize();
+};
+
+
+#endif

simgear/metar/MetarTest/MetarLibTest.cpp

@@ -0,0 +1,549 @@
+// Metar Library  test
+
+#include <iostream>
+#include "../MetarReport.h"
+#include "../MetarStation.h"
+#include <GL/glut.h>
+
+static char *report[] =
+{
+	"KAST 221156Z COR 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+
+	"KAST COR 221156Z 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+
+	"KAST COR 221156Z 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+
+	"KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005",
+
+	"KP88 COR 221156 09005KT 1/SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 6//// 70109 T00890084 10100 20089 55005",
+
+
+	"EPIT 1755 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1/2V3/4",
+
+	"KFAR 181154Z 10003KT 1/4SM HZ CLR 16/13 A2988 RMK AO2 "
+	"SLP117 56012 10345 20226 T01610133 $",
+
+	"KFAR 181154Z 10003KT 1/SM HZ CLR 16/13 A2988 RMK AO2 "
+	"SLP117 56012 10345 20226 T01610133 $",
+
+	"RKSS 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
+
+	"RKSS 1200 21009KT 1400 RP2000 // ////// 21/20 1006/2972 NOSIG",
+
+	"RKSS 1130Z 23011KT 1100 R14R/P1500N R14L/P1500N BR SCT010 BKN030 "
+	"BKN080 21/21 Q1006 NOSIG",
+
+	"RKSS 1130Z 23011KT 1100 R14R/P1500 R14L/P1500 BR SCT010 BKN030 "
+	"BKN080 21/21 Q1006 NOSIG",
+
+	"KFAR 181154Z 10003KT 4SM HZ CLR 16/13 A2988 RMK AO2 "
+	"SLP117 56012 1//// 2//// T01610133 $",
+
+	"CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+	"SF6SC1 VSBY RDCE DUE LO CLD SLP186",
+
+	"CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+	"SF6SC1 VSBY RDCE DUE10 LO CLD SLP186",
+
+	"CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+	"SF6SC1 VSBY RDCE DUE9 LO CLD SLP186",
+
+	"CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+	"SF6SC1 VSBY RDCE FZDZE10 LO CLD SLP186",
+
+	"CYYE 061300Z 3500KT 15SM BKN005 OVC040 08/08 A3004 RMK "
+	"SF6SC1 VSBY RDCE FZDZE9 LO CLD SLP186",
+
+	"MKJP 1400Z 13011KT 9999 FEW022 30/XX Q1015",
+	"MKJP 1400Z 13011KT 9999 FEW022 M30/XX Q1015",
+	"MKJP 1400Z 13011KT 9999 FEW022 MM/XX Q1015",
+	"MKJP 1400Z 13011KT 9999 FEW022 MM/30 Q1015",
+	"MKJP 1400Z 13011KT 9999 FEW022 MM/M30 Q1015",
+
+	"EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 BKN045 OVC090 "
+	"SCT120 FEW250 RMK OCNL LTGICCG OHD",
+
+	"EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
+	"RMK TEMPO 8000 -SHRA BKN015 FRQ LTG VC",
+
+	"EGPD 36016G26KT 320V030 9999 FEW015TCU SCT026 07/01 Q1011 "
+	"RMK TEMPO 8000 -SHRA BKN015 LTG DSNT W",
+
+	"METAR KLAX 281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
+	"+TS BLPY FEW/// SCT000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
+	"TORNADO B13E45 6 NE MOV E A02 PK WND 18515/45 "
+	"WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"VIS 2 1/2 RY11 "
+	"DVR/1000V1600FT "
+	"OCNL LTG VCY STN "
+	"RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
+	"PRESFR PRESRR SLP013 FG FEW/// HZ SCT000 VIS NW 2 1/2 GR 3/4 "
+	"VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
+	"FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
+	"933125 98096 P 0125 60225 70565 "
+	"T00261015 10369 21026 "
+	"404800360 52101 VISNO RY05 CHINO RY27 PNO RVRNO "
+	"PWINO FZRANO TSNO $",
+
+	"KBOS 251356Z 26011KT 10SM CLR 12/02 A2995 RMK AO2 SC VCNTY "
+	"STN SSE-NNW SCT CI ABV SLP141 T01220023",
+
+	"EFHK 36009KT 340V060 CAVOK 12/M02 Q1013 NOSIG",
+	"EGKK 24011KT 210V300 9999 SCT020 BKN045 12/06 Q1007 NOSIG",
+	"EGPD 31018KT 8000 RA FEW013 BKN021 OVC045 06/04 Q0994 NOSIG",
+	"EKCH 16012KT CAVOK 20/07 Q1006 NOSIG",
+	"ESKN 10014KT 9000 BR SCT100 14/04 Q1010",
+	"LOWW 231450Z 14017KT CAVOK 23/07 Q1010 NOSIG",
+
+	"METAR CYCH 171500Z CCA 30017KT 2SM -SN BKN006",
+
+	"METAR CYOW 171500Z CCA 30017KT 2SM -SN BKN006 OVC020 00/M02 "
+	"A2957 RMK S35F4NS1 /S01/ SNW WET SNW MELTG ON GRND CIG 5-7 "
+	"SLP018",
+
+	"KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
+	" TSB0159E30 TS SE MOV NE",
+
+	"KAST 221156Z AUTO 09005KT 7SM -RA OVC026 09/08 A2996 RMK "
+	"AO2 TNO SLP143 P0007 60047 70109 T00890084 10100 20089 55005"
+	" TSE0159 TS SE",
+
+	"KHVR 1756Z 31007KT 5SM -SN SCT011 BKN024 OVC030 M05/M08 A3056 "
+	"RMK AOA 933004 "
+	"BKN V SCT TNO PCPN 000 $ SLP389 4/015 60002 "
+	"T10501077 11050 21078 51010",
+
+	"SPECI KGFI 041420Z AUTO 18030KT 3 1/2SM RVRNO TS -RA BKN008 OVC060 "
+	"26/22 A2991 RMK A02 RA15TSB20 PRESFR SLP 101 P 0000 T02640218",
+
+	"METAR KCLE 281156Z 170100G135KT 110V180  M1/4SM "
+	"R01L/P6000FT +TSSHRA VCFG "
+	"BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"CIG 1000V1500 PRESFR FRQ LTG CG NW "
+	"RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
+	"T1263 "
+	"VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"CYQR 161700Z 15015KT 15SM SCT045 SCT090 BKN250 10/03 A2955 "
+	"RMK SC1AC2C11 OB TAKEN H+ 5 DUE AWOS FAILURE SLP027",
+
+	"KPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1V2",
+
+	"SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP 701 P 0254 199/182",
+
+	"SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP701 P0254 199/182",
+
+	"KHLN 281156Z AUTO 27005KT 10SM OVC023 07/05 A3011 RMK AOA OVC V "
+	"BKN $ SLP202 60000 70001 T00670050 10122 20061 53003",
+
+	"KPHX 281156Z 12004KT 10SM CLR 15/05 A2996 RMK AOA SLP135 T01500050 "
+	"10250 20150 53006",
+	"KFCA 281156Z 30003KT 10SM CLR 06/02 A3009 RMK AO TNO $ SLP191 "
+	"T00610023 10167 20056 53003",
+	"KAST 281156Z 00000KT 10SM BKN095 09/08 A2997 RMK AOA SLP150 "
+	"T00940084 10161 20094 52005 ",
+	"KHVR 281156Z 03003KT 10SM OVC020 09/07 A3010 RMK AO TNO ZRNO "
+	"$ SLP194 T00940073 10156 20089 51005",
+	"KGGW 281156Z 35006KT 5SM BR OVC010 10/09 A3003 RMK AOA $ SLP177 "
+	"70003 T01000095 10156 20110 53008",
+	"KELY 1153Z AUTO 14004KT 10SM SCT075 01/M01 A3011 RMK AOA TNO ZRNO "
+	"SLP171 70001 T00061011 10139 21006 51005",
+	"KFLG 281156Z 29006KT 10SM CLR 04/M01 A3012 RMK AO TNO SLP147 "
+	"T00391011 21006 51004",
+	"KGTF 281156Z 27005KT 7SM BKN080 04/04 A3010 RMK AOA SLP205 "
+	"T00440045 10117 20039 51006",
+
+	"K13A 1918Z 20011KT 26/M06 RMK AO PKWND 020/RNO 644V264 T02611061",
+
+	"KP88 1919Z 09001KT 14/03 RMK AO / PKWND 002/RNO 158 Z T01440034",
+
+	"K40B 1924Z 29004KT 15/M07 RMK AO PKWND 011/RM MV263 T01501072",
+
+	"KGGW 1756Z 33018KT 10SM OVC015 M03/M06 A3041 RMK AOA SLP338 "
+	"4/007 60002 T10281055 11028 21072 51009",
+	"KPHX 1756Z 130004KT 10SM CLR 18/M03 A3001 RMK AOA SLP154 "
+	"T01781033 10178 20067 58007",
+	"KFCA 1756Z 29005KT 10SM CLR 05/M11 A3049 RMK AOA TNO SLP352 "
+	"T00501111 10050 21044 50004",
+	"KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 "
+	"T01110045 10111 20000 50002",
+	"KELY 1753Z 34010KT 10SM CLR 01/M07 A3022 RMK AOA TNO ZRNO "
+	"SLP240 T00111066 10011 21078 58007",
+	"KFLG 1756Z 07006KT 10SM CLR 06/M12 A3009 RMK AO TNO ZRNO "
+	"SLP178 T00561122 10061 21100 58005",
+	"KGTF 1756Z 35010KT 1/2SM -SN FG VV09 M06/M08 A3051 RMK AOA "
+	"933004 SFC VSBY 3/4 "
+	"PCPN M SLP393 60010 T10611077 11044 21067 53013",
+	"KHLN 1756Z 35012KT 10SM SCT032 OVC060 M02/M09 A3048 RMK AOA "
+	"SLP369 60000 T10171094 11017 21061 53006",
+	"KAST 1756Z 01006KT 10SM CLR 11/04 A3047 RMK AOA SLP316 61104 "
+	"71235 T01110045 10111 20000 401720056 58002",
+	"METAR KLAX 04281156Z AUTO VRB100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT FC "
+	"+TS BLPY FEW000 BKN050 SCT150 OVC250 3/M1 A2991 RMK "
+	"TORNADO B13 DSNT NE A02 PK WND 18515/45 "
+	"WSHFT 1350 FROPA TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"VIS 2 1/2 RY11 OCNL LTG VCY STN "
+	"RAB1030E1145 FZDZE56 BLPYE57 CIG 1000V1500 CIG 020 RY11 "
+	"PRESFR PRESRR SLP013 FG FEW000 VIS NW2 1/2 GR 3/4 "
+	"VIRGA SE -XRAFG3 CIGE005 BKN014 V OVC "
+	"FU BKN020 NOSPECI LAST 8/365 SNINCR 2/10 4/178 "
+	"933125 98096 P 0125 60225 70565 "
+	"T00261015 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"METAR KGFI 041356Z AUTO 17012KT 130V210 3 1/2SM R15L/0500FT -RA "
+	"SCT050 OVC110 26/18 A2991 RMK FUNNEL CLOUDS A02 RAB30 "
+	"SLP 101 GR M1/4 VIRGA SCT V BKN P 0010 T02640178",
+
+	"METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 "
+	"RMK WATERSPOUTS VCY STN NW A02 SLP 101 10288 20243 52021 $ ",
+
+	"SPECI KGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"A2900 RMK A02A PK WND 18056/28 OCNL LTG AP "
+	"RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP 701 P 0254 T01990182",
+
+	"KABE 281900Z NIL",
+
+	"METAR KPIT NIL",
+
+	"METAR KCLE 04281156Z 170100G135KT 110V180  M1/4SM "
+	"R01L/P6000FT +TSSHRA VCFG "
+	"BKN025 SCT100 OVC200 M26/ A2991 RMK PK WND 18515/45 A02 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"CIG 1000V1500 PRESFR FRQ LTG CG NW "
+	"RAB1030E1145 FZDZE56 PRESRR SLP135 GS "
+	"T1263 "
+	"VIRGA NW 8/365 4/178 P 0125 60225 7//// 70565 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"METAR KPHL 040256Z AUTO 170100G135KT 130V210  1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+	"FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 LTG DSNT "
+	"RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP037 GR 2 3/4 "
+	"VIRGA E 8/365 4/178 P 0125 70565 21026 T0263 10369 60225 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"SPECI KGFI 041420Z AUTO 18030KT 2 1/2SM RVRNO TS -RA BKN008 "
+	"OVC060 25/22 A2991 RMK A02 LTG DSNT W "
+	"RAB15TSB20 PRESFR SLP101 P 0000 "
+	"254/218",
+
+	"METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+	"FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR M1/4 "
+	"VIRGA SE 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+	"FC +TS BKN050 SCT150 OVC250 M26/ A2991 RMK A02 PK WND 185150/1345 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+	"VIRGA 35 8/365 4/178 P 0125 6//// 60225 70565 T0263 10369 21026 "
+	"VIRGA 35 8/365 4/178 P 0125 21026 70565 10369 60225 T0263 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+	"FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 18515/45 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+	"VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO $",
+
+	"METAR KGFI 041356Z AUTO 170100G135KT 130V210 3 1/2SM "
+	"R15L/0500FT R22L/2700FT R16/1200FT R34/1000V1600FT R01L/P6000FT "
+	"FC +TS BKN050 SCT150 OVC250 3/M1 A2991 RMK A02 PK WND 185150/1345 "
+	"WSHFT 1350 TWR VIS 1 1/2 SFC VIS 1/4 VIS 1/4V1 1/4 "
+	"RAB1030E1145 FZDZE56 CIG 1000V1500 PRESFR PRESRR SLP997 GR 25 "
+	"VIRGA 35 8/365 4/178 P 0125 60225 70565 T00261015 10369 21026 "
+	"404800360 52101 PWINO FZRANO TSNO",
+
+	"METAR KGFI 041356Z AUTO 05008KT 10SM R15L/P6000FT CLR A2991 RMK "
+	"A02 SLP 101 10288 20243 52021",
+	"SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP 701 P 0254 M199/M182",
+
+	"SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP 701 P 0254 M199/182",
+
+	"SPECI DGFI 041430Z 18045G56KT M1/4SM R15/0200FT FC +TS VV010 20/18 "
+	"M20/M18 A2900 RMK A02A PK WND 18056/28 RAB15E25TSB20 FCB1430 PRESFR "
+	"SLP 701 P 0254 199/M182",
+
+	"METAR APIT 171755Z AUTO 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 4/369 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 8/563 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1 1/2V2 SLP875 SGB1213E1225",
+
+	"NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+	"          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK SLP056 "
+	"RAE0123",
+
+	"SPECI APIT 171755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 8/321 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1 SLP875 FGB1713",
+
+	"APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1V2 SLP875",
+
+	"APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1 1/2V2 1/2 SLP875",
+
+	"APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1V2 1/2 SLP875",
+
+	"EGPF 1720Z 00000KT 9999 -SHRA STC014 SCT020CB BNK024 12/09 "
+	"Q1003 NOSIG",
+
+	"NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
+	"NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+	"     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
+	"DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
+	"DAAT 1830Z 30010KT CAVOK 29/06 Q1019",
+
+	"GQPP 1800Z 34023KT 3000 DRSA SKC 24/20 Q1011 NSG",
+	"DAAG 1830Z 06006KT 9999 SCT020 25/22 Q1015",
+	"DABB 1830Z 04010KT 9999 SCT030TCU SCT033CB 27/18 Q1017",
+	"DABC 1830Z 00000KT 9999 SCT026TCU SCT036CB 22/18 Q1020 RETS",
+
+	"NZAA 1700Z 03010KT 30KM 03 5CU022 7SC035 11/07 Q1006.5 NOSIG",
+	"NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+	"          Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK K",
+	"NZWN 1700Z 35030G49KT 320V030 20KM 02 5SC021 7SC046 12/08 "
+	"     Q0994.2 TEMPO 6000 RA 5ST012 2CB015 RMK KAUKAU 30050KT",
+	"DGAA 1800Z 22012KT 9999 SCT009 BKN120 25/21 Q1015",
+
+	"GFLL 1900Z NIL",
+
+	"GOOY 1800Z 03006G17KT 340V080 6000 TSRA BKN016 BKN030CB "
+	"BKN133 26/23 Q1013 NOSIG",
+
+	"GCXO 1930Z 32018KT 8000 SCT003 SCT007 18/16 Q1019",
+
+	"APIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1 1/2V2",
+
+	"BPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1V2",
+
+	"CPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1V2 1/2",
+
+	"DPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 1 1/2V2 1/2",
+
+	"FPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 3/4V2 1/2",
+
+	"GPIT 1755Z 22015G25KT 1 3/4SM R22L/2700FT R16/1200FT "
+	"R34/1000V1600FT R01L/P6000FT R04RR/900FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/16 A2992 "
+	"RMK 58033 6003/ TWELVE 70125 10039 20029 410840112 "
+	"PCPN 0009 WSHFT 1715 PK WND 2032/1725 "
+	"CIG 20V25 WND 12V25 TWR VIS 2 1/2 "
+	"SFC VIS 1 1/2 VIS 3/4V3",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/M16 A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/16 A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/M16 A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/M16 A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB MM/16 A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB M18/MM A2992",
+
+	"KPIT 1935Z 22015G25KT 1 3/4SM R22L/2700FT "
+	"TSRA -DZ FG +SNPE SCT005 BKN010 OVC250CB 18/MM A2992",
+
+	NULL};
+
+
+void dispMetarStation( CMetarStation *s )
+{
+	glPointSize( 2.0 );
+	glColor3d(1.0,1.0,0.0);
+	glVertex3d( s->locationCart().x()/1000.0, s->locationCart().y()/1000.0, s->locationCart().z()/1000.0 );
+}
+
+static int ii = 0;
+
+void
+display(void)
+{
+	glPushMatrix();
+	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
+	glRotatef((ii%360), 1.0, 0.0, 0.0);
+	glRotatef((ii%360), 0.0, 1.0, 0.0);
+	glRotatef((ii%360), 0.0, 0.0, 1.0);
+	glBegin( GL_POINTS );
+	CMetarStation::for_each( dispMetarStation );
+	glEnd();
+	glColor3d(0.0, 0.0, 1.0);
+	glutWireSphere(EARTH_RAD,32,16);
+	glutSwapBuffers();
+	ii++;
+	glPopMatrix();
+}
+
+
+void
+idle(void)
+{
+//	std::cout << "Idle" << std::endl;
+	glutPostRedisplay();
+}
+
+
+void
+init(void)
+{
+	glEnable(GL_DEPTH_TEST);
+
+	glMatrixMode(GL_PROJECTION);
+	gluPerspective(  50.0, 1.0, 1.0, 40000.0);
+	glMatrixMode(GL_MODELVIEW);
+	gluLookAt(0.0, -19000.0, 0.0,
+		0.0, 0.0, 0.0, 
+		0.0, 0.0, 1.0);
+}
+
+
+void testMetarStation(int argc,
+	char **argv )
+{
+	std::cout << "Display all Metar Stations" << std::endl;
+	glutInit(&argc, argv);
+	glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH);
+	glutCreateWindow("Metar Stations");
+	glutDisplayFunc(display);
+	glutIdleFunc(idle);
+	init();
+	glutMainLoop();
+}
+
+void testMetarReport()
+{
+	std::cout << "Decode some Metar reports" << std::endl;
+	int i = 0;
+	while ( report[i] )
+	{
+		std::cout << i << ": " << report[i] << std::endl;
+
+		CMetarReport dr( report[i] );
+
+		//dr.dump();
+		std::cout << dr << std::endl;
+
+		CMetarStation *ms = CMetarStation::find( dr.StationID() );
+		if ( ms ) 
+		{
+			std::cout << *ms << std::endl;
+		}
+		else
+		{
+			std::cout << "No corresponding METAR station found" << std::endl;
+		}
+		i++;
+	}
+}
+
+int
+main(
+	int argc,
+	char **argv )
+{
+	std::cout << "Metar subsystem test" << std::endl;
+
+	testMetarReport();
+	testMetarStation( argc, argv );
+	return 0;
+}

simgear/metar/MetarTest/MetarLibTest.dsp

@@ -0,0 +1,100 @@
+# Microsoft Developer Studio Project File - Name="MetarLibTest" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=MetarLibTest - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "MetarLibTest.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "MetarLibTest.mak" CFG="MetarLibTest - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "MetarLibTest - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "MetarLibTest - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""
+# PROP Scc_LocalPath ""
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "MetarLibTest - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /W3 /GX /Zi /O2 /I "..\..\..\lib" /I "..\lib" /I "..\..\lib" /I "..\..\..\..\lib" /I ".." /I "..\.." /I "..\..\.." /I "..\..\..\.." /I "..\include" /I "..\..\include" /I "..\..\..\include" /I "..\..\..\..\include" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x409 /d "NDEBUG"
+# ADD RSC /l 0x409 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+
+!ELSEIF  "$(CFG)" == "MetarLibTest - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /W3 /GX /Zi /Od /I "..\..\..\lib" /I "..\lib" /I "..\..\lib" /I "..\..\..\..\lib" /I ".." /I "..\.." /I "..\..\.." /I "..\..\..\.." /I "..\include" /I "..\..\include" /I "..\..\..\include" /I "..\..\..\..\include" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x409 /d "_DEBUG"
+# ADD RSC /l 0x409 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+
+!ENDIF 
+
+# Begin Target
+
+# Name "MetarLibTest - Win32 Release"
+# Name "MetarLibTest - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\MetarLibTest.cpp
+# End Source File
+# End Group
+# Begin Group "Header Files"
+
+# PROP Default_Filter "h;hpp;hxx;hm;inl"
+# End Group
+# Begin Group "Resource Files"
+
+# PROP Default_Filter "ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe"
+# End Group
+# End Target
+# End Project

simgear/metar/MetarTest/MetarTest.dsw

@@ -0,0 +1,95 @@
+Microsoft Developer Studio Workspace File, Format Version 6.00
+# WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE!
+
+###############################################################################
+
+Project: "LibMisc"=..\..\..\..\Win32\Workspace\LibMisc\LibMisc.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+}}}
+
+###############################################################################
+
+Project: "Metar"=..\Metar.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+}}}
+
+###############################################################################
+
+Project: "MetarLibTest"=.\MetarLibTest.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+    Begin Project Dependency
+    Project_Dep_Name Metar
+    End Project Dependency
+    Begin Project Dependency
+    Project_Dep_Name MetarLib
+    End Project Dependency
+    Begin Project Dependency
+    Project_Dep_Name glut
+    End Project Dependency
+    Begin Project Dependency
+    Project_Dep_Name LibMisc
+    End Project Dependency
+}}}
+
+###############################################################################
+
+Project: "MetarTest"=.\MetarTest.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+    Begin Project Dependency
+    Project_Dep_Name Metar
+    End Project Dependency
+    Begin Project Dependency
+    Project_Dep_Name MetarLib
+    End Project Dependency
+}}}
+
+###############################################################################
+
+Project: "glut"=..\..\..\..\..\glut\glut.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+}}}
+
+###############################################################################
+
+Global:
+
+Package=<5>
+{{{
+}}}
+
+Package=<3>
+{{{
+}}}
+
+###############################################################################
+

simgear/metar/Prtdmetr.cpp

@@ -0,0 +1,590 @@
+#include "Local.h"     /* standard header file */
+#include "Metar.h"
+#pragma page(1)
+#pragma subtitle("subtitle - description                       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         prtDMETR                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          15 Sep 1994                                      */
+/*  Programmer:    CARL MCCALLA                                     */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:  prtDMETR    prints, in order of the ASOS METAR       */
+/*             format, all non-initialized members of the structure */
+/*             addressed by the Decoded_METAR pointer.              */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 None.                                            */
+/*                                                                  */
+/*  Input:         Mptr - ptr to a decoded_METAR structure.         */
+/*                                                                  */
+/*  Output:        NONE                                             */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+void prtDMETR( Decoded_METAR *Mptr )
+{
+ 
+   /***************************/
+   /* DECLARE LOCAL VARIABLES */
+   /***************************/
+ 
+   int i;
+ 
+   /*************************/
+   /* START BODY OF ROUTINE */
+   /*************************/
+ 
+   printf("\n\n\n/*******************************************/\n");
+   printf("/*    THE DECODED METAR REPORT FOLLOWS     */\n");
+   printf("/*******************************************/\n\n");
+ 
+   if( Mptr->codeName[ 0 ] != '\0' )
+      printf("REPORT CODE NAME    : %s\n",Mptr->codeName);
+ 
+   if( Mptr->stnid[ 0 ] != '\0' )
+      printf("STATION ID          : %s\n",Mptr->stnid);
+ 
+   if( Mptr->ob_date != MAXINT )
+      printf("OBSERVATION DAY     : %d\n",Mptr->ob_date);
+ 
+   if( Mptr->ob_hour != MAXINT )
+      printf("OBSERVATION HOUR    : %d\n",Mptr->ob_hour);
+ 
+   if( Mptr->ob_minute != MAXINT )
+      printf("OBSERVATION MINUTE  : %d\n",Mptr->ob_minute);
+ 
+   if( Mptr->NIL_rpt )
+      printf("NIL REPORT          : TRUE\n");
+ 
+   if( Mptr->AUTO )
+      printf("AUTO REPORT         : TRUE\n");
+ 
+   if( Mptr->COR )
+      printf("CORRECTED REPORT    : TRUE\n");
+ 
+   if( Mptr->winData.windVRB )
+      printf("WIND DIRECTION VRB  : TRUE\n");
+ 
+   if( Mptr->winData.windDir != MAXINT )
+      printf("WIND DIRECTION      : %d\n",Mptr->winData.windDir);
+ 
+   if( Mptr->winData.windSpeed != MAXINT )
+      printf("WIND SPEED          : %d\n",Mptr->winData.windSpeed);
+ 
+   if( Mptr->winData.windGust != MAXINT )
+      printf("WIND GUST           : %d\n",Mptr->winData.windGust);
+ 
+   if( Mptr->winData.windUnits[ 0 ] != '\0' )
+      printf("WIND UNITS          : %s\n",Mptr->winData.windUnits);
+ 
+   if( Mptr->minWnDir != MAXINT )
+      printf("MIN WIND DIRECTION  : %d\n",Mptr->minWnDir);
+ 
+   if( Mptr->maxWnDir != MAXINT )
+      printf("MAX WIND DIRECTION  : %d\n",Mptr->maxWnDir);
+ 
+   if( Mptr->prevail_vsbyM != (float) MAXINT )
+      printf("PREVAIL VSBY (M)    : %f\n",Mptr->prevail_vsbyM);
+ 
+   if( Mptr->prevail_vsbyKM != (float) MAXINT )
+      printf("PREVAIL VSBY (KM)   : %f\n",Mptr->prevail_vsbyKM);
+ 
+   if( Mptr->prevail_vsbySM != (float) MAXINT )
+      printf("PREVAIL VSBY (SM)   : %.3f\n",Mptr->prevail_vsbySM);
+ 
+   if( Mptr->charPrevailVsby[0] != '\0' )
+      printf("PREVAIL VSBY (CHAR) : %s\n",Mptr->charPrevailVsby);
+ 
+   if( Mptr->vsby_Dir[ 0 ] != '\0' )
+      printf("VISIBILITY DIRECTION: %s\n",Mptr->vsby_Dir);
+ 
+   if( Mptr->RVRNO )
+      printf("RVRNO               : TRUE\n");
+ 
+   for ( i = 0; i < 12; i++ )
+   {
+      if( Mptr->RRVR[i].runway_designator[0] != '\0' )
+         printf("RUNWAY DESIGNATOR   : %s\n",
+                 Mptr->RRVR[i].runway_designator);
+ 
+      if( Mptr->RRVR[i].visRange != MAXINT )
+         printf("R_WAY VIS RANGE (FT): %d\n",
+                 Mptr->RRVR[i].visRange);
+ 
+      if( Mptr->RRVR[i].vrbl_visRange )
+         printf("VRBL VISUAL RANGE   : TRUE\n");
+ 
+      if( Mptr->RRVR[i].below_min_RVR )
+         printf("BELOW MIN RVR       : TRUE\n");
+ 
+      if( Mptr->RRVR[i].above_max_RVR )
+         printf("ABOVE MAX RVR       : TRUE\n");
+ 
+      if( Mptr->RRVR[i].Max_visRange != MAXINT )
+         printf("MX R_WAY VISRNG (FT): %d\n",
+                 Mptr->RRVR[i].Max_visRange);
+ 
+      if( Mptr->RRVR[i].Min_visRange != MAXINT )
+         printf("MN R_WAY VISRNG (FT): %d\n",
+                 Mptr->RRVR[i].Min_visRange);
+ 
+   }
+ 
+ 
+   if( Mptr->DVR.visRange != MAXINT )
+      printf("DISPATCH VIS RANGE  : %d\n",
+              Mptr->DVR.visRange);
+ 
+   if( Mptr->DVR.vrbl_visRange )
+      printf("VRBL DISPATCH VISRNG: TRUE\n");
+ 
+   if( Mptr->DVR.below_min_DVR )
+      printf("BELOW MIN DVR       : TRUE\n");
+ 
+   if( Mptr->DVR.above_max_DVR )
+      printf("ABOVE MAX DVR       : TRUE\n");
+ 
+   if( Mptr->DVR.Max_visRange != MAXINT )
+      printf("MX DSPAT VISRNG (FT): %d\n",
+              Mptr->DVR.Max_visRange);
+ 
+   if( Mptr->DVR.Min_visRange != MAXINT )
+      printf("MN DSPAT VISRNG (FT): %d\n",
+              Mptr->DVR.Min_visRange);
+ 
+ 
+   i = 0;
+   while ( Mptr->WxObstruct[i][0] != '\0' && i < MAXWXSYMBOLS )
+   {
+      printf("WX/OBSTRUCT VISION  : %s\n",
+         Mptr->WxObstruct[i] );
+      i++;
+   }
+ 
+   if( Mptr->PartialObscurationAmt[0][0] != '\0' )
+      printf("OBSCURATION AMOUNT  : %s\n",
+            &(Mptr->PartialObscurationAmt[0][0]));
+ 
+   if( Mptr->PartialObscurationPhenom[0][0] != '\0' )
+      printf("OBSCURATION PHENOM  : %s\n",
+            &(Mptr->PartialObscurationPhenom[0][0]));
+ 
+ 
+   if( Mptr->PartialObscurationAmt[1][0] != '\0' )
+      printf("OBSCURATION AMOUNT  : %s\n",
+            &(Mptr->PartialObscurationAmt[1][0]));
+ 
+   if( Mptr->PartialObscurationPhenom[1][0] != '\0' )
+      printf("OBSCURATION PHENOM  : %s\n",
+            &(Mptr->PartialObscurationPhenom[1][0]));
+ 
+   i = 0;
+   while ( Mptr->cldTypHgt[ i ].cloud_type[0] != '\0' &&
+                     i < 6 )
+   {
+      if( Mptr->cldTypHgt[ i ].cloud_type[0] != '\0' )
+         printf("CLOUD COVER         : %s\n",
+            Mptr->cldTypHgt[ i ].cloud_type);
+ 
+      if( Mptr->cldTypHgt[ i ].cloud_hgt_char[0] != '\0' )
+         printf("CLOUD HGT (CHARAC.) : %s\n",
+            Mptr->cldTypHgt[ i ].cloud_hgt_char);
+ 
+      if( Mptr->cldTypHgt[ i ].cloud_hgt_meters != MAXINT)
+         printf("CLOUD HGT (METERS)  : %d\n",
+            Mptr->cldTypHgt[ i ].cloud_hgt_meters);
+ 
+      if( Mptr->cldTypHgt[ i ].other_cld_phenom[0] != '\0' )
+         printf("OTHER CLOUD PHENOM  : %s\n",
+            Mptr->cldTypHgt[ i ].other_cld_phenom);
+ 
+      i++;
+ 
+   }
+ 
+   if( Mptr->temp != MAXINT )
+      printf("TEMP. (CELSIUS)     : %d\n", Mptr->temp);
+ 
+   if( Mptr->dew_pt_temp != MAXINT )
+      printf("D.P. TEMP. (CELSIUS): %d\n", Mptr->dew_pt_temp);
+ 
+   if( Mptr->A_altstng )
+      printf("ALTIMETER (INCHES)  : %.2f\n",
+         Mptr->inches_altstng );
+ 
+   if( Mptr->Q_altstng )
+      printf("ALTIMETER (PASCALS) : %d\n",
+         Mptr->hectoPasc_altstng );
+ 
+   if( Mptr->TornadicType[0] != '\0' )
+      printf("TORNADIC ACTVTY TYPE: %s\n",
+         Mptr->TornadicType );
+ 
+   if( Mptr->BTornadicHour != MAXINT )
+      printf("TORN. ACTVTY BEGHOUR: %d\n",
+         Mptr->BTornadicHour );
+ 
+   if( Mptr->BTornadicMinute != MAXINT )
+      printf("TORN. ACTVTY BEGMIN : %d\n",
+         Mptr->BTornadicMinute );
+ 
+   if( Mptr->ETornadicHour != MAXINT )
+      printf("TORN. ACTVTY ENDHOUR: %d\n",
+         Mptr->ETornadicHour );
+ 
+   if( Mptr->ETornadicMinute != MAXINT )
+      printf("TORN. ACTVTY ENDMIN : %d\n",
+         Mptr->ETornadicMinute );
+ 
+   if( Mptr->TornadicDistance != MAXINT )
+      printf("TORN. DIST. FROM STN: %d\n",
+         Mptr->TornadicDistance );
+ 
+   if( Mptr->TornadicLOC[0] != '\0' )
+      printf("TORNADIC LOCATION   : %s\n",
+         Mptr->TornadicLOC );
+ 
+   if( Mptr->TornadicDIR[0] != '\0' )
+      printf("TORNAD. DIR FROM STN: %s\n",
+         Mptr->TornadicDIR );
+ 
+   if( Mptr->TornadicMovDir[0] != '\0' )
+      printf("TORNADO DIR OF MOVM.: %s\n",
+         Mptr->TornadicMovDir );
+ 
+ 
+   if( Mptr->autoIndicator[0] != '\0' )
+         printf("AUTO INDICATOR      : %s\n",
+                          Mptr->autoIndicator);
+ 
+   if( Mptr->PKWND_dir !=  MAXINT )
+      printf("PEAK WIND DIRECTION : %d\n",Mptr->PKWND_dir);
+   if( Mptr->PKWND_speed !=  MAXINT )
+      printf("PEAK WIND SPEED     : %d\n",Mptr->PKWND_speed);
+   if( Mptr->PKWND_hour !=  MAXINT )
+      printf("PEAK WIND HOUR      : %d\n",Mptr->PKWND_hour);
+   if( Mptr->PKWND_minute !=  MAXINT )
+      printf("PEAK WIND MINUTE    : %d\n",Mptr->PKWND_minute);
+ 
+   if( Mptr->WshfTime_hour != MAXINT )
+      printf("HOUR OF WIND SHIFT  : %d\n",Mptr->WshfTime_hour);
+   if( Mptr->WshfTime_minute != MAXINT )
+      printf("MINUTE OF WIND SHIFT: %d\n",Mptr->WshfTime_minute);
+   if( Mptr->Wshft_FROPA != FALSE )
+      printf("FROPA ASSOC. W/WSHFT: TRUE\n");
+ 
+   if( Mptr->TWR_VSBY != (float) MAXINT )
+      printf("TOWER VISIBILITY    : %.2f\n",Mptr->TWR_VSBY);
+   if( Mptr->SFC_VSBY != (float) MAXINT )
+      printf("SURFACE VISIBILITY  : %.2f\n",Mptr->SFC_VSBY);
+ 
+   if( Mptr->minVsby != (float) MAXINT )
+      printf("MIN VRBL_VIS (SM)   : %.4f\n",Mptr->minVsby);
+   if( Mptr->maxVsby != (float) MAXINT )
+      printf("MAX VRBL_VIS (SM)   : %.4f\n",Mptr->maxVsby);
+ 
+   if( Mptr->VSBY_2ndSite != (float) MAXINT )
+      printf("VSBY_2ndSite (SM)   : %.4f\n",Mptr->VSBY_2ndSite);
+   if( Mptr->VSBY_2ndSite_LOC[0] != '\0' )
+      printf("VSBY_2ndSite LOC.   : %s\n",
+                   Mptr->VSBY_2ndSite_LOC);
+ 
+ 
+   if( Mptr->OCNL_LTG )
+      printf("OCCASSIONAL LTG     : TRUE\n");
+ 
+   if( Mptr->FRQ_LTG )
+      printf("FREQUENT LIGHTNING  : TRUE\n");
+ 
+   if( Mptr->CNS_LTG )
+      printf("CONTINUOUS LTG      : TRUE\n");
+ 
+   if( Mptr->CG_LTG )
+      printf("CLOUD-GROUND LTG    : TRUE\n");
+ 
+   if( Mptr->IC_LTG )
+      printf("IN-CLOUD LIGHTNING  : TRUE\n");
+ 
+   if( Mptr->CC_LTG )
+      printf("CLD-CLD LIGHTNING   : TRUE\n");
+ 
+   if( Mptr->CA_LTG )
+      printf("CLOUD-AIR LIGHTNING : TRUE\n");
+ 
+   if( Mptr->AP_LTG )
+      printf("LIGHTNING AT AIRPORT: TRUE\n");
+ 
+   if( Mptr->OVHD_LTG )
+      printf("LIGHTNING OVERHEAD  : TRUE\n");
+ 
+   if( Mptr->DSNT_LTG )
+      printf("DISTANT LIGHTNING   : TRUE\n");
+ 
+   if( Mptr->LightningVCTS )
+      printf("L'NING W/I 5-10(ALP): TRUE\n");
+ 
+   if( Mptr->LightningTS )
+      printf("L'NING W/I 5 (ALP)  : TRUE\n");
+ 
+   if( Mptr->VcyStn_LTG )
+      printf("VCY STN LIGHTNING   : TRUE\n");
+ 
+   if( Mptr->LTG_DIR[0] != '\0' )
+      printf("DIREC. OF LIGHTNING : %s\n", Mptr->LTG_DIR);
+ 
+ 
+ 
+   i = 0;
+   while( i < 3 && Mptr->ReWx[ i ].Recent_weather[0] != '\0' )
+   {
+      printf("RECENT WEATHER      : %s",
+                  Mptr->ReWx[i].Recent_weather);
+ 
+      if( Mptr->ReWx[i].Bhh != MAXINT )
+         printf(" BEG_hh = %d",Mptr->ReWx[i].Bhh);
+      if( Mptr->ReWx[i].Bmm != MAXINT )
+         printf(" BEG_mm = %d",Mptr->ReWx[i].Bmm);
+ 
+      if( Mptr->ReWx[i].Ehh != MAXINT )
+         printf(" END_hh = %d",Mptr->ReWx[i].Ehh);
+      if( Mptr->ReWx[i].Emm != MAXINT )
+         printf(" END_mm = %d",Mptr->ReWx[i].Emm);
+ 
+      printf("\n");
+ 
+      i++;
+   }
+ 
+   if( Mptr->minCeiling != MAXINT )
+      printf("MIN VRBL_CIG (FT)   : %d\n",Mptr->minCeiling);
+   if( Mptr->maxCeiling != MAXINT )
+      printf("MAX VRBL_CIG (FT))  : %d\n",Mptr->maxCeiling);
+ 
+   if( Mptr->CIG_2ndSite_Meters != MAXINT )
+      printf("CIG2ndSite (FT)     : %d\n",Mptr->CIG_2ndSite_Meters);
+   if( Mptr->CIG_2ndSite_LOC[0] != '\0' )
+      printf("CIG @ 2nd Site LOC. : %s\n",Mptr->CIG_2ndSite_LOC);
+ 
+   if( Mptr->PRESFR )
+      printf("PRESFR              : TRUE\n");
+   if( Mptr->PRESRR )
+      printf("PRESRR              : TRUE\n");
+ 
+   if( Mptr->SLPNO )
+      printf("SLPNO               : TRUE\n");
+ 
+   if( Mptr->SLP != (float) MAXINT )
+      printf("SLP (hPa)           : %.1f\n", Mptr->SLP);
+ 
+   if( Mptr->SectorVsby != (float) MAXINT )
+      printf("SECTOR VSBY (MILES) : %.2f\n", Mptr->SectorVsby );
+ 
+   if( Mptr->SectorVsby_Dir[ 0 ] != '\0' )
+      printf("SECTOR VSBY OCTANT  : %s\n", Mptr->SectorVsby_Dir );
+ 
+   if( Mptr->TS_LOC[ 0 ] != '\0' )
+      printf("THUNDERSTORM LOCAT. : %s\n", Mptr->TS_LOC );
+ 
+   if( Mptr->TS_MOVMNT[ 0 ] != '\0' )
+      printf("THUNDERSTORM MOVMNT.: %s\n", Mptr->TS_MOVMNT);
+ 
+   if( Mptr->GR )
+      printf("GR (HAILSTONES)     : TRUE\n");
+ 
+   if( Mptr->GR_Size != (float) MAXINT )
+      printf("HLSTO SIZE (INCHES) : %.3f\n",Mptr->GR_Size);
+ 
+   if( Mptr->VIRGA )
+      printf("VIRGA               : TRUE\n");
+ 
+   if( Mptr->VIRGA_DIR[0] != '\0' )
+      printf("DIR OF VIRGA FRM STN: %s\n", Mptr->VIRGA_DIR);
+ 
+   for( i = 0; i < 6; i++ ) {
+      if( Mptr->SfcObscuration[i][0] != '\0' )
+         printf("SfcObscuration      : %s\n",
+                   &(Mptr->SfcObscuration[i][0]) );
+   }
+ 
+   if( Mptr->Num8thsSkyObscured != MAXINT )
+      printf("8ths of SkyObscured : %d\n",Mptr->Num8thsSkyObscured);
+ 
+   if( Mptr->CIGNO )
+      printf("CIGNO               : TRUE\n");
+ 
+   if( Mptr->Ceiling != MAXINT )
+      printf("Ceiling (ft)        : %d\n",Mptr->Ceiling);
+ 
+   if( Mptr->Estimated_Ceiling != MAXINT )
+      printf("Estimated CIG (ft)  : %d\n",Mptr->Estimated_Ceiling);
+ 
+   if( Mptr->VrbSkyBelow[0] != '\0' )
+      printf("VRB SKY COND BELOW  : %s\n",Mptr->VrbSkyBelow);
+ 
+   if( Mptr->VrbSkyAbove[0] != '\0' )
+      printf("VRB SKY COND ABOVE  : %s\n",Mptr->VrbSkyAbove);
+ 
+   if( Mptr->VrbSkyLayerHgt != MAXINT )
+      printf("VRBSKY COND HGT (FT): %d\n",Mptr->VrbSkyLayerHgt);
+ 
+   if( Mptr->ObscurAloftHgt != MAXINT )
+      printf("Hgt Obscur Aloft(ft): %d\n",Mptr->ObscurAloftHgt);
+ 
+   if( Mptr->ObscurAloft[0] != '\0' )
+      printf("Obscur Phenom Aloft : %s\n",Mptr->ObscurAloft);
+ 
+   if( Mptr->ObscurAloftSkyCond[0] != '\0' )
+      printf("Obscur ALOFT SKYCOND: %s\n",Mptr->ObscurAloftSkyCond);
+ 
+ 
+   if( Mptr->NOSPECI )
+      printf("NOSPECI             : TRUE\n");
+ 
+   if( Mptr->LAST )
+      printf("LAST                : TRUE\n");
+ 
+   if( Mptr->synoptic_cloud_type[ 0 ] != '\0' )
+      printf("SYNOPTIC CLOUD GROUP: %s\n",Mptr->synoptic_cloud_type);
+ 
+   if( Mptr->CloudLow != '\0' )
+      printf("LOW CLOUD CODE      : %c\n",Mptr->CloudLow);
+ 
+   if( Mptr->CloudMedium != '\0' )
+      printf("MEDIUM CLOUD CODE   : %c\n",Mptr->CloudMedium);
+ 
+   if( Mptr->CloudHigh != '\0' )
+      printf("HIGH CLOUD CODE     : %c\n",Mptr->CloudHigh);
+ 
+   if( Mptr->SNINCR != MAXINT )
+      printf("SNINCR (INCHES)     : %d\n",Mptr->SNINCR);
+ 
+   if( Mptr->SNINCR_TotalDepth != MAXINT )
+      printf("SNINCR(TOT. INCHES) : %d\n",Mptr->SNINCR_TotalDepth);
+ 
+   if( Mptr->snow_depth_group[ 0 ] != '\0' )
+      printf("SNOW DEPTH GROUP    : %s\n",Mptr->snow_depth_group);
+ 
+   if( Mptr->snow_depth != MAXINT )
+      printf("SNOW DEPTH (INCHES) : %d\n",Mptr->snow_depth);
+ 
+   if( Mptr->WaterEquivSnow != (float) MAXINT )
+      printf("H2O EquivSno(inches): %.2f\n",Mptr->WaterEquivSnow);
+ 
+   if( Mptr->SunshineDur != MAXINT )
+      printf("SUNSHINE (MINUTES)  : %d\n",Mptr->SunshineDur);
+ 
+   if( Mptr->SunSensorOut )
+      printf("SUN SENSOR OUT      : TRUE\n");
+ 
+   if( Mptr->hourlyPrecip != (float) MAXINT )
+      printf("HRLY PRECIP (INCHES): %.2f\n",Mptr->hourlyPrecip);
+ 
+   if( Mptr->precip_amt != (float) MAXINT)
+      printf("3/6HR PRCIP (INCHES): %.2f\n",
+         Mptr->precip_amt);
+ 
+   if( Mptr->Indeterminant3_6HrPrecip )
+      printf("INDTRMN 3/6HR PRECIP: TRUE\n");
+ 
+   if( Mptr->precip_24_amt !=  (float) MAXINT)
+      printf("24HR PRECIP (INCHES): %.2f\n",
+         Mptr->precip_24_amt);
+ 
+   if( Mptr->Temp_2_tenths != (float) MAXINT )
+      printf("TMP2TENTHS (CELSIUS): %.1f\n",Mptr->Temp_2_tenths);
+ 
+   if( Mptr->DP_Temp_2_tenths != (float) MAXINT )
+      printf("DPT2TENTHS (CELSIUS): %.1f\n",Mptr->DP_Temp_2_tenths);
+ 
+   if( Mptr->maxtemp !=  (float) MAXINT)
+      printf("MAX TEMP (CELSIUS)  : %.1f\n",
+         Mptr->maxtemp);
+ 
+   if( Mptr->mintemp !=  (float) MAXINT)
+      printf("MIN TEMP (CELSIUS)  : %.1f\n",
+         Mptr->mintemp);
+ 
+   if( Mptr->max24temp !=  (float) MAXINT)
+      printf("24HrMAXTMP (CELSIUS): %.1f\n",
+         Mptr->max24temp);
+ 
+   if( Mptr->min24temp !=  (float) MAXINT)
+      printf("24HrMINTMP (CELSIUS): %.1f\n",
+         Mptr->min24temp);
+ 
+   if( Mptr->char_prestndcy != MAXINT)
+      printf("CHAR PRESS TENDENCY : %d\n",
+         Mptr->char_prestndcy );
+ 
+   if( Mptr->prestndcy != (float) MAXINT)
+      printf("PRES. TENDENCY (hPa): %.1f\n",
+         Mptr->prestndcy );
+ 
+   if( Mptr->PWINO )
+      printf("PWINO               : TRUE\n");
+ 
+   if( Mptr->PNO )
+      printf("PNO                 : TRUE\n");
+ 
+   if( Mptr->CHINO )
+      printf("CHINO               : TRUE\n");
+ 
+   if( Mptr->CHINO_LOC[0] != '\0' )
+      printf("CHINO_LOC           : %s\n",Mptr->CHINO_LOC);
+ 
+   if( Mptr->VISNO )
+      printf("VISNO               : TRUE\n");
+ 
+   if( Mptr->VISNO_LOC[0] != '\0' )
+      printf("VISNO_LOC           : %s\n",Mptr->VISNO_LOC);
+ 
+   if( Mptr->FZRANO )
+      printf("FZRANO              : TRUE\n");
+ 
+   if( Mptr->TSNO )
+      printf("TSNO                : TRUE\n");
+ 
+   if( Mptr->DollarSign)
+      printf("DOLLAR $IGN INDCATR : TRUE\n");
+ 
+   if( Mptr->horiz_vsby[ 0 ] != '\0' )
+      printf("HORIZ VISIBILITY    : %s\n",Mptr->horiz_vsby);
+ 
+   if( Mptr->dir_min_horiz_vsby[ 0 ] != '\0' )
+      printf("DIR MIN HORIZ VSBY  : %s\n",Mptr->dir_min_horiz_vsby);
+ 
+   if( Mptr->CAVOK )
+      printf("CAVOK               : TRUE\n");
+ 
+ 
+   if( Mptr->VertVsby != MAXINT )
+      printf("Vert. Vsby (meters) : %d\n",
+                  Mptr->VertVsby );
+ 
+   if( Mptr->charVertVsby[0] != '\0' )
+      printf("Vert. Vsby (CHAR)   : %s\n",
+                  Mptr->charVertVsby );
+ 
+   if( Mptr->QFE != MAXINT )
+      printf("QFE                 : %d\n", Mptr->QFE);
+ 
+   if( Mptr->VOLCASH )
+      printf("VOLCANIC ASH        : TRUE\n");
+ 
+   if( Mptr->min_vrbl_wind_dir != MAXINT )
+      printf("MIN VRBL WIND DIR   : %d\n",Mptr->min_vrbl_wind_dir);
+   if( Mptr->max_vrbl_wind_dir != MAXINT )
+      printf("MAX VRBL WIND DIR   : %d\n",Mptr->max_vrbl_wind_dir);
+ 
+ 
+   printf("\n\n\n");
+ 
+ 
+   return;
+ 
+}

simgear/metar/README.Metar

@@ -0,0 +1,69 @@
+There are 2 classes: CMetarStation (MetarStation.h) and CMetarReport
+(MetarReport.h).  These classes provide mechanisms to get information
+about meteorological data reporting stations and about the reports 
+themselves.  These stations and reports are known as METAR.  See
+http://tgsv5.nws.noaa.gov/oso/oso1/oso12/metar.htm for information
+from the USA perspective.  Quoting from that site:
+
+ On 1 July 1996, the international standard code for hourly and special 
+ surface weather observations, METAR/SPECI, took effect. 
+ The METAR acronym roughly translates from the French as Aviation 
+ Routine Weather Report . A special report, SPECI, is merely a METAR 
+ formatted report which is issued on a non-routine basis as dictated by
+ changing meteorological conditions. The SPECI acronym roughly translates as
+
+ Aviation Selected Special Weather Report . Meanwhile, the international 
+ standard code format for terminal forecasts issued for airports, TAF, 
+ also took effect. The acronym translates to Aerodrome Forecast.
+
+This implementation ignores the SPECI and TAF acronyms, calling the
+entire system METAR.
+
+The class CMetarStation is implemented by MetarStation.h and
+MetarStation.cpp.  It decodes a text file containing information about
+individual METAR reporting stations and builds a static database of that
+information during static construction of the class.  There are static
+member methods to find individual stations, and member functions to
+extract individual station attributes.  The information about METAR
+stations probably has some overlap with FGFS airport information.  That
+needs to be investigated.  The METAR station information is kept in this
+file:
+  http://www.nws.noaa.gov/pub/stninfo/nsd_cccc.gz
+  http://www.nws.noaa.gov/pub/stninfo/nsd_cccc.txt
+This class looks for the file FG_ROOT/Weather/MetarStations instead of
+nsd_cccc.
+The current implementation does not look for updates to this file on the
+internet.
+
+The class CMetarReport is implemented by MetarReport.h and MetarReport.cpp.
+It encapsulates the decoding software written by Carl McCalla at -
+     NOAA/National Weather Service
+     1325 East-West Highway
+     SSMC2, W/OSO242, Station 5114
+     Silver Spring, Maryland 20910
+     Work:                     (301) 713-0882, Ext 115
+     FAX:                      (301) 608-0911 
+     E-Mail Address:           cmccalla@smtpgate.ssmc.noaa.gov
+http://www.nws.noaa.gov/software/
+This software generally sucks and the CMetarReport class attempts to clean
+up some of that suckiness.  A CMetarReport object is created with an ASCII
+string as a construction parameter.  The string contains a METAR report.
+There
+are member methods to extract selected information from a report by calling
+the McCalla software.  Additional information can be selected by adding new
+member methods as needed.  Certainly the methods currently implemented are
+not sufficient.  METAR reports are available via the internet.  In the USA,
+NOAA provides individual METAR reports in this directory:
+   ftp://weather.noaa.gov/data/observations/metar/stations
+Other sources are available as well.  The current implementation does not
+look for reports on the internet.
+
+There is a test program in the MetarTest subdirectory.  It requires that a
+#define be changed in the MetarStation.cpp file.  Add #define TESTPROG to
+the code or -D TESTPROG to the compilation.  This is necessary because the
+FGFS options class is coupled tightly to code that shouldn't be pulled into
+the test program.  The test program will decode many METAR reports and
+display
+them to the screen, then it will plot all the METAR reporting stations on a
+tumbling globe.
+

simgear/metar/Stspack2.cpp

@@ -0,0 +1,211 @@
+#pragma comment (compiler)
+//#pragma comment (date)
+//#pragma comment (timestamp)
+#pragma pagesize(80)
+ 
+#include "Local.h"     /* standard header file */
+ 
+#pragma page(1)
+#pragma subtitle(" ")
+#pragma subtitle("stspack2 - Local string test functions       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         stspack2                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          05 Oct 1992                                      */
+/*  Programmer:    ALLAN DARLING                                    */
+/*  Language:      C/2                                              */
+/*                                                                  */
+/*  Abstract:      The stspack2 package contains functions to       */
+/*                 perform the isalnum through isxdigit functions   */
+/*                 on strings.  The functions come in four forms:   */
+/*                 those that test NULL delimited strings and are   */
+/*                 named in the form sxxxxxxx, those that test at   */
+/*                 most n characters and are named in the form      */
+/*                 nxxxxxxx, those that search forward in a string  */
+/*                 and are named in the form nxtyyyyy, and those    */
+/*                 that search backward in a string and are named   */
+/*                 in the form lstyyyyy.                            */
+/*                                                                  */
+/*                 The xxxxxxx is the name of the test applied to   */
+/*                 each character in the string, such as isalpha,   */
+/*                 thus a function to test a NULL delimited string  */
+/*                 an return a nonzero value if all characters in   */
+/*                 the string are digits is named sisdigit.         */
+/*                                                                  */
+/*                 The yyyyy is the name of the test applied to     */
+/*                 characters in a string, minus the 'is' prefix.   */
+/*                 Thus a function to find the next digit in a NULL */
+/*                 delimited string and return a pointer to it is   */
+/*                 named nxtdigit.                                  */
+/*                                                                  */
+/*                 The only exception to the naming rule is for the */
+/*                 functions that test for hexadecimal digits.      */
+/*                 These are named sisxdigi, nisxdigi, nxtxdigi,    */
+/*                 and lstxdigi because of the eight character      */
+/*                 function name limitation.                        */
+/*                                                                  */
+/*                 The nxxxxxxx class of functions will test up to  */
+/*                 n characters or the first NULL character         */
+/*                 encountered, whichever comes first.  For all     */
+/*                 classes of functions, the string sentinal is     */
+/*                 not included in the test.                        */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 isalnum, isalpha, iscntrl, isdigit, isgraph,     */
+/*                 islower, isprint, ispunct, isspace, isupper,     */
+/*                 isxdigit.                                        */
+/*                                                                  */
+/*  Input:         For sxxxxxxx class functions, a pointer to a     */
+/*                 NULL delimited character string.                 */
+/*                                                                  */
+/*                 For nxtyyyyy class functions, a pointer to a     */
+/*                 NULL delimited character string.                 */
+/*                                                                  */
+/*                 for nxxxxxxx class functions, a pointer to a     */
+/*                 character array, and a positive, nonzero integer.*/
+/*                                                                  */
+/*                 for lstyyyyy class functions, a pointer to a     */
+/*                 character array, and a positive, nonzero integer.*/
+/*                                                                  */
+/*  Output:        A nonzero value if the test is true for all      */
+/*                 characters in the string, a zero value otherwise.*/
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+ 
+int nisalnum(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isalnum(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisalnum */
+ 
+ 
+int nisalpha(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isalpha(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisalpha */
+ 
+ 
+int niscntrl(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!iscntrl(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end niscntrl */
+ 
+ 
+int nisdigit(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isdigit(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisdigit */
+ 
+ 
+int nisgraph(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isgraph(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisgraph */
+ 
+ 
+int nislower(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!islower(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nislower */
+ 
+ 
+int nisprint(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isprint(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisprint */
+ 
+ 
+int nispunct(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!ispunct(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nispunct */
+ 
+ 
+int nisspace(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isspace(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisspace */
+ 
+ 
+int nisupper(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isupper(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisupper */
+ 
+ 
+int nisxdigi(char *s, int n) {
+ 
+   for (; *s && n; s++, n--)
+ 
+      if (!isxdigit(*s))
+         return (0);
+ 
+   return (1);
+ 
+} /* end nisxdigi */
+ 
+#pragma page(1)

simgear/metar/Stspack3.cpp

@@ -0,0 +1,211 @@
+#pragma comment (compiler)
+//#pragma comment (date)
+//#pragma comment (timestamp)
+#pragma pagesize(80)
+ 
+#include "Local.h"     /* standard header file */
+ 
+#pragma page(1)
+#pragma subtitle(" ")
+#pragma subtitle("stspack3 - Local string test functions       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         stspack3                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          05 Oct 1992                                      */
+/*  Programmer:    ALLAN DARLING                                    */
+/*  Language:      C/2                                              */
+/*                                                                  */
+/*  Abstract:      The stspack3 package contains functions to       */
+/*                 perform the isalnum through isxdigit functions   */
+/*                 on strings.  The functions come in four forms:   */
+/*                 those that test NULL delimited strings and are   */
+/*                 named in the form sxxxxxxx, those that test at   */
+/*                 most n characters and are named in the form      */
+/*                 nxxxxxxx, those that search forward in a string  */
+/*                 and are named in the form nxtyyyyy, and those    */
+/*                 that search backward in a string and are named   */
+/*                 in the form lstyyyyy.                            */
+/*                                                                  */
+/*                 The xxxxxxx is the name of the test applied to   */
+/*                 each character in the string, such as isalpha,   */
+/*                 thus a function to test a NULL delimited string  */
+/*                 an return a nonzero value if all characters in   */
+/*                 the string are digits is named sisdigit.         */
+/*                                                                  */
+/*                 The yyyyy is the name of the test applied to     */
+/*                 characters in a string, minus the 'is' prefix.   */
+/*                 Thus a function to find the next digit in a NULL */
+/*                 delimited string and return a pointer to it is   */
+/*                 named nxtdigit.                                  */
+/*                                                                  */
+/*                 The only exception to the naming rule is for the */
+/*                 functions that test for hexadecimal digits.      */
+/*                 These are named sisxdigi, nisxdigi, nxtxdigi,    */
+/*                 and lstxdigi because of the eight character      */
+/*                 function name limitation.                        */
+/*                                                                  */
+/*                 The nxxxxxxx class of functions will test up to  */
+/*                 n characters or the first NULL character         */
+/*                 encountered, whichever comes first.  For all     */
+/*                 classes of functions, the string sentinal is     */
+/*                 not included in the test.                        */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 isalnum, isalpha, iscntrl, isdigit, isgraph,     */
+/*                 islower, isprint, ispunct, isspace, isupper,     */
+/*                 isxdigit.                                        */
+/*                                                                  */
+/*  Input:         For sxxxxxxx class functions, a pointer to a     */
+/*                 NULL delimited character string.                 */
+/*                                                                  */
+/*                 For nxtyyyyy class functions, a pointer to a     */
+/*                 NULL delimited character string.                 */
+/*                                                                  */
+/*                 for nxxxxxxx class functions, a pointer to a     */
+/*                 character array, and a positive, nonzero integer.*/
+/*                                                                  */
+/*                 for lstyyyyy class functions, a pointer to a     */
+/*                 character array, and a positive, nonzero integer.*/
+/*                                                                  */
+/*  Output:        A nonzero value if the test is true for all      */
+/*                 characters in the string, a zero value otherwise.*/
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+char *nxtalnum(char *s) {
+ 
+   for (; !isalnum(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtalnum */
+ 
+ 
+char *nxtalpha(char *s) {
+ 
+   for (; !isalpha(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtalpha */
+ 
+ 
+char *nxtcntrl(char *s) {
+ 
+   for (; !iscntrl(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtcntrl */
+ 
+ 
+char *nxtdigit(char *s) {
+ 
+   for (; !isdigit(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtdigit */
+ 
+ 
+char *nxtgraph(char *s) {
+ 
+   for (; !isgraph(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtgraph */
+ 
+ 
+char *nxtlower(char *s) {
+ 
+   for (; !islower(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtlower */
+ 
+ 
+char *nxtprint(char *s) {
+ 
+   for (; !isprint(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtprint */
+ 
+ 
+char *nxtpunct(char *s) {
+ 
+   for (; !ispunct(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtpunct */
+ 
+ 
+char *nxtspace(char *s) {
+ 
+   for (; !isspace(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtspace */
+ 
+ 
+char *nxtupper(char *s) {
+ 
+   for (; !isupper(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtupper */
+ 
+ 
+char *nxtxdigi(char *s) {
+ 
+   for (; !isxdigit(*s) && *s; s++) ;
+ 
+   if (*s)
+      return (s);
+   else
+      return (NULL);
+ 
+} /* end nxtxdigi */
+ 
+ 
+#pragma page(1)

simgear/misc/Makefile.am

@@ -0,0 +1,26 @@
+includedir = @includedir@/misc
+
+if HAVE_ZLIB
+ZLIB_INCL =
+else
+ZLIB_INCL = -I$(top_builddir)/src/zlib
+endif
+
+lib_LIBRARIES = libsgmisc.a
+
+include_HEADERS = \
+	fgpath.hxx \
+	fgstream.hxx \
+	stopwatch.hxx \
+	strutils.hxx \
+	texcoord.hxx \
+	zfstream.hxx
+
+libsgmisc_a_SOURCES = \
+	fgpath.cxx \
+	fgstream.cxx \
+	strutils.cxx \
+	texcoord.cxx \
+	zfstream.cxx
+
+INCLUDES += -I$(top_builddir) $(ZLIB_INCL)