int
main (int argc, char **argv)
{
rtbl_t table;
table = rtbl_create ();
rtbl_add_column_by_id (table, 0, "Issued", 0);
rtbl_add_column_by_id (table, 1, "Expires", 0);
rtbl_add_column_by_id (table, 2, "Foo", RTBL_ALIGN_RIGHT);
rtbl_add_column_by_id (table, 3, "Principal", 0);
rtbl_add_column_entry_by_id (table, 0, "Jul 7 21:19:29");
rtbl_add_column_entry_by_id (table, 1, "Jul 8 07:19:29");
rtbl_add_column_entry_by_id (table, 2, "73");
rtbl_add_column_entry_by_id (table, 2, "0");
rtbl_add_column_entry_by_id (table, 2, "-2000");
rtbl_add_column_entry_by_id (table, 3, "krbtgt/[email protected]");
rtbl_add_column_entry_by_id (table, 0, "Jul 7 21:19:29");
rtbl_add_column_entry_by_id (table, 1, "Jul 8 07:19:29");
rtbl_add_column_entry_by_id (table, 3, "afs/[email protected]");
rtbl_add_column_entry_by_id (table, 0, "Jul 7 21:19:29");
rtbl_add_column_entry_by_id (table, 1, "Jul 8 07:19:29");
rtbl_add_column_entry_by_id (table, 3, "*****@*****.**");
rtbl_set_separator (table, " ");
rtbl_format (table, stdout);
rtbl_destroy (table);
printf("\n");
table = rtbl_create ();
rtbl_add_column_by_id (table, 0, "Column A", 0);
rtbl_set_column_affix_by_id (table, 0, "<", ">");
rtbl_add_column_by_id (table, 1, "Column B", 0);
rtbl_set_column_affix_by_id (table, 1, "[", "]");
rtbl_add_column_by_id (table, 2, "Column C", 0);
rtbl_set_column_affix_by_id (table, 2, "(", ")");
rtbl_add_column_entry_by_id (table, 0, "1");
rtbl_new_row(table);
rtbl_add_column_entry_by_id (table, 1, "2");
rtbl_new_row(table);
rtbl_add_column_entry_by_id (table, 2, "3");
rtbl_new_row(table);
rtbl_set_separator (table, " ");
rtbl_format (table, stdout);
rtbl_destroy (table);
return 0;
}
static int
add_column(struct get_entry_data *data, struct field_name *ff, const char *header)
{
struct field_info *f = malloc(sizeof(*f));
if (f == NULL)
return ENOMEM;
f->ff = ff;
if(header)
f->header = strdup(header);
else
f->header = NULL;
f->next = NULL;
*data->ctail = f;
data->ctail = &f->next;
data->mask |= ff->fieldvalue;
data->extra_mask |= ff->extra_mask;
if(data->table != NULL)
rtbl_add_column_by_id(data->table, ff->fieldvalue,
header ? header : ff->default_header, ff->flags);
return 0;
}
int
kswitch(struct kswitch_options *opt, int argc, char **argv)
{
krb5_error_code ret;
krb5_ccache id = NULL;
if (opt->cache_string && opt->principal_string)
krb5_errx(kcc_context, 1,
N_("Both --cache and --principal given, choose one", ""));
if (opt->interactive_flag) {
krb5_cc_cache_cursor cursor;
krb5_ccache *ids = NULL;
size_t i, len = 0;
char *name;
rtbl_t ct;
ct = rtbl_create();
rtbl_add_column_by_id(ct, 0, "#", 0);
rtbl_add_column_by_id(ct, 1, "Principal", 0);
rtbl_set_column_affix_by_id(ct, 1, " ", "");
rtbl_add_column_by_id(ct, 2, "Type", 0);
rtbl_set_column_affix_by_id(ct, 2, " ", "");
ret = krb5_cc_cache_get_first(kcc_context, NULL, &cursor);
if (ret)
krb5_err(kcc_context, 1, ret, "krb5_cc_cache_get_first");
while (krb5_cc_cache_next(kcc_context, cursor, &id) == 0) {
krb5_principal p;
char num[10];
ret = krb5_cc_get_principal(kcc_context, id, &p);
if (ret)
continue;
ret = krb5_unparse_name(kcc_context, p, &name);
krb5_free_principal(kcc_context, p);
snprintf(num, sizeof(num), "%d", (int)(len + 1));
rtbl_add_column_entry_by_id(ct, 0, num);
rtbl_add_column_entry_by_id(ct, 1, name);
rtbl_add_column_entry_by_id(ct, 2, krb5_cc_get_type(kcc_context, id));
free(name);
ids = erealloc(ids, (len + 1) * sizeof(ids[0]));
ids[len] = id;
len++;
}
krb5_cc_cache_end_seq_get(kcc_context, cursor);
rtbl_format(ct, stdout);
rtbl_destroy(ct);
name = readline("Select number: ");
if (name) {
i = atoi(name);
if (i == 0)
krb5_errx(kcc_context, 1, "Cache number '%s' is invalid", name);
if (i > len)
krb5_errx(kcc_context, 1, "Cache number '%s' is too large", name);
id = ids[i - 1];
ids[i - 1] = NULL;
} else
krb5_errx(kcc_context, 1, "No cache selected");
for (i = 0; i < len; i++)
if (ids[i])
krb5_cc_close(kcc_context, ids[i]);
} else if (opt->principal_string) {
krb5_principal p;
ret = krb5_parse_name(kcc_context, opt->principal_string, &p);
if (ret)
krb5_err(kcc_context, 1, ret, "krb5_parse_name: %s",
opt->principal_string);
ret = krb5_cc_cache_match(kcc_context, p, &id);
if (ret)
krb5_err(kcc_context, 1, ret,
N_("Did not find principal: %s", ""),
opt->principal_string);
krb5_free_principal(kcc_context, p);
} else if (opt->cache_string) {
const krb5_cc_ops *ops;
char *str;
ops = krb5_cc_get_prefix_ops(kcc_context, opt->type_string);
if (ops == NULL)
krb5_err(kcc_context, 1, 0, "krb5_cc_get_prefix_ops");
asprintf(&str, "%s:%s", ops->prefix, opt->cache_string);
if (str == NULL)
krb5_errx(kcc_context, 1, N_("out of memory", ""));
ret = krb5_cc_resolve(kcc_context, str, &id);
if (ret)
krb5_err(kcc_context, 1, ret, "krb5_cc_resolve: %s", str);
free(str);
} else {
krb5_errx(kcc_context, 1, "missing option for kswitch");
}
ret = krb5_cc_switch(kcc_context, id);
if (ret)
krb5_err(kcc_context, 1, ret, "krb5_cc_switch");
return 0;
}
ROKEN_LIB_FUNCTION int ROKEN_LIB_CALL
rtbl_add_column (rtbl_t table, const char *header, unsigned int flags)
{
return rtbl_add_column_by_id(table, 0, header, flags);
}
static int
do_list(struct list_options *opt, const char *keytab_str)
{
krb5_error_code ret;
krb5_keytab keytab;
krb5_keytab_entry entry;
krb5_kt_cursor cursor;
rtbl_t table;
/* XXX specialcase the ANY type */
if(strncasecmp(keytab_str, "ANY:", 4) == 0) {
int flag = 0;
char buf[1024];
keytab_str += 4;
ret = 0;
while (strsep_copy((const char**)&keytab_str, ",",
buf, sizeof(buf)) != -1) {
if(flag)
printf("\n");
if(do_list(opt, buf))
ret = 1;
flag = 1;
}
return ret;
}
ret = krb5_kt_resolve(context, keytab_str, &keytab);
if (ret) {
krb5_warn(context, ret, "resolving keytab %s", keytab_str);
return ret;
}
ret = krb5_kt_start_seq_get(context, keytab, &cursor);
if(ret) {
krb5_warn(context, ret, "krb5_kt_start_seq_get %s", keytab_str);
krb5_kt_close(context, keytab);
return ret;
}
printf ("%s:\n\n", keytab_str);
table = rtbl_create();
rtbl_add_column_by_id(table, 0, "Vno", RTBL_ALIGN_RIGHT);
rtbl_add_column_by_id(table, 1, "Type", 0);
rtbl_add_column_by_id(table, 2, "Principal", 0);
if (opt->timestamp_flag)
rtbl_add_column_by_id(table, 3, "Date", 0);
if(opt->keys_flag)
rtbl_add_column_by_id(table, 4, "Key", 0);
rtbl_set_separator(table, " ");
while((ret = krb5_kt_next_entry(context, keytab, &entry, &cursor)) == 0){
char buf[1024], *s;
snprintf(buf, sizeof(buf), "%d", entry.vno);
rtbl_add_column_entry_by_id(table, 0, buf);
ret = krb5_enctype_to_string(context,
entry.keyblock.keytype, &s);
if (ret != 0) {
snprintf(buf, sizeof(buf), "unknown (%d)", entry.keyblock.keytype);
rtbl_add_column_entry_by_id(table, 1, buf);
} else {
rtbl_add_column_entry_by_id(table, 1, s);
free(s);
}
krb5_unparse_name_fixed(context, entry.principal, buf, sizeof(buf));
rtbl_add_column_entry_by_id(table, 2, buf);
if (opt->timestamp_flag) {
krb5_format_time(context, entry.timestamp, buf,
sizeof(buf), FALSE);
rtbl_add_column_entry_by_id(table, 3, buf);
}
if(opt->keys_flag) {
int i;
s = malloc(2 * entry.keyblock.keyvalue.length + 1);
if (s == NULL) {
krb5_warnx(context, "malloc failed");
ret = ENOMEM;
goto out;
}
for(i = 0; i < entry.keyblock.keyvalue.length; i++)
snprintf(s + 2 * i, 3, "%02x",
((unsigned char*)entry.keyblock.keyvalue.data)[i]);
rtbl_add_column_entry_by_id(table, 4, s);
free(s);
}
krb5_kt_free_entry(context, &entry);
}
ret = krb5_kt_end_seq_get(context, keytab, &cursor);
rtbl_format(table, stdout);
out:
rtbl_destroy(table);
krb5_kt_close(context, keytab);
return ret;
}
