r 5306 src/decNumber/decNumber.c Int r; // rhs=f*10**r [see below] r 5407 src/decNumber/decNumber.c r=rhs->exponent+rhs->digits; // 'normalised' exponent r 5408 src/decNumber/decNumber.c decNumberFromInt32(a, r); // a=r r 5943 src/decNumber/decNumber.c const Unit *l, *r, *u; // work r 5951 src/decNumber/decNumber.c r=b+alength-1; r 5952 src/decNumber/decNumber.c for (;l>=a; l--, r--) { r 5953 src/decNumber/decNumber.c if (*l>*r) return 1; r 5954 src/decNumber/decNumber.c if (*l<*r) return -1; r 440 src/dps8/dps8_cpu.h word36 r; r 303 src/dps8/dps8_decimal.c r 312 src/dps8/dps8_decimal.c r 337 src/dps8/dps8_decimal.c r 338 src/dps8/dps8_decimal.c r 346 src/dps8/dps8_decimal.c r 356 src/dps8/dps8_decimal.c r 381 src/dps8/dps8_decimal.c r 382 src/dps8/dps8_decimal.c r 391 src/dps8/dps8_decimal.c r 431 src/dps8/dps8_decimal.c r 463 src/dps8/dps8_decimal.c r 464 src/dps8/dps8_decimal.c r 475 src/dps8/dps8_decimal.c r 476 src/dps8/dps8_decimal.c r 483 src/dps8/dps8_decimal.c r 494 src/dps8/dps8_decimal.c r 507 src/dps8/dps8_decimal.c r 513 src/dps8/dps8_decimal.c r 660 src/dps8/dps8_decimal.c r 667 src/dps8/dps8_decimal.c r 710 src/dps8/dps8_decimal.c r 715 src/dps8/dps8_decimal.c char *formatDecimal (uint8_t * out, decContext *set, decNumber *r, int nout, int s, int sf, bool R, bool *OVR, bool *TRUNC) { r 730 src/dps8/dps8_decimal.c if (sf != r->exponent) { r 733 src/dps8/dps8_decimal.c if (sf > r->exponent) // ET 330: truncation due to: output sf > input sf or exponent r 738 src/dps8/dps8_decimal.c r 742 src/dps8/dps8_decimal.c r 748 src/dps8/dps8_decimal.c r 750 src/dps8/dps8_decimal.c if (r->exponent > sf) r 751 src/dps8/dps8_decimal.c set->digits = min (DECNUMDIGITS, max (set->digits, r->digits + r->exponent - sf)); r 752 src/dps8/dps8_decimal.c decNumberRescale (r, r, & _sf, set); r 755 src/dps8/dps8_decimal.c decNumberZero (r); r 766 src/dps8/dps8_decimal.c decNumberToIntegralValue (r2, r, set); r 779 src/dps8/dps8_decimal.c decNumberPlus (r2, r, set); r 782 src/dps8/dps8_decimal.c decNumberSubtract(r, r, r2, set); r 791 src/dps8/dps8_decimal.c if (nout < r->digits) { // not enough space to move all digits r 799 src/dps8/dps8_decimal.c decNumberPlus (r, r, set); r 812 src/dps8/dps8_decimal.c decNumberGetBCD (r,tmp); r 813 src/dps8/dps8_decimal.c int justif = nout - r->digits; r 46 src/dps8/dps8_decimal.h char *formatDecimal(uint8_t * out, decContext *set, decNumber *r, int nout, int s, r 1466 src/dps8/dps8_eis.c word36 r = getMFReg36 (cpup, MFk & 017, allowDU, true, mod_fault); // allow du based on instruction, allow n,ic r 1470 src/dps8/dps8_eis.c address += r; r 1472 src/dps8/dps8_eis.c r = 0; r 1496 src/dps8/dps8_eis.c uint nchars = address * 8 + (uint) r + arn_char4 + CN; r 1519 src/dps8/dps8_eis.c effBITNO = (9u * ARn_CHAR + 6u * r + ARn_BITNO) % 9u; r 1522 src/dps8/dps8_eis.c 6u * r + ARn_BITNO) % 36u) / 6u;//9; r 1526 src/dps8/dps8_eis.c 6u * r + r 1545 src/dps8/dps8_eis.c effCHAR = (CN + ARn_CHAR + r) % 4; r 1548 src/dps8/dps8_eis.c effCHAR, CN, ARn_CHAR, r); r 1552 src/dps8/dps8_eis.c 9u * r + r 1601 src/dps8/dps8_eis.c word36 r = getMFReg36 (cpup, yREG, false, true, mod_fault); // disallow du, allow n,ic r 1628 src/dps8/dps8_eis.c y += ((9u * ARn_CHAR + 36u * r + ARn_BITNO) / 36u); r 1715 src/dps8/dps8_eis.c word36 r = getMFReg36(cpup, MFk & 017, false, true, mod_fault); // disallow du, allow n, ic r 1718 src/dps8/dps8_eis.c address += r; r 1720 src/dps8/dps8_eis.c r = 0; r 1761 src/dps8/dps8_eis.c uint nchars = (uint) (address * 8u + r + arn_char4 + CN); r 1781 src/dps8/dps8_eis.c effCHAR = ((word36) CN + (word36) ARn_CHAR + r) % 4u; r 1782 src/dps8/dps8_eis.c effWORDNO = (uint) (address + (9u*CN + 9u*ARn_CHAR + 9u*r + ARn_BITNO) / 36); r 1895 src/dps8/dps8_eis.c word36 r = getMFReg36(cpup, MFk & 017, false, true, mod_fault); // disallow du, allow n,ic r 1900 src/dps8/dps8_eis.c address += r; r 1902 src/dps8/dps8_eis.c r = 0; r 1905 src/dps8/dps8_eis.c uint effBITNO = (9u*ARn_CHAR + r + ARn_BITNO + B + 9u*C) % 9u; r 1906 src/dps8/dps8_eis.c uint effCHAR = ((9u*ARn_CHAR + r + ARn_BITNO + B + 9u*C) % 36u) / 9u; r 1907 src/dps8/dps8_eis.c uint effWORDNO = (uint) (address + (9u*ARn_CHAR + r + ARn_BITNO + B + 9u*C) / 36u); r 1968 src/dps8/dps8_eis.c int32 r = SIGNEXT22_32 ((word22) ur); r 1994 src/dps8/dps8_eis.c int32_t addend = address * 8 + r; // in characters r 2049 src/dps8/dps8_eis.c int32 r = SIGNEXT22_32 ((word22) ur); r 2059 src/dps8/dps8_eis.c int32_t subtractend = address * 32 + r * 4; r 2096 src/dps8/dps8_eis.c int32_t r; r 2099 src/dps8/dps8_eis.c r = SIGNEXT24_32 ((word24) rcnt); r 2101 src/dps8/dps8_eis.c r = SIGNEXT22_32 ((word22) rcnt); r 2103 src/dps8/dps8_eis.c r = SIGNEXT21_32 ((word21) rcnt); r 2105 src/dps8/dps8_eis.c r = SIGNEXT21_32 ((word21) rcnt); r 2107 src/dps8/dps8_eis.c r = SIGNEXT18_32 ((word18) rcnt); r 2111 src/dps8/dps8_eis.c sz, ARn, address, reg, r); r 2143 src/dps8/dps8_eis.c int32_t addend = address * 36 + r * (int32_t) sz; r 2175 src/dps8/dps8_eis.c word24 r = getCrAR (cpup, (word4) reg) & MASK24; r 2193 src/dps8/dps8_eis.c word24 bits = 9u * GET_AR_CHAR (ARn) + GET_AR_BITNO (ARn) + r; r 2198 src/dps8/dps8_eis.c if (r % 36) r 2210 src/dps8/dps8_eis.c cpu.AR[ARn].WORDNO = (address + r / 36) & MASK18; r 2211 src/dps8/dps8_eis.c if (r % 36) r 2215 src/dps8/dps8_eis.c SET_AR_CHAR_BITNO (ARn, (r % 36) / 9, r 2216 src/dps8/dps8_eis.c r % 9); r 2242 src/dps8/dps8_eis.c r 2245 src/dps8/dps8_eis.c r 2247 src/dps8/dps8_eis.c r 2250 src/dps8/dps8_eis.c r 2288 src/dps8/dps8_eis.c r 2293 src/dps8/dps8_eis.c r 2296 src/dps8/dps8_eis.c r 2309 src/dps8/dps8_eis.c r 2314 src/dps8/dps8_eis.c r 2321 src/dps8/dps8_eis.c r 2326 src/dps8/dps8_eis.c r 2330 src/dps8/dps8_eis.c r 2385 src/dps8/dps8_eis.c int32_t r = (int32_t) (getCrAR (cpup, reg) & MASK18); r 2386 src/dps8/dps8_eis.c r = SIGNEXT18_32 ((word18) r); r 2390 src/dps8/dps8_eis.c ARn, address, reg, r); r 2408 src/dps8/dps8_eis.c int32_t addend = address + r; r 2429 src/dps8/dps8_eis.c word24 r = getCrAR (cpup, (word4) reg) & MASK24; r 2435 src/dps8/dps8_eis.c word24 bits = 9u * GET_AR_CHAR (ARn) + GET_AR_BITNO (ARn) - r; r 2438 src/dps8/dps8_eis.c if (r % 36) r 2446 src/dps8/dps8_eis.c cpu.AR[ARn].WORDNO = (- (address + r / 36)) & MASK18; r 2447 src/dps8/dps8_eis.c if (r % 36) r 2449 src/dps8/dps8_eis.c SET_AR_CHAR_BITNO (ARn, (- ((r % 36) / 9)) & MASK2, r 2450 src/dps8/dps8_eis.c (- (r % 9)) & MASK4); r 2468 src/dps8/dps8_eis.c int32_t r = (int32_t) (getCrAR (cpup, reg) & MASK18); r 2469 src/dps8/dps8_eis.c r = SIGNEXT18_32 ((word18) r); r 2473 src/dps8/dps8_eis.c ARn, address, reg, r); r 2490 src/dps8/dps8_eis.c int32_t subtractend = address + r; r 2514 src/dps8/dps8_eis.c word21 r = getCrAR (cpup, reg) & MASK21;; r 2516 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT|DBG_CAC, & cpu_dev, "s9bd r 0%o\r\n", r); r 2518 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT|DBG_CAC, & cpu_dev, "s9bd ARn 0%o address 0%o reg 0%o r 0%o\r\n", ARn, address, reg, r); r 2527 src/dps8/dps8_eis.c (GET_AR_CHAR (ARn) - r) / 4) & MASK18; r 2532 src/dps8/dps8_eis.c SET_AR_CHAR_BITNO (ARn, (GET_AR_CHAR (ARn) - r) & MASK2, 0); r 2537 src/dps8/dps8_eis.c cpu.AR[ARn].WORDNO = (- (address + (r + 3) / 4)) & MASK18; r 2541 src/dps8/dps8_eis.c SET_AR_CHAR_BITNO (ARn, (-r) & MASK2, 0); r 2807 src/dps8/dps8_eis.c uint r = 0; r 2810 src/dps8/dps8_eis.c r = (uint) (rcnt & MASK24); r 2812 src/dps8/dps8_eis.c r = (uint) (rcnt & MASK22); r 2814 src/dps8/dps8_eis.c r = (uint) (rcnt & MASK21); r 2816 src/dps8/dps8_eis.c r = (uint) (rcnt & MASK21); r 2818 src/dps8/dps8_eis.c r = (uint) (rcnt & MASK18); r 2820 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT|DBG_CAC, & cpu_dev, "asxbd sz %d ARn 0%o address 0%o reg 0%o r 0%o\r\n", sz, ARn, address, reg, r); r 2866 src/dps8/dps8_eis.c addend = address * 36u + (r * 9) / 2; r 2870 src/dps8/dps8_eis.c if ((! sub) && r % 2) // r is odd r 2874 src/dps8/dps8_eis.c addend = address * 36u + r * sz; r 9648 src/dps8/dps8_eis.c uint16_t r; r 9649 src/dps8/dps8_eis.c x = divide_128_16 (x, 10, & r); r 9650 src/dps8/dps8_eis.c tmp[i] = (char) r + '0'; r 12372 src/dps8/dps8_eis.c r 12505 src/dps8/dps8_eis.c r 12507 src/dps8/dps8_eis.c r 12508 src/dps8/dps8_eis.c r 12537 src/dps8/dps8_eis.c r 12538 src/dps8/dps8_eis.c r 12549 src/dps8/dps8_eis.c r 12550 src/dps8/dps8_eis.c r 12557 src/dps8/dps8_eis.c r 12570 src/dps8/dps8_eis.c r 12583 src/dps8/dps8_eis.c r 12589 src/dps8/dps8_eis.c r 12813 src/dps8/dps8_eis.c r 12820 src/dps8/dps8_eis.c r 12877 src/dps8/dps8_eis.c r 7532 src/dps8/dps8_ins.c cpu.MR.r = cpu.CY; r 7534 src/dps8/dps8_ins.c putbits36_1 (& cpu.MR.r, 32, 0); r 7536 src/dps8/dps8_ins.c putbits36_2 (& cpu.MR.r, 33, 0); r 7770 src/dps8/dps8_ins.c cpu.Ypair[0] = cpu.MR.r; r 379 src/dps8/dps8_math128.c int divmnu (uint16_t q[], uint16_t r[], r 402 src/dps8/dps8_math128.c if (r != NULL) r[0] = (uint16_t) k; r 465 src/dps8/dps8_math128.c if (r != NULL) r 468 src/dps8/dps8_math128.c r[i] = (uint16_t) (un[i] >> s) | (uint16_t) (un[i+1] << (16-s)); r 543 src/dps8/dps8_math128.c uint16_t r [8] = { 8 * 0 }; r 544 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, normlen); r 548 src/dps8/dps8_math128.c (((uint64_t) r [7]) << 48) | r 549 src/dps8/dps8_math128.c (((uint64_t) r [6]) << 32) | r 550 src/dps8/dps8_math128.c (((uint64_t) r [5]) << 16) | r 551 src/dps8/dps8_math128.c (((uint64_t) r [4]) << 0), r 552 src/dps8/dps8_math128.c (((uint64_t) r [3]) << 48) | r 553 src/dps8/dps8_math128.c (((uint64_t) r [2]) << 32) | r 554 src/dps8/dps8_math128.c (((uint64_t) r [1]) << 16) | r 555 src/dps8/dps8_math128.c (((uint64_t) r [0]) << 0)); r 609 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n], r[2]; r 624 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, n); r 626 src/dps8/dps8_math128.c * remp = r [0] | (uint32_t) r[1] << 16; r 643 src/dps8/dps8_math128.c bool r = iszero_128 (construct_128 (h, l)); r 645 src/dps8/dps8_math128.c if (r != expect) { r 648 src/dps8/dps8_math128.c (unsigned long long)h, (unsigned long long)l, (unsigned long)r); r 658 src/dps8/dps8_math128.c uint128 r = and_128 (a, b); r 660 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 664 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 674 src/dps8/dps8_math128.c uint128 r = or_128 (a, b); r 676 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 680 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 689 src/dps8/dps8_math128.c uint128 r = complement_128 (a); r 691 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 694 src/dps8/dps8_math128.c (unsigned long long)ah, (unsigned long long)al, (unsigned long long)r.h, r 695 src/dps8/dps8_math128.c (unsigned long long)r.l); r 705 src/dps8/dps8_math128.c uint128 r = add_128 (a, b); r 707 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 711 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 721 src/dps8/dps8_math128.c uint128 r = subtract_128 (a, b); r 723 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 727 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 736 src/dps8/dps8_math128.c uint128 r = negate_128 (a); r 738 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 741 src/dps8/dps8_math128.c (unsigned long long)ah, (unsigned long long)al, (unsigned long long)r.h, r 742 src/dps8/dps8_math128.c (unsigned long long)r.l); r 753 src/dps8/dps8_math128.c bool r = isgt_128 (a, b); r 754 src/dps8/dps8_math128.c if (r != expect) { r 758 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r); r 767 src/dps8/dps8_math128.c uint128 r = lshift_128 (a, n); r 769 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 773 src/dps8/dps8_math128.c (unsigned long long)r.h, (unsigned long long)r.l); r 782 src/dps8/dps8_math128.c uint128 r = rshift_128 (a, n); r 784 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 788 src/dps8/dps8_math128.c (unsigned long long)r.h, (unsigned long long)r.l); r 798 src/dps8/dps8_math128.c uint128 r = multiply_128 (a, b); r 800 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 804 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 814 src/dps8/dps8_math128.c int128 r = multiply_s128 (a, b); r 816 src/dps8/dps8_math128.c if (r.h != rh || r.l != rl) { r 820 src/dps8/dps8_math128.c (unsigned long long)bl, (unsigned long long)r.h, (unsigned long long)r.l); r 344 src/dps8/fnpuv.c int r = uv_tcp_getpeername((uv_tcp_t*)stream, (struct sockaddr*)&addr, &addrlen); r 345 src/dps8/fnpuv.c if (r == 0) r 931 src/dps8/fnpuv.c int r = uv_listen ((uv_stream_t *) & fnpData.du_server, DEFAULT_BACKLOG, r 933 src/dps8/fnpuv.c if (r) r 935 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: listen error: %s:%ld: %s]\r\n", telnet_address, (long) telnet_port, uv_strerror(r)); r 1225 src/dps8/fnpuv.c int r = uv_listen ((uv_stream_t *) & linep->server, DEFAULT_BACKLOG, r 1227 src/dps8/fnpuv.c if (r) r 1229 src/dps8/fnpuv.c sim_printf ("\r[FNP emulation: listen error: %s:%ld: %s]\r\n", fnpData.telnet_address, (long) linep->port, uv_strerror(r)); r 1568 src/dps8/fnpuv.c int r = uv_listen ((uv_stream_t *) & fnpData.du3270_server, DEFAULT_BACKLOG, r 1570 src/dps8/fnpuv.c if (r) r 1573 src/dps8/fnpuv.c fnpData.telnet_address, (long) telnet3270_port, uv_strerror(r)); r 88 src/dps8/hdbg.h # define HDBGRegZR(r, c) hdbgRegR (hreg_Z, (word36) r, c) r 89 src/dps8/hdbg.h # define HDBGRegZW(r, c) hdbgRegW (hreg_Z, (word36) r, c) r 838 src/dps8/panelScraper.c SETL (bank_d, 0+3, cpu.MR.r, 36); r 1175 src/dps8/panelScraper.c int r, c; r 1178 src/dps8/panelScraper.c for (r = 0; r < 0 + 8; r ++) r 1184 src/dps8/panelScraper.c unsigned char fontbits = font8x8_basic [(unsigned int) message [(unsigned int) char2]] [r]; r 1187 src/dps8/panelScraper.c banks [r + start_row] [c] = !!bit1; r 731 src/dps8/uvutil.c int r = uv_listen ((uv_stream_t *) & access->server, r 734 src/dps8/uvutil.c if (r) r 737 src/dps8/uvutil.c access->address, (long) access->port, uv_strerror(r)); r 575 src/libsir/include/sir.h sir_textcolor sir_makergb(sir_textcolor r, sir_textcolor g, sir_textcolor b); r 310 src/libsir/include/sir/helpers.h sir_textcolor _sir_makergb(sir_textcolor r, sir_textcolor g, sir_textcolor b) { r 312 src/libsir/include/sir/helpers.h _sir_setredincolor(retval, r); r 185 src/libsir/src/sir.c sir_textcolor sir_makergb(sir_textcolor r, sir_textcolor g, sir_textcolor b) { r 186 src/libsir/src/sir.c return _sir_makergb(r, g, b); r 346 src/libsir/src/sirhelpers.c const char* r; r 349 src/libsir/src/sirhelpers.c if (*sub && (r = strstr(str, sub)) != NULL) { r 353 src/libsir/src/sirhelpers.c q = str + (r - str); r 355 src/libsir/src/sirhelpers.c while ((r = strstr(p = r + len, sub)) != NULL) r 356 src/libsir/src/sirhelpers.c while (p < r) r 357 src/prt2pdf/prt2pdf.c float r = (float)r_val / 255.0f; r 361 src/prt2pdf/prt2pdf.c (void)fprintf (stdout, "%f %f %f rg\n", r, g, b); r 367 src/prt2pdf/prt2pdf.c float r, g, b; r 368 src/prt2pdf/prt2pdf.c r = GLOBAL_GRAY_SCALE + (1.0 - GLOBAL_GRAY_SCALE) * 0.60; r 371 src/prt2pdf/prt2pdf.c (void)fprintf (stdout, "%f %f %f rg\n", r, g, b); /* green */ r 1190 src/prt2pdf/prt2pdf.c int r = next_utf8_cp (s, len, & i, & cp); r 1191 src/prt2pdf/prt2pdf.c if (r <= 0) r 2291 src/punutil/miniz.c switch (r->m_state) \ r 2298 src/punutil/miniz.c r->m_state = state_index; \ r 2426 src/punutil/miniz.c static void tinfl_clear_tree(tinfl_decompressor *r) r 2428 src/punutil/miniz.c if (r->m_type == 0) r 2429 src/punutil/miniz.c MZ_CLEAR_ARR(r->m_tree_0); r 2430 src/punutil/miniz.c else if (r->m_type == 1) r 2431 src/punutil/miniz.c MZ_CLEAR_ARR(r->m_tree_1); r 2433 src/punutil/miniz.c MZ_CLEAR_ARR(r->m_tree_2); r 2436 src/punutil/miniz.c tinfl_status tinfl_decompress(tinfl_decompressor *r, const mz_uint8 *pIn_buf_next, size_t *pIn_buf_size, mz_uint8 *pOut_buf_start, mz_uint8 *pOut_buf_next, size_t *pOut_buf_size, const mz_uint32 decomp_flags) r 2462 src/punutil/miniz.c pTrees[0] = r->m_tree_0; r 2463 src/punutil/miniz.c pTrees[1] = r->m_tree_1; r 2464 src/punutil/miniz.c pTrees[2] = r->m_tree_2; r 2465 src/punutil/miniz.c pCode_sizes[0] = r->m_code_size_0; r 2466 src/punutil/miniz.c pCode_sizes[1] = r->m_code_size_1; r 2467 src/punutil/miniz.c pCode_sizes[2] = r->m_code_size_2; r 2469 src/punutil/miniz.c num_bits = r->m_num_bits; r 2470 src/punutil/miniz.c bit_buf = r->m_bit_buf; r 2471 src/punutil/miniz.c dist = r->m_dist; r 2472 src/punutil/miniz.c counter = r->m_counter; r 2473 src/punutil/miniz.c num_extra = r->m_num_extra; r 2474 src/punutil/miniz.c dist_from_out_buf_start = r->m_dist_from_out_buf_start; r 2477 src/punutil/miniz.c bit_buf = num_bits = dist = counter = num_extra = r->m_zhdr0 = r->m_zhdr1 = 0; r 2478 src/punutil/miniz.c r->m_z_adler32 = r->m_check_adler32 = 1; r 2481 src/punutil/miniz.c TINFL_GET_BYTE(1, r->m_zhdr0); r 2482 src/punutil/miniz.c TINFL_GET_BYTE(2, r->m_zhdr1); r 2483 src/punutil/miniz.c counter = (((r->m_zhdr0 * 256 + r->m_zhdr1) % 31 != 0) || (r->m_zhdr1 & 32) || ((r->m_zhdr0 & 15) != 8)); r 2485 src/punutil/miniz.c counter |= (((1U << (8U + (r->m_zhdr0 >> 4))) > 32768U) || ((out_buf_size_mask + 1) < (size_t)((size_t)1 << (8U + (r->m_zhdr0 >> 4))))); r 2494 src/punutil/miniz.c TINFL_GET_BITS(3, r->m_final, 3); r 2495 src/punutil/miniz.c r->m_type = r->m_final >> 1; r 2496 src/punutil/miniz.c if (r->m_type == 0) r 2502 src/punutil/miniz.c TINFL_GET_BITS(6, r->m_raw_header[counter], 8); r 2504 src/punutil/miniz.c TINFL_GET_BYTE(7, r->m_raw_header[counter]); r 2506 src/punutil/miniz.c if ((counter = (r->m_raw_header[0] | (r->m_raw_header[1] << 8))) != (mz_uint)(0xFFFF ^ (r->m_raw_header[2] | (r->m_raw_header[3] << 8)))) r 2538 src/punutil/miniz.c else if (r->m_type == 3) r 2544 src/punutil/miniz.c if (r->m_type == 1) r 2546 src/punutil/miniz.c mz_uint8 *p = r->m_code_size_0; r 2548 src/punutil/miniz.c r->m_table_sizes[0] = 288; r 2549 src/punutil/miniz.c r->m_table_sizes[1] = 32; r 2550 src/punutil/miniz.c TINFL_MEMSET(r->m_code_size_1, 5, 32); r 2564 src/punutil/miniz.c TINFL_GET_BITS(11, r->m_table_sizes[counter], "\05\05\04"[counter]); r 2565 src/punutil/miniz.c r->m_table_sizes[counter] += s_min_table_sizes[counter]; r 2567 src/punutil/miniz.c MZ_CLEAR_ARR(r->m_code_size_2); r 2568 src/punutil/miniz.c for (counter = 0; counter < r->m_table_sizes[2]; counter++) r 2572 src/punutil/miniz.c r->m_code_size_2[s_length_dezigzag[counter]] = (mz_uint8)s; r 2574 src/punutil/miniz.c r->m_table_sizes[2] = 19; r 2576 src/punutil/miniz.c for (; (int)r->m_type >= 0; r->m_type--) r 2583 src/punutil/miniz.c pLookUp = r->m_look_up[r->m_type]; r 2584 src/punutil/miniz.c pTree = pTrees[r->m_type]; r 2585 src/punutil/miniz.c pCode_size = pCode_sizes[r->m_type]; r 2587 src/punutil/miniz.c TINFL_MEMSET(pLookUp, 0, sizeof(r->m_look_up[0])); r 2588 src/punutil/miniz.c tinfl_clear_tree(r); r 2589 src/punutil/miniz.c for (i = 0; i < r->m_table_sizes[r->m_type]; ++i) r 2602 src/punutil/miniz.c for (tree_next = -1, sym_index = 0; sym_index < r->m_table_sizes[r->m_type]; ++sym_index) r 2642 src/punutil/miniz.c if (r->m_type == 2) r 2644 src/punutil/miniz.c for (counter = 0; counter < (r->m_table_sizes[0] + r->m_table_sizes[1]);) r 2647 src/punutil/miniz.c TINFL_HUFF_DECODE(16, dist, r->m_look_up[2], r->m_tree_2); r 2650 src/punutil/miniz.c r->m_len_codes[counter++] = (mz_uint8)dist; r 2660 src/punutil/miniz.c TINFL_MEMSET(r->m_len_codes + counter, (dist == 16) ? r->m_len_codes[counter - 1] : 0, s); r 2663 src/punutil/miniz.c if ((r->m_table_sizes[0] + r->m_table_sizes[1]) != counter) r 2667 src/punutil/miniz.c TINFL_MEMCPY(r->m_code_size_0, r->m_len_codes, r->m_table_sizes[0]); r 2668 src/punutil/miniz.c TINFL_MEMCPY(r->m_code_size_1, r->m_len_codes + r->m_table_sizes[0], r->m_table_sizes[1]); r 2678 src/punutil/miniz.c TINFL_HUFF_DECODE(23, counter, r->m_look_up[0], r->m_tree_0); r 2706 src/punutil/miniz.c if ((sym2 = r->m_look_up[0][bit_buf & (TINFL_FAST_LOOKUP_SIZE - 1)]) >= 0) r 2713 src/punutil/miniz.c sym2 = r->m_tree_0[~sym2 + ((bit_buf >> code_len++) & 1)]; r 2734 src/punutil/miniz.c if ((sym2 = r->m_look_up[0][bit_buf & (TINFL_FAST_LOOKUP_SIZE - 1)]) >= 0) r 2741 src/punutil/miniz.c sym2 = r->m_tree_0[~sym2 + ((bit_buf >> code_len++) & 1)]; r 2774 src/punutil/miniz.c TINFL_HUFF_DECODE(26, dist, r->m_look_up[1], r->m_tree_1); r 2849 src/punutil/miniz.c } while (!(r->m_final & 1)); r 2871 src/punutil/miniz.c r->m_z_adler32 = (r->m_z_adler32 << 8) | s; r 2890 src/punutil/miniz.c r->m_num_bits = num_bits; r 2891 src/punutil/miniz.c r->m_bit_buf = bit_buf & ~(~(tinfl_bit_buf_t)0 << num_bits); r 2892 src/punutil/miniz.c r->m_dist = dist; r 2893 src/punutil/miniz.c r->m_counter = counter; r 2894 src/punutil/miniz.c r->m_num_extra = num_extra; r 2895 src/punutil/miniz.c r->m_dist_from_out_buf_start = dist_from_out_buf_start; r 2902 src/punutil/miniz.c mz_uint32 i, s1 = r->m_check_adler32 & 0xffff, s2 = r->m_check_adler32 >> 16; r 2923 src/punutil/miniz.c r->m_check_adler32 = (s2 << 16) + s1; r 2924 src/punutil/miniz.c if ((status == TINFL_STATUS_DONE) && (decomp_flags & TINFL_FLAG_PARSE_ZLIB_HEADER) && (r->m_check_adler32 != r->m_z_adler32)) r 3554 src/punutil/miniz.c mz_uint8 l = 0, r = 0; r 3560 src/punutil/miniz.c if ((l = MZ_TOLOWER(*pL)) != (r = MZ_TOLOWER(*pR))) r 3565 src/punutil/miniz.c return (pL == pE) ? (l_len < r_len) : (l < r); r 4443 src/punutil/miniz.c mz_uint8 l = 0, r = 0; r 4448 src/punutil/miniz.c if ((l = MZ_TOLOWER(*pL)) != (r = MZ_TOLOWER(*pR))) r 4453 src/punutil/miniz.c return (pL == pE) ? (int)(l_len - r_len) : (l - r); r 1000 src/punutil/miniz.h # define tinfl_init(r) \ r 1003 src/punutil/miniz.h (r)->m_state = 0; \ r 1006 src/punutil/miniz.h # define tinfl_get_adler32(r) (r)->m_check_adler32 r 1010 src/punutil/miniz.h MINIZ_EXPORT tinfl_status tinfl_decompress(tinfl_decompressor *r, const mz_uint8 *pIn_buf_next, size_t *pIn_buf_size, mz_uint8 *pOut_buf_start, mz_uint8 *pOut_buf_next, size_t *pOut_buf_size, const mz_uint32 decomp_flags); r 361 src/simh/scp.c void fprint_stopped (FILE *st, t_stat r); r 1403 src/simh/scp.c int r; r 1406 src/simh/scp.c r = _putenv(envstr); r 1408 src/simh/scp.c return r; r 1475 src/simh/scp.c char *p, *q, *r; r 1476 src/simh/scp.c if (*sub && (q = r = strstr(str, sub)) != NULL) { r 1478 src/simh/scp.c while ((r = strstr(p = r + len, sub)) != NULL) { r 1479 src/simh/scp.c while (p < r) r 2854 src/simh/scp.c t_stat r; r 2860 src/simh/scp.c r = help_dev_help (stdout, dptr, uptr, flag, (cmdp->action == &set_cmd) ? "SET" : "SHOW"); r 2863 src/simh/scp.c return r; r 2944 src/simh/scp.c t_stat r; r 2953 src/simh/scp.c r = help_dev_help (stdout, dptr, uptr, flag, cptr); r 2956 src/simh/scp.c return r; r 3690 src/simh/scp.c t_stat r; r 3696 src/simh/scp.c cptr = (CONST char *)get_sim_opt (CMD_OPT_SW|CMD_OPT_DFT, (CONST char *)cptr, &r); r 3860 src/simh/scp.c t_stat r; r 3866 src/simh/scp.c r = tmxr_locate_line_send (gbuf, &snd); r 3867 src/simh/scp.c if (r != SCPE_OK) r 3868 src/simh/scp.c return r; r 3877 src/simh/scp.c delay = (uint32)get_uint (&gbuf[6], 10, 2000000000, &r); r 3878 src/simh/scp.c if (r != SCPE_OK) r 3885 src/simh/scp.c after = (uint32)get_uint (&gbuf[6], 10, 2000000000, &r); r 3886 src/simh/scp.c if (r != SCPE_OK) r 3915 src/simh/scp.c t_stat r; r 3920 src/simh/scp.c r = tmxr_locate_line_send (gbuf, &snd); r 3921 src/simh/scp.c if (r != SCPE_OK) r 3922 src/simh/scp.c return r; r 3961 src/simh/scp.c t_stat r; r 3965 src/simh/scp.c r = tmxr_locate_line_expect (gbuf, &exp); r 3966 src/simh/scp.c if (r != SCPE_OK) r 3967 src/simh/scp.c return r; r 4238 src/simh/scp.c t_stat r; r 4321 src/simh/scp.c r = mptr->valid (uptr, mptr->match, cvptr, mptr->desc); r 4322 src/simh/scp.c if (r != SCPE_OK) r 4323 src/simh/scp.c return r; r 4337 src/simh/scp.c ((r = mptr->valid (uptr, mptr->match, cvptr, mptr->desc)) != SCPE_OK)) r 4338 src/simh/scp.c return r; r 4347 src/simh/scp.c r = glbr->action (dptr, uptr, glbr->arg, cvptr); /* do global */ r 4348 src/simh/scp.c if (r != SCPE_OK) r 4349 src/simh/scp.c return r; r 4482 src/simh/scp.c t_stat r = SCPE_IERR; r 4484 src/simh/scp.c cptr = get_sim_opt (CMD_OPT_SW|CMD_OPT_OF, cptr, &r); r 4487 src/simh/scp.c return r; r 4489 src/simh/scp.c r = show_cmd_fi (sim_ofile, flag, cptr); /* do show */ r 4493 src/simh/scp.c r = show_cmd_fi (stdout, flag, cptr); /* no, stdout, log */ r 4499 src/simh/scp.c return r; r 4586 src/simh/scp.c t_stat r; r 4588 src/simh/scp.c r = shptr->action (ofile, dptr, uptr, shptr->arg, cptr); r 4589 src/simh/scp.c if (r != SCPE_OK) r 4590 src/simh/scp.c return r; r 5843 src/simh/scp.c t_stat r; r 5846 src/simh/scp.c r = ssh_break (st, cptr, 1); /* more? */ r 5848 src/simh/scp.c r = sim_brk_showall (st, (uint32)sim_switches); r 5849 src/simh/scp.c return r; r 5941 src/simh/scp.c t_stat r = SCPE_OK; r 5954 src/simh/scp.c if (r == SCPE_OK) r 5956 src/simh/scp.c r = show_one_mod (st, dptr, uptr, mptr, NULL, 0); r 5965 src/simh/scp.c t_stat r = SCPE_OK; r 5968 src/simh/scp.c r = mptr->disp (st, uptr, mptr->match, (CONST void *)(cptr? cptr: mptr->desc)); r 5971 src/simh/scp.c if ((r == SCPE_OK) && (flag && !((mptr->mask & MTAB_XTD) && MODMASK(mptr,MTAB_NMO)))) r 5973 src/simh/scp.c return r; r 6012 src/simh/scp.c t_stat r; r 6061 src/simh/scp.c r = ssh_break_one (st, flg, lo, cnt, aptr); r 6062 src/simh/scp.c if (r != SCPE_OK) r 6063 src/simh/scp.c return r; r 6166 src/simh/scp.c t_stat r; r 6170 src/simh/scp.c r = reset_all (start); r 6172 src/simh/scp.c return r; r 6182 src/simh/scp.c t_stat r; r 6199 src/simh/scp.c r = scp_detach_unit (dptr, uptr); /* detach it */ r 6200 src/simh/scp.c if (r != SCPE_OK) /* error? */ r 6201 src/simh/scp.c return r; } r 6365 src/simh/scp.c t_stat r; r 6377 src/simh/scp.c r = scp_detach_unit (dptr, uptr); /* detach unit */ r 6379 src/simh/scp.c if ((r != SCPE_OK) && !shutdown) /* error and not shutting down? */ r 6380 src/simh/scp.c return r; /* bail out now with error status */ r 6472 src/simh/scp.c t_stat r; r 6493 src/simh/scp.c ((r = sim_run_boot_prep (flag)) != SCPE_OK)) { /* reset sim */ r 6495 src/simh/scp.c return r; r 6508 src/simh/scp.c r = expect_cmd (1, cptr); r 6509 src/simh/scp.c if (r != SCPE_OK) r 6510 src/simh/scp.c return r; r 6517 src/simh/scp.c r = ssh_break (NULL, cptr, SSH_ST); r 6518 src/simh/scp.c if (r != SCPE_OK) r 6519 src/simh/scp.c return sim_messagef (r, "Unable to establish breakpoint at: %s\r\n", cptr); r 6537 src/simh/scp.c sim_step = (int32) get_uint (gbuf, 10, INT_MAX, &r); r 6538 src/simh/scp.c if ((r != SCPE_OK) || (sim_step <= 0)) /* error? */ r 6552 src/simh/scp.c sim_next = (int32) get_uint (gbuf, 10, INT_MAX, &r); r 6553 src/simh/scp.c if ((r != SCPE_OK) || (sim_next <= 0)) /* error? */ r 6584 src/simh/scp.c if ((r = sim_run_boot_prep (flag)) != SCPE_OK) /* reset sim */ r 6585 src/simh/scp.c return r; r 6586 src/simh/scp.c if ((r = dptr->boot (unitno, dptr)) != SCPE_OK) /* boot device */ r 6587 src/simh/scp.c return r; r 6614 src/simh/scp.c if ((r = sim_check_console (30)) != SCPE_OK) { /* check console, error? */ r 6617 src/simh/scp.c return r; r 6658 src/simh/scp.c r = sim_instr(); r 6659 src/simh/scp.c if (r != SCPE_REMOTE) r 6670 src/simh/scp.c if (SCPE_BARE_STATUS(r) >= SCPE_BASE) /* done if an error occurred */ r 6681 src/simh/scp.c if (r != SCPE_STEP) /* done if step didn't complete with step expired */ r 6728 src/simh/scp.c return r | ((sim_switches & SWMASK ('Q')) ? SCPE_NOMESSAGE : 0); r 6734 src/simh/scp.c run_cmd_message (const char *unechoed_cmdline, t_stat r) r 6736 src/simh/scp.c if (unechoed_cmdline && (r >= SCPE_BASE) && (r != SCPE_STEP) && (r != SCPE_STOP) && (r != SCPE_EXPECT)) r 6742 src/simh/scp.c fprint_stopped (stdout, r); /* print msg */ r 6744 src/simh/scp.c fprint_stopped (sim_log, r); r 6746 src/simh/scp.c fprint_stopped (sim_deb, r); r 6758 src/simh/scp.c t_stat r; r 6767 src/simh/scp.c r = reset_all (0); r 6768 src/simh/scp.c if ((r == SCPE_OK) && (flag == RU_RUN)) { r 6775 src/simh/scp.c return r; r 6788 src/simh/scp.c t_stat r = 0; r 6815 src/simh/scp.c if ((r = dptr->examine (&sim_eval[i], k, dptr->units, SWMASK ('V')|SIM_SW_STOP)) != SCPE_OK) r 6818 src/simh/scp.c if ((r == SCPE_OK) || (i > 0)) { r 7182 src/simh/scp.c t_stat r; r 7212 src/simh/scp.c val = get_uint (cptr, rdx, mask, &r); r 7213 src/simh/scp.c if (r != SCPE_OK) r 7405 src/simh/scp.c t_stat r, reason; r 7437 src/simh/scp.c r = dptr->deposit (sim_eval[i], j, uptr, sim_switches); r 7438 src/simh/scp.c if (r != SCPE_OK) r 7439 src/simh/scp.c return r; r 7476 src/simh/scp.c t_stat r; r 7484 src/simh/scp.c if ((r = parse_sym ((CONST char *)cptr, 0, dptr->units, sim_eval, sim_switches)) > 0) { r 7485 src/simh/scp.c sim_eval[0] = get_uint (cptr, rdx, width_mask[dptr->dwidth], &r); r 7486 src/simh/scp.c if (r != SCPE_OK) r 7487 src/simh/scp.c return r; r 7489 src/simh/scp.c lim = 1 - r; r 7492 src/simh/scp.c if ((r = fprint_sym (stdout, a, &sim_eval[i], dptr->units, sim_switches)) > 0) r 7493 src/simh/scp.c r = fprint_val (stdout, sim_eval[i], rdx, dptr->dwidth, PV_RZRO); r 7495 src/simh/scp.c if ((r = fprint_sym (sim_log, a, &sim_eval[i], dptr->units, sim_switches)) > 0) r 7496 src/simh/scp.c r = fprint_val (sim_log, sim_eval[i], rdx, dptr->dwidth, PV_RZRO); r 7499 src/simh/scp.c if (r < 0) r 7500 src/simh/scp.c a = a + 1 - r; r 8059 src/simh/scp.c t_stat r; r 8084 src/simh/scp.c u = (uint32) get_uint (tptr, 10, dptr->numunits - 1, &r); r 8085 src/simh/scp.c if (r != SCPE_OK) /* error? */ r 9784 src/simh/scp.c t_stat r; r 9802 src/simh/scp.c after = (uint32)get_uint (&gbuf[10], 10, 2000000000, &r); r 9803 src/simh/scp.c if (r != SCPE_OK) r 11630 src/simh/scp.c t_stat r; r 11634 src/simh/scp.c r = scp_vhelp (st, dptr, uptr, flag, help, cptr, ap); r 11637 src/simh/scp.c return r; r 80 src/simh/scp.h void run_cmd_message (const char *unechod_cmdline, t_stat r); r 288 src/simh/sim_console.c t_stat r; r 298 src/simh/sim_console.c r = ctptr->action (ctptr->arg, cvptr); /* do the rest */ r 299 src/simh/sim_console.c if (r != SCPE_OK) r 300 src/simh/sim_console.c return r; r 377 src/simh/sim_console.c t_stat r; r 387 src/simh/sim_console.c r = ctptr->action (ctptr->arg, cvptr); /* do the rest */ r 388 src/simh/sim_console.c if (r != SCPE_OK) r 389 src/simh/sim_console.c return r; r 560 src/simh/sim_console.c t_stat r; r 563 src/simh/sim_console.c r = help_cmd (flag, cptr); r 565 src/simh/sim_console.c return r; r 1072 src/simh/sim_console.c t_stat r; r 1075 src/simh/sim_console.c r = sim_parse_addr (cptr, NULL, 0, NULL, NULL, 0, NULL, NULL); r 1076 src/simh/sim_console.c if (r == SCPE_OK) { r 1083 src/simh/sim_console.c r = tmxr_attach (&sim_rem_con_tmxr, &sim_rem_con_unit[0], cptr);/* open master socket */ r 1084 src/simh/sim_console.c if (r == SCPE_OK) r 1086 src/simh/sim_console.c return r; r 1110 src/simh/sim_console.c t_stat r; r 1115 src/simh/sim_console.c lines = (int32) get_uint (cptr, 10, MAX_REMOTE_SESSIONS, &r); r 1116 src/simh/sim_console.c if (r != SCPE_OK) r 1117 src/simh/sim_console.c return r; r 1227 src/simh/sim_console.c t_stat r; r 1231 src/simh/sim_console.c timeout = (int32) get_uint (cptr, 10, 3600, &r); r 1232 src/simh/sim_console.c if (r != SCPE_OK) r 1233 src/simh/sim_console.c return r; r 1247 src/simh/sim_console.c t_stat r; r 1253 src/simh/sim_console.c val = (int32) get_uint (cptr, rdx, 0177, &r); //-V536 r 1254 src/simh/sim_console.c if ((r != SCPE_OK) || r 1277 src/simh/sim_console.c t_stat r; r 1283 src/simh/sim_console.c val = (uint32) get_uint (cptr, rdx, 0xFFFFFFFF, &r); r 1284 src/simh/sim_console.c if ((r != SCPE_OK) || r 1314 src/simh/sim_console.c t_stat r; r 1323 src/simh/sim_console.c r = sim_open_logfile (gbuf, (sim_switches & SWMASK ('B')) == SWMASK ('B'), r 1325 src/simh/sim_console.c if (r != SCPE_OK) /* error? */ r 1326 src/simh/sim_console.c return r; r 1371 src/simh/sim_console.c t_stat r; r 1380 src/simh/sim_console.c r = sim_open_logfile (gbuf, FALSE, &sim_deb, &sim_deb_ref); r 1382 src/simh/sim_console.c if (r != SCPE_OK) r 1383 src/simh/sim_console.c return r; r 1504 src/simh/sim_console.c t_stat r; r 1514 src/simh/sim_console.c r = ctptr->action (ctptr->arg, cvptr); /* do the rest */ r 1515 src/simh/sim_console.c if (r != SCPE_OK) r 1516 src/simh/sim_console.c return r; r 1521 src/simh/sim_console.c r = tmxr_attach (&sim_con_tmxr, &sim_con_unit, gbuf);/* open master socket */ r 1522 src/simh/sim_console.c if (r == SCPE_OK) r 1525 src/simh/sim_console.c return r; r 2455 src/simh/sim_console.c t_stat r; r 2460 src/simh/sim_console.c val = (int32) get_uint (cptr, 10, INT_MAX, &r); /* parse the argument */ r 2462 src/simh/sim_console.c if (r == SCPE_OK) /* parse OK? */ r 2465 src/simh/sim_console.c return r; r 161 src/simh/sim_disk.c t_stat r; r 168 src/simh/sim_disk.c cap = (t_offset) get_uint (cptr, 10, 2000000, &r); r 169 src/simh/sim_disk.c if (r != SCPE_OK) r 214 src/simh/sim_disk.c t_bool r = FALSE; r 215 src/simh/sim_disk.c r = sim_disk_isavailable (uptr); r 216 src/simh/sim_disk.c return r; r 270 src/simh/sim_disk.c t_stat r; r 316 src/simh/sim_disk.c r = _sim_disk_rdsect (uptr, tlba, tbuf, &sread, tsects); r 322 src/simh/sim_disk.c if (r == SCPE_OK) { r 331 src/simh/sim_disk.c return r; r 337 src/simh/sim_disk.c t_stat r = SCPE_OK; r 338 src/simh/sim_disk.c r = sim_disk_rdsect (uptr, lba, buf, sectsread, sects); r 339 src/simh/sim_disk.c return r; r 372 src/simh/sim_disk.c t_stat r; r 429 src/simh/sim_disk.c r = SCPE_NOFNC; r 449 src/simh/sim_disk.c r = SCPE_NOFNC; r 456 src/simh/sim_disk.c r = SCPE_NOFNC; r 463 src/simh/sim_disk.c r = SCPE_NOFNC; r 473 src/simh/sim_disk.c return r; r 478 src/simh/sim_disk.c t_stat r = SCPE_OK; r 479 src/simh/sim_disk.c r = sim_disk_wrsect (uptr, lba, buf, sectswritten, sects); r 480 src/simh/sim_disk.c return r; r 881 src/simh/sim_disk.c t_stat r = SCPE_OK; r 884 src/simh/sim_disk.c r = SCPE_MEM; r 885 src/simh/sim_disk.c if (r == SCPE_OK) r 886 src/simh/sim_disk.c r = sim_disk_wrsect (uptr, r 889 src/simh/sim_disk.c if (r == SCPE_OK) r 890 src/simh/sim_disk.c r = sim_disk_wrsect (uptr, (t_lba)(0), secbuf, NULL, 1); /* Write First Sector */ r 892 src/simh/sim_disk.c if (r != SCPE_OK) { r 910 src/simh/sim_disk.c for (lba = 0; (lba < total_sectors) && (r == SCPE_OK); lba += sects) { r 919 src/simh/sim_disk.c r = sim_disk_wrsect (uptr, lba, init_buf, NULL, sects); r 920 src/simh/sim_disk.c if (r != SCPE_OK) { r 941 src/simh/sim_disk.c t_stat r = SCPE_OK; r 953 src/simh/sim_disk.c for (lba = 0; (lba < total_sectors) && (r == SCPE_OK); lba += sects) { r 957 src/simh/sim_disk.c r = sim_disk_rdsect (uptr, lba, verify_buf, NULL, sects); r 958 src/simh/sim_disk.c if (r == SCPE_OK) { r 808 src/simh/sim_sock.c int r; r 812 src/simh/sim_sock.c r = sim_parse_addr (hostport, host, sizeof(host), NULL, port, sizeof(port), NULL, NULL); r 814 src/simh/sim_sock.c *parse_status = r; r 815 src/simh/sim_sock.c if (r) r 154 src/simh/sim_tape.c t_stat r; r 170 src/simh/sim_tape.c r = attach_unit (uptr, (CONST char *)cptr); /* attach unit */ r 171 src/simh/sim_tape.c if (r != SCPE_OK) /* error? */ r 172 src/simh/sim_tape.c return sim_messagef (r, "Can't open tape image: %s\r\n", cptr); r 238 src/simh/sim_tape.c t_stat r; r 255 src/simh/sim_tape.c r = detach_unit (uptr); /* detach unit */ r 256 src/simh/sim_tape.c if (r != SCPE_OK) r 257 src/simh/sim_tape.c return r; r 411 src/simh/sim_tape.c t_stat r = MTSE_OK; r 442 src/simh/sim_tape.c r = MTSE_RUNAWAY; /* then report a tape runaway */ r 444 src/simh/sim_tape.c r = MTSE_EOM; /* as the end-of-medium */ r 464 src/simh/sim_tape.c r = sim_tape_ioerr (uptr); /* report the error and quit */ r 472 src/simh/sim_tape.c r = MTSE_EOM; /* and report the end-of-medium and quit */ r 478 src/simh/sim_tape.c r = MTSE_RUNAWAY; /* then report a tape runaway */ r 480 src/simh/sim_tape.c r = MTSE_EOM; /* as the end-of-medium */ r 492 src/simh/sim_tape.c r = MTSE_RUNAWAY; /* then report a tape runaway */ r 494 src/simh/sim_tape.c r = MTSE_EOM; /* as the end-of-medium */ r 501 src/simh/sim_tape.c r = MTSE_TMK; /* then quit with tape mark status */ r 528 src/simh/sim_tape.c if (r == MTSE_OK && runaway_counter <= 0) /* if a tape runaway occurred */ r 529 src/simh/sim_tape.c r = MTSE_RUNAWAY; /* then report it */ r 542 src/simh/sim_tape.c r = MTSE_EOM; r 547 src/simh/sim_tape.c r = MTSE_TMK; r 572 src/simh/sim_tape.c r = MTSE_TMK; r 580 src/simh/sim_tape.c (long long)r, (long long)*bc, uptr->pos); r 582 src/simh/sim_tape.c return r; r 626 src/simh/sim_tape.c t_stat r = MTSE_OK; r 659 src/simh/sim_tape.c r = MTSE_BOT; /* then quit with an error */ r 676 src/simh/sim_tape.c r = sim_tape_ioerr (uptr); /* report the error and quit */ r 693 src/simh/sim_tape.c r = MTSE_TMK; /* then quit with tape mark status */ r 719 src/simh/sim_tape.c if (r == MTSE_OK && runaway_counter <= 0) /* if a tape runaway occurred */ r 720 src/simh/sim_tape.c r = MTSE_RUNAWAY; /* then report it */ r 732 src/simh/sim_tape.c r = MTSE_EOM; r 737 src/simh/sim_tape.c r = MTSE_TMK; r 750 src/simh/sim_tape.c r = MTSE_EOM; r 762 src/simh/sim_tape.c r = MTSE_TMK; r 769 src/simh/sim_tape.c (long long)r, (long long)*bc, uptr->pos); r 770 src/simh/sim_tape.c return r; r 832 src/simh/sim_tape.c t_stat r = SCPE_OK; r 833 src/simh/sim_tape.c r = sim_tape_rdrecf (uptr, buf, bc, max); r 834 src/simh/sim_tape.c return r; r 889 src/simh/sim_tape.c t_stat r = SCPE_OK; r 890 src/simh/sim_tape.c r = sim_tape_rdrecr (uptr, buf, bc, max); r 891 src/simh/sim_tape.c return r; r 965 src/simh/sim_tape.c t_stat r = SCPE_OK; r 966 src/simh/sim_tape.c r = sim_tape_wrrecf (uptr, buf, bc); r 967 src/simh/sim_tape.c return r; r 1013 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1014 src/simh/sim_tape.c r = sim_tape_wrtmk (uptr); r 1015 src/simh/sim_tape.c return r; r 1041 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1042 src/simh/sim_tape.c r = sim_tape_wreom (uptr); r 1043 src/simh/sim_tape.c return r; r 1051 src/simh/sim_tape.c t_stat r; r 1058 src/simh/sim_tape.c r = sim_tape_wrdata (uptr, MTR_EOM); r 1059 src/simh/sim_tape.c if (r == MTSE_OK) r 1060 src/simh/sim_tape.c r = sim_tape_rewind (uptr); r 1061 src/simh/sim_tape.c return r; r 1066 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1067 src/simh/sim_tape.c r = sim_tape_wreomrw (uptr); r 1068 src/simh/sim_tape.c return r; r 1323 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1324 src/simh/sim_tape.c return r; r 1362 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1363 src/simh/sim_tape.c r = sim_tape_sprecf (uptr, bc); r 1364 src/simh/sim_tape.c return r; r 1409 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1410 src/simh/sim_tape.c r = sim_tape_sprecsf (uptr, count, skipped); r 1411 src/simh/sim_tape.c return r; r 1454 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1455 src/simh/sim_tape.c r = sim_tape_sprecr (uptr, bc); r 1456 src/simh/sim_tape.c return r; r 1502 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1503 src/simh/sim_tape.c r = sim_tape_sprecsr (uptr, count, skipped); r 1504 src/simh/sim_tape.c return r; r 1576 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1577 src/simh/sim_tape.c r = sim_tape_spfilebyrecf \ r 1579 src/simh/sim_tape.c return r; r 1616 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1617 src/simh/sim_tape.c r = sim_tape_spfilef (uptr, count, skipped); r 1618 src/simh/sim_tape.c return r; r 1672 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1673 src/simh/sim_tape.c r = sim_tape_spfilebyrecr (uptr, count, skipped, recsskipped); r 1674 src/simh/sim_tape.c return r; r 1712 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1713 src/simh/sim_tape.c r = sim_tape_spfiler (uptr, count, skipped); r 1714 src/simh/sim_tape.c return r; r 1735 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1736 src/simh/sim_tape.c r = sim_tape_rewind (uptr); r 1737 src/simh/sim_tape.c return r; r 1746 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1755 src/simh/sim_tape.c r = sim_tape_rewind (uptr); r 1756 src/simh/sim_tape.c if (r != MTSE_OK) r 1757 src/simh/sim_tape.c return r; r 1765 src/simh/sim_tape.c r = sim_tape_sprecsr (uptr, objsremaining, &skipped); r 1767 src/simh/sim_tape.c r = sim_tape_sprecsf (uptr, objsremaining, &skipped); r 1768 src/simh/sim_tape.c objsremaining = objsremaining - (skipped + ((r == MTSE_TMK) ? 1 : 0)); r 1769 src/simh/sim_tape.c if ((r == MTSE_TMK) || (r == MTSE_OK)) r 1770 src/simh/sim_tape.c *objectsskipped = *objectsskipped + skipped + ((r == MTSE_TMK) ? 1 : 0); r 1772 src/simh/sim_tape.c return r; r 1774 src/simh/sim_tape.c r = MTSE_OK; r 1780 src/simh/sim_tape.c r = sim_tape_spfilebyrecr (uptr, files, filesskipped, &fileskiprecs); r 1782 src/simh/sim_tape.c r = sim_tape_spfilebyrecf (uptr, files, filesskipped, &fileskiprecs, (flags & MTPOS_M_DLE)); r 1783 src/simh/sim_tape.c if (r != MTSE_OK) r 1784 src/simh/sim_tape.c return r; r 1786 src/simh/sim_tape.c r = sim_tape_sprecsr (uptr, recs, recsskipped); r 1788 src/simh/sim_tape.c r = sim_tape_sprecsf (uptr, recs, recsskipped); r 1789 src/simh/sim_tape.c if (r == MTSE_TMK) r 1793 src/simh/sim_tape.c return r; r 1800 src/simh/sim_tape.c t_stat r = MTSE_OK; r 1801 src/simh/sim_tape.c r = sim_tape_position (uptr, flags, recs, recsskipped, files, filesskipped, objectsskipped); r 1802 src/simh/sim_tape.c return r; r 2050 src/simh/sim_tape.c t_stat r; r 2056 src/simh/sim_tape.c cap = (t_addr) get_uint (cptr, 10, 2000000, &r); r 2057 src/simh/sim_tape.c if (r != SCPE_OK) r 1006 src/simh/sim_tmxr.c int j, r = (int)random(); r 1030 src/simh/sim_tmxr.c switch (((unsigned)j+(unsigned)r)&1) { r 1893 src/simh/sim_tmxr.c t_stat r; r 1928 src/simh/sim_tmxr.c (SCPE_OK == (r = tmxr_putc_ln (lp, lp->txpb[lp->txppoffset])))) r 1930 src/simh/sim_tmxr.c (void)r; r 1971 src/simh/sim_tmxr.c t_stat r; r 2007 src/simh/sim_tmxr.c (SCPE_OK == (r = tmxr_putc_ln (lp, lp->txpb[lp->txppoffset])))) r 2009 src/simh/sim_tmxr.c (void)r; r 2131 src/simh/sim_tmxr.c t_stat r; r 2141 src/simh/sim_tmxr.c uint32 rxbpsfactor = (uint32) get_uint (cptr+1, 10, 32, &r); r 2142 src/simh/sim_tmxr.c if (r != SCPE_OK) r 2143 src/simh/sim_tmxr.c return r; r 2178 src/simh/sim_tmxr.c t_stat r = SCPE_OK; r 2223 src/simh/sim_tmxr.c nextline = (int32) get_uint (cptr, 10, mp->lines-1, &r); r 2224 src/simh/sim_tmxr.c if (r) r 2250 src/simh/sim_tmxr.c i = (int32) get_uint (cptr, 10, 1024*1024, &r); r 2251 src/simh/sim_tmxr.c if (r || (i == 0)) r 2323 src/simh/sim_tmxr.c sock = sim_master_sock (port, &r); /* make master socket to validate port */ r 2324 src/simh/sim_tmxr.c if (r) r 2419 src/simh/sim_tmxr.c r = sim_open_logfile (lp->txlogname, TRUE, &lp->txlog, &lp->txlogref); r 2420 src/simh/sim_tmxr.c if (r == SCPE_OK) r 2496 src/simh/sim_tmxr.c sock = sim_master_sock (listen, &r); /* make master socket */ r 2497 src/simh/sim_tmxr.c if (r) r 2647 src/simh/sim_tmxr.c r = sim_open_logfile (lp->txlogname, TRUE, &lp->txlog, &lp->txlogref); r 2648 src/simh/sim_tmxr.c if (r == SCPE_OK) r 2653 src/simh/sim_tmxr.c return sim_messagef (r, "Can't open log file: %s\r\n", logfiletmpl); r 2716 src/simh/sim_tmxr.c sock = sim_master_sock (listen, &r); /* make master socket */ r 2717 src/simh/sim_tmxr.c if (r) r 2821 src/simh/sim_tmxr.c r = SCPE_OK; r 2823 src/simh/sim_tmxr.c if (r == SCPE_OK) r 2825 src/simh/sim_tmxr.c return r; r 2944 src/simh/sim_tmxr.c t_stat r; r 2957 src/simh/sim_tmxr.c int line = (int)get_uint (cptr, 10, tmxr_open_devices[i]->lines, &r); r 2958 src/simh/sim_tmxr.c if (r != SCPE_OK) r 2959 src/simh/sim_tmxr.c return r; r 2988 src/simh/sim_tmxr.c t_stat r; r 2991 src/simh/sim_tmxr.c r = tmxr_open_master (mp, cptr); /* open master socket */ r 2992 src/simh/sim_tmxr.c if (r != SCPE_OK) /* error? */ r 2993 src/simh/sim_tmxr.c return r; r 3682 src/simh/sim_tmxr.c t_stat r; r 3695 src/simh/sim_tmxr.c r = sim_open_logfile (cptr, TRUE, &lp->txlog, &lp->txlogref); /* open log */ r 3696 src/simh/sim_tmxr.c if (r != SCPE_OK) { /* error? */ r 3698 src/simh/sim_tmxr.c return r;