diff options
Diffstat (limited to 'databases/sybtcl')
| -rw-r--r-- | databases/sybtcl/Makefile | 33 | ||||
| -rw-r--r-- | databases/sybtcl/distinfo | 2 | ||||
| -rw-r--r-- | databases/sybtcl/files/Makefile.bsd | 46 | ||||
| -rw-r--r-- | databases/sybtcl/files/patch-generic_sybtcl.c | 342 | ||||
| -rw-r--r-- | databases/sybtcl/files/patch-man | 78 | ||||
| -rw-r--r-- | databases/sybtcl/files/patch-sign_on | 16 | ||||
| -rw-r--r-- | databases/sybtcl/files/patch-sp_who | 15 | ||||
| -rw-r--r-- | databases/sybtcl/pkg-descr | 6 | ||||
| -rw-r--r-- | databases/sybtcl/pkg-plist | 7 |
9 files changed, 0 insertions, 545 deletions
diff --git a/databases/sybtcl/Makefile b/databases/sybtcl/Makefile deleted file mode 100644 index 4944aef7c523..000000000000 --- a/databases/sybtcl/Makefile +++ /dev/null @@ -1,33 +0,0 @@ -# Created by: mi -# $FreeBSD$ - -PORTNAME= sybtcl -DISTVERSION= 3.0rc2 -PORTREVISION= 2 -CATEGORIES= databases devel -MASTER_SITES= SF - -MAINTAINER= mi@aldan.algebra.com -COMMENT= TCL extension to connect to Sybase servers - -BROKEN= Unfetchable -DEPRECATED= Broken for more than 6 months -EXPIRATION_DATE= 2015-11-26 - -LIB_DEPENDS= libsybdb.so:${PORTSDIR}/databases/freetds - -USES= tcl uidfix -TCL_DVER= ${TCL_VER:S/.//} -MAKEFILE= ${FILESDIR}/Makefile.bsd -MAKE_ARGS+= TCL_VER=${TCL_VER} \ - STAGEDIR=${STAGEDIR} - -post-install: - ####### - # This port installs two of the vendor-supplied sample programs, - # which have general-purpose utility. If you'd like to browse - # through other examples, do ``make patch'' and look inside the - # ${WRKSRC}/samples - ####### - -.include <bsd.port.mk> diff --git a/databases/sybtcl/distinfo b/databases/sybtcl/distinfo deleted file mode 100644 index 5542400a81e9..000000000000 --- a/databases/sybtcl/distinfo +++ /dev/null @@ -1,2 +0,0 @@ -SHA256 (sybtcl-3.0rc2.tar.gz) = 0077209503ca8bff8c3973450ef0ac437db8bc8a0fdc62fde54e42a8913f75de -SIZE (sybtcl-3.0rc2.tar.gz) = 277216 diff --git a/databases/sybtcl/files/Makefile.bsd b/databases/sybtcl/files/Makefile.bsd deleted file mode 100644 index 1c1bfba449bb..000000000000 --- a/databases/sybtcl/files/Makefile.bsd +++ /dev/null @@ -1,46 +0,0 @@ -# $FreeBSD$ - -.PATH: ${.CURDIR}/generic - -SRCS= sybtcl.c -LOCALBASE?= /usr/local -PREFIX?= ${LOCALBASE} -TCL_VER?= 8.4 -TCL_DVER= ${TCL_VER:S/.//} -WARNS?= 0 - -CFLAGS+= -I${LOCALBASE}/include -I${LOCALBASE}/include/tcl${TCL_VER} -LDADD= -L${LOCALBASE}/lib -lsybdb # -ltcl${TCL_DVER} - -SHLIB_NAME= libSybtcl.so.3 -LIBDIR= ${PREFIX}/lib -PKGDIR= ${LIBDIR}/Sybtcl -SCRIPTS= sp_who wisqlite - -all: ${SHLIB_NAME} pkgIndex.tcl ${SCRIPTS} - -pkgIndex.tcl: pkgIndex.tcl.in - echo 'package ifneeded Sybtcl 3.0 "load $$dir/../${SHLIB_NAME}; \ - set auto_index(getSignOn) \"source $$dir/sign_on.tcl\""' \ - > pkgIndex.tcl - -.for s in ${SCRIPTS} -$s: ${.CURDIR}/samples/$s - sed -e 's,#!/usr/local/bin/wishx,#!${LOCALBASE}/bin/wish${TCL_VER},'\ - -e 's,#!/usr/local/bin/wish8.0,#!${LOCALBASE}/bin/wish${TCL_VER},'\ - < ${.CURDIR}/samples/$s > $s -.endfor - -sp_who wisqlite: ${.CURDIR} - -${PKGDIR}: - mkdir -p ${STAGEDIR}${PKGDIR} - -beforeinstall: ${PKGDIR} - ${BSD_INSTALL_DATA} pkgIndex.tcl ${.CURDIR}/samples/sign_on.tcl \ - ${STAGEDIR}${PKGDIR} - ${BSD_INSTALL_SCRIPT} ${SCRIPTS} ${STAGEDIR}${PREFIX}/bin/ - ${BSD_INSTALL_MAN} ${.CURDIR}/doc/sybtcl.man \ - ${STAGEDIR}${PREFIX}/man/mann/sybtcl.n - -.include <bsd.lib.mk> diff --git a/databases/sybtcl/files/patch-generic_sybtcl.c b/databases/sybtcl/files/patch-generic_sybtcl.c deleted file mode 100644 index 84acf3f29041..000000000000 --- a/databases/sybtcl/files/patch-generic_sybtcl.c +++ /dev/null @@ -1,342 +0,0 @@ ---- generic/sybtcl.c 2000-08-30 20:24:18.000000000 -0400 -+++ generic/sybtcl.c 2007-10-12 16:54:36.000000000 -0400 -@@ -178,5 +178,6 @@ - #endif - --#include "tcl.h" -+#include <strings.h> -+#include <tcl.h> - - -@@ -279,4 +280,12 @@ - #endif - -+#ifndef CS_INTERNAL -+#define CS_INTERNAL /* Not defined by FreeTDS */ -+#endif -+ -+#ifndef TDS_DEF_CHARSET -+#define TDS_DEF_CHARSET "iso_1" /* Not defined by Sybase */ -+#endif -+ - typedef struct SybTclProcs { /* struct for handle entries */ - int in_use; /* if this entry is opened */ -@@ -393,5 +402,5 @@ - #else - --extern void * malloc(); -+#include <stdlib.h> - - #endif -@@ -428,22 +437,22 @@ - /* prototypes for all tcl command functions */ - --EXTERN Sybtcl_Init _ANSI_ARGS_((Tcl_Interp *interp)); --EXTERN Sybtcl_SafeInit _ANSI_ARGS_((Tcl_Interp *interp)); -+EXTERN int Sybtcl_Init _ANSI_ARGS_((Tcl_Interp *interp)); -+EXTERN int Sybtcl_SafeInit _ANSI_ARGS_((Tcl_Interp *interp)); - --extern Tcl_ObjCmdProc Sybtcl_Connect; --extern Tcl_ObjCmdProc Sybtcl_ErrHandler; --extern Tcl_ObjCmdProc Sybtcl_MsgHandler; --extern Tcl_ObjCmdProc Sybtcl_Money; --extern Tcl_ObjCmdProc Sybtcl_Use; --extern Tcl_ObjCmdProc Sybtcl_Sql; --extern Tcl_ObjCmdProc Sybtcl_Poll; --extern Tcl_ObjCmdProc Sybtcl_Next; --extern Tcl_ObjCmdProc Sybtcl_Cols; --extern Tcl_ObjCmdProc Sybtcl_Cancel; --extern Tcl_ObjCmdProc Sybtcl_Close; --extern Tcl_ObjCmdProc Sybtcl_Retval; --extern Tcl_ObjCmdProc Sybtcl_Wrtext; --extern Tcl_ObjCmdProc Sybtcl_Rdtext; --extern Tcl_ObjCmdProc Sybtcl_Event; -+static Tcl_ObjCmdProc Sybtcl_Connect; -+static Tcl_ObjCmdProc Sybtcl_ErrHandler; -+static Tcl_ObjCmdProc Sybtcl_MsgHandler; -+static Tcl_ObjCmdProc Sybtcl_Money; -+static Tcl_ObjCmdProc Sybtcl_Use; -+static Tcl_ObjCmdProc Sybtcl_Sql; -+static Tcl_ObjCmdProc Sybtcl_Poll; -+static Tcl_ObjCmdProc Sybtcl_Next; -+static Tcl_ObjCmdProc Sybtcl_Cols; -+static Tcl_ObjCmdProc Sybtcl_Cancel; -+static Tcl_ObjCmdProc Sybtcl_Close; -+static Tcl_ObjCmdProc Sybtcl_Retval; -+static Tcl_ObjCmdProc Sybtcl_Wrtext; -+static Tcl_ObjCmdProc Sybtcl_Rdtext; -+static Tcl_ObjCmdProc Sybtcl_Event; - - -@@ -461,8 +470,10 @@ - Tcl_Interp *interp)); - -+#ifdef POLLED_EVENTS - static int dbEventProc _ANSI_ARGS_((Tcl_Event *evPtr, int flags)); - static void dbSetupProc _ANSI_ARGS_((ClientData cd_hand, int flags)); - static void dbCheckProc _ANSI_ARGS_((ClientData cd_hand, int flags)); --void Sybtcl_Kill _ANSI_ARGS_((ClientData clientData)); -+#endif -+static void Sybtcl_Kill _ANSI_ARGS_((ClientData clientData)); - static int CS_INTERNAL syb_tcl_err_handler _ANSI_ARGS_(( - DBPROCESS *db_proc, -@@ -496,4 +507,5 @@ - - -+#ifdef POLLED_EVENTS /* { */ - /* - *---------------------------------------------------------------------- -@@ -566,5 +578,5 @@ - } - } -- -+#endif /* POLLED_EVENTS } */ - - -@@ -609,5 +621,4 @@ - { - dbState *statePtr = (dbState *) instanceData; -- int hand = statePtr->hand; - - #ifdef POLLED_EVENTS -@@ -641,5 +652,5 @@ - dbState *statePtr = (dbState *) instanceData; - -- *handlePtr = (ClientData)statePtr->fd; -+ *handlePtr = (ClientData)(intptr_t)statePtr->fd; - return TCL_OK; - } -@@ -661,5 +672,5 @@ - } - --Tcl_Channel -+static Tcl_Channel - dbMakeChannel (sock, hand, channelName) - int sock; -@@ -1167,9 +1178,9 @@ - */ - -+CALLBACK_SCOPE Tcl_ChannelProc callback_handler; - static void - remove_handler (hand) - int hand; - { -- CALLBACK_SCOPE Tcl_ChannelProc callback_handler; - if (SybProcs[hand].callBackScript != NULL) { - Tcl_DecrRefCount(SybProcs[hand].callBackScript); -@@ -1177,8 +1188,8 @@ - if (SybProcs[hand].sybChan != NULL) { - Tcl_DeleteChannelHandler(SybProcs[hand].sybChan, -- callback_handler, (ClientData) hand); -+ callback_handler, (ClientData)(intptr_t)hand); - } - #ifdef POLLED_EVENTS -- Tcl_DeleteEventSource( dbSetupProc, dbCheckProc, (ClientData) hand); -+ Tcl_DeleteEventSource( dbSetupProc, dbCheckProc, (ClientData)(intptr_t)hand); - #endif - } -@@ -1451,4 +1462,16 @@ - &dateinfo,(DBDATETIME *) col_ptr); - j=0; -+#if defined(MSDBLIB) && !defined(dateyear) -+# define dateyear year -+# define datemonth month -+# define datedmonth day -+# define datedyear dayofyear -+# define datedweek weekday -+# define datehour hour -+# define dateminute minute -+# define datesecond second -+# define datemsecond millisecond -+# define datetzone tzone -+#endif - while((unsigned int) j < strlen(date_str)) { - if (!strncmp(&(date_str[j]),"YYYY",4)) { -@@ -1669,6 +1692,8 @@ - - --#ifdef DBVERSION_100 -+#ifdef SYBBOUNDARY - case SYBBOUNDARY: -+#endif -+#ifdef SYBSENSITIVITY - case SYBSENSITIVITY: - #endif -@@ -1694,5 +1719,5 @@ - */ - --void -+static void - Sybtcl_Kill (clientData) - ClientData clientData; -@@ -1776,5 +1801,5 @@ - */ - --void -+static void - Sybtcl_DeleteInterp (clientData, interp) - ClientData clientData; -@@ -2429,5 +2454,5 @@ - */ - --int -+static int - Sybtcl_ErrHandler (clientData, interp, objc, objv) - ClientData clientData; -@@ -2466,5 +2491,5 @@ - */ - --int -+static int - Sybtcl_MsgHandler (clientData, interp, objc, objv) - ClientData clientData; -@@ -2505,5 +2530,5 @@ - */ - --int -+static int - Sybtcl_Connect (clientData, interp, objc, objv) - ClientData clientData; -@@ -2556,5 +2581,7 @@ - - DBSETLUSER(login,Tcl_GetStringFromObj(objv[1],NULL)); -- DBSETLPWD(login, Tcl_GetStringFromObj(objv[2],NULL)); -+ server_str = Tcl_GetStringFromObj(objv[2],&len); -+ if (len > 0) -+ DBSETLPWD(login, server_str); - - /* check for server optional parameter */ -@@ -2594,8 +2621,8 @@ - DBSETLCHARSET(login, charset_str); - } else { -- DBSETLCHARSET(login, NULL); -+ DBSETLCHARSET(login, TDS_DEF_CHARSET); - } - } else { -- DBSETLCHARSET(login, NULL); -+ DBSETLCHARSET(login, TDS_DEF_CHARSET); - } - -@@ -2607,5 +2634,6 @@ - if (SybProcs[hand].dbproc == NULL) { - Sybtcl_AppendObjResult (interp, CMD_STR, -- ": sybconnect failed in dbopen", (char *) NULL); -+ ": sybconnect to ", server_str ? server_str : "(DEFAULT)", -+ " failed in dbopen", (char *) NULL); - return TCL_ERROR; - } -@@ -2673,4 +2701,5 @@ - */ - -+static int - Sybtcl_Money (clientData, interp, objc, objv) - ClientData clientData; -@@ -2788,4 +2817,5 @@ - */ - -+static int - Sybtcl_Use (clientData, interp, objc, objv) - ClientData clientData; -@@ -2850,4 +2880,5 @@ - */ - -+static int - Sybtcl_Sql (clientData, interp, objc, objv) - ClientData clientData; -@@ -2909,5 +2940,5 @@ - if (SybProcs[hand].last_text != SybOptions[i].maxtext) { - SybProcs[hand].last_text = SybOptions[i].maxtext; -- sprintf(conv_buf,"%d",SybOptions[i].maxtext); -+ sprintf(conv_buf,"%ld",SybOptions[i].maxtext); - dbsetopt(SybProcs[hand].dbproc, DBTEXTSIZE, conv_buf, -1); - dbsqlexec(SybProcs[hand].dbproc); /* execute dbsetopt() */ -@@ -3022,4 +3053,5 @@ - */ - -+static int - Sybtcl_Poll (clientData, interp, objc, objv) - ClientData clientData; -@@ -3551,4 +3583,5 @@ - */ - -+static int - Sybtcl_Next (clientData, interp, objc, objv) - ClientData clientData; -@@ -3819,4 +3852,5 @@ - */ - -+static int - Sybtcl_Cols (clientData, interp, objc, objv) - ClientData clientData; -@@ -3972,4 +4006,5 @@ - */ - -+static int - Sybtcl_Cancel (clientData, interp, objc, objv) - ClientData clientData; -@@ -4020,4 +4055,5 @@ - */ - -+static int - Sybtcl_Retval (clientData, interp, objc, objv) - ClientData clientData; -@@ -4091,4 +4127,5 @@ - */ - -+static int - Sybtcl_Close (clientData, interp, objc, objv) - ClientData clientData; -@@ -4167,4 +4204,5 @@ - */ - -+static int - Sybtcl_Wrtext (clientData, interp, objc, objv) - ClientData clientData; -@@ -4190,5 +4228,5 @@ - int obj_parm; - int isvar = 0; -- Tcl_Channel fd; -+ Tcl_Channel fd = NULL; - #ifndef MAC_TCL - struct stat stat_buf; -@@ -4305,5 +4343,6 @@ - txtptr = dbtxptr(SybProcs[hand].dbproc,col); - if (txtptr == NULL) { -- Tcl_Close (NULL,fd); -+ if (fd != NULL) -+ Tcl_Close (NULL,fd); - Sybtcl_AppendObjResult (interp, CMD_STR, - ": dbtxptr failed ", (char *) NULL); -@@ -4448,5 +4487,5 @@ - */ - -- -+static int - Sybtcl_Rdtext (clientData, interp, objc, objv) - ClientData clientData; -@@ -4638,5 +4677,5 @@ - int mask; - { -- int hand = (int) cd_hand; -+ int hand = (int)(intptr_t)cd_hand; - Tcl_Interp *interp = SybProcs[hand].interp; - DBPROCESS *readyproc; -@@ -4754,5 +4793,5 @@ - */ - -- -+static int - Sybtcl_Event (clientData, interp, objc, objv) - ClientData clientData; -@@ -4791,9 +4830,9 @@ - /* create handler */ - Tcl_CreateChannelHandler(SybProcs[hand].sybChan, TCL_READABLE, -- callback_handler, (ClientData) hand); -+ callback_handler, (ClientData)(intptr_t)hand); - - #ifdef POLLED_EVENTS - Tcl_CreateEventSource(dbSetupProc, dbCheckProc, -- (ClientData) hand); -+ (ClientData)(intptr_t)hand); - #endif - diff --git a/databases/sybtcl/files/patch-man b/databases/sybtcl/files/patch-man deleted file mode 100644 index 7a3f40b9289d..000000000000 --- a/databases/sybtcl/files/patch-man +++ /dev/null @@ -1,78 +0,0 @@ -The supplied man-page provides comprehensive documentation, but contains -an amazing amount of spelling typos. I ran it through ispell, but, quite -possibly, some remain. Please, let me know if you find something, I missed. - - -mi - ---- doc/sybtcl.man Thu Dec 28 18:25:29 2000 -+++ doc/sybtcl.man Mon Mar 29 17:28:33 2004 -@@ -9,3 +9,3 @@ - Sybase Open Client (a.k.a. DB-Library) library functions. --Programmers using Sybtcl should be familar with basic concepts of -+Programmers using Sybtcl should be familiar with basic concepts of - DB-Library programming. -@@ -23,5 +23,5 @@ - value is passed to the server to display during a process list. --If \fIifile\fR is specified, that file is used to resovle server addresses; -+If \fIifile\fR is specified, that file is used to resolve server addresses; - if not specified, the normal $SYBASE/interfaces file is used. --If \fIcharset\fR is specified, the charset should reference a vaild -+If \fIcharset\fR is specified, the charset should reference a valid - character set available on your Sybase installation. -@@ -31,4 +31,4 @@ - \fILogin-name\fR and \fIpassword\fR are required parameters. All other --parameters are optional postitional parameters. For example, to specify --the \fIifile\fR paramater, \fIserver\fR and \fIappname\fR must -+parameters are optional positional parameters. For example, to specify -+the \fIifile\fR parameter, \fIserver\fR and \fIappname\fR must - also be specified. Optional parameters may be a null string, in which -@@ -141,3 +141,3 @@ - .I line --The line numer of the procedure generating the message, if any. -+The line number of the procedure generating the message, if any. - .RE -@@ -177,3 +177,3 @@ - called to determine if result rows were generated. If \fB-async\fR is omitted, --then sybsql will wait until the server has responed. -+then sybsql will wait until the server has responded. - Sybsql will return "REG_ROW" if -@@ -415,3 +415,3 @@ - be opened or a failure in internal DB-Library routines. Common failures --are specifing \fB-nolog\fR when the database does not support nolog; -+are specifying \fB-nolog\fR when the database does not support nolog; - unable to access a valid text pointer -@@ -516,3 +516,3 @@ - The dateformat string can contain substitution values or literals. --Substitions are made from the list below; other literals are copied -+Substitutions are made from the list below; other literals are copied - verbatim. The default value is null, which will format dates a default format. -@@ -603,3 +603,3 @@ - causes the polling loop to execute more frequently, which may cause --higer CPU usage. -+higher CPU usage. - .sp -@@ -618,3 +618,3 @@ - indicates the handle of the last sybtcl command. Handle is set on every --sybtcl command (execpt where an invalid handle is used.) -+sybtcl command (except where an invalid handle is used.) - .sp -@@ -706,3 +706,3 @@ - Since each sybtcl command --may invoke several DB-Lib routines, there is a possiblity that -+may invoke several DB-Lib routines, there is a possibility that - several messages may be received from the server. Sybtcl will -@@ -714,3 +714,3 @@ - the message text associated with msgno. Since each sybtcl command --may invoke several DB-Lib routines, there is a possiblity that -+may invoke several DB-Lib routines, there is a possibility that - several messages may be received from the server. Sybtcl will -@@ -718,3 +718,3 @@ - separating individual messages by newlines. --Output from Transact-SQL PRINT statments are collected in msgtext. -+Output from Transact-SQL PRINT statements are collected in msgtext. - .TP -@@ -766,3 +766,3 @@ - values are: "system10" if linked with Sybase System 10 DB-Libs or higher, --"ctcompt" if compiled with the CT-Lib compatiblity library. -+"ctcompt" if compiled with the CT-Lib compatibility library. - .sp diff --git a/databases/sybtcl/files/patch-sign_on b/databases/sybtcl/files/patch-sign_on deleted file mode 100644 index 1dac4dd412a6..000000000000 --- a/databases/sybtcl/files/patch-sign_on +++ /dev/null @@ -1,16 +0,0 @@ ---- samples/sign_on.tcl Fri Jun 2 02:35:54 2000 -+++ samples/sign_on.tcl Mon Mar 29 18:16:50 2004 -@@ -19,5 +19,5 @@ - #upvar 1 $p password - #upvar 1 $s server -- global env mainwindow -+ global env mainwindow tcl_platform - - # get valid servers from interfaces file -@@ -91,5 +91,5 @@ - frame $mainwindow.s.p - entry $mainwindow.s.p.pw -relief sunken -width 10 \ -- -font -*-symbol-*-r-*--20-*-*-*-*-*-*-* -+ -show * -exportselection false - label $mainwindow.s.p.p -text " Password" -anchor e - diff --git a/databases/sybtcl/files/patch-sp_who b/databases/sybtcl/files/patch-sp_who deleted file mode 100644 index d8605e75eba6..000000000000 --- a/databases/sybtcl/files/patch-sp_who +++ /dev/null @@ -1,15 +0,0 @@ ---- samples/sp_who Fri Jun 2 02:35:54 2000 -+++ samples/sp_who Mon Mar 29 18:10:59 2004 -@@ -22,12 +22,4 @@ - package require Sybtcl - --if {[file isfile sign_on.tcl]} { -- source sign_on.tcl --} elseif {[file isfile [file join [file dirname [info script]] sign_on.tcl]]} { -- source [file join [file dirname [info script]] sign_on.tcl] --} elseif {[file isfile [file join [file dirname [info nameofexecutable]] sign_on.tcl]]} { -- source [file join [file dirname [info nameofexecutable]] sign_on.tcl] --} -- - global server interval now intervalid env secorsecs user password sybhandle - global opened WhoIsThere order_by_orders order_by order_by_stmnt order_by_text diff --git a/databases/sybtcl/pkg-descr b/databases/sybtcl/pkg-descr deleted file mode 100644 index 5b8b5aeb8dc3..000000000000 --- a/databases/sybtcl/pkg-descr +++ /dev/null @@ -1,6 +0,0 @@ -This is Sybtcl -- a dynamicly loadable TCL extension, which provides -your interpreter with connectivity to a Sybase server. Althghough it was -written to work with Sybase's own client libraries (not available for -FreeBSD), this port patches it enough to make it work with FreeTDS. - -WWW: http://sybtcl.sourceforge.net/ diff --git a/databases/sybtcl/pkg-plist b/databases/sybtcl/pkg-plist deleted file mode 100644 index b9bde304b13d..000000000000 --- a/databases/sybtcl/pkg-plist +++ /dev/null @@ -1,7 +0,0 @@ -bin/sp_who -bin/wisqlite -lib/libSybtcl.so.3 -lib/libSybtcl.so -lib/Sybtcl/pkgIndex.tcl -lib/Sybtcl/sign_on.tcl -man/mann/sybtcl.n.gz |