1 /*
2  *  RSA simple data encryption program
3  *
4  *  Copyright The Mbed TLS Contributors
5  *  SPDX-License-Identifier: Apache-2.0
6  *
7  *  Licensed under the Apache License, Version 2.0 (the "License"); you may
8  *  not use this file except in compliance with the License.
9  *  You may obtain a copy of the License at
10  *
11  *  http://www.apache.org/licenses/LICENSE-2.0
12  *
13  *  Unless required by applicable law or agreed to in writing, software
14  *  distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
15  *  WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16  *  See the License for the specific language governing permissions and
17  *  limitations under the License.
18  */
19 
20 #include "mbedtls/build_info.h"
21 
22 #include "mbedtls/platform.h"
23 
24 #if defined(MBEDTLS_BIGNUM_C) && defined(MBEDTLS_PK_PARSE_C) && \
25     defined(MBEDTLS_ENTROPY_C) && defined(MBEDTLS_FS_IO) && \
26     defined(MBEDTLS_CTR_DRBG_C)
27 #include "mbedtls/error.h"
28 #include "mbedtls/pk.h"
29 #include "mbedtls/entropy.h"
30 #include "mbedtls/ctr_drbg.h"
31 
32 #include <stdio.h>
33 #include <string.h>
34 #endif
35 
36 #if !defined(MBEDTLS_BIGNUM_C) || !defined(MBEDTLS_PK_PARSE_C) ||  \
37     !defined(MBEDTLS_ENTROPY_C) || !defined(MBEDTLS_FS_IO) || \
38     !defined(MBEDTLS_CTR_DRBG_C)
main(void)39 int main( void )
40 {
41     mbedtls_printf("MBEDTLS_BIGNUM_C and/or MBEDTLS_PK_PARSE_C and/or "
42            "MBEDTLS_ENTROPY_C and/or MBEDTLS_FS_IO and/or "
43            "MBEDTLS_CTR_DRBG_C not defined.\n");
44     mbedtls_exit( 0 );
45 }
46 #else
47 
48 
main(int argc,char * argv[])49 int main( int argc, char *argv[] )
50 {
51     FILE *f;
52     int ret = 1;
53     int exit_code = MBEDTLS_EXIT_FAILURE;
54     size_t i, olen = 0;
55     mbedtls_pk_context pk;
56     mbedtls_entropy_context entropy;
57     mbedtls_ctr_drbg_context ctr_drbg;
58     unsigned char input[1024];
59     unsigned char buf[512];
60     const char *pers = "mbedtls_pk_encrypt";
61 
62     mbedtls_ctr_drbg_init( &ctr_drbg );
63     mbedtls_entropy_init( &entropy );
64     mbedtls_pk_init( &pk );
65 
66     if( argc != 3 )
67     {
68         mbedtls_printf( "usage: mbedtls_pk_encrypt <key_file> <string of max 100 characters>\n" );
69 
70 #if defined(_WIN32)
71         mbedtls_printf( "\n" );
72 #endif
73 
74         goto exit;
75     }
76 
77     mbedtls_printf( "\n  . Seeding the random number generator..." );
78     fflush( stdout );
79 
80     if( ( ret = mbedtls_ctr_drbg_seed( &ctr_drbg, mbedtls_entropy_func,
81                                        &entropy, (const unsigned char *) pers,
82                                        strlen( pers ) ) ) != 0 )
83     {
84         mbedtls_printf( " failed\n  ! mbedtls_ctr_drbg_seed returned -0x%04x\n",
85                         (unsigned int) -ret );
86         goto exit;
87     }
88 
89     mbedtls_printf( "\n  . Reading public key from '%s'", argv[1] );
90     fflush( stdout );
91 
92     if( ( ret = mbedtls_pk_parse_public_keyfile( &pk, argv[1] ) ) != 0 )
93     {
94         mbedtls_printf( " failed\n  ! mbedtls_pk_parse_public_keyfile returned -0x%04x\n", (unsigned int) -ret );
95         goto exit;
96     }
97 
98     if( strlen( argv[2] ) > 100 )
99     {
100         mbedtls_printf( " Input data larger than 100 characters.\n\n" );
101         goto exit;
102     }
103 
104     memcpy( input, argv[2], strlen( argv[2] ) );
105 
106     /*
107      * Calculate the RSA encryption of the hash.
108      */
109     mbedtls_printf( "\n  . Generating the encrypted value" );
110     fflush( stdout );
111 
112     if( ( ret = mbedtls_pk_encrypt( &pk, input, strlen( argv[2] ),
113                             buf, &olen, sizeof(buf),
114                             mbedtls_ctr_drbg_random, &ctr_drbg ) ) != 0 )
115     {
116         mbedtls_printf( " failed\n  ! mbedtls_pk_encrypt returned -0x%04x\n",
117                         (unsigned int) -ret );
118         goto exit;
119     }
120 
121     /*
122      * Write the signature into result-enc.txt
123      */
124     if( ( f = fopen( "result-enc.txt", "wb+" ) ) == NULL )
125     {
126         mbedtls_printf( " failed\n  ! Could not create %s\n\n",
127                         "result-enc.txt" );
128         ret = 1;
129         goto exit;
130     }
131 
132     for( i = 0; i < olen; i++ )
133     {
134         mbedtls_fprintf( f, "%02X%s", buf[i],
135                  ( i + 1 ) % 16 == 0 ? "\r\n" : " " );
136     }
137 
138     fclose( f );
139 
140     mbedtls_printf( "\n  . Done (created \"%s\")\n\n", "result-enc.txt" );
141 
142     exit_code = MBEDTLS_EXIT_SUCCESS;
143 
144 exit:
145 
146     mbedtls_pk_free( &pk );
147     mbedtls_entropy_free( &entropy );
148     mbedtls_ctr_drbg_free( &ctr_drbg );
149 
150 #if defined(MBEDTLS_ERROR_C)
151     if( exit_code != MBEDTLS_EXIT_SUCCESS )
152     {
153         mbedtls_strerror( ret, (char *) buf, sizeof( buf ) );
154         mbedtls_printf( "  !  Last error was: %s\n", buf );
155     }
156 #endif
157 
158     mbedtls_exit( exit_code );
159 }
160 #endif /* MBEDTLS_BIGNUM_C && MBEDTLS_PK_PARSE_C && MBEDTLS_ENTROPY_C &&
161           MBEDTLS_FS_IO && MBEDTLS_CTR_DRBG_C */
162