git.ozlabs.org Git - petitboot/blob - 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 parser_test *test)
  45 {
  46         static int dev_idx;
  47         char name[10];
  48
  49         sprintf(name, "__test%d", dev_idx++);
  50
  51         return test_create_device(test, name);
  52 }
  53
  54 struct discover_device *test_create_device(struct parser_test *test,
  55                 const char *name)
  56 {
  57         struct discover_device *dev;
  58
  59         dev = discover_device_create(test->handler, name);
  60
  61         dev->device->id = talloc_strdup(dev, name);
  62         dev->device_path = talloc_asprintf(dev, "/dev/%s", name);
  63         dev->mount_path = talloc_asprintf(dev, "/test/mount/%s", name);
  64         dev->mounted = true;
  65
  66         return dev;
  67 }
  68
  69 static struct discover_context *test_create_context(struct parser_test *test)
  70 {
  71         struct discover_context *ctx;
  72
  73         ctx = talloc_zero(test, struct discover_context);
  74         assert(ctx);
  75
  76         list_init(&ctx->boot_options);
  77         ctx->device = test_create_device_simple(test);
  78         ctx->test_data = test;
  79         device_handler_add_device(test->handler, ctx->device);
  80
  81         return ctx;
  82 }
  83
  84 extern struct config *test_config_init(struct parser_test *test);
  85
  86 struct parser_test *test_init(void)
  87 {
  88         struct parser_test *test;
  89
  90         test = talloc_zero(NULL, struct parser_test);
  91         test->config = test_config_init(test);
  92         test->handler = device_handler_init(NULL, NULL, 0);
  93         test->ctx = test_create_context(test);
  94
  95         return test;
  96 }
  97
  98 void test_fini(struct parser_test *test)
  99 {
 100         device_handler_destroy(test->handler);
 101         talloc_free(test);
 102 }
 103
 104 void __test_read_conf_data(struct parser_test *test,
 105                 const char *buf, size_t len)
 106 {
 107         test->conf.size = len;
 108         test->conf.buf = talloc_memdup(test, buf, len);
 109 }
 110
 111 void test_read_conf_file(struct parser_test *test, const char *filename)
 112 {
 113         struct stat stat;
 114         char *path;
 115         int fd, rc;
 116
 117         path = talloc_asprintf(test, "%s/%s", TEST_CONF_BASE, filename);
 118
 119         fd = open(path, O_RDONLY);
 120         if (fd < 0)
 121                 err(EXIT_FAILURE, "Can't open test conf file %s\n", path);
 122
 123         rc = fstat(fd, &stat);
 124         assert(!rc);
 125         (void)rc;
 126
 127         test->conf.size = stat.st_size;
 128         test->conf.buf = talloc_array(test, char, test->conf.size + 1);
 129
 130         rc = read(fd, test->conf.buf, test->conf.size);
 131         assert(rc == (ssize_t)test->conf.size);
 132
 133         *(char *)(test->conf.buf + test->conf.size) = '\0';
 134
 135         close(fd);
 136         talloc_free(path);
 137 }
 138
 139 void test_set_conf_source(struct parser_test *test, const char *url)
 140 {
 141         test->ctx->conf_url = pb_url_parse(test, url);
 142         assert(test->ctx->conf_url);
 143 }
 144
 145 int test_run_parser(struct parser_test *test, const char *parser_name)
 146 {
 147         struct p_item* i;
 148
 149         list_for_each_entry(&parsers, i, list) {
 150                 if (strcmp(i->parser->name, parser_name))
 151                         continue;
 152                 test->ctx->parser = i->parser;
 153                 return i->parser->parse(test->ctx, test->conf.buf, test->conf.size);
 154         }
 155
 156         errx(EXIT_FAILURE, "%s: parser '%s' not found", __func__, parser_name);
 157 }
 158
 159 bool resource_resolve(struct device_handler *handler, struct parser *parser,
 160                 struct resource *resource)
 161 {
 162         if (!resource)
 163                 return true;
 164         if (resource->resolved)
 165                 return true;
 166
 167         assert(parser);
 168         assert(parser->resolve_resource);
 169
 170         return parser->resolve_resource(handler, resource);
 171 }
 172
 173 void boot_option_resolve(struct device_handler *handler,
 174                 struct discover_boot_option *opt)
 175 {
 176         resource_resolve(handler, opt->source, opt->boot_image);
 177         resource_resolve(handler, opt->source, opt->initrd);
 178         resource_resolve(handler, opt->source, opt->icon);
 179 }
 180
 181 void test_hotplug_device(struct parser_test *test, struct discover_device *dev)
 182 {
 183         struct discover_boot_option *opt;
 184
 185         device_handler_add_device(test->handler, dev);
 186
 187         list_for_each_entry(&test->ctx->boot_options, opt, list)
 188                 boot_option_resolve(test->handler, opt);
 189 }
 190
 191 struct discover_boot_option *get_boot_option(struct discover_context *ctx,
 192                 int idx)
 193 {
 194         struct discover_boot_option *opt;
 195         int i = 0;
 196
 197         list_for_each_entry(&ctx->boot_options, opt, list) {
 198                 if (i++ == idx)
 199                         return opt;
 200         }
 201
 202         assert(0);
 203
 204         return NULL;
 205 }
 206
 207 void __check_boot_option_count(struct discover_context *ctx, int count,
 208                 const char *file, int line)
 209 {
 210         struct discover_boot_option *opt;
 211         int defaults = 0, i = 0;
 212
 213         list_for_each_entry(&ctx->boot_options, opt, list) {
 214                 i++;
 215                 if (opt->option->is_default)
 216                         defaults++;
 217         }
 218
 219         if (defaults > 1) {
 220                 fprintf(stderr, "%s:%d: parser returned multiple default "
 221                                 "options\n", file, line);
 222                 exit(EXIT_FAILURE);
 223         }
 224
 225         if (i == count)
 226                 return;
 227
 228         fprintf(stderr, "%s:%d: boot option count check failed\n", file, line);
 229         fprintf(stderr, "expected %d options, got %d:\n", count, i);
 230
 231         i = 1;
 232         list_for_each_entry(&ctx->boot_options, opt, list)
 233                 fprintf(stderr, "  %2d: %s [%s]\n", i++, opt->option->name,
 234                                 opt->option->id);
 235
 236         exit(EXIT_FAILURE);
 237 }
 238
 239 void __check_args(struct discover_boot_option *opt, const char *args,
 240                 const char *file, int line)
 241 {
 242         int rc;
 243
 244         if (!opt->option->boot_args && !args)
 245                 return;
 246
 247         if (!opt->option->boot_args) {
 248                 fprintf(stderr, "%s:%d: arg check failed\n", file, line);
 249                 fprintf(stderr, "  no arguments parsed\n");
 250                 fprintf(stderr, "  expected '%s'\n", args);
 251                 exit(EXIT_FAILURE);
 252         }
 253
 254         rc = strcmp(opt->option->boot_args, args);
 255         if (rc) {
 256                 fprintf(stderr, "%s:%d: arg check failed\n", file, line);
 257                 fprintf(stderr, "  got      '%s'\n", opt->option->boot_args);
 258                 fprintf(stderr, "  expected '%s'\n", args);
 259                 exit(EXIT_FAILURE);
 260         }
 261 }
 262
 263 void __check_name(struct discover_boot_option *opt, const char *name,
 264                 const char *file, int line)
 265 {
 266         int rc;
 267
 268         rc = strcmp(opt->option->name, name);
 269         if (rc) {
 270                 fprintf(stderr, "%s:%d: name check failed\n", file, line);
 271                 fprintf(stderr, "  got      '%s'\n", opt->option->name);
 272                 fprintf(stderr, "  expected '%s'\n", name);
 273                 exit(EXIT_FAILURE);
 274         }
 275 }
 276
 277 void __check_is_default(struct discover_boot_option *opt,
 278                 const char *file, int line)
 279 {
 280         if (opt->option->is_default)
 281                 return;
 282
 283         fprintf(stderr, "%s:%d: default check failed\n", file, line);
 284         exit(EXIT_FAILURE);
 285 }
 286
 287 void __check_resolved_local_resource(struct resource *res,
 288                 struct discover_device *dev, const char *local_path,
 289                 const char *file, int line)
 290 {
 291         const char *exp_url, *got_url;
 292
 293         if (!res)
 294                 errx(EXIT_FAILURE, "%s:%d: No resource", file, line);
 295
 296         if (!res->resolved)
 297                 errx(EXIT_FAILURE, "%s:%d: Resource is not resolved",
 298                                 file, line);
 299
 300         exp_url = talloc_asprintf(res, "file://%s%s",
 301                         dev->mount_path, local_path);
 302         got_url = pb_url_to_string(res->url);
 303
 304         if (strcmp(got_url, exp_url)) {
 305                 fprintf(stderr, "%s:%d: Resource mismatch\n", file, line);
 306                 fprintf(stderr, "  got      '%s'\n", got_url);
 307                 fprintf(stderr, "  expected '%s'\n", exp_url);
 308                 exit(EXIT_FAILURE);
 309         }
 310 }
 311
 312 void __check_resolved_url_resource(struct resource *res,
 313                 const char *url, const char *file, int line)
 314 {
 315         char *res_url;
 316
 317         if (!res)
 318                 errx(EXIT_FAILURE, "%s:%d: No resource", file, line);
 319
 320         if (!res->resolved)
 321                 errx(EXIT_FAILURE, "%s:%d: Resource is not resolved",
 322                                 file, line);
 323
 324         res_url = pb_url_to_string(res->url);
 325         if (strcmp(url, res_url)) {
 326                 fprintf(stderr, "%s:%d: Resource mismatch\n", file, line);
 327                 fprintf(stderr, "  got      '%s'\n", res_url);
 328                 fprintf(stderr, "  expected '%s'\n", url);
 329                 exit(EXIT_FAILURE);
 330         }
 331 }
 332 void __check_unresolved_resource(struct resource *res,
 333                 const char *file, int line)
 334 {
 335         if (!res)
 336                 errx(EXIT_FAILURE, "%s:%d: No resource", file, line);
 337
 338         if (res->resolved)
 339                 errx(EXIT_FAILURE, "%s:%d: Resource is resolved", file, line);
 340 }
 341
 342 void __check_not_present_resource(struct resource *res,
 343                 const char *file, int line)
 344 {
 345         if (res)
 346                 errx(EXIT_FAILURE, "%s:%d: Resource present", file, line);
 347 }