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))
271 get_type(const struct type_tbl_s *tbl, const char *l, const char **t) in get_type() argument
276 if (strncmp(l, p->name, p->len) == 0) { in get_type()
278 *t = l + p->len; in get_type()
286 get_standard_integer_type(const char *l, const char **t) in get_standard_integer_type() argument
290 if (isalpha((unsigned char)l[1])) { in get_standard_integer_type()
291 switch (l[1]) { in get_standard_integer_type()
324 l += 2; in get_standard_integer_type()
325 } else if (isdigit((unsigned char)l[1])) { in get_standard_integer_type()
336 if (isdigit((unsigned char)l[2])) { in get_standard_integer_type()
340 switch (l[1]) { in get_standard_integer_type()
357 l += 2; in get_standard_integer_type()
363 ++l; in get_standard_integer_type()
366 *t = l; in get_standard_integer_type()
1506 get_cond(const char *l, const char **t) in get_cond() argument
1521 if (strncmp(l, p->name, p->len) == 0 && in get_cond()
1522 isspace((unsigned char)l[p->len])) { in get_cond()
1524 *t = l + p->len; in get_cond()
1578 const char *l = *lp; in parse_indirect_modifier() local
1580 while (!isspace((unsigned char)*++l)) in parse_indirect_modifier()
1581 switch (*l) { in parse_indirect_modifier()
1588 "invalid", *l); in parse_indirect_modifier()
1589 *lp = l; in parse_indirect_modifier()
1592 *lp = l; in parse_indirect_modifier()
1600 const char *l = *lp; in parse_op_modifier() local
1604 ++l; in parse_op_modifier()
1606 val = (uint64_t)strtoull(l, &t, 0); in parse_op_modifier()
1607 l = t; in parse_op_modifier()
1609 eatsize(&l); in parse_op_modifier()
1610 *lp = l; in parse_op_modifier()
1616 const char *l = *lp; in parse_string_modifier() local
1620 while (!isspace((unsigned char)*++l)) { in parse_string_modifier()
1621 switch (*l) { in parse_string_modifier()
1629 m->str_range = CAST(uint32_t, strtoul(l, &t, 0)); in parse_string_modifier()
1632 l = t - 1; in parse_string_modifier()
1698 "invalid", *l); in parse_string_modifier()
1702 if (l[1] == '/' && !isspace((unsigned char)l[2])) in parse_string_modifier()
1703 l++; in parse_string_modifier()
1707 *lp = l; in parse_string_modifier()
1710 *lp = l; in parse_string_modifier()
1726 const char *l = line; in parse() local
1737 while (*l == '>') { in parse()
1738 ++l; /* step over */ in parse()
1793 if (*l == '&') { /* m->cont_level == 0 checked below. */ in parse()
1794 ++l; /* step over */ in parse()
1797 if (*l == '(') { in parse()
1798 ++l; /* step over */ in parse()
1803 if (*l == '&') { /* m->cont_level == 0 checked below */ in parse()
1804 ++l; /* step over */ in parse()
1816 m->offset = (uint32_t)strtoul(l, &t, 0); in parse()
1817 if (l == t) { in parse()
1819 file_magwarn(ms, "offset `%s' invalid", l); in parse()
1822 l = t; in parse()
1831 if (*l == '.' || *l == ',') { in parse()
1832 if (*l == ',') in parse()
1834 l++; in parse()
1835 switch (*l) { in parse()
1879 *l); in parse()
1882 l++; in parse()
1885 if (*l == '~') { in parse()
1887 l++; in parse()
1889 if ((op = get_op(*l)) != -1) { in parse()
1891 l++; in parse()
1893 if (*l == '(') { in parse()
1895 l++; in parse()
1897 if (isdigit((unsigned char)*l) || *l == '-') { in parse()
1898 m->in_offset = (int32_t)strtol(l, &t, 0); in parse()
1899 if (l == t) { in parse()
1902 "in_offset `%s' invalid", l); in parse()
1905 l = t; in parse()
1907 if (*l++ != ')' || in parse()
1908 ((m->in_op & FILE_OPINDIRECT) && *l++ != ')')) { in parse()
1918 m->cond = get_cond(l, &l); in parse()
1928 if (*l == 'u') { in parse()
1934 m->type = get_type(type_tbl, l + 1, &l); in parse()
1940 m->type = get_standard_integer_type(l, &l); in parse()
1952 m->type = get_type(type_tbl, l, &l); in parse()
1959 if (*l == 'd') in parse()
1960 m->type = get_standard_integer_type(l, &l); in parse()
1961 else if (*l == 's' && !isalpha((unsigned char)l[1])) { in parse()
1963 ++l; in parse()
1970 m->type = get_type(special_tbl, l, &l); in parse()
1975 file_magwarn(ms, "type `%s' invalid", l); in parse()
1983 if (*l == '~') { in parse()
1988 ++l; in parse()
1992 if ((op = get_op(*l)) != -1) { in parse()
2005 r = parse_indirect_modifier(ms, m, &l); in parse()
2007 r = parse_string_modifier(ms, m, &l); in parse()
2011 parse_op_modifier(ms, m, &l, op); in parse()
2020 switch (*l) { in parse()
2023 m->reln = *l; in parse()
2024 ++l; in parse()
2025 if (*l == '=') { in parse()
2031 ++l; in parse()
2038 m->reln = *l; in parse()
2039 ++l; in parse()
2040 if (*l == '=') { in parse()
2042 ++l; in parse()
2046 m->reln = *l; in parse()
2047 ++l; in parse()
2051 if (*l == 'x' && ((isascii((unsigned char)l[1]) && in parse()
2052 isspace((unsigned char)l[1])) || !l[1])) { in parse()
2053 m->reln = *l; in parse()
2054 ++l; in parse()
2061 if (m->reln != 'x' && getvalue(ms, m, &l, action)) in parse()
2074 if (l[0] == '\b') { in parse()
2075 ++l; in parse()
2077 } else if ((l[0] == '\\') && (l[1] == 'b')) { in parse()
2078 ++l; in parse()
2079 ++l; in parse()
2082 for (i = 0; (m->desc[i++] = *l++) != '\0' && i < sizeof(m->desc); ) in parse()
2109 const char *l = line; in parse_strength() local
2126 switch (*l) { in parse_strength()
2132 m->factor_op = *l++; in parse_strength()
2135 file_magwarn(ms, "Unknown factor op `%c'", *l); in parse_strength()
2139 factor = strtoul(l, &el, 0); in parse_strength()
2145 file_magwarn(ms, "Bad factor `%s'", l); in parse_strength()
2172 const char *l = line; in parse_extra() local
2179 "`%.*s', new type `%s'", name, (int)len, buf, l); in parse_extra()
2190 for (i = 0; *l && i < len && goodchar(*l, extra); buf[i++] = *l++) in parse_extra()
2193 if (i == len && *l) { in parse_extra()
2200 if (!isspace((unsigned char)*l) && !goodchar(*l, extra)) in parse_extra()
2202 name, line, *l); in parse_extra()
2829 const char *l = *p; in eatsize() local
2831 if (LOWCASE(*l) == 'u') in eatsize()
2832 l++; in eatsize()
2834 switch (LOWCASE(*l)) { in eatsize()
2840 l++; in eatsize()
2846 *p = l; in eatsize()
