X-Git-Url: https://git.sommitrealweird.co.uk/onak.git/blobdiff_plain/b3fb0618da777d1ce58418ab36bc4321f5cf77ef..3cdd1ba5400b97412d8e69fdcf59284b7cde6e28:/keyid.c

diff --git a/keyid.c b/keyid.c
index 2bec710..0516f47 100644
--- a/keyid.c
+++ b/keyid.c
@@ -7,11 +7,15 @@
  */
 
 #include <sys/types.h>
+#include <arpa/inet.h>
 
 #include "keyid.h"
 #include "keystructs.h"
 #include "log.h"
+#include "parsekey.h"
 #include "md5.h"
+#include "mem.h"
+#include "merge.h"
 #include "sha1.h"
 
 
@@ -156,3 +160,59 @@ uint64_t get_packetid(struct openpgp_packet *packet)
 
 	return keyid;
 }
+
+static struct openpgp_packet_list *sortpackets(struct openpgp_packet_list
+							*packets)
+{
+	struct openpgp_packet_list *sorted, **cur, *next;
+
+	sorted = NULL;
+	while (packets != NULL) {
+		cur = &sorted;
+		while (*cur != NULL && compare_packets((*cur)->packet,
+				packets->packet) < 0) {
+			cur = &((*cur)->next);
+		}
+		next = *cur;
+		*cur = packets;
+		packets = packets->next;
+		(*cur)->next = next;
+	}
+
+	return sorted;
+}
+
+void get_skshash(struct openpgp_publickey *key, struct skshash *hash)
+{
+	struct openpgp_packet_list *packets = NULL, *list_end = NULL;
+	struct openpgp_packet_list *curpacket;
+	struct md5_ctx md5_context;
+	struct openpgp_publickey *next;
+	uint32_t tmp;
+
+	/*
+	 * We only want a single key, so clear any link to the next
+	 * one for the period during the flatten.
+	 */
+	next = key->next;
+	key->next = NULL;
+	flatten_publickey(key, &packets, &list_end);
+	key->next = next;
+	packets = sortpackets(packets);
+
+	md5_init_ctx(&md5_context);
+
+	for (curpacket = packets; curpacket != NULL;
+			curpacket = curpacket->next) {
+		tmp = htonl(curpacket->packet->tag);
+		md5_process_bytes(&tmp, sizeof(tmp), &md5_context);
+		tmp = htonl(curpacket->packet->length);
+		md5_process_bytes(&tmp, sizeof(tmp), &md5_context);
+		md5_process_bytes(curpacket->packet->data,
+				curpacket->packet->length,
+				&md5_context);
+	}
+
+	md5_finish_ctx(&md5_context, &hash->hash);
+	free_packet_list(packets);
+}