Andrew Johnson
80 lines
2.8 KiB
C
80 lines
2.8 KiB
C
/*************************************************************************\
|
|
* Copyright (c) 2002 The University of Chicago, as Operator of Argonne
|
|
* National Laboratory.
|
|
* Copyright (c) 2002 The Regents of the University of California, as
|
|
* Operator of Los Alamos National Laboratory.
|
|
* EPICS BASE Versions 3.13.7
|
|
* and higher are distributed subject to a Software License Agreement found
|
|
* in file LICENSE that is included with this distribution.
|
|
\*************************************************************************/
|
|
/* postfix.h
|
|
* Author: Bob Dalesio
|
|
* Date: 9-21-88
|
|
*/
|
|
|
|
#ifndef INCpostfixh
|
|
#define INCpostfixh
|
|
|
|
#include "shareLib.h"
|
|
|
|
#define CALCPERFORM_NARGS 12
|
|
#define CALCPERFORM_STACK 80
|
|
|
|
#define INFIX_TO_POSTFIX_SIZE(n) (((n-2)>>2)*21 + ((n-2)&2)*5 + 10)
|
|
/* The above is calculated from the following expression fragments:
|
|
* 1?1: 4 chars expand to 21 chars
|
|
* 1+ 2 chars expand to 10 chars
|
|
* 1 1 char expands to 9 chars
|
|
* All other infix operators convert by a factor of 1:1 or less.
|
|
* Allow 1 char each for the infix and postfix terminators,
|
|
* and the infix must be a complete expression
|
|
*/
|
|
|
|
#define MAX_INFIX_SIZE 100
|
|
#define MAX_POSTFIX_SIZE INFIX_TO_POSTFIX_SIZE(MAX_INFIX_SIZE)
|
|
|
|
|
|
/* Error numbers from postfix */
|
|
|
|
#define CALC_ERR_NONE 0 /* No error */
|
|
#define CALC_ERR_TOOMANY 1 /* Too many results returned */
|
|
#define CALC_ERR_BAD_LITERAL 2 /* Bad numeric literal */
|
|
#define CALC_ERR_BAD_ASSIGNMENT 3 /* Bad assignment target */
|
|
#define CALC_ERR_BAD_SEPERATOR 4 /* Comma without parentheses */
|
|
#define CALC_ERR_PAREN_NOT_OPEN 5 /* Close parenthesis without open */
|
|
#define CALC_ERR_PAREN_OPEN 6 /* Open parenthesis at end of expression */
|
|
#define CALC_ERR_CONDITIONAL 7 /* Unbalanced conditional ?: operators */
|
|
#define CALC_ERR_INCOMPLETE 8 /* Incomplete expression, operand missing */
|
|
#define CALC_ERR_UNDERFLOW 9 /* Runtime stack would underflow */
|
|
#define CALC_ERR_OVERFLOW 10 /* Runtime stack would overflow */
|
|
#define CALC_ERR_SYNTAX 11 /* Syntax error */
|
|
#define CALC_ERR_NULL_ARG 12 /* NULL or empty input argument */
|
|
#define CALC_ERR_INTERNAL 13 /* Internal error, bad element type */
|
|
/* Changes in the above errors must also be made in calcErrorStr() */
|
|
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
|
|
epicsShareFunc long
|
|
postfix(const char *pinfix, char *ppostfix, short *perror);
|
|
|
|
epicsShareFunc long
|
|
calcPerform(double *parg, double *presult, const char *ppostfix);
|
|
|
|
epicsShareFunc long
|
|
calcArgUsage(const char *ppostfix, unsigned long *pinputs, unsigned long *pstores);
|
|
|
|
epicsShareFunc const char *
|
|
calcErrorStr(short error);
|
|
|
|
epicsShareFunc void
|
|
calcExprDump(const char *pinst);
|
|
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
#endif /* INCpostfixh */
|