minix/lib/libmthread/misc.c
2012-03-25 21:58:14 +02:00

111 lines
3.3 KiB
C

#include <minix/mthread.h>
#include <stdio.h>
#include "global.h"
#include "proto.h"
/*===========================================================================*
* mthread_debug_f *
*===========================================================================*/
#ifdef MDEBUG
void mthread_debug_f(const char *file, int line, const char *msg)
{
/* Print debug message */
printf("MTH (%s:%d): %s\n", file, line, msg);
}
#endif
/*===========================================================================*
* mthread_panic_f *
*===========================================================================*/
#ifdef MDEBUG
void mthread_panic_f(const char *file, int line, const char *msg)
{
/* Print panic message to stdout and exit */
volatile int *sf;
sf = NULL;
printf("mthread panic (%s:%d): ", file, line);
printf("%s", msg);
printf("\n");
fflush(stdout); /* Force debug print to screen */
*((int *) sf ) = 1; /* Cause segfault to generate trace */
exit(1);
}
#else
void mthread_panic_s(void)
{
/* Silent panic */
volatile int *sf;
sf = NULL;
*((int *) sf ) = 1; /* Cause segfault to generate trace */
exit(1);
}
#endif
/*===========================================================================*
* mthread_verify_f *
*===========================================================================*/
#ifdef MDEBUG
void mthread_verify_f(char *file, int line)
{
/* Verify library state. It is assumed this function is never called from
* a spawned thread, but from the 'main' thread. The library should be
* quiescent; no mutexes, conditions, or threads in use. All threads are to
* be in DEAD state.
*/
mthread_thread_t t;
mthread_tcb_t *tcb;
int threads_ok = 1, conditions_ok = 1, mutexes_ok = 1, attributes_ok = 1;
for (t = (mthread_thread_t) 0; threads_ok && t < no_threads; t++) {
tcb = mthread_find_tcb(t);
if (tcb->m_state != MS_DEAD) threads_ok = 0;
}
conditions_ok = mthread_cond_verify();
mutexes_ok = mthread_mutex_verify();
attributes_ok = mthread_attr_verify();
printf("(%s:%d) VERIFY ", file, line);
printf("| threads: %s |", (threads_ok ? "ok": "NOT ok"));
printf("| cond: %s |", (conditions_ok ? "ok": "NOT ok"));
printf("| mutex: %s |", (mutexes_ok ? "ok": "NOT ok"));
printf("| attr: %s |", (attributes_ok ? "ok": "NOT ok"));
printf("\n");
if(!threads_ok || !conditions_ok || !mutexes_ok)
mthread_panic("Library state corrupt\n");
}
/*===========================================================================*
* mthread_stats *
*===========================================================================*/
void mthread_stats(void)
{
mthread_thread_t t;
mthread_tcb_t *tcb;
int st_run, st_dead, st_cond, st_mutex, st_exit;
st_run = st_dead = st_cond = st_mutex = st_exit = 0;
for (t = (mthread_thread_t) 0; t < no_threads; t++) {
tcb = mthread_find_tcb(t);
switch(tcb->m_state) {
case MS_RUNNABLE: st_run++; break;
case MS_DEAD: st_dead++; break;
case MS_MUTEX: st_mutex++; break;
case MS_CONDITION: st_cond++; break;
case MS_EXITING: st_exit++; break;
default: mthread_panic("Unknown state");
}
}
printf("Pool: %-5d In use: %-5d R: %-5d D: %-5d M: %-5d C: %-5d E: %-5d\n",
no_threads, used_threads, st_run, st_dead, st_mutex, st_cond,
st_exit);
}
#endif