1 files changed, 74 insertions, 0 deletions
diff --git a/private/crt32/stdio/wscanf.c b/private/crt32/stdio/wscanf.c
new file mode 100644
index 000000000..84b26b94e
--- /dev/null
+++ b/private/crt32/stdio/wscanf.c
@@ -0,0 +1,74 @@
+/***
+*wscanf.c - read formatted data from stdin
+*
+*	Copyright (c) 1985-1992, Microsoft Corporation. All rights reserved.
+*
+*Purpose:
+*	defines wscanf() - reads formatted data from stdin
+*
+*Revision History:
+*	05-16-92  KRS	Created from scanf.c.
+*
+*******************************************************************************/
+
+#include <cruntime.h>
+#include <stdio.h>
+#include <wchar.h>
+#include <assert.h>
+#include <stdarg.h>
+#include <file2.h>
+#include <internal.h>
+#include <os2dll.h>
+
+/***
+*int wscanf(format, ...) - read formatted data from stdin
+*
+*Purpose:
+*	Reads formatted data from stdin into arguments.  _input does the real
+*	work here.
+*
+*Entry:
+*	char *format - format string
+*	followed by list of pointers to storage for the data read.  The number
+*	and type are controlled by the format string.
+*
+*Exit:
+*	returns number of fields read and assigned
+*
+*Exceptions:
+*
+*******************************************************************************/
+
+int _CALLTYPE2 wscanf (
+	const wchar_t *format,
+	...
+	)
+/*
+ * stdin 'W'char_t 'SCAN', 'F'ormatted
+ */
+{
+	REG1 FILE *stream = stdin;
+	REG2 int retval;
+#ifdef MTHREAD
+	int index;
+#endif
+
+	va_list arglist;
+
+// UNDONE: make va_start work with wchar_t format string
+	va_start(arglist, format);
+
+	assert(format != NULL);
+
+#ifdef MTHREAD
+	index = _iob_index(stream);
+#endif
+
+	_lock_str(index);
+
+	retval = (_winput(stream,format,arglist));
+
+	_unlock_str(index);
+
+	return(retval);
+}