2 PROJECT: FlowerSoft C++ library
3 FILE : string-convert.cc
7 #include "string-convert.hh"
12 #include "libc-extension.hh"
13 #include "rational.hh"
14 #include "std-vector.hh"
19 A safe length for stringconversion buffers.
21 worst case would be %f printing HUGE (or 1/HUGE), which is approx
22 2e318, this number would have approx 318 zero's in its string.
24 Should enlarge buff dynamically.
29 static const int STRING_BUFFER_LEN = 1024;
32 String_convert::bool_string (bool b)
34 return string (b ? "true" : "false");
38 String_convert::bin2hex (Byte bin_char)
41 str += ::to_string ((char) nibble2hex_byte ((Byte) (bin_char >> 4)));
42 str += ::to_string ((char) nibble2hex_byte (bin_char++));
47 String_convert::bin2hex (const string &bin_string)
50 Byte const *byte = (Byte const *)bin_string.data ();
51 for (ssize i = 0; i < bin_string.length (); i++)
53 str += ::to_string ((char)nibble2hex_byte ((Byte) (*byte >> 4)));
54 str += ::to_string ((char)nibble2hex_byte (*byte++));
60 String_convert::bin2int (const string &bin_string)
62 return bin2unsigned (bin_string);
66 String_convert::bin2unsigned (const string &bin_string)
68 assert (bin_string.length () <= (int)sizeof (unsigned));
70 unsigned result_u = 0;
71 for (ssize i = 0; i < bin_string.length (); i++)
74 result_u += (Byte)bin_string[ i ];
80 String_convert::dec2int (const string &dec_string)
82 if (!dec_string.length ())
86 if (!sscanf (dec_string.c_str (), "%ld", &l))
93 String_convert::i64_string (I64 i64, char const *fmt)
95 char buffer[STRING_BUFFER_LEN];
96 snprintf (buffer, STRING_BUFFER_LEN,
97 (fmt ? fmt : "%Ld"), i64); // assume radix 10
98 return string (buffer);
100 // breendet imp from string
102 String_convert::dec2double (const string &dec_string)
104 if (!dec_string.length ())
108 if (!sscanf (dec_string.c_str (), "%lf", &d))
115 String_convert::hex2bin (string hex_string, string &bin_string_r)
117 if (hex_string.length () % 2)
118 hex_string = "0" + hex_string;
121 Byte const *byte = (Byte const *) hex_string.data ();
123 while (i < hex_string.length ())
125 int high_i = hex2nibble (*byte++);
126 int low_i = hex2nibble (*byte++);
127 if (high_i < 0 || low_i < 0)
128 return 1; // invalid char
129 bin_string_r += ::to_string ((char) (high_i << 4 | low_i), 1);
136 String_convert::hex2bin (const string &hex_string)
140 if (hex2bin (hex_string, str))
147 String_convert::hex2nibble (Byte byte)
149 if (byte >= '0' && byte <= '9')
151 if (byte >= 'A' && byte <= 'F')
152 return byte - 'A' + 10;
153 if (byte >= 'a' && byte <= 'f')
154 return byte - 'a' + 10;
158 // stupido. Should use int_string ()
160 String_convert::int2dec (int i, size_t length_i, char ch)
167 string dec_string = ::to_string (i);
170 return ::to_string (fill_char, ssize_t (length_i - dec_string.length ())) + dec_string;
173 // stupido. Should use int_string ()
175 String_convert::unsigned2hex (unsigned u, size_t length, char fill_char)
184 str = ::to_string ((char) ((u % 16)["0123456789abcdef"])) + str;
188 str += int_string (u, "%x"); // hmm. %lx vs. %x -> portability?
191 str = ::to_string (fill_char, ssize_t (length - str.length ())) + str;
192 while ((str.length () > length) && (str[ 0 ] == 'f'))
193 str = str.substr (2);
199 String_convert::int2hex (int i, size_t length_i, char fill_char)
201 return unsigned2hex ((unsigned)i, length_i, fill_char);
205 String_convert::nibble2hex_byte (Byte byte)
207 if ((byte & 0x0f) <= 9)
208 return (Byte) ((byte & 0x0f) + '0');
210 return (Byte) ((byte & 0x0f) - 10 + 'a');
213 Convert an integer to a string
216 #fmt# is a printf style format, default assumes "%d" as format.
219 String_convert::int_string (int i, char const *fmt)
221 char buffer[STRING_BUFFER_LEN];
222 snprintf (buffer, STRING_BUFFER_LEN,
223 (fmt ? fmt : "%d"), i); // assume radix 10
224 return string (buffer);
228 String_convert::form_string (char const *format, ...)
231 va_start (args, format);
232 char buffer[STRING_BUFFER_LEN];
233 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
235 return string (buffer);
239 String_convert::vform_string (char const *format, va_list args)
241 char buffer[STRING_BUFFER_LEN];
242 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
243 return string (buffer);
247 Convert a double to a string.
249 @param #fmt# is a printf style format, default assumes "%lf" as format
252 String_convert::double_string (double f, char const *fmt)
254 char buf[STRING_BUFFER_LEN];
256 snprintf (buf, STRING_BUFFER_LEN, fmt ? fmt : "%f", f);
261 Make a string from a single character.
264 #n# is a repetition count, default value is 1
267 String_convert::char_string (char c, int n)
270 char *ch = new char[ n ];
279 String_convert::rational_string (Rational r)
281 return r.to_string ();
285 String_convert::pointer_string (void const *l)
287 char buffer[STRING_BUFFER_LEN];
288 snprintf (buffer, STRING_BUFFER_LEN, "%p", l); // assume radix 10
289 return string (buffer);
293 Convert a double to a string.
296 #n# is the number of nonzero digits
299 String_convert::precision_string (double x, int n)
301 string format = "%." + ::to_string (std::max (0, n - 1)) + "e";
302 string str = double_string (abs (x), format.c_str ());
304 int exp = dec2int (str.substr (str.length () - 3));
305 str = str.substr (0, str.length () - 4);
307 while (str[str.length () - 1] == '0')
308 str = str.substr (0, str.length () - 1);
309 if (str[str.length () - 1] == '.')
310 str = str.substr (0, str.length () - 1);
313 return (sign (x) > 0 ? str : "-" + str);
315 str = str.substr (0, 1) + str.substr (2);
318 str = "0." + ::to_string ('0', -dot) + str;
319 else if (dot >= str.length ())
320 str += ::to_string ('0', dot - str.length ());
321 else if ((dot > 0) && (dot < str.length ()))
322 str = str.substr (0, dot) + "." + str.substr (dot);
326 return (sign (x) > 0 ? str : "-" + str);
330 String_convert::long_string (long l)
332 char s[STRING_BUFFER_LEN];
333 sprintf (s, "%ld", l);
338 String_convert::unsigned_string (unsigned u)
340 char s[STRING_BUFFER_LEN];
341 sprintf (s, "%u", u);
346 String_convert::unsigned_long_string (unsigned long ul)
348 char s[STRING_BUFFER_LEN];
349 sprintf (s, "%lu", ul);
354 String_convert::pad_to (const string &s, size_t n)
356 return s + string (std::max (int (n - s.length ()), 0), ' ');
360 String_convert::to_upper (string s)
362 return strnupr (const_cast<char*>(s.c_str ()), s.length ());
366 String_convert::to_lower (string s)
368 return strnlwr (const_cast<char*>(s.c_str ()), s.length ());
372 String_convert::reverse (string s)
374 return (char *) memrev ((unsigned char *)s.data (), s.length ());