r1745: *** empty log message ***
authorKevin M. Rosenberg <kevin@rosenberg.net>
Sat, 6 Apr 2002 19:57:55 +0000 (19:57 +0000)
committerKevin M. Rosenberg <kevin@rosenberg.net>
Sat, 6 Apr 2002 19:57:55 +0000 (19:57 +0000)
ChangeLog
Makefile
VERSION
doc/intro.sgml
interfaces/postgresql/postgresql-loader.cl
sql/usql.cl

index 101319e0bbe41393ecaf21d1350acab7216e63d0..55171fb5d3d015a124f876b830cf7522be5db840 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,87 +1,68 @@
+31 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
+       * src/usql.cl:
+       Reinstated commented out sections
+       * interfaces/postgresql/postgresql-loader.cl:
+       * interfaces/mysql/mysql-loader.cl:
+       Updated find-forieign-library support.
+
 31 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
        * Added interface to support USQL high-level rouines
        
 29 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
        * Separated db-interface and conditions from sql/sql.cl
-
        * Improved foreign library loading testing
-
        * interfaces/postgresql/postgresql-api.cl
        Added PQisBusy function
-
        * interfaces/clsql-uffi/clsql-uffi.cl
        Fixed sign error for 64-bit processing
        
-       * Optimizes :types processing if value is nil
-       
 27 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
        * interfaces/postgresql-socket/postgresql-socket-api.cl:
        Fixes to read-double-from-socket. Added 64-bit integer support.
-
        * test-suite/xptest-clsql.cl
        Added testint for 64-bit integers
-
        * Additons to installation docs
        
 26 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
        * interfaces/postgresql-socket/postgresql-socket-api.cl:
        Implemented direct socket reading for field type :double
-
        * Added usage information for :types to documentation
-
        * interfaces/mysql/mysql-sql.cl: Fixed type specifiers in atoi,
        atol, atof calls
-
        * interfaces/clsql-uffi: Created new directory. Split common
        interface routines that use UFFI into this package. Required
        especially to support direct reading of 64-bit integers into
        bignums and bypassing temporary strings.
-
        * test-clsql.cl: Updated to test postgresql-socket's
        read-double-from-socket function.
-       
        * test-suite/xptest-clsql.cl
        Started work on test suite
 
 25 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
-
        * interfaces/mysql/mysql-api.cl: Added mysql-fetch-fields,
        mysql-fetch-field-direct Got :auto types working
-
        * interfaces/postgresql/postgresql-api.cl
        * interfaces/postgresql-socket/postgresql-socket-api.cl
        Added pgsql-field-types enum. Got :auto types working.
-
        * multiple-files
        Renamed :field-types to :types.
        
 24 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
-
        * Added field-types parameter to query, database-query,
        database-query-result-set, map-query. Haven't added code
        to utilize field types, yet.
-
        * Changed postgresql-socket result set from cons to a structure
-
        * Updated test-clsql.cl to use automated testing with a config
        file
-
        * Changed return types of field accessors from cstring to
        (* :unsigned-char).  This prepares for being able to use specified
        type conversions when taking field data into lisp.
-
        * Added field-type processing for most interfaces. Not done yet.
        
 23 Mar 2002 Kevin Rosenberg (kevin@rosenberg.net)
-       
        * doc/ref.sgml: Updated MAP-QUERY example to use
        *read-default-float-format* (John Foderaro)
-       
        * Extensive work to foreign library loaders and .system files to
        check for successful loading of foreign libraries.
-
        * Modified test-clsql.cl to allow more modularity and
        automated testing in future release.
-
-               
-       
index 8ed3bda588d2abd5017ef87bbdec6e7e768d2eeb..3c1d5a983ee991aa8643441a182a46333fb50dec 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -5,7 +5,7 @@
 #  Programer:    Kevin M. Rosenberg
 #  Date Started: Mar 2002
 #
-#  CVS Id:   $Id: Makefile,v 1.5 2002/03/27 12:09:39 kevin Exp $
+#  CVS Id:   $Id: Makefile,v 1.6 2002/04/06 19:54:14 kevin Exp $
 #
 # This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 #
@@ -24,6 +24,7 @@ libs:
 clean:
        @rm -f $(PACKAGE)-*.tar.gz $(PACKAGE)-*.zip
        @find . -type d -name .bin |xargs rm -rf 
+       @find . -type f -name \*.a -or -name \*.so |xargs rm -rf 
 
 realclean: clean
        @find . -type f -name \*~ -exec rm {} \;
@@ -48,10 +49,14 @@ dist: realclean docs
        @cp -a $(SOURCE_FILES) $(DISTDIR)
        @find $(DISTDIR) -type d -name CVS | xargs rm -r
        @find $(DISTDIR) -type f -name .cvsignore -exec rm {} \;
-       @find $(DISTDIR)/doc -type f -name \*.tex -or -name \*.aux -or \
+       @find $(DISTDIR) -type f -and -name \*.tex -or -name \*.aux -or \
                 -name \*.log -or -name \*.out -or -name \*.dvi -or \
-                -name \*~ -or -name \*.ps -exec rm {} \;
+                -name \*~ -or -name \*.ps -or -name test.config | xargs rm -f
        @tar czf $(DIST_TARBALL) $(DISTDIR)
-       @find $(DISTDIR) -type f |grep -v .dll$ |grep -v .lib$ |xargs unix2dos -q
+       @find $(DISTDIR) -type f -name \*.cl -or -name \*.list -or \
+               -name \*.system -or -name Makefile -or -name ChangeLog -or \
+               -name COPYRIGHT -or -name TODO -or -name README -or -name INSTALL \
+               -or -name NEWS -or -name \*.sgml -or -name COPYING\* -or -name catalog \
+               | xargs unix2dos -q
        @zip -rq $(DIST_ZIP) $(DISTDIR)
        @rm -r $(DISTDIR)
diff --git a/VERSION b/VERSION
index e544e7a41b106f0c04e46c2662ca8d63e570e52f..ca73ed86a9cff3b9a52632eb9e1cb7b9f1405ff7 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -1,4 +1,4 @@
-0.6.2
+0.6.3
 
 
 
index c215b4adf06900b5b4211e7859c62235720bd4a4..c7b2d18a1c9fa04e266283e69db6ff218b7e5550 100644 (file)
@@ -86,13 +86,12 @@ test suite.</para>
       <title>Supported Common Lisp Implementation</title>
       <para>
 The implementations that support &clsql; is governed by the supported
-implementations of &uffi;. At the time of the initial release of &clsql;,
-the following implementations are supported:
+implementations of &uffi;. The following implementations are supported:
       </para>
       <itemizedlist mark="opencircle">
-       <listitem><para>&acl; v6.1 on Redhat Linux 7.2 and Microsoft Windows.</para></listitem>
-       <listitem><para>&lw; v4.2 on Redhat Linux 7.2 and Microsoft Windows.</para></listitem>
-       <listitem><para>&cmucl; 18d on Redhat Linux 7.2.</para></listitem>
+       <listitem><para>&acl; v6.1 on Redhat Linux 7.2, FreeBSD 4.5, and Microsoft Windows XP.</para></listitem>
+       <listitem><para>&lw; v4.2 on Redhat Linux 7.2 and Microsoft Windows XP.</para></listitem>
+       <listitem><para>&cmucl; 18d-pre on Redhat Linux 7.2, FreeBSD 4.5, and Solaris 2.8.</para></listitem>
       </itemizedlist>
     </sect2>
 
@@ -102,9 +101,9 @@ the following implementations are supported:
        Currently, &clsql; supports the following databases:
       </para>
       <itemizedlist mark="opencircle">
-       <listitem><para>&mysql; v3.23.49 on Redhat Linux 7.2 and Microsoft Windows.</para></listitem>
-       <listitem><para>&postgresql; v7.1 on Redhat Linux 7.2. Support for both direct API connections and TCP socket connections.</para></listitem>
-       <listitem><para>Allegro's ODBC interface (&aodbc;) on Redhat Linux 7.2 and Microsoft Windows.</para></listitem>
+       <listitem><para>&mysql; v3.23.49.</para></listitem>
+       <listitem><para>&postgresql; v7.2 with both direct API and TCP socket connections.</para></listitem>
+       <listitem><para>Allegro's ODBC interface (&aodbc;) using iODBC ODBC manager.</para></listitem>
       </itemizedlist>
     </sect2>
 
index e57470e6322a64f0661671563da6c3857428eaac..981f5b79aa2f63e3b79fc56112be3cc942b7bd88 100644 (file)
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: postgresql-loader.cl,v 1.4 2002/04/01 05:27:55 kevin Exp $
+;;;; $Id: postgresql-loader.cl,v 1.5 2002/04/06 19:54:14 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
 (in-package :postgresql)
 
-(defvar *postgresql-library-filename* 
-    (cond
-     ((probe-file "/opt/postgresql/lib/libpq.so")
-      "/opt/postgresql/lib/libpq.so")
-     ((probe-file "/usr/local/lib/libpq.so")
-      "/usr/local/lib/libpq.so")
-     ((probe-file "/usr/lib/libpq.so")
-      "/usr/lib/libpq.so")
-     #+(or win32 mswindows) 
-     ((probe-file "c:/postgresql/lib/libpq.dll")
-      "c:/postgresql/lib/libpq.dll")
-     (t
-      (warn "Can't find PostgresQL client library to load.")))
-  "Location where the PostgresSQL client library is to be found.")
 
 (defvar *postgresql-supporting-libraries* '("crypt" "c")
   "Used only by CMU. List of library flags needed to be passed to ld to
@@ -50,10 +36,11 @@ set to the right path before compiling or loading the system.")
                                                  (eql :postgresql)))
   (when
       (uffi:load-foreign-library 
-       (uffi:find-foreign-library 
-       "libpq"
-       '("/opt/postgresql/lib/" "/usr/local/lib" "usr/lib/" 
-         "/postgresql/lib/"))
+       (uffi:find-foreign-library "libpq"
+                                 '("/opt/postgresql/lib/" "/usr/local/lib/" 
+                                   "/usr/lib/" "/postgresql/lib/")
+                                 :drive-letters '("C" "D" "E"))
+       
        :module "postgresql"
        :supporting-libraries 
        *postgresql-supporting-libraries*)
index 9d96874f2033fc514db01739bfb9b941bbee38e3..a22b108c12d184688138846d84b038832448e1aa 100644 (file)
@@ -8,7 +8,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg and onShore Development Inc
 ;;;; Date Started:  Mar 2002
 ;;;;
-;;;; $Id: usql.cl,v 1.2 2002/04/03 17:58:23 kevin Exp $
+;;;; $Id: usql.cl,v 1.3 2002/04/06 19:54:15 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;; and onShore Development Inc
@@ -96,14 +96,12 @@ specifies the database to operation on, defaulting to
 (defun sequence-next (name &key (database *default-database*))
   (database-sequence-next name database))
 
-#+ignore
 (defclass sql-typecast-exp (sql-value-exp)
   ()
   (:documentation
    "An SQL typecast expression.")
   )
 
-#+ignore
 (defclass sql-value-exp (%sql-expression)
   ((modifier
     :initarg :modifier
@@ -128,7 +126,6 @@ specifies the database to operation on, defaulting to
   (declare (ignore database))
   (write-string +null-string+ *sql-stream*))
 
-#+ignore
 (defmethod print-object ((self %sql-expression) stream)
   (print-unreadable-object
    (self stream :type t)