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 pgphashalgo2type(int algo)
204 return REPOKEY_TYPE_MD5;
206 return REPOKEY_TYPE_SHA1;
208 return REPOKEY_TYPE_SHA256;
213 parsesigpacket(struct gpgsig *sig, unsigned char *p, int l, unsigned char *pubkey, int pubkeyl, unsigned char *userid, int useridl)
219 /* printf("V3 signature packet\n"); */
220 if (l <= 19 || p[1] != 5)
222 if (p[2] != 0x10 && p[2] != 0x11 && p[2] != 0x12 && p[2] != 0x13 && p[2] != 0x1f)
226 memcpy(sig->issuer, p + 7, 8);
227 sig->created = p[3] << 24 | p[4] << 16 | p[5] << 8 | p[6];
228 htype = pgphashalgo2type(p[16]);
231 void *h = solv_chksum_create(htype);
232 const unsigned char *cs;
236 if ((p[2] >= 0x10 && p[2] <= 0x13) || p[2] == 0x1f || p[2] == 0x18 || p[2] == 0x20 || p[2] == 0x28)
241 solv_chksum_add(h, b, 3);
242 solv_chksum_add(h, pubkey, pubkeyl);
244 if (p[2] >= 0x10 && p[2] <= 0x13)
245 solv_chksum_add(h, userid, useridl);
246 solv_chksum_add(h, p + 2, 5);
247 cs = solv_chksum_get(h, &csl);
248 if (cs[0] == p[17] && cs[1] == p[18])
250 sig->sigdata = solv_malloc(2 + csl + l - 19);
251 sig->sigdatal = 2 + csl + l - 19;
252 sig->sigdata[0] = p[15];
253 sig->sigdata[1] = p[16];
254 memcpy(sig->sigdata + 2, cs, csl);
255 memcpy(sig->sigdata + 2 + csl, p + 19, l - 19);
257 solv_chksum_free(h, 0);
266 /* printf("V4 signature packet\n"); */
269 if (p[1] != 0x10 && p[1] != 0x11 && p[1] != 0x12 && p[1] != 0x13 && p[1] != 0x1f)
273 sig->keyexpires = -1;
274 for (j = 0; q && j < 2; j++)
281 ql = q[0] << 8 | q[1];
291 /* decode sub-packet length */
298 if (ql < 4 || q[0] != 0)
303 sl = q[1] << 16 | q[2] << 8 | q[3];
314 sl = ((x - 192) << 8) + *q++ + 192;
323 /* printf("%d SIGSUB %d %d\n", j, x, sl); */
324 if (x == 16 && sl == 9 && !sig->haveissuer)
327 memcpy(sig->issuer, q + 1, 8);
329 if (x == 2 && j == 0)
330 sig->created = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
331 if (x == 3 && j == 0)
332 sig->expires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
333 if (x == 9 && j == 0)
334 sig->keyexpires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
339 htype = pgphashalgo2type(p[3]);
340 if (sig->haveissuer && htype && pubkey && q && q - p + 2 < l)
342 void *h = solv_chksum_create(htype);
344 const unsigned char *cs;
346 int csl, ml = l - (q - p + 2);
348 if ((p[1] >= 0x10 && p[1] <= 0x13) || p[1] == 0x1f || p[1] == 0x18 || p[1] == 0x20 || p[1] == 0x28)
353 solv_chksum_add(h, b, 3);
354 solv_chksum_add(h, pubkey, pubkeyl);
356 if (p[1] >= 0x10 && p[1] <= 0x13)
359 b[1] = useridl >> 24;
360 b[2] = useridl >> 16;
363 solv_chksum_add(h, b, 5);
364 solv_chksum_add(h, userid, useridl);
366 hl = 6 + (p[4] << 8 | p[5]);
367 solv_chksum_add(h, p, hl);
374 solv_chksum_add(h, b, 6);
375 cs = solv_chksum_get(h, &csl);
376 if (cs[0] == q[0] && cs[1] == q[1])
378 sig->sigdata = solv_malloc(2 + csl + ml);
379 sig->sigdatal = 2 + csl + ml;
380 sig->sigdata[0] = p[2];
381 sig->sigdata[1] = p[3];
382 memcpy(sig->sigdata + 2, cs, csl);
383 memcpy(sig->sigdata + 2 + csl, q + 2, ml);
385 solv_chksum_free(h, 0);
391 parsekeydata(Solvable *s, Repodata *data, unsigned char *p, int pl)
394 unsigned char keyid[8];
395 unsigned int kcr = 0, maxex = 0, maxsigcr = 0;
396 unsigned char *pubkey = 0;
398 unsigned char *userid = 0;
400 unsigned char *pubdata = 0;
403 for (; pl; p += l, pl -= l)
407 if (!(x & 128) || pl <= 0)
412 tag = (x & 0x3c) >> 2;
434 else if (x >= 192 && x < 224)
438 l = ((x - 192) << 8) + *p++ + 192;
443 /* sanity: p[0] must be zero */
444 if (pl <= 4 || p[0] != 0)
446 l = p[1] << 16 | p[2] << 8 | p[3];
458 break; /* one key at a time, please */
459 pubkey = solv_malloc(l);
461 memcpy(pubkey, p, l);
463 if (p[0] == 3 && l >= 10)
467 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
471 ex = kcr + 24*3600 * (p[5] << 8 | p[6]);
476 if (p[7] == 1) /* RSA */
479 unsigned char fp[16];
483 ql = ((p[8] << 8 | p[9]) + 7) / 8; /* length of public modulus */
484 if (ql >= 8 && 10 + ql + 2 <= l)
486 memcpy(keyid, p + 10 + ql - 8, 8); /* keyid is last 64 bits of public modulus */
488 ql2 = ((q[0] << 8 | q[1]) + 7) / 8; /* length of encryption exponent */
489 if (10 + ql + 2 + ql2 <= l)
491 /* fingerprint is the md5 over the two MPI bodies */
492 h = solv_chksum_create(REPOKEY_TYPE_MD5);
493 solv_chksum_add(h, p + 10, ql);
494 solv_chksum_add(h, q + 2, ql2);
495 solv_chksum_free(h, fp);
496 solv_bin2hex(fp, 16, fpx);
497 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
504 else if (p[0] == 4 && l >= 6)
507 unsigned char hdr[3];
508 unsigned char fp[20];
511 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
515 /* fingerprint is the sha1 over the packet */
516 h = solv_chksum_create(REPOKEY_TYPE_SHA1);
517 solv_chksum_add(h, hdr, 3);
518 solv_chksum_add(h, p, l);
519 solv_chksum_free(h, fp);
520 solv_bin2hex(fp, 20, fpx);
521 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
522 memcpy(keyid, fp + 12, 8); /* keyid is last 64 bits of fingerprint */
532 memset(&sig, 0, sizeof(sig));
533 parsesigpacket(&sig, p, l, pubkey, pubkeyl, userid, useridl);
534 if (!sig.haveissuer || !((sig.type >= 0x10 && sig.type <= 0x13) || sig.type == 0x1f))
536 solv_free(sig.sigdata);
539 if (!memcmp(keyid, sig.issuer, 8))
541 #ifdef ENABLE_PGPVRFY
542 /* found self sig, verify */
543 if (solv_pgpvrfy(pubdata, pubdatal, sig.sigdata, sig.sigdatal))
546 if (sig.keyexpires && maxex != -1)
548 if (sig.keyexpires == -1)
550 else if (sig.keyexpires + kcr > maxex)
551 maxex = sig.keyexpires + kcr;
553 if (sig.created > maxsigcr)
554 maxsigcr = sig.created;
560 Id shandle = repodata_new_handle(data);
561 solv_bin2hex(sig.issuer, 8, issuerstr);
562 repodata_set_str(data, shandle, SIGNATURE_ISSUER, issuerstr);
564 repodata_set_num(data, shandle, SIGNATURE_TIME, sig.created);
566 repodata_set_num(data, shandle, SIGNATURE_EXPIRES, sig.created + sig.expires);
568 repodata_set_binary(data, shandle, SIGNATURE_DATA, sig.sigdata, sig.sigdatal);
569 repodata_add_flexarray(data, s - s->repo->pool->solvables, PUBKEY_SIGNATURES, shandle);
571 solv_free(sig.sigdata);
575 userid = solv_realloc(userid, l);
577 memcpy(userid, p, l);
582 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, kcr);
583 if (maxex && maxex != -1)
584 repodata_set_num(data, s - s->repo->pool->solvables, PUBKEY_EXPIRES, maxex);
585 s->name = pool_str2id(s->repo->pool, "gpg-pubkey", 1);
588 if (userid && useridl)
590 char *useridstr = solv_malloc(useridl + 1);
591 memcpy(useridstr, userid, useridl);
592 useridstr[useridl] = 0;
593 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, useridstr);
599 solv_bin2hex(keyid, 8, keyidstr);
600 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyidstr);
604 /* build rpm-style evr */
605 char evr[8 + 1 + 8 + 1];
606 solv_bin2hex(keyid + 4, 4, evr);
607 sprintf(evr + 8, "-%08x", maxsigcr);
608 s->evr = pool_str2id(s->repo->pool, evr, 1);
610 repodata_set_binary(data, s - s->repo->pool->solvables, PUBKEY_DATA, pubdata, pubdatal);
619 /* this is private to rpm, but rpm lacks an interface to retrieve
620 * the values. Sigh. */
621 struct pgpDigParams_s {
623 const unsigned char * hash;
624 #ifndef HAVE_PGPDIGGETPARAMS
625 const char * params[4];
628 unsigned char version; /*!< version number. */
629 unsigned char time[4]; /*!< time that the key was created. */
630 unsigned char pubkey_algo; /*!< public key algorithm. */
631 unsigned char hash_algo;
632 unsigned char sigtype;
633 unsigned char hashlen;
634 unsigned char signhash16[2];
635 unsigned char signid[8];
639 #ifndef HAVE_PGPDIGGETPARAMS
641 struct pgpDigParams_s signature;
642 struct pgpDigParams_s pubkey;
647 /* only rpm knows how to do the release calculation, we don't dare
648 * to recreate all the bugs in libsolv */
650 parsekeydata_rpm(Solvable *s, Repodata *data, unsigned char *pkts, int pktsl)
652 Pool *pool = s->repo->pool;
653 struct pgpDigParams_s *digpubkey;
656 char evrbuf[8 + 1 + 8 + 1];
662 dig = pgpDigNew(RPMVSF_DEFAULT, 0);
664 (void) pgpPrtPkts(pkts, pktsl, dig, 0);
665 #ifdef HAVE_PGPDIGGETPARAMS
666 digpubkey = pgpDigGetParams(dig, PGPTAG_PUBLIC_KEY);
668 digpubkey = &dig->pubkey;
672 btime = digpubkey->time[0] << 24 | digpubkey->time[1] << 16 | digpubkey->time[2] << 8 | digpubkey->time[3];
673 solv_bin2hex(digpubkey->signid, 8, keyid);
674 solv_bin2hex(digpubkey->signid + 4, 4, evrbuf);
676 solv_bin2hex(digpubkey->time, 4, evrbuf + 9);
677 s->evr = pool_str2id(pool, evrbuf, 1);
678 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyid);
679 if (digpubkey->userid)
680 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, digpubkey->userid);
682 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, btime);
685 (void)pgpFreeDig(dig);
687 (void)pgpDigFree(dig);
691 #endif /* ENABLE_RPMDB */
694 pubkey2solvable(Solvable *s, Repodata *data, char *pubkey)
699 pkts = unarmor(pubkey, &pktsl, "-----BEGIN PGP PUBLIC KEY BLOCK-----", "-----END PGP PUBLIC KEY BLOCK-----");
702 pool_error(s->repo->pool, 0, "unarmor failure");
705 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_DESCRIPTION, pubkey);
706 parsekeydata(s, data, pkts, pktsl);
708 parsekeydata_rpm(s, data, pkts, pktsl);
710 solv_free((void *)pkts);
717 repo_add_rpmdb_pubkeys(Repo *repo, int flags)
719 Pool *pool = repo->pool;
725 const char *rootdir = 0;
728 data = repo_add_repodata(repo, flags);
729 if (flags & REPO_USE_ROOTDIR)
730 rootdir = pool_get_rootdir(pool);
731 state = rpm_state_create(repo->pool, rootdir);
733 rpm_installedrpmdbids(state, "Name", "gpg-pubkey", &q);
734 for (i = 0; i < q.count; i++)
737 unsigned long long itime;
739 handle = rpm_byrpmdbid(state, q.elements[i]);
742 str = rpm_query(handle, SOLVABLE_DESCRIPTION);
745 s = pool_id2solvable(pool, repo_add_solvable(repo));
746 pubkey2solvable(s, data, str);
748 itime = rpm_query_num(handle, SOLVABLE_INSTALLTIME, 0);
750 repodata_set_num(data, s - pool->solvables, SOLVABLE_INSTALLTIME, itime);
752 repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
753 repo->rpmdbid[s - pool->solvables - repo->start] = q.elements[i];
756 rpm_state_free(state);
757 if (!(flags & REPO_NO_INTERNALIZE))
758 repodata_internalize(data);
765 repo_add_pubkey(Repo *repo, const char *key, int flags)
767 Pool *pool = repo->pool;
774 data = repo_add_repodata(repo, flags);
777 if ((fp = fopen(flags & REPO_USE_ROOTDIR ? pool_prepend_rootdir_tmp(pool, key) : key, "r")) == 0)
779 pool_error(pool, -1, "%s: %s", key, strerror(errno));
787 buf = solv_realloc(buf, bufl);
789 ll = fread(buf + l, 1, bufl - l, fp);
793 pool_error(pool, -1, "%s: %s", key, strerror(errno));
802 s = pool_id2solvable(pool, repo_add_solvable(repo));
803 if (!pubkey2solvable(s, data, buf))
805 repo_free_solvable(repo, s - pool->solvables, 1);
810 if (!(flags & REPO_NO_INTERNALIZE))
811 repodata_internalize(data);
812 return s - pool->solvables;