1 files changed, 126 insertions, 0 deletions
diff --git a/lib/libaccess/nsautherr.cpp b/lib/libaccess/nsautherr.cpp
new file mode 100644
index 00000000..308c0698
--- /dev/null
+++ b/lib/libaccess/nsautherr.cpp
@@ -0,0 +1,126 @@
+/** BEGIN COPYRIGHT BLOCK
+ * Copyright 2001 Sun Microsystems, Inc.
+ * Portions copyright 1999, 2001-2003 Netscape Communications Corporation.
+ * All rights reserved.
+ * END COPYRIGHT BLOCK **/
+
+/*
+ * Description (nsautherr.c)
+ *
+ *	This module provides facilities for handling authentication
+ *	errors.
+ */
+
+#include <string.h>
+#include "base/systems.h"
+#include "prprf.h"
+#include "libaccess/nserror.h"
+#include "libaccess/nsautherr.h"
+
+/* Error message formats XXX internationalize XXX */
+static char * nsaerrnomem = "insufficient dynamic memory";
+static char * nsaerrinval = "invalid argument";
+static char * nsaerropen = "error opening %s";
+static char * nsaerrmkdir = "error creating %s";
+static char * nsaerrname = "%s not found in database %s";
+static char * unknownerr = "error code %d";
+
+/*
+ * Description (nsadbErrorFmt)
+ *
+ *	This function formats an authentication error message into a
+ *	buffer provided by the caller.  The authentication error
+ *	information is passed in an error list structure.  The caller
+ *	can indicate how many error frames should be processed.  A
+ *	newline is inserted between messages for different error frames.
+ *
+ * Arguments:
+ *
+ *	errp			- error frame list pointer
+ *	msgbuf			- pointer to error message buffer
+ *	maxlen			- maximum length of generated message
+ *	maxdepth		- maximum depth for traceback
+ */
+
+NSAPI_PUBLIC void nsadbErrorFmt(NSErr_t * errp, char * msgbuf, int maxlen, int maxdepth)
+{
+    NSEFrame_t * efp;		/* error frame pointer */
+    int len;			/* length of error message text */
+    int depth = 0;		/* current depth */
+
+    msgbuf[0] = 0;
+
+    for (efp = errp->err_first; efp != 0; efp = efp->ef_next) {
+
+	/* Stop if the message buffer is full */
+	if (maxlen <= 0) break;
+
+	if (depth > 0) {
+	    /* Put a newline between error frame messages */
+	    *msgbuf++ = '\n';
+	    if (--maxlen <= 0) break;
+	}
+
+	/* Identify the facility generating the error and the id number */
+	len = PR_snprintf(msgbuf, maxlen,
+			  "[%s%d] ", efp->ef_program, efp->ef_errorid);
+	msgbuf += len;
+	maxlen -= len;
+
+	if (maxlen <= 0) break;
+
+	len = 0;
+
+	if (!strcmp(efp->ef_program, NSAuth_Program)) {
+
+	    switch (efp->ef_retcode) {
+	      case NSAERRNOMEM:
+		strncpy(msgbuf, nsaerrnomem, maxlen);
+		len = strlen(nsaerrnomem);
+		break;
+
+	      case NSAERRINVAL:
+		/* Invalid function argument error: */
+		strncpy(msgbuf, nsaerrinval, maxlen);
+		len = strlen(nsaerrinval);
+		break;
+
+	      case NSAERROPEN:
+		/* File open error: filename */
+		if (efp->ef_errc == 1) {
+		    len = PR_snprintf(msgbuf, maxlen, nsaerropen,
+				      efp->ef_errv[0], efp->ef_errv[1]);
+		}
+		break;
+
+	      case NSAERRMKDIR:
+		/* error creating database directory: database name */
+		if (efp->ef_errc == 1) {
+		    len = PR_snprintf(msgbuf, maxlen, nsaerrmkdir,
+				      efp->ef_errv[0]);
+		}
+		break;
+
+	      case NSAERRNAME:
+		/* user or group name not found: database, name */
+		if (efp->ef_errc == 2) {
+		    len = PR_snprintf(msgbuf, maxlen, nsaerrname,
+				      efp->ef_errv[0], efp->ef_errv[1]);
+		}
+		break;
+
+	      default:
+		len = PR_snprintf(msgbuf, maxlen, unknownerr, efp->ef_retcode);
+		break;
+	    }
+	}
+	else {
+	    len = PR_snprintf(msgbuf, maxlen, unknownerr, efp->ef_retcode);
+	}
+
+	msgbuf += len;
+	maxlen -= len;
+
+	if (++depth >= maxdepth) break;
+    }
+}