qasm/eval.h

114 lines
2.2 KiB
C++

#pragma once
// Shunting-yard Algorithm
// http://en.wikipedia.org/wiki/Shunting-yard_algorithm
//
// https://ideone.com/kn4FUu
//
#include "asm.h"
#include <functional>
#include <iostream>
#include <sstream>
#include <string>
#include <vector>
#include <deque>
#include <stdio.h>
#include <math.h>
#define CLASS TEvaluator
class T65816Asm;
class Token
{
public:
enum evalErr {
noError = 0,
unknownSymbolErr = -1,
forwardRef = -2,
operatorErr = -3,
syntaxErr = -4,
parenErr = -5,
overflowErr = -6,
divideErr = -7,
badParamErr = -8,
numberErr = -9,
maxError
};
enum Type
{
Unknown = 0,
Number,
Symbol,
Ascii,
Shift,
Operator,
LeftParen,
RightParen,
};
Token(Type t, const std::string& s, int prec = -1, bool ra = false)
: type { t }, str ( s ), precedence { prec }, rightAssociative { ra }
{}
Type type;
std::string str;
int precedence;
bool rightAssociative;
};
class CLASS
{
protected:
T65816Asm &assembler;
int evalerror;
void setError(int ecode);
uint8_t shiftmode;
public:
CLASS(T65816Asm &_asm);
~CLASS();
bool allowMX;
std::string badsymbol;
std::deque<Token> shuntingYard(const std::deque<Token>& tokens);
std::deque<Token> exprToTokens(const std::string& expr);
int parseNumber(std::string n, int64_t &val);
int parseAscii(std::string n, int64_t &val);
int evaluate(std::string &expr, int64_t &res, uint8_t &_shiftmode);
};
//std::ostream& operator<<(std::ostream& os, const Token& token)
//{
// os << token.str;
// return os;
//}
// Debug output
template<class T, class U>
void debugReport(const Token& token, const T& queue, const U& stack, const std::string& comment = "")
{
std::ostringstream ossQueue;
for (const auto& t : queue)
{
ossQueue << " " << t;
}
std::ostringstream ossStack;
for (const auto& t : stack)
{
ossStack << " " << t;
}
printf("|%-3s|%-32s|%10s| %s\n"
, token.str.c_str()
, ossQueue.str().c_str()
, ossStack.str().c_str()
, comment.c_str()
);
}
#undef CLASS