File: databases.c

package info (click to toggle)
grass 6.0.2-6
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 40,044 kB
  • ctags: 31,303
  • sloc: ansic: 321,125; tcl: 25,676; sh: 11,176; cpp: 10,098; makefile: 5,025; fortran: 1,846; yacc: 493; lex: 462; perl: 133; sed: 1
file content (81 lines) | stat: -rw-r--r-- 1,905 bytes parent folder | download | duplicates (2)
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
#include <stdlib.h>
#include "dbmi.h"
#include "gis.h"
#include "codes.h"
#include "glocale.h"

void parse_command_line();

struct {
	char *driver;
	char *location;
} parms;


int
main(int argc, char *argv[])
{
    dbDriver *driver;
    dbHandle *handles;
    dbString locations;
    int nlocs = 0;
    int count, i;

    db_init_string ( &locations );
    parse_command_line(argc, argv);

    if ( parms.location ) {
        db_set_string ( &locations, parms.location );
	nlocs = 1;
    }
    
    driver = db_start_driver (parms.driver);
    if (driver == NULL)
        G_fatal_error(_("Cannot start driver '%s'."), parms.driver);
        
    if(db_list_databases (driver, &locations, nlocs, &handles, &count) != DB_OK)
	G_fatal_error(_("Cannot list databases."));

    db_shutdown_driver (driver);

    for (i = 0; i < count; i++) {
	fprintf(stdout, "%s", db_get_handle_dbname(&handles[i]));
	fprintf(stdout, "\n");
    }
    exit(OK);
}

void
parse_command_line(int argc, char *argv[])
{
    struct Option *driver, *location;
    struct GModule *module;

    /* Initialize the GIS calls */
    G_gisinit(argv[0]) ;

    driver 		= G_define_option();
    driver->key 	= "driver";
    driver->type 	= TYPE_STRING;
    driver->options     = db_list_drivers();
    driver->required 	= NO;               /* changed yo NO by RB, 4/2000 */
    driver->description = _("driver name");

    location 		  = G_define_option();
    location->key 	  = "location";
    location->type 	  = TYPE_STRING;
    location->required 	  = NO;
    location->multiple 	  = YES;
    location->description = _("database location");

    
    /* Set description */
    module              = G_define_module();
    module->description = _("List all databases for a given driver and location.");

    if(G_parser(argc, argv))
        exit(ERROR);

    parms.driver     = driver->answer;
    parms.location   = location->answer;
}