Refactoring
Added factor-like words do-command/do-query now better exception handlingcvs
Doug Coleman
parent
2f84c408d9
commit
29be58d449
|
|
@ -8,7 +8,12 @@ win32? [
|
||||||
"postgresql" "libpq.so" "cdecl" add-library
|
"postgresql" "libpq.so" "cdecl" add-library
|
||||||
] if
|
] if
|
||||||
|
|
||||||
[ "postgresql.factor" ]
|
[
|
||||||
[ "contrib/postgresql/" swap append run-file ] each
|
"contrib/postgresql/libpq.factor"
|
||||||
|
"contrib/postgresql/postgresql.factor"
|
||||||
|
"contrib/postgresql/postgresql-test.factor"
|
||||||
|
! "contrib/postgresql/private.factor" ! put your password in this file
|
||||||
|
] [ run-file ] each
|
||||||
|
|
||||||
"postgresql" words [ try-compile ] each
|
"postgresql" words [ try-compile ] each
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -2,60 +2,32 @@
|
||||||
! Set username and password in the 'connect' word.
|
! Set username and password in the 'connect' word.
|
||||||
|
|
||||||
IN: postgresql-test
|
IN: postgresql-test
|
||||||
USING: kernel postgresql alien errors io ;
|
USING: kernel postgresql alien errors io prettyprint sequences namespaces ;
|
||||||
|
|
||||||
|
|
||||||
: connect ( -- PGconn )
|
|
||||||
"localhost" "" "" "" "factor-test" "username" "password" PQsetdbLogin
|
|
||||||
dup PQstatus 0 =
|
|
||||||
[
|
|
||||||
"couldn't connect to database" throw
|
|
||||||
] unless ;
|
|
||||||
|
|
||||||
! For queries that do not return rows, PQexec() returns PGRES_COMMAND_OK.
|
|
||||||
! For queries that return rows, PQexec() returns PGRES_TUPLES_OK
|
|
||||||
|
|
||||||
: do-query ( PGconn query -- PGresult* )
|
|
||||||
PQexec
|
|
||||||
dup PQresultStatus PGRES_COMMAND_OK =
|
|
||||||
over PQresultStatus PGRES_TUPLES_OK =
|
|
||||||
or
|
|
||||||
[
|
|
||||||
dup PQresultErrorMessage print
|
|
||||||
"query failed" throw
|
|
||||||
] unless ;
|
|
||||||
|
|
||||||
!
|
|
||||||
: do-query-drop ( PGconn query -- PGresult * )
|
|
||||||
do-query PQclear ; ! PQclear frees libpq.so memory
|
|
||||||
|
|
||||||
: do-query-drop-nofail ( PGconn query -- PGresult * )
|
|
||||||
[ do-query ]
|
|
||||||
catch
|
|
||||||
[
|
|
||||||
"non-fatal error, continuing" print
|
|
||||||
drop
|
|
||||||
PQclear ! clear memory
|
|
||||||
] when ;
|
|
||||||
|
|
||||||
! just a basic demo
|
! just a basic demo
|
||||||
: run-test ( -- )
|
: run-test ( host str str str db user pass -- )
|
||||||
connect
|
[
|
||||||
dup "drop table animal" do-query-drop-nofail
|
"drop table animal" do-command
|
||||||
dup "create table animal (id serial not null primary key, species varchar(256), name varchar(256), age integer)" do-query-drop-nofail
|
|
||||||
dup "insert into animal (species, name, age) values ('lion', 'Mufasa', 5)" do-query-drop
|
|
||||||
dup "select * from animal where name = 'Mufasa'" do-query
|
|
||||||
dup PQntuples 1 = [ "...there can only be one Mufasa..." throw ] unless
|
|
||||||
|
|
||||||
dup 0 0 PQgetvalue print
|
"create table animal (id serial not null primary key, species varchar(256), name varchar(256), age integer)" do-command
|
||||||
dup 0 1 PQgetvalue print
|
"insert into animal (species, name, age) values ('lion', 'Mufasa', 5)" do-command
|
||||||
dup 0 2 PQgetvalue print
|
"select * from animal where name = 'Mufasa'" [ ] do-query
|
||||||
dup 0 3 PQgetvalue print
|
"select * from animal where name = 'Mufasa'"
|
||||||
PQclear
|
[
|
||||||
dup "insert into animal (species, name, age) values ('lion', 'Simba', 1)" do-query-drop
|
result>seq length 1 = [ "...there can only be one Mufasa..." throw ] unless
|
||||||
dup "select * from animal" do-query
|
] do-query
|
||||||
! dup PQntuples >dec print
|
"insert into animal (species, name, age) values ('lion', 'Simba', 1)" do-command
|
||||||
PQclear
|
|
||||||
PQfinish
|
"select * from animal"
|
||||||
;
|
[
|
||||||
|
"Animal table:" print
|
||||||
|
result>seq print-table
|
||||||
|
] do-query
|
||||||
|
|
||||||
|
! intentional errors
|
||||||
|
! [ "select asdf from animal"
|
||||||
|
! [ ] do-query ] catch [ "caught: " write print ] when*
|
||||||
|
! "select asdf from animal" [ ] do-query
|
||||||
|
! "aofijweafew" do-command
|
||||||
|
] with-postgres-catch ;
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -4,324 +4,60 @@
|
||||||
! tested on debian linux with postgresql 7.4.7
|
! tested on debian linux with postgresql 7.4.7
|
||||||
|
|
||||||
IN: postgresql
|
IN: postgresql
|
||||||
USING: alien ;
|
USING: kernel alien errors io prettyprint sequences lists namespaces arrays math ;
|
||||||
|
SYMBOL: postgres-conn
|
||||||
|
SYMBOL: query-res
|
||||||
|
|
||||||
! ConnSatusType
|
: connect-postgres ( host port pgopts pgtty db user pass -- conn )
|
||||||
: CONNECTION_OK HEX: 0 ; inline
|
PQsetdbLogin
|
||||||
: CONNECTION_BAD HEX: 1 ; inline
|
dup PQstatus 0 = [ "couldn't connect to database" throw ] unless ;
|
||||||
: CONNECTION_STARTED HEX: 2 ; inline
|
|
||||||
: CONNECTION_MADE HEX: 3 ; inline
|
|
||||||
: CONNECTION_AWAITING_RESPONSE HEX: 4 ; inline
|
|
||||||
: CONNECTION_AUTH_OK HEX: 5 ; inline
|
|
||||||
: CONNECTION_SETENV HEX: 6 ; inline
|
|
||||||
: CONNECTION_SSL_STARTUP HEX: 7 ; inline
|
|
||||||
: CONNECTION_NEEDED HEX: 8 ; inline
|
|
||||||
|
|
||||||
! PostgresPollingStatusType
|
: with-postgres ( host port pgopts pgtty db user pass quot -- )
|
||||||
: PGRES_POLLING_FAILED HEX: 0 ; inline
|
[ >r connect-postgres postgres-conn set r>
|
||||||
: PGRES_POLLING_READING HEX: 1 ; inline
|
[ postgres-conn get PQfinish ] cleanup ] with-scope ; inline
|
||||||
: PGRES_POLLING_WRITING HEX: 2 ; inline
|
|
||||||
: PGRES_POLLING_OK HEX: 3 ; inline
|
|
||||||
: PGRES_POLLING_ACTIVE HEX: 4 ; inline
|
|
||||||
|
|
||||||
! ExecStatusType;
|
: with-postgres-catch ( host port pgopts pgtty db user pass quot -- )
|
||||||
: PGRES_EMPTY_QUERY HEX: 0 ; inline
|
[ with-postgres ] catch [ "caught: " write print ] when* ;
|
||||||
: PGRES_COMMAND_OK HEX: 1 ; inline
|
|
||||||
: PGRES_TUPLES_OK HEX: 2 ; inline
|
|
||||||
: PGRES_COPY_OUT HEX: 3 ; inline
|
|
||||||
: PGRES_COPY_IN HEX: 4 ; inline
|
|
||||||
: PGRES_BAD_RESPONSE HEX: 5 ; inline
|
|
||||||
: PGRES_NONFATAL_ERROR HEX: 6 ; inline
|
|
||||||
: PGRES_FATAL_ERROR HEX: 7 ; inline
|
|
||||||
|
|
||||||
! PGTransactionStatusType;
|
: test-connection ( host port pgopts pgtty db user pass -- bool )
|
||||||
: PQTRANS_IDLE HEX: 0 ; inline
|
[ [ ] with-postgres ] catch "Error connecting!" "Connected!" ? print ;
|
||||||
: PQTRANS_ACTIVE HEX: 1 ; inline
|
|
||||||
: PQTRANS_INTRANS HEX: 2 ; inline
|
|
||||||
: PQTRANS_INERROR HEX: 3 ; inline
|
|
||||||
: PQTRANS_UNKNOWN HEX: 4 ; inline
|
|
||||||
|
|
||||||
! PGVerbosity;
|
: postgres-error ( ret -- ret )
|
||||||
: PQERRORS_TERSE HEX: 0 ; inline
|
dup 0 = [ PQresultErrorMessage throw ] when ;
|
||||||
: PQERRORS_DEFAULT HEX: 1 ; inline
|
|
||||||
: PQERRORS_VERBOSE HEX: 2 ; inline
|
: (do-query) ( PGconn query -- PGresult* )
|
||||||
|
! For queries that do not return rows, PQexec() returns PGRES_COMMAND_OK
|
||||||
|
! For queries that return rows, PQexec() returns PGRES_TUPLES_OK
|
||||||
|
PQexec
|
||||||
|
dup PQresultStatus PGRES_COMMAND_OK =
|
||||||
|
over PQresultStatus PGRES_TUPLES_OK =
|
||||||
|
or [
|
||||||
|
[ PQresultErrorMessage CHAR: \n swap remove ] keep PQclear throw
|
||||||
|
] unless ;
|
||||||
|
|
||||||
|
: (do-command) ( PGconn query -- PGresult* )
|
||||||
|
[ (do-query) ] catch
|
||||||
|
[
|
||||||
|
swap
|
||||||
|
"non-fatal error: " print
|
||||||
|
"\tQuery: " write "'" write write "'" print
|
||||||
|
"\t" write print
|
||||||
|
] when* drop ;
|
||||||
|
|
||||||
|
: do-command ( str -- )
|
||||||
|
unit \ (do-command) add postgres-conn get swap call ;
|
||||||
|
|
||||||
|
: prepare ( str quot word -- quot )
|
||||||
|
rot unit swap append swap append postgres-conn get swap ;
|
||||||
|
|
||||||
|
: do-query ( str quot -- )
|
||||||
|
[ (do-query) query-res set ] prepare catch [ rethrow ] [ query-res get PQclear ] if* ;
|
||||||
|
|
||||||
|
: result>seq ( -- )
|
||||||
|
query-res get [ PQnfields ] keep PQntuples
|
||||||
|
[ [ over [ [ 2dup query-res get -rot PQgetvalue , ] repeat ] { } make , ] repeat ] { } make nip ;
|
||||||
|
|
||||||
|
: print-table ( seq -- )
|
||||||
|
[ [ "\t" append write ] each "\n" write ] each ;
|
||||||
|
|
||||||
|
|
||||||
TYPEDEF: int ConnStatusType
|
|
||||||
TYPEDEF: int ExecStatusType
|
|
||||||
TYPEDEF: int PostgresPollingStatusType
|
|
||||||
TYPEDEF: int PGTransactionStatusType
|
|
||||||
TYPEDEF: int PGVerbosity
|
|
||||||
|
|
||||||
TYPEDEF: void* PGconn*
|
|
||||||
TYPEDEF: void* PGresult*
|
|
||||||
TYPEDEF: uint Oid
|
|
||||||
TYPEDEF: uint* Oid*
|
|
||||||
TYPEDEF: char pqbool
|
|
||||||
TYPEDEF: void* PQconninfoOption*
|
|
||||||
TYPEDEF: void* PGnotify*
|
|
||||||
TYPEDEF: void* PQArgBlock*
|
|
||||||
TYPEDEF: void* PQprintOpt*
|
|
||||||
TYPEDEF: void* FILE*
|
|
||||||
TYPEDEF: void* SSL*
|
|
||||||
|
|
||||||
LIBRARY: postgresql
|
|
||||||
|
|
||||||
|
|
||||||
! Exported functions of libpq
|
|
||||||
! === in fe-connect.c ===
|
|
||||||
|
|
||||||
! make a new client connection to the backend
|
|
||||||
! Asynchronous (non-blocking)
|
|
||||||
FUNCTION: PGconn* PQconnectStart ( char* conninfo ) ;
|
|
||||||
FUNCTION: PostgresPollingStatusType PQconnectPoll ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Synchronous (blocking)
|
|
||||||
FUNCTION: PGconn* PQconnectdb ( char* conninfo ) ;
|
|
||||||
FUNCTION: PGconn* PQsetdbLogin ( char* pghost, char* pgport,
|
|
||||||
char* pgoptions, char* pgtty,
|
|
||||||
char* dbName,
|
|
||||||
char* login, char* pwd ) ;
|
|
||||||
|
|
||||||
! An alias without the login/password, defined as the following in the .h file
|
|
||||||
! #define PQsetdb(M_PGHOST,M_PGPORT,M_PGOPT,M_PGTTY,M_DBNAME) \
|
|
||||||
! PQsetdbLogin(M_PGHOST, M_PGPORT, M_PGOPT, M_PGTTY, M_DBNAME, NULL, NULL)
|
|
||||||
|
|
||||||
: PQsetdb ( M_PGHOST M_PGPORT M_PGOPT M_PGTTY M_DBNAME -- PGconn* )
|
|
||||||
f f PQsetdbLogin ;
|
|
||||||
|
|
||||||
! close the current connection and free the PGconn data structure
|
|
||||||
FUNCTION: void PQfinish ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! get info about connection options known to PQconnectdb
|
|
||||||
FUNCTION: PQconninfoOption* PQconndefaults ( ) ;
|
|
||||||
|
|
||||||
! free the data structure returned by PQconndefaults()
|
|
||||||
FUNCTION: void PQconninfoFree ( PQconninfoOption* connOptions ) ;
|
|
||||||
|
|
||||||
!
|
|
||||||
! close the current connection and restablish a new one with the same
|
|
||||||
! parameters
|
|
||||||
!
|
|
||||||
! Asynchronous (non-blocking)
|
|
||||||
FUNCTION: int PQresetStart ( PGconn* conn ) ;
|
|
||||||
FUNCTION: PostgresPollingStatusType PQresetPoll ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Synchronous (blocking)
|
|
||||||
FUNCTION: void PQreset ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! issue a cancel request
|
|
||||||
FUNCTION: int PQrequestCancel ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Accessor functions for PGconn objects
|
|
||||||
FUNCTION: char* PQdb ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQuser ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQpass ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQhost ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQport ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQtty ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQoptions ( PGconn* conn ) ;
|
|
||||||
FUNCTION: ConnStatusType PQstatus ( PGconn* conn ) ;
|
|
||||||
FUNCTION: PGTransactionStatusType PQtransactionStatus ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQparameterStatus ( PGconn* conn,
|
|
||||||
char* paramName ) ;
|
|
||||||
FUNCTION: int PQprotocolVersion ( PGconn* conn ) ;
|
|
||||||
FUNCTION: char* PQerrorMessage ( PGconn* conn ) ;
|
|
||||||
FUNCTION: int PQsocket ( PGconn* conn ) ;
|
|
||||||
FUNCTION: int PQbackendPID ( PGconn* conn ) ;
|
|
||||||
FUNCTION: int PQclientEncoding ( PGconn* conn ) ;
|
|
||||||
FUNCTION: int PQsetClientEncoding ( PGconn* conn, char* encoding ) ;
|
|
||||||
|
|
||||||
! May not be compiled into libpq
|
|
||||||
! Get the SSL structure associated with a connection
|
|
||||||
FUNCTION: SSL* PQgetssl ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
|
|
||||||
! Set verbosity for PQerrorMessage and PQresultErrorMessage
|
|
||||||
FUNCTION: PGVerbosity PQsetErrorVerbosity ( PGconn* conn,
|
|
||||||
PGVerbosity verbosity ) ;
|
|
||||||
|
|
||||||
! Enable/disable tracing
|
|
||||||
FUNCTION: void PQtrace ( PGconn* conn, FILE* debug_port ) ;
|
|
||||||
FUNCTION: void PQuntrace ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! BROKEN
|
|
||||||
! Function types for notice-handling callbacks
|
|
||||||
! typedef void (*PQnoticeReceiver) (void *arg, PGresult *res);
|
|
||||||
! typedef void (*PQnoticeProcessor) (void *arg, char* message);
|
|
||||||
! ALIAS: void* PQnoticeReceiver
|
|
||||||
! ALIAS: void* PQnoticeProcessor
|
|
||||||
|
|
||||||
! Override default notice handling routines
|
|
||||||
! FUNCTION: PQnoticeReceiver PQsetNoticeReceiver ( PGconn* conn,
|
|
||||||
! PQnoticeReceiver proc,
|
|
||||||
! void* arg ) ;
|
|
||||||
! FUNCTION: PQnoticeProcessor PQsetNoticeProcessor ( PGconn* conn,
|
|
||||||
! PQnoticeProcessor proc,
|
|
||||||
! void* arg ) ;
|
|
||||||
! END BROKEN
|
|
||||||
|
|
||||||
! === in fe-exec.c ===
|
|
||||||
|
|
||||||
! Simple synchronous query
|
|
||||||
FUNCTION: PGresult* PQexec ( PGconn* conn, char* query ) ;
|
|
||||||
FUNCTION: PGresult* PQexecParams ( PGconn* conn,
|
|
||||||
char* command,
|
|
||||||
int nParams,
|
|
||||||
Oid* paramTypes,
|
|
||||||
char** paramValues,
|
|
||||||
int* paramLengths,
|
|
||||||
int* paramFormats,
|
|
||||||
int resultFormat ) ;
|
|
||||||
FUNCTION: PGresult* PQexecPrepared ( PGconn* conn,
|
|
||||||
char* stmtName,
|
|
||||||
int nParams,
|
|
||||||
char** paramValues,
|
|
||||||
int* paramLengths,
|
|
||||||
int* paramFormats,
|
|
||||||
int resultFormat ) ;
|
|
||||||
|
|
||||||
! Interface for multiple-result or asynchronous queries
|
|
||||||
FUNCTION: int PQsendQuery ( PGconn* conn, char* query ) ;
|
|
||||||
FUNCTION: int PQsendQueryParams ( PGconn* conn,
|
|
||||||
char* command,
|
|
||||||
int nParams,
|
|
||||||
Oid* paramTypes,
|
|
||||||
char** paramValues,
|
|
||||||
int* paramLengths,
|
|
||||||
int* paramFormats,
|
|
||||||
int resultFormat ) ;
|
|
||||||
FUNCTION: int PQsendQueryPrepared ( PGconn* conn,
|
|
||||||
char* stmtName,
|
|
||||||
int nParams,
|
|
||||||
char** paramValues,
|
|
||||||
int *paramLengths,
|
|
||||||
int *paramFormats,
|
|
||||||
int resultFormat ) ;
|
|
||||||
FUNCTION: PGresult* PQgetResult ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Routines for managing an asynchronous query
|
|
||||||
FUNCTION: int PQisBusy ( PGconn* conn ) ;
|
|
||||||
FUNCTION: int PQconsumeInput ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! LISTEN/NOTIFY support
|
|
||||||
FUNCTION: PGnotify* PQnotifies ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Routines for copy in/out
|
|
||||||
FUNCTION: int PQputCopyData ( PGconn* conn, char* buffer, int nbytes ) ;
|
|
||||||
FUNCTION: int PQputCopyEnd ( PGconn* conn, char* errormsg ) ;
|
|
||||||
FUNCTION: int PQgetCopyData ( PGconn* conn, char** buffer, int async ) ;
|
|
||||||
|
|
||||||
! Deprecated routines for copy in/out
|
|
||||||
FUNCTION: int PQgetline ( PGconn* conn, char* string, int length ) ;
|
|
||||||
FUNCTION: int PQputline ( PGconn* conn, char* string ) ;
|
|
||||||
FUNCTION: int PQgetlineAsync ( PGconn* conn, char* buffer, int bufsize ) ;
|
|
||||||
FUNCTION: int PQputnbytes ( PGconn* conn, char* buffer, int nbytes ) ;
|
|
||||||
FUNCTION: int PQendcopy ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Set blocking/nonblocking connection to the backend
|
|
||||||
FUNCTION: int PQsetnonblocking ( PGconn* conn, int arg ) ;
|
|
||||||
FUNCTION: int PQisnonblocking ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
! Force the write buffer to be written (or at least try)
|
|
||||||
FUNCTION: int PQflush ( PGconn* conn ) ;
|
|
||||||
|
|
||||||
!
|
|
||||||
! * "Fast path" interface --- not really recommended for application
|
|
||||||
! * use
|
|
||||||
!
|
|
||||||
FUNCTION: PGresult* PQfn ( PGconn* conn,
|
|
||||||
int fnid,
|
|
||||||
int* result_buf,
|
|
||||||
int* result_len,
|
|
||||||
int result_is_int,
|
|
||||||
PQArgBlock* args,
|
|
||||||
int nargs ) ;
|
|
||||||
|
|
||||||
! Accessor functions for PGresult objects
|
|
||||||
FUNCTION: ExecStatusType PQresultStatus ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQresStatus ( ExecStatusType status ) ;
|
|
||||||
FUNCTION: char* PQresultErrorMessage ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQresultErrorField ( PGresult* res, int fieldcode ) ;
|
|
||||||
FUNCTION: int PQntuples ( PGresult* res ) ;
|
|
||||||
FUNCTION: int PQnfields ( PGresult* res ) ;
|
|
||||||
FUNCTION: int PQbinaryTuples ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQfname ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: int PQfnumber ( PGresult* res, char* field_name ) ;
|
|
||||||
FUNCTION: Oid PQftable ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: int PQftablecol ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: int PQfformat ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: Oid PQftype ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: int PQfsize ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: int PQfmod ( PGresult* res, int field_num ) ;
|
|
||||||
FUNCTION: char* PQcmdStatus ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQoidStatus ( PGresult* res ) ;
|
|
||||||
FUNCTION: Oid PQoidValue ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQcmdTuples ( PGresult* res ) ;
|
|
||||||
FUNCTION: char* PQgetvalue ( PGresult* res, int tup_num, int field_num ) ;
|
|
||||||
FUNCTION: int PQgetlength ( PGresult* res, int tup_num, int field_num ) ;
|
|
||||||
FUNCTION: int PQgetisnull ( PGresult* res, int tup_num, int field_num ) ;
|
|
||||||
|
|
||||||
! Delete a PGresult
|
|
||||||
FUNCTION: void PQclear ( PGresult* res ) ;
|
|
||||||
|
|
||||||
! For freeing other alloc'd results, such as PGnotify structs
|
|
||||||
FUNCTION: void PQfreemem ( void* ptr ) ;
|
|
||||||
|
|
||||||
! Exists for backward compatibility.
|
|
||||||
: PQfreeNotify PQfreemem ;
|
|
||||||
|
|
||||||
!
|
|
||||||
! Make an empty PGresult with given status (some apps find this
|
|
||||||
! useful). If conn is not NULL and status indicates an error, the
|
|
||||||
! conn's errorMessage is copied.
|
|
||||||
!
|
|
||||||
FUNCTION: PGresult* PQmakeEmptyPGresult ( PGconn* conn, ExecStatusType status ) ;
|
|
||||||
|
|
||||||
! Quoting strings before inclusion in queries.
|
|
||||||
FUNCTION: size_t PQescapeString ( char* to, char* from, size_t length ) ;
|
|
||||||
FUNCTION: uchar* PQescapeBytea ( uchar* bintext, size_t binlen,
|
|
||||||
size_t* bytealen ) ;
|
|
||||||
FUNCTION: uchar* PQunescapeBytea ( uchar* strtext,
|
|
||||||
size_t* retbuflen ) ;
|
|
||||||
|
|
||||||
! === in fe-print.c ===
|
|
||||||
|
|
||||||
FUNCTION: void PQprint ( FILE* fout, PGresult* res, PQprintOpt* ps ) ;
|
|
||||||
|
|
||||||
! really old printing routines
|
|
||||||
FUNCTION: void PQdisplayTuples ( PGresult* res,
|
|
||||||
FILE* fp,
|
|
||||||
int fillAlign,
|
|
||||||
char* fieldSep,
|
|
||||||
int printHeader,
|
|
||||||
int quiet ) ;
|
|
||||||
|
|
||||||
FUNCTION: void PQprintTuples ( PGresult* res,
|
|
||||||
FILE* fout,
|
|
||||||
int printAttName,
|
|
||||||
int terseOutput,
|
|
||||||
int width ) ;
|
|
||||||
|
|
||||||
! === in fe-lobj.c ===
|
|
||||||
|
|
||||||
! Large-object access routines
|
|
||||||
FUNCTION: int lo_open ( PGconn* conn, Oid lobjId, int mode ) ;
|
|
||||||
FUNCTION: int lo_close ( PGconn* conn, int fd ) ;
|
|
||||||
FUNCTION: int lo_read ( PGconn* conn, int fd, char* buf, size_t len ) ;
|
|
||||||
FUNCTION: int lo_write ( PGconn* conn, int fd, char* buf, size_t len ) ;
|
|
||||||
FUNCTION: int lo_lseek ( PGconn* conn, int fd, int offset, int whence ) ;
|
|
||||||
FUNCTION: Oid lo_creat ( PGconn* conn, int mode ) ;
|
|
||||||
FUNCTION: int lo_tell ( PGconn* conn, int fd ) ;
|
|
||||||
FUNCTION: int lo_unlink ( PGconn* conn, Oid lobjId ) ;
|
|
||||||
FUNCTION: Oid lo_import ( PGconn* conn, char* filename ) ;
|
|
||||||
FUNCTION: int lo_export ( PGconn* conn, Oid lobjId, char* filename ) ;
|
|
||||||
|
|
||||||
! === in fe-misc.c ===
|
|
||||||
|
|
||||||
! Determine length of multibyte encoded char at *s
|
|
||||||
FUNCTION: int PQmblen ( uchar* s, int encoding ) ;
|
|
||||||
|
|
||||||
! Get encoding id from environment variable PGCLIENTENCODING
|
|
||||||
FUNCTION: int PQenv2encoding ( ) ;
|
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue