TODO
[perl.git] / cflags.SH
1 case $CONFIG 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 $CONFIG 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 perltype=''
46 optdebug=''     # ensure -g used if building a -DDEBUGGING libperl
47 case $# in
48 2) case $1 in
49     *perl.*)    perltype='';;
50     *perld.*)   perltype='-DDEBUGGING'; optdebug='-g' ;;
51     *perle.*)   perltype='-DEMBED';;
52     *perlde.*)  perltype='-DDEBUGGING -DEMBED'; optdebug='-g' ;;
53     *perlm.*)   perltype='-DEMBED -DMULTIPLICITY';;
54     *perldm.*)  perltype='-DDEBUGGING -DEMBED -DMULTIPLICITY'; optdebug='-g' ;;
55     esac
56     shift ;;
57 esac
58
59 also=': '
60 case $# in
61 1) also='echo 1>&2 "      CCCMD = "'
62 esac
63
64 case $# in
65 0) set *.c; echo "The current C flags are:" ;;
66 esac
67
68 set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g'`
69
70 for file do
71
72     case "$#" in
73     1) ;;
74     *) echo $n "    $file.c     $c" ;;
75     esac
76
77     : allow variables like toke_cflags to be evaluated
78
79     eval 'eval ${'"${file}_cflags"'-""}'
80
81     : or customize here
82
83     case "$file" in
84     DB_File) ;;
85     GDBM_File) ;;
86     NDBM_File) ;;
87     ODBM_File) ;;
88     POSIX) ;;
89     SDBM_File) ;;
90     av) ;;
91     byterun) ;;
92     deb) ;;
93     dl) ;;
94     doio) ;;
95     doop) ;;
96     dump) ;;
97     gv) ;;
98     hv) ;;
99     main) ;;
100     malloc) ;;
101     mg) ;;
102     miniperlmain) ;;
103     op) ;;
104     perl) ;;
105     perlmain) ;;
106     perly) ;;
107     pp) ;;
108     pp_ctl) ;;
109     pp_hot) ;;
110     pp_sys) ;;
111     regcomp) ;;
112     regexec) ;;
113     run) ;;
114     scope) ;;
115     sv) ;;
116     taint) ;;
117     toke) ;;
118     usersub) ;;
119     util) ;;
120     *) ;;
121     esac
122
123         if test "X$optdebug" != "X"; then
124                 optimize="$optdebug"
125         fi
126
127     : Can we perhaps use $ansi2knr here
128     echo "$cc -c -DPERL_CORE $ccflags $optimize $perltype $large $split"
129     eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $perltype $large $split"'
130
131     . $TOP/config.sh
132
133 done
134 !NO!SUBS!
135 chmod 755 cflags
136 $eunicefix cflags