iptr 354 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 7603 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 7609 src/simh/scp.c while ((*iptr != 0) && iptr 7610 src/simh/scp.c ((quote && quoting) || ((sim_isspace (*iptr) == 0) && (*iptr != mchar)))) { iptr 7614 src/simh/scp.c if (*iptr == escape_char) iptr 7617 src/simh/scp.c if (*iptr == quote_char) iptr 7624 src/simh/scp.c if ((*iptr == '"') || (*iptr == '\'')) { iptr 7626 src/simh/scp.c quote_char = *iptr; iptr 7630 src/simh/scp.c if (sim_islower (*iptr) && uc) iptr 7631 src/simh/scp.c *optr = (char)toupper (*iptr); iptr 7632 src/simh/scp.c else *optr = *iptr; iptr 7633 src/simh/scp.c iptr++; optr++; iptr 7635 src/simh/scp.c if (mchar && (*iptr == mchar)) /* skip input terminator */ iptr 7636 src/simh/scp.c iptr++; iptr 7638 src/simh/scp.c while (sim_isspace (*iptr)) /* absorb additional input spaces */ iptr 7639 src/simh/scp.c iptr++; iptr 7640 src/simh/scp.c return iptr; iptr 7643 src/simh/scp.c CONST char *get_glyph (const char *iptr, char *optr, char mchar) iptr 7645 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, TRUE, FALSE, 0); iptr 7648 src/simh/scp.c CONST char *get_glyph_nc (const char *iptr, char *optr, char mchar) iptr 7650 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, FALSE, FALSE, 0); iptr 7653 src/simh/scp.c CONST char *get_glyph_quoted (const char *iptr, char *optr, char mchar) iptr 7655 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, mchar, FALSE, TRUE, '\\'); iptr 7658 src/simh/scp.c CONST char *get_glyph_cmd (const char *iptr, char *optr) iptr 7661 src/simh/scp.c if ((iptr[0] == '!') && (!sim_isspace(iptr[1]))) { iptr 7663 src/simh/scp.c return (CONST char *)(iptr + 1); /* and skip over the leading ! */ iptr 7665 src/simh/scp.c return (CONST char *)get_glyph_gen (iptr, optr, 0, TRUE, FALSE, 0); iptr 7840 src/simh/scp.c t_stat sim_decode_quoted_string (const char *iptr, uint8 *optr, uint32 *osize) iptr 7846 src/simh/scp.c if ((strlen(iptr) == 1) || iptr 7847 src/simh/scp.c (iptr[0] != iptr[strlen(iptr)-1]) || iptr 7848 src/simh/scp.c ((iptr[strlen(iptr)-1] != '"') && (iptr[strlen(iptr)-1] != '\''))) iptr 7850 src/simh/scp.c quote_char = *iptr++; /* Save quote character */ iptr 7851 src/simh/scp.c while (iptr[1]) { /* Skip trailing quote */ iptr 7852 src/simh/scp.c if (*iptr != '\\') { iptr 7853 src/simh/scp.c if (*iptr == quote_char) iptr 7855 src/simh/scp.c *(optr++) = (uint8)(*(iptr++)); iptr 7858 src/simh/scp.c ++iptr; /* Skip backslash */ iptr 7859 src/simh/scp.c switch (*iptr) { iptr 7861 src/simh/scp.c *(optr++) = 13; ++iptr; iptr 7864 src/simh/scp.c *(optr++) = 10; ++iptr; iptr 7867 src/simh/scp.c *(optr++) = 12; ++iptr; iptr 7870 src/simh/scp.c *(optr++) = 9; ++iptr; iptr 7873 src/simh/scp.c *(optr++) = 11; ++iptr; iptr 7876 src/simh/scp.c *(optr++) = 8; ++iptr; iptr 7879 src/simh/scp.c *(optr++) = 92; ++iptr; iptr 7882 src/simh/scp.c *(optr++) = 27; ++iptr; iptr 7885 src/simh/scp.c *(optr++) = 39; ++iptr; iptr 7888 src/simh/scp.c *(optr++) = 34; ++iptr; iptr 7891 src/simh/scp.c *(optr++) = 63; ++iptr; iptr 7894 src/simh/scp.c *optr = *(iptr++) - '0'; iptr 7895 src/simh/scp.c if ((*iptr >= '0') && (*iptr <= '7')) iptr 7896 src/simh/scp.c *optr = ((*optr)<<3) + (*(iptr++) - '0'); iptr 7897 src/simh/scp.c if ((*iptr >= '0') && (*iptr <= '7')) iptr 7898 src/simh/scp.c *optr = ((*optr)<<3) + (*(iptr++) - '0'); iptr 7906 src/simh/scp.c ++iptr; iptr 7908 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); iptr 7911 src/simh/scp.c ++iptr; iptr 7913 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); iptr 7916 src/simh/scp.c ++iptr; iptr 7943 src/simh/scp.c char *sim_encode_quoted_string (const uint8 *iptr, size_t size) iptr 7956 src/simh/scp.c switch ((char)iptr[i]) { iptr 7968 src/simh/scp.c switch (*iptr) { iptr 7985 src/simh/scp.c if (quote == *iptr) iptr 7989 src/simh/scp.c if (sim_isprint (*iptr)) iptr 7990 src/simh/scp.c *tptr++ = *iptr; iptr 7992 src/simh/scp.c (void)sprintf (tptr, "\\%03o", *iptr); iptr 7997 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 */