#include "munga.h"
#pragma hdrstop

#include "scalar.h"

int Round(Scalar value)
{
	int whole_part = floor(value);
	Scalar fractional_part = value - whole_part;
	if (fractional_part >= 0.5)
		return whole_part + 1;
	else
		return whole_part;
}



void Find_Roots(Scalar a, Scalar b, Scalar c, Scalar *center, Scalar *range)
{// a*x*x + b*x + c = 0

	// See if the quadratic is solvable
	*range = b*b - 4.0f*a*c;
	if (*range < 0.0f || Small_Enough(a))
	{
		*range = -1.0f;
	}
	else
	{
		// Solve the single root case
		a *= 2.0f;
		*center = -b / a;
		if (*range < SMALL)
			*range = 0.0f;

		// Find the two-root extents
		else
		{
			*range = Sqrt(*range);
			*range /= a;
		}
	}
}

static void Verify_Arguments(const char *str, void *value)
{
	if (str == NULL)
		Fail("Convert_From_Ascii - str == NULL");
	if (value == NULL)
		Fail("Convert_From_Ascii - value == NULL");
	if (isalpha(*str))
	{
		std::cout << "Convert_From_Ascii - str == " << str << "\n";
		Fail("Convert_From_Ascii - isalpha(*str)");
	}
}

void Convert_From_Ascii(const char *str, char *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = (char)atoi(str);
}

void Convert_From_Ascii(const char *str, unsigned char *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = (unsigned char)atoi(str);
}

void Convert_From_Ascii(const char *str, int *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = atoi(str);
}

void Convert_From_Ascii(const char *str, unsigned int *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = atoi(str);
}

void Convert_From_Ascii(const char *str, long *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = atol(str);
}

void Convert_From_Ascii(const char *str, unsigned long *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
	*value = atol(str);
}

void Convert_From_Ascii(const char *str, Scalar *value)
{
	#if 0
		Check_Pointer(str);
		Check_Pointer(value);
		if (isalpha(*str))
		{
			Dump(str);
		}
		Verify(!isalpha(*str));
	#else
		Verify_Arguments(str, value);
	#endif
   *value = atof(str);
}