+String_convert::nibble2hex_byte (Byte byte)
+{
+ if ((byte & 0x0f) <= 9)
+ return (byte & 0x0f) + '0';
+ else
+ return (byte & 0x0f) - 10 + 'a';
+}
+/**
+ Convert an integer to a string
+
+ @param
+ #fmt# is a printf style format, default assumes "%d" as format.
+*/
+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 string (buffer);
+}
+
+string
+String_convert::form_string (char const *format, ...)
+{
+ va_list args;
+ va_start (args, format);
+ char buffer[STRING_BUFFER_LEN];
+ vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
+ va_end (args);
+ return string (buffer);
+}
+
+string
+String_convert::vform_string (char const *format, va_list args)
+{
+ char buffer[STRING_BUFFER_LEN];
+ vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
+ return string (buffer);
+}
+
+/**
+ Convert a double to a string.
+
+ @param #fmt# is a printf style format, default assumes "%lf" as format
+*/
+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 string (buf);
+}
+
+/**
+ Make a string from a single character.
+
+ @param
+ #n# is a repetition count, default value is 1
+*/
+string
+String_convert::char_string (char c, int n)
+{
+ n = n >= 0 ? n : 0;
+ char *ch = new char[ n ];
+ memset (ch, c, n);
+ string s (ch, n);
+
+ delete[] ch;
+ return s;
+}
+
+string
+String_convert::rational_string (Rational r)
+{
+ return r.to_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 string (buffer);
+}
+
+/**
+ Convert a double to a string.
+
+ @param
+ #n# is the number of nonzero digits
+*/
+string
+String_convert::precision_string (double x, int n)
+{
+ 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);
+
+ while (str[str.length () - 1] == '0')
+ str = str.substr (0, str.length () - 1);
+ if (str[str.length () - 1] == '.')
+ str = str.substr (0, str.length () - 1);
+
+ if (exp == 0)
+ return (sign (x) > 0 ? str : "-" + str);
+
+ str = str.substr (0, 1) + str.substr (2);
+ ssize dot = 1 + exp;
+ if (dot <= 0)
+ str = "0." + to_string ('0', -dot) + str;
+ else if (dot >= str.length ())
+ str += to_string ('0', dot - str.length ());
+ else if ((dot > 0) && (dot < str.length ()))
+ str = str.substr (0, dot) + "." + str.substr (dot);
+ else
+ assert (0);
+
+ return (sign (x) > 0 ? str : "-" + str);
+}
+
+
+string
+String_convert::long_string (long l)
+{
+ char s[STRING_BUFFER_LEN];
+ sprintf (s, "%ld", l);
+ return s;
+}
+
+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)