p 163 src/decNumber/decNumber.c # define FREE(p) free(p) p 165 src/decNumber/decNumber.c # define FREE(p) do \ p 167 src/decNumber/decNumber.c free((p)); \ p 168 src/decNumber/decNumber.c (p) = NULL; \ p 1278 src/decNumber/decNumber.c Int p; // working precision p 1352 src/decNumber/decNumber.c p=(rhs->digits+t>set->digits?rhs->digits+t:set->digits)+3; p 1353 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p)-1)*sizeof(Unit); p 1361 src/decNumber/decNumber.c aset.digits=p; // as calculated p 1375 src/decNumber/decNumber.c p=set->digits+3; p 1376 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p)-1)*sizeof(Unit); p 1392 src/decNumber/decNumber.c aset.digits=p; p 4647 src/decNumber/decNumber.c Int p; // .. p 4746 src/decNumber/decNumber.c for (p=0, *lip=0; p<FASTDIGS && count>0; p 4747 src/decNumber/decNumber.c p+=DECDPUN, cup++, count-=DECDPUN) p 4748 src/decNumber/decNumber.c *lip+=*cup*powers[p]; p 4751 src/decNumber/decNumber.c for (p=0, *rip=0; p<FASTDIGS && count>0; p 4752 src/decNumber/decNumber.c p+=DECDPUN, cup++, count-=DECDPUN) p 4753 src/decNumber/decNumber.c *rip+=*cup*powers[p]; p 4813 src/decNumber/decNumber.c for (p=0; p<FASTDIGS-DECDPUN; p+=DECDPUN, up++) { p 4980 src/decNumber/decNumber.c Int p; // working precision p 5081 src/decNumber/decNumber.c p=9; // set a working precision p 5129 src/decNumber/decNumber.c p=MAXI(x->digits, set->digits)+h+2; // [h<=8] p 5137 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p*2)-1)*sizeof(Unit); p 5149 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p+2)-1)*sizeof(Unit); p 5167 src/decNumber/decNumber.c aset.digits=p*2; // double p 5169 src/decNumber/decNumber.c tset.digits=p; p 5184 src/decNumber/decNumber.c if (((a->digits+a->exponent)>=(t->digits+t->exponent+p+1)) p 5185 src/decNumber/decNumber.c && (a->digits>=p)) break; p 5196 src/decNumber/decNumber.c aset.digits=p+2; // sufficient precision p 5327 src/decNumber/decNumber.c Int p; // working precision p 5391 src/decNumber/decNumber.c p=MAXI(rhs->digits, MAXI(set->digits, 7))+2; p 5399 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(MAXI(p,16))-1)*sizeof(Unit); p 5407 src/decNumber/decNumber.c pp=p+rhs->digits; p 5501 src/decNumber/decNumber.c if (a->digits==p) break; p 5509 src/decNumber/decNumber.c if (decNumberIsZero(b)) b->exponent=a->exponent-p; p 5514 src/decNumber/decNumber.c if (pp==p) continue; // precision is at maximum p 5517 src/decNumber/decNumber.c if (pp>p) pp=p; // clamp to maximum p 76 src/dps8/doAppendCycleIndirectWordFetch.h word1 p = 0; p 97 src/dps8/doAppendCycleIndirectWordFetch.h if (! ucCacheCheck (this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) p 296 src/dps8/doAppendCycleIndirectWordFetch.h p = cpu.SDW->P; p 399 src/dps8/doAppendCycleIndirectWordFetch.h ucCacheSave (this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 87 src/dps8/doAppendCycleInstructionFetch.h word1 p = 0; p 151 src/dps8/doAppendCycleInstructionFetch.h if (! ucCacheCheck (this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) p 425 src/dps8/doAppendCycleInstructionFetch.h p = cpu.SDW->P; p 576 src/dps8/doAppendCycleInstructionFetch.h ucCacheSave (this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 645 src/dps8/doAppendCycleInstructionFetch.h cpu.PPR.P = p; p 86 src/dps8/doAppendCycleOperandRead.h word1 p = 0; p 143 src/dps8/doAppendCycleOperandRead.h if (! ucCacheCheck (this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) { p 530 src/dps8/doAppendCycleOperandRead.h p = cpu.SDW->P; p 675 src/dps8/doAppendCycleOperandRead.h ucCacheSave (this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 678 src/dps8/doAppendCycleOperandRead.h hdbgNote ("doAppendCycleOperandRead.h", "cache %d %u %05o:%06o %05o %o %08o %o %o", evcnt, this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 749 src/dps8/doAppendCycleOperandRead.h cpu.PPR.P = p; p 567 src/dps8/dps8.h # define FREE(p) free(p) p 569 src/dps8/dps8.h # define FREE(p) do \ p 571 src/dps8/dps8.h free((p)); \ p 572 src/dps8/dps8.h (p) = NULL; \ p 39 src/dps8/dps8_absi.c #define FREE(p) do \ p 41 src/dps8/dps8_absi.c free((p)); \ p 42 src/dps8/dps8_absi.c (p) = NULL; \ p 47 src/dps8/dps8_absi.c # define FREE(p) free(p) p 268 src/dps8/dps8_absi.c iom_chan_data_t * p = &iom_chan_data[iomUnitIdx][chan]; p 273 src/dps8/dps8_absi.c p->IDCW_CHAN_CMD, p->IDCW_DEV_CODE, p->IDCW_DEV_CMD, p 274 src/dps8/dps8_absi.c p->IDCW_COUNT); p 277 src/dps8/dps8_absi.c if (IS_NOT_IDCW (p)) p 283 src/dps8/dps8_absi.c switch (p->IDCW_DEV_CMD) p 287 src/dps8/dps8_absi.c p->stati = 04000; p 294 src/dps8/dps8_absi.c p->stati = 04000; p 301 src/dps8/dps8_absi.c p->stati = 04000; p 308 src/dps8/dps8_absi.c p->stati = 04000; p 315 src/dps8/dps8_absi.c p->stati = 04000; p 322 src/dps8/dps8_absi.c p->stati = 04000; p 329 src/dps8/dps8_absi.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 330 src/dps8/dps8_absi.c sim_warn ("%s: ABSI unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 331 src/dps8/dps8_absi.c p->stati = 04501; // cmd reject, invalid opcode p 332 src/dps8/dps8_absi.c p->chanStatus = chanStatIncorrectDCW; p 337 src/dps8/dps8_absi.c if (p->IDCW_CHAN_CMD == 0) p 347 src/dps8/dps8_absi.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 350 src/dps8/dps8_absi.c if (IS_IDCW (p)) p 150 src/dps8/dps8_append.c ptw_s * p = cpu.PTWAM + i; p 151 src/dps8/dps8_append.c if (p->USE > N_MODEL_WAM_ENTRIES - 1) p 153 src/dps8/dps8_append.c i, p->USE, N_MODEL_WAM_ENTRIES - 1); p 154 src/dps8/dps8_append.c if (usages[p->USE] != -1) p 156 src/dps8/dps8_append.c i, usages[p->USE], p->USE); p 157 src/dps8/dps8_append.c usages[p->USE] = i; p 382 src/dps8/dps8_append.c sdw_s *p; p 384 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 385 src/dps8/dps8_append.c if (p->FE && segno == p->POINTER) { p 390 src/dps8/dps8_append.c cpu.SDW = p; // export pointer for appending p 392 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); p 394 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 395 src/dps8/dps8_append.c if (p->FE) p 396 src/dps8/dps8_append.c p->USE = u; p 555 src/dps8/dps8_append.c sdw_s *p = & cpu.SDWAM[_n]; p 557 src/dps8/dps8_append.c if (p->FE) p 558 src/dps8/dps8_append.c sim_printf ("SDWAM n:%d %s\n", _n, str_sdw (buf, p)); p 613 src/dps8/dps8_append.c sdw_s * p = & cpu.SDWAM[_n]; p 614 src/dps8/dps8_append.c if (! p->FE || p->USE == 0) { p 617 src/dps8/dps8_append.c * p = cpu.SDW0; p 618 src/dps8/dps8_append.c p->POINTER = segno; p 619 src/dps8/dps8_append.c p->USE = 0; p 620 src/dps8/dps8_append.c p->FE = true; // in use by SDWAM p 628 src/dps8/dps8_append.c cpu.SDW = p; p 633 src/dps8/dps8_append.c DBGAPP ("%s(2):SDWAM[%d]=%s\n", __func__, _n, str_sdw (buf, p)); p 649 src/dps8/dps8_append.c sdw_s *p; p 651 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 652 src/dps8/dps8_append.c if (!p->FE) p 656 src/dps8/dps8_append.c toffset = to_be_discarded_am (p->USE) << 4; p 657 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 661 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the SDWAM! p 662 src/dps8/dps8_append.c * p = cpu.SDW0; // load the SDW p 663 src/dps8/dps8_append.c p->POINTER = segno; p 664 src/dps8/dps8_append.c p->FE = true; // in use p 665 src/dps8/dps8_append.c cpu.SDW = p; // export pointer for appending p 668 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset1 + setno]; p 669 src/dps8/dps8_append.c if (p->FE) p 670 src/dps8/dps8_append.c p->USE = u; p 729 src/dps8/dps8_append.c ptw_s *p; p 732 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 734 src/dps8/dps8_append.c if (p->FE && ((CA >> 6) & 07760) == p->PAGENO && p->POINTER == segno) p 738 src/dps8/dps8_append.c __func__, segno, p->PAGENO, toffset + setno); p 741 src/dps8/dps8_append.c cpu.PTW = p; // export pointer for appending p 743 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); p 746 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 747 src/dps8/dps8_append.c if (p->FE) p 748 src/dps8/dps8_append.c p->USE = u; p 848 src/dps8/dps8_append.c ptw_s * p = & cpu.PTWAM[_n]; p 849 src/dps8/dps8_append.c if (! p->FE || p->USE == 0) p 852 src/dps8/dps8_append.c *p = cpu.PTW0; p 853 src/dps8/dps8_append.c p->PAGENO = (offset >> 6) & 07760; p 854 src/dps8/dps8_append.c p->POINTER = segno; p 855 src/dps8/dps8_append.c p->USE = 0; p 856 src/dps8/dps8_append.c p->FE = true; p 865 src/dps8/dps8_append.c cpu.PTW = p; p 885 src/dps8/dps8_append.c ptw_s *p; p 888 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 889 src/dps8/dps8_append.c if (! p->FE) p 894 src/dps8/dps8_append.c toffset = to_be_discarded_am (p->USE) << 4; p 895 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 901 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the PTWAM p 902 src/dps8/dps8_append.c * p = cpu.PTW0; // load the PTW p 903 src/dps8/dps8_append.c p->PAGENO = (offset >> 6) & 07760; p 904 src/dps8/dps8_append.c p->POINTER = segno; p 905 src/dps8/dps8_append.c p->FE = true; // in use p 906 src/dps8/dps8_append.c cpu.PTW = p; // export pointer for appending p 910 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset1 + setno]; p 911 src/dps8/dps8_append.c if (p->FE) p 912 src/dps8/dps8_append.c p->USE = u; p 151 src/dps8/dps8_cable.c # define FREE(p) free(p) p 214 src/dps8/dps8_cable.c const char * p = str + pat_len; p 223 src/dps8/dps8_cable.c if (rest == 1 && (q = strchr (tags, tolower (*p)))) p 231 src/dps8/dps8_cable.c q = strchr (digits, tolower (*p)); p 235 src/dps8/dps8_cable.c long l = strtol (p, & q, 0); p 249 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[iom_unit_idx][iom_port_num]; p 252 src/dps8/dps8_cable.c p->in_use = false; p 256 src/dps8/dps8_cable.c if (p->in_use) p 261 src/dps8/dps8_cable.c p->in_use = true; p 262 src/dps8/dps8_cable.c p->scu_unit_idx = scu_unit_idx; p 263 src/dps8/dps8_cable.c p->scu_port_num = scu_port_num; p 272 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[scu_unit_idx][scu_port_num]; p 275 src/dps8/dps8_cable.c if (! p->in_use) p 289 src/dps8/dps8_cable.c p->in_use = false; p 298 src/dps8/dps8_cable.c if (p->in_use) p 312 src/dps8/dps8_cable.c p->in_use = true; p 313 src/dps8/dps8_cable.c p->iom_unit_idx = iom_unit_idx; p 314 src/dps8/dps8_cable.c p->iom_port_num = (uint) iom_port_num; p 331 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[cpu_unit_idx][cpu_port_num]; p 334 src/dps8/dps8_cable.c p->in_use = false; p 338 src/dps8/dps8_cable.c if (p->in_use) p 343 src/dps8/dps8_cable.c p->in_use = true; p 344 src/dps8/dps8_cable.c p->scu_unit_idx = scu_unit_idx; p 345 src/dps8/dps8_cable.c p->scu_port_num = scu_port_num; p 346 src/dps8/dps8_cable.c p->scu_subport_num = scu_subport_num; p 356 src/dps8/dps8_cable.c struct scu_to_cpu_s * p = & cables->scu_to_cpu[scu_unit_idx][scu_port_num][scu_subport_num]; p 359 src/dps8/dps8_cable.c if (! p->in_use) p 374 src/dps8/dps8_cable.c p->in_use = false; p 383 src/dps8/dps8_cable.c if (p->in_use) p 398 src/dps8/dps8_cable.c p->in_use = true; p 399 src/dps8/dps8_cable.c p->cpu_unit_idx = cpu_unit_idx; p 400 src/dps8/dps8_cable.c p->cpu_port_num = (uint) cpu_port_num; p 595 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[iom_unit_idx][chan_num]; p 599 src/dps8/dps8_cable.c if (! p->in_use) p 605 src/dps8/dps8_cable.c if (p->ctlr_unit_idx != ctlr_unit_idx) p 608 src/dps8/dps8_cable.c service, ctlr_unit_idx, p->ctlr_unit_idx); p 619 src/dps8/dps8_cable.c p->in_use = false; p 620 src/dps8/dps8_cable.c p->iom_cmd = NULL; p 624 src/dps8/dps8_cable.c if (p->in_use) p 638 src/dps8/dps8_cable.c p->in_use = true; p 639 src/dps8/dps8_cable.c p->ctlr_unit_idx = ctlr_unit_idx; p 640 src/dps8/dps8_cable.c p->port_num = port_num; p 641 src/dps8/dps8_cable.c p->ctlr_type = ctlr_type; p 642 src/dps8/dps8_cable.c p->chan_type = chan_type; p 643 src/dps8/dps8_cable.c p->dev = devp; p 644 src/dps8/dps8_cable.c p->board = unitp; p 645 src/dps8/dps8_cable.c p->iom_cmd = iom_cmd; p 1372 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1373 src/dps8/dps8_cable.c if (p->in_use) p 1383 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1384 src/dps8/dps8_cable.c if (p->in_use) p 1389 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1390 src/dps8/dps8_cable.c if (p->in_use) p 1391 src/dps8/dps8_cable.c scus_used[p->scu_unit_idx] = true; p 1400 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1401 src/dps8/dps8_cable.c if (p->in_use) p 1402 src/dps8/dps8_cable.c ioms_used[p->iom_unit_idx] = true; p 1443 src/dps8/dps8_cable.c struct ctlr_to_iom_s *p = &cables->small ## _to_iom[u][prt]; \ p 1444 src/dps8/dps8_cable.c if (p->in_use) \ p 1473 src/dps8/dps8_cable.c struct dev_to_ctlr_s *p = \ p 1475 src/dps8/dps8_cable.c if (p->in_use) \ p 1490 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1491 src/dps8/dps8_cable.c if (p->in_use) p 1493 src/dps8/dps8_cable.c p->scu_unit_idx + 'A'); p 1499 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1500 src/dps8/dps8_cable.c if (p->in_use) p 1502 src/dps8/dps8_cable.c p->iom_unit_idx + 'A'); p 1508 src/dps8/dps8_cable.c struct iom_to_ctlr_s *p = &cables->iom_to_ctlr[u][c]; p 1509 src/dps8/dps8_cable.c if (p->in_use) p 1511 src/dps8/dps8_cable.c ctlr_type_strs[p->ctlr_type], p 1512 src/dps8/dps8_cable.c p->ctlr_unit_idx); p 1519 src/dps8/dps8_cable.c struct dev_to_ctlr_s *p = \ p 1521 src/dps8/dps8_cable.c if (p->in_use) \ p 1523 src/dps8/dps8_cable.c ctlr_type_strs[p->ctlr_type], \ p 1524 src/dps8/dps8_cable.c p->ctlr_unit_idx, #to_label, u); \ p 1544 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[u][prt]; p 1545 src/dps8/dps8_cable.c if (p->in_use) p 1546 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->iom_port_num); p 1555 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[u][prt]; p 1556 src/dps8/dps8_cable.c if (p->in_use) p 1557 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->scu_unit_idx, p->scu_port_num); p 1568 src/dps8/dps8_cable.c struct scu_to_cpu_s * p = & cables->scu_to_cpu[u][prt][sp]; p 1569 src/dps8/dps8_cable.c if (p->in_use) p 1570 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->cpu_unit_idx, p->cpu_port_num); p 1579 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[u][prt]; p 1580 src/dps8/dps8_cable.c if (p->in_use) p 1582 src/dps8/dps8_cable.c u, prt, p->scu_unit_idx, p->scu_port_num, p->scu_subport_num); p 1593 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[u][c]; p 1594 src/dps8/dps8_cable.c if (p->in_use) p 1596 src/dps8/dps8_cable.c u, c, p->ctlr_unit_idx, p->port_num, ctlr_type_strs[p->ctlr_type], p 1597 src/dps8/dps8_cable.c chan_type_strs[p->chan_type], (void *) p->dev, p 1598 src/dps8/dps8_cable.c (void *) p->board, (void *) p->iom_cmd); p 1608 src/dps8/dps8_cable.c struct ctlr_to_iom_s * p = & cables->small ## _to_iom[u][prt]; \ p 1609 src/dps8/dps8_cable.c if (p->in_use) \ p 1610 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->chan_num); \ p 1662 src/dps8/dps8_cable.c struct ctlr_to_dev_s * p = & cables->from_small ## _to_ ## to_small[u][prt]; \ p 1663 src/dps8/dps8_cable.c if (p->in_use) \ p 1664 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %10p\n", u, prt, p->unit_idx, (void *) p->iom_cmd); \ p 1670 src/dps8/dps8_cable.c struct dev_to_ctlr_s * p = & cables->to_small ## _to_ ## from_small[u]; \ p 1671 src/dps8/dps8_cable.c if (p->in_use) \ p 1672 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %5s\n", u, p->ctlr_unit_idx, \ p 1673 src/dps8/dps8_cable.c p->dev_code, ctlr_type_strs[p->ctlr_type]); \ p 74 src/dps8/dps8_console.c # define FREE(p) free(p) p 709 src/dps8/dps8_console.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan_num]; p 808 src/dps8/dps8_console.c p->charPos = n_chars % 4; p 809 src/dps8/dps8_console.c p->stati = (word12) stati; p 1206 src/dps8/dps8_console.c for (unsigned char * p = csp->keyboardLineBuffer; p < csp->tailp; p ++) p 1207 src/dps8/dps8_console.c console_putchar (conUnitIdx, (char) (*p)); p 1288 src/dps8/dps8_console.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1293 src/dps8/dps8_console.c p->dev_code = p->IDCW_DEV_CODE; p 1294 src/dps8/dps8_console.c p->stati = 0; p 1304 src/dps8/dps8_console.c if (IS_IDCW (p)) { p 1307 src/dps8/dps8_console.c switch (p->IDCW_DEV_CMD) { p 1311 src/dps8/dps8_console.c p->stati = 04000; p 1317 src/dps8/dps8_console.c p->recordResidue --; p 1320 src/dps8/dps8_console.c p->stati = 04000; p 1325 src/dps8/dps8_console.c p->isRead = false; p 1328 src/dps8/dps8_console.c p->recordResidue --; p 1329 src/dps8/dps8_console.c p->stati = 04000; p 1335 src/dps8/dps8_console.c p->recordResidue --; p 1338 src/dps8/dps8_console.c p->stati = 04000; p 1343 src/dps8/dps8_console.c p->isRead = false; p 1346 src/dps8/dps8_console.c p->recordResidue --; p 1347 src/dps8/dps8_console.c p->stati = 04000; p 1361 src/dps8/dps8_console.c p->stati = 04000; p 1374 src/dps8/dps8_console.c p->recordResidue --; p 1377 src/dps8/dps8_console.c p->stati = 04000; p 1382 src/dps8/dps8_console.c p->isRead = false; p 1385 src/dps8/dps8_console.c p->stati = 04000; p 1387 src/dps8/dps8_console.c if (csp->model == m6001 && p->isPCW) { p 1399 src/dps8/dps8_console.c p->stati = 04500; p 1400 src/dps8/dps8_console.c if (csp->model == m6001 && p->isPCW) { p 1409 src/dps8/dps8_console.c p->stati = 04000; p 1416 src/dps8/dps8_console.c p->stati = 04000; p 1421 src/dps8/dps8_console.c sim_debug (DBG_DEBUG, & opc_dev, "%s: Unknown command 0%o\n", __func__, p->IDCW_DEV_CMD); p 1422 src/dps8/dps8_console.c p->stati = 04501; // command reject, invalid instruction code p 1440 src/dps8/dps8_console.c uint tally = p->DDCW_TALLY; p 1441 src/dps8/dps8_console.c uint daddr = p->DDCW_ADDR; p 1480 src/dps8/dps8_console.c uint tally = p->DDCW_TALLY; p 1491 src/dps8/dps8_console.c p->initiate = false; p 1558 src/dps8/dps8_console.c p->stati = 04320; p 1630 src/dps8/dps8_console.c p->stati = 04000; p 1719 src/dps8/dps8_console.c const char * p = opc_config_list[rc].name; p 1721 src/dps8/dps8_console.c if (strcmp (p, "autoaccept") == 0) p 1727 src/dps8/dps8_console.c if (strcmp (p, "noempty") == 0) p 1733 src/dps8/dps8_console.c if (strcmp (p, "attn_flush") == 0) p 1739 src/dps8/dps8_console.c if (strcmp (p, "model") == 0) p 91 src/dps8/dps8_cpu.c # define FREE(p) free(p) p 501 src/dps8/dps8_cpu.c const char * p = cpu_config_list [rc] . name; p 502 src/dps8/dps8_cpu.c if (strcmp (p, "faultbase") == 0) p 504 src/dps8/dps8_cpu.c else if (strcmp (p, "num") == 0) p 506 src/dps8/dps8_cpu.c else if (strcmp (p, "data") == 0) p 508 src/dps8/dps8_cpu.c else if (strcmp (p, "stopnum") == 0) p 523 src/dps8/dps8_cpu.c else if (strcmp (p, "address") == 0) p 525 src/dps8/dps8_cpu.c else if (strcmp (p, "mode") == 0) p 527 src/dps8/dps8_cpu.c else if (strcmp (p, "speed") == 0) p 529 src/dps8/dps8_cpu.c else if (strcmp (p, "port") == 0) { p 536 src/dps8/dps8_cpu.c else if (strcmp (p, "assignment") == 0) p 538 src/dps8/dps8_cpu.c else if (strcmp (p, "interlace") == 0) p 540 src/dps8/dps8_cpu.c else if (strcmp (p, "enable") == 0) p 542 src/dps8/dps8_cpu.c else if (strcmp (p, "init_enable") == 0) p 544 src/dps8/dps8_cpu.c else if (strcmp (p, "store_size") == 0) { p 572 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_cache") == 0) p 574 src/dps8/dps8_cpu.c else if (strcmp (p, "sdwam") == 0) p 576 src/dps8/dps8_cpu.c else if (strcmp (p, "ptwam") == 0) p 578 src/dps8/dps8_cpu.c else if (strcmp (p, "dis_enable") == 0) p 580 src/dps8/dps8_cpu.c else if (strcmp (p, "steady_clock") == 0) p 582 src/dps8/dps8_cpu.c else if (strcmp (p, "halt_on_unimplemented") == 0) p 584 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_wam") == 0) p 586 src/dps8/dps8_cpu.c else if (strcmp (p, "report_faults") == 0) p 588 src/dps8/dps8_cpu.c else if (strcmp (p, "tro_enable") == 0) p 590 src/dps8/dps8_cpu.c else if (strcmp (p, "y2k") == 0) p 592 src/dps8/dps8_cpu.c else if (strcmp (p, "drl_fatal") == 0) p 594 src/dps8/dps8_cpu.c else if (strcmp (p, "useMap") == 0) p 596 src/dps8/dps8_cpu.c else if (strcmp (p, "prom_installed") == 0) p 598 src/dps8/dps8_cpu.c else if (strcmp (p, "hex_mode_installed") == 0) p 600 src/dps8/dps8_cpu.c else if (strcmp (p, "cache_installed") == 0) p 602 src/dps8/dps8_cpu.c else if (strcmp (p, "clock_slave_installed") == 0) p 604 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_emcall") == 0) p 607 src/dps8/dps8_cpu.c else if (strcmp (p, "affinity") == 0) p 618 src/dps8/dps8_cpu.c else if (strcmp (p, "isolts_mode") == 0) p 697 src/dps8/dps8_cpu.c else if (strcmp (p, "nodis") == 0) p 699 src/dps8/dps8_cpu.c else if (strcmp (p, "l68_mode") == 0) p 1928 src/dps8/dps8_cpu.c p 1929 src/dps8/dps8_cpu.c p 3909 src/dps8/dps8_cpu.c void decode_instruction (word36 inst, DCDstruct * p) p 3912 src/dps8/dps8_cpu.c memset (p, 0, sizeof (DCDstruct)); p 3914 src/dps8/dps8_cpu.c p->opcode = GET_OP (inst); // get opcode p 3915 src/dps8/dps8_cpu.c p->opcodeX = GET_OPX(inst); // opcode extension p 3916 src/dps8/dps8_cpu.c p->opcode10 = p->opcode | (p->opcodeX ? 01000 : 0); //-V536 p 3917 src/dps8/dps8_cpu.c p->address = GET_ADDR (inst); // address field from instruction p 3918 src/dps8/dps8_cpu.c p->b29 = GET_A (inst); // "A" the indirect via pointer register flag p 3919 src/dps8/dps8_cpu.c p->i = GET_I (inst); // "I" inhibit interrupt flag p 3920 src/dps8/dps8_cpu.c p->tag = GET_TAG (inst); // instruction tag p 3922 src/dps8/dps8_cpu.c p->info = get_iwb_info (p); // get info for IWB instruction p 3924 src/dps8/dps8_cpu.c if (p->info->flags & IGN_B29) p 3925 src/dps8/dps8_cpu.c p->b29 = 0; // make certain 'a' bit is valid always p 3927 src/dps8/dps8_cpu.c if (p->info->ndes > 0) p 3929 src/dps8/dps8_cpu.c p->b29 = 0; p 3930 src/dps8/dps8_cpu.c p->tag = 0; p 3931 src/dps8/dps8_cpu.c if (p->info->ndes > 1) p 2368 src/dps8/dps8_cpu.h void decode_instruction (word36 inst, DCDstruct * p); p 56 src/dps8/dps8_crdpun.c # define FREE(p) free(p) p 1144 src/dps8/dps8_crdpun.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1145 src/dps8/dps8_crdpun.c uint dev_code = p->IDCW_DEV_CODE; p 1151 src/dps8/dps8_crdpun.c p -> isRead = false; p 1152 src/dps8/dps8_crdpun.c if (p -> DDCW_TALLY != WORDS_PER_CARD) p 1155 src/dps8/dps8_crdpun.c p -> chanStatus = chanStatIncorrectDCW; p 1156 src/dps8/dps8_crdpun.c p -> stati = 05001; //-V536 // BUG: arbitrary error code; config switch p 1165 src/dps8/dps8_crdpun.c word36 buffer [p -> DDCW_TALLY]; p 1168 src/dps8/dps8_crdpun.c p->initiate = false; p 1172 src/dps8/dps8_crdpun.c log_card(p -> DDCW_TALLY, buffer); p 1175 src/dps8/dps8_crdpun.c parse_card( &pun_state [pun_unit_num], p -> DDCW_TALLY, buffer); p 1177 src/dps8/dps8_crdpun.c p -> stati = 04000; //-V536 p 1183 src/dps8/dps8_crdpun.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1184 src/dps8/dps8_crdpun.c uint dev_code = p->IDCW_DEV_CODE; p 1194 src/dps8/dps8_crdpun.c if (IS_IDCW (p)) { p 1197 src/dps8/dps8_crdpun.c switch (p->IDCW_DEV_CMD) { p 1202 src/dps8/dps8_crdpun.c p->stati = 04000; p 1207 src/dps8/dps8_crdpun.c p->stati = 04000; p 1212 src/dps8/dps8_crdpun.c p->stati = 04000; p 1213 src/dps8/dps8_crdpun.c p->isRead = false; p 1217 src/dps8/dps8_crdpun.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1218 src/dps8/dps8_crdpun.c sim_warn ("%s: PUN unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1219 src/dps8/dps8_crdpun.c p->stati = 04501; // cmd reject, invalid opcode p 1220 src/dps8/dps8_crdpun.c p->chanStatus = chanStatIncorrectDCW; p 1223 src/dps8/dps8_crdpun.c sim_debug (DBG_DEBUG, & pun_dev, "%s: stati %04o\n", __func__, p->stati); p 1353 src/dps8/dps8_crdpun.c const char * p = pun_config_list[rc].name; p 1355 src/dps8/dps8_crdpun.c if (strcmp (p, "logcards") == 0) p 347 src/dps8/dps8_crdrdr.c p 350 src/dps8/dps8_crdrdr.c p 351 src/dps8/dps8_crdrdr.c p 383 src/dps8/dps8_crdrdr.c char * p = str; p 387 src/dps8/dps8_crdrdr.c * hstr ++ = table [(* p) & 0177]; p 388 src/dps8/dps8_crdrdr.c p ++; p 465 src/dps8/dps8_crdrdr.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 468 src/dps8/dps8_crdrdr.c uint unitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 473 src/dps8/dps8_crdrdr.c p 477 src/dps8/dps8_crdrdr.c p 539 src/dps8/dps8_crdrdr.c p->stati = 04201; // hopper empty p 748 src/dps8/dps8_crdrdr.c p->stati = 04000; p 754 src/dps8/dps8_crdrdr.c p->initiate = false; p 755 src/dps8/dps8_crdrdr.c p->stati = 04000; //-V1048 // ok p 756 src/dps8/dps8_crdrdr.c p->tallyResidue = (word12) tally & MASK12; p 757 src/dps8/dps8_crdrdr.c p->charPos = 0; p 911 src/dps8/dps8_crdrdr.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 912 src/dps8/dps8_crdrdr.c uint dev_code = p->IDCW_DEV_CODE; p 918 src/dps8/dps8_crdrdr.c uint unitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 924 src/dps8/dps8_crdrdr.c if (IS_IDCW (p)) { p 928 src/dps8/dps8_crdrdr.c switch (p->IDCW_DEV_CMD) { p 932 src/dps8/dps8_crdrdr.c p->stati = 04000; p 937 src/dps8/dps8_crdrdr.c sim_printf ("Request status %04o\r\n", p->stati); p 944 src/dps8/dps8_crdrdr.c p->stati = 04201; // hopper empty p 945 src/dps8/dps8_crdrdr.c p->tallyResidue = 0; p 954 src/dps8/dps8_crdrdr.c p->stati = 04000; p 959 src/dps8/dps8_crdrdr.c sim_printf ("read binary %04o\r\n", p->stati); p 965 src/dps8/dps8_crdrdr.c p->stati = 04000; p 966 src/dps8/dps8_crdrdr.c p->isRead = false; p 971 src/dps8/dps8_crdrdr.c sim_printf ("reset status %04o\r\n", p->stati); p 977 src/dps8/dps8_crdrdr.c sim_printf ("unknown %o\r\n", p->IDCW_DEV_CMD); p 979 src/dps8/dps8_crdrdr.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 980 src/dps8/dps8_crdrdr.c sim_warn ("%s: RDR unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 981 src/dps8/dps8_crdrdr.c p->stati = 04501; // cmd reject, invalid opcode p 982 src/dps8/dps8_crdrdr.c p->chanStatus = chanStatIncorrectDCW; p 986 src/dps8/dps8_crdrdr.c sim_debug (DBG_DEBUG, & rdr_dev, "%s: stati %04o\n", __func__, p->stati); p 56 src/dps8/dps8_dia.c # define FREE(p) free(p) p 440 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 442 src/dps8/dps8_dia.c devices[chan][p->IDCW_DEV_CODE]; p 507 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 509 src/dps8/dps8_dia.c devices[chan][p->IDCW_DEV_CODE]; p 652 src/dps8/dps8_dia.c uint phys_addr = virtToPhys (p->PCW_PAGE_TABLE_PTR, l66_addr); p 815 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 816 src/dps8/dps8_dia.c p -> stati = 0; p 818 src/dps8/dps8_dia.c switch (p -> IDCW_DEV_CMD) p 822 src/dps8/dps8_dia.c p -> stati = 04000; p 829 src/dps8/dps8_dia.c p -> stati = 04501; p 830 src/dps8/dps8_dia.c p -> chanStatus = chanStatIncorrectDCW; p 831 src/dps8/dps8_dia.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 832 src/dps8/dps8_dia.c sim_warn ("dia daze %o\n", p->IDCW_DEV_CMD); p 854 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 857 src/dps8/dps8_dia.c if (IS_IDCW (p)) p 699 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 706 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 713 src/dps8/dps8_disk.c p->stati = 04510; // Cmd reject, invalid inst. seq. p 721 src/dps8/dps8_disk.c p->initiate = true; p 738 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 743 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 749 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 755 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 772 src/dps8/dps8_disk.c p->initiate = true; p 780 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 785 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 791 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 798 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 815 src/dps8/dps8_disk.c p->initiate = true; p 829 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 836 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 842 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 850 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 858 src/dps8/dps8_disk.c p->stati = 04510; // Invalid instruction sequence p 866 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 878 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 909 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 934 src/dps8/dps8_disk.c p->stati = 04000; p 944 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 952 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 957 src/dps8/dps8_disk.c p->stati = 04510; // Invalid instruction sequence p 962 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 975 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 1011 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 1012 src/dps8/dps8_disk.c p->chanStatus = chanStatIncorrectDCW; p 1018 src/dps8/dps8_disk.c p->stati = 04000; p 1024 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1027 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 1053 src/dps8/dps8_disk.c p->charPos = 0; p 1054 src/dps8/dps8_disk.c p->stati = 04000; p 1056 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1061 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1063 src/dps8/dps8_disk.c p->charPos = 0; p 1064 src/dps8/dps8_disk.c p->stati = 04000; p 1066 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1072 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1075 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 1175 src/dps8/dps8_disk.c p->charPos = 0; p 1176 src/dps8/dps8_disk.c p->stati = 04000; p 1178 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1184 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1189 src/dps8/dps8_disk.c p->charPos = 0; p 1190 src/dps8/dps8_disk.c p->stati = 04000; p 1192 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1207 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1212 src/dps8/dps8_disk.c if (chan == 014) {if_sim_debug (DBG_TRACE, & dsk_dev) { dumpDCW (p->DCW, 0); }} p 1215 src/dps8/dps8_disk.c devUnitIdx = cables->ipc_to_dsk[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1217 src/dps8/dps8_disk.c devUnitIdx = cables->msp_to_dsk[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1233 src/dps8/dps8_disk.c if (p->DCW_18_20_CP == 7) { p 1236 src/dps8/dps8_disk.c switch (p->IDCW_DEV_CMD) { p 1247 src/dps8/dps8_disk.c p->stati = 04000; p 1249 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1260 src/dps8/dps8_disk.c p->recordResidue --; p 1261 src/dps8/dps8_disk.c p->stati = 04000; p 1263 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1274 src/dps8/dps8_disk.c p->recordResidue --; p 1275 src/dps8/dps8_disk.c p->stati = 04000; p 1277 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1288 src/dps8/dps8_disk.c p->recordResidue --; p 1289 src/dps8/dps8_disk.c p->stati = 04000; p 1291 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1302 src/dps8/dps8_disk.c p->recordResidue --; p 1303 src/dps8/dps8_disk.c p->stati = 04000; p 1305 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1316 src/dps8/dps8_disk.c p->recordResidue --; p 1317 src/dps8/dps8_disk.c p->stati = 04000; p 1319 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1330 src/dps8/dps8_disk.c p->recordResidue --; p 1331 src/dps8/dps8_disk.c p->stati = 04000; p 1333 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1345 src/dps8/dps8_disk.c p->recordResidue --; p 1346 src/dps8/dps8_disk.c p->stati = 04000; p 1348 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1359 src/dps8/dps8_disk.c p->recordResidue --; p 1360 src/dps8/dps8_disk.c p->stati = 04000; p 1362 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1374 src/dps8/dps8_disk.c p->recordResidue --; p 1375 src/dps8/dps8_disk.c p->stati = 04000; p 1377 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1387 src/dps8/dps8_disk.c p->stati = 04000; p 1389 src/dps8/dps8_disk.c p->recordResidue --; p 1390 src/dps8/dps8_disk.c p->initiate = false; // According to POLTS p 1391 src/dps8/dps8_disk.c p->isRead = false; p 1393 src/dps8/dps8_disk.c if (p->IDCW_DEV_CODE == 077) { p 1394 src/dps8/dps8_disk.c p->stati = 04502; // invalid device code p 1401 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1411 src/dps8/dps8_disk.c p->stati = 04000; p 1413 src/dps8/dps8_disk.c p->recordResidue --; p 1414 src/dps8/dps8_disk.c p->initiate = false; // According to POLTS p 1416 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1429 src/dps8/dps8_disk.c p->stati = 04000; p 1431 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1439 src/dps8/dps8_disk.c sim_printf ("// Disk unknown command %o\r\n", p->IDCW_DEV_CMD); p 1441 src/dps8/dps8_disk.c p->stati = 04501; p 1442 src/dps8/dps8_disk.c p->chanStatus = chanStatIncorrectDCW; p 1443 src/dps8/dps8_disk.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1444 src/dps8/dps8_disk.c sim_warn ("%s: Unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 558 src/dps8/dps8_eis.c #define EISADDR_IDX(p) ((p) - cpu.currentEISinstruction.addr) p 560 src/dps8/dps8_eis.c static void EISWriteCache (EISaddr * p) p 562 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISWriteCache addr %06o\n", p->cachedAddr); p 565 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty) p 567 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 569 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 570 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 575 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 579 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], p -> SNR, p -> cachedAddr + i); p 582 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 585 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 587 src/dps8/dps8_eis.c Write1 (p->cachedAddr+i, p -> cachedParagraph[i], true); p 588 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 603 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 607 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], cpu.TPR.TSR, p -> cachedAddr + i); p 610 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 613 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 615 src/dps8/dps8_eis.c Write1 (p->cachedAddr+i, p -> cachedParagraph[i], false); p 616 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 620 src/dps8/dps8_eis.c p -> cacheDirty = false; p 624 src/dps8/dps8_eis.c static void EISReadCache (EISaddr * p, word18 address) p 634 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cachedAddr == paragraphAddress) p 639 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty && p -> cachedAddr != paragraphAddress) p 641 src/dps8/dps8_eis.c EISWriteCache (p); p 644 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 646 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 647 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 649 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 651 src/dps8/dps8_eis.c Read8 (paragraphAddress, p -> cachedParagraph, true); p 658 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], p -> SNR, paragraphAddress + i); p 670 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 672 src/dps8/dps8_eis.c Read8 (paragraphAddress, p -> cachedParagraph, false); p 678 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], cpu.TPR.TSR, paragraphAddress + i); p 681 src/dps8/dps8_eis.c p -> cacheValid = true; p 682 src/dps8/dps8_eis.c p -> cacheDirty = false; p 684 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 685 src/dps8/dps8_eis.c p -> cachedAddr = paragraphAddress; p 689 src/dps8/dps8_eis.c static void EISWriteIdx (EISaddr *p, uint n, word36 data, bool flush) p 692 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 697 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISWriteIdx addr %06o n %u\n", p->address, n); p 698 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 705 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty && p -> cachedAddr != paragraphAddress) p 707 src/dps8/dps8_eis.c EISWriteCache (p); p 709 src/dps8/dps8_eis.c if ((! p -> cacheValid) || p -> cachedAddr != paragraphAddress) p 711 src/dps8/dps8_eis.c EISReadCache (p, paragraphAddress); p 713 src/dps8/dps8_eis.c p -> cacheDirty = true; p 714 src/dps8/dps8_eis.c p -> wordDirty[paragraphOffset] = true; p 715 src/dps8/dps8_eis.c p -> cachedParagraph [paragraphOffset] = data; p 716 src/dps8/dps8_eis.c p -> cachedAddr = paragraphAddress; p 723 src/dps8/dps8_eis.c EISWriteCache (p); p 727 src/dps8/dps8_eis.c static word36 EISReadIdx (EISaddr * p, uint n) p 730 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 736 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 737 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISReadIdx %ld addr %06o n %u\n", eisaddr_idx, p->address, n); p 738 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 745 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cachedAddr == paragraphAddress) p 747 src/dps8/dps8_eis.c return p -> cachedParagraph [paragraphOffset]; p 749 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty) p 751 src/dps8/dps8_eis.c EISWriteCache (p); p 753 src/dps8/dps8_eis.c EISReadCache (p, paragraphAddress); p 754 src/dps8/dps8_eis.c return p -> cachedParagraph [paragraphOffset]; p 757 src/dps8/dps8_eis.c static word36 EISRead (EISaddr * p) p 760 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 765 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISRead addr %06o\n", p->address); p 767 src/dps8/dps8_eis.c return EISReadIdx (p, 0); p 771 src/dps8/dps8_eis.c p 774 src/dps8/dps8_eis.c p 778 src/dps8/dps8_eis.c p 782 src/dps8/dps8_eis.c p 787 src/dps8/dps8_eis.c static void EISReadPage (EISaddr * p, uint n, word36 * data) p 790 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 794 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 807 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 809 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 810 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 824 src/dps8/dps8_eis.c __func__, data [i], p -> SNR, addressN + i); p 849 src/dps8/dps8_eis.c static void EISWritePage (EISaddr * p, uint n, word36 * data) p 852 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 856 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 869 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 871 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 872 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 886 src/dps8/dps8_eis.c __func__, data [i], p -> SNR, addressN + i); p 1034 src/dps8/dps8_eis.c static word9 EISget49 (EISaddr * p, int * pos, int tn) p 1043 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 1047 src/dps8/dps8_eis.c p -> address = (p -> address + 1) & AMASK; p 1049 src/dps8/dps8_eis.c p -> data = EISRead (p); // read it from memory p 1053 src/dps8/dps8_eis.c p -> data = EISRead (p); // read data word from memory p 1060 src/dps8/dps8_eis.c c = get4 (p -> data, * pos); p 1063 src/dps8/dps8_eis.c c = get9 (p -> data, * pos); p 1071 src/dps8/dps8_eis.c static bool EISgetBitRWN (EISaddr * p, bool flush) p 1074 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 1078 src/dps8/dps8_eis.c int baseCharPosn = (p -> cPos * 9); // 9-bit char bit position p 1079 src/dps8/dps8_eis.c int baseBitPosn = baseCharPosn + p -> bPos; p 1090 src/dps8/dps8_eis.c word18 saveAddr = p -> address; p 1091 src/dps8/dps8_eis.c p -> address += (uint) woff; p 1094 src/dps8/dps8_eis.c p -> data = EISRead (p); // read data word from memory p 1096 src/dps8/dps8_eis.c if (p -> mode == eRWreadBit) p 1098 src/dps8/dps8_eis.c p -> bit = getbits36_1 (p -> data, (uint) bitPosn); p 1100 src/dps8/dps8_eis.c else if (p -> mode == eRWwriteBit) p 1102 src/dps8/dps8_eis.c p -> data = setbits36_1 (p -> data, (uint) bitPosn, p -> bit); p 1104 src/dps8/dps8_eis.c EISWriteIdx (p, 0, p -> data, flush); // write data word to memory p 1107 src/dps8/dps8_eis.c p->last_bit_posn = bitPosn; p 1112 src/dps8/dps8_eis.c p -> address = saveAddr; p 1114 src/dps8/dps8_eis.c return p -> bit; p 5023 src/dps8/dps8_eis.c word9 *p = e->inBuffer; // p points to position in inBuffer where 4-bit chars are stored p 5113 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5134 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5153 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5160 src/dps8/dps8_eis.c *p++ = c; // the "easy" one p 5167 src/dps8/dps8_eis.c for (word9 *q = e->inBuffer; q < p; q ++) p 5184 src/dps8/dps8_eis.c word9 * p = e -> inBuffer; p 5198 src/dps8/dps8_eis.c * p ++ = c; p 6460 src/dps8/dps8_eis.c EISaddr *p = &e->ADDR2; p 6462 src/dps8/dps8_eis.c EISaddr *p = e->mopAddress; p 6466 src/dps8/dps8_eis.c p->data = EISRead(p); // read data word from memory p 6473 src/dps8/dps8_eis.c p->data = EISRead(&e->ADDR2); // read it from memory p 6476 src/dps8/dps8_eis.c PNL (p->data = EISRead(e->mopAddress)); // read it from memory p 6479 src/dps8/dps8_eis.c p->data = EISRead(e->mopAddress); // read it from memory p 6482 src/dps8/dps8_eis.c p->data = EISRead(e->mopAddress); // read it from memory p 6487 src/dps8/dps8_eis.c word9 mop9 = (word9) get9 (p -> data, e -> mopPos); // get 9-bit mop p 7465 src/dps8/dps8_eis.c static void EISwrite4(EISaddr *p, int *pos, word4 char4) p 7472 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 7476 src/dps8/dps8_eis.c p->address = (p->address + 1) & AMASK; // goto next dstAddr in memory p 7480 src/dps8/dps8_eis.c w = EISRead(p); // read dst memory into w p 7519 src/dps8/dps8_eis.c EISWriteIdx(p, 0, w, true); // XXX this is the inefficient part! p 7528 src/dps8/dps8_eis.c static void EISwrite9(EISaddr *p, int *pos, word9 char9) p 7535 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 7539 src/dps8/dps8_eis.c p->address = (p->address + 1) & AMASK; // goto next dstAddr in memory p 7543 src/dps8/dps8_eis.c w = EISRead(p); // read dst memory into w p 7566 src/dps8/dps8_eis.c EISWriteIdx (p, 0, w, true); // XXX this is the inefficient part! p 7575 src/dps8/dps8_eis.c static void EISwrite49(EISaddr *p, int *pos, int tn, word9 c49) p 7580 src/dps8/dps8_eis.c EISwrite4(p, pos, (word4) c49); p 7583 src/dps8/dps8_eis.c EISwrite9(p, pos, c49); p 8149 src/dps8/dps8_eis.c static bool EISgetBitRWNR (EISaddr * p, bool flush) p 8151 src/dps8/dps8_eis.c int baseCharPosn = (p -> cPos * 9); // 9-bit char bit position p 8152 src/dps8/dps8_eis.c int baseBitPosn = baseCharPosn + p -> bPos; p 8173 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 8179 src/dps8/dps8_eis.c word18 saveAddr = p -> address; p 8182 src/dps8/dps8_eis.c p->address = (word18) (((word18s) p->address) + (word18s) woff); p 8185 src/dps8/dps8_eis.c p -> data = EISRead (p); // read data word from memory p 8187 src/dps8/dps8_eis.c if (p -> mode == eRWreadBit) p 8189 src/dps8/dps8_eis.c p -> bit = getbits36_1 (p -> data, (uint) bitPosn); p 8191 src/dps8/dps8_eis.c else if (p -> mode == eRWwriteBit) p 8194 src/dps8/dps8_eis.c p -> data = setbits36_1 (p -> data, (uint) bitPosn, p -> bit); p 8196 src/dps8/dps8_eis.c EISWriteIdx (p, 0, p -> data, flush); // write data word to memory p 8199 src/dps8/dps8_eis.c p->last_bit_posn = bitPosn; p 8204 src/dps8/dps8_eis.c p -> address = saveAddr; p 8206 src/dps8/dps8_eis.c return p -> bit; p 8789 src/dps8/dps8_eis.c static bool EISgetBit(EISaddr *p, int *cpos, int *bpos) p 8792 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 8796 src/dps8/dps8_eis.c if (!p) p 8813 src/dps8/dps8_eis.c p->address += 1; p 8814 src/dps8/dps8_eis.c p->address &= AMASK; p 8819 src/dps8/dps8_eis.c p->data = EISRead(p); // read data word from memory p 8823 src/dps8/dps8_eis.c bool b = getbits36_1 (p->data, (uint) bitPosn) != 0; p 8981 src/dps8/dps8_eis.c p 8984 src/dps8/dps8_eis.c p 8995 src/dps8/dps8_eis.c p 8998 src/dps8/dps8_eis.c p 9038 src/dps8/dps8_eis.c p 9047 src/dps8/dps8_eis.c p 9050 src/dps8/dps8_eis.c p 9060 src/dps8/dps8_eis.c p 9064 src/dps8/dps8_eis.c p 9088 src/dps8/dps8_eis.c p 9705 src/dps8/dps8_eis.c p 9710 src/dps8/dps8_eis.c p 9714 src/dps8/dps8_eis.c p 9730 src/dps8/dps8_eis.c p 9732 src/dps8/dps8_eis.c p 9739 src/dps8/dps8_eis.c p 9742 src/dps8/dps8_eis.c p 9853 src/dps8/dps8_eis.c p 9857 src/dps8/dps8_eis.c p 9883 src/dps8/dps8_eis.c p 9897 src/dps8/dps8_eis.c p 116 src/dps8/dps8_fnp2.c # define FREE(p) free(p) p 802 src/dps8/dps8_fnp2.c uvClientData * p = linep->line_client->data; p 806 src/dps8/dps8_fnp2.c if (p && p->telnetp && linep->was_CR && kar == 0) p 1197 src/dps8/dps8_fnp2.c uvClientData * p = client->data; p 1198 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].stations[p->stationNo].EORReceived = true; p 1199 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].stations[p->stationNo].hdr_sent = false; p 2084 src/dps8/dps8_fnp2.c struct fw_entry_s * p = fw_entries + i; p 2086 src/dps8/dps8_fnp2.c if (p->line_0 == p->line_1) p 2089 src/dps8/dps8_fnp2.c decodefnp (p->line_0) + 'a', p 2090 src/dps8/dps8_fnp2.c decodeline (p->line_0), p 2091 src/dps8/dps8_fnp2.c (p->ipaddr>>24) & 255, p 2092 src/dps8/dps8_fnp2.c (p->ipaddr>>16) & 255, p 2093 src/dps8/dps8_fnp2.c (p->ipaddr>>8) & 255, p 2094 src/dps8/dps8_fnp2.c p->ipaddr & 255, p 2095 src/dps8/dps8_fnp2.c p->cidr, p 2096 src/dps8/dps8_fnp2.c p->accept ? "accept" : "deny"); p 2101 src/dps8/dps8_fnp2.c decodefnp (p->line_0) + 'a', p 2102 src/dps8/dps8_fnp2.c decodeline (p->line_0), p 2103 src/dps8/dps8_fnp2.c decodefnp (p->line_1) + 'a', p 2104 src/dps8/dps8_fnp2.c decodeline (p->line_1), p 2105 src/dps8/dps8_fnp2.c (p->ipaddr>>24) & 255, p 2106 src/dps8/dps8_fnp2.c (p->ipaddr>>16) & 255, p 2107 src/dps8/dps8_fnp2.c (p->ipaddr>>8) & 255, p 2108 src/dps8/dps8_fnp2.c p->ipaddr & 255, p 2109 src/dps8/dps8_fnp2.c p->cidr, p 2110 src/dps8/dps8_fnp2.c p->accept ? "accept" : "deny"); p 2288 src/dps8/dps8_fnp2.c p 2289 src/dps8/dps8_fnp2.c p 2291 src/dps8/dps8_fnp2.c p 2294 src/dps8/dps8_fnp2.c p 2575 src/dps8/dps8_fnp2.c uvClientData * p = client->data; p 2576 src/dps8/dps8_fnp2.c p->assoc = true; p 2577 src/dps8/dps8_fnp2.c p->fnpno = fnpno; p 2578 src/dps8/dps8_fnp2.c p->lineno = lineno; p 2585 src/dps8/dps8_fnp2.c sprintf ((char *) buf, "DPS8/M 3270 connection to %c.%03d.%ld ttype %s\n", fnpno+'a',lineno, (long)p->stationNo, p->ttype); p 2586 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].selDevChar = addr_map[p->stationNo]; p 2598 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2599 src/dps8/dps8_fnp2.c uint fnpno = p -> fnpno; p 2600 src/dps8/dps8_fnp2.c uint lineno = p -> lineno; p 2659 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2660 src/dps8/dps8_fnp2.c uint fnpno = p->fnpno; p 2661 src/dps8/dps8_fnp2.c uint lineno = p->lineno; p 2662 src/dps8/dps8_fnp2.c uint stn_no = p->stationNo; p 2780 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2792 src/dps8/dps8_fnp2.c if (p->nPos >= sizeof(p->buffer) - 1) p 2800 src/dps8/dps8_fnp2.c if (p->nPos) //-V547 p 2804 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; // remove char from buffer p 2805 src/dps8/dps8_fnp2.c p->nPos -= 1; // back up buffer pointer p 2813 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; p 2821 src/dps8/dps8_fnp2.c fnpuv_start_writestr (client, (unsigned char *) p->buffer); p 2835 src/dps8/dps8_fnp2.c p->buffer[p->nPos++] = (char) kar; p 2844 src/dps8/dps8_fnp2.c if (p->nPos) p 2848 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; // remove char from buffer p 2849 src/dps8/dps8_fnp2.c p->nPos -= 1; // back up buffer pointer p 2857 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; p 2865 src/dps8/dps8_fnp2.c fnpuv_start_writestr (client, (unsigned char *) p->buffer); p 2877 src/dps8/dps8_fnp2.c char cpy [p->nPos + 1]; p 2878 src/dps8/dps8_fnp2.c memcpy (cpy, p->buffer, p->nPos); p 2879 src/dps8/dps8_fnp2.c cpy [p->nPos] = 0; p 2882 src/dps8/dps8_fnp2.c p->nPos = 0; p 2937 src/dps8/dps8_fnp2.c p->assoc = true; p 2938 src/dps8/dps8_fnp2.c p->fnpno = fnp_unit_idx; p 2939 src/dps8/dps8_fnp2.c p->lineno = lineno; p 2940 src/dps8/dps8_fnp2.c p->read_cb = fnpuv_associated_readcb; p 2941 src/dps8/dps8_fnp2.c p->write_cb = fnpuv_start_write; p 2942 src/dps8/dps8_fnp2.c p->write_actual_cb = fnpuv_start_write_actual; p 2957 src/dps8/dps8_fnp2.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 2958 src/dps8/dps8_fnp2.c sim_printf ("CONNECT %s to %c.h%03d\n", inet_ntoa (p -> sin_addr), fnp_unit_idx +'a', lineno); p 74 src/dps8/dps8_fnp2_iomcmd.c static inline void l_putbits36_1 (vol word36 * x, uint p, word1 val) p 77 src/dps8/dps8_fnp2_iomcmd.c int shift = 36 - (int) p - (int) n; p 79 src/dps8/dps8_fnp2_iomcmd.c sim_printf ("l_putbits36_1: bad args (%012"PRIo64",pos=%d)\n", *x, p); p 1182 src/dps8/dps8_fnp2_iomcmd.c uvClientData * p = linep->line_client->data; p 1183 src/dps8/dps8_fnp2_iomcmd.c (* p->write_cb) (linep->line_client, data, tally); p 2430 src/dps8/dps8_fnp2_iomcmd.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 2432 src/dps8/dps8_fnp2_iomcmd.c switch (p->IDCW_DEV_CMD) { p 2434 src/dps8/dps8_fnp2_iomcmd.c p->stati = 04000; p 2442 src/dps8/dps8_fnp2_iomcmd.c p->stati = 04501; // cmd reject, invalid opcode p 2443 src/dps8/dps8_fnp2_iomcmd.c p->chanStatus = chanStatIncorrectDCW; p 2444 src/dps8/dps8_fnp2_iomcmd.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 2445 src/dps8/dps8_fnp2_iomcmd.c sim_warn ("%s: FNP unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 2457 src/dps8/dps8_fnp2_iomcmd.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 2460 src/dps8/dps8_fnp2_iomcmd.c if (IS_IDCW (p)) { p 959 src/dps8/dps8_iom.c iom_unit_data_t * p = iom_unit_data + iom_unit_idx; p 962 src/dps8/dps8_iom.c switch (p -> config_sw_OS) p 975 src/dps8/dps8_iom.c switch (p -> configSwBootloadCardTape) p 986 src/dps8/dps8_iom.c sim_printf ("IOM Base Address: %03o(8)\n", p -> configSwIomBaseAddress); p 987 src/dps8/dps8_iom.c sim_printf ("Multiplex Base Address: %04o(8)\n", p -> configSwMultiplexBaseAddress); p 989 src/dps8/dps8_iom.c sim_printf ("Bootload Tape Channel: %02o(8)\n", p -> configSwBootloadMagtapeChan); p 990 src/dps8/dps8_iom.c sim_printf ("Bootload Card Channel: %02o(8)\n", p -> configSwBootloadCardrdrChan); p 991 src/dps8/dps8_iom.c sim_printf ("Bootload Port: %02o(8)\n", p -> configSwBootloadPort); p 995 src/dps8/dps8_iom.c sim_printf (" %03o", p -> configSwPortAddress[i]); p 999 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortInterface[i]); p 1003 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortEnable[i]); p 1007 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortSysinitEnable[i]); p 1011 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortHalfsize[i]); p 1015 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortStoresize[i]); p 1124 src/dps8/dps8_iom.c iom_unit_data_t * p = iom_unit_data + iom_unit_idx; p 1147 src/dps8/dps8_iom.c p -> config_sw_model = (enum config_sw_model_t) v; p 1153 src/dps8/dps8_iom.c p -> config_sw_OS = (enum config_sw_OS_t) v; p 1159 src/dps8/dps8_iom.c p -> configSwBootloadCardTape = (enum config_sw_bootload_device_e) v; p 1165 src/dps8/dps8_iom.c p -> configSwIomBaseAddress = (word12) v; p 1187 src/dps8/dps8_iom.c p -> configSwMultiplexBaseAddress = (word9) v; p 1193 src/dps8/dps8_iom.c p -> configSwBootloadMagtapeChan = (word6) v; p 1199 src/dps8/dps8_iom.c p -> configSwBootloadCardrdrChan = (word6) v; p 1205 src/dps8/dps8_iom.c p -> configSwBootloadPort = (word3) v; p 1217 src/dps8/dps8_iom.c p -> configSwPortAddress[port_num] = (uint) v; p 1223 src/dps8/dps8_iom.c p -> configSwPortInterface[port_num] = (uint) v; p 1229 src/dps8/dps8_iom.c p -> configSwPortEnable[port_num] = (uint) v; p 1235 src/dps8/dps8_iom.c p -> configSwPortSysinitEnable[port_num] = (uint) v; p 1241 src/dps8/dps8_iom.c p -> configSwPortHalfsize[port_num] = (uint) v; p 1247 src/dps8/dps8_iom.c p -> configSwPortStoresize[port_num] = (uint) v; p 1717 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1724 src/dps8/dps8_iom.c putbits36_12 (& word1, 0, p -> stati); p 1730 src/dps8/dps8_iom.c putbits36_1 (& word1, 16, p -> initiate ? 1 : 0); p 1732 src/dps8/dps8_iom.c putbits36_3 (& word1, 18, (word3) p -> chanStatus); p 1739 src/dps8/dps8_iom.c putbits36_6 (& word1, 30, p -> recordResidue); p 1747 src/dps8/dps8_iom.c putbits36_3 (& word2, 18, p -> charPos); p 1748 src/dps8/dps8_iom.c putbits36_1 (& word2, 21, p -> isRead ? 1 : 0); p 1749 src/dps8/dps8_iom.c putbits36_12 (& word2, 24, p -> tallyResidue); p 1866 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1867 src/dps8/dps8_iom.c word24 pgte = build_DDSPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1869 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, pgte, (word36 *) & p -> PTW_DCW, __func__); p 1870 src/dps8/dps8_iom.c if ((p -> PTW_DCW & 0740000777747) != 04llu) p 1873 src/dps8/dps8_iom.c (unsigned long long)pgte, (unsigned long long)p -> PTW_DCW); p 1903 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1904 src/dps8/dps8_iom.c word24 pgte = build_IDSPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1905 src/dps8/dps8_iom.c p -> SEG, p 1907 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, pgte, (word36 *) & p -> PTW_DCW, __func__); p 1908 src/dps8/dps8_iom.c if ((p -> PTW_DCW & 0740000777747) != 04llu) p 1910 src/dps8/dps8_iom.c __func__, chan, addr, (unsigned long long)p -> PTW_DCW); p 1939 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1940 src/dps8/dps8_iom.c word24 addr = build_LPWPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1941 src/dps8/dps8_iom.c p -> SEG, p 1942 src/dps8/dps8_iom.c (p -> LPW_DCW_PTR >> 10) & MASK8); p 1943 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> PTW_LPW, __func__); p 1944 src/dps8/dps8_iom.c if ((p -> PTW_LPW & 0740000777747) != 04llu) p 1946 src/dps8/dps8_iom.c __func__, chan, addr, (unsigned long long)p -> PTW_LPW); p 1967 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1969 src/dps8/dps8_iom.c if (p -> masked) p 1972 src/dps8/dps8_iom.c if (p -> PCW_63_PTP && p -> PCW_64_PGE) p 1975 src/dps8/dps8_iom.c daddr = ((uint) getbits36_14 (p -> PTW_DCW, 4) << 10) | (daddr & MASK10); p 1995 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1997 src/dps8/dps8_iom.c if (p->masked) p 2002 src/dps8/dps8_iom.c p->initiate = false; p 2004 src/dps8/dps8_iom.c uint tally = p->DDCW_TALLY; p 2005 src/dps8/dps8_iom.c uint daddr = p->DDCW_ADDR; p 2009 src/dps8/dps8_iom.c p->tallyResidue = (word12) tally; p 2013 src/dps8/dps8_iom.c while (p->tallyResidue) { p 2017 src/dps8/dps8_iom.c if (! IS_IONTP (p)) { p 2018 src/dps8/dps8_iom.c if (p->PCW_63_PTP && p->PCW_64_PGE) { p 2020 src/dps8/dps8_iom.c word24 addr = ((word24) (getbits36_14 (p -> PTW_DCW, 4) << 10)) | (daddr & MASK10); p 2030 src/dps8/dps8_iom.c uint daddr2 = daddr | (uint) p->ADDR_EXT << 18; p 2036 src/dps8/dps8_iom.c p->tallyResidue --; p 2041 src/dps8/dps8_iom.c while (p -> tallyResidue) { p 2042 src/dps8/dps8_iom.c if (IS_IONTP (p)) { p 2045 src/dps8/dps8_iom.c if (p -> PCW_63_PTP && p -> PCW_64_PGE) { p 2047 src/dps8/dps8_iom.c word24 addr = ((word24) (getbits36_14 (p -> PTW_DCW, 4) << 10)) | (daddr & MASK10); p 2058 src/dps8/dps8_iom.c uint daddr2 = daddr | (uint) p -> ADDR_EXT << 18; p 2063 src/dps8/dps8_iom.c p->tallyResidue --; p 2073 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2076 src/dps8/dps8_iom.c p -> chanMode = cm1; p 2082 src/dps8/dps8_iom.c if (p -> PCW_64_PGE == 0) p 2085 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0) p 2087 src/dps8/dps8_iom.c p -> chanMode = cm1e; // AE 0 p 2091 src/dps8/dps8_iom.c p -> chanMode = cm2e; // AE 1 p 2097 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0) p 2100 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0) p 2102 src/dps8/dps8_iom.c p -> chanMode = cm1; // AE 0, REL 0 p 2106 src/dps8/dps8_iom.c p -> chanMode = cm3a; // AE 0, REL 1 p 2113 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0) p 2115 src/dps8/dps8_iom.c p -> chanMode = cm3b; // AE 1, REL 0 p 2119 src/dps8/dps8_iom.c p -> chanMode = cm4; // AE 1, REL 1 p 2127 src/dps8/dps8_iom.c switch (p -> chanMode) p 2130 src/dps8/dps8_iom.c if (p -> TDCW_32_PDTA) p 2132 src/dps8/dps8_iom.c p -> chanMode = cm2; p 2135 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2136 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2137 src/dps8/dps8_iom.c p -> chanMode = cm4; // 33, 35 p 2139 src/dps8/dps8_iom.c p -> chanMode = cm3b; // 33, !35 p 2141 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2142 src/dps8/dps8_iom.c p -> chanMode = cm3a; // !33, 35 p 2144 src/dps8/dps8_iom.c p -> chanMode = cm2; // !33, !35 p 2148 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2149 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2150 src/dps8/dps8_iom.c p -> chanMode = cm4; // 33, 35 p 2152 src/dps8/dps8_iom.c p -> chanMode = cm3b; // 33, !35 p 2154 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2155 src/dps8/dps8_iom.c p -> chanMode = cm3a; // !33, 35 p 2157 src/dps8/dps8_iom.c p -> chanMode = cm2; // !33, !35 p 2161 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2162 src/dps8/dps8_iom.c p -> chanMode = cm4; p 2166 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2167 src/dps8/dps8_iom.c p -> chanMode = cm4; p 2171 src/dps8/dps8_iom.c p -> chanMode = cm5; p 2179 src/dps8/dps8_iom.c if (p -> chanMode == cm1e && p -> TDCW_33_EC) p 2180 src/dps8/dps8_iom.c p -> chanMode = cm2e; p 2192 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2195 src/dps8/dps8_iom.c iom_core_write (iom_unit_idx, chanLoc + IOM_MBX_LPW, p -> LPW, __func__); p 2201 src/dps8/dps8_iom.c iom_core_write (iom_unit_idx, chanLoc + IOM_MBX_LPWX, p -> LPWX, __func__); p 2261 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2263 src/dps8/dps8_iom.c if (p->LPW_21_NC) p 2265 src/dps8/dps8_iom.c else if (p->LPW_22_TAL) p 2335 src/dps8/dps8_iom.c sim_printf ("// %s channel LPW %012llo (case %c)\r\n", chanName[chan], p->LPW, updateCase); p 2336 src/dps8/dps8_iom.c sim_printf ("// DCW pointer %06o\r\n", p->LPW_DCW_PTR); p 2337 src/dps8/dps8_iom.c sim_printf ("// RES %o\r\n", p->LPW_18_RES); p 2338 src/dps8/dps8_iom.c sim_printf ("// REL %o\r\n", p->LPW_19_REL); p 2339 src/dps8/dps8_iom.c sim_printf ("// AE %o\r\n", p->LPW_20_AE); p 2340 src/dps8/dps8_iom.c sim_printf ("// NC 21 %o\r\n", p->LPW_21_NC); p 2341 src/dps8/dps8_iom.c sim_printf ("// TAL 22 %o\r\n", p->LPW_22_TAL); p 2342 src/dps8/dps8_iom.c sim_printf ("// REL %o\r\n", p->LPW_23_REL); p 2343 src/dps8/dps8_iom.c sim_printf ("// TALLY %04o\r\n", p->LPW_TALLY); p 2350 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2353 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, chanLoc + IOM_MBX_LPW, (word36 *) & p -> LPW, __func__); p 2355 src/dps8/dps8_iom.c "%s: lpw %08o %012"PRIo64"\n", __func__, chanLoc + IOM_MBX_LPW, p->LPW); p 2357 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = getbits36_18 (p -> LPW, 0); p 2358 src/dps8/dps8_iom.c p -> LPW_18_RES = getbits36_1 (p -> LPW, 18); p 2359 src/dps8/dps8_iom.c p -> LPW_19_REL = getbits36_1 (p -> LPW, 19); p 2360 src/dps8/dps8_iom.c p -> LPW_20_AE = getbits36_1 (p -> LPW, 20); p 2361 src/dps8/dps8_iom.c p -> LPW_21_NC = getbits36_1 (p -> LPW, 21); p 2362 src/dps8/dps8_iom.c p -> LPW_22_TAL = getbits36_1 (p -> LPW, 22); p 2363 src/dps8/dps8_iom.c p -> LPW_23_REL = getbits36_1 (p -> LPW, 23); p 2364 src/dps8/dps8_iom.c p -> LPW_TALLY = getbits36_12 (p -> LPW, 24); p 2368 src/dps8/dps8_iom.c p -> LPWX = 0; p 2369 src/dps8/dps8_iom.c p -> LPWX_BOUND = 0; p 2370 src/dps8/dps8_iom.c p -> LPWX_SIZE = 0; p 2374 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, chanLoc + IOM_MBX_LPWX, (word36 *) & p -> LPWX, __func__); p 2375 src/dps8/dps8_iom.c p -> LPWX_BOUND = getbits36_18 (p -> LPWX, 0); p 2376 src/dps8/dps8_iom.c p -> LPWX_SIZE = getbits36_18 (p -> LPWX, 18); p 2383 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2384 src/dps8/dps8_iom.c p -> DCW_18_20_CP = getbits36_3 (p -> DCW, 18); p 2386 src/dps8/dps8_iom.c if (IS_IDCW (p)) // IDCW p 2388 src/dps8/dps8_iom.c p -> IDCW_DEV_CMD = getbits36_6 (p -> DCW, 0); p 2389 src/dps8/dps8_iom.c p -> IDCW_DEV_CODE = getbits36_6 (p -> DCW, 6); p 2390 src/dps8/dps8_iom.c p -> IDCW_AE = getbits36_6 (p -> DCW, 12); p 2391 src/dps8/dps8_iom.c if (p -> LPW_23_REL) p 2392 src/dps8/dps8_iom.c p -> IDCW_EC = 0; p 2394 src/dps8/dps8_iom.c p -> IDCW_EC = getbits36_1 (p -> DCW, 21); p 2395 src/dps8/dps8_iom.c if (p -> IDCW_EC) p 2396 src/dps8/dps8_iom.c p -> SEG = 1; // pat. step 45 p 2397 src/dps8/dps8_iom.c p -> IDCW_CHAN_CTRL = getbits36_2 (p -> DCW, 22); p 2398 src/dps8/dps8_iom.c p -> IDCW_CHAN_CMD = getbits36_6 (p -> DCW, 24); p 2399 src/dps8/dps8_iom.c p -> IDCW_COUNT = getbits36_6 (p -> DCW, 30); p 2400 src/dps8/dps8_iom.c p->recordResidue = p->IDCW_COUNT; p 2404 src/dps8/dps8_iom.c __func__, p->DCW, p->IDCW_DEV_CMD, cmdNames[p->IDCW_DEV_CMD], p 2405 src/dps8/dps8_iom.c p->IDCW_DEV_CODE, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 2410 src/dps8/dps8_iom.c p -> TDCW_DATA_ADDRESS = getbits36_18 (p -> DCW, 0); p 2411 src/dps8/dps8_iom.c p -> TDCW_31_SEG = getbits36_1 (p -> DCW, 31); p 2412 src/dps8/dps8_iom.c p -> TDCW_32_PDTA = getbits36_1 (p -> DCW, 32); p 2413 src/dps8/dps8_iom.c p -> TDCW_33_PDCW = getbits36_1 (p -> DCW, 33); p 2414 src/dps8/dps8_iom.c p -> TDCW_33_EC = getbits36_1 (p -> DCW, 33); p 2415 src/dps8/dps8_iom.c p -> TDCW_34_RES = getbits36_1 (p -> DCW, 34); p 2416 src/dps8/dps8_iom.c p -> TDCW_35_REL = getbits36_1 (p -> DCW, 35); p 2417 src/dps8/dps8_iom.c p -> DDCW_TALLY = getbits36_12 (p -> DCW, 24); p 2418 src/dps8/dps8_iom.c p -> DDCW_ADDR = getbits36_18 (p -> DCW, 0); p 2419 src/dps8/dps8_iom.c p -> DDCW_22_23_TYPE = getbits36_2 (p -> DCW, 22); p 2422 src/dps8/dps8_iom.c __func__, p->DCW, p->DDCW_TALLY, p->DDCW_ADDR, p->DDCW_22_23_TYPE); p 2427 src/dps8/dps8_iom.c p 2428 src/dps8/dps8_iom.c p 2429 src/dps8/dps8_iom.c p 2430 src/dps8/dps8_iom.c p 2431 src/dps8/dps8_iom.c p 2432 src/dps8/dps8_iom.c p 2433 src/dps8/dps8_iom.c p 2434 src/dps8/dps8_iom.c p 2435 src/dps8/dps8_iom.c p 2437 src/dps8/dps8_iom.c p 2438 src/dps8/dps8_iom.c p 2439 src/dps8/dps8_iom.c p 2440 src/dps8/dps8_iom.c p 2450 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2451 src/dps8/dps8_iom.c putbits36_3 ((word36 *) & p -> DCW, 18, p -> DCW_18_20_CP); p 2456 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2457 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPW, 0, p -> LPW_DCW_PTR); p 2458 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 18, p -> LPW_18_RES); p 2459 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 19, p -> LPW_19_REL); p 2460 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 20, p -> LPW_20_AE); p 2461 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 21, p -> LPW_21_NC); p 2462 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 22, p -> LPW_22_TAL); p 2463 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 23, p -> LPW_23_REL); p 2464 src/dps8/dps8_iom.c putbits36_12 ((word36 *) & p-> LPW, 24, p -> LPW_TALLY); p 2465 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPWX, 0, p -> LPWX_BOUND); p 2466 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPWX, 18, p -> LPWX_SIZE); p 2471 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2473 src/dps8/dps8_iom.c iom_core_read2 (iom_unit_idx, p -> LPW_DCW_PTR, (word36 *) & p -> PCW0, (word36 *) & p -> PCW1, __func__); p 2474 src/dps8/dps8_iom.c p -> PCW_CHAN = getbits36_6 (p -> PCW1, 3); p 2475 src/dps8/dps8_iom.c p -> PCW_AE = getbits36_6 (p -> PCW0, 12); p 2476 src/dps8/dps8_iom.c p -> PCW_21_MSK = getbits36_1 (p -> PCW0, 21); p 2477 src/dps8/dps8_iom.c p -> PCW_PAGE_TABLE_PTR = getbits36_18 (p -> PCW1, 9); p 2478 src/dps8/dps8_iom.c p -> PCW_63_PTP = getbits36_1 (p -> PCW1, 27); p 2479 src/dps8/dps8_iom.c p -> PCW_64_PGE = getbits36_1 (p -> PCW1, 28); p 2480 src/dps8/dps8_iom.c p -> PCW_65_AUX = getbits36_1 (p -> PCW1, 29); p 2481 src/dps8/dps8_iom.c if (p -> PCW_65_AUX) p 2483 src/dps8/dps8_iom.c p -> DCW = p -> PCW0; p 2489 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2490 src/dps8/dps8_iom.c word24 addr = p -> LPW_DCW_PTR & MASK18; p 2493 src/dps8/dps8_iom.c switch (p -> chanMode) p 2499 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> DCW, __func__); p 2508 src/dps8/dps8_iom.c addr += ((word24) p -> LPWX_BOUND << 1); p 2509 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> DCW, __func__); p 2527 src/dps8/dps8_iom.c word24 addr_ = ((word24) (getbits36_14 (p -> PTW_LPW, 4) << 10)) | ((p -> LPW_DCW_PTR) & MASK10); p 2528 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr_, (word36 *) & p -> DCW, __func__); p 2534 src/dps8/dps8_iom.c if (IS_IDCW (p)) p 2537 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> IDCW_DEV_CMD, p -> IDCW_DEV_CODE, p -> IDCW_AE, p 2538 src/dps8/dps8_iom.c p -> IDCW_EC, p -> IDCW_CHAN_CTRL, p -> IDCW_CHAN_CMD, p -> IDCW_COUNT); p 2540 src/dps8/dps8_iom.c if (p -> DDCW_22_23_TYPE == 02) p 2543 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> TDCW_DATA_ADDRESS, p -> TDCW_31_SEG, p 2544 src/dps8/dps8_iom.c p -> TDCW_32_PDTA, p -> TDCW_33_PDCW, p -> TDCW_34_RES, p -> TDCW_35_REL); p 2548 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> DDCW_ADDR, p -> DCW_18_20_CP, p 2549 src/dps8/dps8_iom.c p -> DDCW_22_23_TYPE, p -> DDCW_TALLY); p 2677 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2692 src/dps8/dps8_iom.c if (p -> lsFirst) p 2697 src/dps8/dps8_iom.c p -> wasTDCW = false; p 2698 src/dps8/dps8_iom.c p -> SEG = 0; // pat. FIG. 2, step 44 p 2709 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 0) p 2712 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2717 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 1) p 2722 src/dps8/dps8_iom.c if (p -> LPW_TALLY == 0) p 2725 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2730 src/dps8/dps8_iom.c if (p -> LPW_TALLY > 1) p 2734 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2735 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2739 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2744 src/dps8/dps8_iom.c else if (p -> LPW_TALLY == 1) p 2757 src/dps8/dps8_iom.c if (IS_NOT_IDCW (p)) p 2760 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2785 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 0) p 2789 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2790 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2794 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2799 src/dps8/dps8_iom.c else if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 1) p 2804 src/dps8/dps8_iom.c if (p -> LPW_TALLY == 0) p 2808 src/dps8/dps8_iom.c else if (p -> LPW_TALLY > 1) p 2813 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2814 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2818 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2834 src/dps8/dps8_iom.c if (IS_IDCW (p)) p 2839 src/dps8/dps8_iom.c if (p -> LPW_18_RES) p 2851 src/dps8/dps8_iom.c p -> LPWX_SIZE = p -> LPW_DCW_PTR; p 2857 src/dps8/dps8_iom.c if (p -> lsFirst) p 2858 src/dps8/dps8_iom.c p -> LPWX_SIZE = p -> LPW_DCW_PTR; p 2869 src/dps8/dps8_iom.c if (IS_TDCW (p)) p 2872 src/dps8/dps8_iom.c if (p -> wasTDCW) p 2877 src/dps8/dps8_iom.c p -> wasTDCW = true; p 2881 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = p -> TDCW_DATA_ADDRESS; p 2886 src/dps8/dps8_iom.c p -> LPW_20_AE |= p -> TDCW_33_EC; // TDCW_33_PDCW p 2887 src/dps8/dps8_iom.c p -> LPW_18_RES |= p -> TDCW_34_RES; p 2888 src/dps8/dps8_iom.c p -> LPW_23_REL |= p -> TDCW_35_REL; p 2921 src/dps8/dps8_iom.c if (p -> TDCW_31_SEG) p 2927 src/dps8/dps8_iom.c p -> LPW_TALLY = (p -> LPW_TALLY - 1u) & MASK12; p 2933 src/dps8/dps8_iom.c if (p -> LPW_18_RES && p -> TDCW_33_EC) // same as TDCW_33_PDCW p 2942 src/dps8/dps8_iom.c p -> wasTDCW = false; p 2972 src/dps8/dps8_iom.c p -> DCW_18_20_CP = 07u; p 2996 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0) // UPDATE p 3000 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = (p -> LPW_DCW_PTR + 2u) & MASK18; p 3002 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = (p -> LPW_DCW_PTR + 1u) & MASK18; p 3005 src/dps8/dps8_iom.c p->LPW_TALLY = ((word12) (((word12s) p->LPW_TALLY) - 1)) & MASK12; p 3010 src/dps8/dps8_iom.c if (p -> DDCW_22_23_TYPE == 07u || p -> lsFirst) p 3020 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 || p 3021 src/dps8/dps8_iom.c (IS_TDCW (p))) p 3031 src/dps8/dps8_iom.c p -> lsFirst = false; p 3058 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 3061 src/dps8/dps8_iom.c word36 PCW_DCW = p->DCW; p 3062 src/dps8/dps8_iom.c word1 PCW_LPW_23_REL = p->LPW_23_REL; p 3064 src/dps8/dps8_iom.c p -> chanMode = cm1; p 3065 src/dps8/dps8_iom.c p -> LPW_18_RES = 0; p 3066 src/dps8/dps8_iom.c p -> LPW_20_AE = 0; p 3067 src/dps8/dps8_iom.c p -> LPW_23_REL = 0; p 3071 src/dps8/dps8_iom.c p->isPCW = true; p 3080 src/dps8/dps8_iom.c if (d->chan_type != chan_type_CPI && p -> IDCW_DEV_CMD == 051) { p 3081 src/dps8/dps8_iom.c p->stati = 04501; p 3087 src/dps8/dps8_iom.c p -> stati = 06000; // t, power off/missing p 3098 src/dps8/dps8_iom.c p -> ADDR_EXT = p -> PCW_AE; p 3100 src/dps8/dps8_iom.c p -> lsFirst = true; p 3102 src/dps8/dps8_iom.c p -> tallyResidue = 0; p 3103 src/dps8/dps8_iom.c p -> isRead = true; p 3104 src/dps8/dps8_iom.c p -> charPos = 0; p 3108 src/dps8/dps8_iom.c p -> initiate = true; p 3109 src/dps8/dps8_iom.c p -> chanStatus = chanStatNormal; p 3117 src/dps8/dps8_iom.c p -> dev_code = getbits36_6 (p -> DCW, 6); p 3124 src/dps8/dps8_iom.c if (IS_IDCW (p) && p->IDCW_CHAN_CTRL == CHAN_CTRL_MARKER) { // IDCW marker bit set p 3135 src/dps8/dps8_iom.c if (p->masked) { p 3144 src/dps8/dps8_iom.c p->isPCW = false; p 3151 src/dps8/dps8_iom.c bool idcw_terminate = p -> IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE; p 3183 src/dps8/dps8_iom.c dumpDCW (M[p->LPW_DCW_PTR - 1 + i], p->LPW_23_REL); p 3194 src/dps8/dps8_iom.c if (IS_IDCW (p)) { // IDCW p 3195 src/dps8/dps8_iom.c idcw_terminate = p -> IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE; p 3196 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0 && p -> IDCW_EC == 1) p 3197 src/dps8/dps8_iom.c p -> ADDR_EXT = getbits36_6 (p -> DCW, 12); p 3199 src/dps8/dps8_iom.c p -> tallyResidue = 0; p 3200 src/dps8/dps8_iom.c p -> isRead = true; p 3201 src/dps8/dps8_iom.c p -> charPos = 0; p 3202 src/dps8/dps8_iom.c p -> chanStatus = chanStatNormal; p 3210 src/dps8/dps8_iom.c p -> dev_code = getbits36_6 (p -> DCW, 6); p 3228 src/dps8/dps8_iom.c if (IS_IDCW (p) && p->IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE && p->IDCW_CHAN_CMD == CHAN_CMD_NONDATA) { p 3235 src/dps8/dps8_iom.c if (IS_IOTD (p) && idcw_terminate && rc2 != IOM_CMD_RESIDUE) { p 3245 src/dps8/dps8_iom.c if (IS_NOT_IDCW (p) && rc2 == IOM_CMD_RESIDUE) { p 3246 src/dps8/dps8_iom.c if (p->recordResidue) p 3247 src/dps8/dps8_iom.c p->recordResidue --; p 3248 src/dps8/dps8_iom.c if (p->recordResidue == 0) p 3255 src/dps8/dps8_iom.c if (iomUnitIdx == 1 && chan == 020) sim_printf ("stati %04o\r\n", p->stati); p 3288 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][IOM_CONNECT_CHAN]; p 3289 src/dps8/dps8_iom.c p -> lsFirst = true; p 3313 src/dps8/dps8_iom.c sim_printf ("// PCW %012llo %012llo\r\n", p->PCW0, p->PCW1); p 3314 src/dps8/dps8_iom.c sim_printf ("// Chan info %04o\r\n", p->PCW_CHAN); p 3315 src/dps8/dps8_iom.c sim_printf ("// Addr ext %02o\r\n", p->PCW_AE); p 3316 src/dps8/dps8_iom.c sim_printf ("// 111 %o\r\n", getbits36_3 (p->PCW0, 18)); p 3317 src/dps8/dps8_iom.c sim_printf ("// M %o\r\n", p->PCW_21_MSK); p 3318 src/dps8/dps8_iom.c sim_printf ("// Chan info %08o\r\n", getbits36_14 (p->PCW0, 22)); p 3319 src/dps8/dps8_iom.c sim_printf ("// Pg Tbl Ptr %06o\r\n", p->PCW_PAGE_TABLE_PTR); p 3320 src/dps8/dps8_iom.c sim_printf ("// PTP %o\r\n", p->PCW_63_PTP); p 3321 src/dps8/dps8_iom.c sim_printf ("// PGE %o\r\n", p->PCW_64_PGE); p 3322 src/dps8/dps8_iom.c sim_printf ("// AUX %o\r\n", p->PCW_65_AUX); p 3328 src/dps8/dps8_iom.c iom_chan_data_t * q = & iom_chan_data[iom_unit_idx][p -> PCW_CHAN]; p 3330 src/dps8/dps8_iom.c q -> PCW0 = p -> PCW0; p 3331 src/dps8/dps8_iom.c q -> PCW1 = p -> PCW1; p 3332 src/dps8/dps8_iom.c q -> PCW_CHAN = p -> PCW_CHAN; p 3333 src/dps8/dps8_iom.c q -> PCW_AE = p -> PCW_AE; p 3334 src/dps8/dps8_iom.c q -> PCW_PAGE_TABLE_PTR = p -> PCW_PAGE_TABLE_PTR; p 3335 src/dps8/dps8_iom.c q -> PCW_63_PTP = p -> PCW_63_PTP; p 3336 src/dps8/dps8_iom.c q -> PCW_64_PGE = p -> PCW_64_PGE; p 3337 src/dps8/dps8_iom.c q -> PCW_65_AUX = p -> PCW_65_AUX; p 3338 src/dps8/dps8_iom.c q -> PCW_21_MSK = p -> PCW_21_MSK; p 3339 src/dps8/dps8_iom.c q -> DCW = p -> DCW; p 3343 src/dps8/dps8_iom.c q -> masked = p -> PCW_21_MSK; p 3346 src/dps8/dps8_iom.c sim_warn ("%s: chan %d masked while in use\n", __func__, p -> PCW_CHAN); p 3351 src/dps8/dps8_iom.c sim_warn ("%s: chan %d connect while in use\n", __func__, p -> PCW_CHAN); p 3355 src/dps8/dps8_iom.c setChnConnect (iom_unit_idx, p -> PCW_CHAN); p 3358 src/dps8/dps8_iom.c doPayloadChannel (iom_unit_idx, p -> PCW_CHAN); p 3568 src/dps8/dps8_iom.c iom_chan_data_t * p = &iom_chan_data [i] [j]; p 3569 src/dps8/dps8_iom.c if (p -> start) p 3571 src/dps8/dps8_iom.c p -> start = false; p 97 src/dps8/dps8_iom.h #define IS_IDCW(p) ((p)->DCW_18_20_CP == 07) p 98 src/dps8/dps8_iom.h #define IS_NOT_IDCW(p) ((p)->DCW_18_20_CP != 07) p 99 src/dps8/dps8_iom.h #define IS_TDCW(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 2) p 100 src/dps8/dps8_iom.h #define IS_IOTD(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 0) p 101 src/dps8/dps8_iom.h #define IS_IONTP(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 3) p 389 src/dps8/dps8_math128.c unsigned p; // Product of two digits. p 443 src/dps8/dps8_math128.c p = (unsigned)qhat*(unsigned long long)vn[i]; p 444 src/dps8/dps8_math128.c t = (int32_t) un[i+j] - k - (int32_t) (p & 0xFFFF); p 446 src/dps8/dps8_math128.c k = (int) (p >> 16) - (t >> 16); p 60 src/dps8/dps8_mgp.c #define FREE(p) do \ p 62 src/dps8/dps8_mgp.c free((p)); \ p 63 src/dps8/dps8_mgp.c (p) = NULL; \ p 68 src/dps8/dps8_mgp.c # define FREE(p) free(p) p 128 src/dps8/dps8_mgp.c const unsigned char *p = buf; p 131 src/dps8/dps8_mgp.c h = h * 31 + p[i]; p 349 src/dps8/dps8_mgp.c get_ddcw(iom_chan_data_t *p, uint iom_unit_idx, uint chan, bool *ptro, p 357 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 371 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 376 src/dps8/dps8_mgp.c if (IS_IDCW(p) || IS_TDCW(p)) p 379 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 384 src/dps8/dps8_mgp.c *tally = p->DDCW_TALLY; p 400 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 446 src/dps8/dps8_mgp.c iom_chan_data_t *p = &iom_chan_data[iom_unit_idx][chan]; p 450 src/dps8/dps8_mgp.c p->IDCW_CHAN_CMD, p->IDCW_DEV_CODE, p->IDCW_DEV_CMD, p->IDCW_COUNT); p 453 src/dps8/dps8_mgp.c if (IS_NOT_IDCW(p)) p 463 src/dps8/dps8_mgp.c p->IDCW_DEV_CMD, cmd_name(p->IDCW_DEV_CMD)); p 465 src/dps8/dps8_mgp.c switch (p->IDCW_DEV_CMD) p 469 src/dps8/dps8_mgp.c p->stati = 04000; p 481 src/dps8/dps8_mgp.c = get_ddcw(p, iom_unit_idx, chan, &ptro, expected_tally, &tally); p 529 src/dps8/dps8_mgp.c p 534 src/dps8/dps8_mgp.c p->stati = 04000; /* bogus status, since we're p 548 src/dps8/dps8_mgp.c = get_ddcw(p, iom_unit_idx, chan, &ptro, expected_tally, &tally); p 565 src/dps8/dps8_mgp.c p 572 src/dps8/dps8_mgp.c p->stati = 04000; p 587 src/dps8/dps8_mgp.c p->stati = 04000; p 594 src/dps8/dps8_mgp.c p->stati = 04000; p 602 src/dps8/dps8_mgp.c p->stati = 04000; p 609 src/dps8/dps8_mgp.c p->stati = 04000; p 616 src/dps8/dps8_mgp.c p->stati = 04000; p 623 src/dps8/dps8_mgp.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 626 src/dps8/dps8_mgp.c __func__, p->IDCW_DEV_CMD); p 629 src/dps8/dps8_mgp.c p->stati = 04501; // cmd reject, invalid opcode p 630 src/dps8/dps8_mgp.c p->chanStatus = chanStatIncorrectDCW; p 635 src/dps8/dps8_mgp.c if (p->IDCW_CHAN_CMD == 0) p 652 src/dps8/dps8_mgp.c iom_chan_data_t *p = &iom_chan_data[iom_unit_idx][chan]; p 655 src/dps8/dps8_mgp.c if (IS_IDCW(p)) p 883 src/dps8/dps8_mgp.c mgp_checksum(struct mgp_packet_header *p, u_char *pkt, uint pklen) p 888 src/dps8/dps8_mgp.c cks = ( p->flags.unusable << 8 ) p 889 src/dps8/dps8_mgp.c | ( p->flags.nak << 7 ) p 890 src/dps8/dps8_mgp.c | ( p->flags.reply_now << 6 ) p 891 src/dps8/dps8_mgp.c | ( p->flags.padding << 1 ) p 892 src/dps8/dps8_mgp.c | p->flags.loopback; p 894 src/dps8/dps8_mgp.c cks += p->packet_type p 895 src/dps8/dps8_mgp.c + p->frame_number p 896 src/dps8/dps8_mgp.c + p->receipt_number p 897 src/dps8/dps8_mgp.c + p->packet_number p 898 src/dps8/dps8_mgp.c + p->ack_number p 899 src/dps8/dps8_mgp.c + ( p->byte_count & 0xff ) p 900 src/dps8/dps8_mgp.c + ( p->byte_count >> 8 ) p 901 src/dps8/dps8_mgp.c + ( p->source_process & 0xff ) p 902 src/dps8/dps8_mgp.c + ( p->source_process >> 8 ) p 903 src/dps8/dps8_mgp.c + ( p->destination_process & 0xff ) p 904 src/dps8/dps8_mgp.c + ( p->destination_process >> 8 ) p 905 src/dps8/dps8_mgp.c + p->chaos_opcode; p 925 src/dps8/dps8_mgp.c struct mgp_packet_header *p = malloc(sizeof ( struct mgp_packet_header )); p 926 src/dps8/dps8_mgp.c if (p == NULL) p 949 src/dps8/dps8_mgp.c p->checksum = checksum; p 950 src/dps8/dps8_mgp.c p->identification = id; p 951 src/dps8/dps8_mgp.c p->packet_type = pktype; p 952 src/dps8/dps8_mgp.c p->flags.unusable = f_unus; p 953 src/dps8/dps8_mgp.c p->flags.nak = f_nak; p 954 src/dps8/dps8_mgp.c p->flags.reply_now = f_rnow; p 955 src/dps8/dps8_mgp.c p->flags.padding = f_pad; p 956 src/dps8/dps8_mgp.c p->flags.loopback = f_loop; p 963 src/dps8/dps8_mgp.c p->frame_number = framenr; p 964 src/dps8/dps8_mgp.c p->receipt_number = rcpt; p 965 src/dps8/dps8_mgp.c p->packet_number = pknr; p 966 src/dps8/dps8_mgp.c p->ack_number = acknr; p 974 src/dps8/dps8_mgp.c p->byte_count = bytecount; p 975 src/dps8/dps8_mgp.c p->source_process = srcprc; p 982 src/dps8/dps8_mgp.c p->destination_process = dstprc; p 983 src/dps8/dps8_mgp.c p->chaos_opcode = chopcode; p 984 src/dps8/dps8_mgp.c p->reserved = mbz; p 986 src/dps8/dps8_mgp.c return p; p 990 src/dps8/dps8_mgp.c unparse_packet_header(struct mgp_packet_header *p, word36 *buf, uint words) p 1000 src/dps8/dps8_mgp.c putbits36_9(&buf[0], 0, p->checksum); p 1001 src/dps8/dps8_mgp.c putbits36_9(&buf[0], 9, p->identification); p 1002 src/dps8/dps8_mgp.c putbits36_9(&buf[0], 18, p->packet_type); p 1003 src/dps8/dps8_mgp.c putbits36_1(&buf[0], 27, p->flags.unusable); p 1004 src/dps8/dps8_mgp.c putbits36_1(&buf[0], 28, p->flags.nak); p 1005 src/dps8/dps8_mgp.c putbits36_1(&buf[0], 29, p->flags.reply_now); p 1006 src/dps8/dps8_mgp.c putbits36_5(&buf[0], 30, p->flags.padding); p 1007 src/dps8/dps8_mgp.c putbits36_1(&buf[0], 35, p->flags.loopback); p 1009 src/dps8/dps8_mgp.c putbits36_9(&buf[1], 0, p->frame_number); p 1010 src/dps8/dps8_mgp.c putbits36_9(&buf[1], 9, p->receipt_number); p 1011 src/dps8/dps8_mgp.c putbits36_9(&buf[1], 18, p->packet_number); p 1012 src/dps8/dps8_mgp.c putbits36_9(&buf[1], 27, p->ack_number); p 1017 src/dps8/dps8_mgp.c putbits36_9(&buf[2], 0, p->byte_count & 0xff); p 1018 src/dps8/dps8_mgp.c putbits36_9(&buf[2], 9, p->byte_count >> 8 ); p 1019 src/dps8/dps8_mgp.c putbits36_9(&buf[2], 18, p->source_process & 0xff); p 1020 src/dps8/dps8_mgp.c putbits36_9(&buf[2], 27, p->source_process >> 8 ); p 1022 src/dps8/dps8_mgp.c putbits36_9(&buf[3], 0, p->destination_process & 0xff); p 1023 src/dps8/dps8_mgp.c putbits36_9(&buf[3], 9, p->destination_process >> 8 ); p 1025 src/dps8/dps8_mgp.c putbits36_9(&buf[3], 18, p->chaos_opcode); p 1026 src/dps8/dps8_mgp.c putbits36_9(&buf[3], 27, p->reserved); p 1033 src/dps8/dps8_mgp.c struct mgp_packet_header *p = parse_packet_header(buf, words); p 1034 src/dps8/dps8_mgp.c if (p == NULL) p 1045 src/dps8/dps8_mgp.c p->checksum, p->identification, p->packet_type, p 1046 src/dps8/dps8_mgp.c pktype_name(p->packet_type), p 1047 src/dps8/dps8_mgp.c ( p->flags.unusable << 8 ) | ( p->flags.nak << 7 ) p 1048 src/dps8/dps8_mgp.c | ( p->flags.reply_now << 6 ) | ( p->flags.padding << 1 ) p 1049 src/dps8/dps8_mgp.c | p->flags.loopback, p->flags.unusable ? "unusable " : "", p 1050 src/dps8/dps8_mgp.c p->flags.nak ? "NAK " : "", p->flags.reply_now ? "rNOW " : "", p 1051 src/dps8/dps8_mgp.c p->flags.loopback ? "loop" : "", p->frame_number, p 1052 src/dps8/dps8_mgp.c p->receipt_number, p->packet_number, p->ack_number, p 1053 src/dps8/dps8_mgp.c p->byte_count, p->source_process, p->destination_process, p 1054 src/dps8/dps8_mgp.c p->chaos_opcode, chop_name(p->chaos_opcode)); p 1056 src/dps8/dps8_mgp.c if (p->identification != '#') p 1059 src/dps8/dps8_mgp.c p->identification, '#'); p 1062 src/dps8/dps8_mgp.c if (p->reserved != 0) p 1064 src/dps8/dps8_mgp.c sim_printf("[Warning: MBZ byte is %d]\n", p->reserved); p 1067 src/dps8/dps8_mgp.c int pklen = 4 + ( p->byte_count / 4 ) \ p 1068 src/dps8/dps8_mgp.c + ( p->byte_count % 4 ? 1 : 0 ); p 1069 src/dps8/dps8_mgp.c FREE(p); p 1381 src/dps8/dps8_mgp.c handle_packet(int opcode, struct mgp_packet_header *p, word36 *buf, p 1384 src/dps8/dps8_mgp.c int i = find_conn_for(p->source_process, p->destination_process); p 1388 src/dps8/dps8_mgp.c __func__, p->source_process, p->destination_process); p 1392 src/dps8/dps8_mgp.c u_char *pkt = make_cbridge_pkt(p->byte_count, opcode); p 1393 src/dps8/dps8_mgp.c if (p->byte_count > 0) p 1396 src/dps8/dps8_mgp.c buf, words, pkt + CBRIDGE_PACKET_HEADER_SIZE, p->byte_count); p 1400 src/dps8/dps8_mgp.c i, pkt, CBRIDGE_PACKET_HEADER_SIZE + p->byte_count); p 1404 src/dps8/dps8_mgp.c handle_close(struct mgp_packet_header *p, word36 *buf, uint words) p 1415 src/dps8/dps8_mgp.c return handle_packet(CHOP_EOF, p, eof, 1); p 1419 src/dps8/dps8_mgp.c handle_lose(int conni, struct mgp_packet_header *p, word36 *buf, uint words) p 1422 src/dps8/dps8_mgp.c int v = handle_packet(CHOP_LOS, p, buf, words); p 1430 src/dps8/dps8_mgp.c handle_connect(struct mgp_packet_header *p, word36 *buf, uint words) p 1510 src/dps8/dps8_mgp.c conn->multics_proc = p->source_process; p 1554 src/dps8/dps8_mgp.c struct mgp_packet_header *p = parse_packet_header(buf, words); p 1557 src/dps8/dps8_mgp.c if ( ( p->checksum == 0 ) \ p 1558 src/dps8/dps8_mgp.c && ( p->packet_type == 0 ) \ p 1559 src/dps8/dps8_mgp.c && ( p->frame_number == 0 ) \ p 1560 src/dps8/dps8_mgp.c && ( p->receipt_number == 0 ) ) p 1562 src/dps8/dps8_mgp.c FREE(p); p 1568 src/dps8/dps8_mgp.c && ( p->frame_number != ( mgp_dev_state.frame_last_received + 1 ))) p 1571 src/dps8/dps8_mgp.c p->frame_number, mgp_dev_state.frame_last_received + 1); p 1579 src/dps8/dps8_mgp.c int i = find_conn_for(p->source_process, p->destination_process); p 1582 src/dps8/dps8_mgp.c __func__, p->packet_number, p->ack_number, i, p 1585 src/dps8/dps8_mgp.c p->packet_type, pktype_name(p->packet_type)); p 1587 src/dps8/dps8_mgp.c int pktype = p->packet_type; p 1596 src/dps8/dps8_mgp.c rval = handle_connect(p, buf, words); p 1602 src/dps8/dps8_mgp.c p->chaos_opcode ? p->chaos_opcode : CHOP_OPN, p, buf, words); p 1606 src/dps8/dps8_mgp.c rval = handle_close(p, buf, words); p 1610 src/dps8/dps8_mgp.c rval = handle_lose(i, p, buf, words); p 1616 src/dps8/dps8_mgp.c p->chaos_opcode ? p->chaos_opcode : CHOP_DAT, p, buf, words); p 1639 src/dps8/dps8_mgp.c "<%#x,%#x>\n", __func__, i, p->frame_number, p->receipt_number, p 1640 src/dps8/dps8_mgp.c p->packet_number, p->ack_number); p 1650 src/dps8/dps8_mgp.c if (p->flags.reply_now) p 1684 src/dps8/dps8_mgp.c mgp_dev_state.frame_last_received = p->frame_number; p 1688 src/dps8/dps8_mgp.c FREE(p); p 1715 src/dps8/dps8_mgp.c make_mgp_header(struct mgp_packet_header *p, u_char opcode, u_char *pkt, p 1718 src/dps8/dps8_mgp.c memset(p, 0, sizeof ( struct mgp_packet_header )); p 1719 src/dps8/dps8_mgp.c p->identification = '#'; p 1722 src/dps8/dps8_mgp.c p->packet_type = opcode_to_pktype[opcode]; p 1726 src/dps8/dps8_mgp.c p->packet_type = pktype_DATA; p 1730 src/dps8/dps8_mgp.c p->packet_type = pktype_NOOP; p 1734 src/dps8/dps8_mgp.c p->flags.reply_now = 1; p 1735 src/dps8/dps8_mgp.c p->frame_number = ++mgp_dev_state.frame_last_sent; p 1736 src/dps8/dps8_mgp.c p->receipt_number = mgp_dev_state.frame_last_received; p 1740 src/dps8/dps8_mgp.c p->packet_number = ++mgp_dev_state.conns[i].pkt_last_sent; p 1741 src/dps8/dps8_mgp.c p->ack_number = mgp_dev_state.conns[i].pkt_last_received; p 1742 src/dps8/dps8_mgp.c p->source_process = mgp_dev_state.conns[i].local_id; p 1743 src/dps8/dps8_mgp.c p->destination_process = mgp_dev_state.conns[i].multics_proc; p 1746 src/dps8/dps8_mgp.c p->chaos_opcode = opcode; p 1747 src/dps8/dps8_mgp.c p->byte_count = pklen; p 1750 src/dps8/dps8_mgp.c __func__, pktype_name(p->packet_type), p->packet_type, p->frame_number, p 1751 src/dps8/dps8_mgp.c p->receipt_number, p->packet_number, p->ack_number, p 1752 src/dps8/dps8_mgp.c chop_name(p->chaos_opcode), p->chaos_opcode, p->byte_count); p 55 src/dps8/dps8_mt.c # define FREE(p) free(p) p 986 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 997 src/dps8/dps8_mt.c p->stati = 04104; p 1009 src/dps8/dps8_mt.c p -> stati = 04423; // EOF category EOF file mark p 1025 src/dps8/dps8_mt.c p -> stati = 04302; // blank tape on read p 1027 src/dps8/dps8_mt.c p -> stati = 04340; // EOT file mark p 1046 src/dps8/dps8_mt.c p -> stati = 05001; // BUG: arbitrary error code; config switch p 1047 src/dps8/dps8_mt.c p -> chanStatus = chanStatParityErrPeriph; p 1050 src/dps8/dps8_mt.c p -> stati = 04000; p 1052 src/dps8/dps8_mt.c p -> stati |= 1; p 1060 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1105 src/dps8/dps8_mt.c if (p -> tallyResidue) p 1114 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; p 1116 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; p 1134 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1136 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1140 src/dps8/dps8_mt.c p -> stati = 04501; p 1141 src/dps8/dps8_mt.c p -> chanStatus = chanStatIncorrectDCW; p 1198 src/dps8/dps8_mt.c p -> stati = 04000; p 1203 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1205 src/dps8/dps8_mt.c p->initiate = false; p 1211 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1213 src/dps8/dps8_mt.c p->initiate = false; p 1219 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1229 src/dps8/dps8_mt.c p -> stati = 04000; p 1237 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1241 src/dps8/dps8_mt.c tape_statep -> is9 = p -> IDCW_DEV_CMD == 013; p 1245 src/dps8/dps8_mt.c p -> isRead = false; p 1247 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1311 src/dps8/dps8_mt.c p -> stati = 04000; p 1313 src/dps8/dps8_mt.c p -> stati |= 1; p 1320 src/dps8/dps8_mt.c p -> tallyResidue = (word12) (tally - i); p 1324 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; p 1326 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; p 1348 src/dps8/dps8_mt.c p -> stati = 04340; // EOT file mark p 1360 src/dps8/dps8_mt.c p -> stati = 05001; // BUG: arbitrary error code; config switch p 1361 src/dps8/dps8_mt.c p -> chanStatus = chanStatParityErrPeriph; p 1373 src/dps8/dps8_mt.c p -> stati = 04000; p 1375 src/dps8/dps8_mt.c p -> stati |= 1; p 1377 src/dps8/dps8_mt.c p -> stati |= 04340; p 1381 src/dps8/dps8_mt.c __func__, (int) tape_statep -> tbc, p -> stati); p 1390 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1407 src/dps8/dps8_mt.c p -> stati = 04000; // have_status = 1 p 1422 src/dps8/dps8_mt.c struct ctlr_to_dev_s * p = & cables->mtp_to_tape[ctlr_idx][dev_code]; p 1423 src/dps8/dps8_mt.c if (! p -> in_use) p 1425 src/dps8/dps8_mt.c uint unit_idx = p->unit_idx; p 1450 src/dps8/dps8_mt.c p -> stati = 04000; //-V1048 p 1470 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1472 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) dumpDCW (p->DCW, 0); p 1487 src/dps8/dps8_mt.c uint dev_code = p->IDCW_DEV_CODE; p 1489 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) dumpDCW (p->DCW, 0); p 1491 src/dps8/dps8_mt.c if (p->IDCW_DEV_CODE == 0) p 1503 src/dps8/dps8_mt.c if (IS_IDCW (p)) { p 1522 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: IDCW_DEV_CMD %oo %d.\n", __func__, p->IDCW_DEV_CMD, p->IDCW_DEV_CMD); p 1523 src/dps8/dps8_mt.c switch (p->IDCW_DEV_CMD) { p 1530 src/dps8/dps8_mt.c if (p->IDCW_CHAN_CMD == 040) { p 1532 src/dps8/dps8_mt.c send_special_interrupt (iomUnitIdx, chan, p->IDCW_DEV_CODE, 01, 0 /* suspended */); p 1533 src/dps8/dps8_mt.c p->stati = 04000; p 1535 src/dps8/dps8_mt.c p->stati = 04000; p 1538 src/dps8/dps8_mt.c p->stati, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 1602 src/dps8/dps8_mt.c p->stati = 04000; p 1613 src/dps8/dps8_mt.c p->stati = 04104; p 1616 src/dps8/dps8_mt.c p->stati = 04000; p 1629 src/dps8/dps8_mt.c p->stati = 04104; p 1632 src/dps8/dps8_mt.c p->stati = 04000; p 1661 src/dps8/dps8_mt.c p->stati = 04000; p 1679 src/dps8/dps8_mt.c p->stati = 04104; p 1682 src/dps8/dps8_mt.c p->stati = 04000; p 1694 src/dps8/dps8_mt.c p->stati = 04104; p 1697 src/dps8/dps8_mt.c p->stati = 04000; p 1706 src/dps8/dps8_mt.c p->stati = 04000; p 1713 src/dps8/dps8_mt.c if (p->IDCW_CHAN_CMD == 040) { // If special controller command, then command 020 is 'release' p 1715 src/dps8/dps8_mt.c p->stati = 04000; // have_status = 1 p 1717 src/dps8/dps8_mt.c __func__, p->stati, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 1718 src/dps8/dps8_mt.c send_special_interrupt (iomUnitIdx, chan, p->IDCW_DEV_CODE, 02, 0 /* released */); p 1720 src/dps8/dps8_mt.c p->stati = 04501; p 1721 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 1722 src/dps8/dps8_mt.c sim_warn ("%s: Unknown command %02o\n", __func__, p->IDCW_DEV_CMD); p 1752 src/dps8/dps8_mt.c p->stati = 04000; p 1768 src/dps8/dps8_mt.c p->stati = 04000; p 1769 src/dps8/dps8_mt.c p->isRead = false; p 1772 src/dps8/dps8_mt.c p->stati = 04502; // invalid device code p 1776 src/dps8/dps8_mt.c p->stati |= 1; p 1778 src/dps8/dps8_mt.c p->stati |= 2; p 1786 src/dps8/dps8_mt.c p->stati = 04000; p 1788 src/dps8/dps8_mt.c p->stati |= 1; p 1790 src/dps8/dps8_mt.c p->stati |= 2; p 1799 src/dps8/dps8_mt.c p->stati = 04000; p 1801 src/dps8/dps8_mt.c p->stati |= 1; p 1803 src/dps8/dps8_mt.c p->stati |= 2; p 1812 src/dps8/dps8_mt.c p->stati = 04000; p 1814 src/dps8/dps8_mt.c p->stati |= 1; p 1816 src/dps8/dps8_mt.c p->stati |= 2; p 1831 src/dps8/dps8_mt.c p->stati = 04104; p 1834 src/dps8/dps8_mt.c uint tally = p->IDCW_COUNT; p 1866 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1868 src/dps8/dps8_mt.c p->stati = 04000; p 1870 src/dps8/dps8_mt.c p->stati |= 1; p 1872 src/dps8/dps8_mt.c p->stati |= 2; p 1894 src/dps8/dps8_mt.c p->stati = 04104; p 1914 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1917 src/dps8/dps8_mt.c p->stati = 04000; p 1919 src/dps8/dps8_mt.c p->stati |= 1; p 1921 src/dps8/dps8_mt.c p->stati |= 2; p 1943 src/dps8/dps8_mt.c p->stati = 04104; p 1947 src/dps8/dps8_mt.c uint tally = p->IDCW_COUNT; p 1979 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1983 src/dps8/dps8_mt.c p->stati = 04000; p 1985 src/dps8/dps8_mt.c p->stati |= 1; p 1987 src/dps8/dps8_mt.c p->stati |= 2; p 2009 src/dps8/dps8_mt.c p->stati = 04104; p 2047 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 2051 src/dps8/dps8_mt.c p->stati = 04000; p 2053 src/dps8/dps8_mt.c p->stati |= 1; p 2055 src/dps8/dps8_mt.c p->stati |= 2; p 2069 src/dps8/dps8_mt.c p->stati = 04000; p 2071 src/dps8/dps8_mt.c p->stati |= 1; p 2073 src/dps8/dps8_mt.c p->stati |= 2; p 2076 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: Request device status: %o\n", __func__, p->stati); p 2089 src/dps8/dps8_mt.c if (p->isPCW) { p 2090 src/dps8/dps8_mt.c p->stati = 04501; // cmd reject, invalid opcode p 2091 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 2094 src/dps8/dps8_mt.c p->stati = 04000; p 2096 src/dps8/dps8_mt.c p->stati |= 1; p 2098 src/dps8/dps8_mt.c p->stati |= 2; p 2101 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: Reset device status: %o\n", __func__, p->stati); p 2122 src/dps8/dps8_mt.c p->stati = 04104; p 2133 src/dps8/dps8_mt.c p->stati = 04340; // EOT file mark p 2139 src/dps8/dps8_mt.c p->stati = 05001; // BUG: arbitrary error code; config switch p 2140 src/dps8/dps8_mt.c p->chanStatus = chanStatParityErrPeriph; p 2152 src/dps8/dps8_mt.c p->stati = 04000; p 2154 src/dps8/dps8_mt.c p->stati = 04340; p 2156 src/dps8/dps8_mt.c sim_debug (DBG_INFO, & tape_dev, "%s: Wrote tape mark; status %04o\n", __func__, p->stati); p 2171 src/dps8/dps8_mt.c p->stati = 04000; p 2183 src/dps8/dps8_mt.c p->stati = 04000; p 2185 src/dps8/dps8_mt.c p->stati |= 1; p 2187 src/dps8/dps8_mt.c p->stati |= 2; p 2192 src/dps8/dps8_mt.c p->stati = 04000; p 2194 src/dps8/dps8_mt.c p->stati |= 1; p 2196 src/dps8/dps8_mt.c p->stati |= 2; p 2204 src/dps8/dps8_mt.c p->stati = 04000; p 2206 src/dps8/dps8_mt.c p->stati |= 1; p 2208 src/dps8/dps8_mt.c p->stati |= 2; p 2222 src/dps8/dps8_mt.c p->stati = 04104; p 2231 src/dps8/dps8_mt.c p->stati = 04000; p 2233 src/dps8/dps8_mt.c p->stati |= 1; p 2235 src/dps8/dps8_mt.c p->stati |= 2; p 2251 src/dps8/dps8_mt.c p->stati = 04000; p 2271 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) { sim_printf ("// Tape Unknown %02o\r\n", p->IDCW_DEV_CMD); } p 2272 src/dps8/dps8_mt.c p->stati = 04501; p 2273 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 2274 src/dps8/dps8_mt.c sim_warn ("%s: tape unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 2279 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: stati %04o\n", __func__, p->stati); p 522 src/dps8/dps8_prt.c p 545 src/dps8/dps8_prt.c p 551 src/dps8/dps8_prt.c p 600 src/dps8/dps8_prt.c p 609 src/dps8/dps8_prt.c p 610 src/dps8/dps8_prt.c p 960 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 962 src/dps8/dps8_prt.c p->stati = 04000; //-V536 p 968 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 970 src/dps8/dps8_prt.c uint tally = p -> DDCW_TALLY; p 1009 src/dps8/dps8_prt.c p->charPos = 0; p 1010 src/dps8/dps8_prt.c p->stati = 04000; //-V536 p 1016 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1018 src/dps8/dps8_prt.c p->stati = 04000; //-V536 p 1024 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1025 src/dps8/dps8_prt.c p->isRead = false; p 1031 src/dps8/dps8_prt.c p 1040 src/dps8/dps8_prt.c p 1051 src/dps8/dps8_prt.c p 1054 src/dps8/dps8_prt.c p 1057 src/dps8/dps8_prt.c p 1061 src/dps8/dps8_prt.c uint tally = p -> DDCW_TALLY; p 1073 src/dps8/dps8_prt.c p -> initiate = false; p 1097 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1102 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1116 src/dps8/dps8_prt.c p -> tallyResidue = 0; p 1117 src/dps8/dps8_prt.c p -> stati = 04000; p 1123 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1125 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1131 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1135 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1138 src/dps8/dps8_prt.c p->stati = 04000; p 1148 src/dps8/dps8_prt.c p->stati = 04000; p 1158 src/dps8/dps8_prt.c p->stati = 04000; p 1163 src/dps8/dps8_prt.c p->stati = 04000; p 1164 src/dps8/dps8_prt.c p->isRead = false; p 1168 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1169 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1170 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1171 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1175 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1204 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1206 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1212 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1216 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1220 src/dps8/dps8_prt.c p->stati = 04000; p 1230 src/dps8/dps8_prt.c p->stati = 04000; p 1236 src/dps8/dps8_prt.c p->stati = 04000; p 1246 src/dps8/dps8_prt.c p->stati = 04000; p 1251 src/dps8/dps8_prt.c p->stati = 04000; p 1252 src/dps8/dps8_prt.c p->isRead = false; p 1256 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1257 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1258 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1259 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1263 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1298 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1300 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1306 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1310 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1313 src/dps8/dps8_prt.c p->stati = 04000; p 1319 src/dps8/dps8_prt.c p->stati = 04000; p 1329 src/dps8/dps8_prt.c p->stati = 04000; p 1339 src/dps8/dps8_prt.c p->stati = 04000; p 1344 src/dps8/dps8_prt.c p->stati = 04000; p 1345 src/dps8/dps8_prt.c p->isRead = false; p 1349 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1350 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1351 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1352 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1356 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1391 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1393 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1399 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1403 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1407 src/dps8/dps8_prt.c p->stati = 04000; p 1413 src/dps8/dps8_prt.c p->stati = 04000; p 1419 src/dps8/dps8_prt.c p->stati = 04000; p 1449 src/dps8/dps8_prt.c p->stati = 04000; p 1459 src/dps8/dps8_prt.c p->stati = 04000; p 1469 src/dps8/dps8_prt.c p->stati = 04000; p 1479 src/dps8/dps8_prt.c p->stati = 04000; p 1489 src/dps8/dps8_prt.c p->stati = 04000; p 1499 src/dps8/dps8_prt.c p->stati = 04000; p 1509 src/dps8/dps8_prt.c p->stati = 04000; p 1519 src/dps8/dps8_prt.c p->stati = 04000; p 1529 src/dps8/dps8_prt.c p->stati = 04000; p 1539 src/dps8/dps8_prt.c p->stati = 04000; p 1549 src/dps8/dps8_prt.c p->stati = 04000; p 1559 src/dps8/dps8_prt.c p->stati = 04000; p 1569 src/dps8/dps8_prt.c p->stati = 04000; p 1579 src/dps8/dps8_prt.c p->stati = 04000; p 1589 src/dps8/dps8_prt.c p->stati = 04000; p 1599 src/dps8/dps8_prt.c p->stati = 04000; p 1609 src/dps8/dps8_prt.c p->stati = 04000; p 1614 src/dps8/dps8_prt.c p->stati = 04000; p 1615 src/dps8/dps8_prt.c p->isRead = false; p 1622 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1626 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1629 src/dps8/dps8_prt.c p->stati = 04000; p 1630 src/dps8/dps8_prt.c p->isRead = false; p 1638 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1642 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1645 src/dps8/dps8_prt.c p->stati = 04000; p 1646 src/dps8/dps8_prt.c p->isRead = false; p 1654 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1658 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1661 src/dps8/dps8_prt.c p->stati = 04000; p 1662 src/dps8/dps8_prt.c p->isRead = false; p 1668 src/dps8/dps8_prt.c p->stati = 04000; p 1669 src/dps8/dps8_prt.c p->isRead = false; p 1674 src/dps8/dps8_prt.c p->stati = 04000; p 1675 src/dps8/dps8_prt.c p->isRead = false; p 1679 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1680 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1681 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1682 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1686 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1735 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1737 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1755 src/dps8/dps8_prt.c p->stati = 04502; //-V536 // invalid device code p 2008 src/dps8/dps8_prt.c const char * p = prt_config_list[rc].name; p 2010 src/dps8/dps8_prt.c if (strcmp (p, "split") == 0) p 875 src/dps8/dps8_scu.c const char * p = scu_config_list [rc].name; p 876 src/dps8/dps8_scu.c if (strcmp (p, "mode") == 0) p 878 src/dps8/dps8_scu.c else if (strcmp (p, "maska") == 0) p 888 src/dps8/dps8_scu.c else if (strcmp (p, "maskb") == 0) p 898 src/dps8/dps8_scu.c else if (strcmp (p, "port0") == 0) p 900 src/dps8/dps8_scu.c else if (strcmp (p, "port1") == 0) p 902 src/dps8/dps8_scu.c else if (strcmp (p, "port2") == 0) p 904 src/dps8/dps8_scu.c else if (strcmp (p, "port3") == 0) p 906 src/dps8/dps8_scu.c else if (strcmp (p, "port4") == 0) p 908 src/dps8/dps8_scu.c else if (strcmp (p, "port5") == 0) p 910 src/dps8/dps8_scu.c else if (strcmp (p, "port6") == 0) p 912 src/dps8/dps8_scu.c else if (strcmp (p, "port7") == 0) p 914 src/dps8/dps8_scu.c else if (strcmp (p, "lwrstoresize") == 0) p 916 src/dps8/dps8_scu.c else if (strcmp (p, "cyclic") == 0) p 918 src/dps8/dps8_scu.c else if (strcmp (p, "nea") == 0) p 920 src/dps8/dps8_scu.c else if (strcmp (p, "onl") == 0) p 922 src/dps8/dps8_scu.c else if (strcmp (p, "int") == 0) p 924 src/dps8/dps8_scu.c else if (strcmp (p, "lwr") == 0) p 926 src/dps8/dps8_scu.c else if (strcmp (p, "elapsed_days") == 0) p 928 src/dps8/dps8_scu.c else if (strcmp (p, "steady_clock") == 0) p 930 src/dps8/dps8_scu.c else if (strcmp (p, "bullet_time") == 0) p 932 src/dps8/dps8_scu.c else if (strcmp (p, "y2k") == 0) p 1057 src/dps8/dps8_scu.c p 1058 src/dps8/dps8_scu.c p 1060 src/dps8/dps8_scu.c p 1086 src/dps8/dps8_scu.c p 1087 src/dps8/dps8_scu.c p 1089 src/dps8/dps8_scu.c p 1725 src/dps8/dps8_scu.c for (int p = 0; p < N_ASSIGNMENTS; p ++) p 1728 src/dps8/dps8_scu.c if (scu [scu_unit_idx].mask_enable [p] == 0) p 1731 src/dps8/dps8_scu.c if (scu [scu_unit_idx ].mask_assignment [p] == port_num) p 1734 src/dps8/dps8_scu.c mask_num = p; p 2444 src/dps8/dps8_scu.c for (int p = 0; p < N_SCU_PORTS; p ++) p 2448 src/dps8/dps8_scu.c scu[u].ports[p].dev_port[s] = -1; p 2449 src/dps8/dps8_scu.c scu[u].ports[p].subport_enables[s] = false; p 2450 src/dps8/dps8_scu.c scu[u].ports[p].xipmask[s] = false; p 2452 src/dps8/dps8_scu.c scu[u].ports[p].xipmaskval = N_SCU_SUBPORTS; p 2454 src/dps8/dps8_scu.c scu[u].ports[p].type = ADEV_NONE; p 2455 src/dps8/dps8_scu.c scu[u].ports[p].is_exp = false; p 730 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 740 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 771 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 779 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 801 src/dps8/dps8_socket_dev.c static int get_ddcw (iom_chan_data_t * p, uint iom_unit_idx, uint chan, bool * ptro, uint expected_tally, uint * tally) p 807 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 818 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 821 src/dps8/dps8_socket_dev.c if (IS_IDCW (p) || IS_TDCW (p)) p 824 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 828 src/dps8/dps8_socket_dev.c * tally = p->DDCW_TALLY; p 843 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 851 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 853 src/dps8/dps8_socket_dev.c sim_debug (DBG_DEBUG, & skc_dev, "IDCW_DEV_CODE %d\n", p->IDCW_DEV_CODE); p 855 src/dps8/dps8_socket_dev.c sim_printf ("device %u\n", p->IDCW_DEV_CODE); p 857 src/dps8/dps8_socket_dev.c switch (p->IDCW_DEV_CMD) p 861 src/dps8/dps8_socket_dev.c p->stati = 04000; // have_status = 1 p 863 src/dps8/dps8_socket_dev.c "%s: Request status: %04o\n", __func__, p->stati); p 865 src/dps8/dps8_socket_dev.c "%s: Request status control: %o\n", __func__, p->IDCW_CHAN_CTRL); p 867 src/dps8/dps8_socket_dev.c "%s: Request status channel command: %o\n", __func__, p->IDCW_CHAN_CMD); p 877 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 888 src/dps8/dps8_socket_dev.c skt_socket (unit_idx, p->IDCW_DEV_CODE, buffer); p 902 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 913 src/dps8/dps8_socket_dev.c skt_bind (unit_idx, p->IDCW_DEV_CODE, buffer); p 924 src/dps8/dps8_socket_dev.c p->stati = 04000; p 935 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 961 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 972 src/dps8/dps8_socket_dev.c skt_listen (unit_idx, p->IDCW_DEV_CODE, buffer); p 987 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 997 src/dps8/dps8_socket_dev.c sk_data.unit_data[unit_idx][p->IDCW_DEV_CODE].words_processed = words_processed; p 999 src/dps8/dps8_socket_dev.c rc = skt_accept (unit_idx, p->IDCW_DEV_CODE, buffer); p 1017 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1028 src/dps8/dps8_socket_dev.c skt_close (unit_idx, p->IDCW_DEV_CODE, buffer); p 1042 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1052 src/dps8/dps8_socket_dev.c sk_data.unit_data[unit_idx][p->IDCW_DEV_CODE].words_processed = words_processed; p 1054 src/dps8/dps8_socket_dev.c rc = skt_read8 (unit_idx, p->IDCW_DEV_CODE, tally, buffer); p 1071 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1082 src/dps8/dps8_socket_dev.c rc = skt_write8 (iom_unit_idx, chan, unit_idx, p->IDCW_DEV_CODE, tally, buffer); p 1093 src/dps8/dps8_socket_dev.c p->stati = 04000; p 1096 src/dps8/dps8_socket_dev.c __func__, p->stati); p 1102 src/dps8/dps8_socket_dev.c p->stati = 04501; p 1103 src/dps8/dps8_socket_dev.c p->chanStatus = chanStatIncorrectDCW; p 1104 src/dps8/dps8_socket_dev.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1105 src/dps8/dps8_socket_dev.c sim_warn ("%s: Unknown command 0%o\n", __func__, p->IDCW_DEV_CMD); p 1111 src/dps8/dps8_socket_dev.c sim_debug (DBG_DEBUG, & skc_dev, "stati %04o\n", p->stati); p 1114 src/dps8/dps8_socket_dev.c p 1124 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx] [chan]; p 1128 src/dps8/dps8_socket_dev.c if (IS_IDCW (p)) p 1181 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1182 src/dps8/dps8_socket_dev.c p->stati = 04000; // -V536 p 108 src/dps8/dps8_sys.c # define FREE(p) free(p) p 3668 src/dps8/dps8_sys.c const char * p = buf + 4; p 3669 src/dps8/dps8_sys.c while (* p == ' ') p 3670 src/dps8/dps8_sys.c p ++; p 3671 src/dps8/dps8_sys.c return panelScraperMsg (p); p 3721 src/dps8/dps8_sys.c struct dbgevent_t * p = (struct dbgevent_t *) bsearch (& key, dbgevents, (size_t) n_dbgevents, p 3723 src/dps8/dps8_sys.c if (! p) p 3725 src/dps8/dps8_sys.c return (int) (p - dbgevents); p 4211 src/dps8/dps8_sys.c const unsigned char *p = buf; p 4214 src/dps8/dps8_sys.c h = h * 31 + p[i]; p 4865 src/dps8/dps8_sys.c DCDstruct * p = & ci; p 4866 src/dps8/dps8_sys.c decode_instruction (word1, p); p 4869 src/dps8/dps8_sys.c if (p->info->ndes > 1) p 4874 src/dps8/dps8_sys.c for(uint n = 0 ; n < p->info->ndes; n += 1) p 4877 src/dps8/dps8_sys.c return (t_stat) -p->info->ndes; p 4969 src/dps8/dps8_sys.c const char * p = sys_config_list[rc].name; p 4970 src/dps8/dps8_sys.c if (strcmp (p, "connect_time") == 0) p 4972 src/dps8/dps8_sys.c else if (strcmp (p, "color") == 0) p 214 src/dps8/dps8_urp.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 216 src/dps8/dps8_urp.c if_sim_debug (DBG_TRACE, & urp_dev) dumpDCW (p->DCW, 0); p 219 src/dps8/dps8_urp.c uint devUnitIdx = cables->urp_to_urd[ctlrUnitIdx][p->IDCW_DEV_CODE].unit_idx; p 225 src/dps8/dps8_urp.c if (IS_IDCW (p)) { p 229 src/dps8/dps8_urp.c switch (p->IDCW_DEV_CMD) { p 233 src/dps8/dps8_urp.c p->stati = 04000; p 240 src/dps8/dps8_urp.c p->stati = 04000; p 250 src/dps8/dps8_urp.c p->stati = 04000; p 256 src/dps8/dps8_urp.c p->stati = 04000; p 257 src/dps8/dps8_urp.c p->isRead = false; p 261 src/dps8/dps8_urp.c if_sim_debug (DBG_TRACE, & urp_dev) { sim_printf ("// URP unknown command %o\r\n", p->IDCW_DEV_CMD); } p 262 src/dps8/dps8_urp.c p->stati = 04501; // cmd reject, invalid opcode p 263 src/dps8/dps8_urp.c p->chanStatus = chanStatIncorrectDCW; p 264 src/dps8/dps8_urp.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 265 src/dps8/dps8_urp.c sim_warn ("%s: URP unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 269 src/dps8/dps8_urp.c sim_debug (DBG_DEBUG, & urp_dev, "%s: stati %04o\n", __func__, p->stati); p 285 src/dps8/dps8_urp.c p->stati = 04000; p 291 src/dps8/dps8_urp.c p->stati = 04000; p 303 src/dps8/dps8_urp.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 304 src/dps8/dps8_urp.c uint devCode = p->IDCW_DEV_CODE; p 312 src/dps8/dps8_urp.c p->stati = 04502; //-V536 // invalid device code p 42 src/dps8/dps8_utils.c # define FREE(p) free(p) p 87 src/dps8/dps8_utils.c struct opcode_s * p = &opcodes10[i->opcode10]; p 88 src/dps8/dps8_utils.c return p->mne ? p : &unimplented; p 1295 src/dps8/dps8_utils.c p 1301 src/dps8/dps8_utils.c p 1305 src/dps8/dps8_utils.c p 1313 src/dps8/dps8_utils.c p 1317 src/dps8/dps8_utils.c p 1324 src/dps8/dps8_utils.c p 1328 src/dps8/dps8_utils.c p 1329 src/dps8/dps8_utils.c p 1332 src/dps8/dps8_utils.c p 1333 src/dps8/dps8_utils.c p 1334 src/dps8/dps8_utils.c p 1340 src/dps8/dps8_utils.c p 1345 src/dps8/dps8_utils.c p 1346 src/dps8/dps8_utils.c p 1350 src/dps8/dps8_utils.c p 1402 src/dps8/dps8_utils.c char *p; p 1407 src/dps8/dps8_utils.c for (p = s; isspace((unsigned char)*p) && *p != '\0'; p++) p 1411 src/dps8/dps8_utils.c memmove(s, p, strlen(p) + 1); p 1496 src/dps8/dps8_utils.c config_list_t * p = clist; p 1497 src/dps8/dps8_utils.c while (p -> name) p 1499 src/dps8/dps8_utils.c if (strcasecmp (name, p -> name) == 0) p 1501 src/dps8/dps8_utils.c p ++; p 1503 src/dps8/dps8_utils.c if (! p -> name) p 1516 src/dps8/dps8_utils.c if (p -> min > p -> max && ! p -> value_list) p 1518 src/dps8/dps8_utils.c return (int) (p - clist); p 1525 src/dps8/dps8_utils.c config_value_list_t * v = p -> value_list; p 1539 src/dps8/dps8_utils.c return (int) (p - clist); p 1544 src/dps8/dps8_utils.c if (p -> min > p -> max) p 1564 src/dps8/dps8_utils.c if (n < p -> min || n > p -> max) p 1571 src/dps8/dps8_utils.c return (int) (p - clist); p 1638 src/dps8/dps8_utils.c char * p = buf; p 1639 src/dps8/dps8_utils.c while (* p) p 1641 src/dps8/dps8_utils.c if (* p != '\\') p 1643 src/dps8/dps8_utils.c p ++; p 1646 src/dps8/dps8_utils.c if (p [1] == '\\') // \\ backslash p 1647 src/dps8/dps8_utils.c * p = '\\'; //-V1048 p 1648 src/dps8/dps8_utils.c else if (p [1] == 'a') // \a ^A p 1649 src/dps8/dps8_utils.c * p = '\001'; p 1650 src/dps8/dps8_utils.c else if (p [1] == 'w') // \w backslash p 1651 src/dps8/dps8_utils.c * p = '\\'; //-V1048 p 1652 src/dps8/dps8_utils.c else if (p [1] == 'n') // \n newline p 1653 src/dps8/dps8_utils.c * p = '\n'; p 1654 src/dps8/dps8_utils.c else if (p [1] == 't') // \t tab p 1655 src/dps8/dps8_utils.c * p = '\t'; p 1656 src/dps8/dps8_utils.c else if (p [1] == 'f') // \f formfeed p 1657 src/dps8/dps8_utils.c * p = '\f'; p 1658 src/dps8/dps8_utils.c else if (p [1] == 'r') // \r carriage return p 1659 src/dps8/dps8_utils.c * p = '\r'; p 1660 src/dps8/dps8_utils.c else if (p [1] == 'e') // \e ^E; Multics escape char. p 1661 src/dps8/dps8_utils.c * p = '\005'; p 1662 src/dps8/dps8_utils.c else if (p [1] == '_') // \_ space; needed for leading or p 1665 src/dps8/dps8_utils.c * p = ' '; p 1666 src/dps8/dps8_utils.c else if (p [1] == 'c') // \c comma (scp parser issue) p 1667 src/dps8/dps8_utils.c * p = ','; p 1668 src/dps8/dps8_utils.c else if (p [1] == 's') // \s semicolon (scp parser issue) p 1669 src/dps8/dps8_utils.c * p = ';'; p 1670 src/dps8/dps8_utils.c else if (p [1] == 'd') // \d dollar sign (scp parser issue) p 1671 src/dps8/dps8_utils.c * p = '$'; p 1672 src/dps8/dps8_utils.c else if (p [1] == 'q') // \q double quote (scp parser issue) p 1673 src/dps8/dps8_utils.c * p = '"'; p 1674 src/dps8/dps8_utils.c else if (p [1] == 'z') // \z ^D eof (VAXism) p 1675 src/dps8/dps8_utils.c * p = '\004'; p 1676 src/dps8/dps8_utils.c else if (p [1] == 'k') // \k caret p 1677 src/dps8/dps8_utils.c * p = '^'; p 1678 src/dps8/dps8_utils.c else if (p [1] == 'x') // \x expect p 1679 src/dps8/dps8_utils.c * p = '\030'; p 1680 src/dps8/dps8_utils.c else if (p [1] == 'y') // \y expect p 1681 src/dps8/dps8_utils.c * p = '\031'; p 1686 src/dps8/dps8_utils.c p 1688 src/dps8/dps8_utils.c p 1694 src/dps8/dps8_utils.c p 1695 src/dps8/dps8_utils.c p 1696 src/dps8/dps8_utils.c p 1698 src/dps8/dps8_utils.c p 1703 src/dps8/dps8_utils.c p ++; p 1706 src/dps8/dps8_utils.c p ++; p 1707 src/dps8/dps8_utils.c memmove (p, p + 1, strlen (p + 1) + 1); p 1744 src/dps8/dps8_utils.c uint8 * p = bits + woffset * 4; p 1747 src/dps8/dps8_utils.c w = ((uint64) p [0]) << 27; p 1748 src/dps8/dps8_utils.c w |= ((uint64) p [1]) << 18; p 1749 src/dps8/dps8_utils.c w |= ((uint64) p [2]) << 9; p 1750 src/dps8/dps8_utils.c w |= ((uint64) p [3]); p 1768 src/dps8/dps8_utils.c uint8 * p = bits + dwoffset * 9; p 1773 src/dps8/dps8_utils.c w = (((uint64) p [4]) & 0xf) << 32; p 1774 src/dps8/dps8_utils.c w |= ((uint64) p [5]) << 24; p 1775 src/dps8/dps8_utils.c w |= ((uint64) p [6]) << 16; p 1776 src/dps8/dps8_utils.c w |= ((uint64) p [7]) << 8; p 1777 src/dps8/dps8_utils.c w |= ((uint64) p [8]); p 1781 src/dps8/dps8_utils.c w = ((uint64) p [0]) << 28; p 1782 src/dps8/dps8_utils.c w |= ((uint64) p [1]) << 20; p 1783 src/dps8/dps8_utils.c w |= ((uint64) p [2]) << 12; p 1784 src/dps8/dps8_utils.c w |= ((uint64) p [3]) << 4; p 1785 src/dps8/dps8_utils.c w |= (((uint64) p [4]) >> 4) & 0xf; p 1793 src/dps8/dps8_utils.c uint8 * p = bits + woffset * 4; p 1794 src/dps8/dps8_utils.c p [0] = (val >> 27) & 0xff; p 1795 src/dps8/dps8_utils.c p [1] = (val >> 18) & 0xff; p 1796 src/dps8/dps8_utils.c p [2] = (val >> 9) & 0xff; p 1797 src/dps8/dps8_utils.c p [3] = (val ) & 0xff; p 1804 src/dps8/dps8_utils.c uint8 * p = bits + dwoffset * 9; p 1808 src/dps8/dps8_utils.c p [4] &= 0xf0; p 1809 src/dps8/dps8_utils.c p [4] |= (val >> 32) & 0x0f; p 1810 src/dps8/dps8_utils.c p [5] = (val >> 24) & 0xff; p 1811 src/dps8/dps8_utils.c p [6] = (val >> 16) & 0xff; p 1812 src/dps8/dps8_utils.c p [7] = (val >> 8) & 0xff; p 1813 src/dps8/dps8_utils.c p [8] = (val >> 0) & 0xff; p 1822 src/dps8/dps8_utils.c p [0] = (val >> 28) & 0xff; p 1823 src/dps8/dps8_utils.c p [1] = (val >> 20) & 0xff; p 1824 src/dps8/dps8_utils.c p [2] = (val >> 12) & 0xff; p 1825 src/dps8/dps8_utils.c p [3] = (val >> 4) & 0xff; p 1826 src/dps8/dps8_utils.c p [4] &= 0x0f; p 1827 src/dps8/dps8_utils.c p [4] |= (val << 4) & 0xf0; p 1912 src/dps8/dps8_utils.c static void print_uint128o_r (uint128 n, char * p) p 1917 src/dps8/dps8_utils.c print_uint128o_r(n / 8, p); p 1918 src/dps8/dps8_utils.c if (p) p 1923 src/dps8/dps8_utils.c strcat (p, s); p 1929 src/dps8/dps8_utils.c char * print_int128o (int128 n, char * p) p 1933 src/dps8/dps8_utils.c if (p) p 1934 src/dps8/dps8_utils.c strcat (p, "0"); p 1937 src/dps8/dps8_utils.c return p; p 1939 src/dps8/dps8_utils.c print_uint128o_r ((uint128) n, p); p 1940 src/dps8/dps8_utils.c return p; p 1943 src/dps8/dps8_utils.c static void print_uint128_r (uint128 n, char * p) p 1948 src/dps8/dps8_utils.c print_uint128_r(n / 10, p); p 1949 src/dps8/dps8_utils.c if (p) p 1954 src/dps8/dps8_utils.c strcat (p, s); p 1960 src/dps8/dps8_utils.c void print_int128 (int128 n, char * p) p 1964 src/dps8/dps8_utils.c if (p) p 1965 src/dps8/dps8_utils.c strcat (p, "0"); p 1972 src/dps8/dps8_utils.c if (p) p 1973 src/dps8/dps8_utils.c strcat (p, "-"); p 1978 src/dps8/dps8_utils.c print_uint128_r ((uint128) n, p); p 318 src/dps8/dps8_utils.h static inline word36 setbits36(word36 x, uint p, uint n, word36 val) p 320 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 322 src/dps8/dps8_utils.h sim_printf ("setbits36: bad args (%012llu,pos=%d,n=%d)\n", (unsigned long long)x, p, n); p 329 src/dps8/dps8_utils.h word36 result = (x & ~ mask) | ((val&MASKBITS(n)) << (36 - p - n)); p 333 src/dps8/dps8_utils.h static inline word36 setbits36_1 (word36 x, uint p, word1 val) p 336 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 338 src/dps8/dps8_utils.h sim_printf ("setbits36_1: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 349 src/dps8/dps8_utils.h static inline word36 setbits36_4 (word36 x, uint p, word4 val) p 352 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 354 src/dps8/dps8_utils.h sim_printf ("setbits36_4: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 365 src/dps8/dps8_utils.h static inline word36 setbits36_5 (word36 x, uint p, word5 val) p 368 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 370 src/dps8/dps8_utils.h sim_printf ("setbits36_5: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 381 src/dps8/dps8_utils.h static inline word36 setbits36_6 (word36 x, uint p, word6 val) p 384 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 386 src/dps8/dps8_utils.h sim_printf ("setbits36_6: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 397 src/dps8/dps8_utils.h static inline word36 setbits36_8 (word36 x, uint p, word8 val) p 400 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 402 src/dps8/dps8_utils.h sim_printf ("setbits36_8: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 413 src/dps8/dps8_utils.h static inline word36 setbits36_9 (word36 x, uint p, word9 val) p 416 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 418 src/dps8/dps8_utils.h sim_printf ("setbits36_9: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 429 src/dps8/dps8_utils.h static inline word36 setbits36_16 (word36 x, uint p, word16 val) p 432 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 434 src/dps8/dps8_utils.h sim_printf ("setbits36_16: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 445 src/dps8/dps8_utils.h static inline word36 setbits36_24 (word36 x, uint p, word24 val) p 448 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 450 src/dps8/dps8_utils.h sim_printf ("setbits36_24: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 461 src/dps8/dps8_utils.h static inline void putbits36 (word36 * x, uint p, uint n, word36 val) p 463 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 466 src/dps8/dps8_utils.h sim_printf ("putbits36: bad args (%012llu,pos=%d,n=%d)\n", (unsigned long long)*x, p, n); p 473 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS (n)) << (36 - p - n)); p 477 src/dps8/dps8_utils.h static inline void putbits36_1 (word36 * x, uint p, word1 val) p 480 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 482 src/dps8/dps8_utils.h sim_printf ("putbits36_1: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 492 src/dps8/dps8_utils.h static inline void putbits36_2 (word36 * x, uint p, word2 val) p 495 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 497 src/dps8/dps8_utils.h sim_printf ("putbits36_2: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 507 src/dps8/dps8_utils.h static inline void putbits36_3 (word36 * x, uint p, word3 val) p 510 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 512 src/dps8/dps8_utils.h sim_printf ("putbits36_3: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 522 src/dps8/dps8_utils.h static inline void putbits36_4 (word36 * x, uint p, word4 val) p 525 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 527 src/dps8/dps8_utils.h sim_printf ("putbits36_4: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 537 src/dps8/dps8_utils.h static inline void putbits36_5 (word36 * x, uint p, word5 val) p 540 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 542 src/dps8/dps8_utils.h sim_printf ("putbits36_5: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 552 src/dps8/dps8_utils.h static inline void putbits36_6 (word36 * x, uint p, word6 val) p 555 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 557 src/dps8/dps8_utils.h sim_printf ("putbits36_6: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 567 src/dps8/dps8_utils.h static inline void putbits36_7 (word36 * x, uint p, word7 val) p 570 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 572 src/dps8/dps8_utils.h sim_printf ("putbits36_7: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 582 src/dps8/dps8_utils.h static inline void putbits36_8 (word36 * x, uint p, word8 val) p 585 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 587 src/dps8/dps8_utils.h sim_printf ("putbits36_8: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 597 src/dps8/dps8_utils.h static inline void putbits36_9 (word36 * x, uint p, word9 val) p 600 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 602 src/dps8/dps8_utils.h sim_printf ("putbits36_9: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 631 src/dps8/dps8_utils.h static inline void putbits36_10 (word36 * x, uint p, word10 val) p 634 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 636 src/dps8/dps8_utils.h sim_printf ("putbits36_10: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 646 src/dps8/dps8_utils.h static inline void putbits36_12 (word36 * x, uint p, word12 val) p 649 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 651 src/dps8/dps8_utils.h sim_printf ("putbits36_12: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 661 src/dps8/dps8_utils.h static inline void putbits36_13 (word36 * x, uint p, word13 val) p 664 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 666 src/dps8/dps8_utils.h sim_printf ("putbits36_13: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 676 src/dps8/dps8_utils.h static inline void putbits36_14 (word36 * x, uint p, word14 val) p 679 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 681 src/dps8/dps8_utils.h sim_printf ("putbits36_14: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 691 src/dps8/dps8_utils.h static inline void putbits36_15 (word36 * x, uint p, word15 val) p 694 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 696 src/dps8/dps8_utils.h sim_printf ("putbits36_15: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 706 src/dps8/dps8_utils.h static inline void putbits36_16 (word36 * x, uint p, word16 val) p 709 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 711 src/dps8/dps8_utils.h sim_printf ("putbits36_16: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 721 src/dps8/dps8_utils.h static inline void putbits36_17 (word36 * x, uint p, word17 val) p 724 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 726 src/dps8/dps8_utils.h sim_printf ("putbits36_17: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 736 src/dps8/dps8_utils.h static inline void putbits36_18 (word36 * x, uint p, word18 val) p 739 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 741 src/dps8/dps8_utils.h sim_printf ("putbits36_18: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 751 src/dps8/dps8_utils.h static inline void putbits36_23 (word36 * x, uint p, word23 val) p 754 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 756 src/dps8/dps8_utils.h sim_printf ("putbits36_23: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 766 src/dps8/dps8_utils.h static inline void putbits36_24 (word36 * x, uint p, word24 val) p 769 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 771 src/dps8/dps8_utils.h sim_printf ("putbits36_24: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 781 src/dps8/dps8_utils.h static inline void putbits36_28 (word36 * x, uint p, word28 val) p 784 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 786 src/dps8/dps8_utils.h sim_printf ("putbits36_28: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 796 src/dps8/dps8_utils.h static inline void putbits72 (word72 * x, uint p, uint n, word72 val) p 798 src/dps8/dps8_utils.h int shift = 72 - (int) p - (int) n; p 801 src/dps8/dps8_utils.h sim_printf ("putbits72: bad args (pos=%d,n=%d)\n", p, n); p 821 src/dps8/dps8_utils.h * x = or_128 (and_128 (* x, notmask), and_128 (lshift_128 (val, 72 - p - n), mask)); p 827 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS72 (n)) << (72 - p - n)); p 849 src/dps8/dps8_utils.h static inline void putbits18 (word18 * x, uint p, uint n, word18 val) p 851 src/dps8/dps8_utils.h int shift = 18 - (int) p - (int) n; p 854 src/dps8/dps8_utils.h sim_printf ("putbits18: bad args (%06o,pos=%d,n=%d)\n", * x, p, n); p 861 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS18 (n)) << (18 - p - n)); p 890 src/dps8/dps8_utils.h void print_int128 (int128 n, char * p); p 891 src/dps8/dps8_utils.h char * print_int128o (int128 n, char * p); p 63 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 64 src/dps8/fnptelnet.c (* p->read_cb) (client, (ssize_t) event->data.size, (unsigned char *)event->data.buffer); p 77 src/dps8/fnptelnet.c uvClientData * p = client->data; p 78 src/dps8/fnptelnet.c (* p->write_actual_cb) (client, (unsigned char *) event->data.buffer, (ssize_t) event->data.size); p 159 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 160 src/dps8/fnptelnet.c if (p -> assoc) p 184 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 185 src/dps8/fnptelnet.c p->ttype = strdup (event->ttype.name); p 186 src/dps8/fnptelnet.c if (!p->ttype) p 216 src/dps8/fnptelnet.c void * p = (void *) telnet_init (my_telopts, evHandler, 0, client); p 217 src/dps8/fnptelnet.c if (! p) p 232 src/dps8/fnptelnet.c telnet_negotiate (p, q->us, (unsigned char) q->telopt); p 235 src/dps8/fnptelnet.c return p; p 240 src/dps8/fnptelnet.c void * p = (void *) telnet_init (my_3270telopts, evHandler, 0, client); p 241 src/dps8/fnptelnet.c if (! p) p 255 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_TTYPE); p 256 src/dps8/fnptelnet.c telnet_begin_sb (p, TELNET_TELOPT_TTYPE); p 258 src/dps8/fnptelnet.c telnet_send (p, ttype, 1); p 259 src/dps8/fnptelnet.c telnet_finish_sb (p); p 260 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_WILL, (unsigned char) TELNET_TELOPT_BINARY); p 261 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_BINARY); p 262 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_WILL, (unsigned char) TELNET_TELOPT_EOR); p 263 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_EOR); p 265 src/dps8/fnptelnet.c return p; p 215 src/dps8/fnpuv.c # define FREE(p) free(p) p 279 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 280 src/dps8/fnpuv.c uint fnpno = p -> fnpno; p 281 src/dps8/fnpuv.c uint lineno = p -> lineno; p 332 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) stream->data; p 337 src/dps8/fnpuv.c if (p) p 341 src/dps8/fnpuv.c if (p->assoc) p 343 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 347 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: TN3270 %d.%d DISCONNECT]\r\n", ASSUME0, p->stationNo); p 351 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: DISCONNECT %c.d%03d]\r\n", p->fnpno+'a', p->lineno); p 377 src/dps8/fnpuv.c if (p->telnetp) p 379 src/dps8/fnpuv.c telnet_free (p->telnetp); p 382 src/dps8/fnpuv.c p->telnetp = NULL; p 417 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) stream->data; p 418 src/dps8/fnpuv.c if (p) p 420 src/dps8/fnpuv.c if (p->telnetp) p 422 src/dps8/fnpuv.c telnet_recv (p->telnetp, buf->base, (size_t) nread); p 427 src/dps8/fnpuv.c (* p->read_cb) ((uv_tcp_t *) stream, nread, (unsigned char *) buf->base); p 430 src/dps8/fnpuv.c p 644 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 645 src/dps8/fnpuv.c if (! p) //-V547 p 647 src/dps8/fnpuv.c if (!p->telnetp) p 652 src/dps8/fnpuv.c telnet_send (p->telnetp, (char *) data, (size_t) datalen); p 659 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 660 src/dps8/fnpuv.c if (! p) //-V547 p 720 src/dps8/fnpuv.c telnet_send (p->telnetp, (char *) actual_data_start, (size_t) actual_datalen); p 737 src/dps8/fnpuv.c uvClientData * p = client->data; p 738 src/dps8/fnpuv.c (* p->write_cb) (client, data, (ssize_t) strlen ((char *) data)); p 750 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 751 src/dps8/fnpuv.c ltnEOR (p->telnetp); p 820 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->data; p 821 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 846 src/dps8/fnpuv.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 847 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 850 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 851 src/dps8/fnpuv.c if (! p) p 863 src/dps8/fnpuv.c client->data = p; p 864 src/dps8/fnpuv.c p->assoc = false; p 865 src/dps8/fnpuv.c p->nPos = 0; p 866 src/dps8/fnpuv.c p->ttype = NULL; p 867 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 871 src/dps8/fnpuv.c p->read_cb = fnpuv_unassociated_readcb; p 872 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write; p 873 src/dps8/fnpuv.c p->telnetp = ltnConnect (client); p 875 src/dps8/fnpuv.c if (! p->telnetp) p 883 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 884 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 885 src/dps8/fnpuv.c p->telnetp = NULL; p 887 src/dps8/fnpuv.c p->fnpno = q->fnpno; p 888 src/dps8/fnpuv.c p->lineno = q->lineno; p 889 src/dps8/fnpuv.c p->assoc = true; p 896 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->data; p 897 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 973 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->handle->data; p 975 src/dps8/fnpuv.c if (! p) p 980 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 996 src/dps8/fnpuv.c linep->line_client->data = p; p 997 src/dps8/fnpuv.c if (p->telnetp) p 999 src/dps8/fnpuv.c ltnDialout (p->telnetp); p 1087 src/dps8/fnpuv.c struct fw_entry_s * p = fw_entries + i; p 1088 src/dps8/fnpuv.c if (this_line < p->line_0 || this_line > p->line_1) p 1090 src/dps8/fnpuv.c if ((ip_addr & p->cidr_mask) != (p->ipaddr & p->cidr_mask)) p 1092 src/dps8/fnpuv.c accept = p->accept; p 1125 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1126 src/dps8/fnpuv.c if (! p) p 1138 src/dps8/fnpuv.c p->assoc = true; p 1139 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 1140 src/dps8/fnpuv.c p->nPos = 0; p 1141 src/dps8/fnpuv.c p->ttype = NULL; p 1142 src/dps8/fnpuv.c p->fnpno = fnpno; p 1143 src/dps8/fnpuv.c p->lineno = lineno; p 1144 src/dps8/fnpuv.c linep->line_client->data = p; p 1148 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write; p 1149 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1150 src/dps8/fnpuv.c p->telnetp = ltnConnect (linep->line_client); p 1151 src/dps8/fnpuv.c if (! p->telnetp) p 1158 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 1159 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1160 src/dps8/fnpuv.c p->telnetp = NULL; // Mark this line as 'not a telnet connection' p 1170 src/dps8/fnpuv.c p 1171 src/dps8/fnpuv.c p 1206 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1207 src/dps8/fnpuv.c if (! p) p 1219 src/dps8/fnpuv.c p->assoc = false; p 1220 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 1221 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 1222 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1223 src/dps8/fnpuv.c p->nPos = 0; p 1224 src/dps8/fnpuv.c p->ttype = NULL; p 1225 src/dps8/fnpuv.c p->fnpno = fnpno; p 1226 src/dps8/fnpuv.c p->lineno = lineno; p 1227 src/dps8/fnpuv.c linep->server.data = p; p 1260 src/dps8/fnpuv.c p 1261 src/dps8/fnpuv.c p 1273 src/dps8/fnpuv.c p 1274 src/dps8/fnpuv.c p 1275 src/dps8/fnpuv.c p 1276 src/dps8/fnpuv.c p 1277 src/dps8/fnpuv.c p 1279 src/dps8/fnpuv.c p 1532 src/dps8/fnpuv.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 1533 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 1536 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1537 src/dps8/fnpuv.c if (! p) p 1549 src/dps8/fnpuv.c client->data = p; p 1550 src/dps8/fnpuv.c p->assoc = false; p 1551 src/dps8/fnpuv.c p->fnpno = fnpno; p 1552 src/dps8/fnpuv.c p->lineno = lineno; p 1553 src/dps8/fnpuv.c p->nPos = 0; p 1554 src/dps8/fnpuv.c p->ttype = NULL; p 1555 src/dps8/fnpuv.c p->read_cb = fnpuv_3270_readcb; p 1556 src/dps8/fnpuv.c p->write_cb = fnpuv_start_3270_write; p 1557 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_3270_actual; p 1558 src/dps8/fnpuv.c p->stationNo = stn_no; p 1559 src/dps8/fnpuv.c p->telnetp = ltnConnect3270 (client); p 1561 src/dps8/fnpuv.c if (! p->telnetp) p 38 src/dps8/hdbg.c # define FREE(p) free(p) p 172 src/dps8/hdbg.c unsigned long p = hdbg_inc (); \ p 173 src/dps8/hdbg.c hevents[p].type = t; \ p 174 src/dps8/hdbg.c hevents[p].cpu_idx = current_running_cpu_idx; \ p 175 src/dps8/hdbg.c hevents[p].time = cpu.cycleCnt; \ p 176 src/dps8/hdbg.c strncpy (hevents[p].ctx, ctx, 15); \ p 177 src/dps8/hdbg.c hevents[p].ctx[15] = 0; \ p 178 src/dps8/hdbg.c hevents[p].rw = tf; p 188 src/dps8/hdbg.c hevents[p].trace.addrMode = get_addr_mode (); p 189 src/dps8/hdbg.c hevents[p].trace.segno = cpu.PPR.PSR; p 190 src/dps8/hdbg.c hevents[p].trace.ic = cpu.PPR.IC; p 191 src/dps8/hdbg.c hevents[p].trace.ring = cpu.PPR.PRR; p 192 src/dps8/hdbg.c hevents[p].trace.inst = IWB_IRODD; p 198 src/dps8/hdbg.c hevents[p].memref.addr = addr; p 199 src/dps8/hdbg.c hevents[p].memref.data = data; p 205 src/dps8/hdbg.c hevents[p].memref.addr = addr; p 206 src/dps8/hdbg.c hevents[p].memref.data = data; p 212 src/dps8/hdbg.c hevents[p].apu.segno = segno; p 213 src/dps8/hdbg.c hevents[p].apu.offset = offset; p 214 src/dps8/hdbg.c hevents[p].apu.final = final; p 215 src/dps8/hdbg.c hevents[p].apu.data = data; p 221 src/dps8/hdbg.c hevents[p].apu.segno = segno; p 222 src/dps8/hdbg.c hevents[p].apu.offset = offset; p 223 src/dps8/hdbg.c hevents[p].apu.final = final; p 224 src/dps8/hdbg.c hevents[p].apu.data = data; p 230 src/dps8/hdbg.c hevents[p].fault.faultNumber = faultNumber; p 231 src/dps8/hdbg.c hevents[p].fault.subFault = subFault; p 232 src/dps8/hdbg.c strncpy (hevents[p].fault.faultMsg, faultMsg, 63); p 233 src/dps8/hdbg.c hevents[p].fault.faultMsg[63] = 0; p 239 src/dps8/hdbg.c hevents[p].intrSet.inum = inum; p 240 src/dps8/hdbg.c hevents[p].intrSet.cpuUnitIdx = cpuUnitIdx; p 241 src/dps8/hdbg.c hevents[p].intrSet.scuUnitIdx = scuUnitIdx; p 247 src/dps8/hdbg.c hevents[p].cpu_idx = current_running_cpu_idx; p 248 src/dps8/hdbg.c hevents[p].time = cpu.cycleCnt; p 249 src/dps8/hdbg.c strncpy (hevents[p].ctx, ctx, 15); p 250 src/dps8/hdbg.c hevents[p].ctx[15] = 0; p 251 src/dps8/hdbg.c hevents[p].intr.intr_pair_addr = intr_pair_addr; p 257 src/dps8/hdbg.c hevents[p].reg.type = type; p 258 src/dps8/hdbg.c hevents[p].reg.data = data; p 264 src/dps8/hdbg.c hevents[p].reg.type = type; p 265 src/dps8/hdbg.c hevents[p].reg.data = data; p 271 src/dps8/hdbg.c hevents[p].par.type = type; p 272 src/dps8/hdbg.c hevents[p].par.data = * data; p 278 src/dps8/hdbg.c hevents[p].par.type = type; p 279 src/dps8/hdbg.c hevents[p].par.data = * data; p 286 src/dps8/hdbg.c p 287 src/dps8/hdbg.c p 293 src/dps8/hdbg.c p 294 src/dps8/hdbg.c p 301 src/dps8/hdbg.c hevents [p].iefp.type = type; p 302 src/dps8/hdbg.c hevents [p].iefp.segno = segno; p 303 src/dps8/hdbg.c hevents [p].iefp.offset = offset; p 311 src/dps8/hdbg.c vsnprintf (hevents [p].note.noteBody, NOTE_SZ - 1, fmt, arglist); p 318 src/dps8/hdbg.c static void printM (struct hevt * p) { p 320 src/dps8/hdbg.c (unsigned long long int)p->time, p 321 src/dps8/hdbg.c p->cpu_idx, p 322 src/dps8/hdbg.c p->ctx, p 323 src/dps8/hdbg.c p->rw ? "write" : "read ", p 324 src/dps8/hdbg.c p->memref.addr, p 325 src/dps8/hdbg.c (unsigned long long int)p->memref.data); p 328 src/dps8/hdbg.c static void printAPU (struct hevt * p) { p 330 src/dps8/hdbg.c (unsigned long long int)p->time, p 331 src/dps8/hdbg.c p->cpu_idx, p 332 src/dps8/hdbg.c p->ctx, p 333 src/dps8/hdbg.c p->rw ? "write" : "read ", p 334 src/dps8/hdbg.c p->apu.segno, p 335 src/dps8/hdbg.c p->apu.offset, p 336 src/dps8/hdbg.c p->apu.final, p 337 src/dps8/hdbg.c (unsigned long long int)p->apu.data); p 340 src/dps8/hdbg.c static void printTrace (struct hevt * p) { p 342 src/dps8/hdbg.c if (p -> trace.addrMode == ABSOLUTE_mode) { p 344 src/dps8/hdbg.c (unsigned long long int)p->time, p 345 src/dps8/hdbg.c p->cpu_idx, p 346 src/dps8/hdbg.c p->ctx, p 347 src/dps8/hdbg.c p->trace.ic, p 348 src/dps8/hdbg.c p->trace.ring, p 349 src/dps8/hdbg.c (unsigned long long int)p->trace.inst, p 350 src/dps8/hdbg.c disassemble (buf, p->trace.inst)); p 353 src/dps8/hdbg.c (unsigned long long int)p->time, p 354 src/dps8/hdbg.c p->cpu_idx, p 355 src/dps8/hdbg.c p->ctx, p 356 src/dps8/hdbg.c p->trace.segno, p 357 src/dps8/hdbg.c p->trace.ic, p 358 src/dps8/hdbg.c p->trace.ring, p 359 src/dps8/hdbg.c (unsigned long long int)p->trace.inst, p 360 src/dps8/hdbg.c disassemble (buf, p->trace.inst)); p 364 src/dps8/hdbg.c static void printFault (struct hevt * p) { p 366 src/dps8/hdbg.c (unsigned long long int)p->time, p 367 src/dps8/hdbg.c p->cpu_idx, p 368 src/dps8/hdbg.c p->ctx, p 369 src/dps8/hdbg.c p->fault.faultNumber, p 370 src/dps8/hdbg.c p->fault.faultNumber, p 371 src/dps8/hdbg.c (unsigned long long int)p->fault.subFault.bits, p 372 src/dps8/hdbg.c (unsigned long long int)p->fault.subFault.bits, p 373 src/dps8/hdbg.c p->fault.faultMsg); p 376 src/dps8/hdbg.c static void printIntrSet (struct hevt * p) { p 378 src/dps8/hdbg.c (unsigned long long int)p->time, p 379 src/dps8/hdbg.c p->cpu_idx, p 380 src/dps8/hdbg.c p->ctx, p 381 src/dps8/hdbg.c p->intrSet.inum, p 382 src/dps8/hdbg.c p->intrSet.inum, p 383 src/dps8/hdbg.c p->intrSet.cpuUnitIdx, p 384 src/dps8/hdbg.c p->intrSet.scuUnitIdx); p 387 src/dps8/hdbg.c static void printIntr (struct hevt * p) { p 389 src/dps8/hdbg.c (unsigned long long int)p->time, p 390 src/dps8/hdbg.c p->cpu_idx, p 391 src/dps8/hdbg.c p->ctx, p 392 src/dps8/hdbg.c p->intr.intr_pair_addr); p 407 src/dps8/hdbg.c static void printReg (struct hevt * p) { p 408 src/dps8/hdbg.c if (p->reg.type == hreg_IR) p 410 src/dps8/hdbg.c (unsigned long long int)p->time, p 411 src/dps8/hdbg.c p->cpu_idx, p 412 src/dps8/hdbg.c p->ctx, p 413 src/dps8/hdbg.c p->rw ? "write" : "read ", p 414 src/dps8/hdbg.c regNames[p->reg.type], p 415 src/dps8/hdbg.c (unsigned long long int)p->reg.data, p 416 src/dps8/hdbg.c TSTF (p->reg.data, I_ZERO), p 417 src/dps8/hdbg.c TSTF (p->reg.data, I_NEG), p 418 src/dps8/hdbg.c TSTF (p->reg.data, I_CARRY), p 419 src/dps8/hdbg.c TSTF (p->reg.data, I_OFLOW), p 420 src/dps8/hdbg.c TSTF (p->reg.data, I_TALLY)); p 421 src/dps8/hdbg.c else if (p->reg.type >= hreg_X0 && p->reg.type <= hreg_X7) p 423 src/dps8/hdbg.c (unsigned long long int)p->time, p 424 src/dps8/hdbg.c p->cpu_idx, p 425 src/dps8/hdbg.c p->ctx, p 426 src/dps8/hdbg.c p->rw ? "write" : "read ", p 427 src/dps8/hdbg.c regNames[p->reg.type], p 428 src/dps8/hdbg.c (unsigned long long int)p->reg.data); p 431 src/dps8/hdbg.c (unsigned long long int)p->time, p 432 src/dps8/hdbg.c p->cpu_idx, p 433 src/dps8/hdbg.c p->ctx, p 434 src/dps8/hdbg.c p->rw ? "write" : "read ", p 435 src/dps8/hdbg.c regNames[p->reg.type], p 436 src/dps8/hdbg.c (unsigned long long int)p->reg.data); p 439 src/dps8/hdbg.c static void printPAReg (struct hevt * p) p 441 src/dps8/hdbg.c if (p->reg.type >= hreg_PR0 && p->reg.type <= hreg_PR7) p 443 src/dps8/hdbg.c (unsigned long long int)p->time, p 444 src/dps8/hdbg.c p->cpu_idx, p 445 src/dps8/hdbg.c p->ctx, p 446 src/dps8/hdbg.c p->rw ? "write" : "read ", p 447 src/dps8/hdbg.c regNames[p->reg.type], p 448 src/dps8/hdbg.c p->par.data.SNR, p 449 src/dps8/hdbg.c p->par.data.WORDNO, p 450 src/dps8/hdbg.c p->par.data.PR_BITNO, p 451 src/dps8/hdbg.c p->par.data.RNR); p 454 src/dps8/hdbg.c (unsigned long long int)p->time, p 455 src/dps8/hdbg.c p->cpu_idx, p 456 src/dps8/hdbg.c p->ctx, p 457 src/dps8/hdbg.c regNames[p->reg.type], p 458 src/dps8/hdbg.c p->par.data.SNR, p 459 src/dps8/hdbg.c p->par.data.WORDNO, p 460 src/dps8/hdbg.c p->par.data.AR_CHAR, p 461 src/dps8/hdbg.c p->par.data.AR_BITNO, p 462 src/dps8/hdbg.c p->par.data.RNR); p 465 src/dps8/hdbg.c static void printDSBRReg (struct hevt * p) { p 467 src/dps8/hdbg.c (unsigned long long int)p->time, p 468 src/dps8/hdbg.c p->cpu_idx, p 469 src/dps8/hdbg.c p->ctx, p 470 src/dps8/hdbg.c p->rw ? "write" : "read ", p 471 src/dps8/hdbg.c regNames[p->reg.type], p 472 src/dps8/hdbg.c p->par.data.SNR, p 473 src/dps8/hdbg.c p->par.data.WORDNO, p 474 src/dps8/hdbg.c p->par.data.PR_BITNO, p 475 src/dps8/hdbg.c p->par.data.RNR); p 478 src/dps8/hdbg.c static void printIEFP (struct hevt * p) { p 479 src/dps8/hdbg.c switch (p->iefp.type) { p 482 src/dps8/hdbg.c (unsigned long long int)p->time, p 483 src/dps8/hdbg.c p->cpu_idx, p 484 src/dps8/hdbg.c p->iefp.offset); p 489 src/dps8/hdbg.c (unsigned long long int)p->time, p 490 src/dps8/hdbg.c p->cpu_idx, p 491 src/dps8/hdbg.c p->iefp.offset); p 496 src/dps8/hdbg.c (unsigned long long int)p->time, p 497 src/dps8/hdbg.c p->cpu_idx, p 498 src/dps8/hdbg.c p->iefp.segno, p 499 src/dps8/hdbg.c p->iefp.offset); p 504 src/dps8/hdbg.c (unsigned long long int)p->time, p 505 src/dps8/hdbg.c p->cpu_idx, p 506 src/dps8/hdbg.c p->iefp.segno, p 507 src/dps8/hdbg.c p->iefp.offset); p 512 src/dps8/hdbg.c (long long unsigned int)p->time, p 513 src/dps8/hdbg.c p->cpu_idx, p 514 src/dps8/hdbg.c p->iefp.offset); p 519 src/dps8/hdbg.c (long long unsigned int)p->time, p 520 src/dps8/hdbg.c p->cpu_idx, p 521 src/dps8/hdbg.c p->iefp.offset); p 526 src/dps8/hdbg.c (unsigned long long int)p->time, p 527 src/dps8/hdbg.c p->cpu_idx, p 528 src/dps8/hdbg.c p->iefp.segno, p 529 src/dps8/hdbg.c p->iefp.offset); p 534 src/dps8/hdbg.c (unsigned long long int)p->time, p 535 src/dps8/hdbg.c p->cpu_idx, p 536 src/dps8/hdbg.c p->iefp.segno, p 537 src/dps8/hdbg.c p->iefp.offset); p 542 src/dps8/hdbg.c (long long unsigned int)p->time, p 543 src/dps8/hdbg.c p->cpu_idx, p 544 src/dps8/hdbg.c p->iefp.segno, p 545 src/dps8/hdbg.c p->iefp.offset); p 550 src/dps8/hdbg.c static void printNote (struct hevt * p) { p 552 src/dps8/hdbg.c (long long unsigned int)p->time, p 553 src/dps8/hdbg.c p->note.noteBody); p 571 src/dps8/hdbg.c for (unsigned long p = 0; p < hdbgSize; p ++) { p 572 src/dps8/hdbg.c unsigned long q = (hevtPtr + p) % hdbgSize; p 83 src/dps8/libtelnet.c #define FREE(p) do \ p 85 src/dps8/libtelnet.c free((p)); \ p 86 src/dps8/libtelnet.c (p) = NULL; \ p 92 src/dps8/libtelnet.c # define FREE(p) free(p) p 60 src/dps8/shm.c void *p; p 320 src/dps8/shm.c p = mmap(NULL, shm_size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0); p 321 src/dps8/shm.c if (p == MAP_FAILED) p 333 src/dps8/shm.c if (msync(p, shm_size, MS_SYNC) == -1) p 344 src/dps8/shm.c return p; p 351 src/dps8/shm.c void *p; p 456 src/dps8/shm.c p = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0); p 457 src/dps8/shm.c if (p == MAP_FAILED) p 493 src/dps8/shm.c (void)msync(p, shm_size, MS_SYNC); p 495 src/dps8/shm.c return p; p 458 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[cpuNum]; p 459 src/dps8/threadz.c if (p->run) p 462 src/dps8/threadz.c p->cpuThreadArg = (int) cpuNum; p 464 src/dps8/threadz.c rc = pthread_mutex_init (& p->runLock, NULL); p 467 src/dps8/threadz.c rc = pthread_cond_init (& p->runCond, NULL); p 471 src/dps8/threadz.c p->run = true; p 476 src/dps8/threadz.c p->sleepClock = CLOCK_REALTIME; p 477 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, NULL); p 479 src/dps8/threadz.c rc = pthread_condattr_init (& p->sleepCondAttr); p 483 src/dps8/threadz.c rc = pthread_condattr_setclock (& p->sleepCondAttr, CLOCK_MONOTONIC); p 486 src/dps8/threadz.c p->sleepClock = CLOCK_REALTIME; p 488 src/dps8/threadz.c p->sleepClock = CLOCK_MONOTONIC; p 491 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, & p->sleepCondAttr); p 493 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, NULL); p 500 src/dps8/threadz.c & p->cpuThread, p 504 src/dps8/threadz.c & p->cpuThreadArg); p 507 src/dps8/threadz.c & p->cpuThread, p 510 src/dps8/threadz.c & p->cpuThreadArg); p 519 src/dps8/threadz.c pthread_set_name_np (p->cpuThread, nm); p 528 src/dps8/threadz.c pthread_setname_np (p->cpuThread, nm); p 541 src/dps8/threadz.c int s = pthread_setaffinity_np (p->cpuThread, sizeof (cpu_set_t), & cpuset); p 550 src/dps8/threadz.c if (rtsched_thread(p->cpuThread) != 0) p 559 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 560 src/dps8/threadz.c p->run = false; p 570 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 571 src/dps8/threadz.c if (p->run) p 573 src/dps8/threadz.c rc = pthread_mutex_lock (& p->runLock); p 576 src/dps8/threadz.c while (! p->run) p 578 src/dps8/threadz.c rc = pthread_cond_wait (& p->runCond, & p->runLock); p 582 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->runLock); p 592 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 600 src/dps8/threadz.c clock_gettime (p->sleepClock, & startTime); p 619 src/dps8/threadz.c rc = pthread_cond_timedwait (& p->sleepCond, & scu_lock, & absTime); p 632 src/dps8/threadz.c clock_gettime (p->sleepClock, & newTime); p 658 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[cpuNum]; p 660 src/dps8/threadz.c rc = pthread_cond_signal (& p->sleepCond); p 696 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 698 src/dps8/threadz.c p->inCnt = 0; p 699 src/dps8/threadz.c p->outCnt = 0; p 701 src/dps8/threadz.c p->iomThreadArg = (int) iomNum; p 703 src/dps8/threadz.c p->ready = false; p 705 src/dps8/threadz.c p->intr = false; p 706 src/dps8/threadz.c rc = pthread_mutex_init (& p->intrLock, NULL); p 709 src/dps8/threadz.c rc = pthread_cond_init (& p->intrCond, NULL); p 715 src/dps8/threadz.c & p->iomThread, p 719 src/dps8/threadz.c & p->iomThreadArg); p 722 src/dps8/threadz.c & p->iomThread, p 725 src/dps8/threadz.c & p->iomThreadArg); p 733 src/dps8/threadz.c pthread_setname_np (p->iomThread, nm); p 735 src/dps8/threadz.c pthread_set_name_np (p->iomThread, nm); p 744 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[this_iom_idx]; p 745 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 748 src/dps8/threadz.c p -> ready = true; p 749 src/dps8/threadz.c while (! p->intr) p 751 src/dps8/threadz.c rc = pthread_cond_wait (& p->intrCond, & p->intrLock); p 756 src/dps8/threadz.c p->outCnt++; p 757 src/dps8/threadz.c if (p->inCnt != p->outCnt) p 759 src/dps8/threadz.c p->inCnt, p->outCnt); p 768 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[this_iom_idx]; p 769 src/dps8/threadz.c p->intr = false; p 770 src/dps8/threadz.c rc = pthread_cond_signal (& p->intrCond); p 773 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 783 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 784 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 787 src/dps8/threadz.c while (p->intr) p 789 src/dps8/threadz.c rc = pthread_cond_wait (& p->intrCond, & p->intrLock); p 793 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 803 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 804 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 807 src/dps8/threadz.c while (p->intr) p 809 src/dps8/threadz.c rc = pthread_cond_wait(&p->intrCond, &p->intrLock); p 814 src/dps8/threadz.c p->inCnt++; p 816 src/dps8/threadz.c p->intr = true; p 817 src/dps8/threadz.c rc = pthread_cond_signal (& p->intrCond); p 820 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 829 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 830 src/dps8/threadz.c while (! p -> ready) p 863 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 864 src/dps8/threadz.c p->chnThreadArg = (int) (chnNum + iomNum * MAX_CHANNELS); p 867 src/dps8/threadz.c p->inCnt = 0; p 868 src/dps8/threadz.c p->outCnt = 0; p 870 src/dps8/threadz.c p->ready = false; p 872 src/dps8/threadz.c p->connect = false; p 873 src/dps8/threadz.c rc = pthread_mutex_init (& p->connectLock, NULL); p 876 src/dps8/threadz.c rc = pthread_cond_init (& p->connectCond, NULL); p 882 src/dps8/threadz.c & p->chnThread, p 886 src/dps8/threadz.c & p->chnThreadArg); p 889 src/dps8/threadz.c & p->chnThread, p 892 src/dps8/threadz.c & p->chnThreadArg); p 900 src/dps8/threadz.c pthread_setname_np (p->chnThread, nm); p 902 src/dps8/threadz.c pthread_set_name_np (p->chnThread, nm); p 911 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[this_iom_idx][this_chan_num]; p 913 src/dps8/threadz.c rc = pthread_mutex_lock (& p->connectLock); p 916 src/dps8/threadz.c p -> ready = true; p 917 src/dps8/threadz.c while (! p->connect) p 919 src/dps8/threadz.c rc = pthread_cond_wait (& p->connectCond, & p->connectLock); p 924 src/dps8/threadz.c p->outCnt++; p 925 src/dps8/threadz.c if (p->inCnt != p->outCnt) p 927 src/dps8/threadz.c p->inCnt, p->outCnt); p 936 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[this_iom_idx][this_chan_num]; p 937 src/dps8/threadz.c p->connect = false; p 938 src/dps8/threadz.c rc = pthread_cond_signal (& p->connectCond); p 941 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->connectLock); p 951 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 952 src/dps8/threadz.c rc = pthread_mutex_lock (& p->connectLock); p 955 src/dps8/threadz.c while (p->connect) p 957 src/dps8/threadz.c rc = pthread_cond_wait(&p->connectCond, &p->connectLock); p 962 src/dps8/threadz.c p->inCnt++; p 964 src/dps8/threadz.c p->connect = true; p 965 src/dps8/threadz.c rc = pthread_cond_signal (& p->connectCond); p 968 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->connectLock); p 977 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 978 src/dps8/threadz.c while (! p -> ready) p 29 src/dps8/ucache.c void ucCacheSave (uint ucNum, word15 segno, word18 offset, word14 bound, word1 p, word24 address, word3 r1, bool paged) { p 41 src/dps8/ucache.c ep->p = p; p 44 src/dps8/ucache.c hdbgNote ("ucache", "save %u %05o:%06o %05o %o %08o %o %o", ucNum, segno, offset, bound, p, address, r1, paged); p 48 src/dps8/ucache.c bool ucCacheCheck (uint ucNum, word15 segno, word18 offset, word14 * bound, word1 * p, word24 * address, word3 * r1, bool * paged) { p 89 src/dps8/ucache.c hdbgNote ("ucache", "hit %u %05o:%06o %05o %o %08o %o %o", ucNum, segno, offset, ep->bound, ep->p, ep->address, ep->r1, ep->paged); p 109 src/dps8/ucache.c * p = ep->p; p 35 src/dps8/ucache.h word1 p; p 64 src/dps8/ucache.h void ucCacheSave (uint ucNum, word15 segno, word18 offset, word14 bound, word1 p, word24 address, word3 r1, bool paged); p 65 src/dps8/ucache.h bool ucCacheCheck (uint ucNum, word15 segno, word18 offset, word14 * bound, word1 * p, word24 * address, word3 * r1, bool * paged); p 60 src/dps8/utarray.h # define FREE(p) free(p) p 64 src/dps8/utarray.h # define FREE(p) do \ p 66 src/dps8/utarray.h free((p)); \ p 67 src/dps8/utarray.h (p) = NULL; \ p 138 src/dps8/utarray.h # define utarray_push_back(a,p) do { \ p 140 src/dps8/utarray.h if ((a)->icd.copy) { (a)->icd.copy( _utarray_eltptr(a,(a)->i++), p); } \ p 141 src/dps8/utarray.h else { memcpy(_utarray_eltptr(a,(a)->i++), p, (a)->icd.sz); }; \ p 161 src/dps8/utarray.h # define utarray_insert(a,p,j) do { \ p 168 src/dps8/utarray.h if ((a)->icd.copy) { (a)->icd.copy( _utarray_eltptr(a,j), p); } \ p 169 src/dps8/utarray.h else { memcpy(_utarray_eltptr(a,j), p, (a)->icd.sz); }; \ p 57 src/dps8/utfile.c # define FREE(p) free(p) p 59 src/dps8/utfile.c # define FREE(p) do \ p 61 src/dps8/utfile.c free((p)); \ p 62 src/dps8/utfile.c (p) = NULL; \ p 72 src/dps8/utfile.c const unsigned char *p = buf; p 75 src/dps8/utfile.c h = h * 31 + p[i]; p 90 src/dps8/uthash.h # define FREE(p) free(p) p 92 src/dps8/uthash.h # define FREE(p) do \ p 94 src/dps8/uthash.h free((p)); \ p 95 src/dps8/uthash.h (p) = NULL; \ p 585 src/dps8/uthash.h # define MUR_GETBLOCK(p,i) p[i] p 587 src/dps8/uthash.h # define MUR_PLUS0_ALIGNED(p) (((unsigned long)p & 0x3) == 0) p 588 src/dps8/uthash.h # define MUR_PLUS1_ALIGNED(p) (((unsigned long)p & 0x3) == 1) p 589 src/dps8/uthash.h # define MUR_PLUS2_ALIGNED(p) (((unsigned long)p & 0x3) == 2) p 590 src/dps8/uthash.h # define MUR_PLUS3_ALIGNED(p) (((unsigned long)p & 0x3) == 3) p 591 src/dps8/uthash.h # define WP(p) ((uint32_t*)((unsigned long)(p) & ~3UL)) p 593 src/dps8/uthash.h # define MUR_THREE_ONE(p) ((((*WP(p))&0x00ffffff) << 8) | (((*(WP(p)+1))&0xff000000) >> 24)) p 594 src/dps8/uthash.h # define MUR_TWO_TWO(p) ((((*WP(p))&0x0000ffff) <<16) | (((*(WP(p)+1))&0xffff0000) >> 16)) p 595 src/dps8/uthash.h # define MUR_ONE_THREE(p) ((((*WP(p))&0x000000ff) <<24) | (((*(WP(p)+1))&0xffffff00) >> 8)) p 597 src/dps8/uthash.h # define MUR_THREE_ONE(p) ((((*WP(p))&0xffffff00) >> 8) | (((*(WP(p)+1))&0x000000ff) << 24)) p 598 src/dps8/uthash.h # define MUR_TWO_TWO(p) ((((*WP(p))&0xffff0000) >>16) | (((*(WP(p)+1))&0x0000ffff) << 16)) p 599 src/dps8/uthash.h # define MUR_ONE_THREE(p) ((((*WP(p))&0xff000000) >>24) | (((*(WP(p)+1))&0x00ffffff) << 8)) p 601 src/dps8/uthash.h # define MUR_GETBLOCK(p,i) (MUR_PLUS0_ALIGNED(p) ? ((p)[i]) : \ p 602 src/dps8/uthash.h (MUR_PLUS1_ALIGNED(p) ? MUR_THREE_ONE(p) : \ p 603 src/dps8/uthash.h (MUR_PLUS2_ALIGNED(p) ? MUR_TWO_TWO(p) : \ p 604 src/dps8/uthash.h MUR_ONE_THREE(p)))) p 34 src/dps8/uvutil.c # define FREE(p) free(p) p 528 src/dps8/uvutil.c void * p = (void *) telnet_init (my_telopts, evHandler, 0, client); p 529 src/dps8/uvutil.c if (!p) p 538 src/dps8/uvutil.c telnet_negotiate (p, q->us, (unsigned char) q->telopt); p 541 src/dps8/uvutil.c return p; p 596 src/dps8/uvutil.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 597 src/dps8/uvutil.c sim_printf ("\r[OPC emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 79 src/simh/linehistory.c # define FREE(p) do \ p 81 src/simh/linehistory.c free((p)); \ p 82 src/simh/linehistory.c (p) = NULL; \ p 88 src/simh/linehistory.c # define FREE(p) free(p) p 125 src/simh/scp.c # define FREE(p) free(p) p 1385 src/simh/scp.c char *p, *q, *r; p 1388 src/simh/scp.c while ((r = strstr(p = r + len, sub)) != NULL) { p 1389 src/simh/scp.c while (p < r) p 1390 src/simh/scp.c *q++ = *p++; p 1392 src/simh/scp.c while ((*q++ = *p++) != '\0') p 8663 src/simh/scp.c int32 lo, hi, p; p 8673 src/simh/scp.c p = (lo + hi) >> 1; /* probe */ p 8674 src/simh/scp.c bp = sim_brk_tab[p]; /* table addr */ p 8676 src/simh/scp.c sim_brk_ins = p; p 8680 src/simh/scp.c hi = p - 1; p 8681 src/simh/scp.c else lo = p + 1; /* go up? p is lower */ p 8684 src/simh/scp.c sim_brk_ins = p; p 8685 src/simh/scp.c else sim_brk_ins = p + 1; /* after last sch */ p 10729 src/simh/scp.c const char *p; p 10764 src/simh/scp.c p = dptr->name; p 10768 src/simh/scp.c p = sim_name; p 10769 src/simh/scp.c top.title = (char *) malloc (strlen (p) + ((flag & SCP_HELP_ATTACH)? sizeof (attach_help)-1: 0) +1); p 10782 src/simh/scp.c for (i = 0; p[i]; i++ ) p 10783 src/simh/scp.c top.title[i] = (char)toupper (p[i]); p 10878 src/simh/scp.c char *p; p 10885 src/simh/scp.c for (p = tbuf; *p; p++) { p 10886 src/simh/scp.c if (blankch (*p)) p 10887 src/simh/scp.c *p = '_'; p 97 src/simh/sim_console.c # define FREE(p) free(p) p 794 src/simh/sim_defs.h # define FREE(p) free(p) p 796 src/simh/sim_defs.h # define FREE(p) do \ p 798 src/simh/sim_defs.h free((p)); \ p 799 src/simh/sim_defs.h (p) = NULL; \ p 79 src/simh/sim_disk.c # define FREE(p) free(p) p 72 src/simh/sim_fio.c # define FREE(p) free(p) p 73 src/simh/sim_sock.c # define FREE(p) free(p) p 75 src/simh/sim_sock.c # define FREE(p) do \ p 77 src/simh/sim_sock.c free((p)); \ p 78 src/simh/sim_sock.c (p) = NULL; \ p 79 src/simh/sim_tape.c # define FREE(p) free(p) p 1991 src/simh/sim_tape.c uint32 lo, hi, p; p 1998 src/simh/sim_tape.c p = (lo + hi) >> 1; p 1999 src/simh/sim_tape.c if (uptr->pos == map[p]) p 2000 src/simh/sim_tape.c return ((p == 0)? map[p]: map[p - 1]); p 2001 src/simh/sim_tape.c else if (uptr->pos < map[p]) p 2002 src/simh/sim_tape.c hi = p - 1; p 2003 src/simh/sim_tape.c else lo = p + 1; p 2006 src/simh/sim_tape.c return ((p == 0)? map[p]: map[p - 1]); p 131 src/simh/sim_tmxr.c # define FREE(p) free(p) p 546 src/simh/sim_tmxr.c static void tmxr_rmvrc (TMLN *lp, int32 p) p 548 src/simh/sim_tmxr.c for ( ; p < lp->rxbpi; p++) { /* work from "p" through end of buffer */ p 549 src/simh/sim_tmxr.c lp->rxb[p] = lp->rxb[p + 1]; /* slide following character down */ p 550 src/simh/sim_tmxr.c lp->rbr[p] = lp->rbr[p + 1]; /* adjust break status too */ p 553 src/simh/sim_tmxr.c lp->rbr[p] = 0; /* clear potential break from vacated slot */ p 769 src/simh/sim_tmxr.c const unsigned char *p = buf; p 772 src/simh/sim_tmxr.c h = h * 31 + p[i];