lib/hdb/test_hdbkeys.c

   1 /*
   2  * Copyright (c) 2005 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 #include <getarg.h>
  36 #include <base64.h>
  37
  38 static int help_flag;
  39 static int version_flag;
  40 static int kvno_integer = 1;
  41
  42 struct getargs args[] = {
  43     { "kvno",           'd',    arg_integer, &kvno_integer, NULL, NULL },
  44     { "help",           'h',    arg_flag,    &help_flag,    NULL, NULL },
  45     { "version",        0,      arg_flag,    &version_flag, NULL, NULL }
  46 };
  47
  48 static int num_args = sizeof(args) / sizeof(args[0]);
  49
  50 int
  51 main(int argc, char **argv)
  52 {
  53     krb5_principal principal;
  54     krb5_context context;
  55     char *principal_str, *password_str, *str;
  56     int ret, o = 0;
  57     hdb_keyset keyset;
  58     size_t length, len;
  59     void *data;
  60
  61     setprogname(argv[0]);
  62
  63     if(getarg(args, num_args, argc, argv, &o))
  64         krb5_std_usage(1, args, num_args);
  65
  66     if(help_flag)
  67         krb5_std_usage(0, args, num_args);
  68
  69     if(version_flag){
  70         print_version(NULL);
  71         exit(0);
  72     }
  73
  74     ret = krb5_init_context(&context);
  75     if (ret)
  76         errx (1, "krb5_init_context failed: %d", ret);
  77
  78     if (argc != 3)
  79         errx(1, "username and password missing");
  80
  81     principal_str = argv[1];
  82     password_str = argv[2];
  83
  84     ret = krb5_parse_name (context, principal_str, &principal);
  85     if (ret)
  86         krb5_err (context, 1, ret, "krb5_parse_name %s", principal_str);
  87
  88     memset(&keyset, 0, sizeof(keyset));
  89
  90     keyset.kvno = kvno_integer;
  91     keyset.set_time = malloc(sizeof (*keyset.set_time));
  92     if (keyset.set_time == NULL)
  93         errx(1, "couldn't allocate set_time field of keyset");
  94     *keyset.set_time = time(NULL);
  95
  96     ret = hdb_generate_key_set_password(context, principal, password_str,
  97                                         NULL, 0, &keyset.keys.val, &len);
  98     if (ret)
  99         krb5_err(context, 1, ret, "hdb_generate_key_set_password");
 100     keyset.keys.len = len;
 101
 102     if (keyset.keys.len == 0)
 103         krb5_errx (context, 1, "hdb_generate_key_set_password length 0");
 104
 105     krb5_free_principal (context, principal);
 106
 107     ASN1_MALLOC_ENCODE(hdb_keyset, data, length, &keyset, &len, ret);
 108     if (ret)
 109         krb5_errx(context, 1, "encode keyset");
 110     if (len != length)
 111         krb5_abortx(context, "foo");
 112
 113     krb5_free_context(context);
 114
 115     ret = base64_encode(data, length, &str);
 116     if (ret < 0)
 117         errx(1, "base64_encode");
 118
 119     printf("keyset: %s\n", str);
 120
 121     free(data);
 122
 123     return 0;
 124 }