Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 1 | /* |
| 2 | * Simple MPI demonstration program |
| 3 | * |
Manuel Pégourié-Gonnard | a658a40 | 2015-01-23 09:45:19 +0000 | [diff] [blame] | 4 | * Copyright (C) 2006-2011, ARM Limited, All Rights Reserved |
Paul Bakker | b96f154 | 2010-07-18 20:36:00 +0000 | [diff] [blame] | 5 | * |
Manuel Pégourié-Gonnard | 085ab04 | 2015-01-23 11:06:27 +0000 | [diff] [blame] | 6 | * This file is part of mbed TLS (https://www.polarssl.org) |
Paul Bakker | b96f154 | 2010-07-18 20:36:00 +0000 | [diff] [blame] | 7 | * |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 8 | * This program is free software; you can redistribute it and/or modify |
| 9 | * it under the terms of the GNU General Public License as published by |
| 10 | * the Free Software Foundation; either version 2 of the License, or |
| 11 | * (at your option) any later version. |
| 12 | * |
| 13 | * This program is distributed in the hope that it will be useful, |
| 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 16 | * GNU General Public License for more details. |
| 17 | * |
| 18 | * You should have received a copy of the GNU General Public License along |
| 19 | * with this program; if not, write to the Free Software Foundation, Inc., |
| 20 | * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. |
| 21 | */ |
| 22 | |
Manuel Pégourié-Gonnard | cef4ad2 | 2014-04-29 12:39:06 +0200 | [diff] [blame] | 23 | #if !defined(POLARSSL_CONFIG_FILE) |
Manuel Pégourié-Gonnard | abd6e02 | 2013-09-20 13:30:43 +0200 | [diff] [blame] | 24 | #include "polarssl/config.h" |
Manuel Pégourié-Gonnard | cef4ad2 | 2014-04-29 12:39:06 +0200 | [diff] [blame] | 25 | #else |
| 26 | #include POLARSSL_CONFIG_FILE |
| 27 | #endif |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 28 | |
| 29 | #include <stdio.h> |
| 30 | |
Paul Bakker | 40e4694 | 2009-01-03 21:51:57 +0000 | [diff] [blame] | 31 | #include "polarssl/bignum.h" |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 32 | |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 33 | #if !defined(POLARSSL_BIGNUM_C) || !defined(POLARSSL_FS_IO) |
Paul Bakker | cce9d77 | 2011-11-18 14:26:47 +0000 | [diff] [blame] | 34 | int main( int argc, char *argv[] ) |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 35 | { |
Paul Bakker | cce9d77 | 2011-11-18 14:26:47 +0000 | [diff] [blame] | 36 | ((void) argc); |
| 37 | ((void) argv); |
| 38 | |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 39 | printf("POLARSSL_BIGNUM_C and/or POLARSSL_FS_IO not defined.\n"); |
| 40 | return( 0 ); |
| 41 | } |
| 42 | #else |
Paul Bakker | cce9d77 | 2011-11-18 14:26:47 +0000 | [diff] [blame] | 43 | int main( int argc, char *argv[] ) |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 44 | { |
| 45 | mpi E, P, Q, N, H, D, X, Y, Z; |
| 46 | |
Paul Bakker | cce9d77 | 2011-11-18 14:26:47 +0000 | [diff] [blame] | 47 | ((void) argc); |
| 48 | ((void) argv); |
| 49 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 50 | mpi_init( &E ); mpi_init( &P ); mpi_init( &Q ); mpi_init( &N ); |
| 51 | mpi_init( &H ); mpi_init( &D ); mpi_init( &X ); mpi_init( &Y ); |
| 52 | mpi_init( &Z ); |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 53 | |
| 54 | mpi_read_string( &P, 10, "2789" ); |
| 55 | mpi_read_string( &Q, 10, "3203" ); |
| 56 | mpi_read_string( &E, 10, "257" ); |
| 57 | mpi_mul_mpi( &N, &P, &Q ); |
| 58 | |
| 59 | printf( "\n Public key:\n\n" ); |
| 60 | mpi_write_file( " N = ", &N, 10, NULL ); |
| 61 | mpi_write_file( " E = ", &E, 10, NULL ); |
| 62 | |
| 63 | printf( "\n Private key:\n\n" ); |
| 64 | mpi_write_file( " P = ", &P, 10, NULL ); |
| 65 | mpi_write_file( " Q = ", &Q, 10, NULL ); |
| 66 | |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 67 | #if defined(POLARSSL_GENPRIME) |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 68 | mpi_sub_int( &P, &P, 1 ); |
| 69 | mpi_sub_int( &Q, &Q, 1 ); |
| 70 | mpi_mul_mpi( &H, &P, &Q ); |
| 71 | mpi_inv_mod( &D, &E, &H ); |
| 72 | |
| 73 | mpi_write_file( " D = E^-1 mod (P-1)*(Q-1) = ", |
| 74 | &D, 10, NULL ); |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 75 | #else |
| 76 | printf("\nTest skipped (POLARSSL_GENPRIME not defined).\n\n"); |
| 77 | #endif |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 78 | mpi_read_string( &X, 10, "55555" ); |
| 79 | mpi_exp_mod( &Y, &X, &E, &N, NULL ); |
| 80 | mpi_exp_mod( &Z, &Y, &D, &N, NULL ); |
| 81 | |
| 82 | printf( "\n RSA operation:\n\n" ); |
| 83 | mpi_write_file( " X (plaintext) = ", &X, 10, NULL ); |
| 84 | mpi_write_file( " Y (ciphertext) = X^E mod N = ", &Y, 10, NULL ); |
| 85 | mpi_write_file( " Z (decrypted) = Y^D mod N = ", &Z, 10, NULL ); |
| 86 | printf( "\n" ); |
| 87 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 88 | mpi_free( &E ); mpi_free( &P ); mpi_free( &Q ); mpi_free( &N ); |
| 89 | mpi_free( &H ); mpi_free( &D ); mpi_free( &X ); mpi_free( &Y ); |
| 90 | mpi_free( &Z ); |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 91 | |
Paul Bakker | cce9d77 | 2011-11-18 14:26:47 +0000 | [diff] [blame] | 92 | #if defined(_WIN32) |
Paul Bakker | 5121ce5 | 2009-01-03 21:22:43 +0000 | [diff] [blame] | 93 | printf( " Press Enter to exit this program.\n" ); |
| 94 | fflush( stdout ); getchar(); |
| 95 | #endif |
| 96 | |
| 97 | return( 0 ); |
| 98 | } |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 99 | #endif /* POLARSSL_BIGNUM_C && POLARSSL_FS_IO */ |