Unreviewed, rolling out r108522.
[WebKit-https.git] / Tools / GtkLauncher / main.c
1 /*
2  * Copyright (C) 2006, 2007 Apple Inc.
3  * Copyright (C) 2007 Alp Toker <alp@atoker.com>
4  * Copyright (C) 2011 Lukasz Slachciak
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
16  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
18  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
19  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
22  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
23  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
25  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  */
27
28 #include <errno.h>
29 #include <gtk/gtk.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <webkit/webkit.h>
33
34 static gint windowCount = 0;
35
36 static GtkWidget* createWindow(WebKitWebView** outWebView);
37
38 static void activateUriEntryCb(GtkWidget* entry, gpointer data)
39 {
40     WebKitWebView *webView = g_object_get_data(G_OBJECT(entry), "web-view");
41     const gchar* uri = gtk_entry_get_text(GTK_ENTRY(entry));
42     g_assert(uri);
43     webkit_web_view_load_uri(webView, uri);
44 }
45
46 static void updateTitle(GtkWindow* window, WebKitWebView* webView)
47 {
48     GString *string = g_string_new(webkit_web_view_get_title(webView));
49     gdouble loadProgress = webkit_web_view_get_progress(webView) * 100;
50     g_string_append(string, " - WebKit Launcher");
51     if (loadProgress < 100)
52         g_string_append_printf(string, " (%f%%)", loadProgress);
53     gchar *title = g_string_free(string, FALSE);
54     gtk_window_set_title(window, title);
55     g_free(title);
56 }
57
58 static void linkHoverCb(WebKitWebView* page, const gchar* title, const gchar* link, GtkStatusbar* statusbar)
59 {
60     guint statusContextId =
61       GPOINTER_TO_UINT(g_object_get_data(G_OBJECT(statusbar), "link-hover-context"));
62     /* underflow is allowed */
63     gtk_statusbar_pop(statusbar, statusContextId);
64     if (link)
65         gtk_statusbar_push(statusbar, statusContextId, link);
66 }
67
68 static void notifyTitleCb(WebKitWebView* webView, GParamSpec* pspec, GtkWidget* window)
69 {
70     updateTitle(GTK_WINDOW(window), webView);
71 }
72
73 static void notifyLoadStatusCb(WebKitWebView* webView, GParamSpec* pspec, GtkWidget* uriEntry)
74 {
75     if (webkit_web_view_get_load_status(webView) == WEBKIT_LOAD_COMMITTED) {
76         WebKitWebFrame *frame = webkit_web_view_get_main_frame(webView);
77         const gchar *uri = webkit_web_frame_get_uri(frame);
78         if (uri)
79             gtk_entry_set_text(GTK_ENTRY(uriEntry), uri);
80     }
81 }
82
83 static void notifyProgressCb(WebKitWebView* webView, GParamSpec* pspec, GtkWidget* window)
84 {
85     updateTitle(GTK_WINDOW(window), webView);
86 }
87
88 static void destroyCb(GtkWidget* widget, GtkWidget* window)
89 {
90     if (g_atomic_int_dec_and_test(&windowCount))
91       gtk_main_quit();
92 }
93
94 static void goBackCb(GtkWidget* widget,  WebKitWebView* webView)
95 {
96     webkit_web_view_go_back(webView);
97 }
98
99 static void goForwardCb(GtkWidget* widget, WebKitWebView* webView)
100 {
101     webkit_web_view_go_forward(webView);
102 }
103
104 static WebKitWebView*
105 createWebViewCb(WebKitWebView* webView, WebKitWebFrame* web_frame, GtkWidget* window)
106 {
107     WebKitWebView *newWebView;
108     createWindow(&newWebView);
109     webkit_web_view_set_settings(newWebView, webkit_web_view_get_settings(webView));
110     return newWebView;
111 }
112
113 static gboolean webViewReadyCb(WebKitWebView* webView, GtkWidget* window)
114 {
115     gtk_widget_grab_focus(GTK_WIDGET(webView));
116     gtk_widget_show_all(window);
117     return FALSE;
118 }
119
120 static gboolean closeWebViewCb(WebKitWebView* webView, GtkWidget* window)
121 {
122     gtk_widget_destroy(window);
123     return TRUE;
124 }
125
126 static GtkWidget* createBrowser(GtkWidget* window, GtkWidget* uriEntry, GtkWidget* statusbar, WebKitWebView* webView)
127 {
128     GtkWidget *scrolledWindow = gtk_scrolled_window_new(NULL, NULL);
129     gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledWindow), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
130
131     gtk_container_add(GTK_CONTAINER(scrolledWindow), GTK_WIDGET(webView));
132
133     g_signal_connect(webView, "notify::title", G_CALLBACK(notifyTitleCb), window);
134     g_signal_connect(webView, "notify::load-status", G_CALLBACK(notifyLoadStatusCb), uriEntry);
135     g_signal_connect(webView, "notify::progress", G_CALLBACK(notifyProgressCb), window);
136     g_signal_connect(webView, "hovering-over-link", G_CALLBACK(linkHoverCb), statusbar);
137     g_signal_connect(webView, "create-web-view", G_CALLBACK(createWebViewCb), window);
138     g_signal_connect(webView, "web-view-ready", G_CALLBACK(webViewReadyCb), window);
139     g_signal_connect(webView, "close-web-view", G_CALLBACK(closeWebViewCb), window);
140
141     return scrolledWindow;
142 }
143
144 static GtkWidget* createStatusbar()
145 {
146     GtkStatusbar *statusbar = GTK_STATUSBAR(gtk_statusbar_new());
147     guint statusContextId = gtk_statusbar_get_context_id(statusbar, "Link Hover");
148     g_object_set_data(G_OBJECT(statusbar), "link-hover-context",
149         GUINT_TO_POINTER(statusContextId));
150
151     return GTK_WIDGET(statusbar);
152 }
153
154 static GtkWidget* createToolbar(GtkWidget* uriEntry, WebKitWebView* webView)
155 {
156     GtkWidget *toolbar = gtk_toolbar_new();
157
158 #if GTK_CHECK_VERSION(2, 15, 0)
159     gtk_orientable_set_orientation(GTK_ORIENTABLE(toolbar), GTK_ORIENTATION_HORIZONTAL);
160 #else
161     gtk_toolbar_set_orientation(GTK_TOOLBAR(toolbar), GTK_ORIENTATION_HORIZONTAL);
162 #endif
163     gtk_toolbar_set_style(GTK_TOOLBAR(toolbar), GTK_TOOLBAR_BOTH_HORIZ);
164
165     GtkToolItem *item;
166
167     /* the back button */
168     item = gtk_tool_button_new_from_stock(GTK_STOCK_GO_BACK);
169     g_signal_connect(G_OBJECT(item), "clicked", G_CALLBACK(goBackCb), webView);
170     gtk_toolbar_insert(GTK_TOOLBAR(toolbar), item, -1);
171
172     /* The forward button */
173     item = gtk_tool_button_new_from_stock(GTK_STOCK_GO_FORWARD);
174     g_signal_connect(G_OBJECT(item), "clicked", G_CALLBACK(goForwardCb), webView);
175     gtk_toolbar_insert(GTK_TOOLBAR(toolbar), item, -1);
176
177     /* The URL entry */
178     item = gtk_tool_item_new();
179     gtk_tool_item_set_expand(item, TRUE);
180     gtk_container_add(GTK_CONTAINER(item), uriEntry);
181     g_signal_connect(G_OBJECT(uriEntry), "activate", G_CALLBACK(activateUriEntryCb), NULL);
182     gtk_toolbar_insert(GTK_TOOLBAR(toolbar), item, -1);
183
184     /* The go button */
185     g_object_set_data(G_OBJECT(uriEntry), "web-view", webView);
186     item = gtk_tool_button_new_from_stock(GTK_STOCK_OK);
187     g_signal_connect_swapped(G_OBJECT(item), "clicked", G_CALLBACK(activateUriEntryCb), (gpointer)uriEntry);
188     gtk_toolbar_insert(GTK_TOOLBAR(toolbar), item, -1);
189
190     return toolbar;
191 }
192
193 static GtkWidget* createWindow(WebKitWebView** outWebView)
194 {
195     WebKitWebView *webView;
196     GtkWidget *vbox;
197     GtkWidget *window;
198     GtkWidget *uriEntry;
199     GtkWidget *statusbar;
200
201     g_atomic_int_inc(&windowCount);
202
203     window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
204     gtk_window_set_default_size(GTK_WINDOW(window), 800, 600);
205     gtk_widget_set_name(window, "GtkLauncher");
206
207     webView = WEBKIT_WEB_VIEW(webkit_web_view_new());
208     uriEntry = gtk_entry_new();
209
210 #ifdef GTK_API_VERSION_2
211     vbox = gtk_vbox_new(FALSE, 0);
212 #else
213     vbox = gtk_box_new(GTK_ORIENTATION_VERTICAL, 0);
214 #endif
215     statusbar = createStatusbar(webView);
216     gtk_box_pack_start(GTK_BOX(vbox), createToolbar(uriEntry, webView), FALSE, FALSE, 0);
217     gtk_box_pack_start(GTK_BOX(vbox), createBrowser(window, uriEntry, statusbar, webView), TRUE, TRUE, 0);
218     gtk_box_pack_start(GTK_BOX(vbox), statusbar, FALSE, FALSE, 0);
219
220     gtk_container_add(GTK_CONTAINER(window), vbox);
221
222     g_signal_connect(window, "destroy", G_CALLBACK(destroyCb), NULL);
223
224     if (outWebView)
225         *outWebView = webView;
226
227     return window;
228 }
229
230 static gchar* filenameToURL(const char* filename)
231 {
232     if (!g_file_test(filename, G_FILE_TEST_EXISTS))
233         return NULL;
234
235     GFile *gfile = g_file_new_for_path(filename);
236     gchar *fileURL = g_file_get_uri(gfile);
237     g_object_unref(gfile);
238
239     return fileURL;
240 }
241
242 static gboolean parseOptionEntryCallback(const gchar *optionNameFull, const gchar *value, WebKitWebSettings *webSettings, GError **error)
243 {
244     if (strlen(optionNameFull) <= 2) {
245         g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_FAILED, "Invalid option %s", optionNameFull);
246         return FALSE;
247     }
248
249     /* We have two -- in option name so remove them. */
250     const gchar *optionName = optionNameFull + 2;
251     GParamSpec *spec = g_object_class_find_property(G_OBJECT_GET_CLASS(webSettings), optionName);
252     if (!spec) {
253         g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_FAILED, "Cannot find web settings for option %s", optionNameFull);
254         return FALSE;
255     }
256
257     switch (G_PARAM_SPEC_VALUE_TYPE(spec)) {
258     case G_TYPE_BOOLEAN: {
259         gboolean propertyValue = TRUE;
260         if (value && g_ascii_strcasecmp(value, "true") && strcmp(value, "1"))
261             propertyValue = FALSE;
262         g_object_set(G_OBJECT(webSettings), optionName, propertyValue, NULL);
263         break;
264     }
265     case G_TYPE_STRING:
266         g_object_set(G_OBJECT(webSettings), optionName, value, NULL);
267         break;
268     case G_TYPE_INT: {
269         glong propertyValue;
270         gchar *end;
271
272         errno = 0;
273         propertyValue = g_ascii_strtoll(value, &end, 0);
274         if (errno == ERANGE || propertyValue > G_MAXINT || propertyValue < G_MININT) {
275             g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_BAD_VALUE, "Integer value '%s' for %s out of range", value, optionNameFull);
276             return FALSE;
277         }
278         if (errno || value == end) {
279             g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_BAD_VALUE, "Cannot parse integer value '%s' for %s", value, optionNameFull);
280             return FALSE;
281         }
282         g_object_set(G_OBJECT(webSettings), optionName, propertyValue, NULL);
283         break;
284     }
285     case G_TYPE_FLOAT: {
286         gdouble propertyValue;
287         gchar *end;
288
289         errno = 0;
290         propertyValue = g_ascii_strtod(value, &end);
291         if (errno == ERANGE || propertyValue > G_MAXFLOAT || propertyValue < G_MINFLOAT) {
292             g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_BAD_VALUE, "Float value '%s' for %s out of range", value, optionNameFull);
293             return FALSE;
294         }
295         if (errno || value == end) {
296             g_set_error(error, G_OPTION_ERROR, G_OPTION_ERROR_BAD_VALUE, "Cannot parse float value '%s' for %s", value, optionNameFull);
297             return FALSE;
298         }
299         g_object_set(G_OBJECT(webSettings), optionName, propertyValue, NULL);
300         break;
301     }
302     default:
303         g_assert_not_reached();
304     }
305
306     return TRUE;
307 }
308
309 static gboolean isValidParameterType(GType gParamType)
310 {
311     return (gParamType == G_TYPE_BOOLEAN || gParamType == G_TYPE_STRING || gParamType == G_TYPE_INT
312             || gParamType == G_TYPE_FLOAT);
313 }
314
315 static GOptionEntry* getOptionEntriesFromWebKitWebSettings(WebKitWebSettings *webSettings)
316 {
317     GParamSpec **propertySpecs;
318     GOptionEntry *optionEntries;
319     guint numProperties, numEntries, i;
320
321     propertySpecs = g_object_class_list_properties(G_OBJECT_GET_CLASS(webSettings), &numProperties);
322     if (!propertySpecs)
323         return NULL;
324
325     optionEntries = g_new0(GOptionEntry, numProperties + 1);
326     numEntries = 0;
327     for (i = 0; i < numProperties; i++) {
328         GParamSpec *param = propertySpecs[i];
329
330         /* Fill in structures only for writable and not construct-only properties. */
331         if (!param || !(param->flags & G_PARAM_WRITABLE) || (param->flags & G_PARAM_CONSTRUCT_ONLY))
332             continue;
333
334         GType gParamType = G_PARAM_SPEC_VALUE_TYPE(param);
335         if (!isValidParameterType(gParamType))
336             continue;
337
338         GOptionEntry *optionEntry = &optionEntries[numEntries++];
339         optionEntry->long_name = g_param_spec_get_name(param);
340
341         /* There is no easy way to figure our short name for generated option entries.
342            optionEntry.short_name=*/
343         /* For bool arguments "enable" type make option argument not required. */
344         if (gParamType == G_TYPE_BOOLEAN && (strstr(optionEntry->long_name, "enable")))
345             optionEntry->flags = G_OPTION_FLAG_OPTIONAL_ARG;
346         optionEntry->arg = G_OPTION_ARG_CALLBACK;
347         optionEntry->arg_data = parseOptionEntryCallback;
348         optionEntry->description = g_param_spec_get_blurb(param);
349         optionEntry->arg_description = g_type_name(gParamType);
350     }
351     g_free(propertySpecs);
352
353     return optionEntries;
354 }
355
356 static gboolean addWebSettingsGroupToContext(GOptionContext *context, WebKitWebSettings* webkitSettings)
357 {
358     GOptionEntry *optionEntries = getOptionEntriesFromWebKitWebSettings(webkitSettings);
359     if (!optionEntries)
360         return FALSE;
361
362     GOptionGroup *webSettingsGroup = g_option_group_new("websettings",
363                                                         "WebKitWebSettings writable properties for default WebKitWebView",
364                                                         "WebKitWebSettings properties",
365                                                         webkitSettings,
366                                                         NULL);
367     g_option_group_add_entries(webSettingsGroup, optionEntries);
368     g_free(optionEntries);
369
370     /* Option context takes ownership of the group. */
371     g_option_context_add_group(context, webSettingsGroup);
372
373     return TRUE;
374 }
375
376 int main(int argc, char* argv[])
377 {
378     WebKitWebSettings *webkitSettings = 0;
379     const gchar **uriArguments = 0;
380     const GOptionEntry commandLineOptions[] =
381     {
382         { G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_FILENAME_ARRAY, &uriArguments, 0, "[URL]" },
383         { 0, 0, 0, 0, 0, 0, 0 }
384     };
385
386     gtk_init(&argc, &argv);
387
388     GOptionContext *context = g_option_context_new(0);
389     g_option_context_add_main_entries(context, commandLineOptions, 0);
390     g_option_context_add_group(context, gtk_get_option_group(TRUE));
391
392     webkitSettings = webkit_web_settings_new();
393     if (!addWebSettingsGroupToContext(context, webkitSettings)) {
394         g_object_unref(webkitSettings);
395         webkitSettings = 0;
396     }
397
398     GError *error = 0;
399     if (!g_option_context_parse(context, &argc, &argv, &error)) {
400         g_printerr("Cannot parse arguments: %s\n", error->message);
401         g_error_free(error);
402         g_option_context_free(context);
403
404         return 1;
405     }
406     g_option_context_free(context);
407
408 #ifdef SOUP_TYPE_PROXY_RESOLVER_DEFAULT
409     soup_session_add_feature_by_type(webkit_get_default_session(), SOUP_TYPE_PROXY_RESOLVER_DEFAULT);
410 #else
411     const char *httpProxy = g_getenv("http_proxy");
412     if (httpProxy) {
413         SoupURI *proxyUri = soup_uri_new(httpProxy);
414         g_object_set(webkit_get_default_session(), SOUP_SESSION_PROXY_URI, proxyUri, NULL);
415         soup_uri_free(proxyUri);
416     }
417 #endif
418
419     WebKitWebView *webView;
420     GtkWidget *main_window = createWindow(&webView);
421
422     if (webkitSettings) {
423         webkit_web_view_set_settings(WEBKIT_WEB_VIEW(webView), webkitSettings);
424         g_object_unref(webkitSettings);
425     }
426
427     const gchar *uri = (uriArguments ? uriArguments[0] : "http://www.google.com/");
428     gchar *fileURL = filenameToURL(uri);
429
430     webkit_web_view_load_uri(webView, fileURL ? fileURL : uri);
431     g_free(fileURL);
432
433     gtk_widget_grab_focus(GTK_WIDGET(webView));
434     gtk_widget_show_all(main_window);
435     gtk_main();
436
437     return 0;
438 }