Remove some unneeded code
[openssl.git] / crypto / ec / curve448 / f_arithmetic.c
index cf685196867cfdd9dbff8c97693fbf3aa8c3a1e0..e8c5738d07aaef2c64302690b7094b3cf39b2e6d 100644 (file)
@@ -1,46 +1,46 @@
-/**
- * @cond internal
- * @file f_arithmetic.c
- * @copyright
- *   Copyright (c) 2014 Cryptography Research, Inc.  \n
- *   Released under the MIT License.  See LICENSE.txt for license information.
- * @author Mike Hamburg
- * @brief Field-specific arithmetic.
+/*
+ * Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
+ * Copyright 2014 Cryptography Research, Inc.
+ *
+ * Licensed under the OpenSSL license (the "License").  You may not use
+ * this file except in compliance with the License.  You can obtain a copy
+ * in the file LICENSE in the source distribution or at
+ * https://www.openssl.org/source/license.html
+ *
+ * Originally written by Mike Hamburg
  */
 
 #include "field.h"
 
-mask_t gf_isr (
-    gf a,
-    const gf x
-) {
+mask_t gf_isr(gf a, const gf x)
+{
     gf L0, L1, L2;
-    gf_sqr  (L1,     x );
-    gf_mul  (L2,     x,   L1 );
-    gf_sqr  (L1,   L2 );
-    gf_mul  (L2,     x,   L1 );
-    gf_sqrn (L1,   L2,     3 );
-    gf_mul  (L0,   L2,   L1 );
-    gf_sqrn (L1,   L0,     3 );
-    gf_mul  (L0,   L2,   L1 );
-    gf_sqrn (L2,   L0,     9 );
-    gf_mul  (L1,   L0,   L2 );
-    gf_sqr  (L0,   L1 );
-    gf_mul  (L2,     x,   L0 );
-    gf_sqrn (L0,   L2,    18 );
-    gf_mul  (L2,   L1,   L0 );
-    gf_sqrn (L0,   L2,    37 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqrn (L0,   L1,    37 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqrn (L0,   L1,   111 );
-    gf_mul  (L2,   L1,   L0 );
-    gf_sqr  (L0,   L2 );
-    gf_mul  (L1,     x,   L0 );
-    gf_sqrn (L0,   L1,   223 );
-    gf_mul  (L1,   L2,   L0 );
-    gf_sqr  (L2, L1);
-    gf_mul  (L0, L2, x);
-    gf_copy(a,L1);
-    return gf_eq(L0,ONE);
+    gf_sqr(L1, x);
+    gf_mul(L2, x, L1);
+    gf_sqr(L1, L2);
+    gf_mul(L2, x, L1);
+    gf_sqrn(L1, L2, 3);
+    gf_mul(L0, L2, L1);
+    gf_sqrn(L1, L0, 3);
+    gf_mul(L0, L2, L1);
+    gf_sqrn(L2, L0, 9);
+    gf_mul(L1, L0, L2);
+    gf_sqr(L0, L1);
+    gf_mul(L2, x, L0);
+    gf_sqrn(L0, L2, 18);
+    gf_mul(L2, L1, L0);
+    gf_sqrn(L0, L2, 37);
+    gf_mul(L1, L2, L0);
+    gf_sqrn(L0, L1, 37);
+    gf_mul(L1, L2, L0);
+    gf_sqrn(L0, L1, 111);
+    gf_mul(L2, L1, L0);
+    gf_sqr(L0, L2);
+    gf_mul(L1, x, L0);
+    gf_sqrn(L0, L1, 223);
+    gf_mul(L1, L2, L0);
+    gf_sqr(L2, L1);
+    gf_mul(L0, L2, x);
+    gf_copy(a, L1);
+    return gf_eq(L0, ONE);
 }