Merge with master

[lilypond.git] / flower / string-convert.cc

diff --git a/flower/string-convert.cc b/flower/string-convert.cc
index 5f74cc9fa6b8d87e7a12137872f2ad6be191c084..6a6dbc6d7c655882d9ec18f1415b5dc9d5a6d1d0 100644 (file)
--- a/flower/string-convert.cc
+++ b/flower/string-convert.cc
@@ -12,7 +12,7 @@ using namespace std;
 
 #include "libc-extension.hh"
 #include "rational.hh"
-#include "array.hh"
+#include "std-vector.hh"
 
 /**
    A safe length for stringconversion buffers.
@@ -27,16 +27,16 @@ using namespace std;
 */
 static const int STRING_BUFFER_LEN = 1024;
 
-Std_string
+string
 String_convert::bool_string (bool b)
 {
-  return Std_string (b ? "true" : "false");
+  return string (b ? "true" : "false");
 }
 
-Std_string
-String_convert::bin2hex (Std_string bin_string)
+string
+String_convert::bin2hex (string bin_string)
 {
-  Std_string str;
+  string str;
   Byte const *byte = (Byte const*)bin_string.data ();
   for (ssize i = 0; i < bin_string.length (); i++)
     {
@@ -47,13 +47,13 @@ String_convert::bin2hex (Std_string bin_string)
 }
 
 int
-String_convert::bin2int (Std_string bin_string)
+String_convert::bin2int (string bin_string)
 {
   return bin2unsigned (bin_string);
 }
 
 unsigned
-String_convert::bin2unsigned (Std_string bin_string)
+String_convert::bin2unsigned (string bin_string)
 {
   assert (bin_string.length () <= (int)sizeof (unsigned));
 
@@ -66,42 +66,45 @@ String_convert::bin2unsigned (Std_string bin_string)
   return result_u;
 }
 
-// breendet imp from Std_string
 int
-String_convert::dec2int (Std_string dec_string)
+String_convert::dec2int (string dec_string)
 {
   if (!dec_string.length ())
     return 0;
 
   long l = 0;
-  int conv = sscanf (dec_string.c_str (), "%ld", &l);
-  assert (conv);
+  if (!sscanf (dec_string.c_str (), "%ld", &l))
+    assert (false);
 
+  assert (form_string ("%ld", l) == dec_string);
+  
   return (int)l;
 }
 
-Std_string
+string
 String_convert::i64_string (I64 i64, char const *fmt)
 {
   char buffer[STRING_BUFFER_LEN];
   snprintf (buffer, STRING_BUFFER_LEN,
            (fmt ? fmt : "%Ld"), i64); // assume radix 10
-  return Std_string (buffer);
+  return string (buffer);
 }
-// breendet imp from Std_string
+// breendet imp from string
 double
-String_convert::dec2double (Std_string dec_string)
+String_convert::dec2double (string dec_string)
 {
   if (!dec_string.length ())
     return 0;
-  double d = 0;
-  int conv = sscanf (dec_string.c_str (), "%lf", &d);
-  assert (conv);
+  
+  double d = 0.0;
+  if (!sscanf (dec_string.c_str (), "%lf", &d))
+    assert (false);
+  
   return d;
 }
 
 int
-String_convert::hex2bin (Std_string hex_string, Std_string &bin_string_r)
+String_convert::hex2bin (string hex_string, string &bin_string_r)
 {
   if (hex_string.length () % 2)
     hex_string = "0" + hex_string;
@@ -121,14 +124,14 @@ String_convert::hex2bin (Std_string hex_string, Std_string &bin_string_r)
   return 0;
 }
 
-Std_string
-String_convert::hex2bin (Std_string hex_string)
+string
+String_convert::hex2bin (string hex_string)
 {
-  Std_string str;
-  //  silly, asserts should alway be "on"!
-  //    assert (!hex2bin (hex_string, str) );
-  int error_i = hex2bin (hex_string, str);
-  assert (!error_i);
+  string str;
+
+  if (hex2bin (hex_string, str))
+    assert (false);
+  
   return str;
 }
 
@@ -145,7 +148,7 @@ String_convert::hex2nibble (Byte byte)
 }
 
 // stupido.  Should use int_string ()
-Std_string
+string
 String_convert::int2dec (int i, int length_i, char ch)
 {
   char fill_char = ch;
@@ -153,17 +156,17 @@ String_convert::int2dec (int i, int length_i, char ch)
     fill_char = '0';
 
   // ugh
-  Std_string dec_string = to_string (i);
+  string dec_string = to_string (i);
 
   // ugh
   return to_string (fill_char, length_i - dec_string.length ()) + dec_string;
 }
 
 // stupido.  Should use int_string ()
-Std_string
+string
 String_convert::unsigned2hex (unsigned u, ssize length, char fill_char)
 {
-  Std_string str;
+  string str;
   if (!u)
     str = "0";
 
@@ -184,7 +187,7 @@ String_convert::unsigned2hex (unsigned u, ssize length, char fill_char)
   return str;
 }
 
-Std_string
+string
 String_convert::int2hex (int i, int length_i, char fill_char)
 {
   return unsigned2hex ((unsigned)i, length_i, fill_char);
@@ -204,16 +207,16 @@ String_convert::nibble2hex_byte (Byte byte)
    @param
    #fmt# is a printf style format, default assumes "%d" as format.
 */
-Std_string
+string
 String_convert::int_string (int i, char const *fmt)
 {
   char buffer[STRING_BUFFER_LEN];
   snprintf (buffer, STRING_BUFFER_LEN,
            (fmt ? fmt : "%d"), i); // assume radix 10
-  return Std_string (buffer);
+  return string (buffer);
 }
 
-Std_string
+string
 String_convert::form_string (char const *format, ...)
 {
   va_list args;
@@ -221,15 +224,15 @@ String_convert::form_string (char const *format, ...)
   char buffer[STRING_BUFFER_LEN];
   vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
   va_end (args);
-  return Std_string (buffer);
+  return string (buffer);
 }
 
-Std_string
+string
 String_convert::vform_string (char const *format, va_list args)
 {
   char buffer[STRING_BUFFER_LEN];
   vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
-  return Std_string (buffer);
+  return string (buffer);
 }
 
 /**
@@ -237,13 +240,13 @@ String_convert::vform_string (char const *format, va_list args)
 
    @param #fmt# is a printf style format, default assumes "%lf" as format
 */
-Std_string
+string
 String_convert::double_string (double f, char const *fmt)
 {
   char buf[STRING_BUFFER_LEN];
 
   snprintf (buf, STRING_BUFFER_LEN, fmt ? fmt : "%f", f);
-  return Std_string (buf);
+  return string (buf);
 }
 
 /**
@@ -252,33 +255,30 @@ String_convert::double_string (double f, char const *fmt)
    @param
    #n# is a repetition count, default value is 1
 */
-Std_string
+string
 String_convert::char_string (char c, int n)
 {
   n = n >= 0 ? n : 0;
   char *ch = new char[ n ];
   memset (ch, c, n);
-#if STD_STRING
-  Std_string s (ch, n);
-#else
-  Std_string s ((Byte*) ch, n);
-#endif
+  string s (ch, n);
+  
   delete[] ch;
   return s;
 }
 
-Std_string
+string
 String_convert::rational_string (Rational r)
 {
   return r.to_string ();
 }
 
-Std_string
+string
 String_convert::pointer_string (void const *l)
 {
   char buffer[STRING_BUFFER_LEN];
   snprintf (buffer, STRING_BUFFER_LEN, "%p", l); // assume radix 10
-  return Std_string (buffer);
+  return string (buffer);
 }
 
 /**
@@ -287,11 +287,11 @@ String_convert::pointer_string (void const *l)
    @param
    #n# is the number of nonzero digits
 */
-Std_string
+string
 String_convert::precision_string (double x, int n)
 {
-  Std_string format = "%." + to_string (max (0, n - 1)) + "e";
-  Std_string str = double_string (abs (x), format.c_str ());
+  string format = "%." + to_string (max (0, n - 1)) + "e";
+  string str = double_string (abs (x), format.c_str ());
 
   int exp = dec2int (str.substr (str.length () - 3));
   str = str.substr (0, str.length () - 4);
@@ -318,26 +318,8 @@ String_convert::precision_string (double x, int n)
   return (sign (x) > 0 ? str : "-" + str);
 }
 
-Array<Std_string>
-String_convert::split (Std_string str, char c)
-{
-  Array<Std_string> a;
-  ssize i = str.find (c);
-  while (i != NPOS)
-    {
-      Std_string s = str.substr (0, i);
-      a.push (s);
-      while (str[++i] == c)
-       ;
-      str = str.substr (i);
-      i = str.find (c);
-    }
-  if (str.length ())
-    a.push (str);
-  return a;
-}
 
-Std_string
+string
 String_convert::long_string (long l)
 {
   char s[STRING_BUFFER_LEN];
@@ -345,8 +327,34 @@ String_convert::long_string (long l)
   return s;
 }
 
-Std_string
-String_convert::pad_to (Std_string s, int n)
+string
+String_convert::unsigned_string (unsigned u)
+{
+  char s[STRING_BUFFER_LEN];
+  sprintf (s, "%u", u);
+  return s;
+}
+
+string
+String_convert::pad_to (string s, int n)
+{
+  return s + string (max (int(n - s.length ()), 0), ' ');
+}
+
+string
+String_convert::to_upper (string s)
+{
+  return strnupr ((char *)s.c_str (), s.length ());
+}
+
+string
+String_convert::to_lower (string s)
+{
+  return strnlwr ((char *)s.c_str (), s.length ());
+}
+
+string
+String_convert::reverse (string s)
 {
-  return s + Std_string (max (int(n - s.length ()), 0), ' ');
+  return (char*) memrev ((unsigned char *)s.data (), s.length ());
 }