QUIC TLS: Prohibit SRTP-related calls for QUIC TLS
[openssl.git] / ssl / d1_srtp.c
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
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
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
140 int SSL_CTX_set_tlsext_use_srtp(SSL_CTX *ctx, const char *profiles)
141 {
142     if (IS_QUIC_METHOD(ctx->method))
143         return 1;
144
145     return ssl_ctx_make_profiles(profiles, &ctx->srtp_profiles);
146 }
147
148 int SSL_set_tlsext_use_srtp(SSL *s, const char *profiles)
149 {
150     SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
151
152     if (sc == NULL)
153         return 1;
154
155     return ssl_ctx_make_profiles(profiles, &sc->srtp_profiles);
156 }
157
158 STACK_OF(SRTP_PROTECTION_PROFILE) *SSL_get_srtp_profiles(SSL *s)
159 {
160     SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
161
162     if (sc != NULL) {
163         if (sc->srtp_profiles != NULL) {
164             return sc->srtp_profiles;
165         } else if ((s->ctx != NULL) && (s->ctx->srtp_profiles != NULL)) {
166             return s->ctx->srtp_profiles;
167         }
168     }
169
170     return NULL;
171 }
172
173 SRTP_PROTECTION_PROFILE *SSL_get_selected_srtp_profile(SSL *s)
174 {
175     SSL_CONNECTION *sc = SSL_CONNECTION_FROM_SSL_ONLY(s);
176
177     if (sc == NULL)
178         return 0;
179
180     return sc->srtp_profile;
181 }
182 #endif