SA-MP/bot/runutil.cpp

#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;
}

//----------------------------------------------------

bool ContainsInvalidNickChars(char * szString)
{
	int x=0;

	while(*szString) {
		if( (*szString >= '0' && *szString <= '9') ||
			(*szString >= 'A' && *szString <= 'Z') ||
			(*szString >= 'a' && *szString <= 'z')  ||
			*szString == ']' || *szString == '[' ||
			*szString == '_'  || *szString == '$' ||
			*szString == '=' || *szString == '(' ||
			*szString == ')' || *szString == '@' || 
			*szString == '.' ) {

			szString++;
		} else {
			return true;
		}
	}
	return false;
}

//----------------------------------------------------

void ReplaceBadChars(char * szString)
{
	while(*szString) {
		if(*szString == '%') *szString = ' ';

		szString++;
	}
}

//----------------------------------------------------

int CanFileBeOpenedForReading(char * filename)
{
	FILE *f;
	if(f=fopen(filename,"r")) {
		fclose(f);
		return 1;
	}
	return 0;
}

//----------------------------------------------------