iptr 353 src/simh/scp.c static const char *get_glyph_gen (const char *iptr, char *optr, char mchar, t_bool uc, t_bool quote, char escape_char); iptr 7569 src/simh/scp.c static const char *get_glyph_gen (const char *iptr, char *optr, char mchar, t_bool uc, t_bool quote, char escape_char) iptr 7575 src/simh/scp.c while ((*iptr != 0) && iptr 7576 src/simh/scp.c ((quote && quoting) || ((sim_isspace (*iptr) == 0) && (*iptr != mchar)))) { iptr 7580 src/simh/scp.c if (*iptr == escape_char) iptr 7583 src/simh/scp.c if (*iptr == quote_char) iptr 7590 src/simh/scp.c if ((*iptr == '"') || (*iptr == '\'')) { iptr 7592 src/simh/scp.c quote_char = *iptr; iptr 7596 src/simh/scp.c if (sim_islower (*iptr) && uc) iptr 7597 src/simh/scp.c *optr = (char)toupper (*iptr); iptr 7598 src/simh/scp.c else *optr = *iptr; iptr 7599 src/simh/scp.c iptr++; optr++; iptr 7601 src/simh/scp.c if (mchar && (*iptr == mchar)) /* skip input terminator */ iptr 7602 src/simh/scp.c iptr++; iptr 7604 src/simh/scp.c while (sim_isspace (*iptr)) /* absorb additional input spaces */ iptr 7605 src/simh/scp.c iptr++; iptr 7606 src/simh/scp.c return iptr; iptr 7609 src/simh/scp.c CONST char *get_glyph (const char *iptr, char *optr, char mchar) iptr 7611 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, TRUE, FALSE, 0); iptr 7614 src/simh/scp.c CONST char *get_glyph_nc (const char *iptr, char *optr, char mchar) iptr 7616 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, FALSE, FALSE, 0); iptr 7619 src/simh/scp.c CONST char *get_glyph_quoted (const char *iptr, char *optr, char mchar) iptr 7621 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, FALSE, TRUE, '\\'); iptr 7624 src/simh/scp.c CONST char *get_glyph_cmd (const char *iptr, char *optr) iptr 7627 src/simh/scp.c if ((iptr[0] == '!') && (!sim_isspace(iptr[1]))) { iptr 7629 src/simh/scp.c return (CONST char *)(iptr + 1); /* and skip over the leading ! */ iptr 7631 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, 0, TRUE, FALSE, 0); iptr 7806 src/simh/scp.c t_stat sim_decode_quoted_string (const char *iptr, uint8 *optr, uint32 *osize) iptr 7812 src/simh/scp.c if ((strlen(iptr) == 1) || iptr 7813 src/simh/scp.c (iptr[0] != iptr[strlen(iptr)-1]) || iptr 7814 src/simh/scp.c ((iptr[strlen(iptr)-1] != '"') && (iptr[strlen(iptr)-1] != '\''))) iptr 7816 src/simh/scp.c quote_char = *iptr++; /* Save quote character */ iptr 7817 src/simh/scp.c while (iptr[1]) { /* Skip trailing quote */ iptr 7818 src/simh/scp.c if (*iptr != '\\') { iptr 7819 src/simh/scp.c if (*iptr == quote_char) iptr 7821 src/simh/scp.c *(optr++) = (uint8)(*(iptr++)); iptr 7824 src/simh/scp.c ++iptr; /* Skip backslash */ iptr 7825 src/simh/scp.c switch (*iptr) { iptr 7827 src/simh/scp.c *(optr++) = 13; ++iptr; iptr 7830 src/simh/scp.c *(optr++) = 10; ++iptr; iptr 7833 src/simh/scp.c *(optr++) = 12; ++iptr; iptr 7836 src/simh/scp.c *(optr++) = 9; ++iptr; iptr 7839 src/simh/scp.c *(optr++) = 11; ++iptr; iptr 7842 src/simh/scp.c *(optr++) = 8; ++iptr; iptr 7845 src/simh/scp.c *(optr++) = 92; ++iptr; iptr 7848 src/simh/scp.c *(optr++) = 27; ++iptr; iptr 7851 src/simh/scp.c *(optr++) = 39; ++iptr; iptr 7854 src/simh/scp.c *(optr++) = 34; ++iptr; iptr 7857 src/simh/scp.c *(optr++) = 63; ++iptr; iptr 7860 src/simh/scp.c *optr = *(iptr++) - '0'; iptr 7861 src/simh/scp.c if ((*iptr >= '0') && (*iptr <= '7')) iptr 7862 src/simh/scp.c *optr = ((*optr)<<3) + (*(iptr++) - '0'); iptr 7863 src/simh/scp.c if ((*iptr >= '0') && (*iptr <= '7')) iptr 7864 src/simh/scp.c *optr = ((*optr)<<3) + (*(iptr++) - '0'); iptr 7872 src/simh/scp.c ++iptr; iptr 7874 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); iptr 7877 src/simh/scp.c ++iptr; iptr 7879 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); iptr 7882 src/simh/scp.c ++iptr; iptr 7909 src/simh/scp.c char *sim_encode_quoted_string (const uint8 *iptr, size_t size) iptr 7922 src/simh/scp.c switch ((char)iptr[i]) { iptr 7934 src/simh/scp.c switch (*iptr) { iptr 7951 src/simh/scp.c if (quote == *iptr) iptr 7955 src/simh/scp.c if (sim_isprint (*iptr)) iptr 7956 src/simh/scp.c *tptr++ = *iptr; iptr 7958 src/simh/scp.c (void)sprintf (tptr, "\\%03o", *iptr); iptr 7963 src/simh/scp.c ++iptr; iptr 146 src/simh/scp.h CONST char *get_glyph (const char *iptr, char *optr, char mchar); iptr 147 src/simh/scp.h CONST char *get_glyph_nc (const char *iptr, char *optr, char mchar); iptr 148 src/simh/scp.h CONST char *get_glyph_quoted (const char *iptr, char *optr, char mchar); iptr 149 src/simh/scp.h CONST char *get_glyph_cmd (const char *iptr, char *optr); iptr 153 src/simh/scp.h t_stat sim_decode_quoted_string (const char *iptr, uint8 *optr, uint32 *osize); iptr 154 src/simh/scp.h char *sim_encode_quoted_string (const uint8 *iptr, size_t size); iptr 3881 src/simh/sim_tmxr.c int32 *iptr = mp->lnorder; iptr 3884 src/simh/sim_tmxr.c if (iptr == NULL) /* connection order undefined? */ iptr 3887 src/simh/sim_tmxr.c if (*iptr < 0) /* sequential order indicated? */ iptr 3891 src/simh/sim_tmxr.c low = last = *iptr++; /* set first line value */ iptr 3895 src/simh/sim_tmxr.c i = *iptr++; /* get next line in list */