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 Jean-Marc Lasgouttes
9 * Full author contact details are available in file CREDITS.
15 #include "support/std_sstream.h"
20 #include <boost/tokenizer.hpp>
21 #include <boost/assert.hpp>
22 #include <boost/format.hpp>
33 #ifndef CXX_GLOBAL_CSTD
44 int compare_no_case(string const & s, string const & s2)
46 string::const_iterator p = s.begin();
47 string::const_iterator p2 = s2.begin();
49 while (p != s.end() && p2 != s2.end()) {
50 int const lc1 = tolower(*p);
51 int const lc2 = tolower(*p2);
53 return (lc1 < lc2) ? -1 : 1;
58 if (s.size() == s2.size())
60 if (s.size() < s2.size())
67 int ascii_tolower(int c) {
68 if (c >= 'A' && c <= 'Z')
75 int compare_ascii_no_case(string const & s, string const & s2)
77 string::const_iterator p = s.begin();
78 string::const_iterator p2 = s2.begin();
80 while (p != s.end() && p2 != s2.end()) {
81 int const lc1 = ascii_tolower(*p);
82 int const lc2 = ascii_tolower(*p2);
84 return (lc1 < lc2) ? -1 : 1;
89 if (s.size() == s2.size())
91 if (s.size() < s2.size())
97 int compare_no_case(string const & s, string const & s2, unsigned int len)
99 string::const_iterator p = s.begin();
100 string::const_iterator p2 = s2.begin();
102 while (i < len && p != s.end() && p2 != s2.end()) {
103 int const lc1 = tolower(*p);
104 int const lc2 = tolower(*p2);
106 return (lc1 < lc2) ? -1 : 1;
112 if (s.size() >= len && s2.size() >= len)
114 if (s.size() < s2.size())
120 bool isStrInt(string const & str)
122 if (str.empty()) return false;
124 // Remove leading and trailing white space chars.
125 string const tmpstr = trim(str);
126 if (tmpstr.empty()) return false;
128 string::const_iterator cit = tmpstr.begin();
129 if ((*cit) == '-') ++cit;
130 string::const_iterator end = tmpstr.end();
131 for (; cit != end; ++cit) {
132 if (!isdigit((*cit))) return false;
138 bool isStrUnsignedInt(string const & str)
140 if (str.empty()) return false;
142 // Remove leading and trailing white space chars.
143 string const tmpstr = trim(str);
144 if (tmpstr.empty()) return false;
146 string::const_iterator cit = tmpstr.begin();
147 string::const_iterator end = tmpstr.end();
148 for (; cit != end; ++cit) {
149 if (!isdigit((*cit))) return false;
155 int strToInt(string const & str)
158 // Remove leading and trailing white space chars.
159 string const tmpstr = trim(str);
160 // Do the conversion proper.
168 unsigned int strToUnsignedInt(string const & str)
170 if (isStrUnsignedInt(str)) {
171 // Remove leading and trailing white space chars.
172 string const tmpstr = trim(str);
173 // Do the conversion proper.
181 bool isStrDbl(string const & str)
183 if (str.empty()) return false;
185 // Remove leading and trailing white space chars.
186 string const tmpstr = trim(str);
187 if (tmpstr.empty()) return false;
188 // if (1 < tmpstr.count('.')) return false;
190 string::const_iterator cit = tmpstr.begin();
191 bool found_dot(false);
192 if ((*cit) == '-') ++cit;
193 string::const_iterator end = tmpstr.end();
194 for (; cit != end; ++cit) {
211 double strToDbl(string const & str)
214 // Remove leading and trailing white space chars.
215 string const tmpstr = trim(str);
216 // Do the conversion proper.
217 return ::atof(tmpstr.c_str());
224 char lowercase(char c)
226 return char(tolower(c));
230 char uppercase(char c)
232 return char(toupper(c));
238 // since we cannot use std::tolower and std::toupper directly in the
239 // calls to std::transform yet, we use these helper clases. (Lgb)
241 struct local_lowercase {
242 char operator()(char c) const {
247 struct local_uppercase {
248 char operator()(char c) const {
253 struct local_ascii_lowercase {
254 char operator()(char c) const {
255 return ascii_tolower(c);
259 } // end of anon namespace
261 string const lowercase(string const & a)
264 transform(tmp.begin(), tmp.end(), tmp.begin(), local_lowercase());
268 string const uppercase(string const & a)
271 transform(tmp.begin(), tmp.end(), tmp.begin(), local_uppercase());
276 string const ascii_lowercase(string const & a)
279 transform(tmp.begin(), tmp.end(), tmp.begin(),
280 local_ascii_lowercase());
285 bool prefixIs(string const & a, string const & pre)
287 string::size_type const prelen = pre.length();
288 string::size_type const alen = a.length();
290 if (prelen > alen || a.empty())
293 #if defined(STD_STRING_IS_GOOD)
294 return a.compare(0, prelen, pre) == 0;
296 return ::strncmp(a.c_str(), pre.c_str(), prelen) == 0;
302 bool suffixIs(string const & a, char c)
304 if (a.empty()) return false;
305 return a[a.length() - 1] == c;
309 bool suffixIs(string const & a, string const & suf)
311 string::size_type const suflen = suf.length();
312 string::size_type const alen = a.length();
317 #if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
318 string tmp(a, alen - suflen);
319 return ::strncmp(tmp.c_str(), suf.c_str(), suflen) == 0;
321 return a.compare(alen - suflen, suflen, suf) == 0;
327 bool containsOnly(string const & s, string const & cset)
329 return s.find_first_not_of(cset) == string::npos;
333 // ale970405+lasgoutt-970425
334 // rewritten to use new string (Lgb)
335 string const token(string const & a, char delim, int n)
337 if (a.empty()) return string();
339 string::size_type k = 0;
340 string::size_type i = 0;
342 // Find delimiter or end of string
344 if ((i = a.find(delim, i)) == string::npos)
348 // i is now the n'th delim (or string::npos)
349 if (i == string::npos) return string();
350 k = a.find(delim, i);
351 // k is now the n'th + 1 delim (or string::npos)
353 return a.substr(i, k - i);
357 // this could probably be faster and/or cleaner, but it seems to work (JMarc)
358 // rewritten to use new string (Lgb)
359 int tokenPos(string const & a, char delim, string const & tok)
365 while (!str.empty()) {
366 str = split(str, tmptok, delim);
375 string const subst(string const & a, char oldchar, char newchar)
378 string::iterator lit = tmp.begin();
379 string::iterator end = tmp.end();
380 for (; lit != end; ++lit)
381 if ((*lit) == oldchar)
387 string const subst(string const & a,
388 string const & oldstr, string const & newstr)
391 string::size_type i = 0;
392 string::size_type const olen = oldstr.length();
393 while ((i = lstr.find(oldstr, i)) != string::npos) {
394 lstr.replace(i, olen, newstr);
395 i += newstr.length(); // We need to be sure that we dont
396 // use the same i over and over again.
402 string const trim(string const & a, char const * p)
406 if (a.empty() || !*p)
409 string::size_type r = a.find_last_not_of(p);
410 string::size_type l = a.find_first_not_of(p);
412 // Is this the minimal test? (lgb)
413 if (r == string::npos && l == string::npos)
416 return a.substr(l, r - l + 1);
420 string const rtrim(string const & a, char const * p)
424 if (a.empty() || !*p)
427 string::size_type r = a.find_last_not_of(p);
429 // Is this test really needed? (Lgb)
430 if (r == string::npos)
433 return a.substr(0, r + 1);
437 string const ltrim(string const & a, char const * p)
441 if (a.empty() || !*p)
444 string::size_type l = a.find_first_not_of(p);
446 if (l == string::npos)
449 return a.substr(l, string::npos);
453 string const split(string const & a, string & piece, char delim)
456 string::size_type i = a.find(delim);
457 if (i == a.length() - 1) {
458 piece = a.substr(0, i);
459 } else if (i != string::npos) {
460 piece = a.substr(0, i);
461 tmp = a.substr(i + 1);
464 tmp = a.substr(i + 1);
472 string const split(string const & a, char delim)
475 string::size_type i = a.find(delim);
476 if (i != string::npos) // found delim
477 tmp = a.substr(i + 1);
483 string const rsplit(string const & a, string & piece, char delim)
486 string::size_type i = a.rfind(delim);
487 if (i != string::npos) { // delimiter was found
488 piece = a.substr(0, i);
489 tmp = a.substr(i + 1);
490 } else { // delimiter was not found
497 // This function escapes 8-bit characters and other problematic
498 // characters that cause problems in latex labels.
499 string const escape(string const & lab)
501 char hexdigit[16] = { '0', '1', '2', '3', '4', '5', '6', '7',
502 '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' };
504 for (string::size_type i = 0; i < lab.length(); ++i) {
505 unsigned char c= lab[i];
506 if (c >= 128 || c == '=' || c == '%') {
508 enc += hexdigit[c>>4];
509 enc += hexdigit[c & 15];
518 /// gives a vector of stringparts which have the delimiter delim
519 vector<string> const getVectorFromString(string const & str,
520 string const & delim)
522 // Lars would like this code to go, but for now his replacement (below)
523 // doesn't fullfil the same function. I have, therefore, reactivated the
524 // old code for now. Angus 11 Nov 2002.
529 string keys(rtrim(str));
531 string::size_type const idx = keys.find(delim);
532 if (idx == string::npos) {
533 vec.push_back(ltrim(keys));
536 string const key = trim(keys.substr(0, idx));
539 string::size_type const start = idx + delim.size();
540 keys = keys.substr(start);
544 boost::char_separator<char> sep(delim.c_str());
545 boost::tokenizer<boost::char_separator<char> > tokens(str, sep);
546 #ifndef USE_INCLUDED_STRING
547 return vector<string>(tokens.begin(), tokens.end());
550 using boost::tokenizer;
551 using boost::char_separator;
553 tokenizer<char_separator<char> >::iterator it = tokens.begin();
554 tokenizer<char_separator<char> >::iterator end = tokens.end();
555 for (; it != end; ++it) {
556 vec.push_back(STRCONV((*it)));
564 // the same vice versa
565 string const getStringFromVector(vector<string> const & vec,
566 string const & delim)
570 for (vector<string>::const_iterator it = vec.begin();
571 it != vec.end(); ++it) {
572 string item = trim(*it);
585 string bformat(string const & fmt, string const & arg1)
587 return (boost::format(fmt) % arg1).str();
591 string bformat(string const & fmt, string const & arg1, string const & arg2)
593 return (boost::format(fmt) % arg1 % arg2).str();
597 string bformat(string const & fmt, int arg1, int arg2)
599 return (boost::format(fmt) % arg1 % arg2).str();
603 string bformat(string const & fmt, string const & arg1, string const & arg2,
606 return (boost::format(fmt) % arg1 % arg2 % arg3).str();
610 string bformat(string const & fmt, string const & arg1, string const & arg2,
611 string const & arg3, string const & arg4)
613 return (boost::format(fmt) % arg1 % arg2 % arg3 % arg4).str();
617 string bformat(string const & fmt, string const & arg1, string const & arg2,
618 string const & arg3, string const & arg4, string const & arg5)
620 return (boost::format(fmt) % arg1 % arg2 % arg3 % arg4 % arg5).str();
625 string bformat(string const & fmt, string const & arg1)
627 BOOST_ASSERT(contains(fmt, "%1$s"));
628 string const str = subst(fmt, "%1$s", arg1);
629 return subst(str, "%%", "%");
633 string bformat(string const & fmt, string const & arg1, string const & arg2)
635 BOOST_ASSERT(contains(fmt, "%1$s"));
636 BOOST_ASSERT(contains(fmt, "%2$s"));
637 string str = subst(fmt, "%1$s", arg1);
638 str = subst(str, "%2$s", arg2);
639 return subst(str, "%%", "%");
643 string bformat(string const & fmt, int arg1, int arg2)
645 BOOST_ASSERT(contains(fmt, "%1$d"));
646 BOOST_ASSERT(contains(fmt, "%2$d"));
647 string str = subst(fmt, "%1$d", tostr(arg1));
648 str = subst(str, "%2$d", tostr(arg2));
649 return subst(str, "%%", "%");
653 string bformat(string const & fmt, string const & arg1, string const & arg2,
656 BOOST_ASSERT(contains(fmt, "%1$s"));
657 BOOST_ASSERT(contains(fmt, "%2$s"));
658 BOOST_ASSERT(contains(fmt, "%3$s"));
659 string str = subst(fmt, "%1$s", arg1);
660 str = subst(str, "%2$s", arg2);
661 str = subst(str, "%3$s", arg3);
662 return subst(str, "%%", "%");
666 string bformat(string const & fmt, string const & arg1, string const & arg2,
667 string const & arg3, string const & arg4)
669 BOOST_ASSERT(contains(fmt, "%1$s"));
670 BOOST_ASSERT(contains(fmt, "%2$s"));
671 BOOST_ASSERT(contains(fmt, "%3$s"));
672 BOOST_ASSERT(contains(fmt, "%4$s"));
673 string str = subst(fmt, "%1$s", arg1);
674 str = subst(str, "%2$s", arg2);
675 str = subst(str, "%3$s", arg3);
676 str = subst(str, "%4$s", arg4);
677 return subst(str, "%%", "%");
681 string bformat(string const & fmt, string const & arg1, string const & arg2,
682 string const & arg3, string const & arg4, string const & arg5)
684 BOOST_ASSERT(contains(fmt, "%1$s"));
685 BOOST_ASSERT(contains(fmt, "%2$s"));
686 BOOST_ASSERT(contains(fmt, "%3$s"));
687 BOOST_ASSERT(contains(fmt, "%4$s"));
688 BOOST_ASSERT(contains(fmt, "%5$s"));
689 string str = subst(fmt, "%1$s", arg1);
690 str = subst(str, "%2$s", arg2);
691 str = subst(str, "%3$s", arg3);
692 str = subst(str, "%4$s", arg4);
693 str = subst(str, "%5$s", arg5);
694 return subst(str, "%%", "%");
699 } // namespace support