xref: /illumos-gate/usr/src/lib/gss_mechs/mech_krb5/krb5/os/port2ip.c (revision 355b4669e025ff377602b6fc7caaf30dbc218371)
1 #pragma ident	"%Z%%M%	%I%	%E% SMI"
2 /*
3  * lib/krb5/os/port2ip.c
4  *
5  * Copyright 1991 by the Massachusetts Institute of Technology.
6  * All Rights Reserved.
7  *
8  * Export of this software from the United States of America may
9  *   require a specific license from the United States Government.
10  *   It is the responsibility of any person or organization contemplating
11  *   export to obtain such a license before exporting.
12  *
13  * WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
14  * distribute this software and its documentation for any purpose and
15  * without fee is hereby granted, provided that the above copyright
16  * notice appear in all copies and that both that copyright notice and
17  * this permission notice appear in supporting documentation, and that
18  * the name of M.I.T. not be used in advertising or publicity pertaining
19  * to distribution of the software without specific, written prior
20  * permission.  Furthermore if you modify this software you must label
21  * your software as modified software and not distribute it in such a
22  * fashion that it might be confused with the original M.I.T. software.
23  * M.I.T. makes no representations about the suitability of
24  * this software for any purpose.  It is provided "as is" without express
25  * or implied warranty.
26  *
27  *
28  * Take an ADDRPORT address and split into IP addr & port.
29  */
30 
31 #define NEED_SOCKETS
32 #include <k5-int.h>
33 
34 #ifdef HAVE_NETINET_IN_H
35 #include "os-proto.h"
36 
37 /*ARGSUSED*/
38 krb5_error_code
39 krb5_unpack_full_ipaddr(krb5_context context, const krb5_address *inaddr, krb5_int32 *adr, krb5_int16 *port)
40 {
41     unsigned long smushaddr;
42     unsigned short smushport;
43     register krb5_octet *marshal;
44     krb5_addrtype temptype;
45     krb5_ui_4 templength;
46 
47     if (inaddr->addrtype != ADDRTYPE_ADDRPORT)
48 	return KRB5_PROG_ATYPE_NOSUPP;
49 
50     if (inaddr->length != sizeof(smushaddr)+ sizeof(smushport) +
51 	2*sizeof(temptype) + 2*sizeof(templength))
52 	return KRB5_PROG_ATYPE_NOSUPP;
53 
54     marshal = inaddr->contents;
55 
56     (void) memcpy((char *)&temptype, (char *)marshal, sizeof(temptype));
57     marshal += sizeof(temptype);
58     if (temptype != htons(ADDRTYPE_INET))
59 	return KRB5_PROG_ATYPE_NOSUPP;
60 
61     (void) memcpy((char *)&templength, (char *)marshal, sizeof(templength));
62     marshal += sizeof(templength);
63     if (templength != htonl(sizeof(smushaddr)))
64 	return KRB5_PROG_ATYPE_NOSUPP;
65 
66     (void) memcpy((char *)&smushaddr, (char *)marshal, sizeof(smushaddr));
67     /* leave in net order */
68     marshal += sizeof(smushaddr);
69 
70     (void) memcpy((char *)&temptype, (char *)marshal, sizeof(temptype));
71     marshal += sizeof(temptype);
72     if (temptype != htons(ADDRTYPE_IPPORT))
73 	return KRB5_PROG_ATYPE_NOSUPP;
74 
75     (void) memcpy((char *)&templength, (char *)marshal, sizeof(templength));
76     marshal += sizeof(templength);
77     if (templength != htonl(sizeof(smushport)))
78 	return KRB5_PROG_ATYPE_NOSUPP;
79 
80     (void) memcpy((char *)&smushport, (char *)marshal, sizeof(smushport));
81     /* leave in net order */
82 
83     *adr = (krb5_int32) smushaddr;
84     *port = (krb5_int16) smushport;
85     return 0;
86 }
87 #endif
88