|
Packit |
fd8b60 |
/* -*- mode: c; c-basic-offset: 4; indent-tabs-mode: nil -*- */
|
|
Packit |
fd8b60 |
/* tests/s4u2proxy.c - S4U2Proxy test harness */
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
* Copyright (C) 2015 by the Massachusetts Institute of Technology.
|
|
Packit |
fd8b60 |
* All rights reserved.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* Redistribution and use in source and binary forms, with or without
|
|
Packit |
fd8b60 |
* modification, are permitted provided that the following conditions
|
|
Packit |
fd8b60 |
* are met:
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* * Redistributions of source code must retain the above copyright
|
|
Packit |
fd8b60 |
* notice, this list of conditions and the following disclaimer.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* * Redistributions in binary form must reproduce the above copyright
|
|
Packit |
fd8b60 |
* notice, this list of conditions and the following disclaimer in
|
|
Packit |
fd8b60 |
* the documentation and/or other materials provided with the
|
|
Packit |
fd8b60 |
* distribution.
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
|
Packit |
fd8b60 |
* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
|
Packit |
fd8b60 |
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
|
|
Packit |
fd8b60 |
* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
|
Packit |
fd8b60 |
* COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
|
|
Packit |
fd8b60 |
* INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
Packit |
fd8b60 |
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
|
|
Packit |
fd8b60 |
* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
Packit |
fd8b60 |
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
|
Packit |
fd8b60 |
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
Packit |
fd8b60 |
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
|
Packit |
fd8b60 |
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/*
|
|
Packit |
fd8b60 |
* Usage: s4u2proxy evccname targetname [ad-type ad-contents]
|
|
Packit |
fd8b60 |
*
|
|
Packit |
fd8b60 |
* evccname contains an evidence ticket. The default ccache contains a TGT for
|
|
Packit |
fd8b60 |
* the intermediate service. The default keytab contains a key for the
|
|
Packit |
fd8b60 |
* intermediate service. An S4U2Proxy request is made to get a ticket from
|
|
Packit |
fd8b60 |
* evccname's default principal to the target service. The resulting cred is
|
|
Packit |
fd8b60 |
* stored in the default ccache.
|
|
Packit |
fd8b60 |
*/
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
#include <k5-int.h>
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
static krb5_context ctx;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
static void
|
|
Packit |
fd8b60 |
check(krb5_error_code code)
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
const char *errmsg;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (code) {
|
|
Packit |
fd8b60 |
errmsg = krb5_get_error_message(ctx, code);
|
|
Packit |
fd8b60 |
fprintf(stderr, "%s\n", errmsg);
|
|
Packit |
fd8b60 |
krb5_free_error_message(ctx, errmsg);
|
|
Packit |
fd8b60 |
exit(1);
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
static krb5_authdata **
|
|
Packit |
fd8b60 |
make_request_authdata(int type, const char *contents)
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
krb5_authdata *ad;
|
|
Packit |
fd8b60 |
krb5_authdata **req_authdata;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
ad = malloc(sizeof(*ad));
|
|
Packit |
fd8b60 |
assert(ad != NULL);
|
|
Packit |
fd8b60 |
ad->magic = KV5M_AUTHDATA;
|
|
Packit |
fd8b60 |
ad->ad_type = type;
|
|
Packit |
fd8b60 |
ad->length = strlen(contents);
|
|
Packit |
fd8b60 |
ad->contents = (unsigned char *)strdup(contents);
|
|
Packit |
fd8b60 |
assert(ad->contents != NULL);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
req_authdata = malloc(2 * sizeof(*req_authdata));
|
|
Packit |
fd8b60 |
assert(req_authdata != NULL);
|
|
Packit |
fd8b60 |
req_authdata[0] = ad;
|
|
Packit |
fd8b60 |
req_authdata[1] = NULL;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
return req_authdata;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
int
|
|
Packit |
fd8b60 |
main(int argc, char **argv)
|
|
Packit |
fd8b60 |
{
|
|
Packit |
fd8b60 |
krb5_context context;
|
|
Packit |
fd8b60 |
krb5_ccache defcc, evcc;
|
|
Packit |
fd8b60 |
krb5_principal client_name, int_name, target_name;
|
|
Packit |
fd8b60 |
krb5_keytab defkt;
|
|
Packit |
fd8b60 |
krb5_creds mcred, ev_cred, *new_cred;
|
|
Packit |
fd8b60 |
krb5_ticket *ev_ticket;
|
|
Packit |
fd8b60 |
krb5_authdata **req_authdata = NULL;
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
if (argc == 5) {
|
|
Packit |
fd8b60 |
req_authdata = make_request_authdata(atoi(argv[3]), argv[4]);
|
|
Packit |
fd8b60 |
argc -= 2;
|
|
Packit |
fd8b60 |
}
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
assert(argc == 3);
|
|
Packit |
fd8b60 |
check(krb5_init_context(&context));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/* Open the default ccache, evidence ticket ccache, and default keytab. */
|
|
Packit |
fd8b60 |
check(krb5_cc_default(context, &defcc));
|
|
Packit |
fd8b60 |
check(krb5_cc_resolve(context, argv[1], &evcc));
|
|
Packit |
fd8b60 |
check(krb5_kt_default(context, &defkt));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/* Determine the client name, intermediate name, and target name. */
|
|
Packit |
fd8b60 |
check(krb5_cc_get_principal(context, evcc, &client_name));
|
|
Packit |
fd8b60 |
check(krb5_cc_get_principal(context, defcc, &int_name));
|
|
Packit |
fd8b60 |
check(krb5_parse_name(context, argv[2], &target_name));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/* Retrieve and decrypt the evidence ticket. */
|
|
Packit |
fd8b60 |
memset(&mcred, 0, sizeof(mcred));
|
|
Packit |
fd8b60 |
mcred.client = client_name;
|
|
Packit |
fd8b60 |
mcred.server = int_name;
|
|
Packit |
fd8b60 |
check(krb5_cc_retrieve_cred(context, evcc, 0, &mcred, &ev_cred));
|
|
Packit |
fd8b60 |
check(krb5_decode_ticket(&ev_cred.ticket, &ev_ticket));
|
|
Packit |
fd8b60 |
check(krb5_server_decrypt_ticket_keytab(context, defkt, ev_ticket));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/* Make an S4U2Proxy request for the target service. */
|
|
Packit |
fd8b60 |
mcred.client = client_name;
|
|
Packit |
fd8b60 |
mcred.server = target_name;
|
|
Packit |
fd8b60 |
mcred.authdata = req_authdata;
|
|
Packit |
fd8b60 |
check(krb5_get_credentials_for_proxy(context, KRB5_GC_NO_STORE |
|
|
Packit |
fd8b60 |
KRB5_GC_CANONICALIZE, defcc,
|
|
Packit |
fd8b60 |
&mcred, ev_ticket, &new_cred));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
/* Store the new cred in the default ccache. */
|
|
Packit |
fd8b60 |
check(krb5_cc_store_cred(context, defcc, new_cred));
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
assert(req_authdata == NULL || new_cred->authdata != NULL);
|
|
Packit |
fd8b60 |
|
|
Packit |
fd8b60 |
krb5_cc_close(context, defcc);
|
|
Packit |
fd8b60 |
krb5_cc_close(context, evcc);
|
|
Packit |
fd8b60 |
krb5_kt_close(context, defkt);
|
|
Packit |
fd8b60 |
krb5_free_principal(context, client_name);
|
|
Packit |
fd8b60 |
krb5_free_principal(context, int_name);
|
|
Packit |
fd8b60 |
krb5_free_principal(context, target_name);
|
|
Packit |
fd8b60 |
krb5_free_cred_contents(context, &ev_cred);
|
|
Packit |
fd8b60 |
krb5_free_ticket(context, ev_ticket);
|
|
Packit |
fd8b60 |
krb5_free_creds(context, new_cred);
|
|
Packit |
fd8b60 |
krb5_free_authdata(context, req_authdata);
|
|
Packit |
fd8b60 |
krb5_free_context(context);
|
|
Packit |
fd8b60 |
return 0;
|
|
Packit |
fd8b60 |
}
|