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 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, 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 }