Replace BN_lshift1()/BN_rshift1() with calls to BN_lshift()/BN_rshift().
authorjsing <jsing@openbsd.org>
Wed, 11 Jan 2023 04:26:24 +0000 (04:26 +0000)
committerjsing <jsing@openbsd.org>
Wed, 11 Jan 2023 04:26:24 +0000 (04:26 +0000)
Currently, BN_lshift1() and BN_rshift1() are separate implementations
that are intended to be faster since the shift is known (and only one bit
crosses a word boundary). However, with the rewrite of BN_lshift() and
BN_rshift(), they are either slower or only minimally faster (depending
on architecture).

Avoid duplication and turn BN_lshift1()/BN_rshift1() into functions that
call inlined versions of BN_lshift()/BN_rshift(), making BN_lshift() and
BN_rshift() call the same inlined implementation. This results in a single
implementation and BN_lshift1()/BN_rshift1() that out perform the previous
versions (in part due to compiler optimisation).

Now that none of the original code exists, replace the license and
copyright for this file.

ok tb@

lib/libcrypto/bn/bn_shift.c

index 4b9a133..5fd6687 100644 (file)
-/* $OpenBSD: bn_shift.c,v 1.19 2023/01/10 04:13:22 jsing Exp $ */
-/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
- * All rights reserved.
+/* $OpenBSD: bn_shift.c,v 1.20 2023/01/11 04:26:24 jsing Exp $ */
+/*
+ * Copyright (c) 2022, 2023 Joel Sing <jsing@openbsd.org>
  *
- * This package is an SSL implementation written
- * by Eric Young (eay@cryptsoft.com).
- * The implementation was written so as to conform with Netscapes SSL.
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
  *
- * This library is free for commercial and non-commercial use as long as
- * the following conditions are aheared to.  The following conditions
- * apply to all code found in this distribution, be it the RC4, RSA,
- * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
- * included with this distribution is covered by the same copyright terms
- * except that the holder is Tim Hudson (tjh@cryptsoft.com).
- *
- * Copyright remains Eric Young's, and as such any Copyright notices in
- * the code are not to be removed.
- * If this package is used in a product, Eric Young should be given attribution
- * as the author of the parts of the library used.
- * This can be in the form of a textual message at program startup or
- * in documentation (online or textual) provided with the package.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the copyright
- *    notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- *    notice, this list of conditions and the following disclaimer in the
- *    documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- *    must display the following acknowledgement:
- *    "This product includes cryptographic software written by
- *     Eric Young (eay@cryptsoft.com)"
- *    The word 'cryptographic' can be left out if the rouines from the library
- *    being used are not cryptographic related :-).
- * 4. If you include any Windows specific code (or a derivative thereof) from
- *    the apps directory (application code) you must include an acknowledgement:
- *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
- *
- * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- * The licence and distribution terms for any publically available version or
- * derivative of this code cannot be changed.  i.e. this code cannot simply be
- * copied and put under another distribution licence
- * [including the GNU Public Licence.]
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */
 
-#include <stdio.h>
-#include <string.h>
-
+#include <openssl/bn.h>
 #include <openssl/err.h>
 
 #include "bn_local.h"
 
-int
-BN_lshift1(BIGNUM *r, const BIGNUM *a)
-{
-       BN_ULONG *ap, *rp, t, c;
-       int i;
-
-
-       if (r != a) {
-               r->neg = a->neg;
-               if (!bn_wexpand(r, a->top + 1))
-                       return (0);
-               r->top = a->top;
-       } else {
-               if (!bn_wexpand(r, a->top + 1))
-                       return (0);
-       }
-       ap = a->d;
-       rp = r->d;
-       c = 0;
-       for (i = 0; i < a->top; i++) {
-               t= *(ap++);
-               *(rp++) = ((t << 1) | c) & BN_MASK2;
-               c = (t & BN_TBIT) ? 1 : 0;
-       }
-       if (c) {
-               *rp = 1;
-               r->top++;
-       }
-       return (1);
-}
-
-int
-BN_rshift1(BIGNUM *r, const BIGNUM *a)
-{
-       BN_ULONG *ap, *rp, t, c;
-       int i, j;
-
-
-       if (BN_is_zero(a)) {
-               BN_zero(r);
-               return (1);
-       }
-       i = a->top;
-       ap = a->d;
-       j = i - (ap[i - 1]==1);
-       if (a != r) {
-               if (!bn_wexpand(r, j))
-                       return (0);
-               r->neg = a->neg;
-       }
-       rp = r->d;
-       t = ap[--i];
-       c = (t & 1) ? BN_TBIT : 0;
-       if (t >>= 1)
-               rp[i] = t;
-       while (i > 0) {
-               t = ap[--i];
-               rp[i] = ((t >> 1) & BN_MASK2) | c;
-               c = (t & 1) ? BN_TBIT : 0;
-       }
-       r->top = j;
-       return (1);
-}
-
-int
-BN_lshift(BIGNUM *r, const BIGNUM *a, int n)
+static inline int
+bn_lshift(BIGNUM *r, const BIGNUM *a, int n)
 {
        size_t count, shift_bits, shift_words;
        size_t lshift, rshift;
@@ -197,8 +90,8 @@ BN_lshift(BIGNUM *r, const BIGNUM *a, int n)
        return 1;
 }
 
-int
-BN_rshift(BIGNUM *r, const BIGNUM *a, int n)
+static inline int
+bn_rshift(BIGNUM *r, const BIGNUM *a, int n)
 {
        size_t count, shift_bits, shift_words;
        size_t lshift, rshift;
@@ -252,3 +145,27 @@ BN_rshift(BIGNUM *r, const BIGNUM *a, int n)
 
        return 1;
 }
+
+int
+BN_lshift1(BIGNUM *r, const BIGNUM *a)
+{
+       return bn_lshift(r, a, 1);
+}
+
+int
+BN_lshift(BIGNUM *r, const BIGNUM *a, int n)
+{
+       return bn_lshift(r, a, n);
+}
+
+int
+BN_rshift1(BIGNUM *r, const BIGNUM *a)
+{
+       return bn_rshift(r, a, 1);
+}
+
+int
+BN_rshift(BIGNUM *r, const BIGNUM *a, int n)
+{
+       return bn_rshift(r, a, n);
+}