summaryrefslogtreecommitdiff
path: root/src/util
diff options
context:
space:
mode:
authormidipix <writeonce@midipix.org>2017-02-11 14:38:50 -0500
committermidipix <writeonce@midipix.org>2017-02-11 19:23:15 -0500
commitc70c0a72abe470aa16aefd47f1fdde5c4aa0718f (patch)
tree0cc0fe527b27e7d5f074f792eeeb5ad270af2d86 /src/util
parent9c013b63fef168f49246fd69ab0c0ce024a20941 (diff)
downloadmdso-c70c0a72abe470aa16aefd47f1fdde5c4aa0718f.tar.bz2
mdso-c70c0a72abe470aa16aefd47f1fdde5c4aa0718f.tar.xz
driver: utility api: added mdso_create_implib_archive().
Diffstat (limited to 'src/util')
-rw-r--r--src/util/mdso_create_implib_archive.c83
1 files changed, 83 insertions, 0 deletions
diff --git a/src/util/mdso_create_implib_archive.c b/src/util/mdso_create_implib_archive.c
new file mode 100644
index 0000000..323b318
--- /dev/null
+++ b/src/util/mdso_create_implib_archive.c
@@ -0,0 +1,83 @@
+/****************************************************************/
+/* mdso: midipix dso scavenger */
+/* Copyright (C) 2015--2017 Z. Gilboa */
+/* Released under GPLv2 and GPLv3; see COPYING.MDSO. */
+/****************************************************************/
+
+#include <stdint.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <mdso/mdso.h>
+#include "mdso_errinfo_impl.h"
+
+static void mdso_free_uctx_vector(struct mdso_unit_ctx ** uctxv)
+{
+ struct mdso_unit_ctx ** puctx;
+
+ for (puctx=uctxv; *puctx; puctx++)
+ mdso_free_unit_ctx(*puctx);
+
+ free(uctxv);
+}
+
+int mdso_create_implib_archive(const struct mdso_driver_ctx * dctx)
+{
+ int ret;
+ FILE * fout;
+ size_t nsym;
+ struct mdso_unit_ctx ** uctxv;
+ struct mdso_unit_ctx ** puctx;
+ const char * const * dsym;
+ const char ** unit;
+ const char ** psym;
+ const char ** symv;
+ const char * asym[512];
+
+ if (!dctx->cctx->implib)
+ return MDSO_CUSTOM_ERROR(dctx,MDSO_ERR_INVALID_NAME);
+
+ if (!(fout = mdso_create_archive(dctx,dctx->cctx->implib)))
+ return MDSO_NESTED_ERROR(dctx);
+
+ for (unit=dctx->units; *unit; unit++)
+ (void)0;
+
+ if (!(uctxv = calloc(++unit - dctx->units,sizeof(*uctxv))))
+ return MDSO_SYSTEM_ERROR(dctx);
+
+ for (puctx=uctxv,unit=dctx->units; *unit; unit++) {
+ if (mdso_get_unit_ctx(dctx,*unit,puctx)) {
+ mdso_free_uctx_vector(uctxv);
+ return MDSO_NESTED_ERROR(dctx);
+ }
+ }
+
+ for (nsym=0,puctx=uctxv; *puctx; puctx++)
+ for (dsym=puctx[0]->syms; *dsym; dsym++)
+ nsym++;
+
+ if (nsym < 512) {
+ memset(asym,0,sizeof(asym));
+ symv = asym;
+
+ } else if (!(symv = calloc(nsym+1,sizeof(const char *)))) {
+ mdso_free_uctx_vector(uctxv);
+ return MDSO_SYSTEM_ERROR(dctx);
+ }
+
+ for (psym=symv,puctx=uctxv; *puctx; puctx++)
+ for (dsym=puctx[0]->syms; *dsym; dsym++)
+ *psym++ = *dsym;
+
+ ret = mdso_argen_common(dctx,symv,fout,0);
+ fclose(fout);
+
+ if (symv != asym)
+ free(symv);
+
+ mdso_free_uctx_vector(uctxv);
+
+ return ret ? MDSO_NESTED_ERROR(dctx) : 0;
+}