crypto/heimdal-0.6.3/admin/ktutil.c

   1 /*
   2  * Copyright (c) 1997 - 2002 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 "ktutil_locl.h"
  35 #include <err.h>
  36
  37 RCSID("$Id: ktutil.c,v 1.36 2002/02/11 14:14:11 joda Exp $");
  38
  39 static int help_flag;
  40 static int version_flag;
  41 int verbose_flag;
  42 char *keytab_string;
  43 static char keytab_buf[256];
  44
  45 static int help(int argc, char **argv);
  46
  47 static SL_cmd cmds[] = {
  48     { "add",            kt_add,         "add",
  49       "adds key to keytab" },
  50     { "change",         kt_change,      "change [principal...]",
  51       "get new key for principals (all)" },
  52     { "copy",           kt_copy,        "copy src dst",
  53       "copy one keytab to another" },
  54     { "get",            kt_get,         "get [principal...]",
  55       "create key in database and add to keytab" },
  56     { "list",           kt_list,        "list",
  57       "shows contents of a keytab" },
  58     { "purge",          kt_purge,       "purge",
  59       "remove old and superceeded entries" },
  60     { "remove",         kt_remove,      "remove",
  61       "remove key from keytab" },
  62     { "rename",         kt_rename,      "rename from to",
  63       "rename entry" },
  64     { "srvconvert",     srvconv,        "srvconvert [flags]",
  65       "convert v4 srvtab to keytab" },
  66     { "srv2keytab" },
  67     { "srvcreate",      srvcreate,      "srvcreate [flags]",
  68       "convert keytab to v4 srvtab" },
  69     { "key2srvtab" },
  70     { "help",           help,           "help",                 "" },
  71     { NULL,     NULL,           NULL,                   NULL }
  72 };
  73
  74 static struct getargs args[] = {
  75     {
  76         "version",
  77         0,
  78         arg_flag,
  79         &version_flag,
  80         NULL,
  81         NULL
  82     },
  83     {
  84         "help",
  85         'h',
  86         arg_flag,
  87         &help_flag,
  88         NULL,
  89         NULL
  90     },
  91     {
  92         "keytab",
  93         'k',
  94         arg_string,
  95         &keytab_string,
  96         "keytab",
  97         "keytab to operate on"
  98     },
  99     {
 100         "verbose",
 101         'v',
 102         arg_flag,
 103         &verbose_flag,
 104         "verbose",
 105         "run verbosely"
 106     }
 107 };
 108
 109 static int num_args = sizeof(args) / sizeof(args[0]);
 110
 111 krb5_context context;
 112
 113 krb5_keytab
 114 ktutil_open_keytab(void)
 115 {
 116     krb5_error_code ret;
 117     krb5_keytab keytab;
 118     if (keytab_string == NULL) {
 119         ret = krb5_kt_default_name (context, keytab_buf, sizeof(keytab_buf));
 120         if (ret) {
 121             krb5_warn(context, ret, "krb5_kt_default_name");
 122             return NULL;
 123         }
 124         keytab_string = keytab_buf;
 125     }
 126     ret = krb5_kt_resolve(context, keytab_string, &keytab);
 127     if (ret) {
 128         krb5_warn(context, ret, "resolving keytab %s", keytab_string);
 129         return NULL;
 130     }
 131     if (verbose_flag)
 132         fprintf (stderr, "Using keytab %s\n", keytab_string);
 133
 134     return keytab;
 135 }
 136
 137 static int
 138 help(int argc, char **argv)
 139 {
 140     sl_help(cmds, argc, argv);
 141     return 0;
 142 }
 143
 144 static void
 145 usage(int status)
 146 {
 147     arg_printusage(args, num_args, NULL, "command");
 148     exit(status);
 149 }
 150
 151 int
 152 main(int argc, char **argv)
 153 {
 154     int optind = 0;
 155     krb5_error_code ret;
 156     setprogname(argv[0]);
 157     ret = krb5_init_context(&context);
 158     if (ret)
 159         errx (1, "krb5_init_context failed: %d", ret);
 160     if(getarg(args, num_args, argc, argv, &optind))
 161         usage(1);
 162     if(help_flag)
 163         usage(0);
 164     if(version_flag) {
 165         print_version(NULL);
 166         exit(0);
 167     }
 168     argc -= optind;
 169     argv += optind;
 170     if(argc == 0)
 171         usage(1);
 172     ret = sl_command(cmds, argc, argv);
 173     if(ret == -1)
 174         krb5_warnx (context, "unrecognized command: %s", argv[0]);
 175     return ret;
 176 }