dnl
dnl Check for BSD or POSIZ style global symbol lister, nm.
dnl If found, pac_path_NM_G contains the absolute athname of nm + options
dnl pac_path_NM_G_type will be either POSIX or BSD. NM_G will be
dnl pac_path_NM_G without the absolute path. Preference is BSD style.
dnl
dnl The test checks if nm accepts the known options and also if nm produces
dnl the expected BSD or POSIX output format.
dnl
AC_DEFUN([PAC_PATH_NM_G],[
AC_MSG_CHECKING([for BSD/POSIX style global symbol lister])
AC_LANG_PUSH(C)
AC_PATH_PROGS_FEATURE_CHECK(NM_G, nm, [
# Check if nm accepts -g and BSD or POSIX compatible flag.
# Use the `sed 1q' to avoid HP-UX's unknown option message:
# nm: unknown option "B" ignored
# Tru64's nm complains that /dev/null is an invalid object file
#
# AIX's sed does not accept \+, 1) instead of doing 's|a\+||', do 's|aa*||'
# or 2) instead of 's|A \+B|AB|g', do 's|A *B|AB|g'
# Check if nm accepts -g
case `${ac_path_NM_G} -g /dev/null 2>&1 | sed '1q'` in
*/dev/null* | *'Invalid file or object type'*)
ac_path_NM_G="${ac_path_NM_G} -g"
# Check if nm accepts -B
case `${ac_path_NM_G} -B /dev/null 2>&1 | sed '1q'` in
*/dev/null* | *'Invalid file or object type'*)
AC_COMPILE_IFELSE([
AC_LANG_SOURCE([int iglobal;])
],[
changequote(,)
case `${ac_path_NM_G} -B conftest.$OBJEXT | sed -e 's|[0-9][0-9]* *[A-Z] *iglobal|XXXX|g'` in
*XXXX*)
pac_path_NM_G="${ac_path_NM_G} -B"
pac_path_NM_G_type="BSD"
;;
esac
changequote([,])
])
;;
*)
# Check if nm accepts -P
case `${ac_path_NM_G} -P /dev/null 2>&1 | sed '1q'` in
*/dev/null* | *'Invalid file or object type'*)
AC_COMPILE_IFELSE([
AC_LANG_SOURCE([int iglobal;])
],[
changequote(,)
case `${ac_path_NM_G} -P conftest.$OBJEXT | sed -e 's|iglobal *[A-Z] *[0-9][0-9]*|XXXX|g'` in
*XXXX*)
pac_path_NM_G="${ac_path_NM_G} -P"
pac_path_NM_G_type="POSIX"
;;
esac
changequote([,])
])
;;
esac # Endof case `${ac_path_NM_G} -P
;;
esac # Endof case `${ac_path_NM_G} -B
;;
esac # Endof case `${ac_path_NM_G} -g
if test "X$pac_path_NM_G" != "X" ; then
AC_MSG_RESULT([$pac_path_NM_G_type style,$pac_path_NM_G])
NM_G="`echo $pac_path_NM_G | sed -e 's|^.*nm |nm |g'`"
else
AC_MSG_RESULT(no)
fi
ac_cv_path_NM_G=${ac_path_NM_G}
ac_path_NM_G_found=:
], [AC_MSG_RESULT(no)],
[$PATH$PATH_SEPARATOR/usr/ccs/bin/elf$PATH_SEPARATOR/usr/ccs/bin$PATH_SEPARATOR/usr/ucb$PATH_SEPARATOR/bin])
AC_LANG_POP(C)
]) dnl Endof AC_DEFUN([PAC_PATH_NM_G]
dnl
dnl PAC_C_MULTI_ATTR_ALIAS()
dnl
dnl The checks if multiple __attribute__((alias)) is available
dnl If the multiple __attribute((alias)) support is found,
dnl pac_c_multi_attr_alias=yes is set.
dnl
dnl The default is to do a runtime test. When cross_compiling=yes,
dnl pac_path_NM_G will be used to determine the test result.
dnl If CFLAGS(or CPPFLAGS) contains ATTR_ALIAS_DEBUG, the runtime will print
dnl out addresses of struct(s) for debugging purpose.
dnl
dnl
AC_DEFUN([PAC_C_MULTI_ATTR_ALIAS],[
AC_REQUIRE([PAC_PATH_NM_G])
AC_LANG_PUSH(C)
AC_CHECK_HEADERS([stdio.h])
AC_MSG_CHECKING([for multiple __attribute__((alias)) support])
#Compile the "other" __attribute__ object file.
AC_COMPILE_IFELSE([
AC_LANG_SOURCE([
#if defined(HAVE_STDIO_H) || defined(STDC_HEADERS)
#include <stdio.h>
#endif
struct mpif_cmblk_t_ { int imember; };
typedef struct mpif_cmblk_t_ mpif_cmblk_t;
/* NOT initialize these structure so it appears in BSS or as COMMON symbols */
mpif_cmblk_t mpifcmb;
mpif_cmblk_t MPIFCMB;
/*
Do the test in this file instead in the file
where __attribute__((alias)) is used.
This is needed for pgcc since pgcc seems to
define aliased symbols if they are in the same file.
*/
/*
We can't do the following comparision in one test:
ilogical = (( &mpifcmb == ptr && &MPIFCMB == ptr ) ? TRUE : FALSE) ;
because some compiler, like gcc 4.4.2's -O* optimizes the code
such that the ilogical expression is FALSE. The likely reason is that
mpifcmb and MPIFCMB are defined in the same scope in which C optimizer
may have treated them as different objects (with different addresses),
&mpifcmb != &MPIFCMB, before actually running the test and hence the
illogical expression is assumed to be always FALSE. The solution taken
here is to prevent the optimizer the opportunity to equate &mpifcmb and
&MPIFCMB (in same scope), e.g. using 2 separate tests and combine the
test results in a different scope.
*/
int same_addrs1( void *ptr );
int same_addrs1( void *ptr )
{
#if defined(ATTR_ALIAS_DEBUG)
printf( "others: addr(mpifcmb)=%p, addr(input ptr)=%p\n", &mpifcmb, ptr );
#endif
return ( &mpifcmb == ptr ? 1 : 0 );
}
int same_addrs2( void *ptr );
int same_addrs2( void *ptr )
{
#if defined(ATTR_ALIAS_DEBUG)
printf( "others: addr(MPIFCMB)=%p, addr(input ptr)=%p\n", &MPIFCMB, ptr );
#endif
return ( &MPIFCMB == ptr ? 1 : 0 );
}
])
],[
rm -f pac_conftest_other.$OBJEXT
PAC_RUNLOG([cp conftest.$OBJEXT pac_conftest_other.$OBJEXT])
test -s pac_conftest_other.$OBJEXT && pac_c_attr_alias_other=yes
dnl cp conftest.$ac_ext pac_conftest_other.$ac_ext
dnl echo
dnl echo "pac_conftest_other.$OBJEXT"
dnl nm -P -g pac_conftest_other.$OBJEXT | grep -i "mpifcmb"
],[
pac_c_attr_alias_other=no
]) dnl Endof AC_COMPILE_IFELSE
pac_c_attr_alias_main=no
if test "$pac_c_attr_alias_other" = "yes" ; then
# Push LIBS for later restoration.
PAC_PUSH_FLAG([LIBS])
LIBS="pac_conftest_other.$OBJEXT $LIBS"
# Link the "other" __attribute__ object file.
AC_LINK_IFELSE([
AC_LANG_PROGRAM([
#if defined(HAVE_STDIO_H) || defined(STDC_HEADERS)
#include <stdio.h>
#endif
struct mpif_cmblk_t_ { int imember; };
typedef struct mpif_cmblk_t_ mpif_cmblk_t;
mpif_cmblk_t mpifcmbr = {0};
extern mpif_cmblk_t MPIFCMB __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t mpifcmb __attribute__ ((alias("mpifcmbr")));
extern int same_addrs1( void *ptr );
extern int same_addrs2( void *ptr );
],[
int iaddr = 0;
#if defined(ATTR_ALIAS_DEBUG)
printf( "main: addr(mpifcmbr) = %p\n", &mpifcmbr );
printf( "main: addr(mpifcmb) = %p\n", &mpifcmb );
printf( "main: addr(MPIFCMB) = %p\n", &MPIFCMB );
#endif
iaddr = same_addrs1( &mpifcmbr ) && same_addrs2( &mpifcmbr );
FILE *file = fopen( "pac_conftestval", "w" );
if (!file) return 1;
fprintf( file, "%d\n", iaddr );
])
],[
rm -f pac_conftest_main$EXEEXT
PAC_RUNLOG([cp conftest$EXEEXT pac_conftest_main$EXEEXT])
test -x pac_conftest_main$EXEEXT && pac_c_attr_alias_main=yes
dnl cp conftest.$ac_ext pac_conftest_main.$ac_ext
dnl echo
dnl echo "pac_conftest_main$EXEEXT"
dnl nm -P -g pac_conftest_main$EXEEXT | grep -i "mpifcmb"
],[
pac_c_attr_alias_main=no
dnl cp conftest.$ac_ext pac_conftest_main.$ac_ext
]) dnl Endof AC_LINK_IFELSE
# Restore the previously pushed LIBS
PAC_POP_FLAG([LIBS])
rm -f pac_conftest_other.$OBJEXT
fi dnl Endof if test "$pac_c_attr_alias_other" = "yes"
if test "$pac_c_attr_alias_main" = "yes" ; then
if test "$cross_compiling" = "yes" ; then
changequote(,)
# echo "PAC CROSS-COMPILING" dnl
# POSIX NM = nm -P format dnl
if test "$pac_path_NM_G_type" = "POSIX" ; then
addrs=`${pac_path_NM_G} ./pac_conftest_main$EXEEXT | grep -i mpifcmb | sed -e 's% *[a-zA-Z][a-zA-Z]* *[a-zA-Z] *\([0-9abcdef][0-9abcdef]*\).*%\1%g'`
fi
# BSD NM = nm -B format dnl
if test "$pac_path_NM_G_type" = "BSD" ; then
addrs=`${pac_path_NM_G} -g ./pac_conftest_main$EXEEXT | grep -i mpifcmb | sed -e "s% *\([0-9abcdef][0-9abcdef]*\) *[a-zA-Z] *[a-zA-Z][a-zA-A]*.*%\1%g"`
fi
changequote([,])
cmp_addr=""
diff_addrs=no
for addr in ${addrs} ; do
if test "X${cmp_addr}" != "X" ; then
if test "${cmp_addr}" != "${addr}" ; then
diff_addrs=yes
break
fi
else
cmp_addr=${addr}
fi
done
if test "$diff_addrs" != "yes" ; then
dnl echo "Same addresses. Multiple aliases support"
AC_MSG_RESULT([${NM_G} says yes])
pac_c_multi_attr_alias=yes
else
dnl echo "Different addresses. No multiple aliases support."
AC_MSG_RESULT([${NM_G} says no])
pac_c_multi_attr_alias=no
fi
else # if test "$cross_compiling" != "yes"
rm -f pac_conftestval
ac_try="./pac_conftest_main$EXEEXT"
if AC_TRY_EVAL(ac_try) ; then
pac_c_attr_alias_val=0
if test -s pac_conftestval ; then
eval pac_c_attr_alias_val=`cat pac_conftestval`
fi
if test "$pac_c_attr_alias_val" -eq 1 ; then
AC_MSG_RESULT(yes)
pac_c_multi_attr_alias=yes
else
AC_MSG_RESULT(no)
pac_c_multi_attr_alias=no
fi
rm -f pac_conftestval
fi
fi
dnl Endof if test "$cross_compiling" = "yes"
rm -f pac_conftest_main$EXEEXT
else
AC_MSG_RESULT(no! link failure)
pac_c_multi_attr_alias=no
fi dnl Endof if test "$pac_c_attr_alias_main" = "yes"
AC_LANG_POP(C)
]) dnl Endof AC_DEFUN([PAC_C_MULTI_ATTR_ALIAS]
dnl
dnl PAC_C_ATTR_ALIGNED()
dnl
dnl Check if __attribute__((aligned)) support is there.
dnl If so, set pac_c_attr_aligned=yes.
dnl
dnl Do a link test instead of compile test to check if the linker
dnl would emit an error.
dnl
AC_DEFUN([PAC_C_ATTR_ALIGNED],[
AC_LANG_PUSH(C)
AC_MSG_CHECKING([for __attribute__((aligned)) support])
#Link the __attribute__ object file.
AC_LINK_IFELSE([
AC_LANG_PROGRAM([
struct mpif_cmblk_t_ { int imembers[5]; };
typedef struct mpif_cmblk_t_ mpif_cmblk_t;
mpif_cmblk_t mpifcmbr __attribute__((aligned)) = {0};
],[])
],[pac_c_attr_aligned=yes], [pac_c_attr_aligned=no])
AC_MSG_RESULT([$pac_c_attr_aligned])
AC_LANG_POP(C)
])
dnl
dnl PAC_F2C_ATTR_ALIGNED_SIZE(ARRAY_SIZE, [OUTPUT_VAR], [MIN_ALIGNMENT])
dnl
dnl ARRAY_SIZE : Size of the integer array within the fortran commmon block.
dnl OUTPUT_VAR : Optional variable to be set.
dnl if test succeeds, set OUTPUT_VAR=$pac_f2c_attr_aligned_str.
dnl if test fails, set OUTPUT_VAR="unknown".
dnl MIN_ALIGNMENT : Optional value.
dnl Minimum alignment size to be used in OUTPUT_VAR.
dnl pac_f2c_attr_aligned_str won't be modified.
dnl
dnl "pac_f2c_attr_aligned_str" will be set with
dnl 1) __attribute__((aligned(ALIGNMENT_SIZE))),
dnl 2) __attribute__((aligned)).
dnl 3) "", i.e. empty string.
dnl
dnl 2) means the test can't find a good alignment value, but both the Fortran
dnl and C compilers are OK with "aligned" which in principle means the C
dnl compiler will pick the maximum useful alignment supported by the
dnl architecture.
dnl 3) means that the test has failed to find the alignment.
dnl
AC_DEFUN([PAC_F2C_ATTR_ALIGNED_SIZE],[
cmblksize=$1
AC_MSG_CHECKING([the minimum alignment of Fortran common block of $cmblksize integers])
dnl To find the minmium alignment of Fortran common block (of integer array)
dnl as seen by C object file, C object files of various (typical) alignments
dnl are linked to the Fortran code using the common block of integer array.
#
dnl Since the incorrect alignment results only a warning messages from the
dnl fortran compiler(or linker), so we use "diff" to compare the fortran
dnl compiler/linker output. We cannot use AC_LANG_WERROR,
dnl i.e. ac_fc_werror_flag=yes, because compiler like pgf77 at version 10.x)
dnl has non-zero stderr output if a fortran program is used in the linking.
dnl The stderr contains the name of fortran program even if the linking is
dnl successful. We could avoid the non-zero stderr output in pgf77 by
dnl compiling everthing into object files and linking all the object files
dnl with pgf77. Doing that would need us to use AC_TRY_EVAL instead of
dnl AC_LINK_IFELSE, so "diff" approach is used instead.
#
dnl Using diff of compiler(linker) output requires a reference output file
dnl as the base of diff. The process of creating this reference output file
dnl has to be exactly the same as the testing process, because pgf77 has
dnl the following weird behavour
dnl pgf77 -o ftest ftest.f => when $?=0 with zero stderr output
dnl pgf77 -o ftest ftest.f dummy.o => when $?=0 with non-zero stderr output.
dnl stderr has "ftest.f:".
dnl
# First create a fortran CONFTEST which will be used repeatedly.
AC_LANG_PUSH([Fortran]) dnl AC_LANG_PUSH([Fortran 77])
AC_LANG_CONFTEST([
AC_LANG_SOURCE([
program fconftest
integer isize
parameter (isize=$cmblksize)
integer status_array(isize)
common /mpifcmb/ status_array
save /mpifcmb/
end
])
])
AC_LANG_POP([Fortran]) dnl AC_LANG_POP([Fortran 77])
dnl
dnl
dnl
# Compile a C dummy.$OBJEXT and link with Fortran test program to create
# a reference linker output file, pac_align0.log, as the base of "diff".
AC_LANG_PUSH([C])
AC_COMPILE_IFELSE([AC_LANG_SOURCE([])],[
cp conftest.$ac_ext pac_conftest.c
PAC_RUNLOG([mv conftest.$OBJEXT pac_conftest.$OBJEXT])
PAC_PUSH_FLAG([LIBS])
LIBS="pac_conftest.$OBJEXT $LIBS"
AC_LANG_PUSH([Fortran]) dnl AC_LANG_PUSH([Fortran 77])
PAC_PUSH_FLAG([ac_link])
ac_link="`echo $ac_link | sed -e 's|>.*$|> $pac_logfile 2>\&1|g'`"
pac_logfile="pac_align0.log"
rm -f $pac_logfile
AC_LINK_IFELSE([],[
pac_f2c_alignedn_diffbase=yes
],[
pac_f2c_alignedn_diffbase=no
])
# Be sure NOT to remove the conftest.f which is still needed for later use.
# rm -f conftest.$ac_ext
# Restore everything in autoconf that has been overwritten
PAC_POP_FLAG([ac_link])
# restore previously pushed LIBS
PAC_POP_FLAG([LIBS])
AC_LANG_POP([Fortran]) dnl AC_LANG_POP([Fortran 77])
],[
pac_f2c_alignedn_diffbase=no
])
AC_LANG_POP([C])
dnl
dnl
if test "$pac_f2c_alignedn_diffbase" = "yes" ; then
# Initialize pac_result_str to empty string since part of the test
# depends on pac_result_str is empty or non-empty string.
pac_result_str=""
# Initialize pac_f2c_attr_aligned_str to empty string and
# it will remain as empty string if the following test fails.
pac_f2c_attr_aligned_str=""
for asize in 4 8 16 32 64 128 max ; do
if test "$asize" != "max" ; then
pac_attr_aligned_str="__attribute__((aligned($asize)))"
else
pac_attr_aligned_str="__attribute__((aligned))"
fi
AC_LANG_PUSH([C])
#Compile the __attribute__ object file.
AC_COMPILE_IFELSE([
AC_LANG_SOURCE([
changequote(,)
struct mpif_cmblk_t_ { $MPI_FINT imembers[$cmblksize]; };
changequote([,])
typedef struct mpif_cmblk_t_ mpif_cmblk_t;
mpif_cmblk_t mpifcmbr $pac_attr_aligned_str = {0};
extern mpif_cmblk_t _CMPIFCMB __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t MPIFCMB __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t MPIFCMB_ __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t _Cmpifcmb __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t mpifcmb __attribute__ ((alias("mpifcmbr")));
extern mpif_cmblk_t mpifcmb_ __attribute__ ((alias("mpifcmbr")));
])
],[
cp conftest.$ac_ext pac_conftest.c
PAC_RUNLOG([mv conftest.$OBJEXT pac_conftest.$OBJEXT])
PAC_PUSH_FLAG([LIBS])
LIBS="pac_conftest.$OBJEXT $LIBS"
AC_LANG_PUSH([Fortran]) dnl AC_LANG_PUSH([Fortran 77])
PAC_PUSH_FLAG([ac_link])
ac_link="`echo $ac_link | sed -e 's|>.*$|> $pac_logfile 2>\&1|g'`"
pac_logfile="pac_align1.log"
rm -f $pac_logfile
# Use conftest.f created in CONFTEST.
AC_LINK_IFELSE([],[
PAC_RUNLOG_IFELSE([diff -b pac_align0.log pac_align1.log],[
pac_attr_alignedn=yes
],[
pac_attr_alignedn=no
cat $pac_logfile >&AS_MESSAGE_LOG_FD
echo "failed C program was:" >&AS_MESSAGE_LOG_FD
cat pac_conftest.c >&AS_MESSAGE_LOG_FD
echo "failed Fortran program was:" >&AS_MESSAGE_LOG_FD
cat conftest.$ac_ext >&AS_MESSAGE_LOG_FD
])
],[
pac_attr_alignedn=no
])
# Restore everything in autoconf that has been overwritten
PAC_POP_FLAG([ac_link])
# restore previously pushed LIBS
PAC_POP_FLAG([LIBS])
AC_LANG_POP([Fortran]) dnl AC_LANG_POP([Fortran 77])
# remove previously generated object file and C file.
rm -f pac_conftest.$OBJEXT pac_conftest.c
rm -f $pac_logfile
if test "$pac_attr_alignedn" = yes ; then
ifelse([$3],[],[
pac_result_str="$asize"
pac_f2c_attr_aligned_str="$pac_attr_aligned_str"
break
],[
if test "$asize" != "max" -a "$asize" -lt "$3" ; then
if test "X$pac_result_str" = "X" ; then
pac_result_str="$asize"
pac_f2c_attr_aligned_str="$pac_attr_aligned_str"
fi
continue
else
pac_f2c_attr_aligned_str="$pac_attr_aligned_str"
if test "X$pac_result_str" != "X" ; then
pac_result_str="$pac_result_str, too small! reset to $asize"
else
pac_result_str="$asize"
fi
break
fi
])
fi
], [
pac_attr_alignedn=no
])
AC_LANG_POP([C])
done
ifelse([$2],[],[],[$2="$pac_f2c_attr_aligned_str"])
else
pac_result_str=""
# Since the test fails, set pac_f2c_attr_aligned_str to empty string.
pac_f2c_attr_aligned_str=""
fi
if test "X$pac_result_str" != "X" ; then
AC_MSG_RESULT([$pac_result_str])
else
AC_MSG_RESULT([unknown])
fi
rm -f pac_align0.log
])
dnl