src/regex/regerror.c

/*
 * regerror - error-code expansion
 *
 * Copyright (c) 1998, 1999 Henry Spencer.	All rights reserved.
 *
 * Development of this software was funded, in part, by Cray Research Inc.,
 * UUNET Communications Services Inc., Sun Microsystems Inc., and Scriptics
 * Corporation, none of whom are responsible for the results.  The author
 * thanks all of them.
 *
 * Redistribution and use in source and binary forms -- with or without
 * modification -- are permitted for any purpose, provided that
 * redistributions in source form retain this entire copyright notice and
 * indicate the origin and nature of any modifications.
 *
 * I'd appreciate being given credit for this package in the documentation
 * of software which uses it, but that is not a requirement.
 *
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
 * HENRY SPENCER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 * $Header: /projects/cvsroot/pgsql-server/src/backend/regex/regerror.c,v 1.26 2003/08/04 00:43:21 momjian Exp $
 *
 */

#include "regguts.h"

/* unknown-error explanation */
static char unk[] = "*** unknown regex error code 0x%x ***";

/* struct to map among codes, code names, and explanations */
static struct rerr
{
	int code;
	char *name;
	char *explain;
}	rerrs[] =

{
	/* the actual table is built from regex.h */
#include "regerrs.h"
	{
		-1, "", "oops"
	},							/* explanation special-cased in code */
};

size_t
regerror(int errcode,		/* error code, or REG_ATOI or REG_ITOA */
			const regex_t *preg,	/* associated regex_t (unused at present) */
			char *errbuf,		/* result buffer (unless errbuf_size==0) */
			size_t errbuf_size) /* available space in errbuf, can be 0 */
            { return wx_regerror(errcode, preg, errbuf, errbuf_size); }
/*
 * pg_regerror - the interface to error numbers
 */
/* ARGSUSED */
size_t							/* actual space needed (including NUL) */
wx_regerror(int errcode,		/* error code, or REG_ATOI or REG_ITOA */
			const regex_t *preg,	/* associated regex_t (unused at present) */
			char *errbuf,		/* result buffer (unless errbuf_size==0) */
			size_t errbuf_size) /* available space in errbuf, can be 0 */
{
	struct rerr *r;
	char	   *msg;
	char		convbuf[sizeof(unk) + 50];		/* 50 = plenty for int */
	size_t		len;
	int			icode;

	switch (errcode)
	{
		case REG_ATOI:			/* convert name to number */
		for (r = rerrs; r->code >= 0; r++)
				if (strcmp(r->name, errbuf) == 0)
				break;
			sprintf(convbuf, "%d", r->code);	/* -1 for unknown */
			msg = convbuf;
			break;
		case REG_ITOA:			/* convert number to name */
			icode = atoi(errbuf);		/* not our problem if this fails */
			for (r = rerrs; r->code >= 0; r++)
				if (r->code == icode)
					break;
			if (r->code >= 0)
				msg = r->name;
			else
			{					/* unknown; tell him the number */
				sprintf(convbuf, "REG_%u", (unsigned) icode);
				msg = convbuf;
	}
			break;
		default:				/* a real, normal error code */
			for (r = rerrs; r->code >= 0; r++)
				if (r->code == errcode)
					break;
			if (r->code >= 0)
				msg = r->explain;
			else
			{					/* unknown; say so */
				sprintf(convbuf, unk, errcode);
				msg = convbuf;
			}
			break;
	}

	len = strlen(msg) + 1;		/* space needed, including NUL */
	if (errbuf_size > 0)
	{
		if (errbuf_size > len)
			strcpy(errbuf, msg);
		else
		{						/* truncate to fit */
			memcpy(errbuf, msg, errbuf_size - 1);  /*RN - was strncpy*/
			errbuf[errbuf_size - 1] = '\0';
		}
	}

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