open-dsi
/
postgres
mirror of https://github.com/postgres/postgres
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1959 Commits
38 Branches
669 Tags
768 MiB
Tag: Branch: Tree: 8fecd4febf
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from '8fecd4febf'
${ noResults }
postgres/src/interfaces/libpgtcl/pgtclCmds.h

87 lines
2.6 KiB
Raw Normal View History Unescape

Postgres95 1.01 Distribution - Virgin Sources
30 years ago
/*-------------------------------------------------------------------------
*
* pgtclCmds.h--
* declarations for the C functions which implement pg_* tcl commands
*
* Copyright (c) 1994, Regents of the University of California
*
someone added pg_listen and pg_notifies to libpgtcl. But first these routines try to use the old pointer casting stuff to get the connection id, second the notification hash table should be part of the cliendData. Otherwise, one interpreter might eat up the notifies for another one. Please apply the patch below to the current 6.0 tree. Submitted by: wieck@sapserv.debis.de
29 years ago
* $Id: pgtclCmds.h,v 1.6 1997/01/03 18:48:31 scrappy Exp $
Postgres95 1.01 Distribution - Virgin Sources
30 years ago
*
*-------------------------------------------------------------------------
*/
#ifndef PGTCLCMDS_H
#define PGTCLCMDS_H
#include "tcl.h"
Changes to libpgtcl submitted by: wieck@sapserv.debis.de (Jan Wieck) Adds: -lAttributes Returns another format of the results attribute list. Per attribute a sublist of {{attname} atttype attlen} is returned and an empty string if no attributes where received. -numAttrs Returns the number of attributes in the result.
30 years ago
#include "libpq/pqcomm.h"
#include "libpq-fe.h"
#include "libpq/libpq-fs.h"
typedef struct Pg_clientData_s {
Tcl_HashTable dbh_hash;
Tcl_HashTable res_hash;
someone added pg_listen and pg_notifies to libpgtcl. But first these routines try to use the old pointer casting stuff to get the connection id, second the notification hash table should be part of the cliendData. Otherwise, one interpreter might eat up the notifies for another one. Please apply the patch below to the current 6.0 tree. Submitted by: wieck@sapserv.debis.de
29 years ago
Tcl_HashTable notify_hash;
Changes to libpgtcl submitted by: wieck@sapserv.debis.de (Jan Wieck) Adds: -lAttributes Returns another format of the results attribute list. Per attribute a sublist of {{attname} atttype attlen} is returned and an empty string if no attributes where received. -numAttrs Returns the number of attributes in the result.
30 years ago
long dbh_count;
long res_count;
} Pg_clientData;
typedef struct Pg_ConnectionId_s {
char id[32];
PGconn *conn;
Tcl_HashTable res_hash;
} Pg_ConnectionId;
typedef struct Pg_ResultId_s {
char id[32];
PGresult *result;
Pg_ConnectionId *connection;
} Pg_ResultId;
Postgres95 1.01 Distribution - Virgin Sources
30 years ago
/* **************************/
/* registered Tcl functions */
/* **************************/
Added in PQconnectdb() function Submitted by: wieck@sapserv.debis.de (Jan Wieck)
30 years ago
extern int Pg_conndefaults(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
Postgres95 1.01 Distribution - Virgin Sources
30 years ago
extern int Pg_connect(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_disconnect(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_exec(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
Well I haven't received any feedback pro or con re my suggested new Tcl function so I am going to assume that it is such a good idea that no one sees any point in discussing it. :-) I have made two changes - I have merged this into pgtclCmds.c and I have taken out any code for updating tuples after the loop body runs. See comments for discussion of this. I have also fixed up the error checking stuff so that break, continue and syntax errors have the expected result. Submitted by: D'Arcy Cain
30 years ago
extern int Pg_select(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
Postgres95 1.01 Distribution - Virgin Sources
30 years ago
extern int Pg_result(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_open(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_close(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_read(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_write(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_lseek(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_creat(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_tell(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_unlink(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_import(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_lo_export(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
Add two new comments to pglibtcl... From: Massimo Dal Zotto <dz@cs.unitn.it>
29 years ago
extern int Pg_listen(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
extern int Pg_notifies(
ClientData cData, Tcl_Interp *interp, int argc, char* argv[]);
Postgres95 1.01 Distribution - Virgin Sources
30 years ago
#endif /*PGTCLCMDS_H*/