Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
Postgres FD Implementation
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Abuhujair Javed
Postgres FD Implementation
Commits
20ba33da
Commit
20ba33da
authored
Mar 14, 2018
by
Michael Meskes
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fixed compiler warnings in test case.
parent
33803f67
Changes
3
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
132 additions
and
130 deletions
+132
-130
src/interfaces/ecpg/test/compat_oracle/char_array.pgc
src/interfaces/ecpg/test/compat_oracle/char_array.pgc
+7
-9
src/interfaces/ecpg/test/expected/compat_oracle-char_array.c
src/interfaces/ecpg/test/expected/compat_oracle-char_array.c
+56
-52
src/interfaces/ecpg/test/expected/compat_oracle-char_array.stderr
...rfaces/ecpg/test/expected/compat_oracle-char_array.stderr
+69
-69
No files found.
src/interfaces/ecpg/test/compat_oracle/char_array.pgc
View file @
20ba33da
...
...
@@ -4,7 +4,10 @@
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
should be fixed-length, blank-padded, then null-terminated.
...
...
@@ -12,9 +15,6 @@ static void warn();
int main() {
ECPGdebug(1, stderr);
EXEC SQL CONNECT TO REGRESSDB1;
EXEC SQL WHENEVER SQLWARNING do warn();
EXEC SQL WHENEVER SQLERROR SQLPRINT;
...
...
@@ -27,6 +27,9 @@ int main() {
short bigstr_ind = 0;
EXEC SQL END DECLARE SECTION;
ECPGdebug(1, stderr);
EXEC SQL CONNECT TO REGRESSDB1;
EXEC SQL CREATE TABLE strdbase (strval varchar(10));
EXEC SQL INSERT INTO strdbase values ('');
EXEC SQL INSERT INTO strdbase values ('AB');
...
...
@@ -59,8 +62,3 @@ int main() {
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 @@
#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
should be fixed-length, blank-padded, then null-terminated.
...
...
@@ -30,11 +33,6 @@ static void warn();
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 ( ) ; */
#line 18 "char_array.pgc"
...
...
@@ -65,16 +63,8 @@ int main() {
#line 28 "char_array.pgc"
{
ECPGdo
(
__LINE__
,
3
,
1
,
NULL
,
0
,
ECPGst_normal
,
"create table strdbase ( strval varchar ( 10 ) )"
,
ECPGt_EOIT
,
ECPGt_EORT
);
#line 30 "char_array.pgc"
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
);
ECPGdebug
(
1
,
stderr
);
{
ECPGconnect
(
__LINE__
,
3
,
"ecpg1_regression"
,
NULL
,
NULL
,
NULL
,
0
);
#line 31 "char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -83,16 +73,8 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#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"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -101,7 +83,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#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"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -110,7 +92,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line 34 "char_array.pgc"
{
ECPGdo
(
__LINE__
,
3
,
1
,
NULL
,
0
,
ECPGst_normal
,
"insert into strdbase values ( 'AB
CDEF
' )"
,
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"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -119,7 +101,7 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line 35 "char_array.pgc"
{
ECPGdo
(
__LINE__
,
3
,
1
,
NULL
,
0
,
ECPGst_normal
,
"insert into strdbase values ( 'ABCD
EFGHIJ
' )"
,
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"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -128,11 +110,25 @@ if (sqlca.sqlwarn[0] == 'W') warn ( );
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#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"
{
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"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
...
...
@@ -142,9 +138,22 @@ if (sqlca.sqlcode < 0) sqlprint();}
#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"
{
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
"
);
while
(
1
)
{
...
...
@@ -155,65 +164,60 @@ if (sqlca.sqlcode < 0) sqlprint();}
ECPGt_short
,
&
(
bigstr_ind
),(
long
)
1
,(
long
)
1
,
sizeof
(
short
),
ECPGt_char
,(
shortstr
),(
long
)
5
,(
long
)
1
,(
5
)
*
sizeof
(
char
),
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
;
#line
47
"char_array.pgc"
#line
50
"char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
#line
47
"char_array.pgc"
#line
50
"char_array.pgc"
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line
47
"char_array.pgc"
#line
50
"char_array.pgc"
printf
(
"
\"
%s
\"
:
\"
%s
\"
%d
\n
"
,
bigstr
,
shortstr
,
shstr_ind
);
}
{
ECPGdo
(
__LINE__
,
3
,
1
,
NULL
,
0
,
ECPGst_normal
,
"close cstr"
,
ECPGt_EOIT
,
ECPGt_EORT
);
#line 5
1
"char_array.pgc"
#line 5
4
"char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
#line 5
1
"char_array.pgc"
#line 5
4
"char_array.pgc"
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line 5
1
"char_array.pgc"
#line 5
4
"char_array.pgc"
{
ECPGdo
(
__LINE__
,
3
,
1
,
NULL
,
0
,
ECPGst_normal
,
"drop table strdbase"
,
ECPGt_EOIT
,
ECPGt_EORT
);
#line 5
2
"char_array.pgc"
#line 5
5
"char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
#line 5
2
"char_array.pgc"
#line 5
5
"char_array.pgc"
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line 5
2
"char_array.pgc"
#line 5
5
"char_array.pgc"
printf
(
"
\n
GOOD-BYE!!
\n\n
"
);
{
ECPGtrans
(
__LINE__
,
NULL
,
"commit work"
);
#line 5
6
"char_array.pgc"
#line 5
9
"char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
#line 5
6
"char_array.pgc"
#line 5
9
"char_array.pgc"
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line 5
6
"char_array.pgc"
#line 5
9
"char_array.pgc"
{
ECPGdisconnect
(
__LINE__
,
"ALL"
);
#line
58
"char_array.pgc"
#line
61
"char_array.pgc"
if
(
sqlca
.
sqlwarn
[
0
]
==
'W'
)
warn
(
);
#line
58
"char_array.pgc"
#line
61
"char_array.pgc"
if
(
sqlca
.
sqlcode
<
0
)
sqlprint
();}
#line
58
"char_array.pgc"
#line
61
"char_array.pgc"
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.stderr
View file @
20ba33da
This diff is collapsed.
Click to expand it.
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment