#include "includes.h"
fstring local_machine="";
fstring remote_arch="UNKNOWN";
userdom_struct current_user_info;
pstring samlogon_user="";
BOOL sam_logon_in_ssb = False;
fstring remote_proto="UNKNOWN";
fstring remote_machine="";
static size_t expand_env_var(char *p, int len)
{
fstring envname;
char *envval;
char *q, *r;
int copylen;
if (p[1] != '$')
return 1;
if (p[2] != '(')
return 2;
if ((q = strchr(p,')')) == NULL) {
DEBUG(0,("expand_env_var: Unterminated environment variable [%s]\n", p));
return 2;
}
r = p+3;
copylen = MIN((q-r),(sizeof(envname)-1));
strncpy(envname,r,copylen);
envname[copylen] = '\0';
if ((envval = getenv(envname)) == NULL) {
DEBUG(0,("expand_env_var: Environment variable [%s] not set\n", envname));
return 2;
}
copylen = MIN((q+1-p),(sizeof(envname)-1));
strncpy(envname,p,copylen);
envname[copylen] = '\0';
string_sub(p,envname,envval,len);
return 0;
}
static char *automount_path(char *user_name)
{
static pstring server_path;
pstrcpy(server_path, get_user_home_dir(user_name));
#if (defined(HAVE_NETGROUP) && defined (WITH_AUTOMOUNT))
if (lp_nis_home_map()) {
char *home_path_start;
char *automount_value = automount_lookup(user_name);
if(strlen(automount_value) > 0) {
home_path_start = strchr(automount_value,':');
if (home_path_start != NULL) {
DEBUG(5, ("NIS lookup succeeded. Home path is: %s\n",
home_path_start?(home_path_start+1):""));
pstrcpy(server_path, home_path_start+1);
}
} else {
DEBUG(5, ("NIS lookup failed. Using Home path from passwd file. Home path is: %s\n", server_path ));
}
}
#endif
DEBUG(4,("Home server path: %s\n", server_path));
return server_path;
}
static char *automount_server(char *user_name)
{
extern pstring global_myname;
static pstring server_name;
if (*local_machine)
pstrcpy(server_name, local_machine);
else
pstrcpy(server_name, global_myname);
#if (defined(HAVE_NETGROUP) && defined (WITH_AUTOMOUNT))
if (lp_nis_home_map()) {
int home_server_len;
char *automount_value = automount_lookup(user_name);
home_server_len = strcspn(automount_value,":");
DEBUG(5, ("NIS lookup succeeded. Home server length: %d\n",home_server_len));
if (home_server_len > sizeof(pstring))
home_server_len = sizeof(pstring);
strncpy(server_name, automount_value, home_server_len);
server_name[home_server_len] = '\0';
}
#endif
DEBUG(4,("Home server: %s\n", server_name));
return server_name;
}
void standard_sub_basic(char *str)
{
char *p, *s;
fstring pidstr;
struct passwd *pass;
for (s=str; (p=strchr(s, '%'));s=p) {
fstring tmp_str;
int l = sizeof(pstring) - (int)(p-str);
switch (*(p+1)) {
case 'U' :
fstrcpy(tmp_str, sam_logon_in_ssb?samlogon_user:current_user_info.smb_name);
strlower(tmp_str);
string_sub(p,"%U",tmp_str,l);
break;
case 'G' :
fstrcpy(tmp_str, sam_logon_in_ssb?samlogon_user:current_user_info.smb_name);
if ((pass = Get_Pwnam(tmp_str, False))!=NULL) {
string_sub(p,"%G",gidtoname(pass->pw_gid),l);
} else {
p += 2;
}
break;
case 'D' :
fstrcpy(tmp_str, current_user_info.domain);
strupper(tmp_str);
string_sub(p,"%D", tmp_str,l);
break;
case 'I' : string_sub(p,"%I", client_addr(),l); break;
case 'L' : string_sub(p,"%L", local_machine,l); break;
case 'M' : string_sub(p,"%M", client_name(),l); break;
case 'R' : string_sub(p,"%R", remote_proto,l); break;
case 'T' : string_sub(p,"%T", timestring(False),l); break;
case 'a' : string_sub(p,"%a", remote_arch,l); break;
case 'd' :
slprintf(pidstr,sizeof(pidstr)-1, "%d",(int)sys_getpid());
string_sub(p,"%d", pidstr,l);
break;
case 'h' : string_sub(p,"%h", myhostname(),l); break;
case 'm' : string_sub(p,"%m", remote_machine,l); break;
case 'v' : string_sub(p,"%v", VERSION,l); break;
case '$' : p += expand_env_var(p,l); break;
case '\0':
p++;
break;
default: p+=2;
break;
}
}
}
void standard_sub_advanced(int snum, char *user, char *connectpath, gid_t gid, char *str)
{
char *p, *s, *home;
for (s=str; (p=strchr(s, '%'));s=p) {
int l = sizeof(pstring) - (int)(p-str);
switch (*(p+1)) {
case 'N' : string_sub(p,"%N", automount_server(user),l); break;
case 'H':
if ((home = get_user_home_dir(user))) {
string_sub(p,"%H",home, l);
} else {
p += 2;
}
break;
case 'P':
string_sub(p,"%P", connectpath, l);
break;
case 'S':
string_sub(p,"%S", lp_servicename(snum), l);
break;
case 'g':
string_sub(p,"%g", gidtoname(gid), l);
break;
case 'u':
string_sub(p,"%u", user, l);
break;
case 'p':
string_sub(p,"%p", automount_path(lp_servicename(snum)), l);
break;
case '\0':
p++;
break;
default: p+=2;
break;
}
}
standard_sub_basic(str);
}
void standard_sub_conn(connection_struct *conn, char *str)
{
standard_sub_advanced(SNUM(conn), conn->user, conn->connectpath, conn->gid, str);
}
void standard_sub_home(int snum, char *user, char *str)
{
char *p, *s;
for (s=str; (p=strchr(s, '%'));s=p) {
int l = sizeof(pstring) - (int)(p-str);
switch (*(p+1)) {
case 'S':
string_sub(p,"%S", user, l);
break;
case 'p':
string_sub(p,"%p", automount_path(user), l);
break;
case '\0':
p++;
break;
default: p+=2;
break;
}
}
standard_sub_advanced(snum, user, "", -1, str);
}
void standard_sub_snum(int snum, char *str)
{
extern struct current_user current_user;
static uid_t cached_uid = -1;
static fstring cached_user;
if (cached_uid != current_user.uid) {
fstrcpy(cached_user, uidtoname(current_user.uid));
cached_uid = current_user.uid;
}
standard_sub_advanced(snum, cached_user, "", -1, str);
}
void standard_sub_vuser(char *str, user_struct *vuser)
{
standard_sub_advanced(-1, vuser->user.unix_name, "", -1, str);
}
void standard_sub_vsnum(char *str, user_struct *vuser, int snum)
{
standard_sub_advanced(snum, vuser->user.unix_name, "", -1, str);
}