1 #include <sys/types.h>
2 #include <stdio.h>
3 #include <string.h>
4 #include <ctype.h>
5 #include <limits.h>
6 #include <stdlib.h>
7 #include <regex.h>
8
9 #include "utils.h"
10 #include "regerror.ih"
11
12 /*
13 = #define REG_OKAY 0
14 = #define REG_NOMATCH 1
15 = #define REG_BADPAT 2
16 = #define REG_ECOLLATE 3
17 = #define REG_ECTYPE 4
18 = #define REG_EESCAPE 5
19 = #define REG_ESUBREG 6
20 = #define REG_EBRACK 7
21 = #define REG_EPAREN 8
22 = #define REG_EBRACE 9
23 = #define REG_BADBR 10
24 = #define REG_ERANGE 11
25 = #define REG_ESPACE 12
26 = #define REG_BADRPT 13
27 = #define REG_EMPTY 14
28 = #define REG_ASSERT 15
29 = #define REG_INVARG 16
30 = #define REG_ATOI 255 // convert name to number (!)
31 = #define REG_ITOA 0400 // convert number to name (!)
32 */
33 static struct rerr {
34 int code;
35 char *name;
36 char *explain;
37 } rerrs[] = {
38 REG_OKAY, "REG_OKAY", "no errors detected",
39 REG_NOMATCH, "REG_NOMATCH", "regexec() failed to match",
40 REG_BADPAT, "REG_BADPAT", "invalid regular expression",
41 REG_ECOLLATE, "REG_ECOLLATE", "invalid collating element",
42 REG_ECTYPE, "REG_ECTYPE", "invalid character class",
43 REG_EESCAPE, "REG_EESCAPE", "trailing backslash (\\)",
44 REG_ESUBREG, "REG_ESUBREG", "invalid backreference number",
45 REG_EBRACK, "REG_EBRACK", "brackets ([ ]) not balanced",
46 REG_EPAREN, "REG_EPAREN", "parentheses not balanced",
47 REG_EBRACE, "REG_EBRACE", "braces not balanced",
48 REG_BADBR, "REG_BADBR", "invalid repetition count(s)",
49 REG_ERANGE, "REG_ERANGE", "invalid character range",
50 REG_ESPACE, "REG_ESPACE", "out of memory",
51 REG_BADRPT, "REG_BADRPT", "repetition-operator operand invalid",
52 REG_EMPTY, "REG_EMPTY", "empty (sub)expression",
53 REG_ASSERT, "REG_ASSERT", "\"can't happen\" -- you found a bug",
54 REG_INVARG, "REG_INVARG", "invalid argument to regex routine",
55 -1, "", "*** unknown regexp error code ***",
56 };
57
58 /*
59 - regerror - the interface to error numbers
60 = extern size_t regerror(int, const regex_t *, char *, size_t);
61 */
62 /* ARGSUSED */
63 size_t
regerror(int errcode,const regex_t * preg,char * errbuf,size_t errbuf_size)64 regerror(
65 int errcode,
66 const regex_t *preg,
67 char *errbuf,
68 size_t errbuf_size)
69 {
70 register struct rerr *r;
71 register size_t len;
72 register int target = errcode &~ REG_ITOA;
73 register char *s;
74 char convbuf[50];
75
76 if (errcode == REG_ATOI)
77 s = regatoi(preg, convbuf);
78 else {
79 for (r = rerrs; r->code >= 0; r++)
80 if (r->code == target)
81 break;
82
83 if (errcode®_ITOA) {
84 if (r->code >= 0)
85 (void) strcpy(convbuf, r->name);
86 else
87 sprintf(convbuf, "REG_0x%x", target);
88 assert(strlen(convbuf) < sizeof(convbuf));
89 s = convbuf;
90 } else
91 s = r->explain;
92 }
93
94 len = strlen(s) + 1;
95 if (errbuf_size > 0) {
96 if (errbuf_size > len)
97 (void) strcpy(errbuf, s);
98 else {
99 (void) strncpy(errbuf, s, errbuf_size-1);
100 errbuf[errbuf_size-1] = '\0';
101 }
102 }
103
104 return(len);
105 }
106
107 /*
108 - regatoi - internal routine to implement REG_ATOI
109 == static char *regatoi(const regex_t *preg, char *localbuf);
110 */
111 static char *
regatoi(preg,localbuf)112 regatoi(preg, localbuf)
113 const regex_t *preg;
114 char *localbuf;
115 {
116 register struct rerr *r;
117
118 for (r = rerrs; r->code >= 0; r++)
119 if (strcmp(r->name, preg->re_endp) == 0)
120 break;
121 if (r->code < 0)
122 return("0");
123
124 sprintf(localbuf, "%d", r->code);
125 return(localbuf);
126 }
127