kc3-lang/libtommath/bn_mp_tc_or.c

• Show log

  Commit

• Hash : c4fb2241
  Author :
  Date : 2019-04-09T11:08:26
  

  rename macros in tommath_private to use MP_* prefix

Download

• bn_mp_tc_or.c

• #include "tommath_private.h"
  #ifdef BN_MP_TC_OR_C
  /* LibTomMath, multiple-precision integer library -- Tom St Denis */
  /* SPDX-License-Identifier: Unlicense */
  
  /* two complement or */
  int mp_tc_or(const mp_int *a, const mp_int *b, mp_int *c)
  {
     int res = MP_OKAY, bits, abits, bbits;
     int sa = a->sign, sb = b->sign;
     mp_int *mx = NULL, _mx, acpy, bcpy;
  
     if ((sa == MP_NEG) || (sb == MP_NEG)) {
        abits = mp_count_bits(a);
        bbits = mp_count_bits(b);
        bits = MP_MAX(abits, bbits);
        res = mp_init_set_int(&_mx, 1uL);
        if (res != MP_OKAY) {
           goto end;
        }
  
        mx = &_mx;
        res = mp_mul_2d(mx, bits + 1, mx);
        if (res != MP_OKAY) {
           goto end;
        }
  
        if (sa == MP_NEG) {
           res = mp_init(&acpy);
           if (res != MP_OKAY) {
              goto end;
           }
  
           res = mp_add(mx, a, &acpy);
           if (res != MP_OKAY) {
              mp_clear(&acpy);
              goto end;
           }
           a = &acpy;
        }
        if (sb == MP_NEG) {
           res = mp_init(&bcpy);
           if (res != MP_OKAY) {
              goto end;
           }
  
           res = mp_add(mx, b, &bcpy);
           if (res != MP_OKAY) {
              mp_clear(&bcpy);
              goto end;
           }
           b = &bcpy;
        }
     }
  
     res = mp_or(a, b, c);
  
     if (((sa == MP_NEG) || (sb == MP_NEG)) && (res == MP_OKAY)) {
        res = mp_sub(c, mx, c);
     }
  
  end:
     if (a == &acpy) {
        mp_clear(&acpy);
     }
  
     if (b == &bcpy) {
        mp_clear(&bcpy);
     }
  
     if (mx == &_mx) {
        mp_clear(mx);
     }
  
     return res;
  }
  #endif
  

Download