/**
* 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 <http://www.gnu.org/licenses/>.
*/
#include <slibc/internals.h>
#include <assert.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <errno.h>
/**
* The function that is called if an assertion fails.
*
* @param expression The expression that failed, `NULL` if `assert_perror` failed.
* @param errnum The code of the fatal error, 0 if `assert` failed.
* @param file The filename of the source cose whence the assertion was made.
* @param line The line in the source code whence the assertion was made.
* @param func The function in the source code whence the assertion was made,
* `NULL` if unknown (C99 is required.)
*/
void __assert_fail(const char* expression, int errnum, const char* file, int line, const char* func)
{
int tty = isatty(STDERR_FILENO);
fprintf(stderr,
_("%(\033[00;01m%)%s%(\033[00m%): "
"%(\033[31m%)assertion error%(\033[00m%) "
"at line %(\033[33m%)%i%(\033[00m%) "
"of file %(\033[35m%)%s%(\033[00m%)"
"%(, function %(\033[1;34m%)%s%(\033[00m%)%): "
"%(\033[31m%)%(exression failed: %)%s%(\033[00m%)\n"),
tty, program_invocation_name, tty,
tty, tty,
tty, line, tty,
tty, file, tty,
func != NULL, tty, func, tty,
tty, expression != NULL, (expression ? expression : strerror(errnum)), tty);
fflush(NULL); /* Flush all streams. */
abort();
}