p 151 src/decNumber/decNumber.c #define FREE(p) do \ p 153 src/decNumber/decNumber.c free((p)); \ p 154 src/decNumber/decNumber.c (p) = NULL; \ p 1262 src/decNumber/decNumber.c Int p; // working precision p 1336 src/decNumber/decNumber.c p=(rhs->digits+t>set->digits?rhs->digits+t:set->digits)+3; p 1337 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p)-1)*sizeof(Unit); p 1345 src/decNumber/decNumber.c aset.digits=p; // as calculated p 1359 src/decNumber/decNumber.c p=set->digits+3; p 1360 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p)-1)*sizeof(Unit); p 1376 src/decNumber/decNumber.c aset.digits=p; p 4627 src/decNumber/decNumber.c Int p; // .. p 4726 src/decNumber/decNumber.c for (p=0, *lip=0; p<FASTDIGS && count>0; p 4727 src/decNumber/decNumber.c p+=DECDPUN, cup++, count-=DECDPUN) p 4728 src/decNumber/decNumber.c *lip+=*cup*powers[p]; p 4731 src/decNumber/decNumber.c for (p=0, *rip=0; p<FASTDIGS && count>0; p 4732 src/decNumber/decNumber.c p+=DECDPUN, cup++, count-=DECDPUN) p 4733 src/decNumber/decNumber.c *rip+=*cup*powers[p]; p 4793 src/decNumber/decNumber.c for (p=0; p<FASTDIGS-DECDPUN; p+=DECDPUN, up++) { p 4960 src/decNumber/decNumber.c Int p; // working precision p 5061 src/decNumber/decNumber.c p=9; // set a working precision p 5109 src/decNumber/decNumber.c p=MAXI(x->digits, set->digits)+h+2; // [h<=8] p 5117 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p*2)-1)*sizeof(Unit); p 5129 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(p+2)-1)*sizeof(Unit); p 5147 src/decNumber/decNumber.c aset.digits=p*2; // double p 5149 src/decNumber/decNumber.c tset.digits=p; p 5164 src/decNumber/decNumber.c if (((a->digits+a->exponent)>=(t->digits+t->exponent+p+1)) p 5165 src/decNumber/decNumber.c && (a->digits>=p)) break; p 5176 src/decNumber/decNumber.c aset.digits=p+2; // sufficient precision p 5307 src/decNumber/decNumber.c Int p; // working precision p 5371 src/decNumber/decNumber.c p=MAXI(rhs->digits, MAXI(set->digits, 7))+2; p 5379 src/decNumber/decNumber.c needbytes=sizeof(decNumber)+(D2U(MAXI(p,16))-1)*sizeof(Unit); p 5387 src/decNumber/decNumber.c pp=p+rhs->digits; p 5481 src/decNumber/decNumber.c if (a->digits==p) break; p 5489 src/decNumber/decNumber.c if (decNumberIsZero(b)) b->exponent=a->exponent-p; p 5494 src/decNumber/decNumber.c if (pp==p) continue; // precision is at maximum p 5497 src/decNumber/decNumber.c if (pp>p) pp=p; // clamp to maximum p 73 src/dps8/doAppendCycleIndirectWordFetch.h word1 p = 0; p 94 src/dps8/doAppendCycleIndirectWordFetch.h if (! ucCacheCheck (this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) p 295 src/dps8/doAppendCycleIndirectWordFetch.h p = cpu.SDW->P; p 398 src/dps8/doAppendCycleIndirectWordFetch.h ucCacheSave (cpup, this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 84 src/dps8/doAppendCycleInstructionFetch.h word1 p = 0; p 151 src/dps8/doAppendCycleInstructionFetch.h if (! ucCacheCheck (cpup, this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) p 426 src/dps8/doAppendCycleInstructionFetch.h p = cpu.SDW->P; p 577 src/dps8/doAppendCycleInstructionFetch.h ucCacheSave (cpup, this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 646 src/dps8/doAppendCycleInstructionFetch.h cpu.PPR.P = p; p 83 src/dps8/doAppendCycleOperandRead.h word1 p = 0; p 143 src/dps8/doAppendCycleOperandRead.h if (! ucCacheCheck (cpup, this, cpu.TPR.TSR, cpu.TPR.CA, & bound, & p, & pageAddress, & RSDWH_R1, & paged)) { p 533 src/dps8/doAppendCycleOperandRead.h p = cpu.SDW->P; p 690 src/dps8/doAppendCycleOperandRead.h ucCacheSave (cpup, this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 694 src/dps8/doAppendCycleOperandRead.h evcnt, this, cpu.TPR.TSR, cpu.TPR.CA, bound, p, pageAddress, RSDWH_R1, paged); p 765 src/dps8/doAppendCycleOperandRead.h cpu.PPR.P = p; p 577 src/dps8/dps8.h # define FREE(p) do \ p 579 src/dps8/dps8.h free((p)); \ p 580 src/dps8/dps8.h (p) = NULL; \ p 38 src/dps8/dps8_absi.c #define FREE(p) do \ p 40 src/dps8/dps8_absi.c free((p)); \ p 41 src/dps8/dps8_absi.c (p) = NULL; \ p 265 src/dps8/dps8_absi.c iom_chan_data_t * p = &iom_chan_data[iomUnitIdx][chan]; p 270 src/dps8/dps8_absi.c p->IDCW_CHAN_CMD, p->IDCW_DEV_CODE, p->IDCW_DEV_CMD, p 271 src/dps8/dps8_absi.c p->IDCW_COUNT); p 274 src/dps8/dps8_absi.c if (IS_NOT_IDCW (p)) p 280 src/dps8/dps8_absi.c switch (p->IDCW_DEV_CMD) p 284 src/dps8/dps8_absi.c p->stati = 04000; p 291 src/dps8/dps8_absi.c p->stati = 04000; p 298 src/dps8/dps8_absi.c p->stati = 04000; p 305 src/dps8/dps8_absi.c p->stati = 04000; p 312 src/dps8/dps8_absi.c p->stati = 04000; p 319 src/dps8/dps8_absi.c p->stati = 04000; p 326 src/dps8/dps8_absi.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 327 src/dps8/dps8_absi.c sim_warn ("%s: ABSI unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 328 src/dps8/dps8_absi.c p->stati = 04501; // cmd reject, invalid opcode p 329 src/dps8/dps8_absi.c p->chanStatus = chanStatIncorrectDCW; p 334 src/dps8/dps8_absi.c if (p->IDCW_CHAN_CMD == 0) p 344 src/dps8/dps8_absi.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 347 src/dps8/dps8_absi.c if (IS_IDCW (p)) p 147 src/dps8/dps8_append.c ptw_s * p = cpu.PTWAM + i; p 148 src/dps8/dps8_append.c if (p->USE > N_MODEL_WAM_ENTRIES - 1) p 150 src/dps8/dps8_append.c i, p->USE, N_MODEL_WAM_ENTRIES - 1); p 151 src/dps8/dps8_append.c if (usages[p->USE] != -1) p 153 src/dps8/dps8_append.c i, usages[p->USE], p->USE); p 154 src/dps8/dps8_append.c usages[p->USE] = i; p 381 src/dps8/dps8_append.c sdw_s *p; p 383 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 384 src/dps8/dps8_append.c if (p->FE && segno == p->POINTER) { p 389 src/dps8/dps8_append.c cpu.SDW = p; // export pointer for appending p 391 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); p 393 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 394 src/dps8/dps8_append.c if (p->FE) p 395 src/dps8/dps8_append.c p->USE = u; p 553 src/dps8/dps8_append.c sdw_s *p = & cpu.SDWAM[_n]; p 555 src/dps8/dps8_append.c if (p->FE) p 556 src/dps8/dps8_append.c sim_printf ("SDWAM n:%d %s\n", _n, str_sdw (buf, p)); p 610 src/dps8/dps8_append.c sdw_s * p = & cpu.SDWAM[_n]; p 611 src/dps8/dps8_append.c if (! p->FE || p->USE == 0) { p 614 src/dps8/dps8_append.c * p = cpu.SDW0; p 615 src/dps8/dps8_append.c p->POINTER = segno; p 616 src/dps8/dps8_append.c p->USE = 0; p 617 src/dps8/dps8_append.c p->FE = true; // in use by SDWAM p 625 src/dps8/dps8_append.c cpu.SDW = p; p 630 src/dps8/dps8_append.c DBGAPP ("%s(2):SDWAM[%d]=%s\n", __func__, _n, str_sdw (buf, p)); p 646 src/dps8/dps8_append.c sdw_s *p; p 648 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 649 src/dps8/dps8_append.c if (!p->FE) p 653 src/dps8/dps8_append.c toffset = to_be_discarded_am (p->USE) << 4; p 654 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset + setno]; p 658 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the SDWAM! p 659 src/dps8/dps8_append.c * p = cpu.SDW0; // load the SDW p 660 src/dps8/dps8_append.c p->POINTER = segno; p 661 src/dps8/dps8_append.c p->FE = true; // in use p 662 src/dps8/dps8_append.c cpu.SDW = p; // export pointer for appending p 665 src/dps8/dps8_append.c p = & cpu.SDWAM[toffset1 + setno]; p 666 src/dps8/dps8_append.c if (p->FE) p 667 src/dps8/dps8_append.c p->USE = u; p 726 src/dps8/dps8_append.c ptw_s *p; p 729 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 731 src/dps8/dps8_append.c if (p->FE && ((CA >> 6) & 07760) == p->PAGENO && p->POINTER == segno) p 735 src/dps8/dps8_append.c __func__, segno, p->PAGENO, toffset + setno); p 738 src/dps8/dps8_append.c cpu.PTW = p; // export pointer for appending p 740 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); p 743 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 744 src/dps8/dps8_append.c if (p->FE) p 745 src/dps8/dps8_append.c p->USE = u; p 845 src/dps8/dps8_append.c ptw_s * p = & cpu.PTWAM[_n]; p 846 src/dps8/dps8_append.c if (! p->FE || p->USE == 0) p 849 src/dps8/dps8_append.c *p = cpu.PTW0; p 850 src/dps8/dps8_append.c p->PAGENO = (offset >> 6) & 07760; p 851 src/dps8/dps8_append.c p->POINTER = segno; p 852 src/dps8/dps8_append.c p->USE = 0; p 853 src/dps8/dps8_append.c p->FE = true; p 862 src/dps8/dps8_append.c cpu.PTW = p; p 882 src/dps8/dps8_append.c ptw_s *p; p 885 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 886 src/dps8/dps8_append.c if (! p->FE) p 891 src/dps8/dps8_append.c toffset = to_be_discarded_am (p->USE) << 4; p 892 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset + setno]; p 898 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the PTWAM p 899 src/dps8/dps8_append.c * p = cpu.PTW0; // load the PTW p 900 src/dps8/dps8_append.c p->PAGENO = (offset >> 6) & 07760; p 901 src/dps8/dps8_append.c p->POINTER = segno; p 902 src/dps8/dps8_append.c p->FE = true; // in use p 903 src/dps8/dps8_append.c cpu.PTW = p; // export pointer for appending p 907 src/dps8/dps8_append.c p = & cpu.PTWAM[toffset1 + setno]; p 908 src/dps8/dps8_append.c if (p->FE) p 909 src/dps8/dps8_append.c p->USE = u; p 143 src/dps8/dps8_cable.c #define FREE(p) do \ p 145 src/dps8/dps8_cable.c free((p)); \ p 146 src/dps8/dps8_cable.c (p) = NULL; \ p 209 src/dps8/dps8_cable.c const char * p = str + pat_len; p 218 src/dps8/dps8_cable.c if (rest == 1 && (q = strchr (tags, tolower (*p)))) p 226 src/dps8/dps8_cable.c q = strchr (digits, tolower (*p)); p 230 src/dps8/dps8_cable.c long l = strtol (p, & q, 0); p 244 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[iom_unit_idx][iom_port_num]; p 247 src/dps8/dps8_cable.c p->in_use = false; p 251 src/dps8/dps8_cable.c if (p->in_use) p 256 src/dps8/dps8_cable.c p->in_use = true; p 257 src/dps8/dps8_cable.c p->scu_unit_idx = scu_unit_idx; p 258 src/dps8/dps8_cable.c p->scu_port_num = scu_port_num; p 267 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[scu_unit_idx][scu_port_num]; p 270 src/dps8/dps8_cable.c if (! p->in_use) p 284 src/dps8/dps8_cable.c p->in_use = false; p 293 src/dps8/dps8_cable.c if (p->in_use) p 307 src/dps8/dps8_cable.c p->in_use = true; p 308 src/dps8/dps8_cable.c p->iom_unit_idx = iom_unit_idx; p 309 src/dps8/dps8_cable.c p->iom_port_num = (uint) iom_port_num; p 326 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[cpu_unit_idx][cpu_port_num]; p 329 src/dps8/dps8_cable.c p->in_use = false; p 333 src/dps8/dps8_cable.c if (p->in_use) p 338 src/dps8/dps8_cable.c p->in_use = true; p 339 src/dps8/dps8_cable.c p->scu_unit_idx = scu_unit_idx; p 340 src/dps8/dps8_cable.c p->scu_port_num = scu_port_num; p 341 src/dps8/dps8_cable.c p->scu_subport_num = scu_subport_num; p 351 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 354 src/dps8/dps8_cable.c if (! p->in_use) p 369 src/dps8/dps8_cable.c p->in_use = false; p 378 src/dps8/dps8_cable.c if (p->in_use) p 393 src/dps8/dps8_cable.c p->in_use = true; p 394 src/dps8/dps8_cable.c p->cpu_unit_idx = cpu_unit_idx; p 395 src/dps8/dps8_cable.c p->cpu_port_num = (uint) cpu_port_num; p 590 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[iom_unit_idx][chan_num]; p 594 src/dps8/dps8_cable.c if (! p->in_use) p 600 src/dps8/dps8_cable.c if (p->ctlr_unit_idx != ctlr_unit_idx) p 603 src/dps8/dps8_cable.c service, ctlr_unit_idx, p->ctlr_unit_idx); p 614 src/dps8/dps8_cable.c p->in_use = false; p 615 src/dps8/dps8_cable.c p->iom_cmd = NULL; p 619 src/dps8/dps8_cable.c if (p->in_use) p 633 src/dps8/dps8_cable.c p->in_use = true; p 634 src/dps8/dps8_cable.c p->ctlr_unit_idx = ctlr_unit_idx; p 635 src/dps8/dps8_cable.c p->port_num = port_num; p 636 src/dps8/dps8_cable.c p->ctlr_type = ctlr_type; p 637 src/dps8/dps8_cable.c p->chan_type = chan_type; p 638 src/dps8/dps8_cable.c p->dev = devp; p 639 src/dps8/dps8_cable.c p->board = unitp; p 640 src/dps8/dps8_cable.c p->iom_cmd = iom_cmd; p 1349 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1350 src/dps8/dps8_cable.c if (p->in_use) p 1360 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1361 src/dps8/dps8_cable.c if (p->in_use) p 1366 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1367 src/dps8/dps8_cable.c if (p->in_use) p 1368 src/dps8/dps8_cable.c scus_used[p->scu_unit_idx] = true; p 1377 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1378 src/dps8/dps8_cable.c if (p->in_use) p 1379 src/dps8/dps8_cable.c ioms_used[p->iom_unit_idx] = true; p 1420 src/dps8/dps8_cable.c struct ctlr_to_iom_s *p = &cables->small ## _to_iom[u][prt]; \ p 1421 src/dps8/dps8_cable.c if (p->in_use) \ p 1450 src/dps8/dps8_cable.c struct dev_to_ctlr_s *p = \ p 1452 src/dps8/dps8_cable.c if (p->in_use) \ p 1467 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; p 1468 src/dps8/dps8_cable.c if (p->in_use) p 1470 src/dps8/dps8_cable.c p->scu_unit_idx + 'A'); p 1476 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; p 1477 src/dps8/dps8_cable.c if (p->in_use) p 1479 src/dps8/dps8_cable.c p->iom_unit_idx + 'A'); p 1485 src/dps8/dps8_cable.c struct iom_to_ctlr_s *p = &cables->iom_to_ctlr[u][c]; p 1486 src/dps8/dps8_cable.c if (p->in_use) p 1488 src/dps8/dps8_cable.c ctlr_type_strs[p->ctlr_type], p 1489 src/dps8/dps8_cable.c p->ctlr_unit_idx); p 1496 src/dps8/dps8_cable.c struct dev_to_ctlr_s *p = \ p 1498 src/dps8/dps8_cable.c if (p->in_use) \ p 1500 src/dps8/dps8_cable.c ctlr_type_strs[p->ctlr_type], \ p 1501 src/dps8/dps8_cable.c p->ctlr_unit_idx, #to_label, u); \ p 1521 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[u][prt]; p 1522 src/dps8/dps8_cable.c if (p->in_use) p 1523 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->iom_port_num); p 1532 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[u][prt]; p 1533 src/dps8/dps8_cable.c if (p->in_use) p 1534 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->scu_unit_idx, p->scu_port_num); p 1545 src/dps8/dps8_cable.c struct scu_to_cpu_s * p = & cables->scu_to_cpu[u][prt][sp]; p 1546 src/dps8/dps8_cable.c if (p->in_use) p 1547 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->cpu_unit_idx, p->cpu_port_num); p 1556 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[u][prt]; p 1557 src/dps8/dps8_cable.c if (p->in_use) p 1559 src/dps8/dps8_cable.c u, prt, p->scu_unit_idx, p->scu_port_num, p->scu_subport_num); p 1570 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[u][c]; p 1571 src/dps8/dps8_cable.c if (p->in_use) p 1573 src/dps8/dps8_cable.c u, c, p->ctlr_unit_idx, p->port_num, ctlr_type_strs[p->ctlr_type], p 1574 src/dps8/dps8_cable.c chan_type_strs[p->chan_type], (void *) p->dev, p 1575 src/dps8/dps8_cable.c (void *) p->board, (void *) p->iom_cmd); p 1585 src/dps8/dps8_cable.c struct ctlr_to_iom_s * p = & cables->small ## _to_iom[u][prt]; \ p 1586 src/dps8/dps8_cable.c if (p->in_use) \ p 1587 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->chan_num); \ p 1621 src/dps8/dps8_cable.c struct ctlr_to_dev_s * p = & cables->from_small ## _to_ ## to_small[u][prt]; \ p 1622 src/dps8/dps8_cable.c if (p->in_use) \ p 1623 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %10p\n", u, prt, p->unit_idx, (void *) p->iom_cmd); \ p 1629 src/dps8/dps8_cable.c struct dev_to_ctlr_s * p = & cables->to_small ## _to_ ## from_small[u]; \ p 1630 src/dps8/dps8_cable.c if (p->in_use) \ p 1631 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %5s\n", u, p->ctlr_unit_idx, \ p 1632 src/dps8/dps8_cable.c p->dev_code, ctlr_type_strs[p->ctlr_type]); \ p 69 src/dps8/dps8_console.c #define FREE(p) do \ p 71 src/dps8/dps8_console.c free((p)); \ p 72 src/dps8/dps8_console.c (p) = NULL; \ p 715 src/dps8/dps8_console.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan_num]; p 814 src/dps8/dps8_console.c p->charPos = n_chars % 4; p 815 src/dps8/dps8_console.c p->stati = (word12) stati; p 1212 src/dps8/dps8_console.c for (unsigned char * p = csp->keyboardLineBuffer; p < csp->tailp; p ++) p 1213 src/dps8/dps8_console.c console_putchar (conUnitIdx, (char) (*p)); p 1297 src/dps8/dps8_console.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1302 src/dps8/dps8_console.c p->dev_code = p->IDCW_DEV_CODE; p 1303 src/dps8/dps8_console.c p->stati = 0; p 1313 src/dps8/dps8_console.c if (IS_IDCW (p)) { p 1316 src/dps8/dps8_console.c switch (p->IDCW_DEV_CMD) { p 1320 src/dps8/dps8_console.c p->stati = 04000; p 1326 src/dps8/dps8_console.c p->recordResidue --; p 1329 src/dps8/dps8_console.c p->stati = 04000; p 1334 src/dps8/dps8_console.c p->isRead = false; p 1337 src/dps8/dps8_console.c p->recordResidue --; p 1338 src/dps8/dps8_console.c p->stati = 04000; p 1344 src/dps8/dps8_console.c p->recordResidue --; p 1347 src/dps8/dps8_console.c p->stati = 04000; p 1352 src/dps8/dps8_console.c p->isRead = false; p 1355 src/dps8/dps8_console.c p->recordResidue --; p 1356 src/dps8/dps8_console.c p->stati = 04000; p 1370 src/dps8/dps8_console.c p->stati = 04000; p 1383 src/dps8/dps8_console.c p->recordResidue --; p 1386 src/dps8/dps8_console.c p->stati = 04000; p 1391 src/dps8/dps8_console.c p->isRead = false; p 1394 src/dps8/dps8_console.c p->stati = 04000; p 1396 src/dps8/dps8_console.c if (csp->model == m6001 && p->isPCW) { p 1408 src/dps8/dps8_console.c p->stati = 04500; p 1409 src/dps8/dps8_console.c if (csp->model == m6001 && p->isPCW) { p 1418 src/dps8/dps8_console.c p->stati = 04000; p 1425 src/dps8/dps8_console.c p->stati = 04000; p 1430 src/dps8/dps8_console.c sim_debug (DBG_DEBUG, & opc_dev, "%s: Unknown command 0%o\n", __func__, p->IDCW_DEV_CMD); p 1431 src/dps8/dps8_console.c p->stati = 04501; // command reject, invalid instruction code p 1449 src/dps8/dps8_console.c uint tally = p->DDCW_TALLY; p 1450 src/dps8/dps8_console.c uint daddr = p->DDCW_ADDR; p 1489 src/dps8/dps8_console.c uint tally = p->DDCW_TALLY; p 1500 src/dps8/dps8_console.c p->initiate = false; p 1567 src/dps8/dps8_console.c p->stati = 04320; p 1639 src/dps8/dps8_console.c p->stati = 04000; p 1728 src/dps8/dps8_console.c const char * p = opc_config_list[rc].name; p 1730 src/dps8/dps8_console.c if (strcmp (p, "autoaccept") == 0) p 1736 src/dps8/dps8_console.c if (strcmp (p, "noempty") == 0) p 1742 src/dps8/dps8_console.c if (strcmp (p, "attn_flush") == 0) p 1748 src/dps8/dps8_console.c if (strcmp (p, "model") == 0) p 75 src/dps8/dps8_cpu.c #define FREE(p) do \ p 77 src/dps8/dps8_cpu.c free((p)); \ p 78 src/dps8/dps8_cpu.c (p) = NULL; \ p 490 src/dps8/dps8_cpu.c const char * p = cpu_config_list [rc] . name; p 491 src/dps8/dps8_cpu.c if (strcmp (p, "faultbase") == 0) p 493 src/dps8/dps8_cpu.c else if (strcmp (p, "num") == 0) p 495 src/dps8/dps8_cpu.c else if (strcmp (p, "data") == 0) p 497 src/dps8/dps8_cpu.c else if (strcmp (p, "stopnum") == 0) p 512 src/dps8/dps8_cpu.c else if (strcmp (p, "address") == 0) p 514 src/dps8/dps8_cpu.c else if (strcmp (p, "mode") == 0) p 516 src/dps8/dps8_cpu.c else if (strcmp (p, "speed") == 0) p 518 src/dps8/dps8_cpu.c else if (strcmp (p, "port") == 0) { p 525 src/dps8/dps8_cpu.c else if (strcmp (p, "assignment") == 0) p 527 src/dps8/dps8_cpu.c else if (strcmp (p, "interlace") == 0) p 529 src/dps8/dps8_cpu.c else if (strcmp (p, "enable") == 0) p 531 src/dps8/dps8_cpu.c else if (strcmp (p, "init_enable") == 0) p 533 src/dps8/dps8_cpu.c else if (strcmp (p, "store_size") == 0) { p 561 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_cache") == 0) p 563 src/dps8/dps8_cpu.c else if (strcmp (p, "sdwam") == 0) p 565 src/dps8/dps8_cpu.c else if (strcmp (p, "ptwam") == 0) p 567 src/dps8/dps8_cpu.c else if (strcmp (p, "dis_enable") == 0) p 569 src/dps8/dps8_cpu.c else if (strcmp (p, "steady_clock") == 0) p 571 src/dps8/dps8_cpu.c else if (strcmp (p, "halt_on_unimplemented") == 0) p 573 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_wam") == 0) p 575 src/dps8/dps8_cpu.c else if (strcmp (p, "report_faults") == 0) p 577 src/dps8/dps8_cpu.c else if (strcmp (p, "tro_enable") == 0) p 579 src/dps8/dps8_cpu.c else if (strcmp (p, "y2k") == 0) p 581 src/dps8/dps8_cpu.c else if (strcmp (p, "drl_fatal") == 0) p 583 src/dps8/dps8_cpu.c else if (strcmp (p, "useMap") == 0) p 585 src/dps8/dps8_cpu.c else if (strcmp (p, "prom_installed") == 0) p 587 src/dps8/dps8_cpu.c else if (strcmp (p, "hex_mode_installed") == 0) p 589 src/dps8/dps8_cpu.c else if (strcmp (p, "cache_installed") == 0) p 591 src/dps8/dps8_cpu.c else if (strcmp (p, "clock_slave_installed") == 0) p 593 src/dps8/dps8_cpu.c else if (strcmp (p, "enable_emcall") == 0) p 596 src/dps8/dps8_cpu.c else if (strcmp (p, "affinity") == 0) p 607 src/dps8/dps8_cpu.c else if (strcmp (p, "isolts_mode") == 0) p 686 src/dps8/dps8_cpu.c else if (strcmp (p, "nodis") == 0) p 688 src/dps8/dps8_cpu.c else if (strcmp (p, "l68_mode") == 0) p 1908 src/dps8/dps8_cpu.c p 1909 src/dps8/dps8_cpu.c p 3870 src/dps8/dps8_cpu.c void decode_instruction (cpu_state_t * cpup, word36 inst, DCDstruct * p) p 3873 src/dps8/dps8_cpu.c (void)memset (p, 0, sizeof (DCDstruct)); p 3875 src/dps8/dps8_cpu.c p->opcode = GET_OP (inst); // get opcode p 3876 src/dps8/dps8_cpu.c p->opcodeX = GET_OPX(inst); // opcode extension p 3877 src/dps8/dps8_cpu.c p->opcode10 = p->opcode | (p->opcodeX ? 01000 : 0); //-V536 p 3878 src/dps8/dps8_cpu.c p->address = GET_ADDR (inst); // address field from instruction p 3879 src/dps8/dps8_cpu.c p->b29 = GET_A (inst); // "A" the indirect via pointer register flag p 3880 src/dps8/dps8_cpu.c p->i = GET_I (inst); // "I" inhibit interrupt flag p 3881 src/dps8/dps8_cpu.c p->tag = GET_TAG (inst); // instruction tag p 3883 src/dps8/dps8_cpu.c p->info = get_iwb_info (p); // get info for IWB instruction p 3885 src/dps8/dps8_cpu.c if (p->info->flags & IGN_B29) p 3886 src/dps8/dps8_cpu.c p->b29 = 0; // make certain 'a' bit is valid always p 3888 src/dps8/dps8_cpu.c if (p->info->ndes > 0) p 3890 src/dps8/dps8_cpu.c p->b29 = 0; p 3891 src/dps8/dps8_cpu.c p->tag = 0; p 3892 src/dps8/dps8_cpu.c if (p->info->ndes > 1) p 2376 src/dps8/dps8_cpu.h void decode_instruction (cpu_state_t * cpup, word36 inst, DCDstruct * p); p 54 src/dps8/dps8_crdpun.c #define FREE(p) do \ p 56 src/dps8/dps8_crdpun.c free((p)); \ p 57 src/dps8/dps8_crdpun.c (p) = NULL; \ p 1146 src/dps8/dps8_crdpun.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1147 src/dps8/dps8_crdpun.c uint dev_code = p->IDCW_DEV_CODE; p 1153 src/dps8/dps8_crdpun.c p -> isRead = false; p 1154 src/dps8/dps8_crdpun.c if (p -> DDCW_TALLY != WORDS_PER_CARD) p 1157 src/dps8/dps8_crdpun.c p -> chanStatus = chanStatIncorrectDCW; p 1158 src/dps8/dps8_crdpun.c p -> stati = 05001; //-V536 // BUG: arbitrary error code; config switch p 1167 src/dps8/dps8_crdpun.c word36 buffer [p -> DDCW_TALLY]; p 1170 src/dps8/dps8_crdpun.c p->initiate = false; p 1174 src/dps8/dps8_crdpun.c log_card(p -> DDCW_TALLY, buffer); p 1177 src/dps8/dps8_crdpun.c parse_card( &pun_state [pun_unit_num], p -> DDCW_TALLY, buffer); p 1179 src/dps8/dps8_crdpun.c p -> stati = 04000; //-V536 p 1185 src/dps8/dps8_crdpun.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1186 src/dps8/dps8_crdpun.c uint dev_code = p->IDCW_DEV_CODE; p 1199 src/dps8/dps8_crdpun.c if (IS_IDCW (p)) { p 1202 src/dps8/dps8_crdpun.c switch (p->IDCW_DEV_CMD) { p 1206 src/dps8/dps8_crdpun.c p->stati = 04000; p 1211 src/dps8/dps8_crdpun.c p->stati = 04000; p 1216 src/dps8/dps8_crdpun.c p->stati = 04000; p 1217 src/dps8/dps8_crdpun.c p->isRead = false; p 1221 src/dps8/dps8_crdpun.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1222 src/dps8/dps8_crdpun.c sim_warn ("%s: PUN unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1223 src/dps8/dps8_crdpun.c p->stati = 04501; // cmd reject, invalid opcode p 1224 src/dps8/dps8_crdpun.c p->chanStatus = chanStatIncorrectDCW; p 1227 src/dps8/dps8_crdpun.c sim_debug (DBG_DEBUG, & pun_dev, "%s: stati %04o\n", __func__, p->stati); p 1356 src/dps8/dps8_crdpun.c const char * p = pun_config_list[rc].name; p 1358 src/dps8/dps8_crdpun.c if (strcmp (p, "logcards") == 0) p 344 src/dps8/dps8_crdrdr.c p 347 src/dps8/dps8_crdrdr.c p 348 src/dps8/dps8_crdrdr.c p 380 src/dps8/dps8_crdrdr.c char * p = str; p 384 src/dps8/dps8_crdrdr.c * hstr ++ = table [(* p) & 0177]; p 385 src/dps8/dps8_crdrdr.c p ++; p 467 src/dps8/dps8_crdrdr.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 470 src/dps8/dps8_crdrdr.c uint unitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 475 src/dps8/dps8_crdrdr.c p 479 src/dps8/dps8_crdrdr.c p 540 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 913 src/dps8/dps8_crdrdr.c uint dev_code = p->IDCW_DEV_CODE; p 921 src/dps8/dps8_crdrdr.c uint unitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 927 src/dps8/dps8_crdrdr.c if (IS_IDCW (p)) { p 931 src/dps8/dps8_crdrdr.c switch (p->IDCW_DEV_CMD) { p 934 src/dps8/dps8_crdrdr.c p->stati = 04000; p 939 src/dps8/dps8_crdrdr.c sim_printf ("Request status %04o\r\n", p->stati); p 946 src/dps8/dps8_crdrdr.c p->stati = 04201; // hopper empty p 947 src/dps8/dps8_crdrdr.c p->tallyResidue = 0; p 956 src/dps8/dps8_crdrdr.c p->stati = 04000; p 961 src/dps8/dps8_crdrdr.c sim_printf ("read binary %04o\r\n", p->stati); p 967 src/dps8/dps8_crdrdr.c p->stati = 04000; p 968 src/dps8/dps8_crdrdr.c p->isRead = false; p 973 src/dps8/dps8_crdrdr.c sim_printf ("reset status %04o\r\n", p->stati); p 979 src/dps8/dps8_crdrdr.c sim_printf ("unknown %o\r\n", p->IDCW_DEV_CMD); p 981 src/dps8/dps8_crdrdr.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 982 src/dps8/dps8_crdrdr.c sim_warn ("%s: RDR unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 983 src/dps8/dps8_crdrdr.c p->stati = 04501; // cmd reject, invalid opcode p 984 src/dps8/dps8_crdrdr.c p->chanStatus = chanStatIncorrectDCW; p 988 src/dps8/dps8_crdrdr.c sim_debug (DBG_DEBUG, & rdr_dev, "%s: stati %04o\n", __func__, p->stati); p 54 src/dps8/dps8_dia.c #define FREE(p) do \ p 56 src/dps8/dps8_dia.c free((p)); \ p 57 src/dps8/dps8_dia.c (p) = NULL; \ 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 817 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 818 src/dps8/dps8_dia.c p -> stati = 0; p 820 src/dps8/dps8_dia.c switch (p -> IDCW_DEV_CMD) p 824 src/dps8/dps8_dia.c p -> stati = 04000; p 831 src/dps8/dps8_dia.c p -> stati = 04501; p 832 src/dps8/dps8_dia.c p -> chanStatus = chanStatIncorrectDCW; p 833 src/dps8/dps8_dia.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 834 src/dps8/dps8_dia.c sim_warn ("dia daze %o\n", p->IDCW_DEV_CMD); p 856 src/dps8/dps8_dia.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 859 src/dps8/dps8_dia.c if (IS_IDCW (p)) p 697 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 704 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 711 src/dps8/dps8_disk.c p->stati = 04510; // Cmd reject, invalid inst. seq. p 719 src/dps8/dps8_disk.c p->initiate = true; p 736 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 741 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 747 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 753 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 770 src/dps8/dps8_disk.c p->initiate = true; p 778 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 783 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 789 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 796 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 813 src/dps8/dps8_disk.c p->initiate = true; p 827 src/dps8/dps8_disk.c p->stati = 04304; // Invalid seek address p 834 src/dps8/dps8_disk.c p->stati = 04000; // Channel ready p 840 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 848 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 856 src/dps8/dps8_disk.c p->stati = 04510; // Invalid instruction sequence p 864 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 876 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 907 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 932 src/dps8/dps8_disk.c p->stati = 04000; p 942 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 950 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 955 src/dps8/dps8_disk.c p->stati = 04510; // Invalid instruction sequence p 960 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 973 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 1009 src/dps8/dps8_disk.c p->stati = 04202; // attn, seek incomplete p 1010 src/dps8/dps8_disk.c p->chanStatus = chanStatIncorrectDCW; p 1016 src/dps8/dps8_disk.c p->stati = 04000; p 1022 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1025 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 1051 src/dps8/dps8_disk.c p->charPos = 0; p 1052 src/dps8/dps8_disk.c p->stati = 04000; p 1054 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1059 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1061 src/dps8/dps8_disk.c p->charPos = 0; p 1062 src/dps8/dps8_disk.c p->stati = 04000; p 1064 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1070 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1073 src/dps8/dps8_disk.c uint tally = p->DDCW_TALLY; p 1173 src/dps8/dps8_disk.c p->charPos = 0; p 1174 src/dps8/dps8_disk.c p->stati = 04000; p 1176 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1185 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1190 src/dps8/dps8_disk.c p->charPos = 0; p 1191 src/dps8/dps8_disk.c p->stati = 04000; p 1193 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1211 src/dps8/dps8_disk.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1216 src/dps8/dps8_disk.c if (chan == 014) {if_sim_debug (DBG_TRACE, & dsk_dev) { dumpDCW (p->DCW, 0); }} p 1219 src/dps8/dps8_disk.c devUnitIdx = cables->ipc_to_dsk[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1221 src/dps8/dps8_disk.c devUnitIdx = cables->msp_to_dsk[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1237 src/dps8/dps8_disk.c if (p->DCW_18_20_CP == 7) { p 1240 src/dps8/dps8_disk.c switch (p->IDCW_DEV_CMD) { p 1251 src/dps8/dps8_disk.c p->stati = 04000; p 1253 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1264 src/dps8/dps8_disk.c p->recordResidue --; p 1265 src/dps8/dps8_disk.c p->stati = 04000; p 1267 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1278 src/dps8/dps8_disk.c p->recordResidue --; p 1279 src/dps8/dps8_disk.c p->stati = 04000; p 1281 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1292 src/dps8/dps8_disk.c p->recordResidue --; p 1293 src/dps8/dps8_disk.c p->stati = 04000; p 1295 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1306 src/dps8/dps8_disk.c p->recordResidue --; p 1307 src/dps8/dps8_disk.c p->stati = 04000; p 1309 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1320 src/dps8/dps8_disk.c p->recordResidue --; p 1321 src/dps8/dps8_disk.c p->stati = 04000; p 1323 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1334 src/dps8/dps8_disk.c p->recordResidue --; p 1335 src/dps8/dps8_disk.c p->stati = 04000; p 1337 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1349 src/dps8/dps8_disk.c p->recordResidue --; p 1350 src/dps8/dps8_disk.c p->stati = 04000; p 1352 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1363 src/dps8/dps8_disk.c p->recordResidue --; p 1364 src/dps8/dps8_disk.c p->stati = 04000; p 1366 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1378 src/dps8/dps8_disk.c p->recordResidue --; p 1379 src/dps8/dps8_disk.c p->stati = 04000; p 1381 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1391 src/dps8/dps8_disk.c p->stati = 04000; p 1393 src/dps8/dps8_disk.c p->recordResidue --; p 1394 src/dps8/dps8_disk.c p->initiate = false; // According to POLTS p 1395 src/dps8/dps8_disk.c p->isRead = false; p 1397 src/dps8/dps8_disk.c if (p->IDCW_DEV_CODE == 077) { p 1398 src/dps8/dps8_disk.c p->stati = 04502; // invalid device code p 1405 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1415 src/dps8/dps8_disk.c p->stati = 04000; p 1417 src/dps8/dps8_disk.c p->recordResidue --; p 1418 src/dps8/dps8_disk.c p->initiate = false; // According to POLTS p 1420 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1433 src/dps8/dps8_disk.c p->stati = 04000; p 1435 src/dps8/dps8_disk.c p->stati = 04240; // device offline p 1443 src/dps8/dps8_disk.c sim_printf ("// Disk unknown command %o\r\n", p->IDCW_DEV_CMD); p 1445 src/dps8/dps8_disk.c p->stati = 04501; p 1446 src/dps8/dps8_disk.c p->chanStatus = chanStatIncorrectDCW; p 1447 src/dps8/dps8_disk.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1448 src/dps8/dps8_disk.c sim_warn ("%s: Unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 552 src/dps8/dps8_eis.c #define EISADDR_IDX(p) ((p) - cpu.currentEISinstruction.addr) p 554 src/dps8/dps8_eis.c static void EISWriteCache (cpu_state_t * cpup, EISaddr * p) p 556 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISWriteCache addr %06o\n", p->cachedAddr); p 559 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty) p 561 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 563 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 564 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 569 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 573 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], p -> SNR, p -> cachedAddr + i); p 576 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 579 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 581 src/dps8/dps8_eis.c Write1 (cpup, p->cachedAddr+i, p -> cachedParagraph[i], true); p 582 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 597 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 601 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], cpu.TPR.TSR, p -> cachedAddr + i); p 604 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 607 src/dps8/dps8_eis.c if (p->wordDirty[i]) p 609 src/dps8/dps8_eis.c Write1 (cpup, p->cachedAddr+i, p -> cachedParagraph[i], false); p 610 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 614 src/dps8/dps8_eis.c p -> cacheDirty = false; p 618 src/dps8/dps8_eis.c static void EISReadCache (cpu_state_t * cpup, EISaddr * p, word18 address) p 628 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cachedAddr == paragraphAddress) p 633 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty && p -> cachedAddr != paragraphAddress) p 635 src/dps8/dps8_eis.c EISWriteCache (cpup, p); p 638 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 640 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 641 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 643 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 645 src/dps8/dps8_eis.c Read8 (cpup, paragraphAddress, p -> cachedParagraph, true); p 652 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], p -> SNR, paragraphAddress + i); p 664 src/dps8/dps8_eis.c { long eisaddr_idx = EISADDR_IDX (p); p 666 src/dps8/dps8_eis.c Read8 (cpup, paragraphAddress, p -> cachedParagraph, false); p 672 src/dps8/dps8_eis.c __func__, p -> cachedParagraph [i], cpu.TPR.TSR, paragraphAddress + i); p 675 src/dps8/dps8_eis.c p -> cacheValid = true; p 676 src/dps8/dps8_eis.c p -> cacheDirty = false; p 678 src/dps8/dps8_eis.c p->wordDirty[i] = false; p 679 src/dps8/dps8_eis.c p -> cachedAddr = paragraphAddress; p 683 src/dps8/dps8_eis.c static void EISWriteIdx (cpu_state_t * cpup, EISaddr *p, uint n, word36 data, bool flush) p 686 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 691 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISWriteIdx addr %06o n %u\n", p->address, n); p 692 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 699 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty && p -> cachedAddr != paragraphAddress) p 701 src/dps8/dps8_eis.c EISWriteCache (cpup, p); p 703 src/dps8/dps8_eis.c if ((! p -> cacheValid) || p -> cachedAddr != paragraphAddress) p 705 src/dps8/dps8_eis.c EISReadCache (cpup, p, paragraphAddress); p 707 src/dps8/dps8_eis.c p -> cacheDirty = true; p 708 src/dps8/dps8_eis.c p -> wordDirty[paragraphOffset] = true; p 709 src/dps8/dps8_eis.c p -> cachedParagraph [paragraphOffset] = data; p 710 src/dps8/dps8_eis.c p -> cachedAddr = paragraphAddress; p 717 src/dps8/dps8_eis.c EISWriteCache (cpup, p); p 721 src/dps8/dps8_eis.c static word36 EISReadIdx (cpu_state_t * cpup, EISaddr * p, uint n) p 724 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 730 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 731 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISReadIdx %ld addr %06o n %u\n", eisaddr_idx, p->address, n); p 732 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 739 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cachedAddr == paragraphAddress) p 741 src/dps8/dps8_eis.c return p -> cachedParagraph [paragraphOffset]; p 743 src/dps8/dps8_eis.c if (p -> cacheValid && p -> cacheDirty) p 745 src/dps8/dps8_eis.c EISWriteCache (cpup, p); p 747 src/dps8/dps8_eis.c EISReadCache (cpup, p, paragraphAddress); p 748 src/dps8/dps8_eis.c return p -> cachedParagraph [paragraphOffset]; p 751 src/dps8/dps8_eis.c static word36 EISRead (cpu_state_t * cpup, EISaddr * p) p 754 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 759 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISRead addr %06o\n", p->address); p 761 src/dps8/dps8_eis.c return EISReadIdx (cpup, p, 0); p 765 src/dps8/dps8_eis.c p 768 src/dps8/dps8_eis.c p 772 src/dps8/dps8_eis.c p 776 src/dps8/dps8_eis.c p 781 src/dps8/dps8_eis.c static void EISReadPage (cpu_state_t * cpup, EISaddr * p, uint n, word36 * data) p 784 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 788 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 801 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 803 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 804 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 818 src/dps8/dps8_eis.c __func__, data [i], p -> SNR, addressN + i); p 843 src/dps8/dps8_eis.c static void EISWritePage (cpu_state_t * cpup, EISaddr * p, uint n, word36 * data) p 846 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 850 src/dps8/dps8_eis.c word18 addressN = p -> address + n; p 863 src/dps8/dps8_eis.c if (p -> mat == viaPR) p 865 src/dps8/dps8_eis.c cpu.TPR.TRR = p -> RNR; p 866 src/dps8/dps8_eis.c cpu.TPR.TSR = p -> SNR; p 880 src/dps8/dps8_eis.c __func__, data [i], p -> SNR, addressN + i); p 1028 src/dps8/dps8_eis.c static word9 EISget49 (cpu_state_t * cpup, EISaddr * p, int * pos, int tn) p 1037 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 1041 src/dps8/dps8_eis.c p -> address = (p -> address + 1) & AMASK; p 1043 src/dps8/dps8_eis.c p -> data = EISRead (cpup, p); // read it from memory p 1047 src/dps8/dps8_eis.c p -> data = EISRead (cpup, p); // read data word from memory p 1054 src/dps8/dps8_eis.c c = get4 (p -> data, * pos); p 1057 src/dps8/dps8_eis.c c = get9 (p -> data, * pos); p 1065 src/dps8/dps8_eis.c static bool EISgetBitRWN (cpu_state_t * cpup, EISaddr * p, bool flush) p 1068 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 1072 src/dps8/dps8_eis.c int baseCharPosn = (p -> cPos * 9); // 9-bit char bit position p 1073 src/dps8/dps8_eis.c int baseBitPosn = baseCharPosn + p -> bPos; p 1084 src/dps8/dps8_eis.c word18 saveAddr = p -> address; p 1085 src/dps8/dps8_eis.c p -> address += (uint) woff; p 1088 src/dps8/dps8_eis.c p -> data = EISRead (cpup, p); // read data word from memory p 1090 src/dps8/dps8_eis.c if (p -> mode == eRWreadBit) p 1092 src/dps8/dps8_eis.c p -> bit = getbits36_1 (p -> data, (uint) bitPosn); p 1094 src/dps8/dps8_eis.c else if (p -> mode == eRWwriteBit) p 1096 src/dps8/dps8_eis.c p -> data = setbits36_1 (p -> data, (uint) bitPosn, p -> bit); p 1098 src/dps8/dps8_eis.c EISWriteIdx (cpup, p, 0, p -> data, flush); // write data word to memory p 1101 src/dps8/dps8_eis.c p->last_bit_posn = bitPosn; p 1106 src/dps8/dps8_eis.c p -> address = saveAddr; p 1108 src/dps8/dps8_eis.c return p -> bit; p 5063 src/dps8/dps8_eis.c word9 *p = e->inBuffer; // p points to position in inBuffer where 4-bit chars are stored p 5153 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5176 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5195 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer p 5202 src/dps8/dps8_eis.c *p++ = c; // the "easy" one p 5209 src/dps8/dps8_eis.c for (word9 *q = e->inBuffer; q < p; q ++) p 5226 src/dps8/dps8_eis.c word9 * p = e -> inBuffer; p 5240 src/dps8/dps8_eis.c * p ++ = c; p 6509 src/dps8/dps8_eis.c EISaddr *p = &e->ADDR2; p 6511 src/dps8/dps8_eis.c EISaddr *p = e->mopAddress; p 6515 src/dps8/dps8_eis.c p->data = EISRead(cpup, p); // read data word from memory p 6522 src/dps8/dps8_eis.c p->data = EISRead(cpup, &e->ADDR2); // read it from memory p 6525 src/dps8/dps8_eis.c PNL (p->data = EISRead(cpup, e->mopAddress)); // read it from memory p 6528 src/dps8/dps8_eis.c p->data = EISRead(cpup, e->mopAddress); // read it from memory p 6531 src/dps8/dps8_eis.c p->data = EISRead(cpup, e->mopAddress); // read it from memory p 6536 src/dps8/dps8_eis.c word9 mop9 = (word9) get9 (p -> data, e -> mopPos); // get 9-bit mop p 7520 src/dps8/dps8_eis.c static void EISwrite4(cpu_state_t * cpup, EISaddr *p, int *pos, word4 char4) p 7527 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 7531 src/dps8/dps8_eis.c p->address = (p->address + 1) & AMASK; // goto next dstAddr in memory p 7535 src/dps8/dps8_eis.c w = EISRead(cpup, p); // read dst memory into w p 7574 src/dps8/dps8_eis.c EISWriteIdx(cpup, p, 0, w, true); // XXX this is the inefficient part! p 7583 src/dps8/dps8_eis.c static void EISwrite9(cpu_state_t *cpup, EISaddr *p, int *pos, word9 char9) p 7590 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 7594 src/dps8/dps8_eis.c p->address = (p->address + 1) & AMASK; // goto next dstAddr in memory p 7598 src/dps8/dps8_eis.c w = EISRead(cpup, p); // read dst memory into w p 7621 src/dps8/dps8_eis.c EISWriteIdx (cpup, p, 0, w, true); // XXX this is the inefficient part! p 7630 src/dps8/dps8_eis.c static void EISwrite49(cpu_state_t * cpup, EISaddr *p, int *pos, int tn, word9 c49) p 7635 src/dps8/dps8_eis.c EISwrite4(cpup, p, pos, (word4) c49); p 7638 src/dps8/dps8_eis.c EISwrite9(cpup, p, pos, c49); p 8204 src/dps8/dps8_eis.c static bool EISgetBitRWNR (cpu_state_t * cpup, EISaddr * p, bool flush) p 8206 src/dps8/dps8_eis.c int baseCharPosn = (p -> cPos * 9); // 9-bit char bit position p 8207 src/dps8/dps8_eis.c int baseBitPosn = baseCharPosn + p -> bPos; p 8228 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 8234 src/dps8/dps8_eis.c word18 saveAddr = p -> address; p 8237 src/dps8/dps8_eis.c p->address = (word18) (((word18s) p->address) + (word18s) woff); p 8240 src/dps8/dps8_eis.c p -> data = EISRead (cpup, p); // read data word from memory p 8242 src/dps8/dps8_eis.c if (p -> mode == eRWreadBit) p 8244 src/dps8/dps8_eis.c p -> bit = getbits36_1 (p -> data, (uint) bitPosn); p 8246 src/dps8/dps8_eis.c else if (p -> mode == eRWwriteBit) p 8249 src/dps8/dps8_eis.c p -> data = setbits36_1 (p -> data, (uint) bitPosn, p -> bit); p 8251 src/dps8/dps8_eis.c EISWriteIdx (cpup, p, 0, p -> data, flush); // write data word to memory p 8254 src/dps8/dps8_eis.c p->last_bit_posn = bitPosn; p 8259 src/dps8/dps8_eis.c p -> address = saveAddr; p 8261 src/dps8/dps8_eis.c return p -> bit; p 8842 src/dps8/dps8_eis.c static bool EISgetBit(cpu_state_t * cpup, EISaddr *p, int *cpos, int *bpos) p 8845 src/dps8/dps8_eis.c long eisaddr_idx = EISADDR_IDX (p); p 8849 src/dps8/dps8_eis.c if (!p) p 8866 src/dps8/dps8_eis.c p->address += 1; p 8867 src/dps8/dps8_eis.c p->address &= AMASK; p 8872 src/dps8/dps8_eis.c p->data = EISRead(cpup, p); // read data word from memory p 8876 src/dps8/dps8_eis.c bool b = getbits36_1 (p->data, (uint) bitPosn) != 0; p 9034 src/dps8/dps8_eis.c p 9037 src/dps8/dps8_eis.c p 9048 src/dps8/dps8_eis.c p 9051 src/dps8/dps8_eis.c p 9091 src/dps8/dps8_eis.c p 9100 src/dps8/dps8_eis.c p 9103 src/dps8/dps8_eis.c p 9113 src/dps8/dps8_eis.c p 9117 src/dps8/dps8_eis.c p 9141 src/dps8/dps8_eis.c p 9767 src/dps8/dps8_eis.c p 9772 src/dps8/dps8_eis.c p 9776 src/dps8/dps8_eis.c p 9792 src/dps8/dps8_eis.c p 9794 src/dps8/dps8_eis.c p 9801 src/dps8/dps8_eis.c p 9804 src/dps8/dps8_eis.c p 9915 src/dps8/dps8_eis.c p 9919 src/dps8/dps8_eis.c p 9945 src/dps8/dps8_eis.c p 9959 src/dps8/dps8_eis.c p 109 src/dps8/dps8_fnp2.c #define FREE(p) do \ p 111 src/dps8/dps8_fnp2.c free((p)); \ p 112 src/dps8/dps8_fnp2.c (p) = NULL; \ p 830 src/dps8/dps8_fnp2.c uvClientData * p = linep->line_client->data; p 834 src/dps8/dps8_fnp2.c if (p && p->telnetp && linep->was_CR && kar == 0) p 1223 src/dps8/dps8_fnp2.c uvClientData * p = client->data; p 1224 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].stations[p->stationNo].EORReceived = true; p 1225 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].stations[p->stationNo].hdr_sent = false; p 2125 src/dps8/dps8_fnp2.c struct fw_entry_s * p = fw_entries + i; p 2127 src/dps8/dps8_fnp2.c if (p->line_0 == p->line_1) p 2130 src/dps8/dps8_fnp2.c decodefnp (p->line_0) + 'a', p 2131 src/dps8/dps8_fnp2.c decodeline (p->line_0), p 2132 src/dps8/dps8_fnp2.c (p->ipaddr>>24) & 255, p 2133 src/dps8/dps8_fnp2.c (p->ipaddr>>16) & 255, p 2134 src/dps8/dps8_fnp2.c (p->ipaddr>>8) & 255, p 2135 src/dps8/dps8_fnp2.c p->ipaddr & 255, p 2136 src/dps8/dps8_fnp2.c p->cidr, p 2137 src/dps8/dps8_fnp2.c p->accept ? "accept" : "deny"); p 2142 src/dps8/dps8_fnp2.c decodefnp (p->line_0) + 'a', p 2143 src/dps8/dps8_fnp2.c decodeline (p->line_0), p 2144 src/dps8/dps8_fnp2.c decodefnp (p->line_1) + 'a', p 2145 src/dps8/dps8_fnp2.c decodeline (p->line_1), p 2146 src/dps8/dps8_fnp2.c (p->ipaddr>>24) & 255, p 2147 src/dps8/dps8_fnp2.c (p->ipaddr>>16) & 255, p 2148 src/dps8/dps8_fnp2.c (p->ipaddr>>8) & 255, p 2149 src/dps8/dps8_fnp2.c p->ipaddr & 255, p 2150 src/dps8/dps8_fnp2.c p->cidr, p 2151 src/dps8/dps8_fnp2.c p->accept ? "accept" : "deny"); p 2374 src/dps8/dps8_fnp2.c p 2375 src/dps8/dps8_fnp2.c p 2377 src/dps8/dps8_fnp2.c p 2380 src/dps8/dps8_fnp2.c p 2661 src/dps8/dps8_fnp2.c uvClientData * p = client->data; p 2662 src/dps8/dps8_fnp2.c p->assoc = true; p 2663 src/dps8/dps8_fnp2.c p->fnpno = fnpno; p 2664 src/dps8/dps8_fnp2.c p->lineno = lineno; p 2672 src/dps8/dps8_fnp2.c fnpno+'a',lineno, (long)p->stationNo, p->ttype); p 2673 src/dps8/dps8_fnp2.c fnpData.ibm3270ctlr[ASSUME0].selDevChar = addr_map[p->stationNo]; p 2685 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2686 src/dps8/dps8_fnp2.c uint fnpno = p -> fnpno; p 2687 src/dps8/dps8_fnp2.c uint lineno = p -> lineno; p 2749 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2750 src/dps8/dps8_fnp2.c uint fnpno = p->fnpno; p 2751 src/dps8/dps8_fnp2.c uint lineno = p->lineno; p 2752 src/dps8/dps8_fnp2.c uint stn_no = p->stationNo; p 2872 src/dps8/dps8_fnp2.c uvClientData * p = (uvClientData *) client->data; p 2884 src/dps8/dps8_fnp2.c if (p->nPos >= sizeof(p->buffer) - 1) p 2892 src/dps8/dps8_fnp2.c if (p->nPos) //-V547 p 2896 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; // remove char from buffer p 2897 src/dps8/dps8_fnp2.c p->nPos -= 1; // back up buffer pointer p 2905 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; p 2913 src/dps8/dps8_fnp2.c fnpuv_start_writestr (client, (unsigned char *) p->buffer); p 2927 src/dps8/dps8_fnp2.c p->buffer[p->nPos++] = (char) kar; p 2936 src/dps8/dps8_fnp2.c if (p->nPos) p 2940 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; // remove char from buffer p 2941 src/dps8/dps8_fnp2.c p->nPos -= 1; // back up buffer pointer p 2949 src/dps8/dps8_fnp2.c p->buffer[p->nPos] = 0; p 2957 src/dps8/dps8_fnp2.c fnpuv_start_writestr (client, (unsigned char *) p->buffer); p 2969 src/dps8/dps8_fnp2.c char cpy [p->nPos + 1]; p 2970 src/dps8/dps8_fnp2.c memcpy (cpy, p->buffer, p->nPos); p 2971 src/dps8/dps8_fnp2.c cpy [p->nPos] = 0; p 2974 src/dps8/dps8_fnp2.c p->nPos = 0; p 3029 src/dps8/dps8_fnp2.c p->assoc = true; p 3030 src/dps8/dps8_fnp2.c p->fnpno = fnp_unit_idx; p 3031 src/dps8/dps8_fnp2.c p->lineno = lineno; p 3032 src/dps8/dps8_fnp2.c p->read_cb = fnpuv_associated_readcb; p 3033 src/dps8/dps8_fnp2.c p->write_cb = fnpuv_start_write; p 3034 src/dps8/dps8_fnp2.c p->write_actual_cb = fnpuv_start_write_actual; p 3049 src/dps8/dps8_fnp2.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 3050 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 71 src/dps8/dps8_fnp2_iomcmd.c static inline void l_putbits36_1 (vol word36 * x, uint p, word1 val) p 74 src/dps8/dps8_fnp2_iomcmd.c int shift = 36 - (int) p - (int) n; p 76 src/dps8/dps8_fnp2_iomcmd.c sim_printf ("l_putbits36_1: bad args (%012"PRIo64",pos=%d)\n", *x, p); p 1228 src/dps8/dps8_fnp2_iomcmd.c uvClientData * p = linep->line_client->data; p 1229 src/dps8/dps8_fnp2_iomcmd.c (* p->write_cb) (linep->line_client, data, tally); p 2516 src/dps8/dps8_fnp2_iomcmd.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 2518 src/dps8/dps8_fnp2_iomcmd.c switch (p->IDCW_DEV_CMD) { p 2520 src/dps8/dps8_fnp2_iomcmd.c p->stati = 04000; p 2528 src/dps8/dps8_fnp2_iomcmd.c p->stati = 04501; // cmd reject, invalid opcode p 2529 src/dps8/dps8_fnp2_iomcmd.c p->chanStatus = chanStatIncorrectDCW; p 2530 src/dps8/dps8_fnp2_iomcmd.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 2531 src/dps8/dps8_fnp2_iomcmd.c sim_warn ("%s: FNP unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 2543 src/dps8/dps8_fnp2_iomcmd.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 2546 src/dps8/dps8_fnp2_iomcmd.c if (IS_IDCW (p)) { p 965 src/dps8/dps8_iom.c iom_unit_data_t * p = iom_unit_data + iom_unit_idx; p 968 src/dps8/dps8_iom.c switch (p -> config_sw_OS) p 981 src/dps8/dps8_iom.c switch (p -> configSwBootloadCardTape) p 992 src/dps8/dps8_iom.c sim_printf ("IOM Base Address: %03o(8)\n", p -> configSwIomBaseAddress); p 993 src/dps8/dps8_iom.c sim_printf ("Multiplex Base Address: %04o(8)\n", p -> configSwMultiplexBaseAddress); p 995 src/dps8/dps8_iom.c sim_printf ("Bootload Tape Channel: %02o(8)\n", p -> configSwBootloadMagtapeChan); p 996 src/dps8/dps8_iom.c sim_printf ("Bootload Card Channel: %02o(8)\n", p -> configSwBootloadCardrdrChan); p 997 src/dps8/dps8_iom.c sim_printf ("Bootload Port: %02o(8)\n", p -> configSwBootloadPort); p 1001 src/dps8/dps8_iom.c sim_printf (" %03o", p -> configSwPortAddress[i]); p 1005 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortInterface[i]); p 1009 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortEnable[i]); p 1013 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortSysinitEnable[i]); p 1017 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortHalfsize[i]); p 1021 src/dps8/dps8_iom.c sim_printf (" %3o", p -> configSwPortStoresize[i]); p 1130 src/dps8/dps8_iom.c iom_unit_data_t * p = iom_unit_data + iom_unit_idx; p 1153 src/dps8/dps8_iom.c p -> config_sw_model = (enum config_sw_model_t) v; p 1159 src/dps8/dps8_iom.c p -> config_sw_OS = (enum config_sw_OS_t) v; p 1165 src/dps8/dps8_iom.c p -> configSwBootloadCardTape = (enum config_sw_bootload_device_e) v; p 1171 src/dps8/dps8_iom.c p -> configSwIomBaseAddress = (word12) v; p 1193 src/dps8/dps8_iom.c p -> configSwMultiplexBaseAddress = (word9) v; p 1199 src/dps8/dps8_iom.c p -> configSwBootloadMagtapeChan = (word6) v; p 1205 src/dps8/dps8_iom.c p -> configSwBootloadCardrdrChan = (word6) v; p 1211 src/dps8/dps8_iom.c p -> configSwBootloadPort = (word3) v; p 1223 src/dps8/dps8_iom.c p -> configSwPortAddress[port_num] = (uint) v; p 1229 src/dps8/dps8_iom.c p -> configSwPortInterface[port_num] = (uint) v; p 1235 src/dps8/dps8_iom.c p -> configSwPortEnable[port_num] = (uint) v; p 1241 src/dps8/dps8_iom.c p -> configSwPortSysinitEnable[port_num] = (uint) v; p 1247 src/dps8/dps8_iom.c p -> configSwPortHalfsize[port_num] = (uint) v; p 1253 src/dps8/dps8_iom.c p -> configSwPortStoresize[port_num] = (uint) v; p 1726 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1733 src/dps8/dps8_iom.c putbits36_12 (& word1, 0, p -> stati); p 1739 src/dps8/dps8_iom.c putbits36_1 (& word1, 16, p -> initiate ? 1 : 0); p 1741 src/dps8/dps8_iom.c putbits36_3 (& word1, 18, (word3) p -> chanStatus); p 1748 src/dps8/dps8_iom.c putbits36_6 (& word1, 30, p -> recordResidue); p 1756 src/dps8/dps8_iom.c putbits36_3 (& word2, 18, p -> charPos); p 1757 src/dps8/dps8_iom.c putbits36_1 (& word2, 21, p -> isRead ? 1 : 0); p 1758 src/dps8/dps8_iom.c putbits36_12 (& word2, 24, p -> tallyResidue); p 1874 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1875 src/dps8/dps8_iom.c word24 pgte = build_DDSPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1877 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, pgte, (word36 *) & p -> PTW_DCW, __func__); p 1878 src/dps8/dps8_iom.c if ((p -> PTW_DCW & 0740000777747) != 04llu) p 1881 src/dps8/dps8_iom.c (unsigned long long)pgte, (unsigned long long)p -> PTW_DCW); p 1911 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1912 src/dps8/dps8_iom.c word24 pgte = build_IDSPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1913 src/dps8/dps8_iom.c p -> SEG, p 1915 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, pgte, (word36 *) & p -> PTW_DCW, __func__); p 1916 src/dps8/dps8_iom.c if ((p -> PTW_DCW & 0740000777747) != 04llu) p 1918 src/dps8/dps8_iom.c __func__, chan, addr, (unsigned long long)p -> PTW_DCW); p 1946 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1947 src/dps8/dps8_iom.c word24 addr = build_LPWPTW_address (p -> PCW_PAGE_TABLE_PTR, p 1948 src/dps8/dps8_iom.c p -> SEG, p 1949 src/dps8/dps8_iom.c (p -> LPW_DCW_PTR >> 10) & MASK8); p 1950 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> PTW_LPW, __func__); p 1951 src/dps8/dps8_iom.c if ((p -> PTW_LPW & 0740000777747) != 04llu) p 1953 src/dps8/dps8_iom.c __func__, chan, addr, (unsigned long long)p -> PTW_LPW); p 1974 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1976 src/dps8/dps8_iom.c if (p -> masked) p 1979 src/dps8/dps8_iom.c if (p -> PCW_63_PTP && p -> PCW_64_PGE) p 1982 src/dps8/dps8_iom.c daddr = ((uint) getbits36_14 (p -> PTW_DCW, 4) << 10) | (daddr & MASK10); p 2002 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2004 src/dps8/dps8_iom.c if (p->masked) p 2009 src/dps8/dps8_iom.c p->initiate = false; p 2011 src/dps8/dps8_iom.c uint tally = p->DDCW_TALLY; p 2012 src/dps8/dps8_iom.c uint daddr = p->DDCW_ADDR; p 2016 src/dps8/dps8_iom.c p->tallyResidue = (word12) tally; p 2020 src/dps8/dps8_iom.c while (p->tallyResidue) { p 2024 src/dps8/dps8_iom.c if (! IS_IONTP (p)) { p 2025 src/dps8/dps8_iom.c if (p->PCW_63_PTP && p->PCW_64_PGE) { p 2027 src/dps8/dps8_iom.c word24 addr = ((word24) (getbits36_14 (p -> PTW_DCW, 4) << 10)) | (daddr & MASK10); p 2037 src/dps8/dps8_iom.c uint daddr2 = daddr | (uint) p->ADDR_EXT << 18; p 2043 src/dps8/dps8_iom.c p->tallyResidue --; p 2048 src/dps8/dps8_iom.c while (p -> tallyResidue) { p 2049 src/dps8/dps8_iom.c if (IS_IONTP (p)) { p 2052 src/dps8/dps8_iom.c if (p -> PCW_63_PTP && p -> PCW_64_PGE) { p 2054 src/dps8/dps8_iom.c word24 addr = ((word24) (getbits36_14 (p -> PTW_DCW, 4) << 10)) | (daddr & MASK10); p 2065 src/dps8/dps8_iom.c uint daddr2 = daddr | (uint) p -> ADDR_EXT << 18; p 2070 src/dps8/dps8_iom.c p->tallyResidue --; p 2080 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2083 src/dps8/dps8_iom.c p -> chanMode = cm1; p 2089 src/dps8/dps8_iom.c if (p -> PCW_64_PGE == 0) p 2091 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0) p 2093 src/dps8/dps8_iom.c p -> chanMode = cm1e; // AE 0 p 2097 src/dps8/dps8_iom.c p -> chanMode = cm2e; // AE 1 p 2103 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0) p 2105 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0) p 2107 src/dps8/dps8_iom.c p -> chanMode = cm1; // AE 0, REL 0 p 2111 src/dps8/dps8_iom.c p -> chanMode = cm3a; // AE 0, REL 1 p 2117 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0) p 2119 src/dps8/dps8_iom.c p -> chanMode = cm3b; // AE 1, REL 0 p 2123 src/dps8/dps8_iom.c p -> chanMode = cm4; // AE 1, REL 1 p 2131 src/dps8/dps8_iom.c switch (p -> chanMode) p 2134 src/dps8/dps8_iom.c if (p -> TDCW_32_PDTA) p 2136 src/dps8/dps8_iom.c p -> chanMode = cm2; p 2139 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2140 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2141 src/dps8/dps8_iom.c p -> chanMode = cm4; // 33, 35 p 2143 src/dps8/dps8_iom.c p -> chanMode = cm3b; // 33, !35 p 2145 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2146 src/dps8/dps8_iom.c p -> chanMode = cm3a; // !33, 35 p 2148 src/dps8/dps8_iom.c p -> chanMode = cm2; // !33, !35 p 2152 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2153 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2154 src/dps8/dps8_iom.c p -> chanMode = cm4; // 33, 35 p 2156 src/dps8/dps8_iom.c p -> chanMode = cm3b; // 33, !35 p 2158 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2159 src/dps8/dps8_iom.c p -> chanMode = cm3a; // !33, 35 p 2161 src/dps8/dps8_iom.c p -> chanMode = cm2; // !33, !35 p 2165 src/dps8/dps8_iom.c if (p -> TDCW_33_PDCW) p 2166 src/dps8/dps8_iom.c p -> chanMode = cm4; p 2170 src/dps8/dps8_iom.c if (p -> TDCW_35_REL) p 2171 src/dps8/dps8_iom.c p -> chanMode = cm4; p 2175 src/dps8/dps8_iom.c p -> chanMode = cm5; p 2183 src/dps8/dps8_iom.c if (p -> chanMode == cm1e && p -> TDCW_33_EC) p 2184 src/dps8/dps8_iom.c p -> chanMode = cm2e; p 2196 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2199 src/dps8/dps8_iom.c iom_core_write (iom_unit_idx, chanLoc + IOM_MBX_LPW, p -> LPW, __func__); p 2205 src/dps8/dps8_iom.c iom_core_write (iom_unit_idx, chanLoc + IOM_MBX_LPWX, p -> LPWX, __func__); p 2271 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2273 src/dps8/dps8_iom.c if (p->LPW_21_NC) p 2275 src/dps8/dps8_iom.c else if (p->LPW_22_TAL) p 2345 src/dps8/dps8_iom.c sim_printf ("// %s channel LPW %012llo (case %c)\r\n", chanName[chan], p->LPW, updateCase); p 2346 src/dps8/dps8_iom.c sim_printf ("// DCW pointer %06o\r\n", p->LPW_DCW_PTR); p 2347 src/dps8/dps8_iom.c sim_printf ("// RES %o\r\n", p->LPW_18_RES); p 2348 src/dps8/dps8_iom.c sim_printf ("// REL %o\r\n", p->LPW_19_REL); p 2349 src/dps8/dps8_iom.c sim_printf ("// AE %o\r\n", p->LPW_20_AE); p 2350 src/dps8/dps8_iom.c sim_printf ("// NC 21 %o\r\n", p->LPW_21_NC); p 2351 src/dps8/dps8_iom.c sim_printf ("// TAL 22 %o\r\n", p->LPW_22_TAL); p 2352 src/dps8/dps8_iom.c sim_printf ("// REL %o\r\n", p->LPW_23_REL); p 2353 src/dps8/dps8_iom.c sim_printf ("// TALLY %04o\r\n", p->LPW_TALLY); p 2363 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2366 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, chanLoc + IOM_MBX_LPW, (word36 *) & p -> LPW, __func__); p 2368 src/dps8/dps8_iom.c "%s: lpw %08o %012"PRIo64"\n", __func__, chanLoc + IOM_MBX_LPW, p->LPW); p 2370 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = getbits36_18 (p -> LPW, 0); p 2371 src/dps8/dps8_iom.c p -> LPW_18_RES = getbits36_1 (p -> LPW, 18); p 2372 src/dps8/dps8_iom.c p -> LPW_19_REL = getbits36_1 (p -> LPW, 19); p 2373 src/dps8/dps8_iom.c p -> LPW_20_AE = getbits36_1 (p -> LPW, 20); p 2374 src/dps8/dps8_iom.c p -> LPW_21_NC = getbits36_1 (p -> LPW, 21); p 2375 src/dps8/dps8_iom.c p -> LPW_22_TAL = getbits36_1 (p -> LPW, 22); p 2376 src/dps8/dps8_iom.c p -> LPW_23_REL = getbits36_1 (p -> LPW, 23); p 2377 src/dps8/dps8_iom.c p -> LPW_TALLY = getbits36_12 (p -> LPW, 24); p 2381 src/dps8/dps8_iom.c p -> LPWX = 0; p 2382 src/dps8/dps8_iom.c p -> LPWX_BOUND = 0; p 2383 src/dps8/dps8_iom.c p -> LPWX_SIZE = 0; p 2387 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, chanLoc + IOM_MBX_LPWX, (word36 *) & p -> LPWX, __func__); p 2388 src/dps8/dps8_iom.c p -> LPWX_BOUND = getbits36_18 (p -> LPWX, 0); p 2389 src/dps8/dps8_iom.c p -> LPWX_SIZE = getbits36_18 (p -> LPWX, 18); p 2399 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2400 src/dps8/dps8_iom.c p -> DCW_18_20_CP = getbits36_3 (p -> DCW, 18); p 2402 src/dps8/dps8_iom.c if (IS_IDCW (p)) // IDCW p 2404 src/dps8/dps8_iom.c p -> IDCW_DEV_CMD = getbits36_6 (p -> DCW, 0); p 2405 src/dps8/dps8_iom.c p -> IDCW_DEV_CODE = getbits36_6 (p -> DCW, 6); p 2406 src/dps8/dps8_iom.c p -> IDCW_AE = getbits36_6 (p -> DCW, 12); p 2407 src/dps8/dps8_iom.c if (p -> LPW_23_REL) p 2408 src/dps8/dps8_iom.c p -> IDCW_EC = 0; p 2410 src/dps8/dps8_iom.c p -> IDCW_EC = getbits36_1 (p -> DCW, 21); p 2411 src/dps8/dps8_iom.c if (p -> IDCW_EC) p 2412 src/dps8/dps8_iom.c p -> SEG = 1; // pat. step 45 p 2413 src/dps8/dps8_iom.c p -> IDCW_CHAN_CTRL = getbits36_2 (p -> DCW, 22); p 2414 src/dps8/dps8_iom.c p -> IDCW_CHAN_CMD = getbits36_6 (p -> DCW, 24); p 2415 src/dps8/dps8_iom.c p -> IDCW_COUNT = getbits36_6 (p -> DCW, 30); p 2416 src/dps8/dps8_iom.c p->recordResidue = p->IDCW_COUNT; p 2420 src/dps8/dps8_iom.c __func__, p->DCW, p->IDCW_DEV_CMD, cmdNames[p->IDCW_DEV_CMD], p 2421 src/dps8/dps8_iom.c p->IDCW_DEV_CODE, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 2426 src/dps8/dps8_iom.c p -> TDCW_DATA_ADDRESS = getbits36_18 (p -> DCW, 0); p 2427 src/dps8/dps8_iom.c p -> TDCW_31_SEG = getbits36_1 (p -> DCW, 31); p 2428 src/dps8/dps8_iom.c p -> TDCW_32_PDTA = getbits36_1 (p -> DCW, 32); p 2429 src/dps8/dps8_iom.c p -> TDCW_33_PDCW = getbits36_1 (p -> DCW, 33); p 2430 src/dps8/dps8_iom.c p -> TDCW_33_EC = getbits36_1 (p -> DCW, 33); p 2431 src/dps8/dps8_iom.c p -> TDCW_34_RES = getbits36_1 (p -> DCW, 34); p 2432 src/dps8/dps8_iom.c p -> TDCW_35_REL = getbits36_1 (p -> DCW, 35); p 2433 src/dps8/dps8_iom.c p -> DDCW_TALLY = getbits36_12 (p -> DCW, 24); p 2434 src/dps8/dps8_iom.c p -> DDCW_ADDR = getbits36_18 (p -> DCW, 0); p 2435 src/dps8/dps8_iom.c p -> DDCW_22_23_TYPE = getbits36_2 (p -> DCW, 22); p 2438 src/dps8/dps8_iom.c __func__, p->DCW, p->DDCW_TALLY, p->DDCW_ADDR, p->DDCW_22_23_TYPE); p 2443 src/dps8/dps8_iom.c p 2444 src/dps8/dps8_iom.c p 2445 src/dps8/dps8_iom.c p 2446 src/dps8/dps8_iom.c p 2447 src/dps8/dps8_iom.c p 2448 src/dps8/dps8_iom.c p 2449 src/dps8/dps8_iom.c p 2450 src/dps8/dps8_iom.c p 2451 src/dps8/dps8_iom.c p 2453 src/dps8/dps8_iom.c p 2454 src/dps8/dps8_iom.c p 2455 src/dps8/dps8_iom.c p 2456 src/dps8/dps8_iom.c p 2466 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2467 src/dps8/dps8_iom.c putbits36_3 ((word36 *) & p -> DCW, 18, p -> DCW_18_20_CP); p 2472 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2473 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPW, 0, p -> LPW_DCW_PTR); p 2474 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 18, p -> LPW_18_RES); p 2475 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 19, p -> LPW_19_REL); p 2476 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 20, p -> LPW_20_AE); p 2477 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 21, p -> LPW_21_NC); p 2478 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 22, p -> LPW_22_TAL); p 2479 src/dps8/dps8_iom.c putbits36_1 ((word36 *) & p-> LPW, 23, p -> LPW_23_REL); p 2480 src/dps8/dps8_iom.c putbits36_12 ((word36 *) & p-> LPW, 24, p -> LPW_TALLY); p 2481 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPWX, 0, p -> LPWX_BOUND); p 2482 src/dps8/dps8_iom.c putbits36_18 ((word36 *) & p-> LPWX, 18, p -> LPWX_SIZE); p 2487 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2489 src/dps8/dps8_iom.c iom_core_read2 (iom_unit_idx, p -> LPW_DCW_PTR, (word36 *) & p -> PCW0, (word36 *) & p -> PCW1, __func__); p 2490 src/dps8/dps8_iom.c p -> PCW_CHAN = getbits36_6 (p -> PCW1, 3); p 2491 src/dps8/dps8_iom.c p -> PCW_AE = getbits36_6 (p -> PCW0, 12); p 2492 src/dps8/dps8_iom.c p -> PCW_21_MSK = getbits36_1 (p -> PCW0, 21); p 2493 src/dps8/dps8_iom.c p -> PCW_PAGE_TABLE_PTR = getbits36_18 (p -> PCW1, 9); p 2494 src/dps8/dps8_iom.c p -> PCW_63_PTP = getbits36_1 (p -> PCW1, 27); p 2495 src/dps8/dps8_iom.c p -> PCW_64_PGE = getbits36_1 (p -> PCW1, 28); p 2496 src/dps8/dps8_iom.c p -> PCW_65_AUX = getbits36_1 (p -> PCW1, 29); p 2497 src/dps8/dps8_iom.c if (p -> PCW_65_AUX) p 2499 src/dps8/dps8_iom.c p -> DCW = p -> PCW0; p 2508 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2509 src/dps8/dps8_iom.c word24 addr = p -> LPW_DCW_PTR & MASK18; p 2512 src/dps8/dps8_iom.c switch (p -> chanMode) p 2518 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> DCW, __func__); p 2527 src/dps8/dps8_iom.c addr += ((word24) p -> LPWX_BOUND << 1); p 2528 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr, (word36 *) & p -> DCW, __func__); p 2546 src/dps8/dps8_iom.c word24 addr_ = ((word24) (getbits36_14 (p -> PTW_LPW, 4) << 10)) | ((p -> LPW_DCW_PTR) & MASK10); p 2547 src/dps8/dps8_iom.c iom_core_read (iom_unit_idx, addr_, (word36 *) & p -> DCW, __func__); p 2553 src/dps8/dps8_iom.c if (IS_IDCW (p)) p 2556 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> IDCW_DEV_CMD, p -> IDCW_DEV_CODE, p -> IDCW_AE, p 2557 src/dps8/dps8_iom.c p -> IDCW_EC, p -> IDCW_CHAN_CTRL, p -> IDCW_CHAN_CMD, p -> IDCW_COUNT); p 2559 src/dps8/dps8_iom.c if (p -> DDCW_22_23_TYPE == 02) p 2562 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> TDCW_DATA_ADDRESS, p -> TDCW_31_SEG, p 2563 src/dps8/dps8_iom.c p -> TDCW_32_PDTA, p -> TDCW_33_PDCW, p -> TDCW_34_RES, p -> TDCW_35_REL); p 2567 src/dps8/dps8_iom.c __func__, p -> PCW_CHAN, p -> DDCW_ADDR, p -> DCW_18_20_CP, p 2568 src/dps8/dps8_iom.c p -> DDCW_22_23_TYPE, p -> DDCW_TALLY); p 2702 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 2717 src/dps8/dps8_iom.c if (p -> lsFirst) p 2722 src/dps8/dps8_iom.c p -> wasTDCW = false; p 2723 src/dps8/dps8_iom.c p -> SEG = 0; // pat. FIG. 2, step 44 p 2734 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 0) p 2737 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2742 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 1) p 2747 src/dps8/dps8_iom.c if (p -> LPW_TALLY == 0) p 2750 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2755 src/dps8/dps8_iom.c if (p -> LPW_TALLY > 1) p 2759 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2760 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2764 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2769 src/dps8/dps8_iom.c else if (p -> LPW_TALLY == 1) p 2782 src/dps8/dps8_iom.c if (IS_NOT_IDCW (p)) p 2785 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2810 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 0) p 2814 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2815 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2819 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2824 src/dps8/dps8_iom.c else if (p -> LPW_21_NC == 0 && p -> LPW_22_TAL == 1) p 2829 src/dps8/dps8_iom.c if (p -> LPW_TALLY == 0) p 2833 src/dps8/dps8_iom.c else if (p -> LPW_TALLY > 1) p 2838 src/dps8/dps8_iom.c if (p -> LPW_20_AE == 0 && p 2839 src/dps8/dps8_iom.c (((word36) p -> LPW_DCW_PTR) + ((word36) p -> LPW_TALLY)) > p 2843 src/dps8/dps8_iom.c p -> lsFirst ? iomFsrFirstList : iomFsrList, p 2859 src/dps8/dps8_iom.c if (IS_IDCW (p)) p 2863 src/dps8/dps8_iom.c if (p -> LPW_18_RES) p 2875 src/dps8/dps8_iom.c p -> LPWX_SIZE = p -> LPW_DCW_PTR; p 2881 src/dps8/dps8_iom.c if (p -> lsFirst) p 2882 src/dps8/dps8_iom.c p -> LPWX_SIZE = p -> LPW_DCW_PTR; p 2893 src/dps8/dps8_iom.c if (IS_TDCW (p)) p 2896 src/dps8/dps8_iom.c if (p -> wasTDCW) p 2901 src/dps8/dps8_iom.c p -> wasTDCW = true; p 2905 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = p -> TDCW_DATA_ADDRESS; p 2910 src/dps8/dps8_iom.c p -> LPW_20_AE |= p -> TDCW_33_EC; // TDCW_33_PDCW p 2911 src/dps8/dps8_iom.c p -> LPW_18_RES |= p -> TDCW_34_RES; p 2912 src/dps8/dps8_iom.c p -> LPW_23_REL |= p -> TDCW_35_REL; p 2945 src/dps8/dps8_iom.c if (p -> TDCW_31_SEG) p 2951 src/dps8/dps8_iom.c p -> LPW_TALLY = (p -> LPW_TALLY - 1u) & MASK12; p 2957 src/dps8/dps8_iom.c if (p -> LPW_18_RES && p -> TDCW_33_EC) // same as TDCW_33_PDCW p 2966 src/dps8/dps8_iom.c p -> wasTDCW = false; p 2996 src/dps8/dps8_iom.c p -> DCW_18_20_CP = 07u; p 3020 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0) // UPDATE p 3024 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = (p -> LPW_DCW_PTR + 2u) & MASK18; p 3026 src/dps8/dps8_iom.c p -> LPW_DCW_PTR = (p -> LPW_DCW_PTR + 1u) & MASK18; p 3029 src/dps8/dps8_iom.c p->LPW_TALLY = ((word12) (((word12s) p->LPW_TALLY) - 1)) & MASK12; p 3034 src/dps8/dps8_iom.c if (p -> DDCW_22_23_TYPE == 07u || p -> lsFirst) p 3044 src/dps8/dps8_iom.c if (p -> LPW_21_NC == 0 || p 3045 src/dps8/dps8_iom.c (IS_TDCW (p))) p 3055 src/dps8/dps8_iom.c p -> lsFirst = false; p 3085 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 3088 src/dps8/dps8_iom.c word36 PCW_DCW = p->DCW; p 3089 src/dps8/dps8_iom.c word1 PCW_LPW_23_REL = p->LPW_23_REL; p 3091 src/dps8/dps8_iom.c p -> chanMode = cm1; p 3092 src/dps8/dps8_iom.c p -> LPW_18_RES = 0; p 3093 src/dps8/dps8_iom.c p -> LPW_20_AE = 0; p 3094 src/dps8/dps8_iom.c p -> LPW_23_REL = 0; p 3098 src/dps8/dps8_iom.c p->isPCW = true; p 3107 src/dps8/dps8_iom.c if (d->chan_type != chan_type_CPI && p -> IDCW_DEV_CMD == 051) { p 3108 src/dps8/dps8_iom.c p->stati = 04501; p 3114 src/dps8/dps8_iom.c p -> stati = 06000; // t, power off/missing p 3126 src/dps8/dps8_iom.c p -> ADDR_EXT = p -> PCW_AE; p 3128 src/dps8/dps8_iom.c p -> lsFirst = true; p 3130 src/dps8/dps8_iom.c p -> tallyResidue = 0; p 3131 src/dps8/dps8_iom.c p -> isRead = true; p 3132 src/dps8/dps8_iom.c p -> charPos = 0; p 3136 src/dps8/dps8_iom.c p -> initiate = true; p 3137 src/dps8/dps8_iom.c p -> chanStatus = chanStatNormal; p 3145 src/dps8/dps8_iom.c p -> dev_code = getbits36_6 (p -> DCW, 6); p 3153 src/dps8/dps8_iom.c if (IS_IDCW (p) && p->IDCW_CHAN_CTRL == CHAN_CTRL_MARKER) { // IDCW marker bit set p 3165 src/dps8/dps8_iom.c if (p->masked) { p 3175 src/dps8/dps8_iom.c p->isPCW = false; p 3182 src/dps8/dps8_iom.c bool idcw_terminate = p -> IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE; p 3215 src/dps8/dps8_iom.c dumpDCW (M[p->LPW_DCW_PTR - 1 + i], p->LPW_23_REL); p 3226 src/dps8/dps8_iom.c if (IS_IDCW (p)) { // IDCW p 3227 src/dps8/dps8_iom.c idcw_terminate = p -> IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE; p 3228 src/dps8/dps8_iom.c if (p -> LPW_23_REL == 0 && p -> IDCW_EC == 1) p 3229 src/dps8/dps8_iom.c p -> ADDR_EXT = getbits36_6 (p -> DCW, 12); p 3231 src/dps8/dps8_iom.c p -> tallyResidue = 0; p 3232 src/dps8/dps8_iom.c p -> isRead = true; p 3233 src/dps8/dps8_iom.c p -> charPos = 0; p 3234 src/dps8/dps8_iom.c p -> chanStatus = chanStatNormal; p 3242 src/dps8/dps8_iom.c p -> dev_code = getbits36_6 (p -> DCW, 6); p 3262 src/dps8/dps8_iom.c if (IS_IDCW (p) && p->IDCW_CHAN_CTRL == CHAN_CTRL_TERMINATE && p->IDCW_CHAN_CMD == CHAN_CMD_NONDATA) { p 3270 src/dps8/dps8_iom.c if (IS_IOTD (p) && idcw_terminate && rc2 != IOM_CMD_RESIDUE) { p 3282 src/dps8/dps8_iom.c if (IS_NOT_IDCW (p) && rc2 == IOM_CMD_RESIDUE) { p 3283 src/dps8/dps8_iom.c if (p->recordResidue) p 3284 src/dps8/dps8_iom.c p->recordResidue --; p 3285 src/dps8/dps8_iom.c if (p->recordResidue == 0) p 3292 src/dps8/dps8_iom.c if (iomUnitIdx == 1 && chan == 020) sim_printf ("stati %04o\r\n", p->stati); p 3328 src/dps8/dps8_iom.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][IOM_CONNECT_CHAN]; p 3329 src/dps8/dps8_iom.c p -> lsFirst = true; p 3353 src/dps8/dps8_iom.c sim_printf ("// PCW %012llo %012llo\r\n", p->PCW0, p->PCW1); p 3354 src/dps8/dps8_iom.c sim_printf ("// Chan info %04o\r\n", p->PCW_CHAN); p 3355 src/dps8/dps8_iom.c sim_printf ("// Addr ext %02o\r\n", p->PCW_AE); p 3356 src/dps8/dps8_iom.c sim_printf ("// 111 %o\r\n", getbits36_3 (p->PCW0, 18)); p 3357 src/dps8/dps8_iom.c sim_printf ("// M %o\r\n", p->PCW_21_MSK); p 3358 src/dps8/dps8_iom.c sim_printf ("// Chan info %08o\r\n", getbits36_14 (p->PCW0, 22)); p 3359 src/dps8/dps8_iom.c sim_printf ("// Pg Tbl Ptr %06o\r\n", p->PCW_PAGE_TABLE_PTR); p 3360 src/dps8/dps8_iom.c sim_printf ("// PTP %o\r\n", p->PCW_63_PTP); p 3361 src/dps8/dps8_iom.c sim_printf ("// PGE %o\r\n", p->PCW_64_PGE); p 3362 src/dps8/dps8_iom.c sim_printf ("// AUX %o\r\n", p->PCW_65_AUX); p 3368 src/dps8/dps8_iom.c iom_chan_data_t * q = & iom_chan_data[iom_unit_idx][p -> PCW_CHAN]; p 3370 src/dps8/dps8_iom.c q -> PCW0 = p -> PCW0; p 3371 src/dps8/dps8_iom.c q -> PCW1 = p -> PCW1; p 3372 src/dps8/dps8_iom.c q -> PCW_CHAN = p -> PCW_CHAN; p 3373 src/dps8/dps8_iom.c q -> PCW_AE = p -> PCW_AE; p 3374 src/dps8/dps8_iom.c q -> PCW_PAGE_TABLE_PTR = p -> PCW_PAGE_TABLE_PTR; p 3375 src/dps8/dps8_iom.c q -> PCW_63_PTP = p -> PCW_63_PTP; p 3376 src/dps8/dps8_iom.c q -> PCW_64_PGE = p -> PCW_64_PGE; p 3377 src/dps8/dps8_iom.c q -> PCW_65_AUX = p -> PCW_65_AUX; p 3378 src/dps8/dps8_iom.c q -> PCW_21_MSK = p -> PCW_21_MSK; p 3379 src/dps8/dps8_iom.c q -> DCW = p -> DCW; p 3383 src/dps8/dps8_iom.c q -> masked = p -> PCW_21_MSK; p 3386 src/dps8/dps8_iom.c sim_warn ("%s: chan %d masked while in use\n", __func__, p -> PCW_CHAN); p 3391 src/dps8/dps8_iom.c sim_warn ("%s: chan %d connect while in use\n", __func__, p -> PCW_CHAN); p 3395 src/dps8/dps8_iom.c setChnConnect (iom_unit_idx, p -> PCW_CHAN); p 3398 src/dps8/dps8_iom.c doPayloadChannel (iom_unit_idx, p -> PCW_CHAN); p 3609 src/dps8/dps8_iom.c iom_chan_data_t * p = &iom_chan_data [i] [j]; p 3610 src/dps8/dps8_iom.c if (p -> start) p 3612 src/dps8/dps8_iom.c p -> start = false; p 94 src/dps8/dps8_iom.h #define IS_IDCW(p) ((p)->DCW_18_20_CP == 07) p 95 src/dps8/dps8_iom.h #define IS_NOT_IDCW(p) ((p)->DCW_18_20_CP != 07) p 96 src/dps8/dps8_iom.h #define IS_TDCW(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 2) p 97 src/dps8/dps8_iom.h #define IS_IOTD(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 0) p 98 src/dps8/dps8_iom.h #define IS_IONTP(p) ((p)->DCW_18_20_CP != 7 && (p)->DDCW_22_23_TYPE == 3) p 387 src/dps8/dps8_math128.c unsigned p; // Product of two digits. p 441 src/dps8/dps8_math128.c p = (unsigned)qhat*(unsigned long long)vn[i]; p 442 src/dps8/dps8_math128.c t = (int32_t) un[i+j] - k - (int32_t) (p & 0xFFFF); p 444 src/dps8/dps8_math128.c k = (int) (p >> 16) - (t >> 16); p 59 src/dps8/dps8_mgp.c #define FREE(p) do \ p 61 src/dps8/dps8_mgp.c free((p)); \ p 62 src/dps8/dps8_mgp.c (p) = NULL; \ p 122 src/dps8/dps8_mgp.c const unsigned char *p = buf; p 125 src/dps8/dps8_mgp.c h = h * 31 + p[i]; p 343 src/dps8/dps8_mgp.c get_ddcw(iom_chan_data_t *p, uint iom_unit_idx, uint chan, bool *ptro, p 354 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 368 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 373 src/dps8/dps8_mgp.c if (IS_IDCW(p) || IS_TDCW(p)) p 376 src/dps8/dps8_mgp.c p->stati = 05001; // BUG: arbitrary error code; config switch p 381 src/dps8/dps8_mgp.c *tally = p->DDCW_TALLY; p 397 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 1383 src/dps8/dps8_mgp.c handle_packet(int opcode, struct mgp_packet_header *p, word36 *buf, p 1386 src/dps8/dps8_mgp.c int i = find_conn_for(p->source_process, p->destination_process); p 1390 src/dps8/dps8_mgp.c __func__, p->source_process, p->destination_process); p 1394 src/dps8/dps8_mgp.c u_char *pkt = make_cbridge_pkt(p->byte_count, opcode); p 1395 src/dps8/dps8_mgp.c if (p->byte_count > 0) p 1398 src/dps8/dps8_mgp.c buf, words, pkt + CBRIDGE_PACKET_HEADER_SIZE, p->byte_count); p 1402 src/dps8/dps8_mgp.c i, pkt, CBRIDGE_PACKET_HEADER_SIZE + p->byte_count); p 1406 src/dps8/dps8_mgp.c handle_close(struct mgp_packet_header *p, word36 *buf, uint words) p 1417 src/dps8/dps8_mgp.c return handle_packet(CHOP_EOF, p, eof, 1); p 1421 src/dps8/dps8_mgp.c handle_lose(int conni, struct mgp_packet_header *p, word36 *buf, uint words) p 1424 src/dps8/dps8_mgp.c int v = handle_packet(CHOP_LOS, p, buf, words); p 1432 src/dps8/dps8_mgp.c handle_connect(struct mgp_packet_header *p, word36 *buf, uint words) p 1512 src/dps8/dps8_mgp.c conn->multics_proc = p->source_process; p 1556 src/dps8/dps8_mgp.c struct mgp_packet_header *p = parse_packet_header(buf, words); p 1559 src/dps8/dps8_mgp.c if ( ( p->checksum == 0 ) \ p 1560 src/dps8/dps8_mgp.c && ( p->packet_type == 0 ) \ p 1561 src/dps8/dps8_mgp.c && ( p->frame_number == 0 ) \ p 1562 src/dps8/dps8_mgp.c && ( p->receipt_number == 0 ) ) p 1564 src/dps8/dps8_mgp.c FREE(p); p 1570 src/dps8/dps8_mgp.c && ( p->frame_number != ( mgp_dev_state.frame_last_received + 1 ))) p 1573 src/dps8/dps8_mgp.c p->frame_number, mgp_dev_state.frame_last_received + 1); p 1581 src/dps8/dps8_mgp.c int i = find_conn_for(p->source_process, p->destination_process); p 1584 src/dps8/dps8_mgp.c __func__, p->packet_number, p->ack_number, i, p 1587 src/dps8/dps8_mgp.c p->packet_type, pktype_name(p->packet_type)); p 1589 src/dps8/dps8_mgp.c int pktype = p->packet_type; p 1598 src/dps8/dps8_mgp.c rval = handle_connect(p, buf, words); p 1604 src/dps8/dps8_mgp.c p->chaos_opcode ? p->chaos_opcode : CHOP_OPN, p, buf, words); p 1608 src/dps8/dps8_mgp.c rval = handle_close(p, buf, words); p 1612 src/dps8/dps8_mgp.c rval = handle_lose(i, p, buf, words); p 1618 src/dps8/dps8_mgp.c p->chaos_opcode ? p->chaos_opcode : CHOP_DAT, p, buf, words); p 1641 src/dps8/dps8_mgp.c "<%#x,%#x>\n", __func__, i, p->frame_number, p->receipt_number, p 1642 src/dps8/dps8_mgp.c p->packet_number, p->ack_number); p 1652 src/dps8/dps8_mgp.c if (p->flags.reply_now) p 1686 src/dps8/dps8_mgp.c mgp_dev_state.frame_last_received = p->frame_number; p 1690 src/dps8/dps8_mgp.c FREE(p); p 1717 src/dps8/dps8_mgp.c make_mgp_header(struct mgp_packet_header *p, u_char opcode, u_char *pkt, p 1720 src/dps8/dps8_mgp.c (void)memset(p, 0, sizeof ( struct mgp_packet_header )); p 1721 src/dps8/dps8_mgp.c p->identification = '#'; p 1724 src/dps8/dps8_mgp.c p->packet_type = opcode_to_pktype[opcode]; p 1728 src/dps8/dps8_mgp.c p->packet_type = pktype_DATA; p 1732 src/dps8/dps8_mgp.c p->packet_type = pktype_NOOP; p 1736 src/dps8/dps8_mgp.c p->flags.reply_now = 1; p 1737 src/dps8/dps8_mgp.c p->frame_number = ++mgp_dev_state.frame_last_sent; p 1738 src/dps8/dps8_mgp.c p->receipt_number = mgp_dev_state.frame_last_received; p 1742 src/dps8/dps8_mgp.c p->packet_number = ++mgp_dev_state.conns[i].pkt_last_sent; p 1743 src/dps8/dps8_mgp.c p->ack_number = mgp_dev_state.conns[i].pkt_last_received; p 1744 src/dps8/dps8_mgp.c p->source_process = mgp_dev_state.conns[i].local_id; p 1745 src/dps8/dps8_mgp.c p->destination_process = mgp_dev_state.conns[i].multics_proc; p 1748 src/dps8/dps8_mgp.c p->chaos_opcode = opcode; p 1749 src/dps8/dps8_mgp.c p->byte_count = pklen; p 1752 src/dps8/dps8_mgp.c __func__, pktype_name(p->packet_type), p->packet_type, p->frame_number, p 1753 src/dps8/dps8_mgp.c p->receipt_number, p->packet_number, p->ack_number, p 1754 src/dps8/dps8_mgp.c chop_name(p->chaos_opcode), p->chaos_opcode, p->byte_count); p 53 src/dps8/dps8_mt.c #define FREE(p) do \ p 55 src/dps8/dps8_mt.c free((p)); \ p 56 src/dps8/dps8_mt.c (p) = NULL; \ p 990 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1001 src/dps8/dps8_mt.c p->stati = 04104; p 1013 src/dps8/dps8_mt.c p -> stati = 04423; // EOF category EOF file mark p 1029 src/dps8/dps8_mt.c p -> stati = 04302; // blank tape on read p 1031 src/dps8/dps8_mt.c p -> stati = 04340; // EOT file mark p 1050 src/dps8/dps8_mt.c p -> stati = 05001; // BUG: arbitrary error code; config switch p 1051 src/dps8/dps8_mt.c p -> chanStatus = chanStatParityErrPeriph; p 1054 src/dps8/dps8_mt.c p -> stati = 04000; p 1056 src/dps8/dps8_mt.c p -> stati |= 1; p 1064 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1109 src/dps8/dps8_mt.c if (p -> tallyResidue) p 1118 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; p 1120 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; p 1138 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1140 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1144 src/dps8/dps8_mt.c p -> stati = 04501; p 1145 src/dps8/dps8_mt.c p -> chanStatus = chanStatIncorrectDCW; p 1202 src/dps8/dps8_mt.c p -> stati = 04000; p 1207 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1209 src/dps8/dps8_mt.c p->initiate = false; p 1215 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1217 src/dps8/dps8_mt.c p->initiate = false; p 1223 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1233 src/dps8/dps8_mt.c p -> stati = 04000; p 1243 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1247 src/dps8/dps8_mt.c tape_statep -> is9 = p -> IDCW_DEV_CMD == 013; p 1251 src/dps8/dps8_mt.c p -> isRead = false; p 1253 src/dps8/dps8_mt.c uint tally = p -> DDCW_TALLY; p 1317 src/dps8/dps8_mt.c p -> stati = 04000; p 1319 src/dps8/dps8_mt.c p -> stati |= 1; p 1326 src/dps8/dps8_mt.c p -> tallyResidue = (word12) (tally - i); p 1330 src/dps8/dps8_mt.c p -> charPos = tape_statep -> tbc % 4; p 1332 src/dps8/dps8_mt.c p -> charPos = (tape_statep -> tbc * 8) / 9 % 4; p 1354 src/dps8/dps8_mt.c p -> stati = 04340; // EOT file mark p 1366 src/dps8/dps8_mt.c p -> stati = 05001; // BUG: arbitrary error code; config switch p 1367 src/dps8/dps8_mt.c p -> chanStatus = chanStatParityErrPeriph; p 1379 src/dps8/dps8_mt.c p -> stati = 04000; p 1381 src/dps8/dps8_mt.c p -> stati |= 1; p 1383 src/dps8/dps8_mt.c p -> stati |= 04340; p 1387 src/dps8/dps8_mt.c __func__, (int) tape_statep -> tbc, p -> stati); p 1399 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1416 src/dps8/dps8_mt.c p -> stati = 04000; // have_status = 1 p 1431 src/dps8/dps8_mt.c struct ctlr_to_dev_s * p = & cables->mtp_to_tape[ctlr_idx][dev_code]; p 1432 src/dps8/dps8_mt.c if (! p -> in_use) p 1434 src/dps8/dps8_mt.c uint unit_idx = p->unit_idx; p 1459 src/dps8/dps8_mt.c p -> stati = 04000; //-V1048 p 1479 src/dps8/dps8_mt.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 1482 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) dumpDCW (p->DCW, 0); p 1497 src/dps8/dps8_mt.c uint dev_code = p->IDCW_DEV_CODE; p 1499 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) dumpDCW (p->DCW, 0); p 1501 src/dps8/dps8_mt.c if (p->IDCW_DEV_CODE == 0) p 1513 src/dps8/dps8_mt.c if (IS_IDCW (p)) { p 1532 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 1533 src/dps8/dps8_mt.c switch (p->IDCW_DEV_CMD) { p 1539 src/dps8/dps8_mt.c if (p->IDCW_CHAN_CMD == 040) { p 1541 src/dps8/dps8_mt.c send_special_interrupt (iomUnitIdx, chan, p->IDCW_DEV_CODE, 01, 0 /* suspended */); p 1542 src/dps8/dps8_mt.c p->stati = 04000; p 1544 src/dps8/dps8_mt.c p->stati = 04000; p 1547 src/dps8/dps8_mt.c p->stati, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 1611 src/dps8/dps8_mt.c p->stati = 04000; p 1622 src/dps8/dps8_mt.c p->stati = 04104; p 1625 src/dps8/dps8_mt.c p->stati = 04000; p 1638 src/dps8/dps8_mt.c p->stati = 04104; p 1641 src/dps8/dps8_mt.c p->stati = 04000; p 1670 src/dps8/dps8_mt.c p->stati = 04000; p 1688 src/dps8/dps8_mt.c p->stati = 04104; p 1691 src/dps8/dps8_mt.c p->stati = 04000; p 1703 src/dps8/dps8_mt.c p->stati = 04104; p 1706 src/dps8/dps8_mt.c p->stati = 04000; p 1715 src/dps8/dps8_mt.c p->stati = 04000; p 1722 src/dps8/dps8_mt.c if (p->IDCW_CHAN_CMD == 040) { // If special controller command, then command 020 is 'release' p 1724 src/dps8/dps8_mt.c p->stati = 04000; // have_status = 1 p 1726 src/dps8/dps8_mt.c __func__, p->stati, p->IDCW_CHAN_CTRL, p->IDCW_CHAN_CMD); p 1727 src/dps8/dps8_mt.c send_special_interrupt (iomUnitIdx, chan, p->IDCW_DEV_CODE, 02, 0 /* released */); p 1729 src/dps8/dps8_mt.c p->stati = 04501; p 1730 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 1731 src/dps8/dps8_mt.c sim_warn ("%s: Unknown command %02o\n", __func__, p->IDCW_DEV_CMD); p 1761 src/dps8/dps8_mt.c p->stati = 04000; p 1777 src/dps8/dps8_mt.c p->stati = 04000; p 1778 src/dps8/dps8_mt.c p->isRead = false; p 1781 src/dps8/dps8_mt.c p->stati = 04502; // invalid device code p 1785 src/dps8/dps8_mt.c p->stati |= 1; p 1787 src/dps8/dps8_mt.c p->stati |= 2; p 1795 src/dps8/dps8_mt.c p->stati = 04000; p 1797 src/dps8/dps8_mt.c p->stati |= 1; p 1799 src/dps8/dps8_mt.c p->stati |= 2; p 1808 src/dps8/dps8_mt.c p->stati = 04000; p 1810 src/dps8/dps8_mt.c p->stati |= 1; p 1812 src/dps8/dps8_mt.c p->stati |= 2; p 1821 src/dps8/dps8_mt.c p->stati = 04000; p 1823 src/dps8/dps8_mt.c p->stati |= 1; p 1825 src/dps8/dps8_mt.c p->stati |= 2; p 1840 src/dps8/dps8_mt.c p->stati = 04104; p 1843 src/dps8/dps8_mt.c uint tally = p->IDCW_COUNT; p 1875 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1877 src/dps8/dps8_mt.c p->stati = 04000; p 1879 src/dps8/dps8_mt.c p->stati |= 1; p 1881 src/dps8/dps8_mt.c p->stati |= 2; p 1903 src/dps8/dps8_mt.c p->stati = 04104; p 1927 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1930 src/dps8/dps8_mt.c p->stati = 04000; p 1932 src/dps8/dps8_mt.c p->stati |= 1; p 1934 src/dps8/dps8_mt.c p->stati |= 2; p 1956 src/dps8/dps8_mt.c p->stati = 04104; p 1960 src/dps8/dps8_mt.c uint tally = p->IDCW_COUNT; p 1992 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 1996 src/dps8/dps8_mt.c p->stati = 04000; p 1998 src/dps8/dps8_mt.c p->stati |= 1; p 2000 src/dps8/dps8_mt.c p->stati |= 2; p 2022 src/dps8/dps8_mt.c p->stati = 04104; p 2060 src/dps8/dps8_mt.c p->tallyResidue = (word12) (tally - skipped); p 2064 src/dps8/dps8_mt.c p->stati = 04000; p 2066 src/dps8/dps8_mt.c p->stati |= 1; p 2068 src/dps8/dps8_mt.c p->stati |= 2; p 2082 src/dps8/dps8_mt.c p->stati = 04000; p 2084 src/dps8/dps8_mt.c p->stati |= 1; p 2086 src/dps8/dps8_mt.c p->stati |= 2; p 2089 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: Request device status: %o\n", __func__, p->stati); p 2102 src/dps8/dps8_mt.c if (p->isPCW) { p 2103 src/dps8/dps8_mt.c p->stati = 04501; // cmd reject, invalid opcode p 2104 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 2107 src/dps8/dps8_mt.c p->stati = 04000; p 2109 src/dps8/dps8_mt.c p->stati |= 1; p 2111 src/dps8/dps8_mt.c p->stati |= 2; p 2114 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: Reset device status: %o\n", __func__, p->stati); p 2135 src/dps8/dps8_mt.c p->stati = 04104; p 2146 src/dps8/dps8_mt.c p->stati = 04340; // EOT file mark p 2152 src/dps8/dps8_mt.c p->stati = 05001; // BUG: arbitrary error code; config switch p 2153 src/dps8/dps8_mt.c p->chanStatus = chanStatParityErrPeriph; p 2165 src/dps8/dps8_mt.c p->stati = 04000; p 2167 src/dps8/dps8_mt.c p->stati = 04340; p 2169 src/dps8/dps8_mt.c sim_debug (DBG_INFO, & tape_dev, "%s: Wrote tape mark; status %04o\n", __func__, p->stati); p 2184 src/dps8/dps8_mt.c p->stati = 04000; p 2196 src/dps8/dps8_mt.c p->stati = 04000; p 2198 src/dps8/dps8_mt.c p->stati |= 1; p 2200 src/dps8/dps8_mt.c p->stati |= 2; p 2205 src/dps8/dps8_mt.c p->stati = 04000; p 2207 src/dps8/dps8_mt.c p->stati |= 1; p 2209 src/dps8/dps8_mt.c p->stati |= 2; p 2217 src/dps8/dps8_mt.c p->stati = 04000; p 2219 src/dps8/dps8_mt.c p->stati |= 1; p 2221 src/dps8/dps8_mt.c p->stati |= 2; p 2235 src/dps8/dps8_mt.c p->stati = 04104; p 2244 src/dps8/dps8_mt.c p->stati = 04000; p 2246 src/dps8/dps8_mt.c p->stati |= 1; p 2248 src/dps8/dps8_mt.c p->stati |= 2; p 2264 src/dps8/dps8_mt.c p->stati = 04000; p 2284 src/dps8/dps8_mt.c if_sim_debug (DBG_TRACE, & tape_dev) { sim_printf ("// Tape Unknown %02o\r\n", p->IDCW_DEV_CMD); } p 2285 src/dps8/dps8_mt.c p->stati = 04501; p 2286 src/dps8/dps8_mt.c p->chanStatus = chanStatIncorrectDCW; p 2287 src/dps8/dps8_mt.c sim_warn ("%s: tape unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 2292 src/dps8/dps8_mt.c sim_debug (DBG_DEBUG, & tape_dev, "%s: stati %04o\n", __func__, p->stati); p 519 src/dps8/dps8_prt.c p 542 src/dps8/dps8_prt.c p 548 src/dps8/dps8_prt.c p 597 src/dps8/dps8_prt.c p 606 src/dps8/dps8_prt.c p 607 src/dps8/dps8_prt.c p 957 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 959 src/dps8/dps8_prt.c p->stati = 04000; //-V536 p 965 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 967 src/dps8/dps8_prt.c uint tally = p -> DDCW_TALLY; p 1006 src/dps8/dps8_prt.c p->charPos = 0; p 1007 src/dps8/dps8_prt.c p->stati = 04000; //-V536 p 1013 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1015 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 1126 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1128 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1134 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1138 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1141 src/dps8/dps8_prt.c p->stati = 04000; p 1151 src/dps8/dps8_prt.c p->stati = 04000; p 1161 src/dps8/dps8_prt.c p->stati = 04000; p 1166 src/dps8/dps8_prt.c p->stati = 04000; p 1167 src/dps8/dps8_prt.c p->isRead = false; p 1171 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1172 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1173 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1174 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1178 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1210 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1212 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1218 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1222 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1225 src/dps8/dps8_prt.c p->stati = 04000; p 1235 src/dps8/dps8_prt.c p->stati = 04000; p 1241 src/dps8/dps8_prt.c p->stati = 04000; p 1251 src/dps8/dps8_prt.c p->stati = 04000; p 1256 src/dps8/dps8_prt.c p->stati = 04000; p 1257 src/dps8/dps8_prt.c p->isRead = false; p 1261 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1262 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1263 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1264 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1268 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1306 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1308 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1314 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1318 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1321 src/dps8/dps8_prt.c p->stati = 04000; p 1327 src/dps8/dps8_prt.c p->stati = 04000; p 1337 src/dps8/dps8_prt.c p->stati = 04000; p 1347 src/dps8/dps8_prt.c p->stati = 04000; p 1352 src/dps8/dps8_prt.c p->stati = 04000; p 1353 src/dps8/dps8_prt.c p->isRead = false; p 1357 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1358 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1359 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1360 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1364 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1402 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1404 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1410 src/dps8/dps8_prt.c if (IS_IDCW (p)) { p 1414 src/dps8/dps8_prt.c switch (p->IDCW_DEV_CMD) { p 1417 src/dps8/dps8_prt.c p->stati = 04000; p 1423 src/dps8/dps8_prt.c p->stati = 04000; p 1429 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 1619 src/dps8/dps8_prt.c p->stati = 04000; p 1624 src/dps8/dps8_prt.c p->stati = 04000; p 1625 src/dps8/dps8_prt.c p->isRead = false; p 1632 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1636 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1639 src/dps8/dps8_prt.c p->stati = 04000; p 1640 src/dps8/dps8_prt.c p->isRead = false; p 1648 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1652 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1655 src/dps8/dps8_prt.c p->stati = 04000; p 1656 src/dps8/dps8_prt.c p->isRead = false; p 1664 src/dps8/dps8_prt.c p->stati = 04201; // Out of paper p 1668 src/dps8/dps8_prt.c p->stati = 04210; // Check alert p 1671 src/dps8/dps8_prt.c p->stati = 04000; p 1672 src/dps8/dps8_prt.c p->isRead = false; p 1678 src/dps8/dps8_prt.c p->stati = 04000; p 1679 src/dps8/dps8_prt.c p->isRead = false; p 1684 src/dps8/dps8_prt.c p->stati = 04000; p 1685 src/dps8/dps8_prt.c p->isRead = false; p 1689 src/dps8/dps8_prt.c p->stati = 04501; // cmd reject, invalid opcode p 1690 src/dps8/dps8_prt.c p->chanStatus = chanStatIncorrectDCW; p 1691 src/dps8/dps8_prt.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1692 src/dps8/dps8_prt.c sim_warn ("%s: PRT unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 1696 src/dps8/dps8_prt.c sim_debug (DBG_DEBUG, & prt_dev, "%s: stati %04o\n", __func__, p->stati); p 1745 src/dps8/dps8_prt.c iom_chan_data_t * p = & iom_chan_data[iomUnitIdx][chan]; p 1747 src/dps8/dps8_prt.c uint devUnitIdx = cables->urp_to_urd[ctlr_unit_idx][p->IDCW_DEV_CODE].unit_idx; p 1765 src/dps8/dps8_prt.c p->stati = 04502; //-V536 // invalid device code p 2021 src/dps8/dps8_prt.c const char * p = prt_config_list[rc].name; p 2023 src/dps8/dps8_prt.c if (strcmp (p, "split") == 0) p 881 src/dps8/dps8_scu.c const char * p = scu_config_list [rc].name; p 882 src/dps8/dps8_scu.c if (strcmp (p, "mode") == 0) p 884 src/dps8/dps8_scu.c else if (strcmp (p, "maska") == 0) p 894 src/dps8/dps8_scu.c else if (strcmp (p, "maskb") == 0) p 904 src/dps8/dps8_scu.c else if (strcmp (p, "port0") == 0) p 906 src/dps8/dps8_scu.c else if (strcmp (p, "port1") == 0) p 908 src/dps8/dps8_scu.c else if (strcmp (p, "port2") == 0) p 910 src/dps8/dps8_scu.c else if (strcmp (p, "port3") == 0) p 912 src/dps8/dps8_scu.c else if (strcmp (p, "port4") == 0) p 914 src/dps8/dps8_scu.c else if (strcmp (p, "port5") == 0) p 916 src/dps8/dps8_scu.c else if (strcmp (p, "port6") == 0) p 918 src/dps8/dps8_scu.c else if (strcmp (p, "port7") == 0) p 920 src/dps8/dps8_scu.c else if (strcmp (p, "lwrstoresize") == 0) p 922 src/dps8/dps8_scu.c else if (strcmp (p, "cyclic") == 0) p 924 src/dps8/dps8_scu.c else if (strcmp (p, "nea") == 0) p 926 src/dps8/dps8_scu.c else if (strcmp (p, "onl") == 0) p 928 src/dps8/dps8_scu.c else if (strcmp (p, "int") == 0) p 930 src/dps8/dps8_scu.c else if (strcmp (p, "lwr") == 0) p 932 src/dps8/dps8_scu.c else if (strcmp (p, "elapsed_days") == 0) p 934 src/dps8/dps8_scu.c else if (strcmp (p, "steady_clock") == 0) p 936 src/dps8/dps8_scu.c else if (strcmp (p, "bullet_time") == 0) p 938 src/dps8/dps8_scu.c else if (strcmp (p, "y2k") == 0) p 1065 src/dps8/dps8_scu.c p 1066 src/dps8/dps8_scu.c p 1068 src/dps8/dps8_scu.c p 1094 src/dps8/dps8_scu.c p 1095 src/dps8/dps8_scu.c p 1097 src/dps8/dps8_scu.c p 1739 src/dps8/dps8_scu.c for (int p = 0; p < N_ASSIGNMENTS; p ++) p 1742 src/dps8/dps8_scu.c if (scu [scu_unit_idx].mask_enable [p] == 0) p 1745 src/dps8/dps8_scu.c if (scu [scu_unit_idx ].mask_assignment [p] == port_num) p 1748 src/dps8/dps8_scu.c mask_num = p; p 2467 src/dps8/dps8_scu.c for (int p = 0; p < N_SCU_PORTS; p ++) p 2471 src/dps8/dps8_scu.c scu[u].ports[p].dev_port[s] = -1; p 2472 src/dps8/dps8_scu.c scu[u].ports[p].subport_enables[s] = false; p 2473 src/dps8/dps8_scu.c scu[u].ports[p].xipmask[s] = false; p 2475 src/dps8/dps8_scu.c scu[u].ports[p].xipmaskval = N_SCU_SUBPORTS; p 2477 src/dps8/dps8_scu.c scu[u].ports[p].type = ADEV_NONE; p 2478 src/dps8/dps8_scu.c scu[u].ports[p].is_exp = false; p 732 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 742 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 773 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 781 src/dps8/dps8_socket_dev.c p->stati = 050012; // BUG: arbitrary error code; config switch p 803 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 809 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 820 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 823 src/dps8/dps8_socket_dev.c if (IS_IDCW (p) || IS_TDCW (p)) p 826 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 830 src/dps8/dps8_socket_dev.c * tally = p->DDCW_TALLY; p 845 src/dps8/dps8_socket_dev.c p->stati = 05001; // BUG: arbitrary error code; config switch p 853 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 855 src/dps8/dps8_socket_dev.c sim_debug (DBG_DEBUG, & skc_dev, "IDCW_DEV_CODE %d\n", p->IDCW_DEV_CODE); p 857 src/dps8/dps8_socket_dev.c sim_printf ("device %u\n", p->IDCW_DEV_CODE); p 859 src/dps8/dps8_socket_dev.c switch (p->IDCW_DEV_CMD) p 863 src/dps8/dps8_socket_dev.c p->stati = 04000; // have_status = 1 p 865 src/dps8/dps8_socket_dev.c "%s: Request status: %04o\n", __func__, p->stati); p 867 src/dps8/dps8_socket_dev.c "%s: Request status control: %o\n", __func__, p->IDCW_CHAN_CTRL); p 869 src/dps8/dps8_socket_dev.c "%s: Request status channel command: %o\n", __func__, p->IDCW_CHAN_CMD); p 879 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 890 src/dps8/dps8_socket_dev.c skt_socket (unit_idx, p->IDCW_DEV_CODE, buffer); p 904 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 915 src/dps8/dps8_socket_dev.c skt_bind (unit_idx, p->IDCW_DEV_CODE, buffer); p 926 src/dps8/dps8_socket_dev.c p->stati = 04000; p 937 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 963 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 974 src/dps8/dps8_socket_dev.c skt_listen (unit_idx, p->IDCW_DEV_CODE, buffer); p 989 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 999 src/dps8/dps8_socket_dev.c sk_data.unit_data[unit_idx][p->IDCW_DEV_CODE].words_processed = words_processed; p 1001 src/dps8/dps8_socket_dev.c rc = skt_accept (unit_idx, p->IDCW_DEV_CODE, buffer); p 1019 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1030 src/dps8/dps8_socket_dev.c skt_close (unit_idx, p->IDCW_DEV_CODE, buffer); p 1044 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1054 src/dps8/dps8_socket_dev.c sk_data.unit_data[unit_idx][p->IDCW_DEV_CODE].words_processed = words_processed; p 1056 src/dps8/dps8_socket_dev.c rc = skt_read8 (unit_idx, p->IDCW_DEV_CODE, tally, buffer); p 1073 src/dps8/dps8_socket_dev.c int rc = get_ddcw (p, iom_unit_idx, chan, & ptro, expected_tally, & tally); p 1084 src/dps8/dps8_socket_dev.c rc = skt_write8 (iom_unit_idx, chan, unit_idx, p->IDCW_DEV_CODE, tally, buffer); p 1095 src/dps8/dps8_socket_dev.c p->stati = 04000; p 1098 src/dps8/dps8_socket_dev.c __func__, p->stati); p 1104 src/dps8/dps8_socket_dev.c p->stati = 04501; p 1105 src/dps8/dps8_socket_dev.c p->chanStatus = chanStatIncorrectDCW; p 1106 src/dps8/dps8_socket_dev.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 1107 src/dps8/dps8_socket_dev.c sim_warn ("%s: Unknown command 0%o\n", __func__, p->IDCW_DEV_CMD); p 1113 src/dps8/dps8_socket_dev.c sim_debug (DBG_DEBUG, & skc_dev, "stati %04o\n", p->stati); p 1116 src/dps8/dps8_socket_dev.c p 1126 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx] [chan]; p 1130 src/dps8/dps8_socket_dev.c if (IS_IDCW (p)) p 1183 src/dps8/dps8_socket_dev.c iom_chan_data_t * p = & iom_chan_data[iom_unit_idx][chan]; p 1184 src/dps8/dps8_socket_dev.c p->stati = 04000; // -V536 p 86 src/dps8/dps8_sys.c #define FREE(p) do \ p 88 src/dps8/dps8_sys.c free((p)); \ p 89 src/dps8/dps8_sys.c (p) = NULL; \ p 3619 src/dps8/dps8_sys.c const char * p = buf + 4; p 3620 src/dps8/dps8_sys.c while (* p == ' ') p 3621 src/dps8/dps8_sys.c p ++; p 3622 src/dps8/dps8_sys.c return panelScraperMsg (p); p 3672 src/dps8/dps8_sys.c struct dbgevent_t * p = (struct dbgevent_t *) bsearch (& key, dbgevents, (size_t) n_dbgevents, p 3674 src/dps8/dps8_sys.c if (! p) p 3676 src/dps8/dps8_sys.c return (int) (p - dbgevents); p 4149 src/dps8/dps8_sys.c const unsigned char *p = buf; p 4152 src/dps8/dps8_sys.c h = h * 31 + p[i]; p 4754 src/dps8/dps8_sys.c DCDstruct * p = & ci; p 4755 src/dps8/dps8_sys.c decode_instruction (cpup, word1, p); p 4758 src/dps8/dps8_sys.c if (p->info->ndes > 1) p 4763 src/dps8/dps8_sys.c for(uint n = 0 ; n < p->info->ndes; n += 1) p 4766 src/dps8/dps8_sys.c return (t_stat) -p->info->ndes; p 4858 src/dps8/dps8_sys.c const char * p = sys_config_list[rc].name; p 4859 src/dps8/dps8_sys.c if (strcmp (p, "connect_time") == 0) p 4861 src/dps8/dps8_sys.c else if (strcmp (p, "color") == 0) p 211 src/dps8/dps8_urp.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 214 src/dps8/dps8_urp.c if_sim_debug (DBG_TRACE, & urp_dev) dumpDCW (p->DCW, 0); p 217 src/dps8/dps8_urp.c uint devUnitIdx = cables->urp_to_urd[ctlrUnitIdx][p->IDCW_DEV_CODE].unit_idx; p 223 src/dps8/dps8_urp.c if (IS_IDCW (p)) { p 227 src/dps8/dps8_urp.c switch (p->IDCW_DEV_CMD) { p 231 src/dps8/dps8_urp.c p->stati = 04000; p 238 src/dps8/dps8_urp.c p->stati = 04000; p 248 src/dps8/dps8_urp.c p->stati = 04000; p 254 src/dps8/dps8_urp.c p->stati = 04000; p 255 src/dps8/dps8_urp.c p->isRead = false; p 259 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 260 src/dps8/dps8_urp.c p->stati = 04501; // cmd reject, invalid opcode p 261 src/dps8/dps8_urp.c p->chanStatus = chanStatIncorrectDCW; p 262 src/dps8/dps8_urp.c if (p->IDCW_DEV_CMD != 051) // ignore bootload console probe p 263 src/dps8/dps8_urp.c sim_warn ("%s: URP unrecognized device command %02o\n", __func__, p->IDCW_DEV_CMD); p 267 src/dps8/dps8_urp.c sim_debug (DBG_DEBUG, & urp_dev, "%s: stati %04o\n", __func__, p->stati); p 283 src/dps8/dps8_urp.c p->stati = 04000; p 289 src/dps8/dps8_urp.c p->stati = 04000; p 301 src/dps8/dps8_urp.c iom_chan_data_t * p = & iom_chan_data [iomUnitIdx] [chan]; p 302 src/dps8/dps8_urp.c uint devCode = p->IDCW_DEV_CODE; p 310 src/dps8/dps8_urp.c p->stati = 04502; //-V536 // invalid device code p 37 src/dps8/dps8_utils.c #define FREE(p) do \ p 39 src/dps8/dps8_utils.c free((p)); \ p 40 src/dps8/dps8_utils.c (p) = NULL; \ p 84 src/dps8/dps8_utils.c struct opcode_s * p = &opcodes10[i->opcode10]; p 85 src/dps8/dps8_utils.c return p->mne ? p : &unimplented; p 1319 src/dps8/dps8_utils.c p 1325 src/dps8/dps8_utils.c p 1329 src/dps8/dps8_utils.c p 1337 src/dps8/dps8_utils.c p 1341 src/dps8/dps8_utils.c p 1348 src/dps8/dps8_utils.c p 1352 src/dps8/dps8_utils.c p 1353 src/dps8/dps8_utils.c p 1356 src/dps8/dps8_utils.c p 1357 src/dps8/dps8_utils.c p 1358 src/dps8/dps8_utils.c p 1364 src/dps8/dps8_utils.c p 1369 src/dps8/dps8_utils.c p 1370 src/dps8/dps8_utils.c p 1374 src/dps8/dps8_utils.c p 1425 src/dps8/dps8_utils.c char *p; p 1430 src/dps8/dps8_utils.c for (p = s; isspace((unsigned char)*p) && *p != '\0'; p++) p 1434 src/dps8/dps8_utils.c memmove(s, p, strlen(p) + 1); p 1519 src/dps8/dps8_utils.c config_list_t * p = clist; p 1520 src/dps8/dps8_utils.c while (p -> name) p 1522 src/dps8/dps8_utils.c if (strcasecmp (name, p -> name) == 0) p 1524 src/dps8/dps8_utils.c p ++; p 1526 src/dps8/dps8_utils.c if (! p -> name) p 1539 src/dps8/dps8_utils.c if (p -> min > p -> max && ! p -> value_list) p 1541 src/dps8/dps8_utils.c return (int) (p - clist); p 1548 src/dps8/dps8_utils.c config_value_list_t * v = p -> value_list; p 1562 src/dps8/dps8_utils.c return (int) (p - clist); p 1567 src/dps8/dps8_utils.c if (p -> min > p -> max) p 1587 src/dps8/dps8_utils.c if (n < p -> min || n > p -> max) p 1594 src/dps8/dps8_utils.c return (int) (p - clist); p 1661 src/dps8/dps8_utils.c char * p = buf; p 1662 src/dps8/dps8_utils.c while (* p) p 1664 src/dps8/dps8_utils.c if (* p != '\\') p 1666 src/dps8/dps8_utils.c p ++; p 1669 src/dps8/dps8_utils.c if (p [1] == '\\') // \\ backslash p 1670 src/dps8/dps8_utils.c * p = '\\'; //-V1048 p 1671 src/dps8/dps8_utils.c else if (p [1] == 'a') // \a ^A p 1672 src/dps8/dps8_utils.c * p = '\001'; p 1673 src/dps8/dps8_utils.c else if (p [1] == 'w') // \w backslash p 1674 src/dps8/dps8_utils.c * p = '\\'; //-V1048 p 1675 src/dps8/dps8_utils.c else if (p [1] == 'n') // \n newline p 1676 src/dps8/dps8_utils.c * p = '\n'; p 1677 src/dps8/dps8_utils.c else if (p [1] == 't') // \t tab p 1678 src/dps8/dps8_utils.c * p = '\t'; p 1679 src/dps8/dps8_utils.c else if (p [1] == 'f') // \f formfeed p 1680 src/dps8/dps8_utils.c * p = '\f'; p 1681 src/dps8/dps8_utils.c else if (p [1] == 'r') // \r carriage return p 1682 src/dps8/dps8_utils.c * p = '\r'; p 1683 src/dps8/dps8_utils.c else if (p [1] == 'e') // \e ^E; Multics escape char. p 1684 src/dps8/dps8_utils.c * p = '\005'; p 1685 src/dps8/dps8_utils.c else if (p [1] == '_') // \_ space; needed for leading or p 1688 src/dps8/dps8_utils.c * p = ' '; p 1689 src/dps8/dps8_utils.c else if (p [1] == 'c') // \c comma (scp parser issue) p 1690 src/dps8/dps8_utils.c * p = ','; p 1691 src/dps8/dps8_utils.c else if (p [1] == 's') // \s semicolon (scp parser issue) p 1692 src/dps8/dps8_utils.c * p = ';'; p 1693 src/dps8/dps8_utils.c else if (p [1] == 'd') // \d dollar sign (scp parser issue) p 1694 src/dps8/dps8_utils.c * p = '$'; p 1695 src/dps8/dps8_utils.c else if (p [1] == 'q') // \q double quote (scp parser issue) p 1696 src/dps8/dps8_utils.c * p = '"'; p 1697 src/dps8/dps8_utils.c else if (p [1] == 'z') // \z ^D eof (VAXism) p 1698 src/dps8/dps8_utils.c * p = '\004'; p 1699 src/dps8/dps8_utils.c else if (p [1] == 'k') // \k caret p 1700 src/dps8/dps8_utils.c * p = '^'; p 1701 src/dps8/dps8_utils.c else if (p [1] == 'x') // \x expect p 1702 src/dps8/dps8_utils.c * p = '\030'; p 1703 src/dps8/dps8_utils.c else if (p [1] == 'y') // \y expect p 1704 src/dps8/dps8_utils.c * p = '\031'; p 1709 src/dps8/dps8_utils.c p 1711 src/dps8/dps8_utils.c p 1717 src/dps8/dps8_utils.c p 1718 src/dps8/dps8_utils.c p 1719 src/dps8/dps8_utils.c p 1721 src/dps8/dps8_utils.c p 1726 src/dps8/dps8_utils.c p ++; p 1729 src/dps8/dps8_utils.c p ++; p 1730 src/dps8/dps8_utils.c memmove (p, p + 1, strlen (p + 1) + 1); p 1767 src/dps8/dps8_utils.c uint8 * p = bits + woffset * 4; p 1770 src/dps8/dps8_utils.c w = ((uint64) p [0]) << 27; p 1771 src/dps8/dps8_utils.c w |= ((uint64) p [1]) << 18; p 1772 src/dps8/dps8_utils.c w |= ((uint64) p [2]) << 9; p 1773 src/dps8/dps8_utils.c w |= ((uint64) p [3]); p 1791 src/dps8/dps8_utils.c uint8 * p = bits + dwoffset * 9; p 1796 src/dps8/dps8_utils.c w = (((uint64) p [4]) & 0xf) << 32; p 1797 src/dps8/dps8_utils.c w |= ((uint64) p [5]) << 24; p 1798 src/dps8/dps8_utils.c w |= ((uint64) p [6]) << 16; p 1799 src/dps8/dps8_utils.c w |= ((uint64) p [7]) << 8; p 1800 src/dps8/dps8_utils.c w |= ((uint64) p [8]); p 1804 src/dps8/dps8_utils.c w = ((uint64) p [0]) << 28; p 1805 src/dps8/dps8_utils.c w |= ((uint64) p [1]) << 20; p 1806 src/dps8/dps8_utils.c w |= ((uint64) p [2]) << 12; p 1807 src/dps8/dps8_utils.c w |= ((uint64) p [3]) << 4; p 1808 src/dps8/dps8_utils.c w |= (((uint64) p [4]) >> 4) & 0xf; p 1816 src/dps8/dps8_utils.c uint8 * p = bits + woffset * 4; p 1817 src/dps8/dps8_utils.c p [0] = (val >> 27) & 0xff; p 1818 src/dps8/dps8_utils.c p [1] = (val >> 18) & 0xff; p 1819 src/dps8/dps8_utils.c p [2] = (val >> 9) & 0xff; p 1820 src/dps8/dps8_utils.c p [3] = (val ) & 0xff; p 1827 src/dps8/dps8_utils.c uint8 * p = bits + dwoffset * 9; p 1831 src/dps8/dps8_utils.c p [4] &= 0xf0; p 1832 src/dps8/dps8_utils.c p [4] |= (val >> 32) & 0x0f; p 1833 src/dps8/dps8_utils.c p [5] = (val >> 24) & 0xff; p 1834 src/dps8/dps8_utils.c p [6] = (val >> 16) & 0xff; p 1835 src/dps8/dps8_utils.c p [7] = (val >> 8) & 0xff; p 1836 src/dps8/dps8_utils.c p [8] = (val >> 0) & 0xff; p 1845 src/dps8/dps8_utils.c p [0] = (val >> 28) & 0xff; p 1846 src/dps8/dps8_utils.c p [1] = (val >> 20) & 0xff; p 1847 src/dps8/dps8_utils.c p [2] = (val >> 12) & 0xff; p 1848 src/dps8/dps8_utils.c p [3] = (val >> 4) & 0xff; p 1849 src/dps8/dps8_utils.c p [4] &= 0x0f; p 1850 src/dps8/dps8_utils.c p [4] |= (val << 4) & 0xf0; p 1935 src/dps8/dps8_utils.c static void print_uint128o_r (uint128 n, char * p) p 1940 src/dps8/dps8_utils.c print_uint128o_r(n / 8, p); p 1941 src/dps8/dps8_utils.c if (p) p 1946 src/dps8/dps8_utils.c strcat (p, s); p 1952 src/dps8/dps8_utils.c char * print_int128o (int128 n, char * p) p 1956 src/dps8/dps8_utils.c if (p) p 1957 src/dps8/dps8_utils.c strcat (p, "0"); p 1960 src/dps8/dps8_utils.c return p; p 1962 src/dps8/dps8_utils.c print_uint128o_r ((uint128) n, p); p 1963 src/dps8/dps8_utils.c return p; p 1966 src/dps8/dps8_utils.c static void print_uint128_r (uint128 n, char * p) p 1971 src/dps8/dps8_utils.c print_uint128_r(n / 10, p); p 1972 src/dps8/dps8_utils.c if (p) p 1977 src/dps8/dps8_utils.c strcat (p, s); p 1983 src/dps8/dps8_utils.c void print_int128 (int128 n, char * p) p 1987 src/dps8/dps8_utils.c if (p) p 1988 src/dps8/dps8_utils.c strcat (p, "0"); p 1995 src/dps8/dps8_utils.c if (p) p 1996 src/dps8/dps8_utils.c strcat (p, "-"); p 2001 src/dps8/dps8_utils.c print_uint128_r ((uint128) n, p); p 315 src/dps8/dps8_utils.h static inline word36 setbits36(word36 x, uint p, uint n, word36 val) p 317 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 319 src/dps8/dps8_utils.h sim_printf ("setbits36: bad args (%012llu,pos=%d,n=%d)\n", (unsigned long long)x, p, n); p 326 src/dps8/dps8_utils.h word36 result = (x & ~ mask) | ((val&MASKBITS(n)) << (36 - p - n)); p 330 src/dps8/dps8_utils.h static inline word36 setbits36_1 (word36 x, uint p, word1 val) p 333 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 335 src/dps8/dps8_utils.h sim_printf ("setbits36_1: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 346 src/dps8/dps8_utils.h static inline word36 setbits36_4 (word36 x, uint p, word4 val) p 349 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 351 src/dps8/dps8_utils.h sim_printf ("setbits36_4: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 362 src/dps8/dps8_utils.h static inline word36 setbits36_5 (word36 x, uint p, word5 val) p 365 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 367 src/dps8/dps8_utils.h sim_printf ("setbits36_5: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 378 src/dps8/dps8_utils.h static inline word36 setbits36_6 (word36 x, uint p, word6 val) p 381 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 383 src/dps8/dps8_utils.h sim_printf ("setbits36_6: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 394 src/dps8/dps8_utils.h static inline word36 setbits36_8 (word36 x, uint p, word8 val) p 397 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 399 src/dps8/dps8_utils.h sim_printf ("setbits36_8: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 410 src/dps8/dps8_utils.h static inline word36 setbits36_9 (word36 x, uint p, word9 val) p 413 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 415 src/dps8/dps8_utils.h sim_printf ("setbits36_9: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 426 src/dps8/dps8_utils.h static inline word36 setbits36_16 (word36 x, uint p, word16 val) p 429 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 431 src/dps8/dps8_utils.h sim_printf ("setbits36_16: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 442 src/dps8/dps8_utils.h static inline word36 setbits36_24 (word36 x, uint p, word24 val) p 445 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 447 src/dps8/dps8_utils.h sim_printf ("setbits36_24: bad args (%012llu,pos=%d)\n", (unsigned long long)x, p); p 458 src/dps8/dps8_utils.h static inline void putbits36 (word36 * x, uint p, uint n, word36 val) p 460 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 463 src/dps8/dps8_utils.h sim_printf ("putbits36: bad args (%012llu,pos=%d,n=%d)\n", (unsigned long long)*x, p, n); p 470 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS (n)) << (36 - p - n)); p 474 src/dps8/dps8_utils.h static inline void putbits36_1 (word36 * x, uint p, word1 val) p 477 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 479 src/dps8/dps8_utils.h sim_printf ("putbits36_1: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 489 src/dps8/dps8_utils.h static inline void putbits36_2 (word36 * x, uint p, word2 val) p 492 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 494 src/dps8/dps8_utils.h sim_printf ("putbits36_2: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 504 src/dps8/dps8_utils.h static inline void putbits36_3 (word36 * x, uint p, word3 val) p 507 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 509 src/dps8/dps8_utils.h sim_printf ("putbits36_3: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 519 src/dps8/dps8_utils.h static inline void putbits36_4 (word36 * x, uint p, word4 val) p 522 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 524 src/dps8/dps8_utils.h sim_printf ("putbits36_4: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 534 src/dps8/dps8_utils.h static inline void putbits36_5 (word36 * x, uint p, word5 val) p 537 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 539 src/dps8/dps8_utils.h sim_printf ("putbits36_5: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 549 src/dps8/dps8_utils.h static inline void putbits36_6 (word36 * x, uint p, word6 val) p 552 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 554 src/dps8/dps8_utils.h sim_printf ("putbits36_6: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 564 src/dps8/dps8_utils.h static inline void putbits36_7 (word36 * x, uint p, word7 val) p 567 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 569 src/dps8/dps8_utils.h sim_printf ("putbits36_7: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 579 src/dps8/dps8_utils.h static inline void putbits36_8 (word36 * x, uint p, word8 val) p 582 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 584 src/dps8/dps8_utils.h sim_printf ("putbits36_8: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 594 src/dps8/dps8_utils.h static inline void putbits36_9 (word36 * x, uint p, word9 val) p 597 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 599 src/dps8/dps8_utils.h sim_printf ("putbits36_9: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 628 src/dps8/dps8_utils.h static inline void putbits36_10 (word36 * x, uint p, word10 val) p 631 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 633 src/dps8/dps8_utils.h sim_printf ("putbits36_10: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 643 src/dps8/dps8_utils.h static inline void putbits36_12 (word36 * x, uint p, word12 val) p 646 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 648 src/dps8/dps8_utils.h sim_printf ("putbits36_12: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 658 src/dps8/dps8_utils.h static inline void putbits36_13 (word36 * x, uint p, word13 val) p 661 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 663 src/dps8/dps8_utils.h sim_printf ("putbits36_13: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 673 src/dps8/dps8_utils.h static inline void putbits36_14 (word36 * x, uint p, word14 val) p 676 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 678 src/dps8/dps8_utils.h sim_printf ("putbits36_14: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 688 src/dps8/dps8_utils.h static inline void putbits36_15 (word36 * x, uint p, word15 val) p 691 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 693 src/dps8/dps8_utils.h sim_printf ("putbits36_15: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 703 src/dps8/dps8_utils.h static inline void putbits36_16 (word36 * x, uint p, word16 val) p 706 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 708 src/dps8/dps8_utils.h sim_printf ("putbits36_16: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 718 src/dps8/dps8_utils.h static inline void putbits36_17 (word36 * x, uint p, word17 val) p 721 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 723 src/dps8/dps8_utils.h sim_printf ("putbits36_17: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 733 src/dps8/dps8_utils.h static inline void putbits36_18 (word36 * x, uint p, word18 val) p 736 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 738 src/dps8/dps8_utils.h sim_printf ("putbits36_18: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 748 src/dps8/dps8_utils.h static inline void putbits36_23 (word36 * x, uint p, word23 val) p 751 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 753 src/dps8/dps8_utils.h sim_printf ("putbits36_23: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 763 src/dps8/dps8_utils.h static inline void putbits36_24 (word36 * x, uint p, word24 val) p 766 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 768 src/dps8/dps8_utils.h sim_printf ("putbits36_24: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 778 src/dps8/dps8_utils.h static inline void putbits36_28 (word36 * x, uint p, word28 val) p 781 src/dps8/dps8_utils.h int shift = 36 - (int) p - (int) n; p 783 src/dps8/dps8_utils.h sim_printf ("putbits36_28: bad args (%012llu,pos=%d)\n", (unsigned long long)*x, p); p 793 src/dps8/dps8_utils.h static inline void putbits72 (word72 * x, uint p, uint n, word72 val) p 795 src/dps8/dps8_utils.h int shift = 72 - (int) p - (int) n; p 798 src/dps8/dps8_utils.h sim_printf ("putbits72: bad args (pos=%d,n=%d)\n", p, n); p 818 src/dps8/dps8_utils.h * x = or_128 (and_128 (* x, notmask), and_128 (lshift_128 (val, 72 - p - n), mask)); p 824 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS72 (n)) << (72 - p - n)); p 846 src/dps8/dps8_utils.h static inline void putbits18 (word18 * x, uint p, uint n, word18 val) p 848 src/dps8/dps8_utils.h int shift = 18 - (int) p - (int) n; p 851 src/dps8/dps8_utils.h sim_printf ("putbits18: bad args (%06o,pos=%d,n=%d)\n", * x, p, n); p 858 src/dps8/dps8_utils.h * x = (* x & ~mask) | ((val & MASKBITS18 (n)) << (18 - p - n)); p 887 src/dps8/dps8_utils.h void print_int128 (int128 n, char * p); p 888 src/dps8/dps8_utils.h char * print_int128o (int128 n, char * p); p 60 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 61 src/dps8/fnptelnet.c (* p->read_cb) (client, (ssize_t) event->data.size, (unsigned char *)event->data.buffer); p 74 src/dps8/fnptelnet.c uvClientData * p = client->data; p 75 src/dps8/fnptelnet.c (* p->write_actual_cb) (client, (unsigned char *) event->data.buffer, (ssize_t) event->data.size); p 156 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 157 src/dps8/fnptelnet.c if (p -> assoc) p 181 src/dps8/fnptelnet.c uvClientData * p = (uvClientData *) client->data; p 182 src/dps8/fnptelnet.c p->ttype = strdup (event->ttype.name); p 183 src/dps8/fnptelnet.c if (!p->ttype) p 213 src/dps8/fnptelnet.c void * p = (void *) telnet_init (my_telopts, evHandler, 0, client); p 214 src/dps8/fnptelnet.c if (! p) p 229 src/dps8/fnptelnet.c telnet_negotiate (p, q->us, (unsigned char) q->telopt); p 232 src/dps8/fnptelnet.c return p; p 237 src/dps8/fnptelnet.c void * p = (void *) telnet_init (my_3270telopts, evHandler, 0, client); p 238 src/dps8/fnptelnet.c if (! p) p 252 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_TTYPE); p 253 src/dps8/fnptelnet.c telnet_begin_sb (p, TELNET_TELOPT_TTYPE); p 255 src/dps8/fnptelnet.c telnet_send (p, ttype, 1); p 256 src/dps8/fnptelnet.c telnet_finish_sb (p); p 257 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_WILL, (unsigned char) TELNET_TELOPT_BINARY); p 258 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_BINARY); p 259 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_WILL, (unsigned char) TELNET_TELOPT_EOR); p 260 src/dps8/fnptelnet.c telnet_negotiate (p, TELNET_DO, (unsigned char) TELNET_TELOPT_EOR); p 262 src/dps8/fnptelnet.c return p; p 212 src/dps8/fnpuv.c #define FREE(p) do \ p 214 src/dps8/fnpuv.c free((p)); \ p 215 src/dps8/fnpuv.c (p) = NULL; \ p 278 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 279 src/dps8/fnpuv.c uint fnpno = p -> fnpno; p 280 src/dps8/fnpuv.c uint lineno = p -> lineno; p 331 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) stream->data; p 336 src/dps8/fnpuv.c if (p) p 340 src/dps8/fnpuv.c if (p->assoc) p 342 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 346 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: TN3270 %d.%d DISCONNECT]\r\n", ASSUME0, p->stationNo); p 350 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: DISCONNECT %c.d%03d]\r\n", p->fnpno+'a', p->lineno); p 376 src/dps8/fnpuv.c if (p->telnetp) p 378 src/dps8/fnpuv.c telnet_free (p->telnetp); p 381 src/dps8/fnpuv.c p->telnetp = NULL; p 416 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) stream->data; p 417 src/dps8/fnpuv.c if (p) p 419 src/dps8/fnpuv.c if (p->telnetp) p 421 src/dps8/fnpuv.c telnet_recv (p->telnetp, buf->base, (size_t) nread); p 426 src/dps8/fnpuv.c (* p->read_cb) ((uv_tcp_t *) stream, nread, (unsigned char *) buf->base); p 429 src/dps8/fnpuv.c p 615 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 616 src/dps8/fnpuv.c if (! p) //-V547 p 618 src/dps8/fnpuv.c if (!p->telnetp) p 623 src/dps8/fnpuv.c telnet_send (p->telnetp, (char *) data, (size_t) datalen); p 630 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 631 src/dps8/fnpuv.c if (! p) //-V547 p 669 src/dps8/fnpuv.c telnet_send (p->telnetp, (char *) actual_data_start, (size_t) actual_datalen); p 686 src/dps8/fnpuv.c uvClientData * p = client->data; p 687 src/dps8/fnpuv.c (* p->write_cb) (client, data, (ssize_t) strlen ((char *) data)); p 699 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) client->data; p 700 src/dps8/fnpuv.c ltnEOR (p->telnetp); p 769 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->data; p 770 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 795 src/dps8/fnpuv.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 796 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 799 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 800 src/dps8/fnpuv.c if (! p) p 812 src/dps8/fnpuv.c client->data = p; p 813 src/dps8/fnpuv.c p->assoc = false; p 814 src/dps8/fnpuv.c p->nPos = 0; p 815 src/dps8/fnpuv.c p->ttype = NULL; p 816 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 820 src/dps8/fnpuv.c p->read_cb = fnpuv_unassociated_readcb; p 821 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write; p 822 src/dps8/fnpuv.c p->telnetp = ltnConnect (client); p 824 src/dps8/fnpuv.c if (! p->telnetp) p 832 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 833 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 834 src/dps8/fnpuv.c p->telnetp = NULL; p 836 src/dps8/fnpuv.c p->fnpno = q->fnpno; p 837 src/dps8/fnpuv.c p->lineno = q->lineno; p 838 src/dps8/fnpuv.c p->assoc = true; p 845 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->data; p 846 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 922 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) server->handle->data; p 924 src/dps8/fnpuv.c if (! p) p 929 src/dps8/fnpuv.c struct t_line * linep = & fnpData.fnpUnitData[p->fnpno].MState.line[p->lineno]; p 945 src/dps8/fnpuv.c linep->line_client->data = p; p 946 src/dps8/fnpuv.c if (p->telnetp) p 948 src/dps8/fnpuv.c ltnDialout (p->telnetp); p 1034 src/dps8/fnpuv.c struct fw_entry_s * p = fw_entries + i; p 1035 src/dps8/fnpuv.c if (this_line < p->line_0 || this_line > p->line_1) p 1037 src/dps8/fnpuv.c if ((ip_addr & p->cidr_mask) != (p->ipaddr & p->cidr_mask)) p 1039 src/dps8/fnpuv.c accept = p->accept; p 1072 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1073 src/dps8/fnpuv.c if (! p) p 1085 src/dps8/fnpuv.c p->assoc = true; p 1086 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 1087 src/dps8/fnpuv.c p->nPos = 0; p 1088 src/dps8/fnpuv.c p->ttype = NULL; p 1089 src/dps8/fnpuv.c p->fnpno = fnpno; p 1090 src/dps8/fnpuv.c p->lineno = lineno; p 1091 src/dps8/fnpuv.c linep->line_client->data = p; p 1095 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write; p 1096 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1097 src/dps8/fnpuv.c p->telnetp = ltnConnect (linep->line_client); p 1098 src/dps8/fnpuv.c if (! p->telnetp) p 1105 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 1106 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1107 src/dps8/fnpuv.c p->telnetp = NULL; // Mark this line as 'not a telnet connection' p 1117 src/dps8/fnpuv.c p 1118 src/dps8/fnpuv.c p 1153 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1154 src/dps8/fnpuv.c if (! p) p 1166 src/dps8/fnpuv.c p->assoc = false; p 1167 src/dps8/fnpuv.c p->read_cb = fnpuv_associated_readcb; p 1168 src/dps8/fnpuv.c p->write_cb = fnpuv_start_write_actual; p 1169 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_actual; p 1170 src/dps8/fnpuv.c p->nPos = 0; p 1171 src/dps8/fnpuv.c p->ttype = NULL; p 1172 src/dps8/fnpuv.c p->fnpno = fnpno; p 1173 src/dps8/fnpuv.c p->lineno = lineno; p 1174 src/dps8/fnpuv.c linep->server.data = p; p 1427 src/dps8/fnpuv.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 1428 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 1431 src/dps8/fnpuv.c uvClientData * p = (uvClientData *) malloc (sizeof (uvClientData)); p 1432 src/dps8/fnpuv.c if (! p) p 1444 src/dps8/fnpuv.c client->data = p; p 1445 src/dps8/fnpuv.c p->assoc = false; p 1446 src/dps8/fnpuv.c p->fnpno = fnpno; p 1447 src/dps8/fnpuv.c p->lineno = lineno; p 1448 src/dps8/fnpuv.c p->nPos = 0; p 1449 src/dps8/fnpuv.c p->ttype = NULL; p 1450 src/dps8/fnpuv.c p->read_cb = fnpuv_3270_readcb; p 1451 src/dps8/fnpuv.c p->write_cb = fnpuv_start_3270_write; p 1452 src/dps8/fnpuv.c p->write_actual_cb = fnpuv_start_write_3270_actual; p 1453 src/dps8/fnpuv.c p->stationNo = stn_no; p 1454 src/dps8/fnpuv.c p->telnetp = ltnConnect3270 (client); p 1456 src/dps8/fnpuv.c if (! p->telnetp) p 37 src/dps8/hdbg.c # define FREE(p) do \ p 39 src/dps8/hdbg.c free((p)); \ p 40 src/dps8/hdbg.c (p) = NULL; \ p 175 src/dps8/hdbg.c unsigned long p = hdbg_inc (); \ p 176 src/dps8/hdbg.c hevents[p].type = t; \ p 177 src/dps8/hdbg.c hevents[p].cpu_idx = current_running_cpu_idx; \ p 178 src/dps8/hdbg.c hevents[p].time = cpu.cycleCnt; \ p 179 src/dps8/hdbg.c strncpy (hevents[p].ctx, ctx, 15); \ p 180 src/dps8/hdbg.c hevents[p].ctx[15] = 0; \ p 181 src/dps8/hdbg.c hevents[p].rw = tf; p 192 src/dps8/hdbg.c hevents[p].trace.addrMode = get_addr_mode (cpup); p 193 src/dps8/hdbg.c hevents[p].trace.segno = cpu.PPR.PSR; p 194 src/dps8/hdbg.c hevents[p].trace.ic = cpu.PPR.IC; p 195 src/dps8/hdbg.c hevents[p].trace.ring = cpu.PPR.PRR; p 196 src/dps8/hdbg.c hevents[p].trace.inst = IWB_IRODD; p 203 src/dps8/hdbg.c hevents[p].memref.addr = addr; p 204 src/dps8/hdbg.c hevents[p].memref.data = data; p 211 src/dps8/hdbg.c hevents[p].memref.addr = addr; p 212 src/dps8/hdbg.c hevents[p].memref.data = data; p 219 src/dps8/hdbg.c hevents[p].apu.segno = segno; p 220 src/dps8/hdbg.c hevents[p].apu.offset = offset; p 221 src/dps8/hdbg.c hevents[p].apu.final = final; p 222 src/dps8/hdbg.c hevents[p].apu.data = data; p 229 src/dps8/hdbg.c hevents[p].apu.segno = segno; p 230 src/dps8/hdbg.c hevents[p].apu.offset = offset; p 231 src/dps8/hdbg.c hevents[p].apu.final = final; p 232 src/dps8/hdbg.c hevents[p].apu.data = data; p 239 src/dps8/hdbg.c hevents[p].fault.faultNumber = faultNumber; p 240 src/dps8/hdbg.c hevents[p].fault.subFault = subFault; p 241 src/dps8/hdbg.c strncpy (hevents[p].fault.faultMsg, faultMsg, 63); p 242 src/dps8/hdbg.c hevents[p].fault.faultMsg[63] = 0; p 249 src/dps8/hdbg.c hevents[p].intrSet.inum = inum; p 250 src/dps8/hdbg.c hevents[p].intrSet.cpuUnitIdx = cpuUnitIdx; p 251 src/dps8/hdbg.c hevents[p].intrSet.scuUnitIdx = scuUnitIdx; p 258 src/dps8/hdbg.c hevents[p].cpu_idx = current_running_cpu_idx; p 259 src/dps8/hdbg.c hevents[p].time = cpu.cycleCnt; p 260 src/dps8/hdbg.c strncpy (hevents[p].ctx, ctx, 15); p 261 src/dps8/hdbg.c hevents[p].ctx[15] = 0; p 262 src/dps8/hdbg.c hevents[p].intr.intr_pair_addr = intr_pair_addr; p 269 src/dps8/hdbg.c hevents[p].reg.type = type; p 270 src/dps8/hdbg.c hevents[p].reg.data = data; p 277 src/dps8/hdbg.c hevents[p].reg.type = type; p 278 src/dps8/hdbg.c hevents[p].reg.data = data; p 285 src/dps8/hdbg.c hevents[p].par.type = type; p 286 src/dps8/hdbg.c hevents[p].par.data = * data; p 293 src/dps8/hdbg.c hevents[p].par.type = type; p 294 src/dps8/hdbg.c hevents[p].par.data = * data; p 301 src/dps8/hdbg.c p 302 src/dps8/hdbg.c p 308 src/dps8/hdbg.c p 309 src/dps8/hdbg.c p 317 src/dps8/hdbg.c hevents [p].iefp.type = type; p 318 src/dps8/hdbg.c hevents [p].iefp.segno = segno; p 319 src/dps8/hdbg.c hevents [p].iefp.offset = offset; p 328 src/dps8/hdbg.c (void)vsnprintf (hevents [p].note.noteBody, NOTE_SZ - 1, fmt, arglist); p 335 src/dps8/hdbg.c static void printM (struct hevt * p) { p 337 src/dps8/hdbg.c (unsigned long long int)p->time, p 338 src/dps8/hdbg.c p->cpu_idx, p 339 src/dps8/hdbg.c p->ctx, p 340 src/dps8/hdbg.c p->rw ? "write" : "read ", p 341 src/dps8/hdbg.c p->memref.addr, p 342 src/dps8/hdbg.c (unsigned long long int)p->memref.data); p 345 src/dps8/hdbg.c static void printAPU (struct hevt * p) { p 347 src/dps8/hdbg.c (unsigned long long int)p->time, p 348 src/dps8/hdbg.c p->cpu_idx, p 349 src/dps8/hdbg.c p->ctx, p 350 src/dps8/hdbg.c p->rw ? "write" : "read ", p 351 src/dps8/hdbg.c p->apu.segno, p 352 src/dps8/hdbg.c p->apu.offset, p 353 src/dps8/hdbg.c p->apu.final, p 354 src/dps8/hdbg.c (unsigned long long int)p->apu.data); p 357 src/dps8/hdbg.c static void printTrace (struct hevt * p) { p 359 src/dps8/hdbg.c if (p -> trace.addrMode == ABSOLUTE_mode) { p 361 src/dps8/hdbg.c (unsigned long long int)p->time, p 362 src/dps8/hdbg.c p->cpu_idx, p 363 src/dps8/hdbg.c p->ctx, p 364 src/dps8/hdbg.c p->trace.ic, p 365 src/dps8/hdbg.c p->trace.ring, p 366 src/dps8/hdbg.c (unsigned long long int)p->trace.inst, p 367 src/dps8/hdbg.c disassemble (buf, p->trace.inst)); p 370 src/dps8/hdbg.c (unsigned long long int)p->time, p 371 src/dps8/hdbg.c p->cpu_idx, p 372 src/dps8/hdbg.c p->ctx, p 373 src/dps8/hdbg.c p->trace.segno, p 374 src/dps8/hdbg.c p->trace.ic, p 375 src/dps8/hdbg.c p->trace.ring, p 376 src/dps8/hdbg.c (unsigned long long int)p->trace.inst, p 377 src/dps8/hdbg.c disassemble (buf, p->trace.inst)); p 381 src/dps8/hdbg.c static void printFault (struct hevt * p) { p 383 src/dps8/hdbg.c (unsigned long long int)p->time, p 384 src/dps8/hdbg.c p->cpu_idx, p 385 src/dps8/hdbg.c p->ctx, p 386 src/dps8/hdbg.c p->fault.faultNumber, p 387 src/dps8/hdbg.c p->fault.faultNumber, p 388 src/dps8/hdbg.c (unsigned long long int)p->fault.subFault.bits, p 389 src/dps8/hdbg.c (unsigned long long int)p->fault.subFault.bits, p 390 src/dps8/hdbg.c p->fault.faultMsg); p 393 src/dps8/hdbg.c static void printIntrSet (struct hevt * p) { p 395 src/dps8/hdbg.c (unsigned long long int)p->time, p 396 src/dps8/hdbg.c p->cpu_idx, p 397 src/dps8/hdbg.c p->ctx, p 398 src/dps8/hdbg.c p->intrSet.inum, p 399 src/dps8/hdbg.c p->intrSet.inum, p 400 src/dps8/hdbg.c p->intrSet.cpuUnitIdx, p 401 src/dps8/hdbg.c p->intrSet.scuUnitIdx); p 404 src/dps8/hdbg.c static void printIntr (struct hevt * p) { p 406 src/dps8/hdbg.c (unsigned long long int)p->time, p 407 src/dps8/hdbg.c p->cpu_idx, p 408 src/dps8/hdbg.c p->ctx, p 409 src/dps8/hdbg.c p->intr.intr_pair_addr); p 424 src/dps8/hdbg.c static void printReg (struct hevt * p) { p 425 src/dps8/hdbg.c if (p->reg.type == hreg_IR) p 427 src/dps8/hdbg.c (unsigned long long int)p->time, p 428 src/dps8/hdbg.c p->cpu_idx, p 429 src/dps8/hdbg.c p->ctx, p 430 src/dps8/hdbg.c p->rw ? "write" : "read ", p 431 src/dps8/hdbg.c regNames[p->reg.type], p 432 src/dps8/hdbg.c (unsigned long long int)p->reg.data, p 433 src/dps8/hdbg.c TSTF (p->reg.data, I_ZERO), p 434 src/dps8/hdbg.c TSTF (p->reg.data, I_NEG), p 435 src/dps8/hdbg.c TSTF (p->reg.data, I_CARRY), p 436 src/dps8/hdbg.c TSTF (p->reg.data, I_OFLOW), p 437 src/dps8/hdbg.c TSTF (p->reg.data, I_TALLY)); p 438 src/dps8/hdbg.c else if (p->reg.type >= hreg_X0 && p->reg.type <= hreg_X7) p 440 src/dps8/hdbg.c (unsigned long long int)p->time, p 441 src/dps8/hdbg.c p->cpu_idx, p 442 src/dps8/hdbg.c p->ctx, p 443 src/dps8/hdbg.c p->rw ? "write" : "read ", p 444 src/dps8/hdbg.c regNames[p->reg.type], p 445 src/dps8/hdbg.c (unsigned long long int)p->reg.data); p 448 src/dps8/hdbg.c (unsigned long long int)p->time, p 449 src/dps8/hdbg.c p->cpu_idx, p 450 src/dps8/hdbg.c p->ctx, p 451 src/dps8/hdbg.c p->rw ? "write" : "read ", p 452 src/dps8/hdbg.c regNames[p->reg.type], p 453 src/dps8/hdbg.c (unsigned long long int)p->reg.data); p 456 src/dps8/hdbg.c static void printPAReg (struct hevt * p) p 458 src/dps8/hdbg.c if (p->reg.type >= hreg_PR0 && p->reg.type <= hreg_PR7) p 460 src/dps8/hdbg.c (unsigned long long int)p->time, p 461 src/dps8/hdbg.c p->cpu_idx, p 462 src/dps8/hdbg.c p->ctx, p 463 src/dps8/hdbg.c p->rw ? "write" : "read ", p 464 src/dps8/hdbg.c regNames[p->reg.type], p 465 src/dps8/hdbg.c p->par.data.SNR, p 466 src/dps8/hdbg.c p->par.data.WORDNO, p 467 src/dps8/hdbg.c p->par.data.PR_BITNO, p 468 src/dps8/hdbg.c p->par.data.RNR); p 471 src/dps8/hdbg.c (unsigned long long int)p->time, p 472 src/dps8/hdbg.c p->cpu_idx, p 473 src/dps8/hdbg.c p->ctx, p 474 src/dps8/hdbg.c regNames[p->reg.type], p 475 src/dps8/hdbg.c p->par.data.SNR, p 476 src/dps8/hdbg.c p->par.data.WORDNO, p 477 src/dps8/hdbg.c p->par.data.AR_CHAR, p 478 src/dps8/hdbg.c p->par.data.AR_BITNO, p 479 src/dps8/hdbg.c p->par.data.RNR); p 482 src/dps8/hdbg.c static void printDSBRReg (struct hevt * p) { p 484 src/dps8/hdbg.c (unsigned long long int)p->time, p 485 src/dps8/hdbg.c p->cpu_idx, p 486 src/dps8/hdbg.c p->ctx, p 487 src/dps8/hdbg.c p->rw ? "write" : "read ", p 488 src/dps8/hdbg.c regNames[p->reg.type], p 489 src/dps8/hdbg.c p->par.data.SNR, p 490 src/dps8/hdbg.c p->par.data.WORDNO, p 491 src/dps8/hdbg.c p->par.data.PR_BITNO, p 492 src/dps8/hdbg.c p->par.data.RNR); p 495 src/dps8/hdbg.c static void printIEFP (struct hevt * p) { p 496 src/dps8/hdbg.c switch (p->iefp.type) { p 499 src/dps8/hdbg.c (unsigned long long int)p->time, p 500 src/dps8/hdbg.c p->cpu_idx, p 501 src/dps8/hdbg.c p->iefp.offset); p 506 src/dps8/hdbg.c (unsigned long long int)p->time, p 507 src/dps8/hdbg.c p->cpu_idx, p 508 src/dps8/hdbg.c p->iefp.offset); p 513 src/dps8/hdbg.c (unsigned long long int)p->time, p 514 src/dps8/hdbg.c p->cpu_idx, p 515 src/dps8/hdbg.c p->iefp.segno, p 516 src/dps8/hdbg.c p->iefp.offset); p 521 src/dps8/hdbg.c (unsigned long long int)p->time, p 522 src/dps8/hdbg.c p->cpu_idx, p 523 src/dps8/hdbg.c p->iefp.segno, p 524 src/dps8/hdbg.c p->iefp.offset); p 529 src/dps8/hdbg.c (long long unsigned int)p->time, p 530 src/dps8/hdbg.c p->cpu_idx, p 531 src/dps8/hdbg.c p->iefp.offset); p 536 src/dps8/hdbg.c (long long unsigned int)p->time, p 537 src/dps8/hdbg.c p->cpu_idx, p 538 src/dps8/hdbg.c p->iefp.offset); p 543 src/dps8/hdbg.c (unsigned long long int)p->time, p 544 src/dps8/hdbg.c p->cpu_idx, p 545 src/dps8/hdbg.c p->iefp.segno, p 546 src/dps8/hdbg.c p->iefp.offset); p 551 src/dps8/hdbg.c (unsigned long long int)p->time, p 552 src/dps8/hdbg.c p->cpu_idx, p 553 src/dps8/hdbg.c p->iefp.segno, p 554 src/dps8/hdbg.c p->iefp.offset); p 559 src/dps8/hdbg.c (long long unsigned int)p->time, p 560 src/dps8/hdbg.c p->cpu_idx, p 561 src/dps8/hdbg.c p->iefp.segno, p 562 src/dps8/hdbg.c p->iefp.offset); p 567 src/dps8/hdbg.c static void printNote (struct hevt * p) { p 569 src/dps8/hdbg.c (long long unsigned int)p->time, p 570 src/dps8/hdbg.c p->note.noteBody); p 588 src/dps8/hdbg.c for (unsigned long p = 0; p < hdbgSize; p ++) { p 589 src/dps8/hdbg.c unsigned long q = (hevtPtr + p) % hdbgSize; p 85 src/dps8/libtelnet.c #define FREE(p) do \ p 87 src/dps8/libtelnet.c free((p)); \ p 88 src/dps8/libtelnet.c (p) = NULL; \ p 60 src/dps8/shm.c void *p; p 280 src/dps8/shm.c p = mmap(NULL, shm_size, PROT_READ | PROT_WRITE, p 285 src/dps8/shm.c if (p == MAP_FAILED) p 292 src/dps8/shm.c return p; p 299 src/dps8/shm.c void *p; p 384 src/dps8/shm.c p = mmap(NULL, size, PROT_READ | PROT_WRITE, p 389 src/dps8/shm.c if (p == MAP_FAILED) p 420 src/dps8/shm.c return p; p 396 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[cpuNum]; p 397 src/dps8/threadz.c if (p->run) p 400 src/dps8/threadz.c p->cpuThreadArg = (int) cpuNum; p 402 src/dps8/threadz.c rc = pthread_mutex_init (& p->runLock, NULL); p 405 src/dps8/threadz.c rc = pthread_cond_init (& p->runCond, NULL); p 409 src/dps8/threadz.c p->run = true; p 414 src/dps8/threadz.c p->sleepClock = CLOCK_REALTIME; p 415 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, NULL); p 417 src/dps8/threadz.c rc = pthread_condattr_init (& p->sleepCondAttr); p 421 src/dps8/threadz.c rc = pthread_condattr_setclock (& p->sleepCondAttr, CLOCK_MONOTONIC); p 424 src/dps8/threadz.c p->sleepClock = CLOCK_REALTIME; p 426 src/dps8/threadz.c p->sleepClock = CLOCK_MONOTONIC; p 429 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, & p->sleepCondAttr); p 431 src/dps8/threadz.c rc = pthread_cond_init (& p->sleepCond, NULL); p 438 src/dps8/threadz.c & p->cpuThread, p 442 src/dps8/threadz.c & p->cpuThreadArg); p 445 src/dps8/threadz.c & p->cpuThread, p 448 src/dps8/threadz.c & p->cpuThreadArg); p 457 src/dps8/threadz.c pthread_set_name_np (p->cpuThread, nm); p 464 src/dps8/threadz.c pthread_setname_np (p->cpuThread, nm); p 477 src/dps8/threadz.c int s = pthread_setaffinity_np (p->cpuThread, sizeof (cpu_set_t), & cpuset); p 487 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 488 src/dps8/threadz.c p->run = false; p 498 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 499 src/dps8/threadz.c if (p->run) p 501 src/dps8/threadz.c rc = pthread_mutex_lock (& p->runLock); p 504 src/dps8/threadz.c while (! p->run) p 506 src/dps8/threadz.c rc = pthread_cond_wait (& p->runCond, & p->runLock); p 510 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->runLock); p 520 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[current_running_cpu_idx]; p 524 src/dps8/threadz.c clock_gettime (p->sleepClock, & startTime); p 533 src/dps8/threadz.c rc = pthread_cond_timedwait (& p->sleepCond, & scu_lock, & absTime); p 549 src/dps8/threadz.c clock_gettime (p->sleepClock, & newTime); p 565 src/dps8/threadz.c struct cpuThreadz_t * p = & cpuThreadz[cpuNum]; p 567 src/dps8/threadz.c rc = pthread_cond_signal (& p->sleepCond); p 603 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 605 src/dps8/threadz.c p->inCnt = 0; p 606 src/dps8/threadz.c p->outCnt = 0; p 608 src/dps8/threadz.c p->iomThreadArg = (int) iomNum; p 610 src/dps8/threadz.c p->ready = false; p 612 src/dps8/threadz.c p->intr = false; p 613 src/dps8/threadz.c rc = pthread_mutex_init (& p->intrLock, NULL); p 616 src/dps8/threadz.c rc = pthread_cond_init (& p->intrCond, NULL); p 622 src/dps8/threadz.c & p->iomThread, p 626 src/dps8/threadz.c & p->iomThreadArg); p 629 src/dps8/threadz.c & p->iomThread, p 632 src/dps8/threadz.c & p->iomThreadArg); p 640 src/dps8/threadz.c pthread_setname_np (p->iomThread, nm); p 642 src/dps8/threadz.c pthread_set_name_np (p->iomThread, nm); p 651 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[this_iom_idx]; p 652 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 655 src/dps8/threadz.c p -> ready = true; p 656 src/dps8/threadz.c while (! p->intr) p 658 src/dps8/threadz.c rc = pthread_cond_wait (& p->intrCond, & p->intrLock); p 663 src/dps8/threadz.c p->outCnt++; p 664 src/dps8/threadz.c if (p->inCnt != p->outCnt) p 666 src/dps8/threadz.c p->inCnt, p->outCnt); p 675 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[this_iom_idx]; p 676 src/dps8/threadz.c p->intr = false; p 677 src/dps8/threadz.c rc = pthread_cond_signal (& p->intrCond); p 680 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 690 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 691 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 694 src/dps8/threadz.c while (p->intr) p 696 src/dps8/threadz.c rc = pthread_cond_wait (& p->intrCond, & p->intrLock); p 700 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 710 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 711 src/dps8/threadz.c rc = pthread_mutex_lock (& p->intrLock); p 714 src/dps8/threadz.c while (p->intr) p 716 src/dps8/threadz.c rc = pthread_cond_wait(&p->intrCond, &p->intrLock); p 721 src/dps8/threadz.c p->inCnt++; p 723 src/dps8/threadz.c p->intr = true; p 724 src/dps8/threadz.c rc = pthread_cond_signal (& p->intrCond); p 727 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->intrLock); p 736 src/dps8/threadz.c struct iomThreadz_t * p = & iomThreadz[iomNum]; p 737 src/dps8/threadz.c while (! p -> ready) p 770 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 771 src/dps8/threadz.c p->chnThreadArg = (int) (chnNum + iomNum * MAX_CHANNELS); p 774 src/dps8/threadz.c p->inCnt = 0; p 775 src/dps8/threadz.c p->outCnt = 0; p 777 src/dps8/threadz.c p->ready = false; p 779 src/dps8/threadz.c p->connect = false; p 780 src/dps8/threadz.c rc = pthread_mutex_init (& p->connectLock, NULL); p 783 src/dps8/threadz.c rc = pthread_cond_init (& p->connectCond, NULL); p 789 src/dps8/threadz.c & p->chnThread, p 793 src/dps8/threadz.c & p->chnThreadArg); p 796 src/dps8/threadz.c & p->chnThread, p 799 src/dps8/threadz.c & p->chnThreadArg); p 807 src/dps8/threadz.c pthread_setname_np (p->chnThread, nm); p 809 src/dps8/threadz.c pthread_set_name_np (p->chnThread, nm); p 818 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[this_iom_idx][this_chan_num]; p 820 src/dps8/threadz.c rc = pthread_mutex_lock (& p->connectLock); p 823 src/dps8/threadz.c p -> ready = true; p 824 src/dps8/threadz.c while (! p->connect) p 826 src/dps8/threadz.c rc = pthread_cond_wait (& p->connectCond, & p->connectLock); p 831 src/dps8/threadz.c p->outCnt++; p 832 src/dps8/threadz.c if (p->inCnt != p->outCnt) p 834 src/dps8/threadz.c p->inCnt, p->outCnt); p 843 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[this_iom_idx][this_chan_num]; p 844 src/dps8/threadz.c p->connect = false; p 845 src/dps8/threadz.c rc = pthread_cond_signal (& p->connectCond); p 848 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->connectLock); p 858 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 859 src/dps8/threadz.c rc = pthread_mutex_lock (& p->connectLock); p 862 src/dps8/threadz.c while (p->connect) p 864 src/dps8/threadz.c rc = pthread_cond_wait(&p->connectCond, &p->connectLock); p 869 src/dps8/threadz.c p->inCnt++; p 871 src/dps8/threadz.c p->connect = true; p 872 src/dps8/threadz.c rc = pthread_cond_signal (& p->connectCond); p 875 src/dps8/threadz.c rc = pthread_mutex_unlock (& p->connectLock); p 884 src/dps8/threadz.c struct chnThreadz_t * p = & chnThreadz[iomNum][chnNum]; p 885 src/dps8/threadz.c while (! p -> ready) p 28 src/dps8/ucache.c word1 p, word24 address, word3 r1, bool paged) { p 40 src/dps8/ucache.c ep->p = p; p 44 src/dps8/ucache.c ucNum, segno, offset, bound, p, address, r1, paged); p 50 src/dps8/ucache.c word1 * p, word24 * address, word3 * r1, bool * paged) { p 92 src/dps8/ucache.c ucNum, segno, offset, ep->bound, ep->p, ep->address, ep->r1, ep->paged); p 112 src/dps8/ucache.c * p = ep->p; p 32 src/dps8/ucache.h word1 p; p 65 src/dps8/ucache.h word18 offset, word14 bound, word1 p, word24 address, word3 r1, bool paged); p 68 src/dps8/ucache.h word18 offset, word14 * bound, word1 * p, word24 * address, word3 * r1, bool * paged); p 44 src/dps8/utfile.c #define FREE(p) do \ p 46 src/dps8/utfile.c free((p)); \ p 47 src/dps8/utfile.c (p) = NULL; \ p 56 src/dps8/utfile.c const unsigned char *p = buf; p 59 src/dps8/utfile.c h = h * 31 + p[i]; p 31 src/dps8/uvutil.c #define FREE(p) do \ p 33 src/dps8/uvutil.c free((p)); \ p 34 src/dps8/uvutil.c (p) = NULL; \ p 522 src/dps8/uvutil.c void * p = (void *) telnet_init (my_telopts, evHandler, 0, client); p 523 src/dps8/uvutil.c if (!p) p 532 src/dps8/uvutil.c telnet_negotiate (p, q->us, (unsigned char) q->telopt); p 535 src/dps8/uvutil.c return p; p 590 src/dps8/uvutil.c struct sockaddr_in * p = (struct sockaddr_in *) & name; p 591 src/dps8/uvutil.c sim_printf ("\r[OPC emulation: CONNECT %s]\r\n", inet_ntoa (p -> sin_addr)); p 107 src/libsir/include/sir/helpers.h bool __sir_validptr(const void* restrict p, bool fail, const char* func, p 109 src/libsir/include/sir/helpers.h bool valid = NULL != p; p 130 src/libsir/include/sir/helpers.h # define _sir_validptrnofail(p) \ p 131 src/libsir/include/sir/helpers.h __sir_validptr(p, false, __func__, __file__, __LINE__) p 134 src/libsir/include/sir/helpers.h # define _sir_validptr(p) \ p 135 src/libsir/include/sir/helpers.h __sir_validptr((const void* restrict)p, true, __func__, __file__, __LINE__) p 351 src/libsir/src/sirhelpers.c const char* p; p 353 src/libsir/src/sirhelpers.c while ((r = strstr(p = r + len, sub)) != NULL) p 354 src/libsir/src/sirhelpers.c while (p < r) p 355 src/libsir/src/sirhelpers.c *q++ = *p++; p 357 src/libsir/src/sirhelpers.c while ((*q++ = *p++) != '\0'); p 386 src/libsir/src/sirhelpers.c char *p = strstr(str, sub); p 388 src/libsir/src/sirhelpers.c if (!c || !p) p 391 src/libsir/src/sirhelpers.c (void)_sir_explicit_memset(p, c, strnlen(sub, strlen(str))); p 82 src/simh/linehistory.c # define FREE(p) do \ p 84 src/simh/linehistory.c free((p)); \ p 85 src/simh/linehistory.c (p) = NULL; \ p 193 src/simh/scp.c #define FREE(p) do \ p 195 src/simh/scp.c free((p)); \ p 196 src/simh/scp.c (p) = NULL; \ p 1460 src/simh/scp.c char *p, *q, *r; p 1463 src/simh/scp.c while ((r = strstr(p = r + len, sub)) != NULL) { p 1464 src/simh/scp.c while (p < r) p 1465 src/simh/scp.c *q++ = *p++; p 1467 src/simh/scp.c while ((*q++ = *p++) != '\0') p 9010 src/simh/scp.c int32 lo, hi, p; p 9020 src/simh/scp.c p = (lo + hi) >> 1; /* probe */ p 9021 src/simh/scp.c bp = sim_brk_tab[p]; /* table addr */ p 9023 src/simh/scp.c sim_brk_ins = p; p 9027 src/simh/scp.c hi = p - 1; p 9028 src/simh/scp.c else lo = p + 1; /* go up? p is lower */ p 9031 src/simh/scp.c sim_brk_ins = p; p 9032 src/simh/scp.c else sim_brk_ins = p + 1; /* after last sch */ p 11102 src/simh/scp.c const char *p; p 11136 src/simh/scp.c p = dptr->name; p 11140 src/simh/scp.c p = sim_name; p 11141 src/simh/scp.c top.title = (char *) malloc (strlen (p) + ((flag & SCP_HELP_ATTACH)? sizeof (attach_help)-1: 0) +1); p 11154 src/simh/scp.c for (i = 0; p[i]; i++ ) p 11155 src/simh/scp.c top.title[i] = (char)toupper (p[i]); p 11250 src/simh/scp.c char *p; p 11257 src/simh/scp.c for (p = tbuf; *p; p++) { p 11258 src/simh/scp.c if (blankch (*p)) p 11259 src/simh/scp.c *p = '_'; p 97 src/simh/sim_console.c #define FREE(p) do \ p 99 src/simh/sim_console.c free((p)); \ p 100 src/simh/sim_console.c (p) = NULL; \ p 805 src/simh/sim_defs.h # define FREE(p) do \ p 807 src/simh/sim_defs.h free((p)); \ p 808 src/simh/sim_defs.h (p) = NULL; \ p 84 src/simh/sim_disk.c #define FREE(p) do \ p 86 src/simh/sim_disk.c free((p)); \ p 87 src/simh/sim_disk.c (p) = NULL; \ p 73 src/simh/sim_fio.c #define FREE(p) do \ p 75 src/simh/sim_fio.c free((p)); \ p 76 src/simh/sim_fio.c (p) = NULL; \ p 76 src/simh/sim_sock.c #define FREE(p) do \ p 78 src/simh/sim_sock.c free((p)); \ p 79 src/simh/sim_sock.c (p) = NULL; \ p 77 src/simh/sim_tape.c #define FREE(p) do \ p 79 src/simh/sim_tape.c free((p)); \ p 80 src/simh/sim_tape.c (p) = NULL; \ p 2020 src/simh/sim_tape.c uint32 lo, hi, p; p 2027 src/simh/sim_tape.c p = (lo + hi) >> 1; p 2028 src/simh/sim_tape.c if (uptr->pos == map[p]) p 2029 src/simh/sim_tape.c return ((p == 0)? map[p]: map[p - 1]); p 2030 src/simh/sim_tape.c else if (uptr->pos < map[p]) p 2031 src/simh/sim_tape.c hi = p - 1; p 2032 src/simh/sim_tape.c else lo = p + 1; p 2035 src/simh/sim_tape.c return ((p == 0)? map[p]: map[p - 1]); p 120 src/simh/sim_tmxr.c #define FREE(p) do \ p 122 src/simh/sim_tmxr.c free((p)); \ p 123 src/simh/sim_tmxr.c (p) = NULL; \ p 537 src/simh/sim_tmxr.c static void tmxr_rmvrc (TMLN *lp, int32 p) p 539 src/simh/sim_tmxr.c for ( ; p < lp->rxbpi; p++) { /* work from "p" through end of buffer */ p 540 src/simh/sim_tmxr.c lp->rxb[p] = lp->rxb[p + 1]; /* slide following character down */ p 541 src/simh/sim_tmxr.c lp->rbr[p] = lp->rbr[p + 1]; /* adjust break status too */ p 544 src/simh/sim_tmxr.c lp->rbr[p] = 0; /* clear potential break from vacated slot */ p 768 src/simh/sim_tmxr.c const unsigned char *p = buf; p 771 src/simh/sim_tmxr.c h = h * 31 + p[i];