Merge branch 'bar/experimental' into experimental
[uzbl-mobile] / uzbl.c
1 // Original code taken from the example webkit-gtk+ application. see notice below.
2 // Modified code is licensed under the GPL 3.  See LICENSE file.
3
4
5 /*
6  * Copyright (C) 2006, 2007 Apple Inc.
7  * Copyright (C) 2007 Alp Toker <alp@atoker.com>
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  *
18  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
19  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
21  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
22  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
23  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
24  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
25  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
26  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29  */
30
31
32 #define LENGTH(x)               (sizeof x / sizeof x[0])
33 #define GDK_Escape 0xff1b
34
35 #include <gtk/gtk.h>
36 #include <gdk/gdkx.h>
37 #include <webkit/webkit.h>
38 #include <pthread.h>
39 #include <stdio.h>
40 #include <string.h>
41 #include <sys/stat.h>
42 #include <sys/types.h>
43 #include <unistd.h>
44 #include <stdlib.h>
45
46 /* housekeeping / internal variables */
47 static GtkWidget* main_window;
48 static GtkWidget* mainbar;
49 static WebKitWebView* web_view;
50 static gchar* main_title;
51 static gchar selected_url[500];
52 static gint load_progress;
53 static guint status_context_id;
54 static Window xwin = 0;
55 static char fifopath[64];
56
57 /* state variables (initial values coming from command line arguments but may be changed later) */
58 static gchar*   uri         = NULL;
59 static gchar*   config_file = NULL;
60 static gboolean verbose     = FALSE;
61
62 /* settings from config: group behaviour */
63 static gchar*   history_handler    = NULL;
64 static gchar*   fifodir            = NULL;
65 static gchar*   download_handler   = NULL;
66 static gboolean always_insert_mode = FALSE;
67 static gboolean show_status        = FALSE;
68 static gboolean insert_mode        = FALSE;
69 static gchar*   modkey             = NULL;
70
71
72 typedef struct
73 {
74     const char *binding;
75     const char *action;
76 } Binding;
77
78 /* settings from config: group bindings_internal */
79 static Binding internal_bindings[256];
80 static int     num_internal_bindings = 0;
81
82 /* settings from config: group bindings_external */
83 static Binding external_bindings[256];
84 static int     num_external_bindings = 0;
85
86 /* commandline arguments (set initial values for the state variables) */
87 static GOptionEntry entries[] =
88 {
89     { "uri",     'u', 0, G_OPTION_ARG_STRING, &uri,         "Uri to load", NULL },
90     { "verbose", 'v', 0, G_OPTION_ARG_NONE,   &verbose,     "Be verbose",  NULL },
91     { "config",  'c', 0, G_OPTION_ARG_STRING, &config_file, "Config file", NULL },
92     { NULL }
93 };
94
95 /* for internal list of commands */
96 typedef struct
97 {
98     const char *command;
99     void (*func_1_param)(WebKitWebView*);
100     void (*func_2_params)(WebKitWebView*, char *);
101 } Command;
102
103
104 static void
105 update_title (GtkWindow* window);
106
107 static gboolean
108 run_command(const char *command, const char *args);
109
110
111 /* --- CALLBACKS --- */
112 static void
113 go_back_cb (GtkWidget* widget, gpointer data) {
114     webkit_web_view_go_back (web_view);
115 }
116
117 static void
118 go_forward_cb (GtkWidget* widget, gpointer data) {
119     webkit_web_view_go_forward (web_view);
120 }
121
122
123 static void
124 link_hover_cb (WebKitWebView* page, const gchar* title, const gchar* link, gpointer data) {
125     /* underflow is allowed */
126     //gtk_statusbar_pop (main_statusbar, status_context_id);
127     //if (link)
128     //    gtk_statusbar_push (main_statusbar, status_context_id, link);
129     //TODO implementation roadmap pending..
130     
131     //ADD HOVER URL TO WINDOW TITLE
132     selected_url[0] = '\0';
133     if (link) {
134         strcpy (selected_url, link);
135     }
136     update_title (GTK_WINDOW (main_window));
137 }
138
139 static void
140 title_change_cb (WebKitWebView* web_view, WebKitWebFrame* web_frame, const gchar* title, gpointer data) {
141     if (main_title)
142         g_free (main_title);
143     main_title = g_strdup (title);
144     update_title (GTK_WINDOW (main_window));
145 }
146
147 static void
148 progress_change_cb (WebKitWebView* page, gint progress, gpointer data) {
149     load_progress = progress;
150     update_title (GTK_WINDOW (main_window));
151 }
152
153 static void
154 load_commit_cb (WebKitWebView* page, WebKitWebFrame* frame, gpointer data) {
155     strcpy (uri, webkit_web_frame_get_uri (frame));
156 }
157
158 static void
159 destroy_cb (GtkWidget* widget, gpointer data) {
160     gtk_main_quit ();
161 }
162
163 static void
164 log_history_cb () {
165    if (history_handler) {
166        time_t rawtime;
167        struct tm * timeinfo;
168        char date [80];
169        time ( &rawtime );
170        timeinfo = localtime ( &rawtime );
171        strftime (date, 80, "%Y-%m-%d %H:%M:%S", timeinfo);
172        GString* args = g_string_new ("");
173        g_string_printf (args, "'%s' '%s' '%s'", uri, "TODO:page title here", date);
174        run_command(history_handler, args->str);
175    }
176 }
177
178 /* -- command to callback/function map for things we cannot attach to any signals */
179 // TODO: reload, home, quit
180 static Command commands[] =
181 {
182     { "back",     &go_back_cb,                    NULL },
183     { "forward",  &go_forward_cb,                 NULL },
184     { "refresh",  &webkit_web_view_reload,        NULL }, //Buggy
185     { "stop",     &webkit_web_view_stop_loading,  NULL },
186     { "zoom_in",  &webkit_web_view_zoom_in,       NULL }, //Can crash (when max zoom reached?).
187     { "zoom_out", &webkit_web_view_zoom_out,      NULL } ,
188     { "uri",      NULL, &webkit_web_view_load_uri      }
189 //{ "get uri",  &webkit_web_view_get_uri},
190 };
191
192 /* -- CORE FUNCTIONS -- */
193
194 static bool
195 file_exists (const char * filename)
196 {
197     FILE *file = fopen (filename, "r");
198     if (file) {
199         fclose (file);
200         return true;
201     }
202     return false;
203 }
204
205 // make sure to put '' around args, so that if there is whitespace we can still keep arguments together.
206 static gboolean
207 run_command(const char *command, const char *args) {
208    //command <uzbl conf> <uzbl pid> <uzbl win id> <uzbl fifo file> [args]
209     GString* to_execute = g_string_new ("");
210     gboolean result;
211     g_string_printf (to_execute, "%s '%s' '%i' '%i' '%s' %s", command, config_file, (int) getpid() , (int) xwin, "/tmp/uzbl_25165827", args);
212     result = system(to_execute->str);
213     printf("Called %s.  Result: %s\n", to_execute->str, (result ? "FALSE" : "TRUE" ));
214     return result;
215 }
216
217 static void
218 parse_command(const char *command) {
219     int i;
220     Command *c = NULL;
221     char * command_name  = strtok (command, " ");
222     char * command_param = strtok (NULL,  " ,"); //dunno how this works, but it seems to work
223
224     Command *c_tmp = NULL;
225     for (i = 0; i < LENGTH (commands); i++) {
226         c_tmp = &commands[i];
227         if (strncmp (command_name, c_tmp->command, strlen (c_tmp->command)) == 0) {
228             c = c_tmp;
229         }
230     }
231     if (c != NULL) {
232         if (c->func_2_params != NULL) {
233             if (command_param != NULL) {
234                 printf ("command executing: \"%s %s\"\n", command_name, command_param);
235                 c->func_2_params (web_view, command_param);
236             } else {
237                 if (c->func_1_param != NULL) {
238                     printf ("command executing: \"%s\"\n", command_name);
239                     c->func_1_param (web_view);
240                 } else {
241                     fprintf (stderr, "command needs a parameter. \"%s\" is not complete\n", command_name);
242                 }
243             }
244         } else if (c->func_1_param != NULL) {
245             printf ("command executing: \"%s\"\n", command_name);
246             c->func_1_param (web_view);
247         }
248     } else {
249         fprintf (stderr, "command \"%s\" not understood. ignoring.\n", command);
250     }
251 }
252  
253 static void
254 *control_fifo() {
255     if (fifodir) {
256         sprintf (fifopath, "%s/uzbl_%d", fifodir, (int) xwin);
257     } else {
258         sprintf (fifopath, "/tmp/uzbl_%d", (int) xwin);
259     }
260  
261     if (mkfifo (fifopath, 0666) == -1) {
262         printf ("Possible error creating fifo\n");
263     }
264  
265     printf ("Control fifo opened in %s\n", fifopath);
266  
267     while (true) {
268         FILE *fifo = fopen (fifopath, "r");
269         if (!fifo) {
270             printf ("Could not open %s for reading\n", fifopath);
271             return NULL;
272         }
273         
274         char buffer[256];
275         memset (buffer, 0, sizeof (buffer));
276         while (!feof (fifo) && fgets (buffer, sizeof (buffer), fifo)) {
277             if (strcmp (buffer, "\n")) {
278                 buffer[strlen (buffer) - 1] = '\0'; // Remove newline
279                 parse_command (buffer);
280             }
281         }
282     }
283     
284     return NULL;
285
286  
287 static void
288 setup_threading () {
289     pthread_t control_thread;
290     pthread_create(&control_thread, NULL, control_fifo, NULL);
291 }
292
293 static void
294 update_title (GtkWindow* window) {
295     GString* string = g_string_new ("");
296     if (!always_insert_mode)
297         g_string_append (string, (insert_mode ? "[I] " : "[C] "));
298     g_string_append (string, main_title);
299     g_string_append (string, " - Uzbl browser");
300     if (load_progress < 100)
301         g_string_append_printf (string, " (%d%%)", load_progress);
302
303     if (selected_url[0]!=0) {
304         g_string_append_printf (string, " -> (%s)", selected_url);
305     }
306
307     gchar* title = g_string_free (string, FALSE);
308     gtk_window_set_title (window, title);
309     g_free (title);
310 }
311  
312 static gboolean
313 key_press_cb (WebKitWebView* page, GdkEventKey* event)
314 {
315     int i;
316     gboolean result=FALSE; //TRUE to stop other handlers from being invoked for the event. FALSE to propagate the event further.
317     if (event->type != GDK_KEY_PRESS) 
318         return result;
319
320     //TURN OFF INSERT MODE
321     if (insert_mode && (event->keyval == GDK_Escape)) {
322         insert_mode = FALSE;
323         update_title (GTK_WINDOW (main_window));
324         return TRUE;
325     }
326
327     //TURN ON INSERT MODE
328     if (!insert_mode && (event->string[0] == 'i')) {
329         insert_mode = TRUE;
330         update_title (GTK_WINDOW (main_window));
331         return TRUE;
332     }
333
334     //INTERNAL KEYS
335     if (always_insert_mode || !insert_mode) {
336         for (i = 0; i < num_internal_bindings; i++) {
337             if (event->string[0] == internal_bindings[i].binding[0]) {
338                 parse_command (internal_bindings[i].action);
339                 result = TRUE;
340             }   
341         }
342     }
343     if (!result)
344         result = (insert_mode ? FALSE : TRUE);      
345
346     return result;
347 }
348
349 static GtkWidget*
350 create_browser () {
351     GtkWidget* scrolled_window = gtk_scrolled_window_new (NULL, NULL);
352     gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window), GTK_POLICY_NEVER, GTK_POLICY_NEVER); //todo: some sort of display of position/total length. like what emacs does
353
354     web_view = WEBKIT_WEB_VIEW (webkit_web_view_new ());
355     gtk_container_add (GTK_CONTAINER (scrolled_window), GTK_WIDGET (web_view));
356
357     g_signal_connect (G_OBJECT (web_view), "title-changed", G_CALLBACK (title_change_cb), web_view);
358     g_signal_connect (G_OBJECT (web_view), "load-progress-changed", G_CALLBACK (progress_change_cb), web_view);
359     g_signal_connect (G_OBJECT (web_view), "load-committed", G_CALLBACK (load_commit_cb), web_view);
360     g_signal_connect (G_OBJECT (web_view), "load-committed", G_CALLBACK (log_history_cb), web_view);
361     g_signal_connect (G_OBJECT (web_view), "hovering-over-link", G_CALLBACK (link_hover_cb), web_view);
362     g_signal_connect (G_OBJECT (web_view), "key-press-event", G_CALLBACK (key_press_cb), web_view);
363
364     return scrolled_window;
365 }
366
367 static GtkWidget*
368 create_mainbar () {
369     mainbar = gtk_hbox_new (FALSE, 0);
370
371     //status_context_id = gtk_statusbar_get_context_id (main_statusbar, "Link Hover");
372
373     return mainbar;
374 }
375
376 static
377 GtkWidget* create_window () {
378     GtkWidget* window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
379     gtk_window_set_default_size (GTK_WINDOW (window), 800, 600);
380     gtk_widget_set_name (window, "Uzbl browser");
381     g_signal_connect (G_OBJECT (window), "destroy", G_CALLBACK (destroy_cb), NULL);
382
383     return window;
384 }
385
386 static void
387 add_binding (char *binding, char *action, bool internal) {
388     Binding bind = {binding, action};
389     if (internal) {
390         internal_bindings[num_internal_bindings] = bind;
391         num_internal_bindings ++;
392     } else {
393         external_bindings[num_external_bindings] = bind;
394         num_external_bindings ++;
395     }
396 }
397
398 static void
399 settings_init () {
400     GKeyFile* config;
401     gboolean res = NULL;
402     gchar** keysi = NULL;
403     gchar** keyse = NULL;
404     if (config_file) {
405         config = g_key_file_new ();
406         res = g_key_file_load_from_file (config, config_file, G_KEY_FILE_NONE, NULL);
407           if(res) {
408             printf ("Config %s loaded\n", config_file);
409           } else {
410             fprintf (stderr, "Config %s loading failed\n", config_file);
411         }
412     } else {
413         printf ("No configuration.\n");
414     }
415
416     if (res) {
417         history_handler    = g_key_file_get_value   (config, "behavior", "history_handler", NULL);
418         download_handler   = g_key_file_get_value   (config, "behavior", "download_handler", NULL);
419         always_insert_mode = g_key_file_get_boolean (config, "behavior", "always_insert_mode", NULL);
420         show_status        = g_key_file_get_boolean (config, "behavior", "show_status", NULL);
421         modkey             = g_key_file_get_value   (config, "behavior", "modkey", NULL);
422         keysi              = g_key_file_get_keys    (config, "bindings_internal", NULL, NULL);
423         keyse              = g_key_file_get_keys    (config, "bindings_external", NULL, NULL);
424         if (! fifodir)
425             fifodir        = g_key_file_get_value   (config, "behavior", "fifodir", NULL);
426     }
427         
428     if (history_handler) {
429         printf ("History handler: %s\n", history_handler);
430     } else {
431         printf ("History handler disabled\n");
432     }
433
434     if (download_handler) {
435         printf ("Download manager: %s\n", download_handler);
436     } else {
437         printf ("Download manager disabled\n");
438     }
439
440     if (fifodir) {
441         printf ("Fifo directory: %s\n", fifodir);
442     } else {
443         printf ("Fifo directory: /tmp\n");
444     }
445
446     printf ("Always insert mode: %s\n", (always_insert_mode ? "TRUE" : "FALSE"));
447
448     printf ("Show status: %s\n", (show_status ? "TRUE" : "FALSE"));
449
450     if (modkey) {
451         printf ("Mod key: %s\n", modkey);
452     } else {
453         printf ("Mod key disabled\n");
454     }
455
456     if (keysi) {
457               int i = 0;
458         for (i = 0; keysi[i]; i++) {
459             gchar *binding = g_key_file_get_string (config, "bindings_internal", keysi[i], NULL);
460             printf ("Action: %s, Binding: %s (internal)\n", g_strdup (keysi[i]), binding);
461             add_binding (binding, g_strdup (keysi[i]), true);
462         }
463     }
464     if (keyse) {
465               int i = 0;
466         for (i = 0; keyse[i]; i++) {
467             gchar *binding = g_key_file_get_string (config, "bindings_external", keyse[i], NULL);
468             printf ("Action: %s, Binding: %s (external)\n", g_strdup (keyse[i]), binding);
469             add_binding (binding, g_strdup (keyse[i]), false);
470         }
471     }
472 }
473
474 int
475 main (int argc, char* argv[]) {
476     gtk_init (&argc, &argv);
477     if (!g_thread_supported ())
478         g_thread_init (NULL);
479
480     GError *error = NULL;
481     GOptionContext* context = g_option_context_new ("- some stuff here maybe someday");
482     g_option_context_add_main_entries (context, entries, NULL);
483     g_option_context_add_group (context, gtk_get_option_group (TRUE));
484     g_option_context_parse (context, &argc, &argv, &error);
485
486     settings_init ();
487     if (always_insert_mode)
488         insert_mode = TRUE;
489
490     GtkWidget* vbox = gtk_vbox_new (FALSE, 0);
491     gtk_box_pack_start (GTK_BOX (vbox), create_mainbar (), FALSE, TRUE, 0);
492     gtk_box_pack_start (GTK_BOX (vbox), create_browser (), TRUE, TRUE, 0);
493
494     main_window = create_window ();
495     gtk_container_add (GTK_CONTAINER (main_window), vbox);
496
497     webkit_web_view_load_uri (web_view, uri);
498
499     gtk_widget_grab_focus (GTK_WIDGET (web_view));
500     gtk_widget_show_all (main_window);
501     xwin = GDK_WINDOW_XID (GTK_WIDGET (main_window)->window);
502     printf("window_id %i\n",(int) xwin);
503     printf("pid %i\n", getpid ());
504
505     setup_threading ();
506
507     gtk_main ();
508
509     unlink (fifopath);
510     return 0;
511 }