/*
* stats.c - various routines to do stats on the key graph
*
- * Jonathan McDowell <noodles@earth.li>
+ * Copyright 2000-2004,2007-2009 Jonathan McDowell <noodles@earth.li>
*
- * Copyright 2000-2002 Project Purple
+ * This program is free software: you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the Free
+ * Software Foundation; version 2 of the License.
+ *
+ * This program is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
+ * more details.
+ *
+ * You should have received a copy of the GNU General Public License along with
+ * this program; if not, write to the Free Software Foundation, Inc., 51
+ * Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#include <stdio.h>
#include <stdlib.h>
+#include "cleanup.h"
+#include "getcgi.h"
#include "hash.h"
#include "keydb.h"
#include "ll.h"
+#include "onak-conf.h"
#include "stats.h"
/**
*/
void initcolour(bool parent)
{
- unsigned long loop;
+ unsigned int loop;
struct ll *curkey;
/*
unsigned long findpath(struct stats_key *have, struct stats_key *want)
{
struct ll *keys = NULL;
+ struct ll *oldkeys = NULL;
struct ll *sigs = NULL;
struct ll *nextkeys = NULL;
long curdegree = 0;
- long count = 0;
+ unsigned long count = 0;
curdegree = 1;
keys = lladd(NULL, want);
+ oldkeys = keys;
- while (keys != NULL && have->colour == 0) {
- sigs = hash_getkeysigs(((struct stats_key *)
+ while ((!cleanup()) && keys != NULL && have->colour == 0) {
+ sigs = config.dbbackend->cached_getkeysigs(((struct stats_key *)
keys->object)->keyid);
- while (sigs != NULL && have->colour == 0) {
+ while ((!cleanup()) && sigs != NULL && have->colour == 0) {
/*
* Check if we've seen this key before and if not mark
* it and add its sigs to the list we want to look at.
*/
- if (((struct stats_key *)sigs->object)->colour == 0) {
+ if (!((struct stats_key *)sigs->object)->disabled &&
+ !((struct stats_key *)sigs->object)->revoked &&
+ ((struct stats_key *)sigs->object)->colour == 0) {
count++;
((struct stats_key *)sigs->object)->colour =
curdegree;
keys = keys->next;
if (keys == NULL) {
keys = nextkeys;
+ llfree(oldkeys, NULL);
+ oldkeys = keys;
nextkeys = NULL;
curdegree++;
}
- fprintf(stderr, "Hash contains %ld keys.\n", hashelements());
+ }
+ if (oldkeys != NULL) {
+ llfree(oldkeys, NULL);
+ oldkeys = NULL;
+ }
+ if (nextkeys != NULL) {
+ llfree(nextkeys, NULL);
+ nextkeys = NULL;
}
return count;
}
+/**
+ * dofindpath - Given 2 keys displays a path between them.
+ * @have: The key we have.
+ * @want: The key we want to get to.
+ * @html: Should we output in html.
+ * @count: How many paths we should look for.
+ *
+ * This does a breadth first search on the key tree, starting with the
+ * key we have. It returns as soon as a path is found or when we run out
+ * of keys; whichever comes sooner.
+ */
+void dofindpath(uint64_t have, uint64_t want, bool html, int count)
+{
+ struct stats_key *keyinfoa, *keyinfob, *curkey;
+ uint64_t fullhave, fullwant;
+ int rec;
+ int pathnum;
+ char *uid;
+
+ fullhave = config.dbbackend->getfullkeyid(have);
+ fullwant = config.dbbackend->getfullkeyid(want);
+
+ /*
+ * Make sure the keys we have and want are in the cache.
+ */
+ (void) config.dbbackend->cached_getkeysigs(fullhave);
+ (void) config.dbbackend->cached_getkeysigs(fullwant);
+
+ if ((keyinfoa = findinhash(fullhave)) == NULL) {
+ printf("Couldn't find key 0x%016" PRIX64 ".\n", have);
+ return;
+ }
+ if ((keyinfob = findinhash(fullwant)) == NULL) {
+ printf("Couldn't find key 0x%016" PRIX64 ".\n", want);
+ return;
+ }
+
+ pathnum = 0;
+
+ while ((!cleanup()) && (pathnum < count)) {
+ /*
+ * Fill the tree info up.
+ */
+ initcolour(true);
+ rec = findpath(keyinfoa, keyinfob);
+ keyinfob->parent = 0;
+
+ printf("%s%d nodes examined. %ld elements in the hash%s\n",
+ html ? "<HR>" : "",
+ rec,
+ hashelements(),
+ html ? "<BR>" : "");
+ if (keyinfoa->colour == 0) {
+ if (pathnum == 0) {
+ printf("Can't find a link from 0x%08" PRIX64
+ " to 0x%08" PRIX64 "%s\n",
+ have,
+ want,
+ html ? "<BR>" : "");
+ } else {
+ printf("Can't find any further paths%s\n",
+ html ? "<BR>" : "");
+ }
+ pathnum = count;
+ } else {
+ printf("%d steps from 0x%08" PRIX64 " to 0x%08" PRIX64
+ "%s\n",
+ keyinfoa->colour, have & 0xFFFFFFFF,
+ want & 0xFFFFFFFF,
+ html ? "<BR>" : "");
+ curkey = keyinfoa;
+ while (curkey != NULL && curkey->keyid != 0) {
+ uid = config.dbbackend->keyid2uid(
+ curkey->keyid);
+ if (html && uid == NULL) {
+ printf("<a href=\"lookup?op=get&search="
+ "0x%08" PRIX64 "\">0x%08" PRIX64
+ "</a> (["
+ "User id not found])%s<BR>\n",
+ curkey->keyid & 0xFFFFFFFF,
+ curkey->keyid & 0xFFFFFFFF,
+ (curkey->keyid == fullwant) ?
+ "" : " signs");
+ } else if (html && uid != NULL) {
+ printf("<a href=\"lookup?op=get&search="
+ "0x%08" PRIX64 "\">0x%08"
+ PRIX64 "</a>"
+ " (<a href=\"lookup?op=vindex&"
+ "search=0x%08" PRIX64
+ "\">%s</a>)%s"
+ "<BR>\n",
+ curkey->keyid & 0xFFFFFFFF,
+ curkey->keyid & 0xFFFFFFFF,
+ curkey->keyid & 0xFFFFFFFF,
+ txt2html(uid),
+ (curkey->keyid == fullwant) ?
+ "" : " signs");
+ } else {
+ printf("0x%08" PRIX64 " (%s)%s\n",
+ curkey->keyid & 0xFFFFFFFF,
+ (uid == NULL) ?
+ "[User id not found]" :
+ uid,
+ (curkey->keyid == fullwant) ?
+ "" : " signs");
+ }
+ if (uid != NULL) {
+ free(uid);
+ uid = NULL;
+ }
+ if (curkey != keyinfoa && curkey != keyinfob) {
+ curkey->disabled = true;
+ }
+ curkey = findinhash(curkey->parent);
+ }
+ if (html) {
+ puts("<P>List of key ids in path:</P>");
+ } else {
+ puts("List of key ids in path:");
+ }
+ curkey = keyinfoa;
+ while (curkey != NULL && curkey->keyid != 0) {
+ printf("0x%08" PRIX64 " ",
+ curkey->keyid & 0xFFFFFFFF);
+ curkey = findinhash(curkey->parent);
+ }
+ putchar('\n');
+ }
+ pathnum++;
+ }
+}
+
+
+
struct stats_key *furthestkey(struct stats_key *have)
{
unsigned long count = 0;
curll = lladd(NULL, have);
while (curll != NULL) {
- sigs = hash_getkeysigs(((struct stats_key *)
+ sigs = config.dbbackend->cached_getkeysigs(((struct stats_key *)
curll->object)->keyid);
while (sigs != NULL) {
if (((struct stats_key *) sigs->object)->colour == 0) {