third_party/heimdal/lib/gssapi/mech/gss_export_name.c

   1 /*-
   2  * Copyright (c) 2005 Doug Rabson
   3  * All rights reserved.
   4  *
   5  * Portions Copyright (c) 2010 Apple Inc. All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  *      $FreeBSD: src/lib/libgssapi/gss_export_name.c,v 1.1 2005/12/29 14:40:20 dfr Exp $
  29  */
  30
  31 #include "mech_locl.h"
  32
  33 /**
  34  * Convert a GGS-API name from internal form to contiguous string.
  35  *
  36  * @sa gss_import_name(), @ref internalVSmechname.
  37  *
  38  * @param minor_status   minor status code
  39  * @param input_name     input name in internal name form
  40  * @param exported_name  output name in contiguos string form
  41  *
  42  * @returns a gss_error code, see gss_display_status() about printing
  43  *        the error code.
  44  *
  45  * @ingroup gssapi
  46  */
  47 GSSAPI_LIB_FUNCTION OM_uint32 GSSAPI_LIB_CALL
  48 gss_export_name(OM_uint32 *minor_status,
  49     gss_const_name_t input_name,
  50     gss_buffer_t exported_name)
  51 {
  52         struct _gss_name *name = (struct _gss_name *) input_name;
  53         struct _gss_mechanism_name *mn;
  54
  55         _mg_buffer_zero(exported_name);
  56
  57         /*
  58          * If this name already has any attached MNs, export the first
  59          * one, otherwise export based on the first mechanism in our
  60          * list.
  61          */
  62         mn = HEIM_TAILQ_FIRST(&name->gn_mn);
  63         if (!mn) {
  64                 *minor_status = 0;
  65                 return (GSS_S_NAME_NOT_MN);
  66         }
  67
  68         return mn->gmn_mech->gm_export_name(minor_status,
  69             mn->gmn_name, exported_name);
  70 }
  71
  72 OM_uint32
  73 gss_mg_export_name(OM_uint32 *minor_status,
  74                    const gss_const_OID mech,
  75                    const void *name,
  76                    size_t length,
  77                    gss_buffer_t exported_name)
  78 {
  79     uint8_t *buf;
  80
  81     exported_name->length = 10 + length + mech->length;
  82     exported_name->value  = malloc(exported_name->length);
  83     if (exported_name->value == NULL) {
  84         *minor_status = ENOMEM;
  85         return GSS_S_FAILURE;
  86     }
  87
  88     /* TOK, MECH_OID_LEN, DER(MECH_OID), NAME_LEN, NAME */
  89
  90     buf = exported_name->value;
  91     memcpy(buf, "\x04\x01", 2);
  92     buf += 2;
  93     buf[0] = ((mech->length + 2) >> 8) & 0xff;
  94     buf[1] = (mech->length + 2) & 0xff;
  95     buf+= 2;
  96     buf[0] = 0x06;
  97     buf[1] = (mech->length) & 0xFF;
  98     buf+= 2;
  99
 100     memcpy(buf, mech->elements, mech->length);
 101     buf += mech->length;
 102
 103     buf[0] = (length >> 24) & 0xff;
 104     buf[1] = (length >> 16) & 0xff;
 105     buf[2] = (length >> 8) & 0xff;
 106     buf[3] = (length) & 0xff;
 107     buf += 4;
 108
 109     memcpy (buf, name, length);
 110
 111     *minor_status = 0;
 112     return GSS_S_COMPLETE;
 113 }