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