navit/navit/navit.c

/**
 * Navit, a modular navigation system.
 * Copyright (C) 2005-2009 Navit Team
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * version 2 as published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the
 * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 * Boston, MA  02110-1301, USA.
 */

#define _USE_MATH_DEFINES 1
#include "config.h"
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <signal.h>
#include <string.h>
#include <fcntl.h>
#include <glib.h>
#include <math.h>
#include <time.h>
#include "debug.h"
#include "navit.h"
#include "callback.h"
#include "gui.h"
#include "item.h"
#include "projection.h"
#include "map.h"
#include "mapset.h"
#include "main.h"
#include "coord.h"
#include "point.h"
#include "transform.h"
#include "param.h"
#include "menu.h"
#include "graphics.h"
#include "popup.h"
#include "data_window.h"
#include "route.h"
#include "navigation.h"
#include "speech.h"
#include "track.h"
#include "vehicle.h"
#include "layout.h"
#include "log.h"
#include "attr.h"
#include "event.h"
#include "file.h"
#include "profile.h"
#include "command.h"
#include "navit_nls.h"
#include "map.h"
#include "util.h"
#include "messages.h"
#include "vehicleprofile.h"
#include "sunriset.h"
#include "bookmarks.h"
#ifdef HAVE_API_WIN32_BASE
#include <windows.h>
#include "util.h"
#endif
#ifdef HAVE_API_WIN32_CE
#include "libc.h"
#endif

/**
 * @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
 * @{
 */


struct gui *main_loop_gui;

struct attr_iter {
        union {
                GList *list;
                struct mapset_handle *mapset_handle;
        } u;
};

static void navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv);
static void navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt);
static int navit_add_vehicle(struct navit *this_, struct vehicle *v);
static int navit_set_attr_do(struct navit *this_, struct attr *attr, int init);
static int navit_get_cursor_pnt(struct navit *this_, struct point *p, int keep_orientation, int *dir);
static void navit_set_cursors(struct navit *this_);
static void navit_cmd_zoom_to_route(struct navit *this);
static void navit_cmd_set_center_cursor(struct navit *this_);
static void navit_cmd_announcer_toggle(struct navit *this_);
static void navit_set_vehicle(struct navit *this_, struct navit_vehicle *nv);

int allow_gui_internal = 0;
int routing_mode = 0;
int MYSTERY_SPEED = 2;
int offline_search_filter_duplicates = 0;
int offline_search_break_searching = 0;

struct navit *global_navit;

void
navit_add_mapset(struct navit *this_, struct mapset *ms)
{
        //dbg(0,"EEnter\n");
        this_->mapsets = g_list_append(this_->mapsets, ms);
}

struct mapset *
navit_get_mapset(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        if(this_->mapsets){
                return this_->mapsets->data;
        } else {
                dbg(0,"No mapsets enabled! Is it on purpose? Navit can't draw a map. Please check your navit.xml\n");
        }
        return NULL;
}

struct tracking *
navit_get_tracking(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->tracking;
}

/**
 * @brief       Get the user data directory.
 * @param[in]    create - create the directory if it does not exist
 *
 * @return      char * to the data directory string.
 *
 * returns the directory used to store user data files (center.txt,
 * destination.txt, bookmark.txt, ...)
 *
 */
char*
navit_get_user_data_directory(int create) {
        //dbg(0,"EEnter\n");
        char *dir;
        dir = getenv("NAVIT_USER_DATADIR");
        if (create && !file_exists(dir)) {
                dbg(0,"creating dir %s\n", dir);
                if (file_mkdir(dir,0)) {
                        dbg(0,"failed creating dir %s\n", dir);
                        return NULL;
                }
        }
        return dir;
} /* end: navit_get_user_data_directory(gboolean create) */


void
navit_draw_async(struct navit *this_, int async)
{
        //dbg(0,"EEnter this_->blocked=%d\n",this_->blocked);
        if (this_->blocked)
        {
                this_->blocked |= 2;
                //dbg(0,"set this_->blocked=%d\n",this_->blocked);
                return;
        }
        transform_setup_source_rect(this_->trans);
        graphics_draw(this_->gra, this_->displaylist, this_->mapsets->data, this_->trans, this_->layout_current, async, NULL, this_->graphics_flags|1);
}

void
navit_draw(struct navit *this_)
{
        //dbg(0,"EEnter this_->ready=%d\n",this_->ready);
        if (this_->ready == 3)
        {
                //dbg(0,"navit_draw_async_001\n");
                navit_draw_async(this_, 0);
        }
}

int
navit_get_ready(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->ready;
}


void
navit_draw_displaylist(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        if (this_->ready == 3)
        {
                // dbg(0,"call graphics_displaylist_draw 2")
                graphics_displaylist_draw(this_->gra, this_->displaylist, this_->trans, this_->layout_current, this_->graphics_flags|1);
        }
}

static void
navit_map_progress(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct map *map;
        struct mapset *ms;
        struct mapset_handle *msh;
        struct attr attr;
        struct point p;
        if (this_->ready != 3)
                return;
        p.x=10;
        p.y=32;

        ms=this_->mapsets->data;
        msh=mapset_open(ms);
        while (msh && (map=mapset_next(msh, 0))) {
                if (map_get_attr(map, attr_progress, &attr, NULL)) {
                        char *str=g_strdup_printf("%s           ",attr.u.str);
                        graphics_draw_mode(this_->gra, draw_mode_begin);
                        graphics_draw_text_std(this_->gra, 16, str, &p);
                        g_free(str);
                        p.y+=32;
                        graphics_draw_mode(this_->gra, draw_mode_end);
                }
        }
        mapset_close(msh);
}

static void
navit_redraw_route(struct navit *this_, struct route *route, struct attr *attr)
{
        //dbg(0,"EEnter\n");
        int updated;

        if ((this_->route)&&(this_->route->route_status_was_updated == 1))
        {
                this_->route->route_status_was_updated=0;
                // send route_status to java
#ifdef HAVE_API_ANDROID
                android_return_generic_int(1, this_->route->route_status);
#endif
        }

        if (attr->type != attr_route_status)
        {
                //dbg(0,"ret 1\n");
                return;
        }
        updated=attr->u.num;
        //dbg(0,"updated=%d\n", updated);
        if (this_->ready != 3)
        {
                //dbg(0,"ret 2\n");
                return;
        }
        if (updated != route_status_path_done_new)
        {
                //dbg(0,"ret 3\n");
                return;
        }
        if (this_->vehicle)
        {
                if (this_->vehicle->follow_curr == 1)
                {
                        //dbg(0,"ret 4\n");
                        //dbg(0,"disabled -> we want redraw!!\n");
                        // return;
                }
                if (this_->vehicle->follow_curr <= this_->vehicle->follow)
                {
                        this_->vehicle->follow_curr=this_->vehicle->follow;
                }
        }
        //dbg(0,"draw s*\n");
        navit_draw(this_);
        //dbg(0,"draw e*\n");
}

void
navit_handle_resize(struct navit *this_, int w, int h)
{
        //dbg(0,"EEnter\n");
        struct map_selection sel;
        int callback=(this_->ready == 1);
        //dbg(0,"pre this_->ready=%d\n",this_->ready);
        this_->ready |= 2;
        //dbg(0,"set this_->ready=%d\n",this_->ready);
        memset(&sel, 0, sizeof(sel));
        this_->w=w;
        this_->h=h;
        sel.u.p_rect.rl.x=w;
        sel.u.p_rect.rl.y=h;
        transform_set_screen_selection(this_->trans, &sel);
        graphics_init(this_->gra);
        graphics_set_rect(this_->gra, &sel.u.p_rect);
        if (callback) 
                callback_list_call_attr_1(this_->attr_cbl, attr_graphics_ready, this_);
        if (this_->ready == 3)
        {
                //dbg(0,"navit_draw_async_002\n");
                navit_draw_async(this_, 1);
        }
}

static void
navit_resize(void *data, int w, int h)
{
        //dbg(0,"EEnter\n");
        struct navit *this=data;
        if (!this->ignore_graphics_events)
                navit_handle_resize(this, w, h);
}

int
navit_get_width(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->w;
}


int
navit_get_height(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->h;
}

static void
navit_popup(void *data)
{
        //dbg(0,"EEnter\n");
        struct navit *this_=data;
        popup(this_, 1, &this_->pressed);
        this_->button_timeout=NULL;
        this_->popped=1;
}


int
navit_ignore_button(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        if (this_->ignore_button)
                return 1;
        this_->ignore_button=1;
        return 0;
}

void
navit_ignore_graphics_events(struct navit *this_, int ignore)
{
        //dbg(0,"EEnter\n");
        this_->ignore_graphics_events=ignore;
}

static void
update_transformation(struct transformation *tr, struct point *old, struct point *new, struct point *rot)
{
        //dbg(0,"EEnter\n");
        struct coord co,cn;
        struct coord c,*cp;
        int yaw;
        double angleo,anglen;

        if (!transform_reverse(tr, old, &co))
                return;
        if (rot) {
                angleo=atan2(old->y-rot->y, old->x-rot->x)*180/M_PI;
                anglen=atan2(new->y-rot->y, new->x-rot->x)*180/M_PI;
                yaw=transform_get_yaw(tr)+angleo-anglen;
                transform_set_yaw(tr, yaw % 360);
        }
        if (!transform_reverse(tr, new, &cn))
                return;
        cp=transform_get_center(tr);
        c.x=cp->x+co.x-cn.x;
        c.y=cp->y+co.y-cn.y;
        dbg(1,"from 0x%x,0x%x to 0x%x,0x%x\n", cp->x, cp->y, c.x, c.y);
        transform_set_center(tr, &c);
}

void
navit_set_timeout(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct attr follow;
        follow.type=attr_follow;
        follow.u.num=this_->center_timeout;
        navit_set_attr(this_, &follow);
}

int
navit_handle_button(struct navit *this_, int pressed, int button, struct point *p, struct callback *popup_callback)
{
        //dbg(0,"EEnter\n");
        int border=16;

        dbg(1,"enter %d %d (ignore %d)\n",pressed,button,this_->ignore_button);
        callback_list_call_attr_4(this_->attr_cbl, attr_button, this_, GINT_TO_POINTER(pressed), GINT_TO_POINTER(button), p);
        if (this_->ignore_button) {
                this_->ignore_button=0;
                return 0;
        }
        if (pressed) {
                this_->pressed=*p;
                this_->last=*p;
                this_->zoomed=0;
                if (button == 1) {
                        this_->button_pressed=1;
                        this_->moved=0;
                        this_->popped=0;
                        if (popup_callback)
                                this_->button_timeout=event_add_timeout(500, 0, popup_callback);
                }
                if (button == 2)
                        navit_set_center_screen(this_, p, 1);
                if (button == 3)
                        popup(this_, button, p);
                if (button == 4 && this_->use_mousewheel) {
                        this_->zoomed = 1;
                        navit_zoom_in(this_, 2, p);
                }
                if (button == 5 && this_->use_mousewheel) {
                        this_->zoomed = 1;
                        navit_zoom_out(this_, 2, p);
                }
        } else {

                this_->button_pressed=0;
                if (this_->button_timeout) {
                        event_remove_timeout(this_->button_timeout);
                        this_->button_timeout=NULL;
                        if (! this_->moved && ! transform_within_border(this_->trans, p, border)) {
                                navit_set_center_screen(this_, p, !this_->zoomed);
                        }
                }
                if (this_->motion_timeout) {
                        event_remove_timeout(this_->motion_timeout);
                        this_->motion_timeout=NULL;
                }
                if (this_->moved) {
                        struct point pr;
                        pr.x=this_->w/2;
                        pr.y=this_->h;
#if 0
                        update_transformation(this_->trans, &this_->pressed, p, &pr);
#else
                        update_transformation(this_->trans, &this_->pressed, p, NULL);
#endif
                        graphics_draw_drag(this_->gra, NULL);
                        transform_copy(this_->trans, this_->trans_cursor);
                        graphics_overlay_disable(this_->gra, 0);
                        if (!this_->zoomed) 
                                navit_set_timeout(this_);
                        navit_draw(this_);
                } else
                        return 1;
        }
        return 0;
}

static void
navit_button(void *data, int pressed, int button, struct point *p)
{
        //dbg(0,"EEnter\n");
        struct navit *this=data;
        dbg(1,"enter %d %d ignore %d\n",pressed,button,this->ignore_graphics_events);
        if (!this->ignore_graphics_events) {
                if (! this->popup_callback)
                        this->popup_callback=callback_new_1(callback_cast(navit_popup), this);
                navit_handle_button(this, pressed, button, p, this->popup_callback);
        }
}


static void
navit_motion_timeout(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        int dx, dy;

        if (this_->drag_bitmap) {
                struct point point;
                point.x=(this_->current.x-this_->pressed.x);
                point.y=(this_->current.y-this_->pressed.y);
                if (graphics_draw_drag(this_->gra, &point)) {
                        graphics_overlay_disable(this_->gra, 1);
                        graphics_draw_mode(this_->gra, draw_mode_end);
                        this_->moved=1;
                        this_->motion_timeout=NULL;
                        return;
                }
        } 
        dx=(this_->current.x-this_->last.x);
        dy=(this_->current.y-this_->last.y);
        if (dx || dy) {
                struct transformation *tr;
                struct point pr;
                this_->last=this_->current;
                graphics_overlay_disable(this_->gra, 1);
                tr=transform_dup(this_->trans);
                pr.x=this_->w/2;
                pr.y=this_->h;
#if 0
                update_transformation(tr, &this_->pressed, &this_->current, &pr);
#else
                update_transformation(tr, &this_->pressed, &this_->current, NULL);
#endif
#if 0
                graphics_displaylist_move(this_->displaylist, dx, dy);
#endif
                graphics_draw_cancel(this_->gra, this_->displaylist);
                // dbg(0,"call graphics_displaylist_draw 1")
                graphics_displaylist_draw(this_->gra, this_->displaylist, tr, this_->layout_current, this_->graphics_flags);
                transform_destroy(tr);
                this_->moved=1;
        }
        this_->motion_timeout=NULL;
        return;
}

void
navit_handle_motion(struct navit *this_, struct point *p)
{
        //dbg(0,"EEnter\n");
        int dx, dy;

        if (this_->button_pressed && !this_->popped) {
                dx=(p->x-this_->pressed.x);
                dy=(p->y-this_->pressed.y);
                if (dx < -8 || dx > 8 || dy < -8 || dy > 8) {
                        this_->moved=1;
                        if (this_->button_timeout) {
                                event_remove_timeout(this_->button_timeout);
                                this_->button_timeout=NULL;
                        }
                        this_->current=*p;
                        if (! this_->motion_timeout_callback)
                                this_->motion_timeout_callback=callback_new_1(callback_cast(navit_motion_timeout), this_);
                        if (! this_->motion_timeout)
                                this_->motion_timeout=event_add_timeout(100, 0, this_->motion_timeout_callback);
                }
        }
}

static void
navit_motion(void *data, struct point *p)
{
        //dbg(0,"EEnter\n");
        struct navit *this=data;
        if (!this->ignore_graphics_events) 
                navit_handle_motion(this, p);
}

static void
navit_predraw(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        GList *l;
        struct navit_vehicle *nv;
        transform_copy(this_->trans, this_->trans_cursor);
        l=this_->vehicles;
        while (l)
        {
                nv=l->data;
                //dbg(0,"* here *\n");
                //dbg(0,"vehicle_draw_004\n");
                navit_vehicle_draw(this_, nv, NULL);
                l=g_list_next(l);
        }
}

static void
navit_scale(struct navit *this_, long scale, struct point *p, int draw)
{
        //dbg(0,"EEnter\n");
        struct coord c1, c2, *center;

        if (scale < this_->zoom_min)
        {
                scale=this_->zoom_min;
        }

        if (scale > this_->zoom_max)
        {
                scale=this_->zoom_max;
        }

        // return scale value to android
#ifdef HAVE_API_ANDROID
        android_return_generic_int(3, (int)scale);
#endif

        if (p)
        {
                transform_reverse(this_->trans, p, &c1);
        }

        transform_set_scale(this_->trans, scale);

        if (p)
        {
                transform_reverse(this_->trans, p, &c2);
                center = transform_center(this_->trans);
                center->x += c1.x - c2.x;
                center->y += c1.y - c2.y;
        }

        if (draw)
        {
                navit_draw(this_);
        }
}

/**
 * @brief Automatically adjusts zoom level
 *
 * This function automatically adjusts the current
 * zoom level according to the current speed.
 *
 * @param this_ The navit struct
 * @param center The "immovable" point - i.e. the vehicles position if we're centering on the vehicle
 * @param speed The vehicles speed in meters per second
 * @param dir The direction into which the vehicle moves
 */
static void
navit_autozoom(struct navit *this_, struct coord *center, int speed, int draw)
{
        struct point pc;
        int distance,w,h;
        double new_scale;
        long scale;

        if (! this_->autozoom_active) {
                return;
        }

        distance = speed * this_->autozoom_secs;

        transform_get_size(this_->trans, &w, &h);
        transform(this_->trans, transform_get_projection(this_->trans), center, &pc, 1, 0, 0, NULL);
        scale = transform_get_scale(this_->trans);

        /* We make sure that the point we want to see is within a certain range
         * around the vehicle. The radius of this circle is the size of the
         * screen. This doesn't necessarily mean the point is visible because of
         * perspective etc. Quite rough, but should be enough. */
        
        if (w > h) {
                new_scale = (double)distance / h * 16; 
        } else {
                new_scale = (double)distance / w * 16; 
        }

        if (abs(new_scale - scale) < 2) { 
                return; // Smoothing
        }
        
        if (new_scale >= this_->autozoom_min) {
                navit_scale(this_, (long)new_scale, &pc, 0);
        } else {
                if (scale != this_->autozoom_min) {
                        navit_scale(this_, this_->autozoom_min, &pc, 0);
                }
        }
}

/**
 * Change the current zoom level, zooming closer to the ground
 *
 * @param navit The navit instance
 * @param factor The zoom factor, usually 2
 * @param p The invariant point (if set to NULL, default to center)
 * @returns nothing
 */
void
navit_zoom_in(struct navit *this_, int factor, struct point *p)
{
        //dbg(0,"EEnter\n");
        long scale=transform_get_scale(this_->trans)/factor;
        if (scale < 1)
                scale=1;
        //dbg(0,"zoom in -> scale=%d",scale);
        navit_scale(this_, scale, p, 1);
}

/**
 * Change the current zoom level
 *
 * @param navit The navit instance
 * @param factor The zoom factor, usually 2
 * @param p The invariant point (if set to NULL, default to center)
 * @returns nothing
 */
void
navit_zoom_out(struct navit *this_, int factor, struct point *p)
{
        //dbg(0,"EEnter\n");
        long scale=transform_get_scale(this_->trans)*factor;
        //dbg(0,"zoom out -> scale=%d",scale);
        navit_scale(this_, scale, p, 1);
}

int
navit_get_cur_pnt(struct navit *this_, struct point *p)
{
        //dbg(0,"EEnter\n");
        return navit_get_cursor_pnt(this_, p, 0, NULL);
}

void
navit_zoom_in_cursor(struct navit *this_, int factor)
{
        //dbg(0,"EEnter\n");
        struct point p;
        if (this_->vehicle && this_->vehicle->follow_curr <= 1 && navit_get_cursor_pnt(this_, &p, 0, NULL)) {
                navit_zoom_in(this_, factor, &p);
                this_->vehicle->follow_curr=this_->vehicle->follow;
        } else
                navit_zoom_in(this_, factor, NULL);
}

void
navit_zoom_to_scale(struct navit *this_, int new_scale)
{
        //dbg(0,"EEnter\n");
        long scale=transform_get_scale(this_->trans);
        long new_scale_long=new_scale;
        //dbg(0,"zoom to scale -> old scale=%d",scale);
        //dbg(0,"zoom to scale -> want scale=%d",new_scale_long);

        // only do something if scale changed!
        if (scale != new_scale_long)
        {
                navit_scale(this_, new_scale_long, NULL, 1);
        }
}

void
navit_zoom_out_cursor(struct navit *this_, int factor)
{
        //dbg(0,"EEnter\n");
        struct point p;
        if (this_->vehicle && this_->vehicle->follow_curr <= 1 && navit_get_cursor_pnt(this_, &p, 0, NULL)) {
                navit_zoom_out(this_, 2, &p);
                this_->vehicle->follow_curr=this_->vehicle->follow;
        } else
                navit_zoom_out(this_, 2, NULL);
}

static int
navit_cmd_zoom_in(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        navit_zoom_in_cursor(this_, 2);
        return 0;
}

static int
navit_cmd_zoom_out(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        navit_zoom_out_cursor(this_, 2);
        return 0;
}


static void
navit_cmd_say(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) 
                navit_say(this, in[0]->u.str);
}

static GHashTable *cmd_int_var_hash = NULL;
static GHashTable *cmd_attr_var_hash = NULL;

/**
 * Store key value pair for the  command system (for int typed values)
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes in[0] is the key string, in[1] is the integer value to store
 * @param out output attributes, unused 
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_set_int_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        char*key;
        struct attr*val;
        if(!cmd_int_var_hash) {
                cmd_int_var_hash = g_hash_table_new(g_str_hash, g_str_equal);
        }

        if ( (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) &&
             (in && in[1] && ATTR_IS_NUMERIC(in[1]->type))) {
                val = g_new(struct attr,1);
                attr_dup_content(in[1],val);
                key = g_strdup(in[0]->u.str);
                g_hash_table_insert(cmd_int_var_hash, key, val);
        }
}


/**
 * Store key value pair for the  command system (for attr typed values, can be used as opaque handles)
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes in[0] is the key string, in[1] is the attr* value to store
 * @param out output attributes, unused 
 * @param valid unused 
 * @returns nothing
 */
//TODO free stored attributes on navit_destroy
static void
navit_cmd_set_attr_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        char*key;
        struct attr*val;
        if(!cmd_attr_var_hash) {
                cmd_attr_var_hash = g_hash_table_new(g_str_hash, g_str_equal);
        }

        if ( (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) &&
             (in && in[1] )) {
                val = attr_dup(in[1]);
                //val = in[1];
                key = g_strdup(in[0]->u.str);
                g_hash_table_insert(cmd_attr_var_hash, key, val);
        }
}


/**
 * command to toggle the active state of a named layer of the current layout
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] is the name of the layer
 * @param out output unused
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_toggle_layer(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
                if(this->layout_current && this->layout_current->layers) {
                        GList* layers = this->layout_current->layers;
                        while (layers) {
                                struct layer*l=layers->data;
                                if(l && !strcmp(l->name,in[0]->u.str) ) {
                                        l->active ^= 1;
                                        navit_draw(this);
                                        return;
                                }
                                layers=g_list_next(layers);
                        }
                }
        }
}

/**
 * adds an item with the current coordinate of the vehicle to a named map
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] is the name of the map 
 * @param out output attribute, 0 on error or the id of the created item on success
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_map_add_curr_pos(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr **list = g_new0(struct attr *,2);
        struct attr*val = g_new0(struct attr,1);
        struct mapset* ms;
        struct map_selection sel;
        const int selection_range = 10;
        enum item_type item_type;
        struct item *it;
        struct map* curr_map = NULL;
        struct coord curr_coord;
        struct map_rect *mr;

        val->type   = attr_type_item_begin;
        val->u.item  = NULL; //return invalid item on error
        list[0]     = val;
        list[1]     = NULL;
        *out = list;
        if (
                in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str && //map name
                      in[1] && ATTR_IS_STRING(in[1]->type) && in[1]->u.str    //item type
        ) {

                if(!(ms=navit_get_mapset(this))) {
                        return;
                }

                if((item_type = item_from_name(in[1]->u.str))==type_none) {
                        return;
                }

                curr_map = mapset_get_map_by_name(ms, in[0]->u.str);

                //no map with the given name found
                if( ! curr_map) {
                        return;
                }
        
                if(this->vehicle && this->vehicle->vehicle ) {
                        struct attr pos_attr;
                        if(vehicle_get_attr(this->vehicle->vehicle,attr_position_coord_geo,&pos_attr,NULL)) {
                                transform_from_geo(projection_mg, pos_attr.u.coord_geo, &curr_coord);
                        } else {
                                return;
                        }
                } else {
                        return;
                }

                sel.next=NULL;
                sel.order=18;
                sel.range.min=type_none;
                sel.range.max=type_tec_common;
                sel.u.c_rect.lu.x=curr_coord.x-selection_range;
                sel.u.c_rect.lu.y=curr_coord.y+selection_range;
                sel.u.c_rect.rl.x=curr_coord.x+selection_range;
                sel.u.c_rect.rl.y=curr_coord.y-selection_range;
 
                mr = map_rect_new(curr_map, &sel);
                if(mr) {
                        it = map_rect_create_item( mr, item_type);
                        item_coord_set(it,&curr_coord, 1, change_mode_modify);
                        val->u.item  = it;
                }
                map_rect_destroy(mr);
        }
}

/**
 * sets an attribute (name value pair) of a map item specified by map name and item id
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] - name of the map  ; in[1] - item  ; in[2] - attr name ; in[3] - attr value
 * @param out output attribute, 0 on error, 1 on success
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_map_item_set_attr(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        if (
                in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str  &&//map name
                      in[1] && ATTR_IS_ITEM(in[1]->type)   &&                  //item
                      in[2] && ATTR_IS_STRING(in[2]->type) && in[2]->u.str && //attr_type str
                      in[3] && ATTR_IS_STRING(in[3]->type) && in[3]->u.str    //attr_value str
        ) {
                struct attr attr_to_set;
                struct map* curr_map = NULL;
                struct mapset *ms;
                struct map_selection sel;
                const int selection_range = 500;
                struct coord curr_coord;
                struct item *it;
                
                if(ATTR_IS_STRING(attr_from_name(in[2]->u.str))) {
                        attr_to_set.u.str = in[3]->u.str;
                        attr_to_set.type = attr_from_name(in[2]->u.str);
                }
                else if(ATTR_IS_INT(attr_from_name(in[2]->u.str))) {
                        attr_to_set.u.num = atoi(in[3]->u.str);
                        attr_to_set.type = attr_from_name(in[2]->u.str);
                }
                else if(ATTR_IS_DOUBLE(attr_from_name(in[2]->u.str))) {
                        double* val = g_new0(double,1);
                        *val = atof(in[3]->u.str);
                        attr_to_set.u.numd = val;
                        attr_to_set.type = attr_from_name(in[2]->u.str);
                }

                ms = navit_get_mapset(this);

                curr_map = mapset_get_map_by_name(ms, in[0]->u.str);

                if( ! curr_map) {
                        return;
                }
                sel.next=NULL;
                sel.order=18;
                sel.range.min=type_none;
                sel.range.max=type_tec_common;
                sel.u.c_rect.lu.x=curr_coord.x-selection_range;
                sel.u.c_rect.lu.y=curr_coord.y+selection_range;
                sel.u.c_rect.rl.x=curr_coord.x+selection_range;
                sel.u.c_rect.rl.y=curr_coord.y-selection_range;
 
                it = in[1]->u.item;
                if(it) {
                        item_attr_set(it, &attr_to_set, change_mode_modify);
                }
        }
}

/**
 * Get attr variable given a key string for the command system (for opaque usage)
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] is the key string
 * @param out output attribute, the attr for the given key string if exists or NULL  
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_get_attr_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr **list = g_new0(struct attr *,2);
        if(!cmd_int_var_hash) {
                struct attr*val = g_new0(struct attr,1);
                val->type   = attr_type_item_begin;
                val->u.item = NULL;
                list[0]     = val;
        }
        if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
                struct attr*ret = g_hash_table_lookup(cmd_attr_var_hash, in[0]->u.str);
                if(ret) {
                        list[0] = attr_dup(ret);
                }
                else {
                        struct attr*val = g_new0(struct attr,1);
                        val->type   = attr_type_int_begin;
                        val->u.item = NULL;
                        list[0]   = val;
                }
        }
        list[1] = NULL;
        *out = list;
}


/**
 * Get value given a key string for the command system
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] is the key string
 * @param out output attribute, the value for the given key string if exists or 0  
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_get_int_var(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr **list = g_new0(struct attr *,2);
        if(!cmd_int_var_hash) {
                struct attr*val = g_new0(struct attr,1);
                val->type   = attr_type_int_begin;
                val->u.num  = 0;
                list[0]     = val;
        }
        if (in && in[0] && ATTR_IS_STRING(in[0]->type) && in[0]->u.str) {
                struct attr*ret = g_hash_table_lookup(cmd_int_var_hash, in[0]->u.str);
                if(ret) {
                        list[0] = ret;
                }
                else {
                        struct attr*val = g_new0(struct attr,1);
                        val->type   = attr_type_int_begin;
                        val->u.num  = 0;
                        list[0]   = val;
                }
        }
        list[1] = NULL;
        *out = list;
}

GList *cmd_int_var_stack = NULL;

/**
 * Push an integer to the stack for the command system
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attribute in[0] is the integer attibute to push
 * @param out output attributes, unused 
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_push_int(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        if (in && in[0] && ATTR_IS_NUMERIC(in[0]->type)) {
                struct attr*val = g_new(struct attr,1);
                attr_dup_content(in[0],val);
                cmd_int_var_stack = g_list_prepend(cmd_int_var_stack, val);
        }
}

/**
 * Pop an integer from the command system's integer stack
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes unused
 * @param out output attribute, the value popped if stack isn't empty or 0
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_pop_int(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr **list = g_new0(struct attr *,2);
        if(!cmd_int_var_stack) {
                struct attr*val = g_new0(struct attr,1);
                val->type = attr_type_int_begin;
                val->u.num  = 0;
                list[0]   = val;
        }
        else {
                list[0] = cmd_int_var_stack->data;
                cmd_int_var_stack = g_list_remove_link(cmd_int_var_stack,cmd_int_var_stack);
        }
        list[1] = NULL;
        *out = list;
}

/**
 * Get current size of command system's integer stack
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes unused
 * @param out output attribute, the size of stack
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_int_stack_size(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr **list;
        struct attr *attr  = g_new0(struct attr  ,1);
        attr->type  = attr_type_int_begin;
        if(!cmd_int_var_stack) {
                attr->u.num = 0; 
        }
        else {
                attr->u.num = g_list_length(cmd_int_var_stack); 
        }
        list = g_new0(struct attr *,2);
        list[0] = attr;
        list[1] = NULL;
        *out = list;
        cmd_int_var_stack = g_list_remove_link(cmd_int_var_stack,cmd_int_var_stack);
}

static void
navit_cmd_set_destination(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct pcoord pc;
        char *description=NULL;
        if (!in)
                return;
        if (!in[0])
                return;
        pc.pro = transform_get_projection(this->trans);
        if (ATTR_IS_COORD(in[0]->type)) {
                pc.x=in[0]->u.coord->x;
                pc.y=in[0]->u.coord->y;
                in++;
        } else if (ATTR_IS_PCOORD(in[0]->type)) {
                pc=*in[0]->u.pcoord;
                in++;
        } else if (in[1] && in[2] && ATTR_IS_INT(in[0]->type) && ATTR_IS_INT(in[1]->type) && ATTR_IS_INT(in[2]->type)) {
                pc.pro=in[0]->u.num;
                pc.x=in[1]->u.num;
                pc.y=in[2]->u.num;
                in+=3;
        } else if (in[1] && ATTR_IS_INT(in[0]->type) && ATTR_IS_INT(in[1]->type)) {
                pc.x=in[0]->u.num;
                pc.y=in[1]->u.num;
                in+=2;
        } else
                return;
        if (in[0] && ATTR_IS_STRING(in[0]->type))
                description=in[0]->u.str;
        navit_set_destination(this, &pc, description, 1);
}

static void
navit_cmd_fmt_coordinates(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr attr;
        attr.type=attr_type_string_begin;
        attr.u.str="Fix me";
        if (out) {
                *out=attr_generic_add_attr(*out, &attr);
        }
}

/**
 * Join several string attributes into one
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes in[0] - separator, in[1..] - attributes to join
 * @param out output attribute joined attribute as string
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_strjoin(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        struct attr attr;
        gchar *ret, *sep;
        int i;
        attr.type=attr_type_string_begin;
        attr.u.str=NULL;
        if(in[0] && in[1]) {
                sep=attr_to_text(in[0],NULL,1);
                ret=attr_to_text(in[1],NULL,1);
                for(i=2;in[i];i++) {
                        gchar *in_i=attr_to_text(in[i],NULL,1);
                        gchar *r=g_strjoin(sep,ret,in_i,NULL);
                        g_free(in_i);
                        g_free(ret);
                        ret=r;
                }
                g_free(sep);
                attr.u.str=ret;
                if(out) {
                        *out=attr_generic_add_attr(*out, &attr);
                }
                g_free(ret);
        }
}

/**
 * Call external program
 *
 * @param navit The navit instance
 * @param function unused (needed to match command function signiture)
 * @param in input attributes in[0] - name of executable, in[1..] - parameters
 * @param out output attribute unused
 * @param valid unused 
 * @returns nothing
 */
static void
navit_cmd_spawn(struct navit *this, char *function, struct attr **in, struct attr ***out, int *valid)
{
        //dbg(0,"EEnter\n");
        int i,j, nparms, nvalid;
        const char ** argv=NULL;
        struct spawn_process_info *pi;

        nparms=0;
        nvalid=0;
        if(in) {
                while(in[nparms]) {
                        if (in[nparms]->type!=attr_none) 
                                nvalid++;
                        nparms++;
                }
        }
        
        if(nvalid>0) {
                argv=g_new(char*,nvalid+1);
                for(i=0,j=0;in[i];i++) {
                        if(in[i]->type!=attr_none ) {
                                argv[j++]=attr_to_text(in[i],NULL,1);
                        } else {
                                dbg(0,"Parameter #%i is attr_none - skipping\n",i);
                        }
                }
                argv[j]=NULL;
                pi=spawn_process(argv);
                
                // spawn_process() testing suite - uncomment following code to test.
                //sleep(3);
                // example of non-blocking wait
                //int st=spawn_process_check_status(pi,0);dbg(0,"status %i\n",st);
                // example of blocking wait
                //st=spawn_process_check_status(pi,1);dbg(0,"status %i\n",st);
                // example of wait after process is finished and status is
                // already tested
                //st=spawn_process_check_status(pi,1);dbg(0,"status %i\n",st);
                // example of wait after process is finished and status is
                // already tested - unblocked
                //st=spawn_process_check_status(pi,0);dbg(0,"status %i\n",st);
                
                // End testing suite
                spawn_process_info_free(pi);
                for(i=0;argv[i];i++)
                        g_free(argv[i]);
                g_free(argv);
        }
}


static struct command_table commands[] = {
        {"zoom_in",command_cast(navit_cmd_zoom_in)},
        {"zoom_out",command_cast(navit_cmd_zoom_out)},
        {"zoom_to_route",command_cast(navit_cmd_zoom_to_route)},
        {"say",command_cast(navit_cmd_say)},
        {"set_center_cursor",command_cast(navit_cmd_set_center_cursor)},
        {"set_destination",command_cast(navit_cmd_set_destination)},
        {"announcer_toggle",command_cast(navit_cmd_announcer_toggle)},
        {"fmt_coordinates",command_cast(navit_cmd_fmt_coordinates)},
        {"set_int_var",command_cast(navit_cmd_set_int_var)},
        {"get_int_var",command_cast(navit_cmd_get_int_var)},
        {"push_int",command_cast(navit_cmd_push_int)},
        {"pop_int",command_cast(navit_cmd_pop_int)},
        {"int_stack_size",command_cast(navit_cmd_int_stack_size)},
        {"toggle_layer",command_cast(navit_cmd_toggle_layer)},
        {"strjoin",command_cast(navit_cmd_strjoin)},
        {"spawn",command_cast(navit_cmd_spawn)},
        {"map_add_curr_pos",command_cast(navit_cmd_map_add_curr_pos)},
        {"map_item_set_attr",command_cast(navit_cmd_map_item_set_attr)},
        {"set_attr_var",command_cast(navit_cmd_set_attr_var)},
        {"get_attr_var",command_cast(navit_cmd_get_attr_var)},
};
        
void 
navit_command_add_table(struct navit*this_, struct command_table *commands, int count)
{
        //dbg(0,"EEnter\n");
  command_add_table(this_->attr_cbl, commands, count, this_);
}

struct navit *
navit_new(struct attr *parent, struct attr **attrs)
{
        //dbg(0,"EEnter\n");
        struct navit *this_=g_new0(struct navit, 1);
        struct pcoord center;
        struct coord co;
        struct coord_geo g;
        enum projection pro=projection_mg;
        int zoom = 256;
        g.lat=53.13;
        g.lng=11.70;

        this_->self.type=attr_navit;
        this_->self.u.navit=this_;
        this_->attr_cbl=callback_list_new();

        this_->orientation=-1;
        this_->tracking_flag=1;
        this_->recentdest_count=10;
        this_->osd_configuration=-1;

        // changed default to 1
        this_->center_timeout = 1;
        this_->use_mousewheel = 1;
        this_->autozoom_secs = 10;
        this_->autozoom_min = 7;
        this_->autozoom_active = 0;
        this_->zoom_min = 1;
        this_->zoom_max = 1048576; //-> order=-2  // 2097152 -> order=-3;
        this_->follow_cursor = 1;
        this_->radius = 30;
        this_->border = 16;

        this_->trans = transform_new();
        this_->trans_cursor = transform_new();
        transform_from_geo(pro, &g, &co);
        center.x=co.x;
        center.y=co.y;
        center.pro = pro;

        dbg(0,"setting center from xmlfile [hardcoded]\n");
        transform_setup(this_->trans, &center, zoom, (this_->orientation != -1) ? this_->orientation : 0);

        // initialze trans_cursor here  
        transform_copy(this_->trans, this_->trans_cursor);
        // initialze trans_cursor here  

        this_->bookmarks=bookmarks_new(&this_->self, NULL, this_->trans);

        this_->prevTs=0;

        for (;*attrs; attrs++) {
                navit_set_attr_do(this_, *attrs, 1);
        }
        this_->displaylist=graphics_displaylist_new();
        command_add_table(this_->attr_cbl, commands, sizeof(commands)/sizeof(struct command_table), this_);

        this_->messages = messagelist_new(attrs);

        //dbg(0,"111111\n");
        
        return this_;
}

static int
navit_set_gui(struct navit *this_, struct gui *gui)
{
        //dbg(0,"EEnter\n");
        if (this_->gui)
                return 0;
        this_->gui=gui;
        if (gui_has_main_loop(this_->gui)) {
                if (! main_loop_gui) {
                        main_loop_gui=this_->gui;
                } else {
                        dbg(0,"gui with main loop already active, ignoring this instance");
                        return 0;
                }
        }
        return 1;
}

void 
navit_add_message(struct navit *this_, char *message)
{
        //dbg(0,"EEnter\n");
        message_new(this_->messages, message);
}

struct message
*navit_get_messages(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return message_get(this_->messages);
}

static int
navit_set_graphics(struct navit *this_, struct graphics *gra)
{
        //dbg(0,"EEnter\n");
        if (this_->gra)
                return 0;
        this_->gra=gra;
        this_->resize_callback=callback_new_attr_1(callback_cast(navit_resize), attr_resize, this_);
        graphics_add_callback(gra, this_->resize_callback);
        this_->button_callback=callback_new_attr_1(callback_cast(navit_button), attr_button, this_);
        graphics_add_callback(gra, this_->button_callback);
        this_->motion_callback=callback_new_attr_1(callback_cast(navit_motion), attr_motion, this_);
        graphics_add_callback(gra, this_->motion_callback);
        this_->predraw_callback=callback_new_attr_1(callback_cast(navit_predraw), attr_predraw, this_);
        graphics_add_callback(gra, this_->predraw_callback);
        //dbg(0,"111111111\n");
        return 1;
}

struct graphics *
navit_get_graphics(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->gra;
}

struct vehicleprofile *
navit_get_vehicleprofile(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->vehicleprofile;
}

GList *
navit_get_vehicleprofiles(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        return this_->vehicleprofiles;
}

static void
navit_projection_set(struct navit *this_, enum projection pro, int draw)
{
        //dbg(0,"EEnter\n");
        struct coord_geo g;
        struct coord *c;

        c=transform_center(this_->trans);
        transform_to_geo(transform_get_projection(this_->trans), c, &g);
        transform_set_projection(this_->trans, pro);
        transform_from_geo(pro, &g, c);
        if (draw)
                navit_draw(this_);
}

/**
 * Start the route computing to a given set of coordinates
 *
 * @param navit The navit instance
 * @param c The coordinate to start routing to
 * @param description A label which allows the user to later identify this destination in the former destinations selection
 * @returns nothing
 */
void
navit_set_destination(struct navit *this_, struct pcoord *c, const char *description, int async)
{
        //dbg(0,"EEnter\n");
        char *destination_file;
        if (c) {
                this_->destination=*c;
                this_->destination_valid=1;

            dbg(1, "navit->navit_set_destination %i\n", c->x);
            dbg(1, "navit->navit_set_destination %i\n", c->y);

        } else
                this_->destination_valid=0;
        destination_file = bookmarks_get_destination_file(TRUE);
        bookmarks_append_coord(this_->bookmarks, destination_file, c, 1, "former_destination", description, NULL, this_->recentdest_count);
        g_free(destination_file);
        callback_list_call_attr_0(this_->attr_cbl, attr_destination);
        if (this_->route) {
                route_set_destination(this_->route, c, async);

                if (this_->ready == 3)
                        navit_draw(this_);
        }
}

/**
 * Start the route computing to a given set of coordinates including waypoints
 *
 * @param navit The navit instance
 * @param c The coordinate to start routing to
 * @param description A label which allows the user to later identify this destination in the former destinations selection
 * @returns nothing
 */
void
navit_set_destinations(struct navit *this_, struct pcoord *c, int count, const char *description, int async)
{
        //dbg(0,"EEnter\n");
        char *destination_file;
        if (c && count) {
                this_->destination=c[count-1];
                this_->destination_valid=1;
        } else
                this_->destination_valid=0;
        destination_file = bookmarks_get_destination_file(TRUE);
        bookmarks_append_coord(this_->bookmarks, destination_file, c, count, "former_itinerary", description, NULL, this_->recentdest_count);
        g_free(destination_file);
        callback_list_call_attr_0(this_->attr_cbl, attr_destination);
        if (this_->route) {
                route_set_destinations(this_->route, c, count, async);

                if (this_->ready == 3)
                        navit_draw(this_);
        }
}

/**
 * @brief Checks if a route is calculated
 *
 * This function checks if a route is calculated.
 *
 * @param this_ The navit struct whose route should be checked.
 * @return True if the route is set, false otherwise.
 */
int
navit_check_route(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        if (this_->route) {
                return route_get_path_set(this_->route);
        }

        return 0;
}

static int
navit_former_destinations_active(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        char *destination_file = bookmarks_get_destination_file(FALSE);
        FILE *f;
        int active=0;
        char buffer[3];
        f=fopen(destination_file,"r");
        if (f) {
                if(!fseek(f, -2, SEEK_END) && fread(buffer, 2, 1, f) == 1 && (buffer[0]!='\n' || buffer[1]!='\n')) 
                        active=1;
                fclose(f);
        }
        g_free(destination_file);
        return active;
}

static void
navit_add_former_destinations_from_file(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        char *destination_file = bookmarks_get_destination_file(FALSE);
        struct attr *attrs[4];
        struct map_rect *mr;
        struct item *item;
        int i,valid=0,count=0;
        struct coord c[16];
        struct pcoord pc[16];
        struct attr parent;
        struct attr type;
        struct attr data;
        struct attr flags;

        parent.type=attr_navit;
        parent.u.navit=this_;

        type.type=attr_type;
        type.u.str="textfile";

        data.type=attr_data;
        data.u.str=destination_file;

        flags.type=attr_flags;
        flags.u.num=1;

        attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;

        this_->former_destination=map_new(&parent, attrs);
        g_free(destination_file);
        if (!this_->route || !navit_former_destinations_active(this_))
                return; 
        mr=map_rect_new(this_->former_destination, NULL);
        while ((item=map_rect_get_item(mr))) {
                if ((item->type == type_former_destination || item->type == type_former_itinerary || item->type == type_former_itinerary_part) && (count=item_coord_get(item, c, 16))) 
                        valid=1;
        }
        map_rect_destroy(mr);
        if (valid && count > 0) {
                for (i = 0 ; i < count ; i++) {
                        pc[i].pro=map_projection(this_->former_destination);
                        pc[i].x=c[i].x;
                        pc[i].y=c[i].y;
                }
                if (count == 1)
                        route_set_destination(this_->route, &pc[0], 1);
                else
                        route_set_destinations(this_->route, pc, count, 1);
                this_->destination=pc[count-1];
                this_->destination_valid=1;
        }
}


void
navit_textfile_debug_log(struct navit *this_, const char *fmt, ...)
{
        //dbg(0,"EEnter\n");
        va_list ap;
        char *str1,*str2;
        va_start(ap, fmt);
        if (this_->textfile_debug_log && this_->vehicle) {
                str1=g_strdup_vprintf(fmt, ap);
                str2=g_strdup_printf("0x%x 0x%x%s%s\n", this_->vehicle->coord.x, this_->vehicle->coord.y, strlen(str1) ? " " : "", str1);
                log_write(this_->textfile_debug_log, str2, strlen(str2), 0);
                g_free(str2);
                g_free(str1);
        }
        va_end(ap);
}

void
navit_textfile_debug_log_at(struct navit *this_, struct pcoord *pc, const char *fmt, ...)
{
        //dbg(0,"EEnter\n");
        va_list ap;
        char *str1,*str2;
        va_start(ap, fmt);
        if (this_->textfile_debug_log && this_->vehicle) {
                str1=g_strdup_vprintf(fmt, ap);
                str2=g_strdup_printf("0x%x 0x%x%s%s\n", pc->x, pc->y, strlen(str1) ? " " : "", str1);
                log_write(this_->textfile_debug_log, str2, strlen(str2), 0);
                g_free(str2);
                g_free(str1);
        }
        va_end(ap);
}

void
navit_say(struct navit *this_, char *text)
{
        //dbg(0,"EEnter\n");
        if(this_->speech) {
                speech_say(this_->speech, text);
        }
}

/**
 * @brief Toggles the navigation announcer for navit
 * @param this_ The navit object
 */
static void
navit_cmd_announcer_toggle(struct navit *this_)
{
    struct attr attr, speechattr;

    // search for the speech attribute
    if(!navit_get_attr(this_, attr_speech, &speechattr, NULL))
        return;
    // find out if the corresponding attribute attr_active has been set
    if(speech_get_attr(speechattr.u.speech, attr_active, &attr, NULL)) {
        // flip it then...
        attr.u.num = !attr.u.num;
    } else {
        // otherwise disable it because voice is enabled by default
        attr.type = attr_active;
        attr.u.num = 0;
    }

    // apply the new state
    if(!speech_set_attr(speechattr.u.speech, &attr))
        return;

    // announce that the speech attribute has changed
    callback_list_call_attr_0(this_->attr_cbl, attr_speech);
}


void
navit_cmd_announcer_on(struct navit *this_)
{
    struct attr attr, speechattr;

    // search for the speech attribute
    if(!navit_get_attr(this_, attr_speech, &speechattr, NULL))
        return;

        attr.type = attr_active;
        attr.u.num = 1;

    // apply the new state
    if(!speech_set_attr(speechattr.u.speech, &attr))
        return;

    // announce that the speech attribute has changed
    callback_list_call_attr_0(this_->attr_cbl, attr_speech);
}


void
navit_cmd_announcer_off(struct navit *this_)
{
    struct attr attr, speechattr;

    // search for the speech attribute
    if(!navit_get_attr(this_, attr_speech, &speechattr, NULL))
        return;

        attr.type = attr_active;
        attr.u.num = 0;

    // apply the new state
    if(!speech_set_attr(speechattr.u.speech, &attr))
        return;

    // announce that the speech attribute has changed
    callback_list_call_attr_0(this_->attr_cbl, attr_speech);
}


void
navit_speak(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct navigation *nav=this_->navigation;
        struct map *map=NULL;
        struct map_rect *mr=NULL;
        struct item *item;
        struct attr attr;

    if (!speech_get_attr(this_->speech, attr_active, &attr, NULL))
        attr.u.num = 1;
    dbg(1, "this_.speech->active %i\n", attr.u.num);
    if(!attr.u.num)
        return;

        if (nav)
                map=navigation_get_map(nav);
        if (map)
                mr=map_rect_new(map, NULL);
        if (mr) {
                while ((item=map_rect_get_item(mr)) && (item->type == type_nav_position || item->type == type_nav_none));
                if (item && item_attr_get(item, attr_navigation_speech, &attr)) {
                        speech_say(this_->speech, attr.u.str);
                        navit_add_message(this_, attr.u.str);
                        navit_textfile_debug_log(this_, "type=announcement label=\"%s\"", attr.u.str);
                }
                map_rect_destroy(mr);
        }
}

static void
navit_window_roadbook_update(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct navigation *nav=this_->navigation;
        struct map *map=NULL;
        struct map_rect *mr=NULL;
        struct item *item;
        struct attr attr;
        struct param_list param[5];
        int secs;

        dbg(1,"enter\n");
        datawindow_mode(this_->roadbook_window, 1);
        if (nav)
                map=navigation_get_map(nav);
        if (map)
                mr=map_rect_new(map, NULL);
        //dbg(0,"nav=%p map=%p mr=%p\n", nav, map, mr);
        if (mr) {
                //dbg(0,"while loop\n");
                while ((item=map_rect_get_item(mr))) {
                        //dbg(0,"item=%p\n", item);
                        attr.u.str=NULL;
                        if (item->type != type_nav_position) {
                                item_attr_get(item, attr_navigation_long, &attr);
                                if (attr.u.str == NULL) {
                                        continue;
                                }
                                dbg(2, "Command='%s'\n", attr.u.str);
                                param[0].value=g_strdup(attr.u.str);
                        } else
                                param[0].value=_("Position");
                        param[0].name=_("Command");

                        item_attr_get(item, attr_length, &attr);
                        dbg(2, "Length=%d\n", attr.u.num);
                        param[1].name=_("Length");

                        if ( attr.u.num >= 2000 )
                        {
                                param[1].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
                        }
                        else
                        {
                                param[1].value=g_strdup_printf("%7d %s",attr.u.num, _("m"));
                        }

                        item_attr_get(item, attr_time, &attr);
                        dbg(2, "Time=%d\n", attr.u.num);
                        secs=attr.u.num/10;
                        param[2].name=_("Time");
                        if ( secs >= 3600 )
                        {
                                param[2].value=g_strdup_printf("%d:%02d:%02d",secs / 60, ( secs / 60 ) % 60 , secs % 60);
                        }
                        else
                        {
                                param[2].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
                        }

                        item_attr_get(item, attr_destination_length, &attr);
                        dbg(2, "Destlength=%d\n", attr.u.num);
                        param[3].name=_("Destination Length");
                        if ( attr.u.num >= 2000 )
                        {
                                param[3].value=g_strdup_printf("%5.1f %s",(float)attr.u.num / 1000, _("km") );
                        }
                        else
                        {
                                param[3].value=g_strdup_printf("%d %s",attr.u.num, _("m"));
                        }

                        item_attr_get(item, attr_destination_time, &attr);
                        dbg(2, "Desttime=%d\n", attr.u.num);
                        secs=attr.u.num/10;
                        param[4].name=_("Destination Time");
                        if ( secs >= 3600 )
                        {
                                param[4].value=g_strdup_printf("%d:%02d:%02d",secs / 3600, (secs / 60 ) % 60 , secs % 60);
                        }
                        else
                        {
                                param[4].value=g_strdup_printf("%d:%02d",secs / 60, secs % 60);
                        }
                        datawindow_add(this_->roadbook_window, param, 5);
                }
                map_rect_destroy(mr);
        }
        datawindow_mode(this_->roadbook_window, 0);
}

void
navit_window_roadbook_destroy(struct navit *this_)
{
        //dbg(0, "enter\n");
        navigation_unregister_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
        this_->roadbook_window=NULL;
        this_->roadbook_callback=NULL;
}
void
navit_window_roadbook_new(struct navit *this_)
{
        if (!this_->gui || this_->roadbook_callback || this_->roadbook_window) {
                return;
        }

        this_->roadbook_callback=callback_new_1(callback_cast(navit_window_roadbook_update), this_);
        navigation_register_callback(this_->navigation, attr_navigation_long, this_->roadbook_callback);
        this_->roadbook_window=gui_datawindow_new(this_->gui, _("Roadbook"), NULL, callback_new_1(callback_cast(navit_window_roadbook_destroy), this_));
        navit_window_roadbook_update(this_);
}

void
navit_remove_all_maps(struct navit *this_)
{
        struct mapset *ms;
        struct map *map3;

        if (this_->mapsets)
        {
                struct mapset_handle *msh;
                ms=this_->mapsets->data;
                msh=mapset_open(ms);
                while (msh && (map3=mapset_next(msh, 0)))
                {
                        struct attr map_name_attr;
                        if (map_get_attr(map3,attr_name, &map_name_attr,NULL))
                        {
                                //dbg(0,"map name=%s",map_name_attr.u.str);
                                if (strncmp("_ms_sdcard_map:", map_name_attr.u.str, 15) == 0)
                                {
                                        //dbg(0,"removing map\n");
                                        struct attr map_attr;
                                        map_attr.u.map=map3;
                                        map_attr.type=attr_map;
                                        mapset_remove_attr(ms, &map_attr);
                                        map_destroy(map3);
                                }
                        }
                }
                mapset_close(msh);
        }
}

void
navit_add_all_maps(struct navit *this_)
{
        struct mapset *ms;
        struct map *map3;

        if (this_->mapsets)
        {
                ms=this_->mapsets->data;

                struct attr type;
                struct attr parent;
                struct attr data;
                struct attr flags;
                struct map *map2;
                struct attr map2_attr;
                struct attr *attrs[4];
                char *map_file;

                parent.type=attr_navit;
                parent.u.navit=this_;
                type.type=attr_type;
                type.u.str="binfile";
                data.type=attr_data;
                map_file=g_strdup("/sdcard/zanavi/maps/borders.bin");
                data.u.str=map_file;

                //dbg(0,"map name=%s",map_file);

                flags.type=attr_flags;
                flags.u.num=0;
                attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;
                map2=map_new(&parent, attrs);
                if (map2)
                {
                        map2_attr.u.data=map2;
                        map2_attr.type=attr_map;
                        mapset_add_attr_name(ms, &map2_attr);
                }
                g_free(map_file);

                parent.type=attr_navit;
                parent.u.navit=this_;
                type.type=attr_type;
                type.u.str="binfile";
                data.type=attr_data;
                map_file=g_strdup("/sdcard/zanavi/maps/coastline.bin");
                data.u.str=map_file;

                //dbg(0,"map name=%s",map_file);

                flags.type=attr_flags;
                flags.u.num=0;
                attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;
                map2=map_new(&parent, attrs);
                if (map2)
                {
                        map2_attr.u.data=map2;
                        map2_attr.type=attr_map;
                        mapset_add_attr_name(ms, &map2_attr);
                }
                g_free(map_file);

                int i=1;
                for(i = 1; i < 10;i++)
                {
                        struct map *map22;
                        struct attr map22_attr;
                        parent.type=attr_navit;
                        parent.u.navit=this_;
                        type.type=attr_type;
                        type.u.str="binfile";
                        data.type=attr_data;
                        map_file=g_strdup_printf("/sdcard/zanavi/maps/navitmap_00%d.bin",i);
                        data.u.str=map_file;
                        //dbg(0,"map name=%s",map_file);
                        flags.type=attr_flags;
                        flags.u.num=0;
                        attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;
                        map22=map_new(&parent, attrs);
                        if (map22)
                        {
                                map22_attr.u.data=map22;
                                map22_attr.type=attr_map;
                                mapset_add_attr_name(ms, &map22_attr);
                        }
                        g_free(map_file);
                }

                i=10;
                for(i = 10; i < 21;i++)
                {
                        parent.type=attr_navit;
                        parent.u.navit=this_;
                        type.type=attr_type;
                        type.u.str="binfile";
                        data.type=attr_data;
                        map_file=g_strdup_printf("/sdcard/zanavi/maps/navitmap_0%d.bin",i);
                        data.u.str=map_file;
                        //dbg(0,"map name=%s",map_file);
                        flags.type=attr_flags;
                        flags.u.num=0;
                        attrs[0]=&type; attrs[1]=&data; attrs[2]=&flags; attrs[3]=NULL;
                        map2=map_new(&parent, attrs);
                        if (map2)
                        {
                                map2_attr.u.data=map2;
                                map2_attr.type=attr_map;
                                mapset_add_attr_name(ms, &map2_attr);
                        }
                        g_free(map_file);
                }
        }
}

void
navit_reload_maps(struct navit *this_)
{
        navit_remove_all_maps(this_);
        navit_add_all_maps(this_);
}

void
navit_init(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct mapset *ms;
        struct map *map;
        int callback;
        char *center_file;

        dbg(0,"enter gui %p graphics %p\n",this_->gui,this_->gra);

        if (!this_->gui && !(this_->flags & 2)) {
                dbg(0,"no gui\n");
                navit_destroy(this_);
                return;
        }
        if (!this_->gra && !(this_->flags & 1)) {
                dbg(0,"no graphics\n");
                navit_destroy(this_);
                return;
        }
        dbg(0,"Connecting gui to graphics\n");
        if (this_->gui && this_->gra && gui_set_graphics(this_->gui, this_->gra)) {
                struct attr attr_type_gui, attr_type_graphics;
                gui_get_attr(this_->gui, attr_type, &attr_type_gui, NULL);
                graphics_get_attr(this_->gra, attr_type, &attr_type_graphics, NULL);
                dbg(0,"failed to connect graphics '%s' to gui '%s'\n", attr_type_graphics.u.str, attr_type_gui.u.str);
                // dbg(0," Please see http://wiki.navit-project.org/index.php/Failed_to_connect_graphics_to_gui\n");
                // dbg(0," for explanations and solutions\n");

                navit_destroy(this_);
                return;
        }
        if (this_->speech && this_->navigation) {
                struct attr speech;
                speech.type=attr_speech;
                speech.u.speech=this_->speech;
                navigation_set_attr(this_->navigation, &speech);
        }
        dbg(0,"Initializing graphics\n");
        dbg(0,"Setting Vehicle\n");
        navit_set_vehicle(this_, this_->vehicle);
        dbg(0,"Adding dynamic maps to mapset %p\n",this_->mapsets);
        if (this_->mapsets) {
                struct mapset_handle *msh;
                ms=this_->mapsets->data;
                this_->progress_cb=callback_new_attr_1(callback_cast(navit_map_progress), attr_progress, this_);
                msh=mapset_open(ms);
                while (msh && (map=mapset_next(msh, 0))) {
                        //pass new callback instance for each map in the mapset to make map callback list destruction work correctly
                        struct callback *pcb = callback_new_attr_1(callback_cast(navit_map_progress), attr_progress, this_);
                        map_add_callback(map, pcb);
                }
                mapset_close(msh);
                
                if (this_->route) {
                        if ((map=route_get_map(this_->route))) {
                                struct attr map_a,map_name;
                                map_a.type=attr_map;
                                map_a.u.map=map;
                                map_name.type=attr_name;
                                map_name.u.str="_ms_route";
                                map_set_attr(map_a.u.map, &map_name);
                                mapset_add_attr(ms, &map_a);
                        }
                        if ((map=route_get_graph_map(this_->route))) {
                                struct attr map_a,active,map_name;
                                map_a.type=attr_map;
                                map_a.u.map=map;
                                active.type=attr_active;
                                active.u.num=0;
                                map_name.type=attr_name;
                                map_name.u.str="_ms_route_graph";
                                map_set_attr(map_a.u.map, &map_name);
                                mapset_add_attr(ms, &map_a);
                                map_set_attr(map, &active);
                        }
                        route_set_mapset(this_->route, ms);
                        route_set_projection(this_->route, transform_get_projection(this_->trans));
                }
                if (this_->tracking) {
                        tracking_set_mapset(this_->tracking, ms);
                        if (this_->route)
                                tracking_set_route(this_->tracking, this_->route);
                }
                if (this_->navigation) {
                        if ((map=navigation_get_map(this_->navigation))) {
                                struct attr map_a,active,map_name;
                                map_a.type=attr_map;
                                map_a.u.map=map;
                                active.type=attr_active;
                                active.u.num=0;
                                map_name.type=attr_name;
                                map_name.u.str="_ms_navigation";
                                map_set_attr(map_a.u.map, &map_name);
                                mapset_add_attr(ms, &map_a);
                                map_set_attr(map, &active);
                        }
                }
                if (this_->tracking) {
                        if ((map=tracking_get_map(this_->tracking))) {
                                struct attr map_a,active,map_name;
                                map_a.type=attr_map;
                                map_a.u.map=map;
                                active.type=attr_active;
                                active.u.num=0;
                                map_name.type=attr_name;
                                map_name.u.str="_ms_tracking";
                                map_set_attr(map_a.u.map, &map_name);
                                mapset_add_attr(ms, &map_a);
                                map_set_attr(map, &active);
                        }
                }
                // *DISABLED* navit_add_former_destinations_from_file(this_);
        }
        if (this_->route) {
                struct attr callback;
                this_->route_cb=callback_new_attr_1(callback_cast(navit_redraw_route), attr_route_status, this_);
                callback.type=attr_callback;
                callback.u.callback=this_->route_cb;
                route_add_attr(this_->route, &callback);
        }
        if (this_->navigation) {
                if (this_->speech) {
                        this_->nav_speech_cb=callback_new_1(callback_cast(navit_speak), this_);
                        navigation_register_callback(this_->navigation, attr_navigation_speech, this_->nav_speech_cb);
                }
                if (this_->route)
                        navigation_set_route(this_->navigation, this_->route);
        }
        dbg(0,"Setting Center\n");
        center_file = bookmarks_get_center_file(FALSE);
        bookmarks_set_center_from_file(this_->bookmarks, center_file);
        g_free(center_file);
#if 0
        if (this_->menubar) {
                men=menu_add(this_->menubar, "Data", menu_type_submenu, NULL);
                if (men) {
                        navit_add_menu_windows_items(this_, men);
                }
        }
#endif
        global_navit=this_;
#if 0
        navit_window_roadbook_new(this_);
        navit_window_items_new(this_);
#endif

        messagelist_init(this_->messages);

        navit_set_cursors(this_);

        callback_list_call_attr_1(this_->attr_cbl, attr_navit, this_);
        callback=(this_->ready == 2);
        dbg(0,"pre this_->ready=%d\n",this_->ready);
        this_->ready|=1;
        dbg(0,"set this_->ready=%d\n",this_->ready);
        //dbg(0,"ready=%d\n",this_->ready);
        if (this_->ready == 3)
        {
                //dbg(0,"navit_draw_async_003\n");
                navit_draw_async(this_, 1);
        }
        if (callback)
                callback_list_call_attr_1(this_->attr_cbl, attr_graphics_ready, this_);
#if 0
        routech_test(this_);
#endif
        //dbg(0,"1111111111\n");
}

void
navit_zoom_to_rect(struct navit *this_, struct coord_rect *r)
{
        //dbg(0,"EEnter\n");
        struct coord c;
        int scale=16;

        c.x=(r->rl.x+r->lu.x)/2;
        c.y=(r->rl.y+r->lu.y)/2;
        transform_set_center(this_->trans, &c);
        dbg(1,"%x,%x-%x,%x\n", r->rl.x,r->rl.y,r->lu.x,r->lu.y);
        while (scale < 1<<20) {
                struct point p1,p2;
                transform_set_scale(this_->trans, scale);
                transform_setup_source_rect(this_->trans);
                transform(this_->trans, transform_get_projection(this_->trans), &r->lu, &p1, 1, 0, 0, NULL);
                transform(this_->trans, transform_get_projection(this_->trans), &r->rl, &p2, 1, 0, 0, NULL);
                dbg(1,"%d,%d-%d,%d\n",p1.x,p1.y,p2.x,p2.y);
                if (p1.x < 0 || p2.x < 0 || p1.x > this_->w || p2.x > this_->w ||
                    p1.y < 0 || p2.y < 0 || p1.y > this_->h || p2.y > this_->h)
                        scale*=2;
                else
                        break;
        
        }
        if (this_->ready == 3)
        {
                //dbg(0,"navit_draw_async_004\n");
                navit_draw_async(this_,0);
        }
}

void
navit_zoom_to_route(struct navit *this_, int orientation)
{
        //dbg(0,"EEnter\n");
        struct map *map;
        struct map_rect *mr=NULL;
        struct item *item;
        struct coord c;
        struct coord_rect r;
        int count=0;
        if (! this_->route)
                return;
        dbg(1,"enter\n");
        map=route_get_map(this_->route);
        dbg(1,"map=%p\n",map);
        if (map)
                mr=map_rect_new(map, NULL);
        dbg(1,"mr=%p\n",mr);
        if (mr) {
                while ((item=map_rect_get_item(mr))) {
                        dbg(1,"item=%s\n", item_to_name(item->type));
                        while (item_coord_get(item, &c, 1)) {
                                dbg(1,"coord\n");
                                if (!count) 
                                        r.lu=r.rl=c;
                                else
                                        coord_rect_extend(&r, &c);      
                                count++;
                        }
                }
                map_rect_destroy(mr);
        }
        if (! count)
                return;
        if (orientation != -1)
                transform_set_yaw(this_->trans, orientation);
        navit_zoom_to_rect(this_, &r);
}

static void
navit_cmd_zoom_to_route(struct navit *this)
{
        //dbg(0,"EEnter\n");
        navit_zoom_to_route(this, 0);
}


/**
 * show point on map
 *
 * @param navit The navit instance
 * @param center The point where to center the map, including its projection
 * @returns nothing
 */
void
navit_set_center(struct navit *this_, struct pcoord *center, int set_timeout)
{
        //dbg(0,"EEnter\n");
        struct coord *c=transform_center(this_->trans);
        struct coord c1,c2;
        enum projection pro = transform_get_projection(this_->trans);
        if (pro != center->pro) {
                c1.x = center->x;
                c1.y = center->y;
                transform_from_to(&c1, center->pro, &c2, pro);
        } else {
                c2.x = center->x;
                c2.y = center->y;
        }
        *c=c2;
        if (set_timeout) 
                navit_set_timeout(this_);
        if (this_->ready == 3)
                navit_draw(this_);
}

static void
navit_set_center_coord_screen(struct navit *this_, struct coord *c, struct point *p, int set_timeout)
{
        //dbg(0,"EEnter\n");
        int width, height;
        struct point po;
        transform_set_center(this_->trans, c);
        transform_get_size(this_->trans, &width, &height);
        po.x=width/2;
        po.y=height/2;
        update_transformation(this_->trans, &po, p, NULL);
        if (set_timeout)
                navit_set_timeout(this_);
}

/**
 * Links all vehicles to a cursor depending on the current profile.
 *
 * @param this_ A navit instance
 * @author Ralph Sennhauser (10/2009)
 */
static void
navit_set_cursors(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        struct attr name;
        struct navit_vehicle *nv;
        struct cursor *c;
        GList *v;

        v=g_list_first(this_->vehicles); // GList of navit_vehicles
        while (v) {
                nv=v->data;
                if (vehicle_get_attr(nv->vehicle, attr_cursorname, &name, NULL)) {
                        if (!strcmp(name.u.str,"none"))
                                c=NULL;
                        else
                                c=layout_get_cursor(this_->layout_current, name.u.str);
                } else
                        c=layout_get_cursor(this_->layout_current, "default");
                vehicle_set_cursor(nv->vehicle, c, 0);
                v=g_list_next(v);
        }
        return;
}

static int
navit_get_cursor_pnt(struct navit *this_, struct point *p, int keep_orientation, int *dir)
{
        //dbg(0,"EEnter\n");
        int width, height;
        struct navit_vehicle *nv=this_->vehicle;

        float offset=this_->radius;      // Cursor offset from the center of the screen (percent).
#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 */
        float min_offset = 0.;      // Percent offset at min_offset_speed.
        float max_offset = 30.;     // Percent offset at max_offset_speed.
        int min_offset_speed = 2;   // Speed in km/h
        int max_offset_speed = 50;  // Speed ini km/h
        // Calculate cursor offset from the center of the screen, upon speed.
        if (nv->speed <= min_offset_speed) {
            offset = min_offset;
        } else if (nv->speed > max_offset_speed) {
            offset = max_offset;
        } else {
            offset = (max_offset - min_offset) / (max_offset_speed - min_offset_speed) * (nv->speed - min_offset_speed);
        }
#endif

        transform_get_size(this_->trans, &width, &height);
        if (this_->orientation == -1 || keep_orientation) {
                p->x=50*width/100;
                p->y=(50 + offset)*height/100;
                if (dir) 
                        *dir=keep_orientation?this_->orientation:nv->dir;
        } else {
                int mdir;
                if (this_->tracking && this_->tracking_flag) {
                        mdir = tracking_get_angle(this_->tracking) - this_->orientation;
                } else {
                        mdir=nv->dir-this_->orientation;
                }

                p->x=(50 - offset*sin(M_PI*mdir/180.))*width/100;
                p->y=(50 + offset*cos(M_PI*mdir/180.))*height/100;
                if (dir)
                        *dir=this_->orientation;
        }
        return 1;
}

void
navit_set_center_cursor(struct navit *this_, int autozoom, int keep_orientation)
{
        //dbg(0,"EEnter\n");
        int dir;
        struct point pn;
        struct navit_vehicle *nv=this_->vehicle;
        navit_get_cursor_pnt(this_, &pn, keep_orientation, &dir);
        transform_set_yaw(this_->trans, dir);
        navit_set_center_coord_screen(this_, &nv->coord, &pn, 0);
        if (autozoom)
                navit_autozoom(this_, &nv->coord, nv->speed, 0);
}

static void
navit_set_center_cursor_draw(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        navit_set_center_cursor(this_,1,0);
        if (this_->ready == 3)
        {
                //dbg(0,"navit_draw_async_005\n");
                navit_draw_async(this_, 1);
        }
}

static void
navit_cmd_set_center_cursor(struct navit *this_)
{
        //dbg(0,"EEnter\n");
        navit_set_center_cursor_draw(this_);
}

void
navit_set_center_screen(struct navit *this_, struct point *p, int set_timeout)
{
        //dbg(0,"EEnter\n");
        struct coord c;
        struct pcoord pc;
        transform_reverse(this_->trans, p, &c);
        pc.x = c.x;
        pc.y = c.y;
        pc.pro = transform_get_projection(this_->trans);
        navit_set_center(this_, &pc, set_timeout);
}

#if 0
                switch((*attrs)->type) {
                case attr_zoom:
                        zoom=(*attrs)->u.num;
                        break;
                case attr_center:
                        g=*((*attrs)->u.coord_geo);
                        break;
#endif

static int
navit_set_attr_do(struct navit *this_, struct attr *attr, int init)
{
        //dbg(0,"EEnter\n");
        int dir=0, orient_old=0, attr_updated=0;
        struct coord co;
        long zoom;
        GList *l;
        struct navit_vehicle *nv;
        struct layout *lay;
        struct attr active;
        active.type=attr_active;
        active.u.num=0;

        switch (attr->type) {
        case attr_autozoom:
                attr_updated=(this_->autozoom_secs != attr->u.num);
                this_->autozoom_secs = attr->u.num;
                break;
        case attr_autozoom_active:
                attr_updated=(this_->autozoom_active != attr->u.num);
                this_->autozoom_active = attr->u.num;
                break;
        case attr_center:
                transform_from_geo(transform_get_projection(this_->trans), attr->u.coord_geo, &co);
                dbg(1,"0x%x,0x%x\n",co.x,co.y);
                transform_set_center(this_->trans, &co);
                break;
        case attr_drag_bitmap:
                attr_updated=(this_->drag_bitmap != !!attr->u.num);
                this_->drag_bitmap=!!attr->u.num;
                break;
        case attr_flags:
                attr_updated=(this_->flags != attr->u.num);
                this_->flags=attr->u.num;
                break;
        case attr_flags_graphics:
                attr_updated=(this_->graphics_flags != attr->u.num);
                this_->graphics_flags=attr->u.num;
                break;
        case attr_follow:
                if (!this_->vehicle)
                        return 0;
                attr_updated=(this_->vehicle->follow_curr != attr->u.num);
                this_->vehicle->follow_curr = attr->u.num;
                break;
        case attr_layout:
                if(this_->layout_current!=attr->u.layout) {
                        this_->layout_current=attr->u.layout;
                        graphics_font_destroy_all(this_->gra);
                        navit_set_cursors(this_);
                        if (this_->ready == 3)
                                navit_draw(this_);
                        attr_updated=1;
                }
                break;
        case attr_layout_name:
                l=this_->layouts;
                while (l) {
                        lay=l->data;
                        if (!strcmp(lay->name,attr->u.str)) {
                                struct attr attr;
                                attr.type=attr_layout;
                                attr.u.layout=lay;
                                return navit_set_attr_do(this_, &attr, init);
                        }
                        l=g_list_next(l);
                }               
                return 0;
        case attr_map_border:
                if (this_->border != attr->u.num) {
                        this_->border=attr->u.num;
                        attr_updated=1;
                }
                break;
        case attr_orientation:
                orient_old=this_->orientation;
                this_->orientation=attr->u.num;
                if (!init) {
                        if (this_->orientation != -1) {
                                dir = this_->orientation;
                        } else {
                                if (this_->vehicle) {
                                        dir = this_->vehicle->dir;
                                }
                        }
                        transform_set_yaw(this_->trans, dir);
                        if (orient_old != this_->orientation) {
#if 0
                                if (this_->ready == 3)
                                        navit_draw(this_);
#endif
                                attr_updated=1;
                        }
                }
                break;
        case attr_osd_configuration:
                dbg(0,"setting osd_configuration to %d (was %d)\n", attr->u.num, this_->osd_configuration);
                attr_updated=(this_->osd_configuration != attr->u.num);
                this_->osd_configuration=attr->u.num;
                break;
        case attr_pitch:
                attr_updated=(this_->pitch != attr->u.num);
                this_->pitch=attr->u.num;
                transform_set_pitch(this_->trans, this_->pitch);
                if (!init && attr_updated && this_->ready == 3)
                        navit_draw(this_);
                break;
        case attr_projection:
                if(this_->trans && transform_get_projection(this_->trans) != attr->u.projection) {
                        navit_projection_set(this_, attr->u.projection, !init);
                        attr_updated=1;
                }
                break;
        case attr_radius:
                attr_updated=(this_->radius != attr->u.num);
                this_->radius=attr->u.num;
                break;
        case attr_recent_dest:
                attr_updated=(this_->recentdest_count != attr->u.num);
                this_->recentdest_count=attr->u.num;
                break;
        case attr_speech:
                if(this_->speech && this_->speech != attr->u.speech) {
                        attr_updated=1;
                        this_->speech = attr->u.speech;
                }
                break;
        case attr_timeout:
                attr_updated=(this_->center_timeout != attr->u.num);
                this_->center_timeout = attr->u.num;
                break;
        case attr_tracking:
                attr_updated=(this_->tracking_flag != !!attr->u.num);
                this_->tracking_flag=!!attr->u.num;
                break;
        case attr_transformation:
                this_->trans=attr->u.transformation;
                break;
        case attr_use_mousewheel:
                attr_updated=(this_->use_mousewheel != !!attr->u.num);
                this_->use_mousewheel=!!attr->u.num;
                break;
        case attr_vehicle:
                l=this_->vehicles;
                while(l) {
                        nv=l->data;
                        if (nv->vehicle == attr->u.vehicle) {
                                if (!this_->vehicle || this_->vehicle->vehicle != attr->u.vehicle) {
                                        if (this_->vehicle)
                                                vehicle_set_attr(this_->vehicle->vehicle, &active);
                                        active.u.num=1;
                                        vehicle_set_attr(nv->vehicle, &active);
                                        attr_updated=1;
                                }
                                navit_set_vehicle(this_, nv);
                        }
                        l=g_list_next(l);
                }
                break;
        case attr_zoom:
                zoom=transform_get_scale(this_->trans);
                attr_updated=(zoom != attr->u.num);
                transform_set_scale(this_->trans, attr->u.num);
                if (attr_updated && !init) 
                        navit_draw(this_);
                break;
        case attr_zoom_min:
                attr_updated=(attr->u.num != this_->zoom_min);
                this_->zoom_min=attr->u.num;
                break;
        case attr_zoom_max:
                attr_updated=(attr->u.num != this_->zoom_max);
                this_->zoom_max=attr->u.num;
                break;
        case attr_message:
                navit_add_message(this_, attr->u.str);
                break;
        case attr_follow_cursor:
                attr_updated=(this_->follow_cursor != !!attr->u.num);
                this_->follow_cursor=!!attr->u.num;
                break;
    case attr_imperial: 
        attr_updated=(this_->imperial != attr->u.num); 
        this_->imperial=attr->u.num; 
        break; 
        default:
                return 0;
        }
        if (attr_updated && !init) {
                callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
                if (attr->type == attr_osd_configuration)
                        graphics_draw_mode(this_->gra, draw_mode_end);
        }
        return 1;
}

int
navit_set_attr(struct navit *this_, struct attr *attr)
{
        //dbg(0,"EEnter\n");
        return navit_set_attr_do(this_, attr, 0);
}

int
navit_get_attr(struct navit *this_, enum attr_type type, struct attr *attr, struct attr_iter *iter)
{
        //dbg(0,"EEnter\n");
        struct message *msg;
        int len,offset;
        int ret=1;

        switch (type) {
        case attr_message:
                msg = navit_get_messages(this_);
                
                if (!msg) {
                        return 0;
                }

                len = 0;
                while (msg) {
                        len += strlen(msg->text) + 1;
                        msg = msg->next;
                }
                attr->u.str = g_malloc(len + 1);
                
                msg = navit_get_messages(this_);
                offset = 0;
                while (msg) {
                        g_stpcpy((attr->u.str + offset), msg->text);
                        offset += strlen(msg->text);
                        attr->u.str[offset] = '\n';
                        offset++;

                        msg = msg->next;
                }

                attr->u.str[len] = '\0';
                break;
        case attr_imperial: 
                attr->u.num=this_->imperial; 
                break; 
        case attr_bookmark_map:
                attr->u.map=bookmarks_get_map(this_->bookmarks);
                break;
        case attr_bookmarks:
                attr->u.bookmarks=this_->bookmarks;
                break;
        case attr_callback_list:
                attr->u.callback_list=this_->attr_cbl;
                break;
        case attr_destination:
                if (! this_->destination_valid)
                        return 0;
                attr->u.pcoord=&this_->destination;
                break;
        case attr_displaylist:
                attr->u.displaylist=this_->displaylist;
                return (attr->u.displaylist != NULL);
        case attr_follow:
                if (!this_->vehicle)
                        return 0;
                attr->u.num=this_->vehicle->follow_curr;
                break;
        case attr_former_destination_map:
                attr->u.map=this_->former_destination;
                break;
        case attr_graphics:
                attr->u.graphics=this_->gra;
                ret=(attr->u.graphics != NULL);
                break;
        case attr_gui:
                attr->u.gui=this_->gui;
                ret=(attr->u.gui != NULL);
                break;
        case attr_layout:
                if (iter)
                {
                        if (iter->u.list)
                        {
                                iter->u.list=g_list_next(iter->u.list);
                        }
                        else
                        {
                                iter->u.list=this_->layouts;
                        }
                        if (!iter->u.list)
                        {
                                return 0;
                        }
                        attr->u.layout=(struct layout *)iter->u.list->data;
                }
                else
                {
                        attr->u.layout=this_->layout_current;
                }
                break;
        case attr_map:
                if (iter && this_->mapsets) {
                        if (!iter->u.mapset_handle) {
                                iter->u.mapset_handle=mapset_open((struct mapset *)this_->mapsets->data);
                        }
                        attr->u.map=mapset_next(iter->u.mapset_handle, 0);
                        if(!attr->u.map) {
                                mapset_close(iter->u.mapset_handle);
                                return 0;
                        }
                } else {
                        return 0;
                }
                break;
        case attr_mapset:
                attr->u.mapset=this_->mapsets->data;
                ret=(attr->u.mapset != NULL);
                break;
        case attr_navigation:
                attr->u.navigation=this_->navigation;
                break;
        case attr_orientation:
                attr->u.num=this_->orientation;
                break;
        case attr_osd_configuration:
                attr->u.num=this_->osd_configuration;
                break;
        case attr_pitch:
                attr->u.num=transform_get_pitch(this_->trans);
                break;
        case attr_projection:
                if(this_->trans) {
                        attr->u.num=transform_get_projection(this_->trans);
                } else {
                        return 0;
                }
                break;
        case attr_route:
                attr->u.route=this_->route;
                break;
        case attr_speech:
                attr->u.speech=this_->speech;
                break;
        case attr_tracking:
                attr->u.num=this_->tracking_flag;
                break;
        case attr_trackingo:
                attr->u.tracking=this_->tracking;
                break;
        case attr_transformation:
                attr->u.transformation=this_->trans;
                break;
        case attr_vehicle:
                if(iter) {
                        if(iter->u.list) {
                                iter->u.list=g_list_next(iter->u.list);
                        } else { 
                                iter->u.list=this_->vehicles;
                        }
                        if(!iter->u.list)
                                return 0;
                        attr->u.vehicle=((struct navit_vehicle*)iter->u.list->data)->vehicle;
                } else {
                        if(this_->vehicle) {
                                attr->u.vehicle=this_->vehicle->vehicle;
                        } else {
                                return 0;
                        }
                }
                break;
        case attr_vehicleprofile:
                attr->u.vehicleprofile=this_->vehicleprofile;
                break;
        case attr_zoom:
                attr->u.num=transform_get_scale(this_->trans);
                break;
        case attr_autozoom_active:
                attr->u.num=this_->autozoom_active;
                break;
        case attr_follow_cursor:
                attr->u.num=this_->follow_cursor;
                break;
        default:
                return 0;
        }
        attr->type=type;
        return ret;
}

static int
navit_add_log(struct navit *this_, struct log *log)
{
        struct attr type_attr;
        if (!log_get_attr(log, attr_type, &type_attr, NULL))
                return 0;
        if (!strcmp(type_attr.u.str, "textfile_debug")) {
                char *header = "type=track_tracked\n";
                if (this_->textfile_debug_log)
                        return 0;
                log_set_header(log, header, strlen(header));
                this_->textfile_debug_log=log;
                return 1;
        }
        return 0;
}

static int
navit_add_layout(struct navit *this_, struct layout *layout)
{
        //dbg(0,"EEnter\n");
        struct attr active;
        this_->layouts = g_list_append(this_->layouts, layout);
        layout_get_attr(layout, attr_active, &active, NULL);
        if(active.u.num || !this_->layout_current) { 
                this_->layout_current=layout;
                return 1;
        }
        return 0;
}

int
navit_add_attr(struct navit *this_, struct attr *attr)
{
        //dbg(0,"EEnter\n");

        int ret=1;
        switch (attr->type) {
        case attr_callback:
                navit_add_callback(this_, attr->u.callback);
                break;
        case attr_log:
                ret=navit_add_log(this_, attr->u.log);
                break;
        case attr_gui:
                ret=navit_set_gui(this_, attr->u.gui);
                break;
        case attr_graphics:
                ret=navit_set_graphics(this_, attr->u.graphics);
                break;
        case attr_layout:
                ret=navit_add_layout(this_, attr->u.layout);
                break;
        case attr_route:
                this_->route=attr->u.route;
                break;
        case attr_mapset:
                this_->mapsets = g_list_append(this_->mapsets, attr->u.mapset);
                break;
        case attr_navigation:
                this_->navigation=attr->u.navigation;
                break;
        case attr_recent_dest:
                this_->recentdest_count = attr->u.num;
                break;
        case attr_speech:
                this_->speech=attr->u.speech;
                break;
        case attr_tracking:
                this_->tracking=attr->u.tracking;
                break;
        case attr_vehicle:
                ret=navit_add_vehicle(this_, attr->u.vehicle);
                break;
        case attr_vehicleprofile:
                this_->vehicleprofiles=g_list_prepend(this_->vehicleprofiles, attr->u.vehicleprofile);
                break;
        case attr_autozoom_min:
                this_->autozoom_min = attr->u.num;
                break;
        default:
                return 0;
        }
        callback_list_call_attr_2(this_->attr_cbl, attr->type, this_, attr);
        return ret;
}

int
navit_remove_attr(struct navit *this_, struct attr *attr)
{
        int ret=1;
        switch (attr->type) {
        case attr_callback:
                navit_remove_callback(this_, attr->u.callback);
                break;
        default:
                return 0;
        }
        return ret;
}

struct attr_iter *
navit_attr_iter_new(void)
{
        return g_new0(struct attr_iter, 1);
}

void
navit_attr_iter_destroy(struct attr_iter *iter)
{
        g_free(iter);
}

void
navit_add_callback(struct navit *this_, struct callback *cb)
{
        //dbg(0,"EEnter\n");

        callback_list_add(this_->attr_cbl, cb);
}

void
navit_remove_callback(struct navit *this_, struct callback *cb)
{
        //dbg(0,"EEnter\n");

        callback_list_remove(this_->attr_cbl, cb);
}

/**
 * Toggle the cursor update : refresh the map each time the cursor has moved (instead of only when it reaches a border)
 *
 * @param navit The navit instance
 * @returns nothing
 */

static void
navit_vehicle_draw(struct navit *this_, struct navit_vehicle *nv, struct point *pnt)
{
        //dbg(0,"EEnter\n");

        struct point cursor_pnt;
        enum projection pro;

        if (this_->blocked)
                return;
        if (pnt)
        {
                cursor_pnt=*pnt;
        }
        else
        {
                pro=transform_get_projection(this_->trans_cursor);
                if (!pro)
                        return;
                transform(this_->trans_cursor, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
        }
        //dbg(0,"xx=%d\n",cursor_pnt.x);
        //dbg(0,"yy=%d\n",cursor_pnt.y);

        global_vehicle_pos_onscreen.x=cursor_pnt.x;
        global_vehicle_pos_onscreen.y=cursor_pnt.y;


        //dbg(0,"xx=%d\n",pnt->x);
        //dbg(0,"yy=%d\n",pnt->y);
        //dbg(0,"vehicle_draw_001\n");
        vehicle_draw(nv->vehicle, this_->gra, &cursor_pnt, pnt ? 0:1, nv->dir-transform_get_yaw(this_->trans_cursor), nv->speed);
#if 0   
        if (pnt)
                pnt2=*pnt;
        else {
                pro=transform_get_projection(this_->trans);
                transform(this_->trans, pro, &nv->coord, &pnt2, 1);
        }
#if 1
        cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, pnt == NULL);
#else
        cursor_draw(nv->cursor, &pnt2, nv->dir-transform_get_angle(this_->trans, 0), nv->speed > 2, 1);
#endif
#endif
}

static void
navit_vehicle_update(struct navit *this_, struct navit_vehicle *nv)
{
        // dbg(0,"EEnter\n");

        struct attr attr_valid, attr_dir, attr_speed, attr_pos;
        struct pcoord cursor_pc;
        struct point cursor_pnt, *pnt=&cursor_pnt;
        struct tracking *tracking=NULL;
        struct pcoord pc[16];
        enum projection pro=transform_get_projection(this_->trans_cursor);
        int count;
        int (*get_attr)(void *, enum attr_type, struct attr *, struct attr_iter *);
        void *attr_object;
        char *destination_file;

        // dbg(0,"navit_vehicle_update_001 %d\n",pro);
        //profile(0,NULL);
        if (this_->ready != 3) {
                //profile(0,"return 1\n");
                return;
        }
        navit_layout_switch(this_);
        if (this_->vehicle == nv && this_->tracking_flag)
                tracking=this_->tracking;
        if (tracking) {
                tracking_update(tracking, nv->vehicle, this_->vehicleprofile, pro);
                attr_object=tracking;
                get_attr=(int (*)(void *, enum attr_type, struct attr *, struct attr_iter *))tracking_get_attr;
        } else {
                attr_object=nv->vehicle;
                get_attr=(int (*)(void *, enum attr_type, struct attr *, struct attr_iter *))vehicle_get_attr;
        }
        if (get_attr(attr_object, attr_position_valid, &attr_valid, NULL))
                if (!attr_valid.u.num != attr_position_valid_invalid)
                        return;
        if (! get_attr(attr_object, attr_position_direction, &attr_dir, NULL) ||
            ! get_attr(attr_object, attr_position_speed, &attr_speed, NULL) ||
            ! get_attr(attr_object, attr_position_coord_geo, &attr_pos, NULL)) {
                // profile(0,"return 2\n");
                return;
        }
        nv->dir=*attr_dir.u.numd;
        nv->speed=*attr_speed.u.numd;
        transform_from_geo(pro, attr_pos.u.coord_geo, &nv->coord);
        if (nv != this_->vehicle)
        {
                //dbg(0,"---> 2 x=%d\n", nv->coord.x);
                //dbg(0,"---> 2 y=%d\n", nv->coord.y);
                // dbg(0,"vehicle_draw_002\n");
                navit_vehicle_draw(this_, nv, NULL);
                // profile(0,"return 3\n");
                return;
        }
        cursor_pc.x = nv->coord.x;
        cursor_pc.y = nv->coord.y;
        cursor_pc.pro = pro;
        if (this_->route) {
                if (tracking)
                        route_set_position_from_tracking(this_->route, tracking, pro);
                else
                        route_set_position(this_->route, &cursor_pc);
        }
        callback_list_call_attr_0(this_->attr_cbl, attr_position);
        navit_textfile_debug_log(this_, "type=trackpoint_tracked");
        if (this_->gui && nv->speed > MYSTERY_SPEED)
                navit_disable_suspend();
        transform(this_->trans_cursor, pro, &nv->coord, &cursor_pnt, 1, 0, 0, NULL);
        if (this_->button_pressed != 1 && this_->follow_cursor && nv->follow_curr <= nv->follow && 
                (nv->follow_curr == 1 || !transform_within_border(this_->trans_cursor, &cursor_pnt, this_->border)))
        {
                navit_set_center_cursor_draw(this_);
                //dbg(0,"---> xxCENTER\n");
                //dbg(0,"---> 3 x=%d\n", nv->coord.x);
                //dbg(0,"---> 3 y=%d\n", nv->coord.y);

                //dbg(0,"---> 4 x=%d\n", cursor_pnt.x);
                //dbg(0,"---> 4 y=%d\n", cursor_pnt.y);

                //global_vehicle_pos_onscreen.x=cursor_pnt.x;
                //global_vehicle_pos_onscreen.y=cursor_pnt.y;

        }
        else
        {
                //dbg(0,"vehicle_draw_003\n");
                navit_vehicle_draw(this_, nv, pnt);
                //global_vehicle_pos_onscreen.x=pnt->x;
                //global_vehicle_pos_onscreen.y=pnt->y;
                //dbg(0,"---> x=%d\n", pnt->x);
                //dbg(0,"---> y=%d\n", pnt->y);
        }

        if (nv->follow_curr > 1)
                nv->follow_curr--;
        else
                nv->follow_curr=nv->follow;
        callback_list_call_attr_2(this_->attr_cbl, attr_position_coord_geo, this_, nv->vehicle);

        /* Finally, if we reached our destination, stop navigation. */
        if (this_->route) {
                switch(route_destination_reached(this_->route)) {
                case 1:
                        route_remove_waypoint(this_->route);
                        count=route_get_destinations(this_->route, pc, 16);
                        destination_file = bookmarks_get_destination_file(TRUE);
                        bookmarks_append_coord(this_->bookmarks, destination_file, pc, count, "former_itinerary_part", NULL, NULL, this_->recentdest_count);
#ifdef HAVE_API_ANDROID
                        // waypoint reached
                        android_return_generic_int(5, 1);
#endif
                        break;  
                case 2:
                        navit_set_destination(this_, NULL, NULL, 0);
                        // ** inform java that we reached our destination **
#ifdef HAVE_API_ANDROID
                        android_return_generic_int(4, 1);
#endif
                        break;
                }
        }
        //profile(0,"return 5\n");
        // dbg(0,"navit_vehicle_update_999\n");
}

/**
 * Set the position of the vehicle
 *
 * @param navit The navit instance
 * @param c The coordinate to set as position
 * @returns nothing
 */

void
navit_set_position(struct navit *this_, struct pcoord *c)
{
        //dbg(0,"EEnter\n");

        if (this_->route) {
                route_set_position(this_->route, c);
                callback_list_call_attr_0(this_->attr_cbl, attr_position);
        }
        if (this_->ready == 3)
                navit_draw(this_);
}

static int
navit_set_vehicleprofile(struct navit *this_, char *name)
{
        //dbg(0,"EEnter\n");

        struct attr attr;
        GList *l;
        l=this_->vehicleprofiles;
        while (l) {
                if (vehicleprofile_get_attr(l->data, attr_name, &attr, NULL)) {
                        if (!strcmp(attr.u.str, name)) {
                                this_->vehicleprofile=l->data;
                                if (this_->route)
                                        route_set_profile(this_->route, this_->vehicleprofile);
                                return 1;
                        }
                }
                l=g_list_next(l);
        }
        return 0;
}

static void
navit_set_vehicle(struct navit *this_, struct navit_vehicle *nv)
{
        //dbg(0,"EEnter\n");

        struct attr attr;
        this_->vehicle=nv;
        if (nv && vehicle_get_attr(nv->vehicle, attr_profilename, &attr, NULL)) {
                if (navit_set_vehicleprofile(this_, attr.u.str))
                        return;
        }
        if (!navit_set_vehicleprofile(this_,"car")) {
                /* We do not have a fallback "car" profile
                * so lets set any profile */
                GList *l;
                l=this_->vehicleprofiles;
                if (l) {
                    this_->vehicleprofile=l->data;
                    if (this_->route)
                        route_set_profile(this_->route, this_->vehicleprofile);
                }
        }
}

/**
 * Register a new vehicle
 *
 * @param navit The navit instance
 * @param v The vehicle instance
 * @returns 1 for success
 */
static int
navit_add_vehicle(struct navit *this_, struct vehicle *v)
{
        //dbg(0,"EEnter\n");

        struct navit_vehicle *nv=g_new0(struct navit_vehicle, 1);
        struct attr follow, active, animate;
        nv->vehicle=v;
        nv->follow=0;
        nv->last.x = 0;
        nv->last.y = 0;
        nv->animate_cursor=0;
        if ((vehicle_get_attr(v, attr_follow, &follow, NULL)))
                nv->follow=follow.u.num;
        nv->follow_curr=nv->follow;
        this_->vehicles=g_list_append(this_->vehicles, nv);
        if ((vehicle_get_attr(v, attr_active, &active, NULL)) && active.u.num)
                navit_set_vehicle(this_, nv);
        if ((vehicle_get_attr(v, attr_animate, &animate, NULL)))
                nv->animate_cursor=animate.u.num;
        nv->callback.type=attr_callback;
        nv->callback.u.callback=callback_new_attr_2(callback_cast(navit_vehicle_update), attr_position_coord_geo, this_, nv);
        vehicle_add_attr(nv->vehicle, &nv->callback);
        vehicle_set_attr(nv->vehicle, &this_->self);
        return 1;
}


struct gui *
navit_get_gui(struct navit *this_)
{
        return this_->gui;
}

struct transformation *
navit_get_trans(struct navit *this_)
{
        return this_->trans;
}

struct route *
navit_get_route(struct navit *this_)
{
        return this_->route;
}

struct navigation *
navit_get_navigation(struct navit *this_)
{
        return this_->navigation;
}

struct displaylist *
navit_get_displaylist(struct navit *this_)
{
        return this_->displaylist;
}

void
navit_layout_switch(struct navit *n) 
{
        //dbg(0,"EEnter\n");

    int currTs=0;
    struct attr iso8601_attr,geo_attr,valid_attr,layout_attr;
    double trise,tset,trise_actual;
    struct layout *l;
    int year, month, day;
    
    if (navit_get_attr(n,attr_layout,&layout_attr,NULL)!=1) {
        return; //No layout - nothing to switch
    }
    if (!n->vehicle)
        return;
    l=layout_attr.u.layout;
    
    if (l->dayname || l->nightname) {
        //Ok, we know that we have profile to switch
        
        //Check that we aren't calculating too fast
        if (vehicle_get_attr(n->vehicle->vehicle, attr_position_time_iso8601,&iso8601_attr,NULL)==1) {
                currTs=iso8601_to_secs(iso8601_attr.u.str);
                dbg(1,"currTs: %u:%u\n",currTs%86400/3600,((currTs%86400)%3600)/60);
        }
        if (currTs-(n->prevTs)<60) {
            //We've have to wait a little
            return;
        }
        if (sscanf(iso8601_attr.u.str,"%d-%02d-%02dT",&year,&month,&day) != 3)
                return;
        if (vehicle_get_attr(n->vehicle->vehicle, attr_position_valid, &valid_attr,NULL) && valid_attr.u.num==attr_position_valid_invalid) {
                return; //No valid fix yet
        }
        if (vehicle_get_attr(n->vehicle->vehicle, attr_position_coord_geo,&geo_attr,NULL)!=1) {
                //No position - no sun
                return;
        }
        
        //We calculate sunrise anyway, cause it is needed both for day and for night
        if (__sunriset__(year,month,day,geo_attr.u.coord_geo->lng,geo_attr.u.coord_geo->lat,-5,1,&trise,&tset)!=0) {
                //near the pole sun never rises/sets, so we should never switch profiles
                dbg(1,"trise: %u:%u, sun never visible, never switch profile\n",HOURS(trise),MINUTES(trise));
                n->prevTs=currTs;
                return;
            }
        
        trise_actual=trise;
        dbg(1,"trise: %u:%u\n",HOURS(trise),MINUTES(trise));
        if (l->dayname) {
        
            if ((HOURS(trise)*60+MINUTES(trise)==(currTs%86400)/60) || 
                    (n->prevTs==0 && ((HOURS(trise)*60+MINUTES(trise)<(currTs%86400)/60)))) {
                //The sun is rising now!
                if (strcmp(l->name,l->dayname)) {
                    navit_set_layout_by_name(n,l->dayname);
                }
            }
        }
        if (l->nightname) {
            if (__sunriset__(year,month,day,geo_attr.u.coord_geo->lng,geo_attr.u.coord_geo->lat,-5,1,&trise,&tset)!=0) {
                //near the pole sun never rises/sets, so we should never switch profiles
                dbg(1,"tset: %u:%u, sun always visible, never switch profile\n",HOURS(tset),MINUTES(tset));
                n->prevTs=currTs;
                return;
            }
            dbg(1,"tset: %u:%u\n",HOURS(tset),MINUTES(tset));
            if (HOURS(tset)*60+MINUTES(tset)==((currTs%86400)/60)
                || (n->prevTs==0 && (((HOURS(tset)*60+MINUTES(tset)<(currTs%86400)/60)) || 
                        ((HOURS(trise_actual)*60+MINUTES(trise_actual)>(currTs%86400)/60))))) {
                //Time to sleep
                if (strcmp(l->name,l->nightname)) {
                    navit_set_layout_by_name(n,l->nightname);
                }
            }   
        }
        
        n->prevTs=currTs;
    }
}

int 
navit_set_vehicle_by_name(struct navit *n,const char *name) 
{
        //dbg(0,"EEnter\n");

    struct vehicle *v;
    struct attr_iter *iter;
    struct attr vehicle_attr, name_attr;

        iter=navit_attr_iter_new();

    while (navit_get_attr(n,attr_vehicle,&vehicle_attr,iter)) {
                v=vehicle_attr.u.vehicle;
                vehicle_get_attr(v,attr_name,&name_attr,NULL);
                if (name_attr.type==attr_name) {
                        if (!strcmp(name,name_attr.u.str)) {
                                navit_set_attr(n,&vehicle_attr);                            
                                navit_attr_iter_destroy(iter);
                                return 1;
                        }
                }
        }
    navit_attr_iter_destroy(iter);
    return 0;
}

int 
navit_set_layout_by_name(struct navit *n,const char *name) 
{
        //dbg(0,"EEnter\n");

    struct layout *l;
    struct attr_iter iter;
    struct attr layout_attr;

    iter.u.list=0x00;

    if (navit_get_attr(n,attr_layout,&layout_attr,&iter)!=1) {
        return 0; //No layouts - nothing to do
    }
    if (iter.u.list==NULL) {
        return 0;
    }
    
    iter.u.list=g_list_first(iter.u.list);
    
    while(iter.u.list) {
        l=(struct layout*)iter.u.list->data;
        if (!strcmp(name,l->name)) {
            layout_attr.u.layout=l;
            layout_attr.type=attr_layout;
            navit_set_attr(n,&layout_attr);
            iter.u.list=g_list_first(iter.u.list);
            return 1;
        }
        iter.u.list=g_list_next(iter.u.list);
    }

    iter.u.list=g_list_first(iter.u.list);
    return 0;
}

void
navit_disable_suspend() {
        //dbg(0,"EEnter\n");

        gui_disable_suspend(global_navit->gui);
        callback_list_call_attr_0(global_navit->attr_cbl,attr_unsuspend);
}

int
navit_block(struct navit *this_, int block)
{
        //dbg(0,"EEnter\n");

        if (block > 0) {
                this_->blocked |= 1;
                if (graphics_draw_cancel(this_->gra, this_->displaylist))
                        this_->blocked |= 2;
                return 0;
        }
        if ((this_->blocked & 2) || block < 0) {
                this_->blocked=0;
                navit_draw(this_);
                return 1;
        }
        this_->blocked=0;
        return 0;
}

void
navit_destroy(struct navit *this_)
{
        //dbg(0,"EEnter\n");

        struct mapset*ms;
        callback_list_call_attr_1(this_->attr_cbl, attr_destroy, this_);

        // dbg(0,"enter");

        /* TODO: destroy objects contained in this_ */
        if (this_->vehicle)
                vehicle_destroy(this_->vehicle->vehicle);
        if (this_->bookmarks)
        {
                dbg(0,"save position to file");
                char *center_file = bookmarks_get_center_file(TRUE);
                bookmarks_write_center_to_file(this_->bookmarks, center_file);
                g_free(center_file);
                bookmarks_destroy(this_->bookmarks);
        }
        callback_destroy(this_->nav_speech_cb);
        callback_destroy(this_->roadbook_callback);
        callback_destroy(this_->popup_callback);
        callback_destroy(this_->motion_timeout_callback);
        callback_destroy(this_->progress_cb);
        if(this_->gra)
          graphics_remove_callback(this_->gra, this_->resize_callback);
        callback_destroy(this_->resize_callback);
        if(this_->gra)
          graphics_remove_callback(this_->gra, this_->button_callback);
        callback_destroy(this_->button_callback);
        if(this_->gra)
          graphics_remove_callback(this_->gra, this_->motion_callback);
        callback_destroy(this_->motion_callback);
        if(this_->gra)
          graphics_remove_callback(this_->gra, this_->predraw_callback);
        callback_destroy(this_->predraw_callback);
        route_destroy(this_->route);
        ms = navit_get_mapset(this_);
        if(ms)
                mapset_destroy(ms);
        graphics_free(this_->gra);
        g_free(this_);
}

/** @} */