mirror of
https://git.postgresql.org/git/postgresql.git
synced 2026-02-24 07:17:00 +08:00
96b6c82c9d
This reverts commit bd7c95f0c1a38becffceb3ea7234d57167f6d4bf, along with assorted follow-on fixes. There are some questions about the definition and implementation of that statement, and we don't have time to resolve them before v13 release. Rather than ship the feature and then have backwards-compatibility concerns constraining any redesign, let's remove it for now and try again later. Discussion: https://postgr.es/m/TY2PR01MB2443EC8286995378AEB7D9F8F5B10@TY2PR01MB2443.jpnprd01.prod.outlook.com
231 lines
5.8 KiB
C
231 lines
5.8 KiB
C
/* Processed by ecpg (regression mode) */
|
|
/* These include files are added by the preprocessor */
|
|
#include <ecpglib.h>
|
|
#include <ecpgerrno.h>
|
|
#include <sqlca.h>
|
|
/* End of automatic include section */
|
|
#define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y))
|
|
|
|
#line 1 "binary.pgc"
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
|
|
#line 1 "regression.h"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#line 4 "binary.pgc"
|
|
|
|
|
|
/* exec sql begin declare section */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
struct TBempl {
|
|
#line 9 "binary.pgc"
|
|
long idnum ;
|
|
|
|
#line 10 "binary.pgc"
|
|
char name [ 21 ] ;
|
|
|
|
#line 11 "binary.pgc"
|
|
short accs ;
|
|
|
|
#line 12 "binary.pgc"
|
|
char byte [ 20 ] ;
|
|
} ;/* exec sql end declare section */
|
|
#line 14 "binary.pgc"
|
|
|
|
|
|
/* exec sql whenever sqlerror stop ; */
|
|
#line 16 "binary.pgc"
|
|
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
/* exec sql begin declare section */
|
|
|
|
|
|
|
|
|
|
#line 22 "binary.pgc"
|
|
struct TBempl empl ;
|
|
|
|
#line 23 "binary.pgc"
|
|
char * pointer = NULL ;
|
|
|
|
#line 24 "binary.pgc"
|
|
char * data = "\\001\\155\\000\\212" ;
|
|
/* exec sql end declare section */
|
|
#line 25 "binary.pgc"
|
|
|
|
int i;
|
|
|
|
ECPGdebug (1, stderr);
|
|
|
|
empl.idnum = 1;
|
|
{ ECPGconnect(__LINE__, 0, "ecpg1_regression" , NULL, NULL , NULL, 0);
|
|
#line 31 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 31 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "set bytea_output = escape", ECPGt_EOIT, ECPGt_EORT);
|
|
#line 32 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 32 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table empl ( idnum integer , name char ( 20 ) , accs smallint , byte bytea )", ECPGt_EOIT, ECPGt_EORT);
|
|
#line 34 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 34 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into empl values ( 1 , 'first user' , 320 , $1 )",
|
|
ECPGt_char,&(data),(long)0,(long)1,(1)*sizeof(char),
|
|
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
|
|
#line 35 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 35 "binary.pgc"
|
|
|
|
ECPGset_var( 0, &( empl.idnum ), __LINE__);\
|
|
/* declare C cursor for select name , accs , byte from empl where idnum = $1 */
|
|
#line 36 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);
|
|
#line 36 "binary.pgc"
|
|
|
|
#line 36 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare C cursor for select name , accs , byte from empl where idnum = $1 ",
|
|
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
|
|
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
|
|
#line 37 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 37 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "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 38 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 38 "binary.pgc"
|
|
|
|
printf ("name=%s, accs=%d byte=%s\n", empl.name, empl.accs, empl.byte);
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close C", ECPGt_EOIT, ECPGt_EORT);
|
|
#line 41 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 41 "binary.pgc"
|
|
|
|
|
|
memset(empl.name, 0, 21L);
|
|
ECPGset_var( 1, &( empl.idnum ), __LINE__);\
|
|
/* declare B binary cursor for select name , accs , byte from empl where idnum = $1 */
|
|
#line 44 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);
|
|
#line 44 "binary.pgc"
|
|
|
|
#line 44 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare B binary cursor for select name , accs , byte from empl where idnum = $1 ",
|
|
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
|
|
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
|
|
#line 45 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 45 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "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 46 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 46 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close B", ECPGt_EOIT, ECPGt_EORT);
|
|
#line 47 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 47 "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<4; i++)
|
|
printf("(%o)", (unsigned char)empl.byte[i]);
|
|
printf("\n");
|
|
|
|
ECPGset_var( 2, &( empl.idnum ), __LINE__);\
|
|
/* declare A binary cursor for select byte from empl where idnum = $1 */
|
|
#line 55 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);
|
|
#line 55 "binary.pgc"
|
|
|
|
#line 55 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare A binary cursor for select byte from empl where idnum = $1 ",
|
|
ECPGt_long,&(empl.idnum),(long)1,(long)1,sizeof(long),
|
|
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
|
|
#line 56 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 56 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch A", ECPGt_EOIT,
|
|
ECPGt_char,&(pointer),(long)0,(long)1,(1)*sizeof(char),
|
|
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
|
|
#line 57 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 57 "binary.pgc"
|
|
|
|
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close A", ECPGt_EOIT, ECPGt_EORT);
|
|
#line 58 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 58 "binary.pgc"
|
|
|
|
|
|
if (pointer) {
|
|
printf ("pointer=");
|
|
for (i=0; i<4; i++)
|
|
printf("(%o)", (unsigned char)pointer[i]);
|
|
printf("\n");
|
|
free(pointer);
|
|
}
|
|
|
|
{ ECPGdisconnect(__LINE__, "CURRENT");
|
|
#line 68 "binary.pgc"
|
|
|
|
if (sqlca.sqlcode < 0) exit (1);}
|
|
#line 68 "binary.pgc"
|
|
|
|
exit (0);
|
|
}
|