Lines Matching refs:l
69 #define EATAB {while (isascii((unsigned char) *l) && \
70 isspace((unsigned char) *l)) ++l;}
71 #define LOWCASE(l) (isupper((unsigned char) (l)) ? \ argument
72 tolower((unsigned char) (l)) : (l))
267 get_type(const struct type_tbl_s *tbl, const char *l, const char **t) in get_type() argument
272 if (strncmp(l, p->name, p->len) == 0) { in get_type()
274 *t = l + p->len; in get_type()
282 get_standard_integer_type(const char *l, const char **t) in get_standard_integer_type() argument
286 if (isalpha((unsigned char)l[1])) { in get_standard_integer_type()
287 switch (l[1]) { in get_standard_integer_type()
320 l += 2; in get_standard_integer_type()
321 } else if (isdigit((unsigned char)l[1])) { in get_standard_integer_type()
332 if (isdigit((unsigned char)l[2])) { in get_standard_integer_type()
336 switch (l[1]) { in get_standard_integer_type()
353 l += 2; in get_standard_integer_type()
359 ++l; in get_standard_integer_type()
362 *t = l; in get_standard_integer_type()
1546 get_cond(const char *l, const char **t) in get_cond() argument
1561 if (strncmp(l, p->name, p->len) == 0 && in get_cond()
1562 isspace((unsigned char)l[p->len])) { in get_cond()
1564 *t = l + p->len; in get_cond()
1618 const char *l = *lp; in parse_indirect_modifier() local
1620 while (!isspace((unsigned char)*++l)) in parse_indirect_modifier()
1621 switch (*l) { in parse_indirect_modifier()
1628 "invalid", *l); in parse_indirect_modifier()
1629 *lp = l; in parse_indirect_modifier()
1632 *lp = l; in parse_indirect_modifier()
1640 const char *l = *lp; in parse_op_modifier() local
1644 ++l; in parse_op_modifier()
1646 val = (uint64_t)strtoull(l, &t, 0); in parse_op_modifier()
1647 l = t; in parse_op_modifier()
1649 eatsize(&l); in parse_op_modifier()
1650 *lp = l; in parse_op_modifier()
1656 const char *l = *lp; in parse_string_modifier() local
1660 while (!isspace((unsigned char)*++l)) { in parse_string_modifier()
1661 switch (*l) { in parse_string_modifier()
1669 m->str_range = CAST(uint32_t, strtoul(l, &t, 0)); in parse_string_modifier()
1672 l = t - 1; in parse_string_modifier()
1738 "invalid", *l); in parse_string_modifier()
1742 if (l[1] == '/' && !isspace((unsigned char)l[2])) in parse_string_modifier()
1743 l++; in parse_string_modifier()
1747 *lp = l; in parse_string_modifier()
1750 *lp = l; in parse_string_modifier()
1766 const char *l = line; in parse() local
1777 while (*l == '>') { in parse()
1778 ++l; /* step over */ in parse()
1833 if (*l == '&') { /* m->cont_level == 0 checked below. */ in parse()
1834 ++l; /* step over */ in parse()
1837 if (*l == '(') { in parse()
1838 ++l; /* step over */ in parse()
1843 if (*l == '&') { /* m->cont_level == 0 checked below */ in parse()
1844 ++l; /* step over */ in parse()
1856 m->offset = (int32_t)strtol(l, &t, 0); in parse()
1857 if (l == t) { in parse()
1859 file_magwarn(ms, "offset `%s' invalid", l); in parse()
1862 l = t; in parse()
1871 if (*l == '.' || *l == ',') { in parse()
1872 if (*l == ',') in parse()
1874 l++; in parse()
1875 switch (*l) { in parse()
1919 *l); in parse()
1922 l++; in parse()
1925 if (*l == '~') { in parse()
1927 l++; in parse()
1929 if ((op = get_op(*l)) != -1) { in parse()
1931 l++; in parse()
1933 if (*l == '(') { in parse()
1935 l++; in parse()
1937 if (isdigit((unsigned char)*l) || *l == '-') { in parse()
1938 m->in_offset = (int32_t)strtol(l, &t, 0); in parse()
1939 if (l == t) { in parse()
1942 "in_offset `%s' invalid", l); in parse()
1945 l = t; in parse()
1947 if (*l++ != ')' || in parse()
1948 ((m->in_op & FILE_OPINDIRECT) && *l++ != ')')) { in parse()
1958 m->cond = get_cond(l, &l); in parse()
1968 if (*l == 'u') { in parse()
1974 m->type = get_type(type_tbl, l + 1, &l); in parse()
1980 m->type = get_standard_integer_type(l, &l); in parse()
1992 m->type = get_type(type_tbl, l, &l); in parse()
1999 if (*l == 'd') in parse()
2000 m->type = get_standard_integer_type(l, &l); in parse()
2001 else if (*l == 's' && !isalpha((unsigned char)l[1])) { in parse()
2003 ++l; in parse()
2010 m->type = get_type(special_tbl, l, &l); in parse()
2015 file_magwarn(ms, "type `%s' invalid", l); in parse()
2023 if (*l == '~') { in parse()
2028 ++l; in parse()
2032 if ((op = get_op(*l)) != -1) { in parse()
2045 r = parse_indirect_modifier(ms, m, &l); in parse()
2047 r = parse_string_modifier(ms, m, &l); in parse()
2051 parse_op_modifier(ms, m, &l, op); in parse()
2060 switch (*l) { in parse()
2063 m->reln = *l; in parse()
2064 ++l; in parse()
2065 if (*l == '=') { in parse()
2071 ++l; in parse()
2078 m->reln = *l; in parse()
2079 ++l; in parse()
2080 if (*l == '=') { in parse()
2082 ++l; in parse()
2086 m->reln = *l; in parse()
2087 ++l; in parse()
2091 if (*l == 'x' && ((isascii((unsigned char)l[1]) && in parse()
2092 isspace((unsigned char)l[1])) || !l[1])) { in parse()
2093 m->reln = *l; in parse()
2094 ++l; in parse()
2101 if (m->reln != 'x' && getvalue(ms, m, &l, action)) in parse()
2114 if (l[0] == '\b') { in parse()
2115 ++l; in parse()
2117 } else if ((l[0] == '\\') && (l[1] == 'b')) { in parse()
2118 ++l; in parse()
2119 ++l; in parse()
2122 for (i = 0; (m->desc[i++] = *l++) != '\0' && i < sizeof(m->desc); ) in parse()
2149 const char *l = line; in parse_strength() local
2166 switch (*l) { in parse_strength()
2172 m->factor_op = *l++; in parse_strength()
2175 file_magwarn(ms, "Unknown factor op `%c'", *l); in parse_strength()
2179 factor = strtoul(l, &el, 0); in parse_strength()
2185 file_magwarn(ms, "Bad factor `%s'", l); in parse_strength()
2212 const char *l = line; in parse_extra() local
2219 "`%.*s', new type `%s'", name, (int)len, buf, l); in parse_extra()
2230 for (i = 0; *l && i < len && goodchar(*l, extra); buf[i++] = *l++) in parse_extra()
2233 if (i == len && *l) { in parse_extra()
2240 if (!isspace((unsigned char)*l) && !goodchar(*l, extra)) in parse_extra()
2242 name, line, *l); in parse_extra()
2908 const char *l = *p; in eatsize() local
2910 if (LOWCASE(*l) == 'u') in eatsize()
2911 l++; in eatsize()
2913 switch (LOWCASE(*l)) { in eatsize()
2919 l++; in eatsize()
2925 *p = l; in eatsize()
