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