Allow log messages to be captured by tincctl.
[tinc] / src / openssl / ecdsa.c
1 /*
2     ecdsa.c -- ECDSA key handling
3     Copyright (C) 2011 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 #include "logger.h"
26 #include "ecdsa.h"
27 #include "utils.h"
28
29 // Get and set ECDSA keys
30 //
31 bool ecdsa_set_base64_public_key(ecdsa_t *ecdsa, const char *p) {
32         *ecdsa = EC_KEY_new_by_curve_name(NID_secp521r1);
33
34         int len = strlen(p);
35         unsigned char pubkey[len / 4 * 3 + 3];
36         const unsigned char *ppubkey = pubkey;
37         len = b64decode(p, (char *)pubkey, len);
38
39         if(!o2i_ECPublicKey(ecdsa, &ppubkey, len)) {
40                 logger(DEBUG_ALWAYS, LOG_DEBUG, "o2i_ECPublicKey failed: %s", ERR_error_string(ERR_get_error(), NULL));
41                 return false;
42         }
43
44         return true;
45 }
46
47 char *ecdsa_get_base64_public_key(ecdsa_t *ecdsa) {
48         unsigned char *pubkey = NULL;
49         int len = i2o_ECPublicKey(*ecdsa, &pubkey);
50
51         char *base64 = malloc(len * 4 / 3 + 5);
52         b64encode((char *)pubkey, base64, len);
53
54         free(pubkey);
55
56         return base64;
57 }
58
59 // Read PEM ECDSA keys
60
61 bool ecdsa_read_pem_public_key(ecdsa_t *ecdsa, FILE *fp) {
62         *ecdsa = PEM_read_EC_PUBKEY(fp, ecdsa, NULL, NULL);
63
64         if(*ecdsa)
65                 return true;
66
67         logger(DEBUG_ALWAYS, LOG_ERR, "Unable to read ECDSA public key: %s", ERR_error_string(ERR_get_error(), NULL));
68         return false;
69 }
70
71 bool ecdsa_read_pem_private_key(ecdsa_t *ecdsa, FILE *fp) {
72         *ecdsa = PEM_read_ECPrivateKey(fp, NULL, NULL, NULL);
73
74         if(*ecdsa)
75                 return true;
76         
77         logger(DEBUG_ALWAYS, LOG_ERR, "Unable to read ECDSA private key: %s", ERR_error_string(ERR_get_error(), NULL));
78         return false;
79 }
80
81 size_t ecdsa_size(ecdsa_t *ecdsa) {
82         return ECDSA_size(*ecdsa);
83 }
84
85 // TODO: standardise output format?
86
87 bool ecdsa_sign(ecdsa_t *ecdsa, const void *in, size_t len, void *sig) {
88         unsigned int siglen = ECDSA_size(*ecdsa);
89
90         unsigned char hash[SHA512_DIGEST_LENGTH];
91         SHA512(in, len, hash);
92
93         memset(sig, 0, siglen);
94
95         if(!ECDSA_sign(0, hash, sizeof hash, sig, &siglen, *ecdsa)) {
96                 logger(DEBUG_ALWAYS, LOG_DEBUG, "ECDSA_sign() failed: %s", ERR_error_string(ERR_get_error(), NULL));
97                 return false;
98         }
99
100         return true;
101 }
102
103 bool ecdsa_verify(ecdsa_t *ecdsa, const void *in, size_t len, const void *sig) {
104         unsigned int siglen = ECDSA_size(*ecdsa);
105
106         unsigned char hash[SHA512_DIGEST_LENGTH];
107         SHA512(in, len, hash);
108
109         if(!ECDSA_verify(0, hash, sizeof hash, sig, siglen, *ecdsa)) {
110                 logger(DEBUG_ALWAYS, LOG_DEBUG, "ECDSA_verify() failed: %s", ERR_error_string(ERR_get_error(), NULL));
111                 return false;
112         }
113
114         return true;
115 }
116
117 bool ecdsa_active(ecdsa_t *ecdsa) {
118         return *ecdsa;
119 }
120
121 void ecdsa_free(ecdsa_t *ecdsa) {
122         if(*ecdsa) {
123                 EC_KEY_free(*ecdsa);
124                 *ecdsa = NULL;
125         }
126 }