1045 varsub(Expand *xp, const char *sp, const char *word,  in varsub()  argument
1061 	xp->var = NULL;  in varsub()
1128 		xp->str = shf_smprintf("%d", c);  in varsub()
1189 			xp->str = null;  in varsub()
1190 			xp->var = global(sp);  in varsub()
1193 			xp->u.strv = (const char **)e->loc->argv + 1;  in varsub()
1194 			xp->str = *xp->u.strv++;  in varsub()
1196 			xp->split = tobool(c == '@');  in varsub()
1229 				xp->str = null;  in varsub()
1234 				xp->u.strv = (const char **)XPptrv(wv);  in varsub()
1235 				xp->str = *xp->u.strv++;  in varsub()
1237 				xp->split = tobool(p[1] == '@');  in varsub()
1247 				xp->var = global(sp);  in varsub()
1249 					if (xp->var->flag & ISSET)  in varsub()
1250 						xp->str = shf_smprintf("%lu",  in varsub()
1251 						    arrayindex(xp->var));  in varsub()
1253 						xp->str = null;  in varsub()
1254 				} else if (xp->var->flag & ISSET)  in varsub()
1255 					xp->str = xp->var->name;  in varsub()
1258 					xp->str = "0";  in varsub()
1260 				xp->var = global(sp);  in varsub()
1261 				xp->str = str_val(xp->var);  in varsub()
1270 	    (((stype&0x80) ? *xp->str=='\0' : xp->str==null) ? /* undef? */  in varsub()
1276 	if (Flag(FNOUNSET) && xp->str == null && !zero_ok &&  in varsub()
1286 comsub(Expand *xp, const char *cp, int fn MKSH_A_UNUSED)  in comsub()  argument
1306 	xp->split = false;  in comsub()
1361 		xp->split = true;  in comsub()
1364 	xp->u.shf = shf;  in comsub()
1463 	char *xp;  in glob_str()  local
1465 	Xinit(xs, xp, 256, ATEMP);  in glob_str()
1466 	globit(&xs, &xp, cp, wp, markdirs ? GF_MARKDIR : GF_NONE);  in glob_str()
1467 	Xfree(xs, xp);  in glob_str()
1480 	char *xp = *xpp;  in globit()  local
1499 			    (stat_done = stat(Xstring(*xs, xp), &statb) < 0 \  in globit()
1504 			if (mksh_lstat(Xstring(*xs, xp), &lstatb) < 0)  in globit()
1511 			if ((check & GF_EXCHECK) && xp > Xstring(*xs, xp) &&  in globit()
1512 			    xp[-1] == '/' && !S_ISDIR(lstatb.st_mode) &&  in globit()
1522 			    xp > Xstring(*xs, xp) && xp[-1] != '/' &&  in globit()
1526 				*xp++ = '/';  in globit()
1527 				*xp = '\0';  in globit()
1530 		strndupx(np, Xstring(*xs, xp), Xlength(*xs, xp), ATEMP);  in globit()
1535 	if (xp > Xstring(*xs, xp))  in globit()
1536 		*xp++ = '/';  in globit()
1538 		Xcheck(*xs, xp);  in globit()
1539 		*xp++ = *sp++;  in globit()
1561 		XcheckN(*xs, xp, se - sp + 1);  in globit()
1562 		debunk(xp, sp, Xnleft(*xs, xp));  in globit()
1563 		xp += strlen(xp);  in globit()
1564 		*xpp = xp;  in globit()
1573 		*xp = '\0';  in globit()
1574 		prefix_len = Xlength(*xs, xp);  in globit()
1575 		dirp = opendir(prefix_len ? Xstring(*xs, xp) : ".");  in globit()
1589 			XcheckN(*xs, xp, len);  in globit()
1590 			memcpy(xp, name, len);  in globit()
1591 			*xpp = xp + len - 1;  in globit()
1595 			xp = Xstring(*xs, xp) + prefix_len;  in globit()