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