1 files changed, 61 insertions, 0 deletions
diff --git a/stptoupper.c b/stptoupper.c
new file mode 100644
index 0000000..fca38ce
--- /dev/null
+++ b/stptoupper.c
@@ -0,0 +1,61 @@
+/* See LICENSE file for copyright and license details. */
+#include "libsimple.h"
+#ifndef TEST
+
+
+char *
+libsimple_stptoupper(char *d, const char *s) /* TODO man */
+{
+	size_t n;
+	char *ret;
+	if (d == s) {
+		for (; *d; d++)
+			*d = toupper(*d);
+		return d;
+	} else if (d < s) {
+		for (; *s; d++, s++)
+			*d = toupper(*s);
+		*d = '\0';
+		return d;
+	} else {
+		for (n = 0; s[n]; n++);
+		ret = &d[n];
+		do {
+			d[n] = toupper(s[n]);
+		} while (n--);
+		return ret;
+	}
+}
+
+
+#else
+#include "test.h"
+
+int
+main(void)
+{
+	char buf[100];
+
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_stptoupper(&buf[3], &buf[0]), ""));
+	assert(!strcmp(buf, "abcABCDEABCDE12345"));
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_stptoupper(&buf[0], &buf[3]), ""));
+	assert(!strcmp(buf, "DEABCDE12345"));
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_stptoupper(&buf[0], &buf[0]), ""));
+	assert(!strcmp(buf, "ABCDEABCDE12345"));
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_strtoupper(&buf[3], &buf[0]), "ABCDEABCDE12345"));
+	assert(!strcmp(buf, "abcABCDEABCDE12345"));
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_strtoupper(&buf[0], &buf[3]), "DEABCDE12345"));
+	assert(!strcmp(buf, "DEABCDE12345"));
+	stpcpy(buf, "abcdeABCDE12345");
+	assert(!strcmpnul(libsimple_strtoupper(&buf[0], &buf[0]), "ABCDEABCDE12345"));
+	assert(!strcmp(buf, "ABCDEABCDE12345"));
+
+	return 0;
+}
+
+#endif