This commit was manufactured by cvs2svn to create tag
[heimdal.git] / kadmin / mod.c
bloba678742f0717a2201ab101a592cc252d827e12f7
1 /*
2 * Copyright (c) 1997, 1998, 1999 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
4 * All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
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
36 * SUCH DAMAGE.
39 #include "kadmin_locl.h"
41 RCSID("$Id$");
43 int
44 mod_entry(int argc, char **argv)
46 kadm5_principal_ent_rec princ;
47 int mask = 0;
48 krb5_error_code ret;
49 krb5_principal princ_ent = NULL;
51 if (argc != 2) {
52 printf ("Usage: mod principal\n");
53 return 0;
56 krb5_parse_name(context, argv[1], &princ_ent);
58 memset(&princ, 0, sizeof(princ));
59 ret = kadm5_get_principal(kadm_handle, princ_ent, &princ,
60 KADM5_PRINCIPAL | KADM5_ATTRIBUTES |
61 KADM5_MAX_LIFE | KADM5_MAX_RLIFE);
62 if (ret) {
63 printf ("no such principal: %s\n", argv[1]);
64 krb5_free_principal (context, princ_ent);
65 return 0;
68 edit_entry(&princ, &mask);
70 ret = kadm5_modify_principal(kadm_handle, &princ, mask);
71 if(ret)
72 krb5_warn(context, ret, "kadm5_modify_principal");
73 if(princ_ent)
74 krb5_free_principal(context, princ_ent);
75 kadm5_free_principal_ent(kadm_handle, &princ);
76 return 0;