Lines Matching refs:l
66 #define EATAB {while (isascii((unsigned char) *l) && \
67 isspace((unsigned char) *l)) ++l;}
68 #define LOWCASE(l) (isupper((unsigned char) (l)) ? \ argument
69 tolower((unsigned char) (l)) : (l))
246 get_type(const struct type_tbl_s *tbl, const char *l, const char **t) in get_type() argument
251 if (strncmp(l, p->name, p->len) == 0) { in get_type()
253 *t = l + p->len; in get_type()
261 get_standard_integer_type(const char *l, const char **t) in get_standard_integer_type() argument
265 if (isalpha((unsigned char)l[1])) { in get_standard_integer_type()
266 switch (l[1]) { in get_standard_integer_type()
299 l += 2; in get_standard_integer_type()
300 } else if (isdigit((unsigned char)l[1])) { in get_standard_integer_type()
311 if (isdigit((unsigned char)l[2])) { in get_standard_integer_type()
315 switch (l[1]) { in get_standard_integer_type()
332 l += 2; in get_standard_integer_type()
338 ++l; in get_standard_integer_type()
341 *t = l; in get_standard_integer_type()
1419 get_cond(const char *l, const char **t) in get_cond() argument
1434 if (strncmp(l, p->name, p->len) == 0 && in get_cond()
1435 isspace((unsigned char)l[p->len])) { in get_cond()
1437 *t = l + p->len; in get_cond()
1500 const char *l = line; in parse() local
1511 while (*l == '>') { in parse()
1512 ++l; /* step over */ in parse()
1567 if (*l == '&') { /* m->cont_level == 0 checked below. */ in parse()
1568 ++l; /* step over */ in parse()
1571 if (*l == '(') { in parse()
1572 ++l; /* step over */ in parse()
1577 if (*l == '&') { /* m->cont_level == 0 checked below */ in parse()
1578 ++l; /* step over */ in parse()
1588 m->offset = (uint32_t)strtoul(l, &t, 0); in parse()
1589 if (l == t) in parse()
1591 file_magwarn(ms, "offset `%s' invalid", l); in parse()
1592 l = t; in parse()
1600 if (*l == '.') { in parse()
1601 l++; in parse()
1602 switch (*l) { in parse()
1646 *l); in parse()
1649 l++; in parse()
1653 if (*l == '~') { in parse()
1655 l++; in parse()
1657 if ((op = get_op(*l)) != -1) { in parse()
1659 l++; in parse()
1661 if (*l == '(') { in parse()
1663 l++; in parse()
1665 if (isdigit((unsigned char)*l) || *l == '-') { in parse()
1666 m->in_offset = (int32_t)strtol(l, &t, 0); in parse()
1667 if (l == t) in parse()
1670 "in_offset `%s' invalid", l); in parse()
1671 l = t; in parse()
1673 if (*l++ != ')' || in parse()
1674 ((m->in_op & FILE_OPINDIRECT) && *l++ != ')')) in parse()
1682 m->cond = get_cond(l, &l); in parse()
1692 if (*l == 'u') { in parse()
1698 m->type = get_type(type_tbl, l + 1, &l); in parse()
1704 m->type = get_standard_integer_type(l, &l); in parse()
1716 m->type = get_type(type_tbl, l, &l); in parse()
1723 if (*l == 'd') in parse()
1724 m->type = get_standard_integer_type(l, &l); in parse()
1725 else if (*l == 's' && !isalpha((unsigned char)l[1])) { in parse()
1727 ++l; in parse()
1734 m->type = get_type(special_tbl, l, &l); in parse()
1739 file_magwarn(ms, "type `%s' invalid", l); in parse()
1751 if (*l == '~') { in parse()
1756 ++l; in parse()
1760 if ((op = get_op(*l)) != -1) { in parse()
1763 ++l; in parse()
1765 val = (uint64_t)strtoull(l, &t, 0); in parse()
1766 l = t; in parse()
1768 eatsize(&l); in parse()
1772 while (!isspace((unsigned char)*++l)) { in parse()
1773 switch (*l) { in parse()
1784 strtoul(l, &t, 0)); in parse()
1788 l = t - 1; in parse()
1851 "invalid", *l); in parse()
1855 if (l[1] == '/' && in parse()
1856 !isspace((unsigned char)l[2])) in parse()
1857 l++; in parse()
1874 switch (*l) { in parse()
1877 m->reln = *l; in parse()
1878 ++l; in parse()
1879 if (*l == '=') { in parse()
1885 ++l; in parse()
1892 m->reln = *l; in parse()
1893 ++l; in parse()
1894 if (*l == '=') { in parse()
1896 ++l; in parse()
1900 m->reln = *l; in parse()
1901 ++l; in parse()
1905 if (*l == 'x' && ((isascii((unsigned char)l[1]) && in parse()
1906 isspace((unsigned char)l[1])) || !l[1])) { in parse()
1907 m->reln = *l; in parse()
1908 ++l; in parse()
1915 if (m->reln != 'x' && getvalue(ms, m, &l, action)) in parse()
1928 if (l[0] == '\b') { in parse()
1929 ++l; in parse()
1931 } else if ((l[0] == '\\') && (l[1] == 'b')) { in parse()
1932 ++l; in parse()
1933 ++l; in parse()
1936 for (i = 0; (m->desc[i++] = *l++) != '\0' && i < sizeof(m->desc); ) in parse()
1963 const char *l = line; in parse_strength() local
1975 switch (*l) { in parse_strength()
1981 m->factor_op = *l++; in parse_strength()
1984 file_magwarn(ms, "Unknown factor op `%c'", *l); in parse_strength()
1988 factor = strtoul(l, &el, 0); in parse_strength()
1994 file_magwarn(ms, "Bad factor `%s'", l); in parse_strength()
2018 const char *l = line; in parse_apple() local
2023 "`%.8s', new type `%s'", m->mimetype, l); in parse_apple()
2028 for (i = 0; *l && ((isascii((unsigned char)*l) && in parse_apple()
2029 isalnum((unsigned char)*l)) || strchr("-+/.", *l)) && in parse_apple()
2030 i < sizeof(m->apple); m->apple[i++] = *l++) in parse_apple()
2032 if (i == sizeof(m->apple) && *l) { in parse_apple()
2053 const char *l = line; in parse_mime() local
2058 " new type `%s'", m->mimetype, l); in parse_mime()
2063 for (i = 0; *l && ((isascii((unsigned char)*l) && in parse_mime()
2064 isalnum((unsigned char)*l)) || strchr("-+/.", *l)) && in parse_mime()
2065 i < sizeof(m->mimetype); m->mimetype[i++] = *l++) in parse_mime()
2565 const char *l = *p; in eatsize() local
2567 if (LOWCASE(*l) == 'u') in eatsize()
2568 l++; in eatsize()
2570 switch (LOWCASE(*l)) { in eatsize()
2576 l++; in eatsize()
2582 *p = l; in eatsize()
