0.9.1.62: align CSP for dx closures on alpha and ppc
[sbcl.git] / make-config.sh
1 #!/bin/sh
2
3 # The make-config.sh script uses information about the target machine
4 # to set things up for compilation. It's vaguely like a stripped-down
5 # version of autoconf. It's intended to be run as part of make.sh. The
6 # only time you'd want to run it by itself is if you're trying to
7 # cross-compile the system or if you're doing some kind of
8 # troubleshooting.
9
10 # This software is part of the SBCL system. See the README file for
11 # more information.
12 #
13 # This software is derived from the CMU CL system, which was
14 # written at Carnegie Mellon University and released into the
15 # public domain. The software is in the public domain and is
16 # provided with absolutely no warranty. See the COPYING and CREDITS
17 # files for more information.
18
19 echo //entering make-config.sh
20
21 echo //ensuring the existence of output/ directory
22 if [ ! -d output ] ; then mkdir output; fi
23
24 ltf=`pwd`/local-target-features.lisp-expr
25 echo //initializing $ltf
26 echo ';;;; This is a machine-generated file.' > $ltf
27 echo ';;;; Please do not edit it by hand.' >> $ltf
28 echo ';;;; See make-config.sh.' >> $ltf
29 printf '(' >> $ltf
30
31 echo //guessing default target CPU architecture from host architecture
32 case `uname -m` in 
33     *86) guessed_sbcl_arch=x86 ;; 
34     *x86_64) guessed_sbcl_arch=x86-64 ;; 
35     [Aa]lpha) guessed_sbcl_arch=alpha ;;
36     sparc*) guessed_sbcl_arch=sparc ;;
37     sun*) guessed_sbcl_arch=sparc ;;
38     ppc) guessed_sbcl_arch=ppc ;;
39     Power*Macintosh) guessed_sbcl_arch=ppc ;;
40     parisc) guessed_sbcl_arch=hppa ;;
41     mips*) guessed_sbcl_arch=mips ;;
42     *)
43         # If we're not building on a supported target architecture, we
44         # we have no guess, but it's not an error yet, since maybe
45         # target architecture will be specified explicitly below.
46         guessed_sbcl_arch=''
47         ;;
48 esac
49
50 echo //setting up CPU-architecture-dependent information
51 sbcl_arch=${SBCL_ARCH:-$guessed_sbcl_arch}
52 echo sbcl_arch=\"$sbcl_arch\"
53 if [ "$sbcl_arch" = "" ] ; then
54     echo "can't guess target SBCL architecture, need SBCL_ARCH environment var"
55     exit 1
56 fi
57 printf ":%s" "$sbcl_arch" >> $ltf 
58
59 for d in src/compiler src/assembly; do
60     echo //setting up symlink $d/target
61     original_dir=`pwd`
62     cd ./$d
63     if [ -h target ] ; then
64         rm target
65     elif [ -w target ] ; then
66         echo "I'm afraid to replace non-symlink $d/target with a symlink."
67         exit 1
68     fi
69     if [ -d $sbcl_arch ] ; then
70         ln -s $sbcl_arch target
71     else
72         echo "missing sbcl_arch directory $PWD/$sbcl_arch"
73         exit 1
74     fi
75     cd $original_dir
76 done
77
78 echo //setting up symlink src/compiler/assembly
79 if [ -h src/compiler/assembly ] ; then
80     rm src/compiler/assembly
81 elif [ -w src/compiler/assembly ] ; then
82     echo "I'm afraid to replace non-symlink compiler/assembly with a symlink."
83     exit 1
84 fi
85 ln -s ../assembly src/compiler/assembly
86
87 echo //setting up OS-dependent information
88 original_dir=`pwd`
89 cd ./src/runtime/
90 rm -f Config target-arch-os.h target-arch.h target-os.h target-lispregs.h
91 # KLUDGE: these two logically belong in the previous section
92 # ("architecture-dependent"); it seems silly to enforce this in terms
93 # of the shell script, though. -- CSR, 2002-02-03
94 ln -s $sbcl_arch-arch.h target-arch.h
95 ln -s $sbcl_arch-lispregs.h target-lispregs.h
96 case `uname` in 
97     Linux)
98         printf ' :elf' >> $ltf
99         printf ' :linux' >> $ltf
100         sbcl_os="linux"
101         if [ $sbcl_arch = "x86-64" ]; then
102             ln -s Config.x86_64-linux Config                                    
103         else                                                                    
104             ln -s Config.$sbcl_arch-linux Config                                
105         fi 
106         ln -s $sbcl_arch-linux-os.h target-arch-os.h
107         ln -s linux-os.h target-os.h
108         ;;
109     OSF1)                       
110         # it's changed name twice since it was called OSF/1: clearly
111         # the marketers forgot to tell the engineers about Digital Unix
112         # _or_ OSF/1 ...
113         printf ' :elf' >> $ltf
114         printf ' :osf1' >> $ltf
115         sbcl_os="osf1"
116         ln -s Config.$sbcl_arch-osf1 Config
117         ln -s $sbcl_arch-osf1-os.h target-arch-os.h
118         ln -s osf1-os.h target-os.h
119         ;;
120     *BSD)
121         printf ' :bsd' >> $ltf
122         ln -s $sbcl_arch-bsd-os.h target-arch-os.h
123         ln -s bsd-os.h target-os.h
124         case `uname` in
125             FreeBSD)
126                 printf ' :elf' >> $ltf
127                 printf ' :freebsd' >> $ltf
128                 sbcl_os="freebsd"
129                 ln -s Config.$sbcl_arch-freebsd Config
130                 ;;
131             OpenBSD)
132                 printf ' :elf' >> $ltf
133                 printf ' :openbsd' >> $ltf
134                 sbcl_os="openbsd"
135                 ln -s Config.$sbcl_arch-openbsd Config
136                 ;;
137             NetBSD)
138                 printf ' :netbsd' >> $ltf
139                 printf ' :elf' >> $ltf
140                 sbcl_os="netbsd"
141                 ln -s Config.$sbcl_arch-netbsd Config
142                 ;;
143             *)
144                 echo unsupported BSD variant: `uname`
145                 exit 1
146                 ;;
147         esac
148         ;;
149     Darwin)
150         printf ' :mach-o' >> $ltf
151         printf ' :bsd' >> $ltf
152         sbcl_os="darwin"
153         ln -s $sbcl_arch-darwin-os.h target-arch-os.h
154         ln -s bsd-os.h target-os.h
155         printf ' :darwin' >> $ltf
156         ln -s Config.$sbcl_arch-darwin Config
157         ;;
158     SunOS)
159         printf ' :elf' >> $ltf
160         printf ' :sunos' >> $ltf
161         sbcl_os="sunos"
162         ln -s Config.$sbcl_arch-sunos Config
163         ln -s $sbcl_arch-sunos-os.h target-arch-os.h
164         ln -s sunos-os.h target-os.h
165         ;;
166     *)
167         echo unsupported OS type: `uname`
168         exit 1
169         ;;
170 esac
171 cd $original_dir
172
173 # FIXME: Things like :c-stack-grows-..., etc, should be
174 # *derived-target-features* or equivalent, so that there was a nicer
175 # way to specify them then sprinkling them in this file. They should
176 # still be tweakable by advanced users, though, but probably not
177 # appear in *features* of target. #!+/- should be adjusted to take
178 # them in account as well. At minimum the nicer specification stuff,
179 # though:
180 #
181 # (define-feature :dlopen (features)
182 #   (union '(:bsd :linux :darwin :sunos) features))
183 #
184 # (define-feature :c-stack-grows-downwards-not-upwards (features)
185 #   (member :x86 features))
186
187 # KLUDGE: currently the x86 only works with the generational garbage
188 # collector (indicated by the presence of :GENCGC in *FEATURES*) and
189 # alpha, sparc and ppc with the stop'n'copy collector (indicated by
190 # the absence of :GENCGC in *FEATURES*). This isn't a great
191 # separation, but for now, rather than have :GENCGC in
192 # base-target-features.lisp-expr, we add it into local-target-features
193 # if we're building for x86. -- CSR, 2002-02-21 Then we do something
194 # similar with :STACK-GROWS-FOOWARD, too. -- WHN 2002-03-03
195 if [ "$sbcl_arch" = "x86" ]; then
196     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack' >> $ltf
197     printf ' :stack-allocatable-closures' >> $ltf
198     if [ "$sbcl_os" = "linux" ] || [ "$sbcl_os" = "freebsd" ] || [ "$sbcl_os" = "netbsd" ]; then
199         printf ' :linkage-table' >> $ltf
200     fi
201 elif [ "$sbcl_arch" = "x86-64" ]; then
202     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table' >> $ltf
203     printf ' :stack-allocatable-closures' >> $ltf
204 elif [ "$sbcl_arch" = "mips" ]; then
205     # Use a little C program to try to guess the endianness.  Ware
206     # cross-compilers!
207     #
208     # FIXME: integrate to grovel-features, mayhaps
209     $GNUMAKE -C tools-for-build determine-endianness -I src/runtime
210     tools-for-build/determine-endianness >> $ltf
211 elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "linux" ]; then
212     # Use a C program to detect which kind of glibc we're building on,
213     # to bandage across the break in source compatibility between
214     # versions 2.3.1 and 2.3.2
215     #
216     # FIXME: integrate to grovel-features., maypahps
217     printf ' :stack-allocatable-closures' >> $ltf
218     $GNUMAKE -C tools-for-build where-is-mcontext -I src/runtime
219     tools-for-build/where-is-mcontext > src/runtime/ppc-linux-mcontext.h
220 elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "darwin" ]; then
221     printf ' :stack-allocatable-closures' >> $ltf
222     # We provide a dlopen shim, so a little lie won't hurt
223     printf " :os-provides-dlopen :linkage-table" >> $ltf
224     # The default stack ulimit under darwin is too small to run PURIFY.
225     # Best we can do is complain and exit at this stage
226     if [ "`ulimit -s`" = "512" ]; then
227         echo "Your stack size limit is too small to build SBCL."
228         echo "See the limit(1) or ulimit(1) commands and the README file."
229         exit 1
230     fi
231 elif [ "$sbcl_arch" = "sparc" ]; then
232     # Test the compiler in order to see if we are building on Sun 
233     # toolchain as opposed to GNU binutils, and write the appropriate
234     # FUNCDEF macro for assembler. No harm in running this on sparc-linux 
235     # as well.
236     sh tools-for-build/sparc-funcdef.sh > src/runtime/sparc-funcdef.h
237     if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then
238         printf ' :linkage-table' >> $ltf
239     fi
240 elif [ "$sbcl_arch" = "alpha" ]; then
241     printf ' :stack-allocatable-closures' >> $ltf
242 else
243     # Nothing need be done in this case, but sh syntax wants a placeholder.
244     echo > /dev/null
245 fi
246
247 export sbcl_os sbcl_arch
248 sh tools-for-build/grovel-features.sh >> $ltf
249
250 echo //finishing $ltf
251 echo ')' >> $ltf
252
253 # FIXME: The version system should probably be redone along these lines:
254 #
255 # echo //setting up version information.
256 # versionfile=version.txt
257 # cp base-version.txt $versionfile
258 # echo " (built `date -u` by `whoami`@`hostname`)" >> $versionfile
259 # echo 'This is a machine-generated file and should not be edited by hand.' >> $versionfile
260
261 # Make a unique ID for this build (to discourage people from
262 # mismatching sbcl and *.core files).
263 if [ `uname` = "SunOS" ] ; then
264   # use /usr/xpg4/bin/id instead of /usr/bin/id
265   PATH=/usr/xpg4/bin:$PATH
266 fi
267 echo '"'`hostname`-`id -un`-`date +%Y-%m-%d-%H-%M-%S`'"' > output/build-id.tmp
268