1/* $NetBSD: regerror.c,v 1.2 2008/12/05 22:51:43 christos Exp $ */ 2 3/*- 4 * Copyright (c) 1992, 1993, 1994 Henry Spencer. 5 * Copyright (c) 1992, 1993, 1994 6 * The Regents of the University of California. All rights reserved. 7 * 8 * This code is derived from software contributed to Berkeley by 9 * Henry Spencer of the University of Toronto. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 * 35 * @(#)regerror.c 8.3 (Berkeley) 3/19/94 36 */ 37 38#if defined(LIBC_SCCS) && !defined(lint) 39static char sccsid[] = "@(#)regerror.c 8.3 (Berkeley) 3/19/94"; 40#endif /* LIBC_SCCS and not lint */ 41 42#include <sys/types.h> 43#include <stdio.h> 44#include <string.h> 45#include <ctype.h> 46#include <limits.h> 47#include <stdlib.h> 48#include <regex.h> 49 50#include "utils.h" 51 52/* ========= begin header generated by ./mkh ========= */ 53#ifdef __cplusplus 54extern "C" { 55#endif 56 57/* === regerror.c === */ 58static char *regatoi(const regex_t *preg, char *localbuf); 59 60#ifdef __cplusplus 61} 62#endif 63/* ========= end header generated by ./mkh ========= */ 64/* 65 = #define REG_NOMATCH 1 66 = #define REG_BADPAT 2 67 = #define REG_ECOLLATE 3 68 = #define REG_ECTYPE 4 69 = #define REG_EESCAPE 5 70 = #define REG_ESUBREG 6 71 = #define REG_EBRACK 7 72 = #define REG_EPAREN 8 73 = #define REG_EBRACE 9 74 = #define REG_BADBR 10 75 = #define REG_ERANGE 11 76 = #define REG_ESPACE 12 77 = #define REG_BADRPT 13 78 = #define REG_EMPTY 14 79 = #define REG_ASSERT 15 80 = #define REG_INVARG 16 81 = #define REG_ATOI 255 // convert name to number (!) 82 = #define REG_ITOA 0400 // convert number to name (!) 83 */ 84static struct rerr { 85 int code; 86 const char *name; 87 const char *explain; 88} rerrs[] = { 89 { REG_NOMATCH, "REG_NOMATCH", "regexec() failed to match" }, 90 { REG_BADPAT, "REG_BADPAT", "invalid regular expression" }, 91 { REG_ECOLLATE, "REG_ECOLLATE", "invalid collating element" }, 92 { REG_ECTYPE, "REG_ECTYPE", "invalid character class" }, 93 { REG_EESCAPE, "REG_EESCAPE", "trailing backslash (\\)" }, 94 { REG_ESUBREG, "REG_ESUBREG", "invalid backreference number" }, 95 { REG_EBRACK, "REG_EBRACK", "brackets ([ ]) not balanced" }, 96 { REG_EPAREN, "REG_EPAREN", "parentheses not balanced" }, 97 { REG_EBRACE, "REG_EBRACE", "braces not balanced" }, 98 { REG_BADBR, "REG_BADBR", "invalid repetition count(s)" }, 99 { REG_ERANGE, "REG_ERANGE", "invalid character range" }, 100 { REG_ESPACE, "REG_ESPACE", "out of memory" }, 101 { REG_BADRPT, "REG_BADRPT", "repetition-operator operand invalid" }, 102 { REG_EMPTY, "REG_EMPTY", "empty (sub)expression" }, 103 { REG_ASSERT, "REG_ASSERT", "\"can't happen\" -- you found a bug" }, 104 { REG_INVARG, "REG_INVARG", "invalid argument to regex routine" }, 105 { 0, "", "*** unknown regexp error code ***" }, 106}; 107 108/* 109 - regerror - the interface to error numbers 110 = extern size_t regerror(int, const regex_t *, char *, size_t); 111 */ 112/* ARGSUSED */ 113size_t 114regerror(int errcode, const regex_t *preg, char *errbuf, size_t errbuf_size) 115{ 116 struct rerr *r; 117 size_t len; 118 int target = errcode &~ REG_ITOA; 119 const char *s; 120 char convbuf[50]; 121 122 if (errcode == REG_ATOI) 123 s = regatoi(preg, convbuf); 124 else { 125 for (r = rerrs; r->code != 0; r++) 126 if (r->code == target) 127 break; 128 129 if (errcode®_ITOA) { 130 if (r->code != 0) { 131 assert(strlen(r->name) < sizeof(convbuf)); 132 (void) strlcpy(convbuf, r->name, sizeof(convbuf)); 133 } else 134 (void) snprintf(convbuf, sizeof(convbuf), 135 "REG_0x%x", target); 136 s = convbuf; 137 } else 138 s = r->explain; 139 } 140 141 len = strlen(s) + 1; 142 if (errbuf_size > 0) { 143 strlcpy(errbuf, s, errbuf_size); 144 } 145 146 return(len); 147} 148 149/* 150 - regatoi - internal routine to implement REG_ATOI 151 */ 152static char * 153regatoi(const regex_t *preg, char *localbuf) 154{ 155#if 0 /* we don't seem to use this and it gives a warning. */ 156 struct rerr *r; 157 size_t siz; 158 char *p; 159 160 for (r = rerrs; r->code != 0; r++) 161 if (strcmp(r->name, preg->re_endp) == 0) 162 break; 163 if (r->code == 0) 164 return("0"); 165 166 sprintf(localbuf, "%d", r->code); 167#else 168 *localbuf = '\0'; 169#endif 170 return(localbuf); 171} 172