2 3c1cf9d0 2021-01-11 op * Copyright (c) 2020 Omar Polo <op@omarpolo.com>
4 3c1cf9d0 2021-01-11 op * Permission to use, copy, modify, and distribute this software for any
5 3c1cf9d0 2021-01-11 op * purpose with or without fee is hereby granted, provided that the above
6 3c1cf9d0 2021-01-11 op * copyright notice and this permission notice appear in all copies.
8 3c1cf9d0 2021-01-11 op * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 3c1cf9d0 2021-01-11 op * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 3c1cf9d0 2021-01-11 op * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 3c1cf9d0 2021-01-11 op * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 3c1cf9d0 2021-01-11 op * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 3c1cf9d0 2021-01-11 op * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 3c1cf9d0 2021-01-11 op * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 3c1cf9d0 2021-01-11 op #include <err.h>
18 3c1cf9d0 2021-01-11 op #include <stdio.h>
19 3c1cf9d0 2021-01-11 op #include <string.h>
21 3c1cf9d0 2021-01-11 op #include "gmid.h"
23 3c1cf9d0 2021-01-11 op #define TEST(iri, fail, exp, descr) \
24 3c1cf9d0 2021-01-11 op if (!run_test(iri, fail, exp)) { \
25 3c1cf9d0 2021-01-11 op fprintf(stderr, "%s:%d: error: %s\n", \
26 3c1cf9d0 2021-01-11 op __FILE__, __LINE__, descr); \
30 3c1cf9d0 2021-01-11 op #define IRI(schema, host, port, path, query, frag) \
31 3c1cf9d0 2021-01-11 op ((struct iri){schema, host, port, 0, path, query, frag})
33 3c1cf9d0 2021-01-11 op #define DIFF(wanted, got, field) \
34 3c1cf9d0 2021-01-11 op if (wanted->field == NULL || got->field == NULL || \
35 3c1cf9d0 2021-01-11 op strcmp(wanted->field, got->field)) { \
36 3c1cf9d0 2021-01-11 op fprintf(stderr, #field ":\n\tgot: %s\n\twanted: %s\n", \
37 3c1cf9d0 2021-01-11 op got->field, wanted->field); \
41 3c1cf9d0 2021-01-11 op #define PASS 0
42 3c1cf9d0 2021-01-11 op #define FAIL 1
45 3c1cf9d0 2021-01-11 op diff_iri(struct iri *p, struct iri *exp)
47 3c1cf9d0 2021-01-11 op DIFF(p, exp, schema);
48 3c1cf9d0 2021-01-11 op DIFF(p, exp, host);
49 3c1cf9d0 2021-01-11 op DIFF(p, exp, port);
50 3c1cf9d0 2021-01-11 op DIFF(p, exp, path);
51 3c1cf9d0 2021-01-11 op DIFF(p, exp, query);
52 3c1cf9d0 2021-01-11 op DIFF(p, exp, fragment);
57 3c1cf9d0 2021-01-11 op run_test(const char *iri, int should_fail, struct iri expected)
59 3c1cf9d0 2021-01-11 op int failed, ok = 1;
60 3c1cf9d0 2021-01-11 op char *iri_copy;
61 3c1cf9d0 2021-01-11 op struct iri parsed;
62 3c1cf9d0 2021-01-11 op const char *error;
64 3c1cf9d0 2021-01-11 op if ((iri_copy = strdup(iri)) == NULL)
65 3c1cf9d0 2021-01-11 op err(1, "strdup");
67 3c1cf9d0 2021-01-11 op fprintf(stderr, "=> %s\n", iri);
68 3c1cf9d0 2021-01-11 op failed = !parse_iri(iri_copy, &parsed, &error);
70 3c1cf9d0 2021-01-11 op if (failed && should_fail)
73 3c1cf9d0 2021-01-11 op if (error != NULL)
74 3c1cf9d0 2021-01-11 op fprintf(stderr, "> %s\n", error);
76 3c1cf9d0 2021-01-11 op ok = !failed && !should_fail;
78 3c1cf9d0 2021-01-11 op ok = diff_iri(&expected, &parsed);
81 3c1cf9d0 2021-01-11 op free(iri_copy);
88 3c1cf9d0 2021-01-11 op struct iri empty = {"", "", "", PASS, "", "", ""};
90 3c1cf9d0 2021-01-11 op TEST("http://omarpolo.com",
92 3c1cf9d0 2021-01-11 op IRI("http", "omarpolo.com", "", "", "", ""),
93 3c1cf9d0 2021-01-11 op "can parse iri with empty path");
96 3c1cf9d0 2021-01-11 op TEST("omarpolo.com", FAIL, empty, "FAIL when the schema is missing");
97 3c1cf9d0 2021-01-11 op TEST("gemini:/omarpolo.com", FAIL, empty, "FAIL with invalid marker");
98 3c1cf9d0 2021-01-11 op TEST("gemini//omarpolo.com", FAIL, empty, "FAIL with invalid marker");
99 3c1cf9d0 2021-01-11 op TEST("h!!p://omarpolo.com", FAIL, empty, "FAIL with invalid schema");
100 de428fff 2021-01-13 op TEST("GEMINI://omarpolo.com",
102 de428fff 2021-01-13 op IRI("gemini", "omarpolo.com", "", "", "", ""),
103 de428fff 2021-01-13 op "Schemas are case insensitive.");
105 3c1cf9d0 2021-01-11 op /* authority */
106 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com",
108 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "", "", ""),
109 3c1cf9d0 2021-01-11 op "can parse authority with empty path");
110 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/",
112 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "", "", ""),
113 3c1cf9d0 2021-01-11 op "can parse authority with empty path (alt)")
114 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com:1965",
116 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "1965", "", "", ""),
117 3c1cf9d0 2021-01-11 op "can parse with port and empty path");
118 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com:1965/",
120 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "1965", "", "", ""),
121 3c1cf9d0 2021-01-11 op "can parse with port and empty path")
122 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com:196s",
125 3c1cf9d0 2021-01-11 op "FAIL with invalid port number");
126 e4d82bec 2021-01-15 op TEST("gemini://OmArPoLo.CoM",
128 e4d82bec 2021-01-15 op IRI("gemini", "omarpolo.com", "", "", "", ""),
129 e4d82bec 2021-01-15 op "host is case-insensitive");
132 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/bar/baz",
134 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "foo/bar/baz", "", ""),
135 3c1cf9d0 2021-01-11 op "parse simple paths");
136 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo//bar///baz",
138 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "foo/bar/baz", "", ""),
139 3c1cf9d0 2021-01-11 op "parse paths with multiple slashes");
140 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/./bar/./././baz",
142 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "foo/bar/baz", "", ""),
143 3c1cf9d0 2021-01-11 op "parse paths with . elements");
144 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/bar/../bar/baz",
146 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "foo/bar/baz", "", ""),
147 3c1cf9d0 2021-01-11 op "parse paths with .. elements");
148 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/../foo/bar/../bar/baz/../baz",
150 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "foo/bar/baz", "", ""),
151 3c1cf9d0 2021-01-11 op "parse paths with multiple .. elements");
152 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/..",
154 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "", "", ""),
155 3c1cf9d0 2021-01-11 op "parse paths with a trailing ..");
156 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/../",
158 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "", "", ""),
159 3c1cf9d0 2021-01-11 op "parse paths with a trailing ..");
160 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/../..",
163 3c1cf9d0 2021-01-11 op "reject paths that would escape the root");
164 6a9ae707 2021-01-11 op TEST("gemini://omarpolo.com/foo/../../",
167 6a9ae707 2021-01-11 op "reject paths that would escape the root")
168 3c1cf9d0 2021-01-11 op TEST("gemini://omarpolo.com/foo/../foo/../././/bar/baz/.././.././/",
170 3c1cf9d0 2021-01-11 op IRI("gemini", "omarpolo.com", "", "", "", ""),
171 3c1cf9d0 2021-01-11 op "parse path with lots of cleaning available");
174 3c1cf9d0 2021-01-11 op TEST("foo://example.com/foo/?gne",
176 3c1cf9d0 2021-01-11 op IRI("foo", "example.com", "", "foo/", "gne", ""),
177 3c1cf9d0 2021-01-11 op "parse query strings");
178 3c1cf9d0 2021-01-11 op TEST("foo://example.com/foo/?gne&foo",
180 3c1cf9d0 2021-01-11 op IRI("foo", "example.com", "", "foo/", "gne&foo", ""),
181 3c1cf9d0 2021-01-11 op "parse query strings");
182 3c1cf9d0 2021-01-11 op TEST("foo://example.com/foo/?gne%2F",
184 3c1cf9d0 2021-01-11 op IRI("foo", "example.com", "", "foo/", "gne/", ""),
185 3c1cf9d0 2021-01-11 op "parse query strings");
187 3c1cf9d0 2021-01-11 op /* fragment */
188 3c1cf9d0 2021-01-11 op TEST("foo://bar.co/#foo",
190 3c1cf9d0 2021-01-11 op IRI("foo", "bar.co", "", "", "", "foo"),
191 3c1cf9d0 2021-01-11 op "can recognize fragments");
193 3c1cf9d0 2021-01-11 op /* percent encoding */
194 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/caf%C3%A8.gmi",
196 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "cafè.gmi", "", ""),
197 3c1cf9d0 2021-01-11 op "can decode");
198 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/caff%C3%A8%20macchiato.gmi",
200 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "caffè macchiato.gmi", "", ""),
201 3c1cf9d0 2021-01-11 op "can decode");
202 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/caff%C3%A8+macchiato.gmi",
204 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "caffè+macchiato.gmi", "", ""),
205 3c1cf9d0 2021-01-11 op "can decode");
206 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/foo%2F..%2F..",
209 3c1cf9d0 2021-01-11 op "conversion and checking are done in the correct order");
210 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/foo%00?baz",
213 3c1cf9d0 2021-01-11 op "rejects %00");
216 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/cafè.gmi",
218 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "cafè.gmi", "" , ""),
219 3c1cf9d0 2021-01-11 op "decode IRI (with a 2-byte utf8 seq)");
220 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/世界.gmi",
222 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "世界.gmi", "" , ""),
223 3c1cf9d0 2021-01-11 op "decode IRI");
224 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/😼.gmi",
226 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "😼.gmi", "" , ""),
227 3c1cf9d0 2021-01-11 op "decode IRI (with a 3-byte utf8 seq)");
228 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/😼/𤭢.gmi",
230 3c1cf9d0 2021-01-11 op IRI("foo", "bar.com", "", "😼/𤭢.gmi", "" , ""),
231 3c1cf9d0 2021-01-11 op "decode IRI (with a 3-byte and a 4-byte utf8 seq)");
232 3c1cf9d0 2021-01-11 op TEST("foo://bar.com/世界/\xC0\x80",
235 3c1cf9d0 2021-01-11 op "reject invalid sequence (overlong NUL)");