HEIMDAL: move code from source4/heimdal* to third_party/heimdal*
[samba.git] / third_party / heimdal / lib / hcrypto / libtommath / bn_mp_sub.c
1 #include "tommath_private.h"
2 #ifdef BN_MP_SUB_C
3 /* LibTomMath, multiple-precision integer library -- Tom St Denis */
4 /* SPDX-License-Identifier: Unlicense */
5
6 /* high level subtraction (handles signs) */
7 mp_err mp_sub(const mp_int *a, const mp_int *b, mp_int *c)
8 {
9    mp_sign sa = a->sign, sb = b->sign;
10    mp_err err;
11
12    if (sa != sb) {
13       /* subtract a negative from a positive, OR */
14       /* subtract a positive from a negative. */
15       /* In either case, ADD their magnitudes, */
16       /* and use the sign of the first number. */
17       c->sign = sa;
18       err = s_mp_add(a, b, c);
19    } else {
20       /* subtract a positive from a positive, OR */
21       /* subtract a negative from a negative. */
22       /* First, take the difference between their */
23       /* magnitudes, then... */
24       if (mp_cmp_mag(a, b) != MP_LT) {
25          /* Copy the sign from the first */
26          c->sign = sa;
27          /* The first has a larger or equal magnitude */
28          err = s_mp_sub(a, b, c);
29       } else {
30          /* The result has the *opposite* sign from */
31          /* the first number. */
32          c->sign = (sa == MP_ZPOS) ? MP_NEG : MP_ZPOS;
33          /* The second has a larger magnitude */
34          err = s_mp_sub(b, a, c);
35       }
36    }
37    return err;
38 }
39
40 #endif