Don't assume sa.sa_family is a short int.
[tinc] / src / openssl / rsagen.c
1 /*
2     rsagen.c -- RSA key generation and export
3     Copyright (C) 2008-2013 Guus Sliepen <guus@tinc-vpn.org>
4
5     This program is free software; you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation; either version 2 of the License, or
8     (at your option) any later version.
9
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14
15     You should have received a copy of the GNU General Public License along
16     with this program; if not, write to the Free Software Foundation, Inc.,
17     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19
20 #include "../system.h"
21
22 #include <openssl/pem.h>
23 #include <openssl/err.h>
24
25 #define __TINC_RSA_INTERNAL__
26 typedef RSA rsa_t;
27
28 #include "../logger.h"
29 #include "../rsagen.h"
30
31 /* This function prettyprints the key generation process */
32
33 static void indicator(int a, int b, void *p) {
34         switch (a) {
35                 case 0:
36                         fprintf(stderr, ".");
37                         break;
38
39                 case 1:
40                         fprintf(stderr, "+");
41                         break;
42
43                 case 2:
44                         fprintf(stderr, "-");
45                         break;
46
47                 case 3:
48                         switch (b) {
49                                 case 0:
50                                         fprintf(stderr, " p\n");
51                                         break;
52
53                                 case 1:
54                                         fprintf(stderr, " q\n");
55                                         break;
56
57                                 default:
58                                         fprintf(stderr, "?");
59                         }
60                         break;
61
62                 default:
63                         fprintf(stderr, "?");
64         }
65 }
66
67 // Generate RSA key
68
69 rsa_t *rsa_generate(size_t bits, unsigned long exponent) {
70         return RSA_generate_key(bits, exponent, indicator, NULL);
71 }
72
73 // Write PEM RSA keys
74
75 bool rsa_write_pem_public_key(rsa_t *rsa, FILE *fp) {
76         return PEM_write_RSAPublicKey(fp, rsa);
77 }
78
79 bool rsa_write_pem_private_key(rsa_t *rsa, FILE *fp) {
80         return PEM_write_RSAPrivateKey(fp, rsa, NULL, NULL, 0, NULL, NULL);
81 }