lib/openssl/crypto/bio/bio_meth.c

   1 /*
   2  * Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the OpenSSL license (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 "bio_lcl.h"
  11 #include <internal/thread_once.h>
  12
  13 CRYPTO_RWLOCK *bio_type_lock = NULL;
  14 static CRYPTO_ONCE bio_type_init = CRYPTO_ONCE_STATIC_INIT;
  15
  16 DEFINE_RUN_ONCE_STATIC(do_bio_type_init)
  17 {
  18     bio_type_lock = CRYPTO_THREAD_lock_new();
  19     return bio_type_lock != NULL;
  20 }
  21
  22 int BIO_get_new_index()
  23 {
  24     static int bio_count = BIO_TYPE_START;
  25     int newval;
  26
  27     if (!RUN_ONCE(&bio_type_init, do_bio_type_init)) {
  28         BIOerr(BIO_F_BIO_GET_NEW_INDEX, ERR_R_MALLOC_FAILURE);
  29         return -1;
  30     }
  31     if (!CRYPTO_atomic_add(&bio_count, 1, &newval, bio_type_lock))
  32         return -1;
  33     return newval;
  34 }
  35
  36 BIO_METHOD *BIO_meth_new(int type, const char *name)
  37 {
  38     BIO_METHOD *biom = OPENSSL_zalloc(sizeof(BIO_METHOD));
  39
  40     if (biom != NULL) {
  41         biom->type = type;
  42         biom->name = name;
  43     }
  44     return biom;
  45 }
  46
  47 void BIO_meth_free(BIO_METHOD *biom)
  48 {
  49     OPENSSL_free(biom);
  50 }
  51
  52 int (*BIO_meth_get_write(BIO_METHOD *biom)) (BIO *, const char *, int)
  53 {
  54     return biom->bwrite;
  55 }
  56
  57 int BIO_meth_set_write(BIO_METHOD *biom,
  58                        int (*bwrite) (BIO *, const char *, int))
  59 {
  60     biom->bwrite = bwrite;
  61     return 1;
  62 }
  63
  64 int (*BIO_meth_get_read(BIO_METHOD *biom)) (BIO *, char *, int)
  65 {
  66     return biom->bread;
  67 }
  68
  69 int BIO_meth_set_read(BIO_METHOD *biom,
  70                       int (*bread) (BIO *, char *, int))
  71 {
  72     biom->bread = bread;
  73     return 1;
  74 }
  75
  76 int (*BIO_meth_get_puts(BIO_METHOD *biom)) (BIO *, const char *)
  77 {
  78     return biom->bputs;
  79 }
  80
  81 int BIO_meth_set_puts(BIO_METHOD *biom,
  82                       int (*bputs) (BIO *, const char *))
  83 {
  84     biom->bputs = bputs;
  85     return 1;
  86 }
  87
  88 int (*BIO_meth_get_gets(BIO_METHOD *biom)) (BIO *, char *, int)
  89 {
  90     return biom->bgets;
  91 }
  92
  93 int BIO_meth_set_gets(BIO_METHOD *biom,
  94                       int (*bgets) (BIO *, char *, int))
  95 {
  96     biom->bgets = bgets;
  97     return 1;
  98 }
  99
 100 long (*BIO_meth_get_ctrl(BIO_METHOD *biom)) (BIO *, int, long, void *)
 101 {
 102     return biom->ctrl;
 103 }
 104
 105 int BIO_meth_set_ctrl(BIO_METHOD *biom,
 106                       long (*ctrl) (BIO *, int, long, void *))
 107 {
 108     biom->ctrl = ctrl;
 109     return 1;
 110 }
 111
 112 int (*BIO_meth_get_create(BIO_METHOD *biom)) (BIO *)
 113 {
 114     return biom->create;
 115 }
 116
 117 int BIO_meth_set_create(BIO_METHOD *biom, int (*create) (BIO *))
 118 {
 119     biom->create = create;
 120     return 1;
 121 }
 122
 123 int (*BIO_meth_get_destroy(BIO_METHOD *biom)) (BIO *)
 124 {
 125     return biom->destroy;
 126 }
 127
 128 int BIO_meth_set_destroy(BIO_METHOD *biom, int (*destroy) (BIO *))
 129 {
 130     biom->destroy = destroy;
 131     return 1;
 132 }
 133
 134 long (*BIO_meth_get_callback_ctrl(BIO_METHOD *biom)) (BIO *, int, bio_info_cb *)
 135 {
 136     return biom->callback_ctrl;
 137 }
 138
 139 int BIO_meth_set_callback_ctrl(BIO_METHOD *biom,
 140                                long (*callback_ctrl) (BIO *, int,
 141                                                       bio_info_cb *))
 142 {
 143     biom->callback_ctrl = callback_ctrl;
 144     return 1;
 145 }