mptr 243 src/simh/scp.c t_stat show_one_mod (FILE *st, DEVICE *dptr, UNIT *uptr, MTAB *mptr, CONST char *cptr, int32 flag); mptr 2204 src/simh/scp.c MTAB *mptr; mptr 2216 src/simh/scp.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) { mptr 2217 src/simh/scp.c if (!MODMASK(mptr,MTAB_VDV) && MODMASK(mptr,MTAB_VUN) && (dptr->numunits != 1)) mptr 2219 src/simh/scp.c if ((enabled_units != 1) && !(mptr->mask & MTAB_XTD)) mptr 2221 src/simh/scp.c if (mptr->mstring) { mptr 2223 src/simh/scp.c sprintf (buf, "SET %s %s%s", sim_dname (dptr), mptr->mstring, (strchr(mptr->mstring, '=')) ? "" : (MODMASK(mptr,MTAB_VALR) ? "=val" : (MODMASK(mptr,MTAB_VALO) ? "{=val}" : ""))); mptr 2224 src/simh/scp.c if ((strlen (buf) < 30) || (!mptr->help)) mptr 2225 src/simh/scp.c fprintf (st, "%-30s\t%s\n", buf, mptr->help ? mptr->help : ""); mptr 2227 src/simh/scp.c fprintf (st, "%s\n%-30s\t%s\n", buf, "", mptr->help); mptr 2274 src/simh/scp.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) { mptr 2275 src/simh/scp.c if ((!MODMASK(mptr,MTAB_VUN)) && MODMASK(mptr,MTAB_XTD)) mptr 2277 src/simh/scp.c if ((!mptr->valid) && MODMASK(mptr,MTAB_XTD)) mptr 2279 src/simh/scp.c if (mptr->mstring) { mptr 2281 src/simh/scp.c sprintf (buf, "SET %s%s %s%s", sim_dname (dptr), (dptr->numunits > 1) ? "n" : "0", mptr->mstring, (strchr(mptr->mstring, '=')) ? "" : (MODMASK(mptr,MTAB_VALR) ? "=val" : (MODMASK(mptr,MTAB_VALO) ? "{=val}": ""))); mptr 2282 src/simh/scp.c fprintf (st, "%-30s\t%s\n", buf, (strchr(mptr->mstring, '=')) ? "" : (mptr->help ? mptr->help : "")); mptr 2297 src/simh/scp.c MTAB *mptr; mptr 2308 src/simh/scp.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) { mptr 2309 src/simh/scp.c if (!MODMASK(mptr,MTAB_VDV) && MODMASK(mptr,MTAB_VUN) && (dptr->numunits != 1)) mptr 2311 src/simh/scp.c if ((enabled_units != 1) && !(mptr->mask & MTAB_XTD)) mptr 2313 src/simh/scp.c if ((!mptr->disp) || (!mptr->pstring) || !(*mptr->pstring)) mptr 2316 src/simh/scp.c sprintf (buf, "SHOW %s %s%s", sim_dname (dptr), mptr->pstring, MODMASK(mptr,MTAB_SHP) ? "{=arg}" : ""); mptr 2317 src/simh/scp.c fprintf (st, "%-30s\t%s\n", buf, mptr->help ? mptr->help : ""); mptr 2326 src/simh/scp.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) { mptr 2327 src/simh/scp.c if ((!MODMASK(mptr,MTAB_VUN)) && MODMASK(mptr,MTAB_XTD)) mptr 2329 src/simh/scp.c if ((!mptr->disp) || (!mptr->pstring)) mptr 2332 src/simh/scp.c sprintf (buf, "SHOW %s%s %s%s", sim_dname (dptr), (dptr->numunits > 1) ? "n" : "0", mptr->pstring, MODMASK(mptr,MTAB_SHP) ? "=arg" : ""); mptr 2333 src/simh/scp.c fprintf (st, "%-30s\t%s\n", buf, mptr->help ? mptr->help : ""); mptr 2523 src/simh/scp.c mptr 2524 src/simh/scp.c mptr 2525 src/simh/scp.c mptr 3792 src/simh/scp.c MTAB *mptr; mptr 3822 src/simh/scp.c for (mptr = sim_dflt_dev->modifiers; mptr->mask != 0; mptr++) { mptr 3823 src/simh/scp.c if (mptr->mstring && (MATCH_CMD (gbuf, mptr->mstring) == 0)) { mptr 3847 src/simh/scp.c for (mptr = dptr->modifiers; mptr && (mptr->mask != 0); mptr++) { mptr 3848 src/simh/scp.c if ((mptr->mstring) && /* match string */ mptr 3849 src/simh/scp.c (MATCH_CMD (gbuf, mptr->mstring) == 0)) { /* matches option? */ mptr 3850 src/simh/scp.c if (mptr->mask & MTAB_XTD) { /* extended? */ mptr 3851 src/simh/scp.c if (((lvl & mptr->mask) & ~MTAB_XTD) == 0) mptr 3855 src/simh/scp.c if (mptr->valid) { /* validation rtn? */ mptr 3856 src/simh/scp.c if (cvptr && MODMASK(mptr,MTAB_QUOTE)) { mptr 3864 src/simh/scp.c if (cvptr && MODMASK(mptr,MTAB_NC)) { mptr 3870 src/simh/scp.c r = mptr->valid (uptr, mptr->match, cvptr, mptr->desc); mptr 3874 src/simh/scp.c else if (!mptr->desc) /* value desc? */ mptr 3878 src/simh/scp.c else *((int32 *) mptr->desc) = mptr->match; mptr 3885 src/simh/scp.c if ((mptr->valid) && /* invalid? */ mptr 3886 src/simh/scp.c ((r = mptr->valid (uptr, mptr->match, cvptr, mptr->desc)) != SCPE_OK)) mptr 3888 src/simh/scp.c uptr->flags = (uptr->flags & ~(mptr->mask)) | mptr 3889 src/simh/scp.c (mptr->match & mptr->mask); /* set new value */ mptr 3894 src/simh/scp.c if (!mptr || (mptr->mask == 0)) { /* no match? */ mptr 4058 src/simh/scp.c MTAB *mptr; mptr 4089 src/simh/scp.c for (mptr = sim_dflt_dev->modifiers; mptr && (mptr->mask != 0); mptr++) { mptr 4090 src/simh/scp.c if ((((mptr->mask & MTAB_VDV) == MTAB_VDV) && mptr 4091 src/simh/scp.c (mptr->pstring && (MATCH_CMD (gbuf, mptr->pstring) == 0))) || //-V600 mptr 4092 src/simh/scp.c (!(mptr->mask & MTAB_VDV) && (mptr->mstring && (MATCH_CMD (gbuf, mptr->mstring) == 0)))) { mptr 4121 src/simh/scp.c for (mptr = dptr->modifiers; mptr && (mptr->mask != 0); mptr++) { mptr 4122 src/simh/scp.c if (((mptr->mask & MTAB_XTD)? /* right level? */ mptr 4123 src/simh/scp.c ((mptr->mask & lvl) == lvl): (MTAB_VUN & lvl)) && mptr 4124 src/simh/scp.c ((mptr->disp && mptr->pstring && /* named disp? */ mptr 4125 src/simh/scp.c (MATCH_CMD (gbuf, mptr->pstring) == 0)) mptr 4127 src/simh/scp.c if (cvptr && !MODMASK(mptr,MTAB_SHP)) mptr 4129 src/simh/scp.c show_one_mod (ofile, dptr, uptr, mptr, cvptr, 1); mptr 4133 src/simh/scp.c if (!mptr || (mptr->mask == 0)) { /* no match? */ mptr 5356 src/simh/scp.c MTAB *mptr; mptr 5361 src/simh/scp.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) { mptr 5362 src/simh/scp.c if (mptr->pstring && mptr 5363 src/simh/scp.c ((mptr->mask & MTAB_XTD)? mptr 5364 src/simh/scp.c (MODMASK(mptr,flag) && !MODMASK(mptr,MTAB_NMO)): mptr 5365 src/simh/scp.c ((MTAB_VUN == (uint32)flag) && ((uptr->flags & mptr->mask) == mptr->match)))) { mptr 5372 src/simh/scp.c r = show_one_mod (st, dptr, uptr, mptr, NULL, 0); mptr 5378 src/simh/scp.c t_stat show_one_mod (FILE *st, DEVICE *dptr, UNIT *uptr, MTAB *mptr, mptr 5383 src/simh/scp.c if (mptr->disp) mptr 5384 src/simh/scp.c r = mptr->disp (st, uptr, mptr->match, (CONST void *)(cptr? cptr: mptr->desc)); mptr 5386 src/simh/scp.c fputs (mptr->pstring, st); mptr 5387 src/simh/scp.c if ((r == SCPE_OK) && (flag && !((mptr->mask & MTAB_XTD) && MODMASK(mptr,MTAB_NMO)))) mptr 576 src/simh/sim_defs.h # define MODMASK(mptr,flag) (((mptr)->mask & (uint32)(flag)) == (uint32)(flag))/* flag mask test */ mptr 3410 src/simh/sim_tmxr.c MTAB *mptr; mptr 3412 src/simh/sim_tmxr.c for (mptr = dptr->modifiers; mptr->mask != 0; mptr++) mptr 3413 src/simh/sim_tmxr.c if (mptr->valid == &tmxr_dscln) { mptr 3415 src/simh/sim_tmxr.c fprintf (st, " sim> SET %s %s=n\n\n", dptr->name, mptr->mstring); mptr 3420 src/simh/sim_tmxr.c fprintf (st, "adding the -C switch to a %s command.\n\n", mptr->mstring); mptr 3421 src/simh/sim_tmxr.c fprintf (st, " sim> SET -C %s %s=n\n\n", dptr->name, mptr->mstring);