2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Jeremy Allison 1997-2001.
6 Copyright (C) Volker Lendecke 2006
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 /*******************************************************************
25 Map a username from a dos name to a unix name by looking in the username
26 map. Note that this modifies the name in place.
27 This is the main function that should be called *once* on
28 any incoming or new username - in order to canonicalize the name.
29 This is being done to de-couple the case conversions from the user mapping
30 function. Previously, the map_username was being called
31 every time Get_Pwnam_alloc was called.
32 Returns True if username was changed, false otherwise.
33 ********************************************************************/
35 static char *last_from = NULL;
36 static char *last_to = NULL;
38 static const char *get_last_from(void)
46 static const char *get_last_to(void)
54 static bool set_last_from_to(const char *from, const char *to)
56 char *orig_from = last_from;
57 char *orig_to = last_to;
59 last_from = SMB_STRDUP(from);
60 last_to = SMB_STRDUP(to);
65 if (!last_from || !last_to) {
73 static char *skip_space(char *s)
75 while (isspace((int)(*s))) {
81 static bool fetch_map_from_gencache(TALLOC_CTX *ctx,
88 if (lp_username_map_cache_time() == 0) {
92 key = talloc_asprintf_strupper_m(ctx, "USERNAME_MAP/%s",
97 found = gencache_get(key, &value, NULL);
102 TALLOC_FREE(*p_user_out);
103 *p_user_out = talloc_strdup(ctx, value);
110 static void store_map_in_gencache(TALLOC_CTX *ctx, const char *from, const char *to)
113 int cache_time = lp_username_map_cache_time();
115 if (cache_time == 0) {
119 key = talloc_asprintf_strupper_m(ctx, "USERNAME_MAP/%s",
124 gencache_set(key, to, cache_time + time(NULL));
128 /****************************************************************************
129 Check if a user is in a netgroup user list. If at first we don't succeed,
131 ****************************************************************************/
133 bool user_in_netgroup(TALLOC_CTX *ctx, const char *user, const char *ngname)
136 static char *my_yp_domain = NULL;
137 char *lowercase_user = NULL;
139 if (my_yp_domain == NULL) {
140 yp_get_default_domain(&my_yp_domain);
143 if (my_yp_domain == NULL) {
144 DEBUG(5,("Unable to get default yp domain, "
145 "let's try without specifying it\n"));
148 DEBUG(5,("looking for user %s of domain %s in netgroup %s\n",
149 user, my_yp_domain?my_yp_domain:"(ANY)", ngname));
151 if (innetgr(ngname, NULL, user, my_yp_domain)) {
152 DEBUG(5,("user_in_netgroup: Found\n"));
157 * Ok, innetgr is case sensitive. Try once more with lowercase
158 * just in case. Attempt to fix #703. JRA.
160 lowercase_user = talloc_strdup(ctx, user);
161 if (!lowercase_user) {
164 strlower_m(lowercase_user);
166 if (strcmp(user,lowercase_user) == 0) {
167 /* user name was already lower case! */
171 DEBUG(5,("looking for user %s of domain %s in netgroup %s\n",
172 lowercase_user, my_yp_domain?my_yp_domain:"(ANY)", ngname));
174 if (innetgr(ngname, NULL, lowercase_user, my_yp_domain)) {
175 DEBUG(5,("user_in_netgroup: Found\n"));
178 #endif /* HAVE_NETGROUP */
182 /****************************************************************************
183 Check if a user is in a user list - can check combinations of UNIX
185 ****************************************************************************/
187 bool user_in_list(TALLOC_CTX *ctx, const char *user,const char **list)
192 DEBUG(10,("user_in_list: checking user %s in list\n", user));
196 DEBUG(10,("user_in_list: checking user |%s| against |%s|\n",
200 * Check raw username.
202 if (strequal(user, *list))
206 * Now check to see if any combination
207 * of UNIX and netgroups has been specified.
212 * Old behaviour. Check netgroup list
213 * followed by UNIX list.
215 if(user_in_netgroup(ctx, user, *list +1))
217 if(user_in_group(user, *list +1))
219 } else if (**list == '+') {
221 if((*(*list +1)) == '&') {
223 * Search UNIX list followed by netgroup.
225 if(user_in_group(user, *list +2))
227 if(user_in_netgroup(ctx, user, *list +2))
233 * Just search UNIX list.
236 if(user_in_group(user, *list +1))
240 } else if (**list == '&') {
242 if(*(*list +1) == '+') {
244 * Search netgroup list followed by UNIX list.
246 if(user_in_netgroup(ctx, user, *list +2))
248 if(user_in_group(user, *list +2))
252 * Just search netgroup list.
254 if(user_in_netgroup(ctx, user, *list +1))
264 bool map_username(TALLOC_CTX *ctx, const char *user_in, char **p_user_out)
267 char *mapfile = lp_username_map();
270 bool mapped_user = False;
271 char *cmd = lp_username_map_script();
278 /* Initially make a copy of the incoming name. */
279 *p_user_out = talloc_strdup(ctx, user_in);
284 if (strequal(user_in,get_last_to()))
287 if (strequal(user_in,get_last_from())) {
288 DEBUG(3,("Mapped user %s to %s\n",user_in,get_last_to()));
289 TALLOC_FREE(*p_user_out);
290 *p_user_out = talloc_strdup(ctx, get_last_to());
294 if (fetch_map_from_gencache(ctx, user_in, p_user_out)) {
298 /* first try the username map script */
302 char *command = NULL;
303 int numlines, ret, fd;
305 command = talloc_asprintf(ctx,
313 DEBUG(10,("Running [%s]\n", command));
314 ret = smbrun(command, &fd);
315 DEBUGADD(10,("returned [%d]\n", ret));
317 TALLOC_FREE(command);
326 qlines = fd_lines_load(fd, &numlines, 0, ctx);
327 DEBUGADD(10,("Lines returned = [%d]\n", numlines));
330 /* should be either no lines or a single line with the mapped username */
332 if (numlines && qlines) {
333 DEBUG(3,("Mapped user %s to %s\n", user_in, qlines[0] ));
334 set_last_from_to(user_in, qlines[0]);
335 store_map_in_gencache(ctx, user_in, qlines[0]);
336 TALLOC_FREE(*p_user_out);
337 *p_user_out = talloc_strdup(ctx, qlines[0]);
345 return numlines != 0;
348 /* ok. let's try the mapfile */
352 f = x_fopen(mapfile,O_RDONLY, 0);
354 DEBUG(0,("can't open username map %s. Error %s\n",mapfile, strerror(errno) ));
358 DEBUG(4,("Scanning username map %s\n",mapfile));
360 while((s=fgets_slash(buf,sizeof(buf),f))!=NULL) {
362 char *dosname = strchr_m(unixname,'=');
364 bool return_if_mapped = False;
371 unixname = skip_space(unixname);
373 if ('!' == *unixname) {
374 return_if_mapped = True;
375 unixname = skip_space(unixname+1);
378 if (!*unixname || strchr_m("#;",*unixname))
382 int l = strlen(unixname);
383 while (l && isspace((int)unixname[l-1])) {
389 /* skip lines like 'user = ' */
391 dosuserlist = str_list_make_v3(ctx, dosname, NULL);
393 DEBUG(0,("Bad username map entry. Unable to build user list. Ignoring.\n"));
397 if (strchr_m(dosname,'*') ||
398 user_in_list(ctx, user_in, (const char **)dosuserlist)) {
399 DEBUG(3,("Mapped user %s to %s\n",user_in,unixname));
402 set_last_from_to(user_in, unixname);
403 store_map_in_gencache(ctx, user_in, unixname);
404 TALLOC_FREE(*p_user_out);
405 *p_user_out = talloc_strdup(ctx, unixname);
407 TALLOC_FREE(dosuserlist);
412 if ( return_if_mapped ) {
413 TALLOC_FREE(dosuserlist);
419 TALLOC_FREE(dosuserlist);
425 * Setup the last_from and last_to as an optimization so
426 * that we don't scan the file again for the same user.
429 set_last_from_to(user_in, user_in);
430 store_map_in_gencache(ctx, user_in, user_in);