/*

* Copyright (c) 2002-2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:

*

*/

#include "tldouble_blr.h"

TInt CTLongDouble_blr::powl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

   	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

		{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(pow) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf);

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::fdiml_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

  	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(fdim) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf  );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::dreml_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

  	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(drem) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::fminl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

   	// Read parameters

   	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(fmin) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf);

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::fmaxl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

   	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(fmax) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::fmodl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

  	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(fmod) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::hypotl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

   	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(hypot) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::remainderl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

  	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

  	// Do some testing

    FLOAT res = FUNC(remainder) (input1, input2);

	if(check_float(res, expected, max_ulp, gen_ulp))

		{

    	INFO_PRINTF1(_L("Test passed."));

    	}

	else 

		{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf);

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n")); 

    return KErrNone;

	}

TInt CTLongDouble_blr::nexttowardl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

   	// Read parameters

   	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(nexttoward) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

   		{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;

	}

TInt CTLongDouble_blr::nextafterl_test()

	{

 	// Create temporary variables in stack

  	char chParam[MAX_SIZE];

  	FLOAT input1;

  	FLOAT input2;

  	FLOAT expected;

  	FLOAT max_ulp;

  	FLOAT gen_ulp;

  	// Read parameters

  	ReadStringParam (chParam);

    ReadFloatParam (input1);

    ReadFloatParam (input2);

    ReadFloatParam (expected);

    ReadFloatParam (max_ulp);

    //

    TBuf<MAX_SIZE> buf;

    TInt len = strlen(chParam);

    for (TInt j =0; j<len;j++)

    	{

    	buf.Append(chParam[j]);

		}

    // Do some testing

    FLOAT res = FUNC(nextafter) (input1, input2);

    if(check_float(res, expected, max_ulp, gen_ulp))

    	{

    	INFO_PRINTF1(_L("Test passed."));

    	}

    else    

    	{

    	ERR_PRINTF1(_L("Test Failed."));

   		return KErrGeneral;

    	} 

    INFO_PRINTF1(_L("_________________________________________\n"));

    INFO_PRINTF2(_L("TestCase		  : %S\n"), &buf);

    INFO_PRINTF2(_L("Input Value    : %f\n"), input1 );

    INFO_PRINTF2(_L("Input Value    : %f\n"), input2 );

    INFO_PRINTF2(_L("Expected Value : %f\n"), expected );

	INFO_PRINTF2(_L("Max ULP value  : %f\n"), max_ulp );

	INFO_PRINTF2(_L("Result  		  : %f\n"), res );

	INFO_PRINTF2(_L("Generated Ulp  : %f\n"), gen_ulp );

	INFO_PRINTF1(_L("_________________________________________\n"));

    return KErrNone;