3 * This file is part of LyX, the document processor.
4 * Licence details can be found in the file COPYING.
6 * \author Lars Gullik Bjønnes
7 * \author Martin Vermeer
9 * \author Richard Kimberly Heck (roman numerals)
11 * Full author contact details are available in file CREDITS.
20 #include "support/convert.h"
21 #include "support/counter_reps.h"
22 #include "support/debug.h"
23 #include "support/docstring.h"
24 #include "support/gettext.h"
25 #include "support/lassert.h"
26 #include "support/lstrings.h"
32 using namespace lyx::support;
38 : initial_value_(0), saved_value_(0)
44 Counter::Counter(docstring const & mc, docstring const & ls,
45 docstring const & lsa, docstring const & guiname)
46 : initial_value_(0), saved_value_(0), parent_(mc), labelstring_(ls),
47 labelstringappendix_(lsa), guiname_(guiname)
53 bool Counter::read(Lexer & lex)
58 CT_LABELSTRING_APPENDIX,
66 LexerKeyword counterTags[] = {
68 { "guiname", CT_GUINAME },
69 { "initialvalue", CT_INITIALVALUE},
70 { "labelstring", CT_LABELSTRING },
71 { "labelstringappendix", CT_LABELSTRING_APPENDIX },
72 { "latexname", CT_LATEXNAME },
73 { "prettyformat", CT_PRETTYFORMAT },
74 { "within", CT_WITHIN }
77 lex.pushTable(counterTags);
80 while (!getout && lex.isOK()) {
83 case Lexer::LEX_UNDEF:
84 lex.printError("Unknown counter tag `$$Token'");
92 parent_ = lex.getDocString();
93 if (parent_ == "none")
98 initial_value_ = lex.getInteger();
99 // getInteger() returns -1 on error, and larger
100 // negative values do not make much sense.
101 // In the other case, we subtract one, since the
102 // counter will be incremented before its first use.
103 if (initial_value_ <= -1)
108 case CT_PRETTYFORMAT:
110 prettyformat_ = lex.getDocString();
114 labelstring_ = lex.getDocString();
115 labelstringappendix_ = labelstring_;
117 case CT_LABELSTRING_APPENDIX:
119 labelstringappendix_ = lex.getDocString();
123 guiname_ = lex.getDocString();
127 latexname_ = lex.getDocString();
135 // Here if have a full counter if getout == true
137 LYXERR0("No End tag found for counter!");
143 void Counter::set(int v)
149 void Counter::addto(int v)
155 int Counter::value() const
161 void Counter::saveValue()
163 saved_value_ = value_;
167 void Counter::restoreValue()
169 value_ = saved_value_;
179 void Counter::reset()
181 value_ = initial_value_;
185 docstring const & Counter::parent() const
191 bool Counter::checkAndRemoveParent(docstring const & cnt)
195 parent_ = docstring();
200 docstring const & Counter::labelString(bool in_appendix) const
202 return in_appendix ? labelstringappendix_ : labelstring_;
206 Counter::StringMap & Counter::flatLabelStrings(bool in_appendix) const
208 return in_appendix ? flatlabelstringappendix_ : flatlabelstring_;
212 Counters::Counters() : appendix_(false), subfloat_(false), longtable_(false)
214 layout_stack_.push_back(nullptr);
215 counter_stack_.push_back(from_ascii(""));
219 void Counters::newCounter(docstring const & newc,
220 docstring const & parentc,
221 docstring const & ls,
222 docstring const & lsa,
223 docstring const & guiname)
225 if (!parentc.empty() && !hasCounter(parentc)) {
226 lyxerr << "Parent counter does not exist: "
231 counterList_[newc] = Counter(parentc, ls, lsa, guiname);
235 bool Counters::hasCounter(docstring const & c) const
237 return counterList_.find(c) != counterList_.end();
241 bool Counters::read(Lexer & lex, docstring const & name, bool makenew)
243 if (hasCounter(name)) {
244 LYXERR(Debug::TCLASS, "Reading existing counter " << to_utf8(name));
245 return counterList_[name].read(lex);
248 LYXERR(Debug::TCLASS, "Reading new counter " << to_utf8(name));
250 bool success = cnt.read(lex);
251 // if makenew is false, we will just discard what we read
252 if (success && makenew)
253 counterList_[name] = cnt;
255 LYXERR0("Error reading counter `" << name << "'!");
260 void Counters::set(docstring const & ctr, int const val)
262 CounterList::iterator const it = counterList_.find(ctr);
263 if (it == counterList_.end()) {
264 lyxerr << "set: Counter does not exist: "
265 << to_utf8(ctr) << endl;
272 void Counters::addto(docstring const & ctr, int const val)
274 CounterList::iterator const it = counterList_.find(ctr);
275 if (it == counterList_.end()) {
276 lyxerr << "addto: Counter does not exist: "
277 << to_utf8(ctr) << endl;
280 it->second.addto(val);
284 int Counters::value(docstring const & ctr) const
286 CounterList::const_iterator const cit = counterList_.find(ctr);
287 if (cit == counterList_.end()) {
288 lyxerr << "value: Counter does not exist: "
289 << to_utf8(ctr) << endl;
292 return cit->second.value();
296 void Counters::saveValue(docstring const & ctr) const
298 CounterList::const_iterator const cit = counterList_.find(ctr);
299 if (cit == counterList_.end()) {
300 lyxerr << "value: Counter does not exist: "
301 << to_utf8(ctr) << endl;
304 Counter const & cnt = cit->second;
305 Counter & ccnt = const_cast<Counter &>(cnt);
310 void Counters::restoreValue(docstring const & ctr) const
312 CounterList::const_iterator const cit = counterList_.find(ctr);
313 if (cit == counterList_.end()) {
314 lyxerr << "value: Counter does not exist: "
315 << to_utf8(ctr) << endl;
318 Counter const & cnt = cit->second;
319 Counter & ccnt = const_cast<Counter &>(cnt);
324 void Counters::resetChildren(docstring const & count)
326 for (auto & ctr : counterList_) {
327 if (ctr.second.parent() == count) {
329 resetChildren(ctr.first);
335 void Counters::stepParent(docstring const & ctr, UpdateType utype)
337 CounterList::iterator it = counterList_.find(ctr);
338 if (it == counterList_.end()) {
339 lyxerr << "step: Counter does not exist: "
340 << to_utf8(ctr) << endl;
343 step(it->second.parent(), utype);
347 void Counters::step(docstring const & ctr, UpdateType utype)
349 CounterList::iterator it = counterList_.find(ctr);
350 if (it == counterList_.end()) {
351 lyxerr << "step: Counter does not exist: "
352 << to_utf8(ctr) << endl;
357 if (utype == OutputUpdate) {
358 LBUFERR(!counter_stack_.empty());
359 counter_stack_.pop_back();
360 counter_stack_.push_back(ctr);
367 docstring const & Counters::guiName(docstring const & cntr) const
369 CounterList::const_iterator it = counterList_.find(cntr);
370 if (it == counterList_.end()) {
371 lyxerr << "step: Counter does not exist: "
372 << to_utf8(cntr) << endl;
373 return empty_docstring();
376 docstring const & guiname = it->second.guiName();
383 docstring const & Counters::latexName(docstring const & cntr) const
385 CounterList::const_iterator it = counterList_.find(cntr);
386 if (it == counterList_.end()) {
387 lyxerr << "step: Counter does not exist: "
388 << to_utf8(cntr) << endl;
389 return empty_docstring();
392 docstring const & latexname = it->second.latexName();
393 if (latexname.empty())
399 void Counters::reset()
403 current_float_.erase();
404 for (auto & ctr : counterList_)
406 counter_stack_.clear();
407 counter_stack_.push_back(from_ascii(""));
408 layout_stack_.clear();
409 layout_stack_.push_back(nullptr);
413 void Counters::reset(docstring const & match)
415 LASSERT(!match.empty(), return);
417 for (auto & ctr : counterList_) {
418 if (ctr.first.find(match) != string::npos)
424 bool Counters::remove(docstring const & cnt)
426 bool retval = counterList_.erase(cnt);
429 for (auto & ctr : counterList_) {
430 if (ctr.second.checkAndRemoveParent(cnt))
431 LYXERR(Debug::TCLASS, "Removed parent counter `" +
432 to_utf8(cnt) + "' from counter: " + to_utf8(ctr.first));
438 docstring Counters::labelItem(docstring const & ctr,
439 docstring const & numbertype) const
441 CounterList::const_iterator const cit = counterList_.find(ctr);
442 if (cit == counterList_.end()) {
445 << " does not exist." << endl;
449 int val = cit->second.value();
451 if (numbertype == "hebrew")
452 return docstring(1, hebrewCounter(val));
454 if (numbertype == "alph")
455 return docstring(1, loweralphaCounter(val));
457 if (numbertype == "Alph")
458 return docstring(1, alphaCounter(val));
460 if (numbertype == "roman")
461 return lowerromanCounter(val);
463 if (numbertype == "Roman")
464 return romanCounter(val);
466 if (numbertype == "fnsymbol")
467 return fnsymbolCounter(val);
469 return convert<docstring>(val);
473 docstring Counters::theCounter(docstring const & counter,
474 string const & lang) const
476 CounterList::const_iterator it = counterList_.find(counter);
477 if (it == counterList_.end())
478 return from_ascii("#");
479 Counter const & ctr = it->second;
480 Counter::StringMap & sm = ctr.flatLabelStrings(appendix());
481 Counter::StringMap::iterator smit = sm.find(lang);
482 if (smit != sm.end())
483 return counterLabel(smit->second, lang);
485 vector<docstring> callers;
486 docstring const & fls = flattenLabelString(counter, appendix(),
489 return counterLabel(fls, lang);
493 docstring Counters::flattenLabelString(docstring const & counter,
496 vector<docstring> & callers) const
498 if (find(callers.begin(), callers.end(), counter) != callers.end()) {
499 // recursion detected
500 lyxerr << "Warning: Recursion in label for counter `"
501 << counter << "' detected"
503 return from_ascii("??");
506 CounterList::const_iterator it = counterList_.find(counter);
507 if (it == counterList_.end())
508 return from_ascii("#");
509 Counter const & c = it->second;
511 docstring ls = translateIfPossible(c.labelString(in_appendix), lang);
513 callers.push_back(counter);
515 if (!c.parent().empty())
516 ls = flattenLabelString(c.parent(), in_appendix, lang, callers)
519 return ls + from_ascii("\\arabic{") + counter + "}";
523 //lyxerr << "ls=" << to_utf8(ls) << endl;
524 size_t const i = ls.find(from_ascii("\\the"), 0);
525 if (i == docstring::npos)
527 size_t const j = i + 4;
529 while (k < ls.size() && lowercase(ls[k]) >= 'a'
530 && lowercase(ls[k]) <= 'z')
532 docstring const newc = ls.substr(j, k - j);
533 docstring const repl = flattenLabelString(newc, in_appendix,
535 ls.replace(i, k - j + 4, repl);
543 docstring Counters::counterLabel(docstring const & format,
544 string const & lang) const
546 docstring label = format;
548 // FIXME: Using regexps would be better, but we compile boost without
549 // wide regexps currently.
550 docstring const the = from_ascii("\\the");
552 //lyxerr << "label=" << label << endl;
553 size_t const i = label.find(the, 0);
554 if (i == docstring::npos)
556 size_t const j = i + 4;
558 while (k < label.size() && lowercase(label[k]) >= 'a'
559 && lowercase(label[k]) <= 'z')
561 docstring const newc(label, j, k - j);
562 label.replace(i, k - i, theCounter(newc, lang));
565 //lyxerr << "label=" << label << endl;
567 size_t const i = label.find('\\', 0);
568 if (i == docstring::npos)
570 size_t const j = label.find('{', i + 1);
571 if (j == docstring::npos)
573 size_t const k = label.find('}', j + 1);
574 if (k == docstring::npos)
576 docstring const numbertype(label, i + 1, j - i - 1);
577 docstring const counter(label, j + 1, k - j - 1);
578 label.replace(i, k + 1 - i, labelItem(counter, numbertype));
580 //lyxerr << "DONE! label=" << label << endl;
585 docstring Counters::prettyCounter(docstring const & name,
586 string const & lang) const
588 CounterList::const_iterator it = counterList_.find(name);
589 if (it == counterList_.end())
590 return from_ascii("#");
591 Counter const & ctr = it->second;
593 docstring const value = theCounter(name, lang);
594 docstring const & format =
595 translateIfPossible(ctr.prettyFormat(), lang);
598 return subst(format, from_ascii("##"), value);
602 docstring Counters::currentCounter() const
604 LBUFERR(!counter_stack_.empty());
605 return counter_stack_.back();
609 void Counters::setActiveLayout(Layout const & lay)
611 LASSERT(!layout_stack_.empty(), return);
612 Layout const * const lastlay = layout_stack_.back();
613 // we want to check whether the layout has changed and, if so,
614 // whether we are coming out of or going into an environment.
616 layout_stack_.pop_back();
617 layout_stack_.push_back(&lay);
618 if (lay.isEnvironment())
620 } else if (lastlay->name() != lay.name()) {
621 layout_stack_.pop_back();
622 layout_stack_.push_back(&lay);
623 if (lastlay->isEnvironment()) {
624 // we are coming out of an environment
625 // LYXERR0("Out: " << lastlay->name());
628 if (lay.isEnvironment()) {
629 // we are going into a new environment
630 // LYXERR0("In: " << lay.name());
637 void Counters::beginEnvironment()
639 counter_stack_.push_back(counter_stack_.back());
643 void Counters::endEnvironment()
645 LASSERT(!counter_stack_.empty(), return);
646 counter_stack_.pop_back();
650 vector<docstring> Counters::listOfCounters() const {
651 vector<docstring> ret;
652 for(auto const & k : counterList_)
653 ret.emplace_back(k.first);