1 files changed, 98 insertions, 0 deletions
diff --git a/src/chkpar.c b/src/chkpar.c
new file mode 100644
index 0000000..9ad487d
--- /dev/null
+++ b/src/chkpar.c
@@ -0,0 +1,98 @@
+/*
+	Copyright 2022-2023 Gabriel Jensen.
+
+	This file is part of agbsum.
+	agbsum is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
+	agbsum is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more details.
+	You should have received a copy of the GNU Affero General Public License along with agbsum. If not, see <https://www.gnu.org/licenses/>.
+*/
+
+#include <agbsum.h>
+
+#include <stddef.h>
+#include <stdio.h>
+#include <string.h>
+
+noreturn static void 
+agb_expparval (char const chrpar)
+{
+	fprintf (stderr,"Expected value for character parameter '%c'\n", chrpar);
+	agb_exi (agb_cnd_err, NULL);
+}
+
+static bool
+agb_chkchrpar (agb_dat * const restrict dat, char const* const restrict par)
+{
+	char const chrpar = par[0x0u];
+	if (chrpar == '\x0') {return true;}
+
+	char const* const restrict paramval = &par[0x1];
+
+	switch (chrpar) {
+	default:
+		fprintf (stderr,"Invalid character parameter '%c'\n", chrpar);
+		agb_exi (agb_cnd_err, NULL);
+	case 'h':
+		agb_hlp ();
+		agb_exi (agb_cnd_oky, NULL);
+	case 'i':
+		{
+			if (paramval[0x0u] == '\x0') {agb_expparval (chrpar);}
+			dat->pth = paramval;
+		}
+		return true;
+	case 'p':
+		dat->dopat = true;
+		return false;
+	case 's':
+		dat->sil = true;
+		return false;
+	}
+}
+
+void
+agb_chkpar (agb_dat * const restrict dat, int const argc, char const* const* const argv) {
+	if (argc < 0x2) {
+		agb_hlp ();
+		agb_exi (agb_cnd_oky, NULL);
+	} else {
+		size_t const numpar = argc;
+
+		for (size_t pos = 0x1u;pos < numpar;++pos) {
+
+			char const* const par = argv[pos];
+			if (par[0x0u] == '-') {
+				if (par[0x1u] == '-') {
+					char const* const lngparam = &par[0x2u];
+
+					if (lngparam[0x0u] == '\x0') {
+						fputs ("Missing long parameter after '--' sequence\n", stderr);
+						agb_exi (agb_cnd_err, NULL);
+					}
+
+					if (!strcmp (lngparam,"help")) {
+						agb_hlp ();
+						agb_exi (agb_cnd_oky, NULL);
+					}
+					
+					fprintf (stderr,"Invalid long parameter \"%s\"\n", lngparam);
+					agb_exi (agb_cnd_err, NULL);
+				}
+
+				if (par[0x1u] == '\x0') {
+					fputs ("Missing character parameter after '-'\n", stderr);
+					agb_exi (agb_cnd_err, NULL);
+				}
+
+				for (char const* chrpos = &par[0x1u];;++chrpos) {if (agb_chkchrpar (dat, chrpos)) {break;}}
+
+				continue;
+			}
+		}
+
+		if (dat->pth == NULL) {
+			fputs ("ROM not set (missing character parameter 'i')\n", stderr);
+			agb_exi (agb_cnd_err, NULL);
+		}
+	}
+}