summaryrefslogtreecommitdiff
path: root/includes.c
blob: cbef99adb6c080c2321de6610b9d24082ad0a765 (plain)
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
#define _XOPEN_SOURCE 700
#include <fcntl.h>
#include <regex.h>
#include <sys/mman.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

#include "maje.h"

#define MAX_MATCHES (2)

/* TODO: recurse through headers */
/* TODO: avoid loops */

static struct majefile * find_inc(const struct majefile *file, const regex_t * restrict re)
{
	int fd = open(file->path, O_RDONLY);
	if (fd == -1) {
		return NULL;
	}

	void *map = mmap(NULL, (size_t)file->st.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
	if (map == MAP_FAILED) {
		close(fd);
		return NULL;
	}

	struct majefile *inc = NULL;

	regmatch_t match[MAX_MATCHES];
	
	void *base = map;
	while (regexec(re, base, MAX_MATCHES, match, 0) == 0) {
		if (match[1].rm_so == -1) {
			break;
		}
		char header[FILENAME_MAX] = { 0 };
		char *start = (char*)base + match[1].rm_so;
		memcpy(header, start, match[1].rm_eo - match[1].rm_so);
		inc = insert_file(inc, header, NULL);
		base = start + match[1].rm_eo;
	}

	munmap(map, file->st.st_size);
	close(fd);

	return inc;
}

struct majefile *find_includes(const struct majefile *source)
{
	static regex_t re = { .re_nsub = (size_t)-1 };
	if (re.re_nsub == (size_t)-1) {
		if (regcomp(&re,
			"#[[:space:]]*include[[:space:]]+.*\"(.*)\"",
			REG_EXTENDED | REG_NEWLINE) != 0) {
			fprintf(stderr, "maje: regcomp(#include) failed\n");
			abort();
		}
	}

	struct majefile *ret = find_inc(source, &re);

	if (ret != NULL) {
		while (ret->prev != NULL) {
			ret = ret->prev;
		}
	}

	return ret;
}