Parent Directory | Revision Log
New maep and wms fix
1 | /* |
2 | * Copyright (C) 2008 Till Harbaum <till@harbaum.org>. |
3 | * |
4 | * This file is part of OSM2Go. |
5 | * |
6 | * OSM2Go 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 3 of the License, or |
9 | * (at your option) any later version. |
10 | * |
11 | * OSM2Go 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 OSM2Go. If not, see <http://www.gnu.org/licenses/>. |
18 | */ |
19 | |
20 | #include "appdata.h" |
21 | |
22 | #include <libxml/parser.h> |
23 | #include <libxml/tree.h> |
24 | |
25 | #ifndef LIBXML_TREE_ENABLED |
26 | #error "Tree not enabled in libxml" |
27 | #endif |
28 | |
29 | #define WMS_FORMAT_JPG (1<<0) |
30 | #define WMS_FORMAT_JPEG (1<<1) |
31 | #define WMS_FORMAT_PNG (1<<2) |
32 | #define WMS_FORMAT_GIF (1<<3) |
33 | |
34 | typedef struct { |
35 | pos_t min, max; |
36 | gboolean valid; |
37 | } wms_llbbox_t; |
38 | |
39 | typedef struct wms_layer_s { |
40 | char *title; |
41 | char *name; |
42 | char *srs; |
43 | gboolean epsg4326, selected; |
44 | wms_llbbox_t llbbox; |
45 | |
46 | struct wms_layer_s *children; |
47 | struct wms_layer_s *next; |
48 | } wms_layer_t; |
49 | |
50 | typedef struct { |
51 | gulong format; |
52 | } wms_getmap_t; |
53 | |
54 | typedef struct { |
55 | wms_getmap_t *getmap; |
56 | } wms_request_t; |
57 | |
58 | typedef struct { |
59 | char *title; |
60 | } wms_service_t; |
61 | |
62 | typedef struct { |
63 | wms_layer_t *layer; |
64 | wms_request_t *request; |
65 | } wms_cap_t; |
66 | |
67 | typedef struct { |
68 | char *server; |
69 | char *path; |
70 | gint width, height; |
71 | |
72 | wms_service_t *service; |
73 | wms_cap_t *cap; |
74 | } wms_t; |
75 | |
76 | gboolean xmlTextIs(xmlDocPtr doc, xmlNodePtr list, char *str) { |
77 | char *nstr = (char*)xmlNodeListGetString(doc, list, 1); |
78 | if(!nstr) return FALSE; |
79 | |
80 | gboolean match = (strcmp(str, nstr) == 0); |
81 | xmlFree(nstr); |
82 | return match; |
83 | } |
84 | |
85 | gboolean xmlPropIs(xmlNode *node, char *prop, char *str) { |
86 | char *prop_str = (char*)xmlGetProp(node, BAD_CAST prop); |
87 | if(!prop_str) return FALSE; |
88 | |
89 | gboolean match = (strcmp(prop_str, str) == 0); |
90 | xmlFree(prop_str); |
91 | return match; |
92 | } |
93 | |
94 | float xmlGetPropFloat(xmlNode *node, char *prop) { |
95 | char *prop_str = (char*)xmlGetProp(node, BAD_CAST prop); |
96 | if(!prop_str) return NAN; |
97 | |
98 | float retval = g_ascii_strtod(prop_str, NULL); |
99 | xmlFree(prop_str); |
100 | return retval; |
101 | } |
102 | |
103 | static gboolean wms_bbox_is_valid(pos_t *min, pos_t *max) { |
104 | /* all four coordinates are valid? */ |
105 | if(isnan(min->lat)||isnan(min->lon)||isnan(max->lat)||isnan(max->lon)) |
106 | return FALSE; |
107 | |
108 | /* min/max span a useful range? */ |
109 | if(max->lat - min->lat < 0.1) return FALSE; |
110 | if(max->lon - min->lon < 0.1) return FALSE; |
111 | |
112 | /* useful angles? */ |
113 | if(min->lat > 90.0 || min->lat < -90.0) return FALSE; |
114 | if(max->lat > 90.0 || max->lat < -90.0) return FALSE; |
115 | if(min->lon > 180.0 || min->lon < -180.0) return FALSE; |
116 | if(max->lon > 180.0 || max->lon < -180.0) return FALSE; |
117 | |
118 | return TRUE; |
119 | } |
120 | |
121 | static wms_layer_t *wms_cap_parse_layer(xmlDocPtr doc, xmlNode *a_node) { |
122 | wms_layer_t *wms_layer = NULL; |
123 | xmlNode *cur_node = NULL; |
124 | char *str = NULL; |
125 | |
126 | wms_layer = g_new0(wms_layer_t, 1); |
127 | wms_layer->llbbox.min.lon = wms_layer->llbbox.min.lat = NAN; |
128 | wms_layer->llbbox.max.lon = wms_layer->llbbox.max.lat = NAN; |
129 | |
130 | wms_layer_t **children = &(wms_layer->children); |
131 | |
132 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
133 | if (cur_node->type == XML_ELEMENT_NODE) { |
134 | if(strcasecmp((char*)cur_node->name, "Layer") == 0) { |
135 | *children = wms_cap_parse_layer(doc, cur_node); |
136 | if(*children) children = &((*children)->next); |
137 | } else if(strcasecmp((char*)cur_node->name, "Name") == 0) { |
138 | str = (char*)xmlNodeListGetString(doc, cur_node->children, 1); |
139 | wms_layer->name = g_strdup(str); |
140 | xmlFree(str); |
141 | } else if(strcasecmp((char*)cur_node->name, "Title") == 0) { |
142 | str = (char*)xmlNodeListGetString(doc, cur_node->children, 1); |
143 | wms_layer->title = g_strdup(str); |
144 | xmlFree(str); |
145 | } else if(strcasecmp((char*)cur_node->name, "SRS") == 0) { |
146 | str = (char*)xmlNodeListGetString(doc, cur_node->children, 1); |
147 | wms_layer->srs = g_strdup(str); |
148 | xmlFree(str); |
149 | |
150 | printf("SRS = %s\n", wms_layer->srs); |
151 | |
152 | if(strcmp(wms_layer->srs, "EPSG:4326") == 0) |
153 | wms_layer->epsg4326 = TRUE; |
154 | |
155 | } else if(strcasecmp((char*)cur_node->name, "LatLonBoundingBox") == 0) { |
156 | wms_layer->llbbox.min.lat = xmlGetPropFloat(cur_node, "miny"); |
157 | wms_layer->llbbox.min.lon = xmlGetPropFloat(cur_node, "minx"); |
158 | wms_layer->llbbox.max.lat = xmlGetPropFloat(cur_node, "maxy"); |
159 | wms_layer->llbbox.max.lon = xmlGetPropFloat(cur_node, "maxx"); |
160 | } else |
161 | printf("found unhandled WMT_MS_Capabilities/Capability/Layer/%s\n", |
162 | cur_node->name); |
163 | } |
164 | } |
165 | |
166 | wms_layer->llbbox.valid = wms_bbox_is_valid(&wms_layer->llbbox.min, |
167 | &wms_layer->llbbox.max); |
168 | |
169 | printf("------------------- Layer: %s ---------------------------\n", |
170 | wms_layer->title); |
171 | printf("Name: %s\n", wms_layer->name); |
172 | printf("EPSG-4326: %s\n", wms_layer->epsg4326?"yes":"no"); |
173 | if(wms_layer->llbbox.valid) |
174 | printf("LatLonBBox: %f/%f %f/%f\n", |
175 | wms_layer->llbbox.min.lat, wms_layer->llbbox.min.lon, |
176 | wms_layer->llbbox.max.lat, wms_layer->llbbox.max.lon); |
177 | else |
178 | printf("No/invalid LatLonBBox\n"); |
179 | |
180 | return wms_layer; |
181 | } |
182 | |
183 | static wms_getmap_t *wms_cap_parse_getmap(xmlDocPtr doc, xmlNode *a_node) { |
184 | wms_getmap_t *wms_getmap = NULL; |
185 | xmlNode *cur_node = NULL; |
186 | |
187 | wms_getmap = g_new0(wms_getmap_t, 1); |
188 | |
189 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
190 | if (cur_node->type == XML_ELEMENT_NODE) { |
191 | if(strcasecmp((char*)cur_node->name, "Format") == 0) { |
192 | if(xmlTextIs(doc, cur_node->children, "image/png")) |
193 | wms_getmap->format |= WMS_FORMAT_PNG; |
194 | if(xmlTextIs(doc, cur_node->children, "image/gif")) |
195 | wms_getmap->format |= WMS_FORMAT_GIF; |
196 | if(xmlTextIs(doc, cur_node->children, "image/jpg")) |
197 | wms_getmap->format |= WMS_FORMAT_JPG; |
198 | if(xmlTextIs(doc, cur_node->children, "image/jpeg")) |
199 | wms_getmap->format |= WMS_FORMAT_JPEG; |
200 | } else |
201 | printf("found unhandled " |
202 | "WMT_MS_Capabilities/Capability/Request/GetMap/%s\n", |
203 | cur_node->name); |
204 | } |
205 | } |
206 | |
207 | printf("Supported formats: %s%s%s\n", |
208 | (wms_getmap->format & WMS_FORMAT_PNG)?"png ":"", |
209 | (wms_getmap->format & WMS_FORMAT_GIF)?"gif ":"", |
210 | (wms_getmap->format & (WMS_FORMAT_JPG | WMS_FORMAT_JPEG))?"jpg ":""); |
211 | return wms_getmap; |
212 | } |
213 | |
214 | static wms_request_t *wms_cap_parse_request(xmlDocPtr doc, xmlNode *a_node) { |
215 | wms_request_t *wms_request = NULL; |
216 | xmlNode *cur_node = NULL; |
217 | |
218 | wms_request = g_new0(wms_request_t, 1); |
219 | |
220 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
221 | if (cur_node->type == XML_ELEMENT_NODE) { |
222 | if(strcasecmp((char*)cur_node->name, "GetMap") == 0) { |
223 | wms_request->getmap = wms_cap_parse_getmap(doc, cur_node); |
224 | } else |
225 | printf("found unhandled WMT_MS_Capabilities/Capability/Request/%s\n", |
226 | cur_node->name); |
227 | } |
228 | } |
229 | |
230 | return wms_request; |
231 | } |
232 | |
233 | static wms_cap_t *wms_cap_parse_cap(xmlDocPtr doc, xmlNode *a_node) { |
234 | wms_cap_t *wms_cap = NULL; |
235 | xmlNode *cur_node = NULL; |
236 | |
237 | wms_cap = g_new0(wms_cap_t, 1); |
238 | wms_layer_t **layer = &(wms_cap->layer); |
239 | |
240 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
241 | if (cur_node->type == XML_ELEMENT_NODE) { |
242 | if(strcasecmp((char*)cur_node->name, "Request") == 0) { |
243 | wms_cap->request = wms_cap_parse_request(doc, cur_node); |
244 | } else if(strcasecmp((char*)cur_node->name, "Layer") == 0) { |
245 | *layer = wms_cap_parse_layer(doc, cur_node); |
246 | if(*layer) layer = &((*layer)->next); |
247 | } else |
248 | printf("found unhandled WMT_MS_Capabilities/Capability/%s\n", |
249 | cur_node->name); |
250 | } |
251 | } |
252 | |
253 | return wms_cap; |
254 | } |
255 | |
256 | static wms_service_t *wms_cap_parse_service(xmlDocPtr doc, xmlNode *a_node) { |
257 | wms_service_t *wms_service = NULL; |
258 | xmlNode *cur_node = NULL; |
259 | char *str = NULL; |
260 | |
261 | wms_service = g_new0(wms_service_t, 1); |
262 | |
263 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
264 | if (cur_node->type == XML_ELEMENT_NODE) { |
265 | if(strcasecmp((char*)cur_node->name, "title") == 0) { |
266 | str = (char*)xmlNodeListGetString(doc, cur_node->children, 1); |
267 | wms_service->title = g_strdup(str); |
268 | xmlFree(str); |
269 | } else |
270 | printf("found unhandled WMT_MS_Capabilities/Service/%s\n", |
271 | cur_node->name); |
272 | } |
273 | } |
274 | |
275 | printf("-- Service --\n"); |
276 | printf("Title: %s\n", wms_service->title); |
277 | |
278 | return wms_service; |
279 | } |
280 | |
281 | static void wms_cap_parse(wms_t *wms, xmlDocPtr doc, xmlNode *a_node) { |
282 | xmlNode *cur_node = NULL; |
283 | |
284 | for (cur_node = a_node->children; cur_node; cur_node = cur_node->next) { |
285 | if (cur_node->type == XML_ELEMENT_NODE) { |
286 | |
287 | if(strcasecmp((char*)cur_node->name, "Service") == 0) { |
288 | if(!wms->service) |
289 | wms->service = wms_cap_parse_service(doc, cur_node); |
290 | } else if(strcasecmp((char*)cur_node->name, "Capability") == 0) { |
291 | if(!wms->cap) |
292 | wms->cap = wms_cap_parse_cap(doc, cur_node); |
293 | } else |
294 | printf("found unhandled WMT_MS_Capabilities/%s\n", cur_node->name); |
295 | } |
296 | } |
297 | } |
298 | |
299 | /* parse root element */ |
300 | static void wms_cap_parse_root(wms_t *wms, xmlDocPtr doc, xmlNode *a_node) { |
301 | xmlNode *cur_node = NULL; |
302 | |
303 | for (cur_node = a_node; cur_node; cur_node = cur_node->next) { |
304 | if (cur_node->type == XML_ELEMENT_NODE) { |
305 | |
306 | if(strcasecmp((char*)cur_node->name, "WMT_MS_Capabilities") == 0) { |
307 | wms_cap_parse(wms, doc, cur_node); |
308 | } else |
309 | printf("found unhandled %s\n", cur_node->name); |
310 | } |
311 | } |
312 | } |
313 | |
314 | static void wms_cap_parse_doc(wms_t *wms, xmlDocPtr doc) { |
315 | /* Get the root element node */ |
316 | xmlNode *root_element = xmlDocGetRootElement(doc); |
317 | |
318 | wms_cap_parse_root(wms, doc, root_element); |
319 | |
320 | /*free the document */ |
321 | xmlFreeDoc(doc); |
322 | |
323 | /* |
324 | * Free the global variables that may |
325 | * have been allocated by the parser. |
326 | */ |
327 | xmlCleanupParser(); |
328 | } |
329 | |
330 | /* get pixel extent of image display */ |
331 | void wms_setup_extent(project_t *project, wms_t *wms) { |
332 | pos_t center; |
333 | lpos_t lcenter, lmin, lmax; |
334 | float scale; |
335 | |
336 | center.lat = (project->min.lat + project->max.lat)/2; |
337 | center.lon = (project->min.lon + project->max.lon)/2; |
338 | |
339 | pos2lpos_center(¢er, &lcenter); |
340 | |
341 | /* the scale is needed to accomodate for "streching" */ |
342 | /* by the mercartor projection */ |
343 | scale = cos(DEG2RAD(center.lat)); |
344 | |
345 | pos2lpos_center(&project->min, &lmin); |
346 | lmin.x -= lcenter.x; |
347 | lmin.y -= lcenter.y; |
348 | lmin.x *= scale; |
349 | lmin.y *= scale; |
350 | |
351 | pos2lpos_center(&project->max, &lmax); |
352 | lmax.x -= lcenter.x; |
353 | lmax.y -= lcenter.y; |
354 | lmax.x *= scale; |
355 | lmax.y *= scale; |
356 | |
357 | wms->width = lmax.x - lmin.x; |
358 | wms->height = lmax.y - lmin.y; |
359 | |
360 | if(wms->width > 2048) wms->width = 2048; |
361 | if(wms->height > 2048) wms->height = 2048; |
362 | |
363 | printf("WMS: required image size = %dx%d\n", |
364 | wms->width, wms->height); |
365 | } |
366 | |
367 | /* --------------- freeing stuff ------------------- */ |
368 | |
369 | static void wms_layer_free(wms_layer_t *layer) { |
370 | while(layer) { |
371 | |
372 | if(layer->title) g_free(layer->title); |
373 | if(layer->name) g_free(layer->name); |
374 | if(layer->srs) g_free(layer->srs); |
375 | |
376 | if(layer->children) wms_layer_free(layer->children); |
377 | |
378 | wms_layer_t *next = layer->next; |
379 | g_free(layer); |
380 | layer = next; |
381 | } |
382 | } |
383 | |
384 | static void wms_getmap_free(wms_getmap_t *getmap) { |
385 | g_free(getmap); |
386 | } |
387 | |
388 | static void wms_request_free(wms_request_t *request) { |
389 | if(request->getmap) wms_getmap_free(request->getmap); |
390 | g_free(request); |
391 | } |
392 | |
393 | static void wms_cap_free(wms_cap_t *cap) { |
394 | if(cap->layer) wms_layer_free(cap->layer); |
395 | if(cap->request) wms_request_free(cap->request); |
396 | g_free(cap); |
397 | } |
398 | |
399 | static void wms_service_free(wms_service_t *service) { |
400 | if(service->title) g_free(service->title); |
401 | g_free(service); |
402 | } |
403 | |
404 | static void wms_free(wms_t *wms) { |
405 | if(wms->server) g_free(wms->server); |
406 | if(wms->path) g_free(wms->path); |
407 | if(wms->cap) wms_cap_free(wms->cap); |
408 | if(wms->service) wms_service_free(wms->service); |
409 | g_free(wms); |
410 | } |
411 | |
412 | /* ---------------------- use ------------------- */ |
413 | |
414 | static gboolean wms_llbbox_fits(project_t *project, wms_llbbox_t *llbbox) { |
415 | if(!llbbox || !llbbox->valid || |
416 | (project->min.lat < llbbox->min.lat) || |
417 | (project->min.lon < llbbox->min.lon) || |
418 | (project->max.lat > llbbox->max.lat) || |
419 | (project->max.lon > llbbox->max.lon)) |
420 | return FALSE; |
421 | |
422 | return TRUE; |
423 | } |
424 | |
425 | static void wms_get_child_layers(wms_layer_t *layer, |
426 | gint depth, gboolean epsg4326, wms_llbbox_t *llbbox, char *srs, |
427 | wms_layer_t **c_layer) { |
428 | while(layer) { |
429 | |
430 | /* get a copy of the parents values for the current one ... */ |
431 | wms_llbbox_t *local_llbbox = llbbox; |
432 | gboolean local_epsg4326 = epsg4326; |
433 | char *local_srs = srs?g_strdup(srs):NULL; |
434 | |
435 | /* ... and overwrite the inherited stuff with better local stuff */ |
436 | if(layer->llbbox.valid) local_llbbox = &layer->llbbox; |
437 | if(layer->epsg4326) local_epsg4326 = TRUE; |
438 | |
439 | /* only named layers with useful bounding box are added to the list */ |
440 | if(local_llbbox && layer->name) { |
441 | *c_layer = g_new0(wms_layer_t, 1); |
442 | (*c_layer)->name = g_strdup(layer->name); |
443 | (*c_layer)->title = g_strdup(layer->title); |
444 | (*c_layer)->srs = g_strdup(local_srs); |
445 | (*c_layer)->epsg4326 = local_epsg4326; |
446 | (*c_layer)->llbbox = *local_llbbox; |
447 | c_layer = &((*c_layer)->next); |
448 | } |
449 | |
450 | wms_get_child_layers(layer->children, depth+1, |
451 | local_epsg4326, local_llbbox, |
452 | local_srs, c_layer); |
453 | |
454 | if(local_srs) g_free(local_srs); |
455 | layer = layer->next; |
456 | } |
457 | } |
458 | |
459 | static wms_layer_t *wms_get_requestable_layers(wms_t *wms) { |
460 | printf("\nSearching for usable layers\n"); |
461 | |
462 | wms_layer_t *r_layer = NULL, **c_layer = &r_layer; |
463 | |
464 | wms_layer_t *layer = wms->cap->layer; |
465 | while(layer) { |
466 | wms_llbbox_t *llbbox = &layer->llbbox; |
467 | if(llbbox && !llbbox->valid) llbbox = NULL; |
468 | |
469 | wms_get_child_layers(layer->children, 1, |
470 | layer->epsg4326, llbbox, layer->srs, c_layer); |
471 | |
472 | layer = layer->next; |
473 | } |
474 | |
475 | return r_layer; |
476 | } |
477 | |
478 | enum { |
479 | WMS_SERVER_COL_NAME = 0, |
480 | WMS_SERVER_COL_DATA, |
481 | WMS_SERVER_NUM_COLS |
482 | }; |
483 | |
484 | typedef struct { |
485 | appdata_t *appdata; |
486 | wms_t *wms; |
487 | GtkWidget *dialog, *list; |
488 | GtkListStore *store; |
489 | GtkWidget *server_label, *path_label; |
490 | } wms_server_context_t; |
491 | |
492 | static wms_server_t *get_selection(wms_server_context_t *context) { |
493 | GtkTreeSelection *selection; |
494 | GtkTreeModel *model; |
495 | GtkTreeIter iter; |
496 | |
497 | selection = list_get_selection(context->list); |
498 | if(gtk_tree_selection_get_selected(selection, &model, &iter)) { |
499 | wms_server_t *wms_server; |
500 | gtk_tree_model_get(model, &iter, WMS_SERVER_COL_DATA, &wms_server, -1); |
501 | return(wms_server); |
502 | } |
503 | |
504 | return NULL; |
505 | } |
506 | |
507 | static void wms_server_selected(wms_server_context_t *context, |
508 | wms_server_t *selected) { |
509 | |
510 | if(!selected && context->wms->server && context->wms->path) { |
511 | /* if the projects settings match a list entry, then select this */ |
512 | |
513 | GtkTreeSelection *selection = list_get_selection(context->list); |
514 | |
515 | /* walk the entire store to get all values */ |
516 | wms_server_t *server = NULL; |
517 | GtkTreeIter iter; |
518 | |
519 | gboolean valid = |
520 | gtk_tree_model_get_iter_first(GTK_TREE_MODEL(context->store), &iter); |
521 | |
522 | while(valid && !selected) { |
523 | gtk_tree_model_get(GTK_TREE_MODEL(context->store), &iter, |
524 | WMS_SERVER_COL_DATA, &server, -1); |
525 | g_assert(server); |
526 | |
527 | if((strcmp(server->server, context->wms->server) == 0) && |
528 | (strcmp(server->path, context->wms->path) == 0)) { |
529 | gtk_tree_selection_select_iter(selection, &iter); |
530 | selected = server; |
531 | } |
532 | |
533 | valid = gtk_tree_model_iter_next(GTK_TREE_MODEL(context->store), &iter); |
534 | } |
535 | } |
536 | |
537 | list_button_enable(context->list, LIST_BUTTON_REMOVE, selected != NULL); |
538 | list_button_enable(context->list, LIST_BUTTON_EDIT, selected != NULL); |
539 | |
540 | /* user can click ok if a entry is selected or if both fields are */ |
541 | /* otherwise valid */ |
542 | if(selected) { |
543 | gtk_dialog_set_response_sensitive(GTK_DIALOG(context->dialog), |
544 | GTK_RESPONSE_ACCEPT, TRUE); |
545 | |
546 | gtk_label_set_text(GTK_LABEL(context->server_label), selected->server); |
547 | gtk_label_set_text(GTK_LABEL(context->path_label), selected->path); |
548 | } else { |
549 | gtk_dialog_set_response_sensitive(GTK_DIALOG(context->dialog), |
550 | GTK_RESPONSE_ACCEPT, context->wms->server && context->wms->path); |
551 | |
552 | if(context->wms->server) |
553 | gtk_label_set_text(GTK_LABEL(context->server_label), |
554 | context->wms->server); |
555 | if(context->wms->path) |
556 | gtk_label_set_text(GTK_LABEL(context->path_label), |
557 | context->wms->path); |
558 | } |
559 | } |
560 | |
561 | static void |
562 | wms_server_changed(GtkTreeSelection *selection, gpointer userdata) { |
563 | wms_server_context_t *context = (wms_server_context_t*)userdata; |
564 | |
565 | GtkTreeModel *model = NULL; |
566 | GtkTreeIter iter; |
567 | |
568 | if(gtk_tree_selection_get_selected(selection, &model, &iter)) { |
569 | wms_server_t *wms_server = NULL; |
570 | |
571 | gtk_tree_model_get(model, &iter, WMS_SERVER_COL_DATA, &wms_server, -1); |
572 | wms_server_selected(context, wms_server); |
573 | } |
574 | } |
575 | |
576 | static void on_server_remove(GtkWidget *but, wms_server_context_t *context) { |
577 | GtkTreeSelection *selection; |
578 | GtkTreeModel *model; |
579 | GtkTreeIter iter; |
580 | |
581 | selection = list_get_selection(context->list); |
582 | if(gtk_tree_selection_get_selected(selection, &model, &iter)) { |
583 | wms_server_t *server = NULL; |
584 | gtk_tree_model_get(model, &iter, WMS_SERVER_COL_DATA, &server, -1); |
585 | |
586 | g_assert(server); |
587 | |
588 | /* de-chain */ |
589 | printf("de-chaining server %s\n", server->name); |
590 | wms_server_t **prev = &context->appdata->settings->wms_server; |
591 | while(*prev != server) prev = &((*prev)->next); |
592 | *prev = server->next; |
593 | |
594 | /* free tag itself */ |
595 | wms_server_free(server); |
596 | |
597 | /* and remove from store */ |
598 | gtk_list_store_remove(GTK_LIST_STORE(model), &iter); |
599 | } |
600 | |
601 | wms_server_selected(context, NULL); |
602 | } |
603 | |
604 | static void callback_modified_name(GtkWidget *widget, gpointer data) { |
605 | wms_server_context_t *context = (wms_server_context_t*)data; |
606 | |
607 | char *name = (char*)gtk_entry_get_text(GTK_ENTRY(widget)); |
608 | |
609 | /* name must not contain some special chars */ |
610 | gboolean ok = TRUE; |
611 | |
612 | /* search all entries except the last (which is the one we are editing) */ |
613 | wms_server_t *server = context->appdata->settings->wms_server; |
614 | while(server && server->next) { |
615 | if(strcasecmp(server->name, name) == 0) ok = FALSE; |
616 | server = server->next; |
617 | } |
618 | |
619 | GtkWidget *toplevel = gtk_widget_get_toplevel(widget); |
620 | /* toplevel is a dialog only of dialog has been realized */ |
621 | if(GTK_IS_DIALOG(toplevel)) |
622 | gtk_dialog_set_response_sensitive( |
623 | GTK_DIALOG(gtk_widget_get_toplevel(widget)), |
624 | GTK_RESPONSE_ACCEPT, ok); |
625 | } |
626 | |
627 | /* edit url and path of a given wms server entry */ |
628 | gboolean wms_server_edit(wms_server_context_t *context, gboolean edit_name, |
629 | wms_server_t *wms_server) { |
630 | GtkWidget *dialog = |
631 | misc_dialog_new(MISC_DIALOG_WIDE, _("Edit WMS Server"), |
632 | GTK_WINDOW(context->dialog), |
633 | GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT, |
634 | GTK_STOCK_OK, GTK_RESPONSE_ACCEPT, |
635 | NULL); |
636 | |
637 | gtk_dialog_set_default_response(GTK_DIALOG(dialog), |
638 | GTK_RESPONSE_ACCEPT); |
639 | |
640 | GtkWidget *label, *name, *server, *path; |
641 | GtkWidget *table = gtk_table_new(2, 3, FALSE); |
642 | |
643 | gtk_table_attach(GTK_TABLE(table), |
644 | label = gtk_label_new(_("Name:")), 0, 1, 0, 1, |
645 | GTK_FILL, 0, 0, 0); |
646 | gtk_misc_set_alignment(GTK_MISC(label), 0.f, 0.5f); |
647 | gtk_table_attach_defaults(GTK_TABLE(table), |
648 | name = entry_new(), 1, 2, 0, 1); |
649 | gtk_entry_set_activates_default(GTK_ENTRY(name), TRUE); |
650 | HILDON_ENTRY_NO_AUTOCAP(name); |
651 | gtk_widget_set_sensitive(GTK_WIDGET(name), edit_name); |
652 | g_signal_connect(G_OBJECT(name), "changed", |
653 | G_CALLBACK(callback_modified_name), context); |
654 | |
655 | gtk_table_attach(GTK_TABLE(table), |
656 | label = gtk_label_new(_("Server:")), 0, 1, 1, 2, |
657 | GTK_FILL, 0, 0, 0); |
658 | gtk_misc_set_alignment(GTK_MISC(label), 0.f, 0.5f); |
659 | gtk_table_attach_defaults(GTK_TABLE(table), |
660 | server = entry_new(), 1, 2, 1, 2); |
661 | gtk_entry_set_activates_default(GTK_ENTRY(server), TRUE); |
662 | HILDON_ENTRY_NO_AUTOCAP(server); |
663 | |
664 | gtk_table_attach(GTK_TABLE(table), |
665 | label = gtk_label_new(_("Path:")), 0, 1, 2, 3, |
666 | GTK_FILL, 0, 0, 0); |
667 | gtk_misc_set_alignment(GTK_MISC(label), 0.f, 0.5f); |
668 | gtk_table_attach_defaults(GTK_TABLE(table), |
669 | path = entry_new(), 1, 2, 2, 3); |
670 | gtk_entry_set_activates_default(GTK_ENTRY(path), TRUE); |
671 | HILDON_ENTRY_NO_AUTOCAP(path); |
672 | |
673 | gtk_entry_set_text(GTK_ENTRY(name), wms_server->name); |
674 | gtk_entry_set_text(GTK_ENTRY(server), wms_server->server); |
675 | gtk_entry_set_text(GTK_ENTRY(path), wms_server->path); |
676 | |
677 | gtk_box_pack_start_defaults(GTK_BOX(GTK_DIALOG(dialog)->vbox), table); |
678 | |
679 | gtk_widget_show_all(dialog); |
680 | |
681 | if(GTK_RESPONSE_ACCEPT == gtk_dialog_run(GTK_DIALOG(dialog))) { |
682 | if(edit_name) { |
683 | GtkTreeSelection *selection; |
684 | GtkTreeModel *model; |
685 | GtkTreeIter iter; |
686 | selection = list_get_selection(context->list); |
687 | gtk_tree_selection_get_selected(selection, &model, &iter); |
688 | gtk_list_store_set(context->store, &iter, |
689 | WMS_SERVER_COL_NAME, wms_server->name, |
690 | -1); |
691 | |
692 | g_free(wms_server->name); |
693 | wms_server->name = strdup((char*)gtk_entry_get_text(GTK_ENTRY(name))); |
694 | } |
695 | |
696 | g_free(wms_server->server); |
697 | wms_server->server = strdup((char*)gtk_entry_get_text(GTK_ENTRY(server))); |
698 | g_free(wms_server->path); |
699 | wms_server->path = strdup((char*)gtk_entry_get_text(GTK_ENTRY(path))); |
700 | printf("setting %s/%s\n", wms_server->server, wms_server->path); |
701 | |
702 | /* set texts below */ |
703 | gtk_label_set_text(GTK_LABEL(context->server_label), wms_server->server); |
704 | gtk_label_set_text(GTK_LABEL(context->path_label), wms_server->path); |
705 | |
706 | gtk_widget_destroy(dialog); |
707 | |
708 | return TRUE; |
709 | } |
710 | |
711 | gtk_widget_destroy(dialog); |
712 | return FALSE; |
713 | } |
714 | |
715 | /* user clicked "edit..." button in the wms server list */ |
716 | static void on_server_edit(GtkWidget *but, wms_server_context_t *context) { |
717 | GtkTreeSelection *selection; |
718 | GtkTreeModel *model; |
719 | GtkTreeIter iter; |
720 | |
721 | selection = list_get_selection(context->list); |
722 | if(gtk_tree_selection_get_selected(selection, &model, &iter)) { |
723 | wms_server_t *server = NULL; |
724 | gtk_tree_model_get(model, &iter, WMS_SERVER_COL_DATA, &server, -1); |
725 | g_assert(server); |
726 | |
727 | wms_server_edit(context, FALSE, server); |
728 | } |
729 | } |
730 | |
731 | /* user clicked "add..." button in the wms server list */ |
732 | static void on_server_add(GtkWidget *but, wms_server_context_t *context) { |
733 | |
734 | /* attach a new server item to the chain */ |
735 | wms_server_t **prev = &context->appdata->settings->wms_server; |
736 | while(*prev) prev = &(*prev)->next; |
737 | |
738 | *prev = g_new0(wms_server_t, 1); |
739 | (*prev)->name = g_strdup("<service name>"); |
740 | (*prev)->server = g_strdup("<server url>"); |
741 | (*prev)->path = g_strdup("<path in server>"); |
742 | |
743 | GtkTreeModel *model = list_get_model(context->list); |
744 | |
745 | GtkTreeIter iter; |
746 | gtk_list_store_append(GTK_LIST_STORE(model), &iter); |
747 | gtk_list_store_set(GTK_LIST_STORE(model), &iter, |
748 | WMS_SERVER_COL_NAME, (*prev)->name, |
749 | WMS_SERVER_COL_DATA, *prev, |
750 | -1); |
751 | |
752 | GtkTreeSelection *selection = list_get_selection(context->list); |
753 | gtk_tree_selection_select_iter(selection, &iter); |
754 | |
755 | if(!wms_server_edit(context, TRUE, *prev)) { |
756 | /* user has cancelled request. remove newly added item */ |
757 | printf("user clicked cancel\n"); |
758 | |
759 | wms_server_free(*prev); |
760 | *prev = NULL; |
761 | |
762 | gtk_list_store_remove(GTK_LIST_STORE(model), &iter); |
763 | } else |
764 | /* update name from edit result */ |
765 | gtk_list_store_set(GTK_LIST_STORE(model), &iter, |
766 | WMS_SERVER_COL_NAME, (*prev)->name, |
767 | -1); |
768 | |
769 | wms_server_selected(context, *prev); |
770 | } |
771 | |
772 | /* widget to select a wms server from a list */ |
773 | static GtkWidget *wms_server_widget(wms_server_context_t *context) { |
774 | |
775 | context->list = list_new(LIST_HILDON_WITHOUT_HEADERS); |
776 | |
777 | list_override_changed_event(context->list, wms_server_changed, context); |
778 | |
779 | list_set_columns(context->list, |
780 | _("Name"), WMS_SERVER_COL_NAME, LIST_FLAG_ELLIPSIZE, |
781 | NULL); |
782 | |
783 | /* build and fill the store */ |
784 | context->store = gtk_list_store_new(WMS_SERVER_NUM_COLS, |
785 | G_TYPE_STRING, G_TYPE_POINTER); |
786 | |
787 | list_set_store(context->list, context->store); |
788 | |
789 | GtkTreeIter iter; |
790 | wms_server_t *wms_server = context->appdata->settings->wms_server; |
791 | while(wms_server) { |
792 | /* Append a row and fill in some data */ |
793 | gtk_list_store_append(context->store, &iter); |
794 | gtk_list_store_set(context->store, &iter, |
795 | WMS_SERVER_COL_NAME, wms_server->name, |
796 | WMS_SERVER_COL_DATA, wms_server, |
797 | -1); |
798 | |
799 | wms_server = wms_server->next; |
800 | } |
801 | |
802 | g_object_unref(context->store); |
803 | |
804 | list_set_static_buttons(context->list, 0, |
805 | G_CALLBACK(on_server_add), G_CALLBACK(on_server_edit), |
806 | G_CALLBACK(on_server_remove), context); |
807 | |
808 | return context->list; |
809 | } |
810 | |
811 | static gboolean wms_server_dialog(appdata_t *appdata, wms_t *wms) { |
812 | gboolean ok = FALSE; |
813 | |
814 | wms_server_context_t *context = g_new0(wms_server_context_t, 1); |
815 | context->appdata = appdata; |
816 | context->wms = wms; |
817 | |
818 | context->dialog = |
819 | misc_dialog_new(MISC_DIALOG_MEDIUM, _("WMS Server Selection"), |
820 | GTK_WINDOW(appdata->window), |
821 | GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT, |
822 | GTK_STOCK_OK, GTK_RESPONSE_ACCEPT, |
823 | NULL); |
824 | |
825 | /* server selection box */ |
826 | gtk_box_pack_start_defaults(GTK_BOX(GTK_DIALOG(context->dialog)->vbox), |
827 | wms_server_widget(context)); |
828 | |
829 | gtk_box_pack_start(GTK_BOX(GTK_DIALOG(context->dialog)->vbox), |
830 | gtk_hseparator_new(), FALSE, FALSE, 0); |
831 | |
832 | GtkWidget *label; |
833 | GtkWidget *table = gtk_table_new(2, 2, FALSE); // x, y |
834 | gtk_table_set_col_spacing(GTK_TABLE(table), 0, 10); |
835 | |
836 | label = gtk_label_new(_("Server:")); |
837 | gtk_misc_set_alignment(GTK_MISC(label), 0.f, 0.5f); |
838 | gtk_table_attach(GTK_TABLE(table), label, 0, 1, 0, 1, GTK_FILL, 0,0,0); |
839 | context->server_label = gtk_label_new(""); |
840 | gtk_label_set_ellipsize(GTK_LABEL(context->server_label), |
841 | PANGO_ELLIPSIZE_MIDDLE); |
842 | gtk_misc_set_alignment(GTK_MISC(context->server_label), 0.f, 0.5f); |
843 | gtk_table_attach_defaults(GTK_TABLE(table), context->server_label, |
844 | 1, 2, 0, 1); |
845 | |
846 | label = gtk_label_new(_("Path:")); |
847 | gtk_misc_set_alignment(GTK_MISC(label), 0.f, 0.5f); |
848 | gtk_table_attach(GTK_TABLE(table), label, 0, 1, 1, 2, GTK_FILL, 0,0,0); |
849 | context->path_label = gtk_label_new(""); |
850 | gtk_label_set_ellipsize(GTK_LABEL(context->path_label), |
851 | PANGO_ELLIPSIZE_MIDDLE); |
852 | gtk_misc_set_alignment(GTK_MISC(context->path_label), 0.f, 0.5f); |
853 | gtk_table_attach_defaults(GTK_TABLE(table), context->path_label, |
854 | 1, 2, 1, 2); |
855 | |
856 | gtk_box_pack_start(GTK_BOX(GTK_DIALOG(context->dialog)->vbox), |
857 | table, FALSE, FALSE, 0); |
858 | |
859 | |
860 | wms_server_selected(context, NULL); |
861 | |
862 | gtk_widget_show_all(context->dialog); |
863 | |
864 | if(GTK_RESPONSE_ACCEPT == gtk_dialog_run(GTK_DIALOG(context->dialog))) { |
865 | wms_server_t *server = get_selection(context); |
866 | if(server) { |
867 | /* fetch parameters from selected entry */ |
868 | printf("WMS: using %s\n", server->name); |
869 | if(wms->server) g_free(wms->server); |
870 | wms->server = g_strdup(server->server); |
871 | if(wms->path) g_free(wms->path); |
872 | wms->path = g_strdup(server->path); |
873 | ok = TRUE; |
874 | } else { |
875 | if(wms->server && wms->path) |
876 | ok = TRUE; |
877 | |
878 | } |
879 | } |
880 | |
881 | gtk_widget_destroy(context->dialog); |
882 | |
883 | g_free(context); |
884 | return ok; |
885 | } |
886 | |
887 | enum { |
888 | LAYER_COL_TITLE = 0, |
889 | LAYER_COL_FITS, |
890 | LAYER_COL_DATA, |
891 | LAYER_NUM_COLS |
892 | }; |
893 | |
894 | #ifndef FREMANTLE |
895 | /* we handle these events on our own in order to implement */ |
896 | /* a very direct selection mechanism (multiple selections usually */ |
897 | /* require the control key to be pressed). This interferes with */ |
898 | /* fremantle finger scrolling, but fortunately the fremantle */ |
899 | /* default behaviour already is what we want. */ |
900 | static gboolean on_view_clicked(GtkWidget *widget, GdkEventButton *event, |
901 | gpointer user_data) { |
902 | if(event->window == gtk_tree_view_get_bin_window(GTK_TREE_VIEW(widget))) { |
903 | GtkTreePath *path; |
904 | |
905 | if(gtk_tree_view_get_path_at_pos(GTK_TREE_VIEW(widget), |
906 | event->x, event->y, &path, NULL, NULL, NULL)) { |
907 | GtkTreeSelection *sel = |
908 | gtk_tree_view_get_selection(GTK_TREE_VIEW(widget)); |
909 | |
910 | if(!gtk_tree_selection_path_is_selected(sel, path)) |
911 | gtk_tree_selection_select_path(sel, path); |
912 | else |
913 | gtk_tree_selection_unselect_path(sel, path); |
914 | } |
915 | return TRUE; |
916 | } |
917 | return FALSE; |
918 | } |
919 | #endif |
920 | |
921 | static void changed(GtkTreeSelection *sel, gpointer user_data) { |
922 | /* we need to know what changed in order to let the user acknowlege it! */ |
923 | |
924 | /* get view from selection ... */ |
925 | GtkTreeView *view = gtk_tree_selection_get_tree_view(sel); |
926 | g_assert(view); |
927 | |
928 | /* ... and get model from view */ |
929 | GtkTreeModel *model = gtk_tree_view_get_model(view); |
930 | g_assert(model); |
931 | |
932 | /* walk the entire store */ |
933 | GtkTreeIter iter; |
934 | gboolean one = FALSE, ok = gtk_tree_model_get_iter_first(model, &iter); |
935 | while(ok) { |
936 | wms_layer_t *layer = NULL; |
937 | |
938 | gtk_tree_model_get(model, &iter, LAYER_COL_DATA, &layer, -1); |
939 | g_assert(layer); |
940 | |
941 | layer->selected = gtk_tree_selection_iter_is_selected(sel, &iter); |
942 | if(layer->selected) one = TRUE; |
943 | |
944 | ok = gtk_tree_model_iter_next(model, &iter); |
945 | } |
946 | |
947 | GtkWidget *dialog = gtk_widget_get_toplevel(GTK_WIDGET(view)); |
948 | gtk_dialog_set_response_sensitive(GTK_DIALOG(dialog), |
949 | GTK_RESPONSE_ACCEPT, one); |
950 | } |
951 | |
952 | static GtkWidget *wms_layer_widget(appdata_t *appdata, wms_layer_t *layer, |
953 | GtkWidget *dialog) { |
954 | |
955 | #ifndef FREMANTLE_PANNABLE_AREA |
956 | GtkWidget *view = gtk_tree_view_new(); |
957 | #else |
958 | GtkWidget *view = hildon_gtk_tree_view_new(HILDON_UI_MODE_EDIT); |
959 | #endif |
960 | |
961 | /* change list mode to "multiple" */ |
962 | GtkTreeSelection *selection = |
963 | gtk_tree_view_get_selection(GTK_TREE_VIEW(view)); |
964 | gtk_tree_selection_set_mode(selection, GTK_SELECTION_MULTIPLE); |
965 | |
966 | #ifndef FREMANTLE |
967 | /* catch views button-press event for our custom handling */ |
968 | g_signal_connect(view, "button-press-event", |
969 | G_CALLBACK(on_view_clicked), NULL); |
970 | #endif |
971 | |
972 | /* build the store */ |
973 | GtkListStore *store = gtk_list_store_new(LAYER_NUM_COLS, |
974 | G_TYPE_STRING, G_TYPE_BOOLEAN, G_TYPE_POINTER); |
975 | |
976 | /* --- "Title" column --- */ |
977 | GtkCellRenderer *renderer = gtk_cell_renderer_text_new(); |
978 | g_object_set(renderer, "ellipsize", PANGO_ELLIPSIZE_END, NULL ); |
979 | GtkTreeViewColumn *column = gtk_tree_view_column_new_with_attributes( |
980 | _("Title"), renderer, |
981 | "text", LAYER_COL_TITLE, |
982 | "sensitive", LAYER_COL_FITS, |
983 | NULL); |
984 | |
985 | gtk_tree_view_column_set_expand(column, TRUE); |
986 | gtk_tree_view_insert_column(GTK_TREE_VIEW(view), column, -1); |
987 | |
988 | gtk_tree_view_set_model(GTK_TREE_VIEW(view), GTK_TREE_MODEL(store)); |
989 | |
990 | GtkTreeIter iter; |
991 | while(layer) { |
992 | gboolean fits = wms_llbbox_fits(appdata->project, &layer->llbbox); |
993 | |
994 | /* Append a row and fill in some data */ |
995 | gtk_list_store_append(store, &iter); |
996 | gtk_list_store_set(store, &iter, |
997 | LAYER_COL_TITLE, layer->title, |
998 | LAYER_COL_FITS, fits, |
999 | LAYER_COL_DATA, layer, |
1000 | -1); |
1001 | layer = layer->next; |
1002 | } |
1003 | |
1004 | g_object_unref(store); |
1005 | |
1006 | g_signal_connect(G_OBJECT(selection), "changed", G_CALLBACK(changed), layer); |
1007 | |
1008 | #ifndef FREMANTLE_PANNABLE_AREA |
1009 | /* put it into a scrolled window */ |
1010 | GtkWidget *scrolled_window = gtk_scrolled_window_new(NULL, NULL); |
1011 | gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolled_window), |
1012 | GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC); |
1013 | gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrolled_window), |
1014 | GTK_SHADOW_ETCHED_IN); |
1015 | gtk_container_add(GTK_CONTAINER(scrolled_window), view); |
1016 | return scrolled_window; |
1017 | #else |
1018 | /* put view into a pannable area */ |
1019 | GtkWidget *pannable_area = hildon_pannable_area_new(); |
1020 | gtk_container_add(GTK_CONTAINER(pannable_area), view); |
1021 | return pannable_area; |
1022 | #endif |
1023 | } |
1024 | |
1025 | |
1026 | static gboolean wms_layer_dialog(appdata_t *appdata, wms_layer_t *layer) { |
1027 | gboolean ok = FALSE; |
1028 | |
1029 | GtkWidget *dialog = |
1030 | misc_dialog_new(MISC_DIALOG_LARGE, _("WMS layer selection"), |
1031 | GTK_WINDOW(appdata->window), |
1032 | GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT, |
1033 | GTK_STOCK_OK, GTK_RESPONSE_ACCEPT, |
1034 | NULL); |
1035 | |
1036 | gtk_dialog_set_response_sensitive(GTK_DIALOG(dialog), |
1037 | GTK_RESPONSE_ACCEPT, FALSE); |
1038 | |
1039 | /* layer list */ |
1040 | gtk_box_pack_start_defaults(GTK_BOX(GTK_DIALOG(dialog)->vbox), |
1041 | wms_layer_widget(appdata, layer, dialog)); |
1042 | |
1043 | |
1044 | gtk_widget_show_all(dialog); |
1045 | |
1046 | if(GTK_RESPONSE_ACCEPT == gtk_dialog_run(GTK_DIALOG(dialog))) |
1047 | ok = TRUE; |
1048 | |
1049 | gtk_widget_destroy(dialog); |
1050 | |
1051 | return ok; |
1052 | } |
1053 | |
1054 | static gboolean wms_one_layer_is_usable(project_t *project, |
1055 | wms_layer_t *layer) { |
1056 | gboolean ok = FALSE; |
1057 | |
1058 | while(layer) { |
1059 | if(layer->name && layer->epsg4326 && layer->llbbox.valid) |
1060 | ok = TRUE; |
1061 | |
1062 | printf("----- Layer \"%s\" -----\n", layer->title); |
1063 | printf("Name: %s\n", layer->name); |
1064 | printf("epsg4326: %s\n", layer->epsg4326?"yes":"no"); |
1065 | if(layer->llbbox.valid) { |
1066 | printf("llbbox: %f/%f %f/%f\n", |
1067 | layer->llbbox.min.lat, layer->llbbox.min.lon, |
1068 | layer->llbbox.max.lat, layer->llbbox.max.lon); |
1069 | |
1070 | printf("llbbox fits project: %s\n", |
1071 | wms_llbbox_fits(project, &layer->llbbox)?"yes":"no"); |
1072 | } else |
1073 | printf("llbbox: none/invalid\n"); |
1074 | |
1075 | layer = layer->next; |
1076 | } |
1077 | |
1078 | return ok; |
1079 | } |
1080 | |
1081 | void wms_import(appdata_t *appdata) { |
1082 | if(!appdata->project) { |
1083 | errorf(GTK_WIDGET(appdata->window), |
1084 | _("Need an open project to derive WMS coordinates")); |
1085 | return; |
1086 | } |
1087 | |
1088 | /* this cancels any wms adjustment in progress */ |
1089 | if(appdata->map->action.type == MAP_ACTION_BG_ADJUST) |
1090 | map_action_cancel(appdata); |
1091 | |
1092 | wms_t *wms = g_new0(wms_t,1); |
1093 | wms->server = g_strdup(appdata->project->wms_server); |
1094 | wms->path = g_strdup(appdata->project->wms_path); |
1095 | |
1096 | /* reset any background adjustments in the project ... */ |
1097 | if((appdata->project->wms_offset.x != 0)|| |
1098 | (appdata->project->wms_offset.y != 0)) { |
1099 | |
1100 | appdata->project->wms_offset.x = 0; |
1101 | appdata->project->wms_offset.y = 0; |
1102 | } |
1103 | |
1104 | /* ... as well as in the map */ |
1105 | appdata->map->bg.offset.x = 0; |
1106 | appdata->map->bg.offset.y = 0; |
1107 | |
1108 | /* get server from dialog */ |
1109 | if(!wms_server_dialog(appdata, wms)) { |
1110 | wms_free(wms); |
1111 | return; |
1112 | } |
1113 | |
1114 | /* ------------- copy values back into project ---------------- */ |
1115 | if(!appdata->project->wms_server || |
1116 | strcmp(appdata->project->wms_server, wms->server) != 0) { |
1117 | if(appdata->project->wms_server) |
1118 | g_free(appdata->project->wms_server); |
1119 | appdata->project->wms_server = g_strdup(wms->server); |
1120 | } |
1121 | |
1122 | if(!appdata->project->wms_path || |
1123 | strcmp(appdata->project->wms_path, wms->path) != 0) { |
1124 | if(appdata->project->wms_path) |
1125 | g_free(appdata->project->wms_path); |
1126 | appdata->project->wms_path = g_strdup(wms->path); |
1127 | } |
1128 | |
1129 | /* ----------- request capabilities -------------- */ |
1130 | gboolean path_contains_qm = (strchr(wms->path, '?') != NULL); |
1131 | gboolean path_ends_with_special = |
1132 | (wms->path[strlen(wms->path)-1] == '?') || |
1133 | (wms->path[strlen(wms->path)-1] == '&'); |
1134 | |
1135 | /* if there's already a question mark, then add further */ |
1136 | /* parameters using the &, else use the ? */ |
1137 | char *append_char = path_ends_with_special?"":(path_contains_qm?"&":"?"); |
1138 | |
1139 | char *url = g_strdup_printf("%s%s" |
1140 | "%sSERVICE=wms" |
1141 | // "&WMTVER=1.1.1" |
1142 | "&VERSION=1.1.1" |
1143 | "&REQUEST=GetCapabilities", |
1144 | wms->server, wms->path, append_char); |
1145 | |
1146 | char *cap = NULL; |
1147 | net_io_download_mem(GTK_WIDGET(appdata->window), appdata->settings, |
1148 | url, &cap); |
1149 | g_free(url); |
1150 | |
1151 | /* ----------- parse capabilities -------------- */ |
1152 | |
1153 | if(!cap) { |
1154 | errorf(GTK_WIDGET(appdata->window), |
1155 | _("WMS download failed:\n\n" |
1156 | "GetCapabilities failed")); |
1157 | } else { |
1158 | xmlDoc *doc = NULL; |
1159 | |
1160 | LIBXML_TEST_VERSION; |
1161 | |
1162 | /* parse the file and get the DOM */ |
1163 | if((doc = xmlReadMemory(cap, strlen(cap), NULL, NULL, 0)) == NULL) { |
1164 | xmlErrorPtr errP = xmlGetLastError(); |
1165 | errorf(GTK_WIDGET(appdata->window), |
1166 | _("WMS download failed:\n\n" |
1167 | "XML error while parsing capabilities:\n" |
1168 | "%s"), errP->message); |
1169 | } else { |
1170 | printf("ok, parse doc tree\n"); |
1171 | |
1172 | wms_cap_parse_doc(wms, doc); |
1173 | } |
1174 | |
1175 | g_free(cap); |
1176 | } |
1177 | |
1178 | /* ------------ basic checks ------------- */ |
1179 | |
1180 | if(!wms->cap || !wms->service || !wms->cap->layer || |
1181 | !wms->cap->request || !wms->cap->request->getmap) { |
1182 | errorf(GTK_WIDGET(appdata->window), _("Incomplete/unexpected reply!")); |
1183 | wms_free(wms); |
1184 | return; |
1185 | } |
1186 | |
1187 | if(!wms->cap->request->getmap->format) { |
1188 | errorf(GTK_WIDGET(appdata->window), _("No supported image format found.")); |
1189 | wms_free(wms); |
1190 | return; |
1191 | } |
1192 | |
1193 | /* ---------- evaluate layers ----------- */ |
1194 | |
1195 | wms_layer_t *layer = wms_get_requestable_layers(wms); |
1196 | gboolean at_least_one_ok = wms_one_layer_is_usable(appdata->project, layer); |
1197 | |
1198 | if(!at_least_one_ok) { |
1199 | errorf(GTK_WIDGET(appdata->window), |
1200 | _("Server provides no data in the required format!\n\n" |
1201 | "(epsg4326 and LatLonBoundingBox are mandatory for osm2go)")); |
1202 | #if 0 |
1203 | wms_layer_free(layer); |
1204 | wms_free(wms); |
1205 | return; |
1206 | #endif |
1207 | } |
1208 | |
1209 | if(!wms_layer_dialog(appdata, layer)) { |
1210 | wms_layer_free(layer); |
1211 | wms_free(wms); |
1212 | return; |
1213 | } |
1214 | |
1215 | /* --------- build getmap request ----------- */ |
1216 | |
1217 | /* get required image size */ |
1218 | wms_setup_extent(appdata->project, wms); |
1219 | |
1220 | /* start building url */ |
1221 | url = g_strdup_printf("%s%s" |
1222 | "%sSERVICE=wms" |
1223 | // "&WMTVER=1.1.1" |
1224 | "&VERSION=1.1.1" |
1225 | "&REQUEST=GetMap" |
1226 | "&LAYERS=", |
1227 | wms->server, wms->path, append_char); |
1228 | |
1229 | /* append layers */ |
1230 | char *old; |
1231 | wms_layer_t *t = layer; |
1232 | gint cnt = 0; |
1233 | while(t) { |
1234 | if(t->selected) { |
1235 | old = url; |
1236 | url = g_strconcat(url, (!cnt)?"":",", t->name, NULL); |
1237 | g_free(old); |
1238 | cnt++; |
1239 | } |
1240 | t = t->next; |
1241 | } |
1242 | |
1243 | /* uses epsg4326 if possible */ |
1244 | char *srs = NULL; |
1245 | if(layer->epsg4326) |
1246 | srs = g_strdup("EPSG:4326"); |
1247 | else if(layer->srs) |
1248 | srs = g_strdup(layer->srs); |
1249 | |
1250 | wms_layer_free(layer); |
1251 | |
1252 | /* append styles entry */ |
1253 | old = url; |
1254 | url = g_strconcat(url, "&STYLES=", NULL); |
1255 | g_free(old); |
1256 | |
1257 | while(--cnt) { |
1258 | old = url; |
1259 | url = g_strconcat(url, ",", NULL); |
1260 | g_free(old); |
1261 | } |
1262 | |
1263 | /* and append rest */ |
1264 | char minlon[G_ASCII_DTOSTR_BUF_SIZE], minlat[G_ASCII_DTOSTR_BUF_SIZE]; |
1265 | char maxlon[G_ASCII_DTOSTR_BUF_SIZE], maxlat[G_ASCII_DTOSTR_BUF_SIZE]; |
1266 | |
1267 | /* build strings of min and max lat and lon to be used in url */ |
1268 | g_ascii_formatd(minlon, sizeof(minlon), LL_FORMAT, |
1269 | appdata->project->min.lon); |
1270 | g_ascii_formatd(minlat, sizeof(minlat), LL_FORMAT, |
1271 | appdata->project->min.lat); |
1272 | g_ascii_formatd(maxlon, sizeof(maxlon), LL_FORMAT, |
1273 | appdata->project->max.lon); |
1274 | g_ascii_formatd(maxlat, sizeof(maxlat), LL_FORMAT, |
1275 | appdata->project->max.lat); |
1276 | |
1277 | /* find preferred supported video format */ |
1278 | gint format = 0; |
1279 | while(!(wms->cap->request->getmap->format & (1<<format))) |
1280 | format++; |
1281 | |
1282 | const char *formats[] = { "image/jpg", "image/jpeg", |
1283 | "image/png", "image/gif" }; |
1284 | |
1285 | /* build complete url */ |
1286 | old = url; |
1287 | |
1288 | url = g_strdup_printf("%s&SRS=%s&BBOX=%s,%s,%s,%s" |
1289 | "&WIDTH=%d&HEIGHT=%d&FORMAT=%s" |
1290 | "&reaspect=false", url, srs, |
1291 | minlon, minlat, maxlon, maxlat, wms->width, |
1292 | wms->height, formats[format]); |
1293 | if(srs) g_free(srs); |
1294 | g_free(old); |
1295 | |
1296 | const char *exts[] = { "jpg", "jpg", "png", "gif" }; |
1297 | char *filename = g_strdup_printf("%s/wms.%s", appdata->project->path, |
1298 | exts[format]); |
1299 | |
1300 | |
1301 | /* remove any existing image before */ |
1302 | wms_remove(appdata); |
1303 | |
1304 | if(!net_io_download_file(GTK_WIDGET(appdata->window), appdata->settings, |
1305 | url, filename)) { |
1306 | g_free(filename); |
1307 | g_free(url); |
1308 | wms_free(wms); |
1309 | return; |
1310 | } |
1311 | |
1312 | /* there should be a matching file on disk now */ |
1313 | map_set_bg_image(appdata->map, filename); |
1314 | |
1315 | gint x = appdata->osm->bounds->min.x + appdata->map->bg.offset.x; |
1316 | gint y = appdata->osm->bounds->min.y + appdata->map->bg.offset.y; |
1317 | canvas_image_move(appdata->map->bg.item, x, y, |
1318 | appdata->map->bg.scale.x, appdata->map->bg.scale.y); |
1319 | |
1320 | |
1321 | g_free(filename); |
1322 | g_free(url); |
1323 | |
1324 | /* --------- free wms structure -----------------*/ |
1325 | wms_free(wms); |
1326 | |
1327 | gtk_widget_set_sensitive(appdata->menu_item_wms_clear, TRUE); |
1328 | gtk_widget_set_sensitive(appdata->menu_item_wms_adjust, TRUE); |
1329 | } |
1330 | |
1331 | /* try to load an existing image into map */ |
1332 | void wms_load(appdata_t *appdata) { |
1333 | const char *exts[] = { "png", "gif", "jpg", "" }; |
1334 | int i=0; |
1335 | |
1336 | while(exts[i][0]) { |
1337 | char *filename = g_strdup_printf("%s/wms.%s", appdata->project->path, |
1338 | exts[i]); |
1339 | |
1340 | if(g_file_test(filename, G_FILE_TEST_EXISTS)) { |
1341 | appdata->map->bg.offset.x = appdata->project->wms_offset.x; |
1342 | appdata->map->bg.offset.y = appdata->project->wms_offset.y; |
1343 | |
1344 | map_set_bg_image(appdata->map, filename); |
1345 | |
1346 | /* restore image to saved position */ |
1347 | gint x = appdata->osm->bounds->min.x + appdata->map->bg.offset.x; |
1348 | gint y = appdata->osm->bounds->min.y + appdata->map->bg.offset.y; |
1349 | canvas_image_move(appdata->map->bg.item, x, y, |
1350 | appdata->map->bg.scale.x, appdata->map->bg.scale.y); |
1351 | |
1352 | g_free(filename); |
1353 | |
1354 | gtk_widget_set_sensitive(appdata->menu_item_wms_clear, TRUE); |
1355 | gtk_widget_set_sensitive(appdata->menu_item_wms_adjust, TRUE); |
1356 | |
1357 | return; |
1358 | } |
1359 | g_free(filename); |
1360 | i++; |
1361 | } |
1362 | } |
1363 | |
1364 | void wms_remove_file(project_t *project) { |
1365 | const char *exts[] = { "png", "gif", "jpg", "" }; |
1366 | int i=0; |
1367 | |
1368 | while(exts[i][0]) { |
1369 | char *filename = |
1370 | g_strdup_printf("%s/wms.%s", project->path, exts[i]); |
1371 | |
1372 | if(g_file_test(filename, G_FILE_TEST_EXISTS)) |
1373 | g_remove(filename); |
1374 | |
1375 | g_free(filename); |
1376 | i++; |
1377 | } |
1378 | } |
1379 | |
1380 | void wms_remove(appdata_t *appdata) { |
1381 | |
1382 | /* this cancels any wms adjustment in progress */ |
1383 | if(appdata->map->action.type == MAP_ACTION_BG_ADJUST) |
1384 | map_action_cancel(appdata); |
1385 | |
1386 | gtk_widget_set_sensitive(appdata->menu_item_wms_clear, FALSE); |
1387 | gtk_widget_set_sensitive(appdata->menu_item_wms_adjust, FALSE); |
1388 | |
1389 | map_remove_bg_image(appdata->map); |
1390 | |
1391 | wms_remove_file(appdata->project); |
1392 | } |
1393 | |
1394 | struct server_preset_s { |
1395 | char *name, *server, *path; |
1396 | } default_servers[] = { |
1397 | { "NASA landsat", "http://onearth.jpl.nasa.gov", "/wms.cgi" }, |
1398 | /* add more servers here ... */ |
1399 | { NULL, NULL, NULL } |
1400 | }; |
1401 | |
1402 | wms_server_t *wms_server_get_default(void) { |
1403 | wms_server_t *server = NULL, **cur = &server; |
1404 | struct server_preset_s *preset = default_servers; |
1405 | |
1406 | while(preset->name) { |
1407 | *cur = g_new0(wms_server_t, 1); |
1408 | (*cur)->name = g_strdup(preset->name); |
1409 | (*cur)->server = g_strdup(preset->server); |
1410 | (*cur)->path = g_strdup(preset->path); |
1411 | cur = &(*cur)->next; |
1412 | preset++; |
1413 | } |
1414 | |
1415 | return server; |
1416 | } |
1417 | |
1418 | void wms_server_free(wms_server_t *wms_server) { |
1419 | if(wms_server->name) g_free(wms_server->name); |
1420 | if(wms_server->server) g_free(wms_server->server); |
1421 | if(wms_server->path) g_free(wms_server->path); |
1422 | g_free(wms_server); |
1423 | } |
1424 | |
1425 | void wms_servers_free(wms_server_t *wms_server) { |
1426 | while(wms_server) { |
1427 | wms_server_t *next = wms_server->next; |
1428 | wms_server_free(wms_server); |
1429 | wms_server = next; |
1430 | } |
1431 | } |