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;
  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 *uri;
  61
  62    if (td == td->app->current_tab)
  63      return;
  64
  65    td->app->current_tab = td;
  66
  67    uri = elm_web_uri_get(td->web);
  68    elm_object_text_set(td->app->url, uri);
  69
  70    nav_button_update(td->app);
  71    elm_entry_icon_visible_set(td->app->url, 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 _uri_changed_cb(void *data, Evas_Object *obj, void *event_info)
 101 {
 102    Tab_Data *td = data;
 103    const char *uri = 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, uri);
 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, 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, "uri,changed", _uri_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 uri_sanitize(const char *uri)
 172 {
 173    char *fixed_uri;
 174    char *schema;
 175    char *tmp;
 176
 177    if (!uri || !*uri) return NULL;
 178
 179    tmp = strstr(uri, "://");
 180    if (!tmp || (tmp == uri) || (tmp > (uri + 15)))
 181      {
 182         char *new_uri = NULL;
 183         if (ecore_file_exists(uri))
 184           {
 185              schema = "file";
 186              new_uri = ecore_file_realpath(uri);
 187           }
 188         else
 189           schema = "http";
 190
 191         if (asprintf(&fixed_uri, "%s://%s", schema, new_uri ? new_uri : uri) >
 192             0)
 193           {
 194              free(new_uri);
 195              return fixed_uri;
 196           }
 197         free(new_uri);
 198      }
 199    else
 200      return strdup(uri);
 201
 202    return NULL;
 203 }
 204
 205 static void
 206 tab_uri_set(Tab_Data *td, const char *uri)
 207 {
 208    char *sane_uri = uri_sanitize(uri);
 209    elm_web_uri_set(td->web, sane_uri);
 210    free(sane_uri);
 211 }
 212
 213 static void
 214 _url_activated_cb(void *data, Evas_Object *obj, void *event_info)
 215 {
 216    App_Data *ad = data;
 217    Tab_Data *td;
 218    const char *uri = 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_uri_set(td, uri);
 225    eina_stringshare_del(uri);
 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, 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);
 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, *bg, *box, *box2, *btn, *ic, *url, *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_add(NULL, "example-web", ELM_WIN_BASIC);
 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    bg = elm_bg_add(win);
 493    evas_object_size_hint_weight_set(bg, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 494    elm_win_resize_object_add(win, bg);
 495    evas_object_show(bg);
 496
 497    box = elm_box_add(win);
 498    evas_object_size_hint_weight_set(box, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 499    elm_win_resize_object_add(win, box);
 500    evas_object_show(box);
 501
 502    url = elm_entry_add(win);
 503    elm_entry_single_line_set(url, EINA_TRUE);
 504    elm_entry_scrollable_set(url, EINA_TRUE);
 505    evas_object_size_hint_weight_set(url, EVAS_HINT_EXPAND, 0.0);
 506    evas_object_size_hint_align_set(url, EVAS_HINT_FILL, EVAS_HINT_FILL);
 507    elm_box_pack_end(box, url);
 508    evas_object_show(url);
 509
 510    evas_object_smart_callback_add(url, "activated", _url_activated_cb, ad);
 511
 512    box2 = elm_box_add(win);
 513    elm_box_horizontal_set(box2, EINA_TRUE);
 514    elm_object_part_content_set(url, "icon", box2);
 515    elm_entry_icon_visible_set(url, EINA_FALSE);
 516
 517    btn = elm_button_add(win);
 518    elm_box_pack_end(box2, btn);
 519    evas_object_show(btn);
 520
 521    ad->nav.back = btn;
 522
 523    ic = elm_icon_add(win);
 524    elm_icon_standard_set(ic, "arrow_left");
 525    elm_object_part_content_set(btn, "icon", ic);
 526
 527    evas_object_smart_callback_add(btn, "clicked", _nav_back_cb, ad);
 528
 529    btn = elm_button_add(win);
 530    elm_box_pack_end(box2, btn);
 531    evas_object_show(btn);
 532
 533    ad->nav.refresh = btn;
 534
 535    ic = elm_icon_add(win);
 536    elm_icon_standard_set(ic, "refresh");
 537    elm_object_part_content_set(btn, "icon", ic);
 538
 539    evas_object_smart_callback_add(btn, "clicked", _nav_refresh_cb, ad);
 540
 541    btn = elm_button_add(win);
 542    elm_box_pack_end(box2, btn);
 543    evas_object_show(btn);
 544
 545    ad->nav.fwd = btn;
 546
 547    ic = elm_icon_add(win);
 548    elm_icon_standard_set(ic, "arrow_right");
 549    elm_object_part_content_set(btn, "icon", ic);
 550
 551    evas_object_smart_callback_add(btn, "clicked", _nav_fwd_cb, ad);
 552
 553    box2 = elm_box_add(win);
 554    elm_box_horizontal_set(box2, EINA_TRUE);
 555    evas_object_size_hint_weight_set(box2, EVAS_HINT_EXPAND, 0.0);
 556    evas_object_size_hint_align_set(box2, EVAS_HINT_FILL, EVAS_HINT_FILL);
 557    elm_box_pack_end(box, box2);
 558    evas_object_show(box2);
 559
 560    btn = elm_button_add(win);
 561    elm_box_pack_end(box2, btn);
 562    evas_object_show(btn);
 563
 564    ic = elm_icon_add(win);
 565    elm_icon_standard_set(ic, "file");
 566    elm_object_part_content_set(btn, "icon", ic);
 567
 568    evas_object_smart_callback_add(btn, "clicked", _add_tab_cb, ad);
 569
 570    tabs = elm_toolbar_add(win);
 571    elm_toolbar_align_set(tabs, 0.0);
 572    elm_toolbar_select_mode_set(tabs, ELM_OBJECT_SELECT_MODE_ALWAYS);
 573    elm_toolbar_homogeneous_set(tabs, EINA_FALSE);
 574    elm_toolbar_shrink_mode_set(tabs, ELM_TOOLBAR_SHRINK_MENU);
 575    evas_object_size_hint_weight_set(tabs, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 576    evas_object_size_hint_align_set(tabs, EVAS_HINT_FILL, EVAS_HINT_FILL);
 577    elm_box_pack_end(box2, tabs);
 578    evas_object_show(tabs);
 579
 580    btn = elm_button_add(win);
 581    elm_box_pack_end(box2, btn);
 582    evas_object_show(btn);
 583
 584    evas_object_smart_callback_add(btn, "clicked", _close_tab_cb, ad);
 585
 586    ic = elm_icon_add(win);
 587    elm_icon_standard_set(ic, "close");
 588    elm_object_part_content_set(btn, "icon", ic);
 589
 590    naviframe = elm_naviframe_add(win);
 591    evas_object_size_hint_weight_set(naviframe, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 592    evas_object_size_hint_align_set(naviframe, EVAS_HINT_FILL, EVAS_HINT_FILL);
 593    elm_box_pack_end(box, naviframe);
 594    evas_object_show(naviframe);
 595
 596    elm_toolbar_menu_parent_set(tabs, naviframe);
 597
 598    web = elm_web_add(win);
 599    elm_web_window_create_hook_set(web, _web_create_window_cb, ad);
 600    elm_web_history_enabled_set(web, EINA_FALSE);
 601    evas_object_size_hint_weight_set(web, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 602    evas_object_size_hint_align_set(web, EVAS_HINT_FILL, EVAS_HINT_FILL);
 603    elm_naviframe_item_simple_push(naviframe, web);
 604
 605    default_content_set(web);
 606
 607    ad->win = win;
 608    ad->main_box = box;
 609    ad->naviframe = naviframe;
 610    ad->url = url;
 611    ad->default_web = web;
 612    ad->tabs = tabs;
 613    ad->close_tab = btn;
 614
 615    evas_object_resize(win, 480, 640);
 616    evas_object_show(win);
 617
 618    elm_run();
 619    elm_shutdown();
 620
 621    return 0;
 622 }
 623 ELM_MAIN()