X-Git-Url: https://git.lyx.org/gitweb/?a=blobdiff_plain;f=src%2Flyxlex.C;h=824173ed83e3f76026d5b89db45b5528201fa0e9;hb=35204f8f33d7400a5fefeffea533fb4cb4097211;hp=4dc6bbfa51db87b5c22b78e0c8a557e6df234ca0;hpb=d6665cba427b04ae37f42c846398cad518d2be0f;p=lyx.git diff --git a/src/lyxlex.C b/src/lyxlex.C index 4dc6bbfa51..824173ed83 100644 --- a/src/lyxlex.C +++ b/src/lyxlex.C @@ -1,30 +1,43 @@ -/* This file is part of - * ====================================================== - * - * LyX, The Document Processor +/** + * \file lyxlex.C + * This file is part of LyX, the document processor. + * Licence details can be found in the file COPYING. * - * Copyright 1996-2000 The LyX Team. + * \author Alejandro Aguilar Sierra + * \author Lars Gullik Bjønnes + * \author Jean-Marc Lasgouttes + * \author John Levon * - * Generalized simple lexical analizer. - * It can be used for simple syntax parsers, like lyxrc, - * texclass and others to come. [asierra30/03/96] - * - * ====================================================== */ + * Full author contact details are available in file CREDITS. + */ #include -#ifdef __GNUG__ -#pragma implementation "lyxlex.h" -#endif - #include "lyxlex.h" + +#include "debug.h" #include "lyxlex_pimpl.h" -#include "support/filetools.h" + +#include "support/convert.h" #include "support/lstrings.h" -using std::ostream; -using std::istream; +#include + + +namespace lyx { + +using support::compare_ascii_no_case; +using support::isStrDbl; +using support::isStrInt; +using support::ltrim; +using support::prefixIs; +using support::subst; +using support::trim; + using std::endl; +using std::string; +using std::istream; +using std::ostream; LyXLex::LyXLex(keyword_item * tab, int num) @@ -32,13 +45,13 @@ LyXLex::LyXLex(keyword_item * tab, int num) {} -LyXLex::~LyXLex() +LyXLex::~LyXLex() { delete pimpl_; } -bool LyXLex::IsOK() const +bool LyXLex::isOK() const { return pimpl_->is.good(); } @@ -50,19 +63,13 @@ void LyXLex::setLineNo(int l) } -int LyXLex::GetLineNo() const +int LyXLex::getLineNo() const { return pimpl_->lineno; } -string const LyXLex::text() const -{ - return &pimpl_->buff[0]; -} - - -std::istream & LyXLex::getStream() +istream & LyXLex::getStream() { return pimpl_->is; } @@ -104,107 +111,115 @@ void LyXLex::setStream(istream & i) } +void LyXLex::setCommentChar(char c) +{ + pimpl_->setCommentChar(c); +} + int LyXLex::lex() { return pimpl_->lex(); } -int LyXLex::GetInteger() const +int LyXLex::getInteger() const { - if (isStrInt(pimpl_->GetString())) - return strToInt(pimpl_->GetString()); - else { - pimpl_->printError("Bad integer `$$Token'"); - return -1; - } + if (isStrInt(pimpl_->getString())) + return convert(pimpl_->getString()); + pimpl_->printError("Bad integer `$$Token'"); + return -1; } -float LyXLex::GetFloat() const +double LyXLex::getFloat() const { // replace comma with dot in case the file was written with // the wrong locale (should be rare, but is easy enough to - // avoid). - string str = subst(pimpl_->GetString(), ",", "."); + // avoid). + string const str = subst(pimpl_->getString(), ",", "."); if (isStrDbl(str)) - return strToDbl(str); - else { - pimpl_->printError("Bad float `$$Token'"); - return -1; - } + return convert(str); + pimpl_->printError("Bad float `$$Token'"); + return -1; } -string const LyXLex::GetString() const +string const LyXLex::getString() const { - return pimpl_->GetString(); + return pimpl_->getString(); +} + + +docstring const LyXLex::getDocString() const +{ + return pimpl_->getDocString(); } // I would prefer to give a tag number instead of an explicit token -// here, but it is not possible because Buffer::readLyXformat2 uses -// explicit tokens (JMarc) +// here, but it is not possible because Buffer::readDocument uses +// explicit tokens (JMarc) string const LyXLex::getLongString(string const & endtoken) { string str, prefix; bool firstline = true; - while (IsOK()) { - if (!EatLine()) + while (isOK()) { + if (!eatLine()) // blank line in the file being read continue; - - string const token = frontStrip(strip(GetString()), " \t"); - + + string const token = trim(getString(), " \t"); + lyxerr[Debug::PARSER] << "LongString: `" - << GetString() << '\'' << endl; - - // We do a case independent comparison, like search_kw - // does. - if (compare_no_case(token, endtoken) != 0) { - string tmpstr = GetString(); - if (firstline) { - unsigned int i = 0; - while(i < tmpstr.length() - && tmpstr[i] == ' ') { - ++i; - prefix += ' '; - } - firstline = false; - lyxerr[Debug::PARSER] << "Prefix = `" << prefix - << '\'' << endl; - } - - if (!prefix.empty() - && prefixIs(tmpstr, prefix)) { - tmpstr.erase(0, prefix.length() - 1); - } - str += frontStrip(tmpstr, "\t") + '\n'; - } - else // token == endtoken + << getString() << '\'' << endl; + + // We do a case independent comparison, like search_kw does. + if (compare_ascii_no_case(token, endtoken) == 0) break; + + string tmpstr = getString(); + if (firstline) { + string::size_type i(tmpstr.find_first_not_of(' ')); + if (i != string::npos) + prefix = tmpstr.substr(0, i); + firstline = false; + lyxerr[Debug::PARSER] + << "Prefix = `" << prefix << "\'" << endl; + } + + // further lines in long strings may have the same + // whitespace prefix as the first line. Remove it. + if (prefix.length() && prefixIs(tmpstr, prefix)) { + tmpstr.erase(0, prefix.length() - 1); + } + + str += ltrim(tmpstr, "\t") + '\n'; } - if (!IsOK()) + + if (!isOK()) { printError("Long string not ended by `" + endtoken + '\''); + } return str; } -bool LyXLex::GetBool() const +bool LyXLex::getBool() const { - if (compare(pimpl_->buff, "true") == 0) + if (pimpl_->getString() == "true") { return true; - else if (compare(pimpl_->buff, "false") != 0) - pimpl_->printError("Bad boolean `$$Token'. Use \"false\" or \"true\""); + } else if (pimpl_->getString() != "false") { + pimpl_->printError("Bad boolean `$$Token'. " + "Use \"false\" or \"true\""); + } return false; } -bool LyXLex::EatLine() +bool LyXLex::eatLine() { - return pimpl_->EatLine(); + return pimpl_->eatLine(); } @@ -225,36 +240,89 @@ void LyXLex::pushToken(string const & pt) pimpl_->pushToken(pt); } +LyXLex::operator void const *() const +{ + // This behaviour is NOT the same as the std::streams which would + // use fail() here. However, our implementation of getString() et al. + // can cause the eof() and fail() bits to be set, even though we + // haven't tried to read 'em. + return pimpl_->is.bad() ? 0 : this; +} + + +bool LyXLex::operator!() const +{ + return pimpl_->is.bad(); +} + + +LyXLex & LyXLex::operator>>(std::string & s) +{ + if (isOK()) { + next(); + s = getString(); + } + return *this; +} + + +LyXLex & LyXLex::operator>>(docstring & s) +{ + if (isOK()) { + next(); + s = getDocString(); + } + return *this; +} + + +LyXLex & LyXLex::operator>>(double & s) +{ + if (isOK()) { + next(); + s = getFloat(); + } + return *this; +} + -int LyXLex::FindToken(char const * str[]) -{ - int i = -1; - - if (next()) { - if (compare(pimpl_->buff, "default")) { - for (i = 0; str[i][0] && compare(str[i], pimpl_->buff); ++i); - if (!str[i][0]) { - pimpl_->printError("Unknown argument `$$Token'"); - i = -1; - } - } - } else - pimpl_->printError("file ended while scanning string token"); - return i; -} - - -int LyXLex::CheckToken(char const * str[], int print_error) -{ - int i = -1; - - if (compare(pimpl_->buff, "default")) { - for (i = 0; str[i][0] && compare(str[i], pimpl_->buff); ++i); - if (!str[i][0]) { - if (print_error) - pimpl_->printError("Unknown argument `$$Token'"); - i = -1; - } - } - return i; +LyXLex & LyXLex::operator>>(int & s) +{ + if (isOK()) { + next(); + s = getInteger(); + } + return *this; +} + + +LyXLex & LyXLex::operator>>(unsigned int & s) +{ + if (isOK()) { + next(); + s = getInteger(); + } + return *this; +} + + +LyXLex & LyXLex::operator>>(bool & s) +{ + if (isOK()) { + next(); + s = getBool(); + } + return *this; } + + +/// quotes a string, e.g. for use in preferences files or as an argument of the "log" dialog +string const LyXLex::quoteString(string const & arg) +{ + std::ostringstream os; + os << '"' << subst(subst(arg, "\\", "\\\\"), "\"", "\\\"") << '"'; + return os.str(); +} + + +} // namespace lyx