newlib: perror() && mbstowcs()

git-svn-id: svn://kolibrios.org@5220 a494cfbc-eb01-0410-851d-a64ba20cac60
2014-12-06 08:37:08 +00:00
parent 3e62747fb5
commit b0a0820151
7 changed files with 192 additions and 107 deletions
--- a/contrib/sdk/sources/newlib/libc/stdio/perror.c
+++ b/contrib/sdk/sources/newlib/libc/stdio/perror.c
@@ -0,0 +1,100 @@
+/*
+ * Copyright (c) 1990 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that the above copyright notice and this paragraph are
+ * duplicated in all such forms and that any documentation,
+ * advertising materials, and other materials related to such
+ * distribution and use acknowledge that the software was developed
+ * by the University of California, Berkeley.  The name of the
+ * University may not be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ */
+
+/*
+FUNCTION
+<<perror>>---print an error message on standard error
+
+INDEX
+	perror
+INDEX
+	_perror_r
+
+ANSI_SYNOPSIS
+	#include <stdio.h>
+	void perror(char *<[prefix]>);
+
+	void _perror_r(struct _reent *<[reent]>, char *<[prefix]>);
+
+TRAD_SYNOPSIS
+	#include <stdio.h>
+	void perror(<[prefix]>)
+	char *<[prefix]>;
+
+	void _perror_r(<[reent]>, <[prefix]>)
+	struct _reent *<[reent]>;
+	char *<[prefix]>;
+
+DESCRIPTION
+Use <<perror>> to print (on standard error) an error message
+corresponding to the current value of the global variable <<errno>>.
+Unless you use <<NULL>> as the value of the argument <[prefix]>, the
+error message will begin with the string at <[prefix]>, followed by a
+colon and a space (<<: >>). The remainder of the error message is one
+of the strings described for <<strerror>>.
+
+The alternate function <<_perror_r>> is a reentrant version.  The
+extra argument <[reent]> is a pointer to a reentrancy structure.
+
+RETURNS
+<<perror>> returns no result.
+
+PORTABILITY
+ANSI C requires <<perror>>, but the strings issued vary from one
+implementation to another.
+
+Supporting OS subroutines required: <<close>>, <<fstat>>, <<isatty>>,
+<<lseek>>, <<read>>, <<sbrk>>, <<write>>.
+*/
+
+#include <_ansi.h>
+#include <reent.h>
+#include <stdio.h>
+#include <string.h>
+#include "local.h"
+
+_VOID
+_DEFUN(_perror_r, (ptr, s),
+       struct _reent *ptr _AND
+       _CONST char *s)
+{
+  char *error;
+  int dummy;
+
+  _REENT_SMALL_CHECK_INIT (ptr);
+  if (s != NULL && *s != '\0')
+    {
+      fputs (s, _stderr_r (ptr));
+      fputs (": ", _stderr_r (ptr));
+    }
+
+  if ((error = _strerror_r (ptr, ptr->_errno, 1, &dummy)) != NULL)
+    fputs (error, _stderr_r (ptr));
+
+  fputc ('\n', _stderr_r (ptr));
+}
+
+#ifndef _REENT_ONLY
+
+_VOID
+_DEFUN(perror, (s),
+       _CONST char *s)
+{
+  _perror_r (_REENT, s);
+}
+
+#endif