diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2001-12-06 17:36:21 +0000 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2001-12-06 17:36:21 +0000 |
commit | 9339b8ad47f5ae70ac1567a3b87caadd78ed022a (patch) | |
tree | 46ee93b378bebbef132154a237a735cf3eb4f7d8 | |
download | gamma-9339b8ad47f5ae70ac1567a3b87caadd78ed022a.tar.gz gamma-9339b8ad47f5ae70ac1567a3b87caadd78ed022a.tar.bz2 |
Initial revision
-rw-r--r-- | m4/guile.m4 | 67 | ||||
-rw-r--r-- | m4/lib.m4 | 26 | ||||
-rw-r--r-- | scripts/Makefile.am | 16 | ||||
-rw-r--r-- | scripts/Makefile.in | 201 | ||||
-rwxr-xr-x | scripts/guile-doc-snarf | 57 | ||||
-rwxr-xr-x | scripts/guile-func-name-check | 64 | ||||
-rwxr-xr-x | scripts/guile-snarf.awk | 98 | ||||
-rw-r--r-- | src/app.h | 6 | ||||
-rw-r--r-- | src/gsql_conn.c | 205 | ||||
-rw-r--r-- | src/gsql_lib.c | 47 | ||||
-rw-r--r-- | src/guile-sql.h | 33 | ||||
-rw-r--r-- | src/mysql.c | 131 | ||||
-rw-r--r-- | src/pgsql.c | 140 |
13 files changed, 1091 insertions, 0 deletions
diff --git a/m4/guile.m4 b/m4/guile.m4 new file mode 100644 index 0000000..bec442e --- /dev/null +++ b/m4/guile.m4 | |||
@@ -0,0 +1,67 @@ | |||
1 | dnl This file is part of GNU RADIUS. | ||
2 | dnl Copyright (C) 2001, Sergey Poznyakoff | ||
3 | dnl | ||
4 | dnl This program is free software; you can redistribute it and/or modify | ||
5 | dnl it under the terms of the GNU General Public License as published by | ||
6 | dnl the Free Software Foundation; either version 2 of the License, or | ||
7 | dnl (at your option) any later version. | ||
8 | dnl | ||
9 | dnl This program is distributed in the hope that it will be useful, | ||
10 | dnl but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
11 | dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
12 | dnl GNU General Public License for more details. | ||
13 | dnl | ||
14 | dnl You should have received a copy of the GNU General Public License | ||
15 | dnl along with this program; if not, write to the Free Software | ||
16 | dnl Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | ||
17 | dnl | ||
18 | AC_DEFUN(rad_CHECK_GUILE, | ||
19 | [ | ||
20 | if test "x$rad_cv_lib_guile" = x; then | ||
21 | cached="" | ||
22 | AC_PATH_PROG(GUILE_CONFIG, guile-config, no, $PATH) | ||
23 | if test $GUILE_CONFIG = no; then | ||
24 | rad_cv_lib_guile=no | ||
25 | else | ||
26 | GUILE_INCLUDES=`guile-config compile` | ||
27 | GUILE_LIBS=`guile-config link` | ||
28 | fi | ||
29 | |||
30 | if test $GUILE_CONFIG != no; then | ||
31 | AC_MSG_CHECKING(for guile version 1.4 or higher) | ||
32 | GV=`$GUILE_CONFIG --version 2>&1|sed -n 's/guile-config - Guile version \([[0-9]][[0-9]]*\)\.\([[0-9]][[0-9]]*\).*/\1\2/p'` | ||
33 | case "x$GV" in | ||
34 | x[[0-9]]*) | ||
35 | if test $GV -lt 14; then | ||
36 | AC_MSG_RESULT(Nope. Version number too low.) | ||
37 | rad_cv_lib_guile=no | ||
38 | else | ||
39 | AC_MSG_RESULT(OK) | ||
40 | save_LIBS=$LIBS | ||
41 | save_CFLAGS=$CFLAGS | ||
42 | LIBS="$LIBS $GUILE_LIBS" | ||
43 | CFLAGS="$CFLAGS $GUILE_INCLUDES" | ||
44 | AC_TRY_LINK([#include <libguile.h>], | ||
45 | void main(argc, argv) int argc; char **argv; | ||
46 | { ifelse([$1], , scm_shell(argc, argv);, [$1]) }, | ||
47 | [rad_cv_lib_guile=yes], | ||
48 | [rad_cv_lib_guile=no]) | ||
49 | LIBS=$save_LIBS | ||
50 | CFLAGS=$save_CFLAGS | ||
51 | fi ;; | ||
52 | *) AC_MSG_RESULT(Nope. Unknown version number) | ||
53 | rad_cv_lib_guile=no;; | ||
54 | esac | ||
55 | fi | ||
56 | else | ||
57 | cached=" (cached) " | ||
58 | GUILE_INCLUDES=`guile-config compile` | ||
59 | GUILE_LIBS=`guile-config link` | ||
60 | fi | ||
61 | AC_MSG_CHECKING(whether to build guile support) | ||
62 | rad_RESULT_ACTIONS([rad_cv_lib_guile],[LIBGUILE],[$2],[$3]) | ||
63 | AC_MSG_RESULT(${cached}$rad_cv_lib_guile) | ||
64 | ]) | ||
65 | |||
66 | |||
67 | |||
diff --git a/m4/lib.m4 b/m4/lib.m4 new file mode 100644 index 0000000..684d6be --- /dev/null +++ b/m4/lib.m4 | |||
@@ -0,0 +1,26 @@ | |||
1 | dnl Arguments: | ||
2 | dnl $1 -- Library to look for | ||
3 | dnl $2 -- Function to check in the library | ||
4 | dnl $3 -- Any additional libraries that might be needed | ||
5 | dnl $4 -- Action to be taken when test succeeds | ||
6 | dnl $5 -- Action to be taken when test fails | ||
7 | dnl $6 -- Directories where the library may reside | ||
8 | AC_DEFUN(rad_CHECK_LIB, | ||
9 | [ | ||
10 | save_LIBS=$LIBS | ||
11 | AC_CACHE_CHECK([for -l$1], rad_cv_lib_$1, | ||
12 | [ | ||
13 | for path in $6 | ||
14 | do | ||
15 | LIBS="$save_LIBS -L$path" | ||
16 | AC_CHECK_LIB($1, $2, | ||
17 | [rad_cv_lib_$1="$3 -L$path -l$1" | ||
18 | break], | ||
19 | [rad_cv_lib_$1=no],$3) | ||
20 | done | ||
21 | ]) | ||
22 | rad_RESULT_ACTIONS([rad_cv_lib_$1],[LIB$1],[$4],[$5]) | ||
23 | LIBS=$save_LIBS | ||
24 | ]) | ||
25 | |||
26 | |||
diff --git a/scripts/Makefile.am b/scripts/Makefile.am new file mode 100644 index 0000000..f3d32f6 --- /dev/null +++ b/scripts/Makefile.am | |||
@@ -0,0 +1,16 @@ | |||
1 | # $Id: Makefile.am,v 1.1 2001/12/06 17:36:21 gray Exp $ | ||
2 | # This file is part of GNU RADIUS. | ||
3 | # Copyright (C) 2000,2001, Sergey Poznyakoff | ||
4 | # | ||
5 | # This file is free software; as a special exception the author gives | ||
6 | # unlimited permission to copy and/or distribute it, with or without | ||
7 | # modifications, as long as this notice is preserved. | ||
8 | # | ||
9 | # This program is distributed in the hope that it will be useful, but | ||
10 | # WITHOUT ANY WARRANTY, to the extent permitted by law; without even the | ||
11 | # implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. | ||
12 | |||
13 | EXTRA_DIST = \ | ||
14 | guile-doc-snarf\ | ||
15 | guile-func-name-check\ | ||
16 | guile-snarf.awk | ||
diff --git a/scripts/Makefile.in b/scripts/Makefile.in new file mode 100644 index 0000000..fb4af45 --- /dev/null +++ b/scripts/Makefile.in | |||
@@ -0,0 +1,201 @@ | |||
1 | # Makefile.in generated automatically by automake 1.4 from Makefile.am | ||
2 | |||
3 | # Copyright (C) 1994, 1995-8, 1999 Free Software Foundation, Inc. | ||
4 | # This Makefile.in is free software; the Free Software Foundation | ||
5 | # gives unlimited permission to copy and/or distribute it, | ||
6 | # with or without modifications, as long as this notice is preserved. | ||
7 | |||
8 | # This program is distributed in the hope that it will be useful, | ||
9 | # but WITHOUT ANY WARRANTY, to the extent permitted by law; without | ||
10 | # even the implied warranty of MERCHANTABILITY or FITNESS FOR A | ||
11 | # PARTICULAR PURPOSE. | ||
12 | |||
13 | # $Id: Makefile.in,v 1.1 2001/12/06 17:36:21 gray Exp $ | ||
14 | # This file is part of GNU RADIUS. | ||
15 | # Copyright (C) 2000,2001, Sergey Poznyakoff | ||
16 | # | ||
17 | # This file is free software; as a special exception the author gives | ||
18 | # unlimited permission to copy and/or distribute it, with or without | ||
19 | # modifications, as long as this notice is preserved. | ||
20 | # | ||
21 | # This program is distributed in the hope that it will be useful, but | ||
22 | # WITHOUT ANY WARRANTY, to the extent permitted by law; without even the | ||
23 | # implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. | ||
24 | |||
25 | |||
26 | SHELL = @SHELL@ | ||
27 | |||
28 | srcdir = @srcdir@ | ||
29 | top_srcdir = @top_srcdir@ | ||
30 | VPATH = @srcdir@ | ||
31 | prefix = @prefix@ | ||
32 | exec_prefix = @exec_prefix@ | ||
33 | |||
34 | bindir = @bindir@ | ||
35 | sbindir = @sbindir@ | ||
36 | libexecdir = @libexecdir@ | ||
37 | datadir = @datadir@ | ||
38 | sysconfdir = @sysconfdir@ | ||
39 | sharedstatedir = @sharedstatedir@ | ||
40 | localstatedir = @localstatedir@ | ||
41 | libdir = @libdir@ | ||
42 | infodir = @infodir@ | ||
43 | mandir = @mandir@ | ||
44 | includedir = @includedir@ | ||
45 | oldincludedir = /usr/include | ||
46 | |||
47 | DESTDIR = | ||
48 | |||
49 | pkgdatadir = $(datadir)/@PACKAGE@ | ||
50 | pkglibdir = $(libdir)/@PACKAGE@ | ||
51 | pkgincludedir = $(includedir)/@PACKAGE@ | ||
52 | |||
53 | top_builddir = .. | ||
54 | |||
55 | ACLOCAL = @ACLOCAL@ | ||
56 | AUTOCONF = @AUTOCONF@ | ||
57 | AUTOMAKE = @AUTOMAKE@ | ||
58 | AUTOHEADER = @AUTOHEADER@ | ||
59 | |||
60 | INSTALL = @INSTALL@ | ||
61 | INSTALL_PROGRAM = @INSTALL_PROGRAM@ $(AM_INSTALL_PROGRAM_FLAGS) | ||
62 | INSTALL_DATA = @INSTALL_DATA@ | ||
63 | INSTALL_SCRIPT = @INSTALL_SCRIPT@ | ||
64 | transform = @program_transform_name@ | ||
65 | |||
66 | NORMAL_INSTALL = : | ||
67 | PRE_INSTALL = : | ||
68 | POST_INSTALL = : | ||
69 | NORMAL_UNINSTALL = : | ||
70 | PRE_UNINSTALL = : | ||
71 | POST_UNINSTALL = : | ||
72 | build_alias = @build_alias@ | ||
73 | build_triplet = @build@ | ||
74 | host_alias = @host_alias@ | ||
75 | host_triplet = @host@ | ||
76 | target_alias = @target_alias@ | ||
77 | target_triplet = @target@ | ||
78 | AS = @AS@ | ||
79 | AWK = @AWK@ | ||
80 | CC = @CC@ | ||
81 | CPP = @CPP@ | ||
82 | DLLTOOL = @DLLTOOL@ | ||
83 | GUILE_CONFIG = @GUILE_CONFIG@ | ||
84 | GUILE_INCLUDES = @GUILE_INCLUDES@ | ||
85 | GUILE_LIBS = @GUILE_LIBS@ | ||
86 | INCLUDEPATH = @INCLUDEPATH@ | ||
87 | LIBOBJS = @LIBOBJS@ | ||
88 | LIBTOOL = @LIBTOOL@ | ||
89 | LN_S = @LN_S@ | ||
90 | MAKEINFO = @MAKEINFO@ | ||
91 | OBJDUMP = @OBJDUMP@ | ||
92 | PACKAGE = @PACKAGE@ | ||
93 | RANLIB = @RANLIB@ | ||
94 | U = @U@ | ||
95 | VERSION = @VERSION@ | ||
96 | |||
97 | EXTRA_DIST = guile-doc-snarf guile-func-name-check guile-snarf.awk | ||
98 | |||
99 | mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs | ||
100 | CONFIG_HEADER = ../config.h | ||
101 | CONFIG_CLEAN_FILES = | ||
102 | DIST_COMMON = Makefile.am Makefile.in | ||
103 | |||
104 | |||
105 | DISTFILES = $(DIST_COMMON) $(SOURCES) $(HEADERS) $(TEXINFOS) $(EXTRA_DIST) | ||
106 | |||
107 | TAR = tar | ||
108 | GZIP_ENV = --best | ||
109 | all: all-redirect | ||
110 | .SUFFIXES: |