]>
Commit | Line | Data |
---|---|---|
8b81872f VZ |
1 | ///////////////////////////////////////////////////////////////////////////// |
2 | // Name: wx/longlong.cpp | |
3 | // Purpose: implementation of wxLongLongNative | |
4 | // Author: Jeffrey C. Ollie <jeff@ollie.clive.ia.us>, Vadim Zeitlin | |
77ffb593 | 5 | // Remarks: this class is not public in wxWidgets 2.0! It is intentionally |
8b81872f VZ |
6 | // not documented and is for private use only. |
7 | // Modified by: | |
8 | // Created: 10.02.99 | |
9 | // RCS-ID: $Id$ | |
10 | // Copyright: (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr> | |
65571936 | 11 | // Licence: wxWindows licence |
8b81872f VZ |
12 | ///////////////////////////////////////////////////////////////////////////// |
13 | ||
14 | // ============================================================================ | |
15 | // headers | |
16 | // ============================================================================ | |
17 | ||
14f355c2 | 18 | #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA) |
8b81872f VZ |
19 | #pragma implementation "longlong.h" |
20 | #endif | |
21 | ||
22 | #include "wx/wxprec.h" | |
23 | ||
24 | #ifdef __BORLANDC__ | |
25 | #pragma hdrstop | |
26 | #endif | |
27 | ||
4e57b0d4 | 28 | #if wxUSE_LONGLONG |
8b81872f | 29 | #include "wx/longlong.h" |
b713f891 | 30 | #include "wx/math.h" // for fabs() |
8b81872f | 31 | |
de85a884 VZ |
32 | #if defined(__MWERKS__) && defined(__WXMSW__) |
33 | #include <string.h> // for memset() | |
34 | #else | |
8b81872f | 35 | #include <memory.h> // for memset() |
de85a884 VZ |
36 | #endif |
37 | ||
8b81872f VZ |
38 | // ============================================================================ |
39 | // implementation | |
40 | // ============================================================================ | |
41 | ||
42 | #if wxUSE_LONGLONG_NATIVE | |
43 | ||
44 | // ---------------------------------------------------------------------------- | |
45 | // misc | |
46 | // ---------------------------------------------------------------------------- | |
47 | ||
2a310492 | 48 | void *wxLongLongNative::asArray() const |
8b81872f VZ |
49 | { |
50 | static unsigned char temp[8]; | |
51 | ||
0203c8cd WS |
52 | temp[0] = (unsigned char)((m_ll >> 56) & 0xFF); |
53 | temp[1] = (unsigned char)((m_ll >> 48) & 0xFF); | |
54 | temp[2] = (unsigned char)((m_ll >> 40) & 0xFF); | |
55 | temp[3] = (unsigned char)((m_ll >> 32) & 0xFF); | |
56 | temp[4] = (unsigned char)((m_ll >> 24) & 0xFF); | |
57 | temp[5] = (unsigned char)((m_ll >> 16) & 0xFF); | |
58 | temp[6] = (unsigned char)((m_ll >> 8) & 0xFF); | |
59 | temp[7] = (unsigned char)((m_ll >> 0) & 0xFF); | |
8b81872f VZ |
60 | |
61 | return temp; | |
62 | } | |
63 | ||
8e38fd1f RL |
64 | void *wxULongLongNative::asArray() const |
65 | { | |
66 | static unsigned char temp[8]; | |
67 | ||
0203c8cd WS |
68 | temp[0] = (unsigned char)((m_ll >> 56) & 0xFF); |
69 | temp[1] = (unsigned char)((m_ll >> 48) & 0xFF); | |
70 | temp[2] = (unsigned char)((m_ll >> 40) & 0xFF); | |
71 | temp[3] = (unsigned char)((m_ll >> 32) & 0xFF); | |
72 | temp[4] = (unsigned char)((m_ll >> 24) & 0xFF); | |
73 | temp[5] = (unsigned char)((m_ll >> 16) & 0xFF); | |
74 | temp[6] = (unsigned char)((m_ll >> 8) & 0xFF); | |
75 | temp[7] = (unsigned char)((m_ll >> 0) & 0xFF); | |
8e38fd1f RL |
76 | |
77 | return temp; | |
78 | } | |
79 | ||
842215bb WS |
80 | #if wxUSE_LONGLONG_WX |
81 | wxLongLongNative::wxLongLongNative(wxLongLongWx ll) | |
82 | { | |
83 | // assign first to avoid precision loss! | |
84 | m_ll = ll.GetHi(); | |
85 | m_ll <<= 32; | |
86 | m_ll |= ll.GetLo(); | |
87 | } | |
88 | ||
89 | wxLongLongNative& wxLongLongNative::operator=(wxLongLongWx ll) | |
90 | { | |
91 | // assign first to avoid precision loss! | |
92 | m_ll = ll.GetHi(); | |
93 | m_ll <<= 32; | |
94 | m_ll |= ll.GetLo(); | |
95 | return *this; | |
96 | } | |
97 | #endif | |
98 | ||
8b81872f VZ |
99 | #endif // wxUSE_LONGLONG_NATIVE |
100 | ||
41acf5c0 VZ |
101 | // ============================================================================ |
102 | // wxLongLongWx: emulation of 'long long' using 2 longs | |
103 | // ============================================================================ | |
104 | ||
8b81872f VZ |
105 | #if wxUSE_LONGLONG_WX |
106 | ||
41acf5c0 VZ |
107 | // assignment |
108 | wxLongLongWx& wxLongLongWx::Assign(double d) | |
109 | { | |
2a310492 VZ |
110 | bool positive = d >= 0; |
111 | d = fabs(d); | |
617ec456 | 112 | if ( d <= ULONG_MAX ) |
41acf5c0 | 113 | { |
2a310492 | 114 | m_hi = 0; |
41acf5c0 VZ |
115 | m_lo = (long)d; |
116 | } | |
117 | else | |
118 | { | |
617ec456 VZ |
119 | m_hi = (unsigned long)(d / (1.0 + (double)ULONG_MAX)); |
120 | m_lo = (unsigned long)(d - ((double)m_hi * (1.0 + (double)ULONG_MAX))); | |
41acf5c0 VZ |
121 | } |
122 | ||
2a310492 VZ |
123 | #ifdef wxLONGLONG_TEST_MODE |
124 | m_ll = (wxLongLong_t)d; | |
125 | ||
126 | Check(); | |
127 | #endif // wxLONGLONG_TEST_MODE | |
128 | ||
617ec456 VZ |
129 | if ( !positive ) |
130 | Negate(); | |
131 | ||
41acf5c0 VZ |
132 | return *this; |
133 | } | |
134 | ||
8b81872f VZ |
135 | wxLongLongWx wxLongLongWx::operator<<(int shift) const |
136 | { | |
2a310492 VZ |
137 | wxLongLongWx ll(*this); |
138 | ll <<= shift; | |
8b81872f | 139 | |
2a310492 | 140 | return ll; |
8b81872f VZ |
141 | } |
142 | ||
8e38fd1f RL |
143 | wxULongLongWx wxULongLongWx::operator<<(int shift) const |
144 | { | |
145 | wxULongLongWx ll(*this); | |
146 | ll <<= shift; | |
147 | ||
148 | return ll; | |
149 | } | |
150 | ||
8b81872f VZ |
151 | wxLongLongWx& wxLongLongWx::operator<<=(int shift) |
152 | { | |
2a310492 | 153 | if (shift != 0) |
8b81872f | 154 | { |
2a310492 VZ |
155 | if (shift < 32) |
156 | { | |
157 | m_hi <<= shift; | |
158 | m_hi |= m_lo >> (32 - shift); | |
159 | m_lo <<= shift; | |
160 | } | |
161 | else | |
162 | { | |
163 | m_hi = m_lo << (shift - 32); | |
164 | m_lo = 0; | |
165 | } | |
8b81872f VZ |
166 | } |
167 | ||
2a310492 VZ |
168 | #ifdef wxLONGLONG_TEST_MODE |
169 | m_ll <<= shift; | |
170 | ||
171 | Check(); | |
172 | #endif // wxLONGLONG_TEST_MODE | |
173 | ||
8b81872f VZ |
174 | return *this; |
175 | } | |
176 | ||
8e38fd1f RL |
177 | wxULongLongWx& wxULongLongWx::operator<<=(int shift) |
178 | { | |
179 | if (shift != 0) | |
180 | { | |
181 | if (shift < 32) | |
182 | { | |
183 | m_hi <<= shift; | |
184 | m_hi |= m_lo >> (32 - shift); | |
185 | m_lo <<= shift; | |
186 | } | |
187 | else | |
188 | { | |
189 | m_hi = m_lo << (shift - 32); | |
190 | m_lo = 0; | |
191 | } | |
192 | } | |
193 | ||
194 | #ifdef wxLONGLONG_TEST_MODE | |
195 | m_ll <<= shift; | |
196 | ||
197 | Check(); | |
198 | #endif // wxLONGLONG_TEST_MODE | |
199 | ||
200 | return *this; | |
201 | } | |
202 | ||
8b81872f VZ |
203 | wxLongLongWx wxLongLongWx::operator>>(int shift) const |
204 | { | |
2a310492 VZ |
205 | wxLongLongWx ll(*this); |
206 | ll >>= shift; | |
8b81872f | 207 | |
2a310492 | 208 | return ll; |
8b81872f VZ |
209 | } |
210 | ||
8e38fd1f RL |
211 | wxULongLongWx wxULongLongWx::operator>>(int shift) const |
212 | { | |
213 | wxULongLongWx ll(*this); | |
214 | ll >>= shift; | |
215 | ||
216 | return ll; | |
217 | } | |
218 | ||
8b81872f VZ |
219 | wxLongLongWx& wxLongLongWx::operator>>=(int shift) |
220 | { | |
2a310492 | 221 | if (shift != 0) |
8b81872f | 222 | { |
2a310492 VZ |
223 | if (shift < 32) |
224 | { | |
225 | m_lo >>= shift; | |
226 | m_lo |= m_hi << (32 - shift); | |
227 | m_hi >>= shift; | |
228 | } | |
229 | else | |
230 | { | |
231 | m_lo = m_hi >> (shift - 32); | |
232 | m_hi = (m_hi < 0 ? -1L : 0); | |
233 | } | |
8b81872f VZ |
234 | } |
235 | ||
2a310492 VZ |
236 | #ifdef wxLONGLONG_TEST_MODE |
237 | m_ll >>= shift; | |
238 | ||
239 | Check(); | |
240 | #endif // wxLONGLONG_TEST_MODE | |
241 | ||
8b81872f VZ |
242 | return *this; |
243 | } | |
244 | ||
8e38fd1f RL |
245 | wxULongLongWx& wxULongLongWx::operator>>=(int shift) |
246 | { | |
247 | if (shift != 0) | |
248 | { | |
249 | if (shift < 32) | |
250 | { | |
251 | m_lo >>= shift; | |
252 | m_lo |= m_hi << (32 - shift); | |
253 | m_hi >>= shift; | |
254 | } | |
255 | else | |
256 | { | |
257 | m_lo = m_hi >> (shift - 32); | |
258 | m_hi = 0; | |
259 | } | |
260 | } | |
261 | ||
262 | #ifdef wxLONGLONG_TEST_MODE | |
263 | m_ll >>= shift; | |
264 | ||
265 | Check(); | |
266 | #endif // wxLONGLONG_TEST_MODE | |
267 | ||
268 | return *this; | |
269 | } | |
270 | ||
8b81872f VZ |
271 | wxLongLongWx wxLongLongWx::operator+(const wxLongLongWx& ll) const |
272 | { | |
2a310492 VZ |
273 | wxLongLongWx res(*this); |
274 | res += ll; | |
8b81872f | 275 | |
2a310492 | 276 | return res; |
8b81872f VZ |
277 | } |
278 | ||
8e38fd1f RL |
279 | wxULongLongWx wxULongLongWx::operator+(const wxULongLongWx& ll) const |
280 | { | |
281 | wxULongLongWx res(*this); | |
282 | res += ll; | |
283 | ||
284 | return res; | |
285 | } | |
286 | ||
8b81872f VZ |
287 | wxLongLongWx wxLongLongWx::operator+(long l) const |
288 | { | |
2a310492 VZ |
289 | wxLongLongWx res(*this); |
290 | res += l; | |
8b81872f | 291 | |
2a310492 | 292 | return res; |
8b81872f VZ |
293 | } |
294 | ||
8e38fd1f RL |
295 | wxULongLongWx wxULongLongWx::operator+(unsigned long l) const |
296 | { | |
297 | wxULongLongWx res(*this); | |
298 | res += l; | |
299 | ||
300 | return res; | |
301 | } | |
302 | ||
8b81872f VZ |
303 | wxLongLongWx& wxLongLongWx::operator+=(const wxLongLongWx& ll) |
304 | { | |
305 | unsigned long previous = m_lo; | |
306 | ||
307 | m_lo += ll.m_lo; | |
308 | m_hi += ll.m_hi; | |
309 | ||
310 | if ((m_lo < previous) || (m_lo < ll.m_lo)) | |
311 | m_hi++; | |
312 | ||
2a310492 VZ |
313 | #ifdef wxLONGLONG_TEST_MODE |
314 | m_ll += ll.m_ll; | |
315 | ||
316 | Check(); | |
317 | #endif // wxLONGLONG_TEST_MODE | |
318 | ||
8b81872f VZ |
319 | return *this; |
320 | } | |
321 | ||
8e38fd1f RL |
322 | wxULongLongWx& wxULongLongWx::operator+=(const wxULongLongWx& ll) |
323 | { | |
324 | unsigned long previous = m_lo; | |
325 | ||
326 | m_lo += ll.m_lo; | |
327 | m_hi += ll.m_hi; | |
328 | ||
329 | if ((m_lo < previous) || (m_lo < ll.m_lo)) | |
330 | m_hi++; | |
331 | ||
332 | #ifdef wxLONGLONG_TEST_MODE | |
333 | m_ll += ll.m_ll; | |
334 | ||
335 | Check(); | |
336 | #endif // wxLONGLONG_TEST_MODE | |
337 | ||
338 | return *this; | |
339 | } | |
340 | ||
8b81872f VZ |
341 | wxLongLongWx& wxLongLongWx::operator+=(long l) |
342 | { | |
343 | unsigned long previous = m_lo; | |
344 | ||
345 | m_lo += l; | |
346 | if (l < 0) | |
347 | m_hi += -1l; | |
348 | ||
349 | if ((m_lo < previous) || (m_lo < (unsigned long)l)) | |
350 | m_hi++; | |
351 | ||
2a310492 VZ |
352 | #ifdef wxLONGLONG_TEST_MODE |
353 | m_ll += l; | |
354 | ||
355 | Check(); | |
356 | #endif // wxLONGLONG_TEST_MODE | |
357 | ||
8b81872f VZ |
358 | return *this; |
359 | } | |
360 | ||
8e38fd1f RL |
361 | wxULongLongWx& wxULongLongWx::operator+=(unsigned long l) |
362 | { | |
363 | unsigned long previous = m_lo; | |
364 | ||
365 | m_lo += l; | |
366 | ||
367 | if ((m_lo < previous) || (m_lo < l)) | |
368 | m_hi++; | |
369 | ||
370 | #ifdef wxLONGLONG_TEST_MODE | |
371 | m_ll += l; | |
372 | ||
373 | Check(); | |
374 | #endif // wxLONGLONG_TEST_MODE | |
375 | ||
376 | return *this; | |
377 | } | |
378 | ||
8b81872f VZ |
379 | // pre increment |
380 | wxLongLongWx& wxLongLongWx::operator++() | |
381 | { | |
382 | m_lo++; | |
383 | if (m_lo == 0) | |
384 | m_hi++; | |
385 | ||
2a310492 VZ |
386 | #ifdef wxLONGLONG_TEST_MODE |
387 | m_ll++; | |
8b81872f | 388 | |
2a310492 VZ |
389 | Check(); |
390 | #endif // wxLONGLONG_TEST_MODE | |
8b81872f VZ |
391 | |
392 | return *this; | |
393 | } | |
394 | ||
8e38fd1f RL |
395 | wxULongLongWx& wxULongLongWx::operator++() |
396 | { | |
397 | m_lo++; | |
398 | if (m_lo == 0) | |
399 | m_hi++; | |
400 | ||
401 | #ifdef wxLONGLONG_TEST_MODE | |
402 | m_ll++; | |
403 | ||
404 | Check(); | |
405 | #endif // wxLONGLONG_TEST_MODE | |
406 | ||
407 | return *this; | |
408 | } | |
409 | ||
8b81872f VZ |
410 | // negation |
411 | wxLongLongWx wxLongLongWx::operator-() const | |
412 | { | |
2a310492 VZ |
413 | wxLongLongWx res(*this); |
414 | res.Negate(); | |
415 | ||
416 | return res; | |
417 | } | |
418 | ||
419 | wxLongLongWx& wxLongLongWx::Negate() | |
420 | { | |
421 | m_hi = ~m_hi; | |
422 | m_lo = ~m_lo; | |
423 | ||
424 | m_lo++; | |
425 | if ( m_lo == 0 ) | |
426 | m_hi++; | |
8b81872f | 427 | |
2a310492 VZ |
428 | #ifdef wxLONGLONG_TEST_MODE |
429 | m_ll = -m_ll; | |
8b81872f | 430 | |
2a310492 VZ |
431 | Check(); |
432 | #endif // wxLONGLONG_TEST_MODE | |
433 | ||
434 | return *this; | |
8b81872f VZ |
435 | } |
436 | ||
437 | // subtraction | |
438 | ||
439 | wxLongLongWx wxLongLongWx::operator-(const wxLongLongWx& ll) const | |
440 | { | |
2a310492 VZ |
441 | wxLongLongWx res(*this); |
442 | res -= ll; | |
8b81872f | 443 | |
2a310492 | 444 | return res; |
8b81872f VZ |
445 | } |
446 | ||
842215bb | 447 | wxLongLongWx wxULongLongWx::operator-(const wxULongLongWx& ll) const |
8e38fd1f | 448 | { |
842215bb WS |
449 | wxASSERT(m_hi <= LONG_MAX ); |
450 | wxASSERT(ll.m_hi <= LONG_MAX ); | |
451 | ||
452 | wxLongLongWx res( (long)m_hi , m_lo ); | |
453 | wxLongLongWx op( (long)ll.m_hi , ll.m_lo ); | |
454 | res -= op; | |
8e38fd1f RL |
455 | |
456 | return res; | |
457 | } | |
458 | ||
8b81872f VZ |
459 | wxLongLongWx& wxLongLongWx::operator-=(const wxLongLongWx& ll) |
460 | { | |
461 | unsigned long previous = m_lo; | |
462 | ||
463 | m_lo -= ll.m_lo; | |
464 | m_hi -= ll.m_hi; | |
465 | ||
466 | if (previous < ll.m_lo) | |
467 | m_hi--; | |
468 | ||
2a310492 VZ |
469 | #ifdef wxLONGLONG_TEST_MODE |
470 | m_ll -= ll.m_ll; | |
471 | ||
472 | Check(); | |
473 | #endif // wxLONGLONG_TEST_MODE | |
474 | ||
13111b2a | 475 | return *this; |
8b81872f VZ |
476 | } |
477 | ||
8e38fd1f RL |
478 | wxULongLongWx& wxULongLongWx::operator-=(const wxULongLongWx& ll) |
479 | { | |
480 | unsigned long previous = m_lo; | |
481 | ||
482 | m_lo -= ll.m_lo; | |
483 | m_hi -= ll.m_hi; | |
484 | ||
485 | if (previous < ll.m_lo) | |
486 | m_hi--; | |
487 | ||
488 | #ifdef wxLONGLONG_TEST_MODE | |
489 | m_ll -= ll.m_ll; | |
490 | ||
491 | Check(); | |
492 | #endif // wxLONGLONG_TEST_MODE | |
493 | ||
494 | return *this; | |
495 | } | |
496 | ||
8b81872f VZ |
497 | // pre decrement |
498 | wxLongLongWx& wxLongLongWx::operator--() | |
499 | { | |
500 | m_lo--; | |
501 | if (m_lo == 0xFFFFFFFF) | |
502 | m_hi--; | |
503 | ||
2a310492 VZ |
504 | #ifdef wxLONGLONG_TEST_MODE |
505 | m_ll--; | |
8b81872f | 506 | |
2a310492 VZ |
507 | Check(); |
508 | #endif // wxLONGLONG_TEST_MODE | |
8b81872f VZ |
509 | |
510 | return *this; | |
511 | } | |
512 | ||
8e38fd1f RL |
513 | wxULongLongWx& wxULongLongWx::operator--() |
514 | { | |
515 | m_lo--; | |
516 | if (m_lo == 0xFFFFFFFF) | |
517 | m_hi--; | |
518 | ||
519 | #ifdef wxLONGLONG_TEST_MODE | |
520 | m_ll--; | |
521 | ||
522 | Check(); | |
523 | #endif // wxLONGLONG_TEST_MODE | |
524 | ||
525 | return *this; | |
526 | } | |
527 | ||
8b81872f VZ |
528 | // comparison operators |
529 | ||
530 | bool wxLongLongWx::operator<(const wxLongLongWx& ll) const | |
531 | { | |
2ea24d9f | 532 | if ( m_hi < ll.m_hi ) |
f644b28c | 533 | return true; |
2ea24d9f VZ |
534 | else if ( m_hi == ll.m_hi ) |
535 | return m_lo < ll.m_lo; | |
536 | else | |
f644b28c | 537 | return false; |
8b81872f VZ |
538 | } |
539 | ||
8e38fd1f RL |
540 | bool wxULongLongWx::operator<(const wxULongLongWx& ll) const |
541 | { | |
542 | if ( m_hi < ll.m_hi ) | |
f644b28c | 543 | return true; |
8e38fd1f RL |
544 | else if ( m_hi == ll.m_hi ) |
545 | return m_lo < ll.m_lo; | |
546 | else | |
f644b28c | 547 | return false; |
8e38fd1f RL |
548 | } |
549 | ||
8b81872f VZ |
550 | bool wxLongLongWx::operator>(const wxLongLongWx& ll) const |
551 | { | |
2ea24d9f | 552 | if ( m_hi > ll.m_hi ) |
f644b28c | 553 | return true; |
2ea24d9f VZ |
554 | else if ( m_hi == ll.m_hi ) |
555 | return m_lo > ll.m_lo; | |
556 | else | |
f644b28c | 557 | return false; |
8b81872f VZ |
558 | } |
559 | ||
8e38fd1f RL |
560 | bool wxULongLongWx::operator>(const wxULongLongWx& ll) const |
561 | { | |
562 | if ( m_hi > ll.m_hi ) | |
f644b28c | 563 | return true; |
8e38fd1f RL |
564 | else if ( m_hi == ll.m_hi ) |
565 | return m_lo > ll.m_lo; | |
566 | else | |
f644b28c | 567 | return false; |
8e38fd1f RL |
568 | } |
569 | ||
8b81872f VZ |
570 | // bitwise operators |
571 | ||
572 | wxLongLongWx wxLongLongWx::operator&(const wxLongLongWx& ll) const | |
573 | { | |
574 | return wxLongLongWx(m_hi & ll.m_hi, m_lo & ll.m_lo); | |
575 | } | |
576 | ||
8e38fd1f RL |
577 | wxULongLongWx wxULongLongWx::operator&(const wxULongLongWx& ll) const |
578 | { | |
579 | return wxULongLongWx(m_hi & ll.m_hi, m_lo & ll.m_lo); | |
580 | } | |
581 | ||
8b81872f VZ |
582 | wxLongLongWx wxLongLongWx::operator|(const wxLongLongWx& ll) const |
583 | { | |
584 | return wxLongLongWx(m_hi | ll.m_hi, m_lo | ll.m_lo); | |
585 | } | |
586 | ||
8e38fd1f RL |
587 | wxULongLongWx wxULongLongWx::operator|(const wxULongLongWx& ll) const |
588 | { | |
589 | return wxULongLongWx(m_hi | ll.m_hi, m_lo | ll.m_lo); | |
590 | } | |
591 | ||
8b81872f VZ |
592 | wxLongLongWx wxLongLongWx::operator^(const wxLongLongWx& ll) const |
593 | { | |
594 | return wxLongLongWx(m_hi ^ ll.m_hi, m_lo ^ ll.m_lo); | |
595 | } | |
596 | ||
8e38fd1f RL |
597 | wxULongLongWx wxULongLongWx::operator^(const wxULongLongWx& ll) const |
598 | { | |
599 | return wxULongLongWx(m_hi ^ ll.m_hi, m_lo ^ ll.m_lo); | |
600 | } | |
601 | ||
8b81872f VZ |
602 | wxLongLongWx& wxLongLongWx::operator&=(const wxLongLongWx& ll) |
603 | { | |
604 | m_lo &= ll.m_lo; | |
605 | m_hi &= ll.m_hi; | |
606 | ||
2a310492 VZ |
607 | #ifdef wxLONGLONG_TEST_MODE |
608 | m_ll &= ll.m_ll; | |
609 | ||
610 | Check(); | |
611 | #endif // wxLONGLONG_TEST_MODE | |
612 | ||
8b81872f VZ |
613 | return *this; |
614 | } | |
615 | ||
8e38fd1f RL |
616 | wxULongLongWx& wxULongLongWx::operator&=(const wxULongLongWx& ll) |
617 | { | |
618 | m_lo &= ll.m_lo; | |
619 | m_hi &= ll.m_hi; | |
620 | ||
621 | #ifdef wxLONGLONG_TEST_MODE | |
622 | m_ll &= ll.m_ll; | |
623 | ||
624 | Check(); | |
625 | #endif // wxLONGLONG_TEST_MODE | |
626 | ||
627 | return *this; | |
628 | } | |
629 | ||
8b81872f VZ |
630 | wxLongLongWx& wxLongLongWx::operator|=(const wxLongLongWx& ll) |
631 | { | |
632 | m_lo |= ll.m_lo; | |
633 | m_hi |= ll.m_hi; | |
634 | ||
2a310492 VZ |
635 | #ifdef wxLONGLONG_TEST_MODE |
636 | m_ll |= ll.m_ll; | |
637 | ||
638 | Check(); | |
639 | #endif // wxLONGLONG_TEST_MODE | |
640 | ||
8b81872f VZ |
641 | return *this; |
642 | } | |
643 | ||
8e38fd1f RL |
644 | wxULongLongWx& wxULongLongWx::operator|=(const wxULongLongWx& ll) |
645 | { | |
646 | m_lo |= ll.m_lo; | |
647 | m_hi |= ll.m_hi; | |
648 | ||
649 | #ifdef wxLONGLONG_TEST_MODE | |
650 | m_ll |= ll.m_ll; | |
651 | ||
652 | Check(); | |
653 | #endif // wxLONGLONG_TEST_MODE | |
654 | ||
655 | return *this; | |
656 | } | |
657 | ||
8b81872f VZ |
658 | wxLongLongWx& wxLongLongWx::operator^=(const wxLongLongWx& ll) |
659 | { | |
660 | m_lo ^= ll.m_lo; | |
661 | m_hi ^= ll.m_hi; | |
662 | ||
2a310492 VZ |
663 | #ifdef wxLONGLONG_TEST_MODE |
664 | m_ll ^= ll.m_ll; | |
665 | ||
666 | Check(); | |
667 | #endif // wxLONGLONG_TEST_MODE | |
668 | ||
8b81872f VZ |
669 | return *this; |
670 | } | |
671 | ||
8e38fd1f RL |
672 | wxULongLongWx& wxULongLongWx::operator^=(const wxULongLongWx& ll) |
673 | { | |
674 | m_lo ^= ll.m_lo; | |
675 | m_hi ^= ll.m_hi; | |
676 | ||
677 | #ifdef wxLONGLONG_TEST_MODE | |
678 | m_ll ^= ll.m_ll; | |
679 | ||
680 | Check(); | |
681 | #endif // wxLONGLONG_TEST_MODE | |
682 | ||
683 | return *this; | |
684 | } | |
685 | ||
8b81872f VZ |
686 | wxLongLongWx wxLongLongWx::operator~() const |
687 | { | |
688 | return wxLongLongWx(~m_hi, ~m_lo); | |
689 | } | |
690 | ||
8e38fd1f RL |
691 | wxULongLongWx wxULongLongWx::operator~() const |
692 | { | |
693 | return wxULongLongWx(~m_hi, ~m_lo); | |
694 | } | |
695 | ||
8b81872f VZ |
696 | // multiplication |
697 | ||
698 | wxLongLongWx wxLongLongWx::operator*(const wxLongLongWx& ll) const | |
699 | { | |
2a310492 VZ |
700 | wxLongLongWx res(*this); |
701 | res *= ll; | |
8b81872f | 702 | |
2a310492 | 703 | return res; |
8b81872f VZ |
704 | } |
705 | ||
8e38fd1f RL |
706 | wxULongLongWx wxULongLongWx::operator*(const wxULongLongWx& ll) const |
707 | { | |
708 | wxULongLongWx res(*this); | |
709 | res *= ll; | |
710 | ||
711 | return res; | |
712 | } | |
713 | ||
8b81872f VZ |
714 | wxLongLongWx& wxLongLongWx::operator*=(const wxLongLongWx& ll) |
715 | { | |
716 | wxLongLongWx t(m_hi, m_lo); | |
717 | wxLongLongWx q(ll.m_hi, ll.m_lo); | |
8b81872f | 718 | |
2a310492 VZ |
719 | m_hi = m_lo = 0; |
720 | ||
721 | #ifdef wxLONGLONG_TEST_MODE | |
722 | wxLongLong_t llOld = m_ll; | |
723 | m_ll = 0; | |
724 | #endif // wxLONGLONG_TEST_MODE | |
725 | ||
726 | int counter = 0; | |
8b81872f VZ |
727 | do |
728 | { | |
729 | if ((q.m_lo & 1) != 0) | |
2a310492 | 730 | *this += t; |
8b81872f VZ |
731 | q >>= 1; |
732 | t <<= 1; | |
733 | counter++; | |
2a310492 VZ |
734 | } |
735 | while ((counter < 64) && ((q.m_hi != 0) || (q.m_lo != 0))); | |
736 | ||
737 | #ifdef wxLONGLONG_TEST_MODE | |
738 | m_ll = llOld * ll.m_ll; | |
739 | ||
740 | Check(); | |
741 | #endif // wxLONGLONG_TEST_MODE | |
742 | ||
8b81872f VZ |
743 | return *this; |
744 | } | |
745 | ||
8e38fd1f RL |
746 | wxULongLongWx& wxULongLongWx::operator*=(const wxULongLongWx& ll) |
747 | { | |
748 | wxULongLongWx t(m_hi, m_lo); | |
749 | wxULongLongWx q(ll.m_hi, ll.m_lo); | |
750 | ||
751 | m_hi = m_lo = 0; | |
752 | ||
753 | #ifdef wxLONGLONG_TEST_MODE | |
60582201 | 754 | wxULongLong_t llOld = m_ll; |
8e38fd1f RL |
755 | m_ll = 0; |
756 | #endif // wxLONGLONG_TEST_MODE | |
757 | ||
758 | int counter = 0; | |
759 | do | |
760 | { | |
761 | if ((q.m_lo & 1) != 0) | |
762 | *this += t; | |
763 | q >>= 1; | |
764 | t <<= 1; | |
765 | counter++; | |
766 | } | |
767 | while ((counter < 64) && ((q.m_hi != 0) || (q.m_lo != 0))); | |
768 | ||
769 | #ifdef wxLONGLONG_TEST_MODE | |
770 | m_ll = llOld * ll.m_ll; | |
771 | ||
772 | Check(); | |
773 | #endif // wxLONGLONG_TEST_MODE | |
774 | ||
775 | return *this; | |
776 | } | |
777 | ||
8b81872f VZ |
778 | // division |
779 | ||
5e6a0e83 | 780 | void wxLongLongWx::Divide(const wxLongLongWx& divisorIn, |
cd0b1709 VZ |
781 | wxLongLongWx& quotient, |
782 | wxLongLongWx& remainder) const | |
8b81872f | 783 | { |
5e6a0e83 | 784 | if ((divisorIn.m_lo == 0) && (divisorIn.m_hi == 0)) |
8b81872f VZ |
785 | { |
786 | // provoke division by zero error and silence the compilers warnings | |
787 | // about an expression without effect and unused variable | |
5e6a0e83 | 788 | long dummy = divisorIn.m_lo/divisorIn.m_hi; |
8b81872f VZ |
789 | dummy += 0; |
790 | } | |
791 | ||
2ea24d9f VZ |
792 | // VZ: I'm writing this in a hurry and it's surely not the fastest way to |
793 | // do this - any improvements are more than welcome | |
5e6a0e83 VZ |
794 | // |
795 | // code inspired by the snippet at | |
796 | // http://www.bearcave.com/software/divide.htm | |
797 | // | |
798 | // Copyright notice: | |
799 | // | |
800 | // Use of this program, for any purpose, is granted the author, Ian | |
801 | // Kaplan, as long as this copyright notice is included in the source | |
802 | // code or any source code derived from this program. The user assumes | |
3a994742 | 803 | // all responsibility for using this code. |
5e6a0e83 VZ |
804 | |
805 | // init everything | |
806 | wxLongLongWx dividend = *this, | |
807 | divisor = divisorIn; | |
808 | ||
809 | quotient = 0l; | |
810 | remainder = 0l; | |
811 | ||
5e6a0e83 VZ |
812 | // always do unsigned division and adjust the signs later: in C integer |
813 | // division, the sign of the remainder is the same as the sign of the | |
814 | // dividend, while the sign of the quotient is the product of the signs of | |
815 | // the dividend and divisor. Of course, we also always have | |
816 | // | |
817 | // dividend = quotient*divisor + remainder | |
818 | // | |
819 | // with 0 <= abs(remainder) < abs(divisor) | |
820 | bool negRemainder = dividend.m_hi < 0; | |
f644b28c | 821 | bool negQuotient = false; // assume positive |
5e6a0e83 VZ |
822 | if ( dividend.m_hi < 0 ) |
823 | { | |
824 | negQuotient = !negQuotient; | |
825 | dividend = -dividend; | |
826 | } | |
827 | if ( divisor.m_hi < 0 ) | |
828 | { | |
829 | negQuotient = !negQuotient; | |
830 | divisor = -divisor; | |
831 | } | |
2ea24d9f | 832 | |
2a310492 VZ |
833 | // check for some particular cases |
834 | if ( divisor > dividend ) | |
2ea24d9f | 835 | { |
2a310492 VZ |
836 | remainder = dividend; |
837 | } | |
838 | else if ( divisor == dividend ) | |
839 | { | |
840 | quotient = 1l; | |
5e6a0e83 | 841 | } |
2a310492 VZ |
842 | else |
843 | { | |
842215bb | 844 | // here: dividend > divisor and both are positive: do unsigned division |
2a310492 VZ |
845 | size_t nBits = 64u; |
846 | wxLongLongWx d; | |
5e6a0e83 | 847 | |
2a310492 | 848 | #define IS_MSB_SET(ll) ((ll.m_hi) & (1 << (8*sizeof(long) - 1))) |
2ea24d9f | 849 | |
2a310492 | 850 | while ( remainder < divisor ) |
2ea24d9f | 851 | { |
2a310492 VZ |
852 | remainder <<= 1; |
853 | if ( IS_MSB_SET(dividend) ) | |
854 | { | |
855 | remainder |= 1; | |
856 | } | |
857 | ||
858 | d = dividend; | |
859 | dividend <<= 1; | |
860 | ||
861 | nBits--; | |
2ea24d9f VZ |
862 | } |
863 | ||
2a310492 VZ |
864 | // undo the last loop iteration |
865 | dividend = d; | |
866 | remainder >>= 1; | |
867 | nBits++; | |
5e6a0e83 | 868 | |
2a310492 VZ |
869 | for ( size_t i = 0; i < nBits; i++ ) |
870 | { | |
871 | remainder <<= 1; | |
872 | if ( IS_MSB_SET(dividend) ) | |
873 | { | |
874 | remainder |= 1; | |
875 | } | |
876 | ||
877 | wxLongLongWx t = remainder - divisor; | |
878 | dividend <<= 1; | |
879 | quotient <<= 1; | |
880 | if ( !IS_MSB_SET(t) ) | |
881 | { | |
882 | quotient |= 1; | |
883 | ||
884 | remainder = t; | |
885 | } | |
5e6a0e83 | 886 | } |
2ea24d9f VZ |
887 | } |
888 | ||
5e6a0e83 VZ |
889 | // adjust signs |
890 | if ( negRemainder ) | |
2ea24d9f | 891 | { |
5e6a0e83 | 892 | remainder = -remainder; |
2ea24d9f VZ |
893 | } |
894 | ||
5e6a0e83 VZ |
895 | if ( negQuotient ) |
896 | { | |
897 | quotient = -quotient; | |
898 | } | |
2ea24d9f VZ |
899 | } |
900 | ||
8e38fd1f RL |
901 | void wxULongLongWx::Divide(const wxULongLongWx& divisorIn, |
902 | wxULongLongWx& quotient, | |
903 | wxULongLongWx& remainder) const | |
904 | { | |
905 | if ((divisorIn.m_lo == 0) && (divisorIn.m_hi == 0)) | |
906 | { | |
907 | // provoke division by zero error and silence the compilers warnings | |
908 | // about an expression without effect and unused variable | |
909 | unsigned long dummy = divisorIn.m_lo/divisorIn.m_hi; | |
910 | dummy += 0; | |
911 | } | |
912 | ||
913 | // VZ: I'm writing this in a hurry and it's surely not the fastest way to | |
914 | // do this - any improvements are more than welcome | |
915 | // | |
916 | // code inspired by the snippet at | |
917 | // http://www.bearcave.com/software/divide.htm | |
918 | // | |
919 | // Copyright notice: | |
920 | // | |
921 | // Use of this program, for any purpose, is granted the author, Ian | |
922 | // Kaplan, as long as this copyright notice is included in the source | |
923 | // code or any source code derived from this program. The user assumes | |
924 | // all responsibility for using this code. | |
925 | ||
926 | // init everything | |
927 | wxULongLongWx dividend = *this, | |
928 | divisor = divisorIn; | |
929 | ||
930 | quotient = 0l; | |
931 | remainder = 0l; | |
932 | ||
933 | // check for some particular cases | |
934 | if ( divisor > dividend ) | |
935 | { | |
936 | remainder = dividend; | |
937 | } | |
938 | else if ( divisor == dividend ) | |
939 | { | |
940 | quotient = 1l; | |
941 | } | |
942 | else | |
943 | { | |
944 | // here: dividend > divisor | |
945 | size_t nBits = 64u; | |
946 | wxULongLongWx d; | |
947 | ||
948 | #define IS_MSB_SET(ll) ((ll.m_hi) & (1 << (8*sizeof(long) - 1))) | |
949 | ||
950 | while ( remainder < divisor ) | |
951 | { | |
952 | remainder <<= 1; | |
953 | if ( IS_MSB_SET(dividend) ) | |
954 | { | |
955 | remainder |= 1; | |
956 | } | |
957 | ||
958 | d = dividend; | |
959 | dividend <<= 1; | |
960 | ||
961 | nBits--; | |
962 | } | |
963 | ||
964 | // undo the last loop iteration | |
965 | dividend = d; | |
966 | remainder >>= 1; | |
967 | nBits++; | |
968 | ||
969 | for ( size_t i = 0; i < nBits; i++ ) | |
970 | { | |
971 | remainder <<= 1; | |
972 | if ( IS_MSB_SET(dividend) ) | |
973 | { | |
974 | remainder |= 1; | |
975 | } | |
976 | ||
977 | wxULongLongWx t = remainder - divisor; | |
978 | dividend <<= 1; | |
979 | quotient <<= 1; | |
980 | if ( !IS_MSB_SET(t) ) | |
981 | { | |
982 | quotient |= 1; | |
983 | ||
984 | remainder = t; | |
985 | } | |
986 | } | |
987 | } | |
988 | } | |
989 | ||
2ea24d9f VZ |
990 | wxLongLongWx wxLongLongWx::operator/(const wxLongLongWx& ll) const |
991 | { | |
992 | wxLongLongWx quotient, remainder; | |
993 | ||
994 | Divide(ll, quotient, remainder); | |
995 | ||
996 | return quotient; | |
997 | } | |
998 | ||
8e38fd1f RL |
999 | wxULongLongWx wxULongLongWx::operator/(const wxULongLongWx& ll) const |
1000 | { | |
1001 | wxULongLongWx quotient, remainder; | |
1002 | ||
1003 | Divide(ll, quotient, remainder); | |
1004 | ||
1005 | return quotient; | |
1006 | } | |
1007 | ||
2ea24d9f VZ |
1008 | wxLongLongWx& wxLongLongWx::operator/=(const wxLongLongWx& ll) |
1009 | { | |
1010 | wxLongLongWx quotient, remainder; | |
1011 | ||
1012 | Divide(ll, quotient, remainder); | |
1013 | ||
55dfa8d3 | 1014 | *this = quotient; |
3a994742 | 1015 | |
55dfa8d3 | 1016 | return *this; |
8b81872f VZ |
1017 | } |
1018 | ||
8e38fd1f RL |
1019 | wxULongLongWx& wxULongLongWx::operator/=(const wxULongLongWx& ll) |
1020 | { | |
c35c7d01 | 1021 | wxULongLongWx quotient, remainder; |
8e38fd1f RL |
1022 | |
1023 | Divide(ll, quotient, remainder); | |
1024 | ||
1025 | *this = quotient; | |
1026 | ||
1027 | return *this; | |
1028 | } | |
1029 | ||
2ea24d9f VZ |
1030 | wxLongLongWx wxLongLongWx::operator%(const wxLongLongWx& ll) const |
1031 | { | |
1032 | wxLongLongWx quotient, remainder; | |
1033 | ||
1034 | Divide(ll, quotient, remainder); | |
1035 | ||
1036 | return remainder; | |
1037 | } | |
1038 | ||
8e38fd1f RL |
1039 | wxULongLongWx wxULongLongWx::operator%(const wxULongLongWx& ll) const |
1040 | { | |
1041 | wxULongLongWx quotient, remainder; | |
1042 | ||
1043 | Divide(ll, quotient, remainder); | |
1044 | ||
1045 | return remainder; | |
1046 | } | |
1047 | ||
2ea24d9f VZ |
1048 | // ---------------------------------------------------------------------------- |
1049 | // misc | |
1050 | // ---------------------------------------------------------------------------- | |
1051 | ||
8b81872f VZ |
1052 | // temporary - just for testing |
1053 | void *wxLongLongWx::asArray(void) const | |
1054 | { | |
1055 | static unsigned char temp[8]; | |
1056 | ||
13111b2a VZ |
1057 | temp[0] = (char)((m_hi >> 24) & 0xFF); |
1058 | temp[1] = (char)((m_hi >> 16) & 0xFF); | |
1059 | temp[2] = (char)((m_hi >> 8) & 0xFF); | |
1060 | temp[3] = (char)((m_hi >> 0) & 0xFF); | |
1061 | temp[4] = (char)((m_lo >> 24) & 0xFF); | |
1062 | temp[5] = (char)((m_lo >> 16) & 0xFF); | |
1063 | temp[6] = (char)((m_lo >> 8) & 0xFF); | |
1064 | temp[7] = (char)((m_lo >> 0) & 0xFF); | |
8b81872f VZ |
1065 | |
1066 | return temp; | |
1067 | } | |
1068 | ||
8e38fd1f RL |
1069 | void *wxULongLongWx::asArray(void) const |
1070 | { | |
1071 | static unsigned char temp[8]; | |
1072 | ||
1073 | temp[0] = (char)((m_hi >> 24) & 0xFF); | |
1074 | temp[1] = (char)((m_hi >> 16) & 0xFF); | |
1075 | temp[2] = (char)((m_hi >> 8) & 0xFF); | |
1076 | temp[3] = (char)((m_hi >> 0) & 0xFF); | |
1077 | temp[4] = (char)((m_lo >> 24) & 0xFF); | |
1078 | temp[5] = (char)((m_lo >> 16) & 0xFF); | |
1079 | temp[6] = (char)((m_lo >> 8) & 0xFF); | |
1080 | temp[7] = (char)((m_lo >> 0) & 0xFF); | |
1081 | ||
1082 | return temp; | |
1083 | } | |
1084 | ||
3a994742 | 1085 | #endif // wxUSE_LONGLONG_WX |
8b81872f | 1086 | |
842215bb WS |
1087 | #define LL_TO_STRING(name) \ |
1088 | wxString name::ToString() const \ | |
1089 | { \ | |
1090 | /* TODO: this is awfully inefficient, anything better? */ \ | |
1091 | wxString result; \ | |
1092 | \ | |
1093 | name ll = *this; \ | |
1094 | \ | |
21b9b5e2 VZ |
1095 | bool neg = ll < 0; \ |
1096 | if ( neg ) \ | |
842215bb | 1097 | { \ |
21b9b5e2 VZ |
1098 | while ( ll != 0 ) \ |
1099 | { \ | |
1100 | long digit = (ll % 10).ToLong(); \ | |
1101 | result.Prepend((wxChar)(_T('0') - digit)); \ | |
1102 | ll /= 10; \ | |
1103 | } \ | |
842215bb WS |
1104 | } \ |
1105 | else \ | |
1106 | { \ | |
21b9b5e2 VZ |
1107 | while ( ll != 0 ) \ |
1108 | { \ | |
1109 | long digit = (ll % 10).ToLong(); \ | |
1110 | result.Prepend((wxChar)(_T('0') + digit)); \ | |
1111 | ll /= 10; \ | |
1112 | } \ | |
842215bb WS |
1113 | } \ |
1114 | \ | |
1115 | if ( result.empty() ) \ | |
1116 | result = _T('0'); \ | |
1117 | else if ( neg ) \ | |
1118 | result.Prepend(_T('-')); \ | |
1119 | \ | |
1120 | return result; \ | |
3a994742 | 1121 | } |
8b81872f | 1122 | |
842215bb WS |
1123 | #define ULL_TO_STRING(name) \ |
1124 | wxString name::ToString() const \ | |
1125 | { \ | |
1126 | /* TODO: this is awfully inefficient, anything better? */ \ | |
1127 | wxString result; \ | |
1128 | \ | |
1129 | name ll = *this; \ | |
1130 | \ | |
1131 | while ( ll != 0 ) \ | |
1132 | { \ | |
1133 | result.Prepend((wxChar)(_T('0') + (ll % 10).ToULong())); \ | |
1134 | ll /= 10; \ | |
1135 | } \ | |
1136 | \ | |
1137 | if ( result.empty() ) \ | |
1138 | result = _T('0'); \ | |
1139 | \ | |
1140 | return result; \ | |
8b81872f VZ |
1141 | } |
1142 | ||
8e38fd1f | 1143 | #if wxUSE_LONGLONG_NATIVE |
842215bb WS |
1144 | LL_TO_STRING(wxLongLongNative) |
1145 | ULL_TO_STRING(wxULongLongNative) | |
8e38fd1f | 1146 | #endif |
8e38fd1f | 1147 | |
842215bb WS |
1148 | #if wxUSE_LONGLONG_WX |
1149 | LL_TO_STRING(wxLongLongWx) | |
1150 | ULL_TO_STRING(wxULongLongWx) | |
1151 | #endif | |
8e38fd1f | 1152 | |
3a994742 VZ |
1153 | #if wxUSE_STD_IOSTREAM |
1154 | ||
1155 | // input/output | |
a353dc98 | 1156 | WXDLLIMPEXP_BASE |
3a994742 VZ |
1157 | wxSTD ostream& operator<< (wxSTD ostream& o, const wxLongLong& ll) |
1158 | { | |
1159 | return o << ll.ToString(); | |
1160 | } | |
1161 | ||
a353dc98 | 1162 | WXDLLIMPEXP_BASE |
8e38fd1f RL |
1163 | wxSTD ostream& operator<< (wxSTD ostream& o, const wxULongLong& ll) |
1164 | { | |
1165 | return o << ll.ToString(); | |
1166 | } | |
1167 | ||
3a994742 | 1168 | #endif // wxUSE_STD_IOSTREAM |
8b81872f | 1169 | |
059a684d | 1170 | WXDLLIMPEXP_BASE wxString& operator<< (wxString& s, const wxLongLong& ll) |
51496782 WS |
1171 | { |
1172 | return s << ll.ToString(); | |
1173 | } | |
1174 | ||
059a684d | 1175 | WXDLLIMPEXP_BASE wxString& operator<< (wxString& s, const wxULongLong& ll) |
51496782 WS |
1176 | { |
1177 | return s << ll.ToString(); | |
1178 | } | |
1179 | ||
4e57b0d4 | 1180 | #endif // wxUSE_LONGLONG |