Fix:core:initialize hastable on first usage of set_int_var()
[profile/ivi/navit.git] / navit / navit / navit.c
1 /**
2  * Navit, a modular navigation system.
3  * Copyright (C) 2005-2009 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 #define _USE_MATH_DEFINES 1
21 #include "config.h"
22 #ifdef HAVE_UNISTD_H
23 #include <unistd.h>
24 #endif
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <signal.h>
28 #include <string.h>
29 #include <fcntl.h>
30 #include <glib.h>
31 #include <math.h>
32 #include <time.h>
33 #include "debug.h"
34 #include "navit.h"
35 #include "callback.h"
36 #include "gui.h"
37 #include "item.h"
38 #include "projection.h"
39 #include "map.h"
40 #include "mapset.h"
41 #include "main.h"
42 #include "coord.h"
43 #include "point.h"
44 #include "transform.h"
45 #include "param.h"
46 #include "menu.h"
47 #include "graphics.h"
48 #include "popup.h"
49 #include "data_window.h"
50 #include "route.h"
51 #include "navigation.h"
52 #include "speech.h"
53 #include "track.h"
54 #include "vehicle.h"
55 #include "layout.h"
56 #include "log.h"
57 #include "attr.h"
58 #include "event.h"
59 #include "file.h"
60 #include "profile.h"
61 #include "command.h"
62 #include "navit_nls.h"
63 #include "map.h"
64 #include "util.h"
65 #include "messages.h"
66 #include "vehicleprofile.h"
67 #include "sunriset.h"
68 #include "bookmarks.h"
69 #ifdef HAVE_API_WIN32_BASE
70 #include <windows.h>
71 #include "util.h"
72 #endif
73 #ifdef HAVE_API_WIN32_CE
74 #include "libc.h"
75 #endif
76
77 /**
78  * @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
79  * @{
80  */
81
82 //! The navit_vehicule
83 struct navit_vehicle {
84         int follow;
85         /*! Limit of the follow counter. See navit_add_vehicle */
86         int follow_curr;
87         /*! Deprecated : follow counter itself. When it reaches 'update' counts, map is recentered*/
88         struct coord coord;
89         int dir;
90         int speed;
91         struct coord last; /*< Position of the last update of this vehicle */
92         struct vehicle *vehicle;
93         struct attr callback;
94         int animate_cursor;
95 };
96
97 struct navit {
98         struct attr self;
99         GList *mapsets;
100         GList *layouts;
101         struct gui *gui;
102         struct layout *layout_current;
103         struct graphics *gra;
104         struct action *action;
105         struct transformation *trans, *trans_cursor;
106         struct compass *compass;
107         struct route *route;
108         struct navigation *navigation;
109         struct speech *speech;
110         struct tracking *tracking;
111         int ready;
112         struct window *win;
113         struct displaylist *displaylist;
114         int tracking_flag;
115         int orientation;
116         int recentdest_count;
117         int osd_configuration;
118         GList *vehicles;
119         GList *windows_items;
120         struct navit_vehicle *vehicle;
121         struct callback_list *attr_cbl;
122         struct callback *nav_speech_cb, *roadbook_callback, *popup_callback, *route_cb, *progress_cb;
123         struct datawindow *roadbook_window;
124         struct map *former_destination;
125         struct point pressed, last, current;
126         int button_pressed,moved,popped,zoomed;
127         int center_timeout;
128         int autozoom_secs;
129         int autozoom_min;
130         int autozoom_active;
131         struct event_timeout *button_timeout, *motion_timeout;
132         struct callback *motion_timeout_callback;
133         int ignore_button;
134         int ignore_graphics_events;
135         struct log *textfile_debug_log;
136         struct pcoord destination;
137         int destination_valid;
138         int blocked;
139         int w,h;
140         int drag_bitmap;
141         int use_mousewheel;
142         struct messagelist *messages;
143         struct callback *resize_callback,*button_callback,*motion_callback,*predraw_callback;
144         struct vehicleprofile *vehicleprofile;
145         GList *vehicleprofiles;
146         int pitch;
147         int follow_cursor;
148         int prevTs;
149         int graphics_flags;
150         int zoom_min, zoom_max;
151         int radius;
152         struct bookmarks *bookmarks;
153         int flags;
154                  /* 1=No graphics ok */
155                  /* 2=No gui ok */
156         int border;
157         int imperial;
158         struct attr **attr_list;
159 };
160
161 struct gui *main_loop_gui;
162
163 struct attr_iter {
164         void *iter;
165         union {
166                 GList *list;
167                 struct mapset_handle *mapset_handle;
168         } u;
169 };
170
171 static void navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv);
172 static void navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt);
173 static int navit_add_vehicle(struct navit *this_, struct vehicle *v);
174 static int navit_set_attr_do(struct navit *this_, struct attr *attr, int init);
175 static int navit_get_cursor_pnt(struct navit *this_, struct point *p, int keep_orientation, int *dir);
176 static void navit_set_cursors(struct navit *this_);
177 static void navit_cmd_zoom_to_route(struct navit *this);
178 static void navit_cmd_set_center_cursor(struct navit *this_);
179 static void navit_cmd_announcer_toggle(struct navit *this_);
180 static void navit_set_vehicle(struct navit *this_, struct navit_vehicle *nv);
181
182 struct navit *global_navit;
183
184 void
185 navit_add_mapset(struct navit *this_, struct mapset *ms)
186 {
187         this_->mapsets = g_list_append(this_->mapsets, ms);
188 }
189
190 struct mapset *
191 navit_get_mapset(struct navit *this_)
192 {
193         if(this_->mapsets){
194                 return this_->mapsets->data;
195         } else {
196                 dbg(0,"No mapsets enabled! Is it on purpose? Navit can't draw a map. Please check your navit.xml\n");
197         }
198         return NULL;
199 }
200
201 struct tracking *
202 navit_get_tracking(struct navit *this_)
203 {
204         return this_->tracking;
205 }
206
207 /**
208  * @brief       Get the user data directory.
209  * @param[in]    create - create the directory if it does not exist
210  *
211  * @return      char * to the data directory string.
212  *
213  * returns the directory used to store user data files (center.txt,
214  * destination.txt, bookmark.txt, ...)
215  *
216  */
217 char*
218 navit_get_user_data_directory(int create) {
219         char *dir;
220         dir = getenv("NAVIT_USER_DATADIR");
221         if (create && !file_exists(dir)) {
222                 dbg(0,"creating dir %s\n", dir);
223                 if (file_mkdir(dir,0)) {
224                         dbg(0,"failed creating dir %s\n", dir);
225                         return NULL;
226                 }
227         }
228         return dir;
229 } /* end: navit_get_user_data_directory(gboolean create) */
230
231
232 void
233 navit_draw_async(struct navit *this_, int async)
234 {
235
236         if (this_->blocked) {
237                 this_->blocked |= 2;
238                 return;
239         }
240         transform_setup_source_rect(this_->trans);
241         graphics_draw(this_->gra, this_->displaylist, this_->mapsets->data, this_->trans, this_->layout_current, async, NULL, this_->graphics_flags|1);
242 }
243
244 void
245 navit_draw(struct navit *this_)
246 {
247         if (this_->ready == 3)
248                 navit_draw_async(this_, 0);
249 }
250
251 int
252 navit_get_ready(struct navit *this_)
253 {
254         return this_->ready;
255 }
256
257
258
259 void
260 navit_draw_displaylist(struct navit *this_)
261 {
262         if (this_->ready == 3)
263                 graphics_displaylist_draw(this_->gra, this_->displaylist, this_->trans, this_->layout_current, this_->graphics_flags|1);
264 }
265
266 static void
267 navit_map_progress(struct navit *this_)
268 {
269         struct map *map;
270         struct mapset *ms;
271         struct mapset_handle *msh;
272         struct attr attr;
273         struct point p;
274         if (this_->ready != 3)
275                 return;
276         p.x=10;
277         p.y=32;
278
279         ms=this_->mapsets->data;
280         msh=mapset_open(ms);
281         while (msh && (map=mapset_next(msh, 0))) {
282                 if (map_get_attr(map, attr_progress, &attr, NULL)) {
283                         char *str=g_strdup_printf("%s           ",attr.u.str);
284                         graphics_draw_mode(this_->gra, draw_mode_begin);
285                         graphics_draw_text_std(this_->gra, 16, str, &p);
286                         g_free(str);
287                         p.y+=32;
288                         graphics_draw_mode(this_->gra, draw_mode_end);
289                 }
290         }
291         mapset_close(msh);
292 }
293
294 static void
295 navit_redraw_route(struct navit *this_, struct route *route, struct attr *attr)
296 {
297         int updated;
298         if (attr->type != attr_route_status)
299                 return;
300         updated=attr->u.num;
301         if (this_->ready != 3)
302                 return;
303         if (updated != route_status_path_done_new)
304                 return;
305         if (this_->vehicle) {
306                 if (this_->vehicle->follow_curr == 1)
307                         return;
308                 if (this_->vehicle->follow_curr <= this_->vehicle->follow)
309                         this_->vehicle->follow_curr=this_->vehicle->follow;
310         }
311         navit_draw(this_);
312 }
313
314 void
315 navit_handle_resize(struct navit *this_, int w, int h)
316 {
317         struct map_selection sel;
318         int callback=(this_->ready == 1);
319         this_->ready |= 2;
320         memset(&sel, 0, sizeof(sel));
321         this_->w=w;
322         this_->h=h;
323         sel.u.p_rect.rl.x=w;
324         sel.u.p_rect.rl.y=h;
325         transform_set_screen_selection(this_->trans, &sel);
326         graphics_init(this_->gra);
327         graphics_set_rect(this_->gra, &sel.u.p_rect);
328         if (callback) 
329                 callback_list_call_attr_1(this_->attr_cbl, attr_graphics_ready, this_);
330         if (this_->ready == 3)
331                 navit_draw_async(this_, 1);
332 }
333
334 static void
335 navit_resize(void *data, int w, int h)
336 {
337         struct navit *this=data;
338         if (!this->ignore_graphics_events)
339                 navit_handle_resize(this, w, h);
340 }
341
342 int
343 navit_get_width(struct navit *this_)
344 {
345         return this_->w;
346 }
347
348
349 int
350 navit_get_height(struct navit *this_)
351 {
352         return this_->h;
353 }
354
355 static void
356 navit_popup(void *data)
357 {
358         struct navit *this_=data;
359         popup(this_, 1, &this_->pressed);
360         this_->button_timeout=NULL;
361         this_->popped=1;
362 }
363
364
365 int
366 navit_ignore_button(struct navit *this_)
367 {
368         if (this_->ignore_button)
369                 return 1;
370         this_->ignore_button=1;
371         return 0;
372 }
373
374 void
375 navit_ignore_graphics_events(struct navit *this_, int ignore)
376 {
377         this_->ignore_graphics_events=ignore;
378 }
379
380 static void
381 update_transformation(struct transformation *tr, struct point *old, struct point *new, struct point *rot)
382 {
383         struct coord co,cn;
384         struct coord c,*cp;
385         int yaw;
386         double angleo,anglen;
387
388         if (!transform_reverse(tr, old, &co))
389                 return;
390         if (rot) {
391                 angleo=atan2(old->y-rot->y, old->x-rot->x)*180/M_PI;
392                 anglen=atan2(new->y-rot->y, new->x-rot->x)*180/M_PI;
393                 yaw=transform_get_yaw(tr)+angleo-anglen;
394                 transform_set_yaw(tr, yaw % 360);
395         }
396         if (!transform_reverse(tr, new, &cn))
397                 return;
398         cp=transform_get_center(tr);
399         c.x=cp->x+co.x-cn.x;
400         c.y=cp->y+co.y-cn.y;
401         dbg(1,"from 0x%x,0x%x to 0x%x,0x%x\n", cp->x, cp->y, c.x, c.y);
402         transform_set_center(tr, &c);
403 }
404
405 void
406 navit_set_timeout(struct navit *this_)
407 {
408         struct attr follow;
409         follow.type=attr_follow;
410         follow.u.num=this_->center_timeout;
411         navit_set_attr(this_, &follow);
412 }
413
414 int
415 navit_handle_button(struct navit *this_, int pressed, int button, struct point *p, struct callback *popup_callback)
416 {
417         int border=16;
418
419         dbg(1,"enter %d %d (ignore %d)\n",pressed,button,this_->ignore_button);
420         callback_list_call_attr_4(this_->attr_cbl, attr_button, this_, GINT_TO_POINTER(pressed), GINT_TO_POINTER(button), p);
421         if (this_->ignore_button) {
422                 this_->ignore_button=0;
423                 return 0;
424         }
425         if (pressed) {
426                 this_->pressed=*p;
427                 this_->last=*p;
428                 this_->zoomed=0;
429                 if (button == 1) {
430                         this_->button_pressed=1;
431                         this_->moved=0;
432                         this_->popped=0;
433                         if (popup_callback)
434                                 this_->button_timeout=event_add_timeout(500, 0, popup_callback);
435                 }
436                 if (button == 2)
437                         navit_set_center_screen(this_, p, 1);
438                 if (button == 3)
439                         popup(this_, button, p);
440                 if (button == 4 && this_->use_mousewheel) {
441                         this_->zoomed = 1;
442                         navit_zoom_in(this_, 2, p);
443                 }
444                 if (button == 5 && this_->use_mousewheel) {
445                         this_->zoomed = 1;
446                         navit_zoom_out(this_, 2, p);
447                 }
448         } else {
449
450                 this_->button_pressed=0;
451                 if (this_->button_timeout) {
452                         event_remove_timeout(this_->button_timeout);
453                         this_->button_timeout=NULL;
454                         if (! this_->moved && ! transform_within_border(this_->trans, p, border)) {
455                                 navit_set_center_screen(this_, p, !this_->zoomed);
456                         }
457                 }
458                 if (this_->motion_timeout) {
459                         event_remove_timeout(this_->motion_timeout);
460                         this_->motion_timeout=NULL;
461                 }
462                 if (this_->moved) {
463                         struct point pr;
464                         pr.x=this_->w/2;
465                         pr.y=this_->h;
466 #if 0
467                         update_transformation(this_->trans, &this_->pressed, p, &pr);
468 #else
469                         update_transformation(this_->trans, &this_->pressed, p, NULL);
470 #endif
471                         graphics_draw_drag(this_->gra, NULL);
472                         transform_copy(this_->trans, this_->trans_cursor);
473                         graphics_overlay_disable(this_->gra, 0);
474                         if (!this_->zoomed) 
475                                 navit_set_timeout(this_);
476                         navit_draw(this_);
477                 } else
478                         return 1;
479         }
480         return 0;
481 }
482
483 static void
484 navit_button(void *data, int pressed, int button, struct point *p)
485 {
486         struct navit *this=data;
487         dbg(1,"enter %d %d ignore %d\n",pressed,button,this->ignore_graphics_events);
488         if (!this->ignore_graphics_events) {
489                 if (! this->popup_callback)
490                         this->popup_callback=callback_new_1(callback_cast(navit_popup), this);
491                 navit_handle_button(this, pressed, button, p, this->popup_callback);
492         }
493 }
494
495
496 static void
497 navit_motion_timeout(struct navit *this_)
498 {
499         int dx, dy;
500
501         if (this_->drag_bitmap) {
502                 struct point point;
503                 point.x=(this_->current.x-this_->pressed.x);
504                 point.y=(this_->current.y-this_->pressed.y);
505                 if (graphics_draw_drag(this_->gra, &point)) {
506                         graphics_overlay_disable(this_->gra, 1);
507                         graphics_draw_mode(this_->gra, draw_mode_end);
508                         this_->moved=1;
509                         this_->motion_timeout=NULL;
510                         return;
511                 }
512         } 
513         dx=(this_->current.x-this_->last.x);
514         dy=(this_->current.y-this_->last.y);
515         if (dx || dy) {
516                 struct transformation *tr;
517                 struct point pr;
518                 this_->last=this_->current;
519                 graphics_overlay_disable(this_->gra, 1);
520                 tr=transform_dup(this_->trans);
521                 pr.x=this_->w/2;
522                 pr.y=this_->h;
523 #if 0
524                 update_transformation(tr, &this_->pressed, &this_->current, &pr);
525 #else
526                 update_transformation(tr, &this_->pressed, &this_->current, NULL);
527 #endif
528 #if 0
529                 graphics_displaylist_move(this_->displaylist, dx, dy);
530 #endif
531                 graphics_draw_cancel(this_->gra, this_->displaylist);
532                 graphics_displaylist_draw(this_->gra, this_->displaylist, tr, this_->layout_current, this_->graphics_flags);
533                 transform_destroy(tr);
534                 this_->moved=1;
535         }
536         this_->motion_timeout=NULL;
537         return;
538 }
539
540 void
541 navit_handle_motion(struct navit *this_, struct point *p)
542 {
543         int dx, dy;
544
545         if (this_->button_pressed && !this_->popped) {
546                 dx=(p->x-this_->pressed.x);
547                 dy=(p->y-this_->pressed.y);
548                 if (dx < -8 || dx > 8 || dy < -8 || dy > 8) {
549                         this_->moved=1;
550                         if (this_->button_timeout) {
551                                 event_remove_timeout(this_->button_timeout);
552                                 this_->button_timeout=NULL;
553                         }
554                         this_->current=*p;
555                         if (! this_->motion_timeout_callback)
556                                 this_->motion_timeout_callback=callback_new_1(callback_cast(navit_motion_timeout), this_);
557                         if (! this_->motion_timeout)
558                                 this_->motion_timeout=event_add_timeout(100, 0, this_->motion_timeout_callback);
559                 }
560         }
561 }
562
563 static void
564 navit_motion(void *data, struct point *p)
565 {
566         struct navit *this=data;
567         if (!this->ignore_graphics_events) 
568                 navit_handle_motion(this, p);
569 }
570
571 static void
572 navit_predraw(struct navit *this_)
573 {
574         GList *l;
575         struct navit_vehicle *nv;
576         transform_copy(this_->trans, this_->trans_cursor);
577         l=this_->vehicles;
578         while (l) {
579                 nv=l->data;
580                 navit_vehicle_draw(this_, nv, NULL);
581                 l=g_list_next(l);
582         }
583 }
584
585 static void
586 navit_scale(struct navit *this_, long scale, struct point *p, int draw)
587 {
588         struct coord c1, c2, *center;
589         if (scale < this_->zoom_min)
590                 scale=this_->zoom_min;
591         if (scale > this_->zoom_max)
592                 scale=this_->zoom_max;
593         if (p)
594                 transform_reverse(this_->trans, p, &c1);
595         transform_set_scale(this_->trans, scale);
596         if (p) {
597                 transform_reverse(this_->trans, p, &c2);
598                 center = transform_center(this_->trans);
599                 center->x += c1.x - c2.x;
600                 center->y += c1.y - c2.y;
601         }
602         if (draw)
603                 navit_draw(this_);
604 }
605
606 /**
607  * @brief Automatically adjusts zoom level
608  *
609  * This function automatically adjusts the current
610  * zoom level according to the current speed.
611  *
612  * @param this_ The navit struct
613  * @param center The "immovable" point - i.e. the vehicles position if we're centering on the vehicle
614  * @param speed The vehicles speed in meters per second
615  * @param dir The direction into which the vehicle moves
616  */
617 static void
618 navit_autozoom(struct navit *this_, struct coord *center, int speed, int draw)
619 {
620         struct point pc;
621         int distance,w,h;
622         double new_scale;
623         long scale;
624
625         if (! this_->autozoom_active) {
626                 return;
627         }
628
629         distance = speed * this_->autozoom_secs;
630
631         transform_get_size(this_->trans, &w, &h);
632         transform(this_->trans, transform_get_projection(this_->trans), center, &pc, 1, 0, 0, NULL);
633         scale = transform_get_scale(this_->trans);
634
635         /* We make sure that the point we want to see is within a certain range
636          * around the vehicle. The radius of this circle is the size of the
637          * screen. This doesn't necessarily mean the point is visible because of
638          * perspective etc. Quite rough, but should be enough. */
639         
640         if (w > h) {
641                 new_scale = (double)distance / h * 16; 
642         } else {
643                 new_scale = (double)distance / w * 16; 
644         }
645
646         if (abs(new_scale - scale) < 2) { 
647                 return; // Smoothing
648         }
649         
650         if (new_scale >= this_->autozoom_min) {
651                 navit_scale(this_, (long)new_scale, &pc, 0);
652         } else {
653                 if (scale != this_->autozoom_min) {
654                         navit_scale(this_, this_->autozoom_min, &pc, 0);
655                 }
656         }
657 }
658
659 /**
660  * Change the current zoom level, zooming closer to the ground
661  *
662  * @param navit The navit instance
663  * @param factor The zoom factor, usually 2
664  * @param p The invariant point (if set to NULL, default to center)
665  * @returns nothing
666  */
667 void
668 navit_zoom_in(struct navit *this_, int factor, struct point *p)
669 {
670         long scale=transform_get_scale(this_->trans)/factor;
671         if (scale < 1)
672                 scale=1;
673         navit_scale(this_, scale, p, 1);
674 }
675
676 /**
677  * Change the current zoom level
678  *
679  * @param navit The navit instance
680  * @param factor The zoom factor, usually 2
681  * @param p The invariant point (if set to NULL, default to center)
682  * @returns nothing
683  */
684 void
685 navit_zoom_out(struct navit *this_, int factor, struct point *p)
686 {
687         long scale=transform_get_scale(this_->trans)*factor;
688         navit_scale(this_, scale, p, 1);
689 }
690
691 void
692 navit_zoom_in_cursor(struct navit *this_, int factor)
693 {
694         struct point p;
695         if (this_->vehicle && this_->vehicle->follow_curr <= 1 && navit_get_cursor_pnt(this_, &p, 0, NULL)) {
696                 navit_zoom_in(this_, factor, &p);
697                 this_->vehicle->follow_curr=this_->vehicle->follow;
698         } else
699                 navit_zoom_in(this_, factor, NULL);
700 }
701
702 void
703 navit_zoom_out_cursor(struct navit *this_, int factor)
704 {
705         struct point p;
706         if (this_->vehicle && this_->vehicle->follow_curr <= 1 && navit_get_cursor_pnt(this_, &p, 0, NULL)) {
707                 navit_zoom_out(this_, 2, &p);
708                 this_->vehicle->follow_curr=this_->vehicle->follow;
709         } else
710                 navit_zoom_out(this_, 2, NULL);
711 }
712
713 static int
714 navit_cmd_zoom_in(struct navit *this_)
715 {
716         navit_zoom_in_cursor(this_, 2);
717         return 0;
718 }
719
720 static int
721 navit_cmd_zoom_out(struct navit *this_)
722 {
723         navit_zoom_out_cursor(this_, 2);
724         return 0;
725 }
726
727
728 static void
729 navit_cmd_say(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
730 {
731         if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) 
732                 navit_say(this, in[0]->u.str);
733 }
734
735 static GHashTable *cmd_int_var_hash = NULL;
736 static GHashTable *cmd_attr_var_hash = NULL;
737
738 /**
739  * Store key value pair for the  command system (for int typed values)
740  *
741  * @param navit The navit instance
742  * @param function unused (needed to match command function signiture)
743  * @param in input attributes in[0] is the key string, in[1] is the integer value to store
744  * @param out output attributes, unused 
745  * @param valid unused 
746  * @returns nothing
747  */
748 static void
749 navit_cmd_set_int_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
750 {
751         char*key;
752         struct attr*val;
753         if(!cmd_int_var_hash) {
754                 cmd_int_var_hash = g_hash_table_new(g_str_hash, g_str_equal);
755         }
756
757         if ( (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) &&
758              (in && in[1] && ATTR_IS_NUMERIC(in[1]->type))) {
759                 val = g_new(struct attr,1);
760                 attr_dup_content(in[1],val);
761                 key = g_strdup(in[0]->u.str);
762                 g_hash_table_insert(cmd_int_var_hash, key, val);
763         }
764 }
765
766
767 /**
768  * Store key value pair for the  command system (for attr typed values, can be used as opaque handles)
769  *
770  * @param navit The navit instance
771  * @param function unused (needed to match command function signiture)
772  * @param in input attributes in[0] is the key string, in[1] is the attr* value to store
773  * @param out output attributes, unused 
774  * @param valid unused 
775  * @returns nothing
776  */
777 //TODO free stored attributes on navit_destroy
778 static void
779 navit_cmd_set_attr_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
780 {
781         char*key;
782         struct attr*val;
783         if(!cmd_attr_var_hash) {
784                 cmd_attr_var_hash = g_hash_table_new(g_str_hash, g_str_equal);
785         }
786
787         if ( (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) &&
788              (in && in[1] )) {
789                 val = attr_dup(in[1]);
790                 //val = in[1];
791                 key = g_strdup(in[0]->u.str);
792                 g_hash_table_insert(cmd_attr_var_hash, key, val);
793         }
794 }
795
796
797
798 /**
799  * command to toggle the active state of a named layer of the current layout
800  *
801  * @param navit The navit instance
802  * @param function unused (needed to match command function signiture)
803  * @param in input attribute in[0] is the name of the layer
804  * @param out output unused
805  * @param valid unused 
806  * @returns nothing
807  */
808 static void
809 navit_cmd_toggle_layer(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
810 {
811         if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
812                 if(this->layout_current && this->layout_current->layers) {
813                         GList* layers = this->layout_current->layers;
814                         while (layers) {
815                                 struct layer*l=layers->data;
816                                 if(l && !strcmp(l->name,in[0]->u.str) ) {
817                                         l->active ^= 1;
818                                         navit_draw(this);
819                                         return;
820                                 }
821                                 layers=g_list_next(layers);
822                         }
823                 }
824         }
825 }
826
827 /**
828  * adds an item with the current coordinate of the vehicle to a named map
829  *
830  * @param navit The navit instance
831  * @param function unused (needed to match command function signiture)
832  * @param in input attribute in[0] is the name of the map 
833  * @param out output attribute, 0 on error or the id of the created item on success
834  * @param valid unused 
835  * @returns nothing
836  */
837 static void
838 navit_cmd_map_add_curr_pos(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
839 {
840         struct attr **list = g_new0(struct attr *,2);
841         struct attr*val = g_new0(struct attr,1);
842         struct mapset* ms;
843         struct map_selection sel;
844         const int selection_range = 10;
845         enum item_type item_type;
846         struct item *it;
847         struct map* curr_map = NULL;
848         struct coord curr_coord;
849         struct map_rect *mr;
850         
851         //return invalid item on error
852         val->type   = attr_none;
853         val->u.item  = NULL;    
854         list[0]     = val;
855         list[1]     = NULL;
856         *out = list;
857         if (
858                 in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str && //map name
859                       in[1] && ATTR_IS_STRING(in[1]->type) && in[1]->u.str    //item type
860         ) {
861
862                 if(!(ms=navit_get_mapset(this))) {
863                         return;
864                 }
865
866                 if((item_type = item_from_name(in[1]->u.str))==type_none) {
867                         return;
868                 }
869
870                 curr_map = mapset_get_map_by_name(ms, in[0]->u.str);
871
872                 //no map with the given name found
873                 if( ! curr_map) {
874                         return;
875                 }
876         
877                 if(this->vehicle && this->vehicle->vehicle ) {
878                         struct attr pos_attr;
879                         if(vehicle_get_attr(this->vehicle->vehicle,attr_position_coord_geo,&pos_attr,NULL)) {
880                                 transform_from_geo(projection_mg, pos_attr.u.coord_geo, &curr_coord);
881                         } else {
882                                 return;
883                         }
884                 } else {
885                         return;
886                 }
887
888                 sel.next=NULL;
889                 sel.order=18;
890                 sel.range.min=type_none;
891                 sel.range.max=type_tec_common;
892                 sel.u.c_rect.lu.x=curr_coord.x-selection_range;
893                 sel.u.c_rect.lu.y=curr_coord.y+selection_range;
894                 sel.u.c_rect.rl.x=curr_coord.x+selection_range;
895                 sel.u.c_rect.rl.y=curr_coord.y-selection_range;
896  
897                 mr = map_rect_new(curr_map, &sel);
898                 if(mr) {
899                         it = map_rect_create_item( mr, item_type);
900                         if (it) {
901                                 val->type = attr_type_item_begin;
902                                 item_coord_set(it,&curr_coord, 1, change_mode_modify);
903                         }
904                         val->u.item  = it;
905                 }
906                 map_rect_destroy(mr);
907         }
908 }
909
910 /**
911  * sets an attribute (name value pair) of a map item specified by map name and item id
912  *
913  * @param navit The navit instance
914  * @param function unused (needed to match command function signiture)
915  * @param in input attribute in[0] - name of the map  ; in[1] - item  ; in[2] - attr name ; in[3] - attr value
916  * @param out output attribute, 0 on error, 1 on success
917  * @param valid unused 
918  * @returns nothing
919  */
920 static void
921 navit_cmd_map_item_set_attr(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
922 {
923         if (
924                 in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str  &&//map name
925                       in[1] && ATTR_IS_ITEM(in[1]->type)   &&                  //item
926                       in[2] && ATTR_IS_STRING(in[2]->type) && in[2]->u.str && //attr_type str
927                       in[3] && ATTR_IS_STRING(in[3]->type) && in[3]->u.str    //attr_value str
928         ) {
929                 struct attr attr_to_set;
930                 struct map* curr_map = NULL;
931                 struct mapset *ms;
932                 struct map_selection sel;
933                 const int selection_range = 500;
934                 struct coord curr_coord;
935                 struct item *it;
936                 
937                 if(ATTR_IS_STRING(attr_from_name(in[2]->u.str))) {
938                         attr_to_set.u.str = in[3]->u.str;
939                         attr_to_set.type = attr_from_name(in[2]->u.str);
940                 }
941                 else if(ATTR_IS_INT(attr_from_name(in[2]->u.str))) {
942                         attr_to_set.u.num = atoi(in[3]->u.str);
943                         attr_to_set.type = attr_from_name(in[2]->u.str);
944                 }
945                 else if(ATTR_IS_DOUBLE(attr_from_name(in[2]->u.str))) {
946                         double* val = g_new0(double,1);
947                         *val = atof(in[3]->u.str);
948                         attr_to_set.u.numd = val;
949                         attr_to_set.type = attr_from_name(in[2]->u.str);
950                 }
951
952                 ms = navit_get_mapset(this);
953
954                 curr_map = mapset_get_map_by_name(ms, in[0]->u.str);
955
956                 if( ! curr_map) {
957                         return;
958                 }
959                 sel.next=NULL;
960                 sel.order=18;
961                 sel.range.min=type_none;
962                 sel.range.max=type_tec_common;
963                 sel.u.c_rect.lu.x=curr_coord.x-selection_range;
964                 sel.u.c_rect.lu.y=curr_coord.y+selection_range;
965                 sel.u.c_rect.rl.x=curr_coord.x+selection_range;
966                 sel.u.c_rect.rl.y=curr_coord.y-selection_range;
967  
968                 it = in[1]->u.item;
969                 if(it) {
970                         item_attr_set(it, &attr_to_set, change_mode_modify);
971                 }
972         }
973 }
974
975 /**
976  * Get attr variable given a key string for the command system (for opaque usage)
977  *
978  * @param navit The navit instance
979  * @param function unused (needed to match command function signiture)
980  * @param in input attribute in[0] is the key string
981  * @param out output attribute, the attr for the given key string if exists or NULL  
982  * @param valid unused 
983  * @returns nothing
984  */
985 static void
986 navit_cmd_get_attr_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
987 {
988         struct attr **list = g_new0(struct attr *,2);
989         if(!cmd_int_var_hash) {
990                 struct attr*val = g_new0(struct attr,1);
991                 val->type   = attr_type_item_begin;
992                 val->u.item = NULL;
993                 list[0]     = val;
994         }
995         if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
996                 struct attr*ret = g_hash_table_lookup(cmd_attr_var_hash, in[0]->u.str);
997                 if(ret) {
998                         list[0] = attr_dup(ret);
999                 }
1000                 else {
1001                         struct attr*val = g_new0(struct attr,1);
1002                         val->type   = attr_type_int_begin;
1003                         val->u.item = NULL;
1004                         list[0]   = val;
1005                 }
1006         }
1007         list[1] = NULL;
1008         *out = list;
1009 }
1010
1011
1012 /**
1013  * Get value given a key string for the command system
1014  *
1015  * @param navit The navit instance
1016  * @param function unused (needed to match command function signiture)
1017  * @param in input attribute in[0] is the key string
1018  * @param out output attribute, the value for the given key string if exists or 0  
1019  * @param valid unused 
1020  * @returns nothing
1021  */
1022 static void
1023 navit_cmd_get_int_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1024 {
1025         struct attr **list = g_new0(struct attr *,2);
1026         if(!cmd_int_var_hash) {
1027                 struct attr*val = g_new0(struct attr,1);
1028                 cmd_int_var_hash = g_hash_table_new(g_str_hash, g_str_equal);
1029                 val->type   = attr_type_int_begin;
1030                 val->u.num  = 0;
1031                 list[0]     = val;
1032         }
1033         if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
1034                 struct attr*ret = g_hash_table_lookup(cmd_int_var_hash, in[0]->u.str);
1035                 if(ret) {
1036                         list[0] = ret;
1037                 }
1038                 else {
1039                         struct attr*val = g_new0(struct attr,1);
1040                         val->type   = attr_type_int_begin;
1041                         val->u.num  = 0;
1042                         list[0]   = val;
1043                 }
1044         }
1045         list[1] = NULL;
1046         *out = list;
1047 }
1048
1049 GList *cmd_int_var_stack = NULL;
1050
1051 /**
1052  * Push an integer to the stack for the command system
1053  *
1054  * @param navit The navit instance
1055  * @param function unused (needed to match command function signiture)
1056  * @param in input attribute in[0] is the integer attibute to push
1057  * @param out output attributes, unused 
1058  * @param valid unused 
1059  * @returns nothing
1060  */
1061 static void
1062 navit_cmd_push_int(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1063 {
1064         if (in && in[0] && ATTR_IS_NUMERIC(in[0]->type)) {
1065                 struct attr*val = g_new(struct attr,1);
1066                 attr_dup_content(in[0],val);
1067                 cmd_int_var_stack = g_list_prepend(cmd_int_var_stack, val);
1068         }
1069 }
1070
1071 /**
1072  * Pop an integer from the command system's integer stack
1073  *
1074  * @param navit The navit instance
1075  * @param function unused (needed to match command function signiture)
1076  * @param in input attributes unused
1077  * @param out output attribute, the value popped if stack isn't empty or 0
1078  * @param valid unused 
1079  * @returns nothing
1080  */
1081 static void
1082 navit_cmd_pop_int(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1083 {
1084         struct attr **list = g_new0(struct attr *,2);
1085         if(!cmd_int_var_stack) {
1086                 struct attr*val = g_new0(struct attr,1);
1087                 val->type = attr_type_int_begin;
1088                 val->u.num  = 0;
1089                 list[0]   = val;
1090         }
1091         else {
1092                 list[0] = cmd_int_var_stack->data;
1093                 cmd_int_var_stack = g_list_remove_link(cmd_int_var_stack,cmd_int_var_stack);
1094         }
1095         list[1] = NULL;
1096         *out = list;
1097 }
1098
1099 /**
1100  * Get current size of command system's integer stack
1101  *
1102  * @param navit The navit instance
1103  * @param function unused (needed to match command function signiture)
1104  * @param in input attributes unused
1105  * @param out output attribute, the size of stack
1106  * @param valid unused 
1107  * @returns nothing
1108  */
1109 static void
1110 navit_cmd_int_stack_size(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1111 {
1112         struct attr **list;
1113         struct attr *attr  = g_new0(struct attr  ,1);
1114         attr->type  = attr_type_int_begin;
1115         if(!cmd_int_var_stack) {
1116                 attr->u.num = 0; 
1117         }
1118         else {
1119                 attr->u.num = g_list_length(cmd_int_var_stack); 
1120         }
1121         list = g_new0(struct attr *,2);
1122         list[0] = attr;
1123         list[1] = NULL;
1124         *out = list;
1125         cmd_int_var_stack = g_list_remove_link(cmd_int_var_stack,cmd_int_var_stack);
1126 }
1127
1128 static struct attr **
1129 navit_get_coord(struct navit *this, struct attr **in, struct pcoord *pc)
1130 {
1131         if (!in)
1132                 return NULL;
1133         if (!in[0])
1134                 return NULL;
1135         pc->pro = transform_get_projection(this->trans);
1136         if (ATTR_IS_STRING(in[0]->type)) {
1137                 struct coord c;
1138                 coord_parse(in[0]->u.str, pc->pro, &c);
1139                 pc->x=c.x;
1140                 pc->y=c.y;
1141                 in++;   
1142         } else if (ATTR_IS_COORD(in[0]->type)) {
1143                 pc->x=in[0]->u.coord->x;
1144                 pc->y=in[0]->u.coord->y;
1145                 in++;
1146         } else if (ATTR_IS_PCOORD(in[0]->type)) {
1147                 *pc=*in[0]->u.pcoord;
1148                 in++;
1149         } else if (in[1] && in[2] && ATTR_IS_INT(in[0]->type) && ATTR_IS_INT(in[1]->type) && ATTR_IS_INT(in[2]->type)) {
1150                 pc->pro=in[0]->u.num;
1151                 pc->x=in[1]->u.num;
1152                 pc->y=in[2]->u.num;
1153                 in+=3;
1154         } else if (in[1] && ATTR_IS_INT(in[0]->type) && ATTR_IS_INT(in[1]->type)) {
1155                 pc->x=in[0]->u.num;
1156                 pc->y=in[1]->u.num;
1157                 in+=2;
1158         } else
1159                 return NULL;
1160         return in;
1161 }
1162
1163 static void
1164 navit_cmd_set_destination(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1165 {
1166         struct pcoord pc;
1167         char *description=NULL;
1168         in=navit_get_coord(this, in, &pc);
1169         if (!in)
1170                 return;
1171         if (in[0] && ATTR_IS_STRING(in[0]->type))
1172                 description=in[0]->u.str;
1173         navit_set_destination(this, &pc, description, 1);
1174 }
1175
1176
1177 static void
1178 navit_cmd_set_center(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1179 {
1180         struct pcoord pc;
1181         in=navit_get_coord(this, in, &pc);
1182         if (!in)
1183                 return;
1184         navit_set_center(this, &pc, 0);
1185 }
1186
1187 static void
1188 navit_cmd_fmt_coordinates(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1189 {
1190         struct attr attr;
1191         attr.type=attr_type_string_begin;
1192         attr.u.str="Fix me";
1193         if (out) {
1194                 *out=attr_generic_add_attr(*out, &attr);
1195         }
1196 }
1197
1198 /**
1199  * Join several string attributes into one
1200  *
1201  * @param navit The navit instance
1202  * @param function unused (needed to match command function signiture)
1203  * @param in input attributes in[0] - separator, in[1..] - attributes to join
1204  * @param out output attribute joined attribute as string
1205  * @param valid unused 
1206  * @returns nothing
1207  */
1208 static void
1209 navit_cmd_strjoin(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1210 {
1211         struct attr attr;
1212         gchar *ret, *sep;
1213         int i;
1214         attr.type=attr_type_string_begin;
1215         attr.u.str=NULL;
1216         if(in[0] && in[1]) {
1217                 sep=attr_to_text(in[0],NULL,1);
1218                 ret=attr_to_text(in[1],NULL,1);
1219                 for(i=2;in[i];i++) {
1220                         gchar *in_i=attr_to_text(in[i],NULL,1);
1221                         gchar *r=g_strjoin(sep,ret,in_i,NULL);
1222                         g_free(in_i);
1223                         g_free(ret);
1224                         ret=r;
1225                 }
1226                 g_free(sep);
1227                 attr.u.str=ret;
1228                 if(out) {
1229                         *out=attr_generic_add_attr(*out, &attr);
1230                 }
1231                 g_free(ret);
1232         }
1233 }
1234
1235 /**
1236  * Call external program
1237  *
1238  * @param navit The navit instance
1239  * @param function unused (needed to match command function signiture)
1240  * @param in input attributes in[0] - name of executable, in[1..] - parameters
1241  * @param out output attribute unused
1242  * @param valid unused 
1243  * @returns nothing
1244  */
1245 static void
1246 navit_cmd_spawn(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
1247 {
1248         int i,j, nparms, nvalid;
1249         const char ** argv=NULL;
1250         struct spawn_process_info *pi;
1251
1252         nparms=0;
1253         nvalid=0;
1254         if(in) {
1255                 while(in[nparms]) {
1256                         if (in[nparms]->type!=attr_none) 
1257                                 nvalid++;
1258                         nparms++;
1259                 }
1260         }
1261         
1262         if(nvalid>0) {
1263                 argv=g_new(char*,nvalid+1);
1264                 for(i=0,j=0;in[i];i++) {
1265                         if(in[i]->type!=attr_none ) {
1266                                 argv[j++]=attr_to_text(in[i],NULL,1);
1267                         } else {
1268                                 dbg(0,"Parameter #%i is attr_none - skipping\n",i);
1269                         }
1270                 }
1271                 argv[j]=NULL;
1272                 pi=spawn_process(argv);
1273                 
1274                 // spawn_process() testing suite - uncomment following code to test.
1275                 //sleep(3);
1276                 // example of non-blocking wait
1277                 //int st=spawn_process_check_status(pi,0);dbg(0,"status %i\n",st);
1278                 // example of blocking wait
1279                 //st=spawn_process_check_status(pi,1);dbg(0,"status %i\n",st);
1280                 // example of wait after process is finished and status is
1281                 // already tested
1282                 //st=spawn_process_check_status(pi,1);dbg(0,"status %i\n",st);
1283                 // example of wait after process is finished and status is
1284                 // already tested - unblocked
1285                 //st=spawn_process_check_status(pi,0);dbg(0,"status %i\n",st);
1286                 
1287                 // End testing suite
1288                 spawn_process_info_free(pi);
1289                 for(i=0;argv[i];i++)
1290                         g_free(argv[i]);
1291                 g_free(argv);
1292         }
1293 }
1294
1295
1296 static struct command_table commands[] = {
1297         {"zoom_in",command_cast(navit_cmd_zoom_in)},
1298         {"zoom_out",command_cast(navit_cmd_zoom_out)},
1299         {"zoom_to_route",command_cast(navit_cmd_zoom_to_route)},
1300         {"say",command_cast(navit_cmd_say)},
1301         {"set_center",command_cast(navit_cmd_set_center)},
1302         {"set_center_cursor",command_cast(navit_cmd_set_center_cursor)},
1303         {"set_destination",command_cast(navit_cmd_set_destination)},
1304         {"announcer_toggle",command_cast(navit_cmd_announcer_toggle)},
1305         {"fmt_coordinates",command_cast(navit_cmd_fmt_coordinates)},
1306         {"set_int_var",command_cast(navit_cmd_set_int_var)},
1307         {"get_int_var",command_cast(navit_cmd_get_int_var)},
1308         {"push_int",command_cast(navit_cmd_push_int)},
1309         {"pop_int",command_cast(navit_cmd_pop_int)},
1310         {"int_stack_size",command_cast(navit_cmd_int_stack_size)},
1311         {"toggle_layer",command_cast(navit_cmd_toggle_layer)},
1312         {"strjoin",command_cast(navit_cmd_strjoin)},
1313         {"spawn",command_cast(navit_cmd_spawn)},
1314         {"map_add_curr_pos",command_cast(navit_cmd_map_add_curr_pos)},
1315         {"map_item_set_attr",command_cast(navit_cmd_map_item_set_attr)},
1316         {"set_attr_var",command_cast(navit_cmd_set_attr_var)},
1317         {"get_attr_var",command_cast(navit_cmd_get_attr_var)},
1318 };
1319         
1320 void 
1321 navit_command_add_table(struct navit*this_, struct command_table *commands, int count)
1322 {
1323   command_add_table(this_->attr_cbl, commands, count, this_);
1324 }
1325
1326 struct navit *
1327 navit_new(struct attr *parent, struct attr **attrs)
1328 {
1329         struct navit *this_=g_new0(struct navit, 1);
1330         struct pcoord center;
1331         struct coord co;
1332         struct coord_geo g;
1333         enum projection pro=projection_mg;
1334         int zoom = 256;
1335         g.lat=53.13;
1336         g.lng=11.70;
1337
1338         this_->self.type=attr_navit;
1339         this_->self.u.navit=this_;
1340         this_->attr_cbl=callback_list_new();
1341
1342         this_->orientation=-1;
1343         this_->tracking_flag=1;
1344         this_->recentdest_count=10;
1345         this_->osd_configuration=-1;
1346
1347         this_->center_timeout = 10;
1348         this_->use_mousewheel = 1;
1349         this_->autozoom_secs = 10;
1350         this_->autozoom_min = 7;
1351         this_->autozoom_active = 0;
1352         this_->zoom_min = 1;
1353         this_->zoom_max = 2097152;
1354         this_->follow_cursor = 1;
1355         this_->radius = 30;
1356         this_->border = 16;
1357
1358         this_->trans = transform_new();
1359         this_->trans_cursor = transform_new();
1360         transform_from_geo(pro, &g, &co);
1361         center.x=co.x;
1362         center.y=co.y;
1363         center.pro = pro;
1364         
1365         transform_setup(this_->trans, &center, zoom, (this_->orientation != -1) ? this_->orientation : 0);
1366
1367         this_->bookmarks=bookmarks_new(&this_->self, NULL, this_->trans);
1368
1369         this_->prevTs=0;
1370
1371         for (;*attrs; attrs++) {
1372                 navit_set_attr_do(this_, *attrs, 1);
1373         }
1374         this_->displaylist=graphics_displaylist_new();
1375         command_add_table(this_->attr_cbl, commands, sizeof(commands)/sizeof(struct command_table), this_);
1376
1377         this_->messages = messagelist_new(attrs);
1378         
1379         return this_;
1380 }
1381
1382 static int
1383 navit_set_gui(struct navit *this_, struct gui *gui)
1384 {
1385         if (this_->gui)
1386                 return 0;
1387         this_->gui=gui;
1388         if (gui_has_main_loop(this_->gui)) {
1389                 if (! main_loop_gui) {
1390                         main_loop_gui=this_->gui;
1391                 } else {
1392                         dbg(0,"gui with main loop already active, ignoring this instance");
1393                         return 0;
1394                 }
1395         }
1396         return 1;
1397 }
1398
1399 void 
1400 navit_add_message(struct navit *this_, char *message)
1401 {
1402         message_new(this_->messages, message);
1403 }
1404
1405 struct message
1406 *navit_get_messages(struct navit *this_)
1407 {
1408         return message_get(this_->messages);
1409 }
1410
1411 static int
1412 navit_set_graphics(struct navit *this_, struct graphics *gra)
1413 {
1414         if (this_->gra)
1415                 return 0;
1416         this_->gra=gra;
1417         this_->resize_callback=callback_new_attr_1(callback_cast(navit_resize), attr_resize, this_);
1418         graphics_add_callback(gra, this_->resize_callback);
1419         this_->button_callback=callback_new_attr_1(callback_cast(navit_button), attr_button, this_);
1420         graphics_add_callback(gra, this_->button_callback);
1421         this_->motion_callback=callback_new_attr_1(callback_cast(navit_motion), attr_motion, this_);
1422         graphics_add_callback(gra, this_->motion_callback);
1423         this_->predraw_callback=callback_new_attr_1(callback_cast(navit_predraw), attr_predraw, this_);
1424         graphics_add_callback(gra, this_->predraw_callback);
1425         return 1;
1426 }
1427
1428 struct graphics *
1429 navit_get_graphics(struct navit *this_)
1430 {
1431         return this_->gra;
1432 }
1433
1434 struct vehicleprofile *
1435 navit_get_vehicleprofile(struct navit *this_)
1436 {
1437         return this_->vehicleprofile;
1438 }
1439
1440 GList *
1441 navit_get_vehicleprofiles(struct navit *this_)
1442 {
1443         return this_->vehicleprofiles;
1444 }
1445
1446 static void
1447 navit_projection_set(struct navit *this_, enum projection pro, int draw)
1448 {
1449         struct coord_geo g;
1450         struct coord *c;
1451
1452         c=transform_center(this_->trans);
1453         transform_to_geo(transform_get_projection(this_->trans), c, &g);
1454         transform_set_projection(this_->trans, pro);
1455         transform_from_geo(pro, &g, c);
1456         if (draw)
1457                 navit_draw(this_);
1458 }
1459
1460 /**
1461  * Start the route computing to a given set of coordinates
1462  *
1463  * @param navit The navit instance
1464  * @param c The coordinate to start routing to
1465  * @param description A label which allows the user to later identify this destination in the former destinations selection
1466  * @returns nothing
1467  */
1468 void
1469 navit_set_destination(struct navit *this_, struct pcoord *c, const char *description, int async)
1470 {
1471         char *destination_file;
1472         if (c) {
1473                 this_->destination=*c;
1474                 this_->destination_valid=1;
1475
1476             dbg(1, "navit->navit_set_destination %i\n", c->x);
1477             dbg(1, "navit->navit_set_destination %i\n", c->y);
1478
1479         } else
1480                 this_->destination_valid=0;
1481         destination_file = bookmarks_get_destination_file(TRUE);
1482         bookmarks_append_coord(this_->bookmarks, destination_file, c, 1, "former_destination", description, NULL, this_->recentdest_count);
1483         g_free(destination_file);
1484         callback_list_call_attr_0(this_->attr_cbl, attr_destination);
1485         if (this_->route) {
1486                 route_set_destination(this_->route, c, async);
1487
1488                 if (this_->ready == 3)
1489                         navit_draw(this_);
1490         }
1491 }
1492
1493 /**
1494  * Start the route computing to a given set of coordinates including waypoints
1495  *
1496  * @param navit The navit instance
1497  * @param c The coordinate to start routing to
1498  * @param description A label which allows the user to later identify this destination in the former destinations selection
1499  * @returns nothing
1500  */
1501 void
1502 navit_set_destinations(struct navit *this_, struct pcoord *c, int count, const char *description, int async)
1503 {
1504         char *destination_file;
1505         if (c && count) {
1506                 this_->destination=c[count-1];
1507                 this_->destination_valid=1;
1508         } else
1509                 this_->destination_valid=0;
1510         destination_file = bookmarks_get_destination_file(TRUE);
1511         bookmarks_append_coord(this_->bookmarks, destination_file, c, count, "former_itinerary", description, NULL, this_->recentdest_count);
1512         g_free(destination_file);
1513         callback_list_call_attr_0(this_->attr_cbl, attr_destination);
1514         if (this_->route) {
1515                 route_set_destinations(this_->route, c, count, async);
1516
1517                 if (this_->ready == 3)
1518                         navit_draw(this_);
1519         }
1520 }
1521
1522 /**
1523  * @brief Checks if a route is calculated
1524  *
1525  * This function checks if a route is calculated.
1526  *
1527  * @param this_ The navit struct whose route should be checked.
1528  * @return True if the route is set, false otherwise.
1529  */
1530 int
1531 navit_check_route(struct navit *this_)
1532 {
1533         if (this_->route) {
1534                 return route_get_path_set(this_->route);
1535         }
1536
1537         return 0;
1538 }
1539
1540 static int
1541 navit_former_destinations_active(struct navit *this_)
1542 {
1543         char *destination_file = bookmarks_get_destination_file(FALSE);
1544         FILE *f;
1545         int active=0;
1546         char buffer[3];
1547         f=fopen(destination_file,"r");
1548         if (f) {
1549                 if(!fseek(f, -2, SEEK_END) && fread(buffer, 2, 1, f) == 1 && (buffer[0]!='\n' || buffer[1]!='\n')) 
1550                         active=1;
1551                 fclose(f);
1552         }
1553         g_free(destination_file);
1554         return active;
1555 }
1556
1557 struct map* read_former_destinations_from_file(){
1558         struct attr type, data, flags, *attrs[4];
1559         char *destination_file = bookmarks_get_destination_file(FALSE);
1560         struct map *m;
1561
1562         type.type=attr_type;
1563         type.u.str="textfile";
1564
1565         data.type=attr_data;
1566         data.u.str=destination_file;
1567
1568         flags.type=attr_flags;
1569         flags.u.num=1;
1570
1571         attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;
1572
1573         m=map_new(NULL, attrs);
1574         g_free(destination_file);
1575         return m;
1576 }
1577
1578 static void
1579 navit_add_former_destinations_from_file(struct navit *this_)
1580 {
1581         struct item *item;
1582         int i,valid=0,count=0;
1583         struct coord c[16];
1584         struct pcoord pc[16];
1585         struct map_rect *mr;
1586
1587         this_->former_destination=read_former_destinations_from_file();
1588         if (!this_->route || !navit_former_destinations_active(this_))
1589                 return; 
1590         mr=map_rect_new(this_->former_destination, NULL);
1591         while ((item=map_rect_get_item(mr))) {
1592                 if ((item->type == type_former_destination || item->type == type_former_itinerary || item->type == type_former_itinerary_part) && (count=item_coord_get(item, c, 16))) 
1593                         valid=1;
1594         }
1595         map_rect_destroy(mr);
1596         if (valid && count > 0) {
1597                 for (i = 0 ; i < count ; i++) {
1598                         pc[i].pro=map_projection(this_->former_destination);
1599                         pc[i].x=c[i].x;
1600                         pc[i].y=c[i].y;
1601                 }
1602                 if (count == 1)
1603                         route_set_destination(this_->route, &pc[0], 1);
1604                 else
1605                         route_set_destinations(this_->route, pc, count, 1);
1606                 this_->destination=pc[count-1];
1607                 this_->destination_valid=1;
1608         }
1609 }
1610
1611
1612 void
1613 navit_textfile_debug_log(struct navit *this_, const char *fmt, ...)
1614 {
1615         va_list ap;
1616         char *str1,*str2;
1617         va_start(ap, fmt);
1618         if (this_->textfile_debug_log && this_->vehicle) {
1619                 str1=g_strdup_vprintf(fmt, ap);
1620                 str2=g_strdup_printf("0x%x 0x%x%s%s\n", this_->vehicle->coord.x, this_->vehicle->coord.y, strlen(str1) ? " " : "", str1);
1621                 log_write(this_->textfile_debug_log, str2, strlen(str2), 0);
1622                 g_free(str2);
1623                 g_free(str1);
1624         }
1625         va_end(ap);
1626 }
1627
1628 void
1629 navit_textfile_debug_log_at(struct navit *this_, struct pcoord *pc, const char *fmt, ...)
1630 {
1631         va_list ap;
1632         char *str1,*str2;
1633         va_start(ap, fmt);
1634         if (this_->textfile_debug_log && this_->vehicle) {
1635                 str1=g_strdup_vprintf(fmt, ap);
1636                 str2=g_strdup_printf("0x%x 0x%x%s%s\n", pc->x, pc->y, strlen(str1) ? " " : "", str1);
1637                 log_write(this_->textfile_debug_log, str2, strlen(str2), 0);
1638                 g_free(str2);
1639                 g_free(str1);
1640         }
1641         va_end(ap);
1642 }
1643
1644 void
1645 navit_say(struct navit *this_, char *text)
1646 {
1647         struct attr attr;
1648         if(this_->speech) {
1649                 if (!speech_get_attr(this_->speech, attr_active, &attr, NULL))
1650                         attr.u.num = 1;
1651                 dbg(1, "this_.speech->active %i\n", attr.u.num);
1652                 if(attr.u.num)
1653                         speech_say(this_->speech, text);
1654         }
1655 }
1656
1657 /**
1658  * @brief Toggles the navigation announcer for navit
1659  * @param this_ The navit object
1660  */
1661 static void
1662 navit_cmd_announcer_toggle(struct navit *this_)
1663 {
1664     struct attr attr, speechattr;
1665
1666     // search for the speech attribute
1667     if(!navit_get_attr(this_, attr_speech, &speechattr, NULL))
1668         return;
1669     // find out if the corresponding attribute attr_active has been set
1670     if(speech_get_attr(speechattr.u.speech, attr_active, &attr, NULL)) {
1671         // flip it then...
1672         attr.u.num = !attr.u.num;
1673     } else {
1674         // otherwise disable it because voice is enabled by default
1675         attr.type = attr_active;
1676         attr.u.num = 0;
1677     }
1678
1679     // apply the new state
1680     if(!speech_set_attr(speechattr.u.speech, &attr))
1681         return;
1682
1683     // announce that the speech attribute has changed
1684     callback_list_call_attr_0(this_->attr_cbl, attr_speech);
1685 }
1686
1687 void
1688 navit_speak(struct navit *this_)
1689 {
1690         struct navigation *nav=this_->navigation;
1691         struct map *map=NULL;
1692         struct map_rect *mr=NULL;
1693         struct item *item;
1694         struct attr attr;
1695
1696     if (!speech_get_attr(this_->speech, attr_active, &attr, NULL))
1697         attr.u.num = 1;
1698     dbg(1, "this_.speech->active %i\n", attr.u.num);
1699     if(!attr.u.num)
1700         return;
1701
1702         if (nav)
1703                 map=navigation_get_map(nav);
1704         if (map)
1705                 mr=map_rect_new(map, NULL);
1706         if (mr) {
1707                 while ((item=map_rect_get_item(mr)) && (item->type == type_nav_position || item->type == type_nav_none));
1708                 if (item && item_attr_get(item, attr_navigation_speech, &attr)) {
1709                         speech_say(this_->speech, attr.u.str);
1710                         navit_add_message(this_, attr.u.str);
1711                         navit_textfile_debug_log(this_, "type=announcement label=\"%s\"", attr.u.str);
1712                 }
1713                 map_rect_destroy(mr);
1714         }
1715 }
1716
1717 static void
1718 navit_window_roadbook_update(struct navit *this_)
1719 {
1720         struct navigation *nav=this_->navigation;
1721         struct map *map=NULL;
1722         struct map_rect *mr=NULL;
1723         struct item *item;
1724         struct attr attr;
1725         struct param_list param[5];
1726         int secs;
1727
1728         dbg(1,"enter\n");
1729         datawindow_mode(this_->roadbook_window, 1);
1730         if (nav)
1731                 map=navigation_get_map(nav);
1732         if (map)
1733                 mr=map_rect_new(map, NULL);
1734         dbg(0,"nav=%p map=%p mr=%p\n", nav, map, mr);
1735         if (mr) {
1736                 dbg(0,"while loop\n");
1737                 while ((item=map_rect_get_item(mr))) {
1738                         dbg(0,"item=%p\n", item);
1739                         attr.u.str=NULL;
1740                         if (item->type != type_nav_position) {
1741                                 item_attr_get(item, attr_navigation_long, &attr);
1742                                 if (attr.u.str == NULL) {
1743                                         continue;
1744                                 }
1745                                 dbg(2, "Command='%s'\n", attr.u.str);
1746                                 param[0].value=g_strdup(attr.u.str);
1747                         } else
1748                                 param[0].value=_("Position");
1749                         param[0].name=_("Command");
1750
1751                         item_attr_get(item, attr_length, &attr);
1752                         dbg(2, "Length=%d\n", attr.u.num);
1753                         param[1].name=_("Length");
1754
1755                         if ( attr.u.num >= 2000 )
1756                         {
1757                                 param[1].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
1758                         }
1759                         else
1760                         {
1761                                 param[1].value=g_strdup_printf("%7d %s",attr.u.num, _("m"));
1762                         }
1763
1764                         item_attr_get(item, attr_time, &attr);
1765                         dbg(2, "Time=%d\n", attr.u.num);
1766                         secs=attr.u.num/10;
1767                         param[2].name=_("Time");
1768                         if ( secs >= 3600 )
1769                         {
1770                                 param[2].value=g_strdup_printf("%d:%02d:%02d",secs / 60, ( secs / 60 ) % 60 , secs % 60);
1771                         }
1772                         else
1773                         {
1774                                 param[2].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
1775                         }
1776
1777                         item_attr_get(item, attr_destination_length, &attr);
1778                         dbg(2, "Destlength=%d\n", attr.u.num);
1779                         param[3].name=_("Destination Length");
1780                         if ( attr.u.num >= 2000 )
1781                         {
1782                                 param[3].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
1783                         }
1784                         else
1785                         {
1786                                 param[3].value=g_strdup_printf("%d %s",attr.u.num, _("m"));
1787                         }
1788
1789                         item_attr_get(item, attr_destination_time, &attr);
1790                         dbg(2, "Desttime=%d\n", attr.u.num);
1791                         secs=attr.u.num/10;
1792                         param[4].name=_("Destination Time");
1793                         if ( secs >= 3600 )
1794                         {
1795                                 param[4].value=g_strdup_printf("%d:%02d:%02d",secs / 3600, (secs / 60 ) % 60 , secs % 60);
1796                         }
1797                         else
1798                         {
1799                                 param[4].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
1800                         }
1801                         datawindow_add(this_->roadbook_window, param, 5);
1802                 }
1803                 map_rect_destroy(mr);
1804         }
1805         datawindow_mode(this_->roadbook_window, 0);
1806 }
1807
1808 void
1809 navit_window_roadbook_destroy(struct navit *this_)
1810 {
1811         dbg(0, "enter\n");
1812         navigation_unregister_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
1813         this_->roadbook_window=NULL;
1814         this_->roadbook_callback=NULL;
1815 }
1816 void
1817 navit_window_roadbook_new(struct navit *this_)
1818 {
1819         if (!this_->gui || this_->roadbook_callback || this_->roadbook_window) {
1820                 return;
1821         }
1822
1823         this_->roadbook_callback=callback_new_1(callback_cast(navit_window_roadbook_update), this_);
1824         navigation_register_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
1825         this_->roadbook_window=gui_datawindow_new(this_->gui, _("Roadbook"), NULL, callback_new_1(callback_cast(navit_window_roadbook_destroy), this_));
1826         navit_window_roadbook_update(this_);
1827 }
1828
1829 void
1830 navit_init(struct navit *this_)
1831 {
1832         struct mapset *ms;
1833         struct map *map;
1834         int callback;
1835         char *center_file;
1836
1837         dbg(2,"enter gui %p graphics %p\n",this_->gui,this_->gra);
1838
1839         if (!this_->gui && !(this_->flags & 2)) {
1840                 dbg(0,"no gui\n");
1841                 navit_destroy(this_);
1842                 return;
1843         }
1844         if (!this_->gra && !(this_->flags & 1)) {
1845                 dbg(0,"no graphics\n");
1846                 navit_destroy(this_);
1847                 return;
1848         }
1849         dbg(2,"Connecting gui to graphics\n");
1850         if (this_->gui && this_->gra && gui_set_graphics(this_->gui, this_->gra)) {
1851                 struct attr attr_type_gui, attr_type_graphics;
1852                 gui_get_attr(this_->gui, attr_type, &attr_type_gui, NULL);
1853                 graphics_get_attr(this_->gra, attr_type, &attr_type_graphics, NULL);
1854                 dbg(0,"failed to connect graphics '%s' to gui '%s'\n", attr_type_graphics.u.str, attr_type_gui.u.str);
1855                 dbg(0," Please see http://wiki.navit-project.org/index.php/Failed_to_connect_graphics_to_gui\n");
1856                 dbg(0," for explanations and solutions\n");
1857
1858                 navit_destroy(this_);
1859                 return;
1860         }
1861         if (this_->speech && this_->navigation) {
1862                 struct attr speech;
1863                 speech.type=attr_speech;
1864                 speech.u.speech=this_->speech;
1865                 navigation_set_attr(this_->navigation, &speech);
1866         }
1867         dbg(2,"Initializing graphics\n");
1868         dbg(2,"Setting Vehicle\n");
1869         navit_set_vehicle(this_, this_->vehicle);
1870         dbg(2,"Adding dynamic maps to mapset %p\n",this_->mapsets);
1871         if (this_->mapsets) {
1872                 struct mapset_handle *msh;
1873                 ms=this_->mapsets->data;
1874                 this_->progress_cb=callback_new_attr_1(callback_cast(navit_map_progress), attr_progress, this_);
1875                 msh=mapset_open(ms);
1876                 while (msh && (map=mapset_next(msh, 0))) {
1877                         //pass new callback instance for each map in the mapset to make map callback list destruction work correctly
1878                         struct callback *pcb = callback_new_attr_1(callback_cast(navit_map_progress), attr_progress, this_);
1879                         map_add_callback(map, pcb);
1880                 }
1881                 mapset_close(msh);
1882                 
1883                 if (this_->route) {
1884                         if ((map=route_get_map(this_->route))) {
1885                                 struct attr map_a;
1886                                 map_a.type=attr_map;
1887                                 map_a.u.map=map;
1888                                 mapset_add_attr(ms, &map_a);
1889                         }
1890                         if ((map=route_get_graph_map(this_->route))) {
1891                                 struct attr map_a,active;
1892                                 map_a.type=attr_map;
1893                                 map_a.u.map=map;
1894                                 active.type=attr_active;
1895                                 active.u.num=0;
1896                                 mapset_add_attr(ms, &map_a);
1897                                 map_set_attr(map, &active);
1898                         }
1899                         route_set_mapset(this_->route, ms);
1900                         route_set_projection(this_->route, transform_get_projection(this_->trans));
1901                 }
1902                 if (this_->tracking) {
1903                         tracking_set_mapset(this_->tracking, ms);
1904                         if (this_->route)
1905                                 tracking_set_route(this_->tracking, this_->route);
1906                 }
1907                 if (this_->navigation) {
1908                         if ((map=navigation_get_map(this_->navigation))) {
1909                                 struct attr map_a,active;
1910                                 map_a.type=attr_map;
1911                                 map_a.u.map=map;
1912                                 active.type=attr_active;
1913                                 active.u.num=0;
1914                                 mapset_add_attr(ms, &map_a);
1915                                 map_set_attr(map, &active);
1916                         }
1917                 }
1918                 if (this_->tracking) {
1919                         if ((map=tracking_get_map(this_->tracking))) {
1920                                 struct attr map_a,active;
1921                                 map_a.type=attr_map;
1922                                 map_a.u.map=map;
1923                                 active.type=attr_active;
1924                                 active.u.num=0;
1925                                 mapset_add_attr(ms, &map_a);
1926                                 map_set_attr(map, &active);
1927                         }
1928                 }
1929                 navit_add_former_destinations_from_file(this_);
1930         }
1931         if (this_->route) {
1932                 struct attr callback;
1933                 this_->route_cb=callback_new_attr_1(callback_cast(navit_redraw_route), attr_route_status, this_);
1934                 callback.type=attr_callback;
1935                 callback.u.callback=this_->route_cb;
1936                 route_add_attr(this_->route, &callback);
1937         }
1938         if (this_->navigation) {
1939                 if (this_->speech) {
1940                         this_->nav_speech_cb=callback_new_1(callback_cast(navit_speak), this_);
1941                         navigation_register_callback(this_->navigation, attr_navigation_speech, this_->nav_speech_cb);
1942                 }
1943                 if (this_->route)
1944                         navigation_set_route(this_->navigation, this_->route);
1945         }
1946         dbg(2,"Setting Center\n");
1947         center_file = bookmarks_get_center_file(FALSE);
1948         bookmarks_set_center_from_file(this_->bookmarks, center_file);
1949         g_free(center_file);
1950 #if 0
1951         if (this_->menubar) {
1952                 men=menu_add(this_->menubar, "Data", menu_type_submenu, NULL);
1953                 if (men) {
1954                         navit_add_menu_windows_items(this_, men);
1955                 }
1956         }
1957 #endif
1958         global_navit=this_;
1959 #if 0
1960         navit_window_roadbook_new(this_);
1961         navit_window_items_new(this_);
1962 #endif
1963
1964         messagelist_init(this_->messages);
1965
1966         navit_set_cursors(this_);
1967
1968         callback_list_call_attr_1(this_->attr_cbl, attr_navit, this_);
1969         callback=(this_->ready == 2);
1970         this_->ready|=1;
1971         dbg(2,"ready=%d\n",this_->ready);
1972         if (this_->ready == 3)
1973                 navit_draw_async(this_, 1);
1974         if (callback)
1975                 callback_list_call_attr_1(this_->attr_cbl, attr_graphics_ready, this_);
1976 #if 0
1977         routech_test(this_);
1978 #endif
1979 }
1980
1981 void
1982 navit_zoom_to_rect(struct navit *this_, struct coord_rect *r)
1983 {
1984         struct coord c;
1985         int scale=16;
1986
1987         c.x=(r->rl.x+r->lu.x)/2;
1988         c.y=(r->rl.y+r->lu.y)/2;
1989         transform_set_center(this_->trans, &c);
1990         dbg(1,"%x,%x-%x,%x\n", r->rl.x,r->rl.y,r->lu.x,r->lu.y);
1991         while (scale < 1<<20) {
1992                 struct point p1,p2;
1993                 transform_set_scale(this_->trans, scale);
1994                 transform_setup_source_rect(this_->trans);
1995                 transform(this_->trans, transform_get_projection(this_->trans), &r->lu, &p1, 1, 0, 0, NULL);
1996                 transform(this_->trans, transform_get_projection(this_->trans), &r->rl, &p2, 1, 0, 0, NULL);
1997                 dbg(1,"%d,%d-%d,%d\n",p1.x,p1.y,p2.x,p2.y);
1998                 if (p1.x < 0 || p2.x < 0 || p1.x > this_->w || p2.x > this_->w ||
1999                     p1.y < 0 || p2.y < 0 || p1.y > this_->h || p2.y > this_->h)
2000                         scale*=2;
2001                 else
2002                         break;
2003         
2004         }
2005         if (this_->ready == 3)
2006                 navit_draw_async(this_,0);
2007 }
2008
2009 void
2010 navit_zoom_to_route(struct navit *this_, int orientation)
2011 {
2012         struct map *map;
2013         struct map_rect *mr=NULL;
2014         struct item *item;
2015         struct coord c;
2016         struct coord_rect r;
2017         int count=0;
2018         if (! this_->route)
2019                 return;
2020         dbg(1,"enter\n");
2021         map=route_get_map(this_->route);
2022         dbg(1,"map=%p\n",map);
2023         if (map)
2024                 mr=map_rect_new(map, NULL);
2025         dbg(1,"mr=%p\n",mr);
2026         if (mr) {
2027                 while ((item=map_rect_get_item(mr))) {
2028                         dbg(1,"item=%s\n", item_to_name(item->type));
2029                         while (item_coord_get(item, &c, 1)) {
2030                                 dbg(1,"coord\n");
2031                                 if (!count) 
2032                                         r.lu=r.rl=c;
2033                                 else
2034                                         coord_rect_extend(&r, &c);      
2035                                 count++;
2036                         }
2037                 }
2038                 map_rect_destroy(mr);
2039         }
2040         if (! count)
2041                 return;
2042         if (orientation != -1)
2043                 transform_set_yaw(this_->trans, orientation);
2044         navit_zoom_to_rect(this_, &r);
2045 }
2046
2047 static void
2048 navit_cmd_zoom_to_route(struct navit *this)
2049 {
2050         navit_zoom_to_route(this, 0);
2051 }
2052
2053
2054 /**
2055  * Change the current zoom level
2056  *
2057  * @param navit The navit instance
2058  * @param center The point where to center the map, including its projection
2059  * @returns nothing
2060  */
2061 void
2062 navit_set_center(struct navit *this_, struct pcoord *center, int set_timeout)
2063 {
2064         struct coord *c=transform_center(this_->trans);
2065         struct coord c1,c2;
2066         enum projection pro = transform_get_projection(this_->trans);
2067         if (pro != center->pro) {
2068                 c1.x = center->x;
2069                 c1.y = center->y;
2070                 transform_from_to(&c1, center->pro, &c2, pro);
2071         } else {
2072                 c2.x = center->x;
2073                 c2.y = center->y;
2074         }
2075         *c=c2;
2076         if (set_timeout) 
2077                 navit_set_timeout(this_);
2078         if (this_->ready == 3)
2079                 navit_draw(this_);
2080 }
2081
2082 static void
2083 navit_set_center_coord_screen(struct navit *this_, struct coord *c, struct point *p, int set_timeout)
2084 {
2085         int width, height;
2086         struct point po;
2087         transform_set_center(this_->trans, c);
2088         transform_get_size(this_->trans, &width, &height);
2089         po.x=width/2;
2090         po.y=height/2;
2091         update_transformation(this_->trans, &po, p, NULL);
2092         if (set_timeout)
2093                 navit_set_timeout(this_);
2094 }
2095
2096 /**
2097  * Links all vehicles to a cursor depending on the current profile.
2098  *
2099  * @param this_ A navit instance
2100  * @author Ralph Sennhauser (10/2009)
2101  */
2102 static void
2103 navit_set_cursors(struct navit *this_)
2104 {
2105         struct attr name;
2106         struct navit_vehicle *nv;
2107         struct cursor *c;
2108         GList *v;
2109
2110         v=g_list_first(this_->vehicles); // GList of navit_vehicles
2111         while (v) {
2112                 nv=v->data;
2113                 if (vehicle_get_attr(nv->vehicle, attr_cursorname, &name, NULL)) {
2114                         if (!strcmp(name.u.str,"none"))
2115                                 c=NULL;
2116                         else
2117                                 c=layout_get_cursor(this_->layout_current, name.u.str);
2118                 } else
2119                         c=layout_get_cursor(this_->layout_current, "default");
2120                 vehicle_set_cursor(nv->vehicle, c, 0);
2121                 v=g_list_next(v);
2122         }
2123         return;
2124 }
2125
2126 static int
2127 navit_get_cursor_pnt(struct navit *this_, struct point *p, int keep_orientation, int *dir)
2128 {
2129         int width, height;
2130         struct navit_vehicle *nv=this_->vehicle;
2131
2132         float offset=this_->radius;      // Cursor offset from the center of the screen (percent).
2133 #if 0 /* Better improve track.c to get that issue resolved or make it configurable with being off the default, the jumping back to the center is a bit annoying */
2134         float min_offset = 0.;      // Percent offset at min_offset_speed.
2135         float max_offset = 30.;     // Percent offset at max_offset_speed.
2136         int min_offset_speed = 2;   // Speed in km/h
2137         int max_offset_speed = 50;  // Speed ini km/h
2138         // Calculate cursor offset from the center of the screen, upon speed.
2139         if (nv->speed <= min_offset_speed) {
2140             offset = min_offset;
2141         } else if (nv->speed > max_offset_speed) {
2142             offset = max_offset;
2143         } else {
2144             offset = (max_offset - min_offset) / (max_offset_speed - min_offset_speed) * (nv->speed - min_offset_speed);
2145         }
2146 #endif
2147
2148         transform_get_size(this_->trans, &width, &height);
2149         if (this_->orientation == -1 || keep_orientation) {
2150                 p->x=50*width/100;
2151                 p->y=(50 + offset)*height/100;
2152                 if (dir) 
2153                         *dir=keep_orientation?this_->orientation:nv->dir;
2154         } else {
2155                 int mdir;
2156                 if (this_->tracking && this_->tracking_flag) {
2157                         mdir = tracking_get_angle(this_->tracking) - this_->orientation;
2158                 } else {
2159                         mdir=nv->dir-this_->orientation;
2160                 }
2161
2162                 p->x=(50 - offset*sin(M_PI*mdir/180.))*width/100;
2163                 p->y=(50 + offset*cos(M_PI*mdir/180.))*height/100;
2164                 if (dir)
2165                         *dir=this_->orientation;
2166         }
2167         return 1;
2168 }
2169
2170 void
2171 navit_set_center_cursor(struct navit *this_, int autozoom, int keep_orientation)
2172 {
2173         int dir;
2174         struct point pn;
2175         struct navit_vehicle *nv=this_->vehicle;
2176         navit_get_cursor_pnt(this_, &pn, keep_orientation, &dir);
2177         transform_set_yaw(this_->trans, dir);
2178         navit_set_center_coord_screen(this_, &nv->coord, &pn, 0);
2179         if (autozoom)
2180                 navit_autozoom(this_, &nv->coord, nv->speed, 0);
2181 }
2182
2183 static void
2184 navit_set_center_cursor_draw(struct navit *this_)
2185 {
2186         navit_set_center_cursor(this_,1,0);
2187         if (this_->ready == 3)
2188                 navit_draw_async(this_, 1);
2189 }
2190
2191 static void
2192 navit_cmd_set_center_cursor(struct navit *this_)
2193 {
2194         navit_set_center_cursor_draw(this_);
2195 }
2196
2197 void
2198 navit_set_center_screen(struct navit *this_, struct point *p, int set_timeout)
2199 {
2200         struct coord c;
2201         struct pcoord pc;
2202         transform_reverse(this_->trans, p, &c);
2203         pc.x = c.x;
2204         pc.y = c.y;
2205         pc.pro = transform_get_projection(this_->trans);
2206         navit_set_center(this_, &pc, set_timeout);
2207 }
2208
2209 #if 0
2210                 switch((*attrs)->type) {
2211                 case attr_zoom:
2212                         zoom=(*attrs)->u.num;
2213                         break;
2214                 case attr_center:
2215                         g=*((*attrs)->u.coord_geo);
2216                         break;
2217 #endif
2218
2219 static int
2220 navit_set_attr_do(struct navit *this_, struct attr *attr, int init)
2221 {
2222         int dir=0, orient_old=0, attr_updated=0;
2223         struct coord co;
2224         long zoom;
2225         GList *l;
2226         struct navit_vehicle *nv;
2227         struct layout *lay;
2228         struct attr active;
2229         active.type=attr_active;
2230         active.u.num=0;
2231
2232         switch (attr->type) {
2233         case attr_autozoom:
2234                 attr_updated=(this_->autozoom_secs != attr->u.num);
2235                 this_->autozoom_secs = attr->u.num;
2236                 break;
2237         case attr_autozoom_active:
2238                 attr_updated=(this_->autozoom_active != attr->u.num);
2239                 this_->autozoom_active = attr->u.num;
2240                 break;
2241         case attr_center:
2242                 transform_from_geo(transform_get_projection(this_->trans), attr->u.coord_geo, &co);
2243                 dbg(1,"0x%x,0x%x\n",co.x,co.y);
2244                 transform_set_center(this_->trans, &co);
2245                 break;
2246         case attr_drag_bitmap:
2247                 attr_updated=(this_->drag_bitmap != !!attr->u.num);
2248                 this_->drag_bitmap=!!attr->u.num;
2249                 break;
2250         case attr_flags:
2251                 attr_updated=(this_->flags != attr->u.num);
2252                 this_->flags=attr->u.num;
2253                 break;
2254         case attr_flags_graphics:
2255                 attr_updated=(this_->graphics_flags != attr->u.num);
2256                 this_->graphics_flags=attr->u.num;
2257                 break;
2258         case attr_follow:
2259                 if (!this_->vehicle)
2260                         return 0;
2261                 attr_updated=(this_->vehicle->follow_curr != attr->u.num);
2262                 this_->vehicle->follow_curr = attr->u.num;
2263                 break;
2264         case attr_layout:
2265                 if(this_->layout_current!=attr->u.layout) {
2266                         this_->layout_current=attr->u.layout;
2267                         graphics_font_destroy_all(this_->gra);
2268                         navit_set_cursors(this_);
2269                         if (this_->ready == 3)
2270                                 navit_draw(this_);
2271                         attr_updated=1;
2272                 }
2273                 break;
2274         case attr_layout_name:
2275                 l=this_->layouts;
2276                 while (l) {
2277                         lay=l->data;
2278                         if (!strcmp(lay->name,attr->u.str)) {
2279                                 struct attr attr;
2280                                 attr.type=attr_layout;
2281                                 attr.u.layout=lay;
2282                                 return navit_set_attr_do(this_, &attr, init);
2283                         }
2284                         l=g_list_next(l);
2285                 }               
2286                 return 0;
2287         case attr_map_border:
2288                 if (this_->border != attr->u.num) {
2289                         this_->border=attr->u.num;
2290                         attr_updated=1;
2291                 }
2292                 break;
2293         case attr_orientation:
2294                 orient_old=this_->orientation;
2295                 this_->orientation=attr->u.num;
2296                 if (!init) {
2297                         if (this_->orientation != -1) {
2298                                 dir = this_->orientation;
2299                         } else {
2300                                 if (this_->vehicle) {
2301                                         dir = this_->vehicle->dir;
2302                                 }
2303                         }
2304                         transform_set_yaw(this_->trans, dir);
2305                         if (orient_old != this_->orientation) {
2306 #if 0
2307                                 if (this_->ready == 3)
2308                                         navit_draw(this_);
2309 #endif
2310                                 attr_updated=1;
2311                         }
2312                 }
2313                 break;
2314         case attr_osd_configuration:
2315                 dbg(0,"setting osd_configuration to %d (was %d)\n", attr->u.num, this_->osd_configuration);
2316                 attr_updated=(this_->osd_configuration != attr->u.num);
2317                 this_->osd_configuration=attr->u.num;
2318                 break;
2319         case attr_pitch:
2320                 attr_updated=(this_->pitch != attr->u.num);
2321                 this_->pitch=attr->u.num;
2322                 transform_set_pitch(this_->trans, this_->pitch);
2323                 if (!init && attr_updated && this_->ready == 3)
2324                         navit_draw(this_);
2325                 break;
2326         case attr_projection:
2327                 if(this_->trans && transform_get_projection(this_->trans) != attr->u.projection) {
2328                         navit_projection_set(this_, attr->u.projection, !init);
2329                         attr_updated=1;
2330                 }
2331                 break;
2332         case attr_radius:
2333                 attr_updated=(this_->radius != attr->u.num);
2334                 this_->radius=attr->u.num;
2335                 break;
2336         case attr_recent_dest:
2337                 attr_updated=(this_->recentdest_count != attr->u.num);
2338                 this_->recentdest_count=attr->u.num;
2339                 break;
2340         case attr_speech:
2341                 if(this_->speech && this_->speech != attr->u.speech) {
2342                         attr_updated=1;
2343                         this_->speech = attr->u.speech;
2344                 }
2345                 break;
2346         case attr_timeout:
2347                 attr_updated=(this_->center_timeout != attr->u.num);
2348                 this_->center_timeout = attr->u.num;
2349                 break;
2350         case attr_tracking:
2351                 attr_updated=(this_->tracking_flag != !!attr->u.num);
2352                 this_->tracking_flag=!!attr->u.num;
2353                 break;
2354         case attr_transformation:
2355                 this_->trans=attr->u.transformation;
2356                 break;
2357         case attr_use_mousewheel:
2358                 attr_updated=(this_->use_mousewheel != !!attr->u.num);
2359                 this_->use_mousewheel=!!attr->u.num;
2360                 break;
2361         case attr_vehicle:
2362                 l=this_->vehicles;
2363                 while(l) {
2364                         nv=l->data;
2365                         if (nv->vehicle == attr->u.vehicle) {
2366                                 if (!this_->vehicle || this_->vehicle->vehicle != attr->u.vehicle) {
2367                                         if (this_->vehicle)
2368                                                 vehicle_set_attr(this_->vehicle->vehicle, &active);
2369                                         active.u.num=1;
2370                                         vehicle_set_attr(nv->vehicle, &active);
2371                                         attr_updated=1;
2372                                 }
2373                                 navit_set_vehicle(this_, nv);
2374                         }
2375                         l=g_list_next(l);
2376                 }
2377                 break;
2378         case attr_zoom:
2379                 zoom=transform_get_scale(this_->trans);
2380                 attr_updated=(zoom != attr->u.num);
2381                 transform_set_scale(this_->trans, attr->u.num);
2382                 if (attr_updated && !init) 
2383                         navit_draw(this_);
2384                 break;
2385         case attr_zoom_min:
2386                 attr_updated=(attr->u.num != this_->zoom_min);
2387                 this_->zoom_min=attr->u.num;
2388                 break;
2389         case attr_zoom_max:
2390                 attr_updated=(attr->u.num != this_->zoom_max);
2391                 this_->zoom_max=attr->u.num;
2392                 break;
2393         case attr_message:
2394                 navit_add_message(this_, attr->u.str);
2395                 break;
2396         case attr_follow_cursor:
2397                 attr_updated=(this_->follow_cursor != !!attr->u.num);
2398                 this_->follow_cursor=!!attr->u.num;
2399                 break;
2400         case attr_imperial: 
2401                 attr_updated=(this_->imperial != attr->u.num); 
2402                 this_->imperial=attr->u.num; 
2403                 break; 
2404         default:
2405                 return 0;
2406         }
2407         if (attr_updated && !init) {
2408                 callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
2409                 if (attr->type == attr_osd_configuration)
2410                         graphics_draw_mode(this_->gra, draw_mode_end);
2411         }
2412         return 1;
2413 }
2414
2415 int
2416 navit_set_attr(struct navit *this_, struct attr *attr)
2417 {
2418         return navit_set_attr_do(this_, attr, 0);
2419 }
2420
2421 int
2422 navit_get_attr(struct navit *this_, enum attr_type type, struct attr *attr, struct attr_iter *iter)
2423 {
2424         struct message *msg;
2425         int len,offset;
2426         int ret=1;
2427
2428         switch (type) {
2429         case attr_message:
2430                 msg = navit_get_messages(this_);
2431                 
2432                 if (!msg) {
2433                         return 0;
2434                 }
2435
2436                 len = 0;
2437                 while (msg) {
2438                         len += strlen(msg->text) + 1;
2439                         msg = msg->next;
2440                 }
2441                 attr->u.str = g_malloc(len + 1);
2442                 
2443                 msg = navit_get_messages(this_);
2444                 offset = 0;
2445                 while (msg) {
2446                         g_stpcpy((attr->u.str + offset), msg->text);
2447                         offset += strlen(msg->text);
2448                         attr->u.str[offset] = '\n';
2449                         offset++;
2450
2451                         msg = msg->next;
2452                 }
2453
2454                 attr->u.str[len] = '\0';
2455                 break;
2456         case attr_imperial: 
2457                 attr->u.num=this_->imperial; 
2458                 break; 
2459         case attr_bookmark_map:
2460                 attr->u.map=bookmarks_get_map(this_->bookmarks);
2461                 break;
2462         case attr_bookmarks:
2463                 attr->u.bookmarks=this_->bookmarks;
2464                 break;
2465         case attr_callback_list:
2466                 attr->u.callback_list=this_->attr_cbl;
2467                 break;
2468         case attr_destination:
2469                 if (! this_->destination_valid)
2470                         return 0;
2471                 attr->u.pcoord=&this_->destination;
2472                 break;
2473         case attr_displaylist:
2474                 attr->u.displaylist=this_->displaylist;
2475                 return (attr->u.displaylist != NULL);
2476         case attr_follow:
2477                 if (!this_->vehicle)
2478                         return 0;
2479                 attr->u.num=this_->vehicle->follow_curr;
2480                 break;
2481         case attr_former_destination_map:
2482                 attr->u.map=this_->former_destination;
2483                 break;
2484         case attr_graphics:
2485                 attr->u.graphics=this_->gra;
2486                 ret=(attr->u.graphics != NULL);
2487                 break;
2488         case attr_gui:
2489                 attr->u.gui=this_->gui;
2490                 ret=(attr->u.gui != NULL);
2491                 break;
2492         case attr_layout:
2493                 if (iter) {
2494                         if (iter->u.list) {
2495                                 iter->u.list=g_list_next(iter->u.list);
2496                         } else { 
2497                                 iter->u.list=this_->layouts;
2498                         }
2499                         if (!iter->u.list)
2500                                 return 0;
2501                         attr->u.layout=(struct layout *)iter->u.list->data;
2502                 } else {
2503                         attr->u.layout=this_->layout_current;
2504                 }
2505                 break;
2506         case attr_map:
2507                 if (iter && this_->mapsets) {
2508                         if (!iter->u.mapset_handle) {
2509                                 iter->u.mapset_handle=mapset_open((struct mapset *)this_->mapsets->data);
2510                         }
2511                         attr->u.map=mapset_next(iter->u.mapset_handle, 0);
2512                         if(!attr->u.map) {
2513                                 mapset_close(iter->u.mapset_handle);
2514                                 return 0;
2515                         }
2516                 } else {
2517                         return 0;
2518                 }
2519                 break;
2520         case attr_mapset:
2521                 attr->u.mapset=this_->mapsets->data;
2522                 ret=(attr->u.mapset != NULL);
2523                 break;
2524         case attr_navigation:
2525                 attr->u.navigation=this_->navigation;
2526                 break;
2527         case attr_orientation:
2528                 attr->u.num=this_->orientation;
2529                 break;
2530         case attr_osd:
2531                 ret=attr_generic_get_attr(this_->attr_list, NULL, type, attr, iter?(struct attr_iter *)&iter->iter:NULL);
2532                 break;
2533         case attr_osd_configuration:
2534                 attr->u.num=this_->osd_configuration;
2535                 break;
2536         case attr_pitch:
2537                 attr->u.num=transform_get_pitch(this_->trans);
2538                 break;
2539         case attr_projection:
2540                 if(this_->trans) {
2541                         attr->u.num=transform_get_projection(this_->trans);
2542                 } else {
2543                         return 0;
2544                 }
2545                 break;
2546         case attr_route:
2547                 attr->u.route=this_->route;
2548                 break;
2549         case attr_speech:
2550                 attr->u.speech=this_->speech;
2551                 break;
2552         case attr_tracking:
2553                 attr->u.num=this_->tracking_flag;
2554                 break;
2555         case attr_trackingo:
2556                 attr->u.tracking=this_->tracking;
2557                 break;
2558         case attr_transformation:
2559                 attr->u.transformation=this_->trans;
2560                 break;
2561         case attr_vehicle:
2562                 if(iter) {
2563                         if(iter->u.list) {
2564                                 iter->u.list=g_list_next(iter->u.list);
2565                         } else { 
2566                                 iter->u.list=this_->vehicles;
2567                         }
2568                         if(!iter->u.list)
2569                                 return 0;
2570                         attr->u.vehicle=((struct navit_vehicle*)iter->u.list->data)->vehicle;
2571                 } else {
2572                         if(this_->vehicle) {
2573                                 attr->u.vehicle=this_->vehicle->vehicle;
2574                         } else {
2575                                 return 0;
2576                         }
2577                 }
2578                 break;
2579         case attr_vehicleprofile:
2580                 attr->u.vehicleprofile=this_->vehicleprofile;
2581                 break;
2582         case attr_zoom:
2583                 attr->u.num=transform_get_scale(this_->trans);
2584                 break;
2585         case attr_autozoom_active:
2586                 attr->u.num=this_->autozoom_active;
2587                 break;
2588         case attr_follow_cursor:
2589                 attr->u.num=this_->follow_cursor;
2590                 break;
2591         default:
2592                 return 0;
2593         }
2594         attr->type=type;
2595         return ret;
2596 }
2597
2598 static int
2599 navit_add_log(struct navit *this_, struct log *log)
2600 {
2601         struct attr type_attr;
2602         if (!log_get_attr(log, attr_type, &type_attr, NULL))
2603                 return 0;
2604         if (!strcmp(type_attr.u.str, "textfile_debug")) {
2605                 char *header = "type=track_tracked\n";
2606                 if (this_->textfile_debug_log)
2607                         return 0;
2608                 log_set_header(log, header, strlen(header));
2609                 this_->textfile_debug_log=log;
2610                 return 1;
2611         }
2612         return 0;
2613 }
2614
2615 static int
2616 navit_add_layout(struct navit *this_, struct layout *layout)
2617 {
2618         struct attr active;
2619         this_->layouts = g_list_append(this_->layouts, layout);
2620         layout_get_attr(layout, attr_active, &active, NULL);
2621         if(active.u.num || !this_->layout_current) { 
2622                 this_->layout_current=layout;
2623                 return 1;
2624         }
2625         return 0;
2626 }
2627
2628 int
2629 navit_add_attr(struct navit *this_, struct attr *attr)
2630 {
2631         int ret=1;
2632         switch (attr->type) {
2633         case attr_callback:
2634                 navit_add_callback(this_, attr->u.callback);
2635                 break;
2636         case attr_log:
2637                 ret=navit_add_log(this_, attr->u.log);
2638                 break;
2639         case attr_gui:
2640                 ret=navit_set_gui(this_, attr->u.gui);
2641                 break;
2642         case attr_graphics:
2643                 ret=navit_set_graphics(this_, attr->u.graphics);
2644                 break;
2645         case attr_layout:
2646                 ret=navit_add_layout(this_, attr->u.layout);
2647                 break;
2648         case attr_route:
2649                 this_->route=attr->u.route;
2650                 break;
2651         case attr_mapset:
2652                 this_->mapsets = g_list_append(this_->mapsets, attr->u.mapset);
2653                 break;
2654         case attr_navigation:
2655                 this_->navigation=attr->u.navigation;
2656                 break;
2657         case attr_osd:
2658                 this_->attr_list=attr_generic_add_attr(this_->attr_list, attr);
2659                 break;
2660         case attr_recent_dest:
2661                 this_->recentdest_count = attr->u.num;
2662                 break;
2663         case attr_speech:
2664                 this_->speech=attr->u.speech;
2665                 break;
2666         case attr_tracking:
2667                 this_->tracking=attr->u.tracking;
2668                 break;
2669         case attr_vehicle:
2670                 ret=navit_add_vehicle(this_, attr->u.vehicle);
2671                 break;
2672         case attr_vehicleprofile:
2673                 this_->vehicleprofiles=g_list_prepend(this_->vehicleprofiles, attr->u.vehicleprofile);
2674                 break;
2675         case attr_autozoom_min:
2676                 this_->autozoom_min = attr->u.num;
2677                 break;
2678         default:
2679                 return 0;
2680         }
2681         callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
2682         return ret;
2683 }
2684
2685 int
2686 navit_remove_attr(struct navit *this_, struct attr *attr)
2687 {
2688         int ret=1;
2689         switch (attr->type) {
2690         case attr_callback:
2691                 navit_remove_callback(this_, attr->u.callback);
2692                 break;
2693         default:
2694                 return 0;
2695         }
2696         return ret;
2697 }
2698
2699 struct attr_iter *
2700 navit_attr_iter_new(void)
2701 {
2702         return g_new0(struct attr_iter, 1);
2703 }
2704
2705 void
2706 navit_attr_iter_destroy(struct attr_iter *iter)
2707 {
2708         g_free(iter);
2709 }
2710
2711 void
2712 navit_add_callback(struct navit *this_, struct callback *cb)
2713 {
2714         callback_list_add(this_->attr_cbl, cb);
2715 }
2716
2717 void
2718 navit_remove_callback(struct navit *this_, struct callback *cb)
2719 {
2720         callback_list_remove(this_->attr_cbl, cb);
2721 }
2722
2723 /**
2724  * Toggle the cursor update : refresh the map each time the cursor has moved (instead of only when it reaches a border)
2725  *
2726  * @param navit The navit instance
2727  * @returns nothing
2728  */
2729
2730 static void
2731 navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt)
2732 {
2733         struct point cursor_pnt;
2734         enum projection pro;
2735
2736         if (this_->blocked)
2737                 return;
2738         if (pnt)
2739                 cursor_pnt=*pnt;
2740         else {
2741                 pro=transform_get_projection(this_->trans_cursor);
2742                 if (!pro)
2743                         return;
2744                 transform(this_->trans_cursor, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
2745         }
2746         vehicle_draw(nv->vehicle, this_->gra, &cursor_pnt, pnt ? 0:1, nv->dir-transform_get_yaw(this_->trans_cursor), nv->speed);
2747 #if 0   
2748         if (pnt)
2749                 pnt2=*pnt;
2750         else {
2751                 pro=transform_get_projection(this_->trans);
2752                 transform(this_->trans, pro, &nv->coord, &pnt2, 1);
2753         }
2754 #if 1
2755         cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, pnt == NULL);
2756 #else
2757         cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, 1);
2758 #endif
2759 #endif
2760 }
2761
2762 static void
2763 navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv)
2764 {
2765         struct attr attr_valid, attr_dir, attr_speed, attr_pos;
2766         struct pcoord cursor_pc;
2767         struct point cursor_pnt, *pnt=&cursor_pnt;
2768         struct tracking *tracking=NULL;
2769         struct pcoord pc[16];
2770         enum projection pro=transform_get_projection(this_->trans_cursor);
2771         int count;
2772         int (*get_attr)(void *, enum attr_type, struct attr *, struct attr_iter *);
2773         void *attr_object;
2774         char *destination_file;
2775
2776         profile(0,NULL);
2777         if (this_->ready != 3) {
2778                 profile(0,"return 1\n");
2779                 return;
2780         }
2781         navit_layout_switch(this_);
2782         if (this_->vehicle == nv && this_->tracking_flag)
2783                 tracking=this_->tracking;
2784         if (tracking) {
2785                 tracking_update(tracking, nv->vehicle, this_->vehicleprofile, pro);
2786                 attr_object=tracking;
2787                 get_attr=(int (*)(void *, enum attr_type, struct attr *, struct attr_iter *))tracking_get_attr;
2788         } else {
2789                 attr_object=nv->vehicle;
2790                 get_attr=(int (*)(void *, enum attr_type, struct attr *, struct attr_iter *))vehicle_get_attr;
2791         }
2792         if (get_attr(attr_object, attr_position_valid, &attr_valid, NULL))
2793                 if (!attr_valid.u.num != attr_position_valid_invalid)
2794                         return;
2795         if (! get_attr(attr_object, attr_position_direction, &attr_dir, NULL) ||
2796             ! get_attr(attr_object, attr_position_speed, &attr_speed, NULL) ||
2797             ! get_attr(attr_object, attr_position_coord_geo, &attr_pos, NULL)) {
2798                 profile(0,"return 2\n");
2799                 return;
2800         }
2801         nv->dir=*attr_dir.u.numd;
2802         nv->speed=*attr_speed.u.numd;
2803         transform_from_geo(pro, attr_pos.u.coord_geo, &nv->coord);
2804         if (nv != this_->vehicle) {
2805                 navit_vehicle_draw(this_, nv, NULL);
2806                 profile(0,"return 3\n");
2807                 return;
2808         }
2809         cursor_pc.x = nv->coord.x;
2810         cursor_pc.y = nv->coord.y;
2811         cursor_pc.pro = pro;
2812         if (this_->route) {
2813                 if (tracking)
2814                         route_set_position_from_tracking(this_->route, tracking, pro);
2815                 else
2816                         route_set_position(this_->route, &cursor_pc);
2817         }
2818         callback_list_call_attr_0(this_->attr_cbl, attr_position);
2819         navit_textfile_debug_log(this_, "type=trackpoint_tracked");
2820         if (this_->gui && nv->speed > 2)
2821                 navit_disable_suspend();
2822
2823         transform(this_->trans_cursor, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
2824         if (this_->button_pressed != 1 && this_->follow_cursor && nv->follow_curr <= nv->follow && 
2825                 (nv->follow_curr == 1 || !transform_within_border(this_->trans_cursor, &cursor_pnt, this_->border)))
2826                 navit_set_center_cursor_draw(this_);
2827         else
2828                 navit_vehicle_draw(this_, nv, pnt);
2829
2830         if (nv->follow_curr > 1)
2831                 nv->follow_curr--;
2832         else
2833                 nv->follow_curr=nv->follow;
2834         callback_list_call_attr_2(this_->attr_cbl, attr_position_coord_geo, this_, nv->vehicle);
2835
2836         /* Finally, if we reached our destination, stop navigation. */
2837         if (this_->route) {
2838                 switch(route_destination_reached(this_->route)) {
2839                 case 1:
2840                         route_remove_waypoint(this_->route);
2841                         count=route_get_destinations(this_->route, pc, 16);
2842                         destination_file = bookmarks_get_destination_file(TRUE);
2843                         bookmarks_append_coord(this_->bookmarks, destination_file, pc, count, "former_itinerary_part", NULL, NULL, this_->recentdest_count);
2844                         break;  
2845                 case 2:
2846                         navit_set_destination(this_, NULL, NULL, 0);
2847                         break;
2848                 }
2849         }
2850         profile(0,"return 5\n");
2851 }
2852
2853 /**
2854  * Set the position of the vehicle
2855  *
2856  * @param navit The navit instance
2857  * @param c The coordinate to set as position
2858  * @returns nothing
2859  */
2860
2861 void
2862 navit_set_position(struct navit *this_, struct pcoord *c)
2863 {
2864         if (this_->route) {
2865                 route_set_position(this_->route, c);
2866                 callback_list_call_attr_0(this_->attr_cbl, attr_position);
2867         }
2868         if (this_->ready == 3)
2869                 navit_draw(this_);
2870 }
2871
2872 static int
2873 navit_set_vehicleprofile(struct navit *this_, char *name)
2874 {
2875         struct attr attr;
2876         GList *l;
2877         l=this_->vehicleprofiles;
2878         while (l) {
2879                 if (vehicleprofile_get_attr(l->data, attr_name, &attr, NULL)) {
2880                         if (!strcmp(attr.u.str, name)) {
2881                                 this_->vehicleprofile=l->data;
2882                                 if (this_->route)
2883                                         route_set_profile(this_->route, this_->vehicleprofile);
2884                                 return 1;
2885                         }
2886                 }
2887                 l=g_list_next(l);
2888         }
2889         return 0;
2890 }
2891
2892 static void
2893 navit_set_vehicle(struct navit *this_, struct navit_vehicle *nv)
2894 {
2895         struct attr attr;
2896         this_->vehicle=nv;
2897         if (nv && vehicle_get_attr(nv->vehicle, attr_profilename, &attr, NULL)) {
2898                 if (navit_set_vehicleprofile(this_, attr.u.str))
2899                         return;
2900         }
2901         if (!navit_set_vehicleprofile(this_,"car")) {
2902                 /* We do not have a fallback "car" profile
2903                 * so lets set any profile */
2904                 GList *l;
2905                 l=this_->vehicleprofiles;
2906                 if (l) {
2907                     this_->vehicleprofile=l->data;
2908                     if (this_->route)
2909                         route_set_profile(this_->route, this_->vehicleprofile);
2910                 }
2911         }
2912 }
2913
2914 /**
2915  * Register a new vehicle
2916  *
2917  * @param navit The navit instance
2918  * @param v The vehicle instance
2919  * @returns 1 for success
2920  */
2921 static int
2922 navit_add_vehicle(struct navit *this_, struct vehicle *v)
2923 {
2924         struct navit_vehicle *nv=g_new0(struct navit_vehicle, 1);
2925         struct attr follow, active, animate;
2926         nv->vehicle=v;
2927         nv->follow=0;
2928         nv->last.x = 0;
2929         nv->last.y = 0;
2930         nv->animate_cursor=0;
2931         if ((vehicle_get_attr(v, attr_follow, &follow, NULL)))
2932                 nv->follow=follow.u.num;
2933         nv->follow_curr=nv->follow;
2934         this_->vehicles=g_list_append(this_->vehicles, nv);
2935         if ((vehicle_get_attr(v, attr_active, &active, NULL)) && active.u.num)
2936                 navit_set_vehicle(this_, nv);
2937         if ((vehicle_get_attr(v, attr_animate, &animate, NULL)))
2938                 nv->animate_cursor=animate.u.num;
2939         nv->callback.type=attr_callback;
2940         nv->callback.u.callback=callback_new_attr_2(callback_cast(navit_vehicle_update), attr_position_coord_geo, this_, nv);
2941         vehicle_add_attr(nv->vehicle, &nv->callback);
2942         vehicle_set_attr(nv->vehicle, &this_->self);
2943         return 1;
2944 }
2945
2946
2947
2948
2949 struct gui *
2950 navit_get_gui(struct navit *this_)
2951 {
2952         return this_->gui;
2953 }
2954
2955 struct transformation *
2956 navit_get_trans(struct navit *this_)
2957 {
2958         return this_->trans;
2959 }
2960
2961 struct route *
2962 navit_get_route(struct navit *this_)
2963 {
2964         return this_->route;
2965 }
2966
2967 struct navigation *
2968 navit_get_navigation(struct navit *this_)
2969 {
2970         return this_->navigation;
2971 }
2972
2973 struct displaylist *
2974 navit_get_displaylist(struct navit *this_)
2975 {
2976         return this_->displaylist;
2977 }
2978
2979 void
2980 navit_layout_switch(struct navit *n) 
2981 {
2982
2983     int currTs=0;
2984     struct attr iso8601_attr,geo_attr,valid_attr,layout_attr;
2985     double trise,tset,trise_actual;
2986     struct layout *l;
2987     int year, month, day;
2988     
2989     if (navit_get_attr(n,attr_layout,&layout_attr,NULL)!=1) {
2990         return; //No layout - nothing to switch
2991     }
2992     if (!n->vehicle)
2993         return;
2994     l=layout_attr.u.layout;
2995     
2996     if (l->dayname || l->nightname) {
2997         //Ok, we know that we have profile to switch
2998         
2999         //Check that we aren't calculating too fast
3000         if (vehicle_get_attr(n->vehicle->vehicle, attr_position_time_iso8601,&iso8601_attr,NULL)==1) {
3001                 currTs=iso8601_to_secs(iso8601_attr.u.str);
3002                 dbg(1,"currTs: %u:%u\n",currTs%86400/3600,((currTs%86400)%3600)/60);
3003         }
3004         if (currTs-(n->prevTs)<60) {
3005             //We've have to wait a little
3006             return;
3007         }
3008         if (sscanf(iso8601_attr.u.str,"%d-%02d-%02dT",&year,&month,&day) != 3)
3009                 return;
3010         if (vehicle_get_attr(n->vehicle->vehicle, attr_position_valid, &valid_attr,NULL) && valid_attr.u.num==attr_position_valid_invalid) {
3011                 return; //No valid fix yet
3012         }
3013         if (vehicle_get_attr(n->vehicle->vehicle, attr_position_coord_geo,&geo_attr,NULL)!=1) {
3014                 //No position - no sun
3015                 return;
3016         }
3017         
3018         //We calculate sunrise anyway, cause it is needed both for day and for night
3019         if (__sunriset__(year,month,day,geo_attr.u.coord_geo->lng,geo_attr.u.coord_geo->lat,-5,1,&trise,&tset)!=0) {
3020                 //near the pole sun never rises/sets, so we should never switch profiles
3021                 dbg(1,"trise: %u:%u, sun never visible, never switch profile\n",HOURS(trise),MINUTES(trise));
3022                 n->prevTs=currTs;
3023                 return;
3024             }
3025         
3026         trise_actual=trise;
3027         dbg(1,"trise: %u:%u\n",HOURS(trise),MINUTES(trise));
3028         if (l->dayname) {
3029         
3030             if ((HOURS(trise)*60+MINUTES(trise)==(currTs%86400)/60) || 
3031                     (n->prevTs==0 && ((HOURS(trise)*60+MINUTES(trise)<(currTs%86400)/60)))) {
3032                 //The sun is rising now!
3033                 if (strcmp(l->name,l->dayname)) {
3034                     navit_set_layout_by_name(n,l->dayname);
3035                 }
3036             }
3037         }
3038         if (l->nightname) {
3039             if (__sunriset__(year,month,day,geo_attr.u.coord_geo->lng,geo_attr.u.coord_geo->lat,-5,1,&trise,&tset)!=0) {
3040                 //near the pole sun never rises/sets, so we should never switch profiles
3041                 dbg(1,"tset: %u:%u, sun always visible, never switch profile\n",HOURS(tset),MINUTES(tset));
3042                 n->prevTs=currTs;
3043                 return;
3044             }
3045             dbg(1,"tset: %u:%u\n",HOURS(tset),MINUTES(tset));
3046             if (HOURS(tset)*60+MINUTES(tset)==((currTs%86400)/60)
3047                 || (n->prevTs==0 && (((HOURS(tset)*60+MINUTES(tset)<(currTs%86400)/60)) || 
3048                         ((HOURS(trise_actual)*60+MINUTES(trise_actual)>(currTs%86400)/60))))) {
3049                 //Time to sleep
3050                 if (strcmp(l->name,l->nightname)) {
3051                     navit_set_layout_by_name(n,l->nightname);
3052                 }
3053             }   
3054         }
3055         
3056         n->prevTs=currTs;
3057     }
3058 }
3059
3060 int 
3061 navit_set_vehicle_by_name(struct navit *n,const char *name) 
3062 {
3063     struct vehicle *v;
3064     struct attr_iter *iter;
3065     struct attr vehicle_attr, name_attr;
3066
3067         iter=navit_attr_iter_new();
3068
3069     while (navit_get_attr(n,attr_vehicle,&vehicle_attr,iter)) {
3070                 v=vehicle_attr.u.vehicle;
3071                 vehicle_get_attr(v,attr_name,&name_attr,NULL);
3072                 if (name_attr.type==attr_name) {
3073                         if (!strcmp(name,name_attr.u.str)) {
3074                                 navit_set_attr(n,&vehicle_attr);                                
3075                                 navit_attr_iter_destroy(iter);
3076                                 return 1;
3077                         }
3078                 }
3079         }
3080     navit_attr_iter_destroy(iter);
3081     return 0;
3082 }
3083
3084 int 
3085 navit_set_layout_by_name(struct navit *n,const char *name) 
3086 {
3087     struct layout *l;
3088     struct attr_iter iter;
3089     struct attr layout_attr;
3090
3091     iter.u.list=0x00;
3092
3093     if (navit_get_attr(n,attr_layout,&layout_attr,&iter)!=1) {
3094         return 0; //No layouts - nothing to do
3095     }
3096     if (iter.u.list==NULL) {
3097         return 0;
3098     }
3099     
3100     iter.u.list=g_list_first(iter.u.list);
3101     
3102     while(iter.u.list) {
3103         l=(struct layout*)iter.u.list->data;
3104         if (!strcmp(name,l->name)) {
3105             layout_attr.u.layout=l;
3106             layout_attr.type=attr_layout;
3107             navit_set_attr(n,&layout_attr);
3108             iter.u.list=g_list_first(iter.u.list);
3109             return 1;
3110         }
3111         iter.u.list=g_list_next(iter.u.list);
3112     }
3113
3114     iter.u.list=g_list_first(iter.u.list);
3115     return 0;
3116 }
3117
3118 void
3119 navit_disable_suspend() {
3120         gui_disable_suspend(global_navit->gui);
3121         callback_list_call_attr_0(global_navit->attr_cbl,attr_unsuspend);
3122 }
3123
3124 int
3125 navit_block(struct navit *this_, int block)
3126 {
3127         if (block > 0) {
3128                 this_->blocked |= 1;
3129                 if (graphics_draw_cancel(this_->gra, this_->displaylist))
3130                         this_->blocked |= 2;
3131                 return 0;
3132         }
3133         if ((this_->blocked & 2) || block < 0) {
3134                 this_->blocked=0;
3135                 navit_draw(this_);
3136                 return 1;
3137         }
3138         this_->blocked=0;
3139         return 0;
3140 }
3141
3142 void
3143 navit_destroy(struct navit *this_)
3144 {
3145         struct mapset*ms;
3146         callback_list_call_attr_1(this_->attr_cbl, attr_destroy, this_);
3147
3148         /* TODO: destroy objects contained in this_ */
3149         if (this_->vehicle)
3150                 vehicle_destroy(this_->vehicle->vehicle);
3151         if (this_->bookmarks) {
3152                 char *center_file = bookmarks_get_center_file(TRUE);
3153                 bookmarks_write_center_to_file(this_->bookmarks, center_file);
3154                 g_free(center_file);
3155                 bookmarks_destroy(this_->bookmarks);
3156         }
3157         callback_destroy(this_->nav_speech_cb);
3158         callback_destroy(this_->roadbook_callback);
3159         callback_destroy(this_->popup_callback);
3160         callback_destroy(this_->motion_timeout_callback);
3161         callback_destroy(this_->progress_cb);
3162         if(this_->gra)
3163           graphics_remove_callback(this_->gra, this_->resize_callback);
3164         callback_destroy(this_->resize_callback);
3165         if(this_->gra)
3166           graphics_remove_callback(this_->gra, this_->button_callback);
3167         callback_destroy(this_->button_callback);
3168         if(this_->gra)
3169           graphics_remove_callback(this_->gra, this_->motion_callback);
3170         callback_destroy(this_->motion_callback);
3171         if(this_->gra)
3172           graphics_remove_callback(this_->gra, this_->predraw_callback);
3173         callback_destroy(this_->predraw_callback);
3174         route_destroy(this_->route);
3175         ms = navit_get_mapset(this_);
3176         if(ms)
3177                 mapset_destroy(ms);
3178         graphics_free(this_->gra);
3179         g_free(this_);
3180 }
3181
3182 /** @} */