TLA  Line data    Source code

       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                 :  * src/backend/regex/regerror.c
      31                 :  *
      32                 :  */
      33                 : 
      34                 : #include "regex/regguts.h"
      35                 : 
      36                 : /* unknown-error explanation */
      37                 : static const char unk[] = "*** unknown regex error code 0x%x ***";
      38                 : 
      39                 : /* struct to map among codes, code names, and explanations */
      40                 : static const struct rerr
      41                 : {
      42                 :     int         code;
      43                 :     const char *name;
      44                 :     const char *explain;
      45                 : }           rerrs[] =
      46                 : 
      47                 : {
      48                 :     /* the actual table is built from regex.h */
      49                 : #include "regex/regerrs.h"        /* pgrminclude ignore */
      50                 :     {
      51                 :         -1, "", "oops"
      52                 :     },                          /* explanation special-cased in code */
      53                 : };
      54                 : 
      55                 : /*
      56                 :  * pg_regerror - the interface to error numbers
      57                 :  */
      58                 : /* ARGSUSED */
      59                 : size_t                          /* actual space needed (including NUL) */
      60 CBC         127 : pg_regerror(int errcode,        /* error code, or REG_ATOI or REG_ITOA */
      61                 :             const regex_t *preg,    /* associated regex_t (unused at present) */
      62                 :             char *errbuf,       /* result buffer (unless errbuf_size==0) */
      63                 :             size_t errbuf_size) /* available space in errbuf, can be 0 */
      64                 : {
      65                 :     const struct rerr *r;
      66                 :     const char *msg;
      67                 :     char        convbuf[sizeof(unk) + 50];  /* 50 = plenty for int */
      68                 :     size_t      len;
      69                 :     int         icode;
      70                 : 
      71             127 :     switch (errcode)
      72                 :     {
      73 UBC           0 :         case REG_ATOI:          /* convert name to number */
      74               0 :             for (r = rerrs; r->code >= 0; r++)
      75               0 :                 if (strcmp(r->name, errbuf) == 0)
      76               0 :                     break;
      77               0 :             sprintf(convbuf, "%d", r->code);   /* -1 for unknown */
      78               0 :             msg = convbuf;
      79               0 :             break;
      80               0 :         case REG_ITOA:          /* convert number to name */
      81               0 :             icode = atoi(errbuf);   /* not our problem if this fails */
      82               0 :             for (r = rerrs; r->code >= 0; r++)
      83               0 :                 if (r->code == icode)
      84               0 :                     break;
      85               0 :             if (r->code >= 0)
      86               0 :                 msg = r->name;
      87                 :             else
      88                 :             {                   /* unknown; tell him the number */
      89               0 :                 sprintf(convbuf, "REG_%u", (unsigned) icode);
      90               0 :                 msg = convbuf;
      91                 :             }
      92               0 :             break;
      93 CBC         127 :         default:                /* a real, normal error code */
      94            1320 :             for (r = rerrs; r->code >= 0; r++)
      95            1320 :                 if (r->code == errcode)
      96             127 :                     break;
      97             127 :             if (r->code >= 0)
      98             127 :                 msg = r->explain;
      99                 :             else
     100                 :             {                   /* unknown; say so */
     101 UBC           0 :                 sprintf(convbuf, unk, errcode);
     102               0 :                 msg = convbuf;
     103                 :             }
     104 CBC         127 :             break;
     105                 :     }
     106                 : 
     107             127 :     len = strlen(msg) + 1;      /* space needed, including NUL */
     108             127 :     if (errbuf_size > 0)
     109                 :     {
     110             127 :         if (errbuf_size > len)
     111             127 :             strcpy(errbuf, msg);
     112                 :         else
     113                 :         {                       /* truncate to fit */
     114 UBC           0 :             memcpy(errbuf, msg, errbuf_size - 1);
     115               0 :             errbuf[errbuf_size - 1] = '\0';
     116                 :         }
     117                 :     }
     118                 : 
     119 CBC         127 :     return len;
     120                 : }