PostgreSQL Source Code  git master
Data Structures | Macros | Typedefs | Functions
preproc-variable.c File Reference
#include <ecpglib.h>
#include <ecpgerrno.h>
#include <sqlca.h>
#include <stdlib.h>
#include <string.h>
Include dependency graph for preproc-variable.c:

Go to the source code of this file.

Data Structures

union  ind
 

Macros

#define ECPGdebug(X, Y)   ECPGdebug((X)+100,(Y))
 
#define BUFFERSIZ   8
 

Typedefs

typedef char * c
 

Functions

int main (void)
 

Macro Definition Documentation

◆ BUFFERSIZ

#define BUFFERSIZ   8

Definition at line 44 of file preproc-variable.c.

◆ ECPGdebug

#define ECPGdebug (   X,
  Y 
)    ECPGdebug((X)+100,(Y))

Definition at line 7 of file preproc-variable.c.

Typedef Documentation

◆ c

typedef char* c

Definition at line 31 of file preproc-variable.c.

Function Documentation

◆ main()

int main ( void  )

Definition at line 54 of file preproc-variable.c.

55 {
56  struct birthinfo {
57 #line 23 "variable.pgc"
58  long born ;
59 
60 #line 23 "variable.pgc"
61  short age ;
62  } ;
63 #line 23 "variable.pgc"
64 
65 /* exec sql begin declare section */
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 #line 27 "variable.pgc"
76  struct personal_struct {
77 #line 25 "variable.pgc"
78  struct varchar_1 { int len; char arr[ BUFFERSIZ ]; } name ;
79 
80 #line 26 "variable.pgc"
81  struct birthinfo birth ;
82  } personal , * p ;
83 
84 #line 30 "variable.pgc"
85  struct personal_indicator {
86 #line 28 "variable.pgc"
87  int ind_name ;
88 
89 #line 29 "variable.pgc"
90  struct birthinfo ind_birth ;
91  } ind_personal , * i ;
92 
93 #line 31 "variable.pgc"
94  ind ind_children ;
95  struct t1 {
96 #line 32 "variable.pgc"
97  struct varchar_2 { int len; char arr[ BUFFERSIZ ]; } name ;
98  } ; struct t2 {
99 #line 32 "variable.pgc"
100  struct varchar_3 { int len; char arr[ BUFFERSIZ ]; } name ;
101  } ;/* exec sql end declare section */
102 #line 33 "variable.pgc"
103 
104 
105 
106 #line 35 "variable.pgc"
107  char * married = NULL ;
108 
109 #line 35 "variable.pgc"
110 
111 
112 #line 36 "variable.pgc"
113  long ind_married ;
114 
115 #line 36 "variable.pgc"
116 
117 
118 #line 37 "variable.pgc"
119  ind children ;
120 
121 #line 37 "variable.pgc"
122 
123  int loopcount;
124  char msg[128];
125 
126  ECPGdebug(1, stderr);
127 
128  strcpy(msg, "connect");
129  { ECPGconnect(__LINE__, 0, "ecpg1_regression" , NULL, NULL , NULL, 0);
130 #line 44 "variable.pgc"
131 
132 if (sqlca.sqlcode < 0) exit (1);}
133 #line 44 "variable.pgc"
134 
135 
136  strcpy(msg, "set");
137  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "set datestyle to iso", ECPGt_EOIT, ECPGt_EORT);
138 #line 47 "variable.pgc"
139 
140 if (sqlca.sqlcode < 0) exit (1);}
141 #line 47 "variable.pgc"
142 
143 
144  strcpy(msg, "create");
145  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer )", ECPGt_EOIT, ECPGt_EORT);
146 #line 50 "variable.pgc"
147 
148 if (sqlca.sqlcode < 0) exit (1);}
149 #line 50 "variable.pgc"
150 
151 
152  strcpy(msg, "insert");
153  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 )", ECPGt_EOIT, ECPGt_EORT);
154 #line 53 "variable.pgc"
155 
156 if (sqlca.sqlcode < 0) exit (1);}
157 #line 53 "variable.pgc"
158 
159  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 )", ECPGt_EOIT, ECPGt_EORT);
160 #line 54 "variable.pgc"
161 
162 if (sqlca.sqlcode < 0) exit (1);}
163 #line 54 "variable.pgc"
164 
165  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into family ( name , age ) values ( 'Child 1' , 16 )", ECPGt_EOIT, ECPGt_EORT);
166 #line 55 "variable.pgc"
167 
168 if (sqlca.sqlcode < 0) exit (1);}
169 #line 55 "variable.pgc"
170 
171  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into family ( name , age ) values ( 'Child 2' , 14 )", ECPGt_EOIT, ECPGt_EORT);
172 #line 56 "variable.pgc"
173 
174 if (sqlca.sqlcode < 0) exit (1);}
175 #line 56 "variable.pgc"
176 
177  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into family ( name , age ) values ( 'Child 3' , 9 )", ECPGt_EOIT, ECPGt_EORT);
178 #line 57 "variable.pgc"
179 
180 if (sqlca.sqlcode < 0) exit (1);}
181 #line 57 "variable.pgc"
182 
183 
184  strcpy(msg, "commit");
185  { ECPGtrans(__LINE__, NULL, "commit");
186 #line 60 "variable.pgc"
187 
188 if (sqlca.sqlcode < 0) exit (1);}
189 #line 60 "variable.pgc"
190 
191 
192  strcpy(msg, "open");
193  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur cursor for select name , born , age , married , children from family", ECPGt_EOIT, ECPGt_EORT);
194 #line 63 "variable.pgc"
195 
196 if (sqlca.sqlcode < 0) exit (1);}
197 #line 63 "variable.pgc"
198 
199 
200  /* exec sql whenever not found break ; */
201 #line 65 "variable.pgc"
202 
203 
204  p=&personal;
205  i=&ind_personal;
206  memset(i, 0, sizeof(ind_personal));
207  for (loopcount = 0; loopcount < 100; loopcount++) {
208  strcpy(msg, "fetch");
209  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch cur", ECPGt_EOIT,
210  ECPGt_varchar,&(p->name),(long)BUFFERSIZ,(long)-1,sizeof( struct birthinfo ),
211  ECPGt_int,&(i->ind_name),(long)1,(long)-1,sizeof( struct birthinfo ),
212  ECPGt_long,&(p->birth.born),(long)1,(long)1,sizeof( struct birthinfo ),
213  ECPGt_long,&(i->ind_birth.born),(long)1,(long)1,sizeof( struct birthinfo ),
214  ECPGt_short,&(p->birth.age),(long)1,(long)1,sizeof( struct birthinfo ),
215  ECPGt_short,&(i->ind_birth.age),(long)1,(long)1,sizeof( struct birthinfo ),
216  ECPGt_char,&(married),(long)0,(long)1,(1)*sizeof(char),
217  ECPGt_long,&(ind_married),(long)1,(long)1,sizeof(long),
218  ECPGt_int,&(children.integer),(long)1,(long)1,sizeof(int),
219  ECPGt_short,&(ind_children.smallint),(long)1,(long)1,sizeof(short), ECPGt_EORT);
220 #line 72 "variable.pgc"
221 
222 if (sqlca.sqlcode == ECPG_NOT_FOUND) break;
223 #line 72 "variable.pgc"
224 
225 if (sqlca.sqlcode < 0) exit (1);}
226 #line 72 "variable.pgc"
227 
228  printf("%8.8s", personal.name.arr);
229  if (i->ind_birth.born >= 0)
230  printf(", born %ld", personal.birth.born);
231  if (i->ind_birth.age >= 0)
232  printf(", age = %d", personal.birth.age);
233  if (ind_married >= 0)
234  printf(", married %s", married);
235  if (ind_children.smallint >= 0)
236  printf(", children = %d", children.integer);
237  putchar('\n');
238 
239  free(married);
240  married = NULL;
241  }
242 
243  strcpy(msg, "close");
244  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur", ECPGt_EOIT, ECPGt_EORT);
245 #line 89 "variable.pgc"
246 
247 if (sqlca.sqlcode < 0) exit (1);}
248 #line 89 "variable.pgc"
249 
250 
251  strcpy(msg, "drop");
252  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table family", ECPGt_EOIT, ECPGt_EORT);
253 #line 92 "variable.pgc"
254 
255 if (sqlca.sqlcode < 0) exit (1);}
256 #line 92 "variable.pgc"
257 
258 
259  strcpy(msg, "commit");
260  { ECPGtrans(__LINE__, NULL, "commit");
261 #line 95 "variable.pgc"
262 
263 if (sqlca.sqlcode < 0) exit (1);}
264 #line 95 "variable.pgc"
265 
266 
267  strcpy(msg, "disconnect");
268  { ECPGdisconnect(__LINE__, "CURRENT");
269 #line 98 "variable.pgc"
270 
271 if (sqlca.sqlcode < 0) exit (1);}
272 #line 98 "variable.pgc"
273 
274 
275  return 0;
276 }
ECPGdisconnect
bool ECPGdisconnect(int lineno, const char *connection_name)
Definition: connect.c:667
ECPGconnect
bool ECPGconnect(int lineno, int c, const char *name, const char *user, const char *passwd, const char *connection_name, int autocommit)
Definition: connect.c:273
ECPG_NOT_FOUND
#define ECPG_NOT_FOUND
Definition: ecpgerrno.h:10
ECPGst_normal
@ ECPGst_normal
Definition: ecpgtype.h:97
ECPGt_EOIT
@ ECPGt_EOIT
Definition: ecpgtype.h:62
ECPGt_short
@ ECPGt_short
Definition: ecpgtype.h:43
ECPGt_varchar
@ ECPGt_varchar
Definition: ecpgtype.h:48
ECPGt_int
@ ECPGt_int
Definition: ecpgtype.h:44
ECPGt_long
@ ECPGt_long
Definition: ecpgtype.h:44
ECPGt_EORT
@ ECPGt_EORT
Definition: ecpgtype.h:63
ECPGt_char
@ ECPGt_char
Definition: ecpgtype.h:43
name
const char * name
Definition: encode.c:561
ECPGdo
bool ECPGdo(const int lineno, const int compat, const int force_indicator, const char *connection_name, const bool questionmarks, const int st, const char *query,...)
Definition: execute.c:2286
free
#define free(a)
Definition: header.h:65
ECPGtrans
bool ECPGtrans(int lineno, const char *connection_name, const char *transaction)
Definition: misc.c:197
i
int i
Definition: isn.c:73
exit
exit(1)
len
const void size_t len
Definition: pg_crc32c_sse42.c:24
printf
#define printf(...)
Definition: port.h:231
BUFFERSIZ
#define BUFFERSIZ
Definition: preproc-variable.c:44
ECPGdebug
#define ECPGdebug(X, Y)
Definition: preproc-variable.c:7
sqlca
#define sqlca
Definition: sqlca.h:59
ind::integer
int integer
Definition: preproc-cursor.c:42
ind::smallint
short smallint
Definition: preproc-cursor.c:42

References BUFFERSIZ, ECPG_NOT_FOUND, ECPGconnect(), ECPGdebug, ECPGdisconnect(), ECPGdo(), ECPGst_normal, ECPGt_char, ECPGt_EOIT, ECPGt_EORT, ECPGt_int, ECPGt_long, ECPGt_short, ECPGt_varchar, ECPGtrans(), exit(), free, i, ind::integer, len, name, printf, ind::smallint, and sqlca.