2015-08-09 19:46:21 +02:00
|
|
|
|
/***************************************************************************************************
|
|
|
|
|
**
|
|
|
|
|
** Copyright (C) 2015 Roman Telezhynskyi
|
|
|
|
|
**
|
|
|
|
|
** 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.
|
|
|
|
|
**
|
|
|
|
|
******************************************************************************************************/
|
|
|
|
|
|
|
|
|
|
#include "qmuformulabase.h"
|
|
|
|
|
|
2016-08-08 13:44:49 +02:00
|
|
|
|
#include <QChar>
|
|
|
|
|
#include <QList>
|
2015-10-18 21:30:51 +02:00
|
|
|
|
#include <QLocale>
|
2016-08-08 13:44:49 +02:00
|
|
|
|
#include <QMap>
|
|
|
|
|
#include <QStaticStringData>
|
|
|
|
|
#include <QStringData>
|
|
|
|
|
#include <QStringDataPtr>
|
|
|
|
|
#include <QStringList>
|
2015-10-18 21:30:51 +02:00
|
|
|
|
|
2015-08-09 19:46:21 +02:00
|
|
|
|
namespace qmu
|
|
|
|
|
{
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
QmuFormulaBase::QmuFormulaBase()
|
|
|
|
|
:QmuParser()
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
QmuFormulaBase::~QmuFormulaBase()
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
/**
|
2017-01-03 10:14:32 +01:00
|
|
|
|
* @brief InitCharSets init character set for parser.
|
2015-08-09 19:46:21 +02:00
|
|
|
|
*
|
|
|
|
|
* QMuParser require setting character set for legal characters. Because we try make our expresion language independent
|
|
|
|
|
* we set all posible unique characters from all alphabets.
|
|
|
|
|
*
|
|
|
|
|
*/
|
2017-01-03 10:14:32 +01:00
|
|
|
|
void QmuFormulaBase::InitCharSets()
|
2015-08-09 19:46:21 +02:00
|
|
|
|
{
|
2015-10-07 18:45:01 +02:00
|
|
|
|
//String with all unique symbols for supported alphabets.
|
|
|
|
|
//See script alphabets.py for generation and more information.
|
|
|
|
|
//Note. MSVC doesn't support normal string concatenation for long string. That's why we use QStringList in this
|
|
|
|
|
//case.
|
|
|
|
|
const QStringList symbols = QStringList()
|
2016-12-12 15:45:24 +01:00
|
|
|
|
<< "ցЀĆЈVӧĎАғΕĖӅИқΝĞơРңњΥҔĦШҫ̆جگĮаҳѕεشԶиһνԾрÃυلՆӝшËՎїPÓՖXӛӟŞãզhëծpóӞնxßվāŁЃֆĉЋ"
|
|
|
|
|
<< "CŬđҐГΒęҘЛΚŘġҠУGاհЫدԱҰгβطԹõлκKՁÀуςهՉÈыvیՑÐSOřӘћաőcӐթèkàѓżűðsķչøӥӔĀփӣІĈЎ"
|
|
|
|
|
<< "ґĐΗЖҙĘȚΟОҡĠآΧЦتЮұİزηжԸغẽοоÁՀقχцÉՈيюÑՐђӋіәťӆўáŠĺѐfөըnñŰӤӨӹոľЁրăЉŭċБӸēłΔҖ"
|
|
|
|
|
<< "ЙŤěΜӜDСձģΤӰЩīņحҮбưԳصδHйԻŇμӲӴсՃمτƠщՋєLQŹՓŕÖYśÞaգĽæiŽիӓîqճöyջþĂօЄӦĊЌΑĒДҗј"
|
|
|
|
|
<< "ΙȘĚМΡéĵĢФūӚΩبĪЬүќαذԲдҷιظԺмρՂфÇωوՊьÏՒTŚĻJբdçժlïӪղtպӫAւąЇčŃЏĕӯЗΖEțŮĝПΞأĥ"
|
|
|
|
|
<< "ĹЧΦثÆӳЯIسŲԵзζԽпξكՅÄчφNMՍӌяӢՕÔWÎŝÜџёźեägխoӒյôwĶBžսüЂĄև̈ЊČƏљΓВҕĔӮΛКĜΣТҥĤک"
|
|
|
|
|
<< "ЪƯخγвŅԴŪضλкԼĴσтÅՄنъÍՌRӕՔZÝŜbåդﻩjíլļrӵմzýռپêЅքćچЍďӱҒЕůėژșΘØҚНğńءΠFҢХħΨҪ"
|
|
|
|
|
<< "ЭųįҶرҲеԷňعθҺнԿفπÂхՇψÊэšՏÒUəÚѝŻşҤӑâeէŐımկòuշÕúտŔ";
|
2015-08-09 19:46:21 +02:00
|
|
|
|
|
2017-01-03 10:14:32 +01:00
|
|
|
|
INIT_LOCALE_VARIABLES(m_locale);
|
2017-01-03 10:40:40 +01:00
|
|
|
|
Q_UNUSED(expUpper)
|
|
|
|
|
Q_UNUSED(expLower)
|
2017-07-26 18:28:26 +02:00
|
|
|
|
Q_UNUSED(decimalPoint)
|
|
|
|
|
Q_UNUSED(groupSeparator)
|
2017-01-03 10:14:32 +01:00
|
|
|
|
|
2015-08-09 19:46:21 +02:00
|
|
|
|
// Defining identifier character sets
|
2017-01-03 10:14:32 +01:00
|
|
|
|
const QString nameChars = QString() + sign0 + sign1 + sign2 + sign3 + sign4 + sign5 + sign6 + sign7 + sign8 +
|
|
|
|
|
sign9 + QLatin1String("_@#'") + symbols.join("");
|
|
|
|
|
DefineNameChars(nameChars);
|
|
|
|
|
|
|
|
|
|
const QString oprtChars = symbols.join("") + positiveSign + negativeSign + QLatin1String("*^/?<>=!$%&|~'_");
|
|
|
|
|
DefineOprtChars(oprtChars);
|
|
|
|
|
|
|
|
|
|
const QString infixOprtChars = QString() + positiveSign + negativeSign + QLatin1String("*^/?<>=!$%&|~'_");
|
|
|
|
|
DefineInfixOprtChars(infixOprtChars);
|
2015-08-09 19:46:21 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
// Factory function for creating new parser variables
|
|
|
|
|
// This could as well be a function performing database queries.
|
|
|
|
|
qreal *QmuFormulaBase::AddVariable(const QString &a_szName, void *a_pUserData)
|
|
|
|
|
{
|
|
|
|
|
Q_UNUSED(a_szName)
|
|
|
|
|
Q_UNUSED(a_pUserData)
|
|
|
|
|
|
|
|
|
|
static qreal value = 0;
|
|
|
|
|
return &value;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
/**
|
|
|
|
|
* @brief SetSepForTr set separators for translation expression.
|
|
|
|
|
* @param fromUser true if expression come from user (from dialog).
|
|
|
|
|
*/
|
|
|
|
|
void QmuFormulaBase::SetSepForTr(bool osSeparator, bool fromUser)
|
|
|
|
|
{
|
|
|
|
|
if (fromUser)
|
|
|
|
|
{
|
2017-01-03 10:14:32 +01:00
|
|
|
|
const QLocale loc = QLocale();
|
|
|
|
|
setLocale(loc);
|
|
|
|
|
SetArgSep(';');
|
2015-08-09 19:46:21 +02:00
|
|
|
|
if (osSeparator)
|
|
|
|
|
{
|
2017-01-03 10:14:32 +01:00
|
|
|
|
setDecimalPoint(loc.decimalPoint());
|
|
|
|
|
setThousandsSeparator(loc.groupSeparator());
|
2015-08-09 19:46:21 +02:00
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
SetSepForEval();//Same separators (internal) as for eval.
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
/**
|
|
|
|
|
* @brief SetSepForEval set separators for eval. Each expression eval in internal (C) locale.
|
|
|
|
|
*/
|
|
|
|
|
void QmuFormulaBase::SetSepForEval()
|
|
|
|
|
{
|
|
|
|
|
SetArgSep(';');
|
2017-01-03 10:14:32 +01:00
|
|
|
|
setThousandsSeparator(',');
|
|
|
|
|
setDecimalPoint('.');
|
2015-08-09 19:46:21 +02:00
|
|
|
|
}
|
|
|
|
|
|
2015-10-15 12:41:42 +02:00
|
|
|
|
//---------------------------------------------------------------------------------------------------------------------
|
|
|
|
|
/**
|
|
|
|
|
* @brief RemoveAll remove token from token list.
|
|
|
|
|
*
|
|
|
|
|
* Standard Qt class QMap doesn't have method RemoveAll.
|
|
|
|
|
* Example: remove "-" from tokens list if exist. If don't do that unary minus operation will broken.
|
|
|
|
|
*
|
|
|
|
|
* @param map map with tokens
|
|
|
|
|
* @param val token that need delete
|
|
|
|
|
*/
|
|
|
|
|
void QmuFormulaBase::RemoveAll(QMap<int, QString> &map, const QString &val)
|
|
|
|
|
{
|
|
|
|
|
const QList<int> listKeys = map.keys(val);//Take all keys that contain token.
|
2018-01-20 12:12:28 +01:00
|
|
|
|
for (int i = 0; i < listKeys.size(); ++i)
|
2015-10-15 12:41:42 +02:00
|
|
|
|
{
|
2018-01-20 12:12:28 +01:00
|
|
|
|
map.remove(listKeys.at(i));
|
2015-10-15 12:41:42 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2015-08-09 19:46:21 +02:00
|
|
|
|
}// namespace qmu
|