1 files changed, 47 insertions, 0 deletions
diff --git a/src/arbits/slbt_archive_mapstrv.c b/src/arbits/slbt_archive_mapstrv.c
new file mode 100644
index 0000000..e97db76
--- /dev/null
+++ b/src/arbits/slbt_archive_mapstrv.c
@@ -0,0 +1,47 @@
+/*******************************************************************/
+/*  slibtool: a strong libtool implementation, written in C        */
+/*  Copyright (C) 2016--2024  SysDeer Technologies, LLC            */
+/*  Released under the Standard MIT License; see COPYING.SLIBTOOL. */
+/*******************************************************************/
+
+#include <stdlib.h>
+#include <inttypes.h>
+#include <slibtool/slibtool.h>
+#include "slibtool_driver_impl.h"
+#include "slibtool_errinfo_impl.h"
+#include "slibtool_visibility_impl.h"
+#include "slibtool_ar_impl.h"
+#include "slibtool_coff_impl.h"
+
+static int slbt_qsort_strcmp(const void * a, const void * b)
+{
+	return strcmp(*(const char **)a,*(const char **)b);
+}
+
+slbt_hidden int slbt_update_mapstrv(
+	const struct slbt_driver_ctx *  dctx,
+	struct slbt_archive_meta_impl * mctx)
+{
+	bool            fcoff;
+	size_t          nsyms;
+	const char **   symv;
+	const char **   mapstrv;
+
+	fcoff  = slbt_host_objfmt_is_coff(dctx);
+	fcoff |= (mctx->ofmtattr & AR_OBJECT_ATTR_COFF);
+
+	for (nsyms=0,symv=mctx->symstrv; *symv; symv++)
+		nsyms++;
+
+	if (!(mapstrv = calloc(nsyms+1,sizeof(const char *))))
+		return SLBT_SYSTEM_ERROR(dctx,0);
+
+	for (nsyms=0,symv=mctx->symstrv; *symv; symv++)
+		mapstrv[nsyms++] = *symv;
+
+	qsort(mapstrv,nsyms,sizeof(const char *),fcoff ? slbt_coff_qsort_strcmp : slbt_qsort_strcmp);
+
+	mctx->mapstrv = mapstrv;
+
+	return 0;
+}