2 PROJECT: FlowerSoft C++ library
3 FILE : string-convert.cc
7 #include "string-convert.hh"
13 #include "libc-extension.hh"
14 #include "rational.hh"
15 #include "std-vector.hh"
18 A safe length for stringconversion buffers.
20 worst case would be %f printing HUGE (or 1/HUGE), which is approx
21 2e318, this number would have approx 318 zero's in its string.
23 Should enlarge buff dynamically.
28 static const int STRING_BUFFER_LEN = 1024;
31 String_convert::bool_string (bool b)
33 return string (b ? "true" : "false");
37 String_convert::bin2hex (string bin_string)
40 Byte const *byte = (Byte const*)bin_string.data ();
41 for (ssize i = 0; i < bin_string.length (); i++)
43 str += to_string ((char)nibble2hex_byte (*byte >> 4));
44 str += to_string ((char)nibble2hex_byte (*byte++));
50 String_convert::bin2int (string bin_string)
52 return bin2unsigned (bin_string);
56 String_convert::bin2unsigned (string bin_string)
58 assert (bin_string.length () <= (int)sizeof (unsigned));
60 unsigned result_u = 0;
61 for (ssize i = 0; i < bin_string.length (); i++)
64 result_u += (Byte)bin_string[ i ];
69 // breendet imp from string
71 String_convert::dec2int (string dec_string)
73 if (!dec_string.length ())
77 if (!sscanf (dec_string.c_str (), "%ld", &l))
84 String_convert::i64_string (I64 i64, char const *fmt)
86 char buffer[STRING_BUFFER_LEN];
87 snprintf (buffer, STRING_BUFFER_LEN,
88 (fmt ? fmt : "%Ld"), i64); // assume radix 10
89 return string (buffer);
91 // breendet imp from string
93 String_convert::dec2double (string dec_string)
95 if (!dec_string.length ())
99 if (!sscanf (dec_string.c_str (), "%lf", &d))
106 String_convert::hex2bin (string hex_string, string &bin_string_r)
108 if (hex_string.length () % 2)
109 hex_string = "0" + hex_string;
112 Byte const *byte = (Byte const*) hex_string.data ();
114 while (i < hex_string.length ())
116 int high_i = hex2nibble (*byte++);
117 int low_i = hex2nibble (*byte++);
118 if (high_i < 0 || low_i < 0)
119 return 1; // illegal char
120 bin_string_r += to_string ((char) (high_i << 4 | low_i), 1);
127 String_convert::hex2bin (string hex_string)
131 if (hex2bin (hex_string, str))
138 String_convert::hex2nibble (Byte byte)
140 if (byte >= '0' && byte <= '9')
142 if (byte >= 'A' && byte <= 'F')
143 return byte - 'A' + 10;
144 if (byte >= 'a' && byte <= 'f')
145 return byte - 'a' + 10;
149 // stupido. Should use int_string ()
151 String_convert::int2dec (int i, int length_i, char ch)
158 string dec_string = to_string (i);
161 return to_string (fill_char, length_i - dec_string.length ()) + dec_string;
164 // stupido. Should use int_string ()
166 String_convert::unsigned2hex (unsigned u, ssize length, char fill_char)
175 str = to_string ((char) ((u % 16)["0123456789abcdef"])) + str;
179 str += int_string (u, "%x"); // hmm. %lx vs. %x -> portability?
182 str = to_string (fill_char, length - str.length ()) + str;
183 while ((str.length () > length) && (str[ 0 ] == 'f'))
184 str = str.substr (2);
190 String_convert::int2hex (int i, int length_i, char fill_char)
192 return unsigned2hex ((unsigned)i, length_i, fill_char);
196 String_convert::nibble2hex_byte (Byte byte)
198 if ((byte & 0x0f) <= 9)
199 return (byte & 0x0f) + '0';
201 return (byte & 0x0f) - 10 + 'a';
204 Convert an integer to a string
207 #fmt# is a printf style format, default assumes "%d" as format.
210 String_convert::int_string (int i, char const *fmt)
212 char buffer[STRING_BUFFER_LEN];
213 snprintf (buffer, STRING_BUFFER_LEN,
214 (fmt ? fmt : "%d"), i); // assume radix 10
215 return string (buffer);
219 String_convert::form_string (char const *format, ...)
222 va_start (args, format);
223 char buffer[STRING_BUFFER_LEN];
224 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
226 return string (buffer);
230 String_convert::vform_string (char const *format, va_list args)
232 char buffer[STRING_BUFFER_LEN];
233 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
234 return string (buffer);
238 Convert a double to a string.
240 @param #fmt# is a printf style format, default assumes "%lf" as format
243 String_convert::double_string (double f, char const *fmt)
245 char buf[STRING_BUFFER_LEN];
247 snprintf (buf, STRING_BUFFER_LEN, fmt ? fmt : "%f", f);
252 Make a string from a single character.
255 #n# is a repetition count, default value is 1
258 String_convert::char_string (char c, int n)
261 char *ch = new char[ n ];
270 String_convert::rational_string (Rational r)
272 return r.to_string ();
276 String_convert::pointer_string (void const *l)
278 char buffer[STRING_BUFFER_LEN];
279 snprintf (buffer, STRING_BUFFER_LEN, "%p", l); // assume radix 10
280 return string (buffer);
284 Convert a double to a string.
287 #n# is the number of nonzero digits
290 String_convert::precision_string (double x, int n)
292 string format = "%." + to_string (max (0, n - 1)) + "e";
293 string str = double_string (abs (x), format.c_str ());
295 int exp = dec2int (str.substr (str.length () - 3));
296 str = str.substr (0, str.length () - 4);
298 while (str[str.length () - 1] == '0')
299 str = str.substr (0, str.length () - 1);
300 if (str[str.length () - 1] == '.')
301 str = str.substr (0, str.length () - 1);
304 return (sign (x) > 0 ? str : "-" + str);
306 str = str.substr (0, 1) + str.substr (2);
309 str = "0." + to_string ('0', -dot) + str;
310 else if (dot >= str.length ())
311 str += to_string ('0', dot - str.length ());
312 else if ((dot > 0) && (dot < str.length ()))
313 str = str.substr (0, dot) + "." + str.substr (dot);
317 return (sign (x) > 0 ? str : "-" + str);
322 String_convert::long_string (long l)
324 char s[STRING_BUFFER_LEN];
325 sprintf (s, "%ld", l);
330 String_convert::unsigned_string (unsigned u)
332 char s[STRING_BUFFER_LEN];
333 sprintf (s, "%u", u);
338 String_convert::pad_to (string s, int n)
340 return s + string (max (int(n - s.length ()), 0), ' ');
344 String_convert::to_upper (string s)
346 return strnupr ((char *)s.c_str (), s.length ());
350 String_convert::to_lower (string s)
352 return strnlwr ((char *)s.c_str (), s.length ());
356 String_convert::reverse (string s)
358 return (char*) memrev ((unsigned char *)s.data (), s.length ());