1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
/*****************************************************************************
* just a test for debugging purpose, imitating dbf driver -a.sh.
*****************************************************************************/
#include <stdlib.h>
#include <grass/dbmi.h>
#include <grass/gis.h>
#include "globals.h"
int main(int argc, char *argv[])
{
dbCursor *cursor;
int stat;
dbToken token;
dbString *select;
int mode = 0;
dbDriver *driver;
dbHandle handle;
driver = db_start_driver("dbf");
if (driver == NULL)
exit(EXIT_FAILURE);
db_init_handle(&handle);
db_set_handle(&handle, "dbf_catalog", NULL);
if (db__test_database_open()) {
db_error("Multiple open databases not allowed");
return DB_OK;
}
/* call the procedure */
stat = db_driver_open_database(&handle);
/* send the return code */
if (stat != DB_OK) {
db_free_handle(&handle);
return DB_OK;
}
/* record the open in the driver state */
db__mark_database_open(db_get_handle_dbname(&handle),
db_get_handle_dbpath(&handle));
/* DO NOT free the handle since we saved the pointers to the name,path */
select = (dbString *)G_malloc(1024);
db_init_string(select);
db_set_string(select,
"select id, quality, flow from river where (flow = 10) or "
"(flow = 20) or (flow = 30) or (flow = 5) or (flow = 7)");
/* create a cursor */
cursor = (dbCursor *)db_malloc(sizeof(dbCursor));
if (cursor == NULL)
return db_get_error_code();
token = db_new_token((dbAddress)cursor);
if (token < 0)
return db_get_error_code();
db_init_cursor(cursor);
cursor->driver = driver;
G_debug(3, "sql is %s", *select);
G_debug(3, "driver is %s", cursor->driver);
/* call the procedure */
stat = db_driver_open_select_cursor(select, cursor, mode);
db_free_string(select);
/* mark this as a readonly cursor */
db_set_cursor_type_readonly(cursor);
/* add this cursor to the cursors managed by the driver state */
db__add_cursor_to_driver_state(cursor);
G_debug(3, "db_d_close_database()");
/* see if a database is open */
if (!db__test_database_open()) {
db_error("no database is open");
G_debug(3, "db_d_close_database(): would sent DB_FAILURE");
return DB_OK;
};
/* make sure all cursors are closed */
db__close_all_cursors();
/* call the procedure */
stat = db_driver_close_database();
G_debug(3, "db_d_close_database(): would have stat = %d", stat);
/* send the return code */
if (stat != DB_OK) {
G_debug(3, "db_d_close_database(): would sent DB_FAILURE");
return DB_OK;
}
G_debug(3, "db_d_close_database(): would sent DB_OK");
/* clear the driver state */
db__mark_database_closed();
db__init_driver_state();
G_debug(3, "main(): ok");
return DB_OK;
}
|
