Files
Upsilon/apps/reader/tex_parser.cpp
2022-07-01 11:39:23 +02:00

369 lines
12 KiB
C++

#include "tex_parser.h"
#include <ion/unicode/utf8_decoder.h>
namespace Reader {
// List of available Symbols
static constexpr char const * k_SymbolsCommands[] = {
"times", "div", "forall", "partial", "exists", "nexists", "pm", "approx", "infty", "neq", "equiv", "leq", "geq",
"cap", "cup", "Cap", "Cup", "subset", "nsubset", "In", "Notin",
"leftarrow", "uparrow", "rightarrow", "downarrow","leftrightarrow", "updownarrow", "Leftarrow", "Uparrow", "Rightarrow", "Downarrow",
"nwarrow", "nearrow", "swarrow", "searrow", "in", "cdot", "cdots", "ldots",
"Alpha", "Beta", "Gamma", "Delta", "Epsilon", "Zeta", "Eta", "Theta", "Iota", "Kappa", "Lambda",
"Mu", "Nu", "Xi", "Omicron", "Pi", "Rho", "Sigma", "Tau", "Upsilon", "Phi", "Chi", "Psi","Omega",
"alpha", "beta", "gamma", "delta", "epsilon", "zeta", "eta", "theta", "iota", "kappa", "lambda",
"mu", "nu", "xi", "omicron", "pi", "rho", "sigma", "tau", "upsilon", "phi", "chi", "psi", "omega",
"sim", "f", "i",
};
static constexpr int const k_NumberOfSymbols = sizeof(k_SymbolsCommands) / sizeof(char *);
// List of the available Symbol's CodePoints in the same order of the Symbol's list
static constexpr uint32_t const k_SymbolsCodePoints[] = {
0xd7, 0xf7, 0x2200, 0x2202, 0x2203, 0x2204, 0xb1, 0x2248, 0x221e, 0x2260, 0x2261, 0x2264, 0x2265,
0x2229, 0x222a, 0x22c2, 0x22c3, 0x2282, 0x2284, 0x2208, 0x2209,
0x2190, 0x2191, 0x2192, 0x2193, 0x2194, 0x2195, 0x21d0, 0x21d1, 0x21d2, 0x21d3,
0x2196, 0x2197, 0x2198, 0x2199, 0x454, 0xb7, 0x2505, 0x2026,
0x391, 0x392, 0x393, 0x394, 0x395, 0x396, 0x397, 0x398, 0x399, 0x39a, 0x39b,
0x39c, 0x39d, 0x39e, 0x39f, 0x3a0, 0x3a1, 0x3a3, 0x3a4, 0x3a5, 0x3a6, 0x3a7, 0x3a8, 0x3a9,
0x3b1, 0x3b2, 0x3b3, 0x3b4, 0x3b5, 0x3b6, 0x3b7, 0x3b8, 0x3b9, 0x3ba, 0x3bb,
0x3bc, 0x3bd, 0x3be, 0x3bf, 0x3c0, 0x3c1, 0x3c3, 0x3c4, 0x3c5, 0x3c6, 0x3c7, 0x3c8, 0x3c9,
0x7e, 0x192, 0x1d422,
};
static_assert(sizeof(k_SymbolsCodePoints) / sizeof(uint32_t) == k_NumberOfSymbols);
// List of available Function Commands that don't require a specific handling
static char const * k_FunctionCommands[] = {
"arccos", "arcsin", "arctan", "arg", "cos", "cosh", "cot", "coth",
"csc", "deg", "det", "dim", "exp", "gcd", "hom", "inf",
"ker", "lg", "lim", "liminf", "limsup", "ln", "log", "max",
"min", "Pr", "sec", "sin", "sinh", "sup", "tan", "tanh"
};
static int const k_NumberOfFunctionCommands = sizeof(k_FunctionCommands) / sizeof(char *);
TexParser::TexParser(const char * text, const char * endOfText) :
m_text(text),
m_endOfText(endOfText),
m_hasError(false)
{
}
Layout TexParser::getLayout() {
Layout layout = popText(0);
if (m_hasError) {
return CodePointLayout::Builder(CodePoint(0xfffd));
}
return layout;
}
Layout TexParser::popBlock() {
while (*m_text == ' ') {
m_text ++;
}
if (*m_text == '{') {
m_text ++;
return popText('}');
}
if (*m_text == '\\') {
m_text ++;
return popCommand();
}
if (m_text >= m_endOfText) {
m_hasError = true;
}
UTF8Decoder decoder(m_text);
m_text ++;
return CodePointLayout::Builder(decoder.nextCodePoint());
}
Layout TexParser::popText(char stop) {
HorizontalLayout layout = HorizontalLayout::Builder();
const char * start = m_text;
while (m_text < m_endOfText && *m_text != stop) {
switch (*m_text) {
// TODO: Factorize this code
case '\\':
if (start != m_text) {
layout.addOrMergeChildAtIndex(LayoutHelper::String(start, m_text - start), layout.numberOfChildren(), false);
}
m_text ++;
layout.addOrMergeChildAtIndex(popCommand(), layout.numberOfChildren(), false);
start = m_text;
break;
case ' ':
if (start != m_text) {
layout.addOrMergeChildAtIndex(LayoutHelper::String(start, m_text - start), layout.numberOfChildren(), false);
}
m_text ++;
start = m_text;
break;
case '^':
if (start != m_text) {
layout.addOrMergeChildAtIndex(LayoutHelper::String(start, m_text - start), layout.numberOfChildren(), false);
}
m_text ++;
layout.addOrMergeChildAtIndex(VerticalOffsetLayout::Builder(popBlock(), VerticalOffsetLayoutNode::Position::Superscript), layout.numberOfChildren(), false);
start = m_text;
break;
case '_':
if (start != m_text) {
layout.addOrMergeChildAtIndex(LayoutHelper::String(start, m_text - start), layout.numberOfChildren(), false);
}
m_text ++;
layout.addOrMergeChildAtIndex(VerticalOffsetLayout::Builder(popBlock(), VerticalOffsetLayoutNode::Position::Subscript), layout.numberOfChildren(), false);
start = m_text;
break;
default:
m_text ++;
}
}
if (start != m_text) {
layout.addOrMergeChildAtIndex(LayoutHelper::String(start, m_text - start), layout.numberOfChildren(), false);
}
m_text ++;
if (layout.numberOfChildren() == 1) {
return layout.squashUnaryHierarchyInPlace();
}
return layout;
}
Layout TexParser::popCommand() {
// TODO: Factorize this code
if (strncmp(k_binomCommand, m_text, strlen(k_binomCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_binomCommand)))) {
m_text += strlen(k_binomCommand);
return popBinomCommand();
}
}
if (strncmp(k_ceilCommand, m_text, strlen(k_ceilCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_ceilCommand)))) {
m_text += strlen(k_ceilCommand);
return popCeilCommand();
}
}
if (strncmp(k_integralCommand, m_text, strlen(k_integralCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_integralCommand)))) {
m_text += strlen(k_integralCommand);
return popIntegralCommand();
}
}
if (strncmp(k_intsetCommand, m_text, strlen(k_intsetCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_intsetCommand)))) {
m_text += strlen(k_intsetCommand);
return popIntsetCommand();
}
}
if (strncmp(k_floorCommand, m_text, strlen(k_floorCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_floorCommand)))) {
m_text += strlen(k_floorCommand);
return popFloorCommand();
}
}
if (strncmp(k_fracCommand, m_text, strlen(k_fracCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_fracCommand)))) {
m_text += strlen(k_fracCommand);
return popFracCommand();
}
}
if (strncmp(k_leftCommand, m_text, strlen(k_leftCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_leftCommand)))) {
m_text += strlen(k_leftCommand);
return popLeftCommand();
}
}
if (strncmp(k_overrightArrowCommand, m_text, strlen(k_overrightArrowCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_overrightArrowCommand)))) {
m_text += strlen(k_overrightArrowCommand);
return popOverrightarrowCommand();
}
}
if (strncmp(k_overlineCommand, m_text, strlen(k_overlineCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_overlineCommand)))) {
m_text += strlen(k_overlineCommand);
return popOverlineCommand();
}
}
if (strncmp(k_productCommand, m_text, strlen(k_productCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_productCommand)))) {
m_text += strlen(k_productCommand);
return popProductCommand();
}
}
if (strncmp(k_rightCommand, m_text, strlen(k_rightCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_rightCommand)))) {
m_text += strlen(k_rightCommand);
return popRightCommand();
}
}
if (strncmp(k_spaceCommand, m_text, strlen(k_spaceCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_spaceCommand)))) {
m_text += strlen(k_spaceCommand);
return popSpaceCommand();
}
}
if (strncmp(k_sqrtCommand, m_text, strlen(k_sqrtCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_sqrtCommand)))) {
m_text += strlen(k_sqrtCommand);
return popSqrtCommand();
}
}
if (strncmp(k_sumCommand, m_text, strlen(k_sumCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_sumCommand)))) {
m_text += strlen(k_sumCommand);
return popSumCommand();
}
}
if (strncmp(k_overlineCommand, m_text, strlen(k_overlineCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_overlineCommand)))) {
m_text += strlen(k_overlineCommand);
return popOverlineCommand();
}
}
if (strncmp(k_intsetCommand, m_text, strlen(k_intsetCommand)) == 0) {
if (isCommandEnded(*(m_text + strlen(k_intsetCommand)))) {
m_text += strlen(k_intsetCommand);
return popIntsetCommand();
}
}
for (int i = 0; i < k_NumberOfSymbols; i++) {
if (strncmp(k_SymbolsCommands[i], m_text, strlen(k_SymbolsCommands[i])) == 0) {
if (isCommandEnded(*(m_text + strlen(k_SymbolsCommands[i])))) {
m_text += strlen(k_SymbolsCommands[i]);
return popSymbolCommand(i);
}
}
}
for (int i = 0; i < k_NumberOfFunctionCommands; i++) {
if (strncmp(k_FunctionCommands[i], m_text, strlen(k_FunctionCommands[i])) == 0) {
if (isCommandEnded(*(m_text + strlen(k_FunctionCommands[i])))) {
m_text += strlen(k_FunctionCommands[i]);
return LayoutHelper::String(k_FunctionCommands[i], strlen(k_FunctionCommands[i]));
}
}
}
m_hasError = true;
return EmptyLayout::Builder();
}
// Expressions
Layout TexParser::popBinomCommand() {
Layout numerator = popBlock();
Layout denominator = popBlock();
BinomialCoefficientLayout b = BinomialCoefficientLayout::Builder(numerator, denominator);
return b;
}
Layout TexParser::popCeilCommand() {
Layout ceil = popBlock();
return CeilingLayout::Builder(ceil);
}
Layout TexParser::popFloorCommand() {
Layout floor = popBlock();
return FloorLayout::Builder(floor);
}
Layout TexParser::popFracCommand() {
Layout numerator = popBlock();
Layout denominator = popBlock();
FractionLayout l = FractionLayout::Builder(numerator, denominator);
return l;
}
Layout TexParser::popIntegralCommand() {
Layout arg = popBlock();
Layout var = popBlock();
Layout start = popBlock();
Layout end = popBlock();
return IntegralLayout::Builder(arg, var, start, end);
}
Layout TexParser::popIntsetCommand() {
HorizontalLayout intset = HorizontalLayout::Builder();
intset.addOrMergeChildAtIndex(CodePointLayout::Builder(0x27e6), 0, false);
intset.addOrMergeChildAtIndex(popBlock(), intset.numberOfChildren(), false);
intset.addOrMergeChildAtIndex(CodePointLayout::Builder(0x27e7), intset.numberOfChildren(), false);
return intset;
}
Layout TexParser::popLeftCommand() {
m_text++;
return LeftParenthesisLayout::Builder();
}
Layout TexParser::popProductCommand() {
Layout arg = popBlock();
Layout var = popBlock();
Layout start = popBlock();
Layout end = popBlock();
return ProductLayout::Builder(arg, var, start, end);
}
Layout TexParser::popRightCommand() {
m_text++;
return RightParenthesisLayout::Builder();
}
Layout TexParser::popSqrtCommand() {
while (*m_text == ' ') {
m_text ++;
}
if (*m_text == '[') {
m_text ++;
Layout rootFactor = popText(']');
Layout belowRoot = popBlock();
return NthRootLayout::Builder(belowRoot, rootFactor);
}
else {
return NthRootLayout::Builder(popBlock());
}
}
Layout TexParser::popSumCommand() {
Layout arg = popBlock();
Layout var = popBlock();
Layout start = popBlock();
Layout end = popBlock();
return SumLayout::Builder(arg, var, start, end);
}
Layout TexParser::popSpaceCommand() {
return LayoutHelper::String(" ", 1);
}
Layout TexParser::popOverrightarrowCommand() {
return VectorLayout::Builder(popBlock());
}
Layout TexParser::popOverlineCommand() {
return ConjugateLayout::Builder(popBlock());
}
Layout TexParser::popSymbolCommand(int SymbolIndex) {
uint32_t codePoint = k_SymbolsCodePoints[SymbolIndex];
return CodePointLayout::Builder(codePoint);
}
inline bool TexParser::isCommandEnded(char c) const {
return !(c >= 'a' && c <= 'z') && !(c >= 'A' && c <= 'Z');
}
}