/* NetHack 3.6	dprintf.c	$NHDT-Date: 1432512798 2015/05/25 00:13:18 $  $NHDT-Branch: master $:$NHDT-Revision: 1.7 $ */
/* Copyright (c) Jon W{tte, 1993.				  */
/* NetHack may be freely redistributed.  See license for details. */

#include "hack.h"
#include "macwin.h"

static Boolean
KeyDown(unsigned short code)
{
    unsigned char keys[16];

    GetKeys((void *) keys);
    return ((keys[code >> 3] >> (code & 7)) & 1) != 0;
}

void
dprintf(char *format, ...)
{
    char buffer[500];
    va_list list;
    int doit;
#define DO_DEBUGSTR 1
#define DO_PLINE 2

    if (flags.debug) {
        doit = 0;
        if (macFlags.hasDebugger && KeyDown(0x39)) { /* Caps Lock */
            doit = DO_DEBUGSTR;
        } else if (KeyDown(0x3B) && iflags.window_inited && /* Control */
                   (WIN_MESSAGE != -1)
                   && theWindows[WIN_MESSAGE].its_window) {
            doit = DO_PLINE;
        }

        if (doit) {
            va_start(list, format);
            vsprintf(&buffer[1], format, list);
            va_end(list);

            if (doit == DO_DEBUGSTR) {
                buffer[0] = strlen(&buffer[1]);
                DebugStr((uchar *) buffer);
            } else if (doit == DO_PLINE)
                pline("%s", &buffer[1]);
        }
    }
}