1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
#include <u.h>
#include <libc.h>
#include <mp.h>
#include <libsec.h>
#define STRLEN(s) (sizeof(s)-1)
uchar*
decodepem(char *s, char *type, int *len, char **news)
{
uchar *d;
char *t, *e, *tt;
int n;
*len = 0;
/*
* find the correct section of the file, stripping garbage at the beginning and end.
* the data is delimited by -----BEGIN <type>-----\n and -----END <type>-----\n
*/
n = strlen(type);
e = strchr(s, '\0');
for(t = s; t != nil && t < e; ){
tt = t;
t = strchr(tt, '\n');
if(t != nil)
t++;
if(strncmp(tt, "-----BEGIN ", STRLEN("-----BEGIN ")) == 0
&& strncmp(&tt[STRLEN("-----BEGIN ")], type, n) == 0
&& strncmp(&tt[STRLEN("-----BEGIN ")+n], "-----\n", STRLEN("-----\n")) == 0)
break;
}
for(tt = t; tt != nil && tt < e; tt++){
if(strncmp(tt, "-----END ", STRLEN("-----END ")) == 0
&& strncmp(&tt[STRLEN("-----END ")], type, n) == 0
&& strncmp(&tt[STRLEN("-----END ")+n], "-----\n", STRLEN("-----\n")) == 0)
break;
tt = strchr(tt, '\n');
if(tt == nil)
break;
}
if(tt == nil || tt == e){
werrstr("incorrect .pem file format: bad header or trailer");
return nil;
}
if(news)
*news = tt+1;
n = ((tt - t) * 6 + 7) / 8;
d = malloc(n);
if(d == nil){
werrstr("out of memory");
return nil;
}
n = dec64(d, n, t, tt - t);
if(n < 0){
free(d);
werrstr("incorrect .pem file format: bad base64 encoded data");
return nil;
}
*len = n;
return d;
}
PEMChain*
decodepemchain(char *s, char *type)
{
PEMChain *first = nil, *last = nil, *chp;
uchar *d;
char *e;
int n;
e = strchr(s, '\0');
while (s < e) {
d = decodepem(s, type, &n, &s);
if(d == nil)
break;
chp = malloc(sizeof(PEMChain));
chp->next = nil;
chp->pem = d;
chp->pemlen = n;
if (first == nil)
first = chp;
else
last->next = chp;
last = chp;
}
return first;
}
|