diff --git a/src/driver/slbt_driver_ctx.c b/src/driver/slbt_driver_ctx.c
index b105c2b..4812076 100644
--- a/src/driver/slbt_driver_ctx.c
+++ b/src/driver/slbt_driver_ctx.c
@@ -1755,6 +1755,17 @@ int slbt_get_driver_ctx(
static void slbt_free_driver_ctx_impl(struct slbt_driver_ctx_alloc * ictx)
{
+ struct slbt_error_info ** perr;
+ struct slbt_error_info * erri;
+
+ for (perr=ictx->ctx.errinfp; *perr; perr++) {
+ erri = *perr;
+
+ if (erri->eany && (erri->esyscode == ENOENT))
+ free(erri->eany);
+ }
+
+
if (ictx->ctx.libname)
free(ictx->ctx.libname);
@@ -1807,11 +1818,11 @@ int slbt_set_alternate_host(
slbt_free_host_params(&ictx->ctx.ahost);
if (!(ictx->ctx.ahost.host = strdup(host)))
- return SLBT_SYSTEM_ERROR(ctx);
+ return SLBT_SYSTEM_ERROR(ctx,0);
if (!(ictx->ctx.ahost.flavor = strdup(flavor))) {
slbt_free_host_params(&ictx->ctx.ahost);
- return SLBT_SYSTEM_ERROR(ctx);
+ return SLBT_SYSTEM_ERROR(ctx,0);
}
ictx->ctx.cctx.ahost.host = ictx->ctx.ahost.host;
diff --git a/src/helper/slbt_archive_import.c b/src/helper/slbt_archive_import.c
index 84bef92..ae8821b 100644
--- a/src/helper/slbt_archive_import.c
+++ b/src/helper/slbt_archive_import.c
@@ -103,12 +103,12 @@ int slbt_archive_import(
/* fork */
if (pipe(fd))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if ((pid = fork()) < 0) {
close(fd[0]);
close(fd[1]);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
/* child */
@@ -131,7 +131,7 @@ int slbt_archive_import(
if (slbt_dprintf(fd[1],fmt,dst,src) < 0) {
close(fd[1]);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
close(fd[1]);
diff --git a/src/helper/slbt_copy_file.c b/src/helper/slbt_copy_file.c
index c74ffcc..e9abee5 100644
--- a/src/helper/slbt_copy_file.c
+++ b/src/helper/slbt_copy_file.c
@@ -1,3 +1,4 @@
+
/*******************************************************************/
/* slibtool: a skinny libtool implementation, written in C */
/* Copyright (C) 2016--2018 Z. Gilboa */
@@ -55,7 +56,7 @@ int slbt_copy_file(
/* dlltool spawn */
ret = ((slbt_spawn(ectx,true) < 0) || ectx->exitcode)
- ? SLBT_SYSTEM_ERROR(dctx) : 0;
+ ? SLBT_SYSTEM_ERROR(dctx,0) : 0;
ectx->argv = oargv;
ectx->program = oprogram;
diff --git a/src/internal/slibtool_errinfo_impl.c b/src/internal/slibtool_errinfo_impl.c
index 472c818..84f019e 100644
--- a/src/internal/slibtool_errinfo_impl.c
+++ b/src/internal/slibtool_errinfo_impl.c
@@ -34,7 +34,7 @@ int slbt_record_error(
erri->efunction = efunction;
erri->eline = eline;
erri->eflags = eflags;
- erri->eany = eany;
+ erri->eany = (eany && (esyscode == ENOENT)) ? strdup(eany) : eany;
ictx->errinfp++;
diff --git a/src/internal/slibtool_errinfo_impl.h b/src/internal/slibtool_errinfo_impl.h
index a1d3b61..1c3fb9f 100644
--- a/src/internal/slibtool_errinfo_impl.h
+++ b/src/internal/slibtool_errinfo_impl.h
@@ -19,7 +19,7 @@ int slbt_record_error(
unsigned eflags,
void * eany);
-#define SLBT_SYSTEM_ERROR(dctx) \
+#define SLBT_SYSTEM_ERROR(dctx,eany) \
slbt_record_error( \
dctx, \
errno, \
@@ -27,7 +27,7 @@ int slbt_record_error(
__func__, \
__LINE__, \
SLBT_ERROR_TOP_LEVEL, \
- 0)
+ (void *)eany)
#define SLBT_BUFFER_ERROR(dctx) \
slbt_record_error( \
diff --git a/src/internal/slibtool_lconf_impl.c b/src/internal/slibtool_lconf_impl.c
index 6b55c9f..ad335f1 100644
--- a/src/internal/slibtool_lconf_impl.c
+++ b/src/internal/slibtool_lconf_impl.c
@@ -51,7 +51,7 @@ static int slbt_lconf_open(
: fdlconf;
if (fstatat(fdlconfdir,".",&stcwd,0) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
lconf = lconf ? lconf : "libtool";
fdlconf = openat(fdlconfdir,lconf,O_RDONLY,0);
@@ -62,11 +62,11 @@ static int slbt_lconf_open(
slbt_lconf_close(fdcwd,fdlconfdir);
if (fdparent < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (fstat(fdparent,&stparent) < 0) {
close(fdparent);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
if (stparent.st_dev != stcwd.st_dev) {
@@ -115,7 +115,7 @@ int slbt_get_lconf_flags(
/* map relative libtool script */
if (fstat(fdlconf,&st) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
addr = mmap(
0,st.st_size,
diff --git a/src/internal/slibtool_libmeta_impl.c b/src/internal/slibtool_libmeta_impl.c
index 18984bd..31d060d 100644
--- a/src/internal/slibtool_libmeta_impl.c
+++ b/src/internal/slibtool_libmeta_impl.c
@@ -41,7 +41,7 @@ static int slbt_create_default_library_wrapper(
dctx->cctx->output,
O_RDWR|O_CREAT|O_TRUNC,
0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,dctx->cctx->output);
/* version info */
current = 0;
@@ -124,7 +124,7 @@ static int slbt_create_default_library_wrapper(
close(fdout);
- return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx) : 0;
+ return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx,0) : 0;
}
static int slbt_create_compatible_library_wrapper(
@@ -153,7 +153,7 @@ static int slbt_create_compatible_library_wrapper(
dctx->cctx->output,
O_RDWR|O_CREAT|O_TRUNC,
0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,dctx->cctx->output);
/* version info */
current = 0;
@@ -263,7 +263,7 @@ static int slbt_create_compatible_library_wrapper(
close(fdout);
- return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx) : 0;
+ return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx,0) : 0;
}
int slbt_create_library_wrapper(
diff --git a/src/internal/slibtool_objmeta_impl.c b/src/internal/slibtool_objmeta_impl.c
index b38cf75..f1a33d0 100644
--- a/src/internal/slibtool_objmeta_impl.c
+++ b/src/internal/slibtool_objmeta_impl.c
@@ -25,7 +25,7 @@ static int slbt_create_default_object_wrapper(
ectx->ltobjname,
O_RDWR|O_CREAT|O_TRUNC,
0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,ectx->ltobjname);
verinfo = slbt_source_version();
@@ -50,7 +50,7 @@ static int slbt_create_default_object_wrapper(
close(fdout);
- return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx) : 0;
+ return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx,0) : 0;
}
static int slbt_create_compatible_object_wrapper(
@@ -66,7 +66,7 @@ static int slbt_create_compatible_object_wrapper(
ectx->ltobjname,
O_RDWR|O_CREAT|O_TRUNC,
0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx, ectx->ltobjname);
verinfo = slbt_source_version();
@@ -98,7 +98,7 @@ static int slbt_create_compatible_object_wrapper(
close(fdout);
- return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx) : 0;
+ return (ret < 0) ? SLBT_SYSTEM_ERROR(dctx,0) : 0;
}
int slbt_create_object_wrapper(
diff --git a/src/internal/slibtool_symlink_impl.c b/src/internal/slibtool_symlink_impl.c
index 5ce9158..dd91d5e 100644
--- a/src/internal/slibtool_symlink_impl.c
+++ b/src/internal/slibtool_symlink_impl.c
@@ -101,10 +101,10 @@ int slbt_create_symlink(
/* create symlink */
if (symlink(atarget,tmplnk))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,tmplnk);
return rename(tmplnk,lnkname)
- ? SLBT_SYSTEM_ERROR(dctx)
+ ? SLBT_SYSTEM_ERROR(dctx,lnkname)
: 0;
}
diff --git a/src/logic/slbt_exec_compile.c b/src/logic/slbt_exec_compile.c
index 3ccea3c..dca6e1e 100644
--- a/src/logic/slbt_exec_compile.c
+++ b/src/logic/slbt_exec_compile.c
@@ -27,7 +27,7 @@ static int slbt_exec_compile_remove_file(
if (!(unlink(target)) || (errno == ENOENT))
return 0;
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
static int slbt_exec_compile_finalize_argument_vector(
@@ -59,7 +59,7 @@ static int slbt_exec_compile_finalize_argument_vector(
sargvbuf = 0;
} else if (!(sargvbuf = calloc(parg-base+1,sizeof(char *)))) {
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
} else {
aargv = sargvbuf;
@@ -156,7 +156,7 @@ int slbt_exec_compile(
if (cctx->drvflags & SLBT_DRIVER_SHARED)
if (slbt_mkdir(dctx,ectx->ldirname)) {
slbt_free_exec_ctx(actx);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,ectx->ldirname);
}
/* compile mode */
@@ -200,7 +200,7 @@ int slbt_exec_compile(
if (((ret = slbt_spawn(ectx,true)) < 0) || ectx->exitcode) {
slbt_free_exec_ctx(actx);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
if (cctx->drvflags & SLBT_DRIVER_STATIC)
@@ -231,7 +231,7 @@ int slbt_exec_compile(
if (((ret = slbt_spawn(ectx,true)) < 0) || ectx->exitcode) {
slbt_free_exec_ctx(actx);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
diff --git a/src/logic/slbt_exec_execute.c b/src/logic/slbt_exec_execute.c
index 11718e9..f284512 100644
--- a/src/logic/slbt_exec_execute.c
+++ b/src/logic/slbt_exec_execute.c
@@ -88,5 +88,5 @@ int slbt_exec_execute(
execvp(ectx->cargv[0],ectx->argv);
slbt_free_exec_ctx(actx);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
diff --git a/src/logic/slbt_exec_install.c b/src/logic/slbt_exec_install.c
index 0ab33a5..b8d3ee9 100644
--- a/src/logic/slbt_exec_install.c
+++ b/src/logic/slbt_exec_install.c
@@ -172,7 +172,7 @@ static int slbt_exec_install_import_libraries(
/* libfoo.so.def.{flavor} */
if (slbt_readlink(hostlnk,hosttag,sizeof(hosttag)))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,hostlnk);
/* host/flabor */
if (!(host = strrchr(hosttag,'.')))
@@ -258,12 +258,12 @@ static int slbt_exec_install_library_wrapper(
/* fddst (libfoo.la.slibtool.install, build directory) */
if ((fddst = openat(fdcwd,clainame,O_RDWR|O_CREAT|O_TRUNC,0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,clainame);
/* mapinfo (libfoo.la, build directory) */
if (!(mapinfo = slbt_map_file(fdcwd,entry->arg,SLBT_MAP_INPUT))) {
close(fddst);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,entry->arg);
}
/* srcline */
@@ -278,7 +278,7 @@ static int slbt_exec_install_library_wrapper(
if (!srcline) {
close(fddst);
slbt_unmap_file(mapinfo);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
/* copy config, installed=no --> installed=yes */
@@ -296,7 +296,7 @@ static int slbt_exec_install_library_wrapper(
if (slbt_dprintf(fddst,"%s",dstline) < 0) {
close(fddst);
slbt_unmap_file(mapinfo);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
@@ -433,7 +433,7 @@ static int slbt_exec_install_entry(
/* -avoid-version? */
if (stat(slnkname,&st))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,slnkname);
/* dstfile */
if ((size_t)snprintf(dstfile,sizeof(dstfile),"%s/%s",
diff --git a/src/logic/slbt_exec_link.c b/src/logic/slbt_exec_link.c
index c07a173..2ffb6ad 100644
--- a/src/logic/slbt_exec_link.c
+++ b/src/logic/slbt_exec_link.c
@@ -122,7 +122,7 @@ static int slbt_get_deps_meta(
/* mapinfo */
if (!(mapinfo = slbt_map_file(fdcwd,depfile,SLBT_MAP_INPUT)))
return (fexternal && (errno == ENOENT))
- ? 0 : SLBT_SYSTEM_ERROR(dctx);
+ ? 0 : SLBT_SYSTEM_ERROR(dctx,depfile);
/* copied length */
depsmeta->infolen += mapinfo->size;
@@ -353,7 +353,7 @@ static int slbt_exec_link_adjust_argument_vector(
argc++;
if (!(depsmeta->args = calloc(1,depsmeta->infolen)))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
argc *= 3;
argc += depsmeta->depscnt;
@@ -361,7 +361,7 @@ static int slbt_exec_link_adjust_argument_vector(
if (!(depsmeta->altv = calloc(argc,sizeof(char *))))
return slbt_exec_link_exit(
depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,0));
fdcwd = slbt_driver_fdcwd(dctx);
@@ -448,7 +448,7 @@ static int slbt_exec_link_adjust_argument_vector(
sizeof(rpathdir)))
return slbt_exec_link_exit(
depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,rpathlnk));
sprintf(darg,"-Wl,%s",rpathdir);
*aarg++ = "-Wl,-rpath";
@@ -483,7 +483,7 @@ static int slbt_exec_link_adjust_argument_vector(
cwd,arg) < 0)
return slbt_exec_link_exit(
depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,0));
}
*aarg++ = *carg++;
@@ -506,7 +506,7 @@ static int slbt_exec_link_adjust_argument_vector(
SLBT_MAP_INPUT)))
return slbt_exec_link_exit(
depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,dpath));
if (!(strncmp(lib,".libs/",6))) {
*aarg++ = "-L.libs";
@@ -607,7 +607,7 @@ static int slbt_exec_link_finalize_argument_vector(
sargvbuf = 0;
} else if (!(sargvbuf = calloc(2*(parg-base+1),sizeof(char *)))) {
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
} else {
aargv = &sargvbuf[0];
@@ -772,7 +772,7 @@ static int slbt_exec_link_remove_file(
if (!(unlink(target)) || (errno == ENOENT))
return 0;
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
static int slbt_exec_link_create_dep_file(
@@ -815,7 +815,7 @@ static int slbt_exec_link_create_dep_file(
/* deps */
if ((deps = openat(fdcwd,depfile,O_RDWR|O_CREAT|O_TRUNC,0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,depfile);
/* iterate */
for (parg=altv; *parg; parg++) {
@@ -880,19 +880,19 @@ static int slbt_exec_link_create_dep_file(
if (fdyndep && (base > *parg) && (ectx->ldirdepth >= 0)) {
if (slbt_dprintf(deps,"-L") < 0) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
for (ldepth=ectx->ldirdepth; ldepth; ldepth--) {
if (slbt_dprintf(deps,"../") < 0) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
if (slbt_dprintf(deps,"%s/.libs\n",reladir) < 0) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
@@ -904,7 +904,7 @@ static int slbt_exec_link_create_dep_file(
if (slbt_dprintf(deps,"-l%s\n",mark) < 0) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
*popt = '.';
@@ -940,7 +940,7 @@ static int slbt_exec_link_create_dep_file(
if (!mapinfo && (errno != ENOENT)) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
@@ -959,7 +959,7 @@ static int slbt_exec_link_create_dep_file(
if (!mapinfo) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,depfile);
}
}
@@ -986,7 +986,7 @@ static int slbt_exec_link_create_dep_file(
if (ret < 0) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
@@ -996,12 +996,12 @@ static int slbt_exec_link_create_dep_file(
if (plib && (slbt_dprintf(deps,"-l%s\n",plib) < 0)) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
if (path && (slbt_dprintf(deps,"-L%s\n",path) < 0)) {
close(deps);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
}
@@ -1136,7 +1136,7 @@ static int slbt_exec_link_create_noop_symlink(
return 0;
}
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,arfilename);
}
static int slbt_exec_link_create_archive(
@@ -1244,7 +1244,7 @@ static int slbt_exec_link_create_archive(
return SLBT_NESTED_ERROR(dctx);
if (symlink(arfile,arlink))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,arlink);
}
return 0;
@@ -1411,12 +1411,12 @@ static int slbt_exec_link_create_library(
return SLBT_NESTED_ERROR(dctx);
if (symlink(dctx->cctx->host.ldrpath,ectx->rpathfilename))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,ectx->rpathfilename);
}
/* cwd */
if (!getcwd(cwd,sizeof(cwd)))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
/* .libs/libfoo.so --> -L.libs -lfoo */
if (slbt_exec_link_adjust_argument_vector(
@@ -1467,6 +1467,7 @@ static int slbt_exec_link_create_executable(
bool fpic;
const struct slbt_source_version * verinfo;
struct slbt_deps_meta depsmeta = {0,0,0,0};
+ struct stat st;
/* initial state */
slbt_reset_arguments(ectx);
@@ -1506,7 +1507,7 @@ static int slbt_exec_link_create_executable(
return SLBT_BUFFER_ERROR(dctx);
if ((fdwrap = openat(fdcwd,wrapper,O_RDWR|O_CREAT|O_TRUNC,0644)) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,wrapper);
slbt_exec_set_fdwrapper(ectx,fdwrap);
@@ -1533,7 +1534,7 @@ static int slbt_exec_link_create_executable(
verinfo->major,verinfo->minor,verinfo->revision,
verinfo->commit,
dctx->cctx->settings.ldpathenv) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
/* output */
if ((size_t)snprintf(output,sizeof(output),"%s",
@@ -1550,7 +1551,7 @@ static int slbt_exec_link_create_executable(
/* cwd */
if (!getcwd(cwd,sizeof(cwd)))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
/* .libs/libfoo.so --> -L.libs -lfoo */
if (slbt_exec_link_adjust_argument_vector(
@@ -1593,7 +1594,7 @@ static int slbt_exec_link_create_executable(
fabspath ? &exefilename[1] : exefilename) < 0)
return slbt_exec_link_exit(
&depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,0));
/* sigh */
if (slbt_exec_link_finalize_argument_vector(dctx,ectx))
@@ -1623,15 +1624,20 @@ static int slbt_exec_link_create_executable(
&depsmeta,
SLBT_NESTED_ERROR(dctx));
+ if (stat(wrapper,&st))
+ return slbt_exec_link_exit(
+ &depsmeta,
+ SLBT_SYSTEM_ERROR(dctx,wrapper));
+
if (rename(wrapper,dctx->cctx->output))
return slbt_exec_link_exit(
&depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,dctx->cctx->output));
if (chmod(dctx->cctx->output,0755))
return slbt_exec_link_exit(
&depsmeta,
- SLBT_SYSTEM_ERROR(dctx));
+ SLBT_SYSTEM_ERROR(dctx,dctx->cctx->output));
return slbt_exec_link_exit(&depsmeta,0);
}
@@ -1760,7 +1766,7 @@ int slbt_exec_link(
/* .libs directory */
if (slbt_mkdir(dctx,ectx->ldirname)) {
slbt_free_exec_ctx(actx);
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,ectx->ldirname);
}
/* non-pic libfoo.a */
diff --git a/src/logic/slbt_exec_uninstall.c b/src/logic/slbt_exec_uninstall.c
index 182bc8d..c0aa87f 100644
--- a/src/logic/slbt_exec_uninstall.c
+++ b/src/logic/slbt_exec_uninstall.c
@@ -82,12 +82,12 @@ static int slbt_exec_uninstall_fs_entry(
return 0;
else
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,path);
}
/* remove file or symlink entry */
if (unlink(path))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,path);
/* remove empty containing directory? */
if (flags & SLBT_UNINSTALL_RMDIR) {
@@ -100,7 +100,7 @@ static int slbt_exec_uninstall_fs_entry(
*slash = 0;
if (rmdir(dpath))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,dpath);
}
return 0;
diff --git a/src/output/slbt_output_config.c b/src/output/slbt_output_config.c
index 934da61..cac0df9 100644
--- a/src/output/slbt_output_config.c
+++ b/src/output/slbt_output_config.c
@@ -78,37 +78,37 @@ int slbt_output_config(const struct slbt_driver_ctx * dctx)
midwidth &= (~(SLBT_TAB_WIDTH-1));
if (slbt_output_config_line(fdout,"key","value","annotation",midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"---","-----","----------",midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"compiler",cctx->cargv[0],"",midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"target",cctx->target,"",midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"host",cctx->host.host,cctx->cfgmeta.host,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"flavor",cctx->host.flavor,cctx->cfgmeta.flavor,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"ar",cctx->host.ar,cctx->cfgmeta.ar,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"ranlib",cctx->host.ranlib,cctx->cfgmeta.ranlib,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"windres",cctx->host.windres,cctx->cfgmeta.windres,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"dlltool",cctx->host.dlltool,cctx->cfgmeta.dlltool,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_output_config_line(fdout,"mdso",cctx->host.mdso,cctx->cfgmeta.mdso,midwidth))
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
return 0;
}
diff --git a/src/output/slbt_output_exec.c b/src/output/slbt_output_exec.c
index f1d06ed..6adceb6 100644
--- a/src/output/slbt_output_exec.c
+++ b/src/output/slbt_output_exec.c
@@ -38,7 +38,7 @@ static int slbt_output_exec_annotated(
aclr_bold,aclr_magenta,
dctx->program,aclr_reset,
aclr_bold,aclr_green,step,aclr_reset) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
for (parg=ectx->argv; *parg; parg++) {
if ((parg == ectx->lout[0]) || (parg == ectx->mout[0])) {
@@ -56,12 +56,12 @@ static int slbt_output_exec_annotated(
aclr_set,aclr_color,
*parg,
aclr_unset) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
}
if (slbt_dprintf(fdout,"\n") < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
return 0;
}
@@ -77,14 +77,14 @@ static int slbt_output_exec_plain(
fdout = slbt_driver_fdout(dctx);
if (slbt_dprintf(fdout,"%s: %s:",dctx->program,step) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
for (parg=ectx->argv; *parg; parg++)
if (slbt_dprintf(fdout," %s",*parg) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_dprintf(fdout,"\n") < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
return 0;
}
diff --git a/src/output/slbt_output_features.c b/src/output/slbt_output_features.c
index 3a3b828..a6276da 100644
--- a/src/output/slbt_output_features.c
+++ b/src/output/slbt_output_features.c
@@ -31,13 +31,13 @@ int slbt_output_features(const struct slbt_driver_ctx * dctx)
? disable : enable;
if (slbt_dprintf(fdout,"host: %s\n",dctx->cctx->host.host) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_dprintf(fdout,"%s shared libraries\n",shared_option) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
if (slbt_dprintf(fdout,"%s static libraries\n",static_option) < 0)
- return SLBT_SYSTEM_ERROR(dctx);
+ return SLBT_SYSTEM_ERROR(dctx,0);
return 0;
}