*
*
* IDENTIFICATION
- * $Header: /cvsroot/pgsql/src/interfaces/libpq/fe-exec.c,v 1.12 1996/07/31 18:40:09 scrappy Exp $
+ * $Header: /cvsroot/pgsql/src/interfaces/libpq/fe-exec.c,v 1.13 1996/08/06 16:16:46 scrappy Exp $
*
*-------------------------------------------------------------------------
*/
#define TUPARR_GROW_BY 100
/* keep this in same order as ExecStatusType in pgtclCmds.h */
-char* pgresStatus[] = {
+const char* pgresStatus[] = {
"PGRES_EMPTY_QUERY",
"PGRES_COMMAND_OK",
"PGRES_TUPLES_OK",
char bmap; /* One byte of the bitmap */
int bitcnt = 0; /* number of bits examined in current byte */
int vlen; /* length of the current field value */
- FILE *Pfin = conn->Pfin;
+ FILE *pfin = conn->Pfin;
FILE *Pfdebug = conn->Pfdebug;
PGresAttValue* tup;
if ( (nfields % BYTELEN) > 0)
nbytes++;
- if (pqGetnchar(bitmap, nbytes, Pfin, Pfdebug) == 1){
+ if (pqGetnchar(bitmap, nbytes, pfin, Pfdebug) == 1){
sprintf(conn->errorMessage,
"Error reading null-values bitmap from tuple data stream\n");
return NULL;
}
else {
/* get the value length (the first four bytes are for length) */
- pqGetInt(&vlen, VARHDRSZ, Pfin, Pfdebug);
+ pqGetInt(&vlen, VARHDRSZ, pfin, Pfdebug);
if (binary == 0) {
vlen = vlen - VARHDRSZ;
}
tup[i].value = (char*) malloc(vlen + 1);
/* read in the value; */
if (vlen > 0)
- pqGetnchar((char*)(tup[i].value), vlen, Pfin, Pfdebug);
+ pqGetnchar((char*)(tup[i].value), vlen, pfin, Pfdebug);
tup[i].value[vlen] = '\0';
}
/* get the appropriate bitmap */
PGresAttValue* newTup;
- FILE* Pfin = conn->Pfin;
+ FILE* pfin = conn->Pfin;
FILE* Pfdebug = conn->Pfdebug;
result = makeEmptyPGresult(conn, PGRES_TUPLES_OK);
/* id of the stream is 'T' to start with */
/* the next two bytes are the number of fields */
- if (pqGetInt(&nfields, 2, Pfin, Pfdebug) == 1) {
+ if (pqGetInt(&nfields, 2, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"could not get the number of fields from the 'T' message\n");
goto makePGresult_badResponse_return;
int adtid;
int adtsize;
- if ( pqGets(typName, MAX_MESSAGE_LEN, Pfin, Pfdebug) ||
- pqGetInt(&adtid, 4, Pfin, Pfdebug) ||
- pqGetInt(&adtsize, 2, Pfin, Pfdebug)) {
+ if ( pqGets(typName, MAX_MESSAGE_LEN, pfin, Pfdebug) ||
+ pqGetInt(&adtid, 4, pfin, Pfdebug) ||
+ pqGetInt(&adtsize, 2, pfin, Pfdebug)) {
sprintf(conn->errorMessage,
"error reading type information from the 'T' message\n");
goto makePGresult_badResponse_return;
result->attDescs[i].adtsize = adtsize; /* casting from int to int2 here */
}
- id = pqGetc(Pfin,Pfdebug);
+ id = pqGetc(pfin,Pfdebug);
/* process the data stream until we're finished */
while(!done) {
case 'C': /* end of portal tuple stream */
{
char command[MAX_MESSAGE_LEN];
- pqGets(command,MAX_MESSAGE_LEN, Pfin, Pfdebug); /* read the command tag */
+ pqGets(command,MAX_MESSAGE_LEN, pfin, Pfdebug); /* read the command tag */
done = 1;
}
break;
case 'E': /* errors */
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"Error return detected from backend, but error message cannot be read");
}
return result;
break;
case 'N': /* notices from the backend */
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"Notice return detected from backend, but error message cannot be read");
} else
break;
}
if (!done)
- id = getc(Pfin);
+ id = getc(pfin);
} /* while (1) */
result->resultStatus = PGRES_TUPLES_OK;
*/
PGresult*
-PQexec(PGconn* conn, char* query)
+PQexec(PGconn* conn, const char* query)
{
PGresult *result;
int id, clear;
char cmdStatus[MAX_MESSAGE_LEN];
char pname[MAX_MESSAGE_LEN]; /* portal name */
PGnotify *newNotify;
- FILE *Pfin, *Pfout, *Pfdebug;
+ FILE *pfin, *pfout, *Pfdebug;
pname[0]='\0';
sprintf(buffer,"Q%s",query);
/* send the query to the backend; */
- if (pqPuts(buffer,Pfout, Pfdebug) == 1) {
+ if (pqPuts(buffer,pfout, Pfdebug) == 1) {
(void) sprintf(conn->errorMessage,
"PQexec() -- while sending query: %s\n-- fprintf to Pfout failed: errno=%d\n%s\n",
query, errno,strerror(errno));
while (1) {
/* read the result id */
- id = pqGetc(Pfin,Pfdebug);
+ id = pqGetc(pfin,Pfdebug);
if (id == EOF) {
/* hmm, no response from the backend-end, that's bad */
(void) sprintf(conn->errorMessage,
switch (id) {
case 'A':
newNotify = (PGnotify*)malloc(sizeof(PGnotify));
- pqGetInt(&(newNotify->be_pid), 4, Pfin, Pfdebug);
- pqGets(newNotify->relname, NAMEDATALEN, Pfin, Pfdebug);
+ pqGetInt(&(newNotify->be_pid), 4, pfin, Pfdebug);
+ pqGets(newNotify->relname, NAMEDATALEN, pfin, Pfdebug);
DLAddTail(conn->notifyList, DLNewElem(newNotify));
/* async messages are piggy'ed back on other messages,
so we stay in the while loop for other messages */
break;
case 'C': /* portal query command, no tuples returned */
- if (pqGets(cmdStatus, MAX_MESSAGE_LEN, Pfin, Pfdebug) == 1) {
+ if (pqGets(cmdStatus, MAX_MESSAGE_LEN, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"PQexec() -- query command completed, but return message from backend cannot be read");
return (PGresult*)NULL;
*/
clear = 0;
- pqPuts("Q ",Pfout,Pfdebug); /* send an empty query */
+ pqPuts("Q ",pfout,Pfdebug); /* send an empty query */
while (!clear)
{
- if (pqGets(buffer,ERROR_MSG_LENGTH,Pfin,Pfdebug) == 1)
+ if (pqGets(buffer,ERROR_MSG_LENGTH,pfin,Pfdebug) == 1)
clear = 1;
clear = (buffer[0] == 'I');
}
}
break;
case 'E': /* error return */
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
(void) sprintf(conn->errorMessage,
"PQexec() -- error return detected from backend, but error message cannot be read");
}
/* read the throw away the closing '\0' */
{
int c;
- if ((c = pqGetc(Pfin,Pfdebug)) != '\0') {
+ if ((c = pqGetc(pfin,Pfdebug)) != '\0') {
fprintf(stderr,"error!, unexpected character %c following 'I'\n", c);
}
result = makeEmptyPGresult(conn, PGRES_EMPTY_QUERY);
}
break;
case 'N': /* notices from the backend */
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"PQexec() -- error return detected from backend, but error message cannot be read");
return (PGresult*)NULL;
fprintf(stderr,"%s", conn->errorMessage);
break;
case 'P': /* synchronous (normal) portal */
- pqGets(pname,MAX_MESSAGE_LEN,Pfin, Pfdebug); /* read in the portal name*/
+ pqGets(pname,MAX_MESSAGE_LEN,pfin, Pfdebug); /* read in the portal name*/
break;
case 'T': /* actual tuple results: */
return makePGresult(conn, pname);
*
*/
void
-PQputline(PGconn *conn, char *s)
+PQputline(PGconn *conn, const char *s)
{
if (conn && (conn->Pfout)) {
(void) fputs(s, conn->Pfout);
PQendcopy(PGconn *conn)
{
char id;
- FILE *Pfin, *Pfdebug;
+ FILE *pfin, *Pfdebug;
if (!conn) return (int)NULL;
Pfin = conn->Pfin;
Pfdebug = conn->Pfdebug;
- if ( (id = pqGetc(Pfin,Pfdebug)) > 0)
+ if ( (id = pqGetc(pfin,Pfdebug)) > 0)
return(0);
switch (id) {
case 'Z': /* backend finished the copy */
return(1);
case 'E':
case 'N':
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"Error return detected from backend, but error message cannot be read");
}
PQdisplayTuples(PGresult *res,
FILE *fp, /* where to send the output */
int fillAlign, /* pad the fields with spaces */
- char *fieldSep, /* field separator */
+ const char *fieldSep, /* field separator */
int printHeader, /* display headers? */
int quiet
)
int fLength[MAX_FIELDS];
if (fieldSep == NULL)
- fieldSep == DEFAULT_FIELD_SEP;
+ fieldSep = DEFAULT_FIELD_SEP;
/* Get some useful info about the results */
nFields = PQnfields(res);
PQArgBlock *args,
int nargs)
{
- FILE *Pfin, *Pfout, *Pfdebug;
+ FILE *pfin, *pfout, *Pfdebug;
int id;
int i;
/* clear the error string */
conn->errorMessage[0] = '\0';
- pqPuts("F ",Pfout,Pfdebug); /* function */
- pqPutInt(fnid, 4, Pfout, Pfdebug); /* function id */
- pqPutInt(nargs, 4, Pfout, Pfdebug); /* # of args */
+ pqPuts("F ",pfout,Pfdebug); /* function */
+ pqPutInt(fnid, 4, pfout, Pfdebug); /* function id */
+ pqPutInt(nargs, 4, pfout, Pfdebug); /* # of args */
for (i = 0; i < nargs; ++i) { /* len.int4 + contents */
- pqPutInt(args[i].len, 4, Pfout, Pfdebug);
+ pqPutInt(args[i].len, 4, pfout, Pfdebug);
if (args[i].isint) {
- pqPutInt(args[i].u.integer, 4, Pfout, Pfdebug);
+ pqPutInt(args[i].u.integer, 4, pfout, Pfdebug);
} else {
- pqPutnchar((char *)args[i].u.ptr, args[i].len, Pfout, Pfdebug);
+ pqPutnchar((char *)args[i].u.ptr, args[i].len, pfout, Pfdebug);
}
}
- pqFlush(Pfout, Pfdebug);
+ pqFlush(pfout, Pfdebug);
- id = pqGetc(Pfin, Pfdebug);
+ id = pqGetc(pfin, Pfdebug);
if (id != 'V') {
if (id == 'E') {
- pqGets(conn->errorMessage,ERROR_MSG_LENGTH,Pfin,Pfdebug);
+ pqGets(conn->errorMessage,ERROR_MSG_LENGTH,pfin,Pfdebug);
} else
sprintf(conn->errorMessage,
"PQfn: expected a 'V' from the backend. Got '%c' instead",
return makeEmptyPGresult(conn,PGRES_FATAL_ERROR);
}
- id = pqGetc(Pfin, Pfdebug);
+ id = pqGetc(pfin, Pfdebug);
for (;;) {
int c;
switch (id) {
case 'G': /* function returned properly */
- pqGetInt(actual_result_len,4,Pfin,Pfdebug);
+ pqGetInt(actual_result_len,4,pfin,Pfdebug);
if (result_is_int) {
- pqGetInt(result_buf,4,Pfin,Pfdebug);
+ pqGetInt(result_buf,4,pfin,Pfdebug);
} else {
pqGetnchar((char *) result_buf, *actual_result_len,
- Pfin, Pfdebug);
+ pfin, Pfdebug);
}
- c = pqGetc(Pfin, Pfdebug); /* get the last '0'*/
+ c = pqGetc(pfin, Pfdebug); /* get the last '0'*/
return makeEmptyPGresult(conn,PGRES_COMMAND_OK);
case 'E':
sprintf(conn->errorMessage,
return makeEmptyPGresult(conn,PGRES_FATAL_ERROR);
case 'N':
/* print notice and go back to processing return values */
- if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, Pfin, Pfdebug) == 1) {
+ if (pqGets(conn->errorMessage, ERROR_MSG_LENGTH, pfin, Pfdebug) == 1) {
sprintf(conn->errorMessage,
"Notice return detected from backend, but error message cannot be read");
} else
returns -1 on a bad field name
*/
int
-PQfnumber(PGresult *res, char* field_name)
+PQfnumber(PGresult *res, const char* field_name)
{
int i;
if the last command was an INSERT, return the oid string
if not, return ""
*/
-char* PQoidStatus(PGresult *res) {
+const char* PQoidStatus(PGresult *res) {
if (!res) {
fprintf(stderr, "PQoidStatus() -- pointer to PQresult is null");
return NULL;
*
* Copyright (c) 1994, Regents of the University of California
*
- * $Id: libpq-fe.h,v 1.5 1996/07/31 18:40:12 scrappy Exp $
+ * $Id: libpq-fe.h,v 1.6 1996/08/06 16:16:50 scrappy Exp $
*
*-------------------------------------------------------------------------
*/
} ExecStatusType;
/* string descriptions of the ExecStatusTypes */
-extern char* pgresStatus[];
+extern const char* pgresStatus[];
/*
* POSTGRES backend dependent Constants.
/* === in fe-connect.c === */
/* make a new client connection to the backend */
-extern PGconn* PQsetdb(char* pghost, char* pgport, char* pgoptions,
- char* pgtty, char* dbName);
+extern PGconn* PQsetdb(const char* pghost, const char* pgport, const char* pgoptions,
+ const char* pgtty, const char* dbName);
/* close the current connection and free the PGconn data structure */
extern void PQfinish(PGconn* conn);
/* close the current connection and restablish a new one with the same
extern void PQuntrace(PGconn *conn);
/* === in fe-exec.c === */
-extern PGresult* PQexec(PGconn* conn, char* query);
+extern PGresult* PQexec(PGconn* conn, const char* query);
extern int PQgetline(PGconn *conn, char* string, int length);
extern int PQendcopy(PGconn *conn);
-extern void PQputline(PGconn *conn, char* string);
+extern void PQputline(PGconn *conn, const char* string);
extern ExecStatusType PQresultStatus(PGresult* res);
extern int PQntuples(PGresult *res);
extern int PQnfields(PGresult *res);
extern char* PQfname(PGresult *res, int field_num);
-extern int PQfnumber(PGresult *res, char* field_name);
+extern int PQfnumber(PGresult *res, const char* field_name);
extern Oid PQftype(PGresult *res, int field_num);
extern int2 PQfsize(PGresult *res, int field_num);
extern char* PQcmdStatus(PGresult *res);
-extern char* PQoidStatus(PGresult *res);
+extern const char* PQoidStatus(PGresult *res);
extern char* PQgetvalue(PGresult *res, int tup_num, int field_num);
extern int PQgetlength(PGresult *res, int tup_num, int field_num);
extern void PQclear(PGresult* res);
extern void PQdisplayTuples(PGresult *res,
FILE *fp, /* where to send the output */
int fillAlign, /* pad the fields with spaces */
- char *fieldSep, /* field separator */
+ const char *fieldSep, /* field separator */
int printHeader, /* display headers? */
int quiet);
extern void PQprintTuples(PGresult* res,
int nargs);
/* === in fe-auth.c === */
extern MsgType fe_getauthsvc(char* PQerrormsg);
-extern void fe_setauthsvc(char *name, char* PQerrormsg);
+extern void fe_setauthsvc(const char *name, char* PQerrormsg);
extern char *fe_getauthname(char* PQerrormsg);
/* === in fe-misc.c === */
*/
extern int pqGets(char* s, int maxlen, FILE* stream, FILE* debug);
extern int pqGetnchar(char* s, int maxlen, FILE* stream, FILE* debug);
-extern int pqPutnchar(char* s, int maxlen, FILE* stream, FILE* debug);
-extern int pqPuts(char* s, FILE* stream, FILE* debug );
+extern int pqPutnchar(const char* s, int maxlen, FILE* stream, FILE* debug);
+extern int pqPuts(const char* s, FILE* stream, FILE* debug );
extern int pqGetc(FILE* stream, FILE *debug);
/* get a n-byte integer from the stream into result */
/* returns 0 if successful */