1 /*
2 * Simple MPI demonstration program
3 *
4 * Copyright The Mbed TLS Contributors
5 * SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later
6 *
7 * This file is provided under the Apache License 2.0, or the
8 * GNU General Public License v2.0 or later.
9 *
10 * **********
11 * Apache License 2.0:
12 *
13 * Licensed under the Apache License, Version 2.0 (the "License"); you may
14 * not use this file except in compliance with the License.
15 * You may obtain a copy of the License at
16 *
17 * http://www.apache.org/licenses/LICENSE-2.0
18 *
19 * Unless required by applicable law or agreed to in writing, software
20 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
21 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
22 * See the License for the specific language governing permissions and
23 * limitations under the License.
24 *
25 * **********
26 *
27 * **********
28 * GNU General Public License v2.0 or later:
29 *
30 * This program is free software; you can redistribute it and/or modify
31 * it under the terms of the GNU General Public License as published by
32 * the Free Software Foundation; either version 2 of the License, or
33 * (at your option) any later version.
34 *
35 * This program is distributed in the hope that it will be useful,
36 * but WITHOUT ANY WARRANTY; without even the implied warranty of
37 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
38 * GNU General Public License for more details.
39 *
40 * You should have received a copy of the GNU General Public License along
41 * with this program; if not, write to the Free Software Foundation, Inc.,
42 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
43 *
44 * **********
45 */
46
47 #if !defined(MBEDTLS_CONFIG_FILE)
48 #include "mbedtls/config.h"
49 #else
50 #include MBEDTLS_CONFIG_FILE
51 #endif
52
53 #if defined(MBEDTLS_PLATFORM_C)
54 #include "mbedtls/platform.h"
55 #else
56 #include <stdio.h>
57 #include <stdlib.h>
58 #define mbedtls_printf printf
59 #define mbedtls_exit exit
60 #define MBEDTLS_EXIT_SUCCESS EXIT_SUCCESS
61 #define MBEDTLS_EXIT_FAILURE EXIT_FAILURE
62 #endif /* MBEDTLS_PLATFORM_C */
63
64 #if defined(MBEDTLS_BIGNUM_C) && defined(MBEDTLS_FS_IO)
65 #include "mbedtls/bignum.h"
66
67 #include <stdio.h>
68 #endif
69
70 #if !defined(MBEDTLS_BIGNUM_C) || !defined(MBEDTLS_FS_IO)
main(void)71 int main( void )
72 {
73 mbedtls_printf("MBEDTLS_BIGNUM_C and/or MBEDTLS_FS_IO not defined.\n");
74 mbedtls_exit( 0 );
75 }
76 #else
77
78
main(void)79 int main( void )
80 {
81 int ret = 1;
82 int exit_code = MBEDTLS_EXIT_FAILURE;
83 mbedtls_mpi E, P, Q, N, H, D, X, Y, Z;
84
85 mbedtls_mpi_init( &E ); mbedtls_mpi_init( &P ); mbedtls_mpi_init( &Q ); mbedtls_mpi_init( &N );
86 mbedtls_mpi_init( &H ); mbedtls_mpi_init( &D ); mbedtls_mpi_init( &X ); mbedtls_mpi_init( &Y );
87 mbedtls_mpi_init( &Z );
88
89 MBEDTLS_MPI_CHK( mbedtls_mpi_read_string( &P, 10, "2789" ) );
90 MBEDTLS_MPI_CHK( mbedtls_mpi_read_string( &Q, 10, "3203" ) );
91 MBEDTLS_MPI_CHK( mbedtls_mpi_read_string( &E, 10, "257" ) );
92 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &N, &P, &Q ) );
93
94 mbedtls_printf( "\n Public key:\n\n" );
95 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " N = ", &N, 10, NULL ) );
96 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " E = ", &E, 10, NULL ) );
97
98 mbedtls_printf( "\n Private key:\n\n" );
99 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " P = ", &P, 10, NULL ) );
100 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " Q = ", &Q, 10, NULL ) );
101
102 #if defined(MBEDTLS_GENPRIME)
103 MBEDTLS_MPI_CHK( mbedtls_mpi_sub_int( &P, &P, 1 ) );
104 MBEDTLS_MPI_CHK( mbedtls_mpi_sub_int( &Q, &Q, 1 ) );
105 MBEDTLS_MPI_CHK( mbedtls_mpi_mul_mpi( &H, &P, &Q ) );
106 MBEDTLS_MPI_CHK( mbedtls_mpi_inv_mod( &D, &E, &H ) );
107
108 mbedtls_mpi_write_file( " D = E^-1 mod (P-1)*(Q-1) = ",
109 &D, 10, NULL );
110 #else
111 mbedtls_printf("\nTest skipped (MBEDTLS_GENPRIME not defined).\n\n");
112 #endif
113 MBEDTLS_MPI_CHK( mbedtls_mpi_read_string( &X, 10, "55555" ) );
114 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &Y, &X, &E, &N, NULL ) );
115 MBEDTLS_MPI_CHK( mbedtls_mpi_exp_mod( &Z, &Y, &D, &N, NULL ) );
116
117 mbedtls_printf( "\n RSA operation:\n\n" );
118 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " X (plaintext) = ", &X, 10, NULL ) );
119 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " Y (ciphertext) = X^E mod N = ", &Y, 10, NULL ) );
120 MBEDTLS_MPI_CHK( mbedtls_mpi_write_file( " Z (decrypted) = Y^D mod N = ", &Z, 10, NULL ) );
121 mbedtls_printf( "\n" );
122
123 exit_code = MBEDTLS_EXIT_SUCCESS;
124
125 cleanup:
126 mbedtls_mpi_free( &E ); mbedtls_mpi_free( &P ); mbedtls_mpi_free( &Q ); mbedtls_mpi_free( &N );
127 mbedtls_mpi_free( &H ); mbedtls_mpi_free( &D ); mbedtls_mpi_free( &X ); mbedtls_mpi_free( &Y );
128 mbedtls_mpi_free( &Z );
129
130 if( exit_code != MBEDTLS_EXIT_SUCCESS )
131 {
132 mbedtls_printf( "\nAn error occurred.\n" );
133 }
134
135 #if defined(_WIN32)
136 mbedtls_printf( " Press Enter to exit this program.\n" );
137 fflush( stdout ); getchar();
138 #endif
139
140 mbedtls_exit( exit_code );
141 }
142 #endif /* MBEDTLS_BIGNUM_C && MBEDTLS_FS_IO */
143