X-Git-Url: https://the.earth.li/gitweb/?a=blobdiff_plain;f=keydb_fs.c;h=0bf922f1475a419781226b33dc22e154e4234c63;hb=fd9ca85878543771a7f09afd821a5a5511e71aea;hp=9e072bab0f240e9205668c03769032711627e2a6;hpb=8e0907be1d73011075a99a0c029c56664e12843e;p=onak.git
diff --git a/keydb_fs.c b/keydb_fs.c
index 9e072ba..0bf922f 100644
--- a/keydb_fs.c
+++ b/keydb_fs.c
@@ -13,8 +13,7 @@
* 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.
+ * this program. If not, see .
*/
#include
@@ -22,6 +21,8 @@
#include
#include
#include
+#include
+#include
#include
#include
#include
@@ -36,6 +37,7 @@
#include "keystructs.h"
#include "ll.h"
#include "mem.h"
+#include "onak.h"
#include "onak-conf.h"
#include "parsekey.h"
#include "log.h"
@@ -72,41 +74,43 @@ static uint32_t calchash(uint8_t * ptr)
}
-static void keypath(char *buffer, size_t length, uint64_t _keyid)
+static void keypath(char *buffer, size_t length, uint64_t _keyid,
+ char *basepath)
{
uint64_t keyid = _keyid << 32;
snprintf(buffer, length, "%s/key/%02X/%02X/%08X/%016" PRIX64,
- config.db_dir, (uint8_t) ((keyid >> 56) & 0xFF),
+ basepath, (uint8_t) ((keyid >> 56) & 0xFF),
(uint8_t) ((keyid >> 48) & 0xFF),
(uint32_t) (keyid >> 32), _keyid);
}
-static void keydir(char *buffer, size_t length, uint64_t _keyid)
+static void keydir(char *buffer, size_t length, uint64_t _keyid,
+ char *basepath)
{
uint64_t keyid = _keyid << 32;
- snprintf(buffer, length, "%s/key/%02X/%02X/%08X", config.db_dir,
+ snprintf(buffer, length, "%s/key/%02X/%02X/%08X", basepath,
(uint8_t) ((keyid >> 56) & 0xFF),
(uint8_t) ((keyid >> 48) & 0xFF),
(uint32_t) (keyid >> 32));
}
-static void prove_path_to(uint64_t keyid, char *what)
+static void prove_path_to(uint64_t keyid, char *what, char *basepath)
{
static char buffer[PATH_MAX];
- snprintf(buffer, sizeof(buffer), "%s/%s", config.db_dir, what);
+ snprintf(buffer, sizeof(buffer), "%s/%s", basepath, what);
mkdir(buffer, 0777);
- snprintf(buffer, sizeof(buffer), "%s/%s/%02X", config.db_dir, what,
+ snprintf(buffer, sizeof(buffer), "%s/%s/%02X", basepath, what,
(uint8_t) ((keyid >> 24) & 0xFF));
mkdir(buffer, 0777);
- snprintf(buffer, sizeof(buffer), "%s/%s/%02X/%02X", config.db_dir,
+ snprintf(buffer, sizeof(buffer), "%s/%s/%02X/%02X", basepath,
what,
(uint8_t) ((keyid >> 24) & 0xFF),
(uint8_t) ((keyid >> 16) & 0xFF));
mkdir(buffer, 0777);
- snprintf(buffer, sizeof(buffer), "%s/%s/%02X/%02X/%08X", config.db_dir,
+ snprintf(buffer, sizeof(buffer), "%s/%s/%02X/%02X/%08X", basepath,
what,
(uint8_t) ((keyid >> 24) & 0xFF),
(uint8_t) ((keyid >> 16) & 0xFF), (uint32_t) (keyid));
@@ -114,37 +118,48 @@ static void prove_path_to(uint64_t keyid, char *what)
}
static void wordpath(char *buffer, size_t length, char *word, uint32_t hash,
- uint64_t keyid)
+ uint64_t keyid, char *basepath)
{
snprintf(buffer, length, "%s/words/%02X/%02X/%08X/%s/%016" PRIX64,
- config.db_dir, (uint8_t) ((hash >> 24) & 0xFF),
+ basepath, (uint8_t) ((hash >> 24) & 0xFF),
(uint8_t) ((hash >> 16) & 0xFF), hash, word, keyid);
}
-static void worddir(char *buffer, size_t length, char *word, uint32_t hash)
+static void worddir(char *buffer, size_t length, char *word, uint32_t hash,
+ char *basepath)
{
- snprintf(buffer, length, "%s/words/%02X/%02X/%08X/%s", config.db_dir,
+ snprintf(buffer, length, "%s/words/%02X/%02X/%08X/%s", basepath,
(uint8_t) ((hash >> 24) & 0xFF),
(uint8_t) ((hash >> 16) & 0xFF), hash, word);
}
static void subkeypath(char *buffer, size_t length, uint64_t subkey,
- uint64_t keyid)
+ char *basepath)
{
snprintf(buffer, length, "%s/subkeys/%02X/%02X/%08X/%016" PRIX64,
- config.db_dir,
+ basepath,
(uint8_t) ((subkey >> 24) & 0xFF),
(uint8_t) ((subkey >> 16) & 0xFF),
(uint32_t) (subkey & 0xFFFFFFFF),
- keyid);
+ subkey);
+}
+
+static void subkeydir(char *buffer, size_t length, uint64_t subkey,
+ char *basepath)
+{
+ snprintf(buffer, length, "%s/subkeys/%02X/%02X/%08X",
+ basepath,
+ (uint8_t) ((subkey >> 24) & 0xFF),
+ (uint8_t) ((subkey >> 16) & 0xFF),
+ (uint32_t) (subkey & 0xFFFFFFFF));
}
static void skshashpath(char *buffer, size_t length,
- const struct skshash *hash)
+ const struct skshash *hash, char *basepath)
{
snprintf(buffer, length, "%s/skshash/%02X/%02X/%02X%02X%02X%02X/"
"%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X",
- config.db_dir,
+ basepath,
hash->hash[0], hash->hash[1],
hash->hash[0], hash->hash[1], hash->hash[2], hash->hash[3],
hash->hash[4], hash->hash[5], hash->hash[6], hash->hash[7],
@@ -152,14 +167,6 @@ static void skshashpath(char *buffer, size_t length,
hash->hash[12], hash->hash[13], hash->hash[14],
hash->hash[15]);
}
-static void subkeydir(char *buffer, size_t length, uint64_t subkey)
-{
- snprintf(buffer, length, "%s/subkeys/%02X/%02X/%08X",
- config.db_dir,
- (uint8_t) ((subkey >> 24) & 0xFF),
- (uint8_t) ((subkey >> 16) & 0xFF),
- (uint32_t) (subkey & 0xFFFFFFFF));
-}
/*****************************************************************************/
@@ -207,7 +214,7 @@ static uint64_t fs_getfullkeyid(struct onak_dbctx *dbctx, uint64_t keyid)
struct dirent *de = NULL;
uint64_t ret = 0;
- keydir(buffer, sizeof(buffer), keyid);
+ keydir(buffer, sizeof(buffer), keyid, dbctx->config->location);
d = opendir(buffer);
if (d) {
@@ -221,7 +228,8 @@ static uint64_t fs_getfullkeyid(struct onak_dbctx *dbctx, uint64_t keyid)
}
if (ret == 0) {
- subkeydir(buffer, sizeof(buffer), keyid);
+ subkeydir(buffer, sizeof(buffer), keyid,
+ dbctx->config->location);
d = opendir(buffer);
if (d) {
@@ -259,8 +267,15 @@ static int fs_fetch_key_id(struct onak_dbctx *dbctx,
if ((keyid >> 32) == 0)
keyid = fs_getfullkeyid(dbctx, keyid);
- keypath(buffer, sizeof(buffer), keyid);
- if ((fd = open(buffer, O_RDONLY)) != -1) {
+ keypath(buffer, sizeof(buffer), keyid, dbctx->config->location);
+ fd = open(buffer, O_RDONLY);
+ if (fd == -1 && errno == ENOENT) {
+ subkeypath(buffer, sizeof(buffer), keyid,
+ dbctx->config->location);
+ fd = open(buffer, O_RDONLY);
+ }
+
+ if (fd != -1) {
/* File is present, load it in... */
read_openpgp_stream(file_fetchchar, &fd, &packets, 0);
parse_keys(packets, publickey);
@@ -294,7 +309,7 @@ static int fs_store_key(struct onak_dbctx *dbctx,
uint64_t keyid;
struct ll *wordlist = NULL, *wl = NULL;
struct skshash hash;
- uint64_t *subkeyids = NULL;
+ struct openpgp_fingerprint *subkeyids = NULL;
uint32_t hashid;
int i = 0;
@@ -306,8 +321,8 @@ static int fs_store_key(struct onak_dbctx *dbctx,
if (!intrans)
fs_starttrans(dbctx);
- prove_path_to(keyid, "key");
- keypath(buffer, sizeof(buffer), keyid);
+ prove_path_to(keyid, "key", dbctx->config->location);
+ keypath(buffer, sizeof(buffer), keyid, dbctx->config->location);
if ((fd =
open(buffer, O_WRONLY | (update ? O_TRUNC : O_CREAT),
@@ -328,12 +343,13 @@ static int fs_store_key(struct onak_dbctx *dbctx,
wl = wordlist = makewordlistfromkey(wordlist, publickey);
while (wl) {
uint32_t hash = calchash((uint8_t *) (wl->object));
- prove_path_to(hash, "words");
+ prove_path_to(hash, "words", dbctx->config->location);
- worddir(wbuffer, sizeof(wbuffer), wl->object, hash);
+ worddir(wbuffer, sizeof(wbuffer), wl->object, hash,
+ dbctx->config->location);
mkdir(wbuffer, 0777);
wordpath(wbuffer, sizeof(wbuffer), wl->object, hash,
- keyid);
+ keyid, dbctx->config->location);
link(buffer, wbuffer);
wl = wl->next;
@@ -342,13 +358,17 @@ static int fs_store_key(struct onak_dbctx *dbctx,
subkeyids = keysubkeys(publickey);
i = 0;
- while (subkeyids != NULL && subkeyids[i] != 0) {
- prove_path_to(subkeyids[i], "subkeys");
+ while (subkeyids != NULL && subkeyids[i].length != 0) {
+ keyid = fingerprint2keyid(&subkeyids[i]);
+
+ prove_path_to(keyid, "subkeys",
+ dbctx->config->location);
- subkeydir(wbuffer, sizeof(wbuffer), subkeyids[i]);
+ subkeydir(wbuffer, sizeof(wbuffer), keyid,
+ dbctx->config->location);
mkdir(wbuffer, 0777);
- subkeypath(wbuffer, sizeof(wbuffer), subkeyids[i],
- keyid);
+ subkeypath(wbuffer, sizeof(wbuffer), keyid,
+ dbctx->config->location);
link(buffer, wbuffer);
i++;
@@ -361,8 +381,9 @@ static int fs_store_key(struct onak_dbctx *dbctx,
get_skshash(publickey, &hash);
hashid = (hash.hash[0] << 24) + (hash.hash[1] << 16) +
(hash.hash[2] << 8) + hash.hash[3];
- prove_path_to(hashid, "skshash");
- skshashpath(wbuffer, sizeof(wbuffer), &hash);
+ prove_path_to(hashid, "skshash", dbctx->config->location);
+ skshashpath(wbuffer, sizeof(wbuffer), &hash,
+ dbctx->config->location);
link(buffer, wbuffer);
}
@@ -383,7 +404,8 @@ static int fs_delete_key(struct onak_dbctx *dbctx, uint64_t keyid, bool intrans)
struct openpgp_publickey *pk = NULL;
struct skshash hash;
struct ll *wordlist = NULL, *wl = NULL;
- uint64_t *subkeyids = NULL;
+ struct openpgp_fingerprint *subkeyids = NULL;
+ uint64_t subkeyid;
int i = 0;
if ((keyid >> 32) == 0)
@@ -402,10 +424,10 @@ static int fs_delete_key(struct onak_dbctx *dbctx, uint64_t keyid, bool intrans)
"Wordlist for key %016" PRIX64 " done", keyid);
while (wl) {
uint32_t hash = calchash((uint8_t *) (wl->object));
- prove_path_to(hash, "words");
+ prove_path_to(hash, "words", dbctx->config->location);
wordpath(buffer, sizeof(buffer), wl->object, hash,
- keyid);
+ keyid, dbctx->config->location);
unlink(buffer);
wl = wl->next;
@@ -413,11 +435,13 @@ static int fs_delete_key(struct onak_dbctx *dbctx, uint64_t keyid, bool intrans)
subkeyids = keysubkeys(pk);
i = 0;
- while (subkeyids != NULL && subkeyids[i] != 0) {
- prove_path_to(subkeyids[i], "subkeys");
+ while (subkeyids != NULL && subkeyids[i].length != 0) {
+ subkeyid = fingerprint2keyid(&subkeyids[i]);
+ prove_path_to(subkeyid, "subkeys",
+ dbctx->config->location);
- subkeypath(buffer, sizeof(buffer), subkeyids[i],
- keyid);
+ subkeypath(buffer, sizeof(buffer), subkeyid,
+ dbctx->config->location);
unlink(buffer);
i++;
@@ -428,11 +452,12 @@ static int fs_delete_key(struct onak_dbctx *dbctx, uint64_t keyid, bool intrans)
}
get_skshash(pk, &hash);
- skshashpath(buffer, sizeof(buffer), &hash);
+ skshashpath(buffer, sizeof(buffer), &hash,
+ dbctx->config->location);
unlink(buffer);
}
- keypath(buffer, sizeof(buffer), keyid);
+ keypath(buffer, sizeof(buffer), keyid, dbctx->config->location);
unlink(buffer);
if (!intrans)
@@ -440,7 +465,8 @@ static int fs_delete_key(struct onak_dbctx *dbctx, uint64_t keyid, bool intrans)
return 1;
}
-static struct ll *internal_get_key_by_word(char *word, struct ll *mct)
+static struct ll *internal_get_key_by_word(char *word, struct ll *mct,
+ char *basepath)
{
struct ll *keys = NULL;
DIR *d = NULL;
@@ -448,11 +474,11 @@ static struct ll *internal_get_key_by_word(char *word, struct ll *mct)
uint32_t hash = calchash((uint8_t *) (word));
struct dirent *de;
- worddir(buffer, sizeof(buffer), word, hash);
+ worddir(buffer, sizeof(buffer), word, hash, basepath);
d = opendir(buffer);
logthing(LOGTHING_DEBUG, "Scanning for word %s in dir %s", word,
buffer);
- if (d)
+ if (d) {
do {
de = readdir(d);
if (de && de->d_name[0] != '.') {
@@ -470,7 +496,8 @@ static struct ll *internal_get_key_by_word(char *word, struct ll *mct)
}
}
} while (de);
- closedir(d);
+ closedir(d);
+ }
return keys;
}
@@ -494,7 +521,8 @@ static int fs_fetch_key_text(struct onak_dbctx *dbctx,
searchtext = strdup(search);
wl = wordlist = makewordlist(wordlist, searchtext);
- keylist = internal_get_key_by_word(wordlist->object, NULL);
+ keylist = internal_get_key_by_word(wordlist->object, NULL,
+ dbctx->config->location);
if (!keylist) {
llfree(wordlist, NULL);
@@ -506,7 +534,8 @@ static int fs_fetch_key_text(struct onak_dbctx *dbctx,
wl = wl->next;
while (wl) {
struct ll *nkl =
- internal_get_key_by_word(wl->object, keylist);
+ internal_get_key_by_word(wl->object, keylist,
+ dbctx->config->location);
if (!nkl) {
llfree(wordlist, NULL);
llfree(keylist, free);
@@ -555,7 +584,7 @@ static int fs_fetch_key_skshash(struct onak_dbctx *dbctx,
int ret = 0, fd;
struct openpgp_packet_list *packets = NULL;
- skshashpath(buffer, sizeof(buffer), hash);
+ skshashpath(buffer, sizeof(buffer), hash, dbctx->config->location);
if ((fd = open(buffer, O_RDONLY)) != -1) {
read_openpgp_stream(file_fetchchar, &fd, &packets, 0);
parse_keys(packets, publickey);
@@ -609,7 +638,7 @@ static void fs_cleanupdb(struct onak_dbctx *dbctx)
/**
* initdb - Initialize the key database.
*/
-struct onak_dbctx *keydb_fs_init(bool readonly)
+struct onak_dbctx *keydb_fs_init(struct onak_db_config *dbcfg, bool readonly)
{
char buffer[PATH_MAX];
struct onak_dbctx *dbctx;
@@ -619,6 +648,7 @@ struct onak_dbctx *keydb_fs_init(bool readonly)
if (dbctx == NULL) {
return NULL;
}
+ dbctx->config = dbcfg;
dbctx->priv = privctx = malloc(sizeof(*privctx));
if (privctx == NULL) {
free(dbctx);
@@ -627,23 +657,30 @@ struct onak_dbctx *keydb_fs_init(bool readonly)
privctx->lockfile_readonly = readonly;
- snprintf(buffer, sizeof(buffer), "%s/.lock", config.db_dir);
+ snprintf(buffer, sizeof(buffer), "%s/.lock", dbcfg->location);
- if (access(config.db_dir, R_OK | W_OK | X_OK) == -1) {
+ if (access(dbcfg->location, R_OK | W_OK | X_OK) == -1) {
if (errno != ENOENT) {
logthing(LOGTHING_CRITICAL,
"Unable to access keydb_fs root of '%s'. (%s)",
- config.db_dir, strerror(errno));
+ dbcfg->location, strerror(errno));
exit(1); /* Lacking rwx on the key dir */
}
- mkdir(config.db_dir, 0777);
+ mkdir(dbcfg->location, 0777);
privctx->lockfile_fd = open(buffer, O_RDWR | O_CREAT, 0600);
}
- chdir(config.db_dir);
- if (privctx->lockfile_fd == -1)
- privctx->lockfile_fd = open(buffer,
- (privctx->lockfile_readonly) ?
- O_RDONLY : O_RDWR);
+ if (chdir(dbcfg->location) == -1) {
+ /* Shouldn't happen after the above */
+ logthing(LOGTHING_CRITICAL,
+ "Couldn't change to database directory: %s",
+ strerror(errno));
+ free(dbctx->priv);
+ free(dbctx);
+ return NULL;
+ }
+ privctx->lockfile_fd = open(buffer,
+ (privctx->lockfile_readonly) ?
+ O_RDONLY : O_RDWR);
if (privctx->lockfile_fd == -1)
privctx->lockfile_fd = open(buffer, O_RDWR | O_CREAT, 0600);
if (privctx->lockfile_fd == -1) {