cflags.SH

   1 #!/bin/sh
   2
   3 # Generate the cflags script, which is used to determine what cflags
   4 # to pass to the compiler.
   5 # We create a temporary test c program and repeatedly compile it with
   6 # various candidate flags, and from the compiler output, determine what
   7 # flags are supported.
   8 # From this we initialise the following variables in the cflags script:
   9 #
  10 #   $warn
  11 #   $stdflags
  12 #   $extra
  13 #   $_exe
  14
  15 case $PERL_CONFIG_SH in
  16 '')
  17         if test -f config.sh; then TOP=.;
  18         elif test -f ../config.sh; then TOP=..;
  19         elif test -f ../../config.sh; then TOP=../..;
  20         elif test -f ../../../config.sh; then TOP=../../..;
  21         elif test -f ../../../../config.sh; then TOP=../../../..;
  22         else
  23                 echo "Can't find config.sh."; exit 1
  24         fi
  25         . $TOP/config.sh
  26         ;;
  27 esac
  28 # This forces SH files to create target in same directory as SH file.
  29 # This is so that make depend always knows where to find SH derivatives.
  30 case "$0" in
  31 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
  32 esac
  33
  34 if test -f config_h.SH -a ! -f config.h; then
  35     . ./config_h.SH
  36     CONFIG_H=already-done
  37 fi
  38
  39 warn=''
  40
  41 # Add -Wall for the core modules iff gcc and not already -Wall
  42 case "$gccversion" in
  43 '') ;;
  44 Intel*) ;; # The Intel C++ plays gcc on TV but is not really it.
  45 *)  case "$ccflags" in
  46     *-Wall*) ;;
  47     *) warn="$warn -Wall" ;;
  48     esac
  49     ;;
  50 esac
  51
  52 # Create a test source file for testing what options can be fed to
  53 # gcc in this system; include a selection of most common and commonly
  54 # hairy include files.
  55
  56 cat >_cflags.c <<__EOT__
  57 #include "EXTERN.h"
  58 #include "perl.h"
  59 /* The stdio.h, errno.h, and setjmp.h should be there in any ANSI C89. */
  60 #include <stdio.h>
  61 #include <errno.h>
  62 #include <setjmp.h>
  63 /* Just in case the inclusion of perl.h did not
  64  * pull in enough system headers, let's try again. */
  65 #ifdef I_STDLIB
  66 #include <stdlib.h>
  67 #endif
  68 #ifdef I_STDDEF
  69 #include <stddef.h>
  70 #endif
  71 #ifdef I_STDARG
  72 #include <stdarg.h>
  73 #endif
  74 #ifdef I_LIMITS
  75 #include <limits.h>
  76 #endif
  77 #ifdef I_DIRENT
  78 #include <dirent.h>
  79 #endif
  80 #ifdef I_UNISTD
  81 #include <unistd.h>
  82 #endif
  83 #ifdef I_SYS_TYPES
  84 #include <sys/types.h>
  85 #endif
  86 #ifdef I_SYS_PARAM
  87 #include <sys/param.h>
  88 #endif
  89 #ifdef I_SYS_RESOURCE
  90 #include <sys/resource.h>
  91 #endif
  92 #ifdef I_SYS_SELECT
  93 #include <sys/select.h>
  94 #endif
  95 #if defined(HAS_SOCKET) && !defined(VMS) && !defined(WIN32) /* See perl.h. */
  96 #include <sys/socket.h>
  97 #endif
  98 #ifdef I_SYS_STAT
  99 #include <sys/stat.h>
 100 #endif
 101 #ifdef I_SYS_TIME
 102 #include <sys/time.h>
 103 #endif
 104 #ifdef I_SYS_TIMES
 105 #include <sys/times.h>
 106 #endif
 107 #ifdef I_SYS_WAIT
 108 #include <sys/wait.h>
 109 #endif
 110 /* The gcc -ansi can cause a lot of noise in Solaris because of:
 111  /usr/include/sys/resource.h:148: warning: 'struct rlimit64' declared inside parameter list
 112  */
 113 int main(int argc, char *argv[]) {
 114
 115 /* Add here test code found to be problematic in some gcc platform. */
 116
 117 /* Off_t/off_t is a struct in Solaris with largefiles, and with gcc -ansi
 118  * that struct cannot be compared in some gcc releases with a flat
 119  * integer, such as a STRLEN. */
 120
 121   IV iv;
 122   Off_t t0a = 2;
 123   STRLEN t0b = 3;
 124   int t0c = t0a == t0b;
 125
 126 /* In FreeBSD 6.2 (and probably other releases too), with -Duse64bitint,
 127    perl will use atoll(3).  However, that declaration is hidden in <stdlib.h>
 128    if we force the compiler to use -std=c89 mode.
 129 */
 130   iv = Atol("42");
 131
 132   return (!t0c && (iv == 42)) ? 0 : -1; /* Try to avoid 'unused' warnings. */
 133 }
 134 __EOT__
 135
 136 stdflags=''
 137
 138 # Further gcc warning options.  Build up a list of options that work.
 139 # Note that some problems may only show up with combinations of options,
 140 # e.g. a warning might show up only with -Wall -ansi, not with either
 141 # one individually.
 142 # TODO:  Ponder whether to migrate this back to Configure so hints files can
 143 # tweak it.  Also, be paranoid about whether results we've deduced in Configure
 144 # (especially about things like long long, which are not in C89) will still be
 145 # valid if we now add flags like -std=c89.
 146
 147 case "$gccversion" in
 148 '') ;;
 149 [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
 150 Intel*) ;; # # Is that you, Intel C++?
 151 *)  for opt in -ansi -std=c89 -W -Wextra -Wdeclaration-after-statement \
 152                 -Wendif-labels -Wc++-compat -Wwrite-strings
 153     do
 154        case " $ccflags " in
 155        *" $opt "*) ;; # Skip if already there.
 156        *) rm -f _cflags$_exe
 157           case "`$cc -DPERL_NO_INLINE_FUNCTIONS $ccflags $warn $stdflags $opt _cflags.c -o _cflags$_exe 2>&1`" in
 158           *"unrecognized"*) ;;
 159           *"implicit declaration"*) ;; # Was something useful hidden?
 160           *"Invalid"*) ;;
 161           *"is valid for C"*) ;;
 162           *) if test -x _cflags$_exe
 163              then
 164                case "$opt" in
 165                -std*) stdflags="$stdflags $opt" ;;
 166                *) warn="$warn $opt" ;;
 167                esac
 168              fi
 169              ;;
 170           esac
 171           ;;
 172        esac
 173     done
 174     ;;
 175 esac
 176 rm -f _cflags.c _cflags$_exe
 177
 178 case "$gccversion" in
 179 '') ;;
 180 *)
 181   if [ "$gccansipedantic" = "" ]; then
 182     # If we have -Duse64bitint (or equivalent) in effect and the quadtype
 183     # has become 'long long', gcc -pedantic becomes unbearable (moreso
 184     # when combined with -Wall) because long long and LL and %lld|%Ld
 185     # become warn-worthy.  So let's drop the -pedantic in that case.
 186     case "$quadtype:$sPRId64" in
 187     "long long"*|*lld*|*Ld*)
 188       ccflags="`echo $ccflags|sed 's/-pedantic/ /'`"
 189       warn="`echo $warn|sed 's/-pedantic/ /'`"
 190       ;;
 191     esac
 192     # Similarly, since 'long long' isn't part of C89, FreeBSD 6.2 headers
 193     # don't declare atoll() under -std=c89, but we need it.  In general,
 194     # insisting on -std=c89 is inconsistent with insisting on using
 195     # 'long long'. So drop -std=c89 and -ansi as well if we're using
 196     # 'long long' as our main integral type.
 197     case "$ivtype" in
 198     "long long")
 199         ccflags=`echo $ccflags|sed -e 's/-pedantic/ /' -e 's/-std=c89/ /' -e 's/-ansi/ /'`
 200         warn=`echo $warn|sed -e 's/-pedantic/ /' -e 's/-ansi/ /'`
 201         stdflags=`echo $stdflags|sed -e 's/-std=c89/ /'`
 202         ;;
 203     esac
 204   fi
 205   # Using certain features (like the gcc statement expressions)
 206   # requires knowing whether -pedantic has been specified.
 207   case "$warn$ccflags" in
 208   *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
 209   esac
 210   ;;
 211 esac
 212
 213 # Code to set any extra flags here.
 214 extra=''
 215
 216 echo "Extracting cflags (with variable substitutions)"
 217 # This section of the file will have variable substitutions done on it.
 218 # Move anything that needs config subs from !NO!SUBS! section to !GROK!THIS!.
 219 # Protect any dollar signs and backticks that you do not want interpreted
 220 # by putting a backslash in front.  You may delete these comments.
 221 rm -f cflags
 222 $spitshell >cflags <<!GROK!THIS!
 223 $startsh
 224
 225 # !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
 226
 227 # This file is generated by cflags.SH
 228
 229
 230 # Extra warnings, used e.g. for gcc.
 231 warn="$warn"
 232 # Extra standardness.
 233 stdflags="$stdflags"
 234 # Extra extra.
 235 extra="$extra"
 236 # what do executables look like?
 237 _exe="$_exe"
 238
 239 !GROK!THIS!
 240
 241 # In the following dollars and backticks do not need the extra backslash.
 242 $spitshell >>cflags <<'!NO!SUBS!'
 243 case $PERL_CONFIG_SH in
 244 '')
 245         if test -f config.sh; then TOP=.;
 246         elif test -f ../config.sh; then TOP=..;
 247         elif test -f ../../config.sh; then TOP=../..;
 248         elif test -f ../../../config.sh; then TOP=../../..;
 249         elif test -f ../../../../config.sh; then TOP=../../../..;
 250         else
 251                 echo "Can't find config.sh."; exit 1
 252         fi
 253         . $TOP/config.sh
 254         ;;
 255 esac
 256
 257 # syntax: cflags [optimize=XXX] [file[.suffix]] ...
 258 #   displays the proposed compiler command line for each 'file'
 259 #
 260 #   with no file, dispalys it for all *.c files.
 261 #   The optimise=XXX arg (if present) is evalled, setting the default
 262 #   value of the $optimise variable, which is output on the command line
 263 #   (but which may be overridden for specific files below)
 264
 265 case "X$1" in
 266 Xoptimize=*|X"optimize=*")
 267         eval "$1"
 268         shift
 269         ;;
 270 esac
 271
 272 case $# in
 273 0) set *.c; echo "The current C flags are:" ;;
 274 esac
 275
 276 set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
 277
 278 for file do
 279
 280     case "$#" in
 281     1) ;;
 282     *) echo $n "    $file.c     $c" ;;
 283     esac
 284
 285     # allow variables like toke_cflags to be evaluated
 286
 287     if echo $file | grep -v / >/dev/null
 288     then
 289       eval 'eval ${'"${file}_cflags"'-""}'
 290     fi
 291
 292     # or customize here
 293
 294     case "$file" in
 295     *) ;;
 296
 297     # Customization examples follow:
 298     av) ccflags=`echo $ccflags | sed -e s/-pipe//` ;;
 299     deb) ccflags="$ccflags -fno-jump-tables" ;;
 300     hv) warn=`echo $warn | sed -e s/-Wextra//` ;;
 301     toke) optimize=-O0 ;;
 302     esac
 303
 304     # The examples are intentionally unreachable as the '*)' case always
 305     # matches. To use them, move before the '*)' and edit as appropriate.
 306     # It is not a good idea to set ccflags to an absolute value here, as it
 307     # often contains general -D defines which are needed for correct
 308     # compilation. It is better to edit ccflags as shown, using interpolation
 309     # to add flags, or sed to remove flags.
 310
 311
 312     case "$cc" in
 313     *g++*)
 314       # Extra paranoia in case people have bad canned ccflags:
 315       # bad in the sense that the flags are accepted by g++,
 316       # but then whined about.
 317       for f in -Wdeclaration-after-statement -std=c89
 318       do
 319         ccflags=`echo $ccflags|sed 's/$f/ /'`
 320       done
 321       ;;
 322     esac
 323     cppflags=`echo $cppflags|sed 's/-Wdeclaration-after-statement/ /'`
 324
 325     case "$cc" in
 326     *clang*)
 327       # clang complains a lot about -Wunused-value which are not fixable
 328       warn="$warn -Wno-unused-value"
 329       ;;
 330     *g++*)
 331       # Without -Wno-unused-variable g++ 4.x compiles are rather unwatchable
 332       # because of all the warnings about Perl___notused, and g++ doesn't do
 333       # __attribute__((unused)) (and even if at some stage it may, people do
 334       # have older gcc installations), and ((void)x) isn't enough to silence
 335       # the noises about XS functions not using their cv parameter, so we need
 336       # the -Wno-unused-parameter too.
 337       # Yes, we lose some valid warnings, but hopefully other compilers
 338       # (like gcc) will still pick up those warnings.
 339       for o in -Wno-unused-variable -Wno-unused-parameter
 340       do
 341         case "$warn" in
 342         *$o*) ;;
 343         *) warn="$warn $o" ;;
 344         esac
 345       done
 346       ;;
 347     *)
 348       # clang may not be called clang
 349       case "`$cc -v 2>&1`" in
 350       *clang*)
 351         case "$warn" in
 352         *-Wno-unused-value) ;;
 353         *) warn="$warn -Wno-unused-value"
 354         esac
 355       esac
 356     esac
 357
 358
 359     # Can we perhaps use $ansi2knr here
 360     echo "$cc -c -DPERL_CORE $ccflags $stdflags $optimize $warn $extra"
 361
 362     . $TOP/config.sh
 363
 364     # end per file behaviour
 365 done
 366 !NO!SUBS!
 367 chmod 755 cflags
 368 $eunicefix cflags