error.c 3.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115
  1. /* Error handler for noninteractive utilities
  2. Copyright (C) 1990-1998, 2000-2004, 2005 Free Software Foundation, Inc.
  3. This file is part of the GNU C Library.
  4. The GNU C Library is free software; you can redistribute it and/or
  5. modify it under the terms of the GNU Lesser General Public
  6. License as published by the Free Software Foundation; either
  7. version 2.1 of the License, or (at your option) any later version.
  8. The GNU C Library is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  11. Lesser General Public License for more details.
  12. You should have received a copy of the GNU Lesser General Public
  13. License along with the GNU C Library; if not, write to the Free
  14. Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  15. 02111-1307 USA. */
  16. /* Written by David MacKenzie <djm@gnu.ai.mit.edu>. */
  17. /* Adjusted slightly by Erik Andersen <andersen@uclibc.org> */
  18. #include <stdio.h>
  19. #include <stdarg.h>
  20. #include <stdlib.h>
  21. #include <string.h>
  22. #include <error.h>
  23. /* Experimentally off - libc_hidden_proto(strcmp) */
  24. /* Experimentally off - libc_hidden_proto(strerror) */
  25. /* libc_hidden_proto(fprintf) */
  26. /* libc_hidden_proto(exit) */
  27. /* libc_hidden_proto(putc) */
  28. /* libc_hidden_proto(vfprintf) */
  29. /* libc_hidden_proto(fflush) */
  30. /* libc_hidden_proto(fputc) */
  31. /* libc_hidden_proto(__fputc_unlocked) */
  32. /* This variable is incremented each time `error' is called. */
  33. unsigned int error_message_count = 0;
  34. /* Sometimes we want to have at most one error per line. This
  35. variable controls whether this mode is selected or not. */
  36. int error_one_per_line;
  37. /* If NULL, error will flush stdout, then print on stderr the program
  38. name, a colon and a space. Otherwise, error will call this
  39. function without parameters instead. */
  40. void (*error_print_progname) (void) = NULL;
  41. extern __typeof(error) __error attribute_hidden;
  42. void __error (int status, int errnum, const char *message, ...)
  43. {
  44. va_list args;
  45. fflush (stdout);
  46. if (error_print_progname)
  47. (*error_print_progname) ();
  48. else
  49. fprintf (stderr, "%s: ", __uclibc_progname);
  50. va_start (args, message);
  51. vfprintf (stderr, message, args);
  52. va_end (args);
  53. ++error_message_count;
  54. if (errnum) {
  55. fprintf (stderr, ": %s", strerror (errnum));
  56. }
  57. putc ('\n', stderr);
  58. if (status)
  59. exit (status);
  60. }
  61. weak_alias(__error,error)
  62. extern __typeof(error_at_line) __error_at_line attribute_hidden;
  63. void __error_at_line (int status, int errnum, const char *file_name,
  64. unsigned int line_number, const char *message, ...)
  65. {
  66. va_list args;
  67. if (error_one_per_line) {
  68. static const char *old_file_name;
  69. static unsigned int old_line_number;
  70. if (old_line_number == line_number &&
  71. (file_name == old_file_name || !strcmp (old_file_name, file_name)))
  72. /* Simply return and print nothing. */
  73. return;
  74. old_file_name = file_name;
  75. old_line_number = line_number;
  76. }
  77. fflush (stdout);
  78. if (error_print_progname)
  79. (*error_print_progname) ();
  80. else
  81. fprintf (stderr, "%s:", __uclibc_progname);
  82. if (file_name != NULL)
  83. fprintf (stderr, "%s:%d: ", file_name, line_number);
  84. va_start (args, message);
  85. vfprintf (stderr, message, args);
  86. va_end (args);
  87. ++error_message_count;
  88. if (errnum) {
  89. fprintf (stderr, ": %s", strerror (errnum));
  90. }
  91. putc ('\n', stderr);
  92. if (status)
  93. exit (status);
  94. }
  95. weak_alias(__error_at_line,error_at_line)