git.maemo.org Git - navit-package/blob - navit/navit.c

   1 /**
   2  * Navit, a modular navigation system.
   3  * Copyright (C) 2005-2008 Navit Team
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License
   7  * version 2 as published by the Free Software Foundation.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the
  16  * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  17  * Boston, MA  02110-1301, USA.
  18  */
  19
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <signal.h>
  23 #include <string.h>
  24 #include <unistd.h>
  25 #include <fcntl.h>
  26 #include <glib.h>
  27 #include <math.h>
  28 #include <time.h>
  29 #include "config.h"
  30 #include "debug.h"
  31 #include "navit.h"
  32 #include "callback.h"
  33 #include "gui.h"
  34 #include "item.h"
  35 #include "projection.h"
  36 #include "map.h"
  37 #include "mapset.h"
  38 #include "main.h"
  39 #include "coord.h"
  40 #include "point.h"
  41 #include "transform.h"
  42 #include "param.h"
  43 #include "menu.h"
  44 #include "graphics.h"
  45 #include "cursor.h"
  46 #include "popup.h"
  47 #include "data_window.h"
  48 #include "route.h"
  49 #include "navigation.h"
  50 #include "speech.h"
  51 #include "track.h"
  52 #include "vehicle.h"
  53 #include "color.h"
  54 #include "layout.h"
  55 #include "log.h"
  56 #include "attr.h"
  57 #include "event.h"
  58 #include "file.h"
  59 #include "profile.h"
  60 #include "navit_nls.h"
  61
  62 /**
  63  * @defgroup navit the navit core instance. navit is the object containing nearly everything: A set of maps, one or more vehicle, a graphics object for rendering the map, a gui object for displaying the user interface, a route object, a navigation object and so on. Be warned that it is theoretically possible to have more than one navit object
  64  * @{
  65  */
  66
  67 //! The navit_vehicule
  68 struct navit_vehicle {
  69         int update;
  70         /*! Limit of the update counter. See navit_add_vehicle */
  71         int update_curr;
  72         /*! Deprecated : Update counter itself. When it reaches 'update' counts, route is updated */
  73         int follow;
  74         /*! Limit of the follow counter. See navit_add_vehicle */
  75         int follow_curr;
  76         /*! Deprecated : follow counter itself. When it reaches 'update' counts, map is recentered*/
  77         struct coord coord;
  78         int dir;
  79         int speed;
  80         struct coord last; /*< Position of the last update of this vehicle */
  81         struct color c;
  82         struct color *c2;
  83         struct cursor *cursor;
  84         struct vehicle *vehicle;
  85         struct attr callback;
  86         int animate_cursor;
  87 };
  88
  89 struct navit {
  90         struct attr self;
  91         GList *mapsets;
  92         GList *layouts;
  93         struct gui *gui;
  94         struct layout *layout_current;
  95         struct graphics *gra;
  96         struct action *action;
  97         struct transformation *trans;
  98         struct compass *compass;
  99         struct route *route;
 100         struct navigation *navigation;
 101         struct speech *speech;
 102         struct tracking *tracking;
 103         int ready;
 104         struct window *win;
 105         struct displaylist *displaylist;
 106         int cursor_flag;
 107         int tracking_flag;
 108         int orientation;
 109         int recentdest_count;
 110         GList *vehicles;
 111         GList *windows_items;
 112         struct navit_vehicle *vehicle;
 113         struct callback_list *attr_cbl;
 114         int pid;
 115         struct callback *nav_speech_cb;
 116         struct callback *roadbook_callback;
 117         struct callback *popup_callback;
 118         struct datawindow *roadbook_window;
 119         struct map *bookmark;
 120         struct map *former_destination;
 121         GHashTable *bookmarks_hash;
 122         struct point pressed, last, current;
 123         int button_pressed,moved,popped,zoomed;
 124         time_t last_moved;
 125         int center_timeout;
 126         struct event_timeout *button_timeout, *motion_timeout;
 127         struct callback *motion_timeout_callback;
 128         int ignore_button;
 129         int ignore_graphics_events;
 130         struct log *textfile_debug_log;
 131         struct pcoord destination;
 132         int destination_valid;
 133         int blocked;
 134         int w,h;
 135         int drag_bitmap;
 136         int use_mousewheel;
 137         GHashTable *commands;
 138         struct callback *resize_callback,*button_callback,*motion_callback;
 139 };
 140
 141 struct gui *main_loop_gui;
 142
 143 struct attr_iter {
 144         union {
 145                 GList *list;
 146                 struct mapset_handle *mapset_handle;
 147         } u;
 148 };
 149
 150 static void navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv);
 151 static void navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt);
 152 static int navit_add_vehicle(struct navit *this_, struct vehicle *v);
 153
 154 void
 155 navit_add_mapset(struct navit *this_, struct mapset *ms)
 156 {
 157         this_->mapsets = g_list_append(this_->mapsets, ms);
 158 }
 159
 160 struct mapset *
 161 navit_get_mapset(struct navit *this_)
 162 {
 163         if(this_->mapsets){
 164                 return this_->mapsets->data;
 165         } else {
 166                 dbg(0,"No mapsets enabled! Is it on purpose? Navit can't draw a map. Please check your navit.xml\n");
 167         }
 168         return NULL;
 169 }
 170
 171 struct tracking *
 172 navit_get_tracking(struct navit *this_)
 173 {
 174         return this_->tracking;
 175 }
 176
 177 void
 178 navit_draw(struct navit *this_)
 179 {
 180         GList *l;
 181         struct navit_vehicle *nv;
 182
 183         if (this_->blocked) {
 184                 this_->blocked |= 2;
 185                 return;
 186         }
 187         transform_setup_source_rect(this_->trans);
 188         l=this_->vehicles;
 189         while (l) {
 190                 nv=l->data;
 191                 navit_vehicle_draw(this_, nv, NULL);
 192                 l=g_list_next(l);
 193         }
 194         graphics_draw(this_->gra, this_->displaylist, this_->mapsets, this_->trans, this_->layout_current);
 195 #if 0
 196         {
 197         int i;
 198         for (i = 0 ; i < 500 ; i++)
 199                 graphics_displaylist_draw(this_->gra, this_->displaylist, this_->trans, this_->layout_current, 1);
 200         exit(0);
 201         }
 202 #endif
 203 }
 204
 205 void
 206 navit_draw_displaylist(struct navit *this_)
 207 {
 208         if (this_->ready == 3)
 209                 graphics_displaylist_draw(this_->gra, this_->displaylist, this_->trans, this_->layout_current, 1);
 210 }
 211
 212 void
 213 navit_handle_resize(struct navit *this_, int w, int h)
 214 {
 215         struct map_selection sel;
 216         memset(&sel, 0, sizeof(sel));
 217         this_->w=w;
 218         this_->h=h;
 219         sel.u.p_rect.rl.x=w;
 220         sel.u.p_rect.rl.y=h;
 221         transform_set_screen_selection(this_->trans, &sel);
 222         this_->ready |= 2;
 223         graphics_set_rect(this_->gra, &sel.u.p_rect);
 224         if (this_->ready == 3)
 225                 navit_draw(this_);
 226 }
 227
 228 static void
 229 navit_resize(void *data, int w, int h)
 230 {
 231         struct navit *this=data;
 232         if (!this->ignore_graphics_events)
 233                 navit_handle_resize(this, w, h);
 234 }
 235
 236 int
 237 navit_get_width(struct navit *this_)
 238 {
 239         return this_->w;
 240 }
 241
 242
 243 int
 244 navit_get_height(struct navit *this_)
 245 {
 246         return this_->h;
 247 }
 248
 249 static void
 250 navit_popup(void *data)
 251 {
 252         struct navit *this_=data;
 253         popup(this_, 1, &this_->pressed);
 254         this_->button_timeout=NULL;
 255         this_->popped=1;
 256 }
 257
 258
 259 void
 260 navit_ignore_button(struct navit *this_)
 261 {
 262         this_->ignore_button=1;
 263 }
 264
 265 void
 266 navit_ignore_graphics_events(struct navit *this_, int ignore)
 267 {
 268         this_->ignore_graphics_events=ignore;
 269 }
 270
 271 static void
 272 update_transformation(struct transformation *tr, struct point *old, struct point *new, struct point *rot)
 273 {
 274         struct coord co,cn;
 275         struct coord c,*cp;
 276         int yaw;
 277         double angleo,anglen;
 278
 279         transform_reverse(tr, old, &co);
 280         if (rot) {
 281                 angleo=atan2(old->y-rot->y, old->x-rot->x)*180/M_PI;
 282                 anglen=atan2(new->y-rot->y, new->x-rot->x)*180/M_PI;
 283                 yaw=transform_get_yaw(tr)+angleo-anglen;
 284                 transform_set_yaw(tr, yaw % 360);
 285         }
 286         transform_reverse(tr, new, &cn);
 287         cp=transform_get_center(tr);
 288         c.x=cp->x+co.x-cn.x;
 289         c.y=cp->y+co.y-cn.y;
 290         dbg(1,"from 0x%x,0x%x to 0x%x,0x%x\n", cp->x, cp->y, c.x, c.y);
 291         transform_set_center(tr, &c);
 292 }
 293
 294 int
 295 navit_handle_button(struct navit *this_, int pressed, int button, struct point *p, struct callback *popup_callback)
 296 {
 297         int border=16;
 298
 299         callback_list_call_attr_4(this_->attr_cbl, attr_button, this_, (void *)pressed, (void *)button, p);
 300         if (this_->ignore_button) {
 301                 this_->ignore_button=0;
 302                 return 0;
 303         }
 304         if (pressed) {
 305                 this_->pressed=*p;
 306                 this_->last=*p;
 307                 this_->zoomed=0;
 308                 if (button == 1) {
 309                         this_->button_pressed=1;
 310                         this_->moved=0;
 311                         this_->popped=0;
 312                         if (popup_callback)
 313                                 this_->button_timeout=event_add_timeout(500, 0, popup_callback);
 314                 }
 315                 if (button == 2)
 316                         navit_set_center_screen(this_, p);
 317                 if (button == 3)
 318                         popup(this_, button, p);
 319                 if (button == 4 && this_->use_mousewheel) {
 320                         this_->zoomed = 1;
 321                         navit_zoom_in(this_, 2, p);
 322                 }
 323                 if (button == 5 && this_->use_mousewheel) {
 324                         this_->zoomed = 1;
 325                         navit_zoom_out(this_, 2, p);
 326                 }
 327         } else {
 328                 this_->button_pressed=0;
 329                 if (this_->button_timeout) {
 330                         event_remove_timeout(this_->button_timeout);
 331                         this_->button_timeout=NULL;
 332                         if (! this_->moved && ! transform_within_border(this_->trans, p, border)) {
 333                                 if (!this_->zoomed) {
 334                                         this_->last_moved = time(NULL);
 335                                 }
 336                                 navit_set_center_screen(this_, p);
 337                         }
 338                 }
 339                 if (this_->motion_timeout) {
 340                         event_remove_timeout(this_->motion_timeout);
 341                         this_->motion_timeout=NULL;
 342                 }
 343                 if (this_->moved) {
 344                         struct point pr;
 345                         pr.x=this_->w/2;
 346                         pr.y=this_->h;
 347 #if 0
 348                         update_transformation(this_->trans, &this_->pressed, p, &pr);
 349 #else
 350                         update_transformation(this_->trans, &this_->pressed, p, NULL);
 351 #endif
 352                         graphics_draw_drag(this_->gra, NULL);
 353                         graphics_overlay_disable(this_->gra, 0);
 354                         if (!this_->zoomed) {
 355                                 this_->last_moved = time(NULL);
 356                         }
 357                         navit_draw(this_);
 358                 } else
 359                         return 1;
 360         }
 361         return 0;
 362 }
 363
 364 static void
 365 navit_button(void *data, int pressed, int button, struct point *p)
 366 {
 367         struct navit *this=data;
 368         if (!this->ignore_graphics_events) {
 369                 if (! this->popup_callback)
 370                         this->popup_callback=callback_new_1(callback_cast(navit_popup), this);
 371                 navit_handle_button(this, pressed, button, p, this->popup_callback);
 372         }
 373 }
 374
 375
 376 static void
 377 navit_motion_timeout(struct navit *this_)
 378 {
 379         int dx, dy;
 380
 381         if (this_->drag_bitmap) {
 382                 struct point point;
 383                 point.x=(this_->current.x-this_->pressed.x);
 384                 point.y=(this_->current.y-this_->pressed.y);
 385                 if (graphics_draw_drag(this_->gra, &point)) {
 386                         graphics_overlay_disable(this_->gra, 1);
 387                         graphics_draw_mode(this_->gra, draw_mode_end);
 388                         this_->moved=1;
 389                         this_->motion_timeout=NULL;
 390                         return;
 391                 }
 392         }
 393         dx=(this_->current.x-this_->last.x);
 394         dy=(this_->current.y-this_->last.y);
 395         if (dx || dy) {
 396                 struct transformation *tr;
 397                 struct point pr;
 398                 this_->last=this_->current;
 399                 graphics_overlay_disable(this_->gra, 1);
 400                 tr=transform_dup(this_->trans);
 401                 pr.x=this_->w/2;
 402                 pr.y=this_->h;
 403 #if 0
 404                 update_transformation(tr, &this_->pressed, &this_->current, &pr);
 405 #else
 406                 update_transformation(tr, &this_->pressed, &this_->current, NULL);
 407 #endif
 408 #if 0
 409                 graphics_displaylist_move(this_->displaylist, dx, dy);
 410 #endif
 411                 graphics_displaylist_draw(this_->gra, this_->displaylist, tr, this_->layout_current, 0);
 412                 transform_destroy(tr);
 413                 this_->moved=1;
 414         }
 415         this_->motion_timeout=NULL;
 416         return;
 417 }
 418
 419 void
 420 navit_handle_motion(struct navit *this_, struct point *p)
 421 {
 422         int dx, dy;
 423
 424         if (this_->button_pressed && !this_->popped) {
 425                 dx=(p->x-this_->pressed.x);
 426                 dy=(p->y-this_->pressed.y);
 427                 if (dx < -8 || dx > 8 || dy < -8 || dy > 8) {
 428                         if (this_->button_timeout) {
 429                                 event_remove_timeout(this_->button_timeout);
 430                                 this_->button_timeout=NULL;
 431                         }
 432                         this_->current=*p;
 433                         if (! this_->motion_timeout_callback)
 434                                 this_->motion_timeout_callback=callback_new_1(callback_cast(navit_motion_timeout), this_);
 435                         if (! this_->motion_timeout)
 436                                 this_->motion_timeout=event_add_timeout(100, 0, this_->motion_timeout_callback);
 437                 }
 438         }
 439 }
 440
 441 static void
 442 navit_motion(void *data, struct point *p)
 443 {
 444         struct navit *this=data;
 445         if (!this->ignore_graphics_events)
 446                 navit_handle_motion(this, p);
 447 }
 448
 449 static void
 450 navit_scale(struct navit *this_, long scale, struct point *p)
 451 {
 452         struct coord c1, c2, *center;
 453         if (p)
 454                 transform_reverse(this_->trans, p, &c1);
 455         transform_set_scale(this_->trans, scale);
 456         if (p) {
 457                 transform_reverse(this_->trans, p, &c2);
 458                 center = transform_center(this_->trans);
 459                 center->x += c1.x - c2.x;
 460                 center->y += c1.y - c2.y;
 461         }
 462         navit_draw(this_);
 463 }
 464
 465 /**
 466  * Change the current zoom level, zooming closer to the ground
 467  *
 468  * @param navit The navit instance
 469  * @param factor The zoom factor, usually 2
 470  * @param p The invariant point (if set to NULL, default to center)
 471  * @returns nothing
 472  */
 473 void
 474 navit_zoom_in(struct navit *this_, int factor, struct point *p)
 475 {
 476         long scale=transform_get_scale(this_->trans)/factor;
 477         if (scale < 1)
 478                 scale=1;
 479         navit_scale(this_, scale, p);
 480 }
 481
 482 /**
 483  * Change the current zoom level
 484  *
 485  * @param navit The navit instance
 486  * @param factor The zoom factor, usually 2
 487  * @param p The invariant point (if set to NULL, default to center)
 488  * @returns nothing
 489  */
 490 void
 491 navit_zoom_out(struct navit *this_, int factor, struct point *p)
 492 {
 493         long scale=transform_get_scale(this_->trans)*factor;
 494         navit_scale(this_, scale, p);
 495 }
 496
 497 struct navit *
 498 navit_new(struct attr *parent, struct attr **attrs)
 499 {
 500         struct navit *this_=g_new0(struct navit, 1);
 501         struct pcoord center;
 502         struct coord co;
 503         struct coord_geo g;
 504         enum projection pro=projection_mg;
 505         int zoom = 256;
 506         FILE *f;
 507         g.lat=53.13;
 508         g.lng=11.70;
 509
 510         this_->self.type=attr_navit;
 511         this_->self.u.navit=this_;
 512         this_->attr_cbl=callback_list_new();
 513         main_add_navit(this_);
 514
 515 #if !defined(_WIN32) && !defined(__CEGCC__)
 516         f=popen("pidof /usr/bin/ipaq-sleep","r");
 517         if (f) {
 518                 fscanf(f,"%d",&this_->pid);
 519                 dbg(1,"ipaq_sleep pid=%d\n", this_->pid);
 520                 pclose(f);
 521         }
 522 #endif
 523
 524         this_->bookmarks_hash=g_hash_table_new_full(g_str_hash, g_str_equal, g_free, NULL);
 525
 526         this_->cursor_flag=1;
 527         this_->orientation=-1;
 528         this_->tracking_flag=1;
 529         this_->recentdest_count=10;
 530
 531         this_->last_moved = 0;
 532         this_->center_timeout = 10;
 533         this_->use_mousewheel = 1;
 534
 535         for (;*attrs; attrs++) {
 536                 switch((*attrs)->type) {
 537                 case attr_zoom:
 538                         zoom=(*attrs)->u.num;
 539                         break;
 540                 case attr_center:
 541                         g=*((*attrs)->u.coord_geo);
 542                         break;
 543                 case attr_cursor:
 544                         this_->cursor_flag=!!(*attrs)->u.num;
 545                         break;
 546                 case attr_orientation:
 547                         this_->orientation=(*attrs)->u.num;
 548                         break;
 549                 case attr_tracking:
 550                         this_->tracking_flag=!!(*attrs)->u.num;
 551                         break;
 552                 case attr_recent_dest:
 553                         this_->recentdest_count=(*attrs)->u.num;
 554                         break;
 555                 case attr_drag_bitmap:
 556                         this_->drag_bitmap=!!(*attrs)->u.num;
 557                         break;
 558                 case attr_use_mousewheel:
 559                         this_->use_mousewheel=!!(*attrs)->u.num;
 560                         break;
 561                 case attr_timeout:
 562                         this_->center_timeout = (*attrs)->u.num;
 563                         break;
 564                 default:
 565                         dbg(0, "Unexpected attribute %x\n",(*attrs)->type);
 566                         break;
 567                 }
 568         }
 569         transform_from_geo(pro, &g, &co);
 570         center.x=co.x;
 571         center.y=co.y;
 572         center.pro = pro;
 573
 574         this_->trans=transform_new();
 575         transform_setup(this_->trans, &center, zoom, (this_->orientation != -1) ? this_->orientation : 0);
 576         this_->displaylist=graphics_displaylist_new();
 577         this_->commands=g_hash_table_new(g_str_hash, g_str_equal);
 578         navit_command_register(this_, "zoom_in", callback_new_3(callback_cast(navit_zoom_in), this_, (void *)2, NULL));
 579         navit_command_register(this_, "zoom_out", callback_new_3(callback_cast(navit_zoom_out), this_, (void *)2, NULL));
 580         return this_;
 581 }
 582
 583 static int
 584 navit_set_gui(struct navit *this_, struct gui *gui)
 585 {
 586         if (this_->gui)
 587                 return 0;
 588         this_->gui=gui;
 589         if (gui_has_main_loop(this_->gui)) {
 590                 if (! main_loop_gui) {
 591                         main_loop_gui=this_->gui;
 592                 } else {
 593                         dbg(0,"gui with main loop already active, ignoring this instance");
 594                         return 0;
 595                 }
 596         }
 597         return 1;
 598 }
 599
 600 static int
 601 navit_set_graphics(struct navit *this_, struct graphics *gra)
 602 {
 603         if (this_->gra)
 604                 return 0;
 605         this_->gra=gra;
 606         this_->resize_callback=callback_new_attr_1(callback_cast(navit_resize), attr_resize, this_);
 607         graphics_add_callback(gra, this_->resize_callback);
 608         this_->button_callback=callback_new_attr_1(callback_cast(navit_button), attr_button, this_);
 609         graphics_add_callback(gra, this_->button_callback);
 610         this_->motion_callback=callback_new_attr_1(callback_cast(navit_motion), attr_motion, this_);
 611         graphics_add_callback(gra, this_->motion_callback);
 612         return 1;
 613 }
 614
 615 struct graphics *
 616 navit_get_graphics(struct navit *this_)
 617 {
 618         return this_->gra;
 619 }
 620
 621 static void
 622 navit_projection_set(struct navit *this_, enum projection pro)
 623 {
 624         struct coord_geo g;
 625         struct coord *c;
 626
 627         c=transform_center(this_->trans);
 628         transform_to_geo(transform_get_projection(this_->trans), c, &g);
 629         transform_set_projection(this_->trans, pro);
 630         transform_from_geo(pro, &g, c);
 631         navit_draw(this_);
 632 }
 633
 634 /**
 635  * @param limit Limits the number of entries in the "backlog". Set to 0 for "infinite"
 636  */
 637 static void
 638 navit_append_coord(struct navit *this_, char *file, struct pcoord *c, const char *type, const char *description, GHashTable *h, int limit)
 639 {
 640         FILE *f;
 641         int offset=0;
 642         char *buffer;
 643         int ch,prev,lines=0;
 644         int numc,readc;
 645         int fd;
 646         const char *prostr;
 647
 648         f=fopen(file, "r");
 649         if (!f)
 650                 goto new_file;
 651         if (limit != 0) {
 652                 prev = '\n';
 653                 while ((ch = fgetc(f)) != EOF) {
 654                         if ((ch == '\n') && (prev != '\n')) {
 655                                 lines++;
 656                         }
 657                         prev = ch;
 658                 }
 659
 660                 if (prev != '\n') { // Last line did not end with a newline
 661                         lines++;
 662                 }
 663
 664                 fclose(f);
 665                 f = fopen(file, "r+");
 666                 fd = fileno(f);
 667                 while (lines >= limit) { // We have to "scroll up"
 668                         rewind(f);
 669                         numc = 0; // Counts how many bytes we have in our line to scroll up
 670                         while ((ch = fgetc(f)) != EOF) {
 671                                 numc++;
 672                                 if (ch == '\n') {
 673                                         break;
 674                                 }
 675                         }
 676
 677                         buffer=g_malloc(numc);
 678                         offset = numc; // Offset holds where we currently are
 679
 680                         do {
 681                                 fseek(f,offset,SEEK_SET);
 682                                 readc = fread(buffer,1,numc,f);
 683
 684                                 fseek(f,-(numc+readc),SEEK_CUR);
 685                                 fwrite(buffer,1,readc,f);
 686
 687                                 offset += readc;
 688                         } while (readc == numc);
 689
 690                         g_free(buffer);
 691                         fflush(f);
 692                         ftruncate(fd,(offset-numc));
 693 #ifdef HAVE_FSYNC
 694                         fsync(fd);
 695 #endif
 696
 697                         lines--;
 698                 }
 699                 fclose(f);
 700         }
 701
 702 new_file:
 703         f=fopen(file, "a");
 704         if (f) {
 705                 if (c) {
 706                         prostr = projection_to_name(c->pro);
 707                         fprintf(f,"%s%s%s0x%x %s0x%x type=%s label=\"%s\"\n",
 708                                  prostr, *prostr ? ":" : "",
 709                                  c->x >= 0 ? "":"-", c->x >= 0 ? c->x : -c->x,
 710                                  c->y >= 0 ? "":"-", c->y >= 0 ? c->y : -c->y,
 711                                  type, description);
 712                 } else
 713                         fprintf(f,"\n");
 714                 fclose(f);
 715         }
 716 }
 717
 718 /*
 719  * navit_get_user_data_directory
 720  *
 721  * returns the directory used to store user data files (center.txt,
 722  * destination.txt, bookmark.txt, ...)
 723  *
 724  * arg: gboolean create: create the directory if it does not exist
 725  */
 726 static char*
 727 navit_get_user_data_directory(gboolean create) {
 728         char *dir;
 729         dir = getenv("NAVIT_USER_DATADIR");
 730         if (create && !file_exists(dir)) {
 731                 dbg(0,"creating dir %s\n", dir);
 732                 if (file_mkdir(dir,0)) {
 733                         dbg(0,"failed creating dir %s\n", dir);
 734                         return NULL;
 735                 }
 736         }
 737
 738         return dir;
 739 }
 740
 741 /*
 742  * navit_get_destination_file
 743  *
 744  * returns the name of the file used to store destinations with its
 745  * full path
 746  *
 747  * arg: gboolean create: create the directory where the file is stored
 748  * if it does not exist
 749  */
 750 static char*
 751 navit_get_destination_file(gboolean create)
 752 {
 753         return g_strjoin(NULL, navit_get_user_data_directory(create), "/destination.txt", NULL);
 754 }
 755
 756 /*
 757  * navit_get_bookmark_file
 758  *
 759  * returns the name of the file used to store bookmarks with its
 760  * full path
 761  *
 762  * arg: gboolean create: create the directory where the file is stored
 763  * if it does not exist
 764  */
 765 static char*
 766 navit_get_bookmark_file(gboolean create)
 767 {
 768         return g_strjoin(NULL, navit_get_user_data_directory(create), "/bookmark.txt", NULL);
 769 }
 770
 771
 772 /*
 773  * navit_get_bookmark_file
 774  *
 775  * returns the name of the file used to store the center file  with its
 776  * full path
 777  *
 778  * arg: gboolean create: create the directory where the file is stored
 779  * if it does not exist
 780  */
 781 static char*
 782 navit_get_center_file(gboolean create)
 783 {
 784         return g_strjoin(NULL, navit_get_user_data_directory(create), "/center.txt", NULL);
 785 }
 786
 787 static void
 788 navit_set_center_from_file(struct navit *this_, char *file)
 789 {
 790         FILE *f;
 791         char *line = NULL;
 792
 793         size_t line_size = 0;
 794         enum projection pro;
 795         struct coord *center;
 796
 797         f = fopen(file, "r");
 798         if (! f)
 799                 return;
 800         getline(&line, &line_size, f);
 801         fclose(f);
 802         if (line) {
 803                 center = transform_center(this_->trans);
 804                 pro = transform_get_projection(this_->trans);
 805                 coord_parse(g_strchomp(line), pro, center);
 806                 free(line);
 807         }
 808         return;
 809 }
 810
 811 static void
 812 navit_write_center_to_file(struct navit *this_, char *file)
 813 {
 814         FILE *f;
 815         enum projection pro;
 816         struct coord *center;
 817
 818         f = fopen(file, "w+");
 819         if (f) {
 820                 center = transform_center(this_->trans);
 821                 pro = transform_get_projection(this_->trans);
 822                 coord_print(pro, center, f);
 823                 fclose(f);
 824         } else {
 825                 perror(file);
 826         }
 827         return;
 828 }
 829
 830
 831 /**
 832  * Start the route computing to a given set of coordinates
 833  *
 834  * @param navit The navit instance
 835  * @param c The coordinate to start routing to
 836  * @param description A label which allows the user to later identify this destination in the former destinations selection
 837  * @returns nothing
 838  */
 839 void
 840 navit_set_destination(struct navit *this_, struct pcoord *c, const char *description)
 841 {
 842         if (c) {
 843                 this_->destination=*c;
 844                 this_->destination_valid=1;
 845         } else
 846                 this_->destination_valid=0;
 847         char *destination_file = navit_get_destination_file(TRUE);
 848         navit_append_coord(this_, destination_file, c, "former_destination", description, NULL, this_->recentdest_count);
 849         g_free(destination_file);
 850         callback_list_call_attr_0(this_->attr_cbl, attr_destination);
 851         if (this_->route) {
 852                 route_set_destination(this_->route, c);
 853                 if (this_->navigation) {
 854                         navigation_flush(this_->navigation);
 855                         navigation_update(this_->navigation, this_->route);
 856                 }
 857
 858                 if (this_->ready == 3)
 859                         navit_draw(this_);
 860         }
 861 }
 862
 863 /**
 864  * @brief Checks if a route is calculated
 865  *
 866  * This function checks if a route is calculated.
 867  *
 868  * @param this_ The navit struct whose route should be checked.
 869  * @return True if the route is set, false otherwise.
 870  */
 871 int
 872 navit_check_route(struct navit *this_)
 873 {
 874         if (this_->route) {
 875                 return route_get_path_set(this_->route);
 876         }
 877
 878         return 0;
 879 }
 880
 881 /**
 882  * Record the given set of coordinates as a bookmark
 883  *
 884  * @param navit The navit instance
 885  * @param c The coordinate to store
 886  * @param description A label which allows the user to later identify this bookmark
 887  * @returns nothing
 888  */
 889 void
 890 navit_add_bookmark(struct navit *this_, struct pcoord *c, const char *description)
 891 {
 892         char *bookmark_file = navit_get_bookmark_file(TRUE);
 893         navit_append_coord(this_,bookmark_file, c, "bookmark", description, this_->bookmarks_hash,0);
 894         g_free(bookmark_file);
 895
 896         callback_list_call_attr_0(this_->attr_cbl, attr_bookmark_map);
 897 }
 898
 899 struct navit *global_navit;
 900
 901 static void
 902 navit_add_bookmarks_from_file(struct navit *this_)
 903 {
 904         char *bookmark_file = navit_get_bookmark_file(FALSE);
 905         struct attr parent={attr_navit, .u.navit=this_};
 906         struct attr type={attr_type, {"textfile"}}, data={attr_data, {bookmark_file}};
 907         struct attr *attrs[]={&type, &data, NULL};
 908
 909         this_->bookmark=map_new(&parent, attrs);
 910         g_free(bookmark_file);
 911 }
 912
 913 static int
 914 navit_former_destinations_active(struct navit *this_)
 915 {
 916         char *destination_file = navit_get_destination_file(FALSE);
 917         FILE *f;
 918         int active=0;
 919         char buffer[3];
 920         f=fopen(destination_file,"r");
 921         if (f) {
 922                 if(!fseek(f, -2, SEEK_END) && fread(buffer, 2, 1, f) == 1 && (buffer[0]!='\n' || buffer[1]!='\n'))
 923                         active=1;
 924                 fclose(f);
 925         }
 926         g_free(destination_file);
 927         return active;
 928 }
 929
 930 static void
 931 navit_add_former_destinations_from_file(struct navit *this_)
 932 {
 933         char *destination_file = navit_get_destination_file(FALSE);
 934         struct attr parent={attr_navit, .u.navit=this_};
 935         struct attr type={attr_type, {"textfile"}}, data={attr_data, {destination_file}};
 936         struct attr *attrs[]={&type, &data, NULL};
 937         struct map_rect *mr;
 938         struct item *item;
 939         int valid=0;
 940         struct coord c;
 941         struct pcoord pc;
 942
 943         this_->former_destination=map_new(&parent, attrs);
 944         g_free(destination_file);
 945         if (!this_->route || !navit_former_destinations_active(this_))
 946                 return;
 947         mr=map_rect_new(this_->former_destination, NULL);
 948         while ((item=map_rect_get_item(mr))) {
 949                 if (item->type == type_former_destination && item_coord_get(item, &c, 1))
 950                         valid=1;
 951         }
 952         map_rect_destroy(mr);
 953         pc.pro=map_projection(this_->former_destination);
 954         pc.x=c.x;
 955         pc.y=c.y;
 956         if (valid) {
 957                 route_set_destination(this_->route, &pc);
 958                 this_->destination=pc;
 959                 this_->destination_valid=1;
 960         }
 961 }
 962
 963
 964 static void
 965 navit_textfile_debug_log(struct navit *this_, const char *fmt, ...)
 966 {
 967         va_list ap;
 968         char *str1,*str2;
 969         va_start(ap, fmt);
 970         if (this_->textfile_debug_log && this_->vehicle) {
 971                 str1=g_strdup_vprintf(fmt, ap);
 972                 str2=g_strdup_printf("0x%x 0x%x%s%s\n", this_->vehicle->coord.x, this_->vehicle->coord.y, strlen(str1) ? " " : "", str1);
 973                 log_write(this_->textfile_debug_log, str2, strlen(str2));
 974                 g_free(str2);
 975                 g_free(str1);
 976         }
 977         va_end(ap);
 978 }
 979
 980 int
 981 navit_speech_estimate(struct navit *this_, char *str)
 982 {
 983         return speech_estimate_duration(this_->speech, str);
 984 }
 985
 986 void
 987 navit_say(struct navit *this_, char *text)
 988 {
 989         speech_say(this_->speech, text);
 990 }
 991
 992 void
 993 navit_speak(struct navit *this_)
 994 {
 995         struct navigation *nav=this_->navigation;
 996         struct map *map=NULL;
 997         struct map_rect *mr=NULL;
 998         struct item *item;
 999         struct attr attr;
1000
1001     if (!speech_get_attr(this_->speech, attr_active, &attr, NULL))
1002         attr.u.num = 1;
1003     dbg(1, "this_.speech->active %i\n", attr.u.num);
1004     if(!attr.u.num)
1005         return;
1006
1007         if (nav)
1008                 map=navigation_get_map(nav);
1009         if (map)
1010                 mr=map_rect_new(map, NULL);
1011         if (mr) {
1012                 while ((item=map_rect_get_item(mr)) && (item->type == type_nav_position || item->type == type_nav_none));
1013                 if (item && item_attr_get(item, attr_navigation_speech, &attr)) {
1014                         speech_say(this_->speech, attr.u.str);
1015                         navit_textfile_debug_log(this_, "type=announcement label=\"%s\"", attr.u.str);
1016                 }
1017                 map_rect_destroy(mr);
1018         }
1019 }
1020
1021 static void
1022 navit_window_roadbook_update(struct navit *this_)
1023 {
1024         struct navigation *nav=this_->navigation;
1025         struct map *map=NULL;
1026         struct map_rect *mr=NULL;
1027         struct item *item;
1028         struct attr attr;
1029         struct param_list param[5];
1030         int secs;
1031
1032         dbg(1,"enter\n");
1033         datawindow_mode(this_->roadbook_window, 1);
1034         if (nav)
1035                 map=navigation_get_map(nav);
1036         if (map)
1037                 mr=map_rect_new(map, NULL);
1038         dbg(0,"nav=%p map=%p mr=%p\n", nav, map, mr);
1039         if (mr) {
1040                 dbg(0,"while loop\n");
1041                 while ((item=map_rect_get_item(mr))) {
1042                         dbg(0,"item=%p\n", item);
1043                         attr.u.str=NULL;
1044                         if (item->type != type_nav_position) {
1045                                 item_attr_get(item, attr_navigation_long, &attr);
1046                                 dbg(2, "Command='%s'\n", attr.u.str);
1047                                 param[0].value=g_strdup(attr.u.str);
1048                         } else
1049                                 param[0].value=_("Position");
1050                         param[0].name=_("Command");
1051
1052                         item_attr_get(item, attr_length, &attr);
1053                         dbg(2, "Length=%d\n", attr.u.num);
1054                         param[1].name=_("Length");
1055
1056                         if ( attr.u.num >= 2000 )
1057                         {
1058                                 param[1].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
1059                         }
1060                         else
1061                         {
1062                                 param[1].value=g_strdup_printf("%7d %s",attr.u.num, _("m"));
1063                         }
1064
1065                         item_attr_get(item, attr_time, &attr);
1066                         dbg(2, "Time=%d\n", attr.u.num);
1067                         secs=attr.u.num/10;
1068                         param[2].name=_("Time");
1069                         if ( secs >= 3600 )
1070                         {
1071                                 param[2].value=g_strdup_printf("%d:%02d:%02d",secs / 60, ( secs / 60 ) % 60 , secs % 60);
1072                         }
1073                         else
1074                         {
1075                                 param[2].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
1076                         }
1077
1078                         item_attr_get(item, attr_destination_length, &attr);
1079                         dbg(2, "Destlength=%d\n", attr.u.num);
1080                         param[3].name=_("Destination Length");
1081                         if ( attr.u.num >= 2000 )
1082                         {
1083                                 param[3].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
1084                         }
1085                         else
1086                         {
1087                                 param[3].value=g_strdup_printf("%d %s",attr.u.num, _("m"));
1088                         }
1089
1090                         item_attr_get(item, attr_destination_time, &attr);
1091                         dbg(2, "Desttime=%d\n", attr.u.num);
1092                         secs=attr.u.num/10;
1093                         param[4].name=_("Destination Time");
1094                         if ( secs >= 3600 )
1095                         {
1096                                 param[4].value=g_strdup_printf("%d:%02d:%02d",secs / 3600, (secs / 60 ) % 60 , secs % 60);
1097                         }
1098                         else
1099                         {
1100                                 param[4].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
1101                         }
1102                         datawindow_add(this_->roadbook_window, param, 5);
1103                 }
1104                 map_rect_destroy(mr);
1105         }
1106         datawindow_mode(this_->roadbook_window, 0);
1107 }
1108
1109 void
1110 navit_window_roadbook_destroy(struct navit *this_)
1111 {
1112         dbg(0, "enter\n");
1113         navigation_unregister_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
1114         this_->roadbook_window=NULL;
1115         this_->roadbook_callback=NULL;
1116 }
1117 void
1118 navit_window_roadbook_new(struct navit *this_)
1119 {
1120         if (this_->roadbook_callback || this_->roadbook_window) {
1121                 return;
1122         }
1123
1124         this_->roadbook_callback=callback_new_1(callback_cast(navit_window_roadbook_update), this_);
1125         navigation_register_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
1126         this_->roadbook_window=gui_datawindow_new(this_->gui, _("Roadbook"), NULL, callback_new_1(callback_cast(navit_window_roadbook_destroy), this_));
1127         navit_window_roadbook_update(this_);
1128 }
1129
1130 void
1131 navit_init(struct navit *this_)
1132 {
1133         struct mapset *ms;
1134         struct map *map;
1135         GList *l;
1136         struct navit_vehicle *nv;
1137
1138         if (!this_->gui) {
1139                 dbg(0,"no gui\n");
1140                 navit_destroy(this_);
1141                 return;
1142         }
1143         if (!this_->gra) {
1144                 dbg(0,"no graphics\n");
1145                 navit_destroy(this_);
1146                 return;
1147         }
1148         if (gui_set_graphics(this_->gui, this_->gra)) {
1149                 struct attr attr_type_gui, attr_type_graphics;
1150                 gui_get_attr(this_->gui, attr_type, &attr_type_gui, NULL);
1151                 graphics_get_attr(this_->gra, attr_type, &attr_type_graphics, NULL);
1152                 dbg(0,"failed to connect graphics '%s' to gui '%s'\n", attr_type_graphics.u.str, attr_type_gui.u.str);
1153                 dbg(0," Please see http://wiki.navit-project.org/index.php/Failed_to_connect_graphics_to_gui\n");
1154                 dbg(0," for explanations and solutions\n");
1155
1156                 navit_destroy(this_);
1157                 return;
1158         }
1159         graphics_init(this_->gra);
1160 #if 0
1161         l=this_->vehicles;
1162         while (l) {
1163                 dbg(1,"parsed one vehicle\n");
1164                 nv=l->data;
1165                 nv->callback.type=attr_callback;
1166                 nv->callback.u.callback=callback_new_2(callback_cast(navit_vehicle_update), this_, nv);
1167                 vehicle_add_attr(nv->vehicle, &nv->callback);
1168                 vehicle_set_attr(nv->vehicle, &this_->self, NULL);
1169                 l=g_list_next(l);
1170         }
1171 #endif
1172         if (this_->mapsets) {
1173                 ms=this_->mapsets->data;
1174                 if (this_->route) {
1175                         if ((map=route_get_map(this_->route)))
1176                                 mapset_add_attr(ms, &(struct attr){attr_map,.u.map=map});
1177                         if ((map=route_get_graph_map(this_->route))) {
1178                                 mapset_add_attr(ms, &(struct attr){attr_map,.u.map=map});
1179                                 map_set_attr(map, &(struct attr ){attr_active,.u.num=0});
1180                         }
1181                         route_set_mapset(this_->route, ms);
1182                         route_set_projection(this_->route, transform_get_projection(this_->trans));
1183                 }
1184                 if (this_->tracking) {
1185                         tracking_set_mapset(this_->tracking, ms);
1186                         if (this_->route)
1187                                 tracking_set_route(this_->tracking, this_->route);
1188                 }
1189                 if (this_->navigation) {
1190                         if ((map=navigation_get_map(this_->navigation))) {
1191                                 mapset_add_attr(ms, &(struct attr){attr_map,.u.map=map});
1192                                 map_set_attr(map, &(struct attr ){attr_active,.u.num=0});
1193                         }
1194                 }
1195                 if (this_->tracking) {
1196                         if ((map=tracking_get_map(this_->tracking))) {
1197                                 mapset_add_attr(ms, &(struct attr){attr_map,.u.map=map});
1198                                 map_set_attr(map, &(struct attr ){attr_active,.u.num=0});
1199                         }
1200                 }
1201                 navit_add_bookmarks_from_file(this_);
1202                 navit_add_former_destinations_from_file(this_);
1203         }
1204         if (this_->navigation && this_->speech) {
1205                 this_->nav_speech_cb=callback_new_1(callback_cast(navit_speak), this_);
1206                 navigation_register_callback(this_->navigation, attr_navigation_speech, this_->nav_speech_cb);
1207         }
1208         char *center_file = navit_get_center_file(FALSE);
1209         navit_set_center_from_file(this_, center_file);
1210         g_free(center_file);
1211 #if 0
1212         if (this_->menubar) {
1213                 men=menu_add(this_->menubar, "Data", menu_type_submenu, NULL);
1214                 if (men) {
1215                         navit_add_menu_windows_items(this_, men);
1216                 }
1217         }
1218 #endif
1219         global_navit=this_;
1220 #if 0
1221         navit_window_roadbook_new(this_);
1222         navit_window_items_new(this_);
1223 #endif
1224         callback_list_call_attr_1(this_->attr_cbl, attr_navit, this_);
1225         this_->ready|=1;
1226         if (this_->ready == 3)
1227                 navit_draw(this_);
1228 }
1229
1230 void
1231 navit_zoom_to_route(struct navit *this_)
1232 {
1233         struct map *map;
1234         struct map_rect *mr;
1235         struct item *item;
1236         struct coord c,*ct;
1237         struct coord_rect r;
1238         int count=0,scale=16;
1239         if (! this_->route)
1240                 return;
1241         map=route_get_map(this_->route);
1242         if (! map)
1243                 return;
1244         mr=map_rect_new(map, NULL);
1245         if (! mr)
1246                 return;
1247         while ((item=map_rect_get_item(mr))) {
1248                 while (item_coord_get(item, &c, 1)) {
1249                         if (!count)
1250                                 r.lu=r.rl=c;
1251                         else
1252                                 coord_rect_extend(&r, &c);
1253                         count++;
1254                 }
1255         }
1256         if (! count)
1257                 return;
1258         c.x=(r.rl.x+r.lu.x)/2;
1259         c.y=(r.rl.y+r.lu.y)/2;
1260         dbg(0,"count=%d\n",count);
1261         ct=transform_center(this_->trans);
1262         *ct=c;
1263         dbg(0,"%x,%x-%x,%x\n", r.rl.x,r.rl.y,r.lu.x,r.lu.y);
1264         while (scale < 1<<20) {
1265                 struct point p1,p2;
1266                 transform_set_scale(this_->trans, scale);
1267                 transform_setup_source_rect(this_->trans);
1268                 transform(this_->trans, transform_get_projection(this_->trans), &r.lu, &p1, 1, 0, 0, NULL);
1269                 transform(this_->trans, transform_get_projection(this_->trans), &r.rl, &p2, 1, 0, 0, NULL);
1270                 dbg(0,"%d,%d-%d,%d\n",p1.x,p1.y,p2.x,p2.y);
1271                 if (p1.x < 0 || p2.x < 0 || p1.x > this_->w || p2.x > this_->w ||
1272                     p1.y < 0 || p2.y < 0 || p1.y > this_->h || p2.y > this_->h)
1273                         scale*=2;
1274                 else
1275                         break;
1276
1277         }
1278         if (this_->ready == 3)
1279                 navit_draw(this_);
1280 }
1281
1282 /**
1283  * Change the current zoom level
1284  *
1285  * @param navit The navit instance
1286  * @param center The point where to center the map, including its projection
1287  * @returns nothing
1288  */
1289 void
1290 navit_set_center(struct navit *this_, struct pcoord *center)
1291 {
1292         struct coord *c=transform_center(this_->trans);
1293         struct coord c1,c2;
1294         enum projection pro = transform_get_projection(this_->trans);
1295         if (pro != center->pro) {
1296                 c1.x = center->x;
1297                 c1.y = center->y;
1298                 transform_from_to(&c1, center->pro, &c2, pro);
1299         } else {
1300                 c2.x = center->x;
1301                 c2.y = center->y;
1302         }
1303         *c=c2;
1304         if (this_->ready == 3)
1305                 navit_draw(this_);
1306 }
1307
1308 static void
1309 navit_set_center_coord_screen(struct navit *this_, struct coord *c, struct point *p)
1310 {
1311         int width, height;
1312         struct point po;
1313         transform_set_center(this_->trans, c);
1314         transform_get_size(this_->trans, &width, &height);
1315         po.x=width/2;
1316         po.y=height/2;
1317         update_transformation(this_->trans, &po, p, NULL);
1318 }
1319
1320 static void
1321 navit_set_center_cursor(struct navit *this_, struct coord *cursor, int dir, int xpercent, int ypercent)
1322 {
1323         int width, height;
1324         struct point pn;
1325
1326         transform_get_size(this_->trans, &width, &height);
1327         transform_set_yaw(this_->trans, dir);
1328         pn.x=xpercent*width/100;
1329         pn.y=ypercent*height/100;
1330         navit_set_center_coord_screen(this_, cursor, &pn);
1331         if (this_->ready == 3)
1332                 navit_draw(this_);
1333 }
1334
1335
1336 void
1337 navit_set_center_screen(struct navit *this_, struct point *p)
1338 {
1339         struct coord c;
1340         struct pcoord pc;
1341         transform_reverse(this_->trans, p, &c);
1342         pc.x = c.x;
1343         pc.y = c.y;
1344         pc.pro = transform_get_projection(this_->trans);
1345         navit_set_center(this_, &pc);
1346 }
1347
1348 int
1349 navit_set_attr(struct navit *this_, struct attr *attr)
1350 {
1351         int dir=0, orient_old=0, attr_updated=0;
1352
1353         switch (attr->type) {
1354         case attr_cursor:
1355                 if (this_->cursor_flag != !!attr->u.num) {
1356                         this_->cursor_flag=!!attr->u.num;
1357                         attr_updated=1;
1358                 }
1359                 break;
1360         case attr_layout:
1361                 if(this_->layout_current!=attr->u.layout) {
1362                         this_->layout_current=attr->u.layout;
1363                         graphics_font_destroy_all(this_->gra);
1364                         navit_draw(this_);
1365                         attr_updated=1;
1366                 }
1367                 break;
1368         case attr_orientation:
1369                 orient_old=this_->orientation;
1370                 this_->orientation=attr->u.num;
1371                 if (this_->orientation != -1) {
1372                         dir = this_->orientation;
1373                 } else {
1374                         if (this_->vehicle) {
1375                                 dir = this_->vehicle->dir;
1376                         }
1377                 }
1378                 transform_set_yaw(this_->trans, dir);
1379                 if (orient_old != this_->orientation) {
1380                         if (this_->ready == 3)
1381                                 navit_draw(this_);
1382                         attr_updated=1;
1383                 }
1384                 break;
1385         case attr_projection:
1386                 if(this_->trans && transform_get_projection(this_->trans) != attr->u.projection) {
1387                         navit_projection_set(this_, attr->u.projection);
1388                         attr_updated=1;
1389                 }
1390                 break;
1391         case attr_tracking:
1392                 if (this_->tracking_flag != !!attr->u.num) {
1393                         this_->tracking_flag=!!attr->u.num;
1394                         attr_updated=1;
1395                 }
1396                 break;
1397         case attr_vehicle:
1398                 if (!this_->vehicle || this_->vehicle->vehicle != attr->u.vehicle) {
1399                         GList *l;
1400                         l=this_->vehicles;
1401                         while(l) {
1402                                 if (((struct navit_vehicle *)l->data)->vehicle == attr->u.vehicle) {
1403                                         this_->vehicle=(struct navit_vehicle *)l->data;
1404                                         attr_updated=1;
1405                                 }
1406                                 l=g_list_next(l);
1407                         }
1408                 }
1409                 break;
1410         default:
1411                 return 0;
1412         }
1413         if (attr_updated) {
1414                 callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
1415         }
1416         return 1;
1417 }
1418
1419 int
1420 navit_get_attr(struct navit *this_, enum attr_type type, struct attr *attr, struct attr_iter *iter)
1421 {
1422         switch (type) {
1423         case attr_bookmark_map:
1424                 attr->u.map=this_->bookmark;
1425                 break;
1426         case attr_cursor:
1427                 attr->u.num=this_->cursor_flag;
1428                 break;
1429         case attr_destination:
1430                 if (! this_->destination_valid)
1431                         return 0;
1432                 attr->u.pcoord=&this_->destination;
1433                 break;
1434         case attr_former_destination_map:
1435                 attr->u.map=this_->former_destination;
1436                 break;
1437         case attr_layout:
1438                 if (iter) {
1439                         if (iter->u.list) {
1440                                 iter->u.list=g_list_next(iter->u.list);
1441                         } else {
1442                                 iter->u.list=this_->layouts;
1443                         }
1444                         if (!iter->u.list)
1445                                 return 0;
1446                         attr->u.layout=(struct layout *)iter->u.list->data;
1447                 } else {
1448                         attr->u.layout=this_->layout_current;
1449                 }
1450                 break;
1451         case attr_map:
1452                 if (iter && this_->mapsets) {
1453                         if (!iter->u.mapset_handle) {
1454                                 iter->u.mapset_handle=mapset_open((struct mapset *)this_->mapsets->data);
1455                         }
1456                         attr->u.map=mapset_next(iter->u.mapset_handle, 0);
1457                         if(!attr->u.map) {
1458                                 mapset_close(iter->u.mapset_handle);
1459                                 return 0;
1460                         }
1461                 } else {
1462                         return 0;
1463                 }
1464                 break;
1465         case attr_navigation:
1466                 attr->u.navigation=this_->navigation;
1467                 break;
1468         case attr_orientation:
1469                 attr->u.num=this_->orientation;
1470                 break;
1471         case attr_projection:
1472                 if(this_->trans) {
1473                         attr->u.num=transform_get_projection(this_->trans);
1474                 } else {
1475                         return 0;
1476                 }
1477                 break;
1478         case attr_route:
1479                 attr->u.route=this_->route;
1480                 break;
1481         case attr_tracking:
1482                 attr->u.num=this_->tracking_flag;
1483                 break;
1484         case attr_vehicle:
1485                 if(iter) {
1486                         if(iter->u.list) {
1487                                 iter->u.list=g_list_next(iter->u.list);
1488                         } else {
1489                                 iter->u.list=this_->vehicles;
1490                         }
1491                         if(!iter->u.list)
1492                                 return 0;
1493                         attr->u.vehicle=((struct navit_vehicle*)iter->u.list->data)->vehicle;
1494                 } else {
1495                         if(this_->vehicle) {
1496                                 attr->u.vehicle=this_->vehicle->vehicle;
1497                         } else {
1498                                 return 0;
1499                         }
1500                 }
1501                 break;
1502         case attr_zoom:
1503                 attr->u.num=transform_get_scale(this_->trans);
1504                 break;
1505         default:
1506                 return 0;
1507         }
1508         attr->type=type;
1509         return 1;
1510 }
1511
1512 static int
1513 navit_add_log(struct navit *this_, struct log *log)
1514 {
1515         struct attr type_attr;
1516         if (!log_get_attr(log, attr_type, &type_attr, NULL))
1517                 return 0;
1518         if (!strcmp(type_attr.u.str, "textfile_debug")) {
1519                 char *header = "type=track_tracked\n";
1520                 if (this_->textfile_debug_log)
1521                         return 0;
1522                 log_set_header(log, header, strlen(header));
1523                 this_->textfile_debug_log=log;
1524                 return 1;
1525         }
1526         return 0;
1527 }
1528
1529 int
1530 navit_add_attr(struct navit *this_, struct attr *attr)
1531 {
1532         int ret=1;
1533         switch (attr->type) {
1534         case attr_log:
1535                 ret=navit_add_log(this_, attr->u.log);
1536                 break;
1537         case attr_gui:
1538                 ret=navit_set_gui(this_, attr->u.gui);
1539                 break;
1540         case attr_graphics:
1541                 ret=navit_set_graphics(this_, attr->u.graphics);
1542                 break;
1543         case attr_layout:
1544                 this_->layouts = g_list_append(this_->layouts, attr->u.layout);
1545                 if(!this_->layout_current)
1546                         this_->layout_current=attr->u.layout;
1547                 ret=1;
1548                 break;
1549         case attr_route:
1550                 this_->route=attr->u.route;
1551                 break;
1552         case attr_mapset:
1553                 this_->mapsets = g_list_append(this_->mapsets, attr->u.mapset);
1554                 break;
1555         case attr_navigation:
1556                 this_->navigation=attr->u.navigation;
1557                 break;
1558         case attr_recent_dest:
1559                 this_->recentdest_count = attr->u.num;
1560                 break;
1561         case attr_speech:
1562                 this_->speech=attr->u.speech;
1563                 break;
1564         case attr_tracking:
1565                 this_->tracking=attr->u.tracking;
1566                 break;
1567         case attr_vehicle:
1568                 ret=navit_add_vehicle(this_, attr->u.vehicle);
1569                 break;
1570         case attr_timeout:
1571                 this_->center_timeout = attr->u.num;
1572                 break;
1573         default:
1574                 return 0;
1575         }
1576         callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
1577         return ret;
1578 }
1579
1580 struct attr_iter *
1581 navit_attr_iter_new()
1582 {
1583         return g_new0(struct attr_iter, 1);
1584 }
1585
1586 void
1587 navit_attr_iter_destroy(struct attr_iter *iter)
1588 {
1589         g_free(iter);
1590 }
1591
1592 void
1593 navit_add_callback(struct navit *this_, struct callback *cb)
1594 {
1595         callback_list_add(this_->attr_cbl, cb);
1596 }
1597
1598 void
1599 navit_remove_callback(struct navit *this_, struct callback *cb)
1600 {
1601         callback_list_remove(this_->attr_cbl, cb);
1602 }
1603
1604 /**
1605  * Toggle the cursor update : refresh the map each time the cursor has moved (instead of only when it reaches a border)
1606  *
1607  * @param navit The navit instance
1608  * @returns nothing
1609  */
1610
1611 static void
1612 navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt)
1613 {
1614         struct point cursor_pnt;
1615         enum projection pro;
1616         struct attr cursor;
1617
1618         if (this_->blocked)
1619                 return;
1620         if (! vehicle_get_attr(nv->vehicle, attr_cursor, &cursor, NULL))
1621                 return;
1622         if (! cursor.u.cursor)
1623                 return;
1624         if (pnt)
1625                 cursor_pnt=*pnt;
1626         else {
1627                 pro=transform_get_projection(this_->trans);
1628                 transform(this_->trans, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
1629         }
1630         cursor_draw(cursor.u.cursor, this_->gra, &cursor_pnt, pnt ? 0:1, nv->dir-transform_get_yaw(this_->trans), nv->speed);
1631 #if 0
1632         if (pnt)
1633                 pnt2=*pnt;
1634         else {
1635                 pro=transform_get_projection(this_->trans);
1636                 transform(this_->trans, pro, &nv->coord, &pnt2, 1, 0);
1637         }
1638 #if 1
1639         cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, pnt == NULL);
1640 #else
1641         cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, 1);
1642 #endif
1643 #endif
1644 }
1645
1646 static void
1647 navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv)
1648 {
1649         struct attr attr_dir, attr_speed, attr_pos;
1650         struct pcoord cursor_pc;
1651         struct point cursor_pnt, *pnt=&cursor_pnt;
1652         enum projection pro;
1653         int border=16;
1654         int route_path_set=0;
1655         int recenter = 1; // indicates if we should recenter the map
1656
1657         profile(0,NULL);
1658         if (this_->ready != 3) {
1659                 profile(0,"return 1\n");
1660                 return;
1661         }
1662
1663         if (! vehicle_get_attr(nv->vehicle, attr_position_direction, &attr_dir, NULL) ||
1664             ! vehicle_get_attr(nv->vehicle, attr_position_speed, &attr_speed, NULL) ||
1665             ! vehicle_get_attr(nv->vehicle, attr_position_coord_geo, &attr_pos, NULL)) {
1666                 profile(0,"return 2\n");
1667                 return;
1668         }
1669         nv->dir=*attr_dir.u.numd;
1670         nv->speed=*attr_speed.u.numd;
1671         pro=transform_get_projection(this_->trans);
1672         transform_from_geo(pro, attr_pos.u.coord_geo, &nv->coord);
1673         if (nv != this_->vehicle) {
1674                 navit_vehicle_draw(this_, nv, NULL);
1675                 profile(0,"return 3\n");
1676                 return;
1677         }
1678
1679         if (nv->speed < 10) {
1680                 long long diff,diff_x,diff_y;
1681
1682                 diff_x = abs(nv->coord.x - nv->last.x);
1683                 diff_y = abs(nv->coord.y - nv->last.y);
1684                 diff = (diff_x * diff_x) + (diff_y * diff_y);
1685
1686                 if ((diff < 20) && (diff > 0)) { // if our long is only 32 bit wide, we could run into an overflow here
1687                         recenter = 0;
1688                 }
1689         }
1690         if (recenter) {
1691                 nv->last = nv->coord;
1692         }
1693
1694         if (this_->route)
1695                 route_path_set=route_get_path_set(this_->route);
1696         cursor_pc.x = nv->coord.x;
1697         cursor_pc.y = nv->coord.y;
1698         cursor_pc.pro = pro;
1699         if (this_->tracking && this_->tracking_flag) {
1700                 if (tracking_update(this_->tracking, &cursor_pc, nv->dir)) {
1701                         nv->coord.x=cursor_pc.x;
1702                         nv->coord.y=cursor_pc.y;
1703                 }
1704         }
1705         if (nv->update_curr == 1) {
1706                 if (this_->route) {
1707                         if (this_->tracking && this_->tracking_flag)
1708                                 route_set_position_from_tracking(this_->route, this_->tracking);
1709                         else
1710                                 route_set_position(this_->route, &cursor_pc);
1711                 }
1712                 callback_list_call_attr_0(this_->attr_cbl, attr_position);
1713         }
1714         navit_textfile_debug_log(this_, "type=trackpoint_tracked");
1715         transform(this_->trans, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
1716         if (!transform_within_border(this_->trans, &cursor_pnt, border)) {
1717                 if (!this_->cursor_flag) {
1718                         profile(0,"return 4\n");
1719                         return;
1720                 }
1721                 if ((nv->follow_curr != 1) && ((time(NULL) - this_->last_moved) > this_->center_timeout) && (this_->button_pressed != 1) && (recenter)) {
1722                         if (this_->orientation != -1) {
1723                                 int dir=nv->dir-this_->orientation;
1724                                 navit_set_center_cursor(this_, &nv->coord, 0, 50 - 30.*sin(M_PI*dir/180.), 50 + 30.*cos(M_PI*dir/180.));
1725                         }
1726                         else
1727                                 navit_set_center_cursor(this_, &nv->coord, nv->dir, 50, 80);
1728                         pnt=NULL;
1729                 }
1730         }
1731
1732 #ifndef _WIN32
1733         if (this_->pid && nv->speed > 2)
1734                 kill(this_->pid, SIGWINCH);
1735 #endif
1736         if (this_->route && nv->update_curr == 1)
1737                 navigation_update(this_->navigation, this_->route);
1738         if ((nv->follow_curr == 1) && (!this_->button_pressed)) {
1739                 if (this_->cursor_flag && ((time(NULL) - this_->last_moved) > this_->center_timeout) && (recenter)) {
1740                         navit_set_center_cursor(this_, &nv->coord, nv->dir, 50, 80);
1741                         pnt=NULL;
1742                 } else { // We don't want to center, but redraw because otherwise the old route "lags"
1743                         navit_draw(this_);
1744                 }
1745         }
1746         if (pnt && this_->route && !route_path_set && route_get_path_set(this_->route))
1747                 navit_draw(this_);
1748         if (nv->follow_curr > 1)
1749                 nv->follow_curr--;
1750         else
1751                 nv->follow_curr=nv->follow;
1752         if (nv->update_curr > 1)
1753                 nv->update_curr--;
1754         else
1755                 nv->update_curr=nv->update;
1756         callback_list_call_attr_2(this_->attr_cbl, attr_position_coord_geo, this_, nv->vehicle);
1757         if (pnt)
1758                 navit_vehicle_draw(this_, nv, pnt);
1759
1760         /* Finally, if we reached our destination, stop navigation. */
1761         if (this_->route && route_destination_reached(this_->route)) {
1762                 navit_set_destination(this_, NULL, NULL);
1763         }
1764         profile(0,"return 5\n");
1765 }
1766
1767 /**
1768  * Set the position of the vehicle
1769  *
1770  * @param navit The navit instance
1771  * @param c The coordinate to set as position
1772  * @returns nothing
1773  */
1774
1775 void
1776 navit_set_position(struct navit *this_, struct pcoord *c)
1777 {
1778         if (this_->route) {
1779                 route_set_position(this_->route, c);
1780                 callback_list_call_attr_0(this_->attr_cbl, attr_position);
1781                 if (this_->navigation) {
1782                         navigation_update(this_->navigation, this_->route);
1783 #if 0
1784                         map_dump_file(route_get_map(this_->route), "route.txt");
1785                         map_dump_file(navigation_get_map(this_->navigation), "navigation.txt");
1786 #endif
1787                 }
1788         }
1789         if (this_->ready == 3)
1790                 navit_draw(this_);
1791 }
1792
1793 static void
1794 navit_set_vehicle(struct navit *this_, struct navit_vehicle *nv)
1795 {
1796         this_->vehicle=nv;
1797 }
1798
1799 /**
1800  * Register a new vehicle
1801  *
1802  * @param navit The navit instance
1803  * @param v The vehicle instance
1804  * @returns 1 for success
1805  */
1806 static int
1807 navit_add_vehicle(struct navit *this_, struct vehicle *v)
1808 {
1809         struct navit_vehicle *nv=g_new0(struct navit_vehicle, 1);
1810         struct attr update,follow,color,active, color2, animate;
1811         nv->vehicle=v;
1812         nv->update=1;
1813         nv->follow=0;
1814         nv->last.x = 0;
1815         nv->last.y = 0;
1816         nv->animate_cursor=0;
1817         if ((vehicle_get_attr(v, attr_update, &update, NULL)))
1818                 nv->update=nv->update=update.u.num;
1819         if ((vehicle_get_attr(v, attr_follow, &follow, NULL)))
1820                 nv->follow=nv->follow=follow.u.num;
1821         if ((vehicle_get_attr(v, attr_color, &color, NULL)))
1822                 nv->c=*(color.u.color);
1823         if ((vehicle_get_attr(v, attr_color2, &color2, NULL)))
1824                 nv->c2=color2.u.color;
1825         else
1826                 nv->c2=NULL;
1827         nv->update_curr=nv->update;
1828         nv->follow_curr=nv->follow;
1829         this_->vehicles=g_list_append(this_->vehicles, nv);
1830         if ((vehicle_get_attr(v, attr_active, &active, NULL)) && active.u.num)
1831                 navit_set_vehicle(this_, nv);
1832         if ((vehicle_get_attr(v, attr_animate, &animate, NULL)))
1833                 nv->animate_cursor=animate.u.num;
1834         nv->callback.type=attr_callback;
1835         nv->callback.u.callback=callback_new_2(callback_cast(navit_vehicle_update), this_, nv);
1836         vehicle_add_attr(nv->vehicle, &nv->callback);
1837         vehicle_set_attr(nv->vehicle, &this_->self, NULL);
1838         return 1;
1839 }
1840
1841
1842
1843
1844 struct gui *
1845 navit_get_gui(struct navit *this_)
1846 {
1847         return this_->gui;
1848 }
1849
1850 struct transformation *
1851 navit_get_trans(struct navit *this_)
1852 {
1853         return this_->trans;
1854 }
1855
1856 struct route *
1857 navit_get_route(struct navit *this_)
1858 {
1859         return this_->route;
1860 }
1861
1862 struct navigation *
1863 navit_get_navigation(struct navit *this_)
1864 {
1865         return this_->navigation;
1866 }
1867
1868 struct displaylist *
1869 navit_get_displaylist(struct navit *this_)
1870 {
1871         return this_->displaylist;
1872 }
1873
1874 int
1875 navit_block(struct navit *this_, int block)
1876 {
1877         if (block) {
1878                 this_->blocked |= 1;
1879                 return 0;
1880         }
1881         if (this_->blocked & 2) {
1882                 this_->blocked=0;
1883                 navit_draw(this_);
1884                 return 1;
1885         }
1886         this_->blocked=0;
1887         return 0;
1888 }
1889
1890 int
1891 navit_command_register(struct navit *this_, char *command, struct callback *cb)
1892 {
1893         dbg(1,"registering '%s'\n", command);
1894         g_hash_table_insert(this_->commands, command, cb);
1895
1896         return 0;
1897 }
1898
1899 struct callback *
1900 navit_command_unregister(struct navit *this_, char *command)
1901 {
1902         struct callback *ret=g_hash_table_lookup(this_->commands, command);
1903         if (ret) {
1904                 g_hash_table_remove(this_->commands, command);
1905         }
1906
1907         return ret;
1908 }
1909
1910 int
1911 navit_command_call_attrs(struct navit *this_, char *command, struct attr **in, struct attr ***out)
1912 {
1913         struct callback *cb=g_hash_table_lookup(this_->commands, command);
1914         dbg(0,"calling callback %p for '%s'\n", cb, command);
1915         if (! cb)
1916                 return 1;
1917         callback_call_args(cb, 3, command, in, out);
1918         return 0;
1919 }
1920
1921 int
1922 navit_command_call(struct navit *this_, char *command)
1923 {
1924         return navit_command_call_attrs(this_, command, NULL, NULL);
1925 }
1926
1927 void
1928 navit_destroy(struct navit *this_)
1929 {
1930         /* TODO: destroy objects contained in this_ */
1931         if (this_->vehicle)
1932                 vehicle_destroy(this_->vehicle->vehicle);
1933         main_remove_navit(this_);
1934         char *center_file = navit_get_center_file(TRUE);
1935         navit_write_center_to_file(this_, center_file);
1936         g_free(center_file);
1937         callback_destroy(navit_command_unregister(this_, "zoom_in"));
1938         callback_destroy(navit_command_unregister(this_, "zoom_out"));
1939         callback_destroy(this_->nav_speech_cb);
1940         callback_destroy(this_->roadbook_callback);
1941         callback_destroy(this_->popup_callback);
1942         callback_destroy(this_->motion_timeout_callback);
1943         graphics_remove_callback(this_->gra, this_->resize_callback);
1944         callback_destroy(this_->resize_callback);
1945         graphics_remove_callback(this_->gra, this_->button_callback);
1946         callback_destroy(this_->button_callback);
1947         graphics_remove_callback(this_->gra, this_->motion_callback);
1948         callback_destroy(this_->motion_callback);
1949         g_hash_table_destroy(this_->commands);
1950         g_free(this_);
1951 }
1952
1953 /** @} */