3 * @brief Arbitrary sized integer definitions
5 * @see add_digits_asm.s
6 * @see sub_digits_asm.s
7 * @see mul_digits_asm.s
25 Arbint::Arbint(digit_t i) : m_digits(1), m_sign(i < 0)
27 m_digits[0] = llabs(i);
30 Arbint::Arbint(unsigned n, digit_t d0, ...) : m_digits(n), m_sign(false)
36 for (unsigned i = 1; i < n; ++i)
38 m_digits[i] = va_arg(ap, digit_t);
43 Arbint::Arbint(const Arbint & cpy) : m_digits(cpy.m_digits), m_sign(cpy.m_sign)
48 Arbint::Arbint(const vector<digit_t> & digits) : m_digits(digits), m_sign(false)
53 Arbint & Arbint::operator=(const Arbint & cpy)
55 memmove(m_digits.data(), cpy.m_digits.data(),
56 sizeof(digit_t)*min(m_digits.size(), cpy.m_digits.size()));
57 if (cpy.m_digits.size() > m_digits.size())
59 unsigned old_size = m_digits.size();
60 m_digits.resize(cpy.m_digits.size());
61 memset(m_digits.data()+old_size, 0, sizeof(digit_t)*m_digits.size()-old_size);
68 memset(m_digits.data(), 0, sizeof(digit_t)*m_digits.size());
71 unsigned Arbint::Shrink()
73 if (m_digits.size() <= 1)
76 for (i = m_digits.size()-1; (i > 0 && m_digits[i] != 0L); --i);
77 unsigned result = m_digits.size() - i;
82 Arbint & Arbint::operator*=(const Arbint & mul)
84 vector<digit_t> new_digits(m_digits.size(), 0L);
85 new_digits.reserve(new_digits.size()+mul.m_digits.size());
86 for (unsigned i = 0; i < mul.m_digits.size(); ++i)
88 vector<digit_t> step(m_digits.size()+i, 0L);
89 memcpy(step.data()+i, m_digits.data(), sizeof(digit_t)*m_digits.size());
91 digit_t overflow = mul_digits((digit_t*)step.data()+i, mul.m_digits[i], m_digits.size());
94 step.push_back(overflow);
96 new_digits.resize(max(new_digits.size(), step.size()), 0L);
97 digit_t carry = add_digits((digit_t*)new_digits.data(), step.data(), step.size());
100 new_digits.push_back(carry);
104 m_digits.swap(new_digits);
105 m_sign = !(m_sign == mul.m_sign);
109 void Arbint::Division(const Arbint & div, Arbint & result, Arbint & remainder) const
111 if (div == Arbint(1L))
127 Arbint next_rem(remainder);
128 while ((next_rem -= div) >= Arbint(0L))
130 //Debug("%li - %li = %li", digit_t(remainder), digit_t(div), digit_t(next_rem));
131 //Debug("Sign is %d", next_rem.m_sign);
132 remainder = next_rem;
139 Arbint & Arbint::operator+=(const Arbint & add)
141 if (m_sign == add.m_sign)
143 // -a + -b == -(a + b)
144 return AddBasic(add);
149 // -a + b == -(a - b)
162 Arbint & Arbint::operator-=(const Arbint & sub)
164 if (m_sign == sub.m_sign)
165 return SubBasic(sub);
166 return AddBasic(sub);
169 Arbint & Arbint::AddBasic(const Arbint & add)
171 if (add.m_digits.size() >= m_digits.size())
173 m_digits.resize(add.m_digits.size()+1,0L);
176 digit_t carry = add_digits((digit_t*)m_digits.data(),
177 (digit_t*)add.m_digits.data(), add.m_digits.size());
179 m_digits[m_digits.size()-1] = carry;
180 else if (m_digits.back() == 0L)
181 m_digits.resize(m_digits.size()-1);
185 Arbint & Arbint::SubBasic(const Arbint & sub)
187 if (sub.m_digits.size() >= m_digits.size())
189 m_digits.resize(sub.m_digits.size(),0L);
191 digit_t borrow = sub_digits((digit_t*)m_digits.data(),
192 (digit_t*)sub.m_digits.data(), sub.m_digits.size());
195 //TODO: Write ASM to do this bit?
199 for (unsigned i = 0; i < m_digits.size(); ++i)
200 m_digits[i] = -m_digits[i];
206 string Arbint::Str(const string & base) const
209 for (unsigned i = 0; i < m_digits.size(); ++i)
211 digit_t w = m_digits[i];
219 if (i+1 < m_digits.size()) s += ",";
221 reverse(s.begin(), s.end());
225 bool Arbint::IsZero() const
227 for (unsigned i = m_digits.size()-1; i > 0; --i)
229 if (m_digits[i] != 0L) return false;
231 return (m_digits[0] == 0L);
234 bool Arbint::operator==(const Arbint & equ) const
236 if (m_sign != equ.m_sign)
238 unsigned min_size = m_digits.size();
239 const Arbint * larger = &equ;
240 if (m_digits.size() > equ.m_digits.size())
242 min_size = equ.m_digits.size();
246 if (memcmp(m_digits.data(), equ.m_digits.data(), sizeof(digit_t)*min_size) != 0)
249 for (unsigned i = min_size; i < larger->m_digits.size(); ++i)
251 if (larger->m_digits[i] != 0L)
257 bool Arbint::operator<(const Arbint & less) const
261 return (cpy.m_sign && !cpy.IsZero());
264 string Arbint::DigitStr() const
267 ss << std::hex << std::setfill('0');
268 for (unsigned i = 0; i < m_digits.size(); ++i)
270 if (i != 0) ss << ',';
271 ss << std::setw(2*sizeof(digit_t)) << static_cast<digit_t>(m_digits[i]);