From 3ee88bc77f9acbbf0ae4afda16f1a922d0a85b5c Mon Sep 17 00:00:00 2001
From: RD42 <42702181+dashr9230@users.noreply.github.com>
Date: Thu, 26 Oct 2023 15:18:25 +0800
Subject: [PATCH] [saco] Implement run utility functions

---
 saco/runutil.cpp | 237 +++++++++++++++++++++++++++++++++++++++++++++++
 saco/runutil.h   |  12 +++
 2 files changed, 249 insertions(+)
 create mode 100644 saco/runutil.cpp
 create mode 100644 saco/runutil.h

diff --git a/saco/runutil.cpp b/saco/runutil.cpp
new file mode 100644
index 0000000..27a8c27
--- /dev/null
+++ b/saco/runutil.cpp
@@ -0,0 +1,237 @@
+
+#include <stdio.h>
+#include <string.h>
+
+//----------------------------------------------------
+
+void Util_UrlUnencode(char *enc)
+{
+	char *write_pos = enc;
+
+	while(*enc)
+	{
+		if(*enc=='%')
+		{
+			*write_pos = (*++enc>'/'&&*enc<':')?((*enc-('0'))<<4):((*enc-('7'))<<4);
+			*write_pos |= (*++enc>'/'&&*enc<':')?(*enc-'0'):(*enc-'7');
+		}
+		else if (*enc=='+')
+			*write_pos= ' ';
+		else
+			*write_pos= *enc;
+
+		write_pos++; enc++;
+	}
+	*write_pos='\0';
+}
+
+//----------------------------------------------------
+
+char Util_toupper(char c) {return ((c>(char)0x60) && (c<(char)0x7b))? c-0x20:c;}
+
+//----------------------------------------------------
+
+char *Util_stristr(const char *String, const char *Pattern)
+{
+	char *pptri, *sptri, *starti;
+
+	for (starti=(char *)String; *starti != '\0'; starti++)
+	{
+		/* find start of pattern in string */
+		for (;((*starti!='\0') && (Util_toupper(*starti) != Util_toupper(*Pattern))); starti++);
+
+		pptri = (char *)Pattern;
+		sptri = (char *)starti;
+
+		while (Util_toupper(*sptri) == Util_toupper(*pptri))
+		{
+			sptri++;
+			pptri++;
+
+			/* if end of pattern then pattern was found */
+			if ('\0' == *pptri)
+				return (starti);
+		}
+	}
+	return(0);
+}
+
+//----------------------------------------------------
+
+void Util_strupr(char *string)
+{
+	char *p = string;
+
+	while(*p) {
+		*p = Util_toupper(*p);
+		p++;
+	}
+}
+
+//----------------------------------------------------
+
+int Util_wildcmp(char *wild, char *string)
+{
+	char *cp, *mp;
+
+	while((*string) && (*wild != '*'))
+	{
+		if((*wild != *string) && (*wild != '?'))
+		{
+			return 0;
+		}
+		wild++;
+		string++;
+	}
+
+	while (*string)
+	{
+		if (*wild == '*')
+		{
+			if (!*++wild)
+			{
+				return 1;
+			}
+			mp = wild;
+			cp = string+1;
+		}
+		else if ((*wild == *string) || (*wild == '?'))
+		{
+			wild++;
+			string++;
+		}
+		else
+		{
+			wild = mp;
+			string = cp++;
+		}
+	}
+
+	while (*wild == '*')
+	{
+		wild++;
+	}
+
+	return !*wild;
+}
+
+//----------------------------------------------------
+
+int Util_strnicmp(const char *s1, const char *s2, size_t n)
+{
+
+	if (n == 0) return 0;
+
+	do
+	{
+		if (Util_toupper((unsigned char)*s1) != Util_toupper((unsigned char)*s2++))
+			return (int)Util_toupper((unsigned char)*s1) - (int)Util_toupper((unsigned char)*--s2);
+		if (*s1++ == 0)
+			break;
+
+	} while (--n != 0);
+
+	return 0;
+}
+
+//----------------------------------------------------
+
+char *Util_strrev(char *str)
+{
+      char *p1, *p2;
+
+      if (! str || ! *str)
+            return str;
+      for (p1 = str, p2 = str + strlen(str) - 1; p2 > p1; ++p1, --p2)
+      {
+            *p1 ^= *p2;
+            *p2 ^= *p1;
+            *p1 ^= *p2;
+      }
+      return str;
+}
+
+//----------------------------------------------------
+
+char * Util_itoa(int v, char *s, int r)
+{
+	int i,neg = 0;
+	char *p = s;
+	char *q = s;
+
+	if (r < 0 || r > 35) {
+		*s = 0;
+		return (s);
+		}
+	if (r == 0) r = 10;
+	if (v == 0) {
+		*p++ = '0';
+		*p = 0;
+		return (s);
+		}
+	if (v < 0) {
+		neg = 1;
+		v = -v;
+		}
+	while (v > 0) {
+		i = v % r;
+		if (i > 9) i += 7;
+		*p++ = '0' + i;
+		v /= r;
+		}
+	if (neg) *p++ = '-';
+	*p-- = 0;
+	q = s;
+	while (p > q) {
+		i = *q;
+		*q++ = *p;
+		*p-- = i;
+		}
+	return (s);
+}
+
+//----------------------------------------------------
+
+char * Base64Encoding = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";
+
+void Util_Base64Encode( char *cpInput, char *cpOutput )
+{
+	int nIdx[ 4 ];
+	while ( '\0' != *cpInput )
+	{
+		nIdx[0] = ((*cpInput) & 0xFC)>>2;
+		nIdx[1] = ((*cpInput) & 0x03)<<4;
+		cpInput++;
+		if ( '\0' != *cpInput )
+		{
+			nIdx[1] |= ((*cpInput) & 0xF0)>>4;
+			nIdx[2]  = ((*cpInput) & 0x0F)<<2;
+			cpInput++;
+			if ( '\0' != (*cpInput) )
+			{
+				nIdx[2] |= ((*cpInput) & 0xC0) >> 6;
+				nIdx[3]  = (*cpInput) & 0x3F;
+				cpInput++;
+			}
+			else
+				nIdx[3] = 64;
+		}
+		else
+		{
+			nIdx[2] = 64;
+			nIdx[3] = 64;
+		}
+
+		*(cpOutput+0) = *(Base64Encoding + nIdx[0]);
+		*(cpOutput+1) = *(Base64Encoding + nIdx[1]);
+		*(cpOutput+2) = *(Base64Encoding + nIdx[2]);
+		*(cpOutput+3) = *(Base64Encoding + nIdx[3]);
+		cpOutput += 4;
+	}
+
+	*cpOutput = '\0';
+
+	return;
+}
+
+//----------------------------------------------------
\ No newline at end of file
diff --git a/saco/runutil.h b/saco/runutil.h
new file mode 100644
index 0000000..dadb861
--- /dev/null
+++ b/saco/runutil.h
@@ -0,0 +1,12 @@
+
+void Util_UrlUnencode(char *enc);
+char Util_toupper(char c);
+char *Util_stristr(const char *String, const char *Pattern);
+void Util_strupr(char *string);
+int Util_wildcmp(char *wild, char *string);
+int Util_strnicmp(const char *s1, const char *s2, size_t n);
+char *Util_strrev(char *str);
+char * Util_itoa(int v, char *s, int r);
+void Util_Base64Encode( char *cpInput, char *cpOutput );
+
+//----------------------------------------------------
\ No newline at end of file