aboutsummaryrefslogtreecommitdiff
path: root/src/lua_state.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lua_state.c')
-rw-r--r--src/lua_state.c92
1 files changed, 46 insertions, 46 deletions
diff --git a/src/lua_state.c b/src/lua_state.c
index 49672e8..42b0a39 100644
--- a/src/lua_state.c
+++ b/src/lua_state.c
@@ -54,7 +54,7 @@ void init_bldit() {
B = luaL_newstate();
luaL_openlibs(B);
if (luaL_loadfile(B, "bldit.lua") || lua_pcall(B, 0, 0, 0)) {
- printf("%scannot run bldit script: %s\n", print_warning,
+ if (is_verbose) printf("%scannot run bldit script: %s\n", print_warning,
lua_tostring(B, -1));
return;
}
@@ -95,24 +95,24 @@ void cache_install_directories() {
bool repo_build(const char *repository) {
lua_getglobal(L, "repositories");
if (!config_loaded || !lua_istable(L, -1)) {
- printf("%slua variable 'repositories' is not a table.\n", print_warning);
+ if (is_verbose) printf("%slua variable 'repositories' is not a table.\n", print_warning);
lua_pop(L, 1);
return false;
}
- printf("%slua variable 'repositories' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%slua variable 'repositories' used successfully.\n", print_pkgit);
lua_getfield(L, -1, repository);
if (!lua_istable(L, -1)) {
- printf("%s'repositories' lua variable '%s' is not a table.\n", print_warning, repository);
+ if (is_verbose) printf("%s'repositories' lua variable '%s' is not a table.\n", print_warning, repository);
lua_pop(L, 2);
return false;
}
- printf("%s'repositories' lua variable '%s' used successfully.\n", print_pkgit, repository);
+ if (is_verbose) printf("%s'repositories' lua variable '%s' used successfully.\n", print_pkgit, repository);
lua_getfield(L, -1, "dependencies");
if (!lua_istable(L, -1)) {
- printf("%sbldit variable 'dependencies' is not a table.\n", print_warning);
+ if (is_verbose) printf("%sbldit variable 'dependencies' is not a table.\n", print_warning);
} else {
- printf("%sbldit variable 'dependencies' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit variable 'dependencies' used successfully.\n", print_pkgit);
Repo *repo;
while (lua_next(L, -2) != 0) {
const char *depname = lua_tostring(L, -2);
@@ -133,55 +133,55 @@ bool repo_build(const char *repository) {
lua_getfield(L, -1, "build");
if (!lua_isfunction(L, -1)) {
- printf("%s'repositories' lua variable 'build' is not a function.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'build' is not a function.\n",
print_warning);
lua_pop(L, 3);
return false;
}
- printf("%s'repositories' lua variable 'build' used successfully.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'build' used successfully.\n",
print_pkgit);
if (lua_pcall(L, 0, 0, 0) != LUA_OK) {
- printf("'repositories' build failed: %s\n", lua_tostring(L, -1));
+ printf("%s'repositories' build failed: %s\n", print_warning, lua_tostring(L, -1));
lua_pop(L, 1);
lua_pop(L, 2);
return false;
}
- printf("%s'repositories' lua function 'build' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua function 'build' ran successfully.\n", print_pkgit);
lua_getfield(L, -1, "pre_install");
if (!lua_isfunction(L, -1)) {
- printf("%s'repositories' lua variable 'pre_install' is not a function.\n", print_warning);
+ if (is_verbose) printf("%s'repositories' lua variable 'pre_install' is not a function.\n", print_warning);
}
- printf("%s'repositories' lua variable 'pre_install' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua variable 'pre_install' used successfully.\n", print_pkgit);
if (lua_pcall(L, 0, 0, 0) != LUA_OK) {
- printf("'repositories' pre_install failed: %s\n", lua_tostring(L, -1));
+ if (is_verbose) printf("%s'repositories' pre_install failed: %s\n", print_warning, lua_tostring(L, -1));
}
- printf("%s'repositories' lua function 'pre_install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua function 'pre_install' ran successfully.\n", print_pkgit);
lua_getfield(L, -1, "install");
if (!lua_isfunction(L, -1)) {
- printf("%s'repositories' lua variable 'install' is not a function.\n", print_warning);
+ if (is_verbose) printf("%s'repositories' lua variable 'install' is not a function.\n", print_warning);
} else {
is_auto_installed = false;
}
- printf("%s'repositories' lua variable 'install' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua variable 'install' used successfully.\n", print_pkgit);
if (lua_pcall(L, 0, 0, 0) != LUA_OK) {
- printf("'repositories' install failed: %s\n", lua_tostring(L, -1));
+ if (is_verbose) printf("%s'repositories' install failed: %s\n", print_warning, lua_tostring(L, -1));
}
- printf("%s'repositories' lua function 'install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua function 'install' ran successfully.\n", print_pkgit);
lua_pop(L, 1);
lua_getfield(L, -1, "post_install");
if (!lua_isfunction(L, -1)) {
- printf("%s'repositories' lua variable 'post_install' is not a function.\n", print_warning);
+ if (is_verbose) printf("%s'repositories' lua variable 'post_install' is not a function.\n", print_warning);
}
- printf("%s'repositories' lua variable 'post_install' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua variable 'post_install' used successfully.\n", print_pkgit);
if (lua_pcall(L, 0, 0, 0) != LUA_OK) {
- printf("'repositories' post_install failed: %s\n", lua_tostring(L, -1));
+ if (is_verbose) printf("%s'repositories' post_install failed: %s\n", print_warning, lua_tostring(L, -1));
}
lua_pop(L, 2);
- printf("%s'repositories' lua function 'post_install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%s'repositories' lua function 'post_install' ran successfully.\n", print_pkgit);
return true;
}
@@ -190,30 +190,30 @@ bool bldit(const char *target) {
luaL_openlibs(B);
if (luaL_loadfile(B, "bldit.lua") || lua_pcall(B, 0, 0, 0)) {
- printf("%scannot run bldit script: %s\n", print_warning, lua_tostring(B, -1));
+ if (is_verbose) printf("%scannot run bldit script: %s\n", print_warning, lua_tostring(B, -1));
lua_close(B);
return false;
}
lua_getglobal(B, "bldit_version");
if (!lua_isstring(B, -1)) {
- printf("%sbldit variable 'bldit_version' is not a string.\n", print_warning);
+ if (is_verbose) printf("%sbldit variable 'bldit_version' is not a string.\n", print_warning);
} else {
- printf("%sbldit variable 'bldit_version' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit variable 'bldit_version' used successfully.\n", print_pkgit);
}
lua_getglobal(B, "package_version");
if (!lua_isstring(B, -1)) {
- printf("%sbldit variable 'package_version' is not a string.\n", print_warning);
+ if (is_verbose) printf("%sbldit variable 'package_version' is not a string.\n", print_warning);
} else {
- printf("%sbldit variable 'package_version' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit variable 'package_version' used successfully.\n", print_pkgit);
}
lua_getglobal(B, "global_dependencies");
if (!lua_istable(B, -1)) {
- printf("%sbldit variable 'global_dependencies' is not a table.\n", print_warning);
+ if (is_verbose) printf("%sbldit variable 'global_dependencies' is not a table.\n", print_warning);
} else {
- printf("%sbldit variable 'global_dependencies' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit variable 'global_dependencies' used successfully.\n", print_pkgit);
Repo *repo;
while (lua_next(B, -2) != 0) {
const char *depname = lua_tostring(B, -2);
@@ -233,71 +233,71 @@ bool bldit(const char *target) {
lua_getglobal(B, "targets");
if (!lua_istable(B, -1)) {
- printf("%sbldit variable 'targets' is not a table.\n", print_warning);
+ if (is_verbose) printf("%sbldit variable 'targets' is not a table.\n", print_warning);
lua_close(B);
return false;
}
- printf("%sbldit variable 'targets' used successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit variable 'targets' used successfully.\n", print_pkgit);
lua_getfield(B, -1, target);
if (!lua_istable(B, -1)) {
- printf("%sbldit variable '%s' is not a table.\n", print_warning, target);
+ if (is_verbose) printf("%sbldit variable '%s' is not a table.\n", print_warning, target);
lua_pop(B, 2);
lua_close(B);
return false;
}
- printf("%sbldit variable '%s' used successfully.\n", print_pkgit, target);
+ if (is_verbose) printf("%sbldit variable '%s' used successfully.\n", print_pkgit, target);
lua_getfield(B, -1, "build");
if (!lua_isfunction(B, -1)) {
- printf("%s'repositories' lua variable 'build' is not a function.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'build' is not a function.\n",
print_warning);
lua_pop(B, 3);
lua_close(B);
return false;
}
if (lua_pcall(B, 0, 0, 0) != LUA_OK) {
- printf("build failed: %s\n", lua_tostring(B, -1));
+ printf("%sbuild failed: %s\n", print_error, lua_tostring(B, -1));
lua_pop(B, 1);
lua_pop(B, 2);
lua_close(B);
return false;
}
- printf("%sbldit function 'build' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit function 'build' ran successfully.\n", print_pkgit);
lua_getfield(B, -1, "pre_install");
if (!lua_isfunction(B, -1)) {
- printf("%s'repositories' lua variable 'pre_install' is not a function.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'pre_install' is not a function.\n",
print_warning);
}
if (lua_pcall(B, 0, 0, 0) != LUA_OK) {
- printf("build failed: %s\n", lua_tostring(B, -1));
+ printf("%sbuild failed: %s\n", print_error, lua_tostring(B, -1));
}
- printf("%sbldit function 'pre_install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit function 'pre_install' ran successfully.\n", print_pkgit);
lua_getfield(B, -1, "install");
if (!lua_isfunction(B, -1)) {
- printf("%s'repositories' lua variable 'install' is not a function.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'install' is not a function.\n",
print_warning);
} else {
is_auto_installed = false;
}
if (lua_pcall(B, 0, 0, 0) != LUA_OK) {
- printf("build failed: %s\n", lua_tostring(B, -1));
+ printf("%sbuild failed: %s\n", print_error, lua_tostring(B, -1));
}
- printf("%sbldit function 'install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit function 'install' ran successfully.\n", print_pkgit);
lua_getfield(B, -1, "post_install");
if (!lua_isfunction(B, -1)) {
- printf("%s'repositories' lua variable 'post_install' is not a function.\n",
+ if (is_verbose) printf("%s'repositories' lua variable 'post_install' is not a function.\n",
print_warning);
}
if (lua_pcall(B, 0, 0, 0) != LUA_OK) {
- printf("build failed: %s\n", lua_tostring(B, -1));
+ printf("%sbuild failed: %s\n", print_error, lua_tostring(B, -1));
}
- printf("%sbldit function 'post_install' ran successfully.\n", print_pkgit);
+ if (is_verbose) printf("%sbldit function 'post_install' ran successfully.\n", print_pkgit);
lua_pop(B, 2);
lua_close(B);