| 1 | /* |
| 2 | * regerror - error-code expansion |
| 3 | * |
| 4 | * Copyright (c) 1998, 1999 Henry Spencer. All rights reserved. |
| 5 | * |
| 6 | * Development of this software was funded, in part, by Cray Research Inc., |
| 7 | * UUNET Communications Services Inc., Sun Microsystems Inc., and Scriptics |
| 8 | * Corporation, none of whom are responsible for the results. The author |
| 9 | * thanks all of them. |
| 10 | * |
| 11 | * Redistribution and use in source and binary forms -- with or without |
| 12 | * modification -- are permitted for any purpose, provided that |
| 13 | * redistributions in source form retain this entire copyright notice and |
| 14 | * indicate the origin and nature of any modifications. |
| 15 | * |
| 16 | * I'd appreciate being given credit for this package in the documentation |
| 17 | * of software which uses it, but that is not a requirement. |
| 18 | * |
| 19 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, |
| 20 | * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY |
| 21 | * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL |
| 22 | * HENRY SPENCER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
| 23 | * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
| 24 | * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; |
| 25 | * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, |
| 26 | * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR |
| 27 | * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF |
| 28 | * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| 29 | * |
| 30 | */ |
| 31 | |
| 32 | #include "regguts.h" |
| 33 | |
| 34 | /* unknown-error explanation */ |
| 35 | static char unk[] = "*** unknown regex error code 0x%x ***"; |
| 36 | |
| 37 | /* struct to map among codes, code names, and explanations */ |
| 38 | static struct rerr { |
| 39 | int code; |
| 40 | char *name; |
| 41 | char *explain; |
| 42 | } rerrs[] = { |
| 43 | /* the actual table is built from regex.h */ |
| 44 | # include "regerrs.h" |
| 45 | { -1, "", "oops" }, /* explanation special-cased in code */ |
| 46 | }; |
| 47 | |
| 48 | /* |
| 49 | - regerror - the interface to error numbers |
| 50 | */ |
| 51 | /* ARGSUSED */ |
| 52 | size_t /* actual space needed (including NUL) */ |
| 53 | wx_regerror(rxerrcode, preg, errbuf, errbuf_size) |
| 54 | int rxerrcode; /* error code, or REG_ATOI or REG_ITOA */ |
| 55 | CONST regex_t *preg; /* associated regex_t (unused at present) */ |
| 56 | char *errbuf; /* result buffer (unless errbuf_size==0) */ |
| 57 | size_t errbuf_size; /* available space in errbuf, can be 0 */ |
| 58 | { |
| 59 | struct rerr *r; |
| 60 | char *msg; |
| 61 | char convbuf[sizeof(unk)+50]; /* 50 = plenty for int */ |
| 62 | size_t len; |
| 63 | int icode; |
| 64 | |
| 65 | switch (rxerrcode) { |
| 66 | case REG_ATOI: /* convert name to number */ |
| 67 | for (r = rerrs; r->code >= 0; r++) |
| 68 | if (strcmp(r->name, errbuf) == 0) |
| 69 | break; |
| 70 | sprintf(convbuf, "%d", r->code); /* -1 for unknown */ |
| 71 | msg = convbuf; |
| 72 | break; |
| 73 | case REG_ITOA: /* convert number to name */ |
| 74 | icode = atoi(errbuf); /* not our problem if this fails */ |
| 75 | for (r = rerrs; r->code >= 0; r++) |
| 76 | if (r->code == icode) |
| 77 | break; |
| 78 | if (r->code >= 0) |
| 79 | msg = r->name; |
| 80 | else { /* unknown; tell him the number */ |
| 81 | sprintf(convbuf, "REG_%u", (unsigned)icode); |
| 82 | msg = convbuf; |
| 83 | } |
| 84 | break; |
| 85 | default: /* a real, normal error code */ |
| 86 | for (r = rerrs; r->code >= 0; r++) |
| 87 | if (r->code == rxerrcode) |
| 88 | break; |
| 89 | if (r->code >= 0) |
| 90 | msg = r->explain; |
| 91 | else { /* unknown; say so */ |
| 92 | sprintf(convbuf, unk, rxerrcode); |
| 93 | msg = convbuf; |
| 94 | } |
| 95 | break; |
| 96 | } |
| 97 | |
| 98 | len = strlen(msg) + 1; /* space needed, including NUL */ |
| 99 | if (errbuf_size > 0) { |
| 100 | if (errbuf_size > len) |
| 101 | strcpy(errbuf, msg); |
| 102 | else { /* truncate to fit */ |
| 103 | strncpy(errbuf, msg, errbuf_size-1); |
| 104 | errbuf[errbuf_size-1] = '\0'; |
| 105 | } |
| 106 | } |
| 107 | |
| 108 | return len; |
| 109 | } |