xref: /freebsd/crypto/heimdal/lib/gssapi/test_common.c (revision 02e9120893770924227138ba49df1edb3896112a)
1 /*
2  * Copyright (c) 2006 - 2008 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 KTH nor the names of its contributors may be
18  *    used to endorse or promote products derived from this software without
19  *    specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
22  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #include "krb5/gsskrb5_locl.h"
35 #include <err.h>
36 #include "test_common.h"
37 
38 char *
39 gssapi_err(OM_uint32 maj_stat, OM_uint32 min_stat, gss_OID mech)
40 {
41 	OM_uint32 disp_min_stat, disp_maj_stat;
42 	gss_buffer_desc maj_error_message;
43 	gss_buffer_desc min_error_message;
44 	OM_uint32 msg_ctx = 0;
45 
46 	char *ret = NULL;
47 
48 	maj_error_message.length = 0;
49 	maj_error_message.value = NULL;
50 	min_error_message.length = 0;
51 	min_error_message.value = NULL;
52 
53 	disp_maj_stat = gss_display_status(&disp_min_stat, maj_stat,
54 					   GSS_C_GSS_CODE,
55 					   mech, &msg_ctx, &maj_error_message);
56 	disp_maj_stat = gss_display_status(&disp_min_stat, min_stat,
57 					   GSS_C_MECH_CODE,
58 					   mech, &msg_ctx, &min_error_message);
59 	if (asprintf(&ret, "gss-code: %lu %.*s -- mech-code: %lu %.*s",
60 		     (unsigned long)maj_stat,
61 		     (int)maj_error_message.length,
62 		     (char *)maj_error_message.value,
63 		     (unsigned long)min_stat,
64 		     (int)min_error_message.length,
65 		     (char *)min_error_message.value) < 0 || ret == NULL)
66 	    errx(1, "malloc");
67 
68 	gss_release_buffer(&disp_min_stat, &maj_error_message);
69 	gss_release_buffer(&disp_min_stat, &min_error_message);
70 
71 	return ret;
72 }
73 
74