Merge branch 'master' of git://github.com/dusanx/uzbl into dusanx/master
[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 static GtkWidget* main_window;
47 static GtkWidget* mainbar;
48 static GtkWidget* mainbar_label;
49 static WebKitWebView* web_view;
50 static gchar* main_title;
51 static gchar selected_url[500];
52
53 /* Behaviour variables */
54 static gchar*   history_file       = NULL;
55 static gchar*   fifodir            = NULL;
56 static gchar*   download_handler   = NULL;
57 static gboolean always_insert_mode = FALSE;
58 static gboolean insert_mode        = FALSE;
59 static gboolean show_status        = FALSE;
60 static gboolean status_top         = FALSE;
61 static gchar*   modkey             = NULL;
62
63 static char fifopath[64];
64 static gint load_progress;
65 static guint status_context_id;
66 static Window xwin = 0;
67 static gchar* uri = NULL;
68
69 static gboolean verbose = FALSE;
70
71 static GOptionEntry entries[] =
72 {
73     { "uri",     'u', 0, G_OPTION_ARG_STRING, &uri,     "Uri to load", NULL },
74     { "verbose", 'v', 0, G_OPTION_ARG_NONE,   &verbose, "Be verbose",  NULL },
75     { NULL }
76 };
77
78 typedef struct
79 {
80     const char *command;
81     void (*func_1_param)(WebKitWebView*);
82     void (*func_2_params)(WebKitWebView*, char *);
83 } Command;
84
85 typedef struct
86 {
87     const char *binding;
88     const char *action;
89 } Binding;
90
91 static Binding internal_bindings[256];
92 static Binding external_bindings[256];
93 static int     num_internal_bindings = 0;
94 static int     num_external_bindings = 0;
95
96 static void
97 update_title (GtkWindow* window);
98
99
100 /* --- CALLBACKS --- */
101 static void
102 go_back_cb (GtkWidget* widget, gpointer data) {
103     webkit_web_view_go_back (web_view);
104 }
105
106 static void
107 go_forward_cb (GtkWidget* widget, gpointer data) {
108     webkit_web_view_go_forward (web_view);
109 }
110
111 static void
112 cb_toggle_status() {
113     if (show_status) {
114         gtk_widget_hide(mainbar);
115     } else {
116         gtk_widget_show(mainbar);
117     }
118     show_status = !show_status;
119     update_title (GTK_WINDOW (main_window));
120 }
121
122 static void
123 link_hover_cb (WebKitWebView* page, const gchar* title, const gchar* link, gpointer data) {
124     /* underflow is allowed */
125     //gtk_statusbar_pop (main_statusbar, status_context_id);
126     //if (link)
127     //    gtk_statusbar_push (main_statusbar, status_context_id, link);
128     //TODO implementation roadmap pending..
129     
130     //ADD HOVER URL TO WINDOW TITLE
131     selected_url[0] = '\0';
132     if (link) {
133         strcpy (selected_url, link);
134     }
135     update_title (GTK_WINDOW (main_window));
136 }
137
138 static void
139 title_change_cb (WebKitWebView* web_view, WebKitWebFrame* web_frame, const gchar* title, gpointer data) {
140     if (main_title)
141         g_free (main_title);
142     main_title = g_strdup (title);
143     update_title (GTK_WINDOW (main_window));
144 }
145
146 static void
147 progress_change_cb (WebKitWebView* page, gint progress, gpointer data) {
148     load_progress = progress;
149     update_title (GTK_WINDOW (main_window));
150 }
151
152 static void
153 load_commit_cb (WebKitWebView* page, WebKitWebFrame* frame, gpointer data) {
154     const gchar* uri = webkit_web_frame_get_uri(frame);
155 }
156
157 static void
158 destroy_cb (GtkWidget* widget, gpointer data) {
159     gtk_main_quit ();
160 }
161
162 static void
163 log_history_cb () {
164     FILE * output_file = fopen (history_file, "a");
165     if (output_file == NULL) {
166        fprintf (stderr, "Cannot open %s for logging\n", history_file);
167     } else {
168         time_t rawtime;
169         struct tm * timeinfo;
170         char buffer [80];
171         time ( &rawtime );
172         timeinfo = localtime ( &rawtime );
173         strftime (buffer, 80, "%Y-%m-%d %H:%M:%S", timeinfo);
174
175         fprintf (output_file, "%s %s\n", buffer, uri);
176         fclose (output_file);
177     }
178 }
179
180 /* -- command to callback/function map for things we cannot attach to any signals */
181 // TODO: reload, home, quit
182 static Command commands[] =
183 {
184     { "back",     &go_back_cb,                    NULL },
185     { "forward",  &go_forward_cb,                 NULL },
186     { "refresh",  &webkit_web_view_reload,        NULL }, //Buggy
187     { "stop",     &webkit_web_view_stop_loading,  NULL },
188     { "zoom_in",  &webkit_web_view_zoom_in,       NULL }, //Can crash (when max zoom reached?).
189     { "zoom_out", &webkit_web_view_zoom_out,      NULL },
190     { "uri",      NULL, &webkit_web_view_load_uri      },
191     { "toggle_status", &cb_toggle_status, NULL}
192 //{ "get uri",  &webkit_web_view_get_uri},
193 };
194
195 /* -- CORE FUNCTIONS -- */
196
197 static void
198 parse_command(const char *command) {
199     int i;
200     Command *c = NULL;
201     char * command_name  = strtok (command, " ");
202     char * command_param = strtok (NULL,  " ,"); //dunno how this works, but it seems to work
203
204     Command *c_tmp;
205     for (i = 0; i < LENGTH (commands); i++) {
206         c_tmp = &commands[i];
207         if (strncmp (command_name, c_tmp->command, strlen (c_tmp->command)) == 0) {
208             c = c_tmp;
209         }
210     }
211     if (c != NULL) {
212         if (c->func_2_params != NULL) {
213             if (command_param != NULL) {
214                 printf ("command executing: \"%s %s\"\n", command_name, command_param);
215                 c->func_2_params (web_view, command_param);
216             } else {
217                 if (c->func_1_param != NULL) {
218                     printf ("command executing: \"%s\"\n", command_name);
219                     c->func_1_param (web_view);
220                 } else {
221                     fprintf (stderr, "command needs a parameter. \"%s\" is not complete\n", command_name);
222                 }
223             }
224         } else if (c->func_1_param != NULL) {
225             printf ("command executing: \"%s\"\n", command_name);
226             c->func_1_param (web_view);
227         }
228     } else {
229         fprintf (stderr, "command \"%s\" not understood. ignoring.\n", command);
230     }
231 }
232  
233 static void
234 *control_fifo() {
235     if (fifodir) {
236         sprintf (fifopath, "%s/uzbl_%d", fifodir, (int) xwin);
237     } else {
238         sprintf (fifopath, "/tmp/uzbl_%d", (int) xwin);
239     }
240  
241     if (mkfifo (fifopath, 0666) == -1) {
242         printf ("Possible error creating fifo\n");
243     }
244  
245     printf ("Control fifo opened in %s\n", fifopath);
246  
247     while (true) {
248         FILE *fifo = fopen (fifopath, "r");
249         if (!fifo) {
250             printf ("Could not open %s for reading\n", fifopath);
251             return NULL;
252         }
253         
254         char buffer[256];
255         memset (buffer, 0, sizeof (buffer));
256         while (!feof (fifo) && fgets (buffer, sizeof (buffer), fifo)) {
257             if (strcmp (buffer, "\n")) {
258                 buffer[strlen (buffer) - 1] = '\0'; // Remove newline
259                 parse_command (buffer);
260             }
261         }
262     }
263     
264     return NULL;
265
266  
267 static void
268 setup_threading () {
269     pthread_t control_thread;
270     pthread_create(&control_thread, NULL, control_fifo, NULL);
271 }
272
273 static void
274 update_title (GtkWindow* window) {
275     GString* string_long = g_string_new ("");
276     GString* string_short = g_string_new ("");
277     if (!always_insert_mode)
278         g_string_append (string_long, (insert_mode ? "[I] " : "[C] "));
279     g_string_append (string_long, main_title);
280     g_string_append (string_short, main_title);
281     g_string_append (string_long, " - Uzbl browser");
282     g_string_append (string_short, " - Uzbl browser");
283     if (load_progress < 100)
284         g_string_append_printf (string_long, " (%d%%)", load_progress);
285
286     if (selected_url[0]!=0) {
287         g_string_append_printf (string_long, " -> (%s)", selected_url);
288     }
289
290     gchar* title_long = g_string_free (string_long, FALSE);
291     gchar* title_short = g_string_free (string_short, FALSE);
292
293     if (show_status) {
294         gtk_window_set_title (window, title_short);
295         gtk_label_set_text(mainbar_label, title_long);
296     } else {
297         gtk_window_set_title (window, title_long);
298     }
299
300     g_free (title_long);
301     g_free (title_short);
302 }
303  
304 static gboolean
305 key_press_cb (WebKitWebView* page, GdkEventKey* event)
306 {
307     int i;
308     gboolean result=FALSE; //TRUE to stop other handlers from being invoked for the event. FALSE to propagate the event further.
309     if (event->type != GDK_KEY_PRESS) 
310         return result;
311
312     //TURN OFF INSERT MODE
313     if (insert_mode && (event->keyval == GDK_Escape)) {
314         insert_mode = FALSE;
315         update_title (GTK_WINDOW (main_window));
316         return TRUE;
317     }
318
319     //TURN ON INSERT MODE
320     if (!insert_mode && (event->string[0] == 'i')) {
321         insert_mode = TRUE;
322         update_title (GTK_WINDOW (main_window));
323         return TRUE;
324     }
325
326     //INTERNAL KEYS
327     if (always_insert_mode || !insert_mode) {
328         for (i = 0; i < num_internal_bindings; i++) {
329             if (event->string[0] == internal_bindings[i].binding[0]) {
330                 parse_command (internal_bindings[i].action);
331                 result = TRUE;
332             }   
333         }
334     }
335     if (!result)
336         result = (insert_mode ? FALSE : TRUE);      
337
338     return result;
339 }
340
341 static GtkWidget*
342 create_browser () {
343     GtkWidget* scrolled_window = gtk_scrolled_window_new (NULL, NULL);
344     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
345
346     web_view = WEBKIT_WEB_VIEW (webkit_web_view_new ());
347     gtk_container_add (GTK_CONTAINER (scrolled_window), GTK_WIDGET (web_view));
348
349     g_signal_connect (G_OBJECT (web_view), "title-changed", G_CALLBACK (title_change_cb), web_view);
350     g_signal_connect (G_OBJECT (web_view), "load-progress-changed", G_CALLBACK (progress_change_cb), web_view);
351     g_signal_connect (G_OBJECT (web_view), "load-committed", G_CALLBACK (load_commit_cb), web_view);
352     g_signal_connect (G_OBJECT (web_view), "load-committed", G_CALLBACK (log_history_cb), web_view);
353     g_signal_connect (G_OBJECT (web_view), "hovering-over-link", G_CALLBACK (link_hover_cb), web_view);
354     g_signal_connect (G_OBJECT (web_view), "key-press-event", G_CALLBACK (key_press_cb), web_view);
355
356     return scrolled_window;
357 }
358
359 static GtkWidget*
360 create_mainbar () {
361     mainbar = gtk_hbox_new (FALSE, 0);
362     mainbar_label = gtk_label_new ("");  
363     gtk_misc_set_alignment (mainbar_label, 0, 0);
364     gtk_misc_set_padding (mainbar_label, 2, 2);
365     gtk_box_pack_start (GTK_BOX (mainbar), mainbar_label, TRUE, TRUE, 0);
366     return mainbar;
367 }
368
369 static
370 GtkWidget* create_window () {
371     GtkWidget* window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
372     gtk_window_set_default_size (GTK_WINDOW (window), 800, 600);
373     gtk_widget_set_name (window, "Uzbl browser");
374     g_signal_connect (G_OBJECT (window), "destroy", G_CALLBACK (destroy_cb), NULL);
375
376     return window;
377 }
378
379 static void
380 add_binding (char *binding, char *action, bool internal) {
381     Binding bind = {binding, action};
382     if (internal) {
383         internal_bindings[num_internal_bindings] = bind;
384         num_internal_bindings ++;
385     } else {
386         external_bindings[num_external_bindings] = bind;
387         num_external_bindings ++;
388     }
389 }
390
391 static void
392 settings_init () {
393     GKeyFile* config = g_key_file_new ();
394     gboolean res = g_key_file_load_from_file (config, "./sampleconfig", G_KEY_FILE_NONE, NULL); //TODO: pass config file as argument
395     if (res) {
396         printf ("Config loaded\n");
397     } else {
398         fprintf (stderr, "Config loading failed\n"); //TODO: exit codes with gtk? 
399     }
400
401     history_file = g_key_file_get_value (config, "behavior", "history_file", NULL);
402     if (history_file) {
403         printf ("History file: %s\n", history_file);
404     } else {
405         printf ("History logging disabled\n");
406     }
407
408     download_handler = g_key_file_get_value (config, "behavior", "download_handler", NULL);
409     if (download_handler) {
410         printf ("Download manager: %s\n", download_handler);
411     } else {
412         printf ("Download manager disabled\n");
413     }
414
415     if (! fifodir)
416         fifodir = g_key_file_get_value (config, "behavior", "fifodir", NULL);
417     if (fifodir) {
418         printf ("Fifo directory: %s\n", fifodir);
419     } else {
420         printf ("Fifo directory: /tmp\n");
421     }
422
423     always_insert_mode = g_key_file_get_boolean (config, "behavior", "always_insert_mode", NULL);
424     printf ("Always insert mode: %s\n", (always_insert_mode ? "TRUE" : "FALSE"));
425
426     show_status = g_key_file_get_boolean (config, "behavior", "show_status", NULL);
427     printf ("Show status: %s\n", (show_status ? "TRUE" : "FALSE"));
428
429     status_top = g_key_file_get_boolean (config, "behavior", "status_top", NULL);
430     printf ("Status top: %s\n", (status_top ? "TRUE" : "FALSE"));
431
432     modkey = g_key_file_get_value (config, "behavior", "modkey", NULL);
433     if (modkey) {
434         printf ("Mod key: %s\n", modkey);
435     } else {
436         printf ("Mod key disabled/\n");
437     }
438
439     gchar **keysi = g_key_file_get_keys (config, "bindings_internal", NULL, NULL);
440     int i = 0;
441     for (i = 0; keysi[i]; i++)
442       {
443         gchar *binding = g_key_file_get_string(config, "bindings_internal", keysi[i], NULL);
444         printf("Action: %s, Binding: %s (internal)\n", g_strdup (keysi[i]), binding);
445         add_binding (binding, g_strdup (keysi[i]), true);
446       }
447
448     gchar **keyse = g_key_file_get_keys (config, "bindings_external", NULL, NULL);
449     for (i = 0; keyse[i]; i++)
450       {
451         gchar *binding = g_key_file_get_string(config, "bindings_external", keyse[i], NULL);
452         printf("Action: %s, Binding: %s (external)\n", g_strdup (keyse[i]), binding);
453         add_binding (binding, g_strdup (keyse[i]), false);
454       }
455 }
456
457 int
458 main (int argc, char* argv[]) {
459     gtk_init (&argc, &argv);
460     if (!g_thread_supported ())
461         g_thread_init (NULL);
462
463     settings_init ();
464     if (always_insert_mode)
465         insert_mode = TRUE;
466
467     GtkWidget* vbox = gtk_vbox_new (FALSE, 0);
468     if (status_top)
469         gtk_box_pack_start (GTK_BOX (vbox), create_mainbar (), FALSE, TRUE, 0);
470     gtk_box_pack_start (GTK_BOX (vbox), create_browser (), TRUE, TRUE, 0);
471     if (!status_top)
472         gtk_box_pack_start (GTK_BOX (vbox), create_mainbar (), FALSE, TRUE, 0);
473
474     main_window = create_window ();
475     gtk_container_add (GTK_CONTAINER (main_window), vbox);
476     GError *error = NULL;
477
478     GOptionContext* context = g_option_context_new ("- some stuff here maybe someday");
479     g_option_context_add_main_entries (context, entries, NULL);
480     g_option_context_add_group (context, gtk_get_option_group (TRUE));
481     g_option_context_parse (context, &argc, &argv, &error);
482
483     webkit_web_view_load_uri (web_view, uri);
484
485     gtk_widget_grab_focus (GTK_WIDGET (web_view));
486     gtk_widget_show_all (main_window);
487     xwin = GDK_WINDOW_XID (GTK_WIDGET (main_window)->window);
488     printf("window_id %i\n",(int) xwin);
489     printf("pid %i\n", getpid ());
490
491     if (!show_status)
492         gtk_widget_hide(mainbar);
493
494     setup_threading ();
495
496     gtk_main ();
497
498     unlink (fifopath);
499     return 0;
500 }