/* panic.h - Panic interface.
   Copyright (C) 2007, 2008 Free Software Foundation, Inc.
   Written by Neal H. Walfield <neal@gnu.org>.

   This file is part of the GNU Hurd.

   The GNU Hurd 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 2, or (at
   your option) any later version.

   The GNU Hurd 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, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA. */

#include <hurd/stddef.h>
#include <stdio.h>
#include <stdarg.h>
#include <backtrace.h>
#include <viengoos/thread.h>

#ifndef RM_INTERN
# include <hurd/thread.h>
#endif

extern char *program_name;

extern void _exit (int);

void
panic_ (const char *func, int line, const char *fmt, ...)
{
  va_list ap;

  va_start (ap, fmt);

  vg_thread_id_t tid = 0;
#ifdef USE_L4
  tid = l4_myself ();
#elif !defined (RM_INTERN)
  tid = hurd_myself ();
#else
# warning Unable to determine thread id for this platform.
#endif

  s_printf ("%s:%s:%d:%x: error: ", program_name, func, line, tid);
  s_vprintf (fmt, ap);
  s_printf ("\n");
  va_end (ap);

  backtrace_print ();

  _exit (127);
  for (;;)
    sched_yield ();
}