test/bntest.c:1364: error: BUFFER_OVERRUN_L2
  Offset: [0, 536870912] (⇐ [0, 1] + [0, 536870911]) Size: 3 by call to `BN_hex2bn`.
Showing all 6 steps of the trace


test/bntest.c:1364:5: Call
1362.       /* Regression test for carry propagation bug in sqr8x_reduction */
1363.       BN_hex2bn(&a, "050505050505");
1364.       BN_hex2bn(&b, "02");
            ^
1365.       BN_hex2bn(&c,
1366.           "4141414141414141414141274141414141414141414141414141414141414141"

crypto/bn/bn_print.c:141:10: <Offset trace>
139.       }
140.   
141.       for (i = 0; i <= INT_MAX / 4 && ossl_isxdigit(a[i]); i++)
                ^
142.           continue;
143.   

crypto/bn/bn_print.c:141:10: Assignment
  139.       }
  140.   
  141.       for (i = 0; i <= INT_MAX / 4 && ossl_isxdigit(a[i]); i++)
                  ^
  142.           continue;
  143.   

crypto/bn/bn_print.c:126:1: <Length trace>
124.   }
125.   
126. > int BN_hex2bn(BIGNUM **bn, const char *a)
127.   {
128.       BIGNUM *ret = NULL;

crypto/bn/bn_print.c:126:1: Parameter `*a`
  124.   }
  125.   
  126. > int BN_hex2bn(BIGNUM **bn, const char *a)
  127.   {
  128.       BIGNUM *ret = NULL;

crypto/bn/bn_print.c:141:37: Array access: Offset: [0, 536870912] (⇐ [0, 1] + [0, 536870911]) Size: 3 by call to `BN_hex2bn` 
  139.       }
  140.   
  141.       for (i = 0; i <= INT_MAX / 4 && ossl_isxdigit(a[i]); i++)
                                             ^
  142.           continue;
  143.   

int BN_hex2bn(BIGNUM **bn, const char *a)
{
    BIGNUM *ret = NULL;
    BN_ULONG l = 0;
    int neg = 0, h, m, i, j, k, c;
    int num;
    if (a == NULL || *a == '\0')
        return 0;
    if (*a == '-') {
        neg = 1;
        a++;
    }
    for (i = 0; i <= INT_MAX / 4 && ossl_isxdigit(a[i]); i++)
        continue;
    if (i == 0 || i > INT_MAX / 4)
        goto err;
    num = i + neg;
    if (bn == NULL)
        return num;
    if (*bn == NULL) {
        if ((ret = BN_new()) == NULL)
            return 0;
    } else {
        ret = *bn;
        BN_zero(ret);
    }
    if (bn_expand(ret, i * 4) == NULL)
        goto err;
    j = i;
    m = 0;
    h = 0;
    while (j > 0) {
        m = (BN_BYTES * 2 <= j) ? BN_BYTES * 2 : j;
        l = 0;
        for (;;) {
            c = a[j - m];
            k = OPENSSL_hexchar2int(c);
            if (k < 0)
                k = 0;
            l = (l << 4) | k;
            if (--m <= 0) {
                ret->d[h++] = l;
                break;
            }
        }
        j -= BN_BYTES * 2;
    }
    ret->top = h;
    bn_correct_top(ret);
    *bn = ret;
    bn_check_top(ret);
    if (ret->top != 0)
        ret->neg = neg;
    return num;
 err:
    if (*bn == NULL)
        BN_free(ret);
    return 0;
}
['static int file_modexp(STANZA *s)\n{\n    BIGNUM *a = NULL, *e = NULL, *m = NULL, *mod_exp = NULL, *ret = NULL;\n    BIGNUM *b = NULL, *c = NULL, *d = NULL;\n    int st = 0;\n    if (!TEST_ptr(a = getBN(s, "A"))\n            || !TEST_ptr(e = getBN(s, "E"))\n            || !TEST_ptr(m = getBN(s, "M"))\n            || !TEST_ptr(mod_exp = getBN(s, "ModExp"))\n            || !TEST_ptr(ret = BN_new())\n            || !TEST_ptr(d = BN_new()))\n        goto err;\n    if (!TEST_true(BN_mod_exp(ret, a, e, m, ctx))\n            || !equalBN("A ^ E (mod M)", mod_exp, ret))\n        goto err;\n    if (BN_is_odd(m)) {\n        if (!TEST_true(BN_mod_exp_mont(ret, a, e, m, ctx, NULL))\n                || !equalBN("A ^ E (mod M) (mont)", mod_exp, ret)\n                || !TEST_true(BN_mod_exp_mont_consttime(ret, a, e, m,\n                                                        ctx, NULL))\n                || !equalBN("A ^ E (mod M) (mont const", mod_exp, ret))\n            goto err;\n    }\n    BN_hex2bn(&a, "050505050505");\n    BN_hex2bn(&b, "02");\n    BN_hex2bn(&c,\n        "4141414141414141414141274141414141414141414141414141414141414141"\n        "4141414141414141414141414141414141414141414141414141414141414141"\n        "4141414141414141414141800000000000000000000000000000000000000000"\n        "0000000000000000000000000000000000000000000000000000000000000000"\n        "0000000000000000000000000000000000000000000000000000000000000000"\n        "0000000000000000000000000000000000000000000000000000000001");\n    if (!TEST_true(BN_mod_exp(d, a, b, c, ctx))\n        || !TEST_true(BN_mul(e, a, a, ctx))\n        || !TEST_BN_eq(d, e))\n        goto err;\n    st = 1;\nerr:\n    BN_free(a);\n    BN_free(b);\n    BN_free(c);\n    BN_free(d);\n    BN_free(e);\n    BN_free(m);\n    BN_free(mod_exp);\n    BN_free(ret);\n    return st;\n}', "int BN_hex2bn(BIGNUM **bn, const char *a)\n{\n    BIGNUM *ret = NULL;\n    BN_ULONG l = 0;\n    int neg = 0, h, m, i, j, k, c;\n    int num;\n    if (a == NULL || *a == '\\0')\n        return 0;\n    if (*a == '-') {\n        neg = 1;\n        a++;\n    }\n    for (i = 0; i <= INT_MAX / 4 && ossl_isxdigit(a[i]); i++)\n        continue;\n    if (i == 0 || i > INT_MAX / 4)\n        goto err;\n    num = i + neg;\n    if (bn == NULL)\n        return num;\n    if (*bn == NULL) {\n        if ((ret = BN_new()) == NULL)\n            return 0;\n    } else {\n        ret = *bn;\n        BN_zero(ret);\n    }\n    if (bn_expand(ret, i * 4) == NULL)\n        goto err;\n    j = i;\n    m = 0;\n    h = 0;\n    while (j > 0) {\n        m = (BN_BYTES * 2 <= j) ? BN_BYTES * 2 : j;\n        l = 0;\n        for (;;) {\n            c = a[j - m];\n            k = OPENSSL_hexchar2int(c);\n            if (k < 0)\n                k = 0;\n            l = (l << 4) | k;\n            if (--m <= 0) {\n                ret->d[h++] = l;\n                break;\n            }\n        }\n        j -= BN_BYTES * 2;\n    }\n    ret->top = h;\n    bn_correct_top(ret);\n    *bn = ret;\n    bn_check_top(ret);\n    if (ret->top != 0)\n        ret->neg = neg;\n    return num;\n err:\n    if (*bn == NULL)\n        BN_free(ret);\n    return 0;\n}"]