1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
/*
* $Source$
* $Author$
*
* Copyright 1989,1990,1991 by the Massachusetts Institute of Technology.
* All Rights Reserved.
*
* Export of this software from the United States of America is assumed
* to require a specific license from the United States Government.
* It is the responsibility of any person or organization contemplating
* export to obtain such a license before exporting.
*
* WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
* distribute this software and its documentation for any purpose and
* without fee is hereby granted, provided that the above copyright
* notice appear in all copies and that both that copyright notice and
* this permission notice appear in supporting documentation, and that
* the name of M.I.T. not be used in advertising or publicity pertaining
* to distribution of the software without specific, written prior
* permission. M.I.T. makes no representations about the suitability of
* this software for any purpose. It is provided "as is" without express
* or implied warranty.
*
*
* Glue between Kerberos version and ISODE 6.0 version of structures.
*/
#if !defined(lint) && !defined(SABER)
static char rcsid_kprin2prin_c[] =
"$Id$";
#endif /* lint || saber */
#include <krb5/krb5.h>
/*#include <time.h> */
#include <isode/psap.h>
#include <krb5/asn1.h>
#include "asn1glue.h"
#include <krb5/ext-proto.h>
/* ISODE defines max(a,b) */
struct type_KRB5_PrincipalName *
krb5_principal2KRB5_PrincipalName(val, error)
krb5_const_principal val;
register int *error;
{
register struct type_KRB5_PrincipalName *retval = 0;
register struct element_KRB5_6 *namestring = 0, *rv1 = 0, *rv2;
register int i;
int nelem = krb5_princ_size(val);
retval = (struct type_KRB5_PrincipalName *) xmalloc(sizeof(*retval));
if (!retval) {
*error = ENOMEM;
return(0);
}
retval->name__type = krb5_princ_type(val);
/* still skipping realm */
for (i = 0; i < nelem; i++, rv1 = rv2) {
rv2 = (struct element_KRB5_6 *) xmalloc(sizeof(*rv2));
if (!rv2) {
if (retval)
free_KRB5_PrincipalName(retval);
*error = ENOMEM;
return(0);
}
if (rv1)
rv1->next = rv2;
xbzero((char *)rv2, sizeof (*rv2));
if (!namestring)
namestring = rv2;
rv2->GeneralString = krb5_data2qbuf(krb5_princ_component(val, i));
if (!rv2->GeneralString) {
/* clean up */
if (retval)
free_KRB5_PrincipalName(retval);
*error = ENOMEM;
return(0);
}
}
retval->name__string = namestring;
return(retval);
}
|
