0.9.1.52:
[sbcl.git] / make-config.sh
index 7664551..ff5abee 100644 (file)
@@ -18,9 +18,6 @@
 
 echo //entering make-config.sh
 
-echo //checking that we are not root
-if [ `id -u` -eq 0 ] ; then echo 'Argh! we are (fake)root!'; exit 1; fi;
-
 echo //ensuring the existence of output/ directory
 if [ ! -d output ] ; then mkdir output; fi
 
@@ -33,14 +30,15 @@ printf '(' >> $ltf
 
 echo //guessing default target CPU architecture from host architecture
 case `uname -m` in 
-    *86|x86_64) guessed_sbcl_arch=x86 ;; 
+    *86) guessed_sbcl_arch=x86 ;; 
+    *x86_64) guessed_sbcl_arch=x86-64 ;; 
     [Aa]lpha) guessed_sbcl_arch=alpha ;;
     sparc*) guessed_sbcl_arch=sparc ;;
     sun*) guessed_sbcl_arch=sparc ;;
     ppc) guessed_sbcl_arch=ppc ;;
     Power*Macintosh) guessed_sbcl_arch=ppc ;;
     parisc) guessed_sbcl_arch=hppa ;;
-    mips) guessed_sbcl_arch=mips ;;
+    mips*) guessed_sbcl_arch=mips ;;
     *)
         # If we're not building on a supported target architecture, we
        # we have no guess, but it's not an error yet, since maybe
@@ -61,7 +59,7 @@ printf ":%s" "$sbcl_arch" >> $ltf
 for d in src/compiler src/assembly; do
     echo //setting up symlink $d/target
     original_dir=`pwd`
-    cd $d
+    cd ./$d
     if [ -h target ] ; then
        rm target
     elif [ -w target ] ; then
@@ -88,7 +86,7 @@ ln -s ../assembly src/compiler/assembly
 
 echo //setting up OS-dependent information
 original_dir=`pwd`
-cd src/runtime/
+cd ./src/runtime/
 rm -f Config target-arch-os.h target-arch.h target-os.h target-lispregs.h
 # KLUDGE: these two logically belong in the previous section
 # ("architecture-dependent"); it seems silly to enforce this in terms
@@ -97,13 +95,14 @@ ln -s $sbcl_arch-arch.h target-arch.h
 ln -s $sbcl_arch-lispregs.h target-lispregs.h
 case `uname` in 
     Linux)
+       printf ' :elf' >> $ltf
        printf ' :linux' >> $ltf
        sbcl_os="linux"
-       if [ "`uname -m`" = "x86_64" ]; then
-           ln -s Config.x86_64-linux Config
-       else
-           ln -s Config.$sbcl_arch-linux Config
-       fi
+       if [ $sbcl_arch = "x86-64" ]; then
+            ln -s Config.x86_64-linux Config                                    
+       else                                                                    
+            ln -s Config.$sbcl_arch-linux Config                                
+       fi 
        ln -s $sbcl_arch-linux-os.h target-arch-os.h
        ln -s linux-os.h target-os.h
        ;;
@@ -111,6 +110,7 @@ case `uname` in
         # it's changed name twice since it was called OSF/1: clearly
         # the marketers forgot to tell the engineers about Digital Unix
         # _or_ OSF/1 ...
+       printf ' :elf' >> $ltf
        printf ' :osf1' >> $ltf
        sbcl_os="osf1"
         ln -s Config.$sbcl_arch-osf1 Config
@@ -123,15 +123,23 @@ case `uname` in
        ln -s bsd-os.h target-os.h
        case `uname` in
            FreeBSD)
+               printf ' :elf' >> $ltf
                printf ' :freebsd' >> $ltf
                sbcl_os="freebsd"
                ln -s Config.$sbcl_arch-freebsd Config
                ;;
            OpenBSD)
+               printf ' :elf' >> $ltf
                printf ' :openbsd' >> $ltf
                sbcl_os="openbsd"
                ln -s Config.$sbcl_arch-openbsd Config
                ;;
+           NetBSD)
+                printf ' :netbsd' >> $ltf
+               printf ' :elf' >> $ltf
+               sbcl_os="netbsd"
+               ln -s Config.$sbcl_arch-netbsd Config
+               ;;
            *)
                echo unsupported BSD variant: `uname`
                exit 1
@@ -139,6 +147,7 @@ case `uname` in
        esac
        ;;
     Darwin)
+       printf ' :mach-o' >> $ltf
        printf ' :bsd' >> $ltf
        sbcl_os="darwin"
        ln -s $sbcl_arch-darwin-os.h target-arch-os.h
@@ -147,6 +156,7 @@ case `uname` in
        ln -s Config.$sbcl_arch-darwin Config
        ;;
     SunOS)
+       printf ' :elf' >> $ltf
         printf ' :sunos' >> $ltf
        sbcl_os="sunos"
        ln -s Config.$sbcl_arch-sunos Config
@@ -160,6 +170,20 @@ case `uname` in
 esac
 cd $original_dir
 
+# FIXME: Things like :c-stack-grows-..., etc, should be
+# *derived-target-features* or equivalent, so that there was a nicer
+# way to specify them then sprinkling them in this file. They should
+# still be tweakable by advanced users, though, but probably not
+# appear in *features* of target. #!+/- should be adjusted to take
+# them in account as well. At minimum the nicer specification stuff,
+# though:
+#
+# (define-feature :dlopen (features)
+#   (union '(:bsd :linux :darwin :sunos) features))
+#
+# (define-feature :c-stack-grows-downwards-not-upwards (features)
+#   (member :x86 features))
+
 # KLUDGE: currently the x86 only works with the generational garbage
 # collector (indicated by the presence of :GENCGC in *FEATURES*) and
 # alpha, sparc and ppc with the stop'n'copy collector (indicated by
@@ -168,20 +192,32 @@ cd $original_dir
 # base-target-features.lisp-expr, we add it into local-target-features
 # if we're building for x86. -- CSR, 2002-02-21 Then we do something
 # similar with :STACK-GROWS-FOOWARD, too. -- WHN 2002-03-03
-if [ "$sbcl_arch" = "x86" ] ; then
+if [ "$sbcl_arch" = "x86" ]; then
     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack' >> $ltf
-elif [ "$sbcl_arch" = "mips" ] ; then
+    printf ' :stack-allocatable-closures' >> $ltf
+    if [ "$sbcl_os" = "linux" ] || [ "$sbcl_os" = "freebsd" ] || [ "$sbcl_os" = "netbsd" ]; then
+       printf ' :linkage-table' >> $ltf
+    fi
+elif [ "$sbcl_arch" = "x86-64" ]; then
+    printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table' >> $ltf
+elif [ "$sbcl_arch" = "mips" ]; then
     # Use a little C program to try to guess the endianness.  Ware
     # cross-compilers!
-    $GNUMAKE -C tools-for-build determine-endianness
+    #
+    # FIXME: integrate to grovel-features, mayhaps
+    $GNUMAKE -C tools-for-build determine-endianness -I src/runtime
     tools-for-build/determine-endianness >> $ltf
 elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "linux" ]; then
     # Use a C program to detect which kind of glibc we're building on,
     # to bandage across the break in source compatibility between
     # versions 2.3.1 and 2.3.2
-    $GNUMAKE -C tools-for-build where-is-mcontext
+    #
+    # FIXME: integrate to grovel-features., maypahps
+    $GNUMAKE -C tools-for-build where-is-mcontext -I src/runtime
     tools-for-build/where-is-mcontext > src/runtime/ppc-linux-mcontext.h
 elif [ "$sbcl_arch" = "ppc" -a "$sbcl_os" = "darwin" ]; then
+    # We provide a dlopen shim, so a little lie won't hurt
+    printf " :os-provides-dlopen :linkage-table" >> $ltf
     # The default stack ulimit under darwin is too small to run PURIFY.
     # Best we can do is complain and exit at this stage
     if [ "`ulimit -s`" = "512" ]; then
@@ -195,11 +231,19 @@ elif [ "$sbcl_arch" = "sparc" ]; then
     # FUNCDEF macro for assembler. No harm in running this on sparc-linux 
     # as well.
     sh tools-for-build/sparc-funcdef.sh > src/runtime/sparc-funcdef.h
+    if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then
+       printf ' :linkage-table' >> $ltf
+    fi
+elif [ "$sbcl_arch" = "alpha" ]; then
+    printf ' :stack-allocatable-closures' >> $ltf
 else
     # Nothing need be done in this case, but sh syntax wants a placeholder.
     echo > /dev/null
 fi
 
+export sbcl_os sbcl_arch
+sh tools-for-build/grovel-features.sh >> $ltf
+
 echo //finishing $ltf
 echo ')' >> $ltf
 
@@ -213,5 +257,9 @@ echo ')' >> $ltf
 
 # Make a unique ID for this build (to discourage people from
 # mismatching sbcl and *.core files).
-echo '"'`hostname`-`whoami`-`date +%F-%H-%M-%S`'"' > output/build-id.tmp
+if [ `uname` = "SunOS" ] ; then
+  # use /usr/xpg4/bin/id instead of /usr/bin/id
+  PATH=/usr/xpg4/bin:$PATH
+fi
+echo '"'`hostname`-`id -un`-`date +%Y-%m-%d-%H-%M-%S`'"' > output/build-id.tmp