Age Owner TLA Line data Source code
1 : /*
2 : * this file just tests the several possibilities you have for a disconnect
3 : */
4 :
5 : #include <stdlib.h>
6 : #include <string.h>
7 : #include <stdlib.h>
8 : #include <stdio.h>
9 :
10 : exec sql include ../regression;
11 :
12 : int
6094 meskes 13 CBC 1 : main(void)
14 : {
15 : exec sql begin declare section;
16 : char id[200];
17 : char res[200];
18 : exec sql end declare section;
19 :
20 1 : ECPGdebug(1, stderr);
21 :
22 1 : strcpy(id, "first");
2457 tgl 23 1 : exec sql connect to ecpg2_regression as :id;
6092 meskes 24 1 : exec sql connect to REGRESSDB1 as second;
25 :
26 : /* this selects from "second" which was opened last */
6094 27 1 : exec sql select current_database() into :res;
28 :
29 : /* will close "second" */
30 1 : exec sql disconnect CURRENT;
31 1 : exec sql select current_database() into :res;
32 :
6092 33 1 : exec sql connect to REGRESSDB1 as second;
34 : /* will close "second" */
6094 35 1 : exec sql disconnect DEFAULT;
36 :
2457 tgl 37 1 : exec sql connect to "ecpg2_regression" as second;
6094 meskes 38 1 : exec sql disconnect ALL;
39 :
40 1 : exec sql disconnect CURRENT;
41 1 : exec sql disconnect DEFAULT;
42 1 : exec sql disconnect ALL;
43 :
44 : /*
45 : * exec sql disconnect;
46 : * exec sql disconnect name;
47 : *
48 : * are used in other tests
49 : */
50 :
2061 peter_e 51 1 : return 0;
52 : }
|
