2 * Copyright (C) 2018 Daniel Golle <daniel@makrotopia.org>
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License version 3
6 * as published by the Free Software Foundation
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
29 #include <json-c/json.h>
30 #include <libubox/blob.h>
31 #include <libubox/utils.h>
32 #include <libubox/list.h>
33 #include <libubox/vlist.h>
34 #include <libubox/blobmsg_json.h>
38 #define CERT_BUF_LEN 4096
57 static const struct blob_attr_info cert_policy
[CERT_ATTR_MAX
] = {
58 [CERT_ATTR_SIGNATURE
] = { .type
= BLOB_ATTR_BINARY
},
59 [CERT_ATTR_PAYLOAD
] = { .type
= BLOB_ATTR_NESTED
},
67 static const struct blobmsg_policy cert_cont_policy
[CERT_CT_ATTR_MAX
] = {
68 [CERT_CT_ATTR_PAYLOAD
] = { .name
= "ucert", .type
= BLOBMSG_TYPE_TABLE
},
71 enum cert_payload_attr
{
72 CERT_PL_ATTR_CERTTYPE
,
74 CERT_PL_ATTR_VALIDFROMTIME
,
75 CERT_PL_ATTR_EXPIRETIME
,
77 CERT_PL_ATTR_KEY_FINGERPRINT
,
87 static const struct blobmsg_policy cert_payload_policy
[CERT_PL_ATTR_MAX
] = {
88 [CERT_PL_ATTR_CERTTYPE
] = { .name
= "certtype", .type
= BLOBMSG_TYPE_INT32
},
89 [CERT_PL_ATTR_CERTID
] = { .name
= "certid", .type
= BLOBMSG_TYPE_INT32
},
90 [CERT_PL_ATTR_VALIDFROMTIME
] = { .name
= "validfrom", .type
= BLOBMSG_TYPE_INT64
},
91 [CERT_PL_ATTR_EXPIRETIME
] = { .name
= "expiresat", .type
= BLOBMSG_TYPE_INT64
},
92 [CERT_PL_ATTR_PUBKEY
] = { .name
= "pubkey", .type
= BLOBMSG_TYPE_STRING
},
93 [CERT_PL_ATTR_KEY_FINGERPRINT
] = { .name
= "fingerprint", .type
= BLOBMSG_TYPE_STRING
},
97 struct list_head list
;
98 struct blob_attr
*cert
[CERT_ATTR_MAX
];
101 static int write_file(const char *filename
, void *buf
, size_t len
, bool append
) {
105 f
= fopen(filename
, append
?"a":"w");
109 outlen
= fwrite(buf
, 1, len
, f
);
111 return (outlen
== len
);
114 static int cert_load(const char *certfile
, struct list_head
*chain
) {
116 struct blob_attr
*certtb
[CERT_ATTR_MAX
];
117 struct blob_attr
*bufpt
;
118 struct cert_object
*cobj
;
119 char filebuf
[CERT_BUF_LEN
];
120 int ret
= 0, pret
= 0;
123 f
= fopen(certfile
, "r");
127 len
= fread(&filebuf
, 1, CERT_BUF_LEN
- 1, f
);
131 ret
= ferror(f
) || !feof(f
);
136 bufpt
= (struct blob_attr
*)filebuf
;
138 pret
= blob_parse(bufpt
, certtb
, cert_policy
, CERT_ATTR_MAX
);
140 /* no attributes found */
143 if (pos
+ blob_pad_len(bufpt
) > len
)
144 /* blob exceeds filebuffer */
147 pos
+= blob_pad_len(bufpt
);
149 cobj
= calloc(1, sizeof(*cobj
));
150 memcpy(cobj
->cert
, &certtb
, sizeof(certtb
));
151 list_add_tail(&cobj
->list
, chain
);
153 bufpt
= blob_next(bufpt
);
154 /* repeat parsing while there is still enough remaining data in buffer */
155 } while(len
> pos
+ sizeof(struct blob_attr
));
160 static int cert_append(const char *certfile
, const char *sigfile
) {
162 char filebuf
[CERT_BUF_LEN
];
163 struct blob_buf sigbuf
;
168 if (stat(certfile
, &st
) != 0) {
169 fprintf(stderr
, "certfile %s doesn't exist, can't append.\n", certfile
);
173 fs
= fopen(sigfile
, "r");
177 len
= fread(&filebuf
, 1, CERT_BUF_LEN
- 1, fs
);
178 ret
= ferror(fs
) || !feof(fs
) || (len
< 64);
183 blob_buf_init(&sigbuf
, 0);
184 blob_put(&sigbuf
, CERT_ATTR_SIGNATURE
, filebuf
, len
);
185 ret
= write_file(certfile
, sigbuf
.head
, blob_raw_len(sigbuf
.head
), true);
186 blob_buf_free(&sigbuf
);
190 static int cert_verify_blob(struct blob_attr
*cert
[CERT_ATTR_MAX
],
191 const char *pubkeyfile
, const char *pubkeydir
) {
193 char msgfname
[256], sigfname
[256];
195 char tmpdir
[] = "/tmp/ucert-XXXXXX";
197 if (mkdtemp(tmpdir
) == NULL
)
200 snprintf(msgfname
, sizeof(msgfname
) - 1, "%s/%s", tmpdir
, "payload");
201 snprintf(sigfname
, sizeof(sigfname
) - 1, "%s/%s", tmpdir
, "payload.sig");
203 for (i
= 0; i
< CERT_ATTR_MAX
; i
++) {
204 struct blob_attr
*v
= cert
[i
];
209 switch(cert_policy
[i
].type
) {
210 case BLOB_ATTR_BINARY
:
211 write_file(sigfname
, blob_data(v
), blob_len(v
), false);
213 case BLOB_ATTR_NESTED
:
214 write_file(msgfname
, blob_data(v
), blob_len(v
), false);
219 ret
= usign_v(msgfname
, pubkeyfile
, pubkeydir
, sigfname
, quiet
);
228 static int chain_verify(const char *msgfile
, const char *pubkeyfile
,
229 const char *pubkeydir
, struct list_head
*chain
) {
230 struct cert_object
*cobj
;
231 struct blob_attr
*containertb
[CERT_CT_ATTR_MAX
];
232 struct blob_attr
*payloadtb
[CERT_PL_ATTR_MAX
];
233 char tmpdir
[] = "/tmp/ucert-XXXXXX";
234 char chainedpubkey
[256] = {0};
235 char extsigfile
[256] = {0};
239 if (mkdtemp(tmpdir
) == NULL
)
245 list_for_each_entry(cobj
, chain
, list
) {
246 /* blob has payload, verify that using signature */
247 if (cobj
->cert
[CERT_ATTR_PAYLOAD
]) {
253 ret
= cert_verify_blob(cobj
->cert
, chainedpubkey
[0]?chainedpubkey
:pubkeyfile
, pubkeydir
);
255 goto clean_and_return
;
257 blobmsg_parse(cert_cont_policy
,
258 ARRAY_SIZE(cert_cont_policy
),
260 blob_data(cobj
->cert
[CERT_ATTR_PAYLOAD
]),
261 blob_len(cobj
->cert
[CERT_ATTR_PAYLOAD
]));
262 if (!containertb
[CERT_CT_ATTR_PAYLOAD
]) {
264 fprintf(stderr
, "no ucert in signed payload\n");
265 goto clean_and_return
;
267 blobmsg_parse(cert_payload_policy
,
268 ARRAY_SIZE(cert_payload_policy
),
270 blobmsg_data(containertb
[CERT_CT_ATTR_PAYLOAD
]),
271 blobmsg_data_len(containertb
[CERT_CT_ATTR_PAYLOAD
]));
273 if (!payloadtb
[CERT_PL_ATTR_CERTTYPE
] ||
274 !payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
] ||
275 !payloadtb
[CERT_PL_ATTR_EXPIRETIME
] ||
276 !payloadtb
[CERT_PL_ATTR_PUBKEY
]) {
278 fprintf(stderr
, "missing mandatory ucert attributes\n");
279 goto clean_and_return
;
281 certtype
= blobmsg_get_u32(payloadtb
[CERT_PL_ATTR_CERTTYPE
]);
282 validfrom
= blobmsg_get_u64(payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
]);
283 expiresat
= blobmsg_get_u64(payloadtb
[CERT_PL_ATTR_EXPIRETIME
]);
285 if (certtype
!= CERTTYPE_AUTH
) {
287 fprintf(stderr
, "wrong certificate type\n");
288 goto clean_and_return
;
291 gettimeofday(&tv
, NULL
);
292 if (tv
.tv_sec
< validfrom
||
293 tv
.tv_sec
>= expiresat
) {
295 fprintf(stderr
, "certificate expired\n");
296 goto clean_and_return
;
299 snprintf(chainedpubkey
, sizeof(chainedpubkey
) - 1, "%s/%s", tmpdir
, "chained-pubkey");
300 write_file(chainedpubkey
,
301 blobmsg_data(payloadtb
[CERT_PL_ATTR_PUBKEY
]),
302 blobmsg_data_len(payloadtb
[CERT_PL_ATTR_PUBKEY
]),
305 /* blob doesn't have payload, verify message using signature */
307 snprintf(extsigfile
, sizeof(extsigfile
) - 1, "%s/%s", tmpdir
, "ext-sig");
308 write_file(extsigfile
,
309 blob_data(cobj
->cert
[CERT_ATTR_SIGNATURE
]),
310 blob_len(cobj
->cert
[CERT_ATTR_SIGNATURE
]),
312 checkmsg
= ret
= usign_v(msgfile
,
313 chainedpubkey
[0]?chainedpubkey
:pubkeyfile
,
314 pubkeydir
, extsigfile
, quiet
);
317 fprintf(stderr
, "stray trailing signature without anything to verify!\n");
324 fprintf(stderr
, "missing signature to verify message!\n");
327 if (chainedpubkey
[0])
328 unlink(chainedpubkey
);
330 return ret
| checkmsg
;
333 static void cert_dump_blob(struct blob_attr
*cert
[CERT_ATTR_MAX
]) {
336 for (i
= 0; i
< CERT_ATTR_MAX
; i
++) {
337 struct blob_attr
*v
= cert
[i
];
342 switch(cert_policy
[i
].type
) {
343 case BLOB_ATTR_BINARY
:
344 fprintf(stdout
, "signature:\n---\n%s\n---\n", (char *) blob_data(v
));
346 case BLOB_ATTR_NESTED
:
347 fprintf(stdout
, "payload:\n---\n%s\n---\n", blobmsg_format_json_indent(blob_data(v
), false, 0));
353 static int cert_dump(const char *certfile
) {
354 struct cert_object
*cobj
;
355 static LIST_HEAD(certchain
);
357 if (cert_load(certfile
, &certchain
)) {
358 fprintf(stderr
, "cannot parse cert\n");
362 list_for_each_entry(cobj
, &certchain
, list
)
363 cert_dump_blob(cobj
->cert
);
368 static int cert_issue(const char *certfile
, const char *pubkeyfile
, const char *seckeyfile
) {
369 struct blob_buf certbuf
;
370 struct blob_buf payloadbuf
;
379 char fname
[256], sfname
[256];
381 char tmpdir
[] = "/tmp/ucert-XXXXXX";
383 if (stat(certfile
, &st
) == 0) {
384 fprintf(stderr
, "certfile %s exists, won't overwrite.\n", certfile
);
388 pkf
= fopen(pubkeyfile
, "r");
392 pklen
= fread(pkb
, 1, 512, pkf
);
400 if (usign_f_pubkey(pkfp
, pubkeyfile
))
403 gettimeofday(&tv
, NULL
);
405 if (mkdtemp(tmpdir
) == NULL
)
408 while (revoker
>= 0) {
409 blob_buf_init(&payloadbuf
, 0);
410 c
= blobmsg_open_table(&payloadbuf
, "ucert");
411 blobmsg_add_u32(&payloadbuf
, "certtype", revoker
?CERTTYPE_REVOKE
:CERTTYPE_AUTH
);
412 blobmsg_add_u64(&payloadbuf
, "validfrom", tv
.tv_sec
);
414 blobmsg_add_u64(&payloadbuf
, "expiresat", tv
.tv_sec
+ 60 * 60 * 24 * 365);
415 blobmsg_add_string(&payloadbuf
, "pubkey", pkb
);
417 blobmsg_add_string(&payloadbuf
, "fingerprint", pkfp
);
420 blobmsg_close_table(&payloadbuf
, c
);
422 snprintf(fname
, sizeof(fname
) - 1, "%s/%s", tmpdir
, revoker
?"revoker":"payload");
423 write_file(fname
, blob_data(payloadbuf
.head
), blob_len(payloadbuf
.head
), false);
425 snprintf(sfname
, sizeof(sfname
) - 1, "%s/%s", tmpdir
, revoker
?"revoker.sig":"payload.sig");
426 if (usign_s(fname
, seckeyfile
, sfname
, quiet
))
429 sigf
= fopen(sfname
, "r");
433 siglen
= fread(sigb
, 1, 1024, sigf
);
437 sigb
[siglen
-1] = '\0';
443 blob_buf_init(&certbuf
, 0);
444 blob_put(&certbuf
, CERT_ATTR_SIGNATURE
, sigb
, siglen
);
445 blob_put(&certbuf
, CERT_ATTR_PAYLOAD
, blob_data(payloadbuf
.head
), blob_len(payloadbuf
.head
));
446 snprintf(fname
, sizeof(fname
) - 1, "%s%s", certfile
, revoker
?".revoke":"");
447 write_file(fname
, certbuf
.head
, blob_raw_len(certbuf
.head
), false);
448 blob_buf_free(&certbuf
);
449 blob_buf_free(&payloadbuf
);
459 static int cert_process_revoker(const char *certfile
) {
460 fprintf(stderr
, "not implemented\n");
464 static int cert_verify(const char *certfile
, const char *pubkeyfile
, const char *pubkeydir
, const char *msgfile
) {
465 static LIST_HEAD(certchain
);
467 if (cert_load(certfile
, &certchain
)) {
468 fprintf(stderr
, "cannot parse cert\n");
472 return chain_verify(msgfile
, pubkeyfile
, pubkeydir
, &certchain
);
475 static int usage(const char *cmd
)
478 "Usage: %s <command> <options>\n"
480 " -A: append (needs -c and -x)\n"
482 " -I: issue cert and revoker (needs -c and -p and -s)\n"
483 " -R: process revoker certificate (needs -c)\n"
484 " -V: verify (needs -c and -p|-P)\n"
486 " -c <file>: certificate file\n"
487 " -m <file>: message file (verify only)\n"
488 " -p <file>: public key file\n"
489 " -P <path>: public key directory (verify only)\n"
490 " -q: quiet (do not print verification result, use return code only)\n"
491 " -s <file>: secret key file (issue only)\n"
492 " -x <file>: signature file\n"
498 int main(int argc
, char *argv
[]) {
500 const char *msgfile
= NULL
;
501 const char *sigfile
= NULL
;
502 const char *pubkeyfile
= NULL
;
503 const char *pubkeydir
= NULL
;
504 const char *certfile
= NULL
;
505 const char *seckeyfile
= NULL
;
508 while ((ch
= getopt(argc
, argv
, "ADIRVc:m:p:P:qs:x:")) != -1) {
547 return usage(argv
[0]);
553 if (certfile
&& sigfile
)
554 return cert_append(certfile
, sigfile
);
556 return usage(argv
[0]);
559 return cert_dump(certfile
);
561 return usage(argv
[0]);
563 if (certfile
&& pubkeyfile
&& seckeyfile
)
564 return cert_issue(certfile
, pubkeyfile
, seckeyfile
);
566 return usage(argv
[0]);
569 return cert_process_revoker(certfile
);
571 return usage(argv
[0]);
573 if (certfile
&& (pubkeyfile
|| pubkeydir
))
574 return cert_verify(certfile
, pubkeyfile
, pubkeydir
, msgfile
);
576 return usage(argv
[0]);
578 return usage(argv
[0]);
582 return usage(argv
[0]);