2 PROJECT: FlowerSoft C++ library
3 FILE : string-convert.cc
7 #include "string-convert.hh"
12 #include "libc-extension.hh"
13 #include "rational.hh"
17 A safe length for stringconversion buffers.
19 worst case would be %f printing HUGE (or 1/HUGE), which is approx
20 2e318, this number would have approx 318 zero's in its string.
22 Should enlarge buff dynamically.
27 static const int STRING_BUFFER_LEN=1024;
30 String_convert::bool_string (bool b)
32 return String (b ? "true" : "false");
36 String_convert::bin2hex (String bin_string)
39 Byte const* byte = bin_string.to_bytes ();
40 for (int i = 0; i < bin_string.length (); i++)
42 str += to_string ((char)nibble2hex_byte (*byte >> 4));
43 str += to_string ((char)nibble2hex_byte (*byte++));
49 String_convert::bin2int (String bin_string)
51 return bin2unsigned (bin_string);
55 String_convert::bin2unsigned (String bin_string)
57 assert (bin_string.length () <= (int)sizeof (unsigned));
59 unsigned result_u = 0;
60 for (int i = 0; i < bin_string.length (); i++)
63 result_u += (Byte)bin_string[ i ];
68 // breendet imp from String
70 String_convert::dec2int (String dec_string)
72 if (!dec_string.length ())
76 int conv = sscanf (dec_string.to_str0 (), "%ld", &l);
83 String_convert::i64_string (I64 i64, char const* fmt)
85 char buffer[STRING_BUFFER_LEN];
86 snprintf (buffer, STRING_BUFFER_LEN,
87 (fmt ? fmt : "%Ld"), i64); // assume radix 10
88 return String (buffer);
91 // breendet imp from String
93 String_convert::dec2double (String dec_string)
95 if (!dec_string.length ())
98 int conv = sscanf (dec_string.to_str0 (), "%lf", &d);
104 String_convert::hex2bin (String hex_string, String& bin_string_r)
106 if (hex_string.length () % 2)
107 hex_string = "0" + hex_string;
110 Byte const* byte= hex_string.to_bytes ();
112 while (i < hex_string.length ())
114 int high_i = hex2nibble (*byte++);
115 int low_i = hex2nibble (*byte++);
116 if (high_i < 0 || low_i < 0)
117 return 1; // illegal char
118 bin_string_r += to_string ((char) (high_i << 4 | low_i), 1 );
125 String_convert::hex2bin (String hex_string)
128 // silly, asserts should alway be "on"!
129 // assert (!hex2bin (hex_string, str) );
130 int error_i = hex2bin (hex_string, str);
136 String_convert::hex2nibble (Byte byte)
138 if (byte >= '0' && byte <= '9')
140 if (byte >= 'A' && byte <= 'F')
141 return byte - 'A' + 10;
142 if (byte >= 'a' && byte <= 'f')
143 return byte - 'a' + 10;
147 // stupido. Should use int_string ()
149 String_convert::int2dec (int i, int length_i, char ch)
156 String dec_string = to_string (i);
159 return to_string (fill_char, length_i - dec_string.length ()) + dec_string;
163 // stupido. Should use int_string ()
165 String_convert::unsigned2hex (unsigned u, int length_i, char fill_char)
174 str = to_string ((char) ((u % 16)["0123456789abcdef"] ) ) + str;
178 str += int_string (u, "%x"); // hmm. %lx vs. %x -> portability?
181 str = to_string (fill_char, length_i - str.length ()) + str;
182 while ((str.length () > length_i) && (str[ 0 ] == 'f' ) )
183 str = str.cut_string (2, INT_MAX);
189 String_convert::int2hex (int i, int length_i, char fill_char)
191 return unsigned2hex ((unsigned)i, length_i, fill_char);
195 String_convert::nibble2hex_byte (Byte byte)
197 if ((byte & 0x0f) <= 9 )
198 return (byte & 0x0f) + '0';
200 return (byte & 0x0f) - 10 + 'a';
203 Convert an integer to a string
206 #fmt# is a printf style format, default assumes "%d" as format.
209 String_convert::int_string (int i, char const* fmt)
211 char buffer[STRING_BUFFER_LEN];
212 snprintf (buffer, STRING_BUFFER_LEN,
213 (fmt ? fmt : "%d"), i); // assume radix 10
214 return String (buffer);
218 String_convert::form_string (char const* format, ...)
221 va_start (args, format);
222 char buffer[STRING_BUFFER_LEN];
223 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
225 return String (buffer);
229 String_convert::vform_string (char const* format, va_list args)
231 char buffer[STRING_BUFFER_LEN];
232 vsnprintf (buffer, STRING_BUFFER_LEN, format, args);
233 return String (buffer);
237 Convert a double to a string.
239 @param #fmt# is a printf style format, default assumes "%lf" as format
242 String_convert::double_string (double f, char const* fmt)
244 char buf[STRING_BUFFER_LEN];
246 snprintf (buf, STRING_BUFFER_LEN, fmt ? fmt : "%f", f);
251 Make a string from a single character.
254 #n# is a repetition count, default value is 1
257 String_convert::char_string (char c, int n)
260 char* ch = new char[ n ];
262 String s ((Byte*)ch, n);
268 String_convert::rational_string (Rational r)
270 return r.to_string ();
274 String_convert::pointer_string (void const *l)
276 char buffer[STRING_BUFFER_LEN];
277 snprintf (buffer, STRING_BUFFER_LEN, "%p", l); // assume radix 10
278 return String (buffer);
282 Convert a double to a string.
285 #n# is the number of nonzero digits
288 String_convert::precision_string (double x, int n)
290 String format = "%." + to_string (0 >? n - 1) + "e";
291 String str = double_string (abs (x), format.to_str0 ());
293 int exp = str.right_string (3).to_int ();
294 str = str.left_string (str.length () - 4);
296 while (str[str.length () - 1] == '0')
297 str = str.left_string (str.length () - 1);
298 if (str[str.length () - 1] == '.')
299 str = str.left_string (str.length () - 1);
302 return (sign (x) > 0 ? str : "-" + str);
304 str = str.left_string (1) + str.cut_string (2, INT_MAX);
307 str = "0." + to_string ('0', -dot) + str;
308 else if (dot >= str.length ())
309 str += to_string ('0', dot - str.length ());
310 else if (( dot > 0) && (dot < str.length ()))
311 str = str.left_string (dot) + "." + str.cut_string (dot, INT_MAX);
315 return (sign (x) > 0 ? str : "-" + str);
319 String_convert::split (String str, char c)
322 int i = str.index (c);
325 String s = str.left_string (i);
327 while (str[++i] == c)
329 str = str.cut_string (i, INT_MAX);
339 String_convert::long_string (long l)
341 char s[STRING_BUFFER_LEN];
342 sprintf (s,"%ld", l);
347 String_convert::pad_to (String s, int n)
349 return s + to_string (' ' , (n - s.length ()) >? 0);