87 lines
3.0 KiB
C
87 lines
3.0 KiB
C
//----------------------------------------------------------------------------//
|
|
// GNU GPL OS/K //
|
|
// //
|
|
// Desc: How NOT to panic 101 //
|
|
// //
|
|
// //
|
|
// Copyright © 2018-2019 The OS/K Team //
|
|
// //
|
|
// This file is part of OS/K. //
|
|
// //
|
|
// OS/K 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 //
|
|
// any later version. //
|
|
// //
|
|
// OS/K 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 OS/K. If not, see <https://www.gnu.org/licenses/>. //
|
|
//----------------------------------------------------------------------------//
|
|
|
|
#include <extras/buf.h>
|
|
#include <kernel/proc.h>
|
|
#include <kernel/iomisc.h>
|
|
|
|
error_t vbprintf(Buffer_t *buf, const char *fmt, va_list ap);
|
|
|
|
//
|
|
// Failed assert() handler
|
|
//
|
|
noreturn void __assert_handler(const char *msg,
|
|
const char *file,
|
|
int line,
|
|
const char *func)
|
|
{
|
|
KeDisableIRQs();
|
|
|
|
KeStartPanic("In function '%s', from '%s' line %d\nAssertion failed:\n"
|
|
"'%s'", func, file, line, msg);
|
|
}
|
|
|
|
//
|
|
// Your best boy panic()
|
|
// This is CPU local...
|
|
//
|
|
noreturn void KeStartPanic(const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
KeDisableIRQs();
|
|
|
|
PsCurProc = NULL;
|
|
if (BStdOut == NULL) KeCrashSystem();
|
|
|
|
ExAttemptLock(&BStdOut->lock);
|
|
|
|
if (fmt == NULL) {
|
|
fmt = "(no message given)";
|
|
}
|
|
|
|
if (KeIsPanicking) {
|
|
bprintf(BStdOut, "\nDouble panic!");
|
|
KeHaltCPU();
|
|
}
|
|
|
|
KeIsPanicking = 1;
|
|
|
|
// We don't check vbprintf's output
|
|
// If it fails, what could we do anyway?
|
|
|
|
bprintf(BStdOut, "\nPANIC\n");
|
|
|
|
va_start(ap, fmt);
|
|
vbprintf(BStdOut, fmt, ap);
|
|
va_end(ap);
|
|
|
|
bputc(BStdOut, '\n');
|
|
|
|
BStdOut->flusher(BStdOut);
|
|
|
|
KeHaltCPU();
|
|
}
|
|
|