Coverage Report

Created: 2025-12-31 06:58

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/openssl30/crypto/x509/x509_lu.c
Line
Count
Source
1
/*
2
 * Copyright 1995-2025 The OpenSSL Project Authors. All Rights Reserved.
3
 *
4
 * Licensed under the Apache License 2.0 (the "License").  You may not use
5
 * this file except in compliance with the License.  You can obtain a copy
6
 * in the file LICENSE in the source distribution or at
7
 * https://www.openssl.org/source/license.html
8
 */
9
10
#include <stdio.h>
11
#include "internal/cryptlib.h"
12
#include "internal/refcount.h"
13
#include <openssl/x509.h>
14
#include "crypto/x509.h"
15
#include <openssl/x509v3.h>
16
#include "x509_local.h"
17
18
X509_LOOKUP *X509_LOOKUP_new(X509_LOOKUP_METHOD *method)
19
0
{
20
0
    X509_LOOKUP *ret = OPENSSL_zalloc(sizeof(*ret));
21
22
0
    if (ret == NULL) {
23
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
24
0
        return NULL;
25
0
    }
26
27
0
    ret->method = method;
28
0
    if (method->new_item != NULL && method->new_item(ret) == 0) {
29
0
        OPENSSL_free(ret);
30
0
        return NULL;
31
0
    }
32
0
    return ret;
33
0
}
34
35
void X509_LOOKUP_free(X509_LOOKUP *ctx)
36
0
{
37
0
    if (ctx == NULL)
38
0
        return;
39
0
    if ((ctx->method != NULL) && (ctx->method->free != NULL))
40
0
        (*ctx->method->free)(ctx);
41
0
    OPENSSL_free(ctx);
42
0
}
43
44
int X509_STORE_lock(X509_STORE *s)
45
75.5k
{
46
75.5k
    return CRYPTO_THREAD_write_lock(s->lock);
47
75.5k
}
48
49
int X509_STORE_unlock(X509_STORE *s)
50
175k
{
51
175k
    return CRYPTO_THREAD_unlock(s->lock);
52
175k
}
53
54
int X509_LOOKUP_init(X509_LOOKUP *ctx)
55
0
{
56
0
    if (ctx->method == NULL)
57
0
        return 0;
58
0
    if (ctx->method->init != NULL)
59
0
        return ctx->method->init(ctx);
60
0
    else
61
0
        return 1;
62
0
}
63
64
int X509_LOOKUP_shutdown(X509_LOOKUP *ctx)
65
0
{
66
0
    if (ctx->method == NULL)
67
0
        return 0;
68
0
    if (ctx->method->shutdown != NULL)
69
0
        return ctx->method->shutdown(ctx);
70
0
    else
71
0
        return 1;
72
0
}
73
74
int X509_LOOKUP_ctrl_ex(X509_LOOKUP *ctx, int cmd, const char *argc, long argl,
75
    char **ret, OSSL_LIB_CTX *libctx, const char *propq)
76
0
{
77
0
    if (ctx->method == NULL)
78
0
        return -1;
79
0
    if (ctx->method->ctrl_ex != NULL)
80
0
        return ctx->method->ctrl_ex(ctx, cmd, argc, argl, ret, libctx, propq);
81
0
    if (ctx->method->ctrl != NULL)
82
0
        return ctx->method->ctrl(ctx, cmd, argc, argl, ret);
83
0
    return 1;
84
0
}
85
86
int X509_LOOKUP_ctrl(X509_LOOKUP *ctx, int cmd, const char *argc, long argl,
87
    char **ret)
88
0
{
89
0
    return X509_LOOKUP_ctrl_ex(ctx, cmd, argc, argl, ret, NULL, NULL);
90
0
}
91
92
int X509_LOOKUP_by_subject_ex(X509_LOOKUP *ctx, X509_LOOKUP_TYPE type,
93
    const X509_NAME *name, X509_OBJECT *ret,
94
    OSSL_LIB_CTX *libctx, const char *propq)
95
0
{
96
0
    if (ctx->skip
97
0
        || ctx->method == NULL
98
0
        || (ctx->method->get_by_subject == NULL
99
0
            && ctx->method->get_by_subject_ex == NULL))
100
0
        return 0;
101
0
    if (ctx->method->get_by_subject_ex != NULL)
102
0
        return ctx->method->get_by_subject_ex(ctx, type, name, ret, libctx,
103
0
            propq);
104
0
    else
105
0
        return ctx->method->get_by_subject(ctx, type, name, ret);
106
0
}
107
108
int X509_LOOKUP_by_subject(X509_LOOKUP *ctx, X509_LOOKUP_TYPE type,
109
    const X509_NAME *name, X509_OBJECT *ret)
110
0
{
111
0
    return X509_LOOKUP_by_subject_ex(ctx, type, name, ret, NULL, NULL);
112
0
}
113
114
int X509_LOOKUP_by_issuer_serial(X509_LOOKUP *ctx, X509_LOOKUP_TYPE type,
115
    const X509_NAME *name,
116
    const ASN1_INTEGER *serial,
117
    X509_OBJECT *ret)
118
0
{
119
0
    if ((ctx->method == NULL) || (ctx->method->get_by_issuer_serial == NULL))
120
0
        return 0;
121
0
    return ctx->method->get_by_issuer_serial(ctx, type, name, serial, ret);
122
0
}
123
124
int X509_LOOKUP_by_fingerprint(X509_LOOKUP *ctx, X509_LOOKUP_TYPE type,
125
    const unsigned char *bytes, int len,
126
    X509_OBJECT *ret)
127
0
{
128
0
    if ((ctx->method == NULL) || (ctx->method->get_by_fingerprint == NULL))
129
0
        return 0;
130
0
    return ctx->method->get_by_fingerprint(ctx, type, bytes, len, ret);
131
0
}
132
133
int X509_LOOKUP_by_alias(X509_LOOKUP *ctx, X509_LOOKUP_TYPE type,
134
    const char *str, int len, X509_OBJECT *ret)
135
0
{
136
0
    if ((ctx->method == NULL) || (ctx->method->get_by_alias == NULL))
137
0
        return 0;
138
0
    return ctx->method->get_by_alias(ctx, type, str, len, ret);
139
0
}
140
141
int X509_LOOKUP_set_method_data(X509_LOOKUP *ctx, void *data)
142
0
{
143
0
    ctx->method_data = data;
144
0
    return 1;
145
0
}
146
147
void *X509_LOOKUP_get_method_data(const X509_LOOKUP *ctx)
148
0
{
149
0
    return ctx->method_data;
150
0
}
151
152
X509_STORE *X509_LOOKUP_get_store(const X509_LOOKUP *ctx)
153
0
{
154
0
    return ctx->store_ctx;
155
0
}
156
157
static int x509_object_cmp(const X509_OBJECT *const *a,
158
    const X509_OBJECT *const *b)
159
31.2k
{
160
31.2k
    int ret;
161
162
31.2k
    ret = ((*a)->type - (*b)->type);
163
31.2k
    if (ret)
164
3.19k
        return ret;
165
28.0k
    switch ((*a)->type) {
166
28.0k
    case X509_LU_X509:
167
28.0k
        ret = X509_subject_name_cmp((*a)->data.x509, (*b)->data.x509);
168
28.0k
        break;
169
0
    case X509_LU_CRL:
170
0
        ret = X509_CRL_cmp((*a)->data.crl, (*b)->data.crl);
171
0
        break;
172
0
    case X509_LU_NONE:
173
        /* abort(); */
174
0
        return 0;
175
28.0k
    }
176
28.0k
    return ret;
177
28.0k
}
178
179
X509_STORE *X509_STORE_new(void)
180
13.2k
{
181
13.2k
    X509_STORE *ret = OPENSSL_zalloc(sizeof(*ret));
182
183
13.2k
    if (ret == NULL) {
184
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
185
0
        return NULL;
186
0
    }
187
13.2k
    if ((ret->objs = sk_X509_OBJECT_new(x509_object_cmp)) == NULL) {
188
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
189
0
        goto err;
190
0
    }
191
13.2k
    ret->cache = 1;
192
13.2k
    if ((ret->get_cert_methods = sk_X509_LOOKUP_new_null()) == NULL) {
193
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
194
0
        goto err;
195
0
    }
196
197
13.2k
    if ((ret->param = X509_VERIFY_PARAM_new()) == NULL) {
198
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
199
0
        goto err;
200
0
    }
201
13.2k
    if (!CRYPTO_new_ex_data(CRYPTO_EX_INDEX_X509_STORE, ret, &ret->ex_data)) {
202
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
203
0
        goto err;
204
0
    }
205
206
13.2k
    ret->lock = CRYPTO_THREAD_lock_new();
207
13.2k
    if (ret->lock == NULL) {
208
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
209
0
        goto err;
210
0
    }
211
13.2k
    ret->references = 1;
212
13.2k
    return ret;
213
214
0
err:
215
0
    X509_VERIFY_PARAM_free(ret->param);
216
0
    sk_X509_OBJECT_free(ret->objs);
217
0
    sk_X509_LOOKUP_free(ret->get_cert_methods);
218
0
    OPENSSL_free(ret);
219
0
    return NULL;
220
13.2k
}
221
222
void X509_STORE_free(X509_STORE *vfy)
223
965k
{
224
965k
    int i;
225
965k
    STACK_OF(X509_LOOKUP) *sk;
226
965k
    X509_LOOKUP *lu;
227
228
965k
    if (vfy == NULL)
229
793k
        return;
230
172k
    CRYPTO_DOWN_REF(&vfy->references, &i, vfy->lock);
231
172k
    REF_PRINT_COUNT("X509_STORE", vfy);
232
172k
    if (i > 0)
233
0
        return;
234
172k
    REF_ASSERT_ISNT(i < 0);
235
236
172k
    sk = vfy->get_cert_methods;
237
172k
    for (i = 0; i < sk_X509_LOOKUP_num(sk); i++) {
238
0
        lu = sk_X509_LOOKUP_value(sk, i);
239
0
        X509_LOOKUP_shutdown(lu);
240
0
        X509_LOOKUP_free(lu);
241
0
    }
242
172k
    sk_X509_LOOKUP_free(sk);
243
172k
    sk_X509_OBJECT_pop_free(vfy->objs, X509_OBJECT_free);
244
245
172k
    CRYPTO_free_ex_data(CRYPTO_EX_INDEX_X509_STORE, vfy, &vfy->ex_data);
246
172k
    X509_VERIFY_PARAM_free(vfy->param);
247
172k
    CRYPTO_THREAD_lock_free(vfy->lock);
248
172k
    OPENSSL_free(vfy);
249
172k
}
250
251
int X509_STORE_up_ref(X509_STORE *vfy)
252
0
{
253
0
    int i;
254
255
0
    if (CRYPTO_UP_REF(&vfy->references, &i, vfy->lock) <= 0)
256
0
        return 0;
257
258
0
    REF_PRINT_COUNT("X509_STORE", vfy);
259
0
    REF_ASSERT_ISNT(i < 2);
260
0
    return ((i > 1) ? 1 : 0);
261
0
}
262
263
X509_LOOKUP *X509_STORE_add_lookup(X509_STORE *v, X509_LOOKUP_METHOD *m)
264
0
{
265
0
    int i;
266
0
    STACK_OF(X509_LOOKUP) *sk;
267
0
    X509_LOOKUP *lu;
268
269
0
    sk = v->get_cert_methods;
270
0
    for (i = 0; i < sk_X509_LOOKUP_num(sk); i++) {
271
0
        lu = sk_X509_LOOKUP_value(sk, i);
272
0
        if (m == lu->method) {
273
0
            return lu;
274
0
        }
275
0
    }
276
    /* a new one */
277
0
    lu = X509_LOOKUP_new(m);
278
0
    if (lu == NULL) {
279
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
280
0
        return NULL;
281
0
    }
282
283
0
    lu->store_ctx = v;
284
0
    if (sk_X509_LOOKUP_push(v->get_cert_methods, lu))
285
0
        return lu;
286
    /* malloc failed */
287
0
    ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
288
0
    X509_LOOKUP_free(lu);
289
0
    return NULL;
290
0
}
291
292
X509_OBJECT *X509_STORE_CTX_get_obj_by_subject(X509_STORE_CTX *vs,
293
    X509_LOOKUP_TYPE type,
294
    const X509_NAME *name)
295
0
{
296
0
    X509_OBJECT *ret = X509_OBJECT_new();
297
298
0
    if (ret == NULL)
299
0
        return NULL;
300
0
    if (!X509_STORE_CTX_get_by_subject(vs, type, name, ret)) {
301
0
        X509_OBJECT_free(ret);
302
0
        return NULL;
303
0
    }
304
0
    return ret;
305
0
}
306
307
/* Also fill the cache with all matching certificates */
308
int X509_STORE_CTX_get_by_subject(const X509_STORE_CTX *vs,
309
    X509_LOOKUP_TYPE type,
310
    const X509_NAME *name, X509_OBJECT *ret)
311
9.01k
{
312
9.01k
    X509_STORE *store = vs->store;
313
9.01k
    X509_LOOKUP *lu;
314
9.01k
    X509_OBJECT stmp, *tmp;
315
9.01k
    int i, j;
316
317
9.01k
    if (store == NULL)
318
0
        return 0;
319
320
9.01k
    stmp.type = X509_LU_NONE;
321
9.01k
    stmp.data.ptr = NULL;
322
323
9.01k
    if (!X509_STORE_lock(store))
324
0
        return 0;
325
326
9.01k
    tmp = X509_OBJECT_retrieve_by_subject(store->objs, type, name);
327
9.01k
    X509_STORE_unlock(store);
328
329
9.01k
    if (tmp == NULL || type == X509_LU_CRL) {
330
7.63k
        for (i = 0; i < sk_X509_LOOKUP_num(store->get_cert_methods); i++) {
331
0
            lu = sk_X509_LOOKUP_value(store->get_cert_methods, i);
332
0
            j = X509_LOOKUP_by_subject_ex(lu, type, name, &stmp, vs->libctx,
333
0
                vs->propq);
334
0
            if (j) {
335
0
                tmp = &stmp;
336
0
                break;
337
0
            }
338
0
        }
339
7.63k
        if (tmp == NULL)
340
7.63k
            return 0;
341
7.63k
    }
342
343
1.38k
    if (!X509_OBJECT_up_ref_count(tmp))
344
0
        return 0;
345
346
1.38k
    ret->type = tmp->type;
347
1.38k
    ret->data.ptr = tmp->data.ptr;
348
349
1.38k
    return 1;
350
1.38k
}
351
352
static int x509_store_add(X509_STORE *store, void *x, int crl)
353
6.92k
{
354
6.92k
    X509_OBJECT *obj;
355
6.92k
    int ret = 0, added = 0;
356
357
6.92k
    if (x == NULL)
358
0
        return 0;
359
6.92k
    obj = X509_OBJECT_new();
360
6.92k
    if (obj == NULL)
361
0
        return 0;
362
363
6.92k
    if (crl) {
364
0
        obj->type = X509_LU_CRL;
365
0
        obj->data.crl = (X509_CRL *)x;
366
6.92k
    } else {
367
6.92k
        obj->type = X509_LU_X509;
368
6.92k
        obj->data.x509 = (X509 *)x;
369
6.92k
    }
370
6.92k
    if (!X509_OBJECT_up_ref_count(obj)) {
371
0
        obj->type = X509_LU_NONE;
372
0
        X509_OBJECT_free(obj);
373
0
        return 0;
374
0
    }
375
376
6.92k
    if (!X509_STORE_lock(store)) {
377
0
        X509_OBJECT_free(obj);
378
0
        return 0;
379
0
    }
380
381
6.92k
    if (X509_OBJECT_retrieve_match(store->objs, obj)) {
382
0
        ret = 1;
383
6.92k
    } else {
384
6.92k
        added = sk_X509_OBJECT_push(store->objs, obj);
385
6.92k
        ret = added != 0;
386
6.92k
    }
387
6.92k
    X509_STORE_unlock(store);
388
389
6.92k
    if (added == 0) /* obj not pushed */
390
0
        X509_OBJECT_free(obj);
391
392
6.92k
    return ret;
393
6.92k
}
394
395
int X509_STORE_add_cert(X509_STORE *ctx, X509 *x)
396
8.46k
{
397
8.46k
    if (!x509_store_add(ctx, x, 0)) {
398
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
399
0
        return 0;
400
0
    }
401
8.46k
    return 1;
402
8.46k
}
403
404
int X509_STORE_add_crl(X509_STORE *ctx, X509_CRL *x)
405
0
{
406
0
    if (!x509_store_add(ctx, x, 1)) {
407
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
408
0
        return 0;
409
0
    }
410
0
    return 1;
411
0
}
412
413
int X509_OBJECT_up_ref_count(X509_OBJECT *a)
414
15.1k
{
415
15.1k
    switch (a->type) {
416
0
    case X509_LU_NONE:
417
0
        break;
418
15.1k
    case X509_LU_X509:
419
15.1k
        return X509_up_ref(a->data.x509);
420
0
    case X509_LU_CRL:
421
0
        return X509_CRL_up_ref(a->data.crl);
422
15.1k
    }
423
0
    return 1;
424
15.1k
}
425
426
X509 *X509_OBJECT_get0_X509(const X509_OBJECT *a)
427
0
{
428
0
    if (a == NULL || a->type != X509_LU_X509)
429
0
        return NULL;
430
0
    return a->data.x509;
431
0
}
432
433
X509_CRL *X509_OBJECT_get0_X509_CRL(const X509_OBJECT *a)
434
0
{
435
0
    if (a == NULL || a->type != X509_LU_CRL)
436
0
        return NULL;
437
0
    return a->data.crl;
438
0
}
439
440
X509_LOOKUP_TYPE X509_OBJECT_get_type(const X509_OBJECT *a)
441
0
{
442
0
    return a->type;
443
0
}
444
445
X509_OBJECT *X509_OBJECT_new(void)
446
112k
{
447
112k
    X509_OBJECT *ret = OPENSSL_zalloc(sizeof(*ret));
448
449
112k
    if (ret == NULL) {
450
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
451
0
        return NULL;
452
0
    }
453
112k
    ret->type = X509_LU_NONE;
454
112k
    return ret;
455
112k
}
456
457
static void x509_object_free_internal(X509_OBJECT *a)
458
112k
{
459
112k
    if (a == NULL)
460
0
        return;
461
112k
    switch (a->type) {
462
99.4k
    case X509_LU_NONE:
463
99.4k
        break;
464
12.6k
    case X509_LU_X509:
465
12.6k
        X509_free(a->data.x509);
466
12.6k
        break;
467
0
    case X509_LU_CRL:
468
0
        X509_CRL_free(a->data.crl);
469
0
        break;
470
112k
    }
471
112k
}
472
473
int X509_OBJECT_set1_X509(X509_OBJECT *a, X509 *obj)
474
0
{
475
0
    if (a == NULL || !X509_up_ref(obj))
476
0
        return 0;
477
478
0
    x509_object_free_internal(a);
479
0
    a->type = X509_LU_X509;
480
0
    a->data.x509 = obj;
481
0
    return 1;
482
0
}
483
484
int X509_OBJECT_set1_X509_CRL(X509_OBJECT *a, X509_CRL *obj)
485
0
{
486
0
    if (a == NULL || !X509_CRL_up_ref(obj))
487
0
        return 0;
488
489
0
    x509_object_free_internal(a);
490
0
    a->type = X509_LU_CRL;
491
0
    a->data.crl = obj;
492
0
    return 1;
493
0
}
494
495
void X509_OBJECT_free(X509_OBJECT *a)
496
112k
{
497
112k
    x509_object_free_internal(a);
498
112k
    OPENSSL_free(a);
499
112k
}
500
501
static int x509_object_idx_cnt(STACK_OF(X509_OBJECT) *h, X509_LOOKUP_TYPE type,
502
    const X509_NAME *name, int *pnmatch)
503
11.4k
{
504
11.4k
    X509_OBJECT stmp;
505
11.4k
    X509 x509_s;
506
11.4k
    X509_CRL crl_s;
507
11.4k
    int idx;
508
509
11.4k
    stmp.type = type;
510
11.4k
    switch (type) {
511
10.9k
    case X509_LU_X509:
512
10.9k
        stmp.data.x509 = &x509_s;
513
10.9k
        x509_s.cert_info.subject = (X509_NAME *)name; /* won't modify it */
514
10.9k
        break;
515
444
    case X509_LU_CRL:
516
444
        stmp.data.crl = &crl_s;
517
444
        crl_s.crl.issuer = (X509_NAME *)name; /* won't modify it */
518
444
        break;
519
0
    case X509_LU_NONE:
520
        /* abort(); */
521
0
        return -1;
522
11.4k
    }
523
524
11.4k
    idx = sk_X509_OBJECT_find_all(h, &stmp, pnmatch);
525
11.4k
    return idx;
526
11.4k
}
527
528
int X509_OBJECT_idx_by_subject(STACK_OF(X509_OBJECT) *h, X509_LOOKUP_TYPE type,
529
    const X509_NAME *name)
530
91.3k
{
531
91.3k
    return x509_object_idx_cnt(h, type, name, NULL);
532
91.3k
}
533
534
X509_OBJECT *X509_OBJECT_retrieve_by_subject(STACK_OF(X509_OBJECT) *h,
535
    X509_LOOKUP_TYPE type,
536
    const X509_NAME *name)
537
91.3k
{
538
91.3k
    int idx;
539
91.3k
    idx = X509_OBJECT_idx_by_subject(h, type, name);
540
91.3k
    if (idx == -1)
541
84.6k
        return NULL;
542
6.66k
    return sk_X509_OBJECT_value(h, idx);
543
91.3k
}
544
545
STACK_OF(X509_OBJECT) *X509_STORE_get0_objects(const X509_STORE *v)
546
0
{
547
0
    return v->objs;
548
0
}
549
550
STACK_OF(X509) *X509_STORE_get1_all_certs(X509_STORE *store)
551
0
{
552
0
    STACK_OF(X509) *sk;
553
0
    STACK_OF(X509_OBJECT) *objs;
554
0
    int i;
555
556
0
    if (store == NULL) {
557
0
        ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
558
0
        return NULL;
559
0
    }
560
0
    if ((sk = sk_X509_new_null()) == NULL)
561
0
        return NULL;
562
0
    if (!X509_STORE_lock(store))
563
0
        goto out_free;
564
565
0
    objs = X509_STORE_get0_objects(store);
566
0
    for (i = 0; i < sk_X509_OBJECT_num(objs); i++) {
567
0
        X509 *cert = X509_OBJECT_get0_X509(sk_X509_OBJECT_value(objs, i));
568
569
0
        if (cert != NULL
570
0
            && !X509_add_cert(sk, cert, X509_ADD_FLAG_UP_REF))
571
0
            goto err;
572
0
    }
573
0
    X509_STORE_unlock(store);
574
0
    return sk;
575
576
0
err:
577
0
    X509_STORE_unlock(store);
578
0
out_free:
579
0
    sk_X509_pop_free(sk, X509_free);
580
0
    return NULL;
581
0
}
582
583
STACK_OF(X509) *X509_STORE_CTX_get1_certs(X509_STORE_CTX *ctx,
584
    const X509_NAME *nm)
585
1.44k
{
586
1.44k
    int i, idx, cnt;
587
1.44k
    STACK_OF(X509) *sk = NULL;
588
1.44k
    X509 *x;
589
1.44k
    X509_OBJECT *obj;
590
1.44k
    X509_STORE *store = ctx->store;
591
592
1.44k
    if (store == NULL)
593
0
        return NULL;
594
595
1.44k
    if (!X509_STORE_lock(store))
596
0
        return NULL;
597
598
1.44k
    idx = x509_object_idx_cnt(store->objs, X509_LU_X509, nm, &cnt);
599
1.44k
    if (idx < 0) {
600
        /*
601
         * Nothing found in cache: do lookup to possibly add new objects to
602
         * cache
603
         */
604
553
        X509_OBJECT *xobj = X509_OBJECT_new();
605
606
553
        X509_STORE_unlock(store);
607
608
553
        if (xobj == NULL)
609
0
            return NULL;
610
553
        if (!X509_STORE_CTX_get_by_subject(ctx, X509_LU_X509, nm, xobj)) {
611
553
            X509_OBJECT_free(xobj);
612
553
            return NULL;
613
553
        }
614
0
        X509_OBJECT_free(xobj);
615
0
        if (!X509_STORE_lock(store))
616
0
            return NULL;
617
0
        idx = x509_object_idx_cnt(store->objs, X509_LU_X509, nm, &cnt);
618
0
        if (idx < 0) {
619
0
            X509_STORE_unlock(store);
620
0
            return NULL;
621
0
        }
622
0
    }
623
624
889
    sk = sk_X509_new_null();
625
1.77k
    for (i = 0; i < cnt; i++, idx++) {
626
889
        obj = sk_X509_OBJECT_value(store->objs, idx);
627
889
        x = obj->data.x509;
628
889
        if (!X509_add_cert(sk, x, X509_ADD_FLAG_UP_REF)) {
629
0
            X509_STORE_unlock(store);
630
0
            sk_X509_pop_free(sk, X509_free);
631
0
            return NULL;
632
0
        }
633
889
    }
634
889
    X509_STORE_unlock(store);
635
889
    return sk;
636
889
}
637
638
STACK_OF(X509_CRL) *X509_STORE_CTX_get1_crls(const X509_STORE_CTX *ctx,
639
    const X509_NAME *nm)
640
444
{
641
444
    int i, idx, cnt;
642
444
    STACK_OF(X509_CRL) *sk = sk_X509_CRL_new_null();
643
444
    X509_CRL *x;
644
444
    X509_OBJECT *obj, *xobj = X509_OBJECT_new();
645
444
    X509_STORE *store = ctx->store;
646
647
    /* Always do lookup to possibly add new CRLs to cache */
648
444
    if (sk == NULL
649
444
        || xobj == NULL
650
444
        || store == NULL
651
444
        || !X509_STORE_CTX_get_by_subject(ctx, X509_LU_CRL, nm, xobj)) {
652
444
        X509_OBJECT_free(xobj);
653
444
        sk_X509_CRL_free(sk);
654
444
        return NULL;
655
444
    }
656
0
    X509_OBJECT_free(xobj);
657
0
    if (!X509_STORE_lock(store)) {
658
0
        sk_X509_CRL_free(sk);
659
0
        return NULL;
660
0
    }
661
0
    idx = x509_object_idx_cnt(store->objs, X509_LU_CRL, nm, &cnt);
662
0
    if (idx < 0) {
663
0
        X509_STORE_unlock(store);
664
0
        sk_X509_CRL_free(sk);
665
0
        return NULL;
666
0
    }
667
668
0
    for (i = 0; i < cnt; i++, idx++) {
669
0
        obj = sk_X509_OBJECT_value(store->objs, idx);
670
0
        x = obj->data.crl;
671
0
        if (!X509_CRL_up_ref(x)) {
672
0
            X509_STORE_unlock(store);
673
0
            sk_X509_CRL_pop_free(sk, X509_CRL_free);
674
0
            return NULL;
675
0
        }
676
0
        if (!sk_X509_CRL_push(sk, x)) {
677
0
            X509_STORE_unlock(store);
678
0
            X509_CRL_free(x);
679
0
            sk_X509_CRL_pop_free(sk, X509_CRL_free);
680
0
            return NULL;
681
0
        }
682
0
    }
683
0
    X509_STORE_unlock(store);
684
0
    return sk;
685
0
}
686
687
X509_OBJECT *X509_OBJECT_retrieve_match(STACK_OF(X509_OBJECT) *h,
688
    X509_OBJECT *x)
689
6.92k
{
690
6.92k
    int idx, i, num;
691
6.92k
    X509_OBJECT *obj;
692
693
6.92k
    idx = sk_X509_OBJECT_find(h, x);
694
6.92k
    if (idx < 0)
695
6.92k
        return NULL;
696
0
    if ((x->type != X509_LU_X509) && (x->type != X509_LU_CRL))
697
0
        return sk_X509_OBJECT_value(h, idx);
698
0
    for (i = idx, num = sk_X509_OBJECT_num(h); i < num; i++) {
699
0
        obj = sk_X509_OBJECT_value(h, i);
700
0
        if (x509_object_cmp((const X509_OBJECT **)&obj,
701
0
                (const X509_OBJECT **)&x))
702
0
            return NULL;
703
0
        if (x->type == X509_LU_X509) {
704
0
            if (!X509_cmp(obj->data.x509, x->data.x509))
705
0
                return obj;
706
0
        } else if (x->type == X509_LU_CRL) {
707
0
            if (X509_CRL_match(obj->data.crl, x->data.crl) == 0)
708
0
                return obj;
709
0
        } else
710
0
            return obj;
711
0
    }
712
0
    return NULL;
713
0
}
714
715
/*-
716
 * Try to get issuer cert from |ctx->store| matching the subject name of |x|.
717
 * Prefer the first non-expired one, else take the most recently expired one.
718
 *
719
 * Return values are:
720
 *  1 lookup successful.
721
 *  0 certificate not found.
722
 * -1 some other error.
723
 */
724
int X509_STORE_CTX_get1_issuer(X509 **issuer, X509_STORE_CTX *ctx, X509 *x)
725
43.9k
{
726
43.9k
    const X509_NAME *xn;
727
43.9k
    X509_OBJECT *obj = X509_OBJECT_new(), *pobj = NULL;
728
43.9k
    X509_STORE *store = ctx->store;
729
43.9k
    int i, ok, idx, ret, nmatch = 0;
730
731
43.9k
    if (obj == NULL)
732
0
        return -1;
733
43.9k
    *issuer = NULL;
734
43.9k
    xn = X509_get_issuer_name(x);
735
43.9k
    ok = X509_STORE_CTX_get_by_subject(ctx, X509_LU_X509, xn, obj);
736
43.9k
    if (ok != 1) {
737
40.4k
        X509_OBJECT_free(obj);
738
40.4k
        return 0;
739
40.4k
    }
740
    /* If certificate matches and is currently valid all OK */
741
3.49k
    if (ctx->check_issued(ctx, x, obj->data.x509)) {
742
1.23k
        if (ossl_x509_check_cert_time(ctx, obj->data.x509, -1)) {
743
1.23k
            *issuer = obj->data.x509;
744
            /* |*issuer| has taken over the cert reference from |obj| */
745
1.23k
            obj->type = X509_LU_NONE;
746
1.23k
            X509_OBJECT_free(obj);
747
1.23k
            return 1;
748
1.23k
        }
749
1.23k
    }
750
2.26k
    X509_OBJECT_free(obj);
751
752
    /*
753
     * Due to limitations of the API this can only retrieve a single cert.
754
     * However it will fill the cache with all matching certificates,
755
     * so we can examine the cache for all matches.
756
     */
757
2.26k
    if (store == NULL)
758
0
        return 0;
759
760
    /* Find index of first currently valid cert accepted by 'check_issued' */
761
2.26k
    ret = 0;
762
2.26k
    if (!X509_STORE_lock(store))
763
0
        return 0;
764
765
2.26k
    idx = x509_object_idx_cnt(store->objs, X509_LU_X509, xn, &nmatch);
766
2.26k
    if (idx != -1) { /* should be true as we've had at least one match */
767
        /* Look through all matching certs for suitable issuer */
768
4.53k
        for (i = idx; i < idx + nmatch; i++) {
769
2.26k
            pobj = sk_X509_OBJECT_value(store->objs, i);
770
            /* See if we've run past the matches */
771
2.26k
            if (pobj->type != X509_LU_X509)
772
0
                break;
773
2.26k
            if (ctx->check_issued(ctx, x, pobj->data.x509)) {
774
0
                ret = 1;
775
                /* If times check fine, exit with match, else keep looking. */
776
0
                if (ossl_x509_check_cert_time(ctx, pobj->data.x509, -1)) {
777
0
                    *issuer = pobj->data.x509;
778
0
                    break;
779
0
                }
780
                /*
781
                 * Leave the so far most recently expired match in *issuer
782
                 * so we return nearest match if no certificate time is OK.
783
                 */
784
0
                if (*issuer == NULL
785
0
                    || ASN1_TIME_compare(X509_get0_notAfter(pobj->data.x509),
786
0
                           X509_get0_notAfter(*issuer))
787
0
                        > 0)
788
0
                    *issuer = pobj->data.x509;
789
0
            }
790
2.26k
        }
791
2.26k
    }
792
2.26k
    if (*issuer != NULL && !X509_up_ref(*issuer)) {
793
0
        *issuer = NULL;
794
0
        ret = -1;
795
0
    }
796
2.26k
    X509_STORE_unlock(store);
797
2.26k
    return ret;
798
2.26k
}
799
800
int X509_STORE_set_flags(X509_STORE *ctx, unsigned long flags)
801
0
{
802
0
    return X509_VERIFY_PARAM_set_flags(ctx->param, flags);
803
0
}
804
805
int X509_STORE_set_depth(X509_STORE *ctx, int depth)
806
0
{
807
0
    X509_VERIFY_PARAM_set_depth(ctx->param, depth);
808
0
    return 1;
809
0
}
810
811
int X509_STORE_set_purpose(X509_STORE *ctx, int purpose)
812
0
{
813
0
    return X509_VERIFY_PARAM_set_purpose(ctx->param, purpose);
814
0
}
815
816
int X509_STORE_set_trust(X509_STORE *ctx, int trust)
817
0
{
818
0
    return X509_VERIFY_PARAM_set_trust(ctx->param, trust);
819
0
}
820
821
int X509_STORE_set1_param(X509_STORE *ctx, const X509_VERIFY_PARAM *param)
822
8.46k
{
823
8.46k
    return X509_VERIFY_PARAM_set1(ctx->param, param);
824
8.46k
}
825
826
X509_VERIFY_PARAM *X509_STORE_get0_param(const X509_STORE *ctx)
827
0
{
828
0
    return ctx->param;
829
0
}
830
831
void X509_STORE_set_verify(X509_STORE *ctx, X509_STORE_CTX_verify_fn verify)
832
0
{
833
0
    ctx->verify = verify;
834
0
}
835
836
X509_STORE_CTX_verify_fn X509_STORE_get_verify(const X509_STORE *ctx)
837
0
{
838
0
    return ctx->verify;
839
0
}
840
841
void X509_STORE_set_verify_cb(X509_STORE *ctx,
842
    X509_STORE_CTX_verify_cb verify_cb)
843
8.46k
{
844
8.46k
    ctx->verify_cb = verify_cb;
845
8.46k
}
846
847
X509_STORE_CTX_verify_cb X509_STORE_get_verify_cb(const X509_STORE *ctx)
848
0
{
849
0
    return ctx->verify_cb;
850
0
}
851
852
void X509_STORE_set_get_issuer(X509_STORE *ctx,
853
    X509_STORE_CTX_get_issuer_fn get_issuer)
854
0
{
855
0
    ctx->get_issuer = get_issuer;
856
0
}
857
858
X509_STORE_CTX_get_issuer_fn X509_STORE_get_get_issuer(const X509_STORE *ctx)
859
0
{
860
0
    return ctx->get_issuer;
861
0
}
862
863
void X509_STORE_set_check_issued(X509_STORE *ctx,
864
    X509_STORE_CTX_check_issued_fn check_issued)
865
0
{
866
0
    ctx->check_issued = check_issued;
867
0
}
868
869
X509_STORE_CTX_check_issued_fn X509_STORE_get_check_issued(const X509_STORE *ctx)
870
0
{
871
0
    return ctx->check_issued;
872
0
}
873
874
void X509_STORE_set_check_revocation(X509_STORE *ctx,
875
    X509_STORE_CTX_check_revocation_fn check_revocation)
876
0
{
877
0
    ctx->check_revocation = check_revocation;
878
0
}
879
880
X509_STORE_CTX_check_revocation_fn X509_STORE_get_check_revocation(const X509_STORE *ctx)
881
0
{
882
0
    return ctx->check_revocation;
883
0
}
884
885
void X509_STORE_set_get_crl(X509_STORE *ctx,
886
    X509_STORE_CTX_get_crl_fn get_crl)
887
0
{
888
0
    ctx->get_crl = get_crl;
889
0
}
890
891
X509_STORE_CTX_get_crl_fn X509_STORE_get_get_crl(const X509_STORE *ctx)
892
0
{
893
0
    return ctx->get_crl;
894
0
}
895
896
void X509_STORE_set_check_crl(X509_STORE *ctx,
897
    X509_STORE_CTX_check_crl_fn check_crl)
898
0
{
899
0
    ctx->check_crl = check_crl;
900
0
}
901
902
X509_STORE_CTX_check_crl_fn X509_STORE_get_check_crl(const X509_STORE *ctx)
903
0
{
904
0
    return ctx->check_crl;
905
0
}
906
907
void X509_STORE_set_cert_crl(X509_STORE *ctx,
908
    X509_STORE_CTX_cert_crl_fn cert_crl)
909
0
{
910
0
    ctx->cert_crl = cert_crl;
911
0
}
912
913
X509_STORE_CTX_cert_crl_fn X509_STORE_get_cert_crl(const X509_STORE *ctx)
914
0
{
915
0
    return ctx->cert_crl;
916
0
}
917
918
void X509_STORE_set_check_policy(X509_STORE *ctx,
919
    X509_STORE_CTX_check_policy_fn check_policy)
920
0
{
921
0
    ctx->check_policy = check_policy;
922
0
}
923
924
X509_STORE_CTX_check_policy_fn X509_STORE_get_check_policy(const X509_STORE *ctx)
925
0
{
926
0
    return ctx->check_policy;
927
0
}
928
929
void X509_STORE_set_lookup_certs(X509_STORE *ctx,
930
    X509_STORE_CTX_lookup_certs_fn lookup_certs)
931
0
{
932
0
    ctx->lookup_certs = lookup_certs;
933
0
}
934
935
X509_STORE_CTX_lookup_certs_fn X509_STORE_get_lookup_certs(const X509_STORE *ctx)
936
0
{
937
0
    return ctx->lookup_certs;
938
0
}
939
940
void X509_STORE_set_lookup_crls(X509_STORE *ctx,
941
    X509_STORE_CTX_lookup_crls_fn lookup_crls)
942
0
{
943
0
    ctx->lookup_crls = lookup_crls;
944
0
}
945
946
X509_STORE_CTX_lookup_crls_fn X509_STORE_get_lookup_crls(const X509_STORE *ctx)
947
0
{
948
0
    return ctx->lookup_crls;
949
0
}
950
951
void X509_STORE_set_cleanup(X509_STORE *ctx,
952
    X509_STORE_CTX_cleanup_fn ctx_cleanup)
953
0
{
954
0
    ctx->cleanup = ctx_cleanup;
955
0
}
956
957
X509_STORE_CTX_cleanup_fn X509_STORE_get_cleanup(const X509_STORE *ctx)
958
0
{
959
0
    return ctx->cleanup;
960
0
}
961
962
int X509_STORE_set_ex_data(X509_STORE *ctx, int idx, void *data)
963
0
{
964
0
    return CRYPTO_set_ex_data(&ctx->ex_data, idx, data);
965
0
}
966
967
void *X509_STORE_get_ex_data(const X509_STORE *ctx, int idx)
968
0
{
969
0
    return CRYPTO_get_ex_data(&ctx->ex_data, idx);
970
0
}
971
972
X509_STORE *X509_STORE_CTX_get0_store(const X509_STORE_CTX *ctx)
973
0
{
974
0
    return ctx->store;
975
0
}