initial common lisp import

5 files changed, 107 insertions, 3 deletions

diff --git a/dev-lisp/cl-db-sockets/ChangeLog b/dev-lisp/cl-db-sockets/ChangeLog
new file mode 100644
index 000000000000..bc5386bedaec
--- /dev/null
+++ b/dev-lisp/cl-db-sockets/ChangeLog
@@ -0,0 +1,8 @@
+# ChangeLog for dev-lisp/cl-db-sockets
+# Copyright 2000-2003 Gentoo Technologies, Inc.; Distributed under the GPL v2
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-db-sockets/ChangeLog,v 1.1 2003/06/10 04:53:04 mkennedy Exp $
+
+*cl-db-sockets-0.57.1 (07 Jul 2003)
+
+  07 Jul 2003; Matthew Kennedy <mkennedy@gentoo.org> :
+  initial import
diff --git a/dev-lisp/cl-db-sockets/Manifest b/dev-lisp/cl-db-sockets/Manifest
index 9288bd9a0e1e..81bcc4f547c5 100644
--- a/dev-lisp/cl-db-sockets/Manifest
+++ b/dev-lisp/cl-db-sockets/Manifest
@@ -1,5 +1,4 @@
-MD5 cdec37a757ee4e05f3aae90b1d0f925d ChangeLog 331
-MD5 f97b06df5e16b551662dbba8c791eb1c cl-db-sockets-0.57.1.ebuild 955
-MD5 f76feb0f8a7d38ddaddbe07f3f4a3f4e cl-db-sockets-0.57.1.ebuild~ 610
+MD5 649ddb555a1ef2e1e290f3b93357c1e4 ChangeLog 337
+MD5 e38b876fe7b276615bf6278073a78a89 cl-db-sockets-0.57.1.ebuild 1259
 MD5 334f3e2343d3fdfe50317eef0d9754fc files/db-sockets.asd 1932
 MD5 b1583fd16ea0c02c3122790055cdca7e files/digest-cl-db-sockets-0.57.1 76
diff --git a/dev-lisp/cl-db-sockets/cl-db-sockets-0.57.1.ebuild b/dev-lisp/cl-db-sockets/cl-db-sockets-0.57.1.ebuild
new file mode 100644
index 000000000000..031ea39df6a7
--- /dev/null
+++ b/dev-lisp/cl-db-sockets/cl-db-sockets-0.57.1.ebuild
@@ -0,0 +1,41 @@
+# Copyright 1999-2003 Gentoo Technologies, Inc.
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-db-sockets/cl-db-sockets-0.57.1.ebuild,v 1.1 2003/06/10 04:53:04 mkennedy Exp $
+
+inherit common-lisp
+
+DESCRIPTION="Dan Barlow's sockets library for Common Lisp programs."
+HOMEPAGE="http://cclan.sourceforge.net
+	http://packages.debian.org/unstable/devel/cl-db-sockets.html"
+SRC_URI="http://ftp.debian.org/debian/pool/main/c/cl-db-sockets/${PN}_${PV}.orig.tar.gz"
+LICENSE="MIT"
+SLOT="0"
+KEYWORDS="~x86"
+IUSE=""
+DEPEND="dev-lisp/common-lisp-controller
+	virtual/commonlisp
+	dev-lisp/cl-rt
+	dev-lisp/sbcl"
+
+CLPACKAGE=db-sockets
+
+S=${WORKDIR}/${P}
+
+# TODO: need to port constants-arch.lisp (use SBCL to generate it for
+# other implementations)
+
+src_compile() {
+	make || die
+}
+
+src_install() {
+	exeinto /usr/lib/db-sockets
+	doexe alien/alien.so
+	common-lisp-install array-data.lisp constants.lisp def-to-lisp.lisp \
+		defpackage.lisp doc.lisp foreign-glue.lisp inet.lisp malloc.lisp \
+		misc.lisp name-service.lisp sockets.lisp sockopt.lisp split.lisp \
+		tests.lisp unix.lisp constants-arch.lisp ${FILESDIR}/db-sockets.asd
+	common-lisp-system-symlink 
+	dohtml *.html
+	dodoc INSTALL NEWS README* TODO
+}
diff --git a/dev-lisp/cl-db-sockets/files/db-sockets.asd b/dev-lisp/cl-db-sockets/files/db-sockets.asd
new file mode 100644
index 000000000000..d63764e62fc3
--- /dev/null
+++ b/dev-lisp/cl-db-sockets/files/db-sockets.asd
@@ -0,0 +1,55 @@
+;;; -*-  Lisp -*-
+
+(defpackage #:db-sockets-system (:use #:asdf #:cl))
+(in-package #:db-sockets-system)
+
+;;; constants.lisp requires special treatment
+
+(defclass shared-library-file (source-file)
+  ((loaded :initform nil)))
+
+(defmethod perform ((o load-op) (c shared-library-file))
+  (unless (slot-value c 'loaded)
+    (let ((filename (make-pathname
+		     :name (pathname-name (component-pathname c))
+		     :type "so"
+		     :directory '(:absolute "usr" "lib" "db-sockets"))))
+      #+(or cmu scl) (ext:load-foreign filename)
+      #+sbcl (sb-alien:load-1-foreign filename))
+    (setf (slot-value c 'loaded) t)))
+
+(defmethod operation-done-p ((o load-op) (c shared-library-file))
+  (slot-value c 'loaded))
+
+(defmethod operation-done-p ((o compile-op) (c shared-library-file))
+  t)
+
+(defmethod source-file-type ((c shared-library-file) (s module))
+  "so")
+
+#+(or sbcl cmu scl)
+(defsystem db-sockets
+    :version "0.57.1"
+    :perform (load-op :after (op db-sockets)
+		      (pushnew :db-sockets cl:*features*))
+    :depends-on (:rt)
+    :components ((:file "defpackage")
+		 (:file "split" :depends-on ("defpackage"))
+                 (:file "array-data" :depends-on ("defpackage"))
+		 (:shared-library-file "alien")
+		 (:file "malloc" :depends-on ("defpackage"))
+		 (:file "foreign-glue" :depends-on ("defpackage" "malloc"))
+		 (:file "constants-arch" :depends-on ("defpackage"))
+		 (:file "sockets" :depends-on ("constants-arch"))
+		 #+ignore
+		 (:file "sockets"
+			:in-order-to ((compile-op
+				       (load-op "constants-arch"))))
+		 (:file "sockopt" :depends-on ("sockets"))
+		 (:file "inet" :depends-on ("sockets" "split"  "constants-arch" ))
+		 (:file "unix" :depends-on ("sockets" "split" "constants-arch" ))
+		 (:file "name-service" :depends-on ("sockets" "constants-arch" "alien"))
+		 (:file "misc" :depends-on ("sockets" "constants-arch"))
+		 (:file "def-to-lisp")
+		 (:file "tests" :depends-on ("inet" "sockopt"))
+		 ))
diff --git a/dev-lisp/cl-db-sockets/files/digest-cl-db-sockets-0.57.1 b/dev-lisp/cl-db-sockets/files/digest-cl-db-sockets-0.57.1
new file mode 100644
index 000000000000..094c7b8294ab
--- /dev/null
+++ b/dev-lisp/cl-db-sockets/files/digest-cl-db-sockets-0.57.1
@@ -0,0 +1 @@
+MD5 a03aab1d6f9b03f817d62f6c447272cd cl-db-sockets_0.57.1.orig.tar.gz 33246