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))
132 /* Assume this is a non-url local file. */
137 static void pb_url_parse_path(struct pb_url *url)
139 const char *p = strrchr(url->path, '/');
141 talloc_free(url->dir);
142 talloc_free(url->file);
146 url->dir = talloc_strndup(url, url->path, p - url->path);
147 url->file = talloc_strdup(url, p);
150 url->file = talloc_strdup(url, url->path);
155 * pb_url_parse - Parse a remote file URL.
156 * @ctx: The talloc context to associate with the returned string.
158 * Returns a talloc'ed struct pb_url instance on success, or NULL on error.
161 struct pb_url *pb_url_parse(void *ctx, const char *url_str)
163 const struct pb_scheme_info *si;
167 pb_log("%s: '%s'\n", __func__, url_str);
169 if (!url_str || !*url_str) {
170 assert(0 && "bad url");
174 url = talloc_zero(ctx, struct pb_url);
179 si = pb_url_find_scheme(url_str);
181 url->scheme = si->scheme;
182 p = url_str + si->str_len + strlen("://");
184 url->full = talloc_strdup(url, url_str);
186 if (url->scheme == pb_url_file) {
189 url->path = talloc_strdup(url, p);
195 path = strchr(p, '/');
198 pb_log("%s: parse path failed '%s'\n", __func__ , p);
202 col = strchr(p, ':');
205 len = path - col - 1;
206 url->port = len ? talloc_strndup(url, col + 1, len)
209 url->host = len ? talloc_strndup(url, p, len) : NULL;
212 url->host = talloc_strndup(url, p, path - p);
215 /* remove multiple leading slashes */
216 for (; *path && *(path+1) == '/'; path++)
219 url->path = talloc_strdup(url, path);
222 pb_url_parse_path(url);
224 pb_log(" scheme %d\n", url->scheme);
225 pb_log(" host '%s'\n", url->host);
226 pb_log(" port '%s'\n", url->port);
227 pb_log(" path '%s'\n", url->path);
228 pb_log(" dir '%s'\n", url->dir);
229 pb_log(" file '%s'\n", url->file);
238 static bool is_url(const char *str)
240 return strstr(str, "://") != NULL;
243 static void pb_url_update_full(struct pb_url *url)
245 const struct pb_scheme_info *scheme = pb_url_scheme_info(url->scheme);
249 talloc_free(url->full);
251 url->full = talloc_asprintf(url, "%s://%s%s", scheme->str,
252 scheme->has_host ? url->host : "", url->path);
255 static struct pb_url *pb_url_copy(void *ctx, const struct pb_url *url)
257 struct pb_url *new_url;
259 new_url = talloc(ctx, struct pb_url);
260 new_url->scheme = url->scheme;
261 new_url->full = talloc_strdup(url, url->full);
263 new_url->host = url->host ? talloc_strdup(url, url->host) : NULL;
264 new_url->port = url->port ? talloc_strdup(url, url->port) : NULL;
265 new_url->path = url->path ? talloc_strdup(url, url->path) : NULL;
266 new_url->dir = url->dir ? talloc_strdup(url, url->dir) : NULL;
267 new_url->file = url->file ? talloc_strdup(url, url->file) : NULL;
272 struct pb_url *pb_url_join(void *ctx, const struct pb_url *url, const char *s)
274 struct pb_url *new_url;
276 /* complete url: just parse all info from s */
278 return pb_url_parse(ctx, s);
280 new_url = pb_url_copy(ctx, url);
283 /* absolute path: replace path of new_url */
284 talloc_free(new_url->path);
285 new_url->path = talloc_strdup(new_url, s);
288 /* relative path: join s to existing path. We know that
289 * url->dir ends with a slash. */
290 char *tmp = new_url->path;
291 new_url->path = talloc_asprintf(new_url, "%s%s", url->dir, s);
295 /* replace ->dir and ->file with components from ->path */
296 pb_url_parse_path(new_url);
298 /* and re-generate the full URL */
299 pb_url_update_full(new_url);
304 const char *pb_url_scheme_name(enum pb_url_scheme scheme)
306 const struct pb_scheme_info *info = pb_url_scheme_info(scheme);
307 return info ? info->str : NULL;