Repatch (from linux) of OSX IRAF

1 files changed, 194 insertions, 0 deletions

diff --git a/unix/hlib/mkiraf.sh b/unix/hlib/mkiraf.sh
new file mode 100755
index 00000000..ff2a1630
--- /dev/null
+++ b/unix/hlib/mkiraf.sh
@@ -0,0 +1,194 @@
+#!/bin/bash
+#
+#  MKIRAF -- Setup the IRAF environment for a user.  Should be called from the
+#  directory from which the user will thereafter type "cl" to start a session.
+#
+#  Usage:
+#
+#	% mkiraf [--term=<term>] [--init] [--noinit] [--quiet]
+#
+#  Where
+#	-t,--term=<term>	Set the default terminal type
+#	-i,--init		Initialize the uparm directory
+#	-n,--noinit		Do not nitialize the uparm directory
+#	-q,--quiet		Suppress output
+#
+#  Use of the -t, -i, or -n options will suppress the corresponding prompts
+#  for input.
+
+
+				# Initialize the script variables.
+myterm="none" 			
+uparm_init=-1
+quiet=0
+def=0
+force=0
+defterm="xgterm"
+
+				# Paths edited by the install script.
+iraf="/srv/conda/sources/iraf/" 		
+imdir="/srv/conda/sources/iraf/fakehome/imdir//"
+cachedir="/srv/conda/sources/iraf/fakehome/cache//"
+# Bad hack - jhunk
+FAKEHOME=$(dirname $imdir)
+
+# ------------- (end of site dependent definitions) ------------------------
+
+# The following kludge is for Solaris, which doesn't have whoami.
+if [ "$USER" = "" ]; then
+    USER=`whoami`
+fi
+
+
+# Parse the command-line options.
+for i in "$@"
+do
+  case $i in
+    -t=*|--term=*)			# Set the default terminal type
+        myterm=`echo $i | sed 's/[-a-zA-Z0-9]*=//'`
+    	;;
+    -d|--default)			# Create default login dir
+        def=1
+        quiet=1
+	echo ""
+    	;;
+    -i|--init)				# Initialize uparm directory
+        uparm_init=1
+    	;;
+    -n|--noinit)			# Don't initialize uparm directory
+        uparm_init=0
+    	;;
+    -q|--quiet)				# Suppress output
+        quiet=1
+    	;;
+    -f|--force)             # Install in $iraf regardless
+        force=1
+        ;;
+    *)
+        /bin/echo "Error: unknown option '$i'"
+	exit 1
+    	;;
+  esac
+done
+
+
+
+# Protect against running mkiraf in an iraf system directory.
+irafdir=`cd $iraf ; pwd`
+if (( $force==0 )); then
+    if [ ! "`pwd | grep $irafdir`" = "" ]; then
+        if [ "`pwd | grep iraf/local`" = "" ]; then
+	        /bin/echo "Error: current directory is not an iraf user login directory"
+	        exit 1
+        fi
+    fi
+fi
+
+if (( $def == 1 )); then
+    #myterm="xgterm"
+    cd $FAKEHOME
+    if [ ! -e .iraf ]; then
+	mkdir $FAKEHOME/.iraf
+    fi
+    cd $FAKEHOME/.iraf
+    if [ ! -e bin ]; then
+        mkdir bin
+    fi
+    if [ ! -e imdir ]; then
+        mkdir imdir
+    fi
+    if [ ! -e cache ]; then
+        mkdir cache
+    fi
+    cp $iraf/unix/hlib/setup.*sh .
+fi
+
+
+# Make an empty "uparm" (user parameter) directory.
+if [ ! -e uparm ]; then
+    if (( quiet<1 )); then
+      if (( $def == 0 )); then
+        /bin/echo '-- creating a new uparm directory'
+      fi
+    fi
+    mkdir uparm
+elif [ ! -d uparm ]; then
+    /bin/echo "Error: a file uparm exists"
+    exit 1
+else
+    if (( uparm_init<0 )) ; then
+      if (( quiet<1 )) ; then
+        /bin/echo -n 'Initialize uparm? (y|n): '
+        read yesno
+      else
+	yesno="yes"
+      fi
+      if [ "$yesno" = "y" -o "$yesno" = "yes" ]; then
+	if (( quiet<1 )); then
+	    /bin/echo '-- initializing uparm'
+	fi
+	/bin/rm -rf uparm
+	mkdir uparm
+      fi
+    elif (( uparm_init==1 )); then
+	if (( quiet<1 )); then
+	    /bin/echo '-- initializing uparm'
+	fi
+	/bin/rm -rf uparm
+	mkdir uparm
+    fi
+fi
+
+# Edit the login.cl file, setting the user's home directory, default image
+# directory, and terminal.
+
+if [ "$myterm" == "none" ]; then
+    /bin/echo "Terminal types: xgterm,xtermjh,xterm,etc."
+    /bin/echo -n 'Enter terminal type ('$defterm'): '
+    read myterm
+    if [ "$myterm" == "" ]; then
+	myterm=$defterm
+    fi
+fi
+
+# Initialize the 'imdir' and 'cachedir' paths.
+IDIR="${imdir}$USER"
+if [ -d $imdir ]; then
+    mkdir -p $IDIR &> /dev/null
+fi
+if [ ! -d $IDIR -o ! -w $IDIR ]; then
+    IDIR="HDR$"
+fi
+
+CDIR="${cachedir}$USER"
+if [ -d $cachedir ]; then
+    mkdir -p $CDIR &> /dev/null
+fi
+if [ ! -d $CDIR -o ! -w $CDIR ]; then
+    CDIR="/tmp"
+fi
+
+
+# Back up the old login.cl file.
+if [ -e login.cl ]; then
+    mv -f login.cl login.cl.OLD
+fi
+
+# Create the path editing script.
+_sed() {
+    /bin/echo $1	| sed -e "s;.*;s+U_TERM+&+;"
+    pwd			| sed -e "s;.*;s+U_HOME+&/+;"
+    pwd			| sed -e "s;.*;s+U_UPARM+&/uparm/+;"
+    /bin/echo $IDIR	| sed -e "s;.*;s+U_IMDIR+&/+;"
+    /bin/echo $CDIR	| sed -e "s;.*;s+U_CACHEDIR+&/+;"
+    /bin/echo $USER	| sed -e "s;.*;s+U_USER+&+;"
+}
+
+sed "`_sed $myterm`" < ${iraf}/unix/hlib/login.cl > login.cl
+
+if (( $def == 0 )); then
+ if (( quiet<1 )) ; then
+  /bin/echo 'A new LOGIN.CL file has been created in the current directory.'
+  /bin/echo 'You may wish to review and edit this file to change the defaults.'
+ fi
+fi