0.7.7.9:
[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     [Aa]lpha) guessed_sbcl_arch=alpha ;;
35     sparc*) guessed_sbcl_arch=sparc ;;
36     sun*) guessed_sbcl_arch=sparc ;;
37     ppc) guessed_sbcl_arch=ppc ;;
38     parisc) guessed_sbcl_arch=hppa ;;
39     mips) guessed_sbcl_arch=mips ;;
40     mipsel) guessed_sbcl_arch=mips; little_endian=yes ;;
41     *)
42         # If we're not building on a supported target architecture, we
43         # we have no guess, but it's not an error yet, since maybe
44         # target architecture will be specified explicitly below.
45         guessed_sbcl_arch=''
46         ;;
47 esac
48
49 echo //setting up CPU-architecture-dependent information
50 sbcl_arch=${SBCL_ARCH:-$guessed_sbcl_arch}
51 echo sbcl_arch=\"$sbcl_arch\"
52 if [ "$sbcl_arch" = "" ] ; then
53     echo "can't guess target SBCL architecture, need SBCL_ARCH environment var"
54     exit 1
55 fi
56 printf ":%s" "$sbcl_arch" >> $ltf 
57 # KLUDGE: currently the x86 only works with the generational garbage
58 # collector (indicated by the presence of :GENCGC in *FEATURES*) and
59 # alpha, sparc and ppc with the stop'n'copy collector (indicated by
60 # the absence of :GENCGC in *FEATURES*). This isn't a great
61 # separation, but for now, rather than have :GENCGC in
62 # base-target-features.lisp-expr, we add it into local-target-features
63 # if we're building for x86. -- CSR, 2002-02-21 Then we do something
64 # similar with :STACK-GROWS-FOOWARD, too. -- WHN 2002-03-03
65 if [ "$sbcl_arch" = "x86" ] ; then
66     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack' >> $ltf
67 elif [ "$sbcl_arch" = "mips" -a "$little_endian" = "yes" ] ; then
68     printf ' :little-endian' >> $ltf
69 else
70     # Nothing need be done in this case, but sh syntax wants a placeholder.
71     echo > /dev/null
72 fi
73 for d in src/compiler src/assembly; do
74     echo //setting up symlink $d/target
75     original_dir=`pwd`
76     cd $d
77     if [ -h target ] ; then
78         rm target
79     elif [ -w target ] ; then
80         echo "I'm afraid to replace non-symlink $d/target with a symlink."
81         exit 1
82     fi
83     if [ -d $sbcl_arch ] ; then
84         ln -s $sbcl_arch target
85     else
86         echo "missing sbcl_arch directory $PWD/$sbcl_arch"
87         exit 1
88     fi
89     cd $original_dir
90 done
91
92 echo //setting up OS-dependent information
93 original_dir=`pwd`
94 cd src/runtime/
95 rm -f Config target-arch-os.h target-arch.h target-os.h target-lispregs.h
96 # KLUDGE: these two logically belong in the previous section
97 # ("architecture-dependent"); it seems silly to enforce this in terms
98 # of the shell script, though. -- CSR, 2002-02-03
99 ln -s $sbcl_arch-arch.h target-arch.h
100 ln -s $sbcl_arch-lispregs.h target-lispregs.h
101 case `uname` in 
102     Linux)
103         printf ' :linux' >> $ltf
104         ln -s Config.$sbcl_arch-linux Config
105         ln -s $sbcl_arch-linux-os.h target-arch-os.h
106         ln -s linux-os.h target-os.h
107         ;;
108     OSF1)                       
109         # it's changed name twice since it was called OSF/1: clearly
110         # the marketers forgot to tell the engineers about Digital Unix
111         # _or_ OSF/1 ...
112         printf ' :osf1' >> $ltf
113         ln -s Config.$sbcl_arch-osf1 Config
114         ln -s $sbcl_arch-osf1-os.h target-arch-os.h
115         ln -s osf1-os.h target-os.h
116         ;;
117     *BSD)
118         printf ' :bsd' >> $ltf
119         ln -s $sbcl_arch-bsd-os.h target-arch-os.h
120         ln -s bsd-os.h target-os.h
121         case `uname` in
122             FreeBSD)
123                 printf ' :freebsd' >> $ltf
124                 ln -s Config.$sbcl_arch-freebsd Config
125                 ;;
126             OpenBSD)
127                 printf ' :openbsd' >> $ltf
128                 ln -s Config.$sbcl_arch-openbsd Config
129                 ;;
130             *)
131                 echo unsupported BSD variant: `uname`
132                 exit 1
133                 ;;
134         esac
135         ;;
136     SunOS)
137         printf ' :sunos' >> $ltf
138         ln -s Config.$sbcl_arch-sunos Config
139         ln -s $sbcl_arch-sunos-os.h target-arch-os.h
140         ln -s sunos-os.h target-os.h
141         ;;
142     *)
143         echo unsupported OS type: `uname`
144         exit 1
145         ;;
146 esac
147 cd $original_dir
148
149 echo //finishing $ltf
150 echo ')' >> $ltf
151
152 # FIXME: The version system should probably be redone along these lines:
153 #
154 # echo //setting up version information.
155 # versionfile=version.txt
156 # cp base-version.txt $versionfile
157 # echo " (built `date -u` by `whoami`@`hostname`)" >> $versionfile
158 # echo 'This is a machine-generated file and should not be edited by hand.' >> $versionfile