#include <stdarg.h>
#include <machine/machine_routines.h>
#include <pexpert/pexpert.h>
#include <kern/debug.h>
#include <kern/simple_lock.h>
#include <i386/mp.h>
#include <machine/pal_routines.h>
#include <i386/proc_reg.h>
void (*PE_kputc)(char c);
#if DEBUG
unsigned int disable_serial_output = FALSE;
#else
unsigned int disable_serial_output = TRUE;
#endif
decl_simple_lock_data(static, kprintf_lock)
void PE_init_kprintf(boolean_t vm_initialized)
{
unsigned int boot_arg;
if (PE_state.initialized == FALSE)
panic("Platform Expert not initialized");
if (!vm_initialized) {
unsigned int new_disable_serial_output = TRUE;
simple_lock_init(&kprintf_lock, 0);
if (PE_parse_boot_argn("debug", &boot_arg, sizeof (boot_arg)))
if (boot_arg & DB_KPRT)
new_disable_serial_output = FALSE;
if (!new_disable_serial_output && (!disable_serial_output || pal_serial_init()))
PE_kputc = pal_serial_putc;
else
PE_kputc = cnputc;
disable_serial_output = new_disable_serial_output;
}
}
#if CONFIG_NO_KPRINTF_STRINGS
#undef kprintf
#endif
#ifdef MP_DEBUG
static void _kprintf(const char *format, ...)
{
va_list listp;
va_start(listp, format);
_doprnt(format, &listp, PE_kputc, 16);
va_end(listp);
}
#define MP_DEBUG_KPRINTF(x...) _kprintf(x)
#else
#define MP_DEBUG_KPRINTF(x...)
#endif
static int cpu_last_locked = 0;
void kprintf(const char *fmt, ...)
{
va_list listp;
boolean_t state;
if (!disable_serial_output) {
boolean_t early = FALSE;
if (rdmsr64(MSR_IA32_GS_BASE) == 0) {
early = TRUE;
}
if (!PE_kputc || early) {
va_start(listp, fmt);
_doprnt(fmt, &listp, pal_serial_putc, 16);
va_end(listp);
return;
}
state = ml_set_interrupts_enabled(FALSE);
pal_preemption_assert();
while (!simple_lock_try(&kprintf_lock)) {
ml_set_interrupts_enabled(state);
ml_set_interrupts_enabled(FALSE);
}
if (cpu_number() != cpu_last_locked) {
MP_DEBUG_KPRINTF("[cpu%d...]\n", cpu_number());
cpu_last_locked = cpu_number();
}
va_start(listp, fmt);
_doprnt(fmt, &listp, PE_kputc, 16);
va_end(listp);
simple_unlock(&kprintf_lock);
ml_set_interrupts_enabled(state);
}
}
extern void kprintf_break_lock(void);
void
kprintf_break_lock(void)
{
simple_lock_init(&kprintf_lock, 0);
}