| /* |
| * Copyright (c) 2001-2003 The Regents of The University of Michigan |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions are |
| * met: redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer; |
| * redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution; |
| * neither the name of the copyright holders nor the names of its |
| * contributors may be used to endorse or promote products derived from |
| * this software without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
| * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
| * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR |
| * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT |
| * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
| * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
| * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
| * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| */ |
| |
| #include <iostream> |
| |
| #include <string.h> |
| #include <ctype.h> |
| |
| #include <string> |
| #include <vector> |
| |
| #include "base/intmath.hh" |
| #include "base/str.hh" |
| |
| using namespace std; |
| |
| bool |
| split_first(const string &s, string &lhs, string &rhs, char c) |
| { |
| string::size_type offset = s.find(c); |
| if (offset == string::npos) { |
| lhs = s; |
| rhs = ""; |
| return false; |
| } |
| |
| lhs = s.substr(0, offset); |
| rhs = s.substr(offset + 1); |
| return true; |
| } |
| |
| bool |
| split_last(const string &s, string &lhs, string &rhs, char c) |
| { |
| string::size_type offset = s.rfind(c); |
| if (offset == string::npos) { |
| lhs = s; |
| rhs = ""; |
| return false; |
| } |
| |
| lhs = s.substr(0, offset); |
| rhs = s.substr(offset + 1); |
| return true; |
| } |
| |
| void |
| tokenize(vector<string>& v, const string &s, char token, bool ignore) |
| { |
| string::size_type first = 0; |
| string::size_type last = s.find_first_of(token); |
| |
| if (ignore) { |
| if (last == first) { |
| while (last == first) |
| last = s.find_first_of(token, ++first); |
| |
| if (last == string::npos) { |
| v.push_back(s); |
| return; |
| } |
| } |
| } |
| |
| while (last != string::npos) { |
| v.push_back(s.substr(first, last - first)); |
| |
| if (ignore) { |
| first = s.find_first_not_of(token, last + 1); |
| |
| if (first == string::npos) |
| return; |
| } else |
| first = last + 1; |
| |
| last = s.find_first_of(token, first); |
| } |
| |
| v.push_back(s.substr(first)); |
| } |
| |
| /** |
| * @todo This function will not handle the smallest negative decimal |
| * value for a signed type |
| */ |
| |
| template <class T> |
| inline bool |
| __to_number(string value, T &retval) |
| { |
| static const T maxnum = ((T)-1); |
| static const bool sign = maxnum < 0; |
| static const int bits = sizeof(T) * 8; |
| static const T hexmax = maxnum & (((T)1 << (bits - 4 - sign)) - 1); |
| static const T octmax = maxnum & (((T)1 << (bits - 3 - sign)) - 1); |
| static const T signmax = |
| (sign) ? maxnum & (((T)1 << (bits - 1)) - 1) : maxnum; |
| static const T decmax = signmax / 10; |
| |
| #if 0 |
| cout << "maxnum = 0x" << hex << (unsigned long long)maxnum << "\n" |
| << "sign = 0x" << hex << (unsigned long long)sign << "\n" |
| << "hexmax = 0x" << hex << (unsigned long long)hexmax << "\n" |
| << "octmax = 0x" << hex << (unsigned long long)octmax << "\n" |
| << "signmax = 0x" << hex << (unsigned long long)signmax << "\n" |
| << "decmax = 0x" << hex << (unsigned long long)decmax << "\n"; |
| #endif |
| |
| eat_white(value); |
| |
| bool negative = false; |
| bool hex = false; |
| bool oct = false; |
| int last = value.size() - 1; |
| retval = 0; |
| int i = 0; |
| |
| char c = value[i]; |
| if (!IsDec(c)) { |
| if (c == '-' && sign) |
| negative = true; |
| else |
| return false; |
| } |
| else { |
| retval += c - '0'; |
| if (last == 0) return true; |
| } |
| |
| if (c == '0') |
| oct = true; |
| |
| c = value[++i]; |
| if (oct) { |
| if (sign && negative) |
| return false; |
| |
| if (!IsOct(c)) { |
| if (c == 'X' || c == 'x') { |
| hex = true; |
| oct = false; |
| } else |
| return false; |
| } |
| else |
| retval += c - '0'; |
| } else if (!IsDec(c)) |
| goto multiply; |
| else { |
| if (sign && negative && c == '0') |
| return false; |
| |
| retval *= 10; |
| retval += c - '0'; |
| if (last == 1) { |
| if (sign && negative) retval = -retval; |
| return true; |
| } |
| } |
| |
| if (hex) { |
| if (last == 1) |
| return false; |
| |
| for (i = 2; i <= last ; i++) { |
| c = value[i]; |
| if (!IsHex(c)) |
| return false; |
| |
| if (retval > hexmax) return false; |
| retval *= 16; |
| retval += Hex2Int(c); |
| } |
| return true; |
| } else if (oct) { |
| for (i = 2; i <= last ; i++) { |
| c = value[i]; |
| if (!IsOct(c)) |
| return false; |
| |
| if (retval > octmax) return false; |
| retval *= 8; |
| retval += (c - '0'); |
| } |
| return true; |
| } |
| |
| for (i = 2; i < last ; i++) { |
| c = value[i]; |
| if (!IsDec(c)) |
| goto multiply; |
| |
| if (retval > decmax) return false; |
| bool atmax = retval == decmax; |
| retval *= 10; |
| retval += c - '0'; |
| if (atmax && retval < decmax) return false; |
| if (sign && (retval & ((T)1 << (sizeof(T) * 8 - 1)))) |
| return false; |
| } |
| |
| c = value[last]; |
| if (IsDec(c)) { |
| |
| if (retval > decmax) return false; |
| bool atmax = retval == decmax; |
| retval *= 10; |
| retval += c - '0'; |
| if (atmax && retval < decmax) return false; |
| if (sign && negative) { |
| if ((retval & ((T)1 << (sizeof(T) * 8 - 1))) && |
| retval >= (T)-signmax) |
| return false; |
| retval = -retval; |
| } |
| else |
| if (sign && (retval & ((T)1 << ((sizeof(T) * 8) - 1)))) |
| return false; |
| return true; |
| } |
| |
| multiply: |
| signed long long mult = 1; |
| T val; |
| switch (c) { |
| case 'k': |
| case 'K': |
| if (i != last) return false; |
| mult = 1024; |
| val = signmax / mult; |
| break; |
| case 'm': |
| case 'M': |
| if (i != last) return false; |
| mult = 1024 * 1024; |
| val = signmax / mult; |
| break; |
| case 'g': |
| case 'G': |
| if (i != last) return false; |
| mult = 1024 * 1024 * 1024; |
| val = signmax / mult; |
| break; |
| case 'e': |
| case 'E': |
| if (i >= last) return false; |
| |
| mult = 0; |
| for (i++; i <= last; i++) { |
| c = value[i]; |
| if (!IsDec(c)) |
| return false; |
| |
| mult *= 10; |
| mult += c - '0'; |
| } |
| |
| for (i = 0; i < mult; i++) { |
| if (retval > signmax / 10) |
| return false; |
| retval *= 10; |
| if (sign && (retval & ((T)1 << (sizeof(T) * 8 - 1)))) |
| return false; |
| } |
| if (sign && negative) { |
| if ((retval & ((T)1 << (sizeof(T) * 8 - 1))) && |
| retval >= (T)-signmax) |
| return false; |
| retval = -retval; |
| } |
| else |
| if (sign && (retval & ((T)1 << ((sizeof(T) * 8) - 1)))) |
| return false; |
| |
| return true; |
| |
| default: |
| return false; |
| } |
| |
| if (sign && negative) |
| return false; |
| |
| if (mult > (unsigned long long)signmax) |
| return false; |
| |
| if (retval > val) |
| return false; |
| |
| retval *= mult; |
| |
| return true; |
| } |
| |
| #define STN(type) \ |
| template<> \ |
| bool to_number<type>(const string &value, type &retval) \ |
| { return __to_number(value, retval); } |
| |
| STN(unsigned long long); |
| STN(signed long long); |
| STN(unsigned long); |
| STN(signed long); |
| STN(unsigned int); |
| STN(signed int); |
| STN(unsigned short); |
| STN(signed short); |
| STN(unsigned char); |
| STN(signed char); |
| |
| template<> |
| bool to_number<bool>(const string &value, bool &retval) |
| { |
| string lowered = to_lower(value); |
| |
| if (value == "0") { |
| retval = false; |
| return true; |
| } |
| |
| if (value == "1"){ |
| retval = true; |
| return true; |
| } |
| |
| if (lowered == "false") { |
| retval = false; |
| return true; |
| } |
| |
| if (lowered == "true"){ |
| retval = true; |
| return true; |
| } |
| |
| if (lowered == "no") { |
| retval = false; |
| return true; |
| } |
| |
| if (lowered == "yes"){ |
| retval = true; |
| return true; |
| } |
| |
| return false; |
| } |
