crypto/kerberosIV/lib/krb/unparse_name.c

   1 /*
   2  * Copyright (c) 1995, 1996, 1997, 1998 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 the Institute nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #include "krb_locl.h"
  35
  36 RCSID("$Id: unparse_name.c,v 1.10 1999/12/02 16:58:44 joda Exp $");
  37
  38 static void
  39 quote_string(char *quote, char *from, char *to)
  40 {
  41     while(*from){
  42         if(strchr(quote, *from))
  43             *to++ = '\\';
  44         *to++ = *from++;
  45     }
  46     *to = 0;
  47 }
  48
  49 /* To be compatible with old functions, we quote differently in each
  50    part of the principal*/
  51
  52 char *
  53 krb_unparse_name_r(krb_principal *pr, char *fullname)
  54 {
  55     quote_string("'@\\", pr->name, fullname);
  56     if(pr->instance[0]){
  57         strcat(fullname, ".");
  58         quote_string("@\\", pr->instance, fullname + strlen(fullname));
  59     }
  60     if(pr->realm[0]){
  61         strcat(fullname, "@");
  62         quote_string("\\", pr->realm, fullname + strlen(fullname));
  63     }
  64     return fullname;
  65 }
  66
  67 char *
  68 krb_unparse_name_long_r(char *name, char *instance, char *realm,
  69                         char *fullname)
  70 {
  71     krb_principal pr;
  72
  73     memset(&pr, 0, sizeof(pr));
  74     strlcpy(pr.name, name, sizeof(pr.name));
  75     if(instance)
  76         strlcpy(pr.instance, instance, sizeof(pr.instance));
  77     if(realm)
  78         strlcpy(pr.realm, realm, sizeof(pr.realm));
  79     return krb_unparse_name_r(&pr, fullname);
  80 }
  81
  82 char *
  83 krb_unparse_name(krb_principal *pr)
  84 {
  85     static char principal[MAX_K_NAME_SZ];
  86     krb_unparse_name_r(pr, principal);
  87     return principal;
  88 }
  89
  90 char *
  91 krb_unparse_name_long(char *name, char *instance, char *realm)
  92 {
  93     krb_principal pr;
  94
  95     memset(&pr, 0, sizeof(pr));
  96     strlcpy(pr.name, name, sizeof(pr.name));
  97     if(instance)
  98         strlcpy(pr.instance, instance, sizeof(pr.instance));
  99     if(realm)
 100         strlcpy(pr.realm, realm, sizeof(pr.realm));
 101     return krb_unparse_name(&pr);
 102 }