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))
252 get_type(const struct type_tbl_s *tbl, const char *l, const char **t) in get_type() argument
257 if (strncmp(l, p->name, p->len) == 0) { in get_type()
259 *t = l + p->len; in get_type()
267 get_standard_integer_type(const char *l, const char **t) in get_standard_integer_type() argument
271 if (isalpha((unsigned char)l[1])) { in get_standard_integer_type()
272 switch (l[1]) { in get_standard_integer_type()
305 l += 2; in get_standard_integer_type()
306 } else if (isdigit((unsigned char)l[1])) { in get_standard_integer_type()
317 if (isdigit((unsigned char)l[2])) { in get_standard_integer_type()
321 switch (l[1]) { in get_standard_integer_type()
338 l += 2; in get_standard_integer_type()
344 ++l; in get_standard_integer_type()
347 *t = l; in get_standard_integer_type()
1422 get_cond(const char *l, const char **t) in get_cond() argument
1437 if (strncmp(l, p->name, p->len) == 0 && in get_cond()
1438 isspace((unsigned char)l[p->len])) { in get_cond()
1440 *t = l + p->len; in get_cond()
1503 const char *l = line; in parse() local
1514 while (*l == '>') { in parse()
1515 ++l; /* step over */ in parse()
1570 if (*l == '&') { /* m->cont_level == 0 checked below. */ in parse()
1571 ++l; /* step over */ in parse()
1574 if (*l == '(') { in parse()
1575 ++l; /* step over */ in parse()
1580 if (*l == '&') { /* m->cont_level == 0 checked below */ in parse()
1581 ++l; /* step over */ in parse()
1591 m->offset = (uint32_t)strtoul(l, &t, 0); in parse()
1592 if (l == t) in parse()
1594 file_magwarn(ms, "offset `%s' invalid", l); in parse()
1595 l = t; in parse()
1603 if (*l == '.') { in parse()
1604 l++; in parse()
1605 switch (*l) { in parse()
1649 *l); in parse()
1652 l++; in parse()
1656 if (*l == '~') { in parse()
1658 l++; in parse()
1660 if ((op = get_op(*l)) != -1) { in parse()
1662 l++; in parse()
1664 if (*l == '(') { in parse()
1666 l++; in parse()
1668 if (isdigit((unsigned char)*l) || *l == '-') { in parse()
1669 m->in_offset = (int32_t)strtol(l, &t, 0); in parse()
1670 if (l == t) in parse()
1673 "in_offset `%s' invalid", l); in parse()
1674 l = t; in parse()
1676 if (*l++ != ')' || in parse()
1677 ((m->in_op & FILE_OPINDIRECT) && *l++ != ')')) in parse()
1685 m->cond = get_cond(l, &l); in parse()
1695 if (*l == 'u') { in parse()
1701 m->type = get_type(type_tbl, l + 1, &l); in parse()
1707 m->type = get_standard_integer_type(l, &l); in parse()
1719 m->type = get_type(type_tbl, l, &l); in parse()
1726 if (*l == 'd') in parse()
1727 m->type = get_standard_integer_type(l, &l); in parse()
1728 else if (*l == 's' && !isalpha((unsigned char)l[1])) { in parse()
1730 ++l; in parse()
1737 m->type = get_type(special_tbl, l, &l); in parse()
1742 file_magwarn(ms, "type `%s' invalid", l); in parse()
1754 if (*l == '~') { in parse()
1759 ++l; in parse()
1763 if ((op = get_op(*l)) != -1) { in parse()
1766 ++l; in parse()
1768 val = (uint64_t)strtoull(l, &t, 0); in parse()
1769 l = t; in parse()
1771 eatsize(&l); in parse()
1775 while (!isspace((unsigned char)*++l)) { in parse()
1776 switch (*l) { in parse()
1787 strtoul(l, &t, 0)); in parse()
1791 l = t - 1; in parse()
1854 "invalid", *l); in parse()
1858 if (l[1] == '/' && in parse()
1859 !isspace((unsigned char)l[2])) in parse()
1860 l++; in parse()
1877 switch (*l) { in parse()
1880 m->reln = *l; in parse()
1881 ++l; in parse()
1882 if (*l == '=') { in parse()
1888 ++l; in parse()
1895 m->reln = *l; in parse()
1896 ++l; in parse()
1897 if (*l == '=') { in parse()
1899 ++l; in parse()
1903 m->reln = *l; in parse()
1904 ++l; in parse()
1908 if (*l == 'x' && ((isascii((unsigned char)l[1]) && in parse()
1909 isspace((unsigned char)l[1])) || !l[1])) { in parse()
1910 m->reln = *l; in parse()
1911 ++l; in parse()
1918 if (m->reln != 'x' && getvalue(ms, m, &l, action)) in parse()
1931 if (l[0] == '\b') { in parse()
1932 ++l; in parse()
1934 } else if ((l[0] == '\\') && (l[1] == 'b')) { in parse()
1935 ++l; in parse()
1936 ++l; in parse()
1939 for (i = 0; (m->desc[i++] = *l++) != '\0' && i < sizeof(m->desc); ) in parse()
1966 const char *l = line; in parse_strength() local
1983 switch (*l) { in parse_strength()
1989 m->factor_op = *l++; in parse_strength()
1992 file_magwarn(ms, "Unknown factor op `%c'", *l); in parse_strength()
1996 factor = strtoul(l, &el, 0); in parse_strength()
2002 file_magwarn(ms, "Bad factor `%s'", l); in parse_strength()
2026 const char *l = line; in parse_apple() local
2031 "`%.8s', new type `%s'", m->mimetype, l); in parse_apple()
2036 for (i = 0; *l && ((isascii((unsigned char)*l) && in parse_apple()
2037 isalnum((unsigned char)*l)) || strchr("-+/.", *l)) && in parse_apple()
2038 i < sizeof(m->apple); m->apple[i++] = *l++) in parse_apple()
2040 if (i == sizeof(m->apple) && *l) { in parse_apple()
2061 const char *l = line; in parse_mime() local
2066 " new type `%s'", m->mimetype, l); in parse_mime()
2071 for (i = 0; *l && ((isascii((unsigned char)*l) && in parse_mime()
2072 isalnum((unsigned char)*l)) || strchr("-+/.", *l)) && in parse_mime()
2073 i < sizeof(m->mimetype); m->mimetype[i++] = *l++) in parse_mime()
2573 const char *l = *p; in eatsize() local
2575 if (LOWCASE(*l) == 'u') in eatsize()
2576 l++; in eatsize()
2578 switch (LOWCASE(*l)) { in eatsize()
2584 l++; in eatsize()
2590 *p = l; in eatsize()
