xref: /dragonfly/lib/libc/rpc/netname.c (revision 3d33658b)
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
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
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
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