Coverage Report

Created: 2025-11-16 06:40

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
69.6k
{
46
69.6k
    return CRYPTO_THREAD_write_lock(s->lock);
47
69.6k
}
48
49
int X509_STORE_unlock(X509_STORE *s)
50
163k
{
51
163k
    return CRYPTO_THREAD_unlock(s->lock);
52
163k
}
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
158
static int x509_object_cmp(const X509_OBJECT *const *a,
159
                           const X509_OBJECT *const *b)
160
28.2k
{
161
28.2k
    int ret;
162
163
28.2k
    ret = ((*a)->type - (*b)->type);
164
28.2k
    if (ret)
165
2.81k
        return ret;
166
25.3k
    switch ((*a)->type) {
167
25.3k
    case X509_LU_X509:
168
25.3k
        ret = X509_subject_name_cmp((*a)->data.x509, (*b)->data.x509);
169
25.3k
        break;
170
0
    case X509_LU_CRL:
171
0
        ret = X509_CRL_cmp((*a)->data.crl, (*b)->data.crl);
172
0
        break;
173
0
    case X509_LU_NONE:
174
        /* abort(); */
175
0
        return 0;
176
25.3k
    }
177
25.3k
    return ret;
178
25.3k
}
179
180
X509_STORE *X509_STORE_new(void)
181
12.3k
{
182
12.3k
    X509_STORE *ret = OPENSSL_zalloc(sizeof(*ret));
183
184
12.3k
    if (ret == NULL) {
185
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
186
0
        return NULL;
187
0
    }
188
12.3k
    if ((ret->objs = sk_X509_OBJECT_new(x509_object_cmp)) == NULL) {
189
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
190
0
        goto err;
191
0
    }
192
12.3k
    ret->cache = 1;
193
12.3k
    if ((ret->get_cert_methods = sk_X509_LOOKUP_new_null()) == NULL) {
194
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
195
0
        goto err;
196
0
    }
197
198
12.3k
    if ((ret->param = X509_VERIFY_PARAM_new()) == NULL) {
199
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
200
0
        goto err;
201
0
    }
202
12.3k
    if (!CRYPTO_new_ex_data(CRYPTO_EX_INDEX_X509_STORE, ret, &ret->ex_data)) {
203
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
204
0
        goto err;
205
0
    }
206
207
12.3k
    ret->lock = CRYPTO_THREAD_lock_new();
208
12.3k
    if (ret->lock == NULL) {
209
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
210
0
        goto err;
211
0
    }
212
12.3k
    ret->references = 1;
213
12.3k
    return ret;
214
215
0
err:
216
0
    X509_VERIFY_PARAM_free(ret->param);
217
0
    sk_X509_OBJECT_free(ret->objs);
218
0
    sk_X509_LOOKUP_free(ret->get_cert_methods);
219
0
    OPENSSL_free(ret);
220
0
    return NULL;
221
12.3k
}
222
223
void X509_STORE_free(X509_STORE *vfy)
224
901k
{
225
901k
    int i;
226
901k
    STACK_OF(X509_LOOKUP) *sk;
227
901k
    X509_LOOKUP *lu;
228
229
901k
    if (vfy == NULL)
230
742k
        return;
231
159k
    CRYPTO_DOWN_REF(&vfy->references, &i, vfy->lock);
232
159k
    REF_PRINT_COUNT("X509_STORE", vfy);
233
159k
    if (i > 0)
234
0
        return;
235
159k
    REF_ASSERT_ISNT(i < 0);
236
237
159k
    sk = vfy->get_cert_methods;
238
159k
    for (i = 0; i < sk_X509_LOOKUP_num(sk); i++) {
239
0
        lu = sk_X509_LOOKUP_value(sk, i);
240
0
        X509_LOOKUP_shutdown(lu);
241
0
        X509_LOOKUP_free(lu);
242
0
    }
243
159k
    sk_X509_LOOKUP_free(sk);
244
159k
    sk_X509_OBJECT_pop_free(vfy->objs, X509_OBJECT_free);
245
246
159k
    CRYPTO_free_ex_data(CRYPTO_EX_INDEX_X509_STORE, vfy, &vfy->ex_data);
247
159k
    X509_VERIFY_PARAM_free(vfy->param);
248
159k
    CRYPTO_THREAD_lock_free(vfy->lock);
249
159k
    OPENSSL_free(vfy);
250
159k
}
251
252
int X509_STORE_up_ref(X509_STORE *vfy)
253
0
{
254
0
    int i;
255
256
0
    if (CRYPTO_UP_REF(&vfy->references, &i, vfy->lock) <= 0)
257
0
        return 0;
258
259
0
    REF_PRINT_COUNT("X509_STORE", vfy);
260
0
    REF_ASSERT_ISNT(i < 2);
261
0
    return ((i > 1) ? 1 : 0);
262
0
}
263
264
X509_LOOKUP *X509_STORE_add_lookup(X509_STORE *v, X509_LOOKUP_METHOD *m)
265
0
{
266
0
    int i;
267
0
    STACK_OF(X509_LOOKUP) *sk;
268
0
    X509_LOOKUP *lu;
269
270
0
    sk = v->get_cert_methods;
271
0
    for (i = 0; i < sk_X509_LOOKUP_num(sk); i++) {
272
0
        lu = sk_X509_LOOKUP_value(sk, i);
273
0
        if (m == lu->method) {
274
0
            return lu;
275
0
        }
276
0
    }
277
    /* a new one */
278
0
    lu = X509_LOOKUP_new(m);
279
0
    if (lu == NULL) {
280
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
281
0
        return NULL;
282
0
    }
283
284
0
    lu->store_ctx = v;
285
0
    if (sk_X509_LOOKUP_push(v->get_cert_methods, lu))
286
0
        return lu;
287
    /* malloc failed */
288
0
    ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
289
0
    X509_LOOKUP_free(lu);
290
0
    return NULL;
291
0
}
292
293
X509_OBJECT *X509_STORE_CTX_get_obj_by_subject(X509_STORE_CTX *vs,
294
                                               X509_LOOKUP_TYPE type,
295
                                               const X509_NAME *name)
296
0
{
297
0
    X509_OBJECT *ret = X509_OBJECT_new();
298
299
0
    if (ret == NULL)
300
0
        return NULL;
301
0
    if (!X509_STORE_CTX_get_by_subject(vs, type, name, ret)) {
302
0
        X509_OBJECT_free(ret);
303
0
        return NULL;
304
0
    }
305
0
    return ret;
306
0
}
307
308
/* Also fill the cache with all matching certificates */
309
int X509_STORE_CTX_get_by_subject(const X509_STORE_CTX *vs,
310
                                  X509_LOOKUP_TYPE type,
311
                                  const X509_NAME *name, X509_OBJECT *ret)
312
8.26k
{
313
8.26k
    X509_STORE *store = vs->store;
314
8.26k
    X509_LOOKUP *lu;
315
8.26k
    X509_OBJECT stmp, *tmp;
316
8.26k
    int i, j;
317
318
8.26k
    if (store == NULL)
319
0
        return 0;
320
321
8.26k
    stmp.type = X509_LU_NONE;
322
8.26k
    stmp.data.ptr = NULL;
323
324
8.26k
    if (!X509_STORE_lock(store))
325
0
        return 0;
326
327
8.26k
    tmp = X509_OBJECT_retrieve_by_subject(store->objs, type, name);
328
8.26k
    X509_STORE_unlock(store);
329
330
8.26k
    if (tmp == NULL || type == X509_LU_CRL) {
331
7.10k
        for (i = 0; i < sk_X509_LOOKUP_num(store->get_cert_methods); i++) {
332
0
            lu = sk_X509_LOOKUP_value(store->get_cert_methods, i);
333
0
            j = X509_LOOKUP_by_subject_ex(lu, type, name, &stmp, vs->libctx,
334
0
                                          vs->propq);
335
0
            if (j) {
336
0
                tmp = &stmp;
337
0
                break;
338
0
            }
339
0
        }
340
7.10k
        if (tmp == NULL)
341
7.10k
            return 0;
342
7.10k
    }
343
344
1.15k
    if (!X509_OBJECT_up_ref_count(tmp))
345
0
        return 0;
346
347
1.15k
    ret->type = tmp->type;
348
1.15k
    ret->data.ptr = tmp->data.ptr;
349
350
1.15k
    return 1;
351
1.15k
}
352
353
6.60k
static int x509_store_add(X509_STORE *store, void *x, int crl) {
354
6.60k
    X509_OBJECT *obj;
355
6.60k
    int ret = 0, added = 0;
356
357
6.60k
    if (x == NULL)
358
0
        return 0;
359
6.60k
    obj = X509_OBJECT_new();
360
6.60k
    if (obj == NULL)
361
0
        return 0;
362
363
6.60k
    if (crl) {
364
0
        obj->type = X509_LU_CRL;
365
0
        obj->data.crl = (X509_CRL *)x;
366
6.60k
    } else {
367
6.60k
        obj->type = X509_LU_X509;
368
6.60k
        obj->data.x509 = (X509 *)x;
369
6.60k
    }
370
6.60k
    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.60k
    if (!X509_STORE_lock(store)) {
377
0
        X509_OBJECT_free(obj);
378
0
        return 0;
379
0
    }
380
381
6.60k
    if (X509_OBJECT_retrieve_match(store->objs, obj)) {
382
0
        ret = 1;
383
6.60k
    } else {
384
6.60k
        added = sk_X509_OBJECT_push(store->objs, obj);
385
6.60k
        ret = added != 0;
386
6.60k
    }
387
6.60k
    X509_STORE_unlock(store);
388
389
6.60k
    if (added == 0)             /* obj not pushed */
390
0
        X509_OBJECT_free(obj);
391
392
6.60k
    return ret;
393
6.60k
}
394
395
int X509_STORE_add_cert(X509_STORE *ctx, X509 *x)
396
7.93k
{
397
7.93k
    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
7.93k
    return 1;
402
7.93k
}
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
14.1k
{
415
14.1k
    switch (a->type) {
416
0
    case X509_LU_NONE:
417
0
        break;
418
14.1k
    case X509_LU_X509:
419
14.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
14.1k
    }
423
0
    return 1;
424
14.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
106k
{
447
106k
    X509_OBJECT *ret = OPENSSL_zalloc(sizeof(*ret));
448
449
106k
    if (ret == NULL) {
450
0
        ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
451
0
        return NULL;
452
0
    }
453
106k
    ret->type = X509_LU_NONE;
454
106k
    return ret;
455
106k
}
456
457
static void x509_object_free_internal(X509_OBJECT *a)
458
106k
{
459
106k
    if (a == NULL)
460
0
        return;
461
106k
    switch (a->type) {
462
95.3k
    case X509_LU_NONE:
463
95.3k
        break;
464
11.4k
    case X509_LU_X509:
465
11.4k
        X509_free(a->data.x509);
466
11.4k
        break;
467
0
    case X509_LU_CRL:
468
0
        X509_CRL_free(a->data.crl);
469
0
        break;
470
106k
    }
471
106k
}
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
106k
{
497
106k
    x509_object_free_internal(a);
498
106k
    OPENSSL_free(a);
499
106k
}
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
10.2k
{
504
10.2k
    X509_OBJECT stmp;
505
10.2k
    X509 x509_s;
506
10.2k
    X509_CRL crl_s;
507
10.2k
    int idx;
508
509
10.2k
    stmp.type = type;
510
10.2k
    switch (type) {
511
9.83k
    case X509_LU_X509:
512
9.83k
        stmp.data.x509 = &x509_s;
513
9.83k
        x509_s.cert_info.subject = (X509_NAME *)name; /* won't modify it */
514
9.83k
        break;
515
405
    case X509_LU_CRL:
516
405
        stmp.data.crl = &crl_s;
517
405
        crl_s.crl.issuer = (X509_NAME *)name; /* won't modify it */
518
405
        break;
519
0
    case X509_LU_NONE:
520
        /* abort(); */
521
0
        return -1;
522
10.2k
    }
523
524
10.2k
    idx = sk_X509_OBJECT_find_all(h, &stmp, pnmatch);
525
10.2k
    return idx;
526
10.2k
}
527
528
int X509_OBJECT_idx_by_subject(STACK_OF(X509_OBJECT) *h, X509_LOOKUP_TYPE type,
529
                               const X509_NAME *name)
530
84.9k
{
531
84.9k
    return x509_object_idx_cnt(h, type, name, NULL);
532
84.9k
}
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
84.9k
{
538
84.9k
    int idx;
539
84.9k
    idx = X509_OBJECT_idx_by_subject(h, type, name);
540
84.9k
    if (idx == -1)
541
78.7k
        return NULL;
542
6.23k
    return sk_X509_OBJECT_value(h, idx);
543
84.9k
}
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.21k
{
586
1.21k
    int i, idx, cnt;
587
1.21k
    STACK_OF(X509) *sk = NULL;
588
1.21k
    X509 *x;
589
1.21k
    X509_OBJECT *obj;
590
1.21k
    X509_STORE *store = ctx->store;
591
592
1.21k
    if (store == NULL)
593
0
        return NULL;
594
595
1.21k
    if (!X509_STORE_lock(store))
596
0
        return NULL;
597
598
1.21k
    idx = x509_object_idx_cnt(store->objs, X509_LU_X509, nm, &cnt);
599
1.21k
    if (idx < 0) {
600
        /*
601
         * Nothing found in cache: do lookup to possibly add new objects to
602
         * cache
603
         */
604
504
        X509_OBJECT *xobj = X509_OBJECT_new();
605
606
504
        X509_STORE_unlock(store);
607
608
504
        if (xobj == NULL)
609
0
            return NULL;
610
504
        if (!X509_STORE_CTX_get_by_subject(ctx, X509_LU_X509, nm, xobj)) {
611
504
            X509_OBJECT_free(xobj);
612
504
            return NULL;
613
504
        }
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
707
    sk = sk_X509_new_null();
625
1.41k
    for (i = 0; i < cnt; i++, idx++) {
626
707
        obj = sk_X509_OBJECT_value(store->objs, idx);
627
707
        x = obj->data.x509;
628
707
        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
707
    }
634
707
    X509_STORE_unlock(store);
635
707
    return sk;
636
707
}
637
638
STACK_OF(X509_CRL) *X509_STORE_CTX_get1_crls(const X509_STORE_CTX *ctx,
639
                                             const X509_NAME *nm)
640
405
{
641
405
    int i, idx, cnt;
642
405
    STACK_OF(X509_CRL) *sk = sk_X509_CRL_new_null();
643
405
    X509_CRL *x;
644
405
    X509_OBJECT *obj, *xobj = X509_OBJECT_new();
645
405
    X509_STORE *store = ctx->store;
646
647
    /* Always do lookup to possibly add new CRLs to cache */
648
405
    if (sk == NULL
649
405
            || xobj == NULL
650
405
            || store == NULL
651
405
            || !X509_STORE_CTX_get_by_subject(ctx, X509_LU_CRL, nm, xobj)) {
652
405
        X509_OBJECT_free(xobj);
653
405
        sk_X509_CRL_free(sk);
654
405
        return NULL;
655
405
    }
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.60k
{
690
6.60k
    int idx, i, num;
691
6.60k
    X509_OBJECT *obj;
692
693
6.60k
    idx = sk_X509_OBJECT_find(h, x);
694
6.60k
    if (idx < 0)
695
6.60k
        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
55.7k
{
726
55.7k
    const X509_NAME *xn;
727
55.7k
    X509_OBJECT *obj = X509_OBJECT_new(), *pobj = NULL;
728
55.7k
    X509_STORE *store = ctx->store;
729
55.7k
    int i, ok, idx, ret, nmatch = 0;
730
731
55.7k
    if (obj == NULL)
732
0
        return -1;
733
55.7k
    *issuer = NULL;
734
55.7k
    xn = X509_get_issuer_name(x);
735
55.7k
    ok = X509_STORE_CTX_get_by_subject(ctx, X509_LU_X509, xn, obj);
736
55.7k
    if (ok != 1) {
737
51.5k
        X509_OBJECT_free(obj);
738
51.5k
        return 0;
739
51.5k
    }
740
    /* If certificate matches and is currently valid all OK */
741
4.17k
    if (ctx->check_issued(ctx, x, obj->data.x509)) {
742
1.63k
        if (ossl_x509_check_cert_time(ctx, obj->data.x509, -1)) {
743
1.63k
            *issuer = obj->data.x509;
744
            /* |*issuer| has taken over the cert reference from |obj| */
745
1.63k
            obj->type = X509_LU_NONE;
746
1.63k
            X509_OBJECT_free(obj);
747
1.63k
            return 1;
748
1.63k
        }
749
1.63k
    }
750
2.54k
    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.54k
    if (store == NULL)
758
0
        return 0;
759
760
    /* Find index of first currently valid cert accepted by 'check_issued' */
761
2.54k
    ret = 0;
762
2.54k
    if (!X509_STORE_lock(store))
763
0
        return 0;
764
765
2.54k
    idx = x509_object_idx_cnt(store->objs, X509_LU_X509, xn, &nmatch);
766
2.54k
    if (idx != -1) { /* should be true as we've had at least one match */
767
        /* Look through all matching certs for suitable issuer */
768
5.09k
        for (i = idx; i < idx + nmatch; i++) {
769
2.54k
            pobj = sk_X509_OBJECT_value(store->objs, i);
770
            /* See if we've run past the matches */
771
2.54k
            if (pobj->type != X509_LU_X509)
772
0
                break;
773
2.54k
            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)) > 0)
787
0
                    *issuer = pobj->data.x509;
788
0
            }
789
2.54k
        }
790
2.54k
    }
791
2.54k
    if (*issuer != NULL && !X509_up_ref(*issuer)) {
792
0
        *issuer = NULL;
793
0
        ret = -1;
794
0
    }
795
2.54k
    X509_STORE_unlock(store);
796
2.54k
    return ret;
797
2.54k
}
798
799
int X509_STORE_set_flags(X509_STORE *ctx, unsigned long flags)
800
0
{
801
0
    return X509_VERIFY_PARAM_set_flags(ctx->param, flags);
802
0
}
803
804
int X509_STORE_set_depth(X509_STORE *ctx, int depth)
805
0
{
806
0
    X509_VERIFY_PARAM_set_depth(ctx->param, depth);
807
0
    return 1;
808
0
}
809
810
int X509_STORE_set_purpose(X509_STORE *ctx, int purpose)
811
0
{
812
0
    return X509_VERIFY_PARAM_set_purpose(ctx->param, purpose);
813
0
}
814
815
int X509_STORE_set_trust(X509_STORE *ctx, int trust)
816
0
{
817
0
    return X509_VERIFY_PARAM_set_trust(ctx->param, trust);
818
0
}
819
820
int X509_STORE_set1_param(X509_STORE *ctx, const X509_VERIFY_PARAM *param)
821
7.93k
{
822
7.93k
    return X509_VERIFY_PARAM_set1(ctx->param, param);
823
7.93k
}
824
825
X509_VERIFY_PARAM *X509_STORE_get0_param(const X509_STORE *ctx)
826
0
{
827
0
    return ctx->param;
828
0
}
829
830
void X509_STORE_set_verify(X509_STORE *ctx, X509_STORE_CTX_verify_fn verify)
831
0
{
832
0
    ctx->verify = verify;
833
0
}
834
835
X509_STORE_CTX_verify_fn X509_STORE_get_verify(const X509_STORE *ctx)
836
0
{
837
0
    return ctx->verify;
838
0
}
839
840
void X509_STORE_set_verify_cb(X509_STORE *ctx,
841
                              X509_STORE_CTX_verify_cb verify_cb)
842
7.93k
{
843
7.93k
    ctx->verify_cb = verify_cb;
844
7.93k
}
845
846
X509_STORE_CTX_verify_cb X509_STORE_get_verify_cb(const X509_STORE *ctx)
847
0
{
848
0
    return ctx->verify_cb;
849
0
}
850
851
void X509_STORE_set_get_issuer(X509_STORE *ctx,
852
                               X509_STORE_CTX_get_issuer_fn get_issuer)
853
0
{
854
0
    ctx->get_issuer = get_issuer;
855
0
}
856
857
X509_STORE_CTX_get_issuer_fn X509_STORE_get_get_issuer(const X509_STORE *ctx)
858
0
{
859
0
    return ctx->get_issuer;
860
0
}
861
862
void X509_STORE_set_check_issued(X509_STORE *ctx,
863
                                 X509_STORE_CTX_check_issued_fn check_issued)
864
0
{
865
0
    ctx->check_issued = check_issued;
866
0
}
867
868
X509_STORE_CTX_check_issued_fn X509_STORE_get_check_issued(const X509_STORE *ctx)
869
0
{
870
0
    return ctx->check_issued;
871
0
}
872
873
void X509_STORE_set_check_revocation(X509_STORE *ctx,
874
                                     X509_STORE_CTX_check_revocation_fn check_revocation)
875
0
{
876
0
    ctx->check_revocation = check_revocation;
877
0
}
878
879
X509_STORE_CTX_check_revocation_fn X509_STORE_get_check_revocation(const X509_STORE *ctx)
880
0
{
881
0
    return ctx->check_revocation;
882
0
}
883
884
void X509_STORE_set_get_crl(X509_STORE *ctx,
885
                            X509_STORE_CTX_get_crl_fn get_crl)
886
0
{
887
0
    ctx->get_crl = get_crl;
888
0
}
889
890
X509_STORE_CTX_get_crl_fn X509_STORE_get_get_crl(const X509_STORE *ctx)
891
0
{
892
0
    return ctx->get_crl;
893
0
}
894
895
void X509_STORE_set_check_crl(X509_STORE *ctx,
896
                              X509_STORE_CTX_check_crl_fn check_crl)
897
0
{
898
0
    ctx->check_crl = check_crl;
899
0
}
900
901
X509_STORE_CTX_check_crl_fn X509_STORE_get_check_crl(const X509_STORE *ctx)
902
0
{
903
0
    return ctx->check_crl;
904
0
}
905
906
void X509_STORE_set_cert_crl(X509_STORE *ctx,
907
                             X509_STORE_CTX_cert_crl_fn cert_crl)
908
0
{
909
0
    ctx->cert_crl = cert_crl;
910
0
}
911
912
X509_STORE_CTX_cert_crl_fn X509_STORE_get_cert_crl(const X509_STORE *ctx)
913
0
{
914
0
    return ctx->cert_crl;
915
0
}
916
917
void X509_STORE_set_check_policy(X509_STORE *ctx,
918
                                 X509_STORE_CTX_check_policy_fn check_policy)
919
0
{
920
0
    ctx->check_policy = check_policy;
921
0
}
922
923
X509_STORE_CTX_check_policy_fn X509_STORE_get_check_policy(const X509_STORE *ctx)
924
0
{
925
0
    return ctx->check_policy;
926
0
}
927
928
void X509_STORE_set_lookup_certs(X509_STORE *ctx,
929
                                 X509_STORE_CTX_lookup_certs_fn lookup_certs)
930
0
{
931
0
    ctx->lookup_certs = lookup_certs;
932
0
}
933
934
X509_STORE_CTX_lookup_certs_fn X509_STORE_get_lookup_certs(const X509_STORE *ctx)
935
0
{
936
0
    return ctx->lookup_certs;
937
0
}
938
939
void X509_STORE_set_lookup_crls(X509_STORE *ctx,
940
                                X509_STORE_CTX_lookup_crls_fn lookup_crls)
941
0
{
942
0
    ctx->lookup_crls = lookup_crls;
943
0
}
944
945
X509_STORE_CTX_lookup_crls_fn X509_STORE_get_lookup_crls(const X509_STORE *ctx)
946
0
{
947
0
    return ctx->lookup_crls;
948
0
}
949
950
void X509_STORE_set_cleanup(X509_STORE *ctx,
951
                            X509_STORE_CTX_cleanup_fn ctx_cleanup)
952
0
{
953
0
    ctx->cleanup = ctx_cleanup;
954
0
}
955
956
X509_STORE_CTX_cleanup_fn X509_STORE_get_cleanup(const X509_STORE *ctx)
957
0
{
958
0
    return ctx->cleanup;
959
0
}
960
961
int X509_STORE_set_ex_data(X509_STORE *ctx, int idx, void *data)
962
0
{
963
0
    return CRYPTO_set_ex_data(&ctx->ex_data, idx, data);
964
0
}
965
966
void *X509_STORE_get_ex_data(const X509_STORE *ctx, int idx)
967
0
{
968
0
    return CRYPTO_get_ex_data(&ctx->ex_data, idx);
969
0
}
970
971
X509_STORE *X509_STORE_CTX_get0_store(const X509_STORE_CTX *ctx)
972
0
{
973
0
    return ctx->store;
974
0
}