1 /*
2  * Copyright (c) 2021, 2022 Omar Polo <op@omarpolo.com>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  */
16 
17 /*
18  * pagebundler converts the given file into a valid C program that can
19  * be compiled.  The generated code provides a variable that holds the
20  * content of the original file and a _len variable with the size.
21  *
22  * Usage: pagebundler file > outfile
23  */
24 
25 #include <ctype.h>
26 #include <errno.h>
27 #include <limits.h>
28 #include <stdint.h>
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <unistd.h>
33 
34 static void
35 setfname(const char *fname, char *buf, size_t siz)
36 {
37 	const char	*c, *d;
38 	size_t		 len;
39 
40 	if ((c = strrchr(fname, '/')) != NULL)
41 		c++;
42 	else
43 		c = fname;
44 
45 	if ((d = strrchr(fname, '.')) == NULL || c > d)
46 		d = strchr(fname, '\0');
47 
48 	len = d - c;
49 	if (len >= siz) {
50 		fprintf(stderr, "file name too long: %s\n", fname);
51 		exit(1);
52 	}
53 
54 	memcpy(buf, c, len);
55 	buf[len] = '\0';
56 }
57 
58 static int
59 validc(int c)
60 {
61 	return isprint(c) && c != '\\' && c != '\'' && c != '\n';
62 }
63 
64 int
65 main(int argc, char **argv)
66 {
67 	size_t	 r, i, n;
68 	FILE	*f;
69 	uint8_t	 buf[BUFSIZ];
70 	char	 varname[PATH_MAX];
71 
72 	if (argc != 2) {
73 		fprintf(stderr, "usage: %s file\n", *argv);
74 		return 1;
75 	}
76 
77 	setfname(argv[1], varname, sizeof(varname));
78 
79 	if ((f = fopen(argv[1], "r")) == NULL) {
80 		fprintf(stderr, "%s: can't open %s: %s",
81 		    argv[0], argv[1], strerror(errno));
82 		return 1;
83 	}
84 
85 	printf("const uint8_t %s[] = {", varname);
86 
87 	n = 0;
88 	for (;;) {
89 		r = fread(buf, 1, sizeof(buf), f);
90 
91 		for (i = 0; i < r; ++i, ++n) {
92 			if (n % 12 == 0)
93 				printf("\n\t");
94 			else
95 				printf(" ");
96 
97 			if (validc(buf[i]))
98 				printf("'%c',", buf[i]);
99 			else if (buf[i] == '\n')
100 				printf("'\\n',");
101 			else
102 				printf("0x%x,", buf[i]);
103 		}
104 		printf("\n");
105 
106 		if (r != sizeof(buf))
107 			break;
108 	}
109 
110 	printf("\t0x0\n");
111 	printf("}; /* %s */\n", varname);
112 
113 	fclose(f);
114 	return 0;
115 }