mirror of
https://github.com/GothenburgBitFactory/timewarrior.git
synced 2025-07-07 20:06:39 +02:00
Pig: Promoted Pig to common.git
This commit is contained in:
Paul Beckingham
parent
ab17cbb012
commit
5690fb784a
6 changed files with 1 additions and 820 deletions
|
|
@ -6,7 +6,6 @@ include_directories (${CMAKE_SOURCE_DIR}
|
|||
set (timew_SRCS Grammar.cpp Grammar.h
|
||||
Lexer.cpp Lexer.h
|
||||
LR0.cpp LR0.h
|
||||
Pig.cpp Pig.h
|
||||
Rules.cpp Rules.h)
|
||||
|
||||
add_library (timew STATIC ${timew_SRCS})
|
||||
|
|
|
|||
500
src/Pig.cpp
500
src/Pig.cpp
|
|
@ -1,500 +0,0 @@
|
|||
////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Copyright 2015 - 2016, Paul Beckingham, Federico Hernandez.
|
||||
//
|
||||
// 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.
|
||||
//
|
||||
// http://www.opensource.org/licenses/mit-license.php
|
||||
//
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
#include <cmake.h>
|
||||
#include <Pig.h>
|
||||
#include <unicode.h>
|
||||
#include <utf8.h>
|
||||
#include <sstream>
|
||||
#include <cinttypes>
|
||||
#include <cstdlib>
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
Pig::Pig (const std::string& text)
|
||||
: _text {text}
|
||||
{
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::skip (int c)
|
||||
{
|
||||
if (_text[_cursor] == c)
|
||||
{
|
||||
++_cursor;
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::skipN (const int quantity)
|
||||
{
|
||||
auto save = _cursor;
|
||||
|
||||
auto count = 0;
|
||||
while (count++ < quantity)
|
||||
{
|
||||
if (! utf8_next_char (_text, _cursor))
|
||||
{
|
||||
_cursor = save;
|
||||
return false;
|
||||
}
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::skipWS ()
|
||||
{
|
||||
auto save = _cursor;
|
||||
|
||||
int c;
|
||||
auto prev = _cursor;
|
||||
while ((c = utf8_next_char (_text, _cursor)))
|
||||
{
|
||||
if (! unicodeWhitespace (c))
|
||||
{
|
||||
_cursor = prev;
|
||||
break;
|
||||
}
|
||||
prev = _cursor;
|
||||
}
|
||||
|
||||
return _cursor > save;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::skipLiteral (const std::string& literal)
|
||||
{
|
||||
if (_text.find (literal, _cursor) == _cursor)
|
||||
{
|
||||
_cursor += literal.length ();
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getUntilWS (std::string& result)
|
||||
{
|
||||
auto save = _cursor;
|
||||
|
||||
int c;
|
||||
auto prev = _cursor;
|
||||
while ((c = utf8_next_char (_text, _cursor)))
|
||||
{
|
||||
if (eos ())
|
||||
{
|
||||
result = _text.substr (save, _cursor - save);
|
||||
return true;
|
||||
}
|
||||
|
||||
else if (unicodeWhitespace (c))
|
||||
{
|
||||
_cursor = prev;
|
||||
result = _text.substr (save, _cursor - save);
|
||||
return true;
|
||||
}
|
||||
|
||||
prev = _cursor;
|
||||
}
|
||||
|
||||
return _cursor > save;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getDigit (int& result)
|
||||
{
|
||||
int c = _text[_cursor];
|
||||
if (c &&
|
||||
unicodeLatinDigit (c))
|
||||
{
|
||||
result = c - '0';
|
||||
++_cursor;
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getDigit2 (int& result)
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 0]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 1]))
|
||||
{
|
||||
result = strtoimax (_text.substr (_cursor, 2).c_str (), NULL, 10);
|
||||
_cursor += 2;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getDigit3 (int& result)
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 0]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 1]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 2]))
|
||||
{
|
||||
result = strtoimax (_text.substr (_cursor, 3).c_str (), NULL, 10);
|
||||
_cursor += 3;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getDigit4 (int& result)
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 0]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 1]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 2]))
|
||||
{
|
||||
if (unicodeLatinDigit (_text[_cursor + 3]))
|
||||
{
|
||||
result = strtoimax (_text.substr (_cursor, 4).c_str (), NULL, 10);
|
||||
_cursor += 4;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getDigits (int& result)
|
||||
{
|
||||
auto save = _cursor;
|
||||
|
||||
int c;
|
||||
auto prev = _cursor;
|
||||
while ((c = utf8_next_char (_text, _cursor)))
|
||||
{
|
||||
if (! unicodeLatinDigit (c))
|
||||
{
|
||||
_cursor = prev;
|
||||
break;
|
||||
}
|
||||
|
||||
prev = _cursor;
|
||||
}
|
||||
|
||||
if (_cursor > save)
|
||||
{
|
||||
result = std::strtoimax (_text.substr (save, _cursor - save).c_str (), NULL, 10);
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getHexDigit (int& result)
|
||||
{
|
||||
int c = _text[_cursor];
|
||||
if (c &&
|
||||
unicodeHexDigit (c))
|
||||
{
|
||||
if (c >= '0' && c <= '9')
|
||||
{
|
||||
result = c - '0';
|
||||
++_cursor;
|
||||
return true;
|
||||
}
|
||||
else if (c >= 'A' && c <= 'F')
|
||||
{
|
||||
result = c - 'A' + 10;
|
||||
++_cursor;
|
||||
return true;
|
||||
}
|
||||
else if (c >= 'a' && c <= 'f')
|
||||
{
|
||||
result = c - 'a' + 10;
|
||||
++_cursor;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// number:
|
||||
// int frac? exp?
|
||||
//
|
||||
// int:
|
||||
// (-|+)? digit+
|
||||
//
|
||||
// frac:
|
||||
// . digit+
|
||||
//
|
||||
// exp:
|
||||
// e digit+
|
||||
//
|
||||
// e:
|
||||
// e|E (+|-)?
|
||||
//
|
||||
bool Pig::getNumber (std::string& result)
|
||||
{
|
||||
auto i = _cursor;
|
||||
|
||||
// [+-]?
|
||||
if (_text[i] &&
|
||||
(_text[i] == '-' ||
|
||||
_text[i] == '+'))
|
||||
++i;
|
||||
|
||||
// digit+
|
||||
if (_text[i] &&
|
||||
unicodeLatinDigit (_text[i]))
|
||||
{
|
||||
++i;
|
||||
|
||||
while (_text[i] && unicodeLatinDigit (_text[i]))
|
||||
++i;
|
||||
|
||||
// ( . digit+ )?
|
||||
if (_text[i] && _text[i] == '.')
|
||||
{
|
||||
++i;
|
||||
|
||||
while (_text[i] && unicodeLatinDigit (_text[i]))
|
||||
++i;
|
||||
}
|
||||
|
||||
// ( [eE] [+-]? digit+ )?
|
||||
if (_text[i] &&
|
||||
(_text[i] == 'e' ||
|
||||
_text[i] == 'E'))
|
||||
{
|
||||
++i;
|
||||
|
||||
if (_text[i] &&
|
||||
(_text[i] == '+' ||
|
||||
_text[i] == '-'))
|
||||
++i;
|
||||
|
||||
if (_text[i] && unicodeLatinDigit (_text[i]))
|
||||
{
|
||||
++i;
|
||||
|
||||
while (_text[i] && unicodeLatinDigit (_text[i]))
|
||||
++i;
|
||||
|
||||
result = _text.substr (_cursor, i - _cursor);
|
||||
_cursor = i;
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
result = _text.substr (_cursor, i - _cursor);
|
||||
_cursor = i;
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getNumber (double& result)
|
||||
{
|
||||
std::string s;
|
||||
if (getNumber (s))
|
||||
{
|
||||
result = std::strtof (s.c_str (), NULL);
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Gets quote content: "foobar" -> foobar (for c = '"')
|
||||
// Handles escaped quotes: "foo\"bar" -> foo\"bar (for c = '"')
|
||||
// Returns false if first character is not c, or if there is no closing c.
|
||||
// Does not modify content between quotes.
|
||||
bool Pig::getQuoted (int quote, std::string& result)
|
||||
{
|
||||
if (! _text[_cursor] ||
|
||||
_text[_cursor] != quote)
|
||||
return false;
|
||||
|
||||
auto start = _cursor + utf8_sequence (quote);
|
||||
auto i = start;
|
||||
|
||||
while (_text[i])
|
||||
{
|
||||
i = _text.find (quote, i);
|
||||
if (i == std::string::npos)
|
||||
return false; // Unclosed quote. Short cut, not definitive.
|
||||
|
||||
if (i == start)
|
||||
{
|
||||
// Empty quote
|
||||
_cursor += 2 * utf8_sequence (quote); // Skip both quote chars
|
||||
result = "";
|
||||
return true;
|
||||
}
|
||||
|
||||
if (_text[i - 1] == '\\')
|
||||
{
|
||||
// Check for escaped backslashes. Backtracking like this is not very
|
||||
// efficient, but is only done in extreme corner cases.
|
||||
|
||||
auto j = i - 2; // Start one character further left
|
||||
bool is_escaped_quote = true;
|
||||
while (j >= start && _text[j] == '\\')
|
||||
{
|
||||
// Toggle flag for each further backslash encountered.
|
||||
is_escaped_quote = is_escaped_quote ? false : true;
|
||||
--j;
|
||||
}
|
||||
|
||||
if (is_escaped_quote)
|
||||
{
|
||||
// Keep searching
|
||||
++i;
|
||||
continue;
|
||||
}
|
||||
}
|
||||
|
||||
// None of the above applied, we must have found the closing quote char.
|
||||
result.assign (_text, start, i - start);
|
||||
_cursor = i + utf8_sequence (quote); // Skip closing quote char
|
||||
return true;
|
||||
}
|
||||
|
||||
// This should never be reached. We could throw here instead.
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Assumes that the options are sorted by decreasing length, so that if the
|
||||
// options contain 'fourteen' and 'four', the stream is first matched against
|
||||
// the longer entry.
|
||||
bool Pig::getOneOf (
|
||||
const std::vector <std::string>& options,
|
||||
std::string& found)
|
||||
{
|
||||
for (const auto& option : options)
|
||||
{
|
||||
if (skipLiteral (option))
|
||||
{
|
||||
found = option;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::getRemainder (std::string& result)
|
||||
{
|
||||
if (_text[_cursor])
|
||||
{
|
||||
result = _text.substr (_cursor);
|
||||
_cursor += result.length ();
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
bool Pig::eos () const
|
||||
{
|
||||
return _text[_cursor] == '\0';
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Peeks ahead - does not move cursor.
|
||||
int Pig::peek () const
|
||||
{
|
||||
return _text[_cursor];
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Peeks ahead - does not move cursor.
|
||||
std::string Pig::peek (const int quantity) const
|
||||
{
|
||||
if (_text[_cursor] &&
|
||||
_cursor + quantity <= _text.length ())
|
||||
return _text.substr (_cursor, quantity);
|
||||
|
||||
return "";
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
std::string::size_type Pig::cursor () const
|
||||
{
|
||||
return _cursor;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Note: never called internally, otherwise the client cannot rely on iṫ.
|
||||
std::string::size_type Pig::save ()
|
||||
{
|
||||
return _saved = _cursor;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
// Note: never called internally, otherwise the client cannot rely on iṫ.
|
||||
std::string::size_type Pig::restore ()
|
||||
{
|
||||
return _cursor = _saved;
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
std::string Pig::dump () const
|
||||
{
|
||||
std::stringstream out;
|
||||
out << "≪" << _text << "≫"
|
||||
<< " l" << _text.length ()
|
||||
<< " c" << _cursor;
|
||||
|
||||
return out.str ();
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
73
src/Pig.h
73
src/Pig.h
|
|
@ -1,73 +0,0 @@
|
|||
////////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Copyright 2015 - 2016, Paul Beckingham, Federico Hernandez.
|
||||
//
|
||||
// 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.
|
||||
//
|
||||
// http://www.opensource.org/licenses/mit-license.php
|
||||
//
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
#ifndef INCLUDED_PIG
|
||||
#define INCLUDED_PIG
|
||||
|
||||
#include <string>
|
||||
#include <vector>
|
||||
|
||||
class Pig
|
||||
{
|
||||
public:
|
||||
explicit Pig (const std::string&);
|
||||
|
||||
bool skip (int);
|
||||
bool skipN (const int quantity = 1);
|
||||
bool skipWS ();
|
||||
bool skipLiteral (const std::string&);
|
||||
|
||||
bool getUntilWS (std::string&);
|
||||
bool getDigit (int&);
|
||||
bool getDigit2 (int&);
|
||||
bool getDigit3 (int&);
|
||||
bool getDigit4 (int&);
|
||||
bool getDigits (int&);
|
||||
bool getHexDigit (int&);
|
||||
bool getNumber (std::string&);
|
||||
bool getNumber (double&);
|
||||
bool getQuoted (int, std::string&);
|
||||
bool getOneOf (const std::vector <std::string>&, std::string&);
|
||||
bool getRemainder (std::string&);
|
||||
|
||||
bool eos () const;
|
||||
int peek () const;
|
||||
std::string peek (const int) const;
|
||||
std::string::size_type cursor () const;
|
||||
std::string::size_type save ();
|
||||
std::string::size_type restore ();
|
||||
|
||||
std::string dump () const;
|
||||
|
||||
private:
|
||||
const std::string& _text;
|
||||
std::string::size_type _cursor {0};
|
||||
std::string::size_type _saved {0};
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
Loading…
Add table
Add a link
Reference in a new issue