test/parser: Cleanup Makefile.am
[petitboot] / test / parser / utils.c
1
2 #include <assert.h>
3 #include <err.h>
4 #include <fcntl.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <sys/stat.h>
8 #include <sys/types.h>
9
10 #include <talloc/talloc.h>
11 #include <types/types.h>
12 #include <url/url.h>
13
14 #include "device-handler.h"
15 #include "parser.h"
16 #include "resource.h"
17
18 #include "parser-test.h"
19
20 struct p_item {
21         struct list_item list;
22         struct parser *parser;
23 };
24
25 STATIC_LIST(parsers);
26
27 void __register_parser(struct parser *parser)
28 {
29         struct p_item* i = talloc(NULL, struct p_item);
30
31         i->parser = parser;
32         list_add(&parsers, &i->list);
33 }
34
35 static void __attribute__((destructor)) __cleanup_parsers(void)
36 {
37         struct p_item *item, *tmp;
38
39         list_for_each_entry_safe(&parsers, item, tmp, list)
40                 talloc_free(item);
41 }
42
43 static struct discover_device *test_create_device_simple(
44                 struct discover_context *ctx)
45 {
46         static int dev_idx;
47         char name[10];
48
49         sprintf(name, "__test%d", dev_idx++);
50
51         return test_create_device(ctx, name);
52 }
53
54 struct discover_device *test_create_device(struct discover_context *ctx,
55                 const char *name)
56 {
57         struct discover_device *dev;
58
59         dev = talloc_zero(ctx, struct discover_device);
60         dev->device = talloc_zero(dev, struct device);
61
62         list_init(&dev->boot_options);
63
64         dev->device->id = talloc_strdup(dev, name);
65         dev->device_path = talloc_asprintf(dev, "/dev/%s", name);
66         dev->mount_path = talloc_asprintf(dev, "/test/mount/%s", name);
67
68         return dev;
69 }
70
71 static struct discover_context *test_create_context(struct parser_test *test)
72 {
73         struct discover_context *ctx;
74
75         ctx = talloc_zero(test, struct discover_context);
76         assert(ctx);
77
78         list_init(&ctx->boot_options);
79         ctx->device = test_create_device_simple(ctx);
80
81         return ctx;
82 }
83
84 struct parser_test *test_init(void)
85 {
86         struct parser_test *test;
87
88         test = talloc_zero(NULL, struct parser_test);
89         test->handler = device_handler_init(NULL, NULL, 0);
90         test->ctx = test_create_context(test);
91
92         return test;
93 }
94
95 void test_fini(struct parser_test *test)
96 {
97         device_handler_destroy(test->handler);
98         talloc_free(test);
99 }
100
101 void __test_read_conf_data(struct parser_test *test,
102                 const char *buf, size_t len)
103 {
104         test->conf.size = len;
105         test->conf.buf = talloc_memdup(test, buf, len);
106 }
107
108 void test_read_conf_file(struct parser_test *test, const char *filename)
109 {
110         struct stat stat;
111         char *path;
112         int fd, rc;
113
114         path = talloc_asprintf(test, "%s/%s", TEST_CONF_BASE, filename);
115
116         fd = open(path, O_RDONLY);
117         if (fd < 0)
118                 err(EXIT_FAILURE, "Can't open test conf file %s\n", path);
119
120         rc = fstat(fd, &stat);
121         assert(!rc);
122         (void)rc;
123
124         test->conf.size = stat.st_size;
125         test->conf.buf = talloc_array(test, char, test->conf.size + 1);
126
127         rc = read(fd, test->conf.buf, test->conf.size);
128         assert(rc == (ssize_t)test->conf.size);
129
130         *(char *)(test->conf.buf + test->conf.size) = '\0';
131
132         close(fd);
133         talloc_free(path);
134 }
135
136 int test_run_parser(struct parser_test *test, const char *parser_name)
137 {
138         struct p_item* i;
139
140         list_for_each_entry(&parsers, i, list) {
141                 if (strcmp(i->parser->name, parser_name))
142                         continue;
143                 test->ctx->parser = i->parser;
144                 return i->parser->parse(test->ctx, test->conf.buf, test->conf.size);
145         }
146
147         errx(EXIT_FAILURE, "%s: parser '%s' not found", __func__, parser_name);
148 }
149
150 bool resource_resolve(struct device_handler *handler, struct parser *parser,
151                 struct resource *resource)
152 {
153         if (!resource)
154                 return true;
155         if (resource->resolved)
156                 return true;
157
158         assert(parser);
159         assert(parser->resolve_resource);
160
161         return parser->resolve_resource(handler, resource);
162 }
163
164 void boot_option_resolve(struct device_handler *handler,
165                 struct discover_boot_option *opt)
166 {
167         resource_resolve(handler, opt->source, opt->boot_image);
168         resource_resolve(handler, opt->source, opt->initrd);
169         resource_resolve(handler, opt->source, opt->icon);
170 }
171
172 extern void device_handler_add_device(struct device_handler *handler,
173                 struct discover_device *dev);
174
175 void test_hotplug_device(struct parser_test *test, struct discover_device *dev)
176 {
177         struct discover_boot_option *opt;
178
179         device_handler_add_device(test->handler, dev);
180
181         list_for_each_entry(&test->ctx->boot_options, opt, list)
182                 boot_option_resolve(test->handler, opt);
183 }
184
185 struct discover_boot_option *get_boot_option(struct discover_context *ctx,
186                 int idx)
187 {
188         struct discover_boot_option *opt;
189         int i = 0;
190
191         list_for_each_entry(&ctx->boot_options, opt, list) {
192                 if (i++ == idx)
193                         return opt;
194         }
195
196         assert(0);
197
198         return NULL;
199 }
200
201 void __check_boot_option_count(struct discover_context *ctx, int count,
202                 const char *file, int line)
203 {
204         struct discover_boot_option *opt;
205         int i = 0;
206
207         list_for_each_entry(&ctx->boot_options, opt, list)
208                 i++;
209
210         if (i == count)
211                 return;
212
213         fprintf(stderr, "%s:%d: boot option count check failed\n", file, line);
214         fprintf(stderr, "expected %d options, got %d:\n", count, i);
215
216         i = 1;
217         list_for_each_entry(&ctx->boot_options, opt, list)
218                 fprintf(stderr, "  %2d: %s [%s]\n", i++, opt->option->name,
219                                 opt->option->id);
220
221         exit(EXIT_FAILURE);
222 }
223
224 void __check_args(struct discover_boot_option *opt, const char *args,
225                 const char *file, int line)
226 {
227         int rc;
228
229         if (!opt->option->boot_args) {
230                 fprintf(stderr, "%s:%d: arg check failed\n", file, line);
231                 fprintf(stderr, "  no arguments parsed\n");
232                 fprintf(stderr, "  expected '%s'\n", args);
233                 exit(EXIT_FAILURE);
234         }
235
236         rc = strcmp(opt->option->boot_args, args);
237         if (rc) {
238                 fprintf(stderr, "%s:%d: arg check failed\n", file, line);
239                 fprintf(stderr, "  got      '%s'\n", opt->option->boot_args);
240                 fprintf(stderr, "  expected '%s'\n", args);
241                 exit(EXIT_FAILURE);
242         }
243 }
244
245 void __check_name(struct discover_boot_option *opt, const char *name,
246                 const char *file, int line)
247 {
248         int rc;
249
250         rc = strcmp(opt->option->name, name);
251         if (rc) {
252                 fprintf(stderr, "%s:%d: name check failed\n", file, line);
253                 fprintf(stderr, "  got      '%s'\n", opt->option->name);
254                 fprintf(stderr, "  expected '%s'\n", name);
255                 exit(EXIT_FAILURE);
256         }
257 }
258
259 void __check_resolved_local_resource(struct resource *res,
260                 struct discover_device *dev, const char *local_path,
261                 const char *file, int line)
262 {
263         const char *exp_url, *got_url;
264
265         if (!res)
266                 errx(EXIT_FAILURE, "%s:%d: No resource", file, line);
267
268         if (!res->resolved)
269                 errx(EXIT_FAILURE, "%s:%d: Resource is not resolved",
270                                 file, line);
271
272         exp_url = talloc_asprintf(res, "file://%s%s",
273                         dev->mount_path, local_path);
274         got_url = pb_url_to_string(res->url);
275
276         if (strcmp(got_url, exp_url)) {
277                 fprintf(stderr, "%s:%d: Resource mismatch\n", file, line);
278                 fprintf(stderr, "  got      '%s'\n", got_url);
279                 fprintf(stderr, "  expected '%s'\n", exp_url);
280                 exit(EXIT_FAILURE);
281         }
282 }
283
284 void __check_unresolved_resource(struct resource *res,
285                 const char *file, int line)
286 {
287         if (!res)
288                 errx(EXIT_FAILURE, "%s:%d: No resource", file, line);
289
290         if (res->resolved)
291                 errx(EXIT_FAILURE, "%s:%d: Resource is resolved", file, line);
292 }
293
294 void __check_not_present_resource(struct resource *res,
295                 const char *file, int line)
296 {
297         if (res)
298                 errx(EXIT_FAILURE, "%s:%d: Resource present", file, line);
299 }