Commit fcc2fbac authored by Michael Meskes's avatar Michael Meskes

Reverted changes made by pgindent

Made show.pgc set all variables before displaying them.
parent f99a569a
......@@ -13,11 +13,9 @@
#include <stdlib.h>
#include <sqltypes.h>
int
main(void)
int main(void)
{
char t1[] = "abc def ghi ";
/* 123456789012345 */
char buf[50];
int k;
......
......@@ -44,34 +44,29 @@ TODO:
ECPG_INFORMIX_BAD_EXPONENT ?
*/
char *decs[] = {"2E394", "-2", ".794", "3.44", "592.49E21", "-32.84e4",
char* decs[] = { "2E394", "-2", ".794", "3.44", "592.49E21", "-32.84e4",
"2E-394", ".1E-2", "+.0", "-592.49E-07", "+32.84e-4",
".500001", "-.5000001",
"1234567890123456789012345678.91", /* 30 digits should fit into decimal */
"1234567890123456789012345678.921", /* 31 digits should NOT fit into
* decimal */
"1234567890123456789012345678.91", /* 30 digits should fit
into decimal */
"1234567890123456789012345678.921", /* 31 digits should NOT
fit into decimal */
"not a number",
NULL};
NULL};
static void
check_errno(void);
check_errno(void);
#define BUFSIZE 200
int
main(void)
{
decimal *dec,
*din;
decimal *dec, *din;
char buf[BUFSIZE];
long l;
int i,
j,
k,
q,
r,
count = 0;
int i, j, k, q, r, count = 0;
double dbl;
decimal **decarr = (decimal **) calloc(1, sizeof(decimal));
......@@ -90,62 +85,52 @@ main(void)
decarr = realloc(decarr, sizeof(decimal *) * (count + 1));
decarr[count++] = dec;
r = dectoasc(dec, buf, BUFSIZE - 1, -1);
if (r < 0)
check_errno();
r = dectoasc(dec, buf, BUFSIZE-1, -1);
if (r < 0) check_errno();
printf("dec[%d,1]: r: %d, %s\n", i, r, buf);
r = dectoasc(dec, buf, BUFSIZE - 1, 0);
if (r < 0)
check_errno();
r = dectoasc(dec, buf, BUFSIZE-1, 0);
if (r < 0) check_errno();
printf("dec[%d,2]: r: %d, %s\n", i, r, buf);
r = dectoasc(dec, buf, BUFSIZE - 1, 1);
if (r < 0)
check_errno();
r = dectoasc(dec, buf, BUFSIZE-1, 1);
if (r < 0) check_errno();
printf("dec[%d,3]: r: %d, %s\n", i, r, buf);
r = dectoasc(dec, buf, BUFSIZE - 1, 2);
if (r < 0)
check_errno();
r = dectoasc(dec, buf, BUFSIZE-1, 2);
if (r < 0) check_errno();
printf("dec[%d,4]: r: %d, %s\n", i, r, buf);
din = PGTYPESdecimal_new();
r = dectoasc(din, buf, BUFSIZE - 1, 2);
if (r < 0)
check_errno();
r = dectoasc(din, buf, BUFSIZE-1, 2);
if (r < 0) check_errno();
printf("dec[%d,5]: r: %d, %s\n", i, r, buf);
r = dectolong(dec, &l);
if (r)
check_errno();
printf("dec[%d,6]: %ld (r: %d)\n", i, r ? 0L : l, r);
if (r) check_errno();
printf("dec[%d,6]: %ld (r: %d)\n", i, r?0L:l, r);
if (r == 0)
{
r = deccvlong(l, din);
if (r)
check_errno();
dectoasc(din, buf, BUFSIZE - 1, 2);
if (r) check_errno();
dectoasc(din, buf, BUFSIZE-1, 2);
q = deccmp(dec, din);
printf("dec[%d,7]: %s (r: %d - cmp: %d)\n", i, buf, r, q);
}
r = dectoint(dec, &k);
if (r)
check_errno();
printf("dec[%d,8]: %d (r: %d)\n", i, r ? 0 : k, r);
if (r) check_errno();
printf("dec[%d,8]: %d (r: %d)\n", i, r?0:k, r);
if (r == 0)
{
r = deccvint(k, din);
if (r)
check_errno();
dectoasc(din, buf, BUFSIZE - 1, 2);
if (r) check_errno();
dectoasc(din, buf, BUFSIZE-1, 2);
q = deccmp(dec, din);
printf("dec[%d,9]: %s (r: %d - cmp: %d)\n", i, buf, r, q);
}
r = dectodbl(dec, &dbl);
if (r)
check_errno();
printf("dec[%d,10]: %g (r: %d)\n", i, r ? 0.0 : dbl, r);
if (r) check_errno();
printf("dec[%d,10]: %g (r: %d)\n", i, r?0.0:dbl, r);
PGTYPESdecimal_free(din);
printf("\n");
......@@ -156,29 +141,23 @@ main(void)
decarr = realloc(decarr, sizeof(decimal *) * (count + 1));
decarr[count++] = dec;
rsetnull(CDECIMALTYPE, (char *) decarr[count - 1]);
printf("dec[%d]: %sNULL\n", count - 1,
risnull(CDECIMALTYPE, (char *) decarr[count - 1]) ? "" : "NOT ");
rsetnull(CDECIMALTYPE, (char *) decarr[count-1]);
printf("dec[%d]: %sNULL\n", count-1,
risnull(CDECIMALTYPE, (char *) decarr[count-1]) ? "" : "NOT ");
printf("dec[0]: %sNULL\n",
risnull(CDECIMALTYPE, (char *) decarr[0]) ? "" : "NOT ");
r = dectoasc(decarr[3], buf, -1, -1);
check_errno();
printf("dectoasc with len == -1: r: %d\n", r);
check_errno(); printf("dectoasc with len == -1: r: %d\n", r);
r = dectoasc(decarr[3], buf, 0, -1);
check_errno();
printf("dectoasc with len == 0: r: %d\n", r);
check_errno(); printf("dectoasc with len == 0: r: %d\n", r);
for (i = 0; i < count; i++)
{
for (j = 0; j < count; j++)
{
decimal a,
s,
m,
d;
decimal a, s, m, d;
int c;
c = deccmp(decarr[i], decarr[j]);
printf("dec[c,%d,%d]: %d\n", i, j, c);
......@@ -190,7 +169,7 @@ main(void)
}
else
{
dectoasc(&a, buf, BUFSIZE - 1, -1);
dectoasc(&a, buf, BUFSIZE-1, -1);
printf("dec[a,%d,%d]: %s\n", i, j, buf);
}
......@@ -202,7 +181,7 @@ main(void)
}
else
{
dectoasc(&s, buf, BUFSIZE - 1, -1);
dectoasc(&s, buf, BUFSIZE-1, -1);
printf("dec[s,%d,%d]: %s\n", i, j, buf);
}
......@@ -214,7 +193,7 @@ main(void)
}
else
{
dectoasc(&m, buf, BUFSIZE - 1, -1);
dectoasc(&m, buf, BUFSIZE-1, -1);
printf("dec[m,%d,%d]: %s\n", i, j, buf);
}
......@@ -226,7 +205,7 @@ main(void)
}
else
{
dectoasc(&d, buf, BUFSIZE - 1, -1);
dectoasc(&d, buf, BUFSIZE-1, -1);
printf("dec[d,%d,%d]: %s\n", i, j, buf);
}
}
......@@ -234,7 +213,7 @@ main(void)
for (i = 0; i < count; i++)
{
dectoasc(decarr[i], buf, BUFSIZE - 1, -1);
dectoasc(decarr[i], buf, BUFSIZE-1, -1);
printf("%d: %s\n", i, buf);
}
......@@ -244,7 +223,7 @@ main(void)
static void
check_errno(void)
{
switch (errno)
switch(errno)
{
case 0:
printf("(no errno set) - ");
......
......@@ -21,15 +21,14 @@
static void
check_return(int ret);
check_return(int ret);
static void
date_test_strdate(char *input)
{
static int i;
date d;
int r,
q;
int r, q;
char dbuf[11];
r = rstrdate(input, &d);
......@@ -55,8 +54,7 @@ date_test_defmt(char *fmt, char *input)
static int i;
char dbuf[11];
date d;
int q,
r;
int q, r;
r = rdefmtdate(&d, fmt, input);
printf("r: %d ", r);
......@@ -94,7 +92,7 @@ date_test_fmt(date d, char *fmt)
int
main(void)
{
short mdy[3] = {11, 23, 1959};
short mdy[3] = { 11, 23, 1959 };
char dbuf[11];
date d;
int r;
......@@ -166,7 +164,7 @@ main(void)
static void
check_return(int ret)
{
switch (ret)
switch(ret)
{
case ECPG_INFORMIX_ENOTDMY:
printf("(ECPG_INFORMIX_ENOTDMY)");
......
......@@ -21,7 +21,7 @@
static void
check_return(int ret);
check_return(int ret);
static void
fmtlong(long lng, char *fmt)
......@@ -62,7 +62,7 @@ main(void)
static void
check_return(int ret)
{
switch (ret)
switch(ret)
{
case ECPG_INFORMIX_ENOTDMY:
printf("(ECPG_INFORMIX_ENOTDMY)");
......
......@@ -25,26 +25,21 @@
static void openit(void);
static void
dosqlprint(void)
{
static void dosqlprint(void) {
printf("doSQLprint: Error: %s\n", sqlca.sqlerrm.sqlerrmc);
}
int
main(void)
int main(void)
{
#line 14 "test_informix.pgc"
int i = 14;
int i = 14 ;
#line 14 "test_informix.pgc"
#line 15 "test_informix.pgc"
decimal j,
m,
n;
decimal j , m , n ;
#line 15 "test_informix.pgc"
......@@ -54,138 +49,98 @@ main(void)
#line 18 "test_informix.pgc"
{
ECPGconnect(__LINE__, 1, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 1, "regress1" , NULL,NULL , NULL, 0);
#line 20 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 20 "test_informix.pgc"
if (sqlca.sqlcode != 0)
exit(1);
if (sqlca.sqlcode != 0) exit(1);
{
ECPGdo(__LINE__, 1, 1, NULL, "create table test ( i int primary key , j int ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "create table test ( i int primary key , j int ) ", ECPGt_EOIT, ECPGt_EORT);
#line 23 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 23 "test_informix.pgc"
/* this INSERT works */
rsetnull(CDECIMALTYPE, (char *) &j);
{
ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values( 7 , ? ) ",
ECPGt_decimal, &(j), (long) 1, (long) 1, sizeof(decimal),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
rsetnull(CDECIMALTYPE, (char *)&j);
{ ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values ( 7 , ? ) ",
ECPGt_decimal,&(j),(long)1,(long)1,sizeof(decimal),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 27 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 27 "test_informix.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 28 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 28 "test_informix.pgc"
/* this INSERT should fail because i is a unique column */
{
ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values( 7 , 12 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values ( 7 , 12 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 31 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 31 "test_informix.pgc"
printf("INSERT: %ld=%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode != 0)
{
ECPGtrans(__LINE__, NULL, "rollback");
if (sqlca.sqlcode != 0) { ECPGtrans(__LINE__, NULL, "rollback");
#line 33 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 33 "test_informix.pgc"
{
ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values( ? , 1 ) ",
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "insert into test ( i , j ) values ( ? , 1 ) ",
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 35 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 35 "test_informix.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 36 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 36 "test_informix.pgc"
/* this will fail (more than one row in subquery) */
{
ECPGdo(__LINE__, 1, 1, NULL, "select i from test where j = ( select j from test ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select i from test where j = ( select j from test ) ", ECPGt_EOIT, ECPGt_EORT);
#line 39 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 39 "test_informix.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 40 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 40 "test_informix.pgc"
/* this however should be ok */
{
ECPGdo(__LINE__, 1, 1, NULL, "select i from test where j = ( select j from test order by i limit 1 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select i from test where j = ( select j from test order by i limit 1 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 43 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 43 "test_informix.pgc"
printf("SELECT: %ld=%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode != 0)
{
ECPGtrans(__LINE__, NULL, "rollback");
if (sqlca.sqlcode != 0) { ECPGtrans(__LINE__, NULL, "rollback");
#line 45 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 45 "test_informix.pgc"
ECPG_informix_set_var(0, &(i), __LINE__);
\
ECPG_informix_set_var( 0, &( i ), __LINE__);\
/* declare c cursor for select * from test where i <= ? */
#line 47 "test_informix.pgc"
......@@ -195,25 +150,20 @@ main(void)
while (1)
{
{
ECPGdo(__LINE__, 1, 1, NULL, "fetch forward from c", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_decimal, &(j), (long) 1, (long) 1, sizeof(decimal),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "fetch forward from c", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_decimal,&(j),(long)1,(long)1,sizeof(decimal),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 54 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 54 "test_informix.pgc"
if (sqlca.sqlcode == 100)
break;
else if (sqlca.sqlcode != 0)
printf("Error: %ld\n", sqlca.sqlcode);
if (sqlca.sqlcode == 100) break;
else if (sqlca.sqlcode != 0) printf ("Error: %ld\n", sqlca.sqlcode);
if (risnull(CDECIMALTYPE, (char *) &j))
if (risnull(CDECIMALTYPE, (char *)&j))
printf("%d NULL\n", i);
else
{
......@@ -227,94 +177,70 @@ main(void)
deccvint(7, &j);
deccvint(14, &m);
decadd(&j, &m, &n);
{
ECPGdo(__LINE__, 1, 1, NULL, "delete from test where i = ? ",
ECPGt_decimal, &(n), (long) 1, (long) 1, sizeof(decimal),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "delete from test where i = ? ",
ECPGt_decimal,&(n),(long)1,(long)1,sizeof(decimal),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 72 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 72 "test_informix.pgc"
printf("DELETE: %ld\n", sqlca.sqlcode);
{
ECPGdo(__LINE__, 1, 1, NULL, "select 1 from test where i = 14 ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select 1 from test where i = 14 ", ECPGt_EOIT, ECPGt_EORT);
#line 75 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 75 "test_informix.pgc"
printf("Exists: %ld\n", sqlca.sqlcode);
{
ECPGdo(__LINE__, 1, 1, NULL, "select 1 from test where i = 147 ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select 1 from test where i = 147 ", ECPGt_EOIT, ECPGt_EORT);
#line 78 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 78 "test_informix.pgc"
printf("Does not exist: %ld\n", sqlca.sqlcode);
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 81 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 81 "test_informix.pgc"
{
ECPGdo(__LINE__, 1, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
#line 82 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 82 "test_informix.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 83 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 83 "test_informix.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 85 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 85 "test_informix.pgc"
return 0;
}
static void
openit(void)
static void openit(void)
{
{
ECPGdo(__LINE__, 1, 1, NULL, "declare c cursor for select * from test where i <= ? ",
ECPGt_int, &(*(int *) (ECPG_informix_get_var(0))), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "declare c cursor for select * from test where i <= ? ",
ECPGt_int,&(*( int *)(ECPG_informix_get_var( 0))),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 92 "test_informix.pgc"
if (sqlca.sqlcode < 0)
dosqlprint();
}
if (sqlca.sqlcode < 0) dosqlprint ( );}
#line 92 "test_informix.pgc"
}
......@@ -79,6 +79,7 @@ struct sqlca_t *ECPGget_sqlca(void);
#ifdef __cplusplus
}
#endif
#endif
#line 5 "test_informix2.pgc"
......@@ -96,8 +97,7 @@ struct sqlca_t *ECPGget_sqlca(void);
/* Check SQLCODE, and produce a "standard error" if it's wrong! */
static void
sql_check(char *fn, char *caller, int ignore)
static void sql_check(char *fn, char *caller, int ignore)
{
char errorstring[255];
......@@ -114,18 +114,14 @@ sql_check(char *fn, char *caller, int ignore)
printf("%s\n", errorstring);
/* attempt a ROLLBACK */
{
ECPGtrans(__LINE__, NULL, "rollback");
}
{ ECPGtrans(__LINE__, NULL, "rollback");}
#line 27 "test_informix2.pgc"
if (SQLCODE == 0)
{
sprintf(errorstring, "Rollback successful.\n");
}
else
{
} else {
sprintf(errorstring, "Rollback failed with code %ld.\n", SQLCODE);
}
......@@ -139,8 +135,7 @@ sql_check(char *fn, char *caller, int ignore)
int
main(void)
int main(void)
{
/* exec sql begin declare section */
......@@ -150,20 +145,19 @@ main(void)
#line 49 "test_informix2.pgc"
int c;
int c ;
#line 50 "test_informix2.pgc"
timestamp d;
timestamp d ;
#line 51 "test_informix2.pgc"
timestamp e;
timestamp e ;
#line 52 "test_informix2.pgc"
timestamp maxd;
timestamp maxd ;
#line 53 "test_informix2.pgc"
char dbname[30];
char dbname [ 30 ] ;
/* exec sql end declare section */
#line 54 "test_informix2.pgc"
......@@ -177,75 +171,57 @@ main(void)
ECPGdebug(1, stderr);
strcpy(dbname, "regress1");
{
ECPGconnect(__LINE__, 1, dbname, NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 1, dbname , NULL,NULL , NULL, 0);
#line 63 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 63 "test_informix2.pgc"
sql_check("main", "connect", 0);
{
ECPGdo(__LINE__, 1, 1, NULL, "set DateStyle to 'DMY'", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "set DateStyle to 'DMY'", ECPGt_EOIT, ECPGt_EORT);
#line 66 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 66 "test_informix2.pgc"
{
ECPGdo(__LINE__, 1, 1, NULL, "create table history ( customerid integer , timestamp timestamp without time zone , action_taken char ( 5 ) , narrative varchar ( 100 ) ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "create table history ( customerid integer , timestamp timestamp without time zone , action_taken char ( 5 ) , narrative varchar ( 100 ) ) ", ECPGt_EOIT, ECPGt_EORT);
#line 68 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 68 "test_informix2.pgc"
sql_check("main", "create", 0);
{
ECPGdo(__LINE__, 1, 1, NULL, "insert into history ( customerid , timestamp , action_taken , narrative ) values( 1 , '2003-05-07 13:28:34 CEST' , 'test' , 'test' ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "insert into history ( customerid , timestamp , action_taken , narrative ) values ( 1 , '2003-05-07 13:28:34 CEST' , 'test' , 'test' ) ", ECPGt_EOIT, ECPGt_EORT);
#line 73 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 73 "test_informix2.pgc"
sql_check("main", "insert", 0);
{
ECPGdo(__LINE__, 1, 1, NULL, "select max ( timestamp ) from history ", ECPGt_EOIT,
ECPGt_timestamp, &(maxd), (long) 1, (long) 1, sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select max ( timestamp ) from history ", ECPGt_EOIT,
ECPGt_timestamp,&(maxd),(long)1,(long)1,sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 78 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 78 "test_informix2.pgc"
sql_check("main", "select max", 100);
{
ECPGdo(__LINE__, 1, 1, NULL, "select customerid , timestamp from history where timestamp = ? limit 1 ",
ECPGt_timestamp, &(maxd), (long) 1, (long) 1, sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_int, &(c), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_timestamp, &(d), (long) 1, (long) 1, sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "select customerid , timestamp from history where timestamp = ? limit 1 ",
ECPGt_timestamp,&(maxd),(long)1,(long)1,sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_int,&(c),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_timestamp,&(d),(long)1,(long)1,sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 85 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 85 "test_informix2.pgc"
sql_check("main", "select", 0);
......@@ -257,59 +233,44 @@ main(void)
c++;
{
ECPGdo(__LINE__, 1, 1, NULL, "insert into history ( customerid , timestamp , action_taken , narrative ) values( ? , ? , 'test' , 'test' ) ",
ECPGt_int, &(c), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_timestamp, &(e), (long) 1, (long) 1, sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "insert into history ( customerid , timestamp , action_taken , narrative ) values ( ? , ? , 'test' , 'test' ) ",
ECPGt_int,&(c),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_timestamp,&(e),(long)1,(long)1,sizeof(timestamp),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 97 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 97 "test_informix2.pgc"
sql_check("main", "update", 0);
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 100 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 100 "test_informix2.pgc"
{
ECPGdo(__LINE__, 1, 1, NULL, "drop table history ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 1, 1, NULL, "drop table history ", ECPGt_EOIT, ECPGt_EORT);
#line 102 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 102 "test_informix2.pgc"
sql_check("main", "drop", 0);
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 105 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 105 "test_informix2.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 107 "test_informix2.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 107 "test_informix2.pgc"
sql_check("main", "disconnect", 0);
......
......@@ -29,180 +29,121 @@ main(void)
#line 16 "test1.pgc"
char db[200];
char db [ 200 ] ;
#line 17 "test1.pgc"
char pw[200];
char pw [ 200 ] ;
/* exec sql end declare section */
#line 18 "test1.pgc"
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 22 "test1.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "alter user connectuser encrypted password 'connectpw'", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "alter user connectuser encrypted password 'connectpw'", ECPGt_EOIT, ECPGt_EORT);}
#line 23 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 24 "test1.pgc"
/* <-- "main" not specified */
{
ECPGconnect(__LINE__, 0, "connectdb@localhost", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb@localhost" , NULL,NULL , "main", 0); }
#line 26 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 27 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "@localhost", "connectdb", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "@localhost" , "connectdb" , NULL , "main", 0); }
#line 29 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 30 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb@localhost:55432", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb@localhost:55432" , NULL,NULL , "main", 0); }
#line 32 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 33 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "@localhost:55432", "connectdb", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "@localhost:55432" , "connectdb" , NULL , "main", 0); }
#line 35 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 36 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb:55432", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb:55432" , NULL,NULL , "main", 0); }
#line 38 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 39 "test1.pgc"
{
ECPGconnect(__LINE__, 0, ":55432", "connectdb", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, ":55432" , "connectdb" , NULL , "main", 0); }
#line 41 "test1.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 42 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/connectdb", "connectuser", "connectpw", NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/connectdb" , "connectuser" , "connectpw" , NULL, 0); }
#line 44 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 45 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/", "connectdb", NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/" , "connectdb" , NULL , NULL, 0); }
#line 47 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 48 "test1.pgc"
strcpy(pw, "connectpw");
strcpy(db, "tcp:postgresql://localhost:55432/connectdb");
{
ECPGconnect(__LINE__, 0, db, "connectuser", pw, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, db , "connectuser" , pw , NULL, 0); }
#line 52 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 53 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb", "connectuser", "connectpw", NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb" , "connectuser" , "connectpw" , NULL, 0); }
#line 55 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 56 "test1.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb", "connectuser", NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb" , "connectuser" , NULL , NULL, 0); }
#line 58 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 59 "test1.pgc"
/* wrong db */
{
ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/nonexistant", "connectuser", "connectpw", NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:55432/nonexistant" , "connectuser" , "connectpw" , NULL, 0); }
#line 62 "test1.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 63 "test1.pgc"
/* wrong port */
{
ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:20/connectdb", "connectuser", "connectpw", NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "tcp:postgresql://localhost:20/connectdb" , "connectuser" , "connectpw" , NULL, 0); }
#line 66 "test1.pgc"
/* no disconnect necessary */
/* wrong password */
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb", "connectuser", "wrongpw", NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost:55432/connectdb" , "connectuser" , "wrongpw" , NULL, 0); }
#line 70 "test1.pgc"
/* no disconnect necessary */
......
......@@ -36,11 +36,10 @@ main(void)
#line 17 "test2.pgc"
char id[200];
char id [ 200 ] ;
#line 18 "test2.pgc"
char res[200];
char res [ 200 ] ;
/* exec sql end declare section */
#line 19 "test2.pgc"
......@@ -48,78 +47,56 @@ main(void)
ECPGdebug(1, stderr);
strcpy(id, "first");
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, id, 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , id, 0); }
#line 24 "test2.pgc"
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, "second", 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , "second", 0); }
#line 25 "test2.pgc"
/* this selects from "second" which was opened last */
{
ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 28 "test2.pgc"
{
ECPGdo(__LINE__, 0, 1, "first", "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, "first", "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 29 "test2.pgc"
{
ECPGdo(__LINE__, 0, 1, "second", "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, "second", "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 30 "test2.pgc"
{
ECPGsetconn(__LINE__, "first");
}
{ ECPGsetconn(__LINE__, "first");}
#line 32 "test2.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 33 "test2.pgc"
/* this will disconnect from "first" */
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 36 "test2.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 37 "test2.pgc"
/* error here since "first" is already disconnected */
{
ECPGdisconnect(__LINE__, id);
}
{ ECPGdisconnect(__LINE__, id);}
#line 40 "test2.pgc"
/* disconnect from "second" */
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 43 "test2.pgc"
......
......@@ -35,11 +35,10 @@ main(void)
#line 16 "test3.pgc"
char id[200];
char id [ 200 ] ;
#line 17 "test3.pgc"
char res[200];
char res [ 200 ] ;
/* exec sql end declare section */
#line 18 "test3.pgc"
......@@ -47,81 +46,58 @@ main(void)
ECPGdebug(1, stderr);
strcpy(id, "first");
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, id, 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , id, 0); }
#line 23 "test3.pgc"
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, "second", 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , "second", 0); }
#line 24 "test3.pgc"
/* this selects from "second" which was opened last */
{
ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 27 "test3.pgc"
/* will close "second" */
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 30 "test3.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char, (res), (long) 200, (long) 1, (200) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select current_database () ", ECPGt_EOIT,
ECPGt_char,(res),(long)200,(long)1,(200)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 31 "test3.pgc"
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, "second", 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , "second", 0); }
#line 33 "test3.pgc"
/* will close "second" */
{
ECPGdisconnect(__LINE__, "DEFAULT");
}
{ ECPGdisconnect(__LINE__, "DEFAULT");}
#line 35 "test3.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "second", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "second", 0); }
#line 37 "test3.pgc"
{
ECPGdisconnect(__LINE__, "ALL");
}
{ ECPGdisconnect(__LINE__, "ALL");}
#line 38 "test3.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 40 "test3.pgc"
{
ECPGdisconnect(__LINE__, "DEFAULT");
}
{ ECPGdisconnect(__LINE__, "DEFAULT");}
#line 41 "test3.pgc"
{
ECPGdisconnect(__LINE__, "ALL");
}
{ ECPGdisconnect(__LINE__, "ALL");}
#line 42 "test3.pgc"
/*
* exec sql disconnect; exec sql disconnect name;
* exec sql disconnect;
* exec sql disconnect name;
*
* are used in other tests
*/
......
......@@ -28,21 +28,15 @@ main(void)
{
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , "main", 0); }
#line 13 "test4.pgc"
{
ECPGsetconn(__LINE__, "main");
}
{ ECPGsetconn(__LINE__, "main");}
#line 15 "test4.pgc"
{
ECPGdisconnect(__LINE__, "DEFAULT");
}
{ ECPGdisconnect(__LINE__, "DEFAULT");}
#line 17 "test4.pgc"
......
......@@ -26,177 +26,118 @@ main(void)
#line 16 "test5.pgc"
char db[200];
char db [ 200 ] ;
#line 17 "test5.pgc"
char id[200];
char id [ 200 ] ;
/* exec sql end declare section */
#line 18 "test5.pgc"
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 22 "test5.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "alter user connectuser encrypted password 'connectpw'", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "alter user connectuser encrypted password 'connectpw'", ECPGt_EOIT, ECPGt_EORT);}
#line 23 "test5.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 24 "test5.pgc"
/* <-- "main" not specified */
strcpy(db, "connectdb");
strcpy(id, "main");
{
ECPGconnect(__LINE__, 0, db, NULL, NULL, id, 0);
}
{ ECPGconnect(__LINE__, 0, db , NULL,NULL , id, 0); }
#line 28 "test5.pgc"
{
ECPGdisconnect(__LINE__, id);
}
{ ECPGdisconnect(__LINE__, id);}
#line 29 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 31 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 32 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 34 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 35 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 37 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 38 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "", "connectdb", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "" , "connectdb" , NULL , "main", 0); }
#line 40 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 41 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", "connectuser", "connectdb", "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , "connectuser" , "connectdb" , "main", 0); }
#line 43 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 44 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb", "connectuser", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb" , "connectuser" , NULL , "main", 0); }
#line 46 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 47 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb", "connectuser", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb" , "connectuser" , NULL , "main", 0); }
#line 49 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 50 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb", "connectuser", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/connectdb" , "connectuser" , NULL , "main", 0); }
#line 52 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 53 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://200.46.204.71/connectdb", "connectuser", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://200.46.204.71/connectdb" , "connectuser" , NULL , "main", 0); }
#line 55 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 56 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/", "connectdb", NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "unix:postgresql://localhost/" , "connectdb" , NULL , "main", 0); }
#line 58 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 59 "test5.pgc"
/* connect twice */
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 62 "test5.pgc"
{
ECPGconnect(__LINE__, 0, "connectdb", NULL, NULL, "main", 0);
}
{ ECPGconnect(__LINE__, 0, "connectdb" , NULL,NULL , "main", 0); }
#line 63 "test5.pgc"
{
ECPGdisconnect(__LINE__, "main");
}
{ ECPGdisconnect(__LINE__, "main");}
#line 64 "test5.pgc"
/* not connected */
{
ECPGdisconnect(__LINE__, "nonexistant");
}
{ ECPGdisconnect(__LINE__, "nonexistant");}
#line 67 "test5.pgc"
......
......@@ -25,7 +25,7 @@
#line 8 "dt_test2.pgc"
char *dates[] = {"19990108foobar",
char *dates[] = { "19990108foobar",
"19990108 foobar",
"1999-01-08 foobar",
"January 8, 1999",
......@@ -45,22 +45,22 @@ char *dates[] = {"19990108foobar",
"1999.008",
"J2451187",
"January 8, 99 BC",
NULL};
NULL };
char *times[] = {"0:04",
char *times[] = { "0:04",
"1:59 PDT",
"13:24:40 -8:00",
"13:24:40.495+3",
NULL};
NULL };
char *intervals[] = {"1 minute",
char *intervals[] = { "1 minute",
"1 12:59:10",
"2 day 12 hour 59 minute 10 second",
"1 days 12 hrs 59 mins 10 secs",
"1 days 1 hours 1 minutes 1 seconds",
"1 year 59 mins",
"1 year 59 mins foobar",
NULL};
NULL };
int
main(void)
......@@ -73,27 +73,24 @@ main(void)
#line 51 "dt_test2.pgc"
date date1;
date date1 ;
#line 52 "dt_test2.pgc"
timestamp ts1,
ts2;
timestamp ts1 , ts2 ;
#line 53 "dt_test2.pgc"
char *text;
char * text ;
#line 54 "dt_test2.pgc"
interval *i1;
interval * i1 ;
#line 55 "dt_test2.pgc"
date *dc;
date * dc ;
/* exec sql end declare section */
#line 56 "dt_test2.pgc"
int i,
j;
int i, j;
char *endptr;
ECPGdebug(1, stderr);
......@@ -108,7 +105,6 @@ main(void)
dc = PGTYPESdate_new();
*dc = date1;
text = PGTYPESdate_to_asc(*dc);
printf("Date of timestamp: %s\n", text);
free(text);
PGTYPESdate_free(dc);
......@@ -116,14 +112,11 @@ main(void)
for (i = 0; dates[i]; i++)
{
bool err = false;
date1 = PGTYPESdate_from_asc(dates[i], &endptr);
if (date1 == INT_MIN)
{
if (date1 == INT_MIN) {
err = true;
}
text = PGTYPESdate_to_asc(date1);
printf("Date[%d]: %s (%c - %c)\n",
i, err ? "-" : text,
endptr ? 'N' : 'Y',
......@@ -137,14 +130,11 @@ main(void)
+ 1
+ strlen(times[j])
+ 1;
char *t = malloc(length);
char* t = malloc(length);
sprintf(t, "%s %s", dates[i], times[j]);
ts1 = PGTYPEStimestamp_from_asc(t, NULL);
text = PGTYPEStimestamp_to_asc(ts1);
if (i != 19 || j != 3) /* timestamp as integer or double
* differ for this case */
if (i != 19 || j != 3) /* timestamp as integer or double differ for this case */
printf("TS[%d,%d]: %s\n",
i, j, errno ? "-" : text);
free(text);
......@@ -157,7 +147,6 @@ main(void)
for (i = 0; intervals[i]; i++)
{
interval *ic;
i1 = PGTYPESinterval_from_asc(intervals[i], &endptr);
if (*endptr)
printf("endptr set to %s\n", endptr);
......@@ -170,14 +159,12 @@ main(void)
if (j < 0)
continue;
text = PGTYPESinterval_to_asc(i1);
printf("interval[%d]: %s\n", i, text ? text : "-");
free(text);
ic = PGTYPESinterval_new();
PGTYPESinterval_copy(i1, ic);
text = PGTYPESinterval_to_asc(i1);
printf("interval_copy[%d]: %s\n", i, text ? text : "-");
free(text);
PGTYPESinterval_free(ic);
......@@ -185,3 +172,4 @@ main(void)
return (0);
}
......@@ -34,24 +34,19 @@ NOTE: This file has a different expect file for regression tests on MinGW32
int
main(void)
{
char *text = "error\n";
numeric *value1,
*value2,
*res;
char *text="error\n";
numeric *value1, *value2, *res;
/* exec sql begin declare section */
/* = {0, 0, 0, 0, 0, NULL, NULL} ; */
#line 22 "num_test.pgc"
numeric *des;
numeric * des ;
/* exec sql end declare section */
#line 24 "num_test.pgc"
double d;
long l1,
l2;
long l1, l2;
int i;
ECPGdebug(1, stderr);
......@@ -59,39 +54,29 @@ main(void)
#line 30 "num_test.pgc"
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0);
#line 32 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 32 "num_test.pgc"
{
ECPGsetcommit(__LINE__, "off", NULL);
{ ECPGsetcommit(__LINE__, "off", NULL);
#line 34 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 34 "num_test.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "create table test ( text char ( 5 ) , num numeric ( 14 , 7 ) ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "create table test ( text char ( 5 ) , num numeric ( 14 , 7 ) ) ", ECPGt_EOIT, ECPGt_EORT);
#line 35 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 35 "num_test.pgc"
value1 = PGTYPESnumeric_new();
PGTYPESnumeric_from_int(1407, value1);
text = PGTYPESnumeric_to_asc(value1, -1);
printf("from int = %s\n", text);
free(text);
PGTYPESnumeric_free(value1);
......@@ -101,28 +86,23 @@ main(void)
res = PGTYPESnumeric_new();
PGTYPESnumeric_add(value1, value2, res);
text = PGTYPESnumeric_to_asc(res, -1);
printf("add = %s\n", text);
free(text);
PGTYPESnumeric_sub(res, value2, res);
text = PGTYPESnumeric_to_asc(res, -1);
printf("sub = %s\n", text);
free(text);
PGTYPESnumeric_free(value2);
des = PGTYPESnumeric_new();
PGTYPESnumeric_copy(res, des);
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( text , num ) values( 'test' , ? ) ",
ECPGt_numeric, &(des), (long) 1, (long) 0, sizeof(numeric),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( text , num ) values ( 'test' , ? ) ",
ECPGt_numeric,&(des),(long)1,(long)0,sizeof(numeric),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 60 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 60 "num_test.pgc"
......@@ -130,21 +110,17 @@ main(void)
PGTYPESnumeric_mul(value1, value2, res);
PGTYPESnumeric_free(value2);
{
ECPGdo(__LINE__, 0, 1, NULL, "select num from test where text = 'test' ", ECPGt_EOIT,
ECPGt_numeric, &(des), (long) 1, (long) 0, sizeof(numeric),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select num from test where text = 'test' ", ECPGt_EOIT,
ECPGt_numeric,&(des),(long)1,(long)0,sizeof(numeric),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 66 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 66 "num_test.pgc"
PGTYPESnumeric_mul(res, des, res);
text = PGTYPESnumeric_to_asc(res, -1);
printf("mul = %s\n", text);
free(text);
PGTYPESnumeric_free(des);
......@@ -152,7 +128,6 @@ main(void)
value2 = PGTYPESnumeric_from_asc("10000", NULL);
PGTYPESnumeric_div(res, value2, res);
text = PGTYPESnumeric_to_asc(res, -1);
PGTYPESnumeric_to_double(res, &d);
printf("div = %s %e\n", text, d);
......@@ -166,24 +141,19 @@ main(void)
PGTYPESnumeric_free(value2);
PGTYPESnumeric_free(res);
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 90 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 90 "num_test.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 91 "num_test.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint ( );}
#line 91 "num_test.pgc"
return (0);
}
......@@ -32,34 +32,29 @@ NOTE: This file has a different expect file for regression tests on MinGW32
*/
char *nums[] = {"2E394", "-2", ".794", "3.44", "592.49E21", "-32.84e4",
char* nums[] = { "2E394", "-2", ".794", "3.44", "592.49E21", "-32.84e4",
"2E-394", ".1E-2", "+.0", "-592.49E-07", "+32.84e-4",
".500001", "-.5000001",
"1234567890123456789012345678.91", /* 30 digits should fit into decimal */
"1234567890123456789012345678.921", /* 31 digits should NOT fit into
* decimal */
"1234567890123456789012345678.91", /* 30 digits should fit
into decimal */
"1234567890123456789012345678.921", /* 31 digits should NOT
fit into decimal */
"not a number",
NULL};
NULL};
static void
check_errno(void);
check_errno(void);
int
main(void)
{
char *text = "error\n";
char *text="error\n";
char *endptr;
numeric *num,
*nin;
numeric *num, *nin;
decimal *dec;
long l;
int i,
j,
k,
q,
r,
count = 0;
int i, j, k, q, r, count = 0;
double d;
numeric **numarr = (numeric **) calloc(1, sizeof(numeric));
......@@ -68,113 +63,81 @@ main(void)
for (i = 0; nums[i]; i++)
{
num = PGTYPESnumeric_from_asc(nums[i], &endptr);
if (!num)
check_errno();
if (!num) check_errno();
if (endptr != NULL)
{
printf("endptr of %d is not NULL\n", i);
if (*endptr != '\0')
printf("*endptr of %d is not \\0\n", i);
}
if (!num)
continue;
if (!num) continue;
numarr = realloc(numarr, sizeof(numeric *) * (count + 1));
numarr[count++] = num;
text = PGTYPESnumeric_to_asc(num, -1);
if (!text)
check_errno();
printf("num[%d,1]: %s\n", i, text);
free(text);
if (!text) check_errno();
printf("num[%d,1]: %s\n", i, text); free(text);
text = PGTYPESnumeric_to_asc(num, 0);
if (!text)
check_errno();
printf("num[%d,2]: %s\n", i, text);
free(text);
if (!text) check_errno();
printf("num[%d,2]: %s\n", i, text); free(text);
text = PGTYPESnumeric_to_asc(num, 1);
if (!text)
check_errno();
printf("num[%d,3]: %s\n", i, text);
free(text);
if (!text) check_errno();
printf("num[%d,3]: %s\n", i, text); free(text);
text = PGTYPESnumeric_to_asc(num, 2);
if (!text)
check_errno();
printf("num[%d,4]: %s\n", i, text);
free(text);
if (!text) check_errno();
printf("num[%d,4]: %s\n", i, text); free(text);
nin = PGTYPESnumeric_new();
text = PGTYPESnumeric_to_asc(nin, 2);
if (!text)
check_errno();
printf("num[%d,5]: %s\n", i, text);
free(text);
if (!text) check_errno();
printf("num[%d,5]: %s\n", i, text); free(text);
r = PGTYPESnumeric_to_long(num, &l);
if (r)
check_errno();
printf("num[%d,6]: %ld (r: %d)\n", i, r ? 0L : l, r);
if (r) check_errno();
printf("num[%d,6]: %ld (r: %d)\n", i, r?0L:l, r);
if (r == 0)
{
r = PGTYPESnumeric_from_long(l, nin);
if (r)
check_errno();
if (r) check_errno();
text = PGTYPESnumeric_to_asc(nin, 2);
q = PGTYPESnumeric_cmp(num, nin);
printf("num[%d,7]: %s (r: %d - cmp: %d)\n", i, text, r, q);
free(text);
}
r = PGTYPESnumeric_to_int(num, &k);
if (r)
check_errno();
printf("num[%d,8]: %d (r: %d)\n", i, r ? 0 : k, r);
if (r) check_errno();
printf("num[%d,8]: %d (r: %d)\n", i, r?0:k, r);
if (r == 0)
{
r = PGTYPESnumeric_from_int(k, nin);
if (r)
check_errno();
if (r) check_errno();
text = PGTYPESnumeric_to_asc(nin, 2);
q = PGTYPESnumeric_cmp(num, nin);
printf("num[%d,9]: %s (r: %d - cmp: %d)\n", i, text, r, q);
free(text);
}
r = PGTYPESnumeric_to_double(num, &d);
if (r)
check_errno();
printf("num[%d,10]: %g (r: %d)\n", i, r ? 0.0 : d, r);
/*
* do not test double to numeric because - extra digits are different
* on different architectures - PGTYPESnumeric_from_double internally
* calls PGTYPESnumeric_from_asc anyway
if (r) check_errno();
printf("num[%d,10]: %g (r: %d)\n", i, r?0.0:d, r);
/* do not test double to numeric because
* - extra digits are different on different architectures
* - PGTYPESnumeric_from_double internally calls PGTYPESnumeric_from_asc anyway
*/
dec = PGTYPESdecimal_new();
r = PGTYPESnumeric_to_decimal(num, dec);
if (r)
check_errno();
/*
* we have no special routine for outputting decimal, it would convert
* to a numeric anyway
*/
if (r) check_errno();
/* we have no special routine for outputting decimal, it would
* convert to a numeric anyway */
printf("num[%d,11]: - (r: %d)\n", i, r);
if (r == 0)
{
r = PGTYPESnumeric_from_decimal(dec, nin);
if (r)
check_errno();
if (r) check_errno();
text = PGTYPESnumeric_to_asc(nin, 2);
q = PGTYPESnumeric_cmp(num, nin);
printf("num[%d,12]: %s (r: %d - cmp: %d)\n", i, text, r, q);
free(text);
......@@ -189,11 +152,10 @@ main(void)
{
for (j = 0; j < count; j++)
{
numeric *a = PGTYPESnumeric_new();
numeric *s = PGTYPESnumeric_new();
numeric *m = PGTYPESnumeric_new();
numeric *d = PGTYPESnumeric_new();
numeric* a = PGTYPESnumeric_new();
numeric* s = PGTYPESnumeric_new();
numeric* m = PGTYPESnumeric_new();
numeric* d = PGTYPESnumeric_new();
r = PGTYPESnumeric_add(numarr[i], numarr[j], a);
if (r)
{
......@@ -203,7 +165,6 @@ main(void)
else
{
text = PGTYPESnumeric_to_asc(a, 10);
printf("num[a,%d,%d]: %s\n", i, j, text);
free(text);
}
......@@ -216,7 +177,6 @@ main(void)
else
{
text = PGTYPESnumeric_to_asc(s, 10);
printf("num[s,%d,%d]: %s\n", i, j, text);
free(text);
}
......@@ -229,7 +189,6 @@ main(void)
else
{
text = PGTYPESnumeric_to_asc(m, 10);
printf("num[m,%d,%d]: %s\n", i, j, text);
free(text);
}
......@@ -242,7 +201,6 @@ main(void)
else
{
text = PGTYPESnumeric_to_asc(d, 10);
printf("num[d,%d,%d]: %s\n", i, j, text);
free(text);
}
......@@ -252,7 +210,6 @@ main(void)
for (i = 0; i < count; i++)
{
text = PGTYPESnumeric_to_asc(numarr[i], -1);
printf("%d: %s\n", i, text);
free(text);
}
......@@ -263,7 +220,7 @@ main(void)
static void
check_errno(void)
{
switch (errno)
switch(errno)
{
case 0:
printf("(no errno set) - ");
......
......@@ -20,29 +20,24 @@
#line 3 "comment.pgc"
/* just a test comment */ int i;
/* just a test comment int j*/ ;
/* just a test comment */ int i;
/* just a test comment int j*/;
/****************************************************************************/
/* Test comment */
/*--------------------------------------------------------------------------*/
int
main(void)
int main(void)
{
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0); }
#line 17 "comment.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 19 "comment.pgc"
exit(0);
exit (0);
}
......@@ -33,14 +33,14 @@
/* exec sql type intarray is int [ 6 ] */
#line 13 "define.pgc"
typedef int intarray[6];
typedef int intarray[ 6];
int
main(void)
{
/* exec sql begin declare section */
typedef char string[8];
typedef char string [ 8 ] ;
#line 21 "define.pgc"
......@@ -49,113 +49,90 @@ main(void)
#line 22 "define.pgc"
intarray amount;
intarray amount ;
#line 23 "define.pgc"
char name[6][8];
char name [ 6 ] [ 8 ] ;
#line 24 "define.pgc"
char letter[6][1];
char letter [ 6 ] [ 1 ] ;
#if 0
#line 26 "define.pgc"
int not_used;
int not_used ;
#endif
/* exec sql end declare section */
#line 29 "define.pgc"
int i,
j;
int i,j;
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0);
#line 34 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 34 "define.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "create table test ( name char ( 8 ) , amount int , letter char ( 1 ) ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "create table test ( name char ( 8 ) , amount int , letter char ( 1 ) ) ", ECPGt_EOIT, ECPGt_EORT);
#line 36 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 36 "define.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 37 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 37 "define.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into Test ( name , amount , letter ) values ( 'false' , 1 , 'f' ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into Test ( name , amount , letter ) values ( 'false' , 1 , 'f' ) ", ECPGt_EOIT, ECPGt_EORT);
#line 39 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 39 "define.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( name , amount , letter ) values ( 'true' , 2 , 't' ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( name , amount , letter ) values ( 'true' , 2 , 't' ) ", ECPGt_EOIT, ECPGt_EORT);
#line 40 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 40 "define.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 41 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 41 "define.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from test ", ECPGt_EOIT,
ECPGt_char, (name), (long) 8, (long) 6, (8) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_int, (amount), (long) 1, (long) 6, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (letter), (long) 1, (long) 6, (1) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from test ", ECPGt_EOIT,
ECPGt_char,(name),(long)8,(long)6,(8)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_int,(amount),(long)1,(long)6,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(letter),(long)1,(long)6,(1)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 43 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 43 "define.pgc"
for (i = 0, j = sqlca.sqlerrd[2]; i < j; i++)
for (i=0, j=sqlca.sqlerrd[2]; i<j; i++)
{
/* exec sql begin declare section */
#line 48 "define.pgc"
char n[8],
l = letter[i][0];
char n [ 8 ] , l = letter [ i ] [ 0 ] ;
#line 49 "define.pgc"
int a = amount[i];
int a = amount [ i ] ;
/* exec sql end declare section */
#line 50 "define.pgc"
......@@ -164,31 +141,22 @@ main(void)
printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, n, i, a, i, l);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
#line 56 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 56 "define.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 57 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 57 "define.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 58 "define.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 58 "define.pgc"
......
......@@ -73,22 +73,16 @@ struct sqlca_t *ECPGget_sqlca(void);
#ifdef __cplusplus
}
#endif
#endif
#line 1 "init.pgc"
enum e
{
ENUM0, ENUM1
};
struct sa
{
int member;
};
enum e { ENUM0, ENUM1 };
struct sa { int member; };
static int
fa(void)
static int fa(void)
{
printf("in fa\n");
return 2;
......@@ -108,22 +102,19 @@ fc(const char *x)
return *x;
}
static int
fd(const char *x, int i)
static int fd(const char *x,int i)
{
printf("in fd (%s, %d)\n", x, i);
return (*x) * i;
return (*x)*i;
}
static int
fe(enum e x)
static int fe(enum e x)
{
printf("in fe (%d)\n", (int) x);
return (int) x;
return (int)x;
}
static void
sqlnotice(char *notice, short trans)
static void sqlnotice(char *notice, short trans)
{
if (!notice)
notice = "-empty-";
......@@ -137,15 +128,13 @@ sqlnotice(char *notice, short trans)
#ifdef _cplusplus
namespace N
{
static const int i = 2;
static const int i=2;
};
#endif
int
main(void)
int main(void)
{
struct sa x = {14}, *y = &x;
struct sa x = { 14 },*y = &x;
/* exec sql begin declare section */
......@@ -161,53 +150,52 @@ main(void)
/* = 1L */
#line 60 "init.pgc"
int a = (int) 2;
int a = ( int ) 2 ;
#line 61 "init.pgc"
int b = 2 + 2;
int b = 2 + 2 ;
#line 62 "init.pgc"
int b2 = (14 * 7);
int b2 = ( 14 * 7 ) ;
#line 63 "init.pgc"
int d = x.member;
int d = x . member ;
#line 64 "init.pgc"
int g = fb(2);
int g = fb ( 2 ) ;
#line 65 "init.pgc"
int i = 3 ^ 1;
int i = 3 ^ 1 ;
#line 66 "init.pgc"
int j = 1 ? 1 : 2;
int j = 1 ? 1 : 2 ;
#line 68 "init.pgc"
int e = y->member;
int e = y -> member ;
#line 69 "init.pgc"
int c = 10 >> 2;
int c = 10 >> 2 ;
#line 70 "init.pgc"
bool h = 2 || 1;
bool h = 2 || 1 ;
#line 71 "init.pgc"
long iay;
long iay ;
/* exec sql end declare section */
#line 72 "init.pgc"
int f = fa();
int f=fa();
#ifdef _cplusplus
/* exec sql begin declare section */
/* compile error */
#line 78 "init.pgc"
int k = N::i;
int k = N : : i ;
/* exec sql end declare section */
#line 79 "init.pgc"
#endif
ECPGdebug(1, stderr);
......@@ -218,73 +206,55 @@ main(void)
/* exec sql whenever sqlerror do fa ( ) ; */
#line 87 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 88 "init.pgc"
if (sqlca.sqlcode < 0)
fa();
}
if (sqlca.sqlcode < 0) fa ( );}
#line 88 "init.pgc"
/* exec sql whenever sqlerror do fb ( 20 ) ; */
#line 89 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 90 "init.pgc"
if (sqlca.sqlcode < 0)
fb(20);
}
if (sqlca.sqlcode < 0) fb ( 20 );}
#line 90 "init.pgc"
/* exec sql whenever sqlerror do fc ( \"50\" ) ; */
#line 91 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 92 "init.pgc"
if (sqlca.sqlcode < 0)
fc("50");
}
if (sqlca.sqlcode < 0) fc ( "50" );}
#line 92 "init.pgc"
/* exec sql whenever sqlerror do fd ( \"50\" , 1 ) ; */
#line 93 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 94 "init.pgc"
if (sqlca.sqlcode < 0)
fd("50", 1);
}
if (sqlca.sqlcode < 0) fd ( "50" , 1 );}
#line 94 "init.pgc"
/* exec sql whenever sqlerror do fe ( ENUM0 ) ; */
#line 95 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 96 "init.pgc"
if (sqlca.sqlcode < 0)
fe(ENUM0);
}
if (sqlca.sqlcode < 0) fe ( ENUM0 );}
#line 96 "init.pgc"
/* exec sql whenever sqlerror do sqlnotice ( NULL , 0 ) ; */
#line 97 "init.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select now () ", ECPGt_EOIT, ECPGt_EORT);
#line 98 "init.pgc"
if (sqlca.sqlcode < 0)
sqlnotice(NULL, 0);
}
if (sqlca.sqlcode < 0) sqlnotice ( NULL , 0 );}
#line 98 "init.pgc"
return 0;
......
......@@ -21,19 +21,19 @@
#line 4 "type.pgc"
typedef long mmInteger;
typedef long mmInteger ;
#line 6 "type.pgc"
#line 6 "type.pgc"
typedef char mmChar;
typedef char mmChar ;
#line 7 "type.pgc"
#line 7 "type.pgc"
typedef short mmSmallInt;
typedef short mmSmallInt ;
#line 8 "type.pgc"
......@@ -48,7 +48,7 @@ typedef char string[11];
/* exec sql type c is char reference */
#line 13 "type.pgc"
typedef char *c;
typedef char* c;
/* exec sql begin declare section */
......@@ -57,23 +57,21 @@ typedef char *c;
struct TBempl
{
struct TBempl {
#line 19 "type.pgc"
mmInteger idnum;
mmInteger idnum ;
#line 20 "type.pgc"
mmChar name[21];
mmChar name [ 21 ] ;
#line 21 "type.pgc"
mmSmallInt accs;
}; /* exec sql end declare section */
mmSmallInt accs ;
} ;/* exec sql end declare section */
#line 23 "type.pgc"
int
main(void)
main (void)
{
/* exec sql begin declare section */
......@@ -86,24 +84,22 @@ main(void)
#line 29 "type.pgc"
struct TBempl empl;
struct TBempl empl ;
#line 30 "type.pgc"
string str;
string str ;
#line 31 "type.pgc"
c ptr = NULL;
c ptr = NULL ;
#line 36 "type.pgc"
struct varchar_vc
{
struct varchar_vc {
#line 34 "type.pgc"
int len;
int len ;
#line 35 "type.pgc"
char text [10];
} vc;
char text [ 10 ] ;
} vc ;
/* exec sql end declare section */
#line 37 "type.pgc"
......@@ -111,74 +107,64 @@ main(void)
/* exec sql var vc is [ 10 ] */
#line 39 "type.pgc"
ECPGdebug(1, stderr);
ECPGdebug (1, stderr);
empl.idnum = 1;
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0); }
#line 43 "type.pgc"
if (sqlca.sqlcode)
{
printf("connect error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("connect error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "create table empl ( idnum integer , name char ( 20 ) , accs smallint , string1 char ( 10 ) , string2 char ( 10 ) , string3 char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "create table empl ( idnum integer , name char ( 20 ) , accs smallint , string1 char ( 10 ) , string2 char ( 10 ) , string3 char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);}
#line 51 "type.pgc"
if (sqlca.sqlcode)
{
printf("create error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("create error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into empl values ( 1 , 'user name' , 320 , 'first str' , 'second str' , 'third str' ) ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into empl values ( 1 , 'user name' , 320 , 'first str' , 'second str' , 'third str' ) ", ECPGt_EOIT, ECPGt_EORT);}
#line 58 "type.pgc"
if (sqlca.sqlcode)
{
printf("insert error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("insert error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "select idnum , name , accs , string1 , string2 , string3 from empl where idnum = ? ",
ECPGt_long, &(empl.idnum), (long) 1, (long) 1, sizeof(long),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_long, &(empl.idnum), (long) 1, (long) 1, sizeof(long),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, &(empl.name), (long) 21, (long) 1, (21) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_short, &(empl.accs), (long) 1, (long) 1, sizeof(short),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (str), (long) 11, (long) 1, (11) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, &(ptr), (long) 0, (long) 1, (1) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_varchar, &(vc), (long) 10, (long) 1, sizeof(struct varchar_vc),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "select idnum , name , accs , string1 , string2 , string3 from empl where idnum = ? ",
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,&(empl.name),(long)21,(long)1,(21)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_short,&(empl.accs),(long)1,(long)1,sizeof(short),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(str),(long)11,(long)1,(11)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,&(ptr),(long)0,(long)1,(1)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_varchar,&(vc),(long)10,(long)1,sizeof(struct varchar_vc),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 68 "type.pgc"
if (sqlca.sqlcode)
{
printf("select error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("select error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
printf("id=%ld name='%s' accs=%d str='%s' ptr='%s' vc='%10.10s'\n", empl.idnum, empl.name, empl.accs, str, ptr, vc.text);
printf ("id=%ld name='%s' accs=%d str='%s' ptr='%s' vc='%10.10s'\n", empl.idnum, empl.name, empl.accs, str, ptr, vc.text);
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 76 "type.pgc"
free(ptr);
exit(0);
exit (0);
}
......@@ -28,7 +28,7 @@
/* exec sql type c is char reference */
#line 8 "variable.pgc"
typedef char *c;
typedef char* c;
/* exec sql type ind is union {
#line 11 "variable.pgc"
......@@ -39,11 +39,7 @@ typedef char *c;
} */
#line 11 "variable.pgc"
typedef union
{
int integer;
short smallint;
} ind;
typedef union { int integer; short smallint; } ind;
#define BUFFERSIZ 8
/* exec sql type str is [ BUFFERSIZ ] */
......@@ -55,17 +51,15 @@ typedef union
int
main(void)
main (void)
{
struct birthinfo
{
struct birthinfo {
#line 23 "variable.pgc"
long born;
long born ;
#line 23 "variable.pgc"
short age;
};
short age ;
} ;
#line 23 "variable.pgc"
/* exec sql begin declare section */
......@@ -78,51 +72,44 @@ main(void)
#line 27 "variable.pgc"
struct personal_struct
{
struct personal_struct {
#line 25 "variable.pgc"
struct varchar_name
{
int len;
char arr[BUFFERSIZ];
} name;
struct varchar_name { int len; char arr[ BUFFERSIZ ]; } name ;
#line 26 "variable.pgc"
struct birthinfo birth;
} personal, *p;
struct birthinfo birth ;
} personal , * p ;
#line 30 "variable.pgc"
struct personal_indicator
{
struct personal_indicator {
#line 28 "variable.pgc"
int ind_name;
int ind_name ;
#line 29 "variable.pgc"
struct birthinfo ind_birth;
} ind_personal, *i;
struct birthinfo ind_birth ;
} ind_personal , * i ;
#line 31 "variable.pgc"
ind ind_children;
ind ind_children ;
/* exec sql end declare section */
#line 32 "variable.pgc"
#line 34 "variable.pgc"
char *married = NULL;
char * married = NULL ;
#line 34 "variable.pgc"
#line 35 "variable.pgc"
long ind_married;
long ind_married ;
#line 35 "variable.pgc"
#line 36 "variable.pgc"
ind children;
ind children ;
#line 36 "variable.pgc"
......@@ -132,104 +119,74 @@ main(void)
ECPGdebug(1, stderr);
strcpy(msg, "connect");
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0);
#line 43 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 43 "variable.pgc"
strcpy(msg, "set");
{
ECPGdo(__LINE__, 0, 1, NULL, "set datestyle to iso", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "set datestyle to iso", ECPGt_EOIT, ECPGt_EORT);
#line 46 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 46 "variable.pgc"
strcpy(msg, "create");
{
ECPGdo(__LINE__, 0, 1, NULL, "create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer ) ", ECPGt_EOIT, ECPGt_EORT);
#line 49 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 49 "variable.pgc"
strcpy(msg, "insert");
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 52 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 52 "variable.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 53 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 53 "variable.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 1' , 16 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 1' , 16 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 54 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 54 "variable.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 2' , 14 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 2' , 14 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 55 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 55 "variable.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 3' , 9 ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into family ( name , age ) values ( 'Child 3' , 9 ) ", ECPGt_EOIT, ECPGt_EORT);
#line 56 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 56 "variable.pgc"
strcpy(msg, "commit");
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 59 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 59 "variable.pgc"
strcpy(msg, "open");
{
ECPGdo(__LINE__, 0, 1, NULL, "declare cur cursor for select name , born , age , married , children from family ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "declare cur cursor for select name , born , age , married , children from family ", ECPGt_EOIT, ECPGt_EORT);
#line 62 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 62 "variable.pgc"
......@@ -237,33 +194,28 @@ main(void)
#line 64 "variable.pgc"
p = &personal;
i = &ind_personal;
p=&personal;
i=&ind_personal;
memset(i, 0, sizeof(ind_personal));
while (1)
{
while (1) {
strcpy(msg, "fetch");
{
ECPGdo(__LINE__, 0, 1, NULL, "fetch cur", ECPGt_EOIT,
ECPGt_varchar, &(p->name), (long) BUFFERSIZ, (long) 1, sizeof(struct varchar_name),
ECPGt_int, &(i->ind_name), (long) 1, (long) 1, sizeof(int),
ECPGt_long, &(p->birth.born), (long) 1, (long) 1, sizeof(long),
ECPGt_long, &(i->ind_birth.born), (long) 1, (long) 1, sizeof(long),
ECPGt_short, &(p->birth.age), (long) 1, (long) 1, sizeof(short),
ECPGt_short, &(i->ind_birth.age), (long) 1, (long) 1, sizeof(short),
ECPGt_char, &(married), (long) 0, (long) 1, (1) * sizeof(char),
ECPGt_long, &(ind_married), (long) 1, (long) 1, sizeof(long),
ECPGt_int, &(children.integer), (long) 1, (long) 1, sizeof(int),
ECPGt_short, &(ind_children.smallint), (long) 1, (long) 1, sizeof(short), ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "fetch cur", ECPGt_EOIT,
ECPGt_varchar,&(p->name),(long)BUFFERSIZ,(long)1,sizeof(struct varchar_name),
ECPGt_int,&(i->ind_name),(long)1,(long)1,sizeof(int),
ECPGt_long,&(p->birth.born),(long)1,(long)1,sizeof(long),
ECPGt_long,&(i->ind_birth.born),(long)1,(long)1,sizeof(long),
ECPGt_short,&(p->birth.age),(long)1,(long)1,sizeof(short),
ECPGt_short,&(i->ind_birth.age),(long)1,(long)1,sizeof(short),
ECPGt_char,&(married),(long)0,(long)1,(1)*sizeof(char),
ECPGt_long,&(ind_married),(long)1,(long)1,sizeof(long),
ECPGt_int,&(children.integer),(long)1,(long)1,sizeof(int),
ECPGt_short,&(ind_children.smallint),(long)1,(long)1,sizeof(short), ECPGt_EORT);
#line 71 "variable.pgc"
if (sqlca.sqlcode == ECPG_NOT_FOUND)
break;
if (sqlca.sqlcode == ECPG_NOT_FOUND) break;
#line 71 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 71 "variable.pgc"
printf("%8.8s", personal.name.arr);
......@@ -282,46 +234,34 @@ main(void)
}
strcpy(msg, "close");
{
ECPGdo(__LINE__, 0, 1, NULL, "close cur", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "close cur", ECPGt_EOIT, ECPGt_EORT);
#line 88 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 88 "variable.pgc"
strcpy(msg, "drop");
{
ECPGdo(__LINE__, 0, 1, NULL, "drop table family ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "drop table family ", ECPGt_EOIT, ECPGt_EORT);
#line 91 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 91 "variable.pgc"
strcpy(msg, "commit");
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 94 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 94 "variable.pgc"
strcpy(msg, "disconnect");
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 97 "variable.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 97 "variable.pgc"
......
......@@ -24,288 +24,221 @@
#line 5 "whenever.pgc"
static void
print(char *msg)
static void print(char *msg)
{
fprintf(stderr, "Error in statement '%s':\n", msg);
sqlprint();
}
static void
print2(void)
static void print2(void)
{
fprintf(stderr, "Found another error\n");
sqlprint();
}
static void
warn(void)
static void warn(void)
{
fprintf(stderr, "Warning: At least one column was truncated\n");
}
int
main(void)
int main(void)
{
#line 26 "whenever.pgc"
int i;
int i ;
#line 26 "whenever.pgc"
#line 27 "whenever.pgc"
char c[6];
char c [ 6 ] ;
#line 27 "whenever.pgc"
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0);
#line 31 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 31 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "create table test ( i int , c char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "create table test ( i int , c char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);
#line 32 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 32 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test values ( 1 , 'abcdefghij' ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test values ( 1 , 'abcdefghij' ) ", ECPGt_EOIT, ECPGt_EORT);
#line 33 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 33 "whenever.pgc"
/* exec sql whenever sql_warning do warn ( ) ; */
#line 35 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from test ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (c), (long) 6, (long) 1, (6) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from test ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(c),(long)6,(long)1,(6)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 36 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 36 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 36 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 37 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 37 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 37 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 39 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 39 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 39 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 40 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 40 "whenever.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 40 "whenever.pgc"
/* exec sql whenever sqlerror do print ( \"select\" ) ; */
#line 42 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 43 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 43 "whenever.pgc"
if (sqlca.sqlcode < 0)
print("select");
}
if (sqlca.sqlcode < 0) print ( "select" );}
#line 43 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 44 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 44 "whenever.pgc"
if (sqlca.sqlcode < 0)
print("select");
}
if (sqlca.sqlcode < 0) print ( "select" );}
#line 44 "whenever.pgc"
/* exec sql whenever sqlerror call print2 ( ) ; */
#line 46 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 47 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 47 "whenever.pgc"
if (sqlca.sqlcode < 0)
print2();
}
if (sqlca.sqlcode < 0) print2 ( );}
#line 47 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 48 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 48 "whenever.pgc"
if (sqlca.sqlcode < 0)
print2();
}
if (sqlca.sqlcode < 0) print2 ( );}
#line 48 "whenever.pgc"
/* exec sql whenever sqlerror continue ; */
#line 50 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 51 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
}
if (sqlca.sqlwarn[0] == 'W') warn ( );}
#line 51 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 52 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
}
if (sqlca.sqlwarn[0] == 'W') warn ( );}
#line 52 "whenever.pgc"
/* exec sql whenever sqlerror goto error ; */
#line 54 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 55 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 55 "whenever.pgc"
if (sqlca.sqlcode < 0)
goto error;
}
if (sqlca.sqlcode < 0) goto error;}
#line 55 "whenever.pgc"
printf("Should not be reachable\n");
error:
{
ECPGtrans(__LINE__, NULL, "rollback");
error:
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 59 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 59 "whenever.pgc"
if (sqlca.sqlcode < 0)
goto error;
}
if (sqlca.sqlcode < 0) goto error;}
#line 59 "whenever.pgc"
/* exec sql whenever sqlerror stop ; */
#line 61 "whenever.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int, &(i), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select * from nonexistant ", ECPGt_EOIT,
ECPGt_int,&(i),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 62 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 62 "whenever.pgc"
if (sqlca.sqlcode < 0)
exit(1);
}
if (sqlca.sqlcode < 0) exit (1);}
#line 62 "whenever.pgc"
{
ECPGtrans(__LINE__, NULL, "rollback");
{ ECPGtrans(__LINE__, NULL, "rollback");
#line 63 "whenever.pgc"
if (sqlca.sqlwarn[0] == 'W')
warn();
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 63 "whenever.pgc"
if (sqlca.sqlcode < 0)
exit(1);
}
if (sqlca.sqlcode < 0) exit (1);}
#line 63 "whenever.pgc"
exit(0);
exit (0);
}
......@@ -81,6 +81,7 @@ struct sqlca_t *ECPGget_sqlca(void);
#ifdef __cplusplus
}
#endif
#endif
#line 7 "array.pgc"
......@@ -97,7 +98,7 @@ struct sqlca_t *ECPGget_sqlca(void);
int
main(void)
main (void)
{
/* exec sql begin declare section */
......@@ -108,23 +109,22 @@ main(void)
#line 14 "array.pgc"
int i = 1;
int i = 1 ;
#line 15 "array.pgc"
int *did = &i;
int * did = & i ;
#line 16 "array.pgc"
int a[10] = {9, 8, 7, 6, 5, 4, 3, 2, 1, 0};
int a [ 10 ] = { 9 , 8 , 7 , 6 , 5 , 4 , 3 , 2 , 1 , 0 } ;
#line 17 "array.pgc"
char text [25] = "klmnopqrst";
char text [ 25 ] = "klmnopqrst" ;
#line 18 "array.pgc"
char *t = (char *) malloc(11);
char * t = ( char * ) malloc ( 11 ) ;
#line 19 "array.pgc"
double f;
double f ;
/* exec sql end declare section */
#line 20 "array.pgc"
......@@ -134,136 +134,103 @@ main(void)
ECPGdebug(1, stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0);
#line 27 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 27 "array.pgc"
{
ECPGsetcommit(__LINE__, "on", NULL);
{ ECPGsetcommit(__LINE__, "on", NULL);
#line 29 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 29 "array.pgc"
{
ECPGtrans(__LINE__, NULL, "begin transaction ");
{ ECPGtrans(__LINE__, NULL, "begin transaction ");
#line 31 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 31 "array.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "create table test ( f float , i int , a int [ 10 ] , text char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "create table test ( f float , i int , a int [ 10 ] , text char ( 10 ) ) ", ECPGt_EOIT, ECPGt_EORT);
#line 33 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 33 "array.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 404.90 , 3 , '{0,1,2,3,4,5,6,7,8,9}' , 'abcdefghij' ) ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 404.90 , 3 , '{0,1,2,3,4,5,6,7,8,9}' , 'abcdefghij' ) ", ECPGt_EOIT, ECPGt_EORT);
#line 35 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 35 "array.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 140787.0 , 2 , ? , ? ) ",
ECPGt_int, (a), (long) 1, (long) 10, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (text), (long) 25, (long) 1, (25) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 140787.0 , 2 , ? , ? ) ",
ECPGt_int,(a),(long)1,(long)10,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(text),(long)25,(long)1,(25)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 37 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 37 "array.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 14.07 , ? , ? , ? ) ",
ECPGt_int, &(did), (long) 1, (long) 0, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_int, (a), (long) 1, (long) 10, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, &(t), (long) 0, (long) 1, (1) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( f , i , a , text ) values ( 14.07 , ? , ? , ? ) ",
ECPGt_int,&(did),(long)1,(long)0,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_int,(a),(long)1,(long)10,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,&(t),(long)0,(long)1,(1)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
#line 39 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 39 "array.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 41 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 41 "array.pgc"
{
ECPGtrans(__LINE__, NULL, "begin transaction ");
{ ECPGtrans(__LINE__, NULL, "begin transaction ");
#line 43 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 43 "array.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "select f , text from test where i = 1 ", ECPGt_EOIT,
ECPGt_double, &(f), (long) 1, (long) 1, sizeof(double),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (text), (long) 25, (long) 1, (25) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select f , text from test where i = 1 ", ECPGt_EOIT,
ECPGt_double,&(f),(long)1,(long)1,sizeof(double),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(text),(long)25,(long)1,(25)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 48 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 48 "array.pgc"
printf("Found f=%f text=%10.10s\n", f, text);
f = 140787;
{
ECPGdo(__LINE__, 0, 1, NULL, "select a , text from test where f = ? ",
ECPGt_double, &(f), (long) 1, (long) 1, sizeof(double),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_int, (a), (long) 1, (long) 10, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, &(t), (long) 0, (long) 1, (1) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
f=140787;
{ ECPGdo(__LINE__, 0, 1, NULL, "select a , text from test where f = ? ",
ECPGt_double,&(f),(long)1,(long)1,sizeof(double),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_int,(a),(long)1,(long)10,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,&(t),(long)0,(long)1,(1)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 56 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 56 "array.pgc"
......@@ -272,49 +239,37 @@ main(void)
printf("Found text=%10.10s\n", t);
{
ECPGdo(__LINE__, 0, 1, NULL, "select a from test where f = ? ",
ECPGt_double, &(f), (long) 1, (long) 1, sizeof(double),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_char, (text), (long) 25, (long) 1, (25) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "select a from test where f = ? ",
ECPGt_double,&(f),(long)1,(long)1,sizeof(double),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
ECPGt_char,(text),(long)25,(long)1,(25)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
#line 66 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 66 "array.pgc"
printf("Found text=%s\n", text);
{
ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
{ ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
#line 70 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 70 "array.pgc"
{
ECPGtrans(__LINE__, NULL, "commit");
{ ECPGtrans(__LINE__, NULL, "commit");
#line 72 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 72 "array.pgc"
{
ECPGdisconnect(__LINE__, "CURRENT");
{ ECPGdisconnect(__LINE__, "CURRENT");
#line 74 "array.pgc"
if (sqlca.sqlcode < 0)
sqlprint();
}
if (sqlca.sqlcode < 0) sqlprint();}
#line 74 "array.pgc"
......
......@@ -29,167 +29,136 @@
struct TBempl
{
struct TBempl {
#line 9 "binary.pgc"
long idnum;
long idnum ;
#line 10 "binary.pgc"
char name[21];
char name [ 21 ] ;
#line 11 "binary.pgc"
short accs;
short accs ;
#line 12 "binary.pgc"
char byte[20];
}; /* exec sql end declare section */
char byte [ 20 ] ;
} ;/* exec sql end declare section */
#line 14 "binary.pgc"
int
main(void)
main (void)
{
/* exec sql begin declare section */
#line 20 "binary.pgc"
struct TBempl empl;
struct TBempl empl ;
#line 21 "binary.pgc"
char *data = "\\001\\155\\000\\212";
char * data = "\\001\\155\\000\\212" ;
/* exec sql end declare section */
#line 22 "binary.pgc"
int i;
ECPGdebug(1, stderr);
ECPGdebug (1, stderr);
empl.idnum = 1;
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0); }
#line 28 "binary.pgc"
if (sqlca.sqlcode)
{
printf("connect error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("connect error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "create table empl ( idnum integer , name char ( 20 ) , accs smallint , byte bytea ) ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "create table empl ( idnum integer , name char ( 20 ) , accs smallint , byte bytea ) ", ECPGt_EOIT, ECPGt_EORT);}
#line 36 "binary.pgc"
if (sqlca.sqlcode)
{
printf("create error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("create error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into empl values ( 1 , 'first user' , 320 , ? ) ",
ECPGt_char, &(data), (long) 0, (long) 1, (1) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into empl values ( 1 , 'first user' , 320 , ? ) ",
ECPGt_char,&(data),(long)0,(long)1,(1)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
#line 43 "binary.pgc"
if (sqlca.sqlcode)
{
printf("insert error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("insert error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
/*
* declare C cursor for select name , accs , byte from empl where
* idnum = ?
*/
/* declare C cursor for select name , accs , byte from empl where idnum = ? */
#line 50 "binary.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "declare C cursor for select name , accs , byte from empl where idnum = ? ",
ECPGt_long, &(empl.idnum), (long) 1, (long) 1, sizeof(long),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "declare C cursor for select name , accs , byte from empl where idnum = ? ",
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
#line 51 "binary.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "fetch C", ECPGt_EOIT,
ECPGt_char, (empl.name), (long) 21, (long) 1, (21) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_short, &(empl.accs), (long) 1, (long) 1, sizeof(short),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (empl.byte), (long) 20, (long) 1, (20) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "fetch C", ECPGt_EOIT,
ECPGt_char,(empl.name),(long)21,(long)1,(21)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_short,&(empl.accs),(long)1,(long)1,sizeof(short),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(empl.byte),(long)20,(long)1,(20)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 52 "binary.pgc"
if (sqlca.sqlcode)
{
printf("fetch error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("fetch error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
printf("name=%s, accs=%d byte=%s\n", empl.name, empl.accs, empl.byte);
printf ("name=%s, accs=%d byte=%s\n", empl.name, empl.accs, empl.byte);
memset(empl.name, 0, 21L);
memset(empl.byte, '#', 20L);
/*
* declare B binary cursor for select name , accs , byte from empl
* where idnum = ?
*/
/* declare B binary cursor for select name , accs , byte from empl where idnum = ? */
#line 63 "binary.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "declare B binary cursor for select name , accs , byte from empl where idnum = ? ",
ECPGt_long, &(empl.idnum), (long) 1, (long) 1, sizeof(long),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "declare B binary cursor for select name , accs , byte from empl where idnum = ? ",
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
#line 64 "binary.pgc"
{
ECPGdo(__LINE__, 0, 1, NULL, "fetch B", ECPGt_EOIT,
ECPGt_char, (empl.name), (long) 21, (long) 1, (21) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_short, &(empl.accs), (long) 1, (long) 1, sizeof(short),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L,
ECPGt_char, (empl.byte), (long) 20, (long) 1, (20) * sizeof(char),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "fetch B", ECPGt_EOIT,
ECPGt_char,(empl.name),(long)21,(long)1,(21)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_short,&(empl.accs),(long)1,(long)1,sizeof(short),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
ECPGt_char,(empl.byte),(long)20,(long)1,(20)*sizeof(char),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
#line 65 "binary.pgc"
if (sqlca.sqlcode)
{
printf("fetch error = %ld\n", sqlca.sqlcode);
exit(sqlca.sqlcode);
printf ("fetch error = %ld\n", sqlca.sqlcode);
exit (sqlca.sqlcode);
}
{
ECPGdo(__LINE__, 0, 1, NULL, "close B", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "close B", ECPGt_EOIT, ECPGt_EORT);}
#line 72 "binary.pgc"
/*
* do not print a.accs because big/little endian will have different
* outputs here
*/
printf("name=%s, byte=", empl.name);
for (i = 0; i < 20; i++)
/* do not print a.accs because big/little endian will have different outputs here */
printf ("name=%s, byte=", empl.name);
for (i=0; i<20; i++)
{
if (empl.byte[i] == '#')
break;
printf("(%o)", (unsigned char) empl.byte[i]);
printf("(%o)", (unsigned char)empl.byte[i]);
}
printf("\n");
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 83 "binary.pgc"
exit(0);
exit (0);
}
......@@ -73,6 +73,7 @@ struct sqlca_t *ECPGget_sqlca(void);
#ifdef __cplusplus
}
#endif
#endif
#line 1 "code100.pgc"
......@@ -91,109 +92,73 @@ struct sqlca_t *ECPGget_sqlca(void);
int
main(int argc, char **argv)
int main(int argc, char **argv)
{ /* exec sql begin declare section */
#line 9 "code100.pgc"
int index;
int index ;
/* exec sql end declare section */
#line 10 "code100.pgc"
ECPGdebug(1, stderr);
ECPGdebug(1,stderr);
{
ECPGconnect(__LINE__, 0, "regress1", NULL, NULL, NULL, 0);
}
{ ECPGconnect(__LINE__, 0, "regress1" , NULL,NULL , NULL, 0); }
#line 15 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdo(__LINE__, 0, 1, NULL, "create table test ( \"index\" numeric ( 3 ) primary key , \"payload\" int4 not null ) ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "create table test ( \"index\" numeric ( 3 ) primary key , \"payload\" int4 not null ) ", ECPGt_EOIT, ECPGt_EORT);}
#line 20 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
{
ECPGtrans(__LINE__, NULL, "commit");
}
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{ ECPGtrans(__LINE__, NULL, "commit");}
#line 22 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
for (index = 0; index < 10; ++index)
{
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( payload , index ) values( 0 , ? ) ",
ECPGt_int, &(index), (long) 1, (long) 1, sizeof(int),
ECPGt_NO_INDICATOR, NULL, 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
}
for (index=0;index<10;++index)
{ { ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( payload , index ) values ( 0 , ? ) ",
ECPGt_int,&(index),(long)1,(long)1,sizeof(int),
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
#line 28 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
}
{
ECPGtrans(__LINE__, NULL, "commit");
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
}
{ ECPGtrans(__LINE__, NULL, "commit");}
#line 31 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdo(__LINE__, 0, 1, NULL, "update test set payload = payload + 1 where index = - 1 ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "update test set payload = payload + 1 where index = - 1 ", ECPGt_EOIT, ECPGt_EORT);}
#line 35 "code100.pgc"
if (sqlca.sqlcode != 100)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdo(__LINE__, 0, 1, NULL, "delete from test where index = - 1 ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "delete from test where index = - 1 ", ECPGt_EOIT, ECPGt_EORT);}
#line 38 "code100.pgc"
if (sqlca.sqlcode != 100)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( select * from test where index = - 1 ) ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "insert into test ( select * from test where index = - 1 ) ", ECPGt_EOIT, ECPGt_EORT);}
#line 41 "code100.pgc"
if (sqlca.sqlcode != 100)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);
}
{ ECPGdo(__LINE__, 0, 1, NULL, "drop table test ", ECPGt_EOIT, ECPGt_EORT);}
#line 44 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
{
ECPGtrans(__LINE__, NULL, "commit");
}
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{ ECPGtrans(__LINE__, NULL, "commit");}
#line 46 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
{
ECPGdisconnect(__LINE__, "CURRENT");
}
{ ECPGdisconnect(__LINE__, "CURRENT");}
#line 49 "code100.pgc"
if (sqlca.sqlcode)
printf("%ld:%s\n", sqlca.sqlcode, sqlca.sqlerrm.sqlerrmc);
if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc);
return 0;
}
......@@ -2,35 +2,45 @@
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGconnect: opening database regress1 on <DEFAULT> port <DEFAULT>
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 18: QUERY: show search_path on connection regress1
[NO_PID]: ECPGexecute line 18: QUERY: set search_path to 'public' on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 18: Correctly got 1 tuples with 1 fields
[NO_PID]: ECPGexecute line 18 Ok: SET
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 18: RESULT: "$user",public offset: -1 array: Yes
[NO_PID]: ECPGexecute line 19: QUERY: show search_path on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 21: QUERY: show wal_buffers on connection regress1
[NO_PID]: ECPGexecute line 19: Correctly got 1 tuples with 1 fields
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 21: Correctly got 1 tuples with 1 fields
[NO_PID]: ECPGget_data line 19: RESULT: public offset: -1 array: Yes
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 21: RESULT: 8 offset: -1 array: Yes
[NO_PID]: ECPGexecute line 22: QUERY: set standard_conforming_strings to off on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 24: QUERY: show standard_conforming_strings on connection regress1
[NO_PID]: ECPGexecute line 22 Ok: SET
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 24: Correctly got 1 tuples with 1 fields
[NO_PID]: ECPGexecute line 23: QUERY: show standard_conforming_strings on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 24: RESULT: off offset: -1 array: Yes
[NO_PID]: ECPGexecute line 23: Correctly got 1 tuples with 1 fields
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 23: RESULT: off offset: -1 array: Yes
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 26: QUERY: set time zone PST8PDT on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 26 Ok: SET
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 27: QUERY: show time zone on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 27: Correctly got 1 tuples with 1 fields
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 27: RESULT: PST8PDT offset: -1 array: Yes
[NO_PID]: ECPGget_data line 27: RESULT: pst8pdt offset: -1 array: Yes
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 30: QUERY: set transaction isolation level read committed on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 30 Ok: SET
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 30: QUERY: show transaction isolation level on connection regress1
[NO_PID]: ECPGexecute line 31: QUERY: show transaction isolation level on connection regress1
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGexecute line 30: Correctly got 1 tuples with 1 fields
[NO_PID]: ECPGexecute line 31: Correctly got 1 tuples with 1 fields
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ECPGget_data line 30: RESULT: read committed offset: -1 array: Yes
[NO_PID]: ECPGget_data line 31: RESULT: read committed offset: -1 array: Yes
[NO_PID]: sqlca: code: 0, state: 00000
[NO_PID]: ecpg_finish: Connection regress1 closed.
[NO_PID]: sqlca: code: 0, state: 00000
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment