2020-02-16 00:43:17 +00:00
|
|
|
# Constantine
|
|
|
|
# Copyright (c) 2018-2019 Status Research & Development GmbH
|
|
|
|
# Copyright (c) 2020-Present Mamy André-Ratsimbazafy
|
|
|
|
# Licensed and distributed under either of
|
|
|
|
# * MIT license (license terms in the root directory or at http://opensource.org/licenses/MIT).
|
|
|
|
# * Apache v2 license (license terms in the root directory or at http://www.apache.org/licenses/LICENSE-2.0).
|
|
|
|
# at your option. This file may not be copied, modified, or distributed except according to those terms.
|
|
|
|
|
|
|
|
# ############################################################
|
|
|
|
#
|
|
|
|
# Benchmark of the conversion from Big Int to Fq
|
|
|
|
#
|
|
|
|
# ############################################################
|
|
|
|
|
|
|
|
# 2 implementations are possible
|
|
|
|
# - 1 based on Montgomery Multiplication
|
|
|
|
# - 1 based on modular left shift which involves multiple divisions
|
|
|
|
|
|
|
|
import
|
|
|
|
../constantine/config/[common, curves],
|
2020-02-25 02:07:42 +00:00
|
|
|
../constantine/arithmetic/[bigints_checked, finite_fields],
|
2020-02-16 00:43:17 +00:00
|
|
|
random, std/monotimes, times, strformat
|
|
|
|
|
|
|
|
const Iters = 1_000_000
|
|
|
|
|
|
|
|
randomize(1234)
|
|
|
|
|
|
|
|
proc main() =
|
|
|
|
var x: BigInt[381]
|
|
|
|
x.setInternalBitLength()
|
|
|
|
for i in 0 ..< x.limbs.len - 1:
|
|
|
|
# Set x to a random value guaranteed below the prime
|
|
|
|
x.limbs[i] = Word(rand(BaseType.high.int))
|
|
|
|
|
|
|
|
|
|
|
|
let start = getMonotime()
|
|
|
|
for _ in 0 ..< Iters:
|
|
|
|
let y = Fq[BLS12_381].fromBig(x)
|
|
|
|
let stop = getMonotime()
|
|
|
|
|
|
|
|
echo &"Time for {Iters} iterations: {inMilliseconds(stop-start)} ms"
|
|
|
|
|
|
|
|
|
|
|
|
main()
|
|
|
|
# 1_000_000 iterations with -d:danger on i9-9980XE all-core turbo 4.1GHz
|
|
|
|
# Montgomery Multiplication based: 254ms
|
|
|
|
# shlAddMod based (using assembly div2n1n!!): 907 ms
|
|
|
|
# Note: shlAddMod will be even slower when division is made constant-time
|