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
123
124
125
126
127
128
129
|
/*
****************************************************************************
*
* MODULE: Vector library
*
* AUTHOR(S): Original author CERL, probably Dave Gerdes or Mike Higgins.
* Update to GRASS 5.7 Radim Blazek and David D. Gray.
*
* PURPOSE: Higher level functions for reading/writing/manipulating vectors.
*
* COPYRIGHT: (C) 2001 by the GRASS Development Team
*
* This program is free software under the GNU General Public
* License (>=v2). Read the file COPYING that comes with GRASS
* for details.
*
*****************************************************************************/
#include <stdlib.h>
#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include "Vect.h"
static int
clo_dummy () {
return -1;
}
static int format () { G_fatal_error ("Requested format is not compiled in this version"); return 0; }
static int (*Close_array[][2]) () =
{
{ clo_dummy, V1_close_nat }
#ifdef HAVE_OGR
, { clo_dummy, V1_close_ogr }
#else
,{ clo_dummy, format }
#endif
};
/*!
\fn int Vect_close (struct Map_info *Map)
\brief close vector data file
\return 0 on success, non-zero on error
\param Map_info structure
*/
int
Vect_close (struct Map_info *Map)
{
struct Coor_info CInfo;
G_debug (1, "Vect_close(): name = %s, mapset = %s, format = %d, level = %d",
Map->name, Map->mapset, Map->format, Map->level);
/* Store support files if in write mode on level 2 */
if ( strcmp(Map->mapset,G_mapset()) == 0 && Map->support_updated && Map->plus.built == GV_BUILD_ALL) {
char buf[1000];
char file_path[2000];
struct stat info;
/* Delete old support files if available */
sprintf (buf, "%s/%s", GRASS_VECT_DIRECTORY, Map->name);
G__file_name ( file_path, buf, GV_TOPO_ELEMENT, G_mapset ());
if (stat (file_path, &info) == 0) /* file exists? */
unlink (file_path);
G__file_name ( file_path, buf, GV_SIDX_ELEMENT, G_mapset ());
if (stat (file_path, &info) == 0) /* file exists? */
unlink (file_path);
G__file_name ( file_path, buf, GV_CIDX_ELEMENT, G_mapset ());
if (stat (file_path, &info) == 0) /* file exists? */
unlink (file_path);
Vect_coor_info ( Map, &CInfo);
Map->plus.coor_size = CInfo.size;
Map->plus.coor_mtime = CInfo.mtime;
Vect_save_topo ( Map );
/* Spatial index is not saved */
/* Vect_save_spatial_index ( Map ); */
Vect_cidx_save ( Map );
#ifdef HAVE_OGR
if ( Map->format == GV_FORMAT_OGR )
V2_close_ogr ( Map );
#endif
}
if ( Map->level == 2 && Map->plus.release_support ) {
G_debug (1, "free topology" );
dig_free_plus ( &(Map->plus) );
if ( !Map->head_only ) {
G_debug (1, "free spatial index" );
dig_spidx_free ( &(Map->plus) );
}
G_debug (1, "free category index" );
dig_cidx_free ( &(Map->plus) );
}
if ( Map->format == GV_FORMAT_NATIVE ) {
G_debug (1, "close history file" );
if ( Map->hist_fp != NULL ) fclose ( Map->hist_fp );
}
/* Close level 1 files / data sources if not head_only */
if ( !Map->head_only ) {
if ( ((*Close_array[Map->format][1]) (Map)) != 0 ) {
G_warning ("Cannot close vector '%s'", Vect_get_full_name(Map) );
return 1;
}
}
free (Map->name); Map->name = NULL;
free (Map->mapset); Map->mapset = NULL;
Map->open = VECT_CLOSED_CODE;
return 0;
}
|
