From c8b7fdc7294329dc5eaf9f089f83184ece7d098c Mon Sep 17 00:00:00 2001
From: Mattias Andrée <m@maandree.se>
Date: Sat, 24 Jan 2026 14:11:01 +0100
Subject: First commit
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Mattias Andrée <m@maandree.se>
---
 libcharconv_script.c | 65 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 65 insertions(+)
 create mode 100644 libcharconv_script.c

(limited to 'libcharconv_script.c')

diff --git a/libcharconv_script.c b/libcharconv_script.c
new file mode 100644
index 0000000..5a5736b
--- /dev/null
+++ b/libcharconv_script.c
@@ -0,0 +1,65 @@
+/* See LICENSE file for copyright and license details. */
+#include "libcharconv.h"
+
+
+enum libcharconv_result
+libcharconv_script(const char *s, size_t slen, size_t *n, uint_least32_t *cp, size_t *ncp)
+{
+	uint_least32_t c;
+	*n = 0;
+	for (; slen--; s++) {
+		if (*s == 'B') {
+			c = (uint_least32_t)UINT32_C(0x212C);
+			goto conv;
+		} else if (*s == 'E') {
+			c = (uint_least32_t)UINT32_C(0x2130);
+			goto conv;
+		} else if (*s == 'F') {
+			c = (uint_least32_t)UINT32_C(0x2131);
+			goto conv;
+		} else if (*s == 'H') {
+			c = (uint_least32_t)UINT32_C(0x210B);
+			goto conv;
+		} else if (*s == 'I') {
+			c = (uint_least32_t)UINT32_C(0x2110);
+			goto conv;
+		} else if (*s == 'L') {
+			c = (uint_least32_t)UINT32_C(0x2112);
+			goto conv;
+		} else if (*s == 'M') {
+			c = (uint_least32_t)UINT32_C(0x2133);
+			goto conv;
+		} else if (*s == 'R') {
+			c = (uint_least32_t)UINT32_C(0x211B);
+			goto conv;
+		} else if (*s == 'e') {
+			c = (uint_least32_t)UINT32_C(0x212F);
+			goto conv;
+		} else if (*s == 'g') {
+			c = (uint_least32_t)UINT32_C(0x210A);
+			goto conv;
+		} else if (*s == 'o') {
+			c = (uint_least32_t)UINT32_C(0x2134);
+			goto conv;
+		} else if ('A' <= *s && *s <= 'Z') {
+			c = (uint_least32_t)(UINT32_C(0x1D49C) + (unsigned)(*s - 'A'));
+			goto conv;
+		} else if ('a' <= *s && *s <= 'z') {
+			c = (uint_least32_t)(UINT32_C(0x1D4B6) + (unsigned)(*s - 'a'));
+			goto conv;
+		} else {
+			*n += 1u;
+		}
+	}
+no_conv:
+	return LIBCHARCONV_NO_CONVERT;
+
+conv:
+	if (*n)
+		goto no_conv;
+	if (*ncp)
+		*cp = c;
+	*n += 1u;
+	*ncp = 1u;
+	return LIBCHARCONV_CONVERTED;
+}
-- 
cgit v1.2.3-70-g09d2