2018-03-02 10:48:08 +00:00
|
|
|
# Mpint
|
|
|
|
# Copyright 2018 Status Research & Development GmbH
|
|
|
|
# Licensed under either of
|
|
|
|
#
|
|
|
|
# * Apache License, version 2.0, ([LICENSE-APACHE](LICENSE-APACHE) or http://www.apache.org/licenses/LICENSE-2.0)
|
|
|
|
# * MIT license ([LICENSE-MIT](LICENSE-MIT) or http://opensource.org/licenses/MIT)
|
|
|
|
#
|
|
|
|
# at your option. This file may not be copied, modified, or distributed except according to those terms.
|
2018-02-16 10:33:11 +00:00
|
|
|
|
2018-03-28 18:45:39 +00:00
|
|
|
import ./uint_type, ./size_mpuintimpl, ./conversion
|
2018-02-16 10:33:11 +00:00
|
|
|
|
|
|
|
|
2018-03-26 09:46:24 +00:00
|
|
|
proc `not`*(x: MpUintImpl): MpUintImpl {.noInit, noSideEffect, inline.}=
|
2018-02-16 10:33:11 +00:00
|
|
|
## Bitwise complement of unsigned integer x
|
|
|
|
result.lo = not x.lo
|
|
|
|
result.hi = not x.hi
|
|
|
|
|
2018-03-26 09:46:24 +00:00
|
|
|
proc `or`*(x, y: MpUintImpl): MpUintImpl {.noInit, noSideEffect, inline.}=
|
2018-02-16 10:33:11 +00:00
|
|
|
## `Bitwise or` of numbers x and y
|
|
|
|
result.lo = x.lo or y.lo
|
|
|
|
result.hi = x.hi or y.hi
|
|
|
|
|
2018-03-26 09:46:24 +00:00
|
|
|
proc `and`*(x, y: MpUintImpl): MpUintImpl {.noInit, noSideEffect, inline.}=
|
2018-02-16 10:33:11 +00:00
|
|
|
## `Bitwise and` of numbers x and y
|
|
|
|
result.lo = x.lo and y.lo
|
|
|
|
result.hi = x.hi and y.hi
|
|
|
|
|
2018-03-26 09:46:24 +00:00
|
|
|
proc `xor`*(x, y: MpUintImpl): MpUintImpl {.noInit, noSideEffect, inline.}=
|
2018-02-16 10:33:11 +00:00
|
|
|
## `Bitwise xor` of numbers x and y
|
|
|
|
result.lo = x.lo xor y.lo
|
2018-02-16 12:54:38 +00:00
|
|
|
result.hi = x.hi xor y.hi
|
|
|
|
|
2018-03-28 18:45:39 +00:00
|
|
|
proc `shl`*(x: MpUintImpl, y: SomeInteger): MpUintImpl {.inline, noSideEffect.}=
|
2018-02-16 12:54:38 +00:00
|
|
|
## Compute the `shift left` operation of x and y
|
2018-02-17 11:44:51 +00:00
|
|
|
# Note: inlining this poses codegen/aliasing issue when doing `x = x shl 1`
|
2018-03-26 15:39:34 +00:00
|
|
|
const halfSize = size_mpuintimpl(x) div 2
|
2018-02-16 12:54:38 +00:00
|
|
|
|
2018-02-17 00:11:18 +00:00
|
|
|
result.hi = (x.hi shl y) or (x.lo shl (y - halfSize))
|
2018-03-28 18:45:39 +00:00
|
|
|
if y < halfSize:
|
|
|
|
result.lo = x.lo shl y
|
2018-02-16 12:54:38 +00:00
|
|
|
|
2018-03-28 18:45:39 +00:00
|
|
|
proc `shr`*(x: MpUintImpl, y: SomeInteger): MpUintImpl {.inline, noSideEffect.}=
|
2018-02-16 12:54:38 +00:00
|
|
|
## Compute the `shift right` operation of x and y
|
2018-03-26 15:39:34 +00:00
|
|
|
const halfSize = size_mpuintimpl(x) div 2
|
2018-02-16 12:54:38 +00:00
|
|
|
|
2018-03-28 18:45:39 +00:00
|
|
|
let overflow = y < halfSize
|
2018-02-16 12:54:38 +00:00
|
|
|
|
2018-03-28 18:45:39 +00:00
|
|
|
result.lo = (x.lo shr y) or (
|
|
|
|
if overflow: x.hi shl (halfSize - y) else: x.hi shr (y - halfSize)
|
|
|
|
)
|
|
|
|
if overflow:
|
|
|
|
result.hi = x.hi shr y
|