Skip to content

P
Postgres FD Implementation
Commit 20ba33da authored by Michael Meskes's avatar Michael Meskes
Browse files
Options

Fixed compiler warnings in test case.

parent 33803f67
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 132 additions and 130 deletions
src/interfaces/ecpg/test/compat_oracle/char_array.pgc
View file @ 20ba33da
...@@ -4,7 +4,10 @@ ...@@ -4,7 +4,10 @@
EXEC SQL INCLUDE ../regression; EXEC SQL INCLUDE ../regression;
static void warn(); static void warn(void)
{
fprintf(stderr, "Warning: At least one column was truncated\n");
}
/* Compatible handling of char array to retrieve varchar field to char array /* Compatible handling of char array to retrieve varchar field to char array
should be fixed-length, blank-padded, then null-terminated. should be fixed-length, blank-padded, then null-terminated.
...@@ -12,9 +15,6 @@ static void warn(); ...@@ -12,9 +15,6 @@ static void warn();
int main() { int main() {
ECPGdebug(1, stderr);
EXEC SQL CONNECT TO REGRESSDB1;
EXEC SQL WHENEVER SQLWARNING do warn(); EXEC SQL WHENEVER SQLWARNING do warn();
EXEC SQL WHENEVER SQLERROR SQLPRINT; EXEC SQL WHENEVER SQLERROR SQLPRINT;
...@@ -27,6 +27,9 @@ int main() { ...@@ -27,6 +27,9 @@ int main() {
short bigstr_ind = 0; short bigstr_ind = 0;
EXEC SQL END DECLARE SECTION; EXEC SQL END DECLARE SECTION;
ECPGdebug(1, stderr);
EXEC SQL CONNECT TO REGRESSDB1;
EXEC SQL CREATE TABLE strdbase (strval varchar(10)); EXEC SQL CREATE TABLE strdbase (strval varchar(10));
EXEC SQL INSERT INTO strdbase values (''); EXEC SQL INSERT INTO strdbase values ('');
EXEC SQL INSERT INTO strdbase values ('AB'); EXEC SQL INSERT INTO strdbase values ('AB');
...@@ -59,8 +62,3 @@ int main() { ...@@ -59,8 +62,3 @@ int main() {
return 0; return 0;
} }
static void warn(void)
{
fprintf(stderr, "Warning: At least one column was truncated\n");
}
src/interfaces/ecpg/test/expected/compat_oracle-char_array.c
View file @ 20ba33da
...@@ -22,7 +22,10 @@ ...@@ -22,7 +22,10 @@
#line 5 "char_array.pgc" #line 5 "char_array.pgc"
static void warn(); static void warn(void)
{
fprintf(stderr, "Warning: At least one column was truncated\n");
}
/* Compatible handling of char array to retrieve varchar field to char array /* Compatible handling of char array to retrieve varchar field to char array
should be fixed-length, blank-padded, then null-terminated. should be fixed-length, blank-padded, then null-terminated.
...@@ -30,11 +33,6 @@ static void warn(); ...@@ -30,11 +33,6 @@ static void warn();
int main() { int main() {
ECPGdebug(1, stderr);
{ ECPGconnect(__LINE__, 3, "ecpg1_regression" , NULL, NULL , NULL, 0); }
#line 16 "char_array.pgc"
/* exec sql whenever sql_warning do warn ( ) ; */ /* exec sql whenever sql_warning do warn ( ) ; */
#line 18 "char_array.pgc" #line 18 "char_array.pgc"
...@@ -65,16 +63,8 @@ int main() { ...@@ -65,16 +63,8 @@ int main() {
#line 28 "char_array.pgc" #line 28 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "create table strdbase ( strval varchar ( 10 ) )", ECPGt_EOIT, ECPGt_EORT); ECPGdebug(1, stderr);
#line 30 "char_array.pgc" { ECPGconnect(__LINE__, 3, "ecpg1_regression" , NULL, NULL , NULL, 0);
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 30 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();}
#line 30 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( '' )", ECPGt_EOIT, ECPGt_EORT);
#line 31 "char_array.pgc" #line 31 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -83,16 +73,8 @@ if (sqlca.sqlwarn[0] == 'W') warn ( ); ...@@ -83,16 +73,8 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 31 "char_array.pgc" #line 31 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'AB' )", ECPGt_EOIT, ECPGt_EORT);
#line 32 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 32 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();}
#line 32 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCD' )", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "create table strdbase ( strval varchar ( 10 ) )", ECPGt_EOIT, ECPGt_EORT);
#line 33 "char_array.pgc" #line 33 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -101,7 +83,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( ); ...@@ -101,7 +83,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 33 "char_array.pgc" #line 33 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDE' )", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( '' )", ECPGt_EOIT, ECPGt_EORT);
#line 34 "char_array.pgc" #line 34 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -110,7 +92,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( ); ...@@ -110,7 +92,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 34 "char_array.pgc" #line 34 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDEF' )", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'AB' )", ECPGt_EOIT, ECPGt_EORT);
#line 35 "char_array.pgc" #line 35 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -119,7 +101,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( ); ...@@ -119,7 +101,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 35 "char_array.pgc" #line 35 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDEFGHIJ' )", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCD' )", ECPGt_EOIT, ECPGt_EORT);
#line 36 "char_array.pgc" #line 36 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -128,11 +110,25 @@ if (sqlca.sqlwarn[0] == 'W') warn ( ); ...@@ -128,11 +110,25 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 36 "char_array.pgc" #line 36 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDE' )", ECPGt_EOIT, ECPGt_EORT);
#line 37 "char_array.pgc"
/* declare C cursor for select strval , strval from strdbase */ if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 37 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();}
#line 37 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDEF' )", ECPGt_EOIT, ECPGt_EORT);
#line 38 "char_array.pgc" #line 38 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "declare C cursor for select strval , strval from strdbase", ECPGt_EOIT, ECPGt_EORT); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 38 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();}
#line 38 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "insert into strdbase values ( 'ABCDEFGHIJ' )", ECPGt_EOIT, ECPGt_EORT);
#line 39 "char_array.pgc" #line 39 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
...@@ -142,9 +138,22 @@ if (sqlca.sqlcode < 0) sqlprint();} ...@@ -142,9 +138,22 @@ if (sqlca.sqlcode < 0) sqlprint();}
#line 39 "char_array.pgc" #line 39 "char_array.pgc"
/* exec sql whenever not found break ; */ /* declare C cursor for select strval , strval from strdbase */
#line 41 "char_array.pgc" #line 41 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "declare C cursor for select strval , strval from strdbase", ECPGt_EOIT, ECPGt_EORT);
#line 42 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 42 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();}
#line 42 "char_array.pgc"
/* exec sql whenever not found break ; */
#line 44 "char_array.pgc"
printf("Full Str. : Short Ind.\n"); printf("Full Str. : Short Ind.\n");
while(1) { while(1) {
...@@ -155,65 +164,60 @@ if (sqlca.sqlcode < 0) sqlprint();} ...@@ -155,65 +164,60 @@ if (sqlca.sqlcode < 0) sqlprint();}
ECPGt_short,&(bigstr_ind),(long)1,(long)1,sizeof(short), ECPGt_short,&(bigstr_ind),(long)1,(long)1,sizeof(short),
ECPGt_char,(shortstr),(long)5,(long)1,(5)*sizeof(char), ECPGt_char,(shortstr),(long)5,(long)1,(5)*sizeof(char),
ECPGt_short,&(shstr_ind),(long)1,(long)1,sizeof(short), ECPGt_EORT); ECPGt_short,&(shstr_ind),(long)1,(long)1,sizeof(short), ECPGt_EORT);
#line 47 "char_array.pgc" #line 50 "char_array.pgc"
if (sqlca.sqlcode == ECPG_NOT_FOUND) break; if (sqlca.sqlcode == ECPG_NOT_FOUND) break;
#line 47 "char_array.pgc" #line 50 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 47 "char_array.pgc" #line 50 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 47 "char_array.pgc" #line 50 "char_array.pgc"
printf("\"%s\": \"%s\" %d\n", bigstr, shortstr, shstr_ind); printf("\"%s\": \"%s\" %d\n", bigstr, shortstr, shstr_ind);
} }
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "close cstr", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "close cstr", ECPGt_EOIT, ECPGt_EORT);
#line 51 "char_array.pgc" #line 54 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 51 "char_array.pgc" #line 54 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 51 "char_array.pgc" #line 54 "char_array.pgc"
{ ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "drop table strdbase", ECPGt_EOIT, ECPGt_EORT); { ECPGdo(__LINE__, 3, 1, NULL, 0, ECPGst_normal, "drop table strdbase", ECPGt_EOIT, ECPGt_EORT);
#line 52 "char_array.pgc" #line 55 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 52 "char_array.pgc" #line 55 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 52 "char_array.pgc" #line 55 "char_array.pgc"
printf("\nGOOD-BYE!!\n\n"); printf("\nGOOD-BYE!!\n\n");
{ ECPGtrans(__LINE__, NULL, "commit work"); { ECPGtrans(__LINE__, NULL, "commit work");
#line 56 "char_array.pgc" #line 59 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 56 "char_array.pgc" #line 59 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 56 "char_array.pgc" #line 59 "char_array.pgc"
{ ECPGdisconnect(__LINE__, "ALL"); { ECPGdisconnect(__LINE__, "ALL");
#line 58 "char_array.pgc" #line 61 "char_array.pgc"
if (sqlca.sqlwarn[0] == 'W') warn ( ); if (sqlca.sqlwarn[0] == 'W') warn ( );
#line 58 "char_array.pgc" #line 61 "char_array.pgc"
if (sqlca.sqlcode < 0) sqlprint();} if (sqlca.sqlcode < 0) sqlprint();}
#line 58 "char_array.pgc" #line 61 "char_array.pgc"
return 0; return 0;
} }
static void warn(void)
{
fprintf(stderr, "Warning: At least one column was truncated\n");
}
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