make-config.sh

   1 #!/bin/sh
   2 set -e
   3
   4 # The make-config.sh script uses information about the target machine
   5 # to set things up for compilation. It's vaguely like a stripped-down
   6 # version of autoconf. It's intended to be run as part of make.sh. The
   7 # only time you'd want to run it by itself is if you're trying to
   8 # cross-compile the system or if you're doing some kind of
   9 # troubleshooting.
  10
  11 # This software is part of the SBCL system. See the README file for
  12 # more information.
  13 #
  14 # This software is derived from the CMU CL system, which was
  15 # written at Carnegie Mellon University and released into the
  16 # public domain. The software is in the public domain and is
  17 # provided with absolutely no warranty. See the COPYING and CREDITS
  18 # files for more information.
  19
  20 print_help="no"
  21
  22 # The classic form here was to use --userinit $DEVNULL --sysinit
  23 # $DEVNULL, but that doesn't work on Win32 because SBCL doesn't handle
  24 # device names properly. We still need $DEVNULL to be NUL on Win32
  25 # because it's used elsewhere (such as canonicalize-whitespace), so we
  26 # need an alternate solution for the init file overrides. --no-foos
  27 # have now been available long enough that this should not stop anyone
  28 # from building.
  29 if [ "$OSTYPE" = "cygwin" -o "$OSTYPE" = "msys" ]
  30 then
  31     SBCL_PREFIX="$PROGRAMFILES/sbcl"
  32 else
  33     SBCL_PREFIX="/usr/local"
  34 fi
  35 SBCL_XC_HOST="sbcl --disable-debugger --no-userinit --no-sysinit"
  36 export SBCL_XC_HOST
  37
  38 # Parse command-line options.
  39 bad_option() {
  40     echo $1
  41     echo "Enter \"$0 --help\" for list of valid options."
  42     exit 1
  43 }
  44
  45 WITH_FEATURES=""
  46 WITHOUT_FEATURES=""
  47 FANCY_FEATURES=":sb-core-compression :sb-xref-for-internals :sb-after-xc-core"
  48
  49 fancy=false
  50 some_options=false
  51 for option
  52 do
  53   optarg_ok=true
  54   # Split --foo=bar into --foo and bar.
  55   case $option in
  56       *=*)
  57         # For ease of scripting skip valued options with empty
  58         # values.
  59         optarg=`expr "X$option" : '[^=]*=\(.*\)'` || optarg_ok=false
  60         option=`expr "X$option" : 'X\([^=]*=\).*'`
  61         ;;
  62       --with*)
  63         optarg=`expr "X$option" : 'X--[^-]*-\(.*\)'` \
  64             || bad_option "Malformed feature toggle: $option"
  65         option=`expr "X$option" : 'X\(--[^-]*\).*'`
  66         ;;
  67       *)
  68         optarg=""
  69         ;;
  70   esac
  71
  72   case $option in
  73       --help | -help | -h)
  74         print_help="yes" ;;
  75       --prefix=)
  76         $optarg_ok && SBCL_PREFIX=$optarg
  77         ;;
  78       --arch=)
  79         $oparg_ok && SBCL_ARCH=$optarg
  80         ;;
  81       --xc-host=)
  82         $optarg_ok && SBCL_XC_HOST=$optarg
  83         ;;
  84       --host-location=)
  85         $optarg_ok && SBCL_HOST_LOCATION=$optarg
  86         ;;
  87       --target-location=)
  88         $optarg_ok && SBCL_TARGET_LOCATION=$optarg
  89         ;;
  90       --dynamic-space-size=)
  91         $optarg_ok && SBCL_DYNAMIC_SPACE_SIZE=$optarg
  92         ;;
  93       --with)
  94         WITH_FEATURES="$WITH_FEATURES :$optarg"
  95         ;;
  96       --without)
  97         WITHOUT_FEATURES="$WITHOUT_FEATURES :$optarg"
  98         ;;
  99       --fancy)
 100         WITH_FEATURES="$WITH_FEATURES $FANCY_FEATURES"
 101         # Lower down we add :sb-thread for platforms where it can be built.
 102         fancy=true
 103         ;;
 104       -*)
 105         bad_option "Unknown command-line option to $0: \"$option\""
 106         ;;
 107       *)
 108         if $some_options
 109         then
 110             bad_option "Unknown command-line option to $0: \"$option\""
 111         else
 112             legacy_xc_spec=$option
 113         fi
 114         ;;
 115   esac
 116   some_options=true
 117 done
 118
 119 if (test -f customize-target-features.lisp && \
 120     (test -n "$WITH_FEATURES" || test -n "$WITHOUT_FEATURES"))
 121 then
 122     # Actually there's no reason why it would not work, but it would
 123     # be confusing to say --with-thread only to have it turned off by
 124     # customize-target-features.lisp...
 125     echo "ERROR: Both customize-target-features.lisp, and feature-options"
 126     echo "to make.sh present -- cannot use both at the same time."
 127     exit 1
 128 fi
 129
 130 # Previously XC host was provided as a positional argument.
 131 if test -n "$legacy_xc_spec"
 132 then
 133     SBCL_XC_HOST="$legacy_xc_spec"
 134 fi
 135
 136 if test "$print_help" = "yes"
 137 then
 138   cat <<EOF
 139 \`make.sh' drives the SBCL build.
 140
 141 Usage: $0 [OPTION]...
 142
 143   Important: make.sh does not currently control the entirety of the
 144   build: configuration file customize-target-features.lisp and certain
 145   environment variables play a role as well. see file INSTALL for
 146   details.
 147
 148 Options:
 149   -h, --help           Display this help and exit.
 150
 151   --prefix=<path>      Specify the install location.
 152
 153       Script install.sh installs SBCL under the specified prefix
 154       path: runtime as prefix/bin/sbcl, additional files under
 155       prefix/lib/sbcl, and documentation under prefix/share.
 156
 157       This option also affects the binaries: built-in default for
 158       SBCL_HOME is: prefix/lib/sbcl/
 159
 160       Default prefix is: /usr/local
 161
 162   --dynamic-space-size=<size> Default dynamic-space size for target.
 163
 164       This specifies the default dynamic-space size for the SBCL
 165       being built. If you need to control the dynamic-space size
 166       of the host SBCL, use the --xc-host option.
 167
 168       If not provided, the default is platform-specific. <size> is
 169       taken to be megabytes unless explicitly suffixed with Gb in
 170       order to specify the size in gigabytes.
 171
 172   --with-<feature>     Build with specified feature.
 173   --without-<feature>  Build wihout the specfied feature.
 174
 175   --fancy              Build with several optional features:
 176
 177                            $FANCY_FEATURES
 178
 179                        Plus threading on platforms which support it.
 180
 181   --arch=<string>      Specify the architecture to build for.
 182
 183       Mainly for doing x86 builds on x86-64.
 184
 185   --xc-host=<string>   Specify the Common Lisp compilation host.
 186
 187       The string provided should be a command to invoke the
 188       cross-compilation Lisp system in such a way, that it reads
 189       commands from standard input, and terminates when it reaches end
 190       of file on standard input.
 191
 192       Examples:
 193
 194        "sbcl --disable-debugger --no-sysinit --no-userinit"
 195                   Use an existing SBCL binary as a cross-compilation
 196                   host even though you have stuff in your
 197                   initialization files which makes it behave in such a
 198                   non-standard way that it keeps the build from
 199                   working. Also disable the debugger instead of
 200                   waiting endlessly for a programmer to help it out
 201                   with input on *DEBUG-IO*. (This is the default.)
 202
 203        "sbcl"
 204                   Use an existing SBCL binary as a cross-compilation
 205                   host, including your initialization files and
 206                   building with the debugger enabled. Not recommended
 207                   for casual users.
 208
 209        "lisp -noinit -batch"
 210                   Use an existing CMU CL binary as a cross-compilation
 211                   host when you have weird things in your .cmucl-init
 212                   file.
 213 EOF
 214   exit 1
 215 fi
 216
 217 # Running make.sh with different options without clean.sh in the middle
 218 # can break things.
 219 sh clean.sh
 220
 221 mkdir -p output
 222 # Save prefix for make and install.sh.
 223 echo "SBCL_PREFIX='$SBCL_PREFIX'" > output/prefix.def
 224 echo "$SBCL_DYNAMIC_SPACE_SIZE" > output/dynamic-space-size.txt
 225
 226 # FIXME: Tweak this script, and the rest of the system, to support
 227 # a second bootstrapping pass in which the cross-compilation host is
 228 # known to be SBCL itself, so that the cross-compiler can do some
 229 # optimizations (especially specializable arrays) that it doesn't
 230 # know how to implement how in a portable way. (Or maybe that wouldn't
 231 # require a second pass, just testing at build-the-cross-compiler time
 232 # whether the cross-compilation host returns suitable values from
 233 # UPGRADED-ARRAY-ELEMENT-TYPE?)
 234
 235 if [ "$OSTYPE" = "cygwin" -o "$OSTYPE" = "msys" ] ; then
 236     DEVNULL=NUL
 237 else
 238     DEVNULL=/dev/null
 239 fi
 240 export DEVNULL
 241
 242 . ./find-gnumake.sh
 243 find_gnumake
 244
 245 ./generate-version.sh
 246
 247 # Now that we've done our option parsing and found various
 248 # dependencies, write them out to a file to be sourced by other
 249 # scripts.
 250
 251 echo "DEVNULL=\"$DEVNULL\"; export DEVNULL" > output/build-config
 252 echo "GNUMAKE=\"$GNUMAKE\"; export GNUMAKE" >> output/build-config
 253 echo "SBCL_XC_HOST=\"$SBCL_XC_HOST\"; export SBCL_XC_HOST" >> output/build-config
 254 echo "legacy_xc_spec=\"$legacy_xc_spec\"; export legacy_xc_spec" >> output/build-config
 255 if [ -n "$SBCL_HOST_LOCATION" ]; then
 256     echo "SBCL_HOST_LOCATION=\"$SBCL_HOST_LOCATION\"; export SBCL_HOST_LOCATION" >> output/build-config
 257 fi
 258 if [ -n "$SBCL_TARGET_LOCATION" ]; then
 259     echo "SBCL_TARGET_LOCATION=\"$SBCL_TARGET_LOCATION\"; export SBCL_TARGET_LOCATION" >> output/build-config
 260 fi
 261
 262 # And now, sorting out the per-target dependencies...
 263
 264 case `uname` in
 265     Linux)
 266         sbcl_os="linux"
 267         ;;
 268     OSF1)
 269         # it's changed name twice since it was called OSF/1: clearly
 270         # the marketers forgot to tell the engineers about Digital Unix
 271         # _or_ OSF/1 ...
 272         sbcl_os="osf1"
 273         ;;
 274     *BSD)
 275         case `uname` in
 276             FreeBSD)
 277                 sbcl_os="freebsd"
 278                 ;;
 279             GNU/kFreeBSD)
 280                 sbcl_os="gnu-kfreebsd"
 281                 ;;
 282             OpenBSD)
 283                 sbcl_os="openbsd"
 284                 ;;
 285             NetBSD)
 286                 sbcl_os="netbsd"
 287                 ;;
 288             *)
 289                 echo unsupported BSD variant: `uname`
 290                 exit 1
 291                 ;;
 292         esac
 293         ;;
 294     DragonFly)
 295         sbcl_os="dragonfly"
 296         ;;
 297     Darwin)
 298         sbcl_os="darwin"
 299         ;;
 300     SunOS)
 301         sbcl_os="sunos"
 302         ;;
 303     CYGWIN* | WindowsNT | MINGW* | MSYS*)
 304         sbcl_os="win32"
 305         ;;
 306     HP-UX)
 307         sbcl_os="hpux"
 308         ;;
 309     *)
 310         echo unsupported OS type: `uname`
 311         exit 1
 312         ;;
 313 esac
 314
 315 link_or_copy() {
 316    if [ "$sbcl_os" = "win32" ] ; then
 317       # Use preprocessor or makefile includes instead of copying if
 318       # possible, to avoid unexpected use of the original, unchanged
 319       # files when re-running only make-target-1 during development.
 320       if echo "$1" | egrep '[.][ch]$'; then
 321          echo "#include \"$1\"" >"$2"
 322       elif echo "$1" | egrep '^Config[.]'; then
 323          echo "include $1" >"$2"
 324       else
 325          cp -r "$1" "$2"
 326       fi
 327    else
 328        ln -s "$1" "$2"
 329    fi
 330 }
 331
 332 remove_dir_safely() {
 333    if [ "$sbcl_os" = "win32" ] ; then
 334         if [ -d "$1" ] ; then
 335             rm -rf "$1"
 336         elif [ -e "$1" ] ; then
 337             echo "I'm afraid to remove non-directory $1."
 338             exit 1
 339         fi
 340     else
 341         if [ -h "$1" ] ; then
 342             rm "$1"
 343         elif [ -w "$1" ] ; then
 344             echo "I'm afraid to replace non-symlink $1 with a symlink."
 345             exit 1
 346         fi
 347     fi
 348 }
 349
 350 echo //entering make-config.sh
 351
 352 echo //ensuring the existence of output/ directory
 353 if [ ! -d output ] ; then mkdir output; fi
 354
 355 echo //guessing default target CPU architecture from host architecture
 356 case `uname -m` in
 357     *86) guessed_sbcl_arch=x86 ;;
 358     i86pc) guessed_sbcl_arch=x86 ;;
 359     *x86_64) guessed_sbcl_arch=x86-64 ;;
 360     amd64) guessed_sbcl_arch=x86-64 ;;
 361     [Aa]lpha) guessed_sbcl_arch=alpha ;;
 362     sparc*) guessed_sbcl_arch=sparc ;;
 363     sun*) guessed_sbcl_arch=sparc ;;
 364     *ppc) guessed_sbcl_arch=ppc ;;
 365     ppc64) guessed_sbcl_arch=ppc ;;
 366     Power*Macintosh) guessed_sbcl_arch=ppc ;;
 367     ibmnws) guessed_sbcl_arch=ppc ;;
 368     parisc) guessed_sbcl_arch=hppa ;;
 369     9000/800) guessed_sbcl_arch=hppa ;;
 370     mips*) guessed_sbcl_arch=mips ;;
 371     arm*) guessed_sbcl_arch=arm ;;
 372     aarch64) guessed_sbcl_arch=arm ;;
 373     *)
 374         # If we're not building on a supported target architecture, we
 375         # we have no guess, but it's not an error yet, since maybe
 376         # target architecture will be specified explicitly below.
 377         guessed_sbcl_arch=''
 378         ;;
 379 esac
 380
 381 # Under Solaris, uname -m returns "i86pc" even if CPU is amd64.
 382 if [ "$sbcl_os" = "sunos" ] && [ `isainfo -k` = "amd64" ]; then
 383     guessed_sbcl_arch=x86-64
 384 fi
 385
 386 # Under Darwin, uname -m returns "i386" even if CPU is x86_64.
 387 if [ "$sbcl_os" = "darwin" ] && [ "`/usr/sbin/sysctl -n hw.optional.x86_64`" = "1" ]; then
 388     guessed_sbcl_arch=x86-64
 389 fi
 390
 391 echo //setting up CPU-architecture-dependent information
 392 if test -n "$SBCL_ARCH"
 393 then
 394     # Normalize it.
 395     SBCL_ARCH=`echo $SBCL_ARCH | tr '[A-Z]' '[a-z]' | tr _ -`
 396 fi
 397 sbcl_arch=${SBCL_ARCH:-$guessed_sbcl_arch}
 398 echo sbcl_arch=\"$sbcl_arch\"
 399 if [ "$sbcl_arch" = "" ] ; then
 400     echo "can't guess target SBCL architecture, please specify --arch=<name>"
 401     exit 1
 402 fi
 403 if $fancy
 404 then
 405     # If --fancy, enable threads on platforms where they can be built.
 406     case $sbcl_arch in
 407         x86|x86-64|ppc)
 408             if ([ "$sbcl_os" = "sunos" ] && [ "$sbcl_arch" = "x86-64" ]) || \
 409                 [ "$sbcl_os" = "dragonfly" ]
 410             then
 411                 echo "No threads on this platform."
 412             else
 413                 WITH_FEATURES="$WITH_FEATURES :sb-thread"
 414                 echo "Enabling threads due to --fancy."
 415             fi
 416             ;;
 417         *)
 418             echo "No threads on this platform."
 419             ;;
 420     esac
 421 else
 422     case $sbcl_arch in
 423         x86|x86-64)
 424             case $sbcl_os in
 425                 linux)
 426                     WITH_FEATURES="$WITH_FEATURES :sb-thread"
 427             esac
 428     esac
 429 fi
 430
 431 ltf=`pwd`/local-target-features.lisp-expr
 432 echo //initializing $ltf
 433 echo ';;;; This is a machine-generated file.' > $ltf
 434 echo ';;;; Please do not edit it by hand.' >> $ltf
 435 echo ';;;; See make-config.sh.' >> $ltf
 436 echo "(lambda (features) (union (set-difference (union features (list$WITH_FEATURES)) (list$WITHOUT_FEATURES))" >> $ltf
 437 printf " (list " >> $ltf
 438
 439 printf ":%s" "$sbcl_arch" >> $ltf
 440
 441 echo //setting up OS-dependent information
 442 # Under Darwin x86-64, guess whether Darwin 9+ or below.
 443 if [ "$sbcl_os" = "darwin" ] && [ "$sbcl_arch" = "x86-64" ]; then
 444     darwin_version=`uname -r`
 445     darwin_version_major=${DARWIN_VERSION_MAJOR:-${darwin_version%%.*}}
 446     if (( 8 < $darwin_version_major )); then
 447         printf ' :inode64 :darwin9-or-better' >> $ltf
 448     fi
 449 fi
 450
 451 original_dir=`pwd`
 452 cd ./src/runtime/
 453 rm -f Config target-arch-os.h target-arch.h target-os.h target-lispregs.h
 454 # KLUDGE: these two logically belong in the previous section
 455 # ("architecture-dependent"); it seems silly to enforce this in terms
 456 # of the shell script, though. -- CSR, 2002-02-03
 457 link_or_copy $sbcl_arch-arch.h target-arch.h
 458 link_or_copy $sbcl_arch-lispregs.h target-lispregs.h
 459 case "$sbcl_os" in
 460     linux)
 461         printf ' :unix' >> $ltf
 462         printf ' :elf' >> $ltf
 463         printf ' :linux' >> $ltf
 464
 465         # If you add other platforms here, don't forget to edit
 466         # src/runtime/Config.foo-linux too.
 467         case "$sbcl_arch" in
 468             mips | arm)
 469                 printf ' :largefile' >> $ltf
 470                 ;;
 471             x86 | x86-64)
 472                 printf ' :sb-futex :largefile' >> $ltf
 473                 ;;
 474             ppc)
 475                 printf ' :sb-futex' >> $ltf
 476                 ;;
 477         esac
 478
 479
 480         link_or_copy Config.$sbcl_arch-linux Config
 481         link_or_copy $sbcl_arch-linux-os.h target-arch-os.h
 482         link_or_copy linux-os.h target-os.h
 483         ;;
 484     osf1)
 485         printf ' :unix' >> $ltf
 486         printf ' :elf' >> $ltf
 487         printf ' :osf1' >> $ltf
 488         link_or_copy Config.$sbcl_arch-osf1 Config
 489         link_or_copy $sbcl_arch-osf1-os.h target-arch-os.h
 490         link_or_copy osf1-os.h target-os.h
 491         ;;
 492     hpux)
 493         printf ' :unix' >> $ltf
 494         printf ' :elf' >> $ltf
 495         printf ' :hpux' >> $ltf
 496         link_or_copy Config.$sbcl_arch-hpux Config
 497         link_or_copy $sbcl_arch-hpux-os.h target-arch-os.h
 498         link_or_copy hpux-os.h target-os.h
 499         ;;
 500     *bsd)
 501         printf ' :unix' >> $ltf
 502         printf ' :bsd' >> $ltf
 503         link_or_copy $sbcl_arch-bsd-os.h target-arch-os.h
 504         link_or_copy bsd-os.h target-os.h
 505         case "$sbcl_os" in
 506             *freebsd)
 507                 printf ' :elf' >> $ltf
 508                 printf ' :freebsd' >> $ltf
 509                 printf ' :gcc-tls' >> $ltf
 510                 if [ $sbcl_os = "gnu-kfreebsd" ]; then
 511                     printf ' :gnu-kfreebsd' >> $ltf
 512                 fi
 513
 514                 if [ $sbcl_arch = "x86" ]; then
 515                     printf ' :restore-fs-segment-register-from-tls' >> $ltf
 516                 fi
 517                 link_or_copy Config.$sbcl_arch-$sbcl_os Config
 518                 ;;
 519             openbsd)
 520                 printf ' :elf' >> $ltf
 521                 printf ' :openbsd' >> $ltf
 522                 link_or_copy Config.$sbcl_arch-openbsd Config
 523                 ;;
 524             netbsd)
 525                 printf ' :netbsd' >> $ltf
 526                 printf ' :elf' >> $ltf
 527                 link_or_copy Config.$sbcl_arch-netbsd Config
 528                 ;;
 529             *)
 530                 echo unsupported BSD variant: `uname`
 531                 exit 1
 532                 ;;
 533         esac
 534         ;;
 535     dragonfly)
 536         printf ' :unix' >> $ltf
 537         printf ' :bsd' >> $ltf
 538         printf ' :elf' >> $ltf
 539         printf ' :dragonfly' >> $ltf
 540         printf ' :sb-qshow' >> $ltf
 541         if [ $sbcl_arch = "x86" ]; then
 542             printf ' :restore-fs-segment-register-from-tls' >> $ltf
 543         fi
 544         link_or_copy $sbcl_arch-bsd-os.h target-arch-os.h
 545         link_or_copy bsd-os.h target-os.h
 546         link_or_copy Config.$sbcl_arch-dragonfly Config
 547         ;;
 548     darwin)
 549         printf ' :unix' >> $ltf
 550         printf ' :mach-o' >> $ltf
 551         printf ' :bsd' >> $ltf
 552         printf ' :darwin' >> $ltf
 553         if [ $sbcl_arch = "x86" ]; then
 554             printf ' :mach-exception-handler :restore-fs-segment-register-from-tls :ud2-breakpoints' >> $ltf
 555         fi
 556         if [ $sbcl_arch = "x86-64" ]; then
 557             printf ' :mach-exception-handler :ud2-breakpoints' >> $ltf
 558         fi
 559         link_or_copy $sbcl_arch-darwin-os.h target-arch-os.h
 560         link_or_copy bsd-os.h target-os.h
 561         link_or_copy Config.$sbcl_arch-darwin Config
 562         ;;
 563     sunos)
 564         printf ' :unix' >> $ltf
 565         printf ' :elf' >> $ltf
 566         printf ' :sunos' >> $ltf
 567         if [ $sbcl_arch = "x86-64" ]; then
 568             printf ' :largefile' >> $ltf
 569         fi
 570         link_or_copy Config.$sbcl_arch-sunos Config
 571         link_or_copy $sbcl_arch-sunos-os.h target-arch-os.h
 572         link_or_copy sunos-os.h target-os.h
 573         ;;
 574     win32)
 575         printf ' :win32' >> $ltf
 576         #
 577         # Optional features -- We enable them by default, but the build
 578         # ought to work perfectly without them:
 579         #
 580         printf ' :sb-futex' >> $ltf
 581         printf ' :sb-qshow' >> $ltf
 582         #
 583         # Required features -- Some of these used to be optional, but
 584         # building without them is no longer considered supported:
 585         #
 586         # (Of course it doesn't provide dlopen, but there is
 587         # roughly-equivalent magic nevertheless:)
 588         printf ' :sb-dynamic-core :os-provides-dlopen' >> $ltf
 589         printf ' :sb-thread :sb-safepoint :sb-thruption :sb-wtimer' >> $ltf
 590         printf ' :sb-safepoint-strictly' >> $ltf
 591         #
 592         link_or_copy Config.$sbcl_arch-win32 Config
 593         link_or_copy $sbcl_arch-win32-os.h target-arch-os.h
 594         link_or_copy win32-os.h target-os.h
 595         ;;
 596     *)
 597         echo unsupported OS type: `uname`
 598         exit 1
 599         ;;
 600 esac
 601 cd "$original_dir"
 602
 603 # FIXME: Things like :c-stack-grows-..., etc, should be
 604 # *derived-target-features* or equivalent, so that there was a nicer
 605 # way to specify them then sprinkling them in this file. They should
 606 # still be tweakable by advanced users, though, but probably not
 607 # appear in *features* of target. #!+/- should be adjusted to take
 608 # them in account as well. At minimum the nicer specification stuff,
 609 # though:
 610 #
 611 # (define-feature :dlopen (features)
 612 #   (union '(:bsd :linux :darwin :sunos) features))
 613 #
 614 # (define-feature :c-stack-grows-downwards-not-upwards (features)
 615 #   (member :x86 features))
 616
 617 # KLUDGE: currently the x86 only works with the generational garbage
 618 # collector (indicated by the presence of :GENCGC in *FEATURES*) and
 619 # alpha, sparc and ppc with the stop'n'copy collector (indicated by
 620 # the absence of :GENCGC in *FEATURES*). This isn't a great
 621 # separation, but for now, rather than have :GENCGC in
 622 # base-target-features.lisp-expr, we add it into local-target-features
 623 # if we're building for x86. -- CSR, 2002-02-21 Then we do something
 624 # similar with :STACK-GROWS-FOOWARD, too. -- WHN 2002-03-03
 625 if [ "$sbcl_arch" = "x86" ]; then
 626     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack' >> $ltf
 627     printf ' :compare-and-swap-vops :unwind-to-frame-and-call-vop :raw-instance-init-vops' >> $ltf
 628     printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf
 629     printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf
 630     printf ' :alien-callbacks :cycle-counter :inline-constants :precise-arg-count-error' >> $ltf
 631     printf ' :memory-barrier-vops :multiply-high-vops :ash-right-vops :symbol-info-vops' >> $ltf
 632     case "$sbcl_os" in
 633     linux | freebsd | gnu-kfreebsd | netbsd | openbsd | sunos | darwin | win32 | dragonfly)
 634         printf ' :linkage-table' >> $ltf
 635     esac
 636     if [ "$sbcl_os" = "win32" ]; then
 637         # of course it doesn't provide dlopen, but there is
 638         # roughly-equivalent magic nevertheless.
 639         printf ' :os-provides-dlopen' >> $ltf
 640     fi
 641     if [ "$sbcl_os" = "openbsd" ]; then
 642         rm -f src/runtime/openbsd-sigcontext.h
 643         sh tools-for-build/openbsd-sigcontext.sh > src/runtime/openbsd-sigcontext.h
 644     fi
 645 elif [ "$sbcl_arch" = "x86-64" ]; then
 646     printf ' :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table' >> $ltf
 647     printf ' :compare-and-swap-vops :unwind-to-frame-and-call-vop :raw-instance-init-vops' >> $ltf
 648     printf ' :interleaved-raw-slots :precise-arg-count-error' >> $ltf
 649     printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf
 650     printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf
 651     printf ' :alien-callbacks :cycle-counter :complex-float-vops' >> $ltf
 652     printf ' :float-eql-vops :integer-eql-vop :inline-constants :memory-barrier-vops' >> $ltf
 653     printf ' :multiply-high-vops :sb-simd-pack :ash-right-vops :symbol-info-vops' >> $ltf
 654 elif [ "$sbcl_arch" = "mips" ]; then
 655     printf ' :cheneygc :linkage-table' >> $ltf
 656     printf ' :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf
 657     printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf
 658     printf ' :alien-callbacks' >> $ltf
 659 elif [ "$sbcl_arch" = "ppc" ]; then
 660     printf ' :gencgc :stack-allocatable-closures :stack-allocatable-vectors' >> $ltf
 661     printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf
 662     printf ' :linkage-table :raw-instance-init-vops :memory-barrier-vops' >> $ltf
 663     printf ' :compare-and-swap-vops :multiply-high-vops :alien-callbacks' >> $ltf
 664     if [ "$sbcl_os" = "linux" ]; then
 665         # Use a C program to detect which kind of glibc we're building on,
 666         # to bandage across the break in source compatibility between
 667         # versions 2.3.1 and 2.3.2
 668         #
 669         # FIXME: integrate to grovel-features, mayhaps
 670         $GNUMAKE -C tools-for-build where-is-mcontext -I ../src/runtime
 671         tools-for-build/where-is-mcontext > src/runtime/ppc-linux-mcontext.h || (echo "error running where-is-mcontext"; exit 1)
 672     elif [ "$sbcl_os" = "darwin" ]; then
 673         # We provide a dlopen shim, so a little lie won't hurt
 674         printf ' :os-provides-dlopen' >> $ltf
 675         # The default stack ulimit under darwin is too small to run PURIFY.
 676         # Best we can do is complain and exit at this stage
 677         if [ "`ulimit -s`" = "512" ]; then
 678             echo "Your stack size limit is too small to build SBCL."
 679             echo "See the limit(1) or ulimit(1) commands and the README file."
 680             exit 1
 681         fi
 682     fi
 683 elif [ "$sbcl_arch" = "sparc" ]; then
 684     # Test the compiler in order to see if we are building on Sun
 685     # toolchain as opposed to GNU binutils, and write the appropriate
 686     # FUNCDEF macro for assembler. No harm in running this on sparc-linux
 687     # as well.
 688     sh tools-for-build/sparc-funcdef.sh > src/runtime/sparc-funcdef.h
 689     if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then
 690         printf ' :gencgc' >> $ltf
 691     else
 692         echo '***'
 693         echo '*** You are running SPARC on non-SunOS, non-Linux.  Since'
 694         echo '*** GENCGC is untested on this combination, make-config.sh'
 695         echo '*** is falling back to CHENEYGC.  Please consider adjusting'
 696         echo '*** parms.lisp to build with GENCGC instead.'
 697         echo '***'
 698         printf ' :cheneygc' >> $ltf
 699     fi
 700     if [ "$sbcl_os" = "sunos" ] || [ "$sbcl_os" = "linux" ]; then
 701         printf ' :linkage-table' >> $ltf
 702     fi
 703     printf ' :stack-allocatable-closures :stack-allocatable-lists' >> $ltf
 704 elif [ "$sbcl_arch" = "alpha" ]; then
 705     printf ' :cheneygc' >> $ltf
 706     printf ' :stack-allocatable-closures :stack-allocatable-lists' >> $ltf
 707 elif [ "$sbcl_arch" = "hppa" ]; then
 708     printf ' :cheneygc' >> $ltf
 709     printf ' :stack-allocatable-vectors :stack-allocatable-fixed-objects' >> $ltf
 710     printf ' :stack-allocatable-lists' >> $ltf
 711 elif [ "$sbcl_arch" = "arm" ]; then
 712     printf ' :gencgc :linkage-table :alien-callbacks' >> $ltf
 713     # As opposed to soft-float or FPA, we support VFP only (and
 714     # possibly VFPv2 and higher only), but we'll leave the obvious
 715     # hooks in for someone to add the support later.
 716     printf ' :arm-vfp :arm-vfpv2' >> $ltf
 717     printf ' :ash-right-vops :multiply-high-vops :symbol-info-vops' >> $ltf
 718     printf ' :stack-allocatable-lists :stack-allocatable-fixed-objects' >> $ltf
 719     printf ' :stack-allocatable-vectors :stack-allocatable-closures' >> $ltf
 720     printf ' :precise-arg-count-error :unwind-to-frame-and-call-vop' >> $ltf
 721 else
 722     # Nothing need be done in this case, but sh syntax wants a placeholder.
 723     echo > /dev/null
 724 fi
 725
 726 # Use a little C program to try to guess the endianness.  Ware
 727 # cross-compilers!
 728 #
 729 # FIXME: integrate to grovel-features, mayhaps
 730 $GNUMAKE -C tools-for-build determine-endianness -I ../src/runtime
 731 tools-for-build/determine-endianness >> $ltf
 732
 733 export sbcl_os sbcl_arch
 734 sh tools-for-build/grovel-features.sh >> $ltf
 735
 736 echo //finishing $ltf
 737 echo ')))' >> $ltf
 738
 739 # FIXME: The version system should probably be redone along these lines:
 740 #
 741 # echo //setting up version information.
 742 # versionfile=version.txt
 743 # cp base-version.txt $versionfile
 744 # echo " (built `date -u` by `whoami`@`hostname`)" >> $versionfile
 745 # echo 'This is a machine-generated file and should not be edited by hand.' >> $versionfile
 746
 747 # Make a unique ID for this build (to discourage people from
 748 # mismatching sbcl and *.core files).
 749 if [ `uname` = "SunOS" ] ; then
 750   # use /usr/xpg4/bin/id instead of /usr/bin/id
 751   PATH=/usr/xpg4/bin:$PATH
 752 fi
 753 echo '"'`hostname`-`id -un`-`date +%Y-%m-%d-%H-%M-%S`'"' > output/build-id.tmp
 754
 755 if [ -n "$SBCL_HOST_LOCATION" ]; then
 756     echo //setting up host configuration
 757     rsync --delete-after -a output/ "$SBCL_HOST_LOCATION/output/"
 758     rsync -a local-target-features.lisp-expr version.lisp-expr "$SBCL_HOST_LOCATION/"
 759 fi