src/examples/web_example_02.c

   1 /*
   2  * gcc -o web_example_02 web_example_02.c `pkg-config --cflags --libs elementary ewebkit` -D_GNU_SOURCE
   3  */
   4
   5 #define _GNU_SOURCE
   6 #include <Elementary.h>
   7 #ifdef HAVE_ELEMENTARY_WEB
   8 #include <EWebKit.h>
   9 #endif
  10
  11 typedef struct _Tab_Data Tab_Data;
  12
  13 typedef struct
  14 {
  15    Evas_Object *win;
  16    Evas_Object *main_box;
  17    Evas_Object *naviframe;
  18    Evas_Object *url_entry;
  19    Evas_Object *default_web;
  20    Evas_Object *tabs;
  21    Evas_Object *close_tab;
  22    Evas_Object *search_box;
  23    Evas_Object *search_entry;
  24
  25    struct {
  26         Evas_Object *back;
  27         Evas_Object *fwd;
  28         Evas_Object *refresh;
  29    } nav;
  30
  31    Tab_Data *current_tab;
  32
  33    Eina_Bool exiting : 1;
  34 } App_Data;
  35
  36 struct _Tab_Data
  37 {
  38    Evas_Object *web;
  39    App_Data *app;
  40    Elm_Object_Item *tab;
  41 };
  42
  43 static Evas_Object * _web_create_window_cb(void *data, Evas_Object *obj, Eina_Bool js, const Elm_Web_Window_Features *wf);
  44
  45 static void
  46 nav_button_update(App_Data *ad)
  47 {
  48    Eina_Bool back, fwd;
  49
  50    back = !elm_web_back_possible_get(ad->current_tab->web);
  51    fwd = !elm_web_forward_possible_get(ad->current_tab->web);
  52
  53    elm_object_disabled_set(ad->nav.back, back);
  54    elm_object_disabled_set(ad->nav.fwd, fwd);
  55 }
  56
  57 static void
  58 tab_current_set(Tab_Data *td)
  59 {
  60    const char *url;
  61
  62    if (td == td->app->current_tab)
  63      return;
  64
  65    td->app->current_tab = td;
  66
  67    url = elm_web_url_get(td->web);
  68    elm_object_text_set(td->app->url_entry, url);
  69
  70    nav_button_update(td->app);
  71    elm_entry_icon_visible_set(td->app->url_entry, EINA_TRUE);
  72
  73    elm_naviframe_item_simple_promote(td->app->naviframe, td->web);
  74 }
  75
  76 static void
  77 _tab_clicked_cb(void *data, Evas_Object *obj, void *event_info)
  78 {
  79    Tab_Data *td = data;
  80    /* the first toolbar_item_append() calls the select callback before the item
  81     * is assigned, so we need a workaround for that. */
  82    if (!td->tab)
  83      td->tab = event_info;
  84    tab_current_set(td);
  85 }
  86
  87 static void
  88 _title_changed_cb(void *data, Evas_Object *obj, void *event_info)
  89 {
  90    Tab_Data *td = data;
  91    const char *title = event_info;
  92    char buf[20] = "";
  93
  94    if (title)
  95      strncpy(buf, title, sizeof(buf) - 1);
  96    elm_object_item_text_set(td->tab, buf);
  97 }
  98
  99 static void
 100 _url_changed_cb(void *data, Evas_Object *obj, void *event_info)
 101 {
 102    Tab_Data *td = data;
 103    const char *url = event_info;
 104
 105    if (td != td->app->current_tab)
 106      return;
 107
 108    nav_button_update(td->app);
 109    elm_object_text_set(td->app->url_entry, url);
 110 }
 111
 112 static void
 113 _web_free_cb(void *data, Evas *e, Evas_Object *obj, void *event_info)
 114 {
 115    Tab_Data *td = data;
 116
 117    if (td->tab)
 118      elm_object_item_del(td->tab);
 119
 120    free(td);
 121 }
 122
 123 static void
 124 _tb_item_del_cb(void *data, Evas_Object *obj, void *event_info)
 125 {
 126    Tab_Data *td = data;
 127    if (!td->app->exiting && !elm_toolbar_selected_item_get(obj))
 128      {
 129         td->app->current_tab = NULL;
 130         elm_entry_icon_visible_set(td->app->url_entry, EINA_FALSE);
 131         if (td->app->search_box)
 132           evas_object_del(td->app->search_box);
 133      }
 134    td->tab = NULL;
 135 }
 136
 137 Tab_Data *
 138 tab_add(App_Data *ad)
 139 {
 140    Tab_Data *td;
 141
 142    td = calloc(1, sizeof(Tab_Data));
 143    if (!td) return NULL;
 144
 145    td->web = elm_web_add(ad->win);
 146    elm_web_window_create_hook_set(td->web, _web_create_window_cb, ad);
 147    elm_web_inwin_mode_set(td->web, EINA_TRUE);
 148    evas_object_size_hint_weight_set(td->web, EVAS_HINT_EXPAND,
 149                                     EVAS_HINT_EXPAND);
 150    evas_object_size_hint_align_set(td->web, EVAS_HINT_FILL, EVAS_HINT_FILL);
 151    elm_naviframe_item_simple_push(ad->naviframe, td->web);
 152
 153    td->app = ad;
 154    td->tab = elm_toolbar_item_append(td->app->tabs, NULL, "New tab",
 155                                      _tab_clicked_cb, td);
 156    elm_object_item_del_cb_set(td->tab, _tb_item_del_cb);
 157
 158    evas_object_data_set(td->web, "tab_data", td);
 159
 160    evas_object_smart_callback_add(td->web, "title,changed", _title_changed_cb,
 161                                   td);
 162    evas_object_smart_callback_add(td->web, "url,changed", _url_changed_cb, td);
 163    evas_object_event_callback_add(td->web, EVAS_CALLBACK_FREE, _web_free_cb,
 164                                   td);
 165
 166    elm_toolbar_item_selected_set(td->tab, EINA_TRUE);
 167    return td;
 168 }
 169
 170 static char *
 171 url_sanitize(const char *url)
 172 {
 173    char *fixed_url;
 174    char *schema;
 175    char *tmp;
 176
 177    if (!url || !*url) return NULL;
 178
 179    tmp = strstr(url, "://");
 180    if (!tmp || (tmp == url) || (tmp > (url + 15)))
 181      {
 182         char *new_url = NULL;
 183         if (ecore_file_exists(url))
 184           {
 185              schema = "file";
 186              new_url = ecore_file_realpath(url);
 187           }
 188         else
 189           schema = "http";
 190
 191         if (asprintf(&fixed_url, "%s://%s", schema, new_url ? new_url : url) >
 192             0)
 193           {
 194              free(new_url);
 195              return fixed_url;
 196           }
 197         free(new_url);
 198      }
 199    else
 200      return strdup(url);
 201
 202    return NULL;
 203 }
 204
 205 static void
 206 tab_url_set(Tab_Data *td, const char *url)
 207 {
 208    char *sane_url = url_sanitize(url);
 209    elm_web_url_set(td->web, sane_url);
 210    free(sane_url);
 211 }
 212
 213 static void
 214 _url_entry_activated_cb(void *data, Evas_Object *obj, void *event_info)
 215 {
 216    App_Data *ad = data;
 217    Tab_Data *td;
 218    const char *url = eina_stringshare_ref(elm_object_text_get(obj));
 219
 220    if (!ad->current_tab)
 221      td = tab_add(ad);
 222    else
 223      td = ad->current_tab;
 224    tab_url_set(td, url);
 225    eina_stringshare_del(url);
 226 }
 227
 228 static void
 229 _nav_back_cb(void *data, Evas_Object *obj, void *event_info)
 230 {
 231    App_Data *ad = data;
 232
 233    elm_web_back(ad->current_tab->web);
 234 }
 235
 236 static void
 237 _nav_refresh_cb(void *data, Evas_Object *obj, void *event_info)
 238 {
 239    App_Data *ad = data;
 240    const Evas_Modifier *mods = evas_key_modifier_get(evas_object_evas_get(obj));
 241
 242    if (evas_key_modifier_is_set(mods, "Shift"))
 243      elm_web_reload_full(ad->current_tab->web);
 244    else
 245      elm_web_reload(ad->current_tab->web);
 246 }
 247
 248 static void
 249 _nav_fwd_cb(void *data, Evas_Object *obj, void *event_info)
 250 {
 251    App_Data *ad = data;
 252
 253    elm_web_forward(ad->current_tab->web);
 254 }
 255
 256 static void
 257 _close_tab_cb(void *data, Evas_Object *obj, void *event_info)
 258 {
 259    App_Data *ad = data;
 260
 261    if (!ad->current_tab)
 262      return;
 263    evas_object_del(ad->current_tab->web);
 264 }
 265
 266 static void
 267 _add_tab_cb(void *data, Evas_Object *obj, void *event_info)
 268 {
 269    App_Data *ad = data;
 270    tab_add(ad);
 271    elm_object_focus_set(ad->url_entry, EINA_TRUE);
 272 }
 273
 274 static Evas_Object *
 275 _web_create_window_cb(void *data, Evas_Object *obj, Eina_Bool js, const Elm_Web_Window_Features *wf)
 276 {
 277    App_Data *ad = data;
 278    Tab_Data *td;
 279
 280    td = tab_add(ad);
 281    return td->web;
 282 }
 283
 284 static void
 285 _win_del_request_cb(void *data, Evas_Object *obj, void *event_info)
 286 {
 287    App_Data *ad = data;
 288    ad->exiting = EINA_TRUE;
 289 }
 290
 291 static void
 292 _win_free_cb(void *data, Evas *e, Evas_Object *obj, void *event_info)
 293 {
 294    free(data);
 295 }
 296
 297 static void
 298 _search_entry_changed_cb(void *data, Evas_Object *obj, void *event_info)
 299 {
 300    App_Data *ad = data;
 301    const char *text;
 302
 303    text = elm_object_text_get(obj);
 304    elm_web_text_search(ad->current_tab->web, text, EINA_FALSE, EINA_TRUE,
 305                        EINA_TRUE);
 306    elm_web_text_matches_unmark_all(ad->current_tab->web);
 307    elm_web_text_matches_mark(ad->current_tab->web, text, EINA_FALSE, EINA_TRUE,
 308                              0);
 309 }
 310
 311 static void
 312 _search_entry_activate_cb(void *data, Evas_Object *obj, void *event_info)
 313 {
 314    App_Data *ad = data;
 315    const char *text;
 316
 317    text = elm_object_text_get(obj);
 318    elm_web_text_search(ad->current_tab->web, text, EINA_FALSE, EINA_TRUE,
 319                        EINA_TRUE);
 320 }
 321
 322 static void
 323 _search_next_cb(void *data, Evas_Object *obj, void *event_info)
 324 {
 325    App_Data *ad = data;
 326    const char *text;
 327
 328    text = elm_object_text_get(ad->search_entry);
 329    elm_web_text_search(ad->current_tab->web, text, EINA_FALSE, EINA_TRUE,
 330                        EINA_TRUE);
 331 }
 332
 333 static void
 334 _search_prev_cb(void *data, Evas_Object *obj, void *event_info)
 335 {
 336    App_Data *ad = data;
 337    const char *text;
 338
 339    text = elm_object_text_get(ad->search_entry);
 340    elm_web_text_search(ad->current_tab->web, text, EINA_FALSE, EINA_FALSE,
 341                        EINA_TRUE);
 342 }
 343
 344 static void
 345 _search_close_cb(void *data, Evas_Object *obj, void *event_info)
 346 {
 347    App_Data *ad = data;
 348    evas_object_del(ad->search_box);
 349 }
 350
 351 static void
 352 _search_box_del_cb(void *data, Evas *e, Evas_Object *obj, void *event_info)
 353 {
 354    App_Data *ad = data;
 355    ad->search_box = NULL;
 356    ad->search_entry = NULL;
 357 }
 358
 359 static void
 360 _win_search_trigger_cb(void *data, Evas *e, Evas_Object *obj, void *event_info)
 361 {
 362    Evas_Event_Key_Down *ev = event_info;
 363    App_Data *ad = data;
 364    Evas_Object *box, *box2, *entry, *btn, *ic;
 365
 366    if (strcmp(ev->keyname, "f") ||
 367        !evas_key_modifier_is_set(ev->modifiers, "Control"))
 368      return;
 369    if (ad->search_box || !ad->current_tab)
 370      return;
 371
 372    box = elm_box_add(ad->win);
 373    elm_box_horizontal_set(box, EINA_TRUE);
 374    evas_object_size_hint_weight_set(box, EVAS_HINT_EXPAND, 0.0);
 375    evas_object_size_hint_align_set(box, EVAS_HINT_FILL, EVAS_HINT_FILL);
 376    elm_box_pack_after(ad->main_box, box, ad->url_entry);
 377    evas_object_show(box);
 378
 379    evas_object_event_callback_add(box, EVAS_CALLBACK_DEL, _search_box_del_cb,
 380                                   ad);
 381
 382    entry = elm_entry_add(ad->win);
 383    elm_entry_single_line_set(entry, EINA_TRUE);
 384    elm_entry_scrollable_set(entry, EINA_TRUE);
 385    evas_object_size_hint_weight_set(entry, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 386    evas_object_size_hint_align_set(entry, EVAS_HINT_FILL, EVAS_HINT_FILL);
 387    elm_box_pack_end(box, entry);
 388    evas_object_show(entry);
 389
 390    evas_object_smart_callback_add(entry, "changed", _search_entry_changed_cb,
 391                                   ad);
 392    evas_object_smart_callback_add(entry, "activated", _search_entry_activate_cb,
 393                                   ad);
 394
 395    box2 = elm_box_add(ad->win);
 396    elm_box_horizontal_set(box2, EINA_TRUE);
 397    elm_object_part_content_set(entry, "end", box2);
 398
 399    btn = elm_button_add(ad->win);
 400    elm_box_pack_end(box2, btn);
 401    evas_object_show(btn);
 402
 403    ic = elm_icon_add(ad->win);
 404    elm_icon_standard_set(ic, "arrow_up");
 405    elm_object_part_content_set(btn, "icon", ic);
 406
 407    evas_object_smart_callback_add(btn, "clicked", _search_prev_cb, ad);
 408
 409    btn = elm_button_add(ad->win);
 410    elm_box_pack_end(box2, btn);
 411    evas_object_show(btn);
 412
 413    ic = elm_icon_add(ad->win);
 414    elm_icon_standard_set(ic, "arrow_down");
 415    elm_object_part_content_set(btn, "icon", ic);
 416
 417    evas_object_smart_callback_add(btn, "clicked", _search_next_cb, ad);
 418
 419    btn = elm_button_add(ad->win);
 420    elm_box_pack_end(box, btn);
 421    evas_object_show(btn);
 422
 423    ic = elm_icon_add(ad->win);
 424    elm_icon_standard_set(ic, "close");
 425    elm_object_part_content_set(btn, "icon", ic);
 426
 427    evas_object_smart_callback_add(btn, "clicked", _search_close_cb, ad);
 428
 429    ad->search_box = box;
 430    ad->search_entry = entry;
 431
 432    elm_object_focus_set(entry, EINA_TRUE);
 433 }
 434
 435 static void
 436 default_content_set(Evas_Object *web)
 437 {
 438 #ifdef HAVE_ELEMENTARY_WEB
 439    Evas_Object *view, *frame;
 440    const char contents[] = ""
 441       "<html>\n"
 442       "  <head>\n"
 443       "    <title>Nothing to see here, move along</title>\n"
 444       "  </head>\n"
 445       "  <body>\n"
 446       "    <a href=\"http://www.enlightenment.org\" target=\"_blank\">E</a>\n"
 447       "    <br />\n"
 448       "    <a href=\"http://www.google.com\" target=\"_blank\">Google</a>\n"
 449       "    <br />\n"
 450       "  </body>\n"
 451       "</html>\n";
 452
 453    view = elm_web_webkit_view_get(web);
 454    frame = ewk_view_frame_main_get(view);
 455    ewk_frame_contents_set(frame, contents, sizeof(contents) - 1, "text/html",
 456                           "UTF-8", NULL);
 457 #else
 458    (void) web;
 459 #endif
 460 }
 461
 462 EAPI_MAIN int
 463 elm_main(int argc, char *argv[])
 464 {
 465    Evas_Object *win, *box, *box2, *btn, *ic, *url_bar, *naviframe, *tabs, *web;
 466    Evas *e;
 467    Evas_Modifier_Mask ctrl_mask;
 468    App_Data *ad;
 469
 470    if (!elm_need_web())
 471      return -1;
 472
 473    ad = calloc(1, sizeof(App_Data));
 474    if (!ad) return -1;
 475
 476    elm_policy_set(ELM_POLICY_QUIT, ELM_POLICY_QUIT_LAST_WINDOW_CLOSED);
 477
 478    win = elm_win_util_standard_add("example-web", "Web Example");
 479    elm_win_autodel_set(win, EINA_TRUE);
 480
 481    e = evas_object_evas_get(win);
 482    ctrl_mask = evas_key_modifier_mask_get(e, "Control");
 483    if (!evas_object_key_grab(win, "f", ctrl_mask, 0, EINA_TRUE))
 484      fprintf(stderr, "Could not grab trigger for search dialog\n");
 485
 486    evas_object_smart_callback_add(win, "delete,request", _win_del_request_cb,
 487                                   ad);
 488    evas_object_event_callback_add(win, EVAS_CALLBACK_KEY_DOWN,
 489                                   _win_search_trigger_cb, ad);
 490    evas_object_event_callback_add(win, EVAS_CALLBACK_FREE, _win_free_cb, ad);
 491
 492    box = elm_box_add(win);
 493    evas_object_size_hint_weight_set(box, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 494    elm_win_resize_object_add(win, box);
 495    evas_object_show(box);
 496
 497    url_bar = elm_entry_add(win);
 498    elm_entry_single_line_set(url_bar, EINA_TRUE);
 499    elm_entry_scrollable_set(url_bar, EINA_TRUE);
 500    evas_object_size_hint_weight_set(url_bar, EVAS_HINT_EXPAND, 0.0);
 501    evas_object_size_hint_align_set(url_bar, EVAS_HINT_FILL, EVAS_HINT_FILL);
 502    elm_box_pack_end(box, url_bar);
 503    evas_object_show(url_bar);
 504
 505    evas_object_smart_callback_add(url_bar, "activated", _url_entry_activated_cb, ad);
 506
 507    box2 = elm_box_add(win);
 508    elm_box_horizontal_set(box2, EINA_TRUE);
 509    elm_object_part_content_set(url_bar, "icon", box2);
 510    elm_entry_icon_visible_set(url_bar, EINA_FALSE);
 511
 512    btn = elm_button_add(win);
 513    elm_box_pack_end(box2, btn);
 514    evas_object_show(btn);
 515
 516    ad->nav.back = btn;
 517
 518    ic = elm_icon_add(win);
 519    elm_icon_standard_set(ic, "arrow_left");
 520    elm_object_part_content_set(btn, "icon", ic);
 521
 522    evas_object_smart_callback_add(btn, "clicked", _nav_back_cb, ad);
 523
 524    btn = elm_button_add(win);
 525    elm_box_pack_end(box2, btn);
 526    evas_object_show(btn);
 527
 528    ad->nav.refresh = btn;
 529
 530    ic = elm_icon_add(win);
 531    elm_icon_standard_set(ic, "refresh");
 532    elm_object_part_content_set(btn, "icon", ic);
 533
 534    evas_object_smart_callback_add(btn, "clicked", _nav_refresh_cb, ad);
 535
 536    btn = elm_button_add(win);
 537    elm_box_pack_end(box2, btn);
 538    evas_object_show(btn);
 539
 540    ad->nav.fwd = btn;
 541
 542    ic = elm_icon_add(win);
 543    elm_icon_standard_set(ic, "arrow_right");
 544    elm_object_part_content_set(btn, "icon", ic);
 545
 546    evas_object_smart_callback_add(btn, "clicked", _nav_fwd_cb, ad);
 547
 548    box2 = elm_box_add(win);
 549    elm_box_horizontal_set(box2, EINA_TRUE);
 550    evas_object_size_hint_weight_set(box2, EVAS_HINT_EXPAND, 0.0);
 551    evas_object_size_hint_align_set(box2, EVAS_HINT_FILL, EVAS_HINT_FILL);
 552    elm_box_pack_end(box, box2);
 553    evas_object_show(box2);
 554
 555    btn = elm_button_add(win);
 556    elm_box_pack_end(box2, btn);
 557    evas_object_show(btn);
 558
 559    ic = elm_icon_add(win);
 560    elm_icon_standard_set(ic, "file");
 561    elm_object_part_content_set(btn, "icon", ic);
 562
 563    evas_object_smart_callback_add(btn, "clicked", _add_tab_cb, ad);
 564
 565    tabs = elm_toolbar_add(win);
 566    elm_toolbar_align_set(tabs, 0.0);
 567    elm_toolbar_select_mode_set(tabs, ELM_OBJECT_SELECT_MODE_ALWAYS);
 568    elm_toolbar_homogeneous_set(tabs, EINA_FALSE);
 569    elm_toolbar_shrink_mode_set(tabs, ELM_TOOLBAR_SHRINK_MENU);
 570    evas_object_size_hint_weight_set(tabs, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 571    evas_object_size_hint_align_set(tabs, EVAS_HINT_FILL, EVAS_HINT_FILL);
 572    elm_box_pack_end(box2, tabs);
 573    evas_object_show(tabs);
 574
 575    btn = elm_button_add(win);
 576    elm_box_pack_end(box2, btn);
 577    evas_object_show(btn);
 578
 579    evas_object_smart_callback_add(btn, "clicked", _close_tab_cb, ad);
 580
 581    ic = elm_icon_add(win);
 582    elm_icon_standard_set(ic, "close");
 583    elm_object_part_content_set(btn, "icon", ic);
 584
 585    naviframe = elm_naviframe_add(win);
 586    evas_object_size_hint_weight_set(naviframe, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 587    evas_object_size_hint_align_set(naviframe, EVAS_HINT_FILL, EVAS_HINT_FILL);
 588    elm_box_pack_end(box, naviframe);
 589    evas_object_show(naviframe);
 590
 591    elm_toolbar_menu_parent_set(tabs, naviframe);
 592
 593    web = elm_web_add(win);
 594    elm_web_window_create_hook_set(web, _web_create_window_cb, ad);
 595    elm_web_history_enabled_set(web, EINA_FALSE);
 596    evas_object_size_hint_weight_set(web, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 597    evas_object_size_hint_align_set(web, EVAS_HINT_FILL, EVAS_HINT_FILL);
 598    elm_naviframe_item_simple_push(naviframe, web);
 599
 600    default_content_set(web);
 601
 602    ad->win = win;
 603    ad->main_box = box;
 604    ad->naviframe = naviframe;
 605    ad->url_entry = url_bar;
 606    ad->default_web = web;
 607    ad->tabs = tabs;
 608    ad->close_tab = btn;
 609
 610    evas_object_resize(win, 480, 640);
 611    evas_object_show(win);
 612
 613    elm_run();
 614
 615    return 0;
 616 }
 617 ELM_MAIN()