2 * viking -- GPS Data and Topo Analyzer, Explorer, and Manager
4 * Copyright (C) 2003-2005, Evan Battaglia <gtoevan@gmx.net>
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.
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.
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
25 #include <sys/types.h>
29 #include <glib/gi18n.h>
36 #include "background.h"
37 #include "vikwaypoint.h"
39 #include "vikviewport.h"
40 #include "viktreeview.h"
42 #include "vikaggregatelayer.h"
43 #include "viklayerspanel.h"
44 #include "vikdemlayer.h"
50 #include "icons/icons.h"
52 #define MAPS_CACHE_DIR maps_layer_default_dir()
54 #define SRTM_CACHE_TEMPLATE "%ssrtm3-%s%s%c%02d%c%03d.hgt.zip"
55 #define SRTM_FTP_SITE "e0srp01u.ecs.nasa.gov"
56 #define SRTM_FTP_URI "/srtm/version2/SRTM3/"
58 #ifdef VIK_CONFIG_DEM24K
59 #define DEM24K_DOWNLOAD_SCRIPT "dem24k.pl"
63 static void dem_layer_marshall( VikDEMLayer
*vdl
, guint8
**data
, gint
*len
);
64 static VikDEMLayer
*dem_layer_unmarshall( guint8
*data
, gint len
, VikViewport
*vvp
);
65 static gboolean
dem_layer_set_param ( VikDEMLayer
*vdl
, guint16 id
, VikLayerParamData data
, VikViewport
*vp
);
66 static VikLayerParamData
dem_layer_get_param ( VikDEMLayer
*vdl
, guint16 id
);
67 static void dem_layer_update_gc ( VikDEMLayer
*vdl
, VikViewport
*vp
, const gchar
*color
);
68 static void dem_layer_post_read ( VikLayer
*vl
, VikViewport
*vp
, gboolean from_file
);
69 static void srtm_draw_existence ( VikViewport
*vp
);
71 #ifdef VIK_CONFIG_DEM24K
72 static void dem24k_draw_existence ( VikViewport
*vp
);
75 static VikLayerParamScale param_scales
[] = {
81 static gchar
*params_source
[] = {
82 "SRTM Global 90m (3 arcsec)",
83 #ifdef VIK_CONFIG_DEM24K
90 enum { DEM_SOURCE_SRTM
,
91 #ifdef VIK_CONFIG_DEM24K
97 static VikLayerParam dem_layer_params
[] = {
98 { "files", VIK_LAYER_PARAM_STRING_LIST
, VIK_LAYER_GROUP_NONE
, N_("DEM Files:"), VIK_LAYER_WIDGET_FILELIST
},
99 { "source", VIK_LAYER_PARAM_UINT
, VIK_LAYER_GROUP_NONE
, N_("Download Source:"), VIK_LAYER_WIDGET_RADIOGROUP_STATIC
, params_source
, NULL
},
100 { "color", VIK_LAYER_PARAM_STRING
, VIK_LAYER_GROUP_NONE
, N_("Color:"), VIK_LAYER_WIDGET_ENTRY
},
101 { "min_elev", VIK_LAYER_PARAM_DOUBLE
, VIK_LAYER_GROUP_NONE
, N_("Min Elev:"), VIK_LAYER_WIDGET_SPINBUTTON
, param_scales
+ 0 },
102 { "max_elev", VIK_LAYER_PARAM_DOUBLE
, VIK_LAYER_GROUP_NONE
, N_("Max Elev:"), VIK_LAYER_WIDGET_SPINBUTTON
, param_scales
+ 0 },
103 { "line_thickness", VIK_LAYER_PARAM_UINT
, VIK_LAYER_GROUP_NONE
, N_("Line Thickness:"), VIK_LAYER_WIDGET_SPINBUTTON
, param_scales
+ 1 },
107 enum { PARAM_FILES
=0, PARAM_SOURCE
, PARAM_COLOR
, PARAM_MIN_ELEV
, PARAM_MAX_ELEV
, PARAM_LINE_THICKNESS
, NUM_PARAMS
};
109 static gpointer
dem_layer_download_create ( VikWindow
*vw
, VikViewport
*vvp
);
110 static gboolean
dem_layer_download_release ( VikDEMLayer
*vdl
, GdkEventButton
*event
, VikViewport
*vvp
);
111 static gboolean
dem_layer_download_click ( VikDEMLayer
*vdl
, GdkEventButton
*event
, VikViewport
*vvp
);
113 static VikToolInterface dem_tools
[] = {
114 { N_("DEM Download/Import"), (VikToolConstructorFunc
) dem_layer_download_create
, NULL
, NULL
, NULL
,
115 (VikToolMouseFunc
) dem_layer_download_click
, NULL
, (VikToolMouseFunc
) dem_layer_download_release
,
116 (VikToolKeyFunc
) NULL
, GDK_CURSOR_IS_PIXMAP
, &cursor_demdl_pixbuf
},
123 static gchar
*dem_colors
[] = {
229 static const guint DEM_N_COLORS
= sizeof(dem_colors
)/sizeof(dem_colors
[0]);
232 VikLayerInterface vik_dem_layer_interface
= {
237 sizeof(dem_tools
) / sizeof(dem_tools
[0]),
246 (VikLayerFuncCreate
) vik_dem_layer_create
,
247 (VikLayerFuncRealize
) NULL
,
249 (VikLayerFuncFree
) vik_dem_layer_free
,
251 (VikLayerFuncProperties
) NULL
,
252 (VikLayerFuncDraw
) vik_dem_layer_draw
,
253 (VikLayerFuncChangeCoordMode
) NULL
,
255 (VikLayerFuncSetMenuItemsSelection
) NULL
,
256 (VikLayerFuncGetMenuItemsSelection
) NULL
,
258 (VikLayerFuncAddMenuItems
) NULL
,
259 (VikLayerFuncSublayerAddMenuItems
) NULL
,
261 (VikLayerFuncSublayerRenameRequest
) NULL
,
262 (VikLayerFuncSublayerToggleVisible
) NULL
,
264 (VikLayerFuncMarshall
) dem_layer_marshall
,
265 (VikLayerFuncUnmarshall
) dem_layer_unmarshall
,
267 (VikLayerFuncSetParam
) dem_layer_set_param
,
268 (VikLayerFuncGetParam
) dem_layer_get_param
,
270 (VikLayerFuncReadFileData
) NULL
,
271 (VikLayerFuncWriteFileData
) NULL
,
273 (VikLayerFuncDeleteItem
) NULL
,
274 (VikLayerFuncCopyItem
) NULL
,
275 (VikLayerFuncPasteItem
) NULL
,
276 (VikLayerFuncFreeCopiedItem
) NULL
,
277 (VikLayerFuncDragDropRequest
) NULL
,
280 struct _VikDEMLayer
{
287 guint8 line_thickness
;
292 GType
vik_dem_layer_get_type ()
294 static GType vdl_type
= 0;
298 static const GTypeInfo vdl_info
=
300 sizeof (VikDEMLayerClass
),
301 NULL
, /* base_init */
302 NULL
, /* base_finalize */
303 NULL
, /* class init */
304 NULL
, /* class_finalize */
305 NULL
, /* class_data */
306 sizeof (VikDEMLayer
),
308 NULL
/* instance init */
310 vdl_type
= g_type_register_static ( VIK_LAYER_TYPE
, "VikDEMLayer", &vdl_info
, 0 );
316 static void dem_layer_marshall( VikDEMLayer
*vdl
, guint8
**data
, gint
*len
)
318 vik_layer_marshall_params ( VIK_LAYER(vdl
), data
, len
);
321 static VikDEMLayer
*dem_layer_unmarshall( guint8
*data
, gint len
, VikViewport
*vvp
)
323 VikDEMLayer
*rv
= vik_dem_layer_new ();
326 /* TODO: share GCS between layers */
327 for ( i
= 0; i
< DEM_N_COLORS
; i
++ )
328 rv
->gcs
[i
] = vik_viewport_new_gc ( vvp
, dem_colors
[i
], rv
->line_thickness
);
330 vik_layer_unmarshall_params ( VIK_LAYER(rv
), data
, len
, vvp
);
334 gboolean
dem_layer_set_param ( VikDEMLayer
*vdl
, guint16 id
, VikLayerParamData data
, VikViewport
*vp
)
338 case PARAM_COLOR
: if ( vdl
->color
) g_free ( vdl
->color
); vdl
->color
= g_strdup ( data
.s
); break;
339 case PARAM_SOURCE
: vdl
->source
= data
.u
; break;
340 case PARAM_MIN_ELEV
: vdl
->min_elev
= data
.d
; break;
341 case PARAM_MAX_ELEV
: vdl
->max_elev
= data
.d
; break;
342 case PARAM_LINE_THICKNESS
: if ( data
.u
>= 1 && data
.u
<= 15 ) vdl
->line_thickness
= data
.u
; break;
343 case PARAM_FILES
: a_dems_load_list ( &(data
.sl
) ); a_dems_list_free ( vdl
->files
); vdl
->files
= data
.sl
; break;
348 static VikLayerParamData
dem_layer_get_param ( VikDEMLayer
*vdl
, guint16 id
)
350 VikLayerParamData rv
;
353 case PARAM_FILES
: rv
.sl
= vdl
->files
; break;
354 case PARAM_SOURCE
: rv
.u
= vdl
->source
; break;
355 case PARAM_COLOR
: rv
.s
= vdl
->color
? vdl
->color
: ""; break;
356 case PARAM_MIN_ELEV
: rv
.d
= vdl
->min_elev
; break;
357 case PARAM_MAX_ELEV
: rv
.d
= vdl
->max_elev
; break;
358 case PARAM_LINE_THICKNESS
: rv
.i
= vdl
->line_thickness
; break;
363 static void dem_layer_post_read ( VikLayer
*vl
, VikViewport
*vp
, gboolean from_file
)
365 VikDEMLayer
*vdl
= VIK_DEM_LAYER(vl
);
367 g_object_unref ( G_OBJECT(vdl
->gc
) );
369 vdl
->gc
= vik_viewport_new_gc ( vp
, vdl
->color
, vdl
->line_thickness
);
372 VikDEMLayer
*vik_dem_layer_new ( )
374 VikDEMLayer
*vdl
= VIK_DEM_LAYER ( g_object_new ( VIK_DEM_LAYER_TYPE
, NULL
) );
376 vik_layer_init ( VIK_LAYER(vdl
), VIK_LAYER_DEM
);
383 vdl
->gcs
= g_malloc(sizeof(GdkGC
*)*DEM_N_COLORS
);
384 /* make new gcs only if we need it (copy layer -> use old) */
387 vdl
->max_elev
= 1000.0;
388 vdl
->source
= DEM_SOURCE_SRTM
;
389 vdl
->line_thickness
= 3;
396 static void vik_dem_layer_draw_dem ( VikDEMLayer
*vdl
, VikViewport
*vp
, VikDEM
*dem
)
398 VikDEMColumn
*column
;
400 struct LatLon dem_northeast
, dem_southwest
;
401 gdouble max_lat
, max_lon
, min_lat
, min_lon
;
403 /**** Check if viewport and DEM data overlap ****/
405 /* get min, max lat/lon of viewport */
406 vik_viewport_get_min_max_lat_lon ( vp
, &min_lat
, &max_lat
, &min_lon
, &max_lon
);
408 /* get min, max lat/lon of DEM data */
409 if ( dem
->horiz_units
== VIK_DEM_HORIZ_LL_ARCSECONDS
) {
410 dem_northeast
.lat
= dem
->max_north
/ 3600.0;
411 dem_northeast
.lon
= dem
->max_east
/ 3600.0;
412 dem_southwest
.lat
= dem
->min_north
/ 3600.0;
413 dem_southwest
.lon
= dem
->min_east
/ 3600.0;
414 } else if ( dem
->horiz_units
== VIK_DEM_HORIZ_UTM_METERS
) {
415 struct UTM dem_northeast_utm
, dem_southwest_utm
;
416 dem_northeast_utm
.northing
= dem
->max_north
;
417 dem_northeast_utm
.easting
= dem
->max_east
;
418 dem_southwest_utm
.northing
= dem
->min_north
;
419 dem_southwest_utm
.easting
= dem
->min_east
;
420 dem_northeast_utm
.zone
= dem_southwest_utm
.zone
= dem
->utm_zone
;
421 dem_northeast_utm
.letter
= dem_southwest_utm
.letter
= dem
->utm_letter
;
423 a_coords_utm_to_latlon(&dem_northeast_utm
, &dem_northeast
);
424 a_coords_utm_to_latlon(&dem_southwest_utm
, &dem_southwest
);
427 if ( (max_lat
> dem_northeast
.lat
&& min_lat
> dem_northeast
.lat
) ||
428 (max_lat
< dem_southwest
.lat
&& min_lat
< dem_southwest
.lat
) )
430 else if ( (max_lon
> dem_northeast
.lon
&& min_lon
> dem_northeast
.lon
) ||
431 (max_lon
< dem_southwest
.lon
&& min_lon
< dem_southwest
.lon
) )
433 /* else they overlap */
435 /**** End Overlap Check ****/
436 /* boxes to show where we have DEM instead of actually drawing the DEM.
437 * useful if we want to see what areas we have coverage for (if we want
438 * to get elevation data for a track) but don't want to cover the map.
442 /* draw a box if a DEM is loaded. in future I'd like to add an option for this
443 * this is useful if we want to see what areas we have dem for but don't want to
444 * cover the map (or maybe we just need translucent DEM?) */
446 VikCoord demne
, demsw
;
448 vik_coord_load_from_latlon(&demne
, vik_viewport_get_coord_mode(vp
), &dem_northeast
);
449 vik_coord_load_from_latlon(&demsw
, vik_viewport_get_coord_mode(vp
), &dem_southwest
);
451 vik_viewport_coord_to_screen ( vp
, &demne
, &x1
, &y1
);
452 vik_viewport_coord_to_screen ( vp
, &demsw
, &x2
, &y2
);
454 if ( x1
> vik_viewport_get_width(vp
) ) x1
=vik_viewport_get_width(vp
);
455 if ( y2
> vik_viewport_get_height(vp
) ) y2
=vik_viewport_get_height(vp
);
456 if ( x2
< 0 ) x2
= 0;
457 if ( y1
< 0 ) y1
= 0;
458 vik_viewport_draw_rectangle ( vp
, GTK_WIDGET(vp
)->style
->black_gc
,
459 FALSE
, x2
, y1
, x1
-x2
, y2
-y1
);
464 if ( dem
->horiz_units
== VIK_DEM_HORIZ_LL_ARCSECONDS
) {
465 VikCoord tmp
; /* TODO: don't use coord_load_from_latlon, especially if in latlon drawing mode */
467 gdouble max_lat_as
, max_lon_as
, min_lat_as
, min_lon_as
;
468 gdouble start_lat_as
, end_lat_as
, start_lon_as
, end_lon_as
;
470 gdouble start_lat
, end_lat
, start_lon
, end_lon
;
472 struct LatLon counter
;
474 guint x
, y
, start_x
, start_y
;
478 guint skip_factor
= ceil ( vik_viewport_get_xmpp(vp
) / 40 ); /* todo: smarter calculation. */
480 gdouble nscale_deg
= dem
->north_scale
/ ((gdouble
) 3600);
481 gdouble escale_deg
= dem
->east_scale
/ ((gdouble
) 3600);
483 max_lat_as
= max_lat
* 3600;
484 min_lat_as
= min_lat
* 3600;
485 max_lon_as
= max_lon
* 3600;
486 min_lon_as
= min_lon
* 3600;
488 start_lat_as
= MAX(min_lat_as
, dem
->min_north
);
489 end_lat_as
= MIN(max_lat_as
, dem
->max_north
);
490 start_lon_as
= MAX(min_lon_as
, dem
->min_east
);
491 end_lon_as
= MIN(max_lon_as
, dem
->max_east
);
493 start_lat
= floor(start_lat_as
/ dem
->north_scale
) * nscale_deg
;
494 end_lat
= ceil (end_lat_as
/ dem
->north_scale
) * nscale_deg
;
495 start_lon
= floor(start_lon_as
/ dem
->east_scale
) * escale_deg
;
496 end_lon
= ceil (end_lon_as
/ dem
->east_scale
) * escale_deg
;
498 vik_dem_east_north_to_xy ( dem
, start_lon_as
, start_lat_as
, &start_x
, &start_y
);
500 /* verify sane elev interval */
501 if ( vdl
->max_elev
<= vdl
->min_elev
)
502 vdl
->max_elev
= vdl
->min_elev
+ 1;
504 for ( x
=start_x
, counter
.lon
= start_lon
; counter
.lon
<= end_lon
; counter
.lon
+= escale_deg
* skip_factor
, x
+= skip_factor
) {
505 if ( x
> 0 && x
< dem
->n_columns
) {
506 column
= g_ptr_array_index ( dem
->columns
, x
);
507 for ( y
=start_y
, counter
.lat
= start_lat
; counter
.lat
<= end_lat
; counter
.lat
+= nscale_deg
* skip_factor
, y
+= skip_factor
) {
508 if ( y
> column
->n_points
)
510 elev
= column
->points
[y
];
512 if ( elev
!= VIK_DEM_INVALID_ELEVATION
&& elev
< vdl
->min_elev
)
514 if ( elev
!= VIK_DEM_INVALID_ELEVATION
&& elev
> vdl
->max_elev
)
521 vik_coord_load_from_latlon(&tmp
, vik_viewport_get_coord_mode(vp
), &counter
);
522 vik_viewport_coord_to_screen(vp
, &tmp
, &a
, &b
);
523 if ( elev
== VIK_DEM_INVALID_ELEVATION
)
524 ; /* don't draw it */
525 else if ( elev
<= 0 )
526 vik_viewport_draw_rectangle(vp
, vdl
->gcs
[0], TRUE
, a
-2, b
-2, 4, 4 );
528 vik_viewport_draw_rectangle(vp
, vdl
->gcs
[(gint
)floor((elev
- vdl
->min_elev
)/(vdl
->max_elev
- vdl
->min_elev
)*(DEM_N_COLORS
-2))+1], TRUE
, a
-2, b
-2, 4, 4 );
533 } else if ( dem
->horiz_units
== VIK_DEM_HORIZ_UTM_METERS
) {
534 gdouble max_nor
, max_eas
, min_nor
, min_eas
;
535 gdouble start_nor
, start_eas
, end_nor
, end_eas
;
539 guint x
, y
, start_x
, start_y
;
541 VikCoord tmp
; /* TODO: don't use coord_load_from_latlon, especially if in latlon drawing mode */
544 guint skip_factor
= ceil ( vik_viewport_get_xmpp(vp
) / 10 ); /* todo: smarter calculation. */
546 VikCoord tleft
, tright
, bleft
, bright
;
548 vik_viewport_screen_to_coord ( vp
, 0, 0, &tleft
);
549 vik_viewport_screen_to_coord ( vp
, vik_viewport_get_width(vp
), 0, &tright
);
550 vik_viewport_screen_to_coord ( vp
, 0, vik_viewport_get_height(vp
), &bleft
);
551 vik_viewport_screen_to_coord ( vp
, vik_viewport_get_width(vp
), vik_viewport_get_height(vp
), &bright
);
554 vik_coord_convert(&tleft
, VIK_COORD_UTM
);
555 vik_coord_convert(&tright
, VIK_COORD_UTM
);
556 vik_coord_convert(&bleft
, VIK_COORD_UTM
);
557 vik_coord_convert(&bright
, VIK_COORD_UTM
);
559 max_nor
= MAX(tleft
.north_south
, tright
.north_south
);
560 min_nor
= MIN(bleft
.north_south
, bright
.north_south
);
561 max_eas
= MAX(bright
.east_west
, tright
.east_west
);
562 min_eas
= MIN(bleft
.east_west
, tleft
.east_west
);
564 start_nor
= MAX(min_nor
, dem
->min_north
);
565 end_nor
= MIN(max_nor
, dem
->max_north
);
566 if ( tleft
.utm_zone
== dem
->utm_zone
&& bleft
.utm_zone
== dem
->utm_zone
567 && (tleft
.utm_letter
>= 'N') == (dem
->utm_letter
>= 'N')
568 && (bleft
.utm_letter
>= 'N') == (dem
->utm_letter
>= 'N') ) /* if the utm zones/hemispheres are different, min_eas will be bogus */
569 start_eas
= MAX(min_eas
, dem
->min_east
);
571 start_eas
= dem
->min_east
;
572 if ( tright
.utm_zone
== dem
->utm_zone
&& bright
.utm_zone
== dem
->utm_zone
573 && (tright
.utm_letter
>= 'N') == (dem
->utm_letter
>= 'N')
574 && (bright
.utm_letter
>= 'N') == (dem
->utm_letter
>= 'N') ) /* if the utm zones/hemispheres are different, min_eas will be bogus */
575 end_eas
= MIN(max_eas
, dem
->max_east
);
577 end_eas
= dem
->max_east
;
579 start_nor
= floor(start_nor
/ dem
->north_scale
) * dem
->north_scale
;
580 end_nor
= ceil (end_nor
/ dem
->north_scale
) * dem
->north_scale
;
581 start_eas
= floor(start_eas
/ dem
->east_scale
) * dem
->east_scale
;
582 end_eas
= ceil (end_eas
/ dem
->east_scale
) * dem
->east_scale
;
584 vik_dem_east_north_to_xy ( dem
, start_eas
, start_nor
, &start_x
, &start_y
);
586 /* TODO: why start_x and start_y are -1 -- rounding error from above? */
588 counter
.zone
= dem
->utm_zone
;
589 counter
.letter
= dem
->utm_letter
;
591 for ( x
=start_x
, counter
.easting
= start_eas
; counter
.easting
<= end_eas
; counter
.easting
+= dem
->east_scale
* skip_factor
, x
+= skip_factor
) {
592 if ( x
> 0 && x
< dem
->n_columns
) {
593 column
= g_ptr_array_index ( dem
->columns
, x
);
594 for ( y
=start_y
, counter
.northing
= start_nor
; counter
.northing
<= end_nor
; counter
.northing
+= dem
->north_scale
* skip_factor
, y
+= skip_factor
) {
595 if ( y
> column
->n_points
)
597 elev
= column
->points
[y
];
598 if ( elev
!= VIK_DEM_INVALID_ELEVATION
&& elev
< vdl
->min_elev
)
600 if ( elev
!= VIK_DEM_INVALID_ELEVATION
&& elev
> vdl
->max_elev
)
605 vik_coord_load_from_utm(&tmp
, vik_viewport_get_coord_mode(vp
), &counter
);
606 vik_viewport_coord_to_screen(vp
, &tmp
, &a
, &b
);
607 if ( elev
== VIK_DEM_INVALID_ELEVATION
)
608 ; /* don't draw it */
609 else if ( elev
<= 0 )
610 vik_viewport_draw_rectangle(vp
, vdl
->gcs
[0], TRUE
, a
-2, b
-2, 4, 4 );
612 vik_viewport_draw_rectangle(vp
, vdl
->gcs
[(gint
)floor((elev
- vdl
->min_elev
)/(vdl
->max_elev
- vdl
->min_elev
)*(DEM_N_COLORS
-2))+1], TRUE
, a
-2, b
-2, 4, 4 );
620 /* return the continent for the specified lat, lon */
622 static const gchar
*srtm_continent_dir ( gint lat
, gint lon
)
624 extern const char *_srtm_continent_data
[];
625 static GHashTable
*srtm_continent
= NULL
;
626 const gchar
*continent
;
629 if (!srtm_continent
) {
632 srtm_continent
= g_hash_table_new(g_str_hash
, g_str_equal
);
633 s
= _srtm_continent_data
;
634 while (*s
!= (gchar
*)-1) {
637 g_hash_table_insert(srtm_continent
, (gpointer
) *s
, (gpointer
) continent
);
643 g_snprintf(name
, sizeof(name
), "%c%02d%c%03d",
644 (lat
>= 0) ? 'N' : 'S', ABS(lat
),
645 (lon
>= 0) ? 'E' : 'W', ABS(lon
));
647 return(g_hash_table_lookup(srtm_continent
, name
));
650 void vik_dem_layer_draw ( VikDEMLayer
*vdl
, gpointer data
)
652 VikViewport
*vp
= (VikViewport
*) data
;
653 GList
*dems_iter
= vdl
->files
;
657 /* search for SRTM3 90m */
659 if ( vdl
->source
== DEM_SOURCE_SRTM
)
660 srtm_draw_existence ( vp
);
661 #ifdef VIK_CONFIG_DEM24K
662 else if ( vdl
->source
== DEM_SOURCE_DEM24K
)
663 dem24k_draw_existence ( vp
);
666 while ( dems_iter
) {
667 dem
= a_dems_get ( (const char *) (dems_iter
->data
) );
669 vik_dem_layer_draw_dem ( vdl
, vp
, dem
);
670 dems_iter
= dems_iter
->next
;
674 void vik_dem_layer_free ( VikDEMLayer
*vdl
)
677 if ( vdl
->gc
!= NULL
)
678 g_object_unref ( G_OBJECT(vdl
->gc
) );
680 if ( vdl
->color
!= NULL
)
681 g_free ( vdl
->color
);
684 for ( i
= 0; i
< DEM_N_COLORS
; i
++ )
685 g_object_unref ( vdl
->gcs
[i
] );
688 a_dems_list_free ( vdl
->files
);
691 static void dem_layer_update_gc ( VikDEMLayer
*vdl
, VikViewport
*vp
, const gchar
*color
)
694 g_free ( vdl
->color
);
696 vdl
->color
= g_strdup ( color
);
699 g_object_unref ( G_OBJECT(vdl
->gc
) );
701 vdl
->gc
= vik_viewport_new_gc ( vp
, vdl
->color
, vdl
->line_thickness
);
704 VikDEMLayer
*vik_dem_layer_create ( VikViewport
*vp
)
706 VikDEMLayer
*vdl
= vik_dem_layer_new ();
709 /* TODO: share GCS between layers */
710 for ( i
= 0; i
< DEM_N_COLORS
; i
++ )
711 vdl
->gcs
[i
] = vik_viewport_new_gc ( vp
, dem_colors
[i
], vdl
->line_thickness
);
713 dem_layer_update_gc ( vdl
, vp
, "red" );
716 /**************************************************************
717 **** SOURCES & DOWNLOADING
718 **************************************************************/
724 VikDEMLayer
*vdl
; /* NULL if not alive */
730 /**************************************************
732 **************************************************/
734 static void srtm_dem_download_thread ( DEMDownloadParams
*p
, gpointer threaddata
)
737 const gchar
*continent_dir
;
739 intlat
= (int)floor(p
->lat
);
740 intlon
= (int)floor(p
->lon
);
741 continent_dir
= srtm_continent_dir(intlat
, intlon
);
743 if (!continent_dir
) {
744 g_warning(N_("No SRTM data available for %f, %f"), p
->lat
, p
->lon
);
748 gchar
*src_fn
= g_strdup_printf("%s%s%s%c%02d%c%03d.hgt.zip",
752 (intlat
>= 0) ? 'N' : 'S',
754 (intlon
>= 0) ? 'E' : 'W',
757 static DownloadOptions options
= { NULL
, 0, a_check_map_file
};
758 a_ftp_download_get_url ( SRTM_FTP_SITE
, src_fn
, p
->dest
, &options
);
762 static gchar
*srtm_lat_lon_to_dest_fn ( gdouble lat
, gdouble lon
)
765 const gchar
*continent_dir
;
767 intlat
= (int)floor(lat
);
768 intlon
= (int)floor(lon
);
769 continent_dir
= srtm_continent_dir(intlat
, intlon
);
772 continent_dir
= "nowhere";
774 return g_strdup_printf("srtm3-%s%s%c%02d%c%03d.hgt.zip",
777 (intlat
>= 0) ? 'N' : 'S',
779 (intlon
>= 0) ? 'E' : 'W',
784 /* TODO: generalize */
785 static void srtm_draw_existence ( VikViewport
*vp
)
787 gdouble max_lat
, max_lon
, min_lat
, min_lon
;
788 gchar buf
[strlen(MAPS_CACHE_DIR
)+strlen(SRTM_CACHE_TEMPLATE
)+30];
791 vik_viewport_get_min_max_lat_lon ( vp
, &min_lat
, &max_lat
, &min_lon
, &max_lon
);
793 for (i
= floor(min_lat
); i
<= floor(max_lat
); i
++) {
794 for (j
= floor(min_lon
); j
<= floor(max_lon
); j
++) {
795 const gchar
*continent_dir
;
796 if ((continent_dir
= srtm_continent_dir(i
, j
)) == NULL
)
798 g_snprintf(buf
, sizeof(buf
), SRTM_CACHE_TEMPLATE
,
802 (i
>= 0) ? 'N' : 'S',
804 (j
>= 0) ? 'E' : 'W',
806 if ( g_file_test(buf
, G_FILE_TEST_EXISTS
) == TRUE
) {
811 sw
.mode
= VIK_COORD_LATLON
;
812 ne
.north_south
= i
+1;
814 ne
.mode
= VIK_COORD_LATLON
;
815 vik_viewport_coord_to_screen ( vp
, &sw
, &x1
, &y1
);
816 vik_viewport_coord_to_screen ( vp
, &ne
, &x2
, &y2
);
817 if ( x1
< 0 ) x1
= 0;
818 if ( y2
< 0 ) y2
= 0;
819 vik_viewport_draw_rectangle ( vp
, GTK_WIDGET(vp
)->style
->black_gc
,
820 FALSE
, x1
, y2
, x2
-x1
, y1
-y2
);
827 /**************************************************
829 **************************************************/
831 #ifdef VIK_CONFIG_DEM24K
833 static void dem24k_dem_download_thread ( DEMDownloadParams
*p
, gpointer threaddata
)
836 gchar
*cmdline
= g_strdup_printf("%s %.03f %.03f",
837 DEM24K_DOWNLOAD_SCRIPT
,
840 /* FIX: don't use system, use execv or something. check for existence */
844 static gchar
*dem24k_lat_lon_to_dest_fn ( gdouble lat
, gdouble lon
)
846 return g_strdup_printf("dem24k/%d/%d/%.03f,%.03f.dem",
853 /* TODO: generalize */
854 static void dem24k_draw_existence ( VikViewport
*vp
)
856 gdouble max_lat
, max_lon
, min_lat
, min_lon
;
857 gchar buf
[strlen(MAPS_CACHE_DIR
)+40];
860 vik_viewport_get_min_max_lat_lon ( vp
, &min_lat
, &max_lat
, &min_lon
, &max_lon
);
862 for (i
= floor(min_lat
*8)/8; i
<= floor(max_lat
*8)/8; i
+=0.125) {
863 /* check lat dir first -- faster */
864 g_snprintf(buf
, sizeof(buf
), "%sdem24k/%d/",
867 if ( g_file_test(buf
, G_FILE_TEST_EXISTS
) == FALSE
)
869 for (j
= floor(min_lon
*8)/8; j
<= floor(max_lon
*8)/8; j
+=0.125) {
870 /* check lon dir first -- faster */
871 g_snprintf(buf
, sizeof(buf
), "%sdem24k/%d/%d/",
875 if ( g_file_test(buf
, G_FILE_TEST_EXISTS
) == FALSE
)
877 g_snprintf(buf
, sizeof(buf
), "%sdem24k/%d/%d/%.03f,%.03f.dem",
883 if ( g_file_test(buf
, G_FILE_TEST_EXISTS
) == TRUE
) {
887 sw
.east_west
= j
-0.125;
888 sw
.mode
= VIK_COORD_LATLON
;
889 ne
.north_south
= i
+0.125;
891 ne
.mode
= VIK_COORD_LATLON
;
892 vik_viewport_coord_to_screen ( vp
, &sw
, &x1
, &y1
);
893 vik_viewport_coord_to_screen ( vp
, &ne
, &x2
, &y2
);
894 if ( x1
< 0 ) x1
= 0;
895 if ( y2
< 0 ) y2
= 0;
896 vik_viewport_draw_rectangle ( vp
, GTK_WIDGET(vp
)->style
->black_gc
,
897 FALSE
, x1
, y2
, x2
-x1
, y1
-y2
);
904 /**************************************************
905 * SOURCES -- DOWNLOADING & IMPORTING TOOL *
906 **************************************************
909 static void weak_ref_cb ( gpointer ptr
, GObject
* dead_vdl
)
911 DEMDownloadParams
*p
= ptr
;
912 g_mutex_lock ( p
->mutex
);
914 g_mutex_unlock ( p
->mutex
);
917 /* Try to add file full_path.
918 * full_path will be copied.
919 * returns FALSE if file does not exists, TRUE otherwise.
921 static gboolean
dem_layer_add_file ( VikDEMLayer
*vdl
, const gchar
*full_path
)
923 if ( g_file_test(full_path
, G_FILE_TEST_EXISTS
) == TRUE
) {
924 /* only load if file size is not 0 (not in progress) */
926 stat (full_path
, &sb
);
928 gchar
*duped_path
= g_strdup(full_path
);
929 vdl
->files
= g_list_prepend ( vdl
->files
, duped_path
);
930 a_dems_load ( duped_path
);
931 g_debug("%s: %s", __FUNCTION__
, duped_path
);
932 vik_layer_emit_update ( VIK_LAYER(vdl
) );
939 static void dem_download_thread ( DEMDownloadParams
*p
, gpointer threaddata
)
941 if ( p
->source
== DEM_SOURCE_SRTM
)
942 srtm_dem_download_thread ( p
, threaddata
);
943 #ifdef VIK_CONFIG_DEM24K
944 else if ( p
->source
== DEM_SOURCE_DEM24K
)
945 dem24k_dem_download_thread ( p
, threaddata
);
949 g_mutex_lock ( p
->mutex
);
951 g_object_weak_unref ( G_OBJECT(p
->vdl
), weak_ref_cb
, p
);
953 if ( dem_layer_add_file ( p
->vdl
, p
->dest
) )
954 vik_layer_emit_update ( VIK_LAYER(p
->vdl
) );
956 g_mutex_unlock ( p
->mutex
);
961 static void free_dem_download_params ( DEMDownloadParams
*p
)
963 g_mutex_free ( p
->mutex
);
968 static gpointer
dem_layer_download_create ( VikWindow
*vw
, VikViewport
*vvp
)
974 static gboolean
dem_layer_download_release ( VikDEMLayer
*vdl
, GdkEventButton
*event
, VikViewport
*vvp
)
980 gchar
*dem_file
= NULL
;
982 if ( vdl
->source
== DEM_SOURCE_NONE
)
983 a_dialog_error_msg ( VIK_GTK_WINDOW_FROM_LAYER(vdl
), _("No download source selected. Edit layer properties.") );
985 vik_viewport_screen_to_coord ( vvp
, event
->x
, event
->y
, &coord
);
986 vik_coord_to_latlon ( &coord
, &ll
);
989 if ( vdl
->source
== DEM_SOURCE_SRTM
)
990 dem_file
= srtm_lat_lon_to_dest_fn ( ll
.lat
, ll
.lon
);
991 #ifdef VIK_CONFIG_DEM24K
992 else if ( vdl
->source
== DEM_SOURCE_DEM24K
)
993 dem_file
= dem24k_lat_lon_to_dest_fn ( ll
.lat
, ll
.lon
);
999 full_path
= g_strdup_printf("%s%s", MAPS_CACHE_DIR
, dem_file
);
1001 g_debug("%s: %s", __FUNCTION__
, full_path
);
1003 // TODO: check if already in filelist
1005 if ( ! dem_layer_add_file(vdl
, full_path
) ) {
1006 gchar
*tmp
= g_strdup_printf ( _("Downloading DEM %s"), dem_file
);
1007 DEMDownloadParams
*p
= g_malloc(sizeof(DEMDownloadParams
));
1008 p
->dest
= g_strdup(full_path
);
1012 p
->mutex
= g_mutex_new();
1013 p
->source
= vdl
->source
;
1014 g_object_weak_ref(G_OBJECT(p
->vdl
), weak_ref_cb
, p
);
1016 a_background_thread ( VIK_GTK_WINDOW_FROM_LAYER(vdl
), tmp
,
1017 (vik_thr_func
) dem_download_thread
, p
,
1018 (vik_thr_free_func
) free_dem_download_params
, NULL
, 1 );
1021 g_free ( dem_file
);
1022 g_free ( full_path
);
1027 static gboolean
dem_layer_download_click ( VikDEMLayer
*vdl
, GdkEventButton
*event
, VikViewport
*vvp
)
1029 /* choose & keep track of cache dir
1030 * download in background thread
1031 * download over area */