From 5b5408293a750db40d3c4f725405195b2db413b7 Mon Sep 17 00:00:00 2001
From: midipix <writeonce@midipix.org>
Date: Wed, 4 May 2016 22:34:56 -0400
Subject: install mode: legabits: install a perfectly compatible wrapper.
---
src/logic/slbt_exec_install.c | 107 ++++++++++++++++++++++++++++++++++++++----
1 file changed, 97 insertions(+), 10 deletions(-)
(limited to 'src/logic')
diff --git a/src/logic/slbt_exec_install.c b/src/logic/slbt_exec_install.c
index 83cbf4c..f192053 100644
--- a/src/logic/slbt_exec_install.c
+++ b/src/logic/slbt_exec_install.c
@@ -211,6 +211,101 @@ static int slbt_exec_install_import_libraries(
return 0;
}
+static int slbt_exec_install_library_wrapper(
+ const struct slbt_driver_ctx * dctx,
+ struct slbt_exec_ctx * ectx,
+ struct argv_entry * entry,
+ char * dstdir)
+{
+ int ret;
+ FILE * fsrc;
+ FILE * fdst;
+ const char * base;
+ char * cfgline;
+ char * srcline;
+ char * dstline;
+ char clainame[PATH_MAX];
+ char instname[PATH_MAX];
+ char cfgbuf [PATH_MAX*4];
+ struct stat st;
+
+ /* base libfoo.la */
+ if ((base = strrchr(entry->arg,'/')))
+ base++;
+ else
+ base = entry->arg;
+
+ /* /dstdir/libfoo.la */
+ if ((size_t)snprintf(instname,sizeof(instname),"%s/%s",
+ dstdir,base) >= sizeof(instname))
+ return -1;
+
+ /* libfoo.la.slibtool.install */
+ if ((size_t)snprintf(clainame,sizeof(clainame),"%s.slibtool.install",
+ entry->arg) >= sizeof(clainame))
+ return -1;
+
+ /* fdst (libfoo.la.slibtool.install, build directory) */
+ if (!(fdst = fopen(clainame,"w")))
+ return -1;
+
+ /* fsrc (libfoo.la, build directory) */
+ if ((stat(entry->arg,&st))) {
+ fclose(fdst);
+ return -1;
+ }
+
+ if (!(fsrc = fopen(entry->arg,"r"))) {
+ fclose(fdst);
+ return -1;
+ }
+
+ if ((size_t)st.st_size < sizeof(cfgbuf))
+ srcline = cfgbuf;
+ else if (!(srcline = malloc(st.st_size+1))) {
+ fclose(fdst);
+ fclose(fsrc);
+ return -1;
+ }
+
+ /* copy config, install=no --> install=yes */
+ cfgline = fgets(srcline,st.st_size+1,fsrc);
+ ret = 0;
+
+ while (cfgline && (ret == 0)) {
+ dstline = !(strcmp(srcline,"installed=no\n"))
+ ? "installed=yes\n"
+ : srcline;
+
+ if (fprintf(fdst,"%s",dstline) < 0)
+ ret = -1;
+ else
+ cfgline = fgets(srcline,st.st_size+1,fsrc);
+ }
+
+ /* free, flush, verify */
+ if (srcline != cfgbuf)
+ free(srcline);
+
+ if (ret) {
+ fclose(fdst);
+ fclose(fsrc);
+ } else {
+ fflush(fdst);
+ ret = ferror(fdst) ? -1 : 0;
+ fclose(fdst);
+
+ ret = ferror(fsrc) ? -1 : ret;
+ fclose(fsrc);
+ }
+
+ /* cp libfoo.la.slibtool.instal /dstdir/libfoo.la */
+ if (slbt_copy_file(dctx,ectx,clainame,instname))
+ return -1;
+
+ return 0;
+}
+
static int slbt_exec_install_entry(
const struct slbt_driver_ctx * dctx,
struct slbt_exec_ctx * ectx,
@@ -265,17 +360,9 @@ static int slbt_exec_install_entry(
}
/* legabits? */
- if (dctx->cctx->drvflags & SLBT_DRIVER_LEGABITS) {
- *src = (char *)entry->arg;
- *dst = dest ? 0 : (char *)last->arg;
-
- if (!(dctx->cctx->drvflags & SLBT_DRIVER_SILENT))
- if (slbt_output_install(dctx,ectx))
- return -1;
-
- if ((slbt_spawn(ectx,true) < 0) || ectx->exitcode)
+ if (dctx->cctx->drvflags & SLBT_DRIVER_LEGABITS)
+ if (slbt_exec_install_library_wrapper(dctx,ectx,entry,dstdir))
return -1;
- }
/* *dst: consider: cp libfoo.la /dest/dir/libfoo.la */
if ((*dst = dest ? 0 : (char *)last->arg))
--
cgit v1.2.3