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