2 * Copyright (c) 1997 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
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.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by Kungliga Tekniska
20 * Högskolan and its contributors.
22 * 4. Neither the name of the Institute nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
26 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
44 hdb_principal2key(krb5_context context
, krb5_principal p
, krb5_data
*key
)
51 ret
= copy_Principal(p
, &new);
54 new.name
.name_type
= 0;
55 len
= length_Principal(&new);
61 ret
= encode_Principal(buf
+ len
- 1, len
, &new, &len
);
74 hdb_key2principal(krb5_context context
, krb5_data
*key
, krb5_principal p
)
77 return decode_Principal(key
->data
, key
->length
, p
, &len
);
81 hdb_entry2value(krb5_context context
, hdb_entry
*ent
, krb5_data
*value
)
86 len
= length_hdb_entry(ent
);
90 ret
= encode_hdb_entry(buf
+ len
- 1, len
, ent
, &len
);
101 hdb_value2entry(krb5_context context
, krb5_data
*value
, hdb_entry
*ent
)
104 return decode_hdb_entry(value
->data
, value
->length
, ent
, &len
);
108 _hdb_fetch(krb5_context context
, HDB
*db
, hdb_entry
*entry
)
110 krb5_data key
, value
;
113 hdb_principal2key(context
, entry
->principal
, &key
);
114 code
= db
->_get(context
, db
, key
, &value
);
115 krb5_data_free(&key
);
118 hdb_value2entry(context
, &value
, entry
);
119 krb5_data_free(&value
);
124 _hdb_store(krb5_context context
, HDB
*db
, int replace
, hdb_entry
*entry
)
126 krb5_data key
, value
;
129 hdb_principal2key(context
, entry
->principal
, &key
);
130 hdb_entry2value(context
, entry
, &value
);
131 code
= db
->_put(context
, db
, replace
, key
, value
);
132 krb5_data_free(&value
);
133 krb5_data_free(&key
);
138 _hdb_delete(krb5_context context
, HDB
*db
, hdb_entry
*entry
)
143 hdb_principal2key(context
, entry
->principal
, &key
);
144 code
= db
->_del(context
, db
, key
);
145 krb5_data_free(&key
);