1 /*-
2 * Copyright (c) 2009, Sun Microsystems, Inc.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are met:
7 * - Redistributions of source code must retain the above copyright notice,
8 * this list of conditions and the following disclaimer.
9 * - Redistributions in binary form must reproduce the above copyright notice,
10 * this list of conditions and the following disclaimer in the documentation
11 * and/or other materials provided with the distribution.
12 * - Neither the name of Sun Microsystems, Inc. nor the names of its
13 * contributors may be used to endorse or promote products derived
14 * from this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND 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 COPYRIGHT HOLDER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 *
28 * $FreeBSD: src/lib/libc/rpc/netname.c,v 1.8 2004/10/16 06:11:35 obrien Exp $
29 *
30 * @(#)netname.c 1.8 91/03/11 Copyr 1986 Sun Micro
31 */
32
33 /*
34 * netname utility routines
35 * convert from unix names to network names and vice-versa
36 * This module is operating system dependent!
37 * What we define here will work with any unix system that has adopted
38 * the sun NIS domain architecture.
39 */
40
41 #include "namespace.h"
42 #include <sys/param.h>
43 #include <rpc/rpc.h>
44 #include <rpc/rpc_com.h>
45 #ifdef YP
46 #include <rpcsvc/yp_prot.h>
47 #include <rpcsvc/ypclnt.h>
48 #endif
49 #include <ctype.h>
50 #include <limits.h>
51 #include <stdio.h>
52 #include <stdlib.h>
53 #include <string.h>
54 #include <unistd.h>
55 #include "un-namespace.h"
56
57 #ifndef MAXHOSTNAMELEN
58 #define MAXHOSTNAMELEN 256
59 #endif
60 #ifndef NGROUPS
61 #define NGROUPS 16
62 #endif
63
64 #define TYPE_BIT(type) (sizeof (type) * CHAR_BIT)
65
66 /*
67 ** 302 / 1000 is log10(2.0) rounded up.
68 ** Subtract one for the sign bit if the type is signed;
69 ** add one for integer division truncation;
70 ** add one more for a minus sign if the type is signed.
71 */
72 #define U_INT_STRLEN_MAXIMUM(type) \
73 (TYPE_BIT(type) * 302 / 1000 + 1)
74 #define S_INT_STRLEN_MAXIMUM(type) \
75 ((TYPE_BIT(type) - 1) * 302 / 1000 + 1 + 1)
76
77 static char *OPSYS = "unix";
78
79 /*
80 * Figure out my fully qualified network name
81 */
82 int
getnetname(char * name)83 getnetname(char *name)
84 {
85 uid_t uid;
86
87 uid = geteuid();
88 if (uid == 0) {
89 return (host2netname(name, NULL, NULL));
90 } else {
91 return (user2netname(name, uid, NULL));
92 }
93 }
94
95
96 /*
97 * Convert unix cred to network-name
98 */
99 int
user2netname(char * netname,const uid_t uid,const char * domain)100 user2netname(char *netname, const uid_t uid, const char *domain)
101 {
102 char *dfltdom;
103
104 if (domain == NULL) {
105 if (__rpc_get_default_domain(&dfltdom) != 0) {
106 return (0);
107 }
108 domain = dfltdom;
109 }
110 if (strlen(domain) + 1 + U_INT_STRLEN_MAXIMUM(u_long) + 1 + strlen(OPSYS) > MAXNETNAMELEN) {
111 return (0);
112 }
113 sprintf(netname, "%s.%ld@%s", OPSYS, (u_long)uid, domain);
114 return (1);
115 }
116
117
118 /*
119 * Convert host to network-name
120 */
121 int
host2netname(char * netname,const char * host,const char * domain)122 host2netname(char *netname, const char *host, const char *domain)
123 {
124 char *dfltdom;
125 char hostname[MAXHOSTNAMELEN+1];
126
127 if (domain == NULL) {
128 if (__rpc_get_default_domain(&dfltdom) != 0) {
129 return (0);
130 }
131 domain = dfltdom;
132 }
133 if (host == NULL) {
134 gethostname(hostname, sizeof(hostname));
135 host = hostname;
136 }
137 if (strlen(domain) + 1 + strlen(host) + 1 + strlen(OPSYS) > MAXNETNAMELEN) {
138 return (0);
139 }
140 sprintf(netname, "%s.%s@%s", OPSYS, host, domain);
141 return (1);
142 }
143