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
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
/******************************************************************************
*
* Project: libgrass
* Purpose: Function to create a new mapset within an existing location
* Author(s): Joel Pitt, joel.pitt@gmail.com
*
******************************************************************************
* Copyright (c) 2006, Joel Pitt
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
******************************************************************************
*
*/
#include <grass/gis.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/stat.h>
/*
* Returns 0 on success.
* Returns -1 to indicate a system error (check errno).
*/
int G__make_mapset(const char *gisdbase_name, const char *location_name,
const char *mapset_name)
{
char path[GPATH_MAX];
struct Cell_head default_window;
/* Get location */
if (location_name == NULL)
location_name = G_location();
/* Get GISDBASE */
if (gisdbase_name == NULL)
gisdbase_name = G_gisdbase();
/* TODO: Should probably check that user specified location and gisdbase are valid */
/* Make the mapset. */
sprintf(path, "%s/%s/%s", gisdbase_name, location_name, mapset_name);
if (G_mkdir(path) != 0)
return -1;
G__create_alt_env();
/* Get PERMANENT default window */
G__setenv("GISDBASE", gisdbase_name);
G__setenv("LOCATION", location_name);
G__setenv("MAPSET", "PERMANENT");
G_get_default_window(&default_window);
/* Change to the new mapset */
G__setenv("MAPSET", mapset_name);
/* Copy default window/regions to new mapset */
G__put_window(&default_window, "", "WIND");
/* And switch back to original environment */
G__switch_env();
return 0;
}
/*!
* \brief create a new mapset
*
* This function creates a new mapset in the current location,
* initializes default window and current window.
*
* \param char * gisdbase_name
* The full path of GISDBASE to create mapset in.
* If NULL then current GISDBASE is used.
* \param char * location_name
* The name location to create mapset in.
* If NULL then current location is used.
* \param char * mapset_name
* The name of the new mapset. Should not include
* the full path, the mapset will be created within
* the current database and location.
*
* \return Returns 0 on success, or generates a fatal error on failure.
* The G__make_mapset() function operates the same, but returns a
* non-zero error code on failure, instead of terminating.
*/
int G_make_mapset(const char *gisdbase_name, const char *location_name,
const char *mapset_name)
{
int err;
err = G__make_mapset(gisdbase_name, location_name, mapset_name);
if (err == 0)
return 0;
if (err == -1) {
perror("G_make_mapset");
}
G_fatal_error("G_make_mapset failed.");
return 1;
}
|
