1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* Copyright (C) 2014 Igalia S.L.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of the
* License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
#include "yelp-uri-builder.h"
#define BOGUS_PREFIX "bogus-"
#define BOGUS_PREFIX_LEN 6
gchar *
build_network_uri (const gchar *uri)
{
SoupURI *soup_uri;
gchar *bogus_scheme, *path, *retval;
soup_uri = soup_uri_new (uri);
/* Don't mangle URIs for local files */
if (soup_uri->scheme == SOUP_URI_SCHEME_FILE)
return g_strdup (uri);
/* Build the URI that will be passed to WebKit. Relative URIs will be
* automatically resolved by WebKit, so we need to add a leading slash to
* help: and ghelp: URIs to be considered as absolute by WebKit.
*/
if (g_str_equal (soup_uri->scheme, "ghelp") || g_str_equal (soup_uri->scheme, "gnome-help") ||
g_str_equal (soup_uri->scheme, "help") || g_str_equal (soup_uri->scheme, "help-list") ||
g_str_equal (soup_uri->scheme, "info") || g_str_equal (soup_uri->scheme, "man")) {
if (g_str_equal (soup_uri->scheme, "info") && soup_uri->fragment) {
path = g_strdup_printf ("/%s/%s", soup_uri->path, soup_uri->fragment);
soup_uri_set_fragment (soup_uri, NULL);
} else {
path = g_strdup_printf ("/%s", soup_uri->path);
}
soup_uri_set_path (soup_uri, path);
g_free (path);
}
/* We need to use a different scheme from help or ghelp to be able to deal
with absolute uris in the HTML. Help uri schemes are help:gnome-help/...
they dont have a slash after the colon so WebKit resolves them as a relative
url when they are not. This doesn't happen if the current page URI has a different
scheme from absolute uri scheme.
*/
bogus_scheme = build_network_scheme (soup_uri->scheme);
soup_uri_set_scheme (soup_uri, bogus_scheme);
retval = soup_uri_to_string (soup_uri, FALSE);
soup_uri_free (soup_uri);
g_free (bogus_scheme);
return retval;
}
gchar *
build_yelp_uri (const gchar *uri_str)
{
gchar *resource;
int path_len;
gchar *uri = g_strdup (uri_str);
if (!g_str_has_prefix (uri, BOGUS_PREFIX))
return uri;
memmove (uri, uri + BOGUS_PREFIX_LEN, strlen (uri) - BOGUS_PREFIX_LEN + 1);
/* Remove the leading slash */
if ((resource = strstr (uri, ":"))) {
resource++;
memmove (resource, resource + 1, strlen (resource));
}
/* Remove the trailing slash if any */
path_len = strlen (uri);
if (uri[path_len - 1] == '/')
uri[path_len - 1] = '\0';
if (g_str_has_prefix (uri, "info:")) {
gchar *frag;
frag = g_strrstr (uri, "/");
if (frag)
frag[0] = '#';
}
return uri;
}
gchar *
build_network_scheme (const gchar *scheme)
{
return g_strdup_printf (BOGUS_PREFIX "%s", scheme);
}
|
