b92409f6b2f381c3ca5fab47d7b657842bf93f87
[ffmpeg.git] / libavformat / url.c
1 /*
2  * URL utility functions
3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22
23 #include "avformat.h"
24 #include "internal.h"
25 #include "config.h"
26 #include "url.h"
27 #if CONFIG_NETWORK
28 #include "network.h"
29 #endif
30 #include "libavutil/avassert.h"
31 #include "libavutil/avstring.h"
32
33 /**
34  * @file
35  * URL utility functions.
36  */
37
38 int ff_url_join(char *str, int size, const char *proto,
39                 const char *authorization, const char *hostname,
40                 int port, const char *fmt, ...)
41 {
42 #if CONFIG_NETWORK
43     struct addrinfo hints = { 0 }, *ai;
44 #endif
45
46     str[0] = '\0';
47     if (proto)
48         av_strlcatf(str, size, "%s://", proto);
49     if (authorization && authorization[0])
50         av_strlcatf(str, size, "%s@", authorization);
51 #if CONFIG_NETWORK && defined(AF_INET6)
52     /* Determine if hostname is a numerical IPv6 address,
53      * properly escape it within [] in that case. */
54     hints.ai_flags = AI_NUMERICHOST;
55     if (!getaddrinfo(hostname, NULL, &hints, &ai)) {
56         if (ai->ai_family == AF_INET6) {
57             av_strlcat(str, "[", size);
58             av_strlcat(str, hostname, size);
59             av_strlcat(str, "]", size);
60         } else {
61             av_strlcat(str, hostname, size);
62         }
63         freeaddrinfo(ai);
64     } else
65 #endif
66         /* Not an IPv6 address, just output the plain string. */
67         av_strlcat(str, hostname, size);
68
69     if (port >= 0)
70         av_strlcatf(str, size, ":%d", port);
71     if (fmt) {
72         va_list vl;
73         size_t len = strlen(str);
74
75         va_start(vl, fmt);
76         vsnprintf(str + len, size > len ? size - len : 0, fmt, vl);
77         va_end(vl);
78     }
79     return strlen(str);
80 }
81
82 static const char *find_delim(const char *delim, const char *cur, const char *end)
83 {
84     while (cur < end && !strchr(delim, *cur))
85         cur++;
86     return cur;
87 }
88
89 int ff_url_decompose(URLComponents *uc, const char *url, const char *end)
90 {
91     const char *cur, *aend, *p;
92
93     av_assert0(url);
94     if (!end)
95         end = url + strlen(url);
96     cur = uc->url = url;
97
98     /* scheme */
99     uc->scheme = cur;
100     p = find_delim(":/", cur, end); /* lavf "schemes" can contain options */
101     if (*p == ':')
102         cur = p + 1;
103
104     /* authority */
105     uc->authority = cur;
106     if (end - cur >= 2 && cur[0] == '/' && cur[1] == '/') {
107         cur += 2;
108         aend = find_delim("/?#", cur, end);
109
110         /* userinfo */
111         uc->userinfo = cur;
112         p = find_delim("@", cur, aend);
113         if (*p == '@')
114             cur = p + 1;
115
116         /* host */
117         uc->host = cur;
118         if (*cur == '[') { /* hello IPv6, thanks for using colons! */
119             p = find_delim("]", cur, aend);
120             if (*p != ']')
121                 return AVERROR(EINVAL);
122             if (p + 1 < aend && p[1] != ':')
123                 return AVERROR(EINVAL);
124             cur = p + 1;
125         } else {
126             cur = find_delim(":", cur, aend);
127         }
128
129         /* port */
130         uc->port = cur;
131         cur = aend;
132     } else {
133         uc->userinfo = uc->host = uc->port = cur;
134     }
135
136     /* path */
137     uc->path = cur;
138     cur = find_delim("?#", cur, end);
139
140     /* query */
141     uc->query = cur;
142     if (*cur == '?')
143         cur = find_delim("#", cur, end);
144
145     /* fragment */
146     uc->fragment = cur;
147
148     uc->end = end;
149     return 0;
150 }
151
152 static void trim_double_dot_url(char *buf, const char *rel, int size)
153 {
154     const char *p = rel;
155     const char *root = rel;
156     char tmp_path[MAX_URL_SIZE] = {0, };
157     char *sep;
158     char *node;
159
160     /* Get the path root of the url which start by "://" */
161     if (p && (sep = strstr(p, "://"))) {
162         sep += 3;
163         root = strchr(sep, '/');
164         if (!root)
165             return;
166     }
167
168     /* set new current position if the root node is changed */
169     p = root;
170     while (p && (node = strstr(p, ".."))) {
171         av_strlcat(tmp_path, p, node - p + strlen(tmp_path));
172         p = node + 3;
173         sep = strrchr(tmp_path, '/');
174         if (sep)
175             sep[0] = '\0';
176         else
177             tmp_path[0] = '\0';
178     }
179
180     if (!av_stristart(p, "/", NULL) && root != rel)
181         av_strlcat(tmp_path, "/", size);
182
183     av_strlcat(tmp_path, p, size);
184     /* start set buf after temp path process. */
185     av_strlcpy(buf, rel, root - rel + 1);
186
187     if (!av_stristart(tmp_path, "/", NULL) && root != rel)
188         av_strlcat(buf, "/", size);
189
190     av_strlcat(buf, tmp_path, size);
191 }
192
193 void ff_make_absolute_url(char *buf, int size, const char *base,
194                           const char *rel)
195 {
196     char *sep, *path_query;
197     char *root, *p;
198     char tmp_path[MAX_URL_SIZE];
199
200     memset(tmp_path, 0, sizeof(tmp_path));
201     /* Absolute path, relative to the current server */
202     if (base && strstr(base, "://") && rel[0] == '/') {
203         if (base != buf)
204             av_strlcpy(buf, base, size);
205         sep = strstr(buf, "://");
206         if (sep) {
207             /* Take scheme from base url */
208             if (rel[1] == '/') {
209                 sep[1] = '\0';
210             } else {
211                 /* Take scheme and host from base url */
212                 sep += 3;
213                 sep = strchr(sep, '/');
214                 if (sep)
215                     *sep = '\0';
216             }
217         }
218         av_strlcat(buf, rel, size);
219         trim_double_dot_url(tmp_path, buf, size);
220         memset(buf, 0, size);
221         av_strlcpy(buf, tmp_path, size);
222         return;
223     }
224     /* If rel actually is an absolute url, just copy it */
225     if (!base || strstr(rel, "://") || rel[0] == '/') {
226         memset(buf, 0, size);
227         trim_double_dot_url(buf, rel, size);
228         return;
229     }
230     if (base != buf)
231         av_strlcpy(buf, base, size);
232
233     /* Strip off any query string from base */
234     path_query = strchr(buf, '?');
235     if (path_query)
236         *path_query = '\0';
237
238     /* Is relative path just a new query part? */
239     if (rel[0] == '?') {
240         av_strlcat(buf, rel, size);
241         trim_double_dot_url(tmp_path, buf, size);
242         memset(buf, 0, size);
243         av_strlcpy(buf, tmp_path, size);
244         return;
245     }
246
247     root = p = buf;
248     /* Get the path root of the url which start by "://" */
249     if (p && strstr(p, "://")) {
250         sep = strstr(p, "://");
251         if (sep) {
252             sep += 3;
253             root = strchr(sep, '/');
254             if (!root)
255                 return;
256         }
257     }
258
259     /* Remove the file name from the base url */
260     sep = strrchr(buf, '/');
261     if (sep && sep <= root)
262         sep = root;
263
264     if (sep)
265         sep[1] = '\0';
266     else
267         buf[0] = '\0';
268     while (av_strstart(rel, "..", NULL) && sep) {
269         /* Remove the path delimiter at the end */
270         if (sep > root) {
271             sep[0] = '\0';
272             sep = strrchr(buf, '/');
273         }
274
275         /* If the next directory name to pop off is "..", break here */
276         if (!strcmp(sep ? &sep[1] : buf, "..")) {
277             /* Readd the slash we just removed */
278             av_strlcat(buf, "/", size);
279             break;
280         }
281         /* Cut off the directory name */
282         if (sep)
283             sep[1] = '\0';
284         else
285             buf[0] = '\0';
286         rel += 3;
287     }
288     av_strlcat(buf, rel, size);
289     trim_double_dot_url(tmp_path, buf, size);
290     memset(buf, 0, size);
291     av_strlcpy(buf, tmp_path, size);
292 }
293
294 AVIODirEntry *ff_alloc_dir_entry(void)
295 {
296     AVIODirEntry *entry = av_mallocz(sizeof(AVIODirEntry));
297     if (entry) {
298         entry->type = AVIO_ENTRY_UNKNOWN;
299         entry->size = -1;
300         entry->modification_timestamp = -1;
301         entry->access_timestamp = -1;
302         entry->status_change_timestamp = -1;
303         entry->user_id = -1;
304         entry->group_id = -1;
305         entry->filemode = -1;
306     }
307     return entry;
308 }