/* Copyright (C) 2004 Manuel Novoa III <mjn3@codepoet.org> * * GNU Library General Public License (LGPL) version 2 or later. * * Dedicated to Toni. See uClibc/DEDICATION.mjn3 for details. */ #define vfprintf __vfprintf #define _GNU_SOURCE #include <stdio.h> #include <stdlib.h> #include <string.h> #include <stdarg.h> #include <errno.h> #include <err.h> #ifdef __UCLIBC_HAS_THREADS__ #include <pthread.h> #endif #ifdef __UCLIBC_MJN3_ONLY__ #warning REMINDER: Deal with wide oriented stderr case. #endif static void vwarn_work(const char *format, va_list args, int showerr) { /* 0123 45678 9 a b*/ static const char fmt[] = "%s: \0: %s\n\0\n"; const char *f; char buf[64]; __STDIO_AUTO_THREADLOCK_VAR; /* Do this first, in case something below changes errno. */ f = fmt + 11; /* At 11. */ if (showerr) { f -= 4; /* At 7. */ __xpg_strerror_r_internal(errno, buf, sizeof(buf)); } __STDIO_AUTO_THREADLOCK(stderr); fprintf(stderr, fmt, __uclibc_progname); if (format) { vfprintf(stderr, format, args); f -= 2; /* At 5 (showerr) or 9. */ } fprintf(stderr, f, buf); __STDIO_AUTO_THREADUNLOCK(stderr); } void attribute_hidden __vwarn(const char *format, va_list args) { vwarn_work(format, args, 1); } strong_alias(__vwarn,vwarn) void warn(const char *format, ...) { va_list args; va_start(args, format); __vwarn(format, args); va_end(args); } void attribute_hidden __vwarnx(const char *format, va_list args) { vwarn_work(format, args, 0); } strong_alias(__vwarnx,vwarnx) void warnx(const char *format, ...) { va_list args; va_start(args, format); __vwarnx(format, args); va_end(args); } void attribute_hidden __verr(int status, const char *format, va_list args) { __vwarn(format, args); __exit(status); } strong_alias(__verr,verr) void attribute_noreturn err(int status, const char *format, ...) { va_list args; va_start(args, format); __verr(status, format, args); /* This should get optimized away. We'll leave it now for safety. */ /* The loop is added only to keep gcc happy. */ while(1) va_end(args); } void attribute_hidden __verrx(int status, const char *format, va_list args) { __vwarnx(format, args); __exit(status); } strong_alias(__verrx,verrx) void attribute_noreturn errx(int status, const char *format, ...) { va_list args; va_start(args, format); __verrx(status, format, args); /* This should get optimized away. We'll leave it now for safety. */ /* The loop is added only to keep gcc happy. */ while(1) va_end(args); }