From 6c726a79d442a1b5ecb187c7bf5e6834a963c5f4 Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Tue, 17 Nov 2015 02:46:37 +0100 Subject: split error.c MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- src/error.c | 192 --------------------------------------------- src/error/error.c | 44 +++++++++++ src/error/error_at_line.c | 47 +++++++++++ src/error/variables.c | 61 ++++++++++++++ src/error/verror.c | 40 ++++++++++ src/error/verror_at_line.c | 83 ++++++++++++++++++++ 6 files changed, 275 insertions(+), 192 deletions(-) delete mode 100644 src/error.c create mode 100644 src/error/error.c create mode 100644 src/error/error_at_line.c create mode 100644 src/error/variables.c create mode 100644 src/error/verror.c create mode 100644 src/error/verror_at_line.c diff --git a/src/error.c b/src/error.c deleted file mode 100644 index c560d2a..0000000 --- a/src/error.c +++ /dev/null @@ -1,192 +0,0 @@ -/** - * slibc — Yet another C library - * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) - * - * This program is free software: you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation, either version 3 of the License, or - * (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see . - */ -#include -#include -#include -#include -#include -#include -#include -#include - - - -/** - * Print an error message with a detailed description, and optionally exit. - * - * This is a GNU extension. - * - * @param status The process will exit, with the function returning, with this - * exit status, unless it is zero. If zero, the process shall not exit. - * @param errnum The value of `errno` when the error occurred, zero if the a textual - * description of the error, further than that of `format`, shall not - * be printed. - * @param format Formatting-string for a detailed description of what happend. - * @param args Formatting-arguments for `format`. - */ -void error(int status, int errnum, const char* format, ...) -{ - va_list args; - va_start(args, format); - verror_at_line(status, errnum, NULL, 0, format, args); - va_end(args); -} - - -/** - * Variant of `error` that uses `va_list` instead of variadic arguments. - * - * This is a slibc extension to the GNU extension `error`. - * - * @param status The process will exit, with the function returning, with this - * exit status, unless it is zero. If zero, the process shall not exit. - * @param errnum The value of `errno` when the error occurred, zero if the a textual - * description of the error, further than that of `format`, shall not - * be printed. - * @param format Formatting-string for a detailed description of what happend. - * @param args Formatting-arguments for `format`. - */ -void verror(int status, int errnum, const char* format, va_list args) -{ - verror_at_line(status, errnum, NULL, 0, format, args); -} - - -/** - * Variant of `error` that prints the filename and the line - * number whence the error occurred. - * - * This is a GNU extension. - * - * @param status The process will exit, with the function returning, with this - * exit status, unless it is zero. If zero, the process shall not exit. - * @param errnum The value of `errno` when the error occurred, zero if the a textual - * description of the error, further than that of `format`, shall not - * be printed. - * @param filename The filename of the source code file where the error occurred. - * @param linenum The line number of in the source code file where the error occurred. - * @param format Formatting-string for a detailed description of what happend. - * @param args Formatting-arguments for `format`. - */ -void error_at_line(int status, int errnum, const char* filename, - unsigned int linenum, const char* format, ...) -{ - va_list args; - va_start(args, format); - verror_at_line(status, errnum, filename, linenum, format, args); - va_end(args); -} - - -/** - * Variant of `verror` that prints the filename and the line - * number whence the error occurred. - * - * This is a slibc extension to the GNU extension `error_at_line`. - * - * @param status The process will exit, with the function returning, with this - * exit status, unless it is zero. If zero, the process shall not exit. - * @param errnum The value of `errno` when the error occurred, zero if the a textual - * description of the error, further than that of `format`, shall not - * be printed. - * @param filename The filename of the source code file where the error occurred. - * @param linenum The line number of in the source code file where the error occurred. - * @param format Formatting-string for a detailed description of what happend. - * @param args Formatting-arguments for `format`. - */ -void verror_at_line(int status, int errnum, const char* filename, - unsigned int linenum, const char* format, va_list args) -{ - int tty = isatty(STDERR_FILENO); - void (*pname)(void) = error_print_progname; - - static const char* last_filename = NULL; - static unsigned int last_linenum = 0; - static int last_errnum = 0; - - if (error_one_per_line) - if ((last_filename == filename) && (last_linenum == linenum) && (last_errnum == errnum)) - goto skip_print; - - if (pname != NULL) - pname(); - else - { - fflush(stdout); - fprintf(stderr, "%(\033[0;1;31m)%s%(\033[0m)", - tty, program_invocation_name, tty); - } - - fprintf(stderr, "%(: %(\033[35m%)%s%(\033[0m%): %(\033[32m%)%u%(\033[0m%)%)%(: %s%)%(: %)", - filename != NULL, tty, filename, tty, tty, linenum, tty, - errnum != 0, strerror(errnum) /* TODO strerror is not MT-Safe */, format != NULL); - - if (filename != NULL) - last_filename = filename, last_linenum = linenum, last_errnum = errnum; - - vfprintf(stderr, format, args); - fprintf(stderr, "\n", program_invocation_name); - fflush(stderr); - - skip_print: - error_message_count++; /* TODO lock around this */ - if (status) - exit(status); -} - - -/** - * Counts the number of times `error` ( verror`) and - * `error_at_line` (`verror_at_line`) has returned. - * This variable is global and shared by all threads. - * - * This is a GNU extension. - */ -volatile unsigned int error_message_count = 0; - - -/** - * If set to non-zero (the default), `error_at_line` - * and `verror_at_line` restrict themself to only - * print an error the first time it appears. This - * is determined by the uniqueness of the combination - * of the values on `filename` and `linenum`. However - * it will forget the line the next time the function - * is called from a different line. This variable is - * global and shared by all threads. Has a slibc - * modification, `errnum` is also remembered, meaning - * if the error code is different (zero is considered - * an error code), the error is printed even if it - * occurred on the same line as the last time. - * - * This is a GNU extension. - */ -volatile int error_one_per_line = 1; - - -/** - * If not `NULL`, this function is used instead of - * flushing stdout and printing the process name to - * stderr, by `error` (`verror`) and `verror_at_line` - * (`verror_at_line`). This variable is global and - * shared by all threads. - * - * This is a GNU extension. - */ -void (*volatile error_print_progname)(void) = NULL; - diff --git a/src/error/error.c b/src/error/error.c new file mode 100644 index 0000000..ddbb681 --- /dev/null +++ b/src/error/error.c @@ -0,0 +1,44 @@ +/** + * slibc — Yet another C library + * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include +#include +#include + + + +/** + * Print an error message with a detailed description, and optionally exit. + * + * This is a GNU extension. + * + * @param status The process will exit, with the function returning, with this + * exit status, unless it is zero. If zero, the process shall not exit. + * @param errnum The value of `errno` when the error occurred, zero if the a textual + * description of the error, further than that of `format`, shall not + * be printed. + * @param format Formatting-string for a detailed description of what happend. + * @param args Formatting-arguments for `format`. + */ +void error(int status, int errnum, const char* format, ...) +{ + va_list args; + va_start(args, format); + verror_at_line(status, errnum, NULL, 0, format, args); + va_end(args); +} + diff --git a/src/error/error_at_line.c b/src/error/error_at_line.c new file mode 100644 index 0000000..fbfbae3 --- /dev/null +++ b/src/error/error_at_line.c @@ -0,0 +1,47 @@ +/** + * slibc — Yet another C library + * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include +#include + + + +/** + * Variant of `error` that prints the filename and the line + * number whence the error occurred. + * + * This is a GNU extension. + * + * @param status The process will exit, with the function returning, with this + * exit status, unless it is zero. If zero, the process shall not exit. + * @param errnum The value of `errno` when the error occurred, zero if the a textual + * description of the error, further than that of `format`, shall not + * be printed. + * @param filename The filename of the source code file where the error occurred. + * @param linenum The line number of in the source code file where the error occurred. + * @param format Formatting-string for a detailed description of what happend. + * @param args Formatting-arguments for `format`. + */ +void error_at_line(int status, int errnum, const char* filename, + unsigned int linenum, const char* format, ...) +{ + va_list args; + va_start(args, format); + verror_at_line(status, errnum, filename, linenum, format, args); + va_end(args); +} + diff --git a/src/error/variables.c b/src/error/variables.c new file mode 100644 index 0000000..9fd252e --- /dev/null +++ b/src/error/variables.c @@ -0,0 +1,61 @@ +/** + * slibc — Yet another C library + * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include + + + +/** + * Counts the number of times `error` ( verror`) and + * `error_at_line` (`verror_at_line`) has returned. + * This variable is global and shared by all threads. + * + * This is a GNU extension. + */ +volatile unsigned int error_message_count = 0; + + +/** + * If set to non-zero (the default), `error_at_line` + * and `verror_at_line` restrict themself to only + * print an error the first time it appears. This + * is determined by the uniqueness of the combination + * of the values on `filename` and `linenum`. However + * it will forget the line the next time the function + * is called from a different line. This variable is + * global and shared by all threads. Has a slibc + * modification, `errnum` is also remembered, meaning + * if the error code is different (zero is considered + * an error code), the error is printed even if it + * occurred on the same line as the last time. + * + * This is a GNU extension. + */ +volatile int error_one_per_line = 1; + + +/** + * If not `NULL`, this function is used instead of + * flushing stdout and printing the process name to + * stderr, by `error` (`verror`) and `verror_at_line` + * (`verror_at_line`). This variable is global and + * shared by all threads. + * + * This is a GNU extension. + */ +void (*volatile error_print_progname)(void) = NULL; + diff --git a/src/error/verror.c b/src/error/verror.c new file mode 100644 index 0000000..70dfb13 --- /dev/null +++ b/src/error/verror.c @@ -0,0 +1,40 @@ +/** + * slibc — Yet another C library + * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include +#include + + + +/** + * Variant of `error` that uses `va_list` instead of variadic arguments. + * + * This is a slibc extension to the GNU extension `error`. + * + * @param status The process will exit, with the function returning, with this + * exit status, unless it is zero. If zero, the process shall not exit. + * @param errnum The value of `errno` when the error occurred, zero if the a textual + * description of the error, further than that of `format`, shall not + * be printed. + * @param format Formatting-string for a detailed description of what happend. + * @param args Formatting-arguments for `format`. + */ +void verror(int status, int errnum, const char* format, va_list args) +{ + verror_at_line(status, errnum, NULL, 0, format, args); +} + diff --git a/src/error/verror_at_line.c b/src/error/verror_at_line.c new file mode 100644 index 0000000..55845b3 --- /dev/null +++ b/src/error/verror_at_line.c @@ -0,0 +1,83 @@ +/** + * slibc — Yet another C library + * Copyright © 2015 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include +#include +#include +#include +#include +#include +#include + + + +/** + * Variant of `verror` that prints the filename and the line + * number whence the error occurred. + * + * This is a slibc extension to the GNU extension `error_at_line`. + * + * @param status The process will exit, with the function returning, with this + * exit status, unless it is zero. If zero, the process shall not exit. + * @param errnum The value of `errno` when the error occurred, zero if the a textual + * description of the error, further than that of `format`, shall not + * be printed. + * @param filename The filename of the source code file where the error occurred. + * @param linenum The line number of in the source code file where the error occurred. + * @param format Formatting-string for a detailed description of what happend. + * @param args Formatting-arguments for `format`. + */ +void verror_at_line(int status, int errnum, const char* filename, + unsigned int linenum, const char* format, va_list args) +{ + int tty = isatty(STDERR_FILENO); + void (*pname)(void) = error_print_progname; + + static const char* last_filename = NULL; + static unsigned int last_linenum = 0; + static int last_errnum = 0; + + if (error_one_per_line) + if ((last_filename == filename) && (last_linenum == linenum) && (last_errnum == errnum)) + goto skip_print; + + if (pname != NULL) + pname(); + else + { + fflush(stdout); + fprintf(stderr, "%(\033[0;1;31m)%s%(\033[0m)", + tty, program_invocation_name, tty); + } + + fprintf(stderr, "%(: %(\033[35m%)%s%(\033[0m%): %(\033[32m%)%u%(\033[0m%)%)%(: %s%)%(: %)", + filename != NULL, tty, filename, tty, tty, linenum, tty, + errnum != 0, strerror(errnum) /* TODO strerror is not MT-Safe */, format != NULL); + + if (filename != NULL) + last_filename = filename, last_linenum = linenum, last_errnum = errnum; + + vfprintf(stderr, format, args); + fprintf(stderr, "\n", program_invocation_name); + fflush(stderr); + + skip_print: + error_message_count++; /* TODO lock around this */ + if (status) + exit(status); +} + -- cgit v1.2.3-70-g09d2