1m4_include(../config/acx.m4)
2m4_include(../config/no-executables.m4)
3m4_include(../config/math.m4)
4
5dnl Check that we have a working GNU Fortran compiler
6AC_DEFUN([LIBGFOR_WORKING_GFORTRAN], [
7AC_MSG_CHECKING([whether the GNU Fortran compiler is working])
8AC_LANG_PUSH([Fortran])
9AC_COMPILE_IFELSE([[
10      program foo
11      real, parameter :: bar = sin (12.34 / 2.5)
12      end program foo]],
13    [AC_MSG_RESULT([yes])],
14    [AC_MSG_RESULT([no])
15     AC_MSG_ERROR([GNU Fortran is not working; please report a bug in http://gcc.gnu.org/bugzilla, attaching $PWD/config.log])
16    ])
17AC_LANG_POP([Fortran])
18])
19
20
21sinclude(../libtool.m4)
22dnl The lines below arrange for aclocal not to bring an installed
23dnl libtool.m4 into aclocal.m4, while still arranging for automake to
24dnl add a definition of LIBTOOL to Makefile.in.
25ifelse(,,,[AC_SUBST(LIBTOOL)
26AC_DEFUN([AM_PROG_LIBTOOL])
27AC_DEFUN([AC_LIBTOOL_DLOPEN])
28AC_DEFUN([AC_PROG_LD])
29])
30
31dnl Check whether the target supports hidden visibility.
32AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY], [
33  AC_CACHE_CHECK([whether the target supports hidden visibility],
34		 libgfor_cv_have_attribute_visibility, [
35  save_CFLAGS="$CFLAGS"
36  CFLAGS="$CFLAGS -Werror"
37  AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[void __attribute__((visibility("hidden"))) foo(void) { }]], [])],
38		    libgfor_cv_have_attribute_visibility=yes,
39		    libgfor_cv_have_attribute_visibility=no)
40  CFLAGS="$save_CFLAGS"])
41  if test $libgfor_cv_have_attribute_visibility = yes; then
42    AC_DEFINE(HAVE_ATTRIBUTE_VISIBILITY, 1,
43      [Define to 1 if the target supports __attribute__((visibility(...))).])
44  fi])
45
46dnl Check whether the target supports dllexport
47AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT], [
48  AC_CACHE_CHECK([whether the target supports dllexport],
49		 libgfor_cv_have_attribute_dllexport, [
50  save_CFLAGS="$CFLAGS"
51  CFLAGS="$CFLAGS -Werror"
52  AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[void __attribute__((dllexport)) foo(void) { }]], [])],
53		    libgfor_cv_have_attribute_dllexport=yes,
54		    libgfor_cv_have_attribute_dllexport=no)
55  CFLAGS="$save_CFLAGS"])
56  if test $libgfor_cv_have_attribute_dllexport = yes; then
57    AC_DEFINE(HAVE_ATTRIBUTE_DLLEXPORT, 1,
58      [Define to 1 if the target supports __attribute__((dllexport)).])
59  fi])
60
61dnl Check whether the target supports symbol aliases.
62AC_DEFUN([LIBGFOR_CHECK_ATTRIBUTE_ALIAS], [
63  AC_CACHE_CHECK([whether the target supports symbol aliases],
64		 libgfor_cv_have_attribute_alias, [
65  AC_LINK_IFELSE([AC_LANG_PROGRAM([[
66void foo(void) { }
67extern void bar(void) __attribute__((alias("foo")));]],
68    [[bar();]])], libgfor_cv_have_attribute_alias=yes, libgfor_cv_have_attribute_alias=no)])
69  if test $libgfor_cv_have_attribute_alias = yes; then
70    AC_DEFINE(HAVE_ATTRIBUTE_ALIAS, 1,
71      [Define to 1 if the target supports __attribute__((alias(...))).])
72  fi])
73
74dnl Check whether the target supports __sync_fetch_and_add.
75AC_DEFUN([LIBGFOR_CHECK_SYNC_FETCH_AND_ADD], [
76  AC_CACHE_CHECK([whether the target supports __sync_fetch_and_add],
77		 libgfor_cv_have_sync_fetch_and_add, [
78  AC_LINK_IFELSE([AC_LANG_PROGRAM([[int foovar = 0;]], [[
79if (foovar <= 0) return __sync_fetch_and_add (&foovar, 1);
80if (foovar > 10) return __sync_add_and_fetch (&foovar, -1);]])],
81	      libgfor_cv_have_sync_fetch_and_add=yes, libgfor_cv_have_sync_fetch_and_add=no)])
82  if test $libgfor_cv_have_sync_fetch_and_add = yes; then
83    AC_DEFINE(HAVE_SYNC_FETCH_AND_ADD, 1,
84	      [Define to 1 if the target supports __sync_fetch_and_add])
85  fi])
86
87dnl Check for pragma weak.
88AC_DEFUN([LIBGFOR_GTHREAD_WEAK], [
89  AC_CACHE_CHECK([whether pragma weak works],
90		 libgfor_cv_have_pragma_weak, [
91  gfor_save_CFLAGS="$CFLAGS"
92  CFLAGS="$CFLAGS -Wunknown-pragmas"
93  AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[
94void foo (void);
95#pragma weak foo
96]], [[if (foo) foo ();]])],
97		    libgfor_cv_have_pragma_weak=yes, libgfor_cv_have_pragma_weak=no)])
98  if test $libgfor_cv_have_pragma_weak = yes; then
99    AC_DEFINE(SUPPORTS_WEAK, 1,
100	      [Define to 1 if the target supports #pragma weak])
101  fi
102  case "$host" in
103    *-*-darwin* | *-*-hpux* | *-*-cygwin* | *-*-mingw* )
104      AC_DEFINE(GTHREAD_USE_WEAK, 0,
105		[Define to 0 if the target shouldn't use #pragma weak])
106      ;;
107  esac])
108
109dnl Check whether target can unlink a file still open.
110AC_DEFUN([LIBGFOR_CHECK_UNLINK_OPEN_FILE], [
111  AC_CACHE_CHECK([whether the target can unlink an open file],
112                  libgfor_cv_have_unlink_open_file, [
113  AC_RUN_IFELSE([AC_LANG_SOURCE([[
114#include <errno.h>
115#include <fcntl.h>
116#include <unistd.h>
117#include <sys/stat.h>
118
119int main ()
120{
121  int fd;
122
123  fd = open ("testfile", O_RDWR | O_CREAT, S_IWUSR | S_IRUSR);
124  if (fd <= 0)
125    return 0;
126  if (unlink ("testfile") == -1)
127    return 1;
128  write (fd, "This is a test\n", 15);
129  close (fd);
130
131  if (open ("testfile", O_RDONLY) == -1 && errno == ENOENT)
132    return 0;
133  else
134    return 1;
135}]])], libgfor_cv_have_unlink_open_file=yes, libgfor_cv_have_unlink_open_file=no, [
136case "${target}" in
137  *mingw*) libgfor_cv_have_unlink_open_file=no ;;
138  *) libgfor_cv_have_unlink_open_file=yes;;
139esac])])
140if test x"$libgfor_cv_have_unlink_open_file" = xyes; then
141  AC_DEFINE(HAVE_UNLINK_OPEN_FILE, 1, [Define if target can unlink open files.])
142fi])
143
144dnl Check whether CRLF is the line terminator
145AC_DEFUN([LIBGFOR_CHECK_CRLF], [
146  AC_CACHE_CHECK([whether the target has CRLF as line terminator],
147                  libgfor_cv_have_crlf, [
148  AC_RUN_IFELSE([AC_LANG_SOURCE([[
149/* This test program should exit with status 0 if system uses a CRLF as
150   line terminator, and status 1 otherwise.
151   Since it is used to check for mingw systems, and should return 0 in any
152   other case, in case of a failure we will not use CRLF.  */
153#include <sys/stat.h>
154#include <stdlib.h>
155#include <fcntl.h>
156#include <stdio.h>
157
158int main ()
159{
160#ifndef O_BINARY
161  exit(1);
162#else
163  int fd, bytes;
164  char buff[5];
165
166  fd = open ("foo", O_WRONLY | O_CREAT | O_TRUNC, S_IRWXU);
167  if (fd < 0)
168    exit(1);
169  if (write (fd, "\n", 1) < 0)
170    perror ("write");
171
172  close (fd);
173
174  if ((fd = open ("foo", O_RDONLY | O_BINARY, S_IRWXU)) < 0)
175    exit(1);
176  bytes = read (fd, buff, 5);
177  if (bytes == 2 && buff[0] == '\r' && buff[1] == '\n')
178    exit(0);
179  else
180    exit(1);
181#endif
182}]])], libgfor_cv_have_crlf=yes, libgfor_cv_have_crlf=no, [
183case "${target}" in
184  *mingw*) libgfor_cv_have_crlf=yes ;;
185  *) libgfor_cv_have_crlf=no;;
186esac])])
187if test x"$libgfor_cv_have_crlf" = xyes; then
188  AC_DEFINE(HAVE_CRLF, 1, [Define if CRLF is line terminator.])
189fi])
190
191dnl Check whether the st_ino and st_dev stat fields taken together uniquely
192dnl identify the file within the system. This is should be true for POSIX
193dnl systems; it is known to be false on mingw32.
194AC_DEFUN([LIBGFOR_CHECK_WORKING_STAT], [
195  AC_CACHE_CHECK([whether the target stat is reliable],
196                  libgfor_cv_have_working_stat, [
197  AC_RUN_IFELSE([AC_LANG_SOURCE([[
198#include <stdio.h>
199#include <sys/types.h>
200#include <sys/stat.h>
201#include <unistd.h>
202
203int main ()
204{
205  FILE *f, *g;
206  struct stat st1, st2;
207
208  f = fopen ("foo", "w");
209  g = fopen ("bar", "w");
210  if (stat ("foo", &st1) != 0 || stat ("bar", &st2))
211    return 1;
212  if (st1.st_dev == st2.st_dev && st1.st_ino == st2.st_ino)
213    return 1;
214  fclose(f);
215  fclose(g);
216  return 0;
217}]])], libgfor_cv_have_working_stat=yes, libgfor_cv_have_working_stat=no, [
218case "${target}" in
219  *mingw*) libgfor_cv_have_working_stat=no ;;
220  *) libgfor_cv_have_working_stat=yes;;
221esac])])
222if test x"$libgfor_cv_have_working_stat" = xyes; then
223  AC_DEFINE(HAVE_WORKING_STAT, 1, [Define if target has a reliable stat.])
224fi])
225
226dnl Checks for fpsetmask function.
227AC_DEFUN([LIBGFOR_CHECK_FPSETMASK], [
228  AC_CACHE_CHECK([whether fpsetmask is present], libgfor_cv_have_fpsetmask, [
229    AC_LINK_IFELSE([AC_LANG_PROGRAM([[
230#if HAVE_FLOATINGPOINT_H
231# include <floatingpoint.h>
232#endif /* HAVE_FLOATINGPOINT_H */
233#if HAVE_IEEEFP_H
234# include <ieeefp.h>
235#endif /* HAVE_IEEEFP_H */]],[[fpsetmask(0);]])],
236    eval "libgfor_cv_have_fpsetmask=yes", eval "libgfor_cv_have_fpsetmask=no")
237  ])
238  if test x"$libgfor_cv_have_fpsetmask" = xyes; then
239    have_fpsetmask=yes
240    AC_DEFINE(HAVE_FPSETMASK, 1, [Define if you have fpsetmask.])
241  fi
242])
243
244dnl Check whether we have a mingw that provides a __mingw_snprintf function
245AC_DEFUN([LIBGFOR_CHECK_MINGW_SNPRINTF], [
246  AC_CACHE_CHECK([whether __mingw_snprintf is present], libgfor_cv_have_mingw_snprintf, [
247    AC_LINK_IFELSE([AC_LANG_PROGRAM([[
248#include <stdio.h>
249extern int __mingw_snprintf (char *, size_t, const char *, ...);
250]],[[
251__mingw_snprintf (NULL, 0, "%d\n", 1);
252]])],
253    eval "libgfor_cv_have_mingw_snprintf=yes", eval "libgfor_cv_have_mingw_snprintf=no")
254  ])
255  if test x"$libgfor_cv_have_mingw_snprintf" = xyes; then
256    AC_DEFINE(HAVE_MINGW_SNPRINTF, 1, [Define if you have __mingw_snprintf.])
257  fi
258])
259
260dnl Check whether we have a __float128 type
261AC_DEFUN([LIBGFOR_CHECK_FLOAT128], [
262  LIBQUADSPEC=
263
264  if test "x$enable_libquadmath_support" != xno; then
265
266  AC_CACHE_CHECK([whether we have a usable __float128 type],
267                 libgfor_cv_have_float128, [
268   GCC_TRY_COMPILE_OR_LINK([
269    typedef _Complex float __attribute__((mode(TC))) __complex128;
270
271    __float128 foo (__float128 x)
272    {
273
274     __complex128 z1, z2;
275
276     z1 = x;
277     z2 = x / 7.Q;
278     z2 /= z1;
279
280     return (__float128) z2;
281    }
282
283    __float128 bar (__float128 x)
284    {
285      return x * __builtin_huge_valq ();
286    }
287  ],[
288    foo (1.2Q);
289    bar (1.2Q);
290  ],[
291    libgfor_cv_have_float128=yes
292  ],[
293    libgfor_cv_have_float128=no
294])])
295
296  if test "x$libgfor_cv_have_float128" = xyes; then
297    AC_DEFINE(HAVE_FLOAT128, 1, [Define if have a usable __float128 type.])
298
299    dnl Check whether -Wl,--as-needed is supported
300    dnl
301    dnl Turn warnings into error to avoid testsuite breakage.  So enable
302    dnl AC_LANG_WERROR, but there's currently (autoconf 2.64) no way to turn
303    dnl it off again.  As a workaround, save and restore werror flag like
304    dnl AC_PATH_XTRA.
305    dnl Cf. http://gcc.gnu.org/ml/gcc-patches/2010-05/msg01889.html
306    ac_xsave_[]_AC_LANG_ABBREV[]_werror_flag=$ac_[]_AC_LANG_ABBREV[]_werror_flag
307    AC_CACHE_CHECK([whether --as-needed works],
308      [libgfor_cv_have_as_needed],
309      [
310      save_LDFLAGS="$LDFLAGS"
311      LDFLAGS="$LDFLAGS -Wl,--as-needed -lm -Wl,--no-as-needed"
312      libgfor_cv_have_as_needed=no
313      AC_LANG_WERROR
314      AC_LINK_IFELSE([AC_LANG_PROGRAM([])],
315		     [libgfor_cv_have_as_needed=yes],
316		     [libgfor_cv_have_as_needed=no])
317      LDFLAGS="$save_LDFLAGS"
318      ac_[]_AC_LANG_ABBREV[]_werror_flag=$ac_xsave_[]_AC_LANG_ABBREV[]_werror_flag
319    ])
320
321    dnl For static libgfortran linkage, depend on libquadmath only if needed.
322    if test "x$libgfor_cv_have_as_needed" = xyes; then
323      LIBQUADSPEC="%{static-libgfortran:--as-needed} -lquadmath %{static-libgfortran:--no-as-needed}"
324    else
325      LIBQUADSPEC="-lquadmath"
326    fi
327    if test -f ../libquadmath/libquadmath.la; then
328      LIBQUADLIB=../libquadmath/libquadmath.la
329      LIBQUADLIB_DEP=../libquadmath/libquadmath.la
330      LIBQUADINCLUDE='-I$(srcdir)/../libquadmath'
331    else
332      LIBQUADLIB="-lquadmath"
333      LIBQUADLIB_DEP=
334      LIBQUADINCLUDE=
335    fi
336  fi
337  else
338    # for --disable-quadmath
339    LIBQUADLIB=
340    LIBQUADLIB_DEP=
341    LIBQUADINCLUDE=
342  fi
343
344  dnl For the spec file
345  AC_SUBST(LIBQUADSPEC)
346  AC_SUBST(LIBQUADLIB)
347  AC_SUBST(LIBQUADLIB_DEP)
348  AC_SUBST(LIBQUADINCLUDE)
349
350  dnl We need a conditional for the Makefile
351  AM_CONDITIONAL(LIBGFOR_BUILD_QUAD, [test "x$libgfor_cv_have_float128" = xyes])
352])
353
354
355dnl Check whether we have strerror_r
356AC_DEFUN([LIBGFOR_CHECK_STRERROR_R], [
357  dnl Check for three-argument POSIX version of strerror_r
358  ac_save_CFLAGS="$CFLAGS"
359  CFLAGS="-Wimplicit-function-declaration -Werror"
360  AC_TRY_COMPILE([#define _GNU_SOURCE 1
361	     	  #include <string.h>
362		  #include <locale.h>],
363		  [char s[128]; strerror_r(5, s, 128);],
364		  AC_DEFINE(HAVE_STRERROR_R, 1,
365		  [Define if strerror_r is available in <string.h>.]),)
366  CFLAGS="$ac_save_CFLAGS"
367
368  dnl Check for two-argument version of strerror_r (e.g. for VxWorks)
369  ac_save_CFLAGS="$CFLAGS"
370  CFLAGS="-Wimplicit-function-declaration -Werror"
371  AC_TRY_COMPILE([#define _GNU_SOURCE 1
372	     	  #include <string.h>
373		  #include <locale.h>],
374		  [char s[128]; strerror_r(5, s);],
375		  AC_DEFINE(HAVE_STRERROR_R_2ARGS, 1,
376		  [Define if strerror_r takes two arguments and is available in <string.h>.]),)
377  CFLAGS="$ac_save_CFLAGS"
378])
379