PostgreSQL Source Code  git master
sql-sqljson.c
Go to the documentation of this file.
1 /* Processed by ecpg (regression mode) */
2 /* These include files are added by the preprocessor */
3 #include <ecpglib.h>
4 #include <ecpgerrno.h>
5 #include <sqlca.h>
6 /* End of automatic include section */
7 #define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y))
8 
9 #line 1 "sqljson.pgc"
10 #include <stdio.h>
11 
12 
13 #line 1 "sqlca.h"
14 #ifndef POSTGRES_SQLCA_H
15 #define POSTGRES_SQLCA_H
16 
17 #ifndef PGDLLIMPORT
18 #if defined(WIN32) || defined(__CYGWIN__)
19 #define PGDLLIMPORT __declspec (dllimport)
20 #else
21 #define PGDLLIMPORT
22 #endif /* __CYGWIN__ */
23 #endif /* PGDLLIMPORT */
24 
25 #define SQLERRMC_LEN 150
26 
27 #ifdef __cplusplus
28 extern "C"
29 {
30 #endif
31 
32 struct sqlca_t
33 {
34  char sqlcaid[8];
35  long sqlabc;
36  long sqlcode;
37  struct
38  {
39  int sqlerrml;
40  char sqlerrmc[SQLERRMC_LEN];
41  } sqlerrm;
42  char sqlerrp[8];
43  long sqlerrd[6];
44  /* Element 0: empty */
45  /* 1: OID of processed tuple if applicable */
46  /* 2: number of rows processed */
47  /* after an INSERT, UPDATE or */
48  /* DELETE statement */
49  /* 3: empty */
50  /* 4: empty */
51  /* 5: empty */
52  char sqlwarn[8];
53  /* Element 0: set to 'W' if at least one other is 'W' */
54  /* 1: if 'W' at least one character string */
55  /* value was truncated when it was */
56  /* stored into a host variable. */
57 
58  /*
59  * 2: if 'W' a (hopefully) non-fatal notice occurred
60  */ /* 3: empty */
61  /* 4: empty */
62  /* 5: empty */
63  /* 6: empty */
64  /* 7: empty */
65 
66  char sqlstate[5];
67 };
68 
69 struct sqlca_t *ECPGget_sqlca(void);
70 
71 #ifndef POSTGRES_ECPG_INTERNAL
72 #define sqlca (*ECPGget_sqlca())
73 #endif
74 
75 #ifdef __cplusplus
76 }
77 #endif
78 
79 #endif
80 
81 #line 3 "sqljson.pgc"
82 
83 
84 #line 1 "regression.h"
85 
86 
87 
88 
89 
90 
91 #line 4 "sqljson.pgc"
92 
93 
94 /* exec sql whenever sqlerror sqlprint ; */
95 #line 6 "sqljson.pgc"
96 
97 
98 int
99 main ()
100 {
101 /* exec sql begin declare section */
102 
103 
104 
105 #line 12 "sqljson.pgc"
106  char json [ 1024 ] ;
107 
108 #line 13 "sqljson.pgc"
109  bool is_json [ 8 ] ;
110 /* exec sql end declare section */
111 #line 14 "sqljson.pgc"
112 
113 
114  ECPGdebug (1, stderr);
115 
116  { ECPGconnect(__LINE__, 0, "ecpg1_regression" , NULL, NULL , NULL, 0);
117 #line 18 "sqljson.pgc"
118 
119 if (sqlca.sqlcode < 0) sqlprint();}
120 #line 18 "sqljson.pgc"
121 
122  { ECPGsetcommit(__LINE__, "on", NULL);
123 #line 19 "sqljson.pgc"
124 
125 if (sqlca.sqlcode < 0) sqlprint();}
126 #line 19 "sqljson.pgc"
127 
128 
129  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_object ( returning text )", ECPGt_EOIT,
130  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
131  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
132 #line 21 "sqljson.pgc"
133 
134 if (sqlca.sqlcode < 0) sqlprint();}
135 #line 21 "sqljson.pgc"
136 
137  printf("Found json=%s\n", json);
138 
139  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_object ( returning text format json )", ECPGt_EOIT,
140  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
141  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
142 #line 24 "sqljson.pgc"
143 
144 if (sqlca.sqlcode < 0) sqlprint();}
145 #line 24 "sqljson.pgc"
146 
147  printf("Found json=%s\n", json);
148 
149  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_array ( returning jsonb )", ECPGt_EOIT,
150  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
151  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
152 #line 27 "sqljson.pgc"
153 
154 if (sqlca.sqlcode < 0) sqlprint();}
155 #line 27 "sqljson.pgc"
156 
157  printf("Found json=%s\n", json);
158 
159  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_array ( returning jsonb format json )", ECPGt_EOIT,
160  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
161  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
162 #line 30 "sqljson.pgc"
163 
164 if (sqlca.sqlcode < 0) sqlprint();}
165 #line 30 "sqljson.pgc"
166 
167  printf("Found json=%s\n", json);
168 
169  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_object ( 1 : 1 , '1' : null with unique )", ECPGt_EOIT,
170  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
171  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
172 #line 33 "sqljson.pgc"
173 
174 if (sqlca.sqlcode < 0) sqlprint();}
175 #line 33 "sqljson.pgc"
176 
177  // error
178 
179  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_object ( 1 : 1 , '2' : null , 1 : '2' absent on null without unique keys )", ECPGt_EOIT,
180  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
181  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
182 #line 36 "sqljson.pgc"
183 
184 if (sqlca.sqlcode < 0) sqlprint();}
185 #line 36 "sqljson.pgc"
186 
187  printf("Found json=%s\n", json);
188 
189  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_object ( 1 : 1 , '2' : null absent on null without unique returning jsonb )", ECPGt_EOIT,
190  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
191  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
192 #line 39 "sqljson.pgc"
193 
194 if (sqlca.sqlcode < 0) sqlprint();}
195 #line 39 "sqljson.pgc"
196 
197  printf("Found json=%s\n", json);
198 
199  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( null )", ECPGt_EOIT,
200  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
201  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
202 #line 42 "sqljson.pgc"
203 
204 if (sqlca.sqlcode < 0) sqlprint();}
205 #line 42 "sqljson.pgc"
206 
207  printf("Found json=%s\n", json);
208 
209  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( '{ \"a\" : 1 } ' format json )", ECPGt_EOIT,
210  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
211  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
212 #line 45 "sqljson.pgc"
213 
214 if (sqlca.sqlcode < 0) sqlprint();}
215 #line 45 "sqljson.pgc"
216 
217  printf("Found json=%s\n", json);
218 
219  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( '{ \"a\" : 1 } ' format json encoding UTF8 )", ECPGt_EOIT,
220  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
221  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
222 #line 48 "sqljson.pgc"
223 
224 if (sqlca.sqlcode < 0) sqlprint();}
225 #line 48 "sqljson.pgc"
226 
227  // error
228 
229  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( ' 1 ' :: jsonb )", ECPGt_EOIT,
230  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
231  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
232 #line 51 "sqljson.pgc"
233 
234 if (sqlca.sqlcode < 0) sqlprint();}
235 #line 51 "sqljson.pgc"
236 
237  printf("Found json=%s\n", json);
238 
239  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( ' 1 ' :: json with unique keys ) into json", ECPGt_EOIT, ECPGt_EORT);
240 #line 54 "sqljson.pgc"
241 
242 if (sqlca.sqlcode < 0) sqlprint();}
243 #line 54 "sqljson.pgc"
244 
245  // error
246 
247  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( '{\"a\": 1, \"a\": 2}' )", ECPGt_EOIT,
248  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
249  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
250 #line 57 "sqljson.pgc"
251 
252 if (sqlca.sqlcode < 0) sqlprint();}
253 #line 57 "sqljson.pgc"
254 
255  printf("Found json=%s\n", json);
256 
257  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json ( '{\"a\": 1, \"a\": 2}' with unique keys )", ECPGt_EOIT,
258  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
259  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
260 #line 60 "sqljson.pgc"
261 
262 if (sqlca.sqlcode < 0) sqlprint();}
263 #line 60 "sqljson.pgc"
264 
265  // error
266 
267  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( null )", ECPGt_EOIT,
268  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
269  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
270 #line 63 "sqljson.pgc"
271 
272 if (sqlca.sqlcode < 0) sqlprint();}
273 #line 63 "sqljson.pgc"
274 
275  printf("Found json=%s\n", json);
276 
277  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( null :: int )", ECPGt_EOIT,
278  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
279  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
280 #line 66 "sqljson.pgc"
281 
282 if (sqlca.sqlcode < 0) sqlprint();}
283 #line 66 "sqljson.pgc"
284 
285  printf("Found json=%s\n", json);
286 
287  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( 123.45 )", ECPGt_EOIT,
288  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
289  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
290 #line 69 "sqljson.pgc"
291 
292 if (sqlca.sqlcode < 0) sqlprint();}
293 #line 69 "sqljson.pgc"
294 
295  printf("Found json=%s\n", json);
296 
297  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( true )", ECPGt_EOIT,
298  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
299  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
300 #line 72 "sqljson.pgc"
301 
302 if (sqlca.sqlcode < 0) sqlprint();}
303 #line 72 "sqljson.pgc"
304 
305  printf("Found json=%s\n", json);
306 
307  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( ' 123.45' )", ECPGt_EOIT,
308  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
309  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
310 #line 75 "sqljson.pgc"
311 
312 if (sqlca.sqlcode < 0) sqlprint();}
313 #line 75 "sqljson.pgc"
314 
315  printf("Found json=%s\n", json);
316 
317  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( '2020-06-07 01:02:03' :: timestamp )", ECPGt_EOIT,
318  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
319  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
320 #line 78 "sqljson.pgc"
321 
322 if (sqlca.sqlcode < 0) sqlprint();}
323 #line 78 "sqljson.pgc"
324 
325  printf("Found json=%s\n", json);
326 
327  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_scalar ( '{}' :: jsonb )", ECPGt_EOIT,
328  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
329  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
330 #line 81 "sqljson.pgc"
331 
332 if (sqlca.sqlcode < 0) sqlprint();}
333 #line 81 "sqljson.pgc"
334 
335  printf("Found json=%s\n", json);
336 
337  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( null )", ECPGt_EOIT,
338  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
339  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
340 #line 84 "sqljson.pgc"
341 
342 if (sqlca.sqlcode < 0) sqlprint();}
343 #line 84 "sqljson.pgc"
344 
345  printf("Found json=%s\n", json);
346 
347  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( json ( '{ \"a\" : 1 } ' ) )", ECPGt_EOIT,
348  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
349  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
350 #line 87 "sqljson.pgc"
351 
352 if (sqlca.sqlcode < 0) sqlprint();}
353 #line 87 "sqljson.pgc"
354 
355  printf("Found json=%s\n", json);
356 
357  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( '{ \"a\" : 1 } ' )", ECPGt_EOIT,
358  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
359  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
360 #line 90 "sqljson.pgc"
361 
362 if (sqlca.sqlcode < 0) sqlprint();}
363 #line 90 "sqljson.pgc"
364 
365  printf("Found json=%s\n", json);
366 
367  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( '1' format json )", ECPGt_EOIT,
368  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
369  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
370 #line 93 "sqljson.pgc"
371 
372 if (sqlca.sqlcode < 0) sqlprint();}
373 #line 93 "sqljson.pgc"
374 
375  printf("Found json=%s\n", json);
376 
377  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( '{ \"a\" : 1 } ' returning varchar )", ECPGt_EOIT,
378  ECPGt_char,(json),(long)1024,(long)1,(1024)*sizeof(char),
379  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
380 #line 96 "sqljson.pgc"
381 
382 if (sqlca.sqlcode < 0) sqlprint();}
383 #line 96 "sqljson.pgc"
384 
385  printf("Found json=%s\n", json);
386 
387  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select json_serialize ( '{ \"a\" : 1 } ' returning jsonb )", ECPGt_EOIT, ECPGt_EORT);
388 #line 99 "sqljson.pgc"
389 
390 if (sqlca.sqlcode < 0) sqlprint();}
391 #line 99 "sqljson.pgc"
392 
393  // error
394 
395  { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "with val ( js ) as ( values ( '{ \"a\": 1, \"b\": [{ \"a\": 1, \"b\": 0, \"a\": 2 }] }' ) ) select js is json \"IS JSON\" , js is not json \"IS NOT JSON\" , js is json value \"IS VALUE\" , js is json object \"IS OBJECT\" , js is json array \"IS ARRAY\" , js is json scalar \"IS SCALAR\" , js is json without unique keys \"WITHOUT UNIQUE\" , js is json with unique keys \"WITH UNIQUE\" from val", ECPGt_EOIT,
396  ECPGt_bool,&(is_json[0]),(long)1,(long)1,sizeof(bool),
397  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
398  ECPGt_bool,&(is_json[1]),(long)1,(long)1,sizeof(bool),
399  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
400  ECPGt_bool,&(is_json[2]),(long)1,(long)1,sizeof(bool),
401  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
402  ECPGt_bool,&(is_json[3]),(long)1,(long)1,sizeof(bool),
403  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
404  ECPGt_bool,&(is_json[4]),(long)1,(long)1,sizeof(bool),
405  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
406  ECPGt_bool,&(is_json[5]),(long)1,(long)1,sizeof(bool),
407  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
408  ECPGt_bool,&(is_json[6]),(long)1,(long)1,sizeof(bool),
409  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
410  ECPGt_bool,&(is_json[7]),(long)1,(long)1,sizeof(bool),
411  ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
412 #line 114 "sqljson.pgc"
413 
414 if (sqlca.sqlcode < 0) sqlprint();}
415 #line 114 "sqljson.pgc"
416 
417  for (int i = 0; i < sizeof(is_json); i++)
418  printf("Found is_json[%d]: %s\n", i, is_json[i] ? "true" : "false");
419 
420  { ECPGdisconnect(__LINE__, "CURRENT");
421 #line 118 "sqljson.pgc"
422 
423 if (sqlca.sqlcode < 0) sqlprint();}
424 #line 118 "sqljson.pgc"
425 
426 
427  return 0;
428 }
ECPGsetcommit
bool ECPGsetcommit(int lineno, const char *mode, const char *connection_name)
Definition: connect.c:153
ECPGdisconnect
bool ECPGdisconnect(int lineno, const char *connection_name)
Definition: connect.c:673
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:255
ECPGst_normal
@ ECPGst_normal
Definition: ecpgtype.h:97
ECPGt_EOIT
@ ECPGt_EOIT
Definition: ecpgtype.h:62
ECPGt_NO_INDICATOR
@ ECPGt_NO_INDICATOR
Definition: ecpgtype.h:64
ECPGt_EORT
@ ECPGt_EORT
Definition: ecpgtype.h:63
ECPGt_bool
@ ECPGt_bool
Definition: ecpgtype.h:46
ECPGt_char
@ ECPGt_char
Definition: ecpgtype.h:43
sqlprint
void sqlprint(void)
Definition: error.c:334
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:2277
i
int i
Definition: isn.c:73
printf
#define printf(...)
Definition: port.h:244
SQLERRMC_LEN
#define SQLERRMC_LEN
Definition: sql-sqljson.c:25
ECPGget_sqlca
struct sqlca_t * ECPGget_sqlca(void)
Definition: misc.c:108
sqlca
#define sqlca
Definition: sql-sqljson.c:72
ECPGdebug
#define ECPGdebug(X, Y)
Definition: sql-sqljson.c:7
main
int main()
Definition: sql-sqljson.c:99
sqlca_t
Definition: sqlca.h:20
sqlca_t::sqlerrp
char sqlerrp[8]
Definition: sqlca.h:29
sqlca_t::sqlerrd
long sqlerrd[6]
Definition: sqlca.h:30
sqlca_t::sqlstate
char sqlstate[5]
Definition: sqlca.h:53
sqlca_t::sqlwarn
char sqlwarn[8]
Definition: sqlca.h:39
sqlca_t::sqlabc
long sqlabc
Definition: sqlca.h:22
sqlca_t::sqlcaid
char sqlcaid[8]
Definition: sqlca.h:21
sqlca_t::sqlerrm
struct sqlca_t::@158 sqlerrm
sqlca_t::sqlerrmc
char sqlerrmc[SQLERRMC_LEN]
Definition: sqlca.h:27
sqlca_t::sqlcode
long sqlcode
Definition: sqlca.h:23
sqlca_t::sqlerrml
int sqlerrml
Definition: sqlca.h:26