2 * Copyright (C) 2009 Sony Computer Entertainment Inc.
3 * Copyright 2009 Sony Corp.
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; version 2 of the License.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 #if defined(HAVE_CONFIG_H)
29 #include "talloc/talloc.h"
33 * pb_scheme_info - Helper for parsing URLs.
36 struct pb_scheme_info {
37 enum pb_url_scheme scheme;
43 static const struct pb_scheme_info schemes[] = {
45 .scheme = pb_url_file,
47 .str_len = sizeof("file") - 1,
53 .str_len = sizeof("ftp") - 1,
57 .scheme = pb_url_http,
59 .str_len = sizeof("http") - 1,
63 .scheme = pb_url_https,
65 .str_len = sizeof("https") - 1,
71 .str_len = sizeof("nfs") - 1,
75 .scheme = pb_url_sftp,
77 .str_len = sizeof("sftp") - 1,
81 .scheme = pb_url_tftp,
83 .str_len = sizeof("tftp") - 1,
88 static const struct pb_scheme_info *file_scheme = &schemes[0];
91 * pb_url_find_scheme - Find the pb_scheme_info for a URL string.
94 static const struct pb_scheme_info *pb_url_scheme_info(
95 enum pb_url_scheme scheme)
99 for (i = 0; i < sizeof(schemes) / sizeof(schemes[0]); i++) {
100 const struct pb_scheme_info *info = &schemes[i];
102 if (info->scheme == scheme)
109 static const struct pb_scheme_info *pb_url_find_scheme(const char *url)
111 static const int sep_len = sizeof("://") - 1;
112 static const char *sep = "://";
113 unsigned int i, url_len;
115 url_len = strlen(url);
117 for (i = 0; i < sizeof(schemes) / sizeof(schemes[0]); i++) {
118 const struct pb_scheme_info *scheme = &schemes[i];
120 if (url_len < scheme->str_len + sep_len)
123 if (strncmp(url + scheme->str_len, sep, sep_len))
126 if (strncasecmp(url, scheme->str, scheme->str_len))
135 static void pb_url_parse_path(struct pb_url *url)
137 const char *p = strrchr(url->path, '/');
139 talloc_free(url->dir);
140 talloc_free(url->file);
144 url->dir = talloc_strndup(url, url->path, p - url->path);
145 url->file = talloc_strdup(url, p);
148 url->file = talloc_strdup(url, url->path);
153 * pb_url_parse - Parse a remote file URL.
154 * @ctx: The talloc context to associate with the returned string.
156 * Returns a talloc'ed struct pb_url instance on success, or NULL on error.
159 struct pb_url *pb_url_parse(void *ctx, const char *url_str)
161 const struct pb_scheme_info *si;
165 pb_log("%s: '%s'\n", __func__, url_str);
167 if (!url_str || !*url_str) {
168 assert(0 && "bad url");
172 url = talloc_zero(ctx, struct pb_url);
177 si = pb_url_find_scheme(url_str);
179 url->scheme = si->scheme;
180 p = url_str + si->str_len + strlen("://");
182 url->scheme = file_scheme->scheme;
186 url->full = talloc_strdup(url, url_str);
188 if (url->scheme == pb_url_file) {
191 url->path = talloc_strdup(url, p);
197 path = strchr(p, '/');
200 pb_log("%s: parse path failed '%s'\n", __func__ , p);
204 col = strchr(p, ':');
207 len = path - col - 1;
208 url->port = len ? talloc_strndup(url, col + 1, len)
211 url->host = len ? talloc_strndup(url, p, len) : NULL;
214 url->host = talloc_strndup(url, p, path - p);
217 /* remove multiple leading slashes */
218 for (; *path && *(path+1) == '/'; path++)
221 url->path = talloc_strdup(url, path);
224 pb_url_parse_path(url);
226 pb_log(" scheme %d\n", url->scheme);
227 pb_log(" host '%s'\n", url->host);
228 pb_log(" port '%s'\n", url->port);
229 pb_log(" path '%s'\n", url->path);
230 pb_log(" dir '%s'\n", url->dir);
231 pb_log(" file '%s'\n", url->file);
240 static bool is_url(const char *str)
242 return strstr(str, "://") != NULL;
245 char *pb_url_to_string(struct pb_url *url)
247 const struct pb_scheme_info *scheme = pb_url_scheme_info(url->scheme);
250 return talloc_asprintf(url, "%s://%s%s", scheme->str,
251 scheme->has_host ? url->host : "", url->path);
254 static void pb_url_update_full(struct pb_url *url)
256 talloc_free(url->full);
257 url->full = pb_url_to_string(url);
260 static struct pb_url *pb_url_copy(void *ctx, const struct pb_url *url)
262 struct pb_url *new_url;
264 new_url = talloc(ctx, struct pb_url);
265 new_url->scheme = url->scheme;
266 new_url->full = talloc_strdup(url, url->full);
268 new_url->host = url->host ? talloc_strdup(url, url->host) : NULL;
269 new_url->port = url->port ? talloc_strdup(url, url->port) : NULL;
270 new_url->path = url->path ? talloc_strdup(url, url->path) : NULL;
271 new_url->dir = url->dir ? talloc_strdup(url, url->dir) : NULL;
272 new_url->file = url->file ? talloc_strdup(url, url->file) : NULL;
277 struct pb_url *pb_url_join(void *ctx, const struct pb_url *url, const char *s)
279 struct pb_url *new_url;
281 /* complete url: just parse all info from s */
283 return pb_url_parse(ctx, s);
285 new_url = pb_url_copy(ctx, url);
288 /* absolute path: replace path of new_url */
289 talloc_free(new_url->path);
290 new_url->path = talloc_strdup(new_url, s);
293 /* relative path: join s to existing path. We know that
294 * url->dir ends with a slash. */
295 char *tmp = new_url->path;
296 new_url->path = talloc_asprintf(new_url, "%s%s", url->dir, s);
300 /* replace ->dir and ->file with components from ->path */
301 pb_url_parse_path(new_url);
303 /* and re-generate the full URL */
304 pb_url_update_full(new_url);
309 const char *pb_url_scheme_name(enum pb_url_scheme scheme)
311 const struct pb_scheme_info *info = pb_url_scheme_info(scheme);
312 return info ? info->str : NULL;