diff options
author | Doug Goldstein <cardoe@gentoo.org> | 2004-08-08 15:10:00 +0000 |
---|---|---|
committer | Doug Goldstein <cardoe@gentoo.org> | 2004-08-08 15:10:00 +0000 |
commit | b61a9d94158de125f314869d20ebc88d1c20cc54 (patch) | |
tree | 730459a34bf1bc10c70b112701499039cd700abe /dev-tcltk/tcl-sql | |
parent | fix HP (diff) | |
download | historical-b61a9d94158de125f314869d20ebc88d1c20cc54.tar.gz historical-b61a9d94158de125f314869d20ebc88d1c20cc54.tar.bz2 historical-b61a9d94158de125f314869d20ebc88d1c20cc54.zip |
new ebuild from bug #14010
Diffstat (limited to 'dev-tcltk/tcl-sql')
-rw-r--r-- | dev-tcltk/tcl-sql/ChangeLog | 9 | ||||
-rw-r--r-- | dev-tcltk/tcl-sql/Manifest | 15 | ||||
-rw-r--r-- | dev-tcltk/tcl-sql/files/digest-tcl-sql-20000114 | 1 | ||||
-rw-r--r-- | dev-tcltk/tcl-sql/files/fix-const.patch | 55 | ||||
-rw-r--r-- | dev-tcltk/tcl-sql/metadata.xml | 9 | ||||
-rw-r--r-- | dev-tcltk/tcl-sql/tcl-sql-20000114.ebuild | 39 |
6 files changed, 128 insertions, 0 deletions
diff --git a/dev-tcltk/tcl-sql/ChangeLog b/dev-tcltk/tcl-sql/ChangeLog new file mode 100644 index 000000000000..929a7a5105fe --- /dev/null +++ b/dev-tcltk/tcl-sql/ChangeLog @@ -0,0 +1,9 @@ +# ChangeLog for dev-tcltk/tcl-sql +# Copyright 1999-2004 Gentoo Foundation; Distributed under the GPL v2 +# $Header: /var/cvsroot/gentoo-x86/dev-tcltk/tcl-sql/ChangeLog,v 1.1 2004/08/08 15:10:00 cardoe Exp $ + + 07 Aug 2004; Doug Goldstein <cardoe@gentoo.org> tcl-sql-20000114.ebuild: + Initial addition to portage + bug #14010. + Ebuild from Will Buckner + diff --git a/dev-tcltk/tcl-sql/Manifest b/dev-tcltk/tcl-sql/Manifest new file mode 100644 index 000000000000..aad6299439f0 --- /dev/null +++ b/dev-tcltk/tcl-sql/Manifest @@ -0,0 +1,15 @@ +-----BEGIN PGP SIGNED MESSAGE----- +Hash: SHA1 + +MD5 3340ae92e7e36aff5eb01779ff4b9196 tcl-sql-20000114.ebuild 1137 +MD5 4b563a5245a8dfeb4c6c03900801860b metadata.xml 262 +MD5 bed55e01a381c79e5767cbd3bc00562a ChangeLog 354 +MD5 3bb2a5d642e863bde43aaba76a3601de files/fix-const.patch 2428 +MD5 3c7fbfa72e44fb805bd735e62cc67a7a files/digest-tcl-sql-20000114 65 +-----BEGIN PGP SIGNATURE----- +Version: GnuPG v1.2.5 (GNU/Linux) + +iD8DBQFBFkJQFhz/XBeRBtARAgXaAJ4/BYVU4JW/b4YlPqVgXemm3VEfmwCfY6Xb +2keRKFkmkoH9cvugT770ez4= +=TGvu +-----END PGP SIGNATURE----- diff --git a/dev-tcltk/tcl-sql/files/digest-tcl-sql-20000114 b/dev-tcltk/tcl-sql/files/digest-tcl-sql-20000114 new file mode 100644 index 000000000000..acc3b5e36967 --- /dev/null +++ b/dev-tcltk/tcl-sql/files/digest-tcl-sql-20000114 @@ -0,0 +1 @@ +MD5 253ad832d0726c6c7a6d274499c1b52c tcl-sql-20000114.tgz 159365 diff --git a/dev-tcltk/tcl-sql/files/fix-const.patch b/dev-tcltk/tcl-sql/files/fix-const.patch new file mode 100644 index 000000000000..d5dcf9024acb --- /dev/null +++ b/dev-tcltk/tcl-sql/files/fix-const.patch @@ -0,0 +1,55 @@ +--- sql.cc.bak 2004-08-08 14:46:45.967588496 +0800 ++++ sql.cc 2004-08-08 14:51:06.629961792 +0800 +@@ -122,7 +122,7 @@ int fetchrowCmd(Tcl_Interp *interp, Sql_ + + // ------------------------------------------------------------- + // +-int SqlCmd(ClientData clientData, Tcl_Interp *interp, int argc, char **argv) ++int SqlCmd(ClientData clientData, Tcl_Interp *interp, int argc, const char **argv) + { + if (argc == 1) { + Tcl_SetResult(interp, "Usage: sql command ?handle?", TCL_STATIC); +@@ -137,7 +137,7 @@ int SqlCmd(ClientData clientData, Tcl_In + + // ----------------------------------- + if (strcmp(argv[1], "connect")==0) { +- c = mgr->connect(argc-2, argv+2); ++ c = mgr->connect(argc-2, (char **)(argv+2)); + if (c < 0) { + char *basemsg = "Unable to Connect: "; + char *errmsg = mgr->getErrorMsg(); +@@ -160,7 +160,7 @@ int SqlCmd(ClientData clientData, Tcl_In + if (argc <= 2) { + Tcl_SetResult(interp, "Usage:\nsql command handle", TCL_STATIC); + return TCL_ERROR; +- } else if ((connid = stripPrefix(argv[2], HANDLE_PREFIX)) < 0) { ++ } else if ((connid = stripPrefix((char *)argv[2], HANDLE_PREFIX)) < 0) { + Tcl_AppendResult(interp, "sql: Invalid handle: ", argv[2], NULL); + return TCL_ERROR; + } else if (!mgr->inUse(connid)) { +@@ -172,19 +172,19 @@ int SqlCmd(ClientData clientData, Tcl_In + + // take care of the command: + if (strcmp(argv[1], "exec") == 0) { +- res = execCmd(interp, conn, argv[3]); ++ res = execCmd(interp, conn, (char *)argv[3]); + } else if (strcmp(argv[1], "query") == 0) { +- res = queryCmd(interp, conn, argv[3]); ++ res = queryCmd(interp, conn, (char *)argv[3]); + } else if (strcmp(argv[1], "endquery") == 0) { +- res = endqueryCmd(interp, conn, argv[3]); ++ res = endqueryCmd(interp, conn, (char *)argv[3]); + } else if (strcmp(argv[1], "fetchrow") == 0) { +- res = fetchrowCmd(interp, conn, argv[3]); ++ res = fetchrowCmd(interp, conn, (char *)argv[3]); + } else if (strcmp(argv[1], "numrows") == 0) { +- res = numrowsCmd(interp, conn, argv[3]); ++ res = numrowsCmd(interp, conn, (char *)argv[3]); + } else if (strcmp(argv[1], "disconnect") == 0) { + res = disconnectCmd(interp, mgr, connid); + } else if (strcmp(argv[1], "selectdb")==0) { +- res = selectdbCmd(interp, conn, argv[3]); ++ res = selectdbCmd(interp, conn, (char *)argv[3]); + } else { + Tcl_AppendResult(interp, "sql: unknown sql command: ", argv[1], NULL); + return TCL_ERROR; diff --git a/dev-tcltk/tcl-sql/metadata.xml b/dev-tcltk/tcl-sql/metadata.xml new file mode 100644 index 000000000000..04519261ca8d --- /dev/null +++ b/dev-tcltk/tcl-sql/metadata.xml @@ -0,0 +1,9 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd"> +<pkgmetadata> +<herd>tcltk</herd> +<maintainer> + <email>tcltk@gentoo.org</email> + <description>TCL / TK herd</description> +</maintainer> +</pkgmetadata> diff --git a/dev-tcltk/tcl-sql/tcl-sql-20000114.ebuild b/dev-tcltk/tcl-sql/tcl-sql-20000114.ebuild new file mode 100644 index 000000000000..8e8819386bb0 --- /dev/null +++ b/dev-tcltk/tcl-sql/tcl-sql-20000114.ebuild @@ -0,0 +1,39 @@ +# Copyright 1999-2004 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 +# $Header: /var/cvsroot/gentoo-x86/dev-tcltk/tcl-sql/tcl-sql-20000114.ebuild,v 1.1 2004/08/08 15:10:00 cardoe Exp $ + +inherit eutils + +DESCRIPTION="A generic Tcl interface to SQL databases." +HOMEPAGE="http://www.parand.com/tcl-sql/" +SRC_URI="mirror://sourceforge/tcl-sql/${PN}-${PV}.tgz" +LICENSE="BSD" +SLOT="0" +KEYWORDS="~x86" +IUSE="" + +DEPEND="dev-lang/tcl + dev-db/mysql" + +S=${WORKDIR}/${PN} + +src_compile() { + chmod +w sql-mysql.cc + + epatch ${FILESDIR}/fix-const.patch + + sed -i -e 's|(int resHandle=0)|(int resHandle)|g' sql-mysql.cc || die "sed failed" + sed -i -e 's|char \*msg = mysql_error|char \*msg = (char *)mysql_error|' sql-mysql.cc || die "sed failed" + echo '#define USE_OLD_FUNCTIONS' > sql-mysql.cc.temp + cat sql-mysql.cc >> sql-mysql.cc.temp + mv sql-mysql.cc.temp sql-mysql.cc + emake || die +} + +src_install() { + mkdir -p ${D}/usr/lib/tcl-sql + cp sql.so ${D}/usr/lib/tcl-sql/libtcl-sql.so + dodoc CHANGES.txt CODE_DESCRIPTION.txt LICENSE.txt docs/sample.full.txt docs/sample.simple.txt + dohtml README.html docs/api.html +} + |