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
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#define _XOPEN_SOURCE 500
#include <extlib.h>
#include "config.h"
struct compile_cmd_t *find_cmd(char *file_extension, struct compile_cmd_t **ccmds, size_t ccmds_len) {
for (int i = 0; i < ccmds_len; i++) {
if (strcmp (ccmds[i]->fileext, file_extension) == 0) {
return ccmds[i];
}
}
return NULL;
}
int main (int argc, char *argv[]) {
int errno = 0;
size_t parts_len = 0;
size_t ccmds_len = 0;
struct compile_cmd_t **ccmds = NULL;
struct compile_cmd_t *matching_cmd = NULL;
char *tmpdir = strdup ("/tmp/XXXXXX");;
char *compile_file = NULL;
char *ap = NULL;
char *cmd = NULL;
char *excmd = NULL;
char *fileparts[strlen (argv[argc-1])];
if (argc < 2) {
fprintf (stderr, "usage: %s <source file>", argv[0]);
errno = 1;
goto EXIT;
}
compile_file = strdup(argv[argc-1]);
ccmds_len = get_commands(&ccmds);
for (int i = 0; (ap = strsep (&argv[argc-1], ".")); i++) {
fileparts[i] = ap;
parts_len += 1;
}
if (parts_len == 0) {
fprintf (stderr, "error: no file extension found\n");
errno = 1;
goto EXIT;
}
matching_cmd = find_cmd(fileparts[parts_len-1], ccmds, ccmds_len);
if (!matching_cmd) {
fprintf (stderr, "error: no complier for file extension '%s' found\n", fileparts[parts_len-1]);
errno = 1;
goto EXIT;
}
tmpdir = mkdtemp(tmpdir);
if (!tmpdir) {
errno = 1;
goto EXIT;
}
cmd = malloc (strlen (matching_cmd->cmd)+
strlen (matching_cmd->args)+
strlen (compile_file)+
strlen (" -o ")+
strlen (tmpdir)+
strlen ("/exec")+1);
if (!cmd) {
errno = 1;
goto EXIT;
}
excmd = malloc (strlen (tmpdir)+strlen ("/exec")+1);
if (!excmd) {
errno = 1;
goto EXIT;
};
sprintf (cmd, "%s %s %s -o %s/exec", matching_cmd->cmd, matching_cmd->args, compile_file, tmpdir);
if ((errno = system (cmd), errno != 0)) {
fprintf(stderr, "error: compiler failed with code %d\n", errno);
goto EXIT;
}
sprintf (excmd, "%s/exec", tmpdir);
if ((errno = system (excmd), errno != 0))
fprintf (stderr, "error: binary failed with code %d\n", errno);
EXIT:
for (int i = 0; i < ccmds_len; i++)
compile_cmd_free (ccmds[i]);
if (excmd) free (excmd);
if (ccmds) free (ccmds);
if (tmpdir) free (tmpdir);
if (cmd) free (cmd);
if (compile_file) free (compile_file);
exit(errno % 255);
}
|
