1 /* 2 * Copyright (c) 2000 - 2001 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 "kuser_locl.h" 35 36 RCSID("$Id: generate-requests.c,v 1.4 2001/08/24 01:07:22 assar Exp $"); 37 38 static krb5_error_code 39 null_key_proc (krb5_context context, 40 krb5_enctype type, 41 krb5_salt salt, 42 krb5_const_pointer keyseed, 43 krb5_keyblock **key) 44 { 45 return ENOTTY; 46 } 47 48 static unsigned 49 read_words (const char *filename, char ***ret_w) 50 { 51 unsigned n, alloc; 52 FILE *f; 53 char buf[256]; 54 char **w = NULL; 55 56 f = fopen (filename, "r"); 57 if (f == NULL) 58 err (1, "cannot open %s", filename); 59 alloc = n = 0; 60 while (fgets (buf, sizeof(buf), f) != NULL) { 61 if (buf[strlen (buf) - 1] == '\n') 62 buf[strlen (buf) - 1] = '\0'; 63 if (n >= alloc) { 64 alloc += 16; 65 w = erealloc (w, alloc * sizeof(char **)); 66 } 67 w[n++] = estrdup (buf); 68 } 69 *ret_w = w; 70 return n; 71 } 72 73 static void 74 generate_requests (const char *filename, unsigned nreq) 75 { 76 krb5_context context; 77 krb5_error_code ret; 78 krb5_creds cred; 79 int i; 80 char **words; 81 unsigned nwords; 82 83 ret = krb5_init_context (&context); 84 if (ret) 85 errx (1, "krb5_init_context failed: %d", ret); 86 87 nwords = read_words (filename, &words); 88 89 for (i = 0; i < nreq; ++i) { 90 char *name = words[rand() % nwords]; 91 krb5_realm *client_realm; 92 93 memset(&cred, 0, sizeof(cred)); 94 95 ret = krb5_parse_name (context, name, &cred.client); 96 if (ret) 97 krb5_err (context, 1, ret, "krb5_parse_name %s", name); 98 client_realm = krb5_princ_realm (context, cred.client); 99 100 ret = krb5_make_principal(context, &cred.server, *client_realm, 101 KRB5_TGS_NAME, *client_realm, NULL); 102 if (ret) 103 krb5_err (context, 1, ret, "krb5_make_principal"); 104 105 ret = krb5_get_in_cred (context, 0, NULL, NULL, NULL, NULL, 106 null_key_proc, NULL, NULL, NULL, 107 &cred, NULL); 108 krb5_free_creds_contents (context, &cred); 109 } 110 } 111 112 static int version_flag = 0; 113 static int help_flag = 0; 114 115 static struct getargs args[] = { 116 { "version", 0, arg_flag, &version_flag }, 117 { "help", 0, arg_flag, &help_flag } 118 }; 119 120 static void 121 usage (int ret) 122 { 123 arg_printusage (args, 124 sizeof(args)/sizeof(*args), 125 NULL, 126 "file number"); 127 exit (ret); 128 } 129 130 int 131 main(int argc, char **argv) 132 { 133 int optind = 0; 134 int nreq; 135 char *end; 136 137 setprogname(argv[0]); 138 if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optind)) 139 usage(1); 140 141 if (help_flag) 142 usage (0); 143 144 if(version_flag) { 145 print_version(NULL); 146 exit(0); 147 } 148 149 argc -= optind; 150 argv += optind; 151 152 if (argc != 2) 153 usage (1); 154 srand (0); 155 nreq = strtol (argv[1], &end, 0); 156 if (argv[1] == end || *end != '\0') 157 usage (1); 158 generate_requests (argv[0], nreq); 159 return 0; 160 } 161