src/vikviewport.c

   1 /*
   2  * viking -- GPS Data and Topo Analyzer, Explorer, and Manager
   3  *
   4  * Copyright (C) 2003-2007, Evan Battaglia <gtoevan@gmx.net>
   5  *
   6  * Lat/Lon plotting functions calcxy* are from GPSDrive
   7  * GPSDrive Copyright (C) 2001-2004 Fritz Ganter <ganter@ganter.at>
   8  *
   9  * Multiple UTM zone patch by Kit Transue <notlostyet@didactek.com>
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or
  14  * (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  24  *
  25  */
  26 #ifdef HAVE_CONFIG_H
  27 #include "config.h"
  28 #endif
  29
  30 #define DEFAULT_BACKGROUND_COLOR "#CCCCCC"
  31 #define DEFAULT_HIGHLIGHT_COLOR "#EEA500"
  32 /* Default highlight in orange */
  33
  34 #include <gtk/gtk.h>
  35 #ifdef HAVE_MATH_H
  36 #include <math.h>
  37 #endif
  38 #ifdef HAVE_STRING_H
  39 #include <string.h>
  40 #endif
  41
  42 #include "coords.h"
  43 #include "vikcoord.h"
  44 #include "vikwindow.h"
  45 #include "vikviewport.h"
  46
  47 #include "mapcoord.h"
  48
  49 /* for ALTI_TO_MPP */
  50 #include "globals.h"
  51
  52 static gdouble EASTING_OFFSET = 500000.0;
  53
  54 static gint PAD = 10;
  55
  56 static void viewport_class_init ( VikViewportClass *klass );
  57 static void viewport_init ( VikViewport *vvp );
  58 static void viewport_finalize ( GObject *gob );
  59 static void viewport_utm_zone_check ( VikViewport *vvp );
  60
  61 static gboolean calcxy(double *x, double *y, double lg, double lt, double zero_long, double zero_lat, double pixelfact_x, double pixelfact_y, gint mapSizeX2, gint mapSizeY2 );
  62 static gboolean calcxy_rev(double *lg, double *lt, gint x, gint y, double zero_long, double zero_lat, double pixelfact_x, double pixelfact_y, gint mapSizeX2, gint mapSizeY2 );
  63 double calcR (double lat);
  64
  65 static double Radius[181];
  66 static void viewport_init_ra();
  67
  68 static GObjectClass *parent_class;
  69
  70
  71 struct _VikViewport {
  72   GtkDrawingArea drawing_area;
  73   GdkPixmap *scr_buffer;
  74   gint width, height;
  75   VikCoord center;
  76   VikCoordMode coord_mode;
  77   gdouble xmpp, ympp;
  78
  79   GdkPixbuf *alpha_pixbuf;
  80   guint8 alpha_pixbuf_width;
  81   guint8 alpha_pixbuf_height;
  82
  83   gdouble utm_zone_width;
  84   gboolean one_utm_zone;
  85
  86   GdkGC *background_gc;
  87   GdkColor background_color;
  88   GdkGC *scale_bg_gc;
  89
  90   GSList *copyrights;
  91   GSList *logos;
  92
  93   /* Wether or not display OSD info */
  94   gboolean draw_scale;
  95   gboolean draw_centermark;
  96   gboolean draw_highlight;
  97   GdkGC *highlight_gc;
  98   GdkColor highlight_color;
  99
 100   /* subset of coord types. lat lon can be plotted in 2 ways, google or exp. */
 101   VikViewportDrawMode drawmode;
 102
 103   /* handy conversion factors which make google plotting extremely fast */
 104   gdouble google_calcx_fact;
 105   gdouble google_calcy_fact;
 106   gdouble google_calcx_rev_fact;
 107   gdouble google_calcy_rev_fact;
 108
 109   /* trigger stuff */
 110   gpointer trigger;
 111   GdkPixmap *snapshot_buffer;
 112   gboolean half_drawn;
 113 };
 114
 115 static gdouble
 116 viewport_utm_zone_width ( VikViewport *vvp )
 117 {
 118   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 119     struct LatLon ll;
 120
 121     /* get latitude of screen bottom */
 122     struct UTM utm = *((struct UTM *)(vik_viewport_get_center ( vvp )));
 123     utm.northing -= vvp -> height * vvp -> ympp / 2;
 124     a_coords_utm_to_latlon ( &utm, &ll );
 125
 126     /* boundary */
 127     ll.lon = (utm.zone - 1) * 6 - 180 ;
 128     a_coords_latlon_to_utm ( &ll, &utm);
 129     return fabs ( utm.easting - EASTING_OFFSET ) * 2;
 130   } else
 131     return 0.0;
 132 }
 133
 134
 135 GType vik_viewport_get_type (void)
 136 {
 137   static GType vvp_type = 0;
 138
 139   if (!vvp_type)
 140   {
 141     static const GTypeInfo vvp_info =
 142     {
 143       sizeof (VikViewportClass),
 144       NULL, /* base_init */
 145       NULL, /* base_finalize */
 146       (GClassInitFunc) viewport_class_init,
 147       NULL, /* class_finalize */
 148       NULL, /* class_data */
 149       sizeof (VikViewport),
 150       0,
 151       (GInstanceInitFunc) viewport_init,
 152     };
 153     vvp_type = g_type_register_static ( GTK_TYPE_DRAWING_AREA, "VikViewport", &vvp_info, 0 );
 154   }
 155   return vvp_type;
 156 }
 157
 158 static void viewport_class_init ( VikViewportClass *klass )
 159 {
 160   /* Destructor */
 161   GObjectClass *object_class;
 162
 163   object_class = G_OBJECT_CLASS (klass);
 164
 165   object_class->finalize = viewport_finalize;
 166
 167   parent_class = g_type_class_peek_parent (klass);
 168 }
 169
 170 VikViewport *vik_viewport_new ()
 171 {
 172   VikViewport *vv = VIK_VIEWPORT ( g_object_new ( VIK_VIEWPORT_TYPE, NULL ) );
 173   return vv;
 174 }
 175
 176 static void viewport_init ( VikViewport *vvp )
 177 {
 178   viewport_init_ra();
 179
 180   struct UTM utm;
 181   struct LatLon ll;
 182   ll.lat = a_vik_get_default_lat();
 183   ll.lon = a_vik_get_default_long();
 184   a_coords_latlon_to_utm ( &ll, &utm );
 185
 186   /* TODO: not static */
 187   vvp->xmpp = 4.0;
 188   vvp->ympp = 4.0;
 189   vvp->coord_mode = VIK_COORD_LATLON;
 190   vvp->drawmode = VIK_VIEWPORT_DRAWMODE_MERCATOR;
 191   vvp->center.mode = VIK_COORD_LATLON;
 192   vvp->center.north_south = ll.lat;
 193   vvp->center.east_west = ll.lon;
 194   vvp->center.utm_zone = (int)utm.zone;
 195   vvp->center.utm_letter = utm.letter;
 196   vvp->scr_buffer = NULL;
 197   vvp->alpha_pixbuf = NULL;
 198   vvp->alpha_pixbuf_width = vvp->alpha_pixbuf_height = 0;
 199   vvp->utm_zone_width = 0.0;
 200   vvp->background_gc = NULL;
 201   vvp->highlight_gc = NULL;
 202   vvp->scale_bg_gc = NULL;
 203
 204   vvp->copyrights = NULL;
 205
 206   vvp->draw_scale = TRUE;
 207   vvp->draw_centermark = TRUE;
 208   vvp->draw_highlight = TRUE;
 209
 210   vvp->trigger = NULL;
 211   vvp->snapshot_buffer = NULL;
 212   vvp->half_drawn = FALSE;
 213
 214   g_signal_connect (G_OBJECT(vvp), "configure_event", G_CALLBACK(vik_viewport_configure), NULL);
 215
 216   GTK_WIDGET_SET_FLAGS(vvp, GTK_CAN_FOCUS); /* allow VVP to have focus -- enabling key events, etc */
 217 }
 218
 219 GdkColor *vik_viewport_get_background_gdkcolor ( VikViewport *vvp )
 220 {
 221   GdkColor *rv = g_malloc ( sizeof ( GdkColor ) );
 222   *rv = vvp->background_color;
 223   return rv;
 224 }
 225
 226 /* returns pointer to internal static storage, changes next time function called, use quickly */
 227 const gchar *vik_viewport_get_background_color ( VikViewport *vvp )
 228 {
 229   static gchar color[8];
 230   g_snprintf(color, sizeof(color), "#%.2x%.2x%.2x", (int)(vvp->background_color.red/256),(int)(vvp->background_color.green/256),(int)(vvp->background_color.blue/256));
 231   return color;
 232 }
 233
 234 void vik_viewport_set_background_color ( VikViewport *vvp, const gchar *colorname )
 235 {
 236   g_assert ( vvp && vvp->background_gc );
 237   if ( gdk_color_parse ( colorname, &(vvp->background_color) ) )
 238     gdk_gc_set_rgb_fg_color ( vvp->background_gc, &(vvp->background_color) );
 239   else
 240     g_warning("%s: Failed to parse color '%s'", __FUNCTION__, colorname);
 241 }
 242
 243 void vik_viewport_set_background_gdkcolor ( VikViewport *vvp, GdkColor *color )
 244 {
 245   g_assert ( vvp && vvp->background_gc );
 246   vvp->background_color = *color;
 247   gdk_gc_set_rgb_fg_color ( vvp->background_gc, color );
 248 }
 249
 250 GdkColor *vik_viewport_get_highlight_gdkcolor ( VikViewport *vvp )
 251 {
 252   GdkColor *rv = g_malloc ( sizeof ( GdkColor ) );
 253   *rv = vvp->highlight_color;
 254   return rv;
 255 }
 256
 257 /* returns pointer to internal static storage, changes next time function called, use quickly */
 258 const gchar *vik_viewport_get_highlight_color ( VikViewport *vvp )
 259 {
 260   static gchar color[8];
 261   g_snprintf(color, sizeof(color), "#%.2x%.2x%.2x", (int)(vvp->highlight_color.red/256),(int)(vvp->highlight_color.green/256),(int)(vvp->highlight_color.blue/256));
 262   return color;
 263 }
 264
 265 void vik_viewport_set_highlight_color ( VikViewport *vvp, const gchar *colorname )
 266 {
 267   g_assert ( vvp->highlight_gc );
 268   gdk_color_parse ( colorname, &(vvp->highlight_color) );
 269   gdk_gc_set_rgb_fg_color ( vvp->highlight_gc, &(vvp->highlight_color) );
 270 }
 271
 272 void vik_viewport_set_highlight_gdkcolor ( VikViewport *vvp, GdkColor *color )
 273 {
 274   g_assert ( vvp->highlight_gc );
 275   vvp->highlight_color = *color;
 276   gdk_gc_set_rgb_fg_color ( vvp->highlight_gc, color );
 277 }
 278
 279 GdkGC *vik_viewport_get_gc_highlight ( VikViewport *vvp )
 280 {
 281   return vvp->highlight_gc;
 282 }
 283
 284 void vik_viewport_set_highlight_thickness ( VikViewport *vvp, gint thickness )
 285 {
 286   // Otherwise same GDK_* attributes as in vik_viewport_new_gc
 287   gdk_gc_set_line_attributes ( vvp->highlight_gc, thickness, GDK_LINE_SOLID, GDK_CAP_ROUND, GDK_JOIN_ROUND );
 288 }
 289
 290 GdkGC *vik_viewport_new_gc ( VikViewport *vvp, const gchar *colorname, gint thickness )
 291 {
 292   GdkGC *rv = NULL;
 293   GdkColor color;
 294
 295   rv = gdk_gc_new ( GTK_WIDGET(vvp)->window );
 296   if ( gdk_color_parse ( colorname, &color ) )
 297     gdk_gc_set_rgb_fg_color ( rv, &color );
 298   else
 299     g_warning("%s: Failed to parse color '%s'", __FUNCTION__, colorname);
 300   gdk_gc_set_line_attributes ( rv, thickness, GDK_LINE_SOLID, GDK_CAP_ROUND, GDK_JOIN_ROUND );
 301   return rv;
 302 }
 303
 304 GdkGC *vik_viewport_new_gc_from_color ( VikViewport *vvp, GdkColor *color, gint thickness )
 305 {
 306   GdkGC *rv;
 307
 308   rv = gdk_gc_new ( GTK_WIDGET(vvp)->window );
 309   gdk_gc_set_rgb_fg_color ( rv, color );
 310   gdk_gc_set_line_attributes ( rv, thickness, GDK_LINE_SOLID, GDK_CAP_ROUND, GDK_JOIN_ROUND );
 311   return rv;
 312 }
 313
 314 void vik_viewport_configure_manually ( VikViewport *vvp, gint width, guint height )
 315 {
 316   vvp->width = width;
 317   vvp->height = height;
 318   if ( vvp->scr_buffer )
 319     g_object_unref ( G_OBJECT ( vvp->scr_buffer ) );
 320   vvp->scr_buffer = gdk_pixmap_new ( GTK_WIDGET(vvp)->window, vvp->width, vvp->height, -1 );
 321
 322   /* TODO trigger: only if this is enabled !!! */
 323   if ( vvp->snapshot_buffer )
 324     g_object_unref ( G_OBJECT ( vvp->snapshot_buffer ) );
 325   vvp->snapshot_buffer = gdk_pixmap_new ( GTK_WIDGET(vvp)->window, vvp->width, vvp->height, -1 );
 326 }
 327
 328
 329 GdkPixmap *vik_viewport_get_pixmap ( VikViewport *vvp )
 330 {
 331   return vvp->scr_buffer;
 332 }
 333
 334 gboolean vik_viewport_configure ( VikViewport *vvp )
 335 {
 336   g_return_val_if_fail ( vvp != NULL, TRUE );
 337
 338   vvp->width = GTK_WIDGET(vvp)->allocation.width;
 339   vvp->height = GTK_WIDGET(vvp)->allocation.height;
 340
 341   if ( vvp->scr_buffer )
 342     g_object_unref ( G_OBJECT ( vvp->scr_buffer ) );
 343
 344   vvp->scr_buffer = gdk_pixmap_new ( GTK_WIDGET(vvp)->window, vvp->width, vvp->height, -1 );
 345
 346   /* TODO trigger: only if enabled! */
 347   if ( vvp->snapshot_buffer )
 348     g_object_unref ( G_OBJECT ( vvp->snapshot_buffer ) );
 349
 350   vvp->snapshot_buffer = gdk_pixmap_new ( GTK_WIDGET(vvp)->window, vvp->width, vvp->height, -1 );
 351   /* TODO trigger */
 352
 353   /* this is down here so it can get a GC (necessary?) */
 354   if ( !vvp->background_gc )
 355   {
 356     vvp->background_gc = vik_viewport_new_gc ( vvp, DEFAULT_BACKGROUND_COLOR, 1 );
 357     vik_viewport_set_background_color ( vvp, DEFAULT_BACKGROUND_COLOR );
 358   }
 359   if ( ! vvp->highlight_gc )
 360   {
 361     vvp->highlight_gc = vik_viewport_new_gc ( vvp, DEFAULT_HIGHLIGHT_COLOR, 1 );
 362     vik_viewport_set_highlight_color ( vvp, DEFAULT_HIGHLIGHT_COLOR );
 363   }
 364   if ( !vvp->scale_bg_gc) {
 365     vvp->scale_bg_gc = vik_viewport_new_gc(vvp, "grey", 3);
 366   }
 367
 368   return FALSE;
 369 }
 370
 371 static void viewport_finalize ( GObject *gob )
 372 {
 373   VikViewport *vvp = VIK_VIEWPORT(gob);
 374
 375   g_return_if_fail ( vvp != NULL );
 376
 377   if ( vvp->scr_buffer )
 378     g_object_unref ( G_OBJECT ( vvp->scr_buffer ) );
 379
 380   if ( vvp->snapshot_buffer )
 381     g_object_unref ( G_OBJECT ( vvp->snapshot_buffer ) );
 382
 383   if ( vvp->alpha_pixbuf )
 384     g_object_unref ( G_OBJECT ( vvp->alpha_pixbuf ) );
 385
 386   if ( vvp->background_gc )
 387     g_object_unref ( G_OBJECT ( vvp->background_gc ) );
 388
 389   if ( vvp->highlight_gc )
 390     g_object_unref ( G_OBJECT ( vvp->highlight_gc ) );
 391
 392   if ( vvp->scale_bg_gc ) {
 393     g_object_unref ( G_OBJECT ( vvp->scale_bg_gc ) );
 394     vvp->scale_bg_gc = NULL;
 395   }
 396
 397   G_OBJECT_CLASS(parent_class)->finalize(gob);
 398 }
 399
 400 /**
 401  * vik_viewport_clear:
 402  * @vvp: self object
 403  *
 404  * Clear the whole viewport.
 405  */
 406 void vik_viewport_clear ( VikViewport *vvp )
 407 {
 408   g_return_if_fail ( vvp != NULL );
 409   gdk_draw_rectangle(GDK_DRAWABLE(vvp->scr_buffer), vvp->background_gc, TRUE, 0, 0, vvp->width, vvp->height);
 410   vik_viewport_reset_copyrights ( vvp );
 411   vik_viewport_reset_logos ( vvp );
 412 }
 413
 414 /**
 415  * vik_viewport_set_draw_scale:
 416  * @vvp: self
 417  * @draw_scale: new value
 418  *
 419  * Enable/Disable display of scale.
 420  */
 421 void vik_viewport_set_draw_scale ( VikViewport *vvp, gboolean draw_scale )
 422 {
 423   vvp->draw_scale = draw_scale;
 424 }
 425
 426 gboolean vik_viewport_get_draw_scale ( VikViewport *vvp )
 427 {
 428   return vvp->draw_scale;
 429 }
 430
 431 void vik_viewport_draw_scale ( VikViewport *vvp )
 432 {
 433   g_return_if_fail ( vvp != NULL );
 434
 435   if ( vvp->draw_scale ) {
 436     VikCoord left, right;
 437     gdouble unit, base, diff, old_unit, old_diff, ratio;
 438     gint odd, len, SCSIZE = 5, HEIGHT=10;
 439     PangoFontDescription *pfd;
 440     PangoLayout *pl;
 441     gchar s[128];
 442
 443     vik_viewport_screen_to_coord ( vvp, 0, vvp->height, &left );
 444     vik_viewport_screen_to_coord ( vvp, vvp->width/SCSIZE, vvp->height, &right );
 445
 446     vik_units_distance_t dist_units = a_vik_get_units_distance ();
 447     switch (dist_units) {
 448     case VIK_UNITS_DISTANCE_KILOMETRES:
 449       base = vik_coord_diff ( &left, &right ); // in meters
 450       break;
 451     case VIK_UNITS_DISTANCE_MILES:
 452       // in 0.1 miles (copes better when zoomed in as 1 mile can be too big)
 453       base = VIK_METERS_TO_MILES(vik_coord_diff ( &left, &right )) * 10.0;
 454       break;
 455     default:
 456       base = 1; // Keep the compiler happy
 457       g_critical("Houston, we've had a problem. distance=%d", dist_units);
 458     }
 459     ratio = (vvp->width/SCSIZE)/base;
 460
 461     unit = 1;
 462     diff = fabs(base-unit);
 463     old_unit = unit;
 464     old_diff = diff;
 465     odd = 1;
 466     while (diff <= old_diff) {
 467       old_unit = unit;
 468       old_diff = diff;
 469       unit = unit * (odd%2 ? 5 : 2);
 470       diff = fabs(base-unit);
 471       odd++;
 472     }
 473     unit = old_unit;
 474     len = unit * ratio;
 475
 476     /* white background */
 477     vik_viewport_draw_line(vvp, vvp->scale_bg_gc,
 478                          PAD, vvp->height-PAD, PAD + len, vvp->height-PAD);
 479     vik_viewport_draw_line(vvp, vvp->scale_bg_gc,
 480                          PAD, vvp->height-PAD, PAD, vvp->height-PAD-HEIGHT);
 481     vik_viewport_draw_line(vvp, vvp->scale_bg_gc,
 482                          PAD + len, vvp->height-PAD, PAD + len, vvp->height-PAD-HEIGHT);
 483     /* black scale */
 484     vik_viewport_draw_line(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 485                          PAD, vvp->height-PAD, PAD + len, vvp->height-PAD);
 486     vik_viewport_draw_line(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 487                          PAD, vvp->height-PAD, PAD, vvp->height-PAD-HEIGHT);
 488     vik_viewport_draw_line(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 489                          PAD + len, vvp->height-PAD, PAD + len, vvp->height-PAD-HEIGHT);
 490     if (odd%2) {
 491       int i;
 492       for (i=1; i<5; i++) {
 493         vik_viewport_draw_line(vvp, vvp->scale_bg_gc,
 494                              PAD+i*len/5, vvp->height-PAD, PAD+i*len/5, vvp->height-PAD-((i==5)?(2*HEIGHT/3):(HEIGHT/2)));
 495         vik_viewport_draw_line(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 496                              PAD+i*len/5, vvp->height-PAD, PAD+i*len/5, vvp->height-PAD-((i==5)?(2*HEIGHT/3):(HEIGHT/2)));
 497       }
 498     } else {
 499       int i;
 500       for (i=1; i<10; i++) {
 501         vik_viewport_draw_line(vvp, vvp->scale_bg_gc,
 502                              PAD+i*len/10, vvp->height-PAD, PAD+i*len/10, vvp->height-PAD-((i==5)?(2*HEIGHT/3):(HEIGHT/2)));
 503         vik_viewport_draw_line(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 504                              PAD+i*len/10, vvp->height-PAD, PAD+i*len/10, vvp->height-PAD-((i==5)?(2*HEIGHT/3):(HEIGHT/2)));
 505       }
 506     }
 507     pl = gtk_widget_create_pango_layout (GTK_WIDGET(&vvp->drawing_area), NULL);
 508     pfd = pango_font_description_from_string ("Sans 8"); // FIXME: settable option? global variable?
 509     pango_layout_set_font_description (pl, pfd);
 510     pango_font_description_free (pfd);
 511
 512     switch (dist_units) {
 513     case VIK_UNITS_DISTANCE_KILOMETRES:
 514       if (unit >= 1000) {
 515         sprintf(s, "%d km", (int)unit/1000);
 516       } else {
 517         sprintf(s, "%d m", (int)unit);
 518       }
 519       break;
 520     case VIK_UNITS_DISTANCE_MILES:
 521       // Handle units in 0.1 miles
 522       if (unit < 10.0) {
 523         sprintf(s, "%0.1f miles", unit/10.0);
 524       }
 525       else if ((int)unit == 10.0) {
 526         sprintf(s, "1 mile");
 527       }
 528       else {
 529         sprintf(s, "%d miles", (int)(unit/10.0));
 530       }
 531       break;
 532     default:
 533       g_critical("Houston, we've had a problem. distance=%d", dist_units);
 534     }
 535     pango_layout_set_text(pl, s, -1);
 536     vik_viewport_draw_layout(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 537                            PAD + len + PAD, vvp->height - PAD - 10, pl);
 538     g_object_unref(pl);
 539     pl = NULL;
 540   }
 541 }
 542
 543 void vik_viewport_draw_copyright ( VikViewport *vvp )
 544 {
 545   g_return_if_fail ( vvp != NULL );
 546
 547   PangoFontDescription *pfd;
 548   PangoLayout *pl;
 549   PangoRectangle ink_rect, logical_rect;
 550   gchar s[128] = "";
 551
 552   /* compute copyrights string */
 553   guint len = g_slist_length ( vvp->copyrights );
 554   int i;
 555   for (i = 0 ; i < len ; i++)
 556   {
 557     gchar *copyright = g_slist_nth_data ( vvp->copyrights, i );
 558     strcat ( s, copyright );
 559     strcat ( s, " " );
 560   }
 561
 562   /* create pango layout */
 563   pl = gtk_widget_create_pango_layout (GTK_WIDGET(&vvp->drawing_area), NULL);
 564   pfd = pango_font_description_from_string ("Sans 8"); // FIXME: settable option? global variable?
 565   pango_layout_set_font_description (pl, pfd);
 566   pango_font_description_free (pfd);
 567   pfd = NULL;
 568   pango_layout_set_alignment ( pl, PANGO_ALIGN_RIGHT );
 569
 570   /* Set the text */
 571   pango_layout_set_text(pl, s, -1);
 572
 573   /* Use maximum of half the viewport width */
 574   pango_layout_set_width ( pl, ( vvp->width / 2 - PAD ) * PANGO_SCALE );
 575   pango_layout_get_pixel_extents(pl, &ink_rect, &logical_rect);
 576   vik_viewport_draw_layout(vvp, GTK_WIDGET(&vvp->drawing_area)->style->black_gc,
 577                            vvp->width / 2, vvp->height - PAD - logical_rect.height, pl);
 578
 579   /* Free memory */
 580   g_object_unref(pl);
 581   pl = NULL;
 582 }
 583
 584 /**
 585  * vik_viewport_set_draw_centermark:
 586  * @vvp: self object
 587  * @draw_centermark: new value
 588  *
 589  * Enable/Disable display of center mark.
 590  */
 591 void vik_viewport_set_draw_centermark ( VikViewport *vvp, gboolean draw_centermark )
 592 {
 593   vvp->draw_centermark = draw_centermark;
 594 }
 595
 596 gboolean vik_viewport_get_draw_centermark ( VikViewport *vvp )
 597 {
 598   return vvp->draw_centermark;
 599 }
 600
 601 void vik_viewport_draw_centermark ( VikViewport *vvp )
 602 {
 603   g_return_if_fail ( vvp != NULL );
 604
 605   if ( !vvp->draw_centermark )
 606     return;
 607
 608   const int len = 30;
 609   const int gap = 4;
 610   int center_x = vvp->width/2;
 611   int center_y = vvp->height/2;
 612   GdkGC * black_gc = GTK_WIDGET(&vvp->drawing_area)->style->black_gc;
 613
 614   /* white back ground */
 615   vik_viewport_draw_line(vvp, vvp->scale_bg_gc, center_x - len, center_y, center_x - gap, center_y);
 616   vik_viewport_draw_line(vvp, vvp->scale_bg_gc, center_x + gap, center_y, center_x + len, center_y);
 617   vik_viewport_draw_line(vvp, vvp->scale_bg_gc, center_x, center_y - len, center_x, center_y - gap);
 618   vik_viewport_draw_line(vvp, vvp->scale_bg_gc, center_x, center_y + gap, center_x, center_y + len);
 619   /* black fore ground */
 620   vik_viewport_draw_line(vvp, black_gc, center_x - len, center_y, center_x - gap, center_y);
 621   vik_viewport_draw_line(vvp, black_gc, center_x + gap, center_y, center_x + len, center_y);
 622   vik_viewport_draw_line(vvp, black_gc, center_x, center_y - len, center_x, center_y - gap);
 623   vik_viewport_draw_line(vvp, black_gc, center_x, center_y + gap, center_x, center_y + len);
 624
 625 }
 626
 627 void vik_viewport_draw_logo ( VikViewport *vvp )
 628 {
 629   g_return_if_fail ( vvp != NULL );
 630
 631   /* compute copyrights string */
 632   guint len = g_slist_length ( vvp->logos );
 633   gint x = vvp->width - PAD;
 634   gint y = PAD;
 635   int i;
 636   for (i = 0 ; i < len ; i++)
 637   {
 638     GdkPixbuf *logo = g_slist_nth_data ( vvp->logos, i );
 639     gint width = gdk_pixbuf_get_width ( logo );
 640     gint height = gdk_pixbuf_get_height ( logo );
 641     vik_viewport_draw_pixbuf ( vvp, logo, 0, 0, x - width, y, width, height );
 642     x = x - width - PAD;
 643   }
 644 }
 645
 646 void vik_viewport_set_draw_highlight ( VikViewport *vvp, gboolean draw_highlight )
 647 {
 648   vvp->draw_highlight = draw_highlight;
 649 }
 650
 651 gboolean vik_viewport_get_draw_highlight ( VikViewport *vvp )
 652 {
 653   return vvp->draw_highlight;
 654 }
 655
 656 void vik_viewport_sync ( VikViewport *vvp )
 657 {
 658   g_return_if_fail ( vvp != NULL );
 659   gdk_draw_drawable(GTK_WIDGET(vvp)->window, GTK_WIDGET(vvp)->style->bg_gc[0], GDK_DRAWABLE(vvp->scr_buffer), 0, 0, 0, 0, vvp->width, vvp->height);
 660 }
 661
 662 void vik_viewport_pan_sync ( VikViewport *vvp, gint x_off, gint y_off )
 663 {
 664   gint x, y, wid, hei;
 665
 666   g_return_if_fail ( vvp != NULL );
 667   gdk_draw_drawable(GTK_WIDGET(vvp)->window, GTK_WIDGET(vvp)->style->bg_gc[0], GDK_DRAWABLE(vvp->scr_buffer), 0, 0, x_off, y_off, vvp->width, vvp->height);
 668
 669   if (x_off >= 0) {
 670     x = 0;
 671     wid = x_off;
 672   } else {
 673     x = vvp->width+x_off;
 674     wid = -x_off;
 675   }
 676   if (y_off >= 0) {
 677     y = 0;
 678     hei = y_off;
 679   } else {
 680     y = vvp->height+y_off;
 681     hei = -y_off;
 682   }
 683   gtk_widget_queue_draw_area(GTK_WIDGET(vvp), x, 0, wid, vvp->height);
 684   gtk_widget_queue_draw_area(GTK_WIDGET(vvp), 0, y, vvp->width, hei);
 685 }
 686
 687 void vik_viewport_set_zoom ( VikViewport *vvp, gdouble xympp )
 688 {
 689   g_return_if_fail ( vvp != NULL );
 690   if ( xympp >= VIK_VIEWPORT_MIN_ZOOM && xympp <= VIK_VIEWPORT_MAX_ZOOM )
 691     vvp->xmpp = vvp->ympp = xympp;
 692
 693   if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_UTM )
 694     viewport_utm_zone_check(vvp);
 695 }
 696
 697 /* or could do factor */
 698 void vik_viewport_zoom_in ( VikViewport *vvp )
 699 {
 700   g_return_if_fail ( vvp != NULL );
 701   if ( vvp->xmpp >= (VIK_VIEWPORT_MIN_ZOOM*2) && vvp->ympp >= (VIK_VIEWPORT_MIN_ZOOM*2) )
 702   {
 703     vvp->xmpp /= 2;
 704     vvp->ympp /= 2;
 705
 706     viewport_utm_zone_check(vvp);
 707   }
 708 }
 709
 710 void vik_viewport_zoom_out ( VikViewport *vvp )
 711 {
 712   g_return_if_fail ( vvp != NULL );
 713   if ( vvp->xmpp <= (VIK_VIEWPORT_MAX_ZOOM/2) && vvp->ympp <= (VIK_VIEWPORT_MAX_ZOOM/2) )
 714   {
 715     vvp->xmpp *= 2;
 716     vvp->ympp *= 2;
 717
 718     viewport_utm_zone_check(vvp);
 719   }
 720 }
 721
 722 gdouble vik_viewport_get_zoom ( VikViewport *vvp )
 723 {
 724   if ( vvp->xmpp == vvp->ympp )
 725     return vvp->xmpp;
 726   return 0.0;
 727 }
 728
 729 gdouble vik_viewport_get_xmpp ( VikViewport *vvp )
 730 {
 731   return vvp->xmpp;
 732 }
 733
 734 gdouble vik_viewport_get_ympp ( VikViewport *vvp )
 735 {
 736   return vvp->ympp;
 737 }
 738
 739 void vik_viewport_set_xmpp ( VikViewport *vvp, gdouble xmpp )
 740 {
 741   if ( xmpp >= VIK_VIEWPORT_MIN_ZOOM && xmpp <= VIK_VIEWPORT_MAX_ZOOM ) {
 742     vvp->xmpp = xmpp;
 743     if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_UTM )
 744       viewport_utm_zone_check(vvp);
 745   }
 746 }
 747
 748 void vik_viewport_set_ympp ( VikViewport *vvp, gdouble ympp )
 749 {
 750   if ( ympp >= VIK_VIEWPORT_MIN_ZOOM && ympp <= VIK_VIEWPORT_MAX_ZOOM ) {
 751     vvp->ympp = ympp;
 752     if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_UTM )
 753       viewport_utm_zone_check(vvp);
 754   }
 755 }
 756
 757
 758 const VikCoord *vik_viewport_get_center ( VikViewport *vvp )
 759 {
 760   g_return_val_if_fail ( vvp != NULL, NULL );
 761   return &(vvp->center);
 762 }
 763
 764 /* called every time we update coordinates/zoom */
 765 static void viewport_utm_zone_check ( VikViewport *vvp )
 766 {
 767   if ( vvp->coord_mode == VIK_COORD_UTM )
 768   {
 769     struct UTM utm;
 770     struct LatLon ll;
 771     a_coords_utm_to_latlon ( (struct UTM *) &(vvp->center), &ll );
 772     a_coords_latlon_to_utm ( &ll, &utm );
 773     if ( utm.zone != vvp->center.utm_zone )
 774       *((struct UTM *)(&vvp->center)) = utm;
 775
 776     /* misc. stuff so we don't have to check later */
 777     vvp->utm_zone_width = viewport_utm_zone_width ( vvp );
 778     vvp->one_utm_zone = ( vik_viewport_rightmost_zone(vvp) == vik_viewport_leftmost_zone(vvp) );
 779   }
 780 }
 781
 782 void vik_viewport_set_center_latlon ( VikViewport *vvp, const struct LatLon *ll )
 783 {
 784   vik_coord_load_from_latlon ( &(vvp->center), vvp->coord_mode, ll );
 785   if ( vvp->coord_mode == VIK_COORD_UTM )
 786     viewport_utm_zone_check ( vvp );
 787 }
 788
 789 void vik_viewport_set_center_utm ( VikViewport *vvp, const struct UTM *utm )
 790 {
 791   vik_coord_load_from_utm ( &(vvp->center), vvp->coord_mode, utm );
 792   if ( vvp->coord_mode == VIK_COORD_UTM )
 793     viewport_utm_zone_check ( vvp );
 794 }
 795
 796 void vik_viewport_set_center_coord ( VikViewport *vvp, const VikCoord *coord )
 797 {
 798   vvp->center = *coord;
 799   if ( vvp->coord_mode == VIK_COORD_UTM )
 800     viewport_utm_zone_check ( vvp );
 801 }
 802
 803 void vik_viewport_corners_for_zonen ( VikViewport *vvp, int zone, VikCoord *ul, VikCoord *br )
 804 {
 805   g_return_if_fail ( vvp->coord_mode == VIK_COORD_UTM );
 806
 807   /* get center, then just offset */
 808   vik_viewport_center_for_zonen ( vvp, VIK_UTM(ul), zone );
 809   ul->mode = VIK_COORD_UTM;
 810   *br = *ul;
 811
 812   ul->north_south += (vvp->ympp * vvp->height / 2);
 813   ul->east_west -= (vvp->xmpp * vvp->width / 2);
 814   br->north_south -= (vvp->ympp * vvp->height / 2);
 815   br->east_west += (vvp->xmpp * vvp->width / 2);
 816 }
 817
 818 void vik_viewport_center_for_zonen ( VikViewport *vvp, struct UTM *center, int zone)
 819 {
 820   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 821     *center = *((struct UTM *)(vik_viewport_get_center ( vvp )));
 822     center->easting -= ( zone - center->zone ) * vvp->utm_zone_width;
 823     center->zone = zone;
 824   }
 825 }
 826
 827 gchar vik_viewport_leftmost_zone ( VikViewport *vvp )
 828 {
 829   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 830     VikCoord coord;
 831     g_assert ( vvp != NULL );
 832     vik_viewport_screen_to_coord ( vvp, 0, 0, &coord );
 833     return coord.utm_zone;
 834   }
 835   return '\0';
 836 }
 837
 838 gchar vik_viewport_rightmost_zone ( VikViewport *vvp )
 839 {
 840   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 841     VikCoord coord;
 842     g_assert ( vvp != NULL );
 843     vik_viewport_screen_to_coord ( vvp, vvp->width, 0, &coord );
 844     return coord.utm_zone;
 845   }
 846   return '\0';
 847 }
 848
 849
 850 void vik_viewport_set_center_screen ( VikViewport *vvp, int x, int y )
 851 {
 852   g_return_if_fail ( vvp != NULL );
 853   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 854     /* slightly optimized */
 855     vvp->center.east_west += vvp->xmpp * (x - (vvp->width/2));
 856     vvp->center.north_south += vvp->ympp * ((vvp->height/2) - y);
 857     viewport_utm_zone_check ( vvp );
 858   } else {
 859     VikCoord tmp;
 860     vik_viewport_screen_to_coord ( vvp, x, y, &tmp );
 861     vik_viewport_set_center_coord ( vvp, &tmp );
 862   }
 863 }
 864
 865 gint vik_viewport_get_width( VikViewport *vvp )
 866 {
 867   g_return_val_if_fail ( vvp != NULL, 0 );
 868   return vvp->width;
 869 }
 870
 871 gint vik_viewport_get_height( VikViewport *vvp )
 872 {
 873   g_return_val_if_fail ( vvp != NULL, 0 );
 874   return vvp->height;
 875 }
 876
 877 void vik_viewport_screen_to_coord ( VikViewport *vvp, int x, int y, VikCoord *coord )
 878 {
 879   g_return_if_fail ( vvp != NULL );
 880
 881   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 882     int zone_delta;
 883     struct UTM *utm = (struct UTM *) coord;
 884     coord->mode = VIK_COORD_UTM;
 885
 886     utm->zone = vvp->center.utm_zone;
 887     utm->letter = vvp->center.utm_letter;
 888     utm->easting = ( ( x - ( vvp->width / 2) ) * vvp->xmpp ) + vvp->center.east_west;
 889     zone_delta = floor( (utm->easting - EASTING_OFFSET ) / vvp->utm_zone_width + 0.5 );
 890     utm->zone += zone_delta;
 891     utm->easting -= zone_delta * vvp->utm_zone_width;
 892     utm->northing = ( ( ( vvp->height / 2) - y ) * vvp->ympp ) + vvp->center.north_south;
 893   } else if ( vvp->coord_mode == VIK_COORD_LATLON ) {
 894     coord->mode = VIK_COORD_LATLON;
 895     if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_LATLON ) {
 896       coord->east_west = vvp->center.east_west + (180.0 * vvp->xmpp / 65536 / 256 * (x - vvp->width/2));
 897       coord->north_south = vvp->center.north_south + (180.0 * vvp->ympp / 65536 / 256 * (vvp->height/2 - y));
 898     } else if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_EXPEDIA )
 899       calcxy_rev(&(coord->east_west), &(coord->north_south), x, y, vvp->center.east_west, vvp->center.north_south, vvp->xmpp * ALTI_TO_MPP, vvp->ympp * ALTI_TO_MPP, vvp->width/2, vvp->height/2);
 900     else if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_MERCATOR ) {
 901       /* FIXMERCATOR */
 902       coord->east_west = vvp->center.east_west + (180.0 * vvp->xmpp / 65536 / 256 * (x - vvp->width/2));
 903       coord->north_south = DEMERCLAT ( MERCLAT(vvp->center.north_south) + (180.0 * vvp->ympp / 65536 / 256 * (vvp->height/2 - y)) );
 904
 905 #if 0
 906 -->     THIS IS JUNK HERE.
 907       *y = vvp->height/2 + (65536.0 / 180 / vvp->ympp * (MERCLAT(center->lat) - MERCLAT(ll->lat)))*256.0;
 908
 909       (*y - vvp->height/2) / 256 / 65536 * 180 * vvp->ympp = (MERCLAT(center->lat) - MERCLAT(ll->lat);
 910       DML((180.0 * vvp->ympp / 65536 / 256 * (vvp->height/2 - y)) + ML(cl)) = ll
 911 #endif
 912     }
 913   }
 914 }
 915
 916 void vik_viewport_coord_to_screen ( VikViewport *vvp, const VikCoord *coord, int *x, int *y )
 917 {
 918   static VikCoord tmp;
 919   g_return_if_fail ( vvp != NULL );
 920
 921   if ( coord->mode != vvp->coord_mode )
 922   {
 923     g_warning ( "Have to convert in vik_viewport_coord_to_screen! This should never happen!");
 924     vik_coord_copy_convert ( coord, vvp->coord_mode, &tmp );
 925     coord = &tmp;
 926   }
 927
 928   if ( vvp->coord_mode == VIK_COORD_UTM ) {
 929     struct UTM *center = (struct UTM *) &(vvp->center);
 930     struct UTM *utm = (struct UTM *) coord;
 931     if ( center->zone != utm->zone && vvp->one_utm_zone )
 932     {
 933       *x = *y = VIK_VIEWPORT_UTM_WRONG_ZONE;
 934       return;
 935     }
 936
 937     *x = ( (utm->easting - center->easting) / vvp->xmpp ) + (vvp->width / 2) -
 938           (center->zone - utm->zone ) * vvp->utm_zone_width / vvp->xmpp;
 939     *y = (vvp->height / 2) - ( (utm->northing - center->northing) / vvp->ympp );
 940   } else if ( vvp->coord_mode == VIK_COORD_LATLON ) {
 941     struct LatLon *center = (struct LatLon *) &(vvp->center);
 942     struct LatLon *ll = (struct LatLon *) coord;
 943     double xx,yy;
 944     if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_LATLON ) {
 945       /* FIXMERCATOR: Optimize */
 946       *x = vvp->width/2 + (65536.0 / 180 / vvp->xmpp * (ll->lon - center->lon))*256.0;
 947       *y = vvp->height/2 + (65536.0 / 180 / vvp->ympp * (center->lat - ll->lat))*256.0;
 948     } else if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_EXPEDIA ) {
 949       calcxy ( &xx, &yy, center->lon, center->lat, ll->lon, ll->lat, vvp->xmpp * ALTI_TO_MPP, vvp->ympp * ALTI_TO_MPP, vvp->width / 2, vvp->height / 2 );
 950       *x = xx; *y = yy;
 951     } else if ( vvp->drawmode == VIK_VIEWPORT_DRAWMODE_MERCATOR ) {
 952       /* FIXMERCATOR: Optimize */
 953       *x = vvp->width/2 + (65536.0 / 180 / vvp->xmpp * (ll->lon - center->lon))*256.0;
 954       *y = vvp->height/2 + (65536.0 / 180 / vvp->ympp * (MERCLAT(center->lat) - MERCLAT(ll->lat)))*256.0;
 955     }
 956   }
 957 }
 958
 959 void a_viewport_clip_line ( gint *x1, gint *y1, gint *x2, gint *y2 )
 960 {
 961   if ( *x1 > 20000 || *x1 < -20000 ) {
 962     gdouble shrinkfactor = ABS(20000.0 / *x1);
 963     *x1 = *x2 + (shrinkfactor * (*x1-*x2));
 964     *y1 = *y2 + (shrinkfactor * (*y1-*y2));
 965   } else if ( *y1 > 20000 || *y1 < -20000 ) {
 966     gdouble shrinkfactor = ABS(20000.0 / *x1);
 967     *x1 = *x2 + (shrinkfactor * (*x1-*x2));
 968     *y1 = *y2 + (shrinkfactor * (*y1-*y2));
 969   } else if ( *x2 > 20000 || *x2 < -20000 ) {
 970     gdouble shrinkfactor = ABS(20000.0 / (gdouble)*x2);
 971     *x2 = *x1 + (shrinkfactor * (*x2-*x1));
 972     *y2 = *y1 + (shrinkfactor * (*y2-*y1));
 973   } else if ( *y2 > 20000 || *y2 < -20000 ) {
 974     gdouble shrinkfactor = ABS(20000.0 / (gdouble)*x2);
 975     *x2 = *x1 + (shrinkfactor * (*x2-*x1));
 976     *y2 = *y1 + (shrinkfactor * (*y2-*y1));
 977   }
 978 }
 979
 980 void vik_viewport_draw_line ( VikViewport *vvp, GdkGC *gc, gint x1, gint y1, gint x2, gint y2 )
 981 {
 982   if ( ! ( ( x1 < 0 && x2 < 0 ) || ( y1 < 0 && y2 < 0 ) ||
 983        ( x1 > vvp->width && x2 > vvp->width ) || ( y1 > vvp->height && y2 > vvp->height ) ) ) {
 984     /*** clipping, yeah! ***/
 985     a_viewport_clip_line ( &x1, &y1, &x2, &y2 );
 986     gdk_draw_line ( vvp->scr_buffer, gc, x1, y1, x2, y2);
 987   }
 988 }
 989
 990 void vik_viewport_draw_rectangle ( VikViewport *vvp, GdkGC *gc, gboolean filled, gint x1, gint y1, gint x2, gint y2 )
 991 {
 992   if ( x1 > -10 && x1 < vvp->width + 10 && y1 > -10 && y1 < vvp->height + 10 )
 993     gdk_draw_rectangle ( vvp->scr_buffer, gc, filled, x1, y1, x2, y2);
 994 }
 995
 996 void vik_viewport_draw_string ( VikViewport *vvp, GdkFont *font, GdkGC *gc, gint x1, gint y1, const gchar *string )
 997 {
 998   if ( x1 > -100 && x1 < vvp->width + 100 && y1 > -100 && y1 < vvp->height + 100 )
 999     gdk_draw_string ( vvp->scr_buffer, font, gc, x1, y1, string );
1000 }
1001
1002 /* shouldn't use this -- slow -- change the alpha channel instead. */
1003 void vik_viewport_draw_pixbuf_with_alpha ( VikViewport *vvp, GdkPixbuf *pixbuf, gint alpha,
1004                                            gint src_x, gint src_y, gint dest_x, gint dest_y, gint w, gint h )
1005 {
1006   gint real_dest_x = MAX(dest_x,0);
1007   gint real_dest_y = MAX(dest_y,0);
1008
1009   if ( alpha == 0 )
1010     return; /* don't waste your time */
1011
1012   if ( w > vvp->alpha_pixbuf_width || h > vvp->alpha_pixbuf_height )
1013   {
1014     if ( vvp->alpha_pixbuf )
1015       g_object_unref ( G_OBJECT ( vvp->alpha_pixbuf ) );
1016     vvp->alpha_pixbuf_width = MAX(w,vvp->alpha_pixbuf_width);
1017     vvp->alpha_pixbuf_height = MAX(h,vvp->alpha_pixbuf_height);
1018     vvp->alpha_pixbuf = gdk_pixbuf_new ( GDK_COLORSPACE_RGB, FALSE, 8, vvp->alpha_pixbuf_width, vvp->alpha_pixbuf_height );
1019   }
1020
1021   w = MIN(w,vvp->width - dest_x);
1022   h = MIN(h,vvp->height - dest_y);
1023
1024   /* check that we are drawing within boundaries. */
1025   src_x += (real_dest_x - dest_x);
1026   src_y += (real_dest_y - dest_y);
1027   w -= (real_dest_x - dest_x);
1028   h -= (real_dest_y - dest_y);
1029
1030   gdk_pixbuf_get_from_drawable ( vvp->alpha_pixbuf, vvp->scr_buffer, NULL,
1031                                  real_dest_x, real_dest_y, 0, 0, w, h );
1032
1033   /* do a composite */
1034   gdk_pixbuf_composite ( pixbuf, vvp->alpha_pixbuf, 0, 0, w, h, -src_x, -src_y, 1, 1, 0, alpha );
1035
1036   /* draw pixbuf_tmp */
1037   vik_viewport_draw_pixbuf ( vvp, vvp->alpha_pixbuf, 0, 0, real_dest_x, real_dest_y, w, h );
1038 }
1039
1040 void vik_viewport_draw_pixbuf ( VikViewport *vvp, GdkPixbuf *pixbuf, gint src_x, gint src_y,
1041                               gint dest_x, gint dest_y, gint w, gint h )
1042 {
1043   gdk_draw_pixbuf ( vvp->scr_buffer,
1044 // GTK_WIDGET(vvp)->style->black_gc,
1045 NULL,
1046  pixbuf,
1047                     src_x, src_y, dest_x, dest_y, w, h,
1048                     GDK_RGB_DITHER_NONE, 0, 0 );
1049 }
1050
1051 void vik_viewport_draw_arc ( VikViewport *vvp, GdkGC *gc, gboolean filled, gint x, gint y, gint width, gint height, gint angle1, gint angle2 )
1052 {
1053   gdk_draw_arc ( vvp->scr_buffer, gc, filled, x, y, width, height, angle1, angle2 );
1054 }
1055
1056
1057 void vik_viewport_draw_polygon ( VikViewport *vvp, GdkGC *gc, gboolean filled, GdkPoint *points, gint npoints )
1058 {
1059   gdk_draw_polygon ( vvp->scr_buffer, gc, filled, points, npoints );
1060 }
1061
1062 VikCoordMode vik_viewport_get_coord_mode ( const VikViewport *vvp )
1063 {
1064   g_assert ( vvp );
1065   return vvp->coord_mode;
1066 }
1067
1068 static void viewport_set_coord_mode ( VikViewport *vvp, VikCoordMode mode )
1069 {
1070   g_return_if_fail ( vvp != NULL );
1071   vvp->coord_mode = mode;
1072   vik_coord_convert ( &(vvp->center), mode );
1073 }
1074
1075 /* Thanks GPSDrive */
1076 static gboolean calcxy_rev(double *lg, double *lt, gint x, gint y, double zero_long, double zero_lat, double pixelfact_x, double pixelfact_y, gint mapSizeX2, gint mapSizeY2 )
1077 {
1078   int px, py;
1079   gdouble dif, lat, lon;
1080   double Ra = Radius[90+(gint)zero_lat];
1081
1082   px = (mapSizeX2 - x) * pixelfact_x;
1083   py = (-mapSizeY2 + y) * pixelfact_y;
1084
1085   lat = zero_lat - py / Ra;
1086   lat = zero_lat - py / Ra;
1087   lon =
1088     zero_long -
1089     px / (Ra *
1090          cos (lat * DEG2RAD));
1091
1092   dif = lat * (1 - (cos ((fabs (lon - zero_long)) * DEG2RAD)));
1093   lat = lat - dif / 1.5;
1094   lon =
1095     zero_long -
1096     px / (Ra *
1097               cos (lat * DEG2RAD));
1098
1099   *lt = lat;
1100   *lg = lon;
1101   return (TRUE);
1102 }
1103
1104 /* Thanks GPSDrive */
1105 static gboolean calcxy(double *x, double *y, double lg, double lt, double zero_long, double zero_lat, double pixelfact_x, double pixelfact_y, gint mapSizeX2, gint mapSizeY2 )
1106 {
1107     double dif;
1108     double Ra;
1109     gint mapSizeX = 2 * mapSizeX2;
1110     gint mapSizeY = 2 * mapSizeY2;
1111
1112     g_assert ( lt >= -90.0 && lt <= 90.0 );
1113 //    lg *= rad2deg; // FIXME, optimize equations
1114 //    lt *= rad2deg;
1115     Ra = Radius[90+(gint)lt];
1116     *x = Ra *
1117          cos (lt*DEG2RAD) * (lg - zero_long);
1118     *y = Ra * (lt - zero_lat);
1119     dif = Ra * RAD2DEG * (1 - (cos ((DEG2RAD * (lg - zero_long)))));
1120     *y = *y + dif / 1.85;
1121     *x = *x / pixelfact_x;
1122     *y = *y / pixelfact_y;
1123     *x = mapSizeX2 - *x;
1124     *y += mapSizeY2;
1125     if ((*x < 0)||(*x >= mapSizeX)||(*y < 0)||(*y >= mapSizeY))
1126         return (FALSE);
1127     return (TRUE);
1128 }
1129
1130 static void viewport_init_ra()
1131 {
1132   static gboolean done_before = FALSE;
1133   if ( !done_before )
1134   {
1135     gint i;
1136     for ( i = -90; i <= 90; i++)
1137       Radius[i+90] = calcR ( (double)i ) * DEG2RAD;
1138     done_before = TRUE;
1139   }
1140 }
1141
1142 double calcR (double lat)
1143 {
1144     double a = 6378.137, r, sc, x, y, z;
1145     double e2 = 0.081082 * 0.081082;
1146     /*
1147      * the radius of curvature of an ellipsoidal Earth in the plane of the
1148      * meridian is given by
1149      *
1150      * R' = a * (1 - e^2) / (1 - e^2 * (sin(lat))^2)^(3/2)
1151      *
1152      *
1153      * where a is the equatorial radius, b is the polar radius, and e is
1154      * the eccentricity of the ellipsoid = sqrt(1 - b^2/a^2)
1155      *
1156      * a = 6378 km (3963 mi) Equatorial radius (surface to center distance)
1157      * b = 6356.752 km (3950 mi) Polar radius (surface to center distance) e
1158      * = 0.081082 Eccentricity
1159      */
1160
1161     lat = lat * DEG2RAD;
1162     sc = sin (lat);
1163     x = a * (1.0 - e2);
1164     z = 1.0 - e2 * sc * sc;
1165     y = pow (z, 1.5);
1166     r = x / y;
1167     r = r * 1000.0;
1168     return r;
1169 }
1170
1171 gboolean vik_viewport_is_one_zone ( VikViewport *vvp )
1172 {
1173   return vvp->coord_mode == VIK_COORD_UTM && vvp->one_utm_zone;
1174 }
1175
1176 void vik_viewport_draw_layout ( VikViewport *vvp, GdkGC *gc, gint x, gint y, PangoLayout *layout )
1177 {
1178   if ( x > -100 && x < vvp->width + 100 && y > -100 && y < vvp->height + 100 )
1179     gdk_draw_layout ( vvp->scr_buffer, gc, x, y, layout );
1180 }
1181
1182 void vik_gc_get_fg_color ( GdkGC *gc, GdkColor *dest )
1183 {
1184   static GdkGCValues values;
1185   gdk_gc_get_values ( gc, &values );
1186   gdk_colormap_query_color ( gdk_colormap_get_system(), values.foreground.pixel, dest );
1187 }
1188
1189 GdkFunction vik_gc_get_function ( GdkGC *gc )
1190 {
1191   static GdkGCValues values;
1192   gdk_gc_get_values ( gc, &values );
1193   return values.function;
1194 }
1195
1196 void vik_viewport_set_drawmode ( VikViewport *vvp, VikViewportDrawMode drawmode )
1197 {
1198   vvp->drawmode = drawmode;
1199   if ( drawmode == VIK_VIEWPORT_DRAWMODE_UTM )
1200     viewport_set_coord_mode ( vvp, VIK_COORD_UTM );
1201   else {
1202     viewport_set_coord_mode ( vvp, VIK_COORD_LATLON );
1203   }
1204 }
1205
1206 VikViewportDrawMode vik_viewport_get_drawmode ( VikViewport *vvp )
1207 {
1208   return vvp->drawmode;
1209 }
1210
1211 /******** triggering *******/
1212 void vik_viewport_set_trigger ( VikViewport *vp, gpointer trigger )
1213 {
1214   vp->trigger = trigger;
1215 }
1216
1217 gpointer vik_viewport_get_trigger ( VikViewport *vp )
1218 {
1219   return vp->trigger;
1220 }
1221
1222 void vik_viewport_snapshot_save ( VikViewport *vp )
1223 {
1224   gdk_draw_drawable ( vp->snapshot_buffer, vp->background_gc, vp->scr_buffer, 0, 0, 0, 0, -1, -1 );
1225 }
1226
1227 void vik_viewport_snapshot_load ( VikViewport *vp )
1228 {
1229   gdk_draw_drawable ( vp->scr_buffer, vp->background_gc, vp->snapshot_buffer, 0, 0, 0, 0, -1, -1 );
1230 }
1231
1232 void vik_viewport_set_half_drawn(VikViewport *vp, gboolean half_drawn)
1233 {
1234   vp->half_drawn = half_drawn;
1235 }
1236
1237 gboolean vik_viewport_get_half_drawn( VikViewport *vp )
1238 {
1239   return vp->half_drawn;
1240 }
1241
1242
1243 const gchar *vik_viewport_get_drawmode_name(VikViewport *vv, VikViewportDrawMode mode)
1244  {
1245   const gchar *name = NULL;
1246   VikWindow *vw = NULL;
1247   GtkWidget *mode_button;
1248   GtkWidget *label;
1249
1250   vw = VIK_WINDOW_FROM_WIDGET(vv);
1251   mode_button = vik_window_get_drawmode_button(vw, mode);
1252   label = gtk_bin_get_child(GTK_BIN(mode_button));
1253
1254   name = gtk_label_get_text ( GTK_LABEL(label) );
1255
1256   return name;
1257
1258 }
1259
1260 void vik_viewport_get_min_max_lat_lon ( VikViewport *vp, gdouble *min_lat, gdouble *max_lat, gdouble *min_lon, gdouble *max_lon )
1261 {
1262   VikCoord tleft, tright, bleft, bright;
1263
1264   vik_viewport_screen_to_coord ( vp, 0, 0, &tleft );
1265   vik_viewport_screen_to_coord ( vp, vik_viewport_get_width(vp), 0, &tright );
1266   vik_viewport_screen_to_coord ( vp, 0, vik_viewport_get_height(vp), &bleft );
1267   vik_viewport_screen_to_coord ( vp, vp->width, vp->height, &bright );
1268
1269   vik_coord_convert(&tleft, VIK_COORD_LATLON);
1270   vik_coord_convert(&tright, VIK_COORD_LATLON);
1271   vik_coord_convert(&bleft, VIK_COORD_LATLON);
1272   vik_coord_convert(&bright, VIK_COORD_LATLON);
1273
1274   *max_lat = MAX(tleft.north_south, tright.north_south);
1275   *min_lat = MIN(bleft.north_south, bright.north_south);
1276   *max_lon = MAX(tright.east_west, bright.east_west);
1277   *min_lon = MIN(tleft.east_west, bleft.east_west);
1278 }
1279
1280 void vik_viewport_reset_copyrights ( VikViewport *vp )
1281 {
1282   g_return_if_fail ( vp != NULL );
1283   g_slist_foreach ( vp->copyrights, (GFunc)g_free, NULL );
1284   g_slist_free ( vp->copyrights );
1285   vp->copyrights = NULL;
1286 }
1287
1288 /**
1289  * vik_viewport_add_copyright:
1290  * @vp: self object
1291  * @copyright: new copyright to display
1292  *
1293  * Add a copyright to display on viewport.
1294  */
1295 void vik_viewport_add_copyright ( VikViewport *vp, const gchar *copyright )
1296 {
1297   g_return_if_fail ( vp != NULL );
1298   if ( copyright )
1299   {
1300     gchar *found = (gchar*)g_slist_find_custom ( vp->copyrights, copyright, (GCompareFunc)strcmp );
1301     if ( found == NULL )
1302     {
1303       gchar *duple = g_strdup ( copyright );
1304       vp->copyrights = g_slist_prepend ( vp->copyrights, duple );
1305     }
1306   }
1307 }
1308
1309 void vik_viewport_reset_logos ( VikViewport *vp )
1310 {
1311   g_return_if_fail ( vp != NULL );
1312   /* do not free elem */
1313   g_slist_free ( vp->logos );
1314   vp->logos = NULL;
1315 }
1316
1317 void vik_viewport_add_logo ( VikViewport *vp, const GdkPixbuf *logo )
1318 {
1319   g_return_if_fail ( vp != NULL );
1320   if ( logo )
1321   {
1322     GdkPixbuf *found = NULL; /* FIXME (GdkPixbuf*)g_slist_find_custom ( vp->logos, logo, (GCompareFunc)== ); */
1323     if ( found == NULL )
1324     {
1325       vp->logos = g_slist_prepend ( vp->logos, (gpointer)logo );
1326     }
1327   }
1328 }