configure

#! /bin/bash
# configure script for LoopTools
# note: has nothing to do with GNU autoconf
# last modified 19 Apr 18 th


exec 2> ${LOGFILE:-/dev/null} 3>&1
eval ${LOGFILE:+set -x}

export LC_ALL=C

CONF_DIR="${0%/*}"
CONF_OS="`uname -s`"
CONF_MACH="`uname -m`"
CONF_DEFPREFIX="$CONF_MACH-$CONF_OS"
CONF_PREFIX="$CONF_DEFPREFIX"
CONF_TARGET=
CONF_STATIC=
CONF_STATIC_EXT=
CONF_QUAD=
CONF_QUADSIZE=16
CONF_DEBUG=
CONF_BITS=
CONF_MCLIBS=
CONF_ARCH=
CONF_AS=
CONF_EXE=
FLDFLAGS=()

case "$CONF_OS" in
  # Mma 5.1's mcc needs -lpthread for static linking
Linux)	CONF_MCLIBS=" -lpthread -lrt" ;;
Darwin)	FLDFLAGS=("-Wl,-no_compact_unwind") ;;
  # need static linkage at least for libgfortran, to reliably
  # get LoopTools.tm's make_sure_stdout_is_open executed before
  # libgfortran's constructor
CYG*)	CONF_EXE=".exe"
	CONF_STATIC="-Wl,--image-base,0x10000000 -static-libgfortran" ;;
esac

for arg in "$@" ; do
  case "$arg" in
  --prefix=*)
	CONF_PREFIX="${arg#--prefix=}" ;;
  --host=*)
	CONF_TARGET="${arg#--host=}" ;;
  --static)
	case "$CONF_OS" in
	Darwin)	CONF_STATIC_EXT=1 ;;
	CYG*)	CONF_STATIC="-Wl,--image-base,0x10000000 -static" ;;
	*)	CONF_STATIC="-static" ;;
	esac ;;
  --quad)
	CONF_QUAD=1 ;;
  --real10)
	CONF_QUADSIZE=10 ;;
  --debug)
	CONF_DEBUG="-O0 -g" ;;
  --32)
	CONF_BITS="-m32" ;;
  --64)
	CONF_BITS="-m64" ;;
  --native)
	test "$CONF_OS" = Darwin && CONF_AS="-Wa,-q"
	CONF_ARCH="-march=native" ;;
  --help)
	cat << _EOF_ 1>&3
$0 configures LoopTools, i.e. determines or guesses the
compiler and flags and writes out a makefile.

$0 understands the following options:

--prefix=DIR	use DIR as installation directory

--host=HOST	target host triplet, e.g. i386-pc-linux

--static	link the executables statically

--quad		compile with quadruple precision (ifort, gfortran 4.6+, xlf only)

--real10	use REAL*10 instead of REAL*16 (gfortran 4.6+ only)

--debug		compile without optimization

--32		force 32-bit compilation

--64		force 64-bit compilation

--native	optimize code for the host machine

_EOF_
	exit 1 ;;
  -*)
	echo "Warning: $arg is not a valid option." 1>&3 ;;
  *=*)
	lhs="${arg%%=*}"
	eval printf -v rhs '" %q"' ${arg#$lhs=}
	eval "$lhs=\"${rhs:1}\"" ;;
  *)
	echo "Warning: $arg is not a valid argument." 1>&3 ;;
  esac
done


test=test$$
trap "rm -fr $test* =." 0 1 2 3 15


## look for some programs

findprog() {
  echo -n "looking for $1... " 1>&3
  shift
  test -z "$1" && shift
  test -n "$CONF_TARGET" && for prog in "$@" ; do
    full="`type -P "$CONF_TARGET-$prog"`" && {
      echo "$full" 1>&3
      echo "$CONF_TARGET-$prog"
      return 0
    }
  done
  for prog in "$@" ; do
    full="`type -P "$prog"`" && {
      echo "$full" 1>&3
      echo "$prog"
      return 0
    }
  done
  echo "no $@ in your path" 1>&3
  return 1
}


CONF_MAKE="`findprog make "$MAKE" gmake Make make`" || exit 1

CONF_CC="`findprog gcc "$CC" clang gcc`" || exit 1

CONF_CXX="`findprog g++ "$CXX" clang++ g++`" || exit 1

CONF_FC="`findprog fortran "$FC" ${CONF_QUAD:+ifort gfortran xlf} ifort pgf90 xlf gfortran g95 f90`" || exit 1

CONF_AR="`findprog ar "$AR" ar`"

CONF_RANLIB="`findprog ranlib "$RANLIB" ranlib`"

CONF_NM="`findprog nm "$NM" nm`"

CONF_DLLTOOL="`findprog dlltool "$DLLTOOL" dlltool`"

CONF_DEF="-D"


set -- `eval $CONF_FC --version -c | sed '/^$/d;s/(.*)//;q' 2>&1`
case "$1,$2,$3" in
GNU,Fortran,[123].*)
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O1} ${CONF_DEBUG:+-Wall}} \
$CONF_ARCH $CONF_AS $CONF_BITS -ffixed-line-length-none -fno-range-check \
$CONF_STATIC"
  ;;
GNU,Fortran,4.*)
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O3} ${CONF_DEBUG:+-Wall -Wno-unused-dummy-argument -Wtabs -ffpe-trap=invalid,overflow,zero}} \
$CONF_ARCH $CONF_AS $CONF_BITS -ffixed-line-length-none -fno-range-check \
${CONF_QUAD:+-freal-8-real-$CONF_QUADSIZE} \
$CONF_STATIC ${CONF_STATIC_EXT:+-static-libgfortran -static-libgcc}"
  ;;
GNU,Fortran,*)
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O3} ${CONF_DEBUG:+-Wall -Wno-unused-dummy-argument -Wno-conversion -Wno-tabs -ffpe-trap=invalid,overflow,zero}} \
$CONF_ARCH $CONF_AS $CONF_BITS -ffixed-line-length-none -fno-range-check \
${CONF_QUAD:+-freal-8-real-$CONF_QUADSIZE} \
$CONF_STATIC ${CONF_STATIC_EXT:+-static-libgfortran -static-libgcc}"
  ;;
pgf*)
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O3} ${CONF_DEBUG:+-Minform=inform -Ktrap=fp}} \
${CONF_ARCH:+-Mvect=simd} $CONF_BITS -Mextend -g77libs \
${CONF_STATIC:+-Bstatic}"
  ;;
ifort*)
  CONF_QUADSIZE=16
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O3}} \
$CONF_ARCH $CONF_BITS -debug -extend_source -warn truncated_source -warn nouncalled -assume bscc \
${CONF_QUAD:+-r16 -DDBLE=QEXT -DDIMAG=QIMAG -DDCONJG=QCONJG -DDCMPLX=QCMPLX} \
$CONF_STATIC ${CONF_STATIC_EXT:+-static-intel}"
  ;;
*)
  eval printf -v CONF_FFLAGS '" %q"' "\
${FFLAGS-${CONF_DEBUG:--O}}"
  ;;
esac


## find the Fortran libraries

echo -n "extracting the Fortran libraries... " 1>&3

rm -fr $test*

tee $test.f << _EOF_ 1>&2
	program test
	integer i
	common /uscore/ i
	call exit(i)
	end
_EOF_

while read line ; do
  set -- ${line//[:,()]/ }
  [[ "$1" =~ (/collect2|/ld|^ld)$CONF_EXE$ ]] && while test $# -gt 1 ; do
    shift
    case "$1" in
    *.o | -lc*)
      ;;
    -l* | -L* | *.a)
      FLDFLAGS+=("$1") ;;
    -Bstatic | -Bdynamic | *.ld)
      FLDFLAGS+=("-Wl,$1") ;;
    /*)
      FLDFLAGS+=("-L$1") ;;
    -rpath*)
      FLDFLAGS+=("-Wl,$1,$2")
      shift ;;
    -dynamic-linker)
      shift ;;
    esac
  done
done < <(eval $CONF_FC$CONF_FFLAGS -v -o $test $test.f 2>&1)

eval printf -v CONF_LDFLAGS '" %q"' "$LDFLAGS" '"${FLDFLAGS[@]}"'

echo "ok" 1>&3


[[ "`eval $CONF_CC --version -c 2>&1`" =~ gcc ]] && CONF_STATIC_GCC="$CONF_STATIC_EXT"

eval printf -v CONF_CFLAGS '" %q"' "\
${CFLAGS-${CONF_DEBUG:--O3 -g} -fomit-frame-pointer -ffast-math -Wall} \
$CONF_STATIC ${CONF_STATIC_GCC:+-static-libgcc}"

eval printf -v CONF_CXXFLAGS '" %q"' "\
${CXXFLAGS-${CONF_DEBUG:--O3 -g} -fomit-frame-pointer -ffast-math -Wall} \
$CONF_STATIC ${CONF_STATIC_GCC:+-static-libstdc++ -static-libgcc}"


## does Fortran append underscores to symbols?

echo -n "does $CONF_FC append underscores... " 1>&3

tee $test-c.c << _EOF_ 1>&2
int uscore_ = 95;
int uscore = 59;
_EOF_

for CONF_BITS in ${CONF_BITS:--m64 -m32} ; do
  eval $CONF_CC$CONF_CFLAGS $CONF_BITS -c $test-c.c 1>&2 || continue
  eval $CONF_FC$CONF_FFLAGS -o $test$CONF_EXE $test.f $test-c.o 1>&2 && break
done

./$test$CONF_EXE
case $? in
95)
  echo "yes" 1>&3
  CONF_NOUNDERSCORE=0 ;;
59)
  echo "no" 1>&3
  CONF_NOUNDERSCORE=1 ;;
*)
  echo "error linking Fortran and C" 1>&3
  exit 1 ;;
esac

CONF_CFLAGS+=" $CONF_BITS"
CONF_CXXFLAGS+=" $CONF_BITS"

test "$CONF_OS$CONF_BITS" = "Linux-m64" && CONF_LIBDIRSUFFIX=64


## does f77 support REAL*16?

echo -n "does $CONF_FC support REAL*$CONF_QUADSIZE... " 1>&3

rm -fr $test*

tee $test.f << _EOF_ 1>&2
	program test
	real*$CONF_QUADSIZE a, b
	a = 2D0**(52/2+2)
	b = a + 1/a
	if( a .eq. b ) call exit(1)
	end
_EOF_

eval $CONF_FC$CONF_FFLAGS -o $test$CONF_EXE $test.f 1>&2

./$test$CONF_EXE 1>&2 && {
  echo "yes" 1>&3
} || {
  echo "no" 1>&3
  CONF_QUADSIZE=0
}


## does Fortran need externals for U77 routines?

echo -n "does $CONF_FC need externals for U77 routines... " 1>&3

rm -fr $test*

tee $test.f << _EOF_ 1>&2
	program test
	implicit none
	print *, iargc(), len_trim("Hi")
	end
_EOF_

eval $CONF_FC$CONF_FFLAGS -c $test.f 1>&2 && {
  echo "no" 1>&3
  CONF_U77EXT=0
} || {
  echo "yes" 1>&3
  CONF_U77EXT=1
}


## are we on a big-endian machine?

echo -n "are we big-endian... " 1>&3

rm -fr $test*

tee $test.c << _EOF_ 1>&2
#include <stdio.h>
int main() {
  union { int i; char c; } u;
  u.i = 1;
  u.c = 0;
  return u.i;
}
_EOF_

$CONF_CC$CONF_CFLAGS -o $test$CONF_EXE $test.c 1>&2

./$test$CONF_EXE && {
  echo "no" 1>&3
  CONF_BIGENDIAN=0
} || {
  echo "yes" 1>&3
  CONF_BIGENDIAN=1
}


## can we do MathLink compilations

echo -n "do we have MathLink... " 1>&3

test "$CONF_QUAD${CONF_OS::3}" == 1CYG && {
  echo "no, no quad precision with Windows MathLink"
  CONF_ML=0
} || {
  rm -fr $test*

  tee $test.tm << _EOF_ 1>&2
:Begin:
:Function: test
:Pattern: Test[i_Integer]
:Arguments: {i}
:ArgumentTypes: {Integer}
:ReturnType: Integer
:End:

#include "mathlink.h"

static int test(const int i) {
  return i + 1;
}

int main(int argc, char **argv) {
  return MLMain(argc, argv);
}
_EOF_

  CONF_MCC="${MCC:-mcc}"

  eval printf -v CONF_MCFLAGS '" %q"' "\
-st ${CONF_BITS/m/b}"

  # this is a workaround for a bug in mcc 11.0:
  ln -s "$CONF_DIR" =.

  for CONF_STDCPP in "" " -stdlib=libstdc++" ; do
    NM="$CONF_NM" DLLTOOL="$CONF_DLLTOOL" \
    CC="$CONF_DIR/src/tools/fcc.in" REALCC="$CONF_CC$CONF_CFLAGS" \
    CXX="$CONF_DIR/src/tools/f++.in" REALCXX="$CONF_CXX$CONF_CXXFLAGS$CONF_STDCPP" \
    PATH="$PATH:$CONF_DIR/src/tools" \
      $CONF_MCC$CONF_MCFLAGS -o $test$CONF_EXE $test.tm$CONF_MCLIBS 1>&2 && break
  done

  test -x $test$CONF_EXE && {
    echo "yes" 1>&3
    CONF_ML=1
  } || {
    echo "no" 1>&3
    CONF_ML=0
  }
}


case "$CONF_OS" in
Linux*)	cores=`grep -c processor /proc/cpuinfo` ;;
Darwin)	[[ `system_profiler SPHardwareDataType` =~ Cores:\ *([0-9]*) ]]
	cores="${BASH_REMATCH[1]}" ;;
esac
test "${cores:-1}" -gt 1 && CONF_PARALLEL="-j $cores"


echo "creating makefile" 1>&3

sed 's/\\,/,/g' > makefile << _EOF_
# --- variables defined by configure ---

SRC = $CONF_DIR/src
QUADSUFFIX = ${CONF_QUAD:+-quad}
PREFIX = $CONF_PREFIX
LIBDIRSUFFIX = $CONF_LIBDIRSUFFIX

EXE = $CONF_EXE
DEF = $CONF_DEF
NOUNDERSCORE = $CONF_NOUNDERSCORE
QUADSIZE = $CONF_QUADSIZE

FC = $CONF_FC
FFLAGS =$CONF_FFLAGS \\
  \$(DEF)QUAD=${CONF_QUAD:-0} \$(DEF)QUADSIZE=\$(QUADSIZE) \\
  \$(DEF)U77EXT=$CONF_U77EXT

CC = $CONF_CC
CFLAGS =$CONF_CFLAGS \\
  -DQUAD=${CONF_QUAD:-0} -DQUADSIZE=\$(QUADSIZE) \\
  -DNOUNDERSCORE=\$(NOUNDERSCORE) \\
  -DBIGENDIAN=$CONF_BIGENDIAN

CXX = $CONF_CXX
CXXFLAGS =$CONF_CXXFLAGS$CONF_STDCPP

ML = $CONF_ML
MCC = $CONF_MCC
MCFLAGS =$CONF_MCFLAGS
MCLIBS =$CONF_MCLIBS

LDFLAGS =$CONF_LDFLAGS

AR = $CONF_AR
RANLIB = $CONF_RANLIB
NM = $CONF_NM
DLLTOOL = $CONF_DLLTOOL

PARALLEL = $CONF_PARALLEL

# --- end defs by configure ---

$(<$CONF_DIR/makefile.in)
_EOF_


cat << _EOF_ 1>&3

now you must run $CONF_MAKE

_EOF_

exit 0