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
|
#include <ccan/tal/path/path.h>
#include <ccan/tal/path/path.c>
#include <ccan/tap/tap.h>
int main(void)
{
char *path, *ctx = tal_strdup(NULL, "ctx");
plan_tests(34);
path = path_join(ctx, "foo", "bar");
ok1(streq(path, "foo/bar"));
ok1(tal_parent(path) == ctx);
tal_free(path);
path = path_join(ctx, "foo/", "bar");
ok1(streq(path, "foo/bar"));
ok1(tal_parent(path) == ctx);
tal_free(path);
path = path_join(ctx, "foo/", "/bar");
ok1(streq(path, "/bar"));
ok1(tal_parent(path) == ctx);
tal_free(path);
path = path_join(ctx, "foo", "/bar");
ok1(streq(path, "/bar"));
ok1(tal_parent(path) == ctx);
tal_free(path);
/* Test take */
path = path_join(ctx, "foo", take(tal_strdup(ctx, "bar")));
ok1(streq(path, "foo/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, "foo", take(tal_strdup(ctx, "/bar")));
ok1(streq(path, "/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, take(tal_strdup(ctx, "foo")), "bar");
ok1(streq(path, "foo/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, take(tal_strdup(ctx, "foo")), "/bar");
ok1(streq(path, "/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, take(tal_strdup(ctx, "foo")),
take(tal_strdup(ctx, "bar")));
ok1(streq(path, "foo/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, take(tal_strdup(ctx, "foo")),
take(tal_strdup(ctx, "/bar")));
ok1(streq(path, "/bar"));
ok1(tal_parent(path) == ctx);
ok1(tal_first(ctx) == path && tal_next(ctx, path) == NULL);
tal_free(path);
path = path_join(ctx, take(NULL), "bar");
ok1(!path);
ok1(!tal_first(ctx));
/* This is allowed to succeed, as first arg unneeded. */
path = path_join(ctx, take(NULL), "/bar");
ok1(!path || streq(path, "/bar"));
tal_free(path);
ok1(!tal_first(ctx));
path = path_join(ctx, "foo", take(NULL));
ok1(!path);
ok1(!tal_first(ctx));
path = path_join(ctx, take(NULL), take(NULL));
ok1(!path);
ok1(!tal_first(ctx));
tal_free(ctx);
return exit_status();
}
|
