1163     char_u  *var;  in init_homedir()  local
1169     var = mch_getenv((char_u *)"SYS$LOGIN");  in init_homedir()
1171     var = mch_getenv((char_u *)"HOME");  in init_homedir()
1181     if (var == NULL || *var == NUL)  in init_homedir()
1194 		var = NameBuff;  in init_homedir()
1198     if (var == NULL)  in init_homedir()
1199 	var = mch_getenv((char_u *)"USERPROFILE");  in init_homedir()
1206     if (var != NULL && *var == '%')  in init_homedir()
1211 	p = vim_strchr(var + 1, '%');  in init_homedir()
1214 	    vim_strncpy(NameBuff, var + 1, p - (var + 1));  in init_homedir()
1220 		var = NameBuff;  in init_homedir()
1225     if (var != NULL && *var == NUL)	// empty is same as not set  in init_homedir()
1226 	var = NULL;  in init_homedir()
1228     if (enc_utf8 && var != NULL)  in init_homedir()
1235 	acp_to_enc(var, (int)STRLEN(var), &pp, &len);  in init_homedir()
1247     if (var == NULL)  in init_homedir()
1248 	var = (char_u *)"C:/";  in init_homedir()
1251     if (var != NULL)  in init_homedir()
1261 	    if (!mch_chdir((char *)var) && mch_dirname(IObuff, IOSIZE) == OK)  in init_homedir()
1262 		var = IObuff;  in init_homedir()
1267 	homedir = vim_strsave(var);  in init_homedir()
1338     char_u	*var;  in expand_env_esc()  local
1357 	    var = src;  in expand_env_esc()
1362 	    len = src - var;  in expand_env_esc()
1365 	    vim_strncpy(dst, var, len);  in expand_env_esc()
1391 		var = dst;  in expand_env_esc()
1400 			*var++ = *tail++;  in expand_env_esc()
1410 			*var++ = *tail++;  in expand_env_esc()
1419 		    var = NULL;  in expand_env_esc()
1429 		    *var = NUL;  in expand_env_esc()
1430 		    var = vim_getenv(dst, &mustfree);  in expand_env_esc()
1440 		var = homedir;  in expand_env_esc()
1450 		var = dst;  in expand_env_esc()
1456 		    *var++ = *tail++;  in expand_env_esc()
1457 		*var = NUL;  in expand_env_esc()
1472 		    var = (pw == NULL) ? NULL : (char_u *)pw->pw_dir;  in expand_env_esc()
1474 		if (var == NULL)  in expand_env_esc()
1481 		    var = ExpandOne(&xpc, dst, NULL,  in expand_env_esc()
1509 			    var = alloc(STRLEN(test) + 1);  in expand_env_esc()
1510 			    STRCPY(var, test);  in expand_env_esc()
1519 		var = NULL;  in expand_env_esc()
1527 	    if (p_ssl && var != NULL && vim_strchr(var, '\\') != NULL)  in expand_env_esc()
1529 		char_u	*p = vim_strsave(var);  in expand_env_esc()
1534 			vim_free(var);  in expand_env_esc()
1535 		    var = p;  in expand_env_esc()
1537 		    forward_slash(var);  in expand_env_esc()
1544 	    if (esc && var != NULL && vim_strpbrk(var, (char_u *)" \t") != NULL)  in expand_env_esc()
1546 		char_u	*p = vim_strsave_escaped(var, (char_u *)" \t");  in expand_env_esc()
1551 			vim_free(var);  in expand_env_esc()
1552 		    var = p;  in expand_env_esc()
1557 	    if (var != NULL && *var != NUL  in expand_env_esc()
1558 		    && (STRLEN(var) + STRLEN(tail) + 1 < (unsigned)dstlen))  in expand_env_esc()
1560 		STRCPY(dst, var);  in expand_env_esc()
1561 		dstlen -= (int)STRLEN(var);  in expand_env_esc()
1562 		c = (int)STRLEN(var);  in expand_env_esc()
1565 		if (*var != NUL && after_pathsep(dst, dst + c)  in expand_env_esc()
1576 		vim_free(var);  in expand_env_esc()
1890 vim_unsetenv(char_u *var)  in vim_unsetenv()  argument
1893     unsetenv((char *)var);  in vim_unsetenv()
1895     vim_setenv(var, (char_u *)"");  in vim_unsetenv()