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)
120 unsigned char *buf, *bp;
124 while (strncmp(pubkey, "-----BEGIN PGP PUBLIC KEY BLOCK-----", 36) != 0)
126 pubkey = strchr(pubkey, '\n');
131 pubkey = strchr(pubkey, '\n');
134 /* skip header lines */
137 while (*pubkey == ' ' || *pubkey == '\t')
141 pubkey = strchr(pubkey, '\n');
146 p = strchr(pubkey, '=');
150 bp = buf = solv_malloc(l * 3 / 4 + 4);
154 pubkey = r64dec1(pubkey, &v, &eof);
164 while (*pubkey == ' ' || *pubkey == '\t' || *pubkey == '\n' || *pubkey == '\r')
167 if (*pubkey != '=' || (pubkey = r64dec1(pubkey + 1, &v, &eof)) == 0)
172 if (v != crc24(buf, bp - buf))
177 while (*pubkey == ' ' || *pubkey == '\t' || *pubkey == '\n' || *pubkey == '\r')
179 if (strncmp(pubkey, "-----END PGP PUBLIC KEY BLOCK-----", 34) != 0)
190 unsigned char issuer[8];
192 unsigned int created;
193 unsigned int expires;
194 unsigned int keyexpires;
195 unsigned char *sigdata;
200 parsesigpacket(struct gpgsig *sig, unsigned char *p, int l, unsigned char *pubkey, int pubkeyl, unsigned char *userid, int useridl)
206 /* printf("V3 signature packet\n"); */
207 if (l <= 19 || p[1] != 5)
209 if (p[2] != 0x10 && p[2] != 0x11 && p[2] != 0x12 && p[2] != 0x13 && p[2] != 0x1f)
213 memcpy(sig->issuer, p + 7, 8);
214 sig->created = p[3] << 24 | p[4] << 16 | p[5] << 8 | p[6];
216 htype = REPOKEY_TYPE_MD5;
218 htype = REPOKEY_TYPE_SHA1;
220 htype = REPOKEY_TYPE_SHA256;
223 void *h = solv_chksum_create(htype);
224 const unsigned char *cs;
228 if ((p[2] >= 0x10 && p[2] <= 0x13) || p[2] == 0x1f || p[2] == 0x18 || p[2] == 0x20 || p[2] == 0x28)
233 solv_chksum_add(h, b, 3);
234 solv_chksum_add(h, pubkey, pubkeyl);
236 if (p[2] >= 0x10 && p[2] <= 0x13)
237 solv_chksum_add(h, userid, useridl);
238 solv_chksum_add(h, p + 2, 5);
239 cs = solv_chksum_get(h, &csl);
240 if (cs[0] == p[17] && cs[1] == p[18])
242 sig->sigdata = solv_malloc(2 + csl + l - 19);
243 sig->sigdatal = 2 + csl + l - 19;
244 sig->sigdata[0] = p[15];
245 sig->sigdata[1] = p[16];
246 memcpy(sig->sigdata + 2, cs, csl);
247 memcpy(sig->sigdata + 2 + csl, p + 19, l - 19);
249 solv_chksum_free(h, 0);
258 /* printf("V4 signature packet\n"); */
261 if (p[1] != 0x10 && p[1] != 0x11 && p[1] != 0x12 && p[1] != 0x13 && p[1] != 0x1f)
265 sig->keyexpires = -1;
266 for (j = 0; q && j < 2; j++)
273 ql = q[0] << 8 | q[1];
283 /* decode sub-packet length */
290 if (ql < 4 || q[0] != 0)
295 sl = q[1] << 16 | q[2] << 8 | q[3];
306 sl = ((x - 192) << 8) + *q++ + 192;
315 /* printf("%d SIGSUB %d %d\n", j, x, sl); */
316 if (x == 16 && sl == 9 && !sig->haveissuer)
319 memcpy(sig->issuer, q + 1, 8);
321 if (x == 2 && j == 0)
322 sig->created = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
323 if (x == 3 && j == 0)
324 sig->expires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
325 if (x == 9 && j == 0)
326 sig->keyexpires = q[1] << 24 | q[2] << 16 | q[3] << 8 | q[4];
332 htype = REPOKEY_TYPE_MD5;
334 htype = REPOKEY_TYPE_SHA1;
336 htype = REPOKEY_TYPE_SHA256;
337 if (sig->haveissuer && htype && pubkey && q && q - p + 2 < l)
339 void *h = solv_chksum_create(htype);
341 const unsigned char *cs;
343 int csl, ml = l - (q - p + 2);
345 if ((p[1] >= 0x10 && p[1] <= 0x13) || p[1] == 0x1f || p[1] == 0x18 || p[1] == 0x20 || p[1] == 0x28)
350 solv_chksum_add(h, b, 3);
351 solv_chksum_add(h, pubkey, pubkeyl);
353 if (p[1] >= 0x10 && p[1] <= 0x13)
356 b[1] = useridl >> 24;
357 b[2] = useridl >> 16;
360 solv_chksum_add(h, b, 5);
361 solv_chksum_add(h, userid, useridl);
363 hl = 6 + (p[4] << 8 | p[5]);
364 solv_chksum_add(h, p, hl);
371 solv_chksum_add(h, b, 6);
372 cs = solv_chksum_get(h, &csl);
373 if (cs[0] == q[0] && cs[1] == q[1])
375 sig->sigdata = solv_malloc(2 + csl + ml);
376 sig->sigdatal = 2 + csl + ml;
377 sig->sigdata[0] = p[2];
378 sig->sigdata[1] = p[3];
379 memcpy(sig->sigdata + 2, cs, csl);
380 memcpy(sig->sigdata + 2 + csl, q + 2, ml);
382 solv_chksum_free(h, 0);
388 parsekeydata(Solvable *s, Repodata *data, unsigned char *p, int pl)
391 unsigned char keyid[8];
392 unsigned int kcr = 0, maxex = 0, maxsigcr = 0;
393 unsigned char *pubkey = 0;
395 unsigned char *userid = 0;
397 unsigned char *pubdata = 0;
400 for (; pl; p += l, pl -= l)
404 if (!(x & 128) || pl <= 0)
409 tag = (x & 0x3c) >> 2;
431 else if (x >= 192 && x < 224)
435 l = ((x - 192) << 8) + *p++ + 192;
440 /* sanity: p[0] must be zero */
441 if (pl <= 4 || p[0] != 0)
443 l = p[1] << 16 | p[2] << 8 | p[3];
455 break; /* one key at a time, please */
456 pubkey = solv_malloc(l);
458 memcpy(pubkey, p, l);
460 if (p[0] == 3 && l >= 10)
464 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
468 ex = kcr + 24*3600 * (p[5] << 8 | p[6]);
473 if (p[7] == 1) /* RSA */
476 unsigned char fp[16];
480 ql = ((p[8] << 8 | p[9]) + 7) / 8; /* length of public modulus */
481 if (ql >= 8 && 10 + ql + 2 <= l)
483 memcpy(keyid, p + 10 + ql - 8, 8); /* keyid is last 64 bits of public modulus */
485 ql2 = ((q[0] << 8 | q[1]) + 7) / 8; /* length of encryption exponent */
486 if (10 + ql + 2 + ql2 <= l)
488 /* fingerprint is the md5 over the two MPI bodies */
489 h = solv_chksum_create(REPOKEY_TYPE_MD5);
490 solv_chksum_add(h, p + 10, ql);
491 solv_chksum_add(h, q + 2, ql2);
492 solv_chksum_free(h, fp);
493 solv_bin2hex(fp, 16, fpx);
494 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
501 else if (p[0] == 4 && l >= 6)
504 unsigned char hdr[3];
505 unsigned char fp[20];
508 maxsigcr = kcr = p[1] << 24 | p[2] << 16 | p[3] << 8 | p[4];
512 /* fingerprint is the sha1 over the packet */
513 h = solv_chksum_create(REPOKEY_TYPE_SHA1);
514 solv_chksum_add(h, hdr, 3);
515 solv_chksum_add(h, p, l);
516 solv_chksum_free(h, fp);
517 solv_bin2hex(fp, 20, fpx);
518 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_FINGERPRINT, fpx);
519 memcpy(keyid, fp + 12, 8); /* keyid is last 64 bits of fingerprint */
529 memset(&sig, 0, sizeof(sig));
530 parsesigpacket(&sig, p, l, pubkey, pubkeyl, userid, useridl);
531 if (!sig.haveissuer || !((sig.type >= 0x10 && sig.type <= 0x13) || sig.type == 0x1f))
533 solv_free(sig.sigdata);
536 if (!memcmp(keyid, sig.issuer, 8))
538 #ifdef ENABLE_PGPVRFY
539 /* found self sig, verify */
540 if (solv_pgpvrfy(pubdata, pubdatal, sig.sigdata, sig.sigdatal))
543 if (sig.keyexpires && maxex != -1)
545 if (sig.keyexpires == -1)
547 else if (sig.keyexpires + kcr > maxex)
548 maxex = sig.keyexpires + kcr;
550 if (sig.created > maxsigcr)
551 maxsigcr = sig.created;
557 Id shandle = repodata_new_handle(data);
558 solv_bin2hex(sig.issuer, 8, issuerstr);
559 repodata_set_str(data, shandle, SIGNATURE_ISSUER, issuerstr);
561 repodata_set_num(data, shandle, SIGNATURE_TIME, sig.created);
563 repodata_set_num(data, shandle, SIGNATURE_EXPIRES, sig.created + sig.expires);
565 repodata_set_binary(data, shandle, SIGNATURE_DATA, sig.sigdata, sig.sigdatal);
566 repodata_add_flexarray(data, s - s->repo->pool->solvables, PUBKEY_SIGNATURES, shandle);
568 solv_free(sig.sigdata);
572 userid = solv_realloc(userid, l);
574 memcpy(userid, p, l);
579 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, kcr);
580 if (maxex && maxex != -1)
581 repodata_set_num(data, s - s->repo->pool->solvables, PUBKEY_EXPIRES, maxex);
582 s->name = pool_str2id(s->repo->pool, "gpg-pubkey", 1);
585 if (userid && useridl)
587 char *useridstr = solv_malloc(useridl + 1);
588 memcpy(useridstr, userid, useridl);
589 useridstr[useridl] = 0;
590 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, useridstr);
596 solv_bin2hex(keyid, 8, keyidstr);
597 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyidstr);
601 /* build rpm-style evr */
602 char evr[8 + 1 + 8 + 1];
603 solv_bin2hex(keyid + 4, 4, evr);
604 sprintf(evr + 8, "-%08x", maxsigcr);
605 s->evr = pool_str2id(s->repo->pool, evr, 1);
607 repodata_set_binary(data, s - s->repo->pool->solvables, PUBKEY_DATA, pubdata, pubdatal);
616 /* this is private to rpm, but rpm lacks an interface to retrieve
617 * the values. Sigh. */
618 struct pgpDigParams_s {
620 const unsigned char * hash;
621 #ifndef HAVE_PGPDIGGETPARAMS
622 const char * params[4];
625 unsigned char version; /*!< version number. */
626 unsigned char time[4]; /*!< time that the key was created. */
627 unsigned char pubkey_algo; /*!< public key algorithm. */
628 unsigned char hash_algo;
629 unsigned char sigtype;
630 unsigned char hashlen;
631 unsigned char signhash16[2];
632 unsigned char signid[8];
636 #ifndef HAVE_PGPDIGGETPARAMS
638 struct pgpDigParams_s signature;
639 struct pgpDigParams_s pubkey;
644 /* only rpm knows how to do the release calculation, we don't dare
645 * to recreate all the bugs in libsolv */
647 parsekeydata_rpm(Solvable *s, Repodata *data, unsigned char *pkts, int pktsl)
649 Pool *pool = s->repo->pool;
650 struct pgpDigParams_s *digpubkey;
653 char evrbuf[8 + 1 + 8 + 1];
659 dig = pgpDigNew(RPMVSF_DEFAULT, 0);
661 (void) pgpPrtPkts(pkts, pktsl, dig, 0);
662 #ifdef HAVE_PGPDIGGETPARAMS
663 digpubkey = pgpDigGetParams(dig, PGPTAG_PUBLIC_KEY);
665 digpubkey = &dig->pubkey;
669 btime = digpubkey->time[0] << 24 | digpubkey->time[1] << 16 | digpubkey->time[2] << 8 | digpubkey->time[3];
670 solv_bin2hex(digpubkey->signid, 8, keyid);
671 solv_bin2hex(digpubkey->signid + 4, 4, evrbuf);
673 solv_bin2hex(digpubkey->time, 4, evrbuf + 9);
674 s->evr = pool_str2id(pool, evrbuf, 1);
675 repodata_set_str(data, s - s->repo->pool->solvables, PUBKEY_KEYID, keyid);
676 if (digpubkey->userid)
677 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_SUMMARY, digpubkey->userid);
679 repodata_set_num(data, s - s->repo->pool->solvables, SOLVABLE_BUILDTIME, btime);
682 (void)pgpFreeDig(dig);
684 (void)pgpDigFree(dig);
688 #endif /* ENABLE_RPMDB */
691 pubkey2solvable(Solvable *s, Repodata *data, char *pubkey)
696 pkts = unarmor(pubkey, &pktsl);
699 pool_error(s->repo->pool, 0, "unarmor failure");
702 setutf8string(data, s - s->repo->pool->solvables, SOLVABLE_DESCRIPTION, pubkey);
703 parsekeydata(s, data, pkts, pktsl);
705 parsekeydata_rpm(s, data, pkts, pktsl);
707 solv_free((void *)pkts);
714 repo_add_rpmdb_pubkeys(Repo *repo, int flags)
716 Pool *pool = repo->pool;
722 const char *rootdir = 0;
725 data = repo_add_repodata(repo, flags);
726 if (flags & REPO_USE_ROOTDIR)
727 rootdir = pool_get_rootdir(pool);
728 state = rpm_state_create(repo->pool, rootdir);
730 rpm_installedrpmdbids(state, "Name", "gpg-pubkey", &q);
731 for (i = 0; i < q.count; i++)
734 unsigned long long itime;
736 handle = rpm_byrpmdbid(state, q.elements[i]);
739 str = rpm_query(handle, SOLVABLE_DESCRIPTION);
742 s = pool_id2solvable(pool, repo_add_solvable(repo));
743 pubkey2solvable(s, data, str);
745 itime = rpm_query_num(handle, SOLVABLE_INSTALLTIME, 0);
747 repodata_set_num(data, s - pool->solvables, SOLVABLE_INSTALLTIME, itime);
749 repo->rpmdbid = repo_sidedata_create(repo, sizeof(Id));
750 repo->rpmdbid[s - pool->solvables - repo->start] = q.elements[i];
753 rpm_state_free(state);
754 if (!(flags & REPO_NO_INTERNALIZE))
755 repodata_internalize(data);
762 repo_add_pubkey(Repo *repo, const char *key, int flags)
764 Pool *pool = repo->pool;
771 data = repo_add_repodata(repo, flags);
774 if ((fp = fopen(flags & REPO_USE_ROOTDIR ? pool_prepend_rootdir_tmp(pool, key) : key, "r")) == 0)
776 pool_error(pool, -1, "%s: %s", key, strerror(errno));
784 buf = solv_realloc(buf, bufl);
786 ll = fread(buf + l, 1, bufl - l, fp);
790 pool_error(pool, -1, "%s: %s", key, strerror(errno));
799 s = pool_id2solvable(pool, repo_add_solvable(repo));
800 if (!pubkey2solvable(s, data, buf))
802 repo_free_solvable(repo, s - pool->solvables, 1);
807 if (!(flags & REPO_NO_INTERNALIZE))
808 repodata_internalize(data);
809 return s - pool->solvables;