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
50 #ifndef UCERT_STRIP_MESSAGES
51 #define DPRINTF(format, ...) if (!quiet) fprintf(stderr, "%s(%d): " format, __func__, __LINE__, ## __VA_ARGS__)
53 #define DPRINTF(format, ...)
59 * | SIGNATURE | PAYLOAD |
60 * | |[ BLOBMSG CONTAINER ]|
61 * | |[[T,i,v,e,f,pubkey ]]|
69 static const struct blob_attr_info cert_policy
[CERT_ATTR_MAX
] = {
70 [CERT_ATTR_SIGNATURE
] = { .type
= BLOB_ATTR_BINARY
},
71 [CERT_ATTR_PAYLOAD
] = { .type
= BLOB_ATTR_NESTED
},
79 static const struct blobmsg_policy cert_cont_policy
[CERT_CT_ATTR_MAX
] = {
80 [CERT_CT_ATTR_PAYLOAD
] = { .name
= "ucert", .type
= BLOBMSG_TYPE_TABLE
},
83 enum cert_payload_attr
{
84 CERT_PL_ATTR_CERTTYPE
,
86 CERT_PL_ATTR_VALIDFROMTIME
,
87 CERT_PL_ATTR_EXPIRETIME
,
89 CERT_PL_ATTR_KEY_FINGERPRINT
,
99 static const struct blobmsg_policy cert_payload_policy
[CERT_PL_ATTR_MAX
] = {
100 [CERT_PL_ATTR_CERTTYPE
] = { .name
= "certtype", .type
= BLOBMSG_TYPE_INT32
},
101 [CERT_PL_ATTR_CERTID
] = { .name
= "certid", .type
= BLOBMSG_TYPE_INT32
},
102 [CERT_PL_ATTR_VALIDFROMTIME
] = { .name
= "validfrom", .type
= BLOBMSG_TYPE_INT64
},
103 [CERT_PL_ATTR_EXPIRETIME
] = { .name
= "expiresat", .type
= BLOBMSG_TYPE_INT64
},
104 [CERT_PL_ATTR_PUBKEY
] = { .name
= "pubkey", .type
= BLOBMSG_TYPE_STRING
},
105 [CERT_PL_ATTR_KEY_FINGERPRINT
] = { .name
= "fingerprint", .type
= BLOBMSG_TYPE_STRING
},
108 /* list to store certificate chain at runtime */
110 struct list_head list
;
111 struct blob_attr
*cert
[CERT_ATTR_MAX
];
114 /* write buffer to file */
115 static int write_file(const char *filename
, void *buf
, size_t len
, bool append
) {
119 f
= fopen(filename
, append
?"a":"w");
123 outlen
= fwrite(buf
, 1, len
, f
);
125 return (outlen
== len
);
128 /* load certfile into list */
129 static int cert_load(const char *certfile
, struct list_head
*chain
) {
131 struct blob_attr
*certtb
[CERT_ATTR_MAX
];
132 struct blob_attr
*bufpt
;
133 struct cert_object
*cobj
;
134 char filebuf
[CERT_BUF_LEN
];
135 int ret
= 0, pret
= 0;
138 f
= fopen(certfile
, "r");
142 len
= fread(&filebuf
, 1, CERT_BUF_LEN
- 1, f
);
146 ret
= ferror(f
) || !feof(f
);
151 bufpt
= (struct blob_attr
*)filebuf
;
153 pret
= blob_parse(bufpt
, certtb
, cert_policy
, CERT_ATTR_MAX
);
155 /* no attributes found */
158 if (pos
+ blob_pad_len(bufpt
) > len
)
159 /* blob exceeds filebuffer */
162 pos
+= blob_pad_len(bufpt
);
164 if (!certtb
[CERT_ATTR_SIGNATURE
])
165 /* no signature -> drop */
168 cobj
= calloc(1, sizeof(*cobj
));
169 cobj
->cert
[CERT_ATTR_SIGNATURE
] = blob_memdup(certtb
[CERT_ATTR_SIGNATURE
]);
170 if (certtb
[CERT_ATTR_PAYLOAD
])
171 cobj
->cert
[CERT_ATTR_PAYLOAD
] = blob_memdup(certtb
[CERT_ATTR_PAYLOAD
]);
173 list_add_tail(&cobj
->list
, chain
);
175 /* repeat parsing while there is still enough remaining data in buffer */
176 } while(len
> pos
+ sizeof(struct blob_attr
) && (bufpt
= blob_next(bufpt
)));
182 /* append signature to certfile */
183 static int cert_append(const char *certfile
, const char *sigfile
) {
185 char filebuf
[CERT_BUF_LEN
];
186 struct blob_buf sigbuf
= {0};
190 fs
= fopen(sigfile
, "r");
194 len
= fread(&filebuf
, 1, CERT_BUF_LEN
- 1, fs
);
195 ret
= ferror(fs
) || !feof(fs
) || (len
< 64);
200 blob_buf_init(&sigbuf
, 0);
201 blob_put(&sigbuf
, CERT_ATTR_SIGNATURE
, filebuf
, len
);
202 ret
= write_file(certfile
, sigbuf
.head
, blob_raw_len(sigbuf
.head
), true);
203 blob_buf_free(&sigbuf
);
208 /* verify the signature of a single chain element */
209 static int cert_verify_blob(struct blob_attr
*cert
[CERT_ATTR_MAX
],
210 const char *pubkeyfile
, const char *pubkeydir
) {
212 char msgfname
[256], sigfname
[256];
214 char tmpdir
[] = "/tmp/ucert-XXXXXX";
216 if (mkdtemp(tmpdir
) == NULL
)
219 snprintf(msgfname
, sizeof(msgfname
) - 1, "%s/%s", tmpdir
, "payload");
220 snprintf(sigfname
, sizeof(sigfname
) - 1, "%s/%s", tmpdir
, "payload.sig");
222 for (i
= 0; i
< CERT_ATTR_MAX
; i
++) {
223 struct blob_attr
*v
= cert
[i
];
228 switch(cert_policy
[i
].type
) {
229 case BLOB_ATTR_BINARY
:
230 write_file(sigfname
, blob_data(v
), blob_len(v
), false);
232 case BLOB_ATTR_NESTED
:
233 write_file(msgfname
, blob_data(v
), blob_len(v
), false);
238 ret
= usign_v(msgfname
, pubkeyfile
, pubkeydir
, sigfname
, quiet
);
247 /* verify cert chain (and message) */
248 static int chain_verify(const char *msgfile
, const char *pubkeyfile
,
249 const char *pubkeydir
, struct list_head
*chain
) {
250 struct cert_object
*cobj
;
251 struct blob_attr
*containertb
[CERT_CT_ATTR_MAX
];
252 struct blob_attr
*payloadtb
[CERT_PL_ATTR_MAX
];
253 char tmpdir
[] = "/tmp/ucert-XXXXXX";
254 char chainedpubkey
[256] = {0};
255 char chainedfp
[17] = {0};
256 char extsigfile
[256] = {0};
261 if (mkdtemp(tmpdir
) == NULL
)
267 gettimeofday(&tv
, NULL
);
269 list_for_each_entry(cobj
, chain
, list
) {
270 /* blob has payload, verify that using signature */
271 if (cobj
->cert
[CERT_ATTR_PAYLOAD
]) {
276 ret
= cert_verify_blob(cobj
->cert
, chainedpubkey
[0]?chainedpubkey
:pubkeyfile
, pubkeydir
);
278 goto clean_and_return
;
280 blobmsg_parse(cert_cont_policy
,
281 ARRAY_SIZE(cert_cont_policy
),
283 blob_data(cobj
->cert
[CERT_ATTR_PAYLOAD
]),
284 blob_len(cobj
->cert
[CERT_ATTR_PAYLOAD
]));
285 if (!containertb
[CERT_CT_ATTR_PAYLOAD
]) {
287 DPRINTF("no ucert in signed payload\n");
288 goto clean_and_return
;
290 blobmsg_parse(cert_payload_policy
,
291 ARRAY_SIZE(cert_payload_policy
),
293 blobmsg_data(containertb
[CERT_CT_ATTR_PAYLOAD
]),
294 blobmsg_data_len(containertb
[CERT_CT_ATTR_PAYLOAD
]));
296 if (!payloadtb
[CERT_PL_ATTR_CERTTYPE
] ||
297 !payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
] ||
298 !payloadtb
[CERT_PL_ATTR_EXPIRETIME
] ||
299 !payloadtb
[CERT_PL_ATTR_PUBKEY
]) {
301 DPRINTF("missing mandatory ucert attributes\n");
302 goto clean_and_return
;
304 certtype
= blobmsg_get_u32(payloadtb
[CERT_PL_ATTR_CERTTYPE
]);
305 validfrom
= blobmsg_get_u64(payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
]);
306 expiresat
= blobmsg_get_u64(payloadtb
[CERT_PL_ATTR_EXPIRETIME
]);
308 if (certtype
!= CERTTYPE_AUTH
) {
310 DPRINTF("wrong certificate type\n");
311 goto clean_and_return
;
314 if (tv
.tv_sec
< validfrom
||
315 tv
.tv_sec
>= expiresat
) {
317 DPRINTF("certificate expired\n");
318 goto clean_and_return
;
321 snprintf(chainedpubkey
, sizeof(chainedpubkey
) - 1, "%s/%s", tmpdir
, "chained-pubkey");
322 write_file(chainedpubkey
,
323 blobmsg_data(payloadtb
[CERT_PL_ATTR_PUBKEY
]),
324 blobmsg_data_len(payloadtb
[CERT_PL_ATTR_PUBKEY
]),
327 if (usign_f_pubkey(chainedfp
, chainedpubkey
)) {
328 DPRINTF("cannot get fingerprint for chained key\n");
330 goto clean_and_return
;
332 if (pubkeydir
&& _usign_key_is_revoked(chainedfp
, pubkeydir
)) {
333 DPRINTF("key %s has been revoked!\n", chainedfp
);
335 goto clean_and_return
;
338 /* blob doesn't have payload, verify message using signature */
340 snprintf(extsigfile
, sizeof(extsigfile
) - 1, "%s/%s", tmpdir
, "ext-sig");
341 write_file(extsigfile
,
342 blob_data(cobj
->cert
[CERT_ATTR_SIGNATURE
]),
343 blob_len(cobj
->cert
[CERT_ATTR_SIGNATURE
]),
345 checkmsg
= ret
= usign_v(msgfile
,
346 chainedpubkey
[0]?chainedpubkey
:pubkeyfile
,
347 pubkeydir
, extsigfile
, quiet
);
350 DPRINTF("stray trailing signature without anything to verify!\n");
357 DPRINTF("missing signature to verify message!\n");
360 if (chainedpubkey
[0])
361 unlink(chainedpubkey
);
363 return ret
| checkmsg
;
367 /* dump single chain element to console */
368 static void cert_dump_blob(struct blob_attr
*cert
[CERT_ATTR_MAX
]) {
371 for (i
= 0; i
< CERT_ATTR_MAX
; i
++) {
372 struct blob_attr
*v
= cert
[i
];
377 switch(cert_policy
[i
].type
) {
378 case BLOB_ATTR_BINARY
:
379 fprintf(stdout
, "signature:\n---\n%s---\n", (char *) blob_data(v
));
381 case BLOB_ATTR_NESTED
:
382 fprintf(stdout
, "payload:\n---\n%s\n---\n", blobmsg_format_json_indent(blob_data(v
), false, 0));
388 /* dump certfile to console */
389 static int cert_dump(const char *certfile
) {
390 struct cert_object
*cobj
;
391 static LIST_HEAD(certchain
);
392 unsigned int count
= 0;
394 if (cert_load(certfile
, &certchain
)) {
395 DPRINTF("cannot parse cert\n");
399 list_for_each_entry(cobj
, &certchain
, list
) {
400 fprintf(stdout
, "=== CHAIN ELEMENT %02u ===\n", ++count
);
401 cert_dump_blob(cobj
->cert
);
407 /* issue an auth certificate for pubkey */
408 static int cert_issue(const char *certfile
, const char *pubkeyfile
, const char *seckeyfile
) {
409 struct blob_buf payloadbuf
= {0};
410 struct blob_buf certbuf
= {0};
418 char fname
[256], sfname
[256];
420 char tmpdir
[] = "/tmp/ucert-XXXXXX";
422 pkf
= fopen(pubkeyfile
, "r");
426 pklen
= fread(pkb
, 1, 512, pkf
);
434 if (usign_f_pubkey(pkfp
, pubkeyfile
))
437 gettimeofday(&tv
, NULL
);
439 if (mkdtemp(tmpdir
) == NULL
)
442 while (revoker
>= 0) {
443 blob_buf_init(&payloadbuf
, 0);
444 c
= blobmsg_open_table(&payloadbuf
, "ucert");
445 blobmsg_add_u32(&payloadbuf
, "certtype", revoker
?CERTTYPE_REVOKE
:CERTTYPE_AUTH
);
446 blobmsg_add_u64(&payloadbuf
, "validfrom", tv
.tv_sec
);
448 blobmsg_add_u64(&payloadbuf
, "expiresat", tv
.tv_sec
+ 60 * 60 * 24 * 365);
449 blobmsg_add_string(&payloadbuf
, "pubkey", pkb
);
451 blobmsg_add_string(&payloadbuf
, "fingerprint", pkfp
);
454 blobmsg_close_table(&payloadbuf
, c
);
456 snprintf(fname
, sizeof(fname
) - 1, "%s/%s", tmpdir
, revoker
?"revoker":"payload");
457 write_file(fname
, blob_data(payloadbuf
.head
), blob_len(payloadbuf
.head
), false);
459 snprintf(sfname
, sizeof(sfname
) - 1, "%s/%s", tmpdir
, revoker
?"revoker.sig":"payload.sig");
460 if (usign_s(fname
, seckeyfile
, sfname
, quiet
))
463 sigf
= fopen(sfname
, "r");
467 siglen
= fread(sigb
, 1, 1024, sigf
);
477 blob_buf_init(&certbuf
, 0);
478 blob_put(&certbuf
, CERT_ATTR_SIGNATURE
, sigb
, siglen
);
479 blob_put(&certbuf
, CERT_ATTR_PAYLOAD
, blob_data(payloadbuf
.head
), blob_len(payloadbuf
.head
));
480 snprintf(fname
, sizeof(fname
) - 1, "%s%s", certfile
, revoker
?".revoke":"");
481 write_file(fname
, certbuf
.head
, blob_raw_len(certbuf
.head
), true);
482 blob_buf_free(&certbuf
);
483 blob_buf_free(&payloadbuf
);
494 /* process revoker certificate */
495 static int cert_process_revoker(const char *certfile
, const char *pubkeydir
) {
496 static LIST_HEAD(certchain
);
497 struct cert_object
*cobj
;
498 struct blob_attr
*containertb
[CERT_CT_ATTR_MAX
];
499 struct blob_attr
*payloadtb
[CERT_PL_ATTR_MAX
];
509 if (cert_load(certfile
, &certchain
)) {
510 DPRINTF("cannot parse cert\n");
514 gettimeofday(&tv
, NULL
);
516 list_for_each_entry(cobj
, &certchain
, list
) {
517 if (!cobj
->cert
[CERT_ATTR_PAYLOAD
])
520 /* blob has payload, verify that using signature */
521 ret
= cert_verify_blob(cobj
->cert
, NULL
, pubkeydir
);
525 blobmsg_parse(cert_cont_policy
,
526 ARRAY_SIZE(cert_cont_policy
),
528 blob_data(cobj
->cert
[CERT_ATTR_PAYLOAD
]),
529 blob_len(cobj
->cert
[CERT_ATTR_PAYLOAD
]));
530 if (!containertb
[CERT_CT_ATTR_PAYLOAD
]) {
531 DPRINTF("no ucert in signed payload\n");
535 blobmsg_parse(cert_payload_policy
,
536 ARRAY_SIZE(cert_payload_policy
),
538 blobmsg_data(containertb
[CERT_CT_ATTR_PAYLOAD
]),
539 blobmsg_data_len(containertb
[CERT_CT_ATTR_PAYLOAD
]));
541 if (!payloadtb
[CERT_PL_ATTR_CERTTYPE
] ||
542 !payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
] ||
543 !payloadtb
[CERT_PL_ATTR_KEY_FINGERPRINT
]) {
544 DPRINTF("missing mandatory ucert attributes\n");
548 certtype
= blobmsg_get_u32(payloadtb
[CERT_PL_ATTR_CERTTYPE
]);
549 validfrom
= blobmsg_get_u64(payloadtb
[CERT_PL_ATTR_VALIDFROMTIME
]);
550 fingerprint
= blobmsg_get_string(payloadtb
[CERT_PL_ATTR_KEY_FINGERPRINT
]);
552 if (certtype
!= CERTTYPE_REVOKE
) {
553 DPRINTF("wrong certificate type\n");
557 if (tv
.tv_sec
< validfrom
) {
561 snprintf(rfname
, sizeof(rfname
)-1, "%s/%s", pubkeydir
, fingerprint
);
562 /* check if entry in pubkeydir exists */
563 if (stat(rfname
, &st
) == 0) {
564 if (_usign_key_is_revoked(fingerprint
, pubkeydir
)) {
565 DPRINTF("existing revoker deadlink for key %s\n", fingerprint
);
569 /* remove any other entry */
574 ret
= symlink(".revoked.", rfname
);
578 DPRINTF("created revoker deadlink for key %s\n", fingerprint
);
584 /* load and verify certfile (and message) */
585 static int cert_verify(const char *certfile
, const char *pubkeyfile
, const char *pubkeydir
, const char *msgfile
) {
586 static LIST_HEAD(certchain
);
588 if (cert_load(certfile
, &certchain
)) {
589 DPRINTF("cannot parse cert\n");
593 return chain_verify(msgfile
, pubkeyfile
, pubkeydir
, &certchain
);
597 static int usage(const char *cmd
)
599 #ifndef UCERT_STRIP_MESSAGES
601 "Usage: %s <command> <options>\n"
604 " -A: append signature (needs -c and -x)\n"
605 " -D: dump (needs -c)\n"
606 " -I: issue cert and revoker (needs -c and -p and -s)\n"
607 #endif /* UCERT_FULL */
608 " -R: process revoker certificate (needs -c and -P)\n"
609 " -V: verify (needs -c and -p|-P, may have -m)\n"
611 " -c <file>: certificate file\n"
612 " -m <file>: message file (verify only)\n"
613 " -p <file>: public key file\n"
614 " -P <path>: public key directory (verify only)\n"
615 " -q: quiet (do not print verification result, use return code only)\n"
617 " -s <file>: secret key file (issue only)\n"
618 " -x <file>: signature file (append only)\n"
619 #endif /* UCERT_FULL */
622 #endif /* UCERT_STRIP_MESSAGES */
626 /* parse command line options and call functions */
627 int main(int argc
, char *argv
[]) {
629 const char *msgfile
= NULL
;
630 const char *pubkeyfile
= NULL
;
631 const char *pubkeydir
= NULL
;
632 const char *certfile
= NULL
;
634 const char *sigfile
= NULL
;
635 const char *seckeyfile
= NULL
;
639 while ((ch
= getopt(argc
, argv
,
649 return usage(argv
[0]);
654 return usage(argv
[0]);
659 return usage(argv
[0]);
665 return usage(argv
[0]);
670 return usage(argv
[0]);
674 if (certfile
|| cmd
== CMD_NONE
)
675 return usage(argv
[0]);
679 if (msgfile
|| cmd
!= CMD_VERIFY
)
680 return usage(argv
[0]);
684 if (pubkeyfile
|| (cmd
!= CMD_VERIFY
&& cmd
!= CMD_ISSUE
) || cmd
== CMD_NONE
)
685 return usage(argv
[0]);
689 if (pubkeydir
|| (cmd
!= CMD_VERIFY
&& cmd
!= CMD_REVOKE
) || cmd
== CMD_NONE
)
690 return usage(argv
[0]);
695 return usage(argv
[0]);
700 if (seckeyfile
|| cmd
!= CMD_ISSUE
|| cmd
== CMD_NONE
)
701 return usage(argv
[0]);
705 if (sigfile
|| cmd
!= CMD_APPEND
|| cmd
== CMD_NONE
)
706 return usage(argv
[0]);
711 return usage(argv
[0]);
718 if (certfile
&& sigfile
)
719 return cert_append(certfile
, sigfile
);
721 return usage(argv
[0]);
724 return cert_dump(certfile
);
726 return usage(argv
[0]);
728 if (certfile
&& pubkeyfile
&& seckeyfile
)
729 return cert_issue(certfile
, pubkeyfile
, seckeyfile
);
731 return usage(argv
[0]);
734 if (certfile
&& pubkeydir
)
735 return cert_process_revoker(certfile
, pubkeydir
);
737 return usage(argv
[0]);
739 if (certfile
&& (pubkeyfile
|| pubkeydir
))
740 return cert_verify(certfile
, pubkeyfile
, pubkeydir
, msgfile
);
742 return usage(argv
[0]);
744 return usage(argv
[0]);
748 return usage(argv
[0]);