1e71b7053SJung-uk Kim /*
2*b077aed3SPierre Pronchery  * Copyright 2016-2021 The OpenSSL Project Authors. All Rights Reserved.
3e71b7053SJung-uk Kim  *
4*b077aed3SPierre Pronchery  * Licensed under the Apache License 2.0 (the "License").  You may not use
5e71b7053SJung-uk Kim  * this file except in compliance with the License.  You can obtain a copy
6e71b7053SJung-uk Kim  * in the file LICENSE in the source distribution or at
7e71b7053SJung-uk Kim  * https://www.openssl.org/source/license.html
8e71b7053SJung-uk Kim  */
9e71b7053SJung-uk Kim 
10e71b7053SJung-uk Kim #include <openssl/crypto.h>
11e71b7053SJung-uk Kim #include "internal/cryptlib.h"
12e71b7053SJung-uk Kim 
13e71b7053SJung-uk Kim #if !defined(OPENSSL_THREADS) || defined(CRYPTO_TDEBUG)
14e71b7053SJung-uk Kim 
15da327cd2SJung-uk Kim # if defined(OPENSSL_SYS_UNIX)
16da327cd2SJung-uk Kim #  include <sys/types.h>
17da327cd2SJung-uk Kim #  include <unistd.h>
18da327cd2SJung-uk Kim # endif
19da327cd2SJung-uk Kim 
CRYPTO_THREAD_lock_new(void)20e71b7053SJung-uk Kim CRYPTO_RWLOCK *CRYPTO_THREAD_lock_new(void)
21e71b7053SJung-uk Kim {
22e71b7053SJung-uk Kim     CRYPTO_RWLOCK *lock;
23e71b7053SJung-uk Kim 
24e71b7053SJung-uk Kim     if ((lock = OPENSSL_zalloc(sizeof(unsigned int))) == NULL) {
25e71b7053SJung-uk Kim         /* Don't set error, to avoid recursion blowup. */
26e71b7053SJung-uk Kim         return NULL;
27e71b7053SJung-uk Kim     }
28e71b7053SJung-uk Kim 
29e71b7053SJung-uk Kim     *(unsigned int *)lock = 1;
30e71b7053SJung-uk Kim 
31e71b7053SJung-uk Kim     return lock;
32e71b7053SJung-uk Kim }
33e71b7053SJung-uk Kim 
CRYPTO_THREAD_read_lock(CRYPTO_RWLOCK * lock)34*b077aed3SPierre Pronchery __owur int CRYPTO_THREAD_read_lock(CRYPTO_RWLOCK *lock)
35e71b7053SJung-uk Kim {
36e71b7053SJung-uk Kim     if (!ossl_assert(*(unsigned int *)lock == 1))
37e71b7053SJung-uk Kim         return 0;
38e71b7053SJung-uk Kim     return 1;
39e71b7053SJung-uk Kim }
40e71b7053SJung-uk Kim 
CRYPTO_THREAD_write_lock(CRYPTO_RWLOCK * lock)41*b077aed3SPierre Pronchery __owur int CRYPTO_THREAD_write_lock(CRYPTO_RWLOCK *lock)
42e71b7053SJung-uk Kim {
43e71b7053SJung-uk Kim     if (!ossl_assert(*(unsigned int *)lock == 1))
44e71b7053SJung-uk Kim         return 0;
45e71b7053SJung-uk Kim     return 1;
46e71b7053SJung-uk Kim }
47e71b7053SJung-uk Kim 
CRYPTO_THREAD_unlock(CRYPTO_RWLOCK * lock)48e71b7053SJung-uk Kim int CRYPTO_THREAD_unlock(CRYPTO_RWLOCK *lock)
49e71b7053SJung-uk Kim {
50e71b7053SJung-uk Kim     if (!ossl_assert(*(unsigned int *)lock == 1))
51e71b7053SJung-uk Kim         return 0;
52e71b7053SJung-uk Kim     return 1;
53e71b7053SJung-uk Kim }
54e71b7053SJung-uk Kim 
CRYPTO_THREAD_lock_free(CRYPTO_RWLOCK * lock)55e71b7053SJung-uk Kim void CRYPTO_THREAD_lock_free(CRYPTO_RWLOCK *lock) {
56e71b7053SJung-uk Kim     if (lock == NULL)
57e71b7053SJung-uk Kim         return;
58e71b7053SJung-uk Kim 
59e71b7053SJung-uk Kim     *(unsigned int *)lock = 0;
60e71b7053SJung-uk Kim     OPENSSL_free(lock);
61e71b7053SJung-uk Kim 
62e71b7053SJung-uk Kim     return;
63e71b7053SJung-uk Kim }
64e71b7053SJung-uk Kim 
CRYPTO_THREAD_run_once(CRYPTO_ONCE * once,void (* init)(void))65e71b7053SJung-uk Kim int CRYPTO_THREAD_run_once(CRYPTO_ONCE *once, void (*init)(void))
66e71b7053SJung-uk Kim {
67e71b7053SJung-uk Kim     if (*once != 0)
68e71b7053SJung-uk Kim         return 1;
69e71b7053SJung-uk Kim 
70e71b7053SJung-uk Kim     init();
71e71b7053SJung-uk Kim     *once = 1;
72e71b7053SJung-uk Kim 
73e71b7053SJung-uk Kim     return 1;
74e71b7053SJung-uk Kim }
75e71b7053SJung-uk Kim 
76e71b7053SJung-uk Kim #define OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX 256
77e71b7053SJung-uk Kim 
78e71b7053SJung-uk Kim static void *thread_local_storage[OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX];
79e71b7053SJung-uk Kim 
CRYPTO_THREAD_init_local(CRYPTO_THREAD_LOCAL * key,void (* cleanup)(void *))80e71b7053SJung-uk Kim int CRYPTO_THREAD_init_local(CRYPTO_THREAD_LOCAL *key, void (*cleanup)(void *))
81e71b7053SJung-uk Kim {
82e71b7053SJung-uk Kim     static unsigned int thread_local_key = 0;
83e71b7053SJung-uk Kim 
84e71b7053SJung-uk Kim     if (thread_local_key >= OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX)
85e71b7053SJung-uk Kim         return 0;
86e71b7053SJung-uk Kim 
87e71b7053SJung-uk Kim     *key = thread_local_key++;
88e71b7053SJung-uk Kim 
89e71b7053SJung-uk Kim     thread_local_storage[*key] = NULL;
90e71b7053SJung-uk Kim 
91e71b7053SJung-uk Kim     return 1;
92e71b7053SJung-uk Kim }
93e71b7053SJung-uk Kim 
CRYPTO_THREAD_get_local(CRYPTO_THREAD_LOCAL * key)94e71b7053SJung-uk Kim void *CRYPTO_THREAD_get_local(CRYPTO_THREAD_LOCAL *key)
95e71b7053SJung-uk Kim {
96e71b7053SJung-uk Kim     if (*key >= OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX)
97e71b7053SJung-uk Kim         return NULL;
98e71b7053SJung-uk Kim 
99e71b7053SJung-uk Kim     return thread_local_storage[*key];
100e71b7053SJung-uk Kim }
101e71b7053SJung-uk Kim 
CRYPTO_THREAD_set_local(CRYPTO_THREAD_LOCAL * key,void * val)102e71b7053SJung-uk Kim int CRYPTO_THREAD_set_local(CRYPTO_THREAD_LOCAL *key, void *val)
103e71b7053SJung-uk Kim {
104e71b7053SJung-uk Kim     if (*key >= OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX)
105e71b7053SJung-uk Kim         return 0;
106e71b7053SJung-uk Kim 
107e71b7053SJung-uk Kim     thread_local_storage[*key] = val;
108e71b7053SJung-uk Kim 
109e71b7053SJung-uk Kim     return 1;
110e71b7053SJung-uk Kim }
111e71b7053SJung-uk Kim 
CRYPTO_THREAD_cleanup_local(CRYPTO_THREAD_LOCAL * key)112e71b7053SJung-uk Kim int CRYPTO_THREAD_cleanup_local(CRYPTO_THREAD_LOCAL *key)
113e71b7053SJung-uk Kim {
114e71b7053SJung-uk Kim     *key = OPENSSL_CRYPTO_THREAD_LOCAL_KEY_MAX + 1;
115e71b7053SJung-uk Kim     return 1;
116e71b7053SJung-uk Kim }
117e71b7053SJung-uk Kim 
CRYPTO_THREAD_get_current_id(void)118e71b7053SJung-uk Kim CRYPTO_THREAD_ID CRYPTO_THREAD_get_current_id(void)
119e71b7053SJung-uk Kim {
120e71b7053SJung-uk Kim     return 0;
121e71b7053SJung-uk Kim }
122e71b7053SJung-uk Kim 
CRYPTO_THREAD_compare_id(CRYPTO_THREAD_ID a,CRYPTO_THREAD_ID b)123e71b7053SJung-uk Kim int CRYPTO_THREAD_compare_id(CRYPTO_THREAD_ID a, CRYPTO_THREAD_ID b)
124e71b7053SJung-uk Kim {
125e71b7053SJung-uk Kim     return (a == b);
126e71b7053SJung-uk Kim }
127e71b7053SJung-uk Kim 
CRYPTO_atomic_add(int * val,int amount,int * ret,CRYPTO_RWLOCK * lock)128e71b7053SJung-uk Kim int CRYPTO_atomic_add(int *val, int amount, int *ret, CRYPTO_RWLOCK *lock)
129e71b7053SJung-uk Kim {
130e71b7053SJung-uk Kim     *val += amount;
131e71b7053SJung-uk Kim     *ret  = *val;
132e71b7053SJung-uk Kim 
133e71b7053SJung-uk Kim     return 1;
134e71b7053SJung-uk Kim }
135e71b7053SJung-uk Kim 
CRYPTO_atomic_or(uint64_t * val,uint64_t op,uint64_t * ret,CRYPTO_RWLOCK * lock)136*b077aed3SPierre Pronchery int CRYPTO_atomic_or(uint64_t *val, uint64_t op, uint64_t *ret,
137*b077aed3SPierre Pronchery                      CRYPTO_RWLOCK *lock)
138*b077aed3SPierre Pronchery {
139*b077aed3SPierre Pronchery     *val |= op;
140*b077aed3SPierre Pronchery     *ret  = *val;
141*b077aed3SPierre Pronchery 
142*b077aed3SPierre Pronchery     return 1;
143*b077aed3SPierre Pronchery }
144*b077aed3SPierre Pronchery 
CRYPTO_atomic_load(uint64_t * val,uint64_t * ret,CRYPTO_RWLOCK * lock)145*b077aed3SPierre Pronchery int CRYPTO_atomic_load(uint64_t *val, uint64_t *ret, CRYPTO_RWLOCK *lock)
146*b077aed3SPierre Pronchery {
147*b077aed3SPierre Pronchery     *ret  = *val;
148*b077aed3SPierre Pronchery 
149*b077aed3SPierre Pronchery     return 1;
150*b077aed3SPierre Pronchery }
151*b077aed3SPierre Pronchery 
openssl_init_fork_handlers(void)152e71b7053SJung-uk Kim int openssl_init_fork_handlers(void)
153e71b7053SJung-uk Kim {
154e71b7053SJung-uk Kim     return 0;
155e71b7053SJung-uk Kim }
156e71b7053SJung-uk Kim 
openssl_get_fork_id(void)157da327cd2SJung-uk Kim int openssl_get_fork_id(void)
158da327cd2SJung-uk Kim {
159da327cd2SJung-uk Kim # if defined(OPENSSL_SYS_UNIX)
160da327cd2SJung-uk Kim     return getpid();
161da327cd2SJung-uk Kim # else
16217f01e99SJung-uk Kim     return 0;
163da327cd2SJung-uk Kim # endif
164da327cd2SJung-uk Kim }
165e71b7053SJung-uk Kim #endif
166