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()
1491 get_cond(const char *l, const char **t) in get_cond() argument
1506 if (strncmp(l, p->name, p->len) == 0 && in get_cond()
1507 isspace((unsigned char)l[p->len])) { in get_cond()
1509 *t = l + p->len; in get_cond()
1563 const char *l = *lp; in parse_indirect_modifier() local
1565 while (!isspace((unsigned char)*++l)) in parse_indirect_modifier()
1566 switch (*l) { in parse_indirect_modifier()
1573 "invalid", *l); in parse_indirect_modifier()
1574 *lp = l; in parse_indirect_modifier()
1577 *lp = l; in parse_indirect_modifier()
1585 const char *l = *lp; in parse_op_modifier() local
1589 ++l; in parse_op_modifier()
1591 val = (uint64_t)strtoull(l, &t, 0); in parse_op_modifier()
1592 l = t; in parse_op_modifier()
1594 eatsize(&l); in parse_op_modifier()
1595 *lp = l; in parse_op_modifier()
1601 const char *l = *lp; in parse_string_modifier() local
1605 while (!isspace((unsigned char)*++l)) { in parse_string_modifier()
1606 switch (*l) { in parse_string_modifier()
1614 m->str_range = CAST(uint32_t, strtoul(l, &t, 0)); in parse_string_modifier()
1617 l = t - 1; in parse_string_modifier()
1683 "invalid", *l); in parse_string_modifier()
1687 if (l[1] == '/' && !isspace((unsigned char)l[2])) in parse_string_modifier()
1688 l++; in parse_string_modifier()
1692 *lp = l; in parse_string_modifier()
1695 *lp = l; in parse_string_modifier()
1711 const char *l = line; in parse() local
1722 while (*l == '>') { in parse()
1723 ++l; /* step over */ in parse()
1778 if (*l == '&') { /* m->cont_level == 0 checked below. */ in parse()
1779 ++l; /* step over */ in parse()
1782 if (*l == '(') { in parse()
1783 ++l; /* step over */ in parse()
1788 if (*l == '&') { /* m->cont_level == 0 checked below */ in parse()
1789 ++l; /* step over */ in parse()
1799 m->offset = (uint32_t)strtoul(l, &t, 0); in parse()
1800 if (l == t) in parse()
1802 file_magwarn(ms, "offset `%s' invalid", l); in parse()
1803 l = t; in parse()
1811 if (*l == '.') { in parse()
1812 l++; in parse()
1813 switch (*l) { in parse()
1857 *l); in parse()
1860 l++; in parse()
1864 if (*l == '~') { in parse()
1866 l++; in parse()
1868 if ((op = get_op(*l)) != -1) { in parse()
1870 l++; in parse()
1872 if (*l == '(') { in parse()
1874 l++; in parse()
1876 if (isdigit((unsigned char)*l) || *l == '-') { in parse()
1877 m->in_offset = (int32_t)strtol(l, &t, 0); in parse()
1878 if (l == t) in parse()
1881 "in_offset `%s' invalid", l); in parse()
1882 l = t; in parse()
1884 if (*l++ != ')' || in parse()
1885 ((m->in_op & FILE_OPINDIRECT) && *l++ != ')')) in parse()
1893 m->cond = get_cond(l, &l); in parse()
1903 if (*l == 'u') { in parse()
1909 m->type = get_type(type_tbl, l + 1, &l); in parse()
1915 m->type = get_standard_integer_type(l, &l); in parse()
1927 m->type = get_type(type_tbl, l, &l); in parse()
1934 if (*l == 'd') in parse()
1935 m->type = get_standard_integer_type(l, &l); in parse()
1936 else if (*l == 's' && !isalpha((unsigned char)l[1])) { in parse()
1938 ++l; in parse()
1945 m->type = get_type(special_tbl, l, &l); in parse()
1950 file_magwarn(ms, "type `%s' invalid", l); in parse()
1958 if (*l == '~') { in parse()
1963 ++l; in parse()
1967 if ((op = get_op(*l)) != -1) { in parse()
1980 r = parse_indirect_modifier(ms, m, &l); in parse()
1982 r = parse_string_modifier(ms, m, &l); in parse()
1986 parse_op_modifier(ms, m, &l, op); in parse()
1995 switch (*l) { in parse()
1998 m->reln = *l; in parse()
1999 ++l; in parse()
2000 if (*l == '=') { in parse()
2006 ++l; in parse()
2013 m->reln = *l; in parse()
2014 ++l; in parse()
2015 if (*l == '=') { in parse()
2017 ++l; in parse()
2021 m->reln = *l; in parse()
2022 ++l; in parse()
2026 if (*l == 'x' && ((isascii((unsigned char)l[1]) && in parse()
2027 isspace((unsigned char)l[1])) || !l[1])) { in parse()
2028 m->reln = *l; in parse()
2029 ++l; in parse()
2036 if (m->reln != 'x' && getvalue(ms, m, &l, action)) in parse()
2049 if (l[0] == '\b') { in parse()
2050 ++l; in parse()
2052 } else if ((l[0] == '\\') && (l[1] == 'b')) { in parse()
2053 ++l; in parse()
2054 ++l; in parse()
2057 for (i = 0; (m->desc[i++] = *l++) != '\0' && i < sizeof(m->desc); ) in parse()
2084 const char *l = line; in parse_strength() local
2101 switch (*l) { in parse_strength()
2107 m->factor_op = *l++; in parse_strength()
2110 file_magwarn(ms, "Unknown factor op `%c'", *l); in parse_strength()
2114 factor = strtoul(l, &el, 0); in parse_strength()
2120 file_magwarn(ms, "Bad factor `%s'", l); in parse_strength()
2147 const char *l = line; in parse_extra() local
2154 "`%.*s', new type `%s'", name, (int)len, buf, l); in parse_extra()
2165 for (i = 0; *l && i < len && goodchar(*l, extra); buf[i++] = *l++) in parse_extra()
2168 if (i == len && *l) { in parse_extra()
2175 if (!isspace((unsigned char)*l) && !goodchar(*l, extra)) in parse_extra()
2177 name, line, *l); in parse_extra()
2758 const char *l = *p; in eatsize() local
2760 if (LOWCASE(*l) == 'u') in eatsize()
2761 l++; in eatsize()
2763 switch (LOWCASE(*l)) { in eatsize()
2769 l++; in eatsize()
2775 *p = l; in eatsize()
