← Back to branch summary

~ubuntu-branches/ubuntu/hardy/postgresql-8.4/hardy-backports

« back to all changes in this revision

Viewing changes to src/interfaces/ecpg/test/expected/compat_informix-test_informix2.c

  • Committer: Bazaar Package Importer
  • Author(s): Martin Pitt
  • Date: 2009-03-20 12:00:13 UTC
  • Revision ID: james.westby@ubuntu.com-20090320120013-hogj7egc5mjncc5g
Tags: upstream-8.4~0cvs20090328
Import upstream version 8.4~0cvs20090328

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/interfaces/ecpg/test/expected/compat_informix-test_informix2.c
 
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
/* Needed for informix compatibility */
 
7
#include <ecpg_informix.h>
 
8
/* End of automatic include section */
 
9
#define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y))
 
10
 
 
11
#line 1 "test_informix2.pgc"
 
12
#include <stdio.h>
 
13
#include <stdlib.h>
 
14
#include "sqltypes.h"
 
15
 
 
16
 
 
17
#line 1 "sqlca.h"
 
18
#ifndef POSTGRES_SQLCA_H
 
19
#define POSTGRES_SQLCA_H
 
20
 
 
21
#ifndef PGDLLIMPORT
 
22
#if  defined(WIN32) || defined(__CYGWIN__)
 
23
#define PGDLLIMPORT __declspec (dllimport)
 
24
#else
 
25
#define PGDLLIMPORT
 
26
#endif   /* __CYGWIN__ */
 
27
#endif   /* PGDLLIMPORT */
 
28
 
 
29
#define SQLERRMC_LEN    150
 
30
 
 
31
#ifdef __cplusplus
 
32
extern          "C"
 
33
{
 
34
#endif
 
35
 
 
36
struct sqlca_t
 
37
{
 
38
        char            sqlcaid[8];
 
39
        long            sqlabc;
 
40
        long            sqlcode;
 
41
        struct
 
42
        {
 
43
                int                     sqlerrml;
 
44
                char            sqlerrmc[SQLERRMC_LEN];
 
45
        }                       sqlerrm;
 
46
        char            sqlerrp[8];
 
47
        long            sqlerrd[6];
 
48
        /* Element 0: empty                                             */
 
49
        /* 1: OID of processed tuple if applicable                      */
 
50
        /* 2: number of rows processed                          */
 
51
        /* after an INSERT, UPDATE or                           */
 
52
        /* DELETE statement                                     */
 
53
        /* 3: empty                                             */
 
54
        /* 4: empty                                             */
 
55
        /* 5: empty                                             */
 
56
        char            sqlwarn[8];
 
57
        /* Element 0: set to 'W' if at least one other is 'W'   */
 
58
        /* 1: if 'W' at least one character string              */
 
59
        /* value was truncated when it was                      */
 
60
        /* stored into a host variable.                         */
 
61
 
 
62
        /*
 
63
         * 2: if 'W' a (hopefully) non-fatal notice occurred
 
64
         */     /* 3: empty */
 
65
        /* 4: empty                                             */
 
66
        /* 5: empty                                             */
 
67
        /* 6: empty                                             */
 
68
        /* 7: empty                                             */
 
69
 
 
70
        char            sqlstate[5];
 
71
};
 
72
 
 
73
struct sqlca_t *ECPGget_sqlca(void);
 
74
 
 
75
#ifndef POSTGRES_ECPG_INTERNAL
 
76
#define sqlca (*ECPGget_sqlca())
 
77
#endif
 
78
 
 
79
#ifdef __cplusplus
 
80
}
 
81
#endif
 
82
 
 
83
#endif
 
84
 
 
85
#line 5 "test_informix2.pgc"
 
86
 
 
87
 
 
88
#line 1 "regression.h"
 
89
 
 
90
 
 
91
 
 
92
 
 
93
 
 
94
 
 
95
#line 6 "test_informix2.pgc"
 
96
 
 
97
 
 
98
 
 
99
/* Check SQLCODE, and produce a "standard error" if it's wrong! */
 
100
static void sql_check(char *fn, char *caller, int ignore)
 
101
{
 
102
  char errorstring[255];
 
103
 
 
104
  if (SQLCODE == ignore)
 
105
    return;
 
106
  else
 
107
  {
 
108
    if (SQLCODE != 0)
 
109
    {
 
110
 
 
111
      sprintf(errorstring, "**SQL error %ld doing '%s' in function '%s'. [%s]",
 
112
             SQLCODE, caller, fn, sqlca.sqlerrm.sqlerrmc);
 
113
      fprintf(stderr, "%s", errorstring);
 
114
      printf("%s\n", errorstring);
 
115
 
 
116
      /* attempt a ROLLBACK */
 
117
      { ECPGtrans(__LINE__, NULL, "rollback");}
 
118
#line 27 "test_informix2.pgc"
 
119
 
 
120
 
 
121
      if (SQLCODE == 0)
 
122
      {
 
123
        sprintf(errorstring, "Rollback successful.\n");
 
124
      } else {
 
125
        sprintf(errorstring, "Rollback failed with code %ld.\n", SQLCODE);
 
126
      }
 
127
 
 
128
      fprintf(stderr, "%s", errorstring);
 
129
      printf("%s\n", errorstring);
 
130
 
 
131
      exit(1);
 
132
    }
 
133
  }
 
134
}
 
135
 
 
136
 
 
137
 
 
138
int main(void)
 
139
{
 
140
        /* exec sql begin declare section */
 
141
                 
 
142
                 
 
143
                 
 
144
                 
 
145
                 
 
146
        
 
147
#line 49 "test_informix2.pgc"
 
148
 int c ;
 
149
 
 
150
#line 50 "test_informix2.pgc"
 
151
 timestamp d ;
 
152
 
 
153
#line 51 "test_informix2.pgc"
 
154
 timestamp e ;
 
155
 
 
156
#line 52 "test_informix2.pgc"
 
157
 timestamp maxd ;
 
158
 
 
159
#line 53 "test_informix2.pgc"
 
160
 char dbname [ 30 ] ;
 
161
/* exec sql end declare section */
 
162
#line 54 "test_informix2.pgc"
 
163
 
 
164
 
 
165
        interval *intvl;
 
166
 
 
167
        /* exec sql whenever sqlerror  sqlprint ; */
 
168
#line 58 "test_informix2.pgc"
 
169
 
 
170
 
 
171
        ECPGdebug(1, stderr);
 
172
 
 
173
        strcpy(dbname, "regress1");
 
174
        { ECPGconnect(__LINE__, 1, dbname , NULL, NULL , NULL, 0); 
 
175
#line 63 "test_informix2.pgc"
 
176
 
 
177
if (sqlca.sqlcode < 0) sqlprint();}
 
178
#line 63 "test_informix2.pgc"
 
179
 
 
180
        sql_check("main", "connect", 0);
 
181
 
 
182
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "set DateStyle to 'DMY'", ECPGt_EOIT, ECPGt_EORT);
 
183
#line 66 "test_informix2.pgc"
 
184
 
 
185
if (sqlca.sqlcode < 0) sqlprint();}
 
186
#line 66 "test_informix2.pgc"
 
187
 
 
188
 
 
189
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "create table history ( customerid integer , timestamp timestamp without time zone , action_taken char ( 5 ) , narrative varchar ( 100 ) )", ECPGt_EOIT, ECPGt_EORT);
 
190
#line 68 "test_informix2.pgc"
 
191
 
 
192
if (sqlca.sqlcode < 0) sqlprint();}
 
193
#line 68 "test_informix2.pgc"
 
194
 
 
195
        sql_check("main", "create", 0);
 
196
        
 
197
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "insert into history ( customerid , timestamp , action_taken , narrative ) values ( 1 , '2003-05-07 13:28:34 CEST' , 'test' , 'test' )", ECPGt_EOIT, ECPGt_EORT);
 
198
#line 73 "test_informix2.pgc"
 
199
 
 
200
if (sqlca.sqlcode < 0) sqlprint();}
 
201
#line 73 "test_informix2.pgc"
 
202
 
 
203
        sql_check("main", "insert", 0);
 
204
 
 
205
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "select max ( timestamp ) from history", ECPGt_EOIT, 
 
206
        ECPGt_timestamp,&(maxd),(long)1,(long)1,sizeof(timestamp), 
 
207
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
 
208
#line 78 "test_informix2.pgc"
 
209
 
 
210
if (sqlca.sqlcode < 0) sqlprint();}
 
211
#line 78 "test_informix2.pgc"
 
212
 
 
213
        sql_check("main", "select max", 100);
 
214
 
 
215
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "select customerid , timestamp from history where timestamp = $1  limit 1", 
 
216
        ECPGt_timestamp,&(maxd),(long)1,(long)1,sizeof(timestamp), 
 
217
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, 
 
218
        ECPGt_int,&(c),(long)1,(long)1,sizeof(int), 
 
219
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, 
 
220
        ECPGt_timestamp,&(d),(long)1,(long)1,sizeof(timestamp), 
 
221
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);
 
222
#line 85 "test_informix2.pgc"
 
223
 
 
224
if (sqlca.sqlcode < 0) sqlprint();}
 
225
#line 85 "test_informix2.pgc"
 
226
 
 
227
        sql_check("main", "select", 0);
 
228
 
 
229
        printf("Read in customer %d\n", c);
 
230
 
 
231
        intvl = PGTYPESinterval_from_asc("1 day 2 hours 24 minutes 65 seconds", NULL);
 
232
        PGTYPEStimestamp_add_interval(&d, intvl, &e);
 
233
        free(intvl);
 
234
        c++;
 
235
 
 
236
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "insert into history ( customerid , timestamp , action_taken , narrative ) values ( $1  , $2  , 'test' , 'test' )", 
 
237
        ECPGt_int,&(c),(long)1,(long)1,sizeof(int), 
 
238
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, 
 
239
        ECPGt_timestamp,&(e),(long)1,(long)1,sizeof(timestamp), 
 
240
        ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);
 
241
#line 97 "test_informix2.pgc"
 
242
 
 
243
if (sqlca.sqlcode < 0) sqlprint();}
 
244
#line 97 "test_informix2.pgc"
 
245
 
 
246
        sql_check("main", "update", 0);
 
247
  
 
248
        { ECPGtrans(__LINE__, NULL, "commit");
 
249
#line 100 "test_informix2.pgc"
 
250
 
 
251
if (sqlca.sqlcode < 0) sqlprint();}
 
252
#line 100 "test_informix2.pgc"
 
253
 
 
254
 
 
255
        { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "drop table history", ECPGt_EOIT, ECPGt_EORT);
 
256
#line 102 "test_informix2.pgc"
 
257
 
 
258
if (sqlca.sqlcode < 0) sqlprint();}
 
259
#line 102 "test_informix2.pgc"
 
260
 
 
261
        sql_check("main", "drop", 0);
 
262
 
 
263
        { ECPGtrans(__LINE__, NULL, "commit");
 
264
#line 105 "test_informix2.pgc"
 
265
 
 
266
if (sqlca.sqlcode < 0) sqlprint();}
 
267
#line 105 "test_informix2.pgc"
 
268
 
 
269
 
 
270
        { ECPGdisconnect(__LINE__, "CURRENT");
 
271
#line 107 "test_informix2.pgc"
 
272
 
 
273
if (sqlca.sqlcode < 0) sqlprint();}
 
274
#line 107 "test_informix2.pgc"
 
275
 
 
276
        sql_check("main", "disconnect", 0);
 
277
 
 
278
        printf("All OK!\n");
 
279
 
 
280
        exit(0);
 
281
 
 
282
/*
 
283
                 Table "public.history"
 
284
    Column    |            Type             | Modifiers
 
285
--------------+-----------------------------+-----------
 
286
 customerid   | integer                     | not null
 
287
 timestamp    | timestamp without time zone | not null
 
288
 action_taken | character(5)                | not null
 
289
 narrative    | character varying(100)      |
 
290
*/
 
291
 
 
292
}