208 lines
7.9 KiB
C
208 lines
7.9 KiB
C
|
/***************************************************************************************************
|
||
|
|
**
|
||
|
|
** Original work Copyright (C) 2013 Ingo Berg
|
||
|
|
** Modified work Copyright 2014 Roman Telezhinsky <dismine@gmail.com>
|
||
|
|
**
|
||
|
|
** Permission is hereby granted, free of charge, to any person obtaining a copy of this
|
||
|
|
** software and associated documentation files (the "Software"), to deal in the Software
|
||
|
|
** without restriction, including without limitation the rights to use, copy, modify,
|
||
|
|
** merge, publish, distribute, sublicense, and/or sell copies of the Software, and to
|
||
|
|
** permit persons to whom the Software is furnished to do so, subject to the following conditions:
|
||
|
|
**
|
||
|
|
** The above copyright notice and this permission notice shall be included in all copies or
|
||
|
|
** substantial portions of the Software.
|
||
|
|
**
|
||
|
|
** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT
|
||
|
|
** NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
||
|
|
** NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
|
||
|
|
** DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||
|
|
** OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||
|
|
**
|
||
|
|
******************************************************************************************************/
|
||
|
|
|
||
|
|
#ifndef QMUPARSERTEST_H
|
||
|
|
#define QMUPARSERTEST_H
|
||
|
|
|
||
|
|
#include <string>
|
||
|
|
#include <cstdlib>
|
||
|
|
#include <numeric> // for accumulate
|
||
|
|
#include "qmuparser.h"
|
||
|
|
#include "qmuparserint.h"
|
||
|
|
|
||
|
|
/** \file
|
||
|
|
\brief This file contains the parser test class.
|
||
|
|
*/
|
||
|
|
|
||
|
|
namespace qmu
|
||
|
|
{
|
||
|
|
/** \brief Namespace for test cases. */
|
||
|
|
namespace Test
|
||
|
|
{
|
||
|
|
//------------------------------------------------------------------------------
|
||
|
|
/** \brief Test cases for unit testing.
|
||
|
|
|
||
|
|
(C) 2004-2011 Ingo Berg
|
||
|
|
*/
|
||
|
|
class QmuParserTester // final
|
||
|
|
{
|
||
|
|
private:
|
||
|
|
static int c_iCount;
|
||
|
|
|
||
|
|
// Multiarg callbacks
|
||
|
|
static value_type f1of1(value_type v) { return v;};
|
||
|
|
|
||
|
|
static value_type f1of2(value_type v, value_type ) {return v;};
|
||
|
|
static value_type f2of2(value_type , value_type v) {return v;};
|
||
|
|
|
||
|
|
static value_type f1of3(value_type v, value_type , value_type ) {return v;};
|
||
|
|
static value_type f2of3(value_type , value_type v, value_type ) {return v;};
|
||
|
|
static value_type f3of3(value_type , value_type , value_type v) {return v;};
|
||
|
|
|
||
|
|
static value_type f1of4(value_type v, value_type, value_type , value_type ) {return v;}
|
||
|
|
static value_type f2of4(value_type , value_type v, value_type , value_type ) {return v;}
|
||
|
|
static value_type f3of4(value_type , value_type, value_type v, value_type ) {return v;}
|
||
|
|
static value_type f4of4(value_type , value_type, value_type , value_type v) {return v;}
|
||
|
|
|
||
|
|
static value_type f1of5(value_type v, value_type, value_type , value_type , value_type ) { return v; }
|
||
|
|
static value_type f2of5(value_type , value_type v, value_type , value_type , value_type ) { return v; }
|
||
|
|
static value_type f3of5(value_type , value_type, value_type v, value_type , value_type ) { return v; }
|
||
|
|
static value_type f4of5(value_type , value_type, value_type , value_type v, value_type ) { return v; }
|
||
|
|
static value_type f5of5(value_type , value_type, value_type , value_type , value_type v) { return v; }
|
||
|
|
|
||
|
|
static value_type Min(value_type a_fVal1, value_type a_fVal2) { return (a_fVal1<a_fVal2) ? a_fVal1 : a_fVal2; }
|
||
|
|
static value_type Max(value_type a_fVal1, value_type a_fVal2) { return (a_fVal1>a_fVal2) ? a_fVal1 : a_fVal2; }
|
||
|
|
|
||
|
|
static value_type plus2(value_type v1) { return v1+2; }
|
||
|
|
static value_type times3(value_type v1) { return v1*3; }
|
||
|
|
static value_type sqr(value_type v1) { return v1*v1; }
|
||
|
|
static value_type sign(value_type v) { return -v; }
|
||
|
|
static value_type add(value_type v1, value_type v2) { return v1+v2; }
|
||
|
|
static value_type land(value_type v1, value_type v2) { return (int)v1 & (int)v2; }
|
||
|
|
|
||
|
|
|
||
|
|
static value_type FirstArg(const value_type* a_afArg, int a_iArgc)
|
||
|
|
{
|
||
|
|
if (!a_iArgc)
|
||
|
|
throw qmu::QmuParser::exception_type( _T("too few arguments for function FirstArg.") );
|
||
|
|
|
||
|
|
return a_afArg[0];
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type LastArg(const value_type* a_afArg, int a_iArgc)
|
||
|
|
{
|
||
|
|
if (!a_iArgc)
|
||
|
|
throw qmu::QmuParser::exception_type( _T("too few arguments for function LastArg.") );
|
||
|
|
|
||
|
|
return a_afArg[a_iArgc-1];
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type Sum(const value_type* a_afArg, int a_iArgc)
|
||
|
|
{
|
||
|
|
if (!a_iArgc)
|
||
|
|
throw qmu::QmuParser::exception_type( _T("too few arguments for function sum.") );
|
||
|
|
|
||
|
|
value_type fRes=0;
|
||
|
|
for (int i=0; i<a_iArgc; ++i) fRes += a_afArg[i];
|
||
|
|
return fRes;
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type Rnd(value_type v)
|
||
|
|
{
|
||
|
|
return (value_type)(1+(v*std::rand()/(RAND_MAX+1.0)));
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type RndWithString(const char_type*)
|
||
|
|
{
|
||
|
|
return (value_type)( 1 + (1000.0f * std::rand() / (RAND_MAX + 1.0) ) );
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type Ping()
|
||
|
|
{
|
||
|
|
return 10;
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type ValueOf(const char_type*)
|
||
|
|
{
|
||
|
|
return 123;
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type StrFun1(const char_type* v1)
|
||
|
|
{
|
||
|
|
int val(0);
|
||
|
|
stringstream_type(v1) >> val;
|
||
|
|
return (value_type)val;
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type StrFun2(const char_type* v1, value_type v2)
|
||
|
|
{
|
||
|
|
int val(0);
|
||
|
|
stringstream_type(v1) >> val;
|
||
|
|
return (value_type)(val + v2);
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type StrFun3(const char_type* v1, value_type v2, value_type v3)
|
||
|
|
{
|
||
|
|
int val(0);
|
||
|
|
stringstream_type(v1) >> val;
|
||
|
|
return val + v2 + v3;
|
||
|
|
}
|
||
|
|
|
||
|
|
static value_type StrToFloat(const char_type* a_szMsg)
|
||
|
|
{
|
||
|
|
value_type val(0);
|
||
|
|
stringstream_type(a_szMsg) >> val;
|
||
|
|
return val;
|
||
|
|
}
|
||
|
|
|
||
|
|
// postfix operator callback
|
||
|
|
static value_type Mega(value_type a_fVal) { return a_fVal * (value_type)1e6; }
|
||
|
|
static value_type Micro(value_type a_fVal) { return a_fVal * (value_type)1e-6; }
|
||
|
|
static value_type Milli(value_type a_fVal) { return a_fVal / (value_type)1e3; }
|
||
|
|
|
||
|
|
// Custom value recognition
|
||
|
|
static int IsHexVal(const char_type *a_szExpr, int *a_iPos, value_type *a_fVal);
|
||
|
|
|
||
|
|
int TestNames();
|
||
|
|
int TestSyntax();
|
||
|
|
int TestMultiArg();
|
||
|
|
int TestPostFix();
|
||
|
|
int TestExpression();
|
||
|
|
int TestInfixOprt();
|
||
|
|
int TestBinOprt();
|
||
|
|
int TestVarConst();
|
||
|
|
int TestInterface();
|
||
|
|
int TestException();
|
||
|
|
int TestStrArg();
|
||
|
|
int TestIfThenElse();
|
||
|
|
|
||
|
|
void Abort() const;
|
||
|
|
|
||
|
|
public:
|
||
|
|
typedef int (QmuParserTester::*testfun_type)();
|
||
|
|
|
||
|
|
QmuParserTester();
|
||
|
|
void Run();
|
||
|
|
|
||
|
|
private:
|
||
|
|
std::vector<testfun_type> m_vTestFun;
|
||
|
|
void AddTest(testfun_type a_pFun);
|
||
|
|
|
||
|
|
// Test Double Parser
|
||
|
|
int EqnTest(const string_type& a_str, double a_fRes, bool a_fPass);
|
||
|
|
int EqnTestWithVarChange(const string_type& a_str,
|
||
|
|
double a_fRes1,
|
||
|
|
double a_fVar1,
|
||
|
|
double a_fRes2,
|
||
|
|
double a_fVar2);
|
||
|
|
int ThrowTest(const string_type& a_str, int a_iErrc, bool a_bFail = true);
|
||
|
|
|
||
|
|
// Test Int Parser
|
||
|
|
int EqnTestInt(const string_type& a_str, double a_fRes, bool a_fPass);
|
||
|
|
};
|
||
|
|
} // namespace Test
|
||
|
|
} // namespace qmu
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|
||
|
|
|