parser.h

Go to the documentation of this file.

/*
 *
 *                 #####    #####   ######  ######  ###   ###
 *               ##   ##  ##   ##  ##      ##      ## ### ##
 *              ##   ##  ##   ##  ####    ####    ##  #  ##
 *             ##   ##  ##   ##  ##      ##      ##     ##
 *            ##   ##  ##   ##  ##      ##      ##     ##
 *            #####    #####   ##      ######  ##     ##
 *
 *
 *             OOFEM : Object Oriented Finite Element Code
 *
 *               Copyright (C) 1993 - 2025   Borek Patzak
 *
 *
 *
 *       Czech Technical University, Faculty of Civil Engineering,
 *   Department of Structural Mechanics, 166 29 Prague, Czech Republic
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License as published by the Free Software Foundation; either
 *  version 2.1 of the License, or (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this library; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */
 
#ifndef parser_h
#define parser_h
 
#include "oofemcfg.h"
#include "floatarray.h"
 
namespace oofem {
#define Parser_CMD_LENGTH 1024
#define Parser_TBLSZ 23

class OOFEM_EXPORT Parser
{
public:
    Parser() {
        curr_tok = PRINT;
        no_of_errors = 0;
        for ( int i = 0; i < Parser_TBLSZ; i++ ) {
            table [ i ] = 0;
        }
    }
    ~Parser() {
        reset();
    }
 
    double eval(const char *string, int &err);
    void   eval(const char *string, FloatArray& answer, const char* name, int &err);
    void setVariableValue(const char *name, int indx, double value);
 
    void   reset();
 
private:
    enum Token_value {
        NAME, NUMBER, END,
        SQRT_FUNC, SIN_FUNC, COS_FUNC, TAN_FUNC, ATAN_FUNC, ASIN_FUNC, ACOS_FUNC, EXP_FUNC, INT_FUNC, HEAVISIDE_FUNC, HEAVISIDE_FUNC1,
        PLUS='+', MINUS='-', MUL='*', DIV='/', MOD='%', POW='^', BOOL_EQ, BOOL_LE, BOOL_LT, BOOL_GE, BOOL_GT,
        PRINT=';', ASSIGN='=', LP='(', RP=')', LB='[', RB=']'
    };
 
    int no_of_errors;
    Token_value curr_tok;
 
    struct name {   
        char *string;
        name *next;
 
        int size = -1; // nonzero size indicates array context (and array size), zero scalar context, negative not yet defined
        double doubleValue;
        FloatArray arrayValue;
    };
    name *table [ Parser_TBLSZ ];
    double number_value =0.0;
    char string_value [ Parser_CMD_LENGTH ]="";
    const char *parsedLine= nullptr;
 
    name *look(const char *p, int ins = 0);
    inline name *insert(const char *s) { return look(s, 1); }
    void error(const char *s);
    double expr(bool get);
    double term(bool get);
    double prim(bool get);
    double agr(bool get);
    Token_value get_token();
 
    double getVariableValue(const char *name, int indx);
};
} // end namespace oofem
#endif // parser_h