/*
 * Copyright 2002 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 * Copyright (c) 1985, 1989 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *      This product includes software developed by the University of
 *      California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include "ftp_var.h"
#include <gssapi/gssapi.h>
#include <gssapi/gssapi_ext.h>

void
user_gss_error(OM_uint32 maj_stat, OM_uint32 min_stat, char *errstr)
{
	OM_uint32 gmaj_stat, gmin_stat;
	gss_buffer_desc msg;
	OM_uint32 msg_ctx = 0;
	int display_error = 0;

	/* Print the major status error from GSS */
	while (!msg_ctx) {
	    gmaj_stat = gss_display_status(&gmin_stat, maj_stat,
		GSS_C_GSS_CODE, GSS_C_NULL_OID, &msg_ctx, &msg);
	    if ((gmaj_stat == GSS_S_COMPLETE)||
		(gmaj_stat == GSS_S_CONTINUE_NEEDED)) {
		/* display error messages only once */
		if ((debug) || (!display_error)) {
		    (void) fprintf(stderr, "GSSAPI error major: %s\n",
			(char *)msg.value);
		    display_error = 1;
		}
		(void) gss_release_buffer(&gmin_stat, &msg);
	    }
	    if (gmaj_stat != GSS_S_CONTINUE_NEEDED)
		break;
	}

	/* Print the minor status error from the mech */
	msg_ctx = 0;
	display_error = 0;
	if (min_stat)
	    while (!msg_ctx) {
		gmaj_stat = gss_display_status(&gmin_stat, min_stat,
		    GSS_C_MECH_CODE, GSS_C_NULL_OID, &msg_ctx, &msg);
		if ((gmaj_stat == GSS_S_COMPLETE)||
		    (gmaj_stat == GSS_S_CONTINUE_NEEDED)) {
		    /* display error messages only once */
		    if ((!display_error) || (!debug)) {
			(void) fprintf(stderr, "GSSAPI error minor: %s\n",
			    (char *)msg.value);
			display_error = 1;
		    }
		    (void) gss_release_buffer(&gmin_stat, &msg);
		}
		if (gmaj_stat != GSS_S_CONTINUE_NEEDED)
			break;
	    }

	if (debug) {
	    (void) fprintf(stderr, "GSSAPI error: %s\n", errstr);
	}
}