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 case "X$1" in
  46 Xoptimize=*|X"optimize=*")
  47         eval "$1"
  48         shift
  49         ;;
  50 esac
  51
  52 perltype=''
  53 optdebug=''     # ensure -g used if building a -DDEBUGGING libperl
  54 case $# in
  55 2) case $1 in
  56     *perl.*)    perltype='';;
  57     *perld.*)   perltype='-DDEBUGGING'; optdebug='-g' ;;
  58     *perle.*)   perltype='-DEMBED';;
  59     *perlde.*)  perltype='-DDEBUGGING -DEMBED'; optdebug='-g' ;;
  60     *perlm.*)   perltype='-DEMBED -DMULTIPLICITY';;
  61     *perldm.*)  perltype='-DDEBUGGING -DEMBED -DMULTIPLICITY'; optdebug='-g' ;;
  62     esac
  63     shift ;;
  64 esac
  65
  66 also=': '
  67 case $# in
  68 1) also='echo 1>&2 "      CCCMD = "'
  69 esac
  70
  71 case $# in
  72 0) set *.c; echo "The current C flags are:" ;;
  73 esac
  74
  75 set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
  76
  77 for file do
  78
  79     case "$#" in
  80     1) ;;
  81     *) echo $n "    $file.c     $c" ;;
  82     esac
  83
  84     : allow variables like toke_cflags to be evaluated
  85
  86     if echo $file | grep -v / >/dev/null
  87     then
  88       eval 'eval ${'"${file}_cflags"'-""}'
  89     fi
  90
  91     : or customize here
  92
  93     case "$file" in
  94     DB_File) ;;
  95     GDBM_File) ;;
  96     NDBM_File) ;;
  97     ODBM_File) ;;
  98     POSIX) ;;
  99     SDBM_File) ;;
 100     av) ;;
 101     byterun) ;;
 102     deb) ;;
 103     dl) ;;
 104     doio) ;;
 105     doop) ;;
 106     dump) ;;
 107     gv) ;;
 108     hv) ;;
 109     locale) ;;
 110     main) ;;
 111     malloc) ;;
 112     mg) ;;
 113     miniperlmain) ;;
 114     numeric) ;;
 115     op) ;;
 116     perl) ;;
 117     perlapi) ;;
 118     perlmain) ;;
 119     perly) ;;
 120     pp) ;;
 121     pp_ctl) ;;
 122     pp_hot) ;;
 123     pp_pack) ;;
 124     pp_sys) ;;
 125     regcomp) ;;
 126     regexec) ;;
 127     run) ;;
 128     scope) ;;
 129     sv) ;;
 130     taint) ;;
 131     toke) ;;
 132     usersub) ;;
 133     util) ;;
 134     *) ;;
 135     esac
 136
 137         if test "X$optdebug" != "X"; then
 138                 optimize="$optdebug"
 139         fi
 140
 141 # Add -Wall for the core and core modules iff gcc and not already -Wall
 142 warn=''
 143 case "$gccversion" in
 144 '') ;;
 145 *)  case "$ccflags" in
 146     *-Wall*) ;;
 147 # Can't add -ansi here because it will fail e.g. in Solaris.
 148 # Off_t/off_t is a struct in Solaris with largefiles, and with -ansi
 149 # that struct cannot be compared with a flat integer, such as a STRLEN.
 150 # The -ansi will also cause a lot of noise in Solaris because of:
 151 # /usr/include/sys/resource.h:148: warning: `struct rlimit64' declared inside parameter list
 152     *) warn='-Wall' ;;
 153     esac
 154     ;;
 155 esac
 156
 157     : Can we perhaps use $ansi2knr here
 158     echo "$cc -c -DPERL_CORE $ccflags $optimize $warn $perltype"
 159     eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn $perltype"'
 160
 161     . $TOP/config.sh
 162
 163 done
 164 !NO!SUBS!
 165 chmod 755 cflags
 166 $eunicefix cflags