]>
Commit | Line | Data |
---|---|---|
50a14534 EB |
1 | /* |
2 | * viking -- GPS Data and Topo Analyzer, Explorer, and Manager | |
3 | * | |
4 | * Copyright (C) 2003-2005, Evan Battaglia <gtoevan@gmx.net> | |
5 | * | |
6 | * This program is free software; you can redistribute it and/or modify | |
7 | * it under the terms of the GNU General Public License as published by | |
8 | * the Free Software Foundation; either version 2 of the License, or | |
9 | * (at your option) any later version. | |
10 | * | |
11 | * This program is distributed in the hope that it will be useful, | |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | * GNU General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU General Public License | |
17 | * along with this program; if not, write to the Free Software | |
18 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
19 | * | |
20 | */ | |
21 | ||
eb93fa95 GB |
22 | #ifdef HAVE_CONFIG_H |
23 | #include "config.h" | |
24 | #endif | |
50a14534 EB |
25 | #include "viking.h" |
26 | ||
bf35388d EB |
27 | #include "gpx.h" |
28 | ||
50a14534 EB |
29 | #include <string.h> |
30 | #include <stdlib.h> | |
8c060406 | 31 | #include <stdio.h> |
45acf79e MA |
32 | #ifdef HAVE_UNISTD_H |
33 | #include <unistd.h> | |
34 | #endif | |
d5728c65 GB |
35 | #include <glib.h> |
36 | #include <glib/gstdio.h> | |
50a14534 | 37 | |
cf38e8c7 EB |
38 | /* Relax some dependencies */ |
39 | #if ! GLIB_CHECK_VERSION(2,12,0) | |
40 | static gboolean return_true (gpointer a, gpointer b, gpointer c) { return TRUE; } | |
41 | static g_hash_table_remove_all (GHashTable *ght) { g_hash_table_foreach_remove ( ght, (GHRFunc) return_true, FALSE ); } | |
42 | #endif | |
43 | ||
50a14534 EB |
44 | #define TEST_BOOLEAN(str) (! ((str)[0] == '\0' || (str)[0] == '0' || (str)[0] == 'n' || (str)[0] == 'N' || (str)[0] == 'f' || (str)[0] == 'F') ) |
45 | #define VIK_MAGIC "#VIK" | |
bf35388d | 46 | #define GPX_MAGIC "<?xm" |
50a14534 EB |
47 | #define VIK_MAGIC_LEN 4 |
48 | ||
49 | #ifdef WINDOWS | |
50 | #define FILE_SEP '\\' | |
51 | #else | |
52 | #define FILE_SEP '/' | |
53 | #endif | |
54 | ||
55 | typedef struct _Stack Stack; | |
56 | ||
57 | struct _Stack { | |
58 | Stack *under; | |
59 | gpointer *data; | |
60 | }; | |
61 | ||
62 | static void pop(Stack **stack) { | |
63 | Stack *tmp = (*stack)->under; | |
64 | g_free ( *stack ); | |
65 | *stack = tmp; | |
66 | } | |
67 | ||
68 | static void push(Stack **stack) | |
69 | { | |
70 | Stack *tmp = g_malloc ( sizeof ( Stack ) ); | |
71 | tmp->under = *stack; | |
72 | *stack = tmp; | |
73 | } | |
74 | ||
bf35388d | 75 | static gboolean check_magic ( FILE *f, const gchar *magic_number ) |
50a14534 EB |
76 | { |
77 | gchar magic[VIK_MAGIC_LEN]; | |
78 | gboolean rv = FALSE; | |
79 | gint8 i; | |
80 | if ( fread(magic, 1, sizeof(magic), f) == sizeof(magic) && | |
bf35388d | 81 | strncmp(magic, magic_number, sizeof(magic)) == 0 ) |
50a14534 EB |
82 | rv = TRUE; |
83 | for ( i = sizeof(magic)-1; i >= 0; i-- ) /* the ol' pushback */ | |
84 | ungetc(magic[i],f); | |
85 | return rv; | |
86 | } | |
87 | ||
88 | ||
89 | static gboolean str_starts_with ( const gchar *haystack, const gchar *needle, guint16 len_needle, gboolean must_be_longer ) | |
90 | { | |
91 | if ( strlen(haystack) > len_needle - (!must_be_longer) && strncasecmp ( haystack, needle, len_needle ) == 0 ) | |
92 | return TRUE; | |
93 | return FALSE; | |
94 | } | |
95 | ||
96 | static guint16 layer_type_from_string ( const gchar *str ) | |
97 | { | |
98 | guint8 i; | |
99 | for ( i = 0; i < VIK_LAYER_NUM_TYPES; i++ ) | |
100 | if ( strcasecmp ( str, vik_layer_get_interface(i)->name ) == 0 ) | |
101 | return i; | |
102 | return -1; | |
103 | } | |
104 | ||
17a1f8f9 | 105 | void file_write_layer_param ( FILE *f, const gchar *name, guint8 type, VikLayerParamData data ) { |
ad0a8c2d EB |
106 | /* string lists are handled differently. We get a GList (that shouldn't |
107 | * be freed) back for get_param and if it is null we shouldn't write | |
108 | * anything at all (otherwise we'd read in a list with an empty string, | |
17a1f8f9 | 109 | * not an empty string list. |
ad0a8c2d | 110 | */ |
17a1f8f9 | 111 | if ( type == VIK_LAYER_PARAM_STRING_LIST ) { |
ad0a8c2d EB |
112 | if ( data.sl ) { |
113 | GList *iter = (GList *)data.sl; | |
114 | while ( iter ) { | |
17a1f8f9 | 115 | fprintf ( f, "%s=", name ); |
ad0a8c2d EB |
116 | fprintf ( f, "%s\n", (gchar *)(iter->data) ); |
117 | iter = iter->next; | |
118 | } | |
119 | } | |
120 | } else { | |
17a1f8f9 EB |
121 | fprintf ( f, "%s=", name ); |
122 | switch ( type ) | |
ad0a8c2d EB |
123 | { |
124 | case VIK_LAYER_PARAM_DOUBLE: { | |
125 | // char buf[15]; /* locale independent */ | |
126 | // fprintf ( f, "%s\n", (char *) g_dtostr (data.d, buf, sizeof (buf)) ); break; | |
127 | fprintf ( f, "%f\n", data.d ); | |
128 | break; | |
129 | } | |
130 | case VIK_LAYER_PARAM_UINT: fprintf ( f, "%d\n", data.u ); break; | |
131 | case VIK_LAYER_PARAM_INT: fprintf ( f, "%d\n", data.i ); break; | |
132 | case VIK_LAYER_PARAM_BOOLEAN: fprintf ( f, "%c\n", data.b ? 't' : 'f' ); break; | |
133 | case VIK_LAYER_PARAM_STRING: fprintf ( f, "%s\n", data.s ); break; | |
134 | case VIK_LAYER_PARAM_COLOR: fprintf ( f, "#%.2x%.2x%.2x\n", (int)(data.c.red/256),(int)(data.c.green/256),(int)(data.c.blue/256)); break; | |
135 | } | |
50a14534 | 136 | } |
17a1f8f9 EB |
137 | } |
138 | ||
139 | static void write_layer_params_and_data ( VikLayer *l, FILE *f ) | |
140 | { | |
141 | VikLayerParam *params = vik_layer_get_interface(l->type)->params; | |
142 | VikLayerFuncGetParam get_param = vik_layer_get_interface(l->type)->get_param; | |
143 | ||
144 | fprintf ( f, "name=%s\n", l->name ? l->name : "" ); | |
145 | if ( !l->visible ) | |
146 | fprintf ( f, "visible=f\n" ); | |
147 | ||
148 | if ( params && get_param ) | |
149 | { | |
150 | VikLayerParamData data; | |
151 | guint16 i, params_count = vik_layer_get_interface(l->type)->params_count; | |
152 | for ( i = 0; i < params_count; i++ ) | |
153 | { | |
154 | data = get_param(l,i); | |
155 | file_write_layer_param(f, params[i].name, params[i].type, data); | |
50a14534 EB |
156 | } |
157 | } | |
158 | if ( vik_layer_get_interface(l->type)->write_file_data ) | |
159 | { | |
160 | fprintf ( f, "\n\n~LayerData\n" ); | |
161 | vik_layer_get_interface(l->type)->write_file_data ( l, f ); | |
162 | fprintf ( f, "~EndLayerData\n" ); | |
163 | } | |
164 | /* foreach param: | |
165 | write param, and get_value, etc. | |
166 | then run layer data, and that's it. | |
167 | */ | |
168 | } | |
169 | ||
170 | static void file_write ( VikAggregateLayer *top, FILE *f, gpointer vp ) | |
171 | { | |
172 | Stack *stack = NULL; | |
173 | VikLayer *current_layer; | |
174 | struct LatLon ll; | |
175 | gchar *modestring; | |
176 | ||
177 | push(&stack); | |
178 | stack->data = (gpointer) vik_aggregate_layer_get_children(VIK_AGGREGATE_LAYER(top)); | |
179 | stack->under = NULL; | |
180 | ||
181 | /* crazhy CRAZHY */ | |
182 | vik_coord_to_latlon ( vik_viewport_get_center ( VIK_VIEWPORT(vp) ), &ll ); | |
183 | ||
184 | switch ( vik_viewport_get_drawmode ( VIK_VIEWPORT(vp) ) ) { | |
185 | case VIK_VIEWPORT_DRAWMODE_UTM: modestring = "utm"; break; | |
186 | case VIK_VIEWPORT_DRAWMODE_EXPEDIA: modestring = "expedia"; break; | |
187 | case VIK_VIEWPORT_DRAWMODE_GOOGLE: modestring = "google"; break; | |
188 | case VIK_VIEWPORT_DRAWMODE_KH: modestring = "kh"; break; | |
189 | default: modestring = "mercator"; | |
190 | } | |
191 | ||
c933487f | 192 | fprintf ( f, "#VIKING GPS Data file " VIKING_URL "\n\nxmpp=%f\nympp=%f\nlat=%f\nlon=%f\nmode=%s\ncolor=%s\ndrawscale=%s\ndrawcentermark=%s", |
50a14534 | 193 | vik_viewport_get_xmpp ( VIK_VIEWPORT(vp) ), vik_viewport_get_ympp ( VIK_VIEWPORT(vp) ), ll.lat, ll.lon, |
35c7c0ba | 194 | modestring, vik_viewport_get_background_color(VIK_VIEWPORT(vp)), |
c933487f QT |
195 | vik_viewport_get_draw_scale(VIK_VIEWPORT(vp)) ? "t" : "f", |
196 | vik_viewport_get_draw_centermark(VIK_VIEWPORT(vp)) ? "t" : "f" ); | |
50a14534 EB |
197 | |
198 | if ( ! VIK_LAYER(top)->visible ) | |
199 | fprintf ( f, "visible=f\n" ); | |
200 | ||
201 | while (stack && stack->data) | |
202 | { | |
203 | current_layer = VIK_LAYER(((GList *)stack->data)->data); | |
204 | fprintf ( f, "\n~Layer %s\n", vik_layer_get_interface(current_layer->type)->name ); | |
205 | write_layer_params_and_data ( current_layer, f ); | |
206 | if ( current_layer->type == VIK_LAYER_AGGREGATE && !vik_aggregate_layer_is_empty(VIK_AGGREGATE_LAYER(current_layer)) ) | |
207 | { | |
208 | push(&stack); | |
209 | stack->data = (gpointer) vik_aggregate_layer_get_children(VIK_AGGREGATE_LAYER(current_layer)); | |
210 | } | |
f253a6a6 | 211 | else if ( current_layer->type == VIK_LAYER_GPS && !vik_gps_layer_is_empty(VIK_GPS_LAYER(current_layer)) ) |
7886de28 QT |
212 | { |
213 | push(&stack); | |
214 | stack->data = (gpointer) vik_gps_layer_get_children(VIK_GPS_LAYER(current_layer)); | |
215 | } | |
50a14534 EB |
216 | else |
217 | { | |
218 | stack->data = (gpointer) ((GList *)stack->data)->next; | |
219 | fprintf ( f, "~EndLayer\n\n" ); | |
220 | while ( stack && (!stack->data) ) | |
221 | { | |
222 | pop(&stack); | |
223 | if ( stack ) | |
224 | { | |
225 | stack->data = (gpointer) ((GList *)stack->data)->next; | |
226 | fprintf ( f, "~EndLayer\n\n" ); | |
227 | } | |
228 | } | |
229 | } | |
230 | } | |
231 | /* | |
232 | get vikaggregatelayer's children (?) | |
233 | foreach write ALL params, | |
234 | then layer data (IF function exists) | |
235 | then endlayer | |
236 | ||
237 | impl: | |
238 | stack of layers (LIST) we are working on | |
239 | when layer->next == NULL ... | |
240 | we move on. | |
241 | */ | |
242 | } | |
243 | ||
ad0a8c2d EB |
244 | static void string_list_delete ( gpointer key, gpointer l, gpointer user_data ) |
245 | { | |
28c82d8b EB |
246 | /* 20071021 bugfix */ |
247 | GList *iter = (GList *) l; | |
ad0a8c2d EB |
248 | while ( iter ) { |
249 | g_free ( iter->data ); | |
250 | iter = iter->next; | |
251 | } | |
28c82d8b | 252 | g_list_free ( (GList *) l ); |
ad0a8c2d EB |
253 | } |
254 | ||
255 | static void string_list_set_param (gint i, GList *list, gpointer *layer_and_vp) | |
256 | { | |
257 | VikLayerParamData x; | |
258 | x.sl = list; | |
259 | vik_layer_set_param ( VIK_LAYER(layer_and_vp[0]), i, x, layer_and_vp[1] ); | |
260 | } | |
261 | ||
94933cb8 | 262 | static void file_read ( VikAggregateLayer *top, FILE *f, VikViewport *vp ) |
50a14534 EB |
263 | { |
264 | Stack *stack; | |
265 | struct LatLon ll = { 0.0, 0.0 }; | |
266 | gchar buffer[4096]; | |
267 | gchar *line; | |
268 | guint16 len; | |
269 | long line_num = 0; | |
270 | ||
37518034 QT |
271 | VikLayerParam *params = NULL; /* for current layer, so we don't have to keep on looking up interface */ |
272 | guint8 params_count = 0; | |
50a14534 | 273 | |
ad0a8c2d EB |
274 | GHashTable *string_lists = g_hash_table_new(g_direct_hash,g_direct_equal); |
275 | ||
50a14534 EB |
276 | push(&stack); |
277 | stack->under = NULL; | |
278 | stack->data = (gpointer) top; | |
279 | ||
280 | while ( fgets ( buffer, 4096, f ) ) | |
281 | { | |
282 | line_num++; | |
283 | ||
284 | line = buffer; | |
285 | while ( *line == ' ' || *line =='\t' ) | |
286 | line++; | |
287 | ||
288 | if ( line[0] == '#' ) | |
289 | continue; | |
290 | ||
291 | ||
292 | len = strlen(line); | |
293 | if ( len > 0 && line[len-1] == '\n' ) | |
294 | line[--len] = '\0'; | |
295 | if ( len > 0 && line[len-1] == '\r' ) | |
296 | line[--len] = '\0'; | |
297 | ||
298 | if ( len == 0 ) | |
299 | continue; | |
300 | ||
301 | ||
302 | if ( line[0] == '~' ) | |
303 | { | |
304 | line++; len--; | |
305 | if ( *line == '\0' ) | |
306 | continue; | |
307 | else if ( str_starts_with ( line, "Layer ", 6, TRUE ) ) | |
308 | { | |
f253a6a6 QT |
309 | int parent_type = VIK_LAYER(stack->data)->type; |
310 | if ( ( ! stack->data ) || ((parent_type != VIK_LAYER_AGGREGATE) && (parent_type != VIK_LAYER_GPS)) ) | |
50a14534 | 311 | { |
f253a6a6 | 312 | g_warning ( "Line %ld: Layer command inside non-Aggregate Layer (type %d)", line_num, parent_type ); |
50a14534 EB |
313 | push(&stack); /* inside INVALID layer */ |
314 | stack->data = NULL; | |
315 | continue; | |
316 | } | |
317 | else | |
318 | { | |
319 | gint16 type = layer_type_from_string ( line+6 ); | |
320 | push(&stack); | |
321 | if ( type == -1 ) | |
322 | { | |
4258f4e2 | 323 | g_warning ( "Line %ld: Unknown type %s", line_num, line+6 ); |
50a14534 EB |
324 | stack->data = NULL; |
325 | } | |
f253a6a6 QT |
326 | else if (parent_type == VIK_LAYER_GPS) |
327 | { | |
328 | stack->data = (gpointer) vik_gps_layer_get_a_child(VIK_GPS_LAYER(stack->under->data)); | |
329 | params = vik_layer_get_interface(type)->params; | |
330 | params_count = vik_layer_get_interface(type)->params_count; | |
331 | } | |
50a14534 EB |
332 | else |
333 | { | |
334 | stack->data = (gpointer) vik_layer_create ( type, vp, NULL, FALSE ); | |
335 | params = vik_layer_get_interface(type)->params; | |
336 | params_count = vik_layer_get_interface(type)->params_count; | |
337 | } | |
338 | } | |
339 | } | |
340 | else if ( str_starts_with ( line, "EndLayer", 8, FALSE ) ) | |
341 | { | |
342 | if ( stack->under == NULL ) | |
343 | g_warning ( "Line %ld: Mismatched ~EndLayer command", line_num ); | |
344 | else | |
345 | { | |
ad0a8c2d EB |
346 | /* add any string lists we've accumulated */ |
347 | gpointer layer_and_vp[2]; | |
348 | layer_and_vp[0] = stack->data; | |
349 | layer_and_vp[1] = vp; | |
350 | g_hash_table_foreach ( string_lists, (GHFunc) string_list_set_param, layer_and_vp ); | |
351 | g_hash_table_remove_all ( string_lists ); | |
352 | ||
50a14534 EB |
353 | if ( stack->data && stack->under->data ) |
354 | { | |
f253a6a6 QT |
355 | if (VIK_LAYER(stack->under->data)->type == VIK_LAYER_AGGREGATE) { |
356 | vik_aggregate_layer_add_layer ( VIK_AGGREGATE_LAYER(stack->under->data), VIK_LAYER(stack->data) ); | |
dcb51e52 | 357 | vik_layer_post_read ( VIK_LAYER(stack->data), vp, TRUE ); |
f253a6a6 QT |
358 | } |
359 | else if (VIK_LAYER(stack->under->data)->type == VIK_LAYER_GPS) { | |
360 | /* TODO: anything else needs to be done here ? */ | |
361 | } | |
362 | else | |
363 | g_warning ( "Line %ld: EndLayer command inside non-Aggregate Layer (type %d)", line_num, VIK_LAYER(stack->data)->type ); | |
50a14534 EB |
364 | } |
365 | pop(&stack); | |
366 | } | |
367 | } | |
368 | else if ( str_starts_with ( line, "LayerData", 9, FALSE ) ) | |
369 | { | |
370 | if ( stack->data && vik_layer_get_interface(VIK_LAYER(stack->data)->type)->read_file_data ) | |
371 | vik_layer_get_interface(VIK_LAYER(stack->data)->type)->read_file_data ( VIK_LAYER(stack->data), f ); | |
372 | /* must read until hits ~EndLayerData */ | |
373 | ||
374 | else | |
375 | { /* simply skip layer data over */ | |
376 | while ( fgets ( buffer, 4096, f ) ) | |
377 | { | |
378 | line_num++; | |
379 | ||
380 | line = buffer; | |
381 | ||
382 | len = strlen(line); | |
383 | if ( len > 0 && line[len-1] == '\n' ) | |
384 | line[--len] = '\0'; | |
385 | if ( len > 0 && line[len-1] == '\r' ) | |
386 | line[--len] = '\0'; | |
387 | if ( strcasecmp ( line, "~EndLayerData" ) == 0 ) | |
388 | break; | |
389 | } | |
390 | continue; | |
391 | } | |
392 | } | |
393 | else | |
394 | { | |
395 | g_warning ( "Line %ld: Unknown tilde command", line_num ); | |
396 | } | |
397 | } | |
398 | else | |
399 | { | |
400 | gint32 eq_pos = -1; | |
401 | guint16 i; | |
402 | if ( ! stack->data ) | |
403 | continue; | |
404 | ||
405 | for ( i = 0; i < len; i++ ) | |
406 | if ( line[i] == '=' ) | |
407 | eq_pos = i; | |
408 | ||
409 | if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "xmpp", eq_pos ) == 0) /* "hard coded" params: global & for all layer-types */ | |
410 | vik_viewport_set_xmpp ( VIK_VIEWPORT(vp), strtod ( line+5, NULL ) ); | |
411 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "ympp", eq_pos ) == 0) | |
412 | vik_viewport_set_ympp ( VIK_VIEWPORT(vp), strtod ( line+5, NULL ) ); | |
413 | else if ( stack->under == NULL && eq_pos == 3 && strncasecmp ( line, "lat", eq_pos ) == 0 ) | |
414 | ll.lat = strtod ( line+4, NULL ); | |
415 | else if ( stack->under == NULL && eq_pos == 3 && strncasecmp ( line, "lon", eq_pos ) == 0 ) | |
416 | ll.lon = strtod ( line+4, NULL ); | |
417 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "mode", eq_pos ) == 0 && strcasecmp ( line+5, "utm" ) == 0) | |
418 | vik_viewport_set_drawmode ( VIK_VIEWPORT(vp), VIK_VIEWPORT_DRAWMODE_UTM); | |
419 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "mode", eq_pos ) == 0 && strcasecmp ( line+5, "expedia" ) == 0) | |
420 | vik_viewport_set_drawmode ( VIK_VIEWPORT(vp), VIK_VIEWPORT_DRAWMODE_EXPEDIA ); | |
421 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "mode", eq_pos ) == 0 && strcasecmp ( line+5, "google" ) == 0) | |
422 | vik_viewport_set_drawmode ( VIK_VIEWPORT(vp), VIK_VIEWPORT_DRAWMODE_GOOGLE ); | |
423 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "mode", eq_pos ) == 0 && strcasecmp ( line+5, "kh" ) == 0) | |
424 | vik_viewport_set_drawmode ( VIK_VIEWPORT(vp), VIK_VIEWPORT_DRAWMODE_KH ); | |
425 | else if ( stack->under == NULL && eq_pos == 4 && strncasecmp ( line, "mode", eq_pos ) == 0 && strcasecmp ( line+5, "mercator" ) == 0) | |
426 | vik_viewport_set_drawmode ( VIK_VIEWPORT(vp), VIK_VIEWPORT_DRAWMODE_MERCATOR ); | |
427 | else if ( stack->under == NULL && eq_pos == 5 && strncasecmp ( line, "color", eq_pos ) == 0 ) | |
428 | vik_viewport_set_background_color ( VIK_VIEWPORT(vp), line+6 ); | |
35c7c0ba EB |
429 | else if ( stack->under == NULL && eq_pos == 9 && strncasecmp ( line, "drawscale", eq_pos ) == 0 ) |
430 | vik_viewport_set_draw_scale ( VIK_VIEWPORT(vp), TEST_BOOLEAN(line+10) ); | |
de66b263 | 431 | else if ( stack->under == NULL && eq_pos == 14 && strncasecmp ( line, "drawcentermark", eq_pos ) == 0 ) |
1657065a | 432 | vik_viewport_set_draw_centermark ( VIK_VIEWPORT(vp), TEST_BOOLEAN(line+15) ); |
50a14534 EB |
433 | else if ( stack->under && eq_pos == 4 && strncasecmp ( line, "name", eq_pos ) == 0 ) |
434 | vik_layer_rename ( VIK_LAYER(stack->data), line+5 ); | |
435 | else if ( eq_pos == 7 && strncasecmp ( line, "visible", eq_pos ) == 0 ) | |
436 | VIK_LAYER(stack->data)->visible = TEST_BOOLEAN(line+8); | |
437 | else if ( eq_pos != -1 && stack->under ) | |
438 | { | |
439 | gboolean found_match = FALSE; | |
ad0a8c2d | 440 | |
50a14534 EB |
441 | /* go thru layer params. if len == eq_pos && starts_with jazz, set it. */ |
442 | /* also got to check for name and visible. */ | |
443 | ||
444 | if ( ! params ) | |
445 | { | |
446 | g_warning ( "Line %ld: No options for this kind of layer", line_num ); | |
447 | continue; | |
448 | } | |
449 | ||
450 | for ( i = 0; i < params_count; i++ ) | |
451 | if ( strlen(params[i].name) == eq_pos && strncasecmp ( line, params[i].name, eq_pos ) == 0 ) | |
452 | { | |
453 | VikLayerParamData x; | |
454 | line += eq_pos+1; | |
ad0a8c2d | 455 | if ( params[i].type == VIK_LAYER_PARAM_STRING_LIST ) { |
dc2c040e RN |
456 | GList *l = g_list_append ( g_hash_table_lookup ( string_lists, GINT_TO_POINTER ((gint) i) ), |
457 | g_strdup(line) ); | |
458 | g_hash_table_replace ( string_lists, GINT_TO_POINTER ((gint)i), l ); | |
ad0a8c2d EB |
459 | /* add the value to a list, possibly making a new list. |
460 | * this will be passed to the layer when we read an ~EndLayer */ | |
461 | } else { | |
462 | switch ( params[i].type ) | |
463 | { | |
464 | case VIK_LAYER_PARAM_DOUBLE: x.d = strtod(line, NULL); break; | |
465 | case VIK_LAYER_PARAM_UINT: x.u = strtoul(line, NULL, 10); break; | |
466 | case VIK_LAYER_PARAM_INT: x.i = strtol(line, NULL, 10); break; | |
467 | case VIK_LAYER_PARAM_BOOLEAN: x.b = TEST_BOOLEAN(line); break; | |
468 | case VIK_LAYER_PARAM_COLOR: memset(&(x.c), 0, sizeof(x.c)); /* default: black */ | |
50a14534 | 469 | gdk_color_parse ( line, &(x.c) ); break; |
ad0a8c2d EB |
470 | /* STRING or STRING_LIST -- if STRING_LIST, just set param to add a STRING */ |
471 | default: x.s = line; | |
472 | } | |
473 | vik_layer_set_param ( VIK_LAYER(stack->data), i, x, vp ); | |
50a14534 | 474 | } |
50a14534 EB |
475 | found_match = TRUE; |
476 | break; | |
477 | } | |
478 | if ( ! found_match ) | |
ea3933fc | 479 | g_warning ( "Line %ld: Unknown parameter. Line:\n%s", line_num, line ); |
50a14534 EB |
480 | } |
481 | else | |
482 | g_warning ( "Line %ld: Invalid parameter or parameter outside of layer.", line_num ); | |
483 | } | |
484 | /* could be: | |
485 | [Layer Type=Bla] | |
486 | [EndLayer] | |
487 | [LayerData] | |
488 | name=this | |
489 | #comment | |
490 | */ | |
491 | } | |
492 | ||
493 | while ( stack ) | |
494 | { | |
495 | if ( stack->under && stack->under->data && stack->data ) | |
496 | { | |
497 | vik_aggregate_layer_add_layer ( VIK_AGGREGATE_LAYER(stack->under->data), VIK_LAYER(stack->data) ); | |
dcb51e52 | 498 | vik_layer_post_read ( VIK_LAYER(stack->data), vp, TRUE ); |
50a14534 EB |
499 | } |
500 | pop(&stack); | |
501 | } | |
502 | ||
503 | if ( ll.lat != 0.0 || ll.lon != 0.0 ) | |
504 | vik_viewport_set_center_latlon ( VIK_VIEWPORT(vp), &ll ); | |
505 | ||
506 | if ( ( ! VIK_LAYER(top)->visible ) && VIK_LAYER(top)->realized ) | |
507 | vik_treeview_item_set_visible ( VIK_LAYER(top)->vt, &(VIK_LAYER(top)->iter), FALSE ); | |
ad0a8c2d EB |
508 | |
509 | /* delete anything we've forgotten about -- should only happen when file ends before an EndLayer */ | |
510 | g_hash_table_foreach ( string_lists, string_list_delete, NULL ); | |
511 | g_hash_table_destroy ( string_lists ); | |
50a14534 EB |
512 | } |
513 | ||
514 | /* | |
515 | read thru file | |
516 | if "[Layer Type=" | |
517 | push(&stack) | |
518 | new default layer of type (str_to_type) (check interface->name) | |
519 | if "[EndLayer]" | |
520 | VikLayer *vl = stack->data; | |
521 | pop(&stack); | |
522 | vik_aggregate_layer_add_layer(stack->data, vl); | |
523 | if "[LayerData]" | |
524 | vik_layer_data ( VIK_LAYER_DATA(stack->data), f, vp ); | |
525 | ||
526 | */ | |
527 | ||
528 | /* ---------------------------------------------------- */ | |
529 | ||
530 | static FILE *xfopen ( const char *fn, const char *mode ) | |
531 | { | |
532 | if ( strcmp(fn,"-") == 0 ) | |
533 | return stdin; | |
534 | else | |
8c060406 | 535 | return g_fopen(fn, "r"); |
50a14534 EB |
536 | } |
537 | ||
538 | static void xfclose ( FILE *f ) | |
539 | { | |
8c060406 | 540 | if ( f != stdin && f != stdout ) { |
50a14534 | 541 | fclose ( f ); |
8c060406 MA |
542 | f = NULL; |
543 | } | |
50a14534 EB |
544 | } |
545 | ||
546 | /* 0 on failure, 1 on success (vik file) 2 on success (other file) */ | |
94933cb8 | 547 | gshort a_file_load ( VikAggregateLayer *top, VikViewport *vp, const gchar *filename ) |
50a14534 EB |
548 | { |
549 | FILE *f = xfopen ( filename, "r" ); | |
550 | ||
551 | g_assert ( vp ); | |
552 | ||
553 | if ( ! f ) | |
554 | return 0; | |
555 | ||
bf35388d | 556 | if ( check_magic ( f, VIK_MAGIC ) ) |
50a14534 EB |
557 | { |
558 | file_read ( top, f, vp ); | |
559 | if ( f != stdin ) | |
560 | xfclose(f); | |
561 | return 1; | |
562 | } | |
563 | else | |
564 | { | |
565 | VikCoord new_center; | |
566 | VikLayer *vtl = vik_layer_create ( VIK_LAYER_TRW, vp, NULL, FALSE ); | |
567 | vik_layer_rename ( vtl, a_file_basename ( filename ) ); | |
bf35388d EB |
568 | |
569 | if ( check_magic ( f, GPX_MAGIC ) ) | |
570 | a_gpx_read_file ( VIK_TRW_LAYER(vtl), f ); | |
571 | else | |
572 | a_gpspoint_read_file ( VIK_TRW_LAYER(vtl), f ); | |
50a14534 | 573 | |
dcb51e52 | 574 | vik_layer_post_read ( vtl, vp, TRUE ); |
50a14534 EB |
575 | |
576 | vik_aggregate_layer_add_layer ( top, vtl ); | |
577 | ||
578 | if ( vik_trw_layer_find_center ( VIK_TRW_LAYER(vtl), &new_center ) ) | |
579 | vik_viewport_set_center_coord ( VIK_VIEWPORT(vp), &new_center ); | |
580 | xfclose(f); | |
581 | return 2; | |
582 | } | |
583 | } | |
584 | ||
585 | gboolean a_file_save ( VikAggregateLayer *top, gpointer vp, const gchar *filename ) | |
586 | { | |
8c060406 | 587 | FILE *f = g_fopen(filename, "w"); |
50a14534 EB |
588 | |
589 | if ( ! f ) | |
590 | return FALSE; | |
591 | ||
592 | file_write ( top, f, vp ); | |
593 | ||
594 | fclose(f); | |
8c060406 | 595 | f = NULL; |
50a14534 EB |
596 | |
597 | return TRUE; | |
598 | } | |
599 | ||
600 | ||
601 | const gchar *a_file_basename ( const gchar *filename ) | |
602 | { | |
603 | const gchar *t = filename + strlen(filename) - 1; | |
604 | while ( --t > filename ) | |
605 | if ( *(t-1) == FILE_SEP ) | |
606 | break; | |
607 | if ( t >= filename ) | |
608 | return t; | |
609 | return filename; | |
610 | } | |
611 | ||
612 | gboolean a_file_export ( VikTrwLayer *vtl, const gchar *filename, gshort file_type ) | |
613 | { | |
8c060406 | 614 | FILE *f = g_fopen ( filename, "w" ); |
50a14534 EB |
615 | if ( f ) |
616 | { | |
617 | if ( file_type == FILE_TYPE_GPSMAPPER ) | |
618 | a_gpsmapper_write_file ( vtl, f ); | |
561e6ad0 EB |
619 | else if ( file_type == FILE_TYPE_GPX ) |
620 | a_gpx_write_file ( vtl, f ); | |
50a14534 EB |
621 | else |
622 | a_gpspoint_write_file ( vtl, f ); | |
623 | fclose ( f ); | |
8c060406 | 624 | f = NULL; |
50a14534 EB |
625 | return TRUE; |
626 | } | |
627 | return FALSE; | |
628 | } | |
80d0ff2b QT |
629 | |
630 | const gchar *a_get_viking_dir() | |
631 | { | |
632 | static gchar *viking_dir = NULL; | |
633 | ||
17a1f8f9 EB |
634 | // TODO: use g_get_user_config_dir ? |
635 | ||
80d0ff2b | 636 | if (!viking_dir) { |
29b41fab | 637 | const gchar *home = g_getenv("HOME"); |
45acf79e | 638 | if (!home || g_access(home, W_OK)) |
29b41fab | 639 | home = g_get_home_dir (); |
eb93fa95 | 640 | #ifdef HAVE_MKDTEMP |
45acf79e | 641 | if (!home || g_access(home, W_OK)) |
eb93fa95 GB |
642 | { |
643 | static gchar temp[] = {"/tmp/vikXXXXXX"}; | |
261c8fdc | 644 | home = mkdtemp(temp); |
eb93fa95 GB |
645 | } |
646 | #endif | |
45acf79e | 647 | if (!home || g_access(home, W_OK)) |
eb93fa95 GB |
648 | /* Fatal error */ |
649 | g_critical("Unable to find a base directory"); | |
29b41fab GB |
650 | |
651 | /* Build the name of the directory */ | |
652 | viking_dir = g_build_filename(home, ".viking", NULL); | |
45acf79e | 653 | if (g_file_test(viking_dir, G_FILE_TEST_EXISTS) == FALSE) |
d5728c65 | 654 | g_mkdir(viking_dir, 0755); |
80d0ff2b QT |
655 | } |
656 | ||
657 | return viking_dir; | |
658 | } |