From: Bluezery <ohpowel@gmail.com>
[framework/uifw/elementary.git] / src / lib / elm_map.c
1 #ifdef HAVE_CONFIG_H
2 # include "elementary_config.h"
3 #endif
4
5 #include "Elementary.h"
6 #include "elm_priv.h"
7 #include "els_scroller.h"
8
9 #ifdef HAVE_ELEMENTARY_ECORE_CON
10
11 typedef struct _Widget_Data Widget_Data;
12 typedef struct _Pan Pan;
13 typedef struct _Grid Grid;
14 typedef struct _Grid_Item Grid_Item;
15 typedef struct _Marker_Group Marker_Group;
16 typedef struct _Event Event;
17 typedef struct _Path_Node Path_Node;
18 typedef struct _Path_Waypoint Path_Waypoint;
19 typedef struct _Url_Data Url_Data;
20 typedef struct _Route_Dump Route_Dump;
21 typedef struct _Name_Dump Name_Dump;
22 typedef struct _Track_Dump Track_Dump;
23
24 #define DEST_DIR_ZOOM_PATH "/tmp/elm_map/%d/%d/"
25 #define DEST_DIR_PATH DEST_DIR_ZOOM_PATH"%d/"
26 #define DEST_FILE_PATH "%s%d.png"
27 #define DEST_ROUTE_XML_FILE "/tmp/elm_map-route-XXXXXX"
28 #define DEST_NAME_XML_FILE "/tmp/elm_map-name-XXXXXX"
29
30 #define ROUTE_YOURS_URL "http://www.yournavigation.org/api/dev/route.php"
31 #define ROUTE_TYPE_MOTORCAR "motocar"
32 #define ROUTE_TYPE_BICYCLE "bicycle"
33 #define ROUTE_TYPE_FOOT "foot"
34 #define YOURS_DISTANCE "distance"
35 #define YOURS_DESCRIPTION "description"
36 #define YOURS_COORDINATES "coordinates"
37
38 // TODO: fix monav & ors url
39 #define ROUTE_MONAV_URL "http://"
40 #define ROUTE_ORS_URL "http:///"
41
42 #define NAME_NOMINATIM_URL "http://nominatim.openstreetmap.org"
43 #define NOMINATIM_RESULT "result"
44 #define NOMINATIM_PLACE "place"
45 #define NOMINATIM_ATTR_LON "lon"
46 #define NOMINATIM_ATTR_LAT "lat"
47
48 #define PINCH_ZOOM_MIN 0.25
49 #define PINCH_ZOOM_MAX 4.0
50 #define MAX_CONCURRENT_DOWNLOAD 10
51
52 #define GPX_NAME "name>"
53 #define GPX_COORDINATES "trkpt "
54 #define GPX_LON "lon"
55 #define GPX_LAT "lat"
56 #define GPX_ELE "ele>"
57 #define GPX_TIME "time>"
58
59 // Map sources
60 // Currently the size of a tile must be 256*256
61 // and the size of the map must be pow(2.0, z)*tile_size
62 typedef struct _Map_Sources_Tab
63 {
64    const char *name;
65    int zoom_min;
66    int zoom_max;
67    ElmMapModuleUrlFunc url_cb;
68    Elm_Map_Route_Sources route_source;
69    ElmMapModuleRouteUrlFunc route_url_cb;
70    ElmMapModuleNameUrlFunc name_url_cb;
71    ElmMapModuleGeoIntoCoordFunc geo_into_coord;
72    ElmMapModuleCoordIntoGeoFunc coord_into_geo;
73 } Map_Sources_Tab;
74
75 //Zemm min is supposed to be 0
76 static char *_mapnik_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom);
77 static char *_osmarender_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom);
78 static char *_cyclemap_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom);
79 static char *_maplint_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom);
80
81 static char *_yours_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat);
82 /*
83 static char *_monav_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat)
84 static char *_ors_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat);
85  */
86 static char *_nominatim_url_cb(Evas_Object *obj, int method, char *name, double lon, double lat);
87
88 static Map_Sources_Tab default_map_sources_tab[] =
89 {
90      {"Mapnik", 0, 18, _mapnik_url_cb, ELM_MAP_ROUTE_SOURCE_YOURS, _yours_url_cb, _nominatim_url_cb, NULL, NULL},
91      {"Osmarender", 0, 17, _osmarender_url_cb, ELM_MAP_ROUTE_SOURCE_YOURS, _yours_url_cb, _nominatim_url_cb, NULL, NULL},
92      {"CycleMap", 0, 17, _cyclemap_url_cb, ELM_MAP_ROUTE_SOURCE_YOURS, _yours_url_cb, _nominatim_url_cb, NULL, NULL},
93      {"Maplint", 12, 16, _maplint_url_cb, ELM_MAP_ROUTE_SOURCE_YOURS, _yours_url_cb, _nominatim_url_cb, NULL, NULL},
94 };
95
96 struct _Url_Data
97 {
98    Ecore_Con_Url *con_url;
99
100    FILE *fd;
101    char *fname;
102 };
103
104 struct _Elm_Map_Marker_Class
105 {
106    const char *style;
107    int zoom_displayed;
108
109    struct _Elm_Map_Marker_Class_Func {
110         ElmMapMarkerGetFunc get;
111         ElmMapMarkerDelFunc del; //if NULL the object will be destroyed with evas_object_del()
112         ElmMapMarkerIconGetFunc icon_get;
113    } func;
114
115    struct { //this part is private, do not modify these values
116         Eina_Bool set : 1;
117         Evas_Coord edje_w, edje_h;
118    } priv;
119 };
120
121 struct _Elm_Map_Marker
122 {
123    Widget_Data *wd;
124    Elm_Map_Marker_Class *clas;
125    Elm_Map_Group_Class *clas_group;
126    double longitude, latitude;
127
128    Evas_Coord map_size;
129    Evas_Coord *x, *y;
130    void *data;
131    Marker_Group **groups;
132    Evas_Object *content;
133 };
134
135 struct _Elm_Map_Group_Class
136 {
137    const char *style;
138    void *data;
139    int zoom_displayed; // display the group if the zoom is >= to zoom_display
140    int zoom_grouped; // group the markers only if the zoom is <= to zoom_groups
141    Eina_Bool hide : 1;
142
143    struct {
144         ElmMapGroupIconGetFunc icon_get;
145    } func;
146
147    struct { //this part is private, do not modify these values
148         Eina_Bool set : 1;
149         Evas_Coord edje_w, edje_h;
150         Evas_Coord edje_max_w, edje_max_h;
151
152         Eina_List *objs_used;
153         Eina_List *objs_notused;
154    } priv;
155 };
156
157 struct _Marker_Group
158 {
159    Widget_Data *wd;
160    Eina_Matrixsparse_Cell *cell;
161    Elm_Map_Group_Class *clas;
162
163    Eina_List *markers;
164    long long sum_x, sum_y;
165    Evas_Coord x, y;
166    Evas_Coord w, h;
167
168    Evas_Object *obj, *bubble, *sc, *bx, *rect;
169    Eina_Bool open : 1;
170    Eina_Bool bringin : 1;
171    Eina_Bool update_nbelems : 1;
172    Eina_Bool update_resize : 1;
173    Eina_Bool update_raise : 1;
174    Eina_Bool delete_object : 1;
175 };
176
177 struct _Elm_Map_Route
178 {
179    Widget_Data *wd;
180
181    Path_Node *n;
182    Path_Waypoint *w;
183    Ecore_Con_Url *con_url;
184
185    int type;
186    int method;
187    int x, y;
188    double flon, flat, tlon, tlat;
189
190    Eina_List *nodes, *path;
191    Eina_List *waypoint;
192
193    struct {
194       int node_count;
195       int waypoint_count;
196       const char *nodes;
197       const char *waypoints;
198       double distance; /* unit : km */
199    } info;
200
201    Eina_List *handlers;
202    Url_Data ud;
203
204    struct {
205       int r;
206       int g;
207       int b;
208       int a;
209    } color;
210
211    Eina_Bool inbound : 1;
212 };
213
214 struct _Path_Node
215 {
216    Widget_Data *wd;
217
218    int idx;
219    struct {
220       double lon, lat;
221       char *address;
222    } pos;
223 };
224
225 struct _Path_Waypoint
226 {
227    Widget_Data *wd;
228
229    const char *point;
230 };
231
232 struct _Elm_Map_Name
233 {
234    Widget_Data *wd;
235
236    Ecore_Con_Url *con_url;
237    int method;
238    char *address;
239    double lon, lat;
240    Url_Data ud;
241    Ecore_Event_Handler *handler;
242 };
243
244 struct _Grid_Item
245 {
246    Widget_Data *wd;
247    Grid *g;
248    Evas_Object *img;
249    //Evas_Object *txt;
250    const char *file;
251    const char *source;
252    struct {
253         int x, y, w, h;
254    } src, out;
255
256    Ecore_File_Download_Job *job;
257    int try_num;
258 };
259
260 struct _Grid
261 {
262    Widget_Data *wd;
263    int tsize; // size of tile (tsize x tsize pixels)
264    int zoom; // zoom level tiles want for optimal display (1, 2, 4, 8)
265    int iw, ih; // size of image in pixels
266    int w, h; // size of grid image in pixels (represented by grid)
267    int gw, gh; // size of grid in tiles
268    Eina_Matrixsparse *grid;
269 };
270
271 struct _Widget_Data
272 {
273    Evas_Object *obj;
274    Evas_Object *scr;
275    Evas_Object *pan_smart;
276    Evas_Object *rect;
277    Evas_Object *sep_maps_markers; //map objects are below this object and marker objects are on top
278    Pan *pan;
279    Evas_Coord pan_x, pan_y, minw, minh;
280
281    int id;
282    int zoom;
283    int zoom_method;
284    Elm_Map_Zoom_Mode mode;
285
286    Ecore_Job *calc_job;
287    Ecore_Timer *scr_timer;
288    Ecore_Timer *long_timer;
289    Ecore_Animator *zoom_animator;
290    double t;
291    struct {
292         int w, h;
293         int ow, oh, nw, nh;
294         struct {
295              double x, y;
296         } spos;
297    } size;
298    struct {
299         Eina_Bool show : 1;
300         Evas_Coord x, y ,w ,h;
301    } show;
302    int tsize;
303    int nosmooth;
304    Eina_List *grids;
305    Eina_Bool resized : 1;
306    Eina_Bool on_hold : 1;
307    Eina_Bool paused : 1;
308    Eina_Bool paused_markers : 1;
309
310    struct {
311         Eina_Bool enabled;
312         double lon, lat;
313    } center_on;
314
315    Ecore_Job *markers_place_job;
316    Eina_Matrixsparse **markers;
317    Eina_List *cells_displayed; // list of Eina_Matrixsparse_Cell
318    Evas_Coord markers_max_num;
319    int marker_max_w, marker_max_h;
320    int marker_zoom;
321    Eina_List *opened_bubbles; //opened bubbles, list of Map_Group *
322
323    Eina_List *groups_clas; // list of Elm_Map_Group_Class*
324    Eina_List *markers_clas; // list of Elm_Map_Markers_Class*
325
326    Elm_Map_Route_Sources route_source;
327    Eina_List *s_event_list;
328    int try_num;
329    int finish_num;
330
331    Eina_Hash *ua;
332    const char *user_agent;
333    Eina_List *route;
334    Eina_List *track;
335    Evas_Event_Mouse_Down ev;
336    Eina_List *names;
337    int multi_count;
338
339    struct {
340         Evas_Coord cx, cy;
341         double level, diff;
342         Eina_Bool doing : 1;
343    } pinch;
344
345    struct {
346         Evas_Coord cx, cy;
347         double a, d;
348         Eina_Bool doing : 1;
349    } rotate;
350
351    struct {
352         Evas_Coord cx, cy;
353         double level;
354    } pinch_zoom;
355    double wheel_zoom;
356    Ecore_Timer *wheel_timer;
357    Eina_Bool wheel_disabled : 1;
358
359    Eina_Array *modules;
360    Eina_List *map_sources_tab;
361    const char **source_names;
362    Evas_Map *map;
363    Ecore_Timer *zoom_timer;
364    Map_Sources_Tab *src;
365    const char *gpx_file;
366    int zoom_min, zoom_max;
367    Eina_List *download_list;
368    int download_num;
369 };
370
371 struct _Pan
372 {
373    Evas_Object_Smart_Clipped_Data __clipped_data;
374    Widget_Data *wd;
375 };
376
377 struct _Event
378 {
379    int device;
380
381    struct {
382         Evas_Coord x, y;
383    } start;
384
385    struct {
386         Evas_Coord x, y;
387    } prev;
388
389    Evas_Coord x, y, w, h;
390
391    Evas_Object *object;
392    Ecore_Timer *hold_timer;
393
394    int pinch_start_dis;
395    int pinch_dis;
396 };
397
398 struct _Route_Dump
399 {
400    int id;
401    char *fname;
402    double distance;
403    char *description;
404    char *coordinates;
405 };
406
407 enum _Route_Xml_Attribute
408 {
409    ROUTE_XML_NONE,
410    ROUTE_XML_DISTANCE,
411    ROUTE_XML_DESCRIPTION,
412    ROUTE_XML_COORDINATES,
413    ROUTE_XML_LAST
414 } Route_Xml_Attibute;
415
416 struct _Name_Dump
417 {
418    int id;
419    char *address;
420    double lon;
421    double lat;
422 };
423
424 enum _Name_Xml_Attribute
425 {
426    NAME_XML_NONE,
427    NAME_XML_NAME,
428    NAME_XML_LON,
429    NAME_XML_LAT,
430    NAME_XML_LAST
431 } Name_Xml_Attibute;
432
433 enum _Zoom_Method
434 {
435    ZOOM_METHOD_NONE,
436    ZOOM_METHOD_IN,
437    ZOOM_METHOD_OUT,
438    ZOOM_METHOD_LAST
439 } Zoom_Mode;
440
441 enum _Track_Xml_Attribute
442 {
443    TRACK_XML_NONE,
444    TRACK_XML_COORDINATES,
445    TRACK_XML_LAST
446 } Track_Xml_Attibute;
447
448
449 static const char *widtype = NULL;
450
451 static const char SIG_CHANGED[] = "changed";
452 static const char SIG_CLICKED[] = "clicked";
453 static const char SIG_CLICKED_DOUBLE[] = "clicked,double";
454 static const char SIG_LOADED_DETAIL[] = "loaded,detail";
455 static const char SIG_LOAD_DETAIL[] = "load,detail";
456 static const char SIG_LONGPRESSED[] = "longpressed";
457 static const char SIG_PRESS[] = "press";
458 static const char SIG_SCROLL[] = "scroll";
459 static const char SIG_SCROLL_DRAG_START[] = "scroll,drag,start";
460 static const char SIG_SCROLL_DRAG_STOP[] = "scroll,drag,stop";
461 static const char SIG_ZOOM_CHANGE[] = "zoom,change";
462 static const char SIG_ZOOM_START[] = "zoom,start";
463 static const char SIG_ZOOM_STOP[] = "zoom,stop";
464 static const char SIG_DOWNLOADED[] = "downloaded";
465 static const char SIG_ROUTE_LOAD[] = "route,load";
466 static const char SIG_ROUTE_LOADED[] = "route,loaded";
467 static const char SIG_NAME_LOAD[] = "name,load";
468 static const char SIG_NAME_LOADED[] = "name,loaded";
469 static const Evas_Smart_Cb_Description _signals[] = {
470        {SIG_CHANGED, ""},
471        {SIG_CLICKED, ""},
472        {SIG_CLICKED_DOUBLE, ""},
473        {SIG_LOADED_DETAIL, ""},
474        {SIG_LOAD_DETAIL, ""},
475        {SIG_LONGPRESSED, ""},
476        {SIG_PRESS, ""},
477        {SIG_SCROLL, ""},
478        {SIG_SCROLL_DRAG_START, ""},
479        {SIG_SCROLL_DRAG_STOP, ""},
480        {SIG_ZOOM_CHANGE, ""},
481        {SIG_ZOOM_START, ""},
482        {SIG_ZOOM_STOP, ""},
483        {SIG_DOWNLOADED, ""},
484        {SIG_ROUTE_LOAD, ""},
485        {SIG_ROUTE_LOADED, ""},
486        {SIG_NAME_LOAD, ""},
487        {SIG_NAME_LOADED, ""},
488        {NULL, NULL}
489 };
490
491 static void _pan_calculate(Evas_Object *obj);
492
493 static Eina_Bool _hold_timer_cb(void *data);
494 static Eina_Bool _wheel_timer_cb(void *data);
495 static void _rect_resize_cb(void *data, Evas *e, Evas_Object *obj, void *event_info);
496 static void _del_hook(Evas_Object *obj);
497 static void _theme_hook(Evas_Object *obj);
498 static void _on_focus_hook(void *data, Evas_Object *obj);
499 static void _sizing_eval(Evas_Object *obj);
500 static void _calc_job(void *data);
501 static Eina_Bool _event_hook(Evas_Object *obj, Evas_Object *src,
502                              Evas_Callback_Type type, void *event_info);
503 static void grid_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh);
504 static void grid_clear(Evas_Object *obj, Grid *g);
505 static Grid *grid_create(Evas_Object *obj);
506 static void grid_load(Evas_Object *obj, Grid *g);
507
508 static void _process_download_list(Evas_Object *obj);
509 static void _add_download_list(Evas_Object *obj, Grid_Item *gi);
510
511 static void _group_object_create(Marker_Group *group);
512 static void _group_object_free(Marker_Group *group);
513 static void _group_open_cb(void *data, Evas_Object *obj, const char *emission, const char *soure);
514 static void _group_bringin_cb(void *data, Evas_Object *obj, const char *emission, const char *soure);
515 static void _group_bubble_create(Marker_Group *group);
516 static void _group_bubble_free(Marker_Group *group);
517 static void _group_bubble_place(Marker_Group *group);
518
519 static int _group_bubble_content_update(Marker_Group *group);
520 static void _group_bubble_content_free(Marker_Group *group);
521 static void marker_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh);
522 static void _bubble_sc_hints_changed_cb(void *data, Evas *e, Evas_Object *obj, void *event_info);
523
524 static void _mouse_down(void *data, Evas *evas, Evas_Object *obj, void *event_info);
525 static void _mouse_up(void *data, Evas *evas, Evas_Object *obj, void *event_info);
526 static void _mouse_move(void *data, Evas *evas, Evas_Object *obj, void *event_info);
527
528 static void _mouse_multi_down(void *data, Evas *evas, Evas_Object *obj, void *event_info);
529 static void _mouse_multi_up(void *data, Evas *evas, Evas_Object *obj, void *event_info);
530 static void _mouse_multi_move(void *data, Evas *evas, Evas_Object *obj, void *event_info);
531
532 static void route_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh);
533 static void track_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh);
534
535 static int
536 get_multi_device(Evas_Object *obj)
537 {
538    Widget_Data *wd = elm_widget_data_get(obj);
539    Eina_List *l;
540    Event *ev;
541
542    EINA_LIST_FOREACH(wd->s_event_list, l, ev)
543      {
544         if (ev->device) return ev->device;
545      }
546    return 0;
547 }
548
549 static Event *
550 create_event_object(void *data, Evas_Object *obj, int device)
551 {
552    Widget_Data *wd = elm_widget_data_get(data);
553    Event *ev = calloc(1, sizeof(Event));
554
555    EINA_SAFETY_ON_NULL_RETURN_VAL(ev, NULL);
556
557    ev->object = obj;
558    ev->device = device;
559    evas_object_geometry_get(obj, &ev->x, &ev->y, &ev->w, &ev->h);
560    wd->s_event_list = eina_list_append(wd->s_event_list, ev);
561    return ev;
562 }
563
564 static Event*
565 get_event_object(void *data, int device)
566 {
567    Widget_Data *wd = elm_widget_data_get(data);
568    Eina_List *l;
569    Event *ev;
570
571    EINA_LIST_FOREACH(wd->s_event_list, l, ev)
572      {
573         if (ev->device == device) break;
574         ev = NULL;
575      }
576    return ev;
577 }
578
579 static void
580 destroy_event_object(void *data, Event *ev)
581 {
582    Widget_Data *wd = elm_widget_data_get(data);
583    EINA_SAFETY_ON_NULL_RETURN(ev);
584    ev->pinch_dis = 0;
585    wd->s_event_list = eina_list_remove(wd->s_event_list, ev);
586    if (ev->hold_timer)
587      {
588         ecore_timer_del(ev->hold_timer);
589         ev->hold_timer = NULL;
590      }
591    free(ev);
592 }
593
594 static Eina_Bool
595 module_list_cb(Eina_Module *m, void *data)
596 {
597    ELM_CHECK_WIDTYPE(data, widtype) EINA_FALSE;
598    Widget_Data *wd = elm_widget_data_get(data);
599    Map_Sources_Tab *s;
600    ElmMapModuleSourceFunc source;
601    ElmMapModuleZoomMinFunc zoom_min;
602    ElmMapModuleZoomMaxFunc zoom_max;
603    ElmMapModuleUrlFunc url;
604    ElmMapModuleRouteSourceFunc route_source;
605    ElmMapModuleRouteUrlFunc route_url;
606    ElmMapModuleNameUrlFunc name_url;
607    ElmMapModuleGeoIntoCoordFunc geo_into_coord;
608    ElmMapModuleCoordIntoGeoFunc coord_into_geo;
609    const char *file;
610
611    if (!wd) return EINA_FALSE;
612
613    file = eina_module_file_get(m);
614    if (!eina_module_load(m))
615      {
616         ERR("could not load module \"%s\": %s", file, eina_error_msg_get(eina_error_get()));
617         return EINA_FALSE;
618      }
619
620    source = eina_module_symbol_get(m, "map_module_source_get");
621    zoom_min = eina_module_symbol_get(m, "map_module_zoom_min_get");
622    zoom_max = eina_module_symbol_get(m, "map_module_zoom_max_get");
623    url = eina_module_symbol_get(m, "map_module_url_get");
624    route_source = eina_module_symbol_get(m, "map_module_route_source_get");
625    route_url = eina_module_symbol_get(m, "map_module_route_url_get");
626    name_url = eina_module_symbol_get(m, "map_module_name_url_get");
627    geo_into_coord = eina_module_symbol_get(m, "map_module_geo_into_coord");
628    coord_into_geo = eina_module_symbol_get(m, "map_module_coord_into_geo");
629    if ((!source) || (!zoom_min) || (!zoom_max) || (!url) || (!route_source) || (!route_url) || (!name_url) || (!geo_into_coord) || (!coord_into_geo))
630      {
631         ERR("could not find map_module_source_get() in module \"%s\": %s", file, eina_error_msg_get(eina_error_get()));
632         eina_module_unload(m);
633         return EINA_FALSE;
634      }
635    s = calloc(1, sizeof(Map_Sources_Tab));
636    EINA_SAFETY_ON_NULL_RETURN_VAL(s, EINA_FALSE);
637    s->name = source();
638    s->zoom_min = zoom_min();
639    s->zoom_max = zoom_max();
640    s->url_cb = url;
641    s->route_source = route_source();
642    s->route_url_cb = route_url;
643    s->name_url_cb = name_url;
644    s->geo_into_coord = geo_into_coord;
645    s->coord_into_geo = coord_into_geo;
646    wd->map_sources_tab = eina_list_append(wd->map_sources_tab, s);
647
648    return EINA_TRUE;
649 }
650
651 static void
652 module_init(void *data)
653 {
654    ELM_CHECK_WIDTYPE(data, widtype);
655    Widget_Data *wd = elm_widget_data_get(data);
656
657    if (!wd) return;
658    wd->modules = eina_module_list_get(wd->modules, MODULES_PATH, 1, &module_list_cb, data);
659 }
660
661 static void
662 source_init(void *data)
663 {
664    ELM_CHECK_WIDTYPE(data, widtype);
665    Widget_Data *wd = elm_widget_data_get(data);
666    Map_Sources_Tab *s;
667    Eina_List *l;
668    int idx;
669
670    if (!wd) return;
671    for (idx = 0; idx < 4; idx++)
672      {
673         s = calloc(1, sizeof(Map_Sources_Tab));
674         EINA_SAFETY_ON_NULL_RETURN(s);
675         s->name = default_map_sources_tab[idx].name;
676         s->zoom_min = default_map_sources_tab[idx].zoom_min;
677         s->zoom_max = default_map_sources_tab[idx].zoom_max;
678         s->url_cb = default_map_sources_tab[idx].url_cb;
679         s->route_source = default_map_sources_tab[idx].route_source;
680         s->route_url_cb = default_map_sources_tab[idx].route_url_cb;
681         s->name_url_cb = default_map_sources_tab[idx].name_url_cb;
682         s->geo_into_coord = default_map_sources_tab[idx].geo_into_coord;
683         s->coord_into_geo = default_map_sources_tab[idx].coord_into_geo;
684         wd->map_sources_tab = eina_list_append(wd->map_sources_tab, s);
685         if (!idx) wd->src = s;
686      }
687    module_init(data);
688
689    int n = eina_list_count(wd->map_sources_tab);
690    wd->source_names = malloc(sizeof(char *) * (n + 1));
691    if (!wd->source_names)
692      {
693         ERR("init source names failed.");
694         return;
695      }
696    idx = 0;
697    EINA_LIST_FOREACH(wd->map_sources_tab, l, s)
698      {
699         wd->source_names[idx] = strdup(s->name);
700         INF("source : %s", wd->source_names[idx]);
701         if (s->zoom_min < wd->zoom_min) wd->zoom_min = s->zoom_min;
702         if (s->zoom_max > wd->zoom_max) wd->zoom_max = s->zoom_max;
703         idx++;
704      }
705    wd->source_names[idx] = NULL;
706 }
707
708 static void
709 obj_rotate_zoom(void *data, Evas_Object *obj)
710 {
711    ELM_CHECK_WIDTYPE(data, widtype);
712    Widget_Data *wd = elm_widget_data_get(data);
713    int ow, oh, iw, ih;
714    if ((!wd->pinch.cx) && (!wd->pinch.cy))
715      {
716         wd->pinch.cx = wd->rotate.cx;
717         wd->pinch.cy = wd->rotate.cy;
718      }
719
720    evas_map_util_points_populate_from_object_full(wd->map, obj, 0);
721    evas_object_image_size_get(obj, &iw, &ih);
722    evas_object_geometry_get(obj, NULL, NULL, &ow, &oh);
723    if ((ow < iw) || (oh < ih))
724      {
725         ow *= (double)iw / ow;
726         oh *= (double)ih / oh;
727         evas_map_point_image_uv_set(wd->map, 1, ow, 0);
728         evas_map_point_image_uv_set(wd->map, 2, ow, oh);
729         evas_map_point_image_uv_set(wd->map, 3, 0, oh);
730      }
731    evas_map_util_zoom(wd->map, wd->pinch.level, wd->pinch.level, wd->pinch.cx, wd->pinch.cy);
732    evas_map_util_rotate(wd->map, wd->rotate.d, wd->rotate.cx, wd->rotate.cy);
733    evas_object_map_enable_set(obj, EINA_TRUE);
734    evas_object_map_set(obj, wd->map);
735 }
736
737 static void
738 #ifdef ELM_EMAP
739 track_place(Evas_Object *obj, Grid *g __UNUSED__, Evas_Coord px, Evas_Coord py, Evas_Coord ox __UNUSED__, Evas_Coord oy __UNUSED__, Evas_Coord ow, Evas_Coord oh)
740 #else
741 track_place(Evas_Object *obj __UNUSED__, Grid *g __UNUSED__, Evas_Coord px __UNUSED__, Evas_Coord py __UNUSED__, Evas_Coord ox __UNUSED__, Evas_Coord oy __UNUSED__, Evas_Coord ow __UNUSED__, Evas_Coord oh __UNUSED__)
742 #endif
743 {
744 #ifdef ELM_EMAP
745    ELM_CHECK_WIDTYPE(obj, widtype);
746    Widget_Data *wd = elm_widget_data_get(obj);
747    Eina_List *l;
748    Evas_Object *route;
749    int xmin, xmax, ymin, ymax;
750
751    if (!wd) return;
752    Evas_Coord size = pow(2.0, wd->zoom)*wd->tsize;
753
754    EINA_LIST_FOREACH(wd->track, l, route)
755      {
756         elm_map_utils_convert_geo_into_coord(wd->obj, elm_route_lon_min_get(route), elm_route_lat_max_get(route), size, &xmin, &ymin);
757         elm_map_utils_convert_geo_into_coord(wd->obj, elm_route_lon_max_get(route), elm_route_lat_min_get(route), size, &xmax, &ymax);
758
759         if( !(xmin < px && xmax < px) && !(xmin > px+ow && xmax > px+ow))
760         {
761            if( !(ymin < py && ymax < py) && !(ymin > py+oh && ymax > py+oh))
762            {
763               //display the route
764               evas_object_move(route, xmin - px + ox, ymin - py + oy);
765               evas_object_resize(route, xmax - xmin, ymax - ymin);
766
767               evas_object_raise(route);
768               obj_rotate_zoom(obj, route);
769               evas_object_show(route);
770
771               continue;
772            }
773         }
774         //the route is not display
775         evas_object_hide(route);
776      }
777 #endif
778 }
779 static void
780 route_place(Evas_Object *obj, Grid *g __UNUSED__, Evas_Coord px, Evas_Coord py, Evas_Coord ox __UNUSED__, Evas_Coord oy __UNUSED__, Evas_Coord ow, Evas_Coord oh)
781 {
782    ELM_CHECK_WIDTYPE(obj, widtype);
783    Widget_Data *wd = elm_widget_data_get(obj);
784    Eina_List *lr, *lp, *ln;
785    Path_Node *n;
786    Evas_Object *p;
787    Elm_Map_Route *r;
788    int nodes;
789    int x, y, rx, ry;
790    double a;
791
792    if (!wd) return;
793    Evas_Coord size = pow(2.0, wd->zoom)*wd->tsize;
794
795    EINA_LIST_FOREACH(wd->route, lr, r)
796      {
797         EINA_LIST_FOREACH(r->path, lp, p)
798           {
799              evas_object_polygon_points_clear(p);
800           }
801
802         evas_object_geometry_get(wd->rect, &rx, &ry, NULL, NULL);
803         nodes = eina_list_count(r->nodes);
804
805         EINA_LIST_FOREACH(r->nodes, ln, n)
806           {
807              if ((!wd->zoom) || ((n->idx) &&
808                  ((n->idx % (int)ceil((double)nodes/(double)size*100.0))))) continue;
809              if (r->inbound)
810                {
811                   elm_map_utils_convert_geo_into_coord(wd->obj, n->pos.lon, n->pos.lat, size, &x, &y);
812                   if ((x >= px - ow) && (x <= (px + ow*2)) &&
813                       (y >= py - oh) && (y <= (py + oh*2)))
814                     {
815                        x = x - px + rx;
816                        y = y - py + ry;
817
818                        p = eina_list_nth(r->path, n->idx);
819                        a = (double)(y - r->y) / (double)(x - r->x);
820                        if ((abs(a) >= 1) || (r->x == x))
821                          {
822                             evas_object_polygon_point_add(p, r->x - 3, r->y);
823                             evas_object_polygon_point_add(p, r->x + 3, r->y);
824                             evas_object_polygon_point_add(p, x + 3, y);
825                             evas_object_polygon_point_add(p, x - 3, y);
826                          }
827                        else
828                          {
829                             evas_object_polygon_point_add(p, r->x, r->y - 3);
830                             evas_object_polygon_point_add(p, r->x, r->y + 3);
831                             evas_object_polygon_point_add(p, x, y + 3);
832                             evas_object_polygon_point_add(p, x, y - 3);
833                          }
834
835                        evas_object_color_set(p, r->color.r, r->color.g, r->color.b, r->color.a);
836                        evas_object_raise(p);
837                        obj_rotate_zoom(obj, p);
838                        evas_object_show(p);
839                        r->x = x;
840                        r->y = y;
841                     }
842                   else r->inbound = EINA_FALSE;
843                }
844              else
845                {
846                   elm_map_utils_convert_geo_into_coord(wd->obj, n->pos.lon, n->pos.lat, size, &x, &y);
847                   if ((x >= px - ow) && (x <= (px + ow*2)) &&
848                       (y >= py - oh) && (y <= (py + oh*2)))
849                     {
850                        r->x = x - px + rx;
851                        r->y = y - py + ry;
852                        r->inbound = EINA_TRUE;
853                     }
854                   else r->inbound = EINA_FALSE;
855                }
856           }
857           r->inbound = EINA_FALSE;
858      }
859 }
860
861 static void
862 rect_place(Evas_Object *obj, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh)
863 {
864    ELM_CHECK_WIDTYPE(obj, widtype);
865    Widget_Data *wd = elm_widget_data_get(obj);
866    Evas_Coord ax, ay, gw, gh, hh, ww;
867
868    if (!wd) return;
869    evas_object_geometry_get(wd->rect, NULL, NULL, &ww, &hh);
870
871    ax = 0;
872    ay = 0;
873    gw = wd->size.w;
874    gh = wd->size.h;
875
876    if ((ww == gw) && (hh == gh)) return;
877
878    if (ow > gw) ax = (ow - gw) / 2;
879    if (oh > gh) ay = (oh - gh) / 2;
880    evas_object_move(wd->rect,
881                     ox + 0 - px + ax,
882                     oy + 0 - py + ay);
883    evas_object_resize(wd->rect, gw, gh);
884
885    if (wd->show.show)
886      {
887         wd->show.show = EINA_FALSE;
888         elm_smart_scroller_child_region_show(wd->scr, wd->show.x, wd->show.y, wd->show.w, wd->show.h);
889      }
890 }
891
892 static void
893 marker_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh)
894 {
895    ELM_CHECK_WIDTYPE(obj, widtype);
896    Widget_Data *wd = elm_widget_data_get(obj);
897    Evas_Coord ax, ay, gw, gh, tx, ty;
898    Eina_List *l, *markers;
899    Eina_Matrixsparse_Cell *cell;
900    Marker_Group *group;
901    int xx, yy, ww, hh;
902    char buf[PATH_MAX];
903    int y, x;
904    int g_xx, g_yy, g_hh, g_ww;
905
906    if (!wd) return;
907    if (g != eina_list_data_get(wd->grids)) return;
908
909    ax = 0;
910    ay = 0;
911    gw = wd->size.w;
912    gh = wd->size.h;
913    if (ow > gw) ax = (ow - gw) / 2;
914    if (oh > gh) ay = (oh - gh) / 2;
915
916    if (wd->zoom != wd->marker_zoom)
917      {
918         EINA_LIST_FREE(wd->cells_displayed, cell)
919           {
920              EINA_LIST_FOREACH(eina_matrixsparse_cell_data_get(cell), l, group)
921                {
922                   if (group->obj) _group_object_free(group);
923                }
924           }
925      }
926    wd->marker_zoom = wd->zoom;
927
928    if ((wd->paused_markers)
929        && ((wd->size.nw != wd->size.w) || (wd->size.nh != wd->size.h)) )
930      return;
931
932    g_xx = wd->pan_x / wd->tsize;
933    if (g_xx < 0) g_xx = 0;
934    g_yy = wd->pan_y / wd->tsize;
935    if (g_yy < 0) g_yy = 0;
936    g_ww = (ow / wd->tsize) + 1;
937    if (g_xx + g_ww >= g->gw) g_ww = g->gw - g_xx - 1;
938    g_hh = (oh / wd->tsize) + 1;
939    if (g_yy + g_hh >= g->gh) g_hh = g->gh - g_yy - 1;
940
941    //hide groups no more displayed
942    EINA_LIST_FREE(wd->cells_displayed, cell)
943      {
944         eina_matrixsparse_cell_position_get(cell, (unsigned long *)&y, (unsigned long *)&x);
945         if ((y < g_yy) || (y > g_yy + g_hh) || (x < g_xx) || (x > g_xx + g_ww))
946           {
947              EINA_LIST_FOREACH(eina_matrixsparse_cell_data_get(cell), l, group)
948                {
949                   if (group->obj) _group_object_free(group);
950                }
951           }
952      }
953
954    if (!wd->marker_zoom)
955      {
956         g_ww = 0;
957         g_hh = 0;
958      }
959
960    for (y = g_yy; y <= g_yy + g_hh; y++)
961      {
962         for (x = g_xx; x <= g_xx + g_ww; x++)
963           {
964              if (!wd->markers[wd->zoom]) continue;
965              eina_matrixsparse_cell_idx_get(wd->markers[wd->zoom], y, x, &cell);
966              if (!cell) continue;
967              wd->cells_displayed = eina_list_append(wd->cells_displayed, cell);
968              markers = eina_matrixsparse_cell_data_get(cell);
969              EINA_LIST_FOREACH(markers, l, group)
970                {
971                   if (!group->markers) continue;
972                   if (group->clas->zoom_displayed > wd->zoom) continue;
973
974                   xx = group->x;
975                   yy = group->y;
976                   ww = group->w;
977                   hh = group->h;
978
979                   if (eina_list_count(group->markers) == 1)
980                     {
981                        Elm_Map_Marker *m = eina_list_data_get(group->markers);
982                        ww = m->clas->priv.edje_w;
983                        hh = m->clas->priv.edje_h;
984                     }
985
986                   if (ww <= 0) ww = 1;
987                   if (hh <= 0) hh = 1;
988
989                   if ((gw != g->w) && (g->w > 0))
990                     {
991                        tx = xx;
992                        xx = ((long long )gw * xx) / g->w;
993                        ww = (((long long)gw * (tx + ww)) / g->w) - xx;
994                     }
995                   if ((gh != g->h) && (g->h > 0))
996                     {
997                        ty = yy;
998                        yy = ((long long)gh * yy) / g->h;
999                        hh = (((long long)gh * (ty + hh)) / g->h) - yy;
1000                     }
1001
1002                   if ((!group->clas->hide)
1003                       && (xx-px+ax+ox >= ox) && (xx-px+ax+ox<= ox+ow)
1004                       && (yy-py+ay+oy >= oy) && (yy-py+ay+oy<= oy+oh))
1005                     {
1006                        if (!group->obj) _group_object_create(group);
1007
1008                        if (group->update_nbelems)
1009                          {
1010                             group->update_nbelems = EINA_FALSE;
1011                             if (eina_list_count(group->markers) > 1)
1012                               {
1013                                  snprintf(buf, sizeof(buf), "%d", eina_list_count(group->markers));
1014                                  edje_object_part_text_set(elm_layout_edje_get(group->obj), "elm.text", buf);
1015                               }
1016                             else
1017                               edje_object_part_text_set(elm_layout_edje_get(group->obj), "elm.text", "");
1018                          }
1019                        evas_object_move(group->obj,
1020                                         xx - px + ax + ox - ww/2,
1021                                         yy - py + ay + oy - hh/2);
1022                        if ((!wd->paused_markers) || (group->update_resize))
1023                          {
1024                             group->update_resize = EINA_FALSE;
1025                             evas_object_resize(group->obj, ww, hh);
1026                             obj_rotate_zoom(obj, group->obj);
1027                          }
1028                        if (group->update_raise)
1029                          {
1030                             group->update_raise = EINA_FALSE;
1031                             evas_object_raise(group->obj);
1032                             obj_rotate_zoom(obj, group->obj);
1033                             evas_object_show(group->obj);
1034                          }
1035                        if (group->bubble) _group_bubble_place(group);
1036                     }
1037                   else if (group->obj)
1038                     {
1039                        _group_object_free(group);
1040                     }
1041                }
1042           }
1043      }
1044 }
1045
1046 static void
1047 grid_place(Evas_Object *obj, Grid *g, Evas_Coord px, Evas_Coord py, Evas_Coord ox, Evas_Coord oy, Evas_Coord ow, Evas_Coord oh)
1048 {
1049    ELM_CHECK_WIDTYPE(obj, widtype);
1050    Widget_Data *wd = elm_widget_data_get(obj);
1051    Evas_Coord ax, ay, gw, gh, tx, ty;
1052    int xx, yy, ww, hh;
1053
1054    if (!wd) return;
1055    ax = 0;
1056    ay = 0;
1057    gw = wd->size.w;
1058    gh = wd->size.h;
1059    if (ow > gw) ax = (ow - gw) / 2;
1060    if (oh > gh) ay = (oh - gh) / 2;
1061
1062    Eina_Iterator *it = eina_matrixsparse_iterator_new(g->grid);
1063    Eina_Matrixsparse_Cell *cell;
1064
1065    EINA_ITERATOR_FOREACH(it, cell)
1066      {
1067         Grid_Item *gi = eina_matrixsparse_cell_data_get(cell);
1068
1069         xx = gi->out.x;
1070         yy = gi->out.y;
1071         ww = gi->out.w;
1072         hh = gi->out.h;
1073         if ((gw != g->w) && (g->w > 0))
1074           {
1075              tx = xx;
1076              xx = ((long long )gw * xx) / g->w;
1077              ww = (((long long)gw * (tx + ww)) / g->w) - xx;
1078           }
1079         if ((gh != g->h) && (g->h > 0))
1080           {
1081              ty = yy;
1082              yy = ((long long)gh * yy) / g->h;
1083              hh = (((long long)gh * (ty + hh)) / g->h) - yy;
1084           }
1085         evas_object_move(gi->img,
1086                          xx - px + ax + ox,
1087                          yy - py + ay + oy);
1088
1089         evas_object_resize(gi->img, ww, hh);
1090
1091         obj_rotate_zoom(obj, gi->img);
1092         /*evas_object_move(gi->txt,
1093                            xx - px + ax + ox,
1094                            yy - py + ay + oy);
1095
1096           evas_object_resize(gi->txt, ww, hh);
1097          */
1098      }
1099    eina_iterator_free(it);
1100 }
1101
1102 static void
1103 grid_clear(Evas_Object *obj, Grid *g)
1104 {
1105    ELM_CHECK_WIDTYPE(obj, widtype);
1106    Widget_Data *wd = elm_widget_data_get(obj);
1107    char buf[PATH_MAX];
1108
1109    if (!wd) return;
1110    if (!g->grid) return;
1111
1112    Eina_Iterator *it = eina_matrixsparse_iterator_new(g->grid);
1113    Eina_Matrixsparse_Cell *cell;
1114
1115    snprintf(buf, sizeof(buf), DEST_DIR_ZOOM_PATH, wd->id, g->zoom);
1116    ecore_file_recursive_rm(buf);
1117
1118    EINA_ITERATOR_FOREACH(it, cell)
1119      {
1120         Grid_Item *gi = eina_matrixsparse_cell_data_get(cell);
1121         evas_object_del(gi->img);
1122         //evas_object_del(gi->txt);
1123
1124         wd->download_list = eina_list_remove(wd->download_list, gi);
1125
1126         if (gi->job)
1127           {
1128              DBG("DOWNLOAD abort %s", gi->file);
1129              ecore_file_download_abort(gi->job);
1130              ecore_file_remove(gi->file);
1131              gi->job = NULL;
1132              wd->try_num--;
1133           }
1134         if (gi->file)
1135           eina_stringshare_del(gi->file);
1136         if (gi->source)
1137           eina_stringshare_del(gi->source);
1138
1139         free(gi);
1140      }
1141    eina_matrixsparse_free(g->grid);
1142    eina_iterator_free(it);
1143    g->grid = NULL;
1144    g->gw = 0;
1145    g->gh = 0;
1146 }
1147
1148 static void
1149 _tile_update(Grid_Item *gi)
1150 {
1151    evas_object_image_file_set(gi->img, gi->file, NULL);
1152    Evas_Load_Error err = evas_object_image_load_error_get(gi->img);
1153    if (err != EVAS_LOAD_ERROR_NONE)
1154      {
1155         ERR("Image loading error (%s): %s", gi->file, evas_load_error_str(err));
1156         ecore_file_remove(gi->file);
1157      }
1158    else
1159      {
1160         obj_rotate_zoom(gi->wd->obj, gi->img);
1161         evas_object_show(gi->img);
1162         //evas_object_text_text_set(gi->txt, gi->file);
1163         //evas_object_show(gi->txt);
1164      }
1165 }
1166
1167 static void
1168 _tile_downloaded(void *data, const char *file __UNUSED__, int status)
1169 {
1170    Grid_Item *gi = data;
1171
1172    gi->job = NULL;
1173
1174    if (status == 200)
1175      {
1176         DBG("Download success from %s to %s", gi->source, gi->file);
1177         _tile_update(gi);
1178      }
1179    else
1180      {
1181         DBG("Download failed from %s to %s (%d) ", gi->source, gi->file, status);
1182         ecore_file_remove(gi->file);
1183      }
1184
1185    gi->wd->finish_num++;
1186    gi->wd->download_num--;
1187    evas_object_smart_callback_call(gi->wd->obj, SIG_DOWNLOADED, NULL);
1188    if (!gi->wd->download_num)
1189      {
1190         edje_object_signal_emit(elm_smart_scroller_edje_object_get(gi->wd->scr), "elm,state,busy,stop", "elm");
1191         evas_object_smart_callback_call(gi->wd->obj, SIG_LOADED_DETAIL, NULL);
1192      }
1193    _process_download_list(gi->wd->obj);
1194 }
1195
1196 static void
1197 _process_download_list(Evas_Object *obj)
1198 {
1199    ELM_CHECK_WIDTYPE(obj, widtype);
1200    Widget_Data *wd = elm_widget_data_get(obj);
1201    Eina_List *l, *ll;
1202    Evas_Coord ox, oy, ow, oh, cvx, cvy, cvw, cvh, tx, ty, gw, gh, xx, yy, ww, hh;
1203    Grid_Item *gi;
1204
1205    evas_object_geometry_get(wd->pan_smart, &ox, &oy, &ow, &oh);
1206    evas_output_viewport_get(evas_object_evas_get(wd->obj), &cvx, &cvy, &cvw, &cvh);
1207
1208    gw = wd->size.w;
1209    gh = wd->size.h;
1210
1211    EINA_LIST_FOREACH_SAFE(wd->download_list, l, ll, gi)
1212      {
1213         xx = gi->out.x;
1214         yy = gi->out.y;
1215         ww = gi->out.w;
1216         hh = gi->out.h;
1217
1218         if ((gw != gi->g->w) && (gi->g->w > 0))
1219           {
1220              tx = xx;
1221              xx = ((long long )gw * xx) / gi->g->w;
1222              ww = (((long long)gw * (tx + ww)) / gi->g->w) - xx;
1223           }
1224         if ((gh != gi->g->h) && (gi->g->h > 0))
1225           {
1226              ty = yy;
1227              yy = ((long long)gh * yy) / gi->g->h;
1228              hh = (((long long)gh * (ty + hh)) / gi->g->h) - yy;
1229           }
1230         if (!ELM_RECTS_INTERSECT(xx - wd->pan_x + ox,
1231                                  yy  - wd->pan_y + oy,
1232                                  ww, hh,
1233                                  cvx, cvy, cvw, cvh))
1234           {
1235              wd->download_list = eina_list_remove(wd->download_list, gi);
1236           }
1237      }
1238
1239    EINA_LIST_REVERSE_FOREACH_SAFE(wd->download_list, l, ll, gi)
1240      {
1241         if (gi->wd->download_num >= MAX_CONCURRENT_DOWNLOAD) break;
1242
1243         Eina_Bool ret = ecore_file_download_full(gi->source, gi->file, _tile_downloaded, NULL, gi, &(gi->job), wd->ua);
1244         if (!ret || !gi->job) ERR("Can't start to download from %s to %s", gi->source, gi->file);
1245         else
1246           {
1247              gi->wd->download_num++;
1248              wd->try_num++;
1249              wd->download_list = eina_list_remove(wd->download_list, gi);
1250              if (wd->download_num == 1)
1251                edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr), "elm,state,busy,start", "elm");
1252           }
1253      }
1254 }
1255
1256 static void
1257 _add_download_list(Evas_Object *obj, Grid_Item *gi)
1258 {
1259    ELM_CHECK_WIDTYPE(obj, widtype);
1260    Widget_Data *wd = elm_widget_data_get(obj);
1261
1262    if (!eina_list_data_find(wd->download_list, gi)) wd->download_list = eina_list_append(wd->download_list, gi);
1263    _process_download_list(obj);
1264 }
1265
1266 static Grid *
1267 grid_create(Evas_Object *obj)
1268 {
1269    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
1270    Widget_Data *wd = elm_widget_data_get(obj);
1271    Grid *g;
1272
1273    if ((!wd) || (!wd->src)) return NULL;
1274    g = calloc(1, sizeof(Grid));
1275
1276    g->zoom = wd->zoom;
1277    g->tsize = wd->tsize;
1278    g->wd = wd;
1279
1280    if (g->zoom > wd->src->zoom_max) return NULL;
1281    if (g->zoom < wd->src->zoom_min) return NULL;
1282
1283    int size =  pow(2.0, wd->zoom);
1284    g->gw = size;
1285    g->gh = size;
1286
1287    g->w = g->tsize * g->gw;
1288    g->h = g->tsize * g->gh;
1289
1290    g->grid = eina_matrixsparse_new(g->gh, g->gw, NULL, NULL);
1291
1292    return g;
1293 }
1294
1295 static void
1296 grid_load(Evas_Object *obj, Grid *g)
1297 {
1298    ELM_CHECK_WIDTYPE(obj, widtype);
1299    Widget_Data *wd = elm_widget_data_get(obj);
1300    int x, y;
1301    int size;
1302    Evas_Coord ox, oy, ow, oh, cvx, cvy, cvw, cvh, tx, ty, gw, gh, xx, yy, ww, hh;
1303    Eina_Iterator *it;
1304    Eina_Matrixsparse_Cell *cell;
1305    Grid_Item *gi;
1306
1307    if ((!wd) || (!wd->src)) return;
1308    evas_object_geometry_get(wd->pan_smart, &ox, &oy, &ow, &oh);
1309    evas_output_viewport_get(evas_object_evas_get(wd->obj), &cvx, &cvy, &cvw, &cvh);
1310
1311    gw = wd->size.w;
1312    gh = wd->size.h;
1313
1314    if ((gw <= 0) || (gh <= 0)) return;
1315
1316    size = g->tsize;
1317    if ((gw != g->w) && (g->w > 0))
1318      size = ((long long)gw * size) / g->w;
1319    if (size < (g->tsize / 2)) return; // else we will load to much tiles
1320
1321    it = eina_matrixsparse_iterator_new(g->grid);
1322
1323    EINA_ITERATOR_FOREACH(it, cell)
1324      {
1325         gi = eina_matrixsparse_cell_data_get(cell);
1326
1327         xx = gi->out.x;
1328         yy = gi->out.y;
1329         ww = gi->out.w;
1330         hh = gi->out.h;
1331
1332         if ((gw != g->w) && (g->w > 0))
1333           {
1334              tx = xx;
1335              xx = ((long long )gw * xx) / g->w;
1336              ww = (((long long)gw * (tx + ww)) / g->w) - xx;
1337           }
1338         if ((gh != g->h) && (g->h > 0))
1339           {
1340              ty = yy;
1341              yy = ((long long)gh * yy) / g->h;
1342              hh = (((long long)gh * (ty + hh)) / g->h) - yy;
1343           }
1344
1345         if (!ELM_RECTS_INTERSECT(xx - wd->pan_x + ox,
1346                                  yy  - wd->pan_y + oy,
1347                                  ww, hh,
1348                                  cvx, cvy, cvw, cvh))
1349           {
1350              if (ecore_file_exists(gi->file))
1351                {
1352                   evas_object_hide(gi->img);
1353                   evas_object_image_file_set(gi->img, NULL, NULL);
1354                }
1355              else if (gi->job)
1356                {
1357                   DBG("DOWNLOAD abort %s", gi->file);
1358                   ecore_file_download_abort(gi->job);
1359                   ecore_file_remove(gi->file);
1360                   gi->job = NULL;
1361                   wd->try_num--;
1362                }
1363              //evas_object_hide(gi->txt);
1364           }
1365      }
1366    eina_iterator_free(it);
1367
1368    xx = wd->pan_x / size - 1;
1369    if (xx < 0) xx = 0;
1370
1371    yy = wd->pan_y / size - 1;
1372    if (yy < 0) yy = 0;
1373
1374    ww = ow / size + 2;
1375    if (xx + ww >= g->gw) ww = g->gw - xx - 1;
1376
1377    hh = oh / size + 2;
1378    if (yy + hh >= g->gh) hh = g->gh - yy - 1;
1379
1380    for (y = yy; y <= yy + hh; y++)
1381      {
1382         for (x = xx; x <= xx + ww; x++)
1383           {
1384              gi = eina_matrixsparse_data_idx_get(g->grid, y, x);
1385
1386              if ((!gi) && (g != eina_list_data_get(wd->grids)))
1387                continue;
1388
1389              if (!gi)
1390                {
1391                   gi = calloc(1, sizeof(Grid_Item));
1392                   gi->src.x = x * g->tsize;
1393                   gi->src.y = y * g->tsize;
1394                   gi->src.w = g->tsize;
1395                   gi->src.h = g->tsize;
1396
1397                   gi->out.x = gi->src.x;
1398                   gi->out.y = gi->src.y;
1399                   gi->out.w = gi->src.w;
1400                   gi->out.h = gi->src.h;
1401
1402                   gi->wd = wd;
1403                   gi->g = g;
1404
1405                   gi->img = evas_object_image_add(evas_object_evas_get(obj));
1406                   evas_object_image_scale_hint_set
1407                      (gi->img, EVAS_IMAGE_SCALE_HINT_DYNAMIC);
1408                   evas_object_image_filled_set(gi->img, 1);
1409
1410                   evas_object_smart_member_add(gi->img, wd->pan_smart);
1411                   elm_widget_sub_object_add(obj, gi->img);
1412                   evas_object_pass_events_set(gi->img, EINA_TRUE);
1413                   evas_object_stack_below(gi->img, wd->sep_maps_markers);
1414
1415 /*                gi->txt = evas_object_text_add(evas_object_evas_get(obj));
1416                   evas_object_text_font_set(gi->txt, "Vera", 12);
1417                   evas_object_color_set(gi->txt, 100, 100, 100, 255);
1418                   evas_object_smart_member_add(gi->txt,
1419                                                wd->pan_smart);
1420                   elm_widget_sub_object_add(obj, gi->txt);
1421                   evas_object_pass_events_set(gi->txt, EINA_TRUE);
1422 */
1423                   eina_matrixsparse_data_idx_set(g->grid, y, x, gi);
1424
1425                   gi->job = NULL;
1426                   gi->file = NULL;
1427                   gi->source = NULL;
1428                }
1429
1430              if (!gi->job)
1431                {
1432                   char buf[PATH_MAX], buf2[PATH_MAX];
1433                   char *source;
1434
1435                   snprintf(buf, sizeof(buf), DEST_DIR_PATH, wd->id, g->zoom, x);
1436                   if (!ecore_file_exists(buf))
1437                     ecore_file_mkpath(buf);
1438
1439                   snprintf(buf2, sizeof(buf2), DEST_FILE_PATH, buf, y);
1440
1441                   source = wd->src->url_cb(obj, x, y, g->zoom);
1442                   if ((!source) || (strlen(source)==0)) continue;
1443
1444                   eina_stringshare_replace(&gi->file, buf2);
1445                   eina_stringshare_replace(&gi->source, source);
1446
1447                   if ((ecore_file_exists(gi->file)) || (g == eina_list_data_get(wd->grids)))
1448                     {
1449                        if (ecore_file_exists(gi->file))
1450                          {
1451                            DBG("file exists: %s", gi->file);
1452                            _tile_update(gi);
1453                          }
1454                        else
1455                          {
1456                             DBG("added to download list: %s", gi->file);
1457                             _add_download_list(obj, gi);
1458                          }
1459                     }
1460                   if (source) free(source);
1461                }
1462           }
1463      }
1464 }
1465
1466 static void
1467 grid_clearall(Evas_Object *obj)
1468 {
1469    ELM_CHECK_WIDTYPE(obj, widtype);
1470    Widget_Data *wd = elm_widget_data_get(obj);
1471    Grid *g;
1472
1473    if (!wd) return;
1474    EINA_LIST_FREE(wd->grids, g)
1475      {
1476         grid_clear(obj, g);
1477         free(g);
1478      }
1479    wd->download_list = eina_list_free(wd->download_list);
1480 }
1481
1482 static void
1483 _smooth_update(Evas_Object *obj)
1484 {
1485    ELM_CHECK_WIDTYPE(obj, widtype);
1486    Widget_Data *wd = elm_widget_data_get(obj);
1487    Eina_List *l;
1488    Grid *g;
1489
1490    if (!wd) return;
1491    EINA_LIST_FOREACH(wd->grids, l, g)
1492      {
1493         Eina_Iterator *it = eina_matrixsparse_iterator_new(g->grid);
1494         Eina_Matrixsparse_Cell *cell;
1495
1496         EINA_ITERATOR_FOREACH(it, cell)
1497           {
1498              Grid_Item *gi = eina_matrixsparse_cell_data_get(cell);
1499              evas_object_image_smooth_scale_set(gi->img, (!wd->nosmooth));
1500           }
1501         eina_iterator_free(it);
1502      }
1503 }
1504
1505 static Eina_Bool
1506 _scr_timeout(void *data)
1507 {
1508    ELM_CHECK_WIDTYPE(data, widtype) ECORE_CALLBACK_CANCEL;
1509    Widget_Data *wd = elm_widget_data_get(data);
1510
1511    if (!wd) return ECORE_CALLBACK_CANCEL;
1512    wd->nosmooth--;
1513    if (!wd->nosmooth) _smooth_update(data);
1514    wd->scr_timer = NULL;
1515    return ECORE_CALLBACK_CANCEL;
1516 }
1517
1518 static void
1519 _scr(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
1520 {
1521    ELM_CHECK_WIDTYPE(data, widtype);
1522    Widget_Data *wd = elm_widget_data_get(data);
1523
1524    if (!wd) return;
1525    if (!wd->scr_timer)
1526      {
1527         wd->nosmooth++;
1528         if (wd->nosmooth == 1) _smooth_update(data);
1529      }
1530    if (wd->scr_timer) ecore_timer_del(wd->scr_timer);
1531    wd->scr_timer = ecore_timer_add(0.5, _scr_timeout, data);
1532 }
1533
1534 static void
1535 zoom_do(Evas_Object *obj)
1536 {
1537    ELM_CHECK_WIDTYPE(obj, widtype);
1538    Widget_Data *wd = elm_widget_data_get(obj);
1539    Evas_Coord xx, yy, ow, oh;
1540
1541    if (!wd) return;
1542    wd->size.w = wd->size.nw;
1543    wd->size.h = wd->size.nh;
1544
1545    elm_smart_scroller_child_viewport_size_get(wd->scr, &ow, &oh);
1546
1547    if (wd->center_on.enabled)
1548      {
1549         elm_map_utils_convert_geo_into_coord(obj, wd->center_on.lon, wd->center_on.lat, wd->size.w, &xx, &yy);
1550         xx -= ow / 2;
1551         yy -= oh / 2;
1552      }
1553    else
1554      {
1555         xx = (wd->size.spos.x * wd->size.w) - (ow / 2);
1556         yy = (wd->size.spos.y * wd->size.h) - (oh / 2);
1557      }
1558
1559
1560    if (xx < 0) xx = 0;
1561    else if (xx > (wd->size.w - ow)) xx = wd->size.w - ow;
1562    if (yy < 0) yy = 0;
1563    else if (yy > (wd->size.h - oh)) yy = wd->size.h - oh;
1564
1565    wd->show.show = EINA_TRUE;
1566    wd->show.x = xx;
1567    wd->show.y = yy;
1568    wd->show.w = ow;
1569    wd->show.h = oh;
1570
1571    if (wd->calc_job) ecore_job_del(wd->calc_job);
1572    wd->calc_job = ecore_job_add(_calc_job, wd);
1573 }
1574
1575 static Eina_Bool
1576 _zoom_timeout(void *data)
1577 {
1578    ELM_CHECK_WIDTYPE(data, widtype) ECORE_CALLBACK_CANCEL;
1579    Widget_Data *wd = elm_widget_data_get(data);
1580
1581    if (!wd) return ECORE_CALLBACK_CANCEL;
1582    wd->zoom_timer = NULL;
1583    wd->pinch.level = 1.0;
1584    zoom_do(data);
1585    evas_object_smart_callback_call(data, SIG_ZOOM_STOP, NULL);
1586    return ECORE_CALLBACK_CANCEL;
1587 }
1588
1589 static Eina_Bool
1590 _zoom_anim(void *data)
1591 {
1592    ELM_CHECK_WIDTYPE(data, widtype) ECORE_CALLBACK_CANCEL;
1593    Evas_Object *obj = data;
1594    Widget_Data *wd = elm_widget_data_get(obj);
1595
1596    if (!wd) return ECORE_CALLBACK_CANCEL;
1597    if (wd->zoom_method == ZOOM_METHOD_IN) wd->t += 0.1 ;
1598    else if (wd->zoom_method == ZOOM_METHOD_OUT) wd->t -= 0.05;
1599    else
1600      {
1601         wd->zoom_animator = NULL;
1602         zoom_do(obj);
1603         evas_object_smart_callback_call(data, SIG_ZOOM_STOP, NULL);
1604         return ECORE_CALLBACK_CANCEL;
1605      }
1606
1607    if (wd->t >= 2.0)
1608      {
1609         wd->zoom_animator = NULL;
1610         wd->pinch.level = 2.0;
1611         if (wd->zoom_timer) ecore_timer_del(wd->zoom_timer);
1612         wd->zoom_timer = ecore_timer_add(0.35, _zoom_timeout, obj);
1613         return ECORE_CALLBACK_CANCEL;
1614      }
1615    else if (wd->t <= 0.5)
1616      {
1617         wd->zoom_animator = NULL;
1618         wd->pinch.level = 0.5;
1619         if (wd->zoom_timer) ecore_timer_del(wd->zoom_timer);
1620         wd->zoom_timer = ecore_timer_add(1.35, _zoom_timeout, obj);
1621         return ECORE_CALLBACK_CANCEL;
1622      }
1623    else if (wd->t != 1.0)
1624      {
1625         Evas_Coord x, y, w, h;
1626         float half_w, half_h;
1627         evas_object_geometry_get(data, &x, &y, &w, &h);
1628         half_w = (float)w * 0.5;
1629         half_h = (float)h * 0.5;
1630         wd->pinch.cx = x + half_w;
1631         wd->pinch.cy = y + half_h;
1632         wd->pinch.level = wd->t;
1633         if (wd->calc_job) ecore_job_del(wd->calc_job);
1634         wd->calc_job = ecore_job_add(_calc_job, wd);
1635      }
1636    return ECORE_CALLBACK_RENEW;
1637 }
1638
1639 static Eina_Bool
1640 _long_press(void *data)
1641 {
1642    ELM_CHECK_WIDTYPE(data, widtype) ECORE_CALLBACK_CANCEL;
1643    Widget_Data *wd = elm_widget_data_get(data);
1644
1645    if (!wd) return ECORE_CALLBACK_CANCEL;
1646    wd->long_timer = NULL;
1647    evas_object_smart_callback_call(data, SIG_LONGPRESSED, &wd->ev);
1648    return ECORE_CALLBACK_CANCEL;
1649 }
1650
1651 static void
1652 _mouse_down(void *data, Evas *evas __UNUSED__, Evas_Object *obj, void *event_info)
1653 {
1654    ELM_CHECK_WIDTYPE(data, widtype);
1655    Widget_Data *wd = elm_widget_data_get(data);
1656    Evas_Event_Mouse_Down *ev = event_info;
1657    Event *ev0;
1658
1659    if (!wd) return;
1660    ev0 = get_event_object(data, 0);
1661    if (ev0) return;
1662    ev0 = create_event_object(data, obj, 0);
1663    if (!ev0) return;
1664
1665    ev0->hold_timer = NULL;
1666    ev0->prev.x = ev->canvas.x;
1667    ev0->prev.y = ev->canvas.y;
1668
1669    if (ev->button != 1) return;
1670    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) wd->on_hold = EINA_TRUE;
1671    else wd->on_hold = EINA_FALSE;
1672    if (ev->flags & EVAS_BUTTON_DOUBLE_CLICK)
1673      evas_object_smart_callback_call(data, SIG_CLICKED_DOUBLE, ev);
1674    else
1675      evas_object_smart_callback_call(data, SIG_PRESS, ev);
1676    if (wd->long_timer) ecore_timer_del(wd->long_timer);
1677    wd->ev.canvas.x = ev->output.x;
1678    wd->ev.canvas.y = ev->output.y;
1679    wd->long_timer = ecore_timer_add(_elm_config->longpress_timeout, _long_press, data);
1680 }
1681
1682 static void
1683 _mouse_move(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
1684 {
1685    Evas_Event_Mouse_Move *move = event_info;
1686    Event *ev0;
1687
1688    ev0 = get_event_object(data, 0);
1689    if (!ev0) return;
1690    ev0->prev.x = move->cur.canvas.x;
1691    ev0->prev.y = move->cur.canvas.y;
1692 }
1693
1694 static void
1695 _mouse_up(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
1696 {
1697    ELM_CHECK_WIDTYPE(data, widtype);
1698    Widget_Data *wd = elm_widget_data_get(data);
1699
1700    if (!wd) return;
1701    Evas_Event_Mouse_Up *ev = event_info;
1702    int mdevice;
1703    Event *ev0;
1704    Event *ev1;
1705
1706    ev0 = get_event_object(data, 0);
1707    if (ev0)
1708      {
1709         mdevice = get_multi_device(data);
1710         if (mdevice == 0)
1711           {
1712              if (ev0->hold_timer)
1713                {
1714                   ecore_timer_del(ev0->hold_timer);
1715                   ev0->hold_timer = NULL;
1716                }
1717              elm_smart_scroller_hold_set(wd->scr, 0);
1718              elm_smart_scroller_freeze_set(wd->scr, 0);
1719           }
1720         else
1721           {
1722              ev1 = get_event_object(data, mdevice);
1723              if (ev1)
1724                ev1->hold_timer = ecore_timer_add(0.35, _hold_timer_cb, ev1);
1725           }
1726         destroy_event_object(data, ev0);
1727      }
1728
1729    if (ev->button != 1) return;
1730    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) wd->on_hold = EINA_TRUE;
1731    else wd->on_hold = EINA_FALSE;
1732    if (wd->long_timer)
1733      {
1734         ecore_timer_del(wd->long_timer);
1735         wd->long_timer = NULL;
1736      }
1737    if (!wd->on_hold) evas_object_smart_callback_call(data, SIG_CLICKED, ev);
1738    wd->on_hold = EINA_FALSE;
1739 }
1740
1741 static void
1742 _mouse_multi_down(void *data, Evas *evas __UNUSED__, Evas_Object *obj, void *event_info)
1743 {
1744    ELM_CHECK_WIDTYPE(data, widtype);
1745    Widget_Data *wd = elm_widget_data_get(data);
1746    Event *ev;
1747    Evas_Event_Multi_Down *down = event_info;
1748
1749    elm_smart_scroller_hold_set(wd->scr, 1);
1750    elm_smart_scroller_freeze_set(wd->scr, 1);
1751
1752    ev = create_event_object(data, obj, down->device);
1753    if (!ev)
1754      {
1755         DBG("Failed : create_event_object");
1756         goto done;
1757      }
1758    wd->multi_count++;
1759
1760    ev->hold_timer = NULL;
1761    ev->start.x = ev->prev.x = down->canvas.x;
1762    ev->start.y = ev->prev.y = down->canvas.y;
1763    ev->pinch_start_dis = 0;
1764    wd->pinch.level = 1.0;
1765    wd->pinch.diff = 1.0;
1766
1767 done:
1768    if (wd->long_timer)
1769      {
1770         ecore_timer_del(wd->long_timer);
1771         wd->long_timer = NULL;
1772      }
1773    return;
1774 }
1775
1776 static void
1777 _mouse_multi_move(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
1778 {
1779    ELM_CHECK_WIDTYPE(data, widtype);
1780    Widget_Data *wd = elm_widget_data_get(data);
1781    Evas_Event_Multi_Move *move = event_info;
1782    int dis_new, dx, dy;
1783    double t, tt, a, a_diff;
1784    Event *ev0;
1785    Event *ev;
1786
1787    if ((!wd) || (!wd->src)) return;
1788    ev = get_event_object(data, move->device);
1789    if (!ev) return;
1790
1791    ev0 = get_event_object(data, 0);
1792    if (!ev0) return;
1793
1794    if (wd->multi_count >= 1)
1795      {
1796         Evas_Coord x, y, w, h;
1797         float half_w, half_h;
1798
1799         evas_object_geometry_get(data, &x, &y, &w, &h);
1800         half_w = (float)w * 0.5;
1801         half_h = (float)h * 0.5;
1802         dx = ev0->prev.x - ev->prev.x;
1803         dy = ev0->prev.y - ev->prev.y;
1804         dis_new = sqrt((dx * dx) + (dy * dy));
1805
1806         if (!ev->pinch_start_dis) ev->pinch_start_dis = dis_new;
1807         else
1808           {
1809              ev->pinch_dis = dis_new;
1810              tt = wd->pinch.diff;
1811              wd->pinch.diff = (double)(ev->pinch_dis - ev->pinch_start_dis);
1812              t = (wd->pinch.diff * 0.01) + 1.0;
1813              if ((t > 1.1) || (wd->rotate.doing))
1814                {
1815                   if (((wd->zoom + (int)t - 1) < wd->src->zoom_min) ||
1816                       ((wd->zoom + (int)t - 1) > wd->src->zoom_max) ||
1817                       (t > PINCH_ZOOM_MAX) || (t < PINCH_ZOOM_MIN))
1818                     {
1819                        wd->pinch.diff = tt;
1820                        goto do_nothing;
1821                     }
1822                   else
1823                     {
1824                        wd->pinch.level = (wd->pinch.diff * 0.01) + 1.0;
1825                        wd->pinch.cx = x + half_w;
1826                        wd->pinch.cy = y + half_h;
1827                        wd->pinch.doing = EINA_TRUE;
1828                        if (!wd->rotate.doing) goto do_zoom_only;
1829                     }
1830                }
1831              else
1832                {
1833                   if (wd->pinch.doing) goto do_nothing;
1834                }
1835
1836              a = (double)(ev->prev.y - ev0->prev.y) / (double)(ev->prev.x - ev0->prev.x);
1837              if (!wd->rotate.a) wd->rotate.a = a;
1838              else
1839                {
1840                   a_diff = wd->rotate.a - a;
1841                   if (a_diff > 0) wd->rotate.d -= 1.0;
1842                   else if (a_diff < 0) wd->rotate.d += 1.0;
1843                   wd->rotate.a = a;
1844                   wd->rotate.cx = x + half_w;
1845                   wd->rotate.cy = y + half_h;
1846                   wd->rotate.doing = EINA_TRUE;
1847                }
1848 do_zoom_only:
1849              if (wd->calc_job) ecore_job_del(wd->calc_job);
1850              wd->calc_job = ecore_job_add(_calc_job, wd);
1851           }
1852      }
1853 do_nothing:
1854    ev->prev.x = move->cur.canvas.x;
1855    ev->prev.y = move->cur.canvas.y;
1856 }
1857
1858 static void
1859 _mouse_multi_up(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
1860 {
1861    ELM_CHECK_WIDTYPE(data, widtype);
1862    Widget_Data *wd = elm_widget_data_get(data);
1863    Evas_Event_Multi_Up *up = event_info;
1864    Event *ev0;
1865    Event *ev;
1866    Eina_Bool tp;
1867    int zoom = 0;
1868
1869    wd->multi_count--;
1870    if (wd->calc_job) ecore_job_del(wd->calc_job);
1871    if (wd->zoom_animator)
1872      {
1873         ecore_animator_del(wd->zoom_animator);
1874         wd->zoom_animator = NULL;
1875      }
1876    tp = wd->paused;
1877    wd->paused = EINA_TRUE;
1878    if (wd->pinch.diff >= 0.0) zoom = (int)ceil((wd->pinch.diff * 0.01) - 1.0);
1879    else if (wd->pinch.diff < 0.0) zoom = (int)floor(-1.0 / ((wd->pinch.diff * 0.005) + 1.0));
1880    elm_map_zoom_set(data, wd->zoom + zoom);
1881    wd->pinch.level = 1.0;
1882    wd->pinch.doing = EINA_FALSE;
1883    wd->paused = tp;
1884    wd->rotate.a = 0.0;
1885    wd->rotate.doing = EINA_FALSE;
1886
1887    ev = get_event_object(data, up->device);
1888    if (!ev)
1889      {
1890         DBG("Cannot get multi device");
1891         return;
1892      }
1893
1894    ev0 = get_event_object(data, 0);
1895    if (ev0)
1896      ev0->hold_timer = ecore_timer_add(0.35, _hold_timer_cb, ev0);
1897    else
1898      {
1899         if (ev->hold_timer)
1900           {
1901              ecore_timer_del(ev->hold_timer);
1902              ev->hold_timer = NULL;
1903           }
1904      }
1905    destroy_event_object(data, ev);
1906 }
1907
1908 static void
1909 _mouse_wheel_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
1910 {
1911    ELM_CHECK_WIDTYPE(data, widtype);
1912    Widget_Data *wd = elm_widget_data_get(data);
1913    Evas_Event_Mouse_Wheel *ev = (Evas_Event_Mouse_Wheel*) event_info;
1914    Evas_Coord x, y, w, h;
1915    float half_w, half_h;
1916
1917    if (!wd) return;
1918    evas_object_geometry_get(data, &x, &y, &w, &h);
1919    half_w = (float)w * 0.5;
1920    half_h = (float)h * 0.5;
1921
1922    if (ev->z > 0)
1923      {
1924         wd->zoom_method = ZOOM_METHOD_OUT;
1925         wd->wheel_zoom -= 0.1;
1926         if (wd->wheel_zoom <= -2.0) wd->wheel_zoom = -2.0;
1927      }
1928    else
1929      {
1930         wd->zoom_method = ZOOM_METHOD_IN;
1931         wd->wheel_zoom += 0.1;
1932         if (wd->wheel_zoom >= 2.0) wd->wheel_zoom = 2.0;
1933      }
1934
1935    if (!wd->paused)
1936      {
1937         wd->pinch.level = pow(2.0, wd->wheel_zoom);
1938         wd->pinch.cx = x + half_w;
1939         wd->pinch.cy = y + half_h;
1940         if (wd->calc_job) ecore_job_del(wd->calc_job);
1941         wd->calc_job = ecore_job_add(_calc_job, wd);
1942      }
1943
1944    if (wd->wheel_timer) ecore_timer_del(wd->wheel_timer);
1945    wd->wheel_timer = ecore_timer_add(0.35, _wheel_timer_cb, data);
1946 }
1947
1948
1949 static Evas_Smart_Class _pan_sc = EVAS_SMART_CLASS_INIT_NULL;
1950
1951 static Eina_Bool
1952 _hold_timer_cb(void *data)
1953 {
1954    Event *ev0 = data;
1955
1956    ev0->hold_timer = NULL;
1957    return ECORE_CALLBACK_CANCEL;
1958 }
1959
1960 static Eina_Bool
1961 _wheel_timer_cb(void *data)
1962 {
1963    ELM_CHECK_WIDTYPE(data, widtype) ECORE_CALLBACK_CANCEL;
1964    Widget_Data *wd = elm_widget_data_get(data);
1965    int zoom;
1966
1967    if (!wd) return ECORE_CALLBACK_CANCEL;
1968    if (wd->zoom_method == ZOOM_METHOD_IN) zoom = (int)ceil(wd->wheel_zoom);
1969    else if (wd->zoom_method == ZOOM_METHOD_OUT) zoom = (int)floor(wd->wheel_zoom);
1970    else
1971      {
1972         wd->wheel_timer = NULL;
1973         return ECORE_CALLBACK_CANCEL;
1974      }
1975
1976    wd->mode = ELM_MAP_ZOOM_MODE_MANUAL;
1977    wd->pinch.level = 1.0;
1978    elm_map_zoom_set(data, wd->zoom + zoom);
1979    wd->wheel_zoom = 0.0;
1980    wd->wheel_timer = NULL;
1981    wd->zoom_method = ZOOM_METHOD_NONE;
1982    return ECORE_CALLBACK_CANCEL;
1983 }
1984
1985 static void
1986 _rect_resize_cb(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
1987 {
1988    ELM_CHECK_WIDTYPE(data, widtype);
1989    Widget_Data *wd = elm_widget_data_get(data);
1990    int x, y, w, h;
1991
1992    evas_object_geometry_get(wd->rect, &x, &y, &w, &h);
1993    evas_object_geometry_get(wd->pan_smart, &x, &y, &w, &h);
1994    evas_object_resize(wd->rect, w, h);
1995    evas_object_move(wd->rect, x, y);
1996 }
1997
1998 static void
1999 _del_hook(Evas_Object *obj)
2000 {
2001    ELM_CHECK_WIDTYPE(obj, widtype);
2002    Widget_Data *wd = elm_widget_data_get(obj);
2003    Elm_Map_Group_Class *group_clas;
2004    Elm_Map_Marker_Class *marker_clas;
2005    Eina_List *l;
2006    Event *ev;
2007    Evas_Object *p;
2008    Path_Node *n;
2009    Path_Waypoint *w;
2010    Ecore_Event_Handler *h;
2011    Elm_Map_Route *r;
2012    Elm_Map_Name *na;
2013    Evas_Object *route;
2014
2015    if (!wd) return;
2016    EINA_LIST_FREE(wd->groups_clas, group_clas)
2017      {
2018         if (group_clas->style)
2019           eina_stringshare_del(group_clas->style);
2020         free(group_clas);
2021      }
2022
2023    EINA_LIST_FREE(wd->markers_clas, marker_clas)
2024      {
2025         if (marker_clas->style)
2026           eina_stringshare_del(marker_clas->style);
2027         free(marker_clas);
2028      }
2029
2030    EINA_LIST_FOREACH(wd->s_event_list, l, ev)
2031      {
2032         destroy_event_object(obj, ev);
2033      }
2034
2035    EINA_LIST_FOREACH(wd->route, l, r)
2036      {
2037         EINA_LIST_FREE(r->path, p)
2038           {
2039              evas_object_del(p);
2040           }
2041
2042         EINA_LIST_FREE(r->waypoint, w)
2043           {
2044              if (w->point) eina_stringshare_del(w->point);
2045              free(w);
2046           }
2047
2048         EINA_LIST_FREE(r->nodes, n)
2049           {
2050              if (n->pos.address) eina_stringshare_del(n->pos.address);
2051              free(n);
2052           }
2053
2054         EINA_LIST_FREE(r->handlers, h)
2055           {
2056              ecore_event_handler_del(h);
2057           }
2058
2059         if (r->con_url) ecore_con_url_free(r->con_url);
2060         if (r->info.nodes) eina_stringshare_del(r->info.nodes);
2061         if (r->info.waypoints) eina_stringshare_del(r->info.waypoints);
2062      }
2063
2064    EINA_LIST_FREE(wd->names, na)
2065      {
2066         if (na->address) free(na->address);
2067         if (na->handler) ecore_event_handler_del(na->handler);
2068         if (na->ud.fname)
2069           {
2070              ecore_file_remove(na->ud.fname);
2071              free(na->ud.fname);
2072              na->ud.fname = NULL;
2073           }
2074      }
2075
2076    EINA_LIST_FREE(wd->track, route)
2077      {
2078         evas_object_del(route);
2079      }
2080
2081    if (wd->map) evas_map_free(wd->map);
2082    if (wd->source_names) free(wd->source_names);
2083    if (wd->calc_job) ecore_job_del(wd->calc_job);
2084    if (wd->scr_timer) ecore_timer_del(wd->scr_timer);
2085    if (wd->zoom_animator) ecore_animator_del(wd->zoom_animator);
2086    if (wd->long_timer) ecore_timer_del(wd->long_timer);
2087    if (wd->user_agent) eina_stringshare_del(wd->user_agent);
2088    if (wd->ua) eina_hash_free(wd->ua);
2089    if (wd->markers) free(wd->markers);
2090
2091    free(wd);
2092 }
2093
2094 static void
2095 _del_pre_hook(Evas_Object *obj)
2096 {
2097    ELM_CHECK_WIDTYPE(obj, widtype);
2098    Widget_Data *wd = elm_widget_data_get(obj);
2099    Marker_Group *group;
2100    Elm_Map_Marker *marker;
2101    int i;
2102    Eina_Bool free_marker = EINA_TRUE;
2103    Eina_List *l;
2104
2105    if (!wd) return;
2106    grid_clearall(obj);
2107    for (i = 0; i <= wd->zoom_max; i++)
2108      {
2109         if (!wd->markers[i]) continue;
2110         Eina_Iterator *it = eina_matrixsparse_iterator_new(wd->markers[i]);
2111         Eina_Matrixsparse_Cell *cell;
2112
2113         EINA_ITERATOR_FOREACH(it, cell)
2114           {
2115              l =  eina_matrixsparse_cell_data_get(cell);
2116              EINA_LIST_FREE(l, group)
2117                {
2118                   EINA_LIST_FREE(group->markers, marker)
2119                     {
2120                        evas_object_event_callback_del_full(group->sc, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
2121                                                            _bubble_sc_hints_changed_cb, group);
2122                        if (free_marker) free(marker);
2123                     }
2124                   free(group);
2125                }
2126              free_marker = EINA_FALSE;
2127           }
2128         eina_iterator_free(it);
2129         eina_matrixsparse_free(wd->markers[i]);
2130      }
2131
2132    evas_object_del(wd->sep_maps_markers);
2133    evas_object_del(wd->pan_smart);
2134    wd->pan_smart = NULL;
2135 }
2136
2137 static void
2138 _on_focus_hook(void *data __UNUSED__, Evas_Object *obj)
2139 {
2140    ELM_CHECK_WIDTYPE(obj, widtype);
2141    Widget_Data *wd = elm_widget_data_get(obj);
2142
2143    if (!wd) return;
2144    if (elm_widget_focus_get(obj))
2145      {
2146         edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr), "elm,action,focus", "elm");
2147         evas_object_focus_set(wd->obj, EINA_TRUE);
2148      }
2149    else
2150      {
2151         edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr), "elm,action,unfocus", "elm");
2152         evas_object_focus_set(wd->obj, EINA_FALSE);
2153      }
2154 }
2155
2156 static void
2157 _theme_hook(Evas_Object *obj)
2158 {
2159    ELM_CHECK_WIDTYPE(obj, widtype);
2160    Widget_Data *wd = elm_widget_data_get(obj);
2161
2162    if (!wd) return;
2163    elm_smart_scroller_object_theme_set(obj, wd->scr, "map", "base", elm_widget_style_get(obj));
2164    //   edje_object_scale_set(wd->scr, elm_widget_scale_get(obj) * _elm_config->scale);
2165    _sizing_eval(obj);
2166 }
2167
2168 static void
2169 _sizing_eval(Evas_Object *obj)
2170 {
2171    ELM_CHECK_WIDTYPE(obj, widtype);
2172    Widget_Data *wd = elm_widget_data_get(obj);
2173    Evas_Coord minw = -1, minh = -1, maxw = -1, maxh = -1;
2174
2175    if (!wd) return;
2176    evas_object_size_hint_max_get(wd->scr, &maxw, &maxh);
2177    evas_object_size_hint_min_set(obj, minw, minh);
2178    evas_object_size_hint_max_set(obj, maxw, maxh);
2179 }
2180
2181 static void
2182 _calc_job(void *data)
2183 {
2184    Widget_Data *wd = data;
2185    Evas_Coord minw, minh;
2186
2187    if (!wd) return;
2188    minw = wd->size.w;
2189    minh = wd->size.h;
2190    if (wd->resized)
2191      {
2192         wd->resized = EINA_FALSE;
2193         if (wd->mode != ELM_MAP_ZOOM_MODE_MANUAL)
2194           {
2195              double tz = wd->zoom;
2196              wd->zoom = 0.0;
2197              elm_map_zoom_set(wd->obj, tz);
2198           }
2199      }
2200    if ((minw != wd->minw) || (minh != wd->minh))
2201      {
2202         wd->minw = minw;
2203         wd->minh = minh;
2204         evas_object_smart_callback_call(wd->pan_smart, SIG_CHANGED, NULL);
2205         _sizing_eval(wd->obj);
2206      }
2207    wd->calc_job = NULL;
2208    evas_object_smart_changed(wd->pan_smart);
2209 }
2210
2211 static void
2212 _pan_set(Evas_Object *obj, Evas_Coord x, Evas_Coord y)
2213 {
2214    Pan *sd = evas_object_smart_data_get(obj);
2215    if (!sd) return;
2216    if ((x == sd->wd->pan_x) && (y == sd->wd->pan_y)) return;
2217    sd->wd->pan_x = x;
2218    sd->wd->pan_y = y;
2219    evas_object_smart_changed(obj);
2220 }
2221
2222 static void
2223 _pan_get(Evas_Object *obj, Evas_Coord *x, Evas_Coord *y)
2224 {
2225    Pan *sd = evas_object_smart_data_get(obj);
2226    if (!sd) return;
2227    if (x) *x = sd->wd->pan_x;
2228    if (y) *y = sd->wd->pan_y;
2229 }
2230
2231 static void
2232 _pan_max_get(Evas_Object *obj, Evas_Coord *x, Evas_Coord *y)
2233 {
2234    Pan *sd = evas_object_smart_data_get(obj);
2235    Evas_Coord ow, oh;
2236    if (!sd) return;
2237    evas_object_geometry_get(obj, NULL, NULL, &ow, &oh);
2238    ow = sd->wd->minw - ow;
2239    if (ow < 0) ow = 0;
2240    oh = sd->wd->minh - oh;
2241    if (oh < 0) oh = 0;
2242    if (x) *x = ow;
2243    if (y) *y = oh;
2244 }
2245
2246 static void
2247 _pan_min_get(Evas_Object *obj __UNUSED__, Evas_Coord *x, Evas_Coord *y)
2248 {
2249    if (x) *x = 0;
2250    if (y) *y = 0;
2251 }
2252
2253 static void
2254 _pan_child_size_get(Evas_Object *obj, Evas_Coord *w, Evas_Coord *h)
2255 {
2256    Pan *sd = evas_object_smart_data_get(obj);
2257    if (!sd) return;
2258    if (w) *w = sd->wd->minw;
2259    if (h) *h = sd->wd->minh;
2260 }
2261
2262 static void
2263 _pan_add(Evas_Object *obj)
2264 {
2265    Pan *sd;
2266    Evas_Object_Smart_Clipped_Data *cd;
2267    _pan_sc.add(obj);
2268    cd = evas_object_smart_data_get(obj);
2269    if (!cd) return;
2270    sd = calloc(1, sizeof(Pan));
2271    if (!sd) return;
2272    sd->__clipped_data = *cd;
2273    free(cd);
2274    evas_object_smart_data_set(obj, sd);
2275 }
2276
2277 static void
2278 _pan_del(Evas_Object *obj)
2279 {
2280    Pan *sd = evas_object_smart_data_get(obj);
2281    if (!sd) return;
2282    _pan_sc.del(obj);
2283 }
2284
2285 static void
2286 _pan_resize(Evas_Object *obj, Evas_Coord w, Evas_Coord h)
2287 {
2288    Pan *sd = evas_object_smart_data_get(obj);
2289    Evas_Coord ow, oh;
2290    if (!sd) return;
2291    evas_object_geometry_get(obj, NULL, NULL, &ow, &oh);
2292    if ((ow == w) && (oh == h)) return;
2293    sd->wd->resized = EINA_TRUE;
2294    if (sd->wd->calc_job) ecore_job_del(sd->wd->calc_job);
2295    sd->wd->calc_job = ecore_job_add(_calc_job, sd->wd);
2296 }
2297
2298 static void
2299 _pan_calculate(Evas_Object *obj)
2300 {
2301    Pan *sd = evas_object_smart_data_get(obj);
2302    Evas_Coord ox, oy, ow, oh;
2303    Eina_List *l;
2304    Grid *g;
2305    if (!sd) return;
2306    evas_object_geometry_get(obj, &ox, &oy, &ow, &oh);
2307    rect_place(sd->wd->obj, sd->wd->pan_x, sd->wd->pan_y, ox, oy, ow, oh);
2308    EINA_LIST_FOREACH(sd->wd->grids, l, g)
2309      {
2310         if (sd->wd->zoom == g->zoom) grid_load(sd->wd->obj, g);
2311         grid_place(sd->wd->obj, g, sd->wd->pan_x, sd->wd->pan_y, ox, oy, ow, oh);
2312         marker_place(sd->wd->obj, g, sd->wd->pan_x, sd->wd->pan_y, ox, oy, ow, oh);
2313         if (!sd->wd->zoom_animator) route_place(sd->wd->obj, g, sd->wd->pan_x, sd->wd->pan_y, ox, oy, ow, oh);
2314         if (!sd->wd->zoom_animator) track_place(sd->wd->obj, g, sd->wd->pan_x, sd->wd->pan_y, ox, oy, ow, oh);
2315      }
2316 }
2317
2318 static void
2319 _pan_move(Evas_Object *obj, Evas_Coord x __UNUSED__, Evas_Coord y __UNUSED__)
2320 {
2321    Pan *sd = evas_object_smart_data_get(obj);
2322    if (!sd) return;
2323    if (sd->wd->calc_job) ecore_job_del(sd->wd->calc_job);
2324    sd->wd->calc_job = ecore_job_add(_calc_job, sd->wd);
2325 }
2326
2327 static void
2328 _hold_on(void *data __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
2329 {
2330    ELM_CHECK_WIDTYPE(obj, widtype);
2331    Widget_Data *wd = elm_widget_data_get(obj);
2332
2333    if (!wd) return;
2334    elm_smart_scroller_hold_set(wd->scr, 1);
2335 }
2336
2337 static void
2338 _hold_off(void *data __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
2339 {
2340    ELM_CHECK_WIDTYPE(obj, widtype);
2341    Widget_Data *wd = elm_widget_data_get(obj);
2342
2343    if (!wd) return;
2344    elm_smart_scroller_hold_set(wd->scr, 0);
2345 }
2346
2347 static void
2348 _freeze_on(void *data __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
2349 {
2350    ELM_CHECK_WIDTYPE(obj, widtype);
2351    Widget_Data *wd = elm_widget_data_get(obj);
2352
2353    if (!wd) return;
2354    elm_smart_scroller_freeze_set(wd->scr, 1);
2355 }
2356
2357 static void
2358 _freeze_off(void *data __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
2359 {
2360    ELM_CHECK_WIDTYPE(obj, widtype);
2361    Widget_Data *wd = elm_widget_data_get(obj);
2362
2363    if (!wd) return;
2364    elm_smart_scroller_freeze_set(wd->scr, 0);
2365 }
2366
2367 static void
2368 _scr_anim_start(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2369 {
2370    evas_object_smart_callback_call(data, "scroll,anim,start", NULL);
2371 }
2372
2373 static void
2374 _scr_anim_stop(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2375 {
2376    evas_object_smart_callback_call(data, "scroll,anim,stop", NULL);
2377 }
2378
2379 static void
2380 _scr_drag_start(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2381 {
2382    Widget_Data *wd = elm_widget_data_get(data);
2383    wd->center_on.enabled = EINA_FALSE;
2384    evas_object_smart_callback_call(data, SIG_SCROLL_DRAG_START, NULL);
2385 }
2386
2387 static void
2388 _scr_drag_stop(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2389 {
2390    evas_object_smart_callback_call(data, SIG_SCROLL_DRAG_STOP, NULL);
2391 }
2392
2393 static void
2394 _scr_scroll(void *data, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2395 {
2396    evas_object_smart_callback_call(data, SIG_SCROLL, NULL);
2397 }
2398
2399
2400 static void
2401 _group_object_create(Marker_Group *group)
2402 {
2403    const char *style = "radio";
2404    Evas_Object *icon = NULL;
2405
2406    if (group->obj) return;
2407    if ((!group->clas->priv.objs_notused) || (eina_list_count(group->markers) == 1))
2408      {
2409         //set icon and style
2410         if (eina_list_count(group->markers) == 1)
2411           {
2412              Elm_Map_Marker *m = eina_list_data_get(group->markers);
2413              if (m->clas->style)
2414                style = m->clas->style;
2415
2416              if (m->clas->func.icon_get)
2417                icon = m->clas->func.icon_get(group->wd->obj, m, m->data);
2418
2419              group->delete_object = EINA_TRUE;
2420           }
2421         else
2422           {
2423              if (group->clas->style)
2424                style = group->clas->style;
2425
2426              if (group->clas->func.icon_get)
2427                icon = group->clas->func.icon_get(group->wd->obj, group->clas->data);
2428
2429              group->delete_object = EINA_FALSE;
2430           }
2431
2432         group->obj = elm_layout_add(group->wd->obj);
2433         elm_layout_theme_set(group->obj, "map/marker", style, elm_widget_style_get(group->wd->obj));
2434
2435         if (icon) elm_object_part_content_set(group->obj, "elm.icon", icon);
2436
2437         evas_object_smart_member_add(group->obj, group->wd->pan_smart);
2438         elm_widget_sub_object_add(group->wd->obj, group->obj);
2439         evas_object_stack_above(group->obj, group->wd->sep_maps_markers);
2440
2441         if (!group->delete_object)
2442           group->clas->priv.objs_used = eina_list_append(group->clas->priv.objs_used, group->obj);
2443      }
2444    else
2445      {
2446         group->delete_object = EINA_FALSE;
2447
2448         group->obj = eina_list_data_get(group->clas->priv.objs_notused);
2449         group->clas->priv.objs_used = eina_list_append(group->clas->priv.objs_used, group->obj);
2450         group->clas->priv.objs_notused = eina_list_remove(group->clas->priv.objs_notused, group->obj);
2451         evas_object_show(group->obj);
2452      }
2453
2454    edje_object_signal_callback_add(elm_layout_edje_get(group->obj), "open", "elm", _group_open_cb, group);
2455    edje_object_signal_callback_add(elm_layout_edje_get(group->obj), "bringin", "elm", _group_bringin_cb, group);
2456
2457    group->update_nbelems = EINA_TRUE;
2458    group->update_resize = EINA_TRUE;
2459    group->update_raise = EINA_TRUE;
2460
2461    if (group->open) _group_bubble_create(group);
2462 }
2463
2464 static void
2465 _group_object_free(Marker_Group *group)
2466 {
2467    if (!group->obj) return;
2468    if (!group->delete_object)
2469      {
2470         group->clas->priv.objs_notused = eina_list_append(group->clas->priv.objs_notused, group->obj);
2471         group->clas->priv.objs_used = eina_list_remove(group->clas->priv.objs_used, group->obj);
2472         evas_object_hide(group->obj);
2473
2474         edje_object_signal_callback_del(elm_layout_edje_get(group->obj), "open", "elm", _group_open_cb);
2475         edje_object_signal_callback_del(elm_layout_edje_get(group->obj), "bringin", "elm", _group_bringin_cb);
2476      }
2477    else
2478      evas_object_del(group->obj);
2479
2480    group->obj = NULL;
2481    _group_bubble_free(group);
2482 }
2483
2484 static void
2485 _group_bubble_mouse_up_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2486 {
2487    Marker_Group *group = data;
2488
2489    if (!evas_object_above_get(group->rect)) return;
2490    evas_object_raise(group->bubble);
2491    evas_object_raise(group->sc);
2492    evas_object_raise(group->rect);
2493 }
2494
2495 static void
2496 _group_bubble_create(Marker_Group *group)
2497 {
2498    if (group->bubble) return;
2499
2500    group->wd->opened_bubbles = eina_list_append(group->wd->opened_bubbles, group);
2501    group->bubble = edje_object_add(evas_object_evas_get(group->obj));
2502    _elm_theme_object_set(group->wd->obj, group->bubble, "map", "marker_bubble",
2503                          elm_widget_style_get(group->wd->obj));
2504    evas_object_smart_member_add(group->bubble,
2505                                 group->wd->obj);
2506    elm_widget_sub_object_add(group->wd->obj, group->bubble);
2507
2508    _group_bubble_content_free(group);
2509    if (!_group_bubble_content_update(group))
2510      {
2511         //no content, we can delete the bubble
2512         _group_bubble_free(group);
2513         return;
2514      }
2515
2516    group->rect = evas_object_rectangle_add(evas_object_evas_get(group->obj));
2517    evas_object_color_set(group->rect, 0, 0, 0, 0);
2518    evas_object_repeat_events_set(group->rect, EINA_TRUE);
2519    evas_object_smart_member_add(group->rect, group->wd->obj);
2520    elm_widget_sub_object_add(group->wd->obj, group->rect);
2521
2522    evas_object_event_callback_add(group->rect, EVAS_CALLBACK_MOUSE_UP, _group_bubble_mouse_up_cb, group);
2523
2524    _group_bubble_place(group);
2525 }
2526
2527 static void _bubble_sc_hints_changed_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
2528 {
2529    _group_bubble_place(data);
2530 }
2531
2532 static int
2533 _group_bubble_content_update(Marker_Group *group)
2534 {
2535    Eina_List *l;
2536    Elm_Map_Marker *marker;
2537    int i = 0;
2538
2539    if (!group->bubble) return 1;
2540
2541    if (!group->sc)
2542      {
2543         group->sc = elm_scroller_add(group->bubble);
2544         elm_widget_style_set(group->sc, "map_bubble");
2545         elm_scroller_content_min_limit(group->sc, EINA_FALSE, EINA_TRUE);
2546         elm_scroller_policy_set(group->sc, ELM_SCROLLER_POLICY_AUTO, ELM_SCROLLER_POLICY_OFF);
2547         elm_scroller_bounce_set(group->sc, _elm_config->thumbscroll_bounce_enable, EINA_FALSE);
2548         edje_object_part_swallow(group->bubble, "elm.swallow.content", group->sc);
2549         evas_object_show(group->sc);
2550         evas_object_smart_member_add(group->sc,
2551                                      group->wd->obj);
2552         elm_widget_sub_object_add(group->wd->obj, group->sc);
2553
2554         group->bx = elm_box_add(group->bubble);
2555         evas_object_size_hint_align_set(group->bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2556         evas_object_size_hint_weight_set(group->bx, 0.5, 0.5);
2557         elm_box_horizontal_set(group->bx, EINA_TRUE);
2558         evas_object_show(group->bx);
2559
2560         elm_object_content_set(group->sc, group->bx);
2561
2562         evas_object_event_callback_add(group->sc, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
2563                                        _bubble_sc_hints_changed_cb, group);
2564      }
2565
2566    EINA_LIST_FOREACH(group->markers, l, marker)
2567      {
2568         if (i >= group->wd->markers_max_num) break;
2569         if ((!marker->content) && (marker->clas->func.get))
2570           marker->content = marker->clas->func.get(group->wd->obj, marker, marker->data);
2571         else if (marker->content)
2572           elm_box_unpack(group->bx, marker->content);
2573         if (marker->content)
2574           {
2575              elm_box_pack_end(group->bx, marker->content);
2576              i++;
2577           }
2578      }
2579    return i;
2580 }
2581
2582 static void
2583 _group_bubble_content_free(Marker_Group *group)
2584 {
2585    Eina_List *l;
2586    Elm_Map_Marker *marker;
2587
2588    if (!group->sc) return;
2589    EINA_LIST_FOREACH(group->markers, l, marker)
2590      {
2591         if ((marker->content) && (marker->clas->func.del))
2592           marker->clas->func.del(group->wd->obj, marker, marker->data, marker->content);
2593         else if (marker->content)
2594           evas_object_del(marker->content);
2595         marker->content = NULL;
2596      }
2597    evas_object_del(group->sc);
2598    group->sc = NULL;
2599 }
2600
2601 static void
2602 _group_bubble_free(Marker_Group *group)
2603 {
2604    if (!group->bubble) return;
2605    group->wd->opened_bubbles = eina_list_remove(group->wd->opened_bubbles, group);
2606    evas_object_event_callback_del_full(group->sc, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
2607                                        _bubble_sc_hints_changed_cb, group);
2608    evas_object_del(group->bubble);
2609    evas_object_del(group->rect);
2610    group->bubble = NULL;
2611    _group_bubble_content_free(group);
2612 }
2613
2614 static void
2615 _group_bubble_place(Marker_Group *group)
2616 {
2617    Evas_Coord x, y, w;
2618    Evas_Coord xx, yy, ww, hh;
2619    const char *s;
2620
2621    if ((!group->bubble) || (!group->obj)) return;
2622
2623    evas_object_geometry_get(group->obj, &x, &y, &w, NULL);
2624    edje_object_size_min_calc(group->bubble, NULL, &hh);
2625
2626    s = edje_object_data_get(group->bubble, "size_w");
2627    if (s) ww = atoi(s);
2628    else ww = 0;
2629    xx = x + w / 2 - ww / 2;
2630    yy = y-hh;
2631
2632    evas_object_move(group->bubble, xx, yy);
2633    evas_object_resize(group->bubble, ww, hh);
2634    obj_rotate_zoom(group->wd, group->bubble);
2635    evas_object_show(group->bubble);
2636
2637    evas_object_move(group->rect, xx, yy);
2638    evas_object_resize(group->rect, ww, hh);
2639    obj_rotate_zoom(group->wd, group->rect);
2640    evas_object_show(group->rect);
2641 }
2642
2643 static void
2644 _group_bringin_cb(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *soure __UNUSED__)
2645 {
2646    Marker_Group *group = data;
2647    Elm_Map_Marker *marker = eina_list_data_get(group->markers);
2648    if (!marker) return;
2649    group->bringin = EINA_TRUE;
2650    elm_map_geo_region_bring_in(group->wd->obj, marker->longitude, marker->latitude);
2651 }
2652
2653 static void
2654 _group_open_cb(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *soure __UNUSED__)
2655 {
2656    Marker_Group *group = data;
2657
2658    if (group->bringin)
2659      {
2660         group->bringin = EINA_FALSE;
2661         return;
2662      }
2663
2664    if (group->bubble)
2665      {
2666         group->open = EINA_FALSE;
2667         _group_bubble_free(group);
2668         return;
2669      }
2670    group->open = EINA_TRUE;
2671    _group_bubble_create(group);
2672 }
2673
2674 static Eina_Bool
2675 _event_hook(Evas_Object *obj, Evas_Object *src __UNUSED__, Evas_Callback_Type type, void *event_info)
2676 {
2677    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
2678    Widget_Data *wd = elm_widget_data_get(obj);
2679    int zoom;
2680    Evas_Coord x = 0;
2681    Evas_Coord y = 0;
2682    Evas_Coord step_x = 0;
2683    Evas_Coord step_y = 0;
2684    Evas_Coord v_w = 0;
2685    Evas_Coord v_h = 0;
2686    Evas_Coord page_x = 0;
2687    Evas_Coord page_y = 0;
2688
2689    if (!wd) return EINA_FALSE;
2690    if (type != EVAS_CALLBACK_KEY_DOWN) return EINA_FALSE;
2691    Evas_Event_Key_Down *ev = event_info;
2692    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) return EINA_FALSE;
2693
2694    elm_smart_scroller_child_pos_get(wd->scr, &x, &y);
2695    elm_smart_scroller_step_size_get(wd->scr, &step_x, &step_y);
2696    elm_smart_scroller_page_size_get(wd->scr, &page_x, &page_y);
2697    elm_smart_scroller_child_viewport_size_get(wd->scr, &v_w, &v_h);
2698
2699    if ((!strcmp(ev->keyname, "Left")) || (!strcmp(ev->keyname, "KP_Left")))
2700      {
2701         x -= step_x;
2702      }
2703    else if ((!strcmp(ev->keyname, "Right")) || (!strcmp(ev->keyname, "KP_Right")))
2704      {
2705         x += step_x;
2706      }
2707    else if ((!strcmp(ev->keyname, "Up"))  || (!strcmp(ev->keyname, "KP_Up")))
2708      {
2709         y -= step_y;
2710      }
2711    else if ((!strcmp(ev->keyname, "Down")) || (!strcmp(ev->keyname, "KP_Down")))
2712      {
2713         y += step_y;
2714      }
2715    else if ((!strcmp(ev->keyname, "Prior")) || (!strcmp(ev->keyname, "KP_Prior")))
2716      {
2717         if (page_y < 0)
2718           y -= -(page_y * v_h) / 100;
2719         else
2720           y -= page_y;
2721      }
2722    else if ((!strcmp(ev->keyname, "Next")) || (!strcmp(ev->keyname, "KP_Next")))
2723      {
2724         if (page_y < 0)
2725           y += -(page_y * v_h) / 100;
2726         else
2727           y += page_y;
2728      }
2729    else if (!strcmp(ev->keyname, "KP_Add"))
2730      {
2731         zoom = elm_map_zoom_get(obj) + 1;
2732         elm_map_zoom_mode_set(obj, ELM_MAP_ZOOM_MODE_MANUAL);
2733         elm_map_zoom_set(obj, zoom);
2734         return EINA_TRUE;
2735      }
2736    else if (!strcmp(ev->keyname, "KP_Subtract"))
2737      {
2738         zoom = elm_map_zoom_get(obj) - 1;
2739         elm_map_zoom_mode_set(obj, ELM_MAP_ZOOM_MODE_MANUAL);
2740         elm_map_zoom_set(obj, zoom);
2741         return EINA_TRUE;
2742      }
2743    else return EINA_FALSE;
2744
2745    ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
2746    elm_smart_scroller_child_pos_set(wd->scr, x, y);
2747
2748    return EINA_TRUE;
2749 }
2750
2751 static Eina_Bool
2752 cb_dump_name_attrs(void *data, const char *key, const char *value)
2753 {
2754    Name_Dump *dump = (Name_Dump*)data;
2755    if (!dump) return EINA_FALSE;
2756
2757    if (!strncmp(key, NOMINATIM_ATTR_LON, sizeof(NOMINATIM_ATTR_LON))) dump->lon = atof(value);
2758    else if (!strncmp(key, NOMINATIM_ATTR_LAT, sizeof(NOMINATIM_ATTR_LAT))) dump->lat = atof(value);
2759
2760    return EINA_TRUE;
2761 }
2762
2763
2764 static Eina_Bool
2765 cb_route_dump(void *data, Eina_Simple_XML_Type type, const char *value, unsigned offset __UNUSED__, unsigned length)
2766 {
2767    Route_Dump *dump = data;
2768    if (!dump) return EINA_FALSE;
2769
2770    switch (type)
2771      {
2772       case EINA_SIMPLE_XML_OPEN:
2773       case EINA_SIMPLE_XML_OPEN_EMPTY:
2774         {
2775            const char *attrs;
2776
2777            attrs = eina_simple_xml_tag_attributes_find(value, length);
2778            if (!attrs)
2779              {
2780                 if (!strncmp(value, YOURS_DISTANCE, length)) dump->id = ROUTE_XML_DISTANCE;
2781                 else if (!strncmp(value, YOURS_DESCRIPTION, length)) dump->id = ROUTE_XML_DESCRIPTION;
2782                 else if (!strncmp(value, YOURS_COORDINATES, length)) dump->id = ROUTE_XML_COORDINATES;
2783                 else dump->id = ROUTE_XML_NONE;
2784              }
2785          }
2786         break;
2787       case EINA_SIMPLE_XML_DATA:
2788         {
2789            char *buf = malloc(length);
2790            if (!buf) return EINA_FALSE;
2791            snprintf(buf, length, "%s", value);
2792            if (dump->id == ROUTE_XML_DISTANCE) dump->distance = atof(buf);
2793            else if (!(dump->description) && (dump->id == ROUTE_XML_DESCRIPTION)) dump->description = strdup(buf);
2794            else if (dump->id == ROUTE_XML_COORDINATES) dump->coordinates = strdup(buf);
2795            free(buf);
2796         }
2797         break;
2798       default:
2799         break;
2800      }
2801
2802    return EINA_TRUE;
2803 }
2804
2805 static Eina_Bool
2806 cb_name_dump(void *data, Eina_Simple_XML_Type type, const char *value, unsigned offset __UNUSED__, unsigned length)
2807 {
2808    Name_Dump *dump = data;
2809    if (!dump) return EINA_FALSE;
2810
2811    switch (type)
2812      {
2813       case EINA_SIMPLE_XML_OPEN:
2814       case EINA_SIMPLE_XML_OPEN_EMPTY:
2815         {
2816            const char *attrs;
2817            attrs = eina_simple_xml_tag_attributes_find(value, length);
2818            if (attrs)
2819              {
2820                 if (!strncmp(value, NOMINATIM_RESULT, sizeof(NOMINATIM_RESULT) - 1)) dump->id = NAME_XML_NAME;
2821                 else dump->id = NAME_XML_NONE;
2822
2823                 eina_simple_xml_attributes_parse
2824                   (attrs, length - (attrs - value), cb_dump_name_attrs, dump);
2825              }
2826         }
2827         break;
2828       case EINA_SIMPLE_XML_DATA:
2829         {
2830            char *buf = malloc(length + 1);
2831            if (!buf) return EINA_FALSE;
2832            snprintf(buf, length + 1, "%s", value);
2833            if (dump->id == NAME_XML_NAME) dump->address = strdup(buf);
2834            free(buf);
2835         }
2836         break;
2837       default:
2838         break;
2839      }
2840
2841    return EINA_TRUE;
2842 }
2843
2844 static void
2845 _parse_kml(void *data)
2846 {
2847    Elm_Map_Route *r = (Elm_Map_Route*)data;
2848    if (!r || !r->ud.fname) return;
2849
2850    FILE *f;
2851    char **str;
2852    unsigned int ele, idx;
2853    double lon, lat;
2854    Evas_Object *path;
2855
2856    Route_Dump dump = {0, r->ud.fname, 0.0, NULL, NULL};
2857
2858    f = fopen(r->ud.fname, "rb");
2859    if (f)
2860      {
2861         long sz;
2862
2863         fseek(f, 0, SEEK_END);
2864         sz = ftell(f);
2865         if (sz > 0)
2866           {
2867              char *buf;
2868
2869              fseek(f, 0, SEEK_SET);
2870              buf = malloc(sz);
2871              if (buf)
2872                {
2873                   if (fread(buf, 1, sz, f))
2874                     {
2875                        eina_simple_xml_parse(buf, sz, EINA_TRUE, cb_route_dump, &dump);
2876                        free(buf);
2877                     }
2878                }
2879           }
2880         fclose(f);
2881
2882         if (dump.distance) r->info.distance = dump.distance;
2883         if (dump.description)
2884           {
2885              eina_stringshare_replace(&r->info.waypoints, dump.description);
2886              str = eina_str_split_full(dump.description, "\n", 0, &ele);
2887              r->info.waypoint_count = ele;
2888              for (idx = 0 ; idx < ele ; idx++)
2889                {
2890                   Path_Waypoint *wp = ELM_NEW(Path_Waypoint);
2891                   if (wp)
2892                     {
2893                        wp->wd = r->wd;
2894                        wp->point = eina_stringshare_add(str[idx]);
2895                        DBG("%s", str[idx]);
2896                        r->waypoint = eina_list_append(r->waypoint, wp);
2897                     }
2898                }
2899              if (str && str[0])
2900                {
2901                   free(str[0]);
2902                   free(str);
2903                }
2904           }
2905         else WRN("description is not found !");
2906
2907         if (dump.coordinates)
2908           {
2909              eina_stringshare_replace(&r->info.nodes, dump.coordinates);
2910              str = eina_str_split_full(dump.coordinates, "\n", 0, &ele);
2911              r->info.node_count = ele;
2912              for (idx = 0 ; idx < ele ; idx++)
2913                {
2914                   sscanf(str[idx], "%lf,%lf", &lon, &lat);
2915                   Path_Node *n = ELM_NEW(Path_Node);
2916                   if (n)
2917                     {
2918                        n->wd = r->wd;
2919                        n->pos.lon = lon;
2920                        n->pos.lat = lat;
2921                        n->idx = idx;
2922                        DBG("%lf:%lf", lon, lat);
2923                        n->pos.address = NULL;
2924                        r->nodes = eina_list_append(r->nodes, n);
2925
2926                        path = evas_object_polygon_add(evas_object_evas_get(r->wd->obj));
2927                        evas_object_smart_member_add(path, r->wd->pan_smart);
2928                        r->path = eina_list_append(r->path, path);
2929                     }
2930                }
2931              if (str && str[0])
2932                {
2933                   free(str[0]);
2934                   free(str);
2935                }
2936           }
2937      }
2938 }
2939
2940 static void
2941 _parse_name(void *data)
2942 {
2943    Elm_Map_Name *n = (Elm_Map_Name*)data;
2944    if (!n || !n->ud.fname) return;
2945
2946    FILE *f;
2947
2948    Name_Dump dump = {0, NULL, 0.0, 0.0};
2949
2950    f = fopen(n->ud.fname, "rb");
2951    if (f)
2952      {
2953         long sz;
2954
2955         fseek(f, 0, SEEK_END);
2956         sz = ftell(f);
2957         if (sz > 0)
2958           {
2959              char *buf;
2960
2961              fseek(f, 0, SEEK_SET);
2962              buf = malloc(sz);
2963              if (buf)
2964                {
2965                   if (fread(buf, 1, sz, f))
2966                     {
2967                        eina_simple_xml_parse(buf, sz, EINA_TRUE, cb_name_dump, &dump);
2968                        free(buf);
2969                     }
2970                }
2971           }
2972         fclose(f);
2973
2974         if (dump.address)
2975           {
2976              INF("[%lf : %lf] ADDRESS : %s", n->lon, n->lat, dump.address);
2977              n->address = strdup(dump.address);
2978           }
2979         n->lon = dump.lon;
2980         n->lat = dump.lat;
2981      }
2982 }
2983
2984 static Eina_Bool
2985 _route_complete_cb(void *data, int ev_type __UNUSED__, void *event)
2986 {
2987    Ecore_Con_Event_Url_Complete *ev = event;
2988    Elm_Map_Route *r = (Elm_Map_Route*)data;
2989    Widget_Data *wd = r->wd;
2990
2991    if ((!r) || (!ev)) return EINA_TRUE;
2992    Elm_Map_Route *rr = ecore_con_url_data_get(r->con_url);
2993    ecore_con_url_data_set(r->con_url, NULL);
2994    if (r!=rr) return EINA_TRUE;
2995
2996    if (r->ud.fd) fclose(r->ud.fd);
2997    _parse_kml(r);
2998
2999    if (wd->grids)
3000      {
3001         Evas_Coord ox, oy, ow, oh;
3002         evas_object_geometry_get(wd->obj, &ox, &oy, &ow, &oh);
3003         route_place(wd->obj, eina_list_data_get(wd->grids), wd->pan_x, wd->pan_y, ox, oy, ow, oh);
3004      }
3005    edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr),
3006                            "elm,state,busy,stop", "elm");
3007    evas_object_smart_callback_call(wd->obj, SIG_ROUTE_LOADED, NULL);
3008    return EINA_TRUE;
3009 }
3010
3011 static Eina_Bool
3012 _name_complete_cb(void *data, int ev_type __UNUSED__, void *event)
3013 {
3014    Ecore_Con_Event_Url_Complete *ev = event;
3015    Elm_Map_Name *n = (Elm_Map_Name*)data;
3016    Widget_Data *wd = n->wd;
3017
3018    if ((!n) || (!ev)) return EINA_TRUE;
3019    Elm_Map_Name *nn = ecore_con_url_data_get(n->con_url);
3020    ecore_con_url_data_set(n->con_url, NULL);
3021    if (n!=nn) return EINA_TRUE;
3022
3023    if (n->ud.fd) fclose(n->ud.fd);
3024    _parse_name(n);
3025
3026    edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr),
3027                            "elm,state,busy,stop", "elm");
3028    evas_object_smart_callback_call(wd->obj, SIG_NAME_LOADED, NULL);
3029    return EINA_TRUE;
3030 }
3031
3032 static Elm_Map_Name *
3033 _utils_convert_name(const Evas_Object *obj, int method, char *address, double lon, double lat)
3034 {
3035    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
3036    Widget_Data *wd = elm_widget_data_get(obj);
3037    char buf[PATH_MAX];
3038    char *source;
3039    int fd;
3040
3041    if ((!wd) || (!wd->src)) return NULL;
3042    Elm_Map_Name *name = ELM_NEW(Elm_Map_Name);
3043    if (!name) return NULL;
3044
3045    snprintf(buf, sizeof(buf), DEST_NAME_XML_FILE);
3046    fd = mkstemp(buf);
3047    if (fd < 0)
3048      {
3049         free(name);
3050         return NULL;
3051      }
3052
3053    name->con_url = ecore_con_url_new(NULL);
3054    name->ud.fname = strdup(buf);
3055    INF("xml file : %s", name->ud.fname);
3056
3057    name->ud.fd = fdopen(fd, "w+");
3058    if ((!name->con_url) || (!name->ud.fd))
3059      {
3060         ecore_con_url_free(name->con_url);
3061         free(name);
3062         return NULL;
3063      }
3064
3065    name->wd = wd;
3066    name->handler = ecore_event_handler_add (ECORE_CON_EVENT_URL_COMPLETE, _name_complete_cb, name);
3067    name->method = method;
3068    if (method == ELM_MAP_NAME_METHOD_SEARCH) name->address = strdup(address);
3069    else if (method == ELM_MAP_NAME_METHOD_REVERSE) name->address = NULL;
3070    name->lon = lon;
3071    name->lat = lat;
3072
3073    source = wd->src->name_url_cb(wd->obj, method, address, lon, lat);
3074    INF("name url = %s", source);
3075
3076    wd->names = eina_list_append(wd->names, name);
3077    ecore_con_url_url_set(name->con_url, source);
3078    ecore_con_url_fd_set(name->con_url, fileno(name->ud.fd));
3079    ecore_con_url_data_set(name->con_url, name);
3080
3081    edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr),
3082                            "elm,state,busy,start", "elm");
3083    evas_object_smart_callback_call(wd->obj, SIG_NAME_LOAD, NULL);
3084    ecore_con_url_get(name->con_url);
3085    if (source) free(source);
3086
3087    return name;
3088
3089 }
3090
3091 static int idnum = 1;
3092
3093 #endif
3094
3095 EAPI Evas_Object *
3096 elm_map_add(Evas_Object *parent)
3097 {
3098 #ifdef HAVE_ELEMENTARY_ECORE_CON
3099    Evas *e;
3100    Widget_Data *wd;
3101    Evas_Coord minw, minh;
3102    Evas_Object *obj;
3103    static Evas_Smart *smart = NULL;
3104    Eina_Bool bounce = _elm_config->thumbscroll_bounce_enable;
3105
3106    ELM_WIDGET_STANDARD_SETUP(wd, Widget_Data, parent, e, obj, NULL);
3107
3108    ELM_SET_WIDTYPE(widtype, "map");
3109    elm_widget_type_set(obj, "map");
3110    elm_widget_sub_object_add(parent, obj);
3111    elm_widget_on_focus_hook_set(obj, _on_focus_hook, NULL);
3112    elm_widget_data_set(obj, wd);
3113    elm_widget_del_hook_set(obj, _del_hook);
3114    elm_widget_del_pre_hook_set(obj, _del_pre_hook);
3115    elm_widget_theme_hook_set(obj, _theme_hook);
3116    elm_widget_can_focus_set(obj, EINA_TRUE);
3117    elm_widget_event_hook_set(obj, _event_hook);
3118
3119    wd->scr = elm_smart_scroller_add(e);
3120    elm_smart_scroller_widget_set(wd->scr, obj);
3121    elm_smart_scroller_object_theme_set(obj, wd->scr, "map", "base", "default");
3122    evas_object_smart_callback_add(wd->scr, "scroll", _scr, obj);
3123    evas_object_smart_callback_add(wd->scr, "drag", _scr, obj);
3124    elm_widget_resize_object_set(obj, wd->scr);
3125    elm_smart_scroller_wheel_disabled_set(wd->scr, EINA_TRUE);
3126
3127    evas_object_smart_callback_add(wd->scr, "animate,start", _scr_anim_start, obj);
3128    evas_object_smart_callback_add(wd->scr, "animate,stop", _scr_anim_stop, obj);
3129    evas_object_smart_callback_add(wd->scr, "drag,start", _scr_drag_start, obj);
3130    evas_object_smart_callback_add(wd->scr, "drag,stop", _scr_drag_stop, obj);
3131    evas_object_smart_callback_add(wd->scr, "scroll", _scr_scroll, obj);
3132
3133    elm_smart_scroller_bounce_allow_set(wd->scr, bounce, bounce);
3134
3135    wd->zoom_min = 0xFF;
3136    wd->zoom_max = 0X00;
3137    source_init(obj);
3138
3139    wd->obj = obj;
3140    wd->map = evas_map_new(4);
3141    if (!wd->map) return NULL;
3142
3143    wd->markers_max_num = 30;
3144    wd->pinch.level = 1.0;
3145    wd->markers = calloc(wd->zoom_max + 1, sizeof(void*));
3146
3147    evas_object_smart_callback_add(obj, "scroll-hold-on", _hold_on, obj);
3148    evas_object_smart_callback_add(obj, "scroll-hold-off", _hold_off, obj);
3149    evas_object_smart_callback_add(obj, "scroll-freeze-on", _freeze_on, obj);
3150    evas_object_smart_callback_add(obj, "scroll-freeze-off", _freeze_off, obj);
3151
3152    if (!smart)
3153      {
3154         static Evas_Smart_Class sc;
3155
3156         evas_object_smart_clipped_smart_set(&_pan_sc);
3157         sc = _pan_sc;
3158         sc.name = "elm_map_pan";
3159         sc.version = EVAS_SMART_CLASS_VERSION;
3160         sc.add = _pan_add;
3161         sc.del = _pan_del;
3162         sc.resize = _pan_resize;
3163         sc.move = _pan_move;
3164         sc.calculate = _pan_calculate;
3165         smart = evas_smart_class_new(&sc);
3166      }
3167    if (smart)
3168      {
3169         wd->pan_smart = evas_object_smart_add(e, smart);
3170         wd->pan = evas_object_smart_data_get(wd->pan_smart);
3171         wd->pan->wd = wd;
3172      }
3173
3174    elm_smart_scroller_extern_pan_set(wd->scr, wd->pan_smart,
3175                                      _pan_set, _pan_get, _pan_max_get,
3176                                      _pan_min_get, _pan_child_size_get);
3177
3178    wd->rect = evas_object_rectangle_add(e);
3179    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_RESIZE,
3180                                   _rect_resize_cb, obj);
3181    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MOUSE_DOWN,
3182                                   _mouse_down, obj);
3183    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MOUSE_MOVE,
3184                                   _mouse_move, obj);
3185    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MOUSE_UP,
3186                                   _mouse_up, obj);
3187    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MULTI_DOWN,
3188                                   _mouse_multi_down, obj);
3189    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MULTI_MOVE,
3190                                   _mouse_multi_move, obj);
3191    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MULTI_UP,
3192                                   _mouse_multi_up, obj);
3193    evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MOUSE_WHEEL,
3194                                   _mouse_wheel_cb, obj);
3195
3196    evas_object_smart_member_add(wd->rect, wd->pan_smart);
3197    elm_widget_sub_object_add(obj, wd->rect);
3198    evas_object_show(wd->rect);
3199    evas_object_color_set(wd->rect, 0, 0, 0, 0);
3200
3201    wd->mode = ELM_MAP_ZOOM_MODE_MANUAL;
3202    wd->id = ((int)getpid() << 16) | idnum;
3203    idnum++;
3204
3205    wd->tsize = 256;
3206    edje_object_size_min_calc(elm_smart_scroller_edje_object_get(wd->scr),
3207                              &minw, &minh);
3208    evas_object_size_hint_min_set(obj, minw, minh);
3209
3210    wd->sep_maps_markers = evas_object_rectangle_add(evas_object_evas_get(obj));
3211    evas_object_smart_member_add(wd->sep_maps_markers, wd->pan_smart);
3212
3213    wd->paused = EINA_TRUE;
3214    elm_map_zoom_set(obj, 0);
3215    wd->paused = EINA_FALSE;
3216    _sizing_eval(obj);
3217
3218    // TODO: convert Elementary to subclassing of Evas_Smart_Class
3219    // TODO: and save some bytes, making descriptions per-class and not instance!
3220    evas_object_smart_callbacks_descriptions_set(obj, _signals);
3221
3222    if (!ecore_file_download_protocol_available("http://"))
3223      {
3224         ERR("Ecore must be built with curl support for the map widget!");
3225      }
3226
3227    return obj;
3228 #else
3229    (void) parent;
3230    return NULL;
3231 #endif
3232 }
3233
3234 EAPI void
3235 elm_map_zoom_set(Evas_Object *obj, int zoom)
3236 {
3237 #ifdef HAVE_ELEMENTARY_ECORE_CON
3238    ELM_CHECK_WIDTYPE(obj, widtype);
3239    Widget_Data *wd = elm_widget_data_get(obj);
3240    Eina_List *l;
3241    Grid *g, *g_zoom = NULL;
3242    Evas_Coord rx, ry, rw, rh;
3243    Evas_Object *p;
3244    Elm_Map_Route *r;
3245    Evas_Object *route;
3246    int z = 0, zoom_changed = 0, started = 0;
3247
3248    if ((!wd) || (!wd->src) || (wd->zoom_animator)) return;
3249    if (zoom < 0 ) zoom = 0;
3250    if (zoom > wd->src->zoom_max) zoom = wd->src->zoom_max;
3251    if (zoom < wd->src->zoom_min) zoom = wd->src->zoom_min;
3252
3253    if ((wd->zoom - zoom) > 0) wd->zoom_method = ZOOM_METHOD_OUT;
3254    else if ((wd->zoom - zoom) < 0) wd->zoom_method = ZOOM_METHOD_IN;
3255    else wd->zoom_method = ZOOM_METHOD_NONE;
3256    if (wd->zoom != zoom ) zoom_changed = 1;
3257    wd->zoom = zoom;
3258    wd->size.ow = wd->size.w;
3259    wd->size.oh = wd->size.h;
3260    elm_smart_scroller_child_pos_get(wd->scr, &rx, &ry);
3261    elm_smart_scroller_child_viewport_size_get(wd->scr, &rw, &rh);
3262
3263    EINA_LIST_FOREACH(wd->route, l, r)
3264      {
3265         if (r)
3266           {
3267              EINA_LIST_FOREACH(r->path, l, p)
3268                {
3269                   evas_object_polygon_points_clear(p);
3270                }
3271           }
3272      }
3273
3274    EINA_LIST_FOREACH(wd->track, l, route)
3275      {
3276        evas_object_hide(route);
3277      }
3278
3279    if (wd->mode != ELM_MAP_ZOOM_MODE_MANUAL)
3280      {
3281         int p2w, p2h;
3282         int cumulw, cumulh;
3283
3284         cumulw = wd->tsize;
3285         p2w = 0;
3286         while (cumulw <= rw)
3287           {
3288              p2w++;
3289              cumulw *= 2;
3290           }
3291         p2w--;
3292
3293         cumulh = wd->tsize;
3294         p2h = 0;
3295         while (cumulh <= rh)
3296           {
3297              p2h++;
3298              cumulh *= 2;
3299           }
3300         p2h--;
3301
3302         if (wd->mode == ELM_MAP_ZOOM_MODE_AUTO_FIT)
3303           {
3304              if (p2w < p2h) z = p2w;
3305              else z = p2h;
3306           }
3307         else if (wd->mode == ELM_MAP_ZOOM_MODE_AUTO_FILL)
3308           {
3309              if (p2w > p2h) z = p2w;
3310              else z = p2h;
3311           }
3312         wd->zoom = z;
3313      }
3314    wd->size.nw = pow(2.0, wd->zoom) * wd->tsize;
3315    wd->size.nh = pow(2.0, wd->zoom) * wd->tsize;
3316
3317    g = grid_create(obj);
3318    if (g)
3319      {
3320         if (eina_list_count(wd->grids) > 1)
3321           {
3322              g_zoom = eina_list_last(wd->grids)->data;
3323              wd->grids = eina_list_remove(wd->grids, g_zoom);
3324              grid_clear(obj, g_zoom);
3325              free(g_zoom);
3326           }
3327         wd->grids = eina_list_prepend(wd->grids, g);
3328      }
3329    else
3330      {
3331         EINA_LIST_FREE(wd->grids, g)
3332           {
3333              grid_clear(obj, g);
3334              free(g);
3335           }
3336      }
3337
3338    wd->t = 1.0;
3339    if ((wd->size.w > 0) && (wd->size.h > 0))
3340      {
3341         wd->size.spos.x = (double)(rx + (rw / 2)) / (double)wd->size.ow;
3342         wd->size.spos.y = (double)(ry + (rh / 2)) / (double)wd->size.oh;
3343      }
3344    else
3345      {
3346         wd->size.spos.x = 0.5;
3347         wd->size.spos.y = 0.5;
3348      }
3349
3350    if (rw > wd->size.ow) wd->size.spos.x = 0.5;
3351    if (rh > wd->size.oh) wd->size.spos.y = 0.5;
3352    if (wd->size.spos.x > 1.0) wd->size.spos.x = 1.0;
3353    if (wd->size.spos.y > 1.0) wd->size.spos.y = 1.0;
3354
3355    if (wd->paused)
3356      {
3357         zoom_do(obj);
3358         if (wd->calc_job) ecore_job_del(wd->calc_job);
3359         wd->calc_job = ecore_job_add(_calc_job, wd);
3360      }
3361    else
3362      {
3363         if (!wd->zoom_animator)
3364           {
3365              wd->zoom_animator = ecore_animator_add(_zoom_anim, obj);
3366              wd->nosmooth++;
3367              if (wd->nosmooth == 1) _smooth_update(obj);
3368              started = 1;
3369           }
3370      }
3371
3372    if (!wd->paused)
3373      {
3374         if (started) evas_object_smart_callback_call(obj, SIG_ZOOM_START, NULL);
3375         if (!wd->zoom_animator) evas_object_smart_callback_call(obj, SIG_ZOOM_STOP, NULL);
3376      }
3377
3378    if (zoom_changed) evas_object_smart_callback_call(obj, SIG_ZOOM_CHANGE, NULL);
3379 #else
3380    (void) obj;
3381    (void) zoom;
3382 #endif
3383 }
3384
3385 EAPI int
3386 elm_map_zoom_get(const Evas_Object *obj)
3387 {
3388 #ifdef HAVE_ELEMENTARY_ECORE_CON
3389    ELM_CHECK_WIDTYPE(obj, widtype) 0;
3390    Widget_Data *wd = elm_widget_data_get(obj);
3391
3392    if (!wd) return 0;
3393    return wd->zoom;
3394 #else
3395    (void) obj;
3396    return 0;
3397 #endif
3398 }
3399
3400 EAPI void
3401 elm_map_zoom_mode_set(Evas_Object *obj, Elm_Map_Zoom_Mode mode)
3402 {
3403 #ifdef HAVE_ELEMENTARY_ECORE_CON
3404    ELM_CHECK_WIDTYPE(obj, widtype);
3405    Widget_Data *wd = elm_widget_data_get(obj);
3406
3407    if (!wd) return;
3408    if (wd->mode == mode) return;
3409    wd->mode = mode;
3410
3411    if (wd->mode != ELM_MAP_ZOOM_MODE_MANUAL)
3412      {
3413         int tz = wd->zoom;
3414         wd->zoom = 0;
3415         elm_map_zoom_set(wd->obj, tz);
3416      }
3417 #else
3418    (void) obj;
3419    (void) mode;
3420 #endif
3421 }
3422
3423 EAPI Elm_Map_Zoom_Mode
3424 elm_map_zoom_mode_get(const Evas_Object *obj)
3425 {
3426 #ifdef HAVE_ELEMENTARY_ECORE_CON
3427    ELM_CHECK_WIDTYPE(obj, widtype) ELM_MAP_ZOOM_MODE_MANUAL;
3428    Widget_Data *wd = elm_widget_data_get(obj);
3429
3430    if (!wd) return ELM_MAP_ZOOM_MODE_MANUAL;
3431    return wd->mode;
3432 #else
3433    (void) obj;
3434    return ELM_MAP_ZOOM_MODE_MANUAL;
3435 #endif
3436 }
3437
3438 EAPI void
3439 elm_map_geo_region_bring_in(Evas_Object *obj, double lon, double lat)
3440 {
3441 #ifdef HAVE_ELEMENTARY_ECORE_CON
3442    ELM_CHECK_WIDTYPE(obj, widtype);
3443    Widget_Data *wd = elm_widget_data_get(obj);
3444    int rx, ry, rw, rh;
3445
3446    if (!wd) return;
3447    elm_map_utils_convert_geo_into_coord(obj, lon, lat, wd->size.w, &rx, &ry);
3448    elm_smart_scroller_child_viewport_size_get(wd->scr, &rw, &rh);
3449
3450    rx = rx - rw / 2;
3451    ry = ry - rh / 2;
3452
3453    if (wd->zoom_animator)
3454      {
3455         wd->nosmooth--;
3456         if (!wd->nosmooth) _smooth_update(obj);
3457         ecore_animator_del(wd->zoom_animator);
3458         wd->zoom_animator = NULL;
3459         zoom_do(obj);
3460         evas_object_smart_callback_call(obj, SIG_ZOOM_STOP, NULL);
3461      }
3462    elm_smart_scroller_region_bring_in(wd->scr, rx, ry, rw, rh);
3463
3464    wd->center_on.enabled = EINA_TRUE;
3465    wd->center_on.lon = lon;
3466    wd->center_on.lat = lat;
3467 #else
3468    (void) obj;
3469    (void) lon;
3470    (void) lat;
3471 #endif
3472 }
3473
3474 EAPI void
3475 elm_map_geo_region_show(Evas_Object *obj, double lon, double lat)
3476 {
3477 #ifdef HAVE_ELEMENTARY_ECORE_CON
3478    ELM_CHECK_WIDTYPE(obj, widtype);
3479    Widget_Data *wd = elm_widget_data_get(obj);
3480    int rx, ry, rw, rh;
3481
3482    if (!wd) return;
3483    elm_map_utils_convert_geo_into_coord(obj, lon, lat, wd->size.w, &rx, &ry);
3484    elm_smart_scroller_child_viewport_size_get(wd->scr, &rw, &rh);
3485
3486    rx = rx - rw / 2;
3487    ry = ry - rh / 2;
3488
3489    if (wd->zoom_animator)
3490      {
3491         wd->nosmooth--;
3492         ecore_animator_del(wd->zoom_animator);
3493         wd->zoom_animator = NULL;
3494         zoom_do(obj);
3495         evas_object_smart_callback_call(obj, SIG_ZOOM_STOP, NULL);
3496      }
3497    elm_smart_scroller_child_region_show(wd->scr, rx, ry, rw, rh);
3498
3499    wd->center_on.enabled = EINA_TRUE;
3500    wd->center_on.lon = lon;
3501    wd->center_on.lat = lat;
3502 #else
3503    (void) obj;
3504    (void) lon;
3505    (void) lat;
3506 #endif
3507 }
3508
3509 EAPI void
3510 elm_map_geo_region_get(const Evas_Object *obj, double *lon, double *lat)
3511 {
3512 #ifdef HAVE_ELEMENTARY_ECORE_CON
3513    ELM_CHECK_WIDTYPE(obj, widtype);
3514    Widget_Data *wd = elm_widget_data_get(obj);
3515    Evas_Coord sx, sy, sw, sh;
3516
3517    if (!wd) return;
3518    elm_smart_scroller_child_pos_get(wd->scr, &sx, &sy);
3519    elm_smart_scroller_child_viewport_size_get(wd->scr, &sw, &sh);
3520    sx += sw / 2;
3521    sy += sh / 2;
3522
3523    elm_map_utils_convert_coord_into_geo(obj, sx, sy, wd->size.w, lon, lat);
3524 #else
3525    (void) obj;
3526    (void) lon;
3527    (void) lat;
3528 #endif
3529 }
3530
3531 EAPI void
3532 elm_map_paused_set(Evas_Object *obj, Eina_Bool paused)
3533 {
3534 #ifdef HAVE_ELEMENTARY_ECORE_CON
3535    ELM_CHECK_WIDTYPE(obj, widtype);
3536    Widget_Data *wd = elm_widget_data_get(obj);
3537
3538    if (!wd) return;
3539    if (wd->paused == !!paused) return;
3540    wd->paused = paused;
3541    if (wd->paused)
3542      {
3543         if (wd->zoom_animator)
3544           {
3545              if (wd->zoom_animator) ecore_animator_del(wd->zoom_animator);
3546              wd->zoom_animator = NULL;
3547              zoom_do(obj);
3548              evas_object_smart_callback_call(obj, SIG_ZOOM_STOP, NULL);
3549           }
3550      }
3551 #else
3552    (void) obj;
3553    (void) paused;
3554 #endif
3555 }
3556
3557 EAPI void
3558 elm_map_paused_markers_set(Evas_Object *obj, Eina_Bool paused)
3559 {
3560 #ifdef HAVE_ELEMENTARY_ECORE_CON
3561    ELM_CHECK_WIDTYPE(obj, widtype);
3562    Widget_Data *wd = elm_widget_data_get(obj);
3563
3564    if (!wd) return;
3565    if (wd->paused_markers == !!paused) return;
3566    wd->paused_markers = paused;
3567 #else
3568    (void) obj;
3569    (void) paused;
3570 #endif
3571 }
3572
3573 EAPI Eina_Bool
3574 elm_map_paused_get(const Evas_Object *obj)
3575 {
3576 #ifdef HAVE_ELEMENTARY_ECORE_CON
3577    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
3578    Widget_Data *wd = elm_widget_data_get(obj);
3579
3580    if (!wd) return EINA_FALSE;
3581    return wd->paused;
3582 #else
3583    (void) obj;
3584    return EINA_FALSE;
3585 #endif
3586 }
3587
3588 EAPI Eina_Bool
3589 elm_map_paused_markers_get(const Evas_Object *obj)
3590 {
3591 #ifdef HAVE_ELEMENTARY_ECORE_CON
3592    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
3593    Widget_Data *wd = elm_widget_data_get(obj);
3594
3595    if (!wd) return EINA_FALSE;
3596    return wd->paused_markers;
3597 #else
3598    (void) obj;
3599    return EINA_FALSE;
3600 #endif
3601 }
3602
3603 EAPI void
3604 elm_map_utils_downloading_status_get(const Evas_Object *obj, int *try_num, int *finish_num)
3605 {
3606 #ifdef HAVE_ELEMENTARY_ECORE_CON
3607    ELM_CHECK_WIDTYPE(obj, widtype);
3608    Widget_Data *wd = elm_widget_data_get(obj);
3609
3610    if (!wd) return;
3611    if (try_num)
3612      {
3613         *try_num = wd->try_num;
3614      }
3615
3616    if (finish_num)
3617      {
3618         *finish_num = wd->finish_num;
3619      }
3620 #else
3621    (void) obj;
3622    (void) try_num;
3623    (void) finish_num;
3624 #endif
3625 }
3626
3627 EAPI void
3628 elm_map_utils_convert_coord_into_geo(const Evas_Object *obj, int x, int y, int size, double *lon, double *lat)
3629 {
3630 #ifdef HAVE_ELEMENTARY_ECORE_CON
3631    ELM_CHECK_WIDTYPE(obj, widtype);
3632    Widget_Data *wd = elm_widget_data_get(obj);
3633
3634    if (!wd) return;
3635    int zoom = floor(log(size / 256) / log(2));
3636    if ((wd->src) && (wd->src->coord_into_geo))
3637      {
3638         if (wd->src->coord_into_geo(obj, zoom, x, y, size, lon, lat)) return;
3639      }
3640
3641    if (lon)
3642      {
3643         *lon = x / (double)size * 360.0 - 180;
3644      }
3645    if (lat)
3646      {
3647         double n = ELM_PI - 2.0 * ELM_PI * y / size;
3648         *lat = 180.0 / ELM_PI * atan(0.5 * (exp(n) - exp(-n)));
3649      }
3650 #else
3651    (void) obj;
3652    (void) x;
3653    (void) y;
3654    (void) size;
3655    (void) lon;
3656    (void) lat;
3657 #endif
3658 }
3659
3660 EAPI void
3661 elm_map_utils_convert_geo_into_coord(const Evas_Object *obj, double lon, double lat, int size, int *x, int *y)
3662 {
3663 #ifdef HAVE_ELEMENTARY_ECORE_CON
3664    ELM_CHECK_WIDTYPE(obj, widtype);
3665    Widget_Data *wd = elm_widget_data_get(obj);
3666
3667    if (!wd) return;
3668    int zoom = floor(log(size / 256) / log(2));
3669    if ((wd->src) && (wd->src->geo_into_coord))
3670      {
3671         if (wd->src->geo_into_coord(obj, zoom, lon, lat, size, x, y)) return;
3672      }
3673
3674    if (x)
3675      *x = floor((lon + 180.0) / 360.0 * size);
3676    if (y)
3677      *y = floor((1.0 - log( tan(lat * ELM_PI / 180.0) + 1.0 / cos(lat * ELM_PI / 180.0)) / ELM_PI) / 2.0 * size);
3678 #else
3679    (void) obj;
3680    (void) lon;
3681    (void) lat;
3682    (void) size;
3683    (void) x;
3684    (void) y;
3685 #endif
3686 }
3687
3688 EAPI Elm_Map_Name *
3689 elm_map_utils_convert_coord_into_name(const Evas_Object *obj, double lon, double lat)
3690 {
3691 #ifdef HAVE_ELEMENTARY_ECORE_CON
3692    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
3693    return _utils_convert_name(obj, ELM_MAP_NAME_METHOD_REVERSE, NULL, lon, lat);
3694 #else
3695    (void) obj;
3696    (void) lon;
3697    (void) lat;
3698    return NULL;
3699 #endif
3700 }
3701
3702 EAPI Elm_Map_Name *
3703 elm_map_utils_convert_name_into_coord(const Evas_Object *obj, char *address)
3704 {
3705 #ifdef HAVE_ELEMENTARY_ECORE_CON
3706    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
3707    if (!address) return NULL;
3708    return _utils_convert_name(obj, ELM_MAP_NAME_METHOD_SEARCH, address, 0.0, 0.0);
3709 #else
3710    (void) obj;
3711    (void) address;
3712    return NULL;
3713 #endif
3714 }
3715
3716 EAPI void
3717 elm_map_utils_rotate_coord(const Evas_Object *obj __UNUSED__, const Evas_Coord x, const Evas_Coord y, const Evas_Coord cx, const Evas_Coord cy, const double degree, Evas_Coord *xx, Evas_Coord *yy)
3718 {
3719 #ifdef HAVE_ELEMENTARY_ECORE_CON
3720    if ((!xx) || (!yy)) return;
3721
3722    double r = (degree * M_PI) / 180.0;
3723    double tx, ty, ttx, tty;
3724
3725    tx = x - cx;
3726    ty = y - cy;
3727
3728    ttx = tx * cos(r);
3729    tty = tx * sin(r);
3730    tx = ttx + (ty * cos(r + M_PI_2));
3731    ty = tty + (ty * sin(r + M_PI_2));
3732
3733    *xx = tx + cx;
3734    *yy = ty + cy;
3735 #else
3736    (void) x;
3737    (void) y;
3738    (void) cx;
3739    (void) cy;
3740    (void) degree;
3741    (void) xx;
3742    (void) yy;
3743 #endif
3744 }
3745
3746 EAPI Elm_Map_Marker *
3747 elm_map_marker_add(Evas_Object *obj, double lon, double lat, Elm_Map_Marker_Class *clas, Elm_Map_Group_Class *clas_group, void *data)
3748 {
3749 #ifdef HAVE_ELEMENTARY_ECORE_CON
3750    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
3751    Widget_Data *wd = elm_widget_data_get(obj);
3752    int i, j;
3753    Eina_List *l;
3754    Marker_Group *group;
3755    int mpi, mpj;
3756    int tabi[9];
3757    int tabj[9];
3758    const char *s;
3759    const char *style;
3760    Evas_Object *o;
3761
3762    if (!wd) return NULL;
3763    EINA_SAFETY_ON_NULL_RETURN_VAL(clas_group, NULL);
3764    EINA_SAFETY_ON_NULL_RETURN_VAL(clas, NULL);
3765
3766    Elm_Map_Marker *marker = ELM_NEW(Elm_Map_Marker);
3767
3768    marker->wd = wd;
3769    marker->clas = clas;
3770    marker->clas_group = clas_group;
3771    marker->longitude = lon;
3772    marker->latitude = lat;
3773    marker->data = data;
3774    marker->x = calloc(wd->zoom_max + 1, sizeof(Evas_Coord));
3775    marker->y = calloc(wd->zoom_max + 1, sizeof(Evas_Coord));
3776    marker->groups = calloc(wd->zoom_max + 1, sizeof(Marker_Group*));
3777
3778    tabi[1] = tabi[4] = tabi[6] = -1;
3779    tabi[2] = tabi[0] = tabi[7] = 0;
3780    tabi[3] = tabi[5] = tabi[8] = 1;
3781
3782    tabj[1] = tabj[2] = tabj[3] = -1;
3783    tabj[4] = tabj[0] = tabj[5] = 0;
3784    tabj[6] = tabj[7] = tabj[8] = 1;
3785
3786    if (!clas_group->priv.set)
3787      {
3788         style = "radio";
3789         if (marker->clas_group && marker->clas_group->style)
3790           style = marker->clas_group->style;
3791
3792         o = edje_object_add(evas_object_evas_get(obj));
3793         _elm_theme_object_set(obj, o, "map/marker", style, elm_widget_style_get(obj));
3794         s = edje_object_data_get(o, "size_w");
3795         if (s) clas_group->priv.edje_w = atoi(s);
3796         else clas_group->priv.edje_w = 0;
3797         s = edje_object_data_get(o, "size_h");
3798         if (s) clas_group->priv.edje_h = atoi(s);
3799         else clas_group->priv.edje_h = 0;
3800         s = edje_object_data_get(o, "size_max_w");
3801         if (s) clas_group->priv.edje_max_w = atoi(s);
3802         else clas_group->priv.edje_max_w = 0;
3803         s = edje_object_data_get(o, "size_max_h");
3804         if (s) clas_group->priv.edje_max_h = atoi(s);
3805         else clas_group->priv.edje_max_h = 0;
3806         evas_object_del(o);
3807
3808         clas_group->priv.set = EINA_TRUE;
3809      }
3810
3811    if (!clas->priv.set)
3812      {
3813         style = "radio";
3814         if (marker->clas && marker->clas->style)
3815           style = marker->clas->style;
3816
3817         o = edje_object_add(evas_object_evas_get(obj));
3818         _elm_theme_object_set(obj, o, "map/marker", style, elm_widget_style_get(obj));
3819         s = edje_object_data_get(o, "size_w");
3820         if (s) clas->priv.edje_w = atoi(s);
3821         else clas->priv.edje_w = 0;
3822         s = edje_object_data_get(o, "size_h");
3823         if (s) clas->priv.edje_h = atoi(s);
3824         else clas->priv.edje_h = 0;
3825         evas_object_del(o);
3826
3827         clas->priv.set = EINA_TRUE;
3828      }
3829
3830    for (i = clas_group->zoom_displayed; i <= wd->zoom_max; i++)
3831      {
3832         elm_map_utils_convert_geo_into_coord(obj, lon, lat, pow(2.0, i)*wd->tsize,
3833                                              &(marker->x[i]), &(marker->y[i]));
3834
3835         //search in the matrixsparse the region where the marker will be
3836         mpi = marker->x[i] / wd->tsize;
3837         mpj = marker->y[i] / wd->tsize;
3838
3839         if (!wd->markers[i])
3840           {
3841              int size =  pow(2.0, i);
3842              wd->markers[i] = eina_matrixsparse_new(size, size, NULL, NULL);
3843           }
3844
3845         group = NULL;
3846         if (i <= clas_group->zoom_grouped)
3847           {
3848              for (j = 0, group = NULL; j < 9 && !group; j++)
3849                {
3850                   EINA_LIST_FOREACH(eina_matrixsparse_data_idx_get(wd->markers[i], mpj + tabj[j], mpi + tabi[j]),
3851                                     l, group)
3852                     {
3853                        if (group->clas == marker->clas_group
3854                            && ELM_RECTS_INTERSECT(marker->x[i]-clas->priv.edje_w/4,
3855                                                   marker->y[i]-clas->priv.edje_h/4, clas->priv.edje_w, clas->priv.edje_h,
3856                                                   group->x-group->w/4, group->y-group->h/4, group->w, group->h))
3857                          {
3858                             group->markers = eina_list_append(group->markers, marker);
3859                             group->update_nbelems = EINA_TRUE;
3860                             group->update_resize = EINA_TRUE;
3861
3862                             group->sum_x += marker->x[i];
3863                             group->sum_y += marker->y[i];
3864                             group->x = group->sum_x / eina_list_count(group->markers);
3865                             group->y = group->sum_y / eina_list_count(group->markers);
3866
3867                             group->w = group->clas->priv.edje_w + group->clas->priv.edje_w/8.
3868                                * eina_list_count(group->markers);
3869                             group->h = group->clas->priv.edje_h + group->clas->priv.edje_h/8.
3870                                * eina_list_count(group->markers);
3871                             if (group->w > group->clas->priv.edje_max_w) group->w = group->clas->priv.edje_max_w;
3872                             if (group->h > group->clas->priv.edje_max_h) group->h = group->clas->priv.edje_max_h;
3873
3874                             if (group->obj && eina_list_count(group->markers) == 2)
3875                               {
3876                                  _group_object_free(group);
3877                                  _group_object_create(group);
3878                               }
3879                             if (group->bubble)
3880                               _group_bubble_content_update(group);
3881
3882                             break;
3883                          }
3884                     }
3885                }
3886           }
3887         if (!group)
3888           {
3889              group = calloc(1, sizeof(Marker_Group));
3890              group->wd = wd;
3891              group->sum_x = marker->x[i];
3892              group->sum_y = marker->y[i];
3893              group->x = marker->x[i];
3894              group->y = marker->y[i];
3895              group->w = clas_group->priv.edje_w;
3896              group->h = clas_group->priv.edje_h;
3897              group->clas = clas_group;
3898
3899              group->markers = eina_list_append(group->markers, marker);
3900              group->update_nbelems = EINA_TRUE;
3901              group->update_resize = EINA_TRUE;
3902
3903              eina_matrixsparse_cell_idx_get(wd->markers[i], mpj, mpi, &(group->cell));
3904
3905              if (!group->cell)
3906                {
3907                   l = eina_list_append(NULL, group);
3908                   eina_matrixsparse_data_idx_set(wd->markers[i], mpj, mpi, l);
3909                   eina_matrixsparse_cell_idx_get(wd->markers[i], mpj, mpi, &(group->cell));
3910                }
3911              else
3912                {
3913                   l = eina_matrixsparse_cell_data_get(group->cell);
3914                   l = eina_list_append(l, group);
3915                   eina_matrixsparse_cell_data_set(group->cell, l);
3916                }
3917           }
3918         marker->groups[i] = group;
3919      }
3920
3921    if (wd->grids)
3922      {
3923         Evas_Coord ox, oy, ow, oh;
3924         evas_object_geometry_get(obj, &ox, &oy, &ow, &oh);
3925         marker_place(obj, eina_list_data_get(wd->grids), wd->pan_x, wd->pan_y, ox, oy, ow, oh);
3926      }
3927
3928    return marker;
3929 #else
3930    (void) obj;
3931    (void) lon;
3932    (void) lat;
3933    (void) clas;
3934    (void) clas_group;
3935    (void) data;
3936    return NULL;
3937 #endif
3938 }
3939
3940 EAPI void
3941 elm_map_marker_remove(Elm_Map_Marker *marker)
3942 {
3943 #ifdef HAVE_ELEMENTARY_ECORE_CON
3944    int i;
3945    Eina_List *groups;
3946    Widget_Data *wd;
3947
3948    EINA_SAFETY_ON_NULL_RETURN(marker);
3949    wd = marker->wd;
3950    if (!wd) return;
3951    for (i = marker->clas_group->zoom_displayed; i <= wd->zoom_max; i++)
3952      {
3953         marker->groups[i]->markers = eina_list_remove(marker->groups[i]->markers, marker);
3954         if (!eina_list_count(marker->groups[i]->markers))
3955           {
3956              groups = eina_matrixsparse_cell_data_get(marker->groups[i]->cell);
3957              groups = eina_list_remove(groups, marker->groups[i]);
3958              eina_matrixsparse_cell_data_set(marker->groups[i]->cell, groups);
3959
3960              _group_object_free(marker->groups[i]);
3961              _group_bubble_free(marker->groups[i]);
3962              free(marker->groups[i]);
3963           }
3964         else
3965           {
3966              marker->groups[i]->sum_x -= marker->x[i];
3967              marker->groups[i]->sum_y -= marker->y[i];
3968
3969              marker->groups[i]->x = marker->groups[i]->sum_x / eina_list_count(marker->groups[i]->markers);
3970              marker->groups[i]->y = marker->groups[i]->sum_y / eina_list_count(marker->groups[i]->markers);
3971
3972              marker->groups[i]->w = marker->groups[i]->clas->priv.edje_w
3973                 + marker->groups[i]->clas->priv.edje_w/8. * eina_list_count(marker->groups[i]->markers);
3974              marker->groups[i]->h = marker->groups[i]->clas->priv.edje_h
3975                 + marker->groups[i]->clas->priv.edje_h/8. * eina_list_count(marker->groups[i]->markers);
3976              if (marker->groups[i]->w > marker->groups[i]->clas->priv.edje_max_w)
3977                marker->groups[i]->w = marker->groups[i]->clas->priv.edje_max_w;
3978              if (marker->groups[i]->h > marker->groups[i]->clas->priv.edje_max_h)
3979                marker->groups[i]->h = marker->groups[i]->clas->priv.edje_max_h;
3980
3981              if ((marker->groups[i]->obj) && (eina_list_count(marker->groups[i]->markers) == 1))
3982                {
3983                   _group_object_free(marker->groups[i]);
3984                   _group_object_create(marker->groups[i]);
3985                }
3986           }
3987      }
3988
3989    if ((marker->content) && (marker->clas->func.del))
3990      marker->clas->func.del(marker->wd->obj, marker, marker->data, marker->content);
3991    else if (marker->content)
3992      evas_object_del(marker->content);
3993
3994    if (marker->x) free(marker->x);
3995    if (marker->y) free(marker->y);
3996    if (marker->groups) free(marker->groups);
3997
3998    free(marker);
3999
4000    if (wd->grids)
4001      {
4002         Evas_Coord ox, oy, ow, oh;
4003         evas_object_geometry_get(wd->obj, &ox, &oy, &ow, &oh);
4004         marker_place(wd->obj, eina_list_data_get(wd->grids), wd->pan_x, wd->pan_y, ox, oy, ow, oh);
4005      }
4006 #else
4007    (void) marker;
4008 #endif
4009 }
4010
4011 EAPI void
4012 elm_map_marker_region_get(const Elm_Map_Marker *marker, double *lon, double *lat)
4013 {
4014 #ifdef HAVE_ELEMENTARY_ECORE_CON
4015    EINA_SAFETY_ON_NULL_RETURN(marker);
4016    if (lon) *lon = marker->longitude;
4017    if (lat) *lat = marker->latitude;
4018 #else
4019    (void) marker;
4020    (void) lon;
4021    (void) lat;
4022 #endif
4023 }
4024
4025 EAPI void
4026 elm_map_marker_bring_in(Elm_Map_Marker *marker)
4027 {
4028 #ifdef HAVE_ELEMENTARY_ECORE_CON
4029    EINA_SAFETY_ON_NULL_RETURN(marker);
4030    elm_map_geo_region_bring_in(marker->wd->obj, marker->longitude, marker->latitude);
4031 #else
4032    (void) marker;
4033 #endif
4034 }
4035
4036 EAPI void
4037 elm_map_marker_show(Elm_Map_Marker *marker)
4038 {
4039 #ifdef HAVE_ELEMENTARY_ECORE_CON
4040    EINA_SAFETY_ON_NULL_RETURN(marker);
4041    elm_map_geo_region_show(marker->wd->obj, marker->longitude, marker->latitude);
4042 #else
4043    (void) marker;
4044 #endif
4045 }
4046
4047 EAPI void
4048 elm_map_markers_list_show(Eina_List *markers)
4049 {
4050 #ifdef HAVE_ELEMENTARY_ECORE_CON
4051    int zoom;
4052    double lon, lat;
4053    Eina_List *l;
4054    Elm_Map_Marker *marker, *m_max_lon = NULL, *m_max_lat = NULL, *m_min_lon = NULL, *m_min_lat = NULL;
4055    Evas_Coord rw, rh, xc, yc;
4056    Widget_Data *wd;
4057
4058    EINA_SAFETY_ON_NULL_RETURN(markers);
4059    EINA_LIST_FOREACH(markers, l, marker)
4060      {
4061         wd = marker->wd;
4062
4063         if ((!m_min_lon) || (marker->longitude < m_min_lon->longitude))
4064           m_min_lon = marker;
4065
4066         if ((!m_max_lon) || (marker->longitude > m_max_lon->longitude))
4067           m_max_lon = marker;
4068
4069         if ((!m_min_lat) || (marker->latitude > m_min_lat->latitude))
4070           m_min_lat = marker;
4071
4072         if ((!m_max_lat) || (marker->latitude < m_max_lat->latitude))
4073           m_max_lat = marker;
4074      }
4075
4076    lon = (m_max_lon->longitude - m_min_lon->longitude) / 2. + m_min_lon->longitude;
4077    lat = (m_max_lat->latitude - m_min_lat->latitude) / 2. + m_min_lat->latitude;
4078
4079    elm_smart_scroller_child_viewport_size_get(wd->scr, &rw, &rh);
4080    for (zoom = wd->src->zoom_max; zoom > wd->src->zoom_min; zoom--)
4081      {
4082         Evas_Coord size = pow(2.0, zoom)*wd->tsize;
4083         elm_map_utils_convert_geo_into_coord(wd->obj, lon, lat, size, &xc, &yc);
4084
4085         if ((m_min_lon->x[zoom] - wd->marker_max_w >= xc-rw/2)
4086             && (m_min_lat->y[zoom] - wd->marker_max_h >= yc-rh/2)
4087             && (m_max_lon->x[zoom] + wd->marker_max_w <= xc+rw/2)
4088             && (m_max_lat->y[zoom] + wd->marker_max_h <= yc+rh/2))
4089           break;
4090      }
4091
4092    elm_map_geo_region_show(wd->obj, lon, lat);
4093    elm_map_zoom_set(wd->obj, zoom);
4094 #else
4095    (void) markers;
4096 #endif
4097 }
4098
4099 EAPI void
4100 elm_map_max_marker_per_group_set(Evas_Object *obj, int max)
4101 {
4102 #ifdef HAVE_ELEMENTARY_ECORE_CON
4103    ELM_CHECK_WIDTYPE(obj, widtype);
4104    Widget_Data *wd = elm_widget_data_get(obj);
4105
4106    if (!wd) return;
4107    wd->markers_max_num = max;
4108 #else
4109    (void) obj;
4110    (void) max;
4111 #endif
4112 }
4113
4114 EAPI Evas_Object *
4115 elm_map_marker_object_get(const Elm_Map_Marker *marker)
4116 {
4117 #ifdef HAVE_ELEMENTARY_ECORE_CON
4118    EINA_SAFETY_ON_NULL_RETURN_VAL(marker, NULL);
4119    return marker->content;
4120 #else
4121    (void) marker;
4122    return NULL;
4123 #endif
4124 }
4125
4126 EAPI void
4127 elm_map_marker_update(Elm_Map_Marker *marker)
4128 {
4129 #ifdef HAVE_ELEMENTARY_ECORE_CON
4130    EINA_SAFETY_ON_NULL_RETURN(marker);
4131    if (marker->content)
4132      {
4133         if (marker->clas->func.del)
4134           marker->clas->func.del(marker->wd->obj, marker, marker->data, marker->content);
4135         else
4136           evas_object_del(marker->content);
4137         marker->content = NULL;
4138         _group_bubble_content_update(marker->groups[marker->wd->zoom]);
4139      }
4140 #else
4141    (void) marker;
4142 #endif
4143 }
4144
4145 EAPI void
4146 elm_map_bubbles_close(Evas_Object *obj)
4147 {
4148 #ifdef HAVE_ELEMENTARY_ECORE_CON
4149    ELM_CHECK_WIDTYPE(obj, widtype);
4150    Widget_Data *wd = elm_widget_data_get(obj);
4151    Marker_Group *group;
4152    Eina_List *l, *l_next;
4153
4154    if (!wd) return;
4155    EINA_LIST_FOREACH_SAFE(wd->opened_bubbles, l, l_next, group)
4156       _group_bubble_free(group);
4157 #else
4158    (void) obj;
4159 #endif
4160 }
4161
4162 EAPI Elm_Map_Group_Class *
4163 elm_map_group_class_new(Evas_Object *obj)
4164 {
4165 #ifdef HAVE_ELEMENTARY_ECORE_CON
4166    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4167    Widget_Data *wd = elm_widget_data_get(obj);
4168
4169    if (!wd) return NULL;
4170    Elm_Map_Group_Class *clas = calloc(1, sizeof(Elm_Map_Group_Class));
4171    clas->zoom_grouped = wd->zoom_max;
4172    wd->groups_clas = eina_list_append(wd->groups_clas, clas);
4173    return clas;
4174 #else
4175    (void) obj;
4176    return NULL;
4177 #endif
4178 }
4179
4180 EAPI void
4181 elm_map_group_class_style_set(Elm_Map_Group_Class *clas, const char *style)
4182 {
4183 #ifdef HAVE_ELEMENTARY_ECORE_CON
4184    EINA_SAFETY_ON_NULL_RETURN(clas);
4185    eina_stringshare_replace(&clas->style, style);
4186 #else
4187    (void) clas;
4188    (void) style;
4189 #endif
4190 }
4191
4192 EAPI void
4193 elm_map_group_class_icon_cb_set(Elm_Map_Group_Class *clas, ElmMapGroupIconGetFunc icon_get)
4194 {
4195 #ifdef HAVE_ELEMENTARY_ECORE_CON
4196    EINA_SAFETY_ON_NULL_RETURN(clas);
4197    clas->func.icon_get = icon_get;
4198 #else
4199    (void) clas;
4200    (void) icon_get;
4201 #endif
4202 }
4203
4204 EAPI void
4205 elm_map_group_class_data_set(Elm_Map_Group_Class *clas, void *data)
4206 {
4207 #ifdef HAVE_ELEMENTARY_ECORE_CON
4208    EINA_SAFETY_ON_NULL_RETURN(clas);
4209    clas->data = data;
4210 #else
4211    (void) clas;
4212    (void) data;
4213 #endif
4214 }
4215
4216 EAPI void
4217 elm_map_group_class_zoom_displayed_set(Elm_Map_Group_Class *clas, int zoom)
4218 {
4219 #ifdef HAVE_ELEMENTARY_ECORE_CON
4220    EINA_SAFETY_ON_NULL_RETURN(clas);
4221    clas->zoom_displayed = zoom;
4222 #else
4223    (void) clas;
4224    (void) zoom;
4225 #endif
4226 }
4227
4228 EAPI void
4229 elm_map_group_class_zoom_grouped_set(Elm_Map_Group_Class *clas, int zoom)
4230 {
4231 #ifdef HAVE_ELEMENTARY_ECORE_CON
4232    EINA_SAFETY_ON_NULL_RETURN(clas);
4233    clas->zoom_grouped = zoom;
4234 #else
4235    (void) clas;
4236    (void) zoom;
4237 #endif
4238 }
4239
4240 EAPI void
4241 elm_map_group_class_hide_set(Evas_Object *obj, Elm_Map_Group_Class *clas, Eina_Bool hide)
4242 {
4243 #ifdef HAVE_ELEMENTARY_ECORE_CON
4244    ELM_CHECK_WIDTYPE(obj, widtype);
4245    Widget_Data *wd = elm_widget_data_get(obj);
4246
4247    if (!wd) return;
4248    EINA_SAFETY_ON_NULL_RETURN(clas);
4249    if (clas->hide == hide) return;
4250    clas->hide = hide;
4251    if (wd->grids)
4252      {
4253         Evas_Coord ox, oy, ow, oh;
4254         evas_object_geometry_get(obj, &ox, &oy, &ow, &oh);
4255         marker_place(obj, eina_list_data_get(wd->grids), wd->pan_x, wd->pan_y, ox, oy, ow, oh);
4256      }
4257 #else
4258    (void) obj;
4259    (void) clas;
4260    (void) hide;
4261 #endif
4262 }
4263
4264 EAPI Elm_Map_Marker_Class *
4265 elm_map_marker_class_new(Evas_Object *obj)
4266 {
4267 #ifdef HAVE_ELEMENTARY_ECORE_CON
4268    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4269    Widget_Data *wd = elm_widget_data_get(obj);
4270
4271    if (!wd) return NULL;
4272    Elm_Map_Marker_Class *clas = calloc(1, sizeof(Elm_Map_Marker_Class));
4273    wd->markers_clas = eina_list_append(wd->markers_clas, clas);
4274    return clas;
4275 #else
4276    (void) obj;
4277    return NULL;
4278 #endif
4279 }
4280
4281 EAPI void
4282 elm_map_marker_class_style_set(Elm_Map_Marker_Class *clas, const char *style)
4283 {
4284 #ifdef HAVE_ELEMENTARY_ECORE_CON
4285    EINA_SAFETY_ON_NULL_RETURN(clas);
4286    eina_stringshare_replace(&clas->style, style);
4287 #else
4288    (void) clas;
4289    (void) style;
4290 #endif
4291 }
4292
4293 EAPI void
4294 elm_map_marker_class_icon_cb_set(Elm_Map_Marker_Class *clas, ElmMapMarkerIconGetFunc icon_get)
4295 {
4296 #ifdef HAVE_ELEMENTARY_ECORE_CON
4297    EINA_SAFETY_ON_NULL_RETURN(clas);
4298    clas->func.icon_get = icon_get;
4299 #else
4300    (void) clas;
4301    (void) icon_get;
4302 #endif
4303 }
4304
4305 EAPI void
4306 elm_map_marker_class_get_cb_set(Elm_Map_Marker_Class *clas, ElmMapMarkerGetFunc get)
4307 {
4308 #ifdef HAVE_ELEMENTARY_ECORE_CON
4309    EINA_SAFETY_ON_NULL_RETURN(clas);
4310    clas->func.get = get;
4311 #else
4312    (void) clas;
4313    (void) get;
4314 #endif
4315 }
4316
4317 EAPI void
4318 elm_map_marker_class_del_cb_set(Elm_Map_Marker_Class *clas, ElmMapMarkerDelFunc del)
4319 {
4320 #ifdef HAVE_ELEMENTARY_ECORE_CON
4321    EINA_SAFETY_ON_NULL_RETURN(clas);
4322    clas->func.del = del;
4323 #else
4324    (void) clas;
4325    (void) del;
4326 #endif
4327 }
4328
4329 EAPI const char **
4330 elm_map_source_names_get(const Evas_Object *obj)
4331 {
4332 #ifdef HAVE_ELEMENTARY_ECORE_CON
4333    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4334    Widget_Data *wd = elm_widget_data_get(obj);
4335
4336    if (!wd) return NULL;
4337    return wd->source_names;
4338 #else
4339    (void) obj;
4340    return NULL;
4341 #endif
4342 }
4343
4344 EAPI void
4345 elm_map_source_name_set(Evas_Object *obj, const char *source_name)
4346 {
4347 #ifdef HAVE_ELEMENTARY_ECORE_CON
4348    ELM_CHECK_WIDTYPE(obj, widtype);
4349    Widget_Data *wd = elm_widget_data_get(obj);
4350    Map_Sources_Tab *s;
4351    Eina_List *l;
4352    Grid *grid;
4353    int zoom;
4354
4355    if (!wd) return;
4356    if (wd->src)
4357      {
4358         if (!strcmp(wd->src->name, source_name)) return;
4359         if (!wd->src->url_cb) return;
4360      }
4361
4362    EINA_LIST_FREE(wd->grids, grid) grid_clear(obj, grid);
4363    EINA_LIST_FOREACH(wd->map_sources_tab, l, s)
4364      {
4365         if (!strcmp(s->name, source_name))
4366           {
4367              wd->src = s;
4368              break;
4369           }
4370      }
4371    zoom = wd->zoom;
4372    wd->zoom = -1;
4373
4374    if (wd->src)
4375      {
4376         if (wd->src->zoom_max < zoom)
4377           zoom = wd->src->zoom_max;
4378         if (wd->src->zoom_min > zoom)
4379           zoom = wd->src->zoom_min;
4380      }
4381    elm_map_zoom_set(obj, zoom);
4382 #else
4383    (void) obj;
4384    (void) source_name;
4385 #endif
4386 }
4387
4388 EAPI const char *
4389 elm_map_source_name_get(const Evas_Object *obj)
4390 {
4391 #ifdef HAVE_ELEMENTARY_ECORE_CON
4392    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4393    Widget_Data *wd = elm_widget_data_get(obj);
4394
4395    if ((!wd) || (!wd->src)) return NULL;
4396    return wd->src->name;
4397 #else
4398    (void) obj;
4399    return NULL;
4400 #endif
4401 }
4402
4403 EAPI void
4404 elm_map_route_source_set(Evas_Object *obj, Elm_Map_Route_Sources source)
4405 {
4406 #ifdef HAVE_ELEMENTARY_ECORE_CON
4407    ELM_CHECK_WIDTYPE(obj, widtype);
4408    Widget_Data *wd = elm_widget_data_get(obj);
4409
4410    if (!wd) return;
4411    wd->route_source = source;
4412 #else
4413    (void) obj;
4414    (void) source;
4415 #endif
4416 }
4417
4418 EAPI Elm_Map_Route_Sources
4419 elm_map_route_source_get(const Evas_Object *obj)
4420 {
4421 #ifdef HAVE_ELEMENTARY_ECORE_CON
4422    ELM_CHECK_WIDTYPE(obj, widtype) ELM_MAP_ROUTE_SOURCE_YOURS;
4423    Widget_Data *wd = elm_widget_data_get(obj);
4424
4425    if (!wd) return ELM_MAP_ROUTE_SOURCE_YOURS;
4426    return wd->route_source;
4427 #else
4428    (void) obj;
4429    return ELM_MAP_ROUTE_SOURCE_YOURS;
4430 #endif
4431 }
4432
4433 EAPI void
4434 elm_map_source_zoom_max_set(Evas_Object *obj, int zoom)
4435 {
4436 #ifdef HAVE_ELEMENTARY_ECORE_CON
4437    ELM_CHECK_WIDTYPE(obj, widtype);
4438    Widget_Data *wd = elm_widget_data_get(obj);
4439
4440    if ((!wd) || (!wd->src)) return;
4441    if ((zoom > wd->zoom_max) || (zoom < wd->zoom_min)) return;
4442    wd->src->zoom_max = zoom;
4443 #else
4444    (void) obj;
4445    (void) zoom;
4446 #endif
4447 }
4448
4449 EAPI int
4450 elm_map_source_zoom_max_get(const Evas_Object *obj)
4451 {
4452 #ifdef HAVE_ELEMENTARY_ECORE_CON
4453    ELM_CHECK_WIDTYPE(obj, widtype) 18;
4454    Widget_Data *wd = elm_widget_data_get(obj);
4455
4456    if ((!wd) || (!wd->src)) return 18;
4457    return wd->src->zoom_max;
4458 #else
4459    (void) obj;
4460    return 18;
4461 #endif
4462 }
4463
4464 EAPI void
4465 elm_map_source_zoom_min_set(Evas_Object *obj, int zoom)
4466 {
4467 #ifdef HAVE_ELEMENTARY_ECORE_CON
4468    ELM_CHECK_WIDTYPE(obj, widtype);
4469    Widget_Data *wd = elm_widget_data_get(obj);
4470
4471    if ((!wd) || (!wd->src)) return;
4472    if ((zoom > wd->zoom_max) || (zoom < wd->zoom_min)) return;
4473    wd->src->zoom_min = zoom;
4474 #else
4475    (void) obj;
4476    (void) zoom;
4477 #endif
4478 }
4479
4480 EAPI int
4481 elm_map_source_zoom_min_get(const Evas_Object *obj)
4482 {
4483 #ifdef HAVE_ELEMENTARY_ECORE_CON
4484    ELM_CHECK_WIDTYPE(obj, widtype) 0;
4485    Widget_Data *wd = elm_widget_data_get(obj);
4486
4487    if ((!wd) || (!wd->src)) return 0;
4488    return wd->src->zoom_min;
4489 #else
4490    (void) obj;
4491    return 0;
4492 #endif
4493 }
4494
4495 EAPI void
4496 elm_map_user_agent_set(Evas_Object *obj, const char *user_agent)
4497 {
4498 #ifdef HAVE_ELEMENTARY_ECORE_CON
4499    ELM_CHECK_WIDTYPE(obj, widtype);
4500    Widget_Data *wd = elm_widget_data_get(obj);
4501
4502    if (!wd) return;
4503    if (!wd->user_agent) wd->user_agent = eina_stringshare_add(user_agent);
4504    else eina_stringshare_replace(&wd->user_agent, user_agent);
4505
4506    if (!wd->ua) wd->ua = eina_hash_string_small_new(NULL);
4507    eina_hash_set(wd->ua, "User-Agent", wd->user_agent);
4508 #else
4509    (void) obj;
4510    (void) user_agent;
4511 #endif
4512 }
4513
4514 EAPI const char *
4515 elm_map_user_agent_get(const Evas_Object *obj)
4516 {
4517 #ifdef HAVE_ELEMENTARY_ECORE_CON
4518    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4519    Widget_Data *wd = elm_widget_data_get(obj);
4520
4521    if (!wd) return NULL;
4522    return wd->user_agent;
4523 #else
4524    (void) obj;
4525    return NULL;
4526 #endif
4527 }
4528
4529 EAPI Elm_Map_Route *
4530 elm_map_route_add(Evas_Object *obj,
4531                   Elm_Map_Route_Type type,
4532                   Elm_Map_Route_Method method,
4533                   double flon,
4534                   double flat,
4535                   double tlon,
4536                   double tlat)
4537 {
4538 #ifdef HAVE_ELEMENTARY_ECORE_CON
4539    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4540    Widget_Data *wd = elm_widget_data_get(obj);
4541    char buf[PATH_MAX];
4542    char *source;
4543    char *type_name = NULL;
4544    int fd;
4545
4546    if ((!wd) || (!wd->src)) return NULL;
4547
4548    Elm_Map_Route *route = ELM_NEW(Elm_Map_Route);
4549    if (!route) return NULL;
4550
4551    snprintf(buf, sizeof(buf), DEST_ROUTE_XML_FILE);
4552    fd = mkstemp(buf);
4553    if (fd < 0)
4554      {
4555         free(route);
4556         return NULL;
4557      }
4558
4559    route->con_url = ecore_con_url_new(NULL);
4560    route->ud.fname = strdup(buf);
4561    INF("xml file : %s", route->ud.fname);
4562
4563    route->ud.fd = fdopen(fd, "w+");
4564    if ((!route->con_url) || (!route->ud.fd))
4565      {
4566         ecore_con_url_free(route->con_url);
4567         free(route);
4568         return NULL;
4569      }
4570
4571    route->wd = wd;
4572    route->color.r = 255;
4573    route->color.g = 0;
4574    route->color.b = 0;
4575    route->color.a = 255;
4576    route->handlers = eina_list_append
4577      (route->handlers, (void *)ecore_event_handler_add
4578          (ECORE_CON_EVENT_URL_COMPLETE, _route_complete_cb, route));
4579
4580    route->inbound = EINA_FALSE;
4581    route->type = type;
4582    route->method = method;
4583    route->flon = flon;
4584    route->flat = flat;
4585    route->tlon = tlon;
4586    route->tlat = tlat;
4587
4588    switch (type)
4589      {
4590       case ELM_MAP_ROUTE_TYPE_MOTOCAR:
4591         type_name = strdup(ROUTE_TYPE_MOTORCAR);
4592         break;
4593       case ELM_MAP_ROUTE_TYPE_BICYCLE:
4594         type_name = strdup(ROUTE_TYPE_BICYCLE);
4595         break;
4596       case ELM_MAP_ROUTE_TYPE_FOOT:
4597         type_name = strdup(ROUTE_TYPE_FOOT);
4598         break;
4599       default:
4600         break;
4601      }
4602
4603    source = wd->src->route_url_cb(obj, type_name, method, flon, flat, tlon, tlat);
4604    INF("route url = %s", source);
4605
4606    wd->route = eina_list_append(wd->route, route);
4607
4608    ecore_con_url_url_set(route->con_url, source);
4609    ecore_con_url_fd_set(route->con_url, fileno(route->ud.fd));
4610    ecore_con_url_data_set(route->con_url, route);
4611    ecore_con_url_get(route->con_url);
4612    if (type_name) free(type_name);
4613    if (source) free(source);
4614
4615    edje_object_signal_emit(elm_smart_scroller_edje_object_get(wd->scr),
4616                            "elm,state,busy,start", "elm");
4617    evas_object_smart_callback_call(wd->obj, SIG_ROUTE_LOAD, NULL);
4618    return route;
4619 #else
4620    (void) obj;
4621    (void) type;
4622    (void) method;
4623    (void) flon;
4624    (void) flat;
4625    (void) tlon;
4626    (void) tlat;
4627    return NULL;
4628 #endif
4629 }
4630
4631 EAPI void
4632 elm_map_route_remove(Elm_Map_Route *route)
4633 {
4634 #ifdef HAVE_ELEMENTARY_ECORE_CON
4635    EINA_SAFETY_ON_NULL_RETURN(route);
4636
4637    Path_Waypoint *w;
4638    Path_Node *n;
4639    Evas_Object *p;
4640    Ecore_Event_Handler *h;
4641
4642    EINA_LIST_FREE(route->path, p)
4643      {
4644         evas_object_del(p);
4645      }
4646
4647    EINA_LIST_FREE(route->waypoint, w)
4648      {
4649         if (w->point) eina_stringshare_del(w->point);
4650         free(w);
4651      }
4652
4653    EINA_LIST_FREE(route->nodes, n)
4654      {
4655         if (n->pos.address) eina_stringshare_del(n->pos.address);
4656         free(n);
4657      }
4658
4659    EINA_LIST_FREE(route->handlers, h)
4660      {
4661         ecore_event_handler_del(h);
4662      }
4663
4664    if (route->ud.fname)
4665      {
4666         ecore_file_remove(route->ud.fname);
4667         free(route->ud.fname);
4668         route->ud.fname = NULL;
4669      }
4670 #else
4671    (void) route;
4672 #endif
4673 }
4674
4675 EAPI void
4676 elm_map_route_color_set(Elm_Map_Route *route, int r, int g , int b, int a)
4677 {
4678 #ifdef HAVE_ELEMENTARY_ECORE_CON
4679    EINA_SAFETY_ON_NULL_RETURN(route);
4680    route->color.r = r;
4681    route->color.g = g;
4682    route->color.b = b;
4683    route->color.a = a;
4684 #else
4685    (void) route;
4686    (void) r;
4687    (void) g;
4688    (void) b;
4689    (void) a;
4690 #endif
4691 }
4692
4693 EAPI void
4694 elm_map_route_color_get(const Elm_Map_Route *route, int *r, int *g , int *b, int *a)
4695 {
4696 #ifdef HAVE_ELEMENTARY_ECORE_CON
4697    EINA_SAFETY_ON_NULL_RETURN(route);
4698    if (r) *r = route->color.r;
4699    if (g) *g = route->color.g;
4700    if (b) *b = route->color.b;
4701    if (a) *a = route->color.a;
4702 #else
4703    (void) route;
4704    (void) r;
4705    (void) g;
4706    (void) b;
4707    (void) a;
4708 #endif
4709 }
4710
4711 EAPI double
4712 elm_map_route_distance_get(const Elm_Map_Route *route)
4713 {
4714 #ifdef HAVE_ELEMENTARY_ECORE_CON
4715    EINA_SAFETY_ON_NULL_RETURN_VAL(route, 0.0);
4716    return route->info.distance;
4717 #else
4718    (void) route;
4719    return 0.0;
4720 #endif
4721 }
4722
4723 EAPI const char*
4724 elm_map_route_node_get(const Elm_Map_Route *route)
4725 {
4726 #ifdef HAVE_ELEMENTARY_ECORE_CON
4727    EINA_SAFETY_ON_NULL_RETURN_VAL(route, NULL);
4728    return route->info.nodes;
4729 #else
4730    (void) route;
4731    return NULL;
4732 #endif
4733 }
4734
4735 EAPI const char*
4736 elm_map_route_waypoint_get(const Elm_Map_Route *route)
4737 {
4738 #ifdef HAVE_ELEMENTARY_ECORE_CON
4739    EINA_SAFETY_ON_NULL_RETURN_VAL(route, NULL);
4740    return route->info.waypoints;
4741 #else
4742    (void) route;
4743    return NULL;
4744 #endif
4745 }
4746
4747 EAPI const char *
4748 elm_map_name_address_get(const Elm_Map_Name *name)
4749 {
4750 #ifdef HAVE_ELEMENTARY_ECORE_CON
4751    EINA_SAFETY_ON_NULL_RETURN_VAL(name, NULL);
4752    return name->address;
4753 #else
4754    (void) name;
4755    return NULL;
4756 #endif
4757 }
4758
4759 EAPI void
4760 elm_map_name_region_get(const Elm_Map_Name *name, double *lon, double *lat)
4761 {
4762 #ifdef HAVE_ELEMENTARY_ECORE_CON
4763    EINA_SAFETY_ON_NULL_RETURN(name);
4764    if (lon) *lon = name->lon;
4765    if (lat) *lat = name->lat;
4766 #else
4767    (void) name;
4768    (void) lon;
4769    (void) lat;
4770 #endif
4771 }
4772
4773 EAPI void
4774 elm_map_name_remove(Elm_Map_Name *name)
4775 {
4776 #ifdef HAVE_ELEMENTARY_ECORE_CON
4777    EINA_SAFETY_ON_NULL_RETURN(name);
4778    if (name->address)
4779      {
4780         free(name->address);
4781         name->address = NULL;
4782      }
4783    if (name->handler)
4784      {
4785         ecore_event_handler_del(name->handler);
4786         name->handler = NULL;
4787      }
4788    if (name->ud.fname)
4789      {
4790         ecore_file_remove(name->ud.fname);
4791         free(name->ud.fname);
4792         name->ud.fname = NULL;
4793      }
4794 #else
4795    (void) name;
4796 #endif
4797 }
4798
4799 EAPI void
4800 elm_map_rotate_set(Evas_Object *obj, double degree, Evas_Coord cx, Evas_Coord cy)
4801 {
4802 #ifdef HAVE_ELEMENTARY_ECORE_CON
4803    ELM_CHECK_WIDTYPE(obj, widtype);
4804    Widget_Data *wd = elm_widget_data_get(obj);
4805
4806    if (!wd) return;
4807    wd->rotate.d = degree;
4808    wd->rotate.cx = cx;
4809    wd->rotate.cy = cy;
4810    wd->calc_job = ecore_job_add(_calc_job, wd);
4811 #else
4812    (void) obj;
4813    (void) degree;
4814    (void) cx;
4815    (void) cy;
4816 #endif
4817 }
4818
4819 EAPI void
4820 elm_map_rotate_get(const Evas_Object *obj, double *degree, Evas_Coord *cx, Evas_Coord *cy)
4821 {
4822 #ifdef HAVE_ELEMENTARY_ECORE_CON
4823    ELM_CHECK_WIDTYPE(obj, widtype);
4824    Widget_Data *wd = elm_widget_data_get(obj);
4825
4826    if (!wd) return;
4827    if (degree) *degree = wd->rotate.d;
4828    if (cx) *cx = wd->rotate.cx;
4829    if (cy) *cy = wd->rotate.cy;
4830 #else
4831    (void) obj;
4832    (void) degree;
4833    (void) cx;
4834    (void) cy;
4835 #endif
4836 }
4837
4838 EAPI void
4839 elm_map_wheel_disabled_set(Evas_Object *obj, Eina_Bool disabled)
4840 {
4841 #ifdef HAVE_ELEMENTARY_ECORE_CON
4842    ELM_CHECK_WIDTYPE(obj, widtype);
4843    Widget_Data *wd = elm_widget_data_get(obj);
4844
4845    if (!wd) return;
4846    if ((!wd->wheel_disabled) && (disabled))
4847      evas_object_event_callback_del_full(wd->rect, EVAS_CALLBACK_MOUSE_WHEEL, _mouse_wheel_cb, obj);
4848    else if ((wd->wheel_disabled) && (!disabled))
4849      evas_object_event_callback_add(wd->rect, EVAS_CALLBACK_MOUSE_WHEEL, _mouse_wheel_cb, obj);
4850    wd->wheel_disabled = !!disabled;
4851 #else
4852    (void) obj;
4853    (void) disabled;
4854 #endif
4855 }
4856
4857 EAPI Eina_Bool
4858 elm_map_wheel_disabled_get(const Evas_Object *obj)
4859 {
4860 #ifdef HAVE_ELEMENTARY_ECORE_CON
4861    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
4862    Widget_Data *wd = elm_widget_data_get(obj);
4863
4864    if (!wd) return EINA_FALSE;
4865    return wd->wheel_disabled;
4866 #else
4867    (void) obj;
4868    return EINA_FALSE;
4869 #endif
4870 }
4871
4872 #ifdef ELM_EMAP
4873 EAPI Evas_Object *
4874 elm_map_track_add(Evas_Object *obj, EMap_Route *emap)
4875 {
4876 #ifdef HAVE_ELEMENTARY_ECORE_CON
4877    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
4878    Widget_Data *wd = elm_widget_data_get(obj);
4879
4880    if (!wd) return EINA_FALSE;
4881
4882    Evas_Object *route = elm_route_add(obj);
4883    elm_route_emap_set(route, emap);
4884    wd->track = eina_list_append(wd->track, route);
4885
4886    return route;
4887 #else
4888    (void) obj;
4889    (void) emap;
4890    return NULL;
4891 #endif
4892 }
4893 #endif
4894
4895 EAPI void
4896 elm_map_track_remove(Evas_Object *obj, Evas_Object *route)
4897 {
4898 #ifdef HAVE_ELEMENTARY_ECORE_CON
4899    ELM_CHECK_WIDTYPE(obj, widtype) ;
4900    Widget_Data *wd = elm_widget_data_get(obj);
4901
4902    if (!wd) return ;
4903
4904    wd->track = eina_list_remove(wd->track, route);
4905    evas_object_del(route);
4906 #else
4907    (void) obj;
4908    (void) route;
4909 #endif
4910 }
4911
4912 #ifdef HAVE_ELEMENTARY_ECORE_CON
4913
4914 static char *
4915 _mapnik_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom)
4916 {
4917    char buf[PATH_MAX];
4918    snprintf(buf, sizeof(buf), "http://tile.openstreetmap.org/%d/%d/%d.png",
4919           zoom, x, y);
4920    return strdup(buf);
4921 }
4922
4923 static char *
4924 _osmarender_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom)
4925 {
4926    char buf[PATH_MAX];
4927    snprintf(buf, sizeof(buf),
4928             "http://tah.openstreetmap.org/Tiles/tile/%d/%d/%d.png",
4929             zoom, x, y);
4930    return strdup(buf);
4931 }
4932
4933 static char *
4934 _cyclemap_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom)
4935 {
4936    char buf[PATH_MAX];
4937    snprintf(buf, sizeof(buf),
4938             "http://andy.sandbox.cloudmade.com/tiles/cycle/%d/%d/%d.png",
4939             zoom, x, y);
4940    return strdup(buf);
4941 }
4942
4943 static char *
4944 _maplint_url_cb(Evas_Object *obj __UNUSED__, int x, int y, int zoom)
4945 {
4946    char buf[PATH_MAX];
4947    snprintf(buf, sizeof(buf),
4948             "http://tah.openstreetmap.org/Tiles/maplint/%d/%d/%d.png",
4949             zoom, x, y);
4950    return strdup(buf);
4951 }
4952
4953 static char *_yours_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat)
4954 {
4955    char buf[PATH_MAX];
4956    snprintf(buf, sizeof(buf),
4957             "%s?flat=%lf&flon=%lf&tlat=%lf&tlon=%lf&v=%s&fast=%d&instructions=1",
4958             ROUTE_YOURS_URL, flat, flon, tlat, tlon, type_name, method);
4959
4960    return strdup(buf);
4961 }
4962
4963 // TODO: fix monav api
4964 /*
4965 static char *_monav_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat)
4966 {
4967    char buf[PATH_MAX];
4968    snprintf(buf, sizeof(buf),
4969             "%s?flat=%f&flon=%f&tlat=%f&tlon=%f&v=%s&fast=%d&instructions=1",
4970             ROUTE_MONAV_URL, flat, flon, tlat, tlon, type_name, method);
4971
4972    return strdup(buf);
4973 }
4974 */
4975
4976 // TODO: fix ors api
4977 /*
4978 static char *_ors_url_cb(Evas_Object *obj __UNUSED__, char *type_name, int method, double flon, double flat, double tlon, double tlat)
4979 {
4980    char buf[PATH_MAX];
4981    snprintf(buf, sizeof(buf),
4982             "%s?flat=%f&flon=%f&tlat=%f&tlon=%f&v=%s&fast=%d&instructions=1",
4983             ROUTE_ORS_URL, flat, flon, tlat, tlon, type_name, method);
4984
4985    return strdup(buf);
4986 }
4987 */
4988
4989 static char *
4990 _nominatim_url_cb(Evas_Object *obj, int method, char *name, double lon, double lat)
4991 {
4992    ELM_CHECK_WIDTYPE(obj, widtype) strdup("");
4993    Widget_Data *wd = elm_widget_data_get(obj);
4994    char **str;
4995    unsigned int ele, idx;
4996    char search_url[PATH_MAX];
4997    char buf[PATH_MAX];
4998
4999    if (!wd) return strdup("");
5000    if (method == ELM_MAP_NAME_METHOD_SEARCH)
5001      {
5002         search_url[0] = '\0';
5003         str = eina_str_split_full(name, " ", 0, &ele);
5004         for (idx = 0 ; idx < ele ; idx++)
5005           {
5006              eina_strlcat(search_url, str[idx], sizeof(search_url));
5007              if (!(idx == (ele-1))) eina_strlcat(search_url, "+", sizeof(search_url));
5008           }
5009         snprintf(buf, sizeof(buf), "%s/search?q=%s&format=xml&polygon=0&addressdetails=0", NAME_NOMINATIM_URL, search_url);
5010
5011         if (str && str[0])
5012           {
5013              free(str[0]);
5014              free(str);
5015           }
5016      }
5017    else if (method == ELM_MAP_NAME_METHOD_REVERSE) snprintf(buf, sizeof(buf), "%s/reverse?format=xml&lat=%lf&lon=%lf&zoom=%d&addressdetails=0", NAME_NOMINATIM_URL, lat, lon, wd->zoom);
5018    else strcpy(buf, "");
5019
5020    return strdup(buf);
5021 }
5022
5023 #endif