Imported Upstream version 93u+upstream

1 files changed, 124 insertions, 0 deletions

diff --git a/src/lib/libast/uwin/err.c b/src/lib/libast/uwin/err.c
new file mode 100644
index 0000000..123a64e
--- /dev/null
+++ b/src/lib/libast/uwin/err.c
@@ -0,0 +1,124 @@
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*          Copyright (c) 1985-2011 AT&T Intellectual Property          *
+*                      and is licensed under the                       *
+*                 Eclipse Public License, Version 1.0                  *
+*                    by AT&T Intellectual Property                     *
+*                                                                      *
+*                A copy of the License is available at                 *
+*          http://www.eclipse.org/org/documents/epl-v10.html           *
+*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                 Glenn Fowler <gsf@research.att.com>                  *
+*                  David Korn <dgk@research.att.com>                   *
+*                   Phong Vo <kpv@research.att.com>                    *
+*                                                                      *
+***********************************************************************/
+#include "FEATURE/uwin"
+
+#if !_UWIN
+
+void _STUB_err(){}
+
+#else
+
+#pragma prototyped
+
+/*
+ * bsd 4.4 compatibility
+ *
+ * NOTE: errorv(ERROR_NOID) => the first arg is the printf format
+ */
+
+#include <ast.h>
+#include <error.h>
+
+#include <windows.h>
+
+#ifdef __EXPORT__
+#define extern	__EXPORT__
+#endif
+
+static void
+errmsg(int level, int code, const char* fmt, va_list ap)
+{
+	if (!error_info.id)
+	{
+		struct _astdll*	dp = _ast_getdll();
+		char*		s;
+		char*		t;
+
+		if (s = dp->_ast__argv[0])
+		{
+			if (t = strrchr(s, '/'))
+				s = t + 1;
+			error_info.id = s;
+		}
+	}
+	errorv(fmt, level|ERROR_NOID, ap);
+	if ((level & ERROR_LEVEL) >= ERROR_ERROR)
+		exit(code);
+}
+
+extern void verr(int code, const char* fmt, va_list ap)
+{
+	errmsg(ERROR_ERROR|ERROR_SYSTEM, code, fmt, ap);
+}
+
+extern void err(int code, const char* fmt, ...)
+{
+	va_list	ap;
+
+	va_start(ap, fmt);
+	errmsg(ERROR_ERROR|ERROR_SYSTEM, code, fmt, ap);
+	va_end(ap);
+}
+
+extern void verrx(int code, const char* fmt, va_list ap)
+{
+	errmsg(ERROR_ERROR, code, fmt, ap);
+}
+
+extern void errx(int code, const char* fmt, ...)
+{
+	va_list	ap;
+
+	va_start(ap, fmt);
+	errmsg(ERROR_ERROR, code, fmt, ap);
+	va_end(ap);
+}
+
+extern void vwarn(const char* fmt, va_list ap)
+{
+	errmsg(ERROR_WARNING|ERROR_SYSTEM, 0, fmt, ap);
+}
+
+extern void warn(const char* fmt, ...)
+{
+	va_list	ap;
+
+	va_start(ap, fmt);
+	errmsg(ERROR_WARNING|ERROR_SYSTEM, 0, fmt, ap);
+	va_end(ap);
+}
+
+extern void vwarnx(const char* fmt, va_list ap)
+{
+	errmsg(ERROR_WARNING, 0, fmt, ap);
+}
+
+extern void warnx(const char* fmt, ...)
+{
+	va_list	ap;
+
+	va_start(ap, fmt);
+	errmsg(ERROR_WARNING, 0, fmt, ap);
+	va_end(ap);
+}
+
+#endif