diff --git a/wolfcrypt/src/ecc25519_montgomery.q b/wolfcrypt/src/ecc25519_montgomery.q deleted file mode 100644 index 39a2cb134..000000000 --- a/wolfcrypt/src/ecc25519_montgomery.q +++ /dev/null @@ -1,99 +0,0 @@ -#/* ecc25519_montgomery.q -# * -# * Copyright (C) 2006-2015 wolfSSL Inc. -# * -# * This file is part of wolfSSL. (formerly known as CyaSSL) -# * -# * wolfSSL is free software; you can redistribute it and/or modify -# * it under the terms of the GNU General Public License as published by -# * the Free Software Foundation; either version 2 of the License, or -# * (at your option) any later version. -# * -# * wolfSSL is distributed in the hope that it will be useful, -# * but WITHOUT ANY WARRANTY; without even the implied warranty of -# * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# * GNU General Public License for more details. -# * -# * You should have received a copy of the GNU General Public License -# * along with this program; if not, write to the Free Software -# * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA -# * -# * From Daniel J Bernstein's curve25519 ref10 work. -# */ - -:name:fe:x2:z2:x3:z3:tmp0:tmp1: -fe r:var/r=fe: - -enter f:enter/f:>X2=fe#1:>Z2=fe#2:>X3=fe#3:>Z3=fe#4: -return:nofallthrough:h=fe:asm/fe_add(>h,h=fe:asm/fe_sub(>h,h=fe:asm/fe_mul(>h,h=fe:asm/fe_sq(>h,h=fe:asm/fe_mul(>h,x1,h=fe:asm/fe_mul121666(>h,z1=fe#11: -return:nofallthrough:h=fe:asm/fe_mul(>h,h=fe:#k:asm/fe_sq(>h,h,>h);: - -: - -fe z1 -fe z2 -fe z8 -fe z9 -fe z11 -fe z22 -fe z_5_0 -fe z_10_5 -fe z_10_0 -fe z_20_10 -fe z_20_0 -fe z_40_20 -fe z_40_0 -fe z_50_10 -fe z_50_0 -fe z_100_50 -fe z_100_0 -fe z_200_100 -fe z_200_0 -fe z_250_50 -fe z_250_0 -fe z_255_5 -fe z_255_21 - -enter pow225521 - -z2 = z1^2^1 -z8 = z2^2^2 -z9 = z1*z8 -z11 = z2*z9 -z22 = z11^2^1 -z_5_0 = z9*z22 -z_10_5 = z_5_0^2^5 -z_10_0 = z_10_5*z_5_0 -z_20_10 = z_10_0^2^10 -z_20_0 = z_20_10*z_10_0 -z_40_20 = z_20_0^2^20 -z_40_0 = z_40_20*z_20_0 -z_50_10 = z_40_0^2^10 -z_50_0 = z_50_10*z_10_0 -z_100_50 = z_50_0^2^50 -z_100_0 = z_100_50*z_50_0 -z_200_100 = z_100_0^2^100 -z_200_0 = z_200_100*z_100_0 -z_250_50 = z_200_0^2^50 -z_250_0 = z_250_50*z_50_0 -z_255_5 = z_250_0^2^5 -z_255_21 = z_255_5*z11 - -return