1 /*
2 * Copyright 2011-2020 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 /*
11 * DTLS code by Eric Rescorla <ekr@rtfm.com>
12 *
13 * Copyright (C) 2006, Network Resonance, Inc. Copyright (C) 2011, RTFM, Inc.
14 */
15
16 #include <stdio.h>
17 #include <openssl/objects.h>
18 #include "ssl_local.h"
19
20 #ifndef OPENSSL_NO_SRTP
21
22 static SRTP_PROTECTION_PROFILE srtp_known_profiles[] = {
23 {
24 "SRTP_AES128_CM_SHA1_80",
25 SRTP_AES128_CM_SHA1_80,
26 },
27 {
28 "SRTP_AES128_CM_SHA1_32",
29 SRTP_AES128_CM_SHA1_32,
30 },
31 {
32 "SRTP_AEAD_AES_128_GCM",
33 SRTP_AEAD_AES_128_GCM,
34 },
35 {
36 "SRTP_AEAD_AES_256_GCM",
37 SRTP_AEAD_AES_256_GCM,
38 },
39 {
40 "SRTP_DOUBLE_AEAD_AES_128_GCM_AEAD_AES_128_GCM",
41 SRTP_DOUBLE_AEAD_AES_128_GCM_AEAD_AES_128_GCM,
42 },
43 {
44 "SRTP_DOUBLE_AEAD_AES_256_GCM_AEAD_AES_256_GCM",
45 SRTP_DOUBLE_AEAD_AES_256_GCM_AEAD_AES_256_GCM,
46 },
47 {
48 "SRTP_ARIA_128_CTR_HMAC_SHA1_80",
49 SRTP_ARIA_128_CTR_HMAC_SHA1_80,
50 },
51 {
52 "SRTP_ARIA_128_CTR_HMAC_SHA1_32",
53 SRTP_ARIA_128_CTR_HMAC_SHA1_32,
54 },
55 {
56 "SRTP_ARIA_256_CTR_HMAC_SHA1_80",
57 SRTP_ARIA_256_CTR_HMAC_SHA1_80,
58 },
59 {
60 "SRTP_ARIA_256_CTR_HMAC_SHA1_32",
61 SRTP_ARIA_256_CTR_HMAC_SHA1_32,
62 },
63 {
64 "SRTP_AEAD_ARIA_128_GCM",
65 SRTP_AEAD_ARIA_128_GCM,
66 },
67 {
68 "SRTP_AEAD_ARIA_256_GCM",
69 SRTP_AEAD_ARIA_256_GCM,
70 },
71 {0}
72 };
73
find_profile_by_name(char * profile_name,SRTP_PROTECTION_PROFILE ** pptr,size_t len)74 static int find_profile_by_name(char *profile_name,
75 SRTP_PROTECTION_PROFILE **pptr, size_t len)
76 {
77 SRTP_PROTECTION_PROFILE *p;
78
79 p = srtp_known_profiles;
80 while (p->name) {
81 if ((len == strlen(p->name))
82 && strncmp(p->name, profile_name, len) == 0) {
83 *pptr = p;
84 return 0;
85 }
86
87 p++;
88 }
89
90 return 1;
91 }
92
ssl_ctx_make_profiles(const char * profiles_string,STACK_OF (SRTP_PROTECTION_PROFILE)** out)93 static int ssl_ctx_make_profiles(const char *profiles_string,
94 STACK_OF(SRTP_PROTECTION_PROFILE) **out)
95 {
96 STACK_OF(SRTP_PROTECTION_PROFILE) *profiles;
97
98 char *col;
99 char *ptr = (char *)profiles_string;
100 SRTP_PROTECTION_PROFILE *p;
101
102 if ((profiles = sk_SRTP_PROTECTION_PROFILE_new_null()) == NULL) {
103 ERR_raise(ERR_LIB_SSL, SSL_R_SRTP_COULD_NOT_ALLOCATE_PROFILES);
104 return 1;
105 }
106
107 do {
108 col = strchr(ptr, ':');
109
110 if (!find_profile_by_name(ptr, &p, col ? (size_t)(col - ptr)
111 : strlen(ptr))) {
112 if (sk_SRTP_PROTECTION_PROFILE_find(profiles, p) >= 0) {
113 ERR_raise(ERR_LIB_SSL, SSL_R_BAD_SRTP_PROTECTION_PROFILE_LIST);
114 goto err;
115 }
116
117 if (!sk_SRTP_PROTECTION_PROFILE_push(profiles, p)) {
118 ERR_raise(ERR_LIB_SSL, SSL_R_SRTP_COULD_NOT_ALLOCATE_PROFILES);
119 goto err;
120 }
121 } else {
122 ERR_raise(ERR_LIB_SSL, SSL_R_SRTP_UNKNOWN_PROTECTION_PROFILE);
123 goto err;
124 }
125
126 if (col)
127 ptr = col + 1;
128 } while (col);
129
130 sk_SRTP_PROTECTION_PROFILE_free(*out);
131
132 *out = profiles;
133
134 return 0;
135 err:
136 sk_SRTP_PROTECTION_PROFILE_free(profiles);
137 return 1;
138 }
139
SSL_CTX_set_tlsext_use_srtp(SSL_CTX * ctx,const char * profiles)140 int SSL_CTX_set_tlsext_use_srtp(SSL_CTX *ctx, const char *profiles)
141 {
142 return ssl_ctx_make_profiles(profiles, &ctx->srtp_profiles);
143 }
144
SSL_set_tlsext_use_srtp(SSL * s,const char * profiles)145 int SSL_set_tlsext_use_srtp(SSL *s, const char *profiles)
146 {
147 SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
148
149 if (sc == NULL)
150 return 0;
151
152 return ssl_ctx_make_profiles(profiles, &sc->srtp_profiles);
153 }
154
STACK_OF(SRTP_PROTECTION_PROFILE)155 STACK_OF(SRTP_PROTECTION_PROFILE) *SSL_get_srtp_profiles(SSL *s)
156 {
157 SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
158
159 if (sc != NULL) {
160 if (sc->srtp_profiles != NULL) {
161 return sc->srtp_profiles;
162 } else if ((s->ctx != NULL) && (s->ctx->srtp_profiles != NULL)) {
163 return s->ctx->srtp_profiles;
164 }
165 }
166
167 return NULL;
168 }
169
SSL_get_selected_srtp_profile(SSL * s)170 SRTP_PROTECTION_PROFILE *SSL_get_selected_srtp_profile(SSL *s)
171 {
172 SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
173
174 if (sc == NULL)
175 return 0;
176
177 return sc->srtp_profile;
178 }
179 #endif
180