aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2001-12-06 17:36:21 +0000
committerSergey Poznyakoff <gray@gnu.org.ua>2001-12-06 17:36:21 +0000
commit9339b8ad47f5ae70ac1567a3b87caadd78ed022a (patch)
tree46ee93b378bebbef132154a237a735cf3eb4f7d8
downloadgamma-9339b8ad47f5ae70ac1567a3b87caadd78ed022a.tar.gz
gamma-9339b8ad47f5ae70ac1567a3b87caadd78ed022a.tar.bz2
Initial revision
-rw-r--r--m4/guile.m467
-rw-r--r--m4/lib.m426
-rw-r--r--scripts/Makefile.am16
-rw-r--r--scripts/Makefile.in201
-rwxr-xr-xscripts/guile-doc-snarf57
-rwxr-xr-xscripts/guile-func-name-check64
-rwxr-xr-xscripts/guile-snarf.awk98
-rw-r--r--src/app.h6
-rw-r--r--src/gsql_conn.c205
-rw-r--r--src/gsql_lib.c47
-rw-r--r--src/guile-sql.h33
-rw-r--r--src/mysql.c131
-rw-r--r--src/pgsql.c140
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 @@
1dnl This file is part of GNU RADIUS.
2dnl Copyright (C) 2001, Sergey Poznyakoff
3dnl
4dnl This program is free software; you can redistribute it and/or modify
5dnl it under the terms of the GNU General Public License as published by
6dnl the Free Software Foundation; either version 2 of the License, or
7dnl (at your option) any later version.
8dnl
9dnl This program is distributed in the hope that it will be useful,
10dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
11dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12dnl GNU General Public License for more details.
13dnl
14dnl You should have received a copy of the GNU General Public License
15dnl along with this program; if not, write to the Free Software
16dnl Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17dnl
18AC_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 @@
1dnl Arguments:
2dnl $1 -- Library to look for
3dnl $2 -- Function to check in the library
4dnl $3 -- Any additional libraries that might be needed
5dnl $4 -- Action to be taken when test succeeds
6dnl $5 -- Action to be taken when test fails
7dnl $6 -- Directories where the library may reside
8AC_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
13EXTRA_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
26SHELL = @SHELL@
27
28srcdir = @srcdir@
29top_srcdir = @top_srcdir@
30VPATH = @srcdir@
31prefix = @prefix@
32exec_prefix = @exec_prefix@
33
34bindir = @bindir@
35sbindir = @sbindir@
36libexecdir = @libexecdir@
37datadir = @datadir@
38sysconfdir = @sysconfdir@
39sharedstatedir = @sharedstatedir@
40localstatedir = @localstatedir@
41libdir = @libdir@
42infodir = @infodir@
43mandir = @mandir@
44includedir = @includedir@
45oldincludedir = /usr/include
46
47DESTDIR =
48
49pkgdatadir = $(datadir)/@PACKAGE@
50pkglibdir = $(libdir)/@PACKAGE@
51pkgincludedir = $(includedir)/@PACKAGE@
52
53top_builddir = ..
54
55ACLOCAL = @ACLOCAL@
56AUTOCONF = @AUTOCONF@
57AUTOMAKE = @AUTOMAKE@
58AUTOHEADER = @AUTOHEADER@
59
60INSTALL = @INSTALL@
61INSTALL_PROGRAM = @INSTALL_PROGRAM@ $(AM_INSTALL_PROGRAM_FLAGS)
62INSTALL_DATA = @INSTALL_DATA@
63INSTALL_SCRIPT = @INSTALL_SCRIPT@
64transform = @program_transform_name@
65
66NORMAL_INSTALL = :
67PRE_INSTALL = :
68POST_INSTALL = :
69NORMAL_UNINSTALL = :
70PRE_UNINSTALL = :
71POST_UNINSTALL = :
72build_alias = @build_alias@
73build_triplet = @build@
74host_alias = @host_alias@
75host_triplet = @host@
76target_alias = @target_alias@
77target_triplet = @target@
78AS = @AS@
79AWK = @AWK@
80CC = @CC@
81CPP = @CPP@
82DLLTOOL = @DLLTOOL@
83GUILE_CONFIG = @GUILE_CONFIG@
84GUILE_INCLUDES = @GUILE_INCLUDES@
85GUILE_LIBS = @GUILE_LIBS@
86INCLUDEPATH = @INCLUDEPATH@
87LIBOBJS = @LIBOBJS@
88LIBTOOL = @LIBTOOL@
89LN_S = @LN_S@
90MAKEINFO = @MAKEINFO@
91OBJDUMP = @OBJDUMP@
92PACKAGE = @PACKAGE@
93RANLIB = @RANLIB@
94U = @U@
95VERSION = @VERSION@
96
97EXTRA_DIST = guile-doc-snarf guile-func-name-check guile-snarf.awk
98
99mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
100CONFIG_HEADER = ../config.h
101CONFIG_CLEAN_FILES =
102DIST_COMMON = Makefile.am Makefile.in
103
104
105DISTFILES = $(DIST_COMMON) $(SOURCES) $(HEADERS) $(TEXINFOS) $(EXTRA_DIST)
106
107TAR = tar
108GZIP_ENV = --best
109all: all-redirect
110.SUFFIXES: