1*ebfedea0SLionel Sambuc /* $NetBSD: test_hdbkeys.c,v 1.1.1.1 2011/04/13 18:14:42 elric Exp $ */
2*ebfedea0SLionel Sambuc
3*ebfedea0SLionel Sambuc /*
4*ebfedea0SLionel Sambuc * Copyright (c) 2005 Kungliga Tekniska Högskolan
5*ebfedea0SLionel Sambuc * (Royal Institute of Technology, Stockholm, Sweden).
6*ebfedea0SLionel Sambuc * All rights reserved.
7*ebfedea0SLionel Sambuc *
8*ebfedea0SLionel Sambuc * Redistribution and use in source and binary forms, with or without
9*ebfedea0SLionel Sambuc * modification, are permitted provided that the following conditions
10*ebfedea0SLionel Sambuc * are met:
11*ebfedea0SLionel Sambuc *
12*ebfedea0SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
13*ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer.
14*ebfedea0SLionel Sambuc *
15*ebfedea0SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16*ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
17*ebfedea0SLionel Sambuc * documentation and/or other materials provided with the distribution.
18*ebfedea0SLionel Sambuc *
19*ebfedea0SLionel Sambuc * 3. Neither the name of the Institute nor the names of its contributors
20*ebfedea0SLionel Sambuc * may be used to endorse or promote products derived from this software
21*ebfedea0SLionel Sambuc * without specific prior written permission.
22*ebfedea0SLionel Sambuc *
23*ebfedea0SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24*ebfedea0SLionel Sambuc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25*ebfedea0SLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26*ebfedea0SLionel Sambuc * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27*ebfedea0SLionel Sambuc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28*ebfedea0SLionel Sambuc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29*ebfedea0SLionel Sambuc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30*ebfedea0SLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31*ebfedea0SLionel Sambuc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32*ebfedea0SLionel Sambuc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33*ebfedea0SLionel Sambuc * SUCH DAMAGE.
34*ebfedea0SLionel Sambuc */
35*ebfedea0SLionel Sambuc
36*ebfedea0SLionel Sambuc #include "hdb_locl.h"
37*ebfedea0SLionel Sambuc #include <krb5/getarg.h>
38*ebfedea0SLionel Sambuc #include <krb5/base64.h>
39*ebfedea0SLionel Sambuc
40*ebfedea0SLionel Sambuc static int help_flag;
41*ebfedea0SLionel Sambuc static int version_flag;
42*ebfedea0SLionel Sambuc static int kvno_integer = 1;
43*ebfedea0SLionel Sambuc
44*ebfedea0SLionel Sambuc struct getargs args[] = {
45*ebfedea0SLionel Sambuc { "kvno", 'd', arg_integer, &kvno_integer },
46*ebfedea0SLionel Sambuc { "help", 'h', arg_flag, &help_flag },
47*ebfedea0SLionel Sambuc { "version", 0, arg_flag, &version_flag }
48*ebfedea0SLionel Sambuc };
49*ebfedea0SLionel Sambuc
50*ebfedea0SLionel Sambuc static int num_args = sizeof(args) / sizeof(args[0]);
51*ebfedea0SLionel Sambuc
52*ebfedea0SLionel Sambuc int
main(int argc,char ** argv)53*ebfedea0SLionel Sambuc main(int argc, char **argv)
54*ebfedea0SLionel Sambuc {
55*ebfedea0SLionel Sambuc krb5_principal principal;
56*ebfedea0SLionel Sambuc krb5_context context;
57*ebfedea0SLionel Sambuc char *principal_str, *password_str, *str;
58*ebfedea0SLionel Sambuc int ret, o = 0;
59*ebfedea0SLionel Sambuc hdb_keyset keyset;
60*ebfedea0SLionel Sambuc size_t length, len;
61*ebfedea0SLionel Sambuc void *data;
62*ebfedea0SLionel Sambuc
63*ebfedea0SLionel Sambuc setprogname(argv[0]);
64*ebfedea0SLionel Sambuc
65*ebfedea0SLionel Sambuc if(getarg(args, num_args, argc, argv, &o))
66*ebfedea0SLionel Sambuc krb5_std_usage(1, args, num_args);
67*ebfedea0SLionel Sambuc
68*ebfedea0SLionel Sambuc if(help_flag)
69*ebfedea0SLionel Sambuc krb5_std_usage(0, args, num_args);
70*ebfedea0SLionel Sambuc
71*ebfedea0SLionel Sambuc if(version_flag){
72*ebfedea0SLionel Sambuc print_version(NULL);
73*ebfedea0SLionel Sambuc exit(0);
74*ebfedea0SLionel Sambuc }
75*ebfedea0SLionel Sambuc
76*ebfedea0SLionel Sambuc ret = krb5_init_context(&context);
77*ebfedea0SLionel Sambuc if (ret)
78*ebfedea0SLionel Sambuc errx (1, "krb5_init_context failed: %d", ret);
79*ebfedea0SLionel Sambuc
80*ebfedea0SLionel Sambuc if (argc != 3)
81*ebfedea0SLionel Sambuc errx(1, "username and password missing");
82*ebfedea0SLionel Sambuc
83*ebfedea0SLionel Sambuc principal_str = argv[1];
84*ebfedea0SLionel Sambuc password_str = argv[2];
85*ebfedea0SLionel Sambuc
86*ebfedea0SLionel Sambuc ret = krb5_parse_name (context, principal_str, &principal);
87*ebfedea0SLionel Sambuc if (ret)
88*ebfedea0SLionel Sambuc krb5_err (context, 1, ret, "krb5_parse_name %s", principal_str);
89*ebfedea0SLionel Sambuc
90*ebfedea0SLionel Sambuc memset(&keyset, 0, sizeof(keyset));
91*ebfedea0SLionel Sambuc
92*ebfedea0SLionel Sambuc keyset.kvno = kvno_integer;
93*ebfedea0SLionel Sambuc
94*ebfedea0SLionel Sambuc ret = hdb_generate_key_set_password(context, principal, password_str,
95*ebfedea0SLionel Sambuc &keyset.keys.val, &len);
96*ebfedea0SLionel Sambuc if (ret)
97*ebfedea0SLionel Sambuc krb5_err(context, 1, ret, "hdb_generate_key_set_password");
98*ebfedea0SLionel Sambuc keyset.keys.len = len;
99*ebfedea0SLionel Sambuc
100*ebfedea0SLionel Sambuc if (keyset.keys.len == 0)
101*ebfedea0SLionel Sambuc krb5_errx (context, 1, "hdb_generate_key_set_password length 0");
102*ebfedea0SLionel Sambuc
103*ebfedea0SLionel Sambuc krb5_free_principal (context, principal);
104*ebfedea0SLionel Sambuc
105*ebfedea0SLionel Sambuc ASN1_MALLOC_ENCODE(hdb_keyset, data, length, &keyset, &len, ret);
106*ebfedea0SLionel Sambuc if (ret)
107*ebfedea0SLionel Sambuc krb5_errx(context, 1, "encode keyset");
108*ebfedea0SLionel Sambuc if (len != length)
109*ebfedea0SLionel Sambuc krb5_abortx(context, "foo");
110*ebfedea0SLionel Sambuc
111*ebfedea0SLionel Sambuc krb5_free_context(context);
112*ebfedea0SLionel Sambuc
113*ebfedea0SLionel Sambuc ret = base64_encode(data, length, &str);
114*ebfedea0SLionel Sambuc if (ret < 0)
115*ebfedea0SLionel Sambuc errx(1, "base64_encode");
116*ebfedea0SLionel Sambuc
117*ebfedea0SLionel Sambuc printf("keyset: %s\n", str);
118*ebfedea0SLionel Sambuc
119*ebfedea0SLionel Sambuc free(data);
120*ebfedea0SLionel Sambuc
121*ebfedea0SLionel Sambuc return 0;
122*ebfedea0SLionel Sambuc }
123