Imported Upstream version 93u+upstream

1 files changed, 52 insertions, 0 deletions

diff --git a/src/lib/libast/stdio/fgetws.c b/src/lib/libast/stdio/fgetws.c
new file mode 100644
index 0000000..d1adbed
--- /dev/null
+++ b/src/lib/libast/stdio/fgetws.c
@@ -0,0 +1,52 @@
+/***********************************************************************
+*                                                                      *
+*               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>                    *
+*                                                                      *
+***********************************************************************/
+#pragma prototyped
+
+#include "stdhdr.h"
+
+wchar_t*
+fgetws(wchar_t* s, int n, Sfio_t* f)
+{
+	register wchar_t*	p = s;
+	register wchar_t*	e = s + n - 1;
+	register wint_t		c;
+
+	STDIO_PTR(f, "fgets", wchar_t*, (wchar_t*, int, Sfio_t*), (s, n, f))
+
+	FWIDE(f, 0);
+	while (p < e && (c = fgetwc(f)) != WEOF && (*p++ = c) != '\n');
+	*p = 0;
+	return s;
+}
+
+wchar_t*
+getws(wchar_t* s)
+{
+	register wchar_t*	p = s;
+	register wchar_t*	e = s + BUFSIZ - 1;
+	register wint_t		c;
+
+	FWIDE(sfstdin, 0);
+	while (p < e && (c = fgetwc(sfstdin)) != WEOF && (*p++ = c) != '\n');
+	*p = 0;
+	return s;
+}