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