diff options
Diffstat (limited to 'dev-lisp/sbcl/files')
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/README.Gentoo | 21 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp | 19 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp.no-threads | 19 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/install-clc.lisp | 53 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/posix-tests.lisp-sandbox-gentoo.patch | 57 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/sbcl-asdf-install.1 | 126 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/sbcl-gentoo.patch | 34 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/0.8.8/sbcl.sh | 80 | ||||
-rw-r--r-- | dev-lisp/sbcl/files/digest-sbcl-0.8.8 | 6 |
9 files changed, 415 insertions, 0 deletions
diff --git a/dev-lisp/sbcl/files/0.8.8/README.Gentoo b/dev-lisp/sbcl/files/0.8.8/README.Gentoo new file mode 100644 index 000000000000..ac3a9fc04732 --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/README.Gentoo @@ -0,0 +1,21 @@ +-*- outline -*- + +Gentoo GNU/Linux specific notes for SBCL +---------------------------------------- + +This is the README.Gentoo file from /usr/share/doc/@PF@/ +directory. + + * The Gentoo port uses patches from the Debian project's SBCL port. + + * An SBCL with support for multi-threading on GNU/Linux for x86 is + available with 'USE="threads" emerge dev-lisp/sbcl' + + * asdf-install is installed as sbcl-asdf-install (the man-page is + similarly named). + + * Support for the Common Lisp Controller is available. + +If you encounter any problems or have suggestions, use +http://bugs.gentoo.org. Please don't bother the upstream authors +unless you are absolutely certain it is not Gentoo-related. diff --git a/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp b/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp new file mode 100644 index 000000000000..7663f4802619 --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp @@ -0,0 +1,19 @@ +;;;; -*- Lisp -*- + +;;;; This is the features customization lambda form we will use if the +;;;; user has "threads" in USE *and* they are building for the x86 +;;;; architecture. + +;;;; :sb-futex is dependent on the presence of a Linux 2.6.x kernel. +;;;; For users of Linux 2.4.x kernels, this is still okay to enable, +;;;; as SBCL will fall back if the futex system-call is not present. + +(lambda (list) + (flet ((enable (x) + (pushnew x list)) + (disable (x) + (setf list (remove x list)))) + (enable :sb-thread) + (enable :sb-futex) + (disable :sb-test)) + list) diff --git a/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp.no-threads b/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp.no-threads new file mode 100644 index 000000000000..100d84059509 --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/customize-target-features.lisp.no-threads @@ -0,0 +1,19 @@ +;;;; -*- Lisp -*- + +;;;; This is the features customization lambda form we will use if the +;;;; user has "threads" in USE *and* they are building for the x86 +;;;; architecture. + +;;;; :sb-futex is dependent on the presence of a Linux 2.6.x kernel. +;;;; For users of Linux 2.4.x kernels, this is still okay to enable, +;;;; as SBCL will fall back if the futex system-call is not present. + +(lambda (list) + (flet ((enable (x) + (pushnew x list)) + (disable (x) + (setf list (remove x list)))) + (disable :sb-thread) + (disable :sb-futex) + (disable :sb-test)) + list) diff --git a/dev-lisp/sbcl/files/0.8.8/install-clc.lisp b/dev-lisp/sbcl/files/0.8.8/install-clc.lisp new file mode 100644 index 000000000000..2f9a28fcab12 --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/install-clc.lisp @@ -0,0 +1,53 @@ +;;; -*- Mode: LISP; Package: CL-USER -*- +;;; +;;; Copyright (C) Peter Van Eynde 2001 and Kevin Rosenberg 2002-2003 +;;; +;;; License: LGPL v2 +;;; +;;; Some modifications for Gentoo, Matthew Kennedy <mkennedy@gentoo.org> +;;; + +(in-package "COMMON-LISP-USER") + +(unless (ignore-errors + (load "/usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp")) + (sb-unix:unix-exit 1)) + +(unless (ignore-errors + (common-lisp-controller:init-common-lisp-controller + "/usr/lib/common-lisp/sbcl/" + :version 3) + t) + (format t "~%Error during init of common-lisp-controller~%") + (sb-unix:unix-exit 1)) + +(in-package :common-lisp-controller) + +(defun send-clc-command (command package) + (let ((process + (sb-ext:run-program "/usr/bin/clc-send-command" + (list + (ecase command + (:recompile "recompile") + (:remove "remove")) + (format nil "~A" package) + "sbcl" + "--quiet") + :wait t))) + (if (= (sb-ext:process-exit-code process) 0) + (values) + (error "An error happened during ~A of ~A for ~A~%Please see /usr/share/doc/common-lisp-controller/REPORTING-BUGS.gz" + (ecase command + (:recompile "recompilation") + (:remove "removal")) + package + "sbcl")))) + +(in-package :common-lisp-user) + +(ignore-errors + (format t "~%Saving to sbcl-new.core...") + (sb-ext:gc :full t) +;(setf ext:*batch-mode* nil) + (sb-ext:save-lisp-and-die "sbcl-new.core" + :purify t)) diff --git a/dev-lisp/sbcl/files/0.8.8/posix-tests.lisp-sandbox-gentoo.patch b/dev-lisp/sbcl/files/0.8.8/posix-tests.lisp-sandbox-gentoo.patch new file mode 100644 index 000000000000..5e482a6a4b8a --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/posix-tests.lisp-sandbox-gentoo.patch @@ -0,0 +1,57 @@ +diff -ur sbcl-0.8.7.original/contrib/sb-posix/posix-tests.lisp sbcl-0.8.7/contrib/sb-posix/posix-tests.lisp +--- sbcl-0.8.7.original/contrib/sb-posix/posix-tests.lisp 2003-11-28 21:50:00.000000000 -0600 ++++ sbcl-0.8.7/contrib/sb-posix/posix-tests.lisp 2004-01-10 20:33:11.527976216 -0600 +@@ -76,19 +76,19 @@ + (sb-posix:syscall-errno c))) + #.sb-posix::eexist) + +-(deftest mkdir.error.2 +- (handler-case +- (sb-posix:mkdir "/" 0) +- (sb-posix:syscall-error (c) +- (sb-posix:syscall-errno c))) +- #.sb-posix::eexist) +- +-(deftest mkdir.error.3 +- (handler-case +- (sb-posix:mkdir "/almost-certainly-does-not-exist" 0) +- (sb-posix:syscall-error (c) +- (sb-posix:syscall-errno c))) +- #.sb-posix::eacces) ++;; (deftest mkdir.error.2 ++;; (handler-case ++;; (sb-posix:mkdir "/" 0) ++;; (sb-posix:syscall-error (c) ++;; (sb-posix:syscall-errno c))) ++;; #.sb-posix::eexist) ++ ++;; (deftest mkdir.error.3 ++;; (handler-case ++;; (sb-posix:mkdir "/almost-certainly-does-not-exist" 0) ++;; (sb-posix:syscall-error (c) ++;; (sb-posix:syscall-errno c))) ++;; #.sb-posix::eacces) + + (deftest rmdir.1 + (let ((dne (make-pathname :directory '(:relative "rmdir.does-not-exist.1")))) +@@ -117,13 +117,13 @@ + (sb-posix:syscall-errno c))) + #.sb-posix::enotdir) + +-#-sunos ; Apparently gives EINVAL on SunOS 8, which doesn't make sense +-(deftest rmdir.error.3 +- (handler-case +- (sb-posix:rmdir "/") +- (sb-posix:syscall-error (c) +- (sb-posix:syscall-errno c))) +- #.sb-posix::ebusy) ++;; #-sunos ; Apparently gives EINVAL on SunOS 8, which doesn't make sense ++;; (deftest rmdir.error.3 ++;; (handler-case ++;; (sb-posix:rmdir "/") ++;; (sb-posix:syscall-error (c) ++;; (sb-posix:syscall-errno c))) ++;; #.sb-posix::ebusy) + + (deftest rmdir.error.4 + (let* ((dir (ensure-directories-exist diff --git a/dev-lisp/sbcl/files/0.8.8/sbcl-asdf-install.1 b/dev-lisp/sbcl/files/0.8.8/sbcl-asdf-install.1 new file mode 100644 index 000000000000..be8f754a6bdc --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/sbcl-asdf-install.1 @@ -0,0 +1,126 @@ +.TH SBCL-ASDF-INSTALL 1 "$Date: 2004/02/27 22:15:36 $" +.AT 3 +.SH NAME +SBCL-ASDF-INSTALL -- "Download an Install ASDF Systems" + +.SH DESCRIPTION + +Downloads and installs an ASDF system or anything else that looks +convincingly like one, including updating the ASDF:*CENTRAL-REGISTRY* +symlinks for all the toplevel .asd files it contains. Please read +this file before use: in particular: this is an automatic tool that +downloads and compiles stuff it finds on the 'net. Please look at the +SECURITY section and be sure you understand the implications + + +.SH USAGE + +This can be used either from within an SBCL instance: + +* (require 'asdf-install) +* (asdf-install:install 'xlunit) ; for example + +or standalone from the shell: + +$ sbcl-asdf-install xlunit + +Each argument may be - + + - The name of a cliki page. asdf-install visits that page and finds + the download location from the `:(package)' tag - usually rendered + as "Download ASDF package from ..." + + - A URL, which is downloaded directly + + - A local tar.gz file, which is installed + + +.SH SECURITY CONCERNS: READ THIS CAREFULLY + +When you invoke asdf-install, you are asking SBCL to download, +compile, and install software from some random site on the web. Given +that it's indirected through a page on CLiki, any malicious third party +doesn't even need to hack the distribution server to replace the +package with something else: he can just edit the link. + +For this reason, we encourage package providers to crypto-sign their +packages (see details at the URL in the PACKAGE CREATION section) and +users to check the signatures. asdf-install has three levels of +automatic signature checking: "on", "off" and "unknown sites", which +can be set using the configuration variables described in +CUSTOMIZATION below. The default is "unknown sites", which will +expect a GPG signature on all downloads except those from +presumed-good sites. The current default presumed-good sites are +CCLAN nodes, and two web sites run by SBCL maintainers: again, see +below for customization details + + +.SH CUSTOMIZATION + +If the file $HOME/.asdf-install exists, it is loaded. This can be +used to override the default values of exported special variables. +Presently these are + +.TP 3 +\-- +*PROXY* + defaults to $http_proxy environment variable +.TP 3 +\- +*CCLAN-MIRROR* + preferred/nearest CCLAN node. See the list at +http://ww.telent.net/cclan-choose-mirror +.TP 3 +\- +*SBCL-HOME* + Set from $SBCL_HOME environment variable. This should already be +correct for whatever SBCL is running, if it's been installed correctly +.TP 3 +\- +*VERIFY-GPG-SIGNATURES* + Verify GPG signatures for the downloaded packages? + NIL - no, T - yes, :UNKNOWN-LOCATIONS - only for URLs which aren't in CCLAN and don't begin with one of the prefixes in *SAFE-URL-PREFIXES* +.TP 3 +\- +*LOCATIONS* + Possible places in the filesystem to install packages into. See default +value for format +.TP 3 +\- +*SAFE-URL-PREFIXES* + List of locations for which GPG signature checking won't be done when +*verify-gpg-signatures* is :unknown-locations + + +.SH PACKAGE CREATION + +If you want to create your own packages that can be installed using this +loader, see the "Making your package downloadable..." section at +<http://www.cliki.net/asdf-install> + + +.SH HACKERS NOTE + +Listen very carefully: I will say this only as often as it appears to +be necessary to say it. asdf-install is not a good example of how to +write a URL parser, HTTP client, or anything else, really. +Well-written extensible and robust URL parsers, HTTP clients, FTP +clients, etc would definitely be nice things to have, but it would be +nicer to have them in CCLAN where anyone can use them - after having +downloaded them with asdf-install - than in SBCL contrib where they're +restricted to SBCL users and can only be updated once a month via SBCL +developers. This is a bootstrap tool, and as such, will tend to +resist changes that make it longer or dependent on more other +packages, unless they also add to its usefulness for bootstrapping. + + +.SH TODO + +a) gpg signature checking would be better if it actually checked against +a list of "trusted to write Lisp" keys, instead of just "trusted to be +who they say they are" + +e) nice to have: resume half-done downloads instead of starting from scratch +every time. but right now we're dealing in fairly small packages, this is not +an immediate concern + diff --git a/dev-lisp/sbcl/files/0.8.8/sbcl-gentoo.patch b/dev-lisp/sbcl/files/0.8.8/sbcl-gentoo.patch new file mode 100644 index 000000000000..20d25dcd293a --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/sbcl-gentoo.patch @@ -0,0 +1,34 @@ +diff -ur sbcl-0.8.8.original/contrib/sb-posix/posix-tests.lisp sbcl-0.8.8/contrib/sb-posix/posix-tests.lisp +--- sbcl-0.8.8.original/contrib/sb-posix/posix-tests.lisp 2004-02-07 00:53:29.000000000 -0600 ++++ sbcl-0.8.8/contrib/sb-posix/posix-tests.lisp 2004-02-25 14:22:07.426306400 -0600 +@@ -95,7 +95,7 @@ + (sb-posix:syscall-errno c))) + #.sb-posix::eexist) + +-(deftest mkdir.error.3 ++#+nil (deftest mkdir.error.3 + (handler-case + (sb-posix:mkdir "/almost-certainly-does-not-exist" 0) + (sb-posix:syscall-error (c) +@@ -129,7 +129,7 @@ + (sb-posix:syscall-errno c))) + #.sb-posix::enotdir) + +-#-sunos ; Apparently gives EINVAL on SunOS 8, which doesn't make sense ++#+nil + (deftest rmdir.error.3 + (handler-case + (sb-posix:rmdir "/") +Only in sbcl-0.8.8/contrib/sb-posix: posix-tests.lisp.~1.11.~ +diff -ur sbcl-0.8.8.original/src/runtime/GNUmakefile sbcl-0.8.8/src/runtime/GNUmakefile +--- sbcl-0.8.8.original/src/runtime/GNUmakefile 2004-02-20 01:51:03.000000000 -0600 ++++ sbcl-0.8.8/src/runtime/GNUmakefile 2004-02-24 23:18:58.000000000 -0600 +@@ -34,6 +34,7 @@ + # symlink to Config-foo. + include Config + ++CFLAGS += -DSBCL_HOME='"/usr/lib/sbcl"' + + C_SRCS = alloc.c backtrace.c breakpoint.c coreparse.c \ + dynbind.c gc-common.c globals.c interr.c interrupt.c \ +Only in sbcl-0.8.8/src/runtime: GNUmakefile.~1.18.~ diff --git a/dev-lisp/sbcl/files/0.8.8/sbcl.sh b/dev-lisp/sbcl/files/0.8.8/sbcl.sh new file mode 100644 index 000000000000..11d6c298404c --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.8/sbcl.sh @@ -0,0 +1,80 @@ +#!/bin/sh + +if [ ! -f /usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp ] ; then + cat <<EOF +$0: cannot find the common-lisp-controller source. +EOF + exit 0 +fi + +build_error() +{ + echo "Build failure $1" + exit 1 +} + +case $1 in + rebuild) + echo $0 rebuilding... + shift + echo rebuilding $1 + sbcl --noinform --sysinit /etc/sbcl.rc --userinit /dev/null \ + --disable-debugger \ + --eval \ +"(handler-case + (progn + (c-l-c:compile-library (quote $1)) + (sb-unix:unix-exit 0)) + (error (e) + (ignore-errors (format t \"~&Build error: ~A~%\" e)) + (finish-output) + (sb-unix:unix-exit 1)))" || build_error + ;; + remove) + echo $0 removing packages... + shift + while [ ! -z "$1" ] ; do + rm -rf "/usr/lib/common-lisp/sbcl/$1" + shift + done + ;; + install-defsystem | install-clc) + echo $0 loading and dumping clc. + ( cd /usr/lib/sbcl + sbcl --core /usr/lib/sbcl/sbcl-dist.core \ + --noinform --sysinit /etc/sbcl.rc --userinit /dev/null \ + --load "/usr/lib/sbcl/install-clc.lisp" 2> /dev/null + mv sbcl-new.core sbcl.core || (echo FAILED ; cp sbcl-dist.core sbcl.core ) ) + ;; + remove-defsystem | remove-clc) + echo $0 removing clc-enabled image + cp /usr/lib/sbcl/sbcl-dist.core /usr/lib/sbcl/sbcl.core + ;; + make-user-image) + if [ ! -f "$2" ] ; then + echo "Trying to make-user image, but can not find file $2" >&2 + exit 1 + fi + sbcl --core /usr/lib/sbcl/sbcl-dist.core \ + --noinform --sysinit /dev/null --userinit /dev/null \ + --eval \ +"(handler-case + (progn + (load \"$2\") + (sb-ext:gc :full t) + (sb-ext:save-lisp-and-die \"/usr/lib/sbcl/sbcl-new.core\" :purify t)) + (sb-unix:unix-exit 0)) + (error (e) + (ignore-errors (format t \"make-user-image error: ~A~%\" e)) + (finish-output) + (sb-unix:unix-exit 1)))" + mv sbcl-new.core sbcl.core || (echo FAILED ; cp sbcl-dist.core sbcl.core ) + ;; + *) + echo $0 unkown command $1 + echo known commands: rebuild, remove, make-user-image, install-clc and remove-clc + exit 1 + ;; +esac + +exit 0
\ No newline at end of file diff --git a/dev-lisp/sbcl/files/digest-sbcl-0.8.8 b/dev-lisp/sbcl/files/digest-sbcl-0.8.8 new file mode 100644 index 000000000000..2762990ae7d9 --- /dev/null +++ b/dev-lisp/sbcl/files/digest-sbcl-0.8.8 @@ -0,0 +1,6 @@ +MD5 a80d2bb990f80d8d13f947a68ea3c78b sbcl-0.8.8-source.tar.bz2 2082536 +MD5 a62413e2bb759b6683f94839722cd7e2 sbcl-0.8.8-html.tar.bz2 47029 +MD5 6c193e328cdb472787ef78401ee5294c sbcl-0.8.1-x86-linux-binary.tar.bz2 6348098 +MD5 1cbd667b28d6d5afabccc759315eea70 sbcl-0.7.13-binary-linux-ppc.tar.bz2 5339432 +MD5 7cb56cd42b1f5797d26316e79aaccb06 sbcl-0.7.13-sparc-linux-binary.tar.bz2 5670293 +MD5 29ad145f1fc45c65b8d65b39013bc43f sbcl-0.7.10-mips-linux-binary.tar.gz 7473873 |