2 * Copyright (c) 2000 - 2004 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
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. 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.
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
34 #include "kpasswd_locl.h"
36 RCSID("$Id: kpasswd-generator.c 19233 2006-12-06 08:04:05Z lha $");
39 read_words (const char *filename, char ***ret_w)
46 f = fopen (filename, "r");
48 err (1, "cannot open %s", filename);
50 while (fgets (buf, sizeof(buf), f) != NULL) {
51 buf[strcspn(buf, "\r\n")] = '\0';
54 w = erealloc (w, alloc * sizeof(char **));
56 w[n++] = estrdup (buf);
60 errx(1, "%s is an empty file, no words to try", filename);
65 nop_prompter (krb5_context context,
70 krb5_prompt prompts[])
76 generate_requests (const char *filename, unsigned nreq)
84 ret = krb5_init_context (&context);
86 errx (1, "krb5_init_context failed: %d", ret);
88 nwords = read_words (filename, &words);
90 for (i = 0; i < nreq; ++i) {
91 char *name = words[rand() % nwords];
92 krb5_get_init_creds_opt *opt;
94 krb5_principal principal;
96 krb5_data result_code_string, result_string;
97 char *old_pwd, *new_pwd;
99 krb5_get_init_creds_opt_alloc (context, &opt);
100 krb5_get_init_creds_opt_set_tkt_life (opt, 300);
101 krb5_get_init_creds_opt_set_forwardable (opt, FALSE);
102 krb5_get_init_creds_opt_set_proxiable (opt, FALSE);
104 ret = krb5_parse_name (context, name, &principal);
106 krb5_err (context, 1, ret, "krb5_parse_name %s", name);
108 asprintf (&old_pwd, "%s", name);
109 asprintf (&new_pwd, "%s2", name);
111 ret = krb5_get_init_creds_password (context,
120 if( ret == KRB5KRB_AP_ERR_BAD_INTEGRITY
121 || ret == KRB5KRB_AP_ERR_MODIFIED) {
128 ret = krb5_get_init_creds_password (context,
139 krb5_err (context, 1, ret, "krb5_get_init_creds_password");
141 krb5_free_principal (context, principal);
143 ret = krb5_change_password (context, &cred, new_pwd,
148 krb5_err (context, 1, ret, "krb5_change_password");
152 krb5_free_cred_contents (context, &cred);
153 krb5_get_init_creds_opt_free(context, opt);
157 static int version_flag = 0;
158 static int help_flag = 0;
160 static struct getargs args[] = {
161 { "version", 0, arg_flag, &version_flag },
162 { "help", 0, arg_flag, &help_flag }
168 arg_printusage (args,
169 sizeof(args)/sizeof(*args),
176 main(int argc, char **argv)
182 setprogname(argv[0]);
183 if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optind))
197 nreq = strtol (argv[1], &end, 0);
198 if (argv[1] == end || *end != '\0')
200 generate_requests (argv[0], nreq);