1 /* 2 * Copyright (c) 1997-1999 Kungliga Tekniska H�gskolan 3 * (Royal Institute of Technology, Stockholm, Sweden). 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * 3. Neither the name of the Institute nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #include "hdb_locl.h" 35 36 RCSID("$Id: common.c,v 1.6 1999/12/02 17:05:04 joda Exp $"); 37 38 int 39 hdb_principal2key(krb5_context context, krb5_principal p, krb5_data *key) 40 { 41 Principal new; 42 size_t len; 43 unsigned char *buf; 44 int ret; 45 46 ret = copy_Principal(p, &new); 47 if(ret) 48 goto out; 49 new.name.name_type = 0; 50 len = length_Principal(&new); 51 buf = malloc(len); 52 if(buf == NULL){ 53 ret = ENOMEM; 54 goto out; 55 } 56 ret = encode_Principal(buf + len - 1, len, &new, &len); 57 if(ret){ 58 free(buf); 59 goto out; 60 } 61 key->data = buf; 62 key->length = len; 63 out: 64 free_Principal(&new); 65 return ret; 66 } 67 68 int 69 hdb_key2principal(krb5_context context, krb5_data *key, krb5_principal p) 70 { 71 return decode_Principal(key->data, key->length, p, NULL); 72 } 73 74 int 75 hdb_entry2value(krb5_context context, hdb_entry *ent, krb5_data *value) 76 { 77 unsigned char *buf; 78 size_t len; 79 int ret; 80 81 len = length_hdb_entry(ent); 82 buf = malloc(len); 83 if(buf == NULL) 84 return ENOMEM; 85 ret = encode_hdb_entry(buf + len - 1, len, ent, &len); 86 if(ret){ 87 free(buf); 88 return ret; 89 } 90 value->data = buf; 91 value->length = len; 92 return 0; 93 } 94 95 int 96 hdb_value2entry(krb5_context context, krb5_data *value, hdb_entry *ent) 97 { 98 return decode_hdb_entry(value->data, value->length, ent, NULL); 99 } 100 101 krb5_error_code 102 _hdb_fetch(krb5_context context, HDB *db, unsigned flags, hdb_entry *entry) 103 { 104 krb5_data key, value; 105 int code; 106 107 hdb_principal2key(context, entry->principal, &key); 108 code = db->_get(context, db, key, &value); 109 krb5_data_free(&key); 110 if(code) 111 return code; 112 hdb_value2entry(context, &value, entry); 113 if (db->master_key_set && (flags & HDB_F_DECRYPT)) 114 hdb_unseal_keys (db, entry); 115 krb5_data_free(&value); 116 return 0; 117 } 118 119 krb5_error_code 120 _hdb_store(krb5_context context, HDB *db, unsigned flags, hdb_entry *entry) 121 { 122 krb5_data key, value; 123 int code; 124 125 hdb_principal2key(context, entry->principal, &key); 126 hdb_seal_keys(db, entry); 127 hdb_entry2value(context, entry, &value); 128 code = db->_put(context, db, flags & HDB_F_REPLACE, key, value); 129 krb5_data_free(&value); 130 krb5_data_free(&key); 131 return code; 132 } 133 134 krb5_error_code 135 _hdb_remove(krb5_context context, HDB *db, hdb_entry *entry) 136 { 137 krb5_data key; 138 int code; 139 140 hdb_principal2key(context, entry->principal, &key); 141 code = db->_del(context, db, key); 142 krb5_data_free(&key); 143 return code; 144 } 145 146