From d4e0f6ee0cf86349c5b7420e50c1f2063ae9545b Mon Sep 17 00:00:00 2001
From: midipix <writeonce@midipix.org>
Date: Sat, 10 Feb 2024 20:16:07 +0000
Subject: compile mode: argument vector: de-duplicate header search directory
 arguments.

---
 src/logic/slbt_exec_compile.c | 32 +++++++++++++++++++++++++++++---
 1 file changed, 29 insertions(+), 3 deletions(-)

(limited to 'src/logic/slbt_exec_compile.c')

diff --git a/src/logic/slbt_exec_compile.c b/src/logic/slbt_exec_compile.c
index e619c0e..522d1fe 100644
--- a/src/logic/slbt_exec_compile.c
+++ b/src/logic/slbt_exec_compile.c
@@ -48,6 +48,7 @@ static int slbt_exec_compile_finalize_argument_vector(
 	char **		cap;
 	char **		src;
 	char **		dst;
+	char **		cmp;
 	char *		ccwrap;
 
 	/* vector size */
@@ -102,13 +103,38 @@ static int slbt_exec_compile_finalize_argument_vector(
 		base++;
 	}
 
-	/* join all other args */
+	/* join all other args, starting with de-duplicated -I arguments */
 	src = aargv;
 	cap = aarg;
 	dst = &base[1];
 
-	for (; src<cap; )
-		*dst++ = *src++;
+	for (; src<cap; ) {
+		if (((*src)[0] == '-') && ((*src)[1] == 'I')) {
+			cmp = &base[1];
+
+			for (; cmp && cmp<dst; ) {
+				if (!strcmp(*src,*cmp)) {
+					cmp = 0;
+				} else {
+					cmp++;
+				}
+			}
+
+			if (cmp)
+				*dst++ = *src;
+		}
+
+		src++;
+	}
+
+	src = aargv;
+
+	for (; src<cap; ) {
+		if (((*src)[0] != '-') || ((*src)[1] != 'I'))
+			*dst++ = *src;
+
+		src++;
+	}
 
 	/* properly null-terminate argv, accounting for redundant arguments */
 	*dst = 0;
-- 
cgit v1.2.3