]> git.lyx.org Git - lyx.git/blobdiff - src/support/lstrings.C
various changes
[lyx.git] / src / support / lstrings.C
index efc8df4165953f2767c41a304fd70f3031589673..d4047936bd226729d2cb1ecc9809af9c074104e6 100644 (file)
@@ -1,5 +1,19 @@
+/* This file is part of
+ * ====================================================== 
+ * 
+ *           LyX, The Document Processor
+ *        
+ *           Copyright 1995 Matthias Ettrich
+ *           Copyright 1995-2001 The LyX Team.
+ *
+ * ====================================================== */
+
 #include <config.h>
 
+#ifdef __GNUG__
+#pragma implementation
+#endif
+
 #include <algorithm>
 
 #include <cctype>
 #include "LString.h"
 #include "lstrings.h"
 #include "LRegex.h"
+#include "LAssert.h"
 
 using std::count;
 using std::transform;
-#ifndef __GLIBCPP__
-// The new glibstdc++-v3 has not worked out all the quirks regarding cctype
-// yet. So currently it failes if the to using lines below are stated.
+
+#ifndef CXX_GLOBAL_CSTD
 using std::tolower;
 using std::toupper;
+using std::strlen;
 #endif
-       
+
+
 int compare_no_case(string const & s, string const & s2)
 {
-       // ANSI C
        string::const_iterator p = s.begin();
        string::const_iterator p2 = s2.begin();
 
@@ -32,7 +47,7 @@ int compare_no_case(string const & s, string const & s2)
                ++p;
                ++p2;
        }
-       
+
        if (s.size() == s2.size())
                return 0;
        if (s.size() < s2.size())
@@ -43,7 +58,6 @@ int compare_no_case(string const & s, string const & s2)
 
 int compare_no_case(string const & s, string const & s2, unsigned int len)
 {
-//#warning verify this func please
        string::const_iterator p = s.begin();
        string::const_iterator p2 = s2.begin();
        unsigned int i = 0;
@@ -56,7 +70,8 @@ int compare_no_case(string const & s, string const & s2, unsigned int len)
                ++p;
                ++p2;
        }
-       if (s.size() == s2.size())
+
+       if (s.size() >= len && s2.size() >= len)
                return 0;
        if (s.size() < s2.size())
                return -1;
@@ -69,71 +84,189 @@ bool isStrInt(string const & str)
        if (str.empty()) return false;
        
        // Remove leading and trailing white space chars.
-       string tmpstr = frontStrip(strip(str, ' '), ' ');
+       string const tmpstr = frontStrip(strip(str, ' '), ' ');
        if (tmpstr.empty()) return false;
        
        string::const_iterator cit = tmpstr.begin();
-       if ( (*cit) == '-') ++cit;
-       for (; cit != tmpstr.end(); ++cit) {
+       if ((*cit) == '-') ++cit;
+       string::const_iterator end = tmpstr.end();
+       for (; cit != end; ++cit) {
                if (!isdigit((*cit))) return false;
        }
        return true;
 }
 
 
-int  strToInt(string const & str)
+bool isStrUnsignedInt(string const & str)
 {
-       string tmpstr;
+       if (str.empty()) return false;
+       
+       // Remove leading and trailing white space chars.
+       string const tmpstr = frontStrip(strip(str, ' '), ' ');
+       if (tmpstr.empty()) return false;
+       
+       string::const_iterator cit = tmpstr.begin();
+       string::const_iterator end = tmpstr.end();
+       for (; cit != end; ++cit) {
+               if (!isdigit((*cit))) return false;
+       }
+       return true;
+}
+
 
+int strToInt(string const & str)
+{
        if (isStrInt(str)) {
                // Remove leading and trailing white space chars.
-               tmpstr = frontStrip(strip(str, ' '), ' ');
+               string const tmpstr = frontStrip(strip(str, ' '), ' ');
                // Do the conversion proper.
-               return atoi(tmpstr.c_str());
-       } else
+               return lyx::atoi(tmpstr);
+       } else {
                return 0;
+       }
 }
 
 
-string lowercase(string const & a)
+unsigned int strToUnsignedInt(string const & str)
 {
-       string tmp(a);
-//#ifdef __GLIBCPP__
-       string::iterator result = tmp.begin();
-       for (string::iterator first = tmp.begin();
-            first != tmp.end(); ++first, ++result) {
-               *result = tolower(*first);
+       if (isStrUnsignedInt(str)) {
+               // Remove leading and trailing white space chars.
+               string const tmpstr = frontStrip(strip(str, ' '), ' ');
+               // Do the conversion proper.
+               return lyx::atoi(tmpstr);
+       } else {
+               return 0;
        }
-//#else
-//     transform(tmp.begin(), tmp.end(), tmp.begin(), tolower);
-//#endif
-       return tmp;
 }
 
 
-string uppercase(string const & a)
+bool isStrDbl(string const & str)
 {
-       string tmp(a);
-//#ifdef __GLIBCPP__
-       string::iterator result = tmp.begin();
-       for (string::iterator first = tmp.begin();
-            first != tmp.end(); ++first, ++result) {
-               *result = toupper(*first);
+       if (str.empty()) return false;
+       
+       // Remove leading and trailing white space chars.
+       string const tmpstr = frontStrip(strip(str, ' '), ' ');
+       if (tmpstr.empty()) return false;
+       //      if (1 < tmpstr.count('.')) return false;
+
+       string::const_iterator cit = tmpstr.begin();
+       bool found_dot(false);
+       if ((*cit) == '-') ++cit;
+       string::const_iterator end = tmpstr.end();
+       for (; cit != end; ++cit) {
+               if (!isdigit((*cit))
+                   && '.' != (*cit)) {
+                       return false;
+               }
+               if ('.' == (*cit)) {
+                       if (found_dot) {
+                               return false;
+                       } else {
+                               found_dot = true;
+                       }
+               }
+       }
+       return true;
+}
+
+
+double strToDbl(string const & str)
+{
+       if (isStrDbl(str)) {
+               // Remove leading and trailing white space chars.
+               string const tmpstr = frontStrip(strip(str, ' '), ' ');
+               // Do the conversion proper.
+               return ::atof(tmpstr.c_str());
+       } else {
+               return 0.0;
+       }
+}
+
+
+char lowercase(char c) 
+{ 
+       return char( tolower(c) ); 
+}
+
+
+char uppercase(char c) 
+{ 
+       return char( toupper(c) ); 
+}
+
+
+namespace {
+
+// since we cannot use std::tolower and std::toupper directly in the
+// calls to std::transform yet, we use these helper clases. (Lgb)
+
+struct local_lowercase {
+       char operator()(char c) const {
+               return tolower(c);
        }
-//#else
-//     transform(tmp.begin(), tmp.end(), tmp.begin(), toupper);
-//#endif
+};
+       
+struct local_uppercase {
+       char operator()(char c) const {
+               return toupper(c);
+       }
+};
+
+} // end of anon namespace
+
+string const lowercase(string const & a)
+{
+       string tmp(a);
+       transform(tmp.begin(), tmp.end(), tmp.begin(), local_lowercase());
+       return tmp;
+}
+
+string const uppercase(string const & a)
+{
+       string tmp(a);
+       transform(tmp.begin(), tmp.end(), tmp.begin(), local_uppercase());
        return tmp;
 }
 
 
 bool prefixIs(string const & a, char const * pre)
 {
-       unsigned int l = strlen(pre);
-       if (l > a.length() || a.empty())
+       lyx::Assert(pre);
+       
+       size_t const l = strlen(pre);
+       string::size_type const alen = a.length();
+       
+       if (l > alen || a.empty())
                return false;
-       else
+       else {
+#if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
+               // Delete this code when the compilers get a bit better.
+               return ::strncmp(a.c_str(), pre, l) == 0;
+#else
+               // This is the code that we really want to use
+               // but until gcc ships with a basic_string that
+               // implements std::string correctly we have to
+               // use the code above.
                return a.compare(0, l, pre, l) == 0;
+#endif
+       }
+}
+
+
+bool prefixIs(string const & a, string const & pre)
+{
+       string::size_type const prelen = pre.length();
+       string::size_type const alen = a.length();
+       
+       if (prelen > alen || a.empty())
+               return false;
+       else {
+#if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
+               return ::strncmp(a.c_str(), pre.c_str(), prelen) == 0;
+#else
+               return a.compare(0, prelen, pre) == 0;
+#endif
+       }
 }
 
 
@@ -146,23 +279,64 @@ bool suffixIs(string const & a, char c)
 
 bool suffixIs(string const & a, char const * suf)
 {
-       unsigned int suflen = strlen(suf);
-       if (suflen > a.length())
+       lyx::Assert(suf);
+       
+       size_t const suflen = strlen(suf);
+       string::size_type const alen = a.length();
+       
+       if (suflen > alen)
                return false;
        else {
-               return a.compare(a.length() - suflen, suflen, suf) == 0;
+#if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
+               // Delete this code when the compilers get a bit better.
+               string tmp(a, alen - suflen);
+               return ::strncmp(tmp.c_str(), suf, suflen) == 0;
+#else
+               // This is the code that we really want to use
+               // but until gcc ships with a basic_string that
+               // implements std::string correctly we have to
+               // use the code above.
+               return a.compare(alen - suflen, suflen, suf) == 0;
+#endif
+       }
+}
+
+
+bool suffixIs(string const & a, string const & suf)
+{
+       string::size_type const suflen = suf.length();
+       string::size_type const alen = a.length();
+       
+       if (suflen > alen) {
+               return false;
+       } else {
+#if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
+               string tmp(a, alen - suflen);
+               return ::strncmp(tmp.c_str(), suf.c_str(), suflen) == 0;
+#else
+               return a.compare(alen - suflen, suflen, suf) == 0;
+#endif
        }
 }
 
 
 bool contains(char const * a, string const & b)
 {
-       if (!a || !*a || b.empty()) return false;
-       return strstr(a, b.c_str()) != 0;
+       lyx::Assert(a);
+       string const at(a);
+       return contains(at, b);
 }
 
 
 bool contains(string const & a, char const * b)
+{
+       lyx::Assert(b);
+       string const bt(b);
+       return contains(a, bt);
+}
+
+
+bool contains(string const & a, string const & b)
 {
        if (a.empty())
                return false;
@@ -170,7 +344,7 @@ bool contains(string const & a, char const * b)
 }
 
 
-bool contains(string const & a, string const & b)
+bool contains(string const & a, char b)
 {
        if (a.empty())
                return false;
@@ -180,12 +354,44 @@ bool contains(string const & a, string const & b)
 
 bool contains(char const * a, char const * b)
 {
-       if (!a || !b || !*a || !*b) return false;
-       return strstr(a, b) != 0;
+       lyx::Assert(a && b);
+       string const at(a);
+       string const bt(b);
+       return contains(at, bt);
 }
 
 
-unsigned int countChar(string const & a, char const c)
+bool containsOnly(string const & s, char const * cset)
+{
+       lyx::Assert(cset);
+       
+       return s.find_first_not_of(cset) == string::npos;
+}
+
+
+bool containsOnly(string const & s, string const & cset)
+{
+       return s.find_first_not_of(cset) == string::npos;
+}
+
+
+bool containsOnly(char const * s, char const * cset)
+{
+       lyx::Assert(s && cset);
+       
+       return string(s).find_first_not_of(cset) == string::npos;
+}
+
+
+bool containsOnly(char const * s, string const & cset)
+{
+       lyx::Assert(s);
+       
+       return string(s).find_first_not_of(cset) == string::npos;
+}
+
+
+string::size_type countChar(string const & a, char c)
 {
 #ifdef HAVE_STD_COUNT
        return count(a.begin(), a.end(), c);
@@ -199,7 +405,7 @@ unsigned int countChar(string const & a, char const c)
 
 // ale970405+lasgoutt-970425
 // rewritten to use new string (Lgb)
-string token(string const & a, char delim, int n)
+string const token(string const & a, char delim, int n)
 {
        if (a.empty()) return string();
        
@@ -226,7 +432,7 @@ string token(string const & a, char delim, int n)
 int tokenPos(string const & a, char delim, string const & tok)
 {
        int i = 0;
-       string str = a;
+       string str(a);
        string tmptok;
 
        while (!str.empty()) {
@@ -254,23 +460,41 @@ bool regexMatch(string const & a, string const & pattern)
 }
 
 
-string subst(string const & a, char oldchar, char newchar)
+string const subst(string const & a, char oldchar, char newchar)
 {
-       string tmp = a;
+       string tmp(a);
        string::iterator lit = tmp.begin();
-       for(; lit != tmp.end(); ++lit)
+       string::iterator end = tmp.end();
+       for (; lit != end; ++lit)
                if ((*lit) == oldchar)
                        (*lit) = newchar;
        return tmp;
 }
 
 
-string subst(string const & a,
-            char const * oldstr, string const & newstr)
+string const subst(string const & a,
+                  char const * oldstr, string const & newstr)
+{
+       lyx::Assert(oldstr);
+       
+       string lstr(a);
+       string::size_type i = 0;
+       string::size_type olen = strlen(oldstr);
+       while((i = lstr.find(oldstr, i)) != string::npos) {
+               lstr.replace(i, olen, newstr);
+               i += newstr.length(); // We need to be sure that we dont
+               // use the same i over and over again.
+       }
+       return lstr;
+}
+
+
+string const subst(string const & a,
+                  string const & oldstr, string const & newstr)
 {
        string lstr(a);
        string::size_type i = 0;
-       int olen = strlen(oldstr);
+       string::size_type const olen = oldstr.length();
        while((i = lstr.find(oldstr, i)) != string::npos) {
                lstr.replace(i, olen, newstr);
                i += newstr.length(); // We need to be sure that we dont
@@ -280,24 +504,33 @@ string subst(string const & a,
 }
 
 
-string strip(string const & a, char const c)
+string const strip(string const & a, char c)
 {
        if (a.empty()) return a;
-       string tmp = a;
+       string tmp(a);
        string::size_type i = tmp.find_last_not_of(c);
        if (i == a.length() - 1) return tmp; // no c's at end of a
        if (i != string::npos) 
                tmp.erase(i + 1, string::npos);
+#if !defined(USE_INCLUDED_STRING) && !defined(STD_STRING_IS_GOOD)
+       /// Needed for broken string::find_last_not_of
+       else if (tmp[0] != c) {
+               if (a.length() == 1) return tmp;
+               tmp.erase(1, string::npos);
+       }
+#endif
        else
-               tmp.clear(); // only c in the whole string
+               tmp.erase(); // only c in the whole string
        return tmp;
 }
 
 
-string frontStrip(string const & a, char const * p)
+string const frontStrip(string const & a, char const * p)
 {
-       if (a.empty() || !p || !*p) return a;
-       string tmp = a;
+       lyx::Assert(p);
+       
+       if (a.empty() || !*p) return a;
+       string tmp(a);
        string::size_type i = tmp.find_first_not_of(p);
        if (i > 0)
                tmp.erase(0, i);
@@ -305,10 +538,10 @@ string frontStrip(string const & a, char const * p)
 }
 
 
-string frontStrip(string const & a, char const c)
+string const frontStrip(string const & a, char c)
 {
        if (a.empty()) return a;
-       string tmp = a;
+       string tmp(a);
        string::size_type i = tmp.find_first_not_of(c);
        if (i > 0)
                tmp.erase(0, i);
@@ -316,7 +549,7 @@ string frontStrip(string const & a, char const c)
 }
 
 
-string split(string const & a, string & piece, char delim)
+string const split(string const & a, string & piece, char delim)
 {
        string tmp;
        string::size_type i = a.find(delim);
@@ -326,7 +559,7 @@ string split(string const & a, string & piece, char delim)
                piece = a.substr(0, i);
                tmp = a.substr(i + 1);
        } else if (i == 0) {
-               piece.clear();
+               piece.erase();
                tmp = a.substr(i + 1);
        } else {
                piece = a;
@@ -335,7 +568,7 @@ string split(string const & a, string & piece, char delim)
 }
 
 
-string split(string const & a, char delim)
+string const split(string const & a, char delim)
 {
        string tmp;
        string::size_type i = a.find(delim);
@@ -346,7 +579,7 @@ string split(string const & a, char delim)
 
 
 // ale970521
-string rsplit(string const & a, string & piece, char delim)
+string const rsplit(string const & a, string & piece, char delim)
 {
        string tmp;
        string::size_type i = a.rfind(delim);
@@ -354,7 +587,7 @@ string rsplit(string const & a, string & piece, char delim)
                piece = a.substr(0, i);
                tmp = a.substr(i + 1);
        } else { // delimter was not found
-               piece.clear();
+               piece.erase();
        }
        return tmp;
 }