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
100
101
102
103
104
105
106
107
108
109
110
|
#include "build.h"
#include "package.h"
#include "log.h"
#include "paths.h"
#include "package_list.h"
#include "download.h"
#include "lauxlib.h"
#include "lua.h"
#include "lualib.h"
#include "stdio.h"
#include "stdlib.h"
#include "unistd.h"
int pow_package_build(pow_package *pkg) {
if (pkg->pkg_ref == LUA_NOREF) {
pow_log_error("error! pkg_ref is equal to LUA_NOREF");
return 1;
}
lua_rawgeti(pkg->L, LUA_REGISTRYINDEX, pkg->pkg_ref);
char *tmp_path = NULL;
int err = pow_create_dir_for_package(&tmp_path);
if (err) {
pow_log_error("error creating temp dir for package");
return 1;
}
if ((err = chdir(tmp_path))) {
pow_log_error("uh oh oops %d", err);
return 1;
}
pow_log_info("building package %s", pkg->name);
if (pow_download_source(pkg->sources[0], tmp_path)) {
pow_log_error("failed to get sources");
return 1;
}
lua_getfield(pkg->L, -1, "build");
if (lua_isnil(pkg->L, -1)) {
pow_log_error("invalid package schema, build is not defined");
lua_pop(pkg->L, 1);
return 1;
}
if (!lua_isfunction(pkg->L, -1)) {
pow_log_error("invalid package schema, build is not a function");
lua_pop(pkg->L, 1);
return 1;
}
if (lua_pcall(pkg->L, 0, 0, 0) != LUA_OK) {
free(tmp_path);
pow_log_error("error running script: %s", lua_tostring(pkg->L, -1));
lua_pop(pkg->L, 1);
return 1;
}
lua_getfield(pkg->L, -1, "install");
if (lua_isnil(pkg->L, -1)) {
pow_log_error("invalid package schema, install is not defined");
lua_pop(pkg->L, 1);
return 1;
}
if (!lua_isfunction(pkg->L, -1)) {
pow_log_error("invalid package schema, install is not a function");
lua_pop(pkg->L, 1);
return 1;
}
pow_log_info("build finished, installing");
if (lua_pcall(pkg->L, 0, 0, 0) != LUA_OK) {
free(tmp_path);
pow_log_error("error running script: %s", lua_tostring(pkg->L, -1));
lua_pop(pkg->L, 1);
return 1;
}
free(tmp_path);
fflush(stdout);
return 0;
}
|
