1c19800e8SDoug Rabson /* 2*ae771770SStanislav Sedov * Copyright (c) 2006 - 2008 Kungliga Tekniska Högskolan 3c19800e8SDoug Rabson * (Royal Institute of Technology, Stockholm, Sweden). 4c19800e8SDoug Rabson * All rights reserved. 5c19800e8SDoug Rabson * 6c19800e8SDoug Rabson * Redistribution and use in source and binary forms, with or without 7c19800e8SDoug Rabson * modification, are permitted provided that the following conditions 8c19800e8SDoug Rabson * are met: 9c19800e8SDoug Rabson * 10c19800e8SDoug Rabson * 1. Redistributions of source code must retain the above copyright 11c19800e8SDoug Rabson * notice, this list of conditions and the following disclaimer. 12c19800e8SDoug Rabson * 13c19800e8SDoug Rabson * 2. Redistributions in binary form must reproduce the above copyright 14c19800e8SDoug Rabson * notice, this list of conditions and the following disclaimer in the 15c19800e8SDoug Rabson * documentation and/or other materials provided with the distribution. 16c19800e8SDoug Rabson * 17c19800e8SDoug Rabson * 3. Neither the name of KTH nor the names of its contributors may be 18c19800e8SDoug Rabson * used to endorse or promote products derived from this software without 19c19800e8SDoug Rabson * specific prior written permission. 20c19800e8SDoug Rabson * 21c19800e8SDoug Rabson * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY 22c19800e8SDoug Rabson * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23c19800e8SDoug Rabson * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 24c19800e8SDoug Rabson * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE 25c19800e8SDoug Rabson * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 26c19800e8SDoug Rabson * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 27c19800e8SDoug Rabson * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 28c19800e8SDoug Rabson * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 29c19800e8SDoug Rabson * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 30c19800e8SDoug Rabson * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 31c19800e8SDoug Rabson * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32c19800e8SDoug Rabson */ 33c19800e8SDoug Rabson 34c19800e8SDoug Rabson #include "krb5/gsskrb5_locl.h" 35c19800e8SDoug Rabson #include <err.h> 36c19800e8SDoug Rabson #include "test_common.h" 37c19800e8SDoug Rabson 38c19800e8SDoug Rabson char * 39c19800e8SDoug Rabson gssapi_err(OM_uint32 maj_stat, OM_uint32 min_stat, gss_OID mech) 40c19800e8SDoug Rabson { 41c19800e8SDoug Rabson OM_uint32 disp_min_stat, disp_maj_stat; 42c19800e8SDoug Rabson gss_buffer_desc maj_error_message; 43c19800e8SDoug Rabson gss_buffer_desc min_error_message; 44c19800e8SDoug Rabson OM_uint32 msg_ctx = 0; 45c19800e8SDoug Rabson 46c19800e8SDoug Rabson char *ret = NULL; 47c19800e8SDoug Rabson 48c19800e8SDoug Rabson maj_error_message.length = 0; 49c19800e8SDoug Rabson maj_error_message.value = NULL; 50c19800e8SDoug Rabson min_error_message.length = 0; 51c19800e8SDoug Rabson min_error_message.value = NULL; 52c19800e8SDoug Rabson 53c19800e8SDoug Rabson disp_maj_stat = gss_display_status(&disp_min_stat, maj_stat, 54c19800e8SDoug Rabson GSS_C_GSS_CODE, 55c19800e8SDoug Rabson mech, &msg_ctx, &maj_error_message); 56c19800e8SDoug Rabson disp_maj_stat = gss_display_status(&disp_min_stat, min_stat, 57c19800e8SDoug Rabson GSS_C_MECH_CODE, 58c19800e8SDoug Rabson mech, &msg_ctx, &min_error_message); 59*ae771770SStanislav Sedov if (asprintf(&ret, "gss-code: %lu %.*s -- mech-code: %lu %.*s", 60c19800e8SDoug Rabson (unsigned long)maj_stat, 61c19800e8SDoug Rabson (int)maj_error_message.length, 62c19800e8SDoug Rabson (char *)maj_error_message.value, 63c19800e8SDoug Rabson (unsigned long)min_stat, 64c19800e8SDoug Rabson (int)min_error_message.length, 65*ae771770SStanislav Sedov (char *)min_error_message.value) < 0 || ret == NULL) 66*ae771770SStanislav Sedov errx(1, "malloc"); 67c19800e8SDoug Rabson 68c19800e8SDoug Rabson gss_release_buffer(&disp_min_stat, &maj_error_message); 69c19800e8SDoug Rabson gss_release_buffer(&disp_min_stat, &min_error_message); 70c19800e8SDoug Rabson 71c19800e8SDoug Rabson return ret; 72c19800e8SDoug Rabson } 73c19800e8SDoug Rabson 74