2 * Copyright (c) 2007-2013, Novell Inc.
4 * This program is licensed under the BSD license, read LICENSE.BSD
5 * for further information
11 * support for pubkey reading
15 #include <sys/types.h>
27 #include <rpm/rpmio.h>
28 #include <rpm/rpmpgp.h>
30 #include <rpm/header.h>
32 #include <rpm/rpmdb.h>
40 #include "repo_rpmdb.h"
42 #include "solv_pgpvrfy.h"
46 setutf8string(Repodata *repodata, Id handle, Id tag, const char *str)
48 if (str[solv_validutf8(str)])
50 char *ustr = solv_latin1toutf8(str); /* not utf8, assume latin1 */
51 repodata_set_str(repodata, handle, tag, ustr);
55 repodata_set_str(repodata, handle, tag, str);
59 r64dec1(char *p, unsigned int *vp, int *eofp)
69 if (x >= 'A' && x <= 'Z')
71 else if (x >= 'a' && x <= 'z')
73 else if (x >= '0' && x <= '9')
100 crc24(unsigned char *p, int len)
102 unsigned int crc = 0xb704ceL;
108 for (i = 0; i < 8; i++)
109 if ((crc <<= 1) & 0x1000000)
112 return crc & 0xffffffL;
115 static unsigned char *
116 unarmor(char *pubkey, int *pktlp, char *startstr, char *endstr)
120 unsigned char *buf, *bp;
124 l = strlen(startstr);
125 while (strncmp(pubkey, startstr, l) != 0)
127 pubkey = strchr(pubkey, '\n');
132 pubkey = strchr(pubkey, '\n');
135 /* skip header lines */
138 while (*pubkey == ' ' || *pubkey == '\t')
142 pubkey = strchr(pubkey, '\n');
147 p = strchr(pubkey, '=');
151 bp = buf = solv_malloc(l * 3 / 4 + 4);
155 pubkey = r64dec1(pubkey, &v, &eof);
165 while (*pubkey == ' ' || *pubkey == '\t' || *pubkey == '\n' || *pubkey == '\r')
168 if (*pubkey != '=' || (pubkey = r64dec1(pubkey + 1, &v, &eof)) == 0)
173 if (v != crc24(buf, bp - buf))
178 while (*pubkey == ' ' || *pubkey == '\t' || *pubkey == '\n' || *pubkey == '\r')
180 if (strncmp(pubkey, endstr, strlen(endstr)) != 0)
191 unsigned char issuer[8];
193 unsigned int created;
194 unsigned int expires;
195 unsigned int keyexpires;
196 unsigned char *sigdata;
201 parsesigpacket(struct gpgsig *sig, unsigned char *p, int l, unsigned char *pubkey, int pubkeyl, unsigned char *userid, int useridl)
207 /* printf("V3 signature packet\n"); */
208 if (l <= 19 || p[1] != 5)
210 if (p[2] != 0x10 && p[2] != 0x11 && p[2] != 0x12 && p[2] != 0x13 && p[2] != 0x1f)
214 memcpy(sig->issuer, p + 7, 8);
215 sig->created = p[3] << 24 | p[4] << 16 | p[5] << 8 | p[6];
217 htype = REPOKEY_TYPE_MD5;
219 htype = REPOKEY_TYPE_SHA1;
221 htype = REPOKEY_TYPE_SHA256;
224 void *h = solv_chksum_create(htype);
225 const unsigned char *cs;
229 if ((p[2] >= 0x10 && p[2] <= 0x13) || p[2] == 0x1f || p[2] == 0x18 || p[2] == 0x20 || p[2] == 0x28)
234 solv_chksum_add(h, b, 3);
235 solv_chksum_add(h, pubkey, pubkeyl);
237 if (p[2] >= 0x10 && p[2] <= 0x13)
238 solv_chksum_add(h, userid, useridl);
239 solv_chksum_add(h, p + 2, 5);
240 cs = solv_chksum_get(h, &csl);
241 if (cs[0] == p[17] && cs[1] == p[18])
243 sig->sigdata = solv_malloc(2 + csl + l - 19);
244 sig->sigdatal = 2 + csl + l - 19;
245 sig->sigdata[0] = p[15];
246 sig->sigdata[1] = p[16];
247 memcpy(sig->sigdata + 2, cs, csl);
248 memcpy(sig->sigdata + 2 + csl, p + 19, l - 19);
250 solv_chksum_free(h, 0);
259 /* printf("V4 signature packet\n"); */
262 if (p[1] != 0x10 && p[1] != 0x11 && p[1] != 0x12 && p[1] != 0x13 && p[1] != 0x1f)
266 sig->keyexpires = -1;
267 for (j = 0; q && j < 2; j++)
274 ql = q[0] << 8 | q[1];
284 /* decode sub-packet length */
291 if (ql < 4 || q[0] != 0)
296 sl = q[1] << 16 | q[2] << 8 | q[3];
307 sl = ((x - 192) << 8) + *q++ + 192;
316 /* printf("%d SIGSUB %d %d\n", j, x, sl); */
317 if (x == 16 && sl == 9 && !sig->haveissuer)
320 memcpy(sig->issuer, q + 1, 8);
322 if (x == 2 && j == 0)
323 sig->created = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
324 if (x == 3 && j == 0)
325 sig->expires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
326 if (x == 9 && j == 0)
327 sig->keyexpires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
333 htype = REPOKEY_TYPE_MD5;
335 htype = REPOKEY_TYPE_SHA1;
337 htype = REPOKEY_TYPE_SHA256;
338 if (sig->haveissuer && htype && pubkey && q && q - p + 2 < l)
340 void *h = solv_chksum_create(htype);
342 const unsigned char *cs;
344 int csl, ml = l - (q - p + 2);
346 if ((p[1] >= 0x10 && p[1] <= 0x13) || p[1] == 0x1f || p[1] == 0x18 || p[1] == 0x20 || p[1] == 0x28)
351 solv_chksum_add(h, b, 3);
352 solv_chksum_add(h, pubkey, pubkeyl);
354 if (p[1] >= 0x10 && p[1] <= 0x13)
357 b[1] = useridl >> 24;
358 b[2] = useridl >> 16;
361 solv_chksum_add(h, b, 5);
362 solv_chksum_add(h, userid, useridl);
364 hl = 6 + (p[4] << 8 | p[5]);
365 solv_chksum_add(h, p, hl);
372 solv_chksum_add(h, b, 6);
373 cs = solv_chksum_get(h, &csl);
374 if (cs[0] == q[0] && cs[1] == q[1])
376 sig->sigdata = solv_malloc(2 + csl + ml);
377 sig->sigdatal = 2 + csl + ml;
378 sig->sigdata[0] = p[2];
379 sig->sigdata[1] = p[3];
380 memcpy(sig->sigdata + 2, cs, csl);
381 memcpy(sig->sigdata + 2 + csl, q + 2, ml);
383 solv_chksum_free(h, 0);
389 parsekeydata(Solvable *s, Repodata *data, unsigned char *p, int pl)
392 unsigned char keyid[8];
393 unsigned int kcr = 0, maxex = 0, maxsigcr = 0;
394 unsigned char *pubkey = 0;
396 unsigned char *userid = 0;
398 unsigned char *pubdata = 0;
401 for (; pl; p += l, pl -= l)
405 if (!(x & 128) || pl <= 0)
410 tag = (x & 0x3c) >> 2;
432 else if (x >= 192 && x < 224)
436 l = ((x - 192) << 8) + *p++ + 192;
441 /* sanity: p[0] must be zero */
442 if (pl <= 4 || p[0] != 0)
444 l = p[1] << 16 | p[2] << 8 | p[3];
456 break; /* one key at a time, please */
457 pubkey = solv_malloc(l);
459 memcpy(pubkey, p, l);
461 if (p[0] == 3 && l >= 10)
465 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
469 ex = kcr + 24*3600 * (p[5] << 8 | p[6]);
474 if (p[7] == 1) /* RSA */
477 unsigned char fp[16];
481 ql = ((p[8] << 8 | p[9]) + 7) / 8; /* length of public modulus */
482 if (ql >= 8 && 10 + ql + 2 <= l)
484 memcpy(keyid, p + 10 + ql - 8, 8); /* keyid is last 64 bits of public modulus */
486 ql2 = ((q[0] << 8 | q[1]) + 7) / 8; /* length of encryption exponent */
487 if (10 + ql + 2 + ql2 <= l)
489 /* fingerprint is the md5 over the two MPI bodies */
490 h = solv_chksum_create(REPOKEY_TYPE_MD5);
491 solv_chksum_add(h, p + 10, ql);
492 solv_chksum_add(h, q + 2, ql2);
493 solv_chksum_free(h, fp);
494 solv_bin2hex(fp, 16, fpx);
495 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
502 else if (p[0] == 4 && l >= 6)
505 unsigned char hdr[3];
506 unsigned char fp[20];
509 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
513 /* fingerprint is the sha1 over the packet */
514 h = solv_chksum_create(REPOKEY_TYPE_SHA1);
515 solv_chksum_add(h, hdr, 3);
516 solv_chksum_add(h, p, l);
517 solv_chksum_free(h, fp);
518 solv_bin2hex(fp, 20, fpx);
519 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
520 memcpy(keyid, fp + 12, 8); /* keyid is last 64 bits of fingerprint */
530 memset(&sig, 0, sizeof(sig));
531 parsesigpacket(&sig, p, l, pubkey, pubkeyl, userid, useridl);
532 if (!sig.haveissuer || !((sig.type >= 0x10 && sig.type <= 0x13) || sig.type == 0x1f))
534 solv_free(sig.sigdata);
537 if (!memcmp(keyid, sig.issuer, 8))
539 #ifdef ENABLE_PGPVRFY
540 /* found self sig, verify */
541 if (solv_pgpvrfy(pubdata, pubdatal, sig.sigdata, sig.sigdatal))
544 if (sig.keyexpires && maxex != -1)
546 if (sig.keyexpires == -1)
548 else if (sig.keyexpires + kcr > maxex)
549 maxex = sig.keyexpires + kcr;
551 if (sig.created > maxsigcr)
552 maxsigcr = sig.created;
558 Id shandle = repodata_new_handle(data);
559 solv_bin2hex(sig.issuer, 8, issuerstr);
560 repodata_set_str(data, shandle, SIGNATURE_ISSUER, issuerstr);
562 repodata_set_num(data, shandle, SIGNATURE_TIME, sig.created);
564 repodata_set_num(data, shandle, SIGNATURE_EXPIRES, sig.created + sig.expires);
566 repodata_set_binary(data, shandle, SIGNATURE_DATA, sig.sigdata, sig.sigdatal);
567 repodata_add_flexarray(data, s - s->repo->pool->solvables, PUBKEY_SIGNATURES, shandle);
569 solv_free(sig.sigdata);
573 userid = solv_realloc(userid, l);
575 memcpy(userid, p, l);
580 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, kcr);
581 if (maxex && maxex != -1)
582 repodata_set_num(data, s - s->repo->pool->solvables, PUBKEY_EXPIRES, maxex);
583 s->name = pool_str2id(s->repo->pool, "gpg-pubkey", 1);
586 if (userid && useridl)
588 char *useridstr = solv_malloc(useridl + 1);
589 memcpy(useridstr, userid, useridl);
590 useridstr[useridl] = 0;
591 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, useridstr);
597 solv_bin2hex(keyid, 8, keyidstr);
598 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyidstr);
602 /* build rpm-style evr */
603 char evr[8 + 1 + 8 + 1];
604 solv_bin2hex(keyid + 4, 4, evr);
605 sprintf(evr + 8, "-%08x", maxsigcr);
606 s->evr = pool_str2id(s->repo->pool, evr, 1);
608 repodata_set_binary(data, s - s->repo->pool->solvables, PUBKEY_DATA, pubdata, pubdatal);
617 /* this is private to rpm, but rpm lacks an interface to retrieve
618 * the values. Sigh. */
619 struct pgpDigParams_s {
621 const unsigned char * hash;
622 #ifndef HAVE_PGPDIGGETPARAMS
623 const char * params[4];
626 unsigned char version; /*!< version number. */
627 unsigned char time[4]; /*!< time that the key was created. */
628 unsigned char pubkey_algo; /*!< public key algorithm. */
629 unsigned char hash_algo;
630 unsigned char sigtype;
631 unsigned char hashlen;
632 unsigned char signhash16[2];
633 unsigned char signid[8];
637 #ifndef HAVE_PGPDIGGETPARAMS
639 struct pgpDigParams_s signature;
640 struct pgpDigParams_s pubkey;
645 /* only rpm knows how to do the release calculation, we don't dare
646 * to recreate all the bugs in libsolv */
648 parsekeydata_rpm(Solvable *s, Repodata *data, unsigned char *pkts, int pktsl)
650 Pool *pool = s->repo->pool;
651 struct pgpDigParams_s *digpubkey;
654 char evrbuf[8 + 1 + 8 + 1];
660 dig = pgpDigNew(RPMVSF_DEFAULT, 0);
662 (void) pgpPrtPkts(pkts, pktsl, dig, 0);
663 #ifdef HAVE_PGPDIGGETPARAMS
664 digpubkey = pgpDigGetParams(dig, PGPTAG_PUBLIC_KEY);
666 digpubkey = &dig->pubkey;
670 btime = digpubkey->time[0] << 24 | digpubkey->time[1] << 16 | digpubkey->time[2] << 8 | digpubkey->time[3];
671 solv_bin2hex(digpubkey->signid, 8, keyid);
672 solv_bin2hex(digpubkey->signid + 4, 4, evrbuf);
674 solv_bin2hex(digpubkey->time, 4, evrbuf + 9);
675 s->evr = pool_str2id(pool, evrbuf, 1);
676 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyid);
677 if (digpubkey->userid)
678 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, digpubkey->userid);
680 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, btime);
683 (void)pgpFreeDig(dig);
685 (void)pgpDigFree(dig);
689 #endif /* ENABLE_RPMDB */
692 pubkey2solvable(Solvable *s, Repodata *data, char *pubkey)
697 pkts = unarmor(pubkey, &pktsl, "-----BEGIN PGP PUBLIC KEY BLOCK-----", "-----END PGP PUBLIC KEY BLOCK-----");
700 pool_error(s->repo->pool, 0, "unarmor failure");
703 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_DESCRIPTION, pubkey);
704 parsekeydata(s, data, pkts, pktsl);
706 parsekeydata_rpm(s, data, pkts, pktsl);
708 solv_free((void *)pkts);
715 repo_add_rpmdb_pubkeys(Repo *repo, int flags)
717 Pool *pool = repo->pool;
723 const char *rootdir = 0;
726 data = repo_add_repodata(repo, flags);
727 if (flags & REPO_USE_ROOTDIR)
728 rootdir = pool_get_rootdir(pool);
729 state = rpm_state_create(repo->pool, rootdir);
731 rpm_installedrpmdbids(state, "Name", "gpg-pubkey", &q);
732 for (i = 0; i < q.count; i++)
735 unsigned long long itime;
737 handle = rpm_byrpmdbid(state, q.elements[i]);
740 str = rpm_query(handle, SOLVABLE_DESCRIPTION);
743 s = pool_id2solvable(pool, repo_add_solvable(repo));
744 pubkey2solvable(s, data, str);
746 itime = rpm_query_num(handle, SOLVABLE_INSTALLTIME, 0);
748 repodata_set_num(data, s - pool->solvables, SOLVABLE_INSTALLTIME, itime);
750 repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
751 repo->rpmdbid[s - pool->solvables - repo->start] = q.elements[i];
754 rpm_state_free(state);
755 if (!(flags & REPO_NO_INTERNALIZE))
756 repodata_internalize(data);
763 repo_add_pubkey(Repo *repo, const char *key, int flags)
765 Pool *pool = repo->pool;
772 data = repo_add_repodata(repo, flags);
775 if ((fp = fopen(flags & REPO_USE_ROOTDIR ? pool_prepend_rootdir_tmp(pool, key) : key, "r")) == 0)
777 pool_error(pool, -1, "%s: %s", key, strerror(errno));
785 buf = solv_realloc(buf, bufl);
787 ll = fread(buf + l, 1, bufl - l, fp);
791 pool_error(pool, -1, "%s: %s", key, strerror(errno));
800 s = pool_id2solvable(pool, repo_add_solvable(repo));
801 if (!pubkey2solvable(s, data, buf))
803 repo_free_solvable(repo, s - pool->solvables, 1);
808 if (!(flags & REPO_NO_INTERNALIZE))
809 repodata_internalize(data);
810 return s - pool->solvables;