cflags.SH

   1 case $PERL_CONFIG_SH in
   2 '')
   3         if test -f config.sh; then TOP=.;
   4         elif test -f ../config.sh; then TOP=..;
   5         elif test -f ../../config.sh; then TOP=../..;
   6         elif test -f ../../../config.sh; then TOP=../../..;
   7         elif test -f ../../../../config.sh; then TOP=../../../..;
   8         else
   9                 echo "Can't find config.sh."; exit 1
  10         fi
  11         . $TOP/config.sh
  12         ;;
  13 esac
  14 : This forces SH files to create target in same directory as SH file.
  15 : This is so that make depend always knows where to find SH derivatives.
  16 case "$0" in
  17 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
  18 esac
  19 echo "Extracting cflags (with variable substitutions)"
  20 : This section of the file will have variable substitutions done on it.
  21 : Move anything that needs config subs from !NO!SUBS! section to !GROK!THIS!.
  22 : Protect any dollar signs and backticks that you do not want interpreted
  23 : by putting a backslash in front.  You may delete these comments.
  24 rm -f cflags
  25 $spitshell >cflags <<!GROK!THIS!
  26 $startsh
  27 !GROK!THIS!
  28
  29 : In the following dollars and backticks do not need the extra backslash.
  30 $spitshell >>cflags <<'!NO!SUBS!'
  31 case $PERL_CONFIG_SH in
  32 '')
  33         if test -f config.sh; then TOP=.;
  34         elif test -f ../config.sh; then TOP=..;
  35         elif test -f ../../config.sh; then TOP=../..;
  36         elif test -f ../../../config.sh; then TOP=../../..;
  37         elif test -f ../../../../config.sh; then TOP=../../../..;
  38         else
  39                 echo "Can't find config.sh."; exit 1
  40         fi
  41         . $TOP/config.sh
  42         ;;
  43 esac
  44
  45 : syntax: cflags [optimize=XXX] [file[.suffix]]
  46 : displays the compiler command line for file
  47
  48 case "X$1" in
  49 Xoptimize=*|X"optimize=*")
  50         eval "$1"
  51         shift
  52         ;;
  53 esac
  54
  55 also=': '
  56 case $# in
  57 1) also='echo 1>&2 "      CCCMD = "'
  58 esac
  59
  60 case $# in
  61 0) set *.c; echo "The current C flags are:" ;;
  62 esac
  63
  64 set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
  65
  66 for file do
  67
  68     case "$#" in
  69     1) ;;
  70     *) echo $n "    $file.c     $c" ;;
  71     esac
  72
  73     : allow variables like toke_cflags to be evaluated
  74
  75     if echo $file | grep -v / >/dev/null
  76     then
  77       eval 'eval ${'"${file}_cflags"'-""}'
  78     fi
  79
  80     : or customize here
  81
  82     case "$file" in
  83     DB_File) ;;
  84     GDBM_File) ;;
  85     NDBM_File) ;;
  86     ODBM_File) ;;
  87     POSIX) ;;
  88     SDBM_File) ;;
  89     av) ;;
  90     byterun) ;;
  91     deb) ;;
  92     dl) ;;
  93     doio) ;;
  94     doop) ;;
  95     dump) ;;
  96     gv) ;;
  97     hv) ;;
  98     locale) ;;
  99     main) ;;
 100     malloc) ;;
 101     mg) ;;
 102     miniperlmain) ;;
 103     numeric) ;;
 104     op) ;;
 105     perl) ;;
 106     perlapi) ;;
 107     perlmain) ;;
 108     perly) ;;
 109     pp) ;;
 110     pp_ctl) ;;
 111     pp_hot) ;;
 112     pp_pack) ;;
 113     pp_sys) ;;
 114     regcomp) ;;
 115     regexec) ;;
 116     run) ;;
 117     scope) ;;
 118     sv) ;;
 119     taint) ;;
 120     toke) ;;
 121     usersub) ;;
 122     util) ;;
 123     *) ;;
 124     esac
 125
 126 # Add -Wall for the core modules iff gcc and not already -Wall
 127 warn=''
 128 case "$gccversion" in
 129 '') ;;
 130 *)  case "$ccflags" in
 131     *-Wall*) ;;
 132     *) warn="$warn -Wall" ;;
 133     esac
 134     case "$gccansipedantic" in
 135     define)
 136         case "$gccversion" in
 137         [12]*) ;; # gcc versions 1 (gasp!) and 2 are not good for this.
 138         *)  case "$osname" in
 139             # Add -ansi -pedantic only for known platforms.
 140             aix|dec_osf|freebsd|hpux|irix|linux)
 141                 ansipedantic="-ansi -pedantic" ;;
 142             solaris)
 143 # Can't add -ansi for Solaris.
 144 # Off_t/off_t is a struct in Solaris with largefiles, and with -ansi
 145 # that struct cannot be compared with a flat integer, such as a STRLEN.
 146 # The -ansi will also cause a lot of noise in Solaris because of:
 147 # /usr/include/sys/resource.h:148: warning: `struct rlimit64' declared inside parameter list
 148                 ansipedantic="-pedantic" ;;
 149             esac
 150             for i in $ansipedantic
 151             do
 152                 case "$ccflags" in
 153                 *$i*) ;;
 154                 *) warn="$warn $i" ;;
 155                 esac
 156             done
 157             case "$warn$ccflags" in
 158             *-pedantic*) warn="$warn -DPERL_GCC_PEDANTIC" ;;
 159             esac
 160             ;;
 161         esac
 162         ;;
 163     esac
 164     ;;
 165 esac
 166
 167     : Can we perhaps use $ansi2knr here
 168     echo "$cc -c -DPERL_CORE $ccflags $optimize $warn"
 169     eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"'
 170
 171     . $TOP/config.sh
 172
 173 done
 174 !NO!SUBS!
 175 chmod 755 cflags
 176 $eunicefix cflags