2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
62 #include <openssl/asn1.h>
64 #ifndef OPENSSL_NO_BIO
65 #include <openssl/bio.h>
67 #include <openssl/crypto.h>
68 #include <openssl/ossl_typ.h>
69 #ifndef OPENSSL_NO_DEPRECATED
70 #include <openssl/bn.h>
74 #error RSA is disabled.
81 /* Declared already in ossl_typ.h */
82 /* typedef struct rsa_st RSA; */
83 /* typedef struct rsa_meth_st RSA_METHOD; */
88 int (*rsa_pub_enc)(int flen,const unsigned char *from,
90 RSA *rsa,int padding);
91 int (*rsa_pub_dec)(int flen,const unsigned char *from,
93 RSA *rsa,int padding);
94 int (*rsa_priv_enc)(int flen,const unsigned char *from,
96 RSA *rsa,int padding);
97 int (*rsa_priv_dec)(int flen,const unsigned char *from,
99 RSA *rsa,int padding);
100 int (*rsa_mod_exp)(BIGNUM *r0,const BIGNUM *I,RSA *rsa,BN_CTX *ctx); /* Can be null */
101 int (*bn_mod_exp)(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
102 const BIGNUM *m, BN_CTX *ctx,
103 BN_MONT_CTX *m_ctx); /* Can be null */
104 int (*init)(RSA *rsa); /* called at new */
105 int (*finish)(RSA *rsa); /* called at free */
106 int flags; /* RSA_METHOD_FLAG_* things */
107 char *app_data; /* may be needed! */
108 /* New sign and verify functions: some libraries don't allow arbitrary data
109 * to be signed/verified: this allows them to be used. Note: for this to work
110 * the RSA_public_decrypt() and RSA_private_encrypt() should *NOT* be used
111 * RSA_sign(), RSA_verify() should be used instead. Note: for backwards
112 * compatibility this functionality is only enabled if the RSA_FLAG_SIGN_VER
113 * option is set in 'flags'.
115 int (*rsa_sign)(int type,
116 const unsigned char *m, unsigned int m_length,
117 unsigned char *sigret, unsigned int *siglen, const RSA *rsa);
118 int (*rsa_verify)(int dtype,
119 const unsigned char *m, unsigned int m_length,
120 const unsigned char *sigbuf, unsigned int siglen,
122 /* If this callback is NULL, the builtin software RSA key-gen will be used. This
123 * is for behavioural compatibility whilst the code gets rewired, but one day
124 * it would be nice to assume there are no such things as "builtin software"
125 * implementations. */
126 int (*rsa_keygen)(RSA *rsa, int bits, BIGNUM *e, BN_GENCB *cb);
131 /* The first parameter is used to pickup errors where
132 * this is passed instead of aEVP_PKEY, it is set to 0 */
135 const RSA_METHOD *meth;
136 /* functional reference if 'meth' is ENGINE-provided */
146 /* be careful using this if the RSA structure is shared */
147 CRYPTO_EX_DATA ex_data;
151 /* Used to cache montgomery values */
152 BN_MONT_CTX *_method_mod_n;
153 BN_MONT_CTX *_method_mod_p;
154 BN_MONT_CTX *_method_mod_q;
156 /* all BIGNUM values are actually in the following data, if it is not
159 BN_BLINDING *blinding;
160 BN_BLINDING *mt_blinding;
163 #ifndef OPENSSL_RSA_MAX_MODULUS_BITS
164 # define OPENSSL_RSA_MAX_MODULUS_BITS 16384
167 #ifndef OPENSSL_RSA_SMALL_MODULUS_BITS
168 # define OPENSSL_RSA_SMALL_MODULUS_BITS 3072
170 #ifndef OPENSSL_RSA_MAX_PUBEXP_BITS
171 # define OPENSSL_RSA_MAX_PUBEXP_BITS 64 /* exponent limit enforced for "large" modulus only */
175 #define RSA_F4 0x10001L
177 #define RSA_METHOD_FLAG_NO_CHECK 0x0001 /* don't check pub/private match */
179 #define RSA_FLAG_CACHE_PUBLIC 0x0002
180 #define RSA_FLAG_CACHE_PRIVATE 0x0004
181 #define RSA_FLAG_BLINDING 0x0008
182 #define RSA_FLAG_THREAD_SAFE 0x0010
183 /* This flag means the private key operations will be handled by rsa_mod_exp
184 * and that they do not depend on the private key components being present:
185 * for example a key stored in external hardware. Without this flag bn_mod_exp
186 * gets called when private key components are absent.
188 #define RSA_FLAG_EXT_PKEY 0x0020
190 /* This flag in the RSA_METHOD enables the new rsa_sign, rsa_verify functions.
192 #define RSA_FLAG_SIGN_VER 0x0040
194 #define RSA_FLAG_NO_BLINDING 0x0080 /* new with 0.9.6j and 0.9.7b; the built-in
195 * RSA implementation now uses blinding by
196 * default (ignoring RSA_FLAG_BLINDING),
197 * but other engines might not need it
199 #define RSA_FLAG_NO_EXP_CONSTTIME 0x0100 /* new with 0.9.7h; the built-in RSA
200 * implementation now uses constant time
201 * modular exponentiation for secret exponents
202 * by default. This flag causes the
203 * faster variable sliding window method to
204 * be used for all exponents.
207 #define EVP_PKEY_CTX_set_rsa_padding(ctx, pad) \
208 EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_RSA, -1, EVP_PKEY_CTRL_RSA_PADDING, \
211 #define EVP_PKEY_CTX_set_rsa_pss_saltlen(ctx, len) \
212 EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_RSA, \
213 (EVP_PKEY_OP_SIGN|EVP_PKEY_OP_VERIFY), \
214 EVP_PKEY_CTRL_RSA_PSS_SALTLEN, \
217 #define EVP_PKEY_CTX_set_rsa_keygen_bits(ctx, bits) \
218 EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_RSA, EVP_PKEY_OP_KEYGEN, \
219 EVP_PKEY_CTRL_RSA_KEYGEN_BITS, bits, NULL)
221 #define EVP_PKEY_CTX_set_rsa_keygen_pubexp(ctx, pubexp) \
222 EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_RSA, EVP_PKEY_OP_KEYGEN, \
223 EVP_PKEY_CTRL_RSA_KEYGEN_PUBEXP, 0, pubexp)
225 #define EVP_PKEY_CTRL_RSA_PADDING (EVP_PKEY_ALG_CTRL + 1)
226 #define EVP_PKEY_CTRL_RSA_PSS_SALTLEN (EVP_PKEY_ALG_CTRL + 2)
228 #define EVP_PKEY_CTRL_RSA_KEYGEN_BITS (EVP_PKEY_ALG_CTRL + 3)
229 #define EVP_PKEY_CTRL_RSA_KEYGEN_PUBEXP (EVP_PKEY_ALG_CTRL + 4)
231 #define RSA_PKCS1_PADDING 1
232 #define RSA_SSLV23_PADDING 2
233 #define RSA_NO_PADDING 3
234 #define RSA_PKCS1_OAEP_PADDING 4
235 #define RSA_X931_PADDING 5
237 #define RSA_PKCS1_PSS_PADDING 6
239 #define RSA_PKCS1_PADDING_SIZE 11
241 #define RSA_set_app_data(s,arg) RSA_set_ex_data(s,0,arg)
242 #define RSA_get_app_data(s) RSA_get_ex_data(s,0)
245 RSA * RSA_new_method(ENGINE *engine);
246 int RSA_size(const RSA *);
248 /* Deprecated version */
249 #ifndef OPENSSL_NO_DEPRECATED
250 RSA * RSA_generate_key(int bits, unsigned long e,void
251 (*callback)(int,int,void *),void *cb_arg);
252 #endif /* !defined(OPENSSL_NO_DEPRECATED) */
255 int RSA_generate_key_ex(RSA *rsa, int bits, BIGNUM *e, BN_GENCB *cb);
257 int RSA_check_key(const RSA *);
258 /* next 4 return -1 on error */
259 int RSA_public_encrypt(int flen, const unsigned char *from,
260 unsigned char *to, RSA *rsa,int padding);
261 int RSA_private_encrypt(int flen, const unsigned char *from,
262 unsigned char *to, RSA *rsa,int padding);
263 int RSA_public_decrypt(int flen, const unsigned char *from,
264 unsigned char *to, RSA *rsa,int padding);
265 int RSA_private_decrypt(int flen, const unsigned char *from,
266 unsigned char *to, RSA *rsa,int padding);
267 void RSA_free (RSA *r);
268 /* "up" the RSA object's reference count */
269 int RSA_up_ref(RSA *r);
271 int RSA_flags(const RSA *r);
273 void RSA_set_default_method(const RSA_METHOD *meth);
274 const RSA_METHOD *RSA_get_default_method(void);
275 const RSA_METHOD *RSA_get_method(const RSA *rsa);
276 int RSA_set_method(RSA *rsa, const RSA_METHOD *meth);
278 /* This function needs the memory locking malloc callbacks to be installed */
279 int RSA_memory_lock(RSA *r);
281 /* these are the actual SSLeay RSA functions */
282 const RSA_METHOD *RSA_PKCS1_SSLeay(void);
284 const RSA_METHOD *RSA_null_method(void);
286 DECLARE_ASN1_ENCODE_FUNCTIONS_const(RSA, RSAPublicKey)
287 DECLARE_ASN1_ENCODE_FUNCTIONS_const(RSA, RSAPrivateKey)
289 #ifndef OPENSSL_NO_FP_API
290 int RSA_print_fp(FILE *fp, const RSA *r,int offset);
293 #ifndef OPENSSL_NO_BIO
294 int RSA_print(BIO *bp, const RSA *r,int offset);
297 int i2d_RSA_NET(const RSA *a, unsigned char **pp,
298 int (*cb)(char *buf, int len, const char *prompt, int verify),
300 RSA *d2i_RSA_NET(RSA **a, const unsigned char **pp, long length,
301 int (*cb)(char *buf, int len, const char *prompt, int verify),
304 int i2d_Netscape_RSA(const RSA *a, unsigned char **pp,
305 int (*cb)(char *buf, int len, const char *prompt,
307 RSA *d2i_Netscape_RSA(RSA **a, const unsigned char **pp, long length,
308 int (*cb)(char *buf, int len, const char *prompt,
311 /* The following 2 functions sign and verify a X509_SIG ASN1 object
312 * inside PKCS#1 padded RSA encryption */
313 int RSA_sign(int type, const unsigned char *m, unsigned int m_length,
314 unsigned char *sigret, unsigned int *siglen, RSA *rsa);
315 int RSA_verify(int type, const unsigned char *m, unsigned int m_length,
316 const unsigned char *sigbuf, unsigned int siglen, RSA *rsa);
318 /* The following 2 function sign and verify a ASN1_OCTET_STRING
319 * object inside PKCS#1 padded RSA encryption */
320 int RSA_sign_ASN1_OCTET_STRING(int type,
321 const unsigned char *m, unsigned int m_length,
322 unsigned char *sigret, unsigned int *siglen, RSA *rsa);
323 int RSA_verify_ASN1_OCTET_STRING(int type,
324 const unsigned char *m, unsigned int m_length,
325 unsigned char *sigbuf, unsigned int siglen, RSA *rsa);
327 int RSA_blinding_on(RSA *rsa, BN_CTX *ctx);
328 void RSA_blinding_off(RSA *rsa);
329 BN_BLINDING *RSA_setup_blinding(RSA *rsa, BN_CTX *ctx);
331 int RSA_padding_add_PKCS1_type_1(unsigned char *to,int tlen,
332 const unsigned char *f,int fl);
333 int RSA_padding_check_PKCS1_type_1(unsigned char *to,int tlen,
334 const unsigned char *f,int fl,int rsa_len);
335 int RSA_padding_add_PKCS1_type_2(unsigned char *to,int tlen,
336 const unsigned char *f,int fl);
337 int RSA_padding_check_PKCS1_type_2(unsigned char *to,int tlen,
338 const unsigned char *f,int fl,int rsa_len);
339 int PKCS1_MGF1(unsigned char *mask, long len,
340 const unsigned char *seed, long seedlen, const EVP_MD *dgst);
341 int RSA_padding_add_PKCS1_OAEP(unsigned char *to,int tlen,
342 const unsigned char *f,int fl,
343 const unsigned char *p,int pl);
344 int RSA_padding_check_PKCS1_OAEP(unsigned char *to,int tlen,
345 const unsigned char *f,int fl,int rsa_len,
346 const unsigned char *p,int pl);
347 int RSA_padding_add_SSLv23(unsigned char *to,int tlen,
348 const unsigned char *f,int fl);
349 int RSA_padding_check_SSLv23(unsigned char *to,int tlen,
350 const unsigned char *f,int fl,int rsa_len);
351 int RSA_padding_add_none(unsigned char *to,int tlen,
352 const unsigned char *f,int fl);
353 int RSA_padding_check_none(unsigned char *to,int tlen,
354 const unsigned char *f,int fl,int rsa_len);
355 int RSA_padding_add_X931(unsigned char *to,int tlen,
356 const unsigned char *f,int fl);
357 int RSA_padding_check_X931(unsigned char *to,int tlen,
358 const unsigned char *f,int fl,int rsa_len);
359 int RSA_X931_hash_id(int nid);
361 int RSA_verify_PKCS1_PSS(RSA *rsa, const unsigned char *mHash,
362 const EVP_MD *Hash, const unsigned char *EM, int sLen);
363 int RSA_padding_add_PKCS1_PSS(RSA *rsa, unsigned char *EM,
364 const unsigned char *mHash,
365 const EVP_MD *Hash, int sLen);
367 int RSA_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func,
368 CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func);
369 int RSA_set_ex_data(RSA *r,int idx,void *arg);
370 void *RSA_get_ex_data(const RSA *r, int idx);
372 RSA *RSAPublicKey_dup(RSA *rsa);
373 RSA *RSAPrivateKey_dup(RSA *rsa);
375 /* BEGIN ERROR CODES */
376 /* The following lines are auto generated by the script mkerr.pl. Any changes
377 * made after this point may be overwritten when the script is next run.
379 void ERR_load_RSA_strings(void);
381 /* Error codes for the RSA functions. */
383 /* Function codes. */
384 #define RSA_F_CHECK_PADDING_MD 140
385 #define RSA_F_DO_RSA_PRINT 146
386 #define RSA_F_RSA_VERIFY 119
387 #define RSA_F_MEMORY_LOCK 100
388 #define RSA_F_OLD_RSA_PRIV_DECODE 147
389 #define RSA_F_PKEY_RSA_CTRL 143
390 #define RSA_F_PKEY_RSA_CTRL_STR 144
391 #define RSA_F_PKEY_RSA_SIGN 142
392 #define RSA_F_PKEY_RSA_VERIFYRECOVER 141
393 #define RSA_F_RSA_BUILTIN_KEYGEN 129
394 #define RSA_F_RSA_CHECK_KEY 123
395 #define RSA_F_RSA_EAY_PRIVATE_DECRYPT 101
396 #define RSA_F_RSA_EAY_PRIVATE_ENCRYPT 102
397 #define RSA_F_RSA_EAY_PUBLIC_DECRYPT 103
398 #define RSA_F_RSA_EAY_PUBLIC_ENCRYPT 104
399 #define RSA_F_RSA_GENERATE_KEY 105
400 #define RSA_F_RSA_MEMORY_LOCK 130
401 #define RSA_F_RSA_NEW_METHOD 106
402 #define RSA_F_RSA_NULL 124
403 #define RSA_F_RSA_NULL_MOD_EXP 131
404 #define RSA_F_RSA_NULL_PRIVATE_DECRYPT 132
405 #define RSA_F_RSA_NULL_PRIVATE_ENCRYPT 133
406 #define RSA_F_RSA_NULL_PUBLIC_DECRYPT 134
407 #define RSA_F_RSA_NULL_PUBLIC_ENCRYPT 135
408 #define RSA_F_RSA_PADDING_ADD_NONE 107
409 #define RSA_F_RSA_PADDING_ADD_PKCS1_OAEP 121
410 #define RSA_F_RSA_PADDING_ADD_PKCS1_PSS 125
411 #define RSA_F_RSA_PADDING_ADD_PKCS1_TYPE_1 108
412 #define RSA_F_RSA_PADDING_ADD_PKCS1_TYPE_2 109
413 #define RSA_F_RSA_PADDING_ADD_SSLV23 110
414 #define RSA_F_RSA_PADDING_ADD_X931 127
415 #define RSA_F_RSA_PADDING_CHECK_NONE 111
416 #define RSA_F_RSA_PADDING_CHECK_PKCS1_OAEP 122
417 #define RSA_F_RSA_PADDING_CHECK_PKCS1_TYPE_1 112
418 #define RSA_F_RSA_PADDING_CHECK_PKCS1_TYPE_2 113
419 #define RSA_F_RSA_PADDING_CHECK_SSLV23 114
420 #define RSA_F_RSA_PADDING_CHECK_X931 128
421 #define RSA_F_RSA_PRINT 115
422 #define RSA_F_RSA_PRINT_FP 116
423 #define RSA_F_RSA_PRIV_DECODE 137
424 #define RSA_F_RSA_PRIV_ENCODE 138
425 #define RSA_F_RSA_PUB_DECODE 139
426 #define RSA_F_RSA_SETUP_BLINDING 136
427 #define RSA_F_RSA_SIGN 117
428 #define RSA_F_RSA_SIGN_ASN1_OCTET_STRING 118
429 #define RSA_F_INT_RSA_VERIFY 145
430 #define RSA_F_RSA_VERIFY_ASN1_OCTET_STRING 120
431 #define RSA_F_RSA_VERIFY_PKCS1_PSS 126
434 #define RSA_R_ALGORITHM_MISMATCH 100
435 #define RSA_R_BAD_E_VALUE 101
436 #define RSA_R_BAD_FIXED_HEADER_DECRYPT 102
437 #define RSA_R_BAD_PAD_BYTE_COUNT 103
438 #define RSA_R_BAD_SIGNATURE 104
439 #define RSA_R_BLOCK_TYPE_IS_NOT_01 106
440 #define RSA_R_BLOCK_TYPE_IS_NOT_02 107
441 #define RSA_R_DATA_GREATER_THAN_MOD_LEN 108
442 #define RSA_R_DATA_TOO_LARGE 109
443 #define RSA_R_DATA_TOO_LARGE_FOR_KEY_SIZE 110
444 #define RSA_R_DATA_TOO_LARGE_FOR_MODULUS 132
445 #define RSA_R_DATA_TOO_SMALL 111
446 #define RSA_R_DATA_TOO_SMALL_FOR_KEY_SIZE 122
447 #define RSA_R_DIGEST_TOO_BIG_FOR_RSA_KEY 112
448 #define RSA_R_DMP1_NOT_CONGRUENT_TO_D 124
449 #define RSA_R_DMQ1_NOT_CONGRUENT_TO_D 125
450 #define RSA_R_D_E_NOT_CONGRUENT_TO_1 123
451 #define RSA_R_FIRST_OCTET_INVALID 133
452 #define RSA_R_ILLEGAL_OR_UNSUPPORTED_PADDING_MODE 144
453 #define RSA_R_INVALID_DIGEST 105
454 #define RSA_R_INVALID_DIGEST_LENGTH 143
455 #define RSA_R_INVALID_HEADER 137
456 #define RSA_R_INVALID_KEYBITS 145
457 #define RSA_R_INVALID_MESSAGE_LENGTH 131
458 #define RSA_R_INVALID_PADDING 138
459 #define RSA_R_INVALID_PADDING_MODE 141
460 #define RSA_R_INVALID_PSS_SALTLEN 146
461 #define RSA_R_INVALID_TRAILER 139
462 #define RSA_R_INVALID_X931_DIGEST 142
463 #define RSA_R_IQMP_NOT_INVERSE_OF_Q 126
464 #define RSA_R_KEY_SIZE_TOO_SMALL 120
465 #define RSA_R_LAST_OCTET_INVALID 134
466 #define RSA_R_MODULUS_TOO_LARGE 105
467 #define RSA_R_NO_PUBLIC_EXPONENT 140
468 #define RSA_R_NULL_BEFORE_BLOCK_MISSING 113
469 #define RSA_R_N_DOES_NOT_EQUAL_P_Q 127
470 #define RSA_R_OAEP_DECODING_ERROR 121
471 #define RSA_R_PADDING_CHECK_FAILED 114
472 #define RSA_R_P_NOT_PRIME 128
473 #define RSA_R_Q_NOT_PRIME 129
474 #define RSA_R_RSA_OPERATIONS_NOT_SUPPORTED 130
475 #define RSA_R_SLEN_CHECK_FAILED 136
476 #define RSA_R_SLEN_RECOVERY_FAILED 135
477 #define RSA_R_SSLV3_ROLLBACK_ATTACK 115
478 #define RSA_R_THE_ASN1_OBJECT_IDENTIFIER_IS_NOT_KNOWN_FOR_THIS_MD 116
479 #define RSA_R_UNKNOWN_ALGORITHM_TYPE 117
480 #define RSA_R_UNKNOWN_PADDING_TYPE 118
481 #define RSA_R_VALUE_MISSING 147
482 #define RSA_R_WRONG_SIGNATURE_LENGTH 119