Merge from vendor branch HEIMDAL:
[dragonfly.git] / contrib / amd / amd / info_passwd.c
1 /*
2  * Copyright (c) 1997-1999 Erez Zadok
3  * Copyright (c) 1990 Jan-Simon Pendry
4  * Copyright (c) 1990 Imperial College of Science, Technology & Medicine
5  * Copyright (c) 1990 The Regents of the University of California.
6  * All rights reserved.
7  *
8  * This code is derived from software contributed to Berkeley by
9  * Jan-Simon Pendry at Imperial College, London.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions and the following disclaimer.
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in the
18  *    documentation and/or other materials provided with the distribution.
19  * 3. All advertising materials mentioning features or use of this software
20  *    must display the following acknowledgment:
21  *      This product includes software developed by the University of
22  *      California, Berkeley and its contributors.
23  * 4. Neither the name of the University nor the names of its contributors
24  *    may be used to endorse or promote products derived from this software
25  *    without specific prior written permission.
26  *
27  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37  * SUCH DAMAGE.
38  *
39  *      %W% (Berkeley) %G%
40  *
41  * $Id: info_passwd.c,v 1.2 1999/01/10 21:53:46 ezk Exp $
42  *
43  */
44
45 /*
46  * Get info from password "file"
47  *
48  * This is experimental and probably doesn't do what you expect.
49  */
50
51 #ifdef HAVE_CONFIG_H
52 # include <config.h>
53 #endif /* HAVE_CONFIG_H */
54 #include <am_defs.h>
55 #include <amd.h>
56
57 #define PASSWD_MAP      "/etc/passwd"
58
59 /* forward declarations */
60 int passwd_init(mnt_map *m, char *map, time_t *tp);
61 int passwd_search(mnt_map *m, char *map, char *key, char **pval, time_t *tp);
62
63
64 /*
65  * Nothing to probe - check the map name is PASSWD_MAP.
66  */
67 int
68 passwd_init(mnt_map *m, char *map, time_t *tp)
69 {
70   *tp = 0;
71
72   /*
73    * Recognize the old format "PASSWD_MAP"
74    * Uses default return string
75    * "type:=nfs;rfs:=/${var0}/${var1};rhost:=${var1};sublink:=${var2};fs:=${autodir}${var3}"
76    */
77   if (STREQ(map, PASSWD_MAP))
78     return 0;
79   /*
80    * Recognize the new format "PASSWD_MAP:pval-format"
81    */
82   if (!NSTREQ(map, PASSWD_MAP, sizeof(PASSWD_MAP) - 1))
83     return ENOENT;
84   if (map[sizeof(PASSWD_MAP)-1] != ':')
85     return ENOENT;
86
87   return 0;
88 }
89
90
91 /*
92  * Grab the entry via the getpwname routine
93  * Modify time is ignored by passwd - XXX
94  */
95 int
96 passwd_search(mnt_map *m, char *map, char *key, char **pval, time_t *tp)
97 {
98   char *dir = 0;
99   struct passwd *pw;
100
101   if (STREQ(key, "/defaults")) {
102     *pval = strdup("type:=nfs");
103     return 0;
104   }
105   pw = getpwnam(key);
106
107   if (pw) {
108     /*
109      * We chop the home directory up as follows:
110      * /anydir/dom1/dom2/dom3/user
111      *
112      * and return
113      * rfs:=/anydir/dom3;rhost:=dom3.dom2.dom1;sublink:=user
114      * and now have
115      * var0:=pw-prefix:=anydir
116      * var1:=pw-rhost:=dom3.dom2.dom1
117      * var2:=pw-user:=user
118      * var3:=pw-home:=/anydir/dom1/dom2/dom3/user
119      *
120      * This allows cross-domain entries in your passwd file.
121      * ... but forget about security!
122      */
123     char *user;
124     char *p, *q;
125     char val[MAXPATHLEN];
126     char rhost[MAXHOSTNAMELEN];
127     dir = strdup(pw->pw_dir);
128
129     /*
130      * Find user name.  If no / then Invalid...
131      */
132     user = strrchr(dir, '/');
133     if (!user)
134       goto enoent;
135     *user++ = '\0';
136
137     /*
138      * Find start of host "path".  If no / then Invalid...
139      */
140     p = strchr(dir + 1, '/');
141     if (!p)
142       goto enoent;
143     *p++ = '\0';
144
145     /*
146      * At this point, p is dom1/dom2/dom3
147      * Copy, backwards, into rhost replacing
148      * / with .
149      */
150     rhost[0] = '\0';
151     do {
152       q = strrchr(p, '/');
153       if (q) {
154         strcat(rhost, q + 1);
155         strcat(rhost, ".");
156         *q = '\0';
157       } else {
158         strcat(rhost, p);
159       }
160     } while (q);
161
162     /*
163      * Sanity check
164      */
165     if (*rhost == '\0' || *user == '\0' || *dir == '\0')
166       goto enoent;
167
168     /*
169      * Make up return string
170      */
171     q = strchr(rhost, '.');
172     if (q)
173       *q = '\0';
174     p = strchr(map, ':');
175     if (p)
176       p++;
177     else
178       p = "type:=nfs;rfs:=/${var0}/${var1};rhost:=${var1};sublink:=${var2};fs:=${autodir}${var3}";
179     sprintf(val, "var0:=%s;var1:=%s;var2:=%s;var3:=%s;%s",
180             dir+1, rhost, user, pw->pw_dir, p);
181 #ifdef DEBUG
182     dlog("passwd_search: map=%s key=%s -> %s", map, key, val);
183 #endif /* DEBUG */
184     if (q)
185       *q = '.';
186     *pval = strdup(val);
187     return 0;
188   }
189
190 enoent:
191   if (dir)
192     XFREE(dir);
193
194   return ENOENT;
195 }