#include "includes.h"
static struct passwd *uname_string_combinations(char *s, struct passwd * (*fn) (char *), int N);
static struct passwd *uname_string_combinations2(char *s, int offset, struct passwd * (*fn) (char *), int N);
BOOL name_is_local(const char *name)
{
return !strchr(name, *lp_winbind_separator());
}
char *get_user_home_dir(char *user)
{
static struct passwd *pass;
pass = Get_Pwnam(user, False);
if (!pass)
return(NULL);
return(pass->pw_dir);
}
char *get_user_service_home_dir(char *user)
{
static struct passwd *pass;
int snum;
pass = Get_Pwnam(user, False);
if (!pass)
return(NULL);
if ((snum = lp_servicenumber(HOMES_NAME)) != -1) {
static pstring home_dir;
pstrcpy(home_dir, lp_pathname(snum));
standard_sub_home(snum, user, home_dir);
if (home_dir[0])
return home_dir;
}
return(pass->pw_dir);
}
BOOL map_username(char *user)
{
static BOOL initialised=False;
static fstring last_from,last_to;
FILE *f;
char *mapfile = lp_username_map();
char *s;
pstring buf;
BOOL mapped_user = False;
if (!*user)
return False;
if (!*mapfile)
return False;
if (!initialised) {
*last_from = *last_to = 0;
initialised = True;
}
if (strequal(user,last_to))
return False;
if (strequal(user,last_from)) {
DEBUG(3,("Mapped user %s to %s\n",user,last_to));
fstrcpy(user,last_to);
return True;
}
f = sys_fopen(mapfile,"r");
if (!f) {
DEBUG(0,("can't open username map %s. Error %s\n",mapfile, strerror(errno) ));
return False;
}
DEBUG(4,("Scanning username map %s\n",mapfile));
while((s=fgets_slash(buf,sizeof(buf),f))!=NULL) {
char *unixname = s;
char *dosname = strchr(unixname,'=');
BOOL return_if_mapped = False;
if (!dosname)
continue;
*dosname++ = 0;
while (isspace((int)*unixname))
unixname++;
if ('!' == *unixname) {
return_if_mapped = True;
unixname++;
while (*unixname && isspace((int)*unixname))
unixname++;
}
if (!*unixname || strchr("#;",*unixname))
continue;
{
int l = strlen(unixname);
while (l && isspace((int)unixname[l-1])) {
unixname[l-1] = 0;
l--;
}
}
if (strchr(dosname,'*') || user_in_list(user,dosname)) {
DEBUG(3,("Mapped user %s to %s\n",user,unixname));
mapped_user = True;
fstrcpy(last_from,user);
sscanf(unixname,"%s",user);
fstrcpy(last_to,user);
if(return_if_mapped) {
fclose(f);
return True;
}
}
}
fclose(f);
fstrcpy(last_from,user);
fstrcpy(last_to,user);
return mapped_user;
}
static struct passwd *_Get_Pwnam(char *s)
{
struct passwd *ret;
ret = sys_getpwnam(s);
if (ret) {
#ifdef HAVE_GETPWANAM
struct passwd_adjunct *pwret;
pwret = getpwanam(s);
if (pwret && pwret->pwa_passwd)
pstrcpy(ret->pw_passwd,pwret->pwa_passwd);
#endif
}
return(ret);
}
struct passwd *Get_Pwnam(char *user,BOOL allow_change)
{
fstring user2, orig_username;
int usernamelevel = lp_usernamelevel();
struct passwd *ret;
if (!user || !(*user))
return(NULL);
fstrcpy(orig_username, user);
if (!allow_change) {
fstrcpy(user2,user);
user = &user2[0];
}
unix_to_dos(user, True);
strlower(user);
dos_to_unix(user, True);
ret = _Get_Pwnam(user);
if (ret)
return(ret);
if (strcmp(user, orig_username) != 0) {
ret = _Get_Pwnam(orig_username);
if (ret) {
if (allow_change)
fstrcpy(user, orig_username);
return(ret);
}
}
unix_to_dos(user, True);
strupper(user);
dos_to_unix(user, True);
if (strcmp(user, orig_username) != 0) {
ret = _Get_Pwnam(user);
if (ret)
return(ret);
}
unix_to_dos(user, True);
strlower(user);
dos_to_unix(user, True);
ret = uname_string_combinations(user, _Get_Pwnam, usernamelevel);
if (ret)
return(ret);
return(NULL);
}
static BOOL user_in_netgroup_list(char *user,char *ngname)
{
#ifdef HAVE_NETGROUP
static char *mydomain = NULL;
if (mydomain == NULL)
yp_get_default_domain(&mydomain);
if(mydomain == NULL) {
DEBUG(5,("Unable to get default yp domain\n"));
return False;
}
DEBUG(5,("looking for user %s of domain %s in netgroup %s\n",
user, mydomain, ngname));
DEBUG(5,("innetgr is %s\n", innetgr(ngname, NULL, user, mydomain)
? "True" : "False"));
if (innetgr(ngname, NULL, user, mydomain))
return (True);
#endif
return False;
}
static BOOL user_in_winbind_group_list(char *user,char *gname, BOOL *winbind_answered)
{
int num_groups;
int i;
gid_t *groups = NULL;
gid_t gid;
BOOL ret = False;
*winbind_answered = False;
if ((num_groups = winbind_getgroups(user, 0, NULL)) == -1)
return False;
if (num_groups == 0) {
*winbind_answered = True;
return False;
}
if ((groups = (gid_t *)malloc(sizeof(gid_t) * num_groups )) == NULL) {
DEBUG(0,("user_in_winbind_group_list: malloc fail.\n"));
goto err;
}
if ((num_groups = winbind_getgroups(user, num_groups, groups)) == -1) {
DEBUG(0,("user_in_winbind_group_list: second winbind_getgroups call \
failed with error %s\n", strerror(errno) ));
goto err;
}
if ((gid = nametogid(gname)) == (gid_t)-1) {
DEBUG(0,("user_in_winbind_group_list: winbind_lookup_name for group %s failed.\n",
gname ));
goto err;
}
for (i = 0; i < num_groups; i++) {
if (gid == groups[i]) {
ret = True;
break;
}
}
*winbind_answered = True;
SAFE_FREE(groups);
return ret;
err:
*winbind_answered = False;
SAFE_FREE(groups);
return False;
}
static BOOL user_in_unix_group_list(char *user,const char *gname)
{
struct passwd *pass = Get_Pwnam(user,False);
struct sys_userlist *user_list;
struct sys_userlist *member;
DEBUG(10,("user_in_unix_group_list: checking user %s in group %s\n", user, gname));
if (pass) {
if (strequal(gname, gidtoname(pass->pw_gid))) {
DEBUG(10,("user_in_unix_group_list: group %s is primary group.\n", gname ));
return True;
}
}
user_list = get_users_in_group(gname);
if (user_list == NULL) {
DEBUG(10,("user_in_unix_group_list: no such group %s\n", gname ));
return False;
}
for (member = user_list; member; member = member->next) {
DEBUG(10,("user_in_unix_group_list: checking user %s against member %s\n",
user, member->unix_name ));
if (strequal(member->unix_name,user)) {
free_userlist(user_list);
return(True);
}
}
free_userlist(user_list);
return False;
}
BOOL user_in_group_list(char *user,char *gname)
{
BOOL winbind_answered = False;
BOOL ret;
ret = user_in_winbind_group_list(user, gname, &winbind_answered);
if (!winbind_answered)
ret = user_in_unix_group_list(user, gname);
if (ret)
DEBUG(10,("user_in_group_list: user |%s| is in group |%s|\n", user, gname));
return ret;
}
BOOL user_in_list(char *user,char *list)
{
pstring tok;
char *p=list;
DEBUG(10,("user_in_list: checking user %s in list %s\n", user, list));
while (next_token(&p,tok,LIST_SEP, sizeof(tok))) {
DEBUG(10,("user_in_list: checking user |%s| in group |%s|\n", user, tok));
if (strequal(user,tok))
return(True);
if(*tok == '@') {
if(user_in_netgroup_list(user,&tok[1]))
return True;
if(user_in_group_list(user,&tok[1]))
return True;
} else if (*tok == '+') {
if(tok[1] == '&') {
if(user_in_group_list(user,&tok[2]))
return True;
if(user_in_netgroup_list(user,&tok[2]))
return True;
} else {
if(user_in_group_list(user,&tok[1]))
return True;
}
} else if (*tok == '&') {
if(tok[1] == '+') {
if(user_in_netgroup_list(user,&tok[2]))
return True;
if(user_in_group_list(user,&tok[2]))
return True;
} else {
if(user_in_netgroup_list(user,&tok[1]))
return True;
}
} else if (!name_is_local(tok)) {
DOM_SID g_sid;
enum SID_NAME_USE name_type;
BOOL winbind_answered = False;
BOOL ret;
if (winbind_lookup_name(tok, &g_sid, &name_type) && name_type == SID_NAME_DOM_GRP) {
ret = user_in_winbind_group_list(user, tok, &winbind_answered);
if (winbind_answered && ret == True) {
DEBUG(10,("user_in_list: user |%s| is in group |%s|\n", user, tok));
return ret;
}
}
}
}
return(False);
}
static struct passwd *uname_string_combinations2(char *s,int offset,struct passwd *(*fn)(char *),int N)
{
ssize_t len = (ssize_t)strlen(s);
int i;
struct passwd *ret;
if (N <= 0 || offset >= len)
return(fn(s));
for (i=offset;i<(len-(N-1));i++) {
char c = s[i];
if (!islower((int)c))
continue;
s[i] = toupper(c);
ret = uname_string_combinations2(s,i+1,fn,N-1);
if(ret)
return(ret);
s[i] = c;
}
return(NULL);
}
static struct passwd * uname_string_combinations(char *s,struct passwd * (*fn)(char *),int N)
{
int n;
struct passwd *ret;
for (n=1;n<=N;n++) {
ret = uname_string_combinations2(s,0,fn,n);
if(ret)
return(ret);
}
return(NULL);
}
struct passwd *smb_getpwnam(char *user, BOOL allow_change)
{
struct passwd *pw;
char *p;
char *sep;
extern pstring global_myname;
pw = Get_Pwnam(user, allow_change);
if (pw)
return pw;
sep = lp_winbind_separator();
p = strchr(user,*sep);
if (p && strncasecmp(global_myname, user, strlen(global_myname))==0)
return Get_Pwnam(p+1, allow_change);
return NULL;
}