Lines Matching refs:val
168 char *val;
249 static void put_ed(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
256 if(!(cp=val) && (*name=='E' || !(cp=nv_getval(sh_scoped(shp,EDITNOD)))))
274 nv_putv(np, val, flags, fp);
278 static void put_history(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
283 if(val && histopen)
285 if(np==HISTFILE && (cp=nv_getval(np)) && strcmp(val,cp)==0)
287 if(np==HISTSIZE && sh_arith(shp,val)==nv_getnum(HISTSIZE))
291 nv_putv(np, val, flags, fp);
294 if(val)
302 static void put_optindex(Namval_t* np,const char *val,int flags,Namfun_t *fp)
306 nv_putv(np, val, flags, fp);
307 if(!val)
327 static void put_restricted(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
338 if(path_scoped && !val)
339 val = PATHNOD->nvalue.cp;
341 if(val && !(flags&NV_RDONLY) && np->nvalue.cp && strcmp(val,np->nvalue.cp)==0)
345 nv_putv(np, val, flags, fp);
349 val = np->nvalue.cp;
351 pp = (void*)path_addpath(shp,(Pathcomp_t*)shp->pathlist,val,PATH_PATH);
352 else if(val && (np==FPATHNOD || fpath_scoped))
353 pp = (void*)path_addpath(shp,(Pathcomp_t*)shp->pathlist,val,PATH_FPATH);
358 if(!val && (flags&NV_NOSCOPE))
361 if(mp && (val=nv_getval(mp)))
362 nv_putval(mp,val,NV_RDONLY);
365 sfprintf(sfstderr,"%d: name=%s val=%s\n",getpid(),name,val);
371 static void put_cdpath(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
375 nv_putv(np, val, flags, fp);
378 val = np->nvalue.cp;
379 pp = (void*)path_addpath(shp,(Pathcomp_t*)shp->cdpathlist,val,PATH_CDPATH);
404 static void put_lang(Namval_t* np,const char *val,int flags,Namfun_t *fp)
435 r = setlocale(type,val?val:"");
439 if(!r && val)
442 errormsg(SH_DICT,0,e_badlocale,val);
446 nv_putv(np, val, flags, fp);
503 static void put_ifs(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
508 if(!val)
514 if(val != np->nvalue.cp)
515 nv_putv(np, val, flags, fp);
516 if(!val && !(flags&NV_CLONE) && (fp=np->nvfun) && !fp->disc && (shp=(Shell_t*)(fp->last)))
582 static void put_seconds(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
586 if(!val)
591 nv_putv(np, val, flags, fp);
600 nv_putv(np, val, flags, fp);
631 static void put_rand(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
635 if(!val)
644 n = *(double*)val;
646 n = sh_arith(rp->sh,val);
689 static void put_lineno(Namval_t* np,const char *val,int flags,Namfun_t *fp)
693 if(!val)
702 n = *(double*)val;
704 n = sh_arith(shp,val);
724 static void put_lastarg(Namval_t* np,const char *val,int flags,Namfun_t *fp)
729 sfprintf(shp->strbuf,"%.*g",12,*((double*)val));
730 val = sfstruse(shp->strbuf);
732 if(val)
733 val = strdup(val);
738 shp->lastarg = (char*)val;
769 mp->val = (char*)realloc(mp->val,vsize+1);
771 mp->val = (char*)malloc(vsize+1);
774 memcpy(mp->val,v,vsize);
775 mp->val[vsize] = 0;
795 char *val;
809 val = mp->val+mp->match[2*sub];
810 if(mp->val[mp->match[2*sub+1]]==0)
811 return(val);
814 memcpy(mp->rval,val,n);
866 static void put_vpath(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
871 if(val)
872 vpath_set((char*)val,1);
873 nv_putv(np,val,flags,fp);
946 char *val;
958 val = sfstruse(shp->strbuf);
959 return(val);
1144 static void put_mode(Namval_t* np, const char* val, int flag, Namfun_t* nfp)
1146 if(val)
1153 mode = *(Sfdouble_t*)val;
1155 mode = *(double*)val;
1158 mode = strperm(val, &last,0);
1160 errormsg(SH_DICT,ERROR_exit(1),"%s: invalid mode string",val);
1164 nv_putv(np,val,flag,nfp);
1984 char *val = nv_getval(np);
1985 strtol(val,&dp,10);
1999 size = dp-val;
2079 static void put_trans(register Namval_t* np,const char *val,int flags,Namfun_t *fp)
2083 if(val)
2092 while(c = mbchar(val))
2102 val = stakptr(offset);
2111 nv_putv(np,val,flags,fp);