mirror of
https://git.FreeBSD.org/src.git
synced 2024-12-05 09:14:03 +00:00
2a3e3873a1
Level up WARNS
231 lines
4.9 KiB
C
231 lines
4.9 KiB
C
/*
|
|
* $Id: trace.c,v 1.20 2011/10/18 10:47:26 tom Exp $
|
|
*
|
|
* trace.c -- implements screen-dump and keystroke-logging
|
|
*
|
|
* Copyright 2007-2010,2011 Thomas E. Dickey
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License, version 2.1
|
|
*
|
|
* This program 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
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this program; if not, write to
|
|
* Free Software Foundation, Inc.
|
|
* 51 Franklin St., Fifth Floor
|
|
* Boston, MA 02110, USA.
|
|
*/
|
|
|
|
#include <dialog.h>
|
|
|
|
#ifdef HAVE_DLG_TRACE
|
|
|
|
#ifdef NEED_WCHAR_H
|
|
#include <wchar.h>
|
|
#endif
|
|
|
|
#include <dlg_keys.h>
|
|
#include <time.h>
|
|
|
|
#define myFP dialog_state.trace_output
|
|
|
|
static void
|
|
dlg_trace_time(const char *tag)
|
|
{
|
|
time_t now = time((time_t *) 0);
|
|
fprintf(myFP, "%s %s", tag, ctime(&now));
|
|
}
|
|
|
|
void
|
|
dlg_trace_msg(const char *fmt,...)
|
|
{
|
|
if (myFP != 0) {
|
|
va_list ap;
|
|
va_start(ap, fmt);
|
|
vfprintf(myFP, fmt, ap);
|
|
va_end(ap);
|
|
fflush(myFP);
|
|
}
|
|
}
|
|
|
|
void
|
|
dlg_trace_win(WINDOW *win)
|
|
{
|
|
if (myFP != 0) {
|
|
int y, x;
|
|
int j, k;
|
|
WINDOW *top = wgetparent(win);
|
|
|
|
while (top != 0 && top != stdscr) {
|
|
win = top;
|
|
top = wgetparent(win);
|
|
}
|
|
|
|
if (win != 0) {
|
|
int rc = getmaxy(win);
|
|
int cc = getmaxx(win);
|
|
chtype ch, c2;
|
|
|
|
fprintf(myFP, "window %dx%d at %d,%d\n",
|
|
rc, cc, getbegy(win), getbegx(win));
|
|
|
|
getyx(win, y, x);
|
|
for (j = 0; j < rc; ++j) {
|
|
fprintf(myFP, "%3d:", j);
|
|
for (k = 0; k < cc; ++k) {
|
|
#ifdef USE_WIDE_CURSES
|
|
char buffer[80];
|
|
|
|
ch = mvwinch(win, j, k) & (A_CHARTEXT | A_ALTCHARSET);
|
|
if (ch & A_ALTCHARSET) {
|
|
c2 = dlg_asciibox(ch);
|
|
if (c2 != 0) {
|
|
ch = c2;
|
|
}
|
|
buffer[0] = (char) ch;
|
|
buffer[1] = '\0';
|
|
} else {
|
|
cchar_t cch;
|
|
wchar_t *uc;
|
|
|
|
if (win_wch(win, &cch) == ERR
|
|
|| (uc = wunctrl(&cch)) == 0
|
|
|| uc[1] != 0
|
|
|| wcwidth(uc[0]) <= 0) {
|
|
buffer[0] = '.';
|
|
buffer[1] = '\0';
|
|
} else {
|
|
mbstate_t state;
|
|
const wchar_t *ucp = uc;
|
|
|
|
memset(&state, 0, sizeof(state));
|
|
wcsrtombs(buffer, &ucp, sizeof(buffer), &state);
|
|
k += wcwidth(uc[0]) - 1;
|
|
}
|
|
}
|
|
fputs(buffer, myFP);
|
|
#else
|
|
ch = mvwinch(win, j, k) & (A_CHARTEXT | A_ALTCHARSET);
|
|
c2 = dlg_asciibox(ch);
|
|
if (c2 != 0) {
|
|
ch = c2;
|
|
} else if (unctrl(ch) == 0 || strlen(unctrl(ch)) > 1) {
|
|
ch = '.';
|
|
}
|
|
fputc((int) (ch & 0xff), myFP);
|
|
#endif
|
|
}
|
|
fputc('\n', myFP);
|
|
}
|
|
wmove(win, y, x);
|
|
fflush(myFP);
|
|
}
|
|
}
|
|
}
|
|
|
|
void
|
|
dlg_trace_chr(int ch, int fkey)
|
|
{
|
|
static int last_err = 0;
|
|
|
|
/*
|
|
* Do not bother to trace ERR's indefinitely, since those are usually due
|
|
* to relatively short polling timeouts.
|
|
*/
|
|
if (last_err && !fkey && ch == ERR) {
|
|
++last_err;
|
|
} else if (myFP != 0) {
|
|
const char *fkey_name = "?";
|
|
|
|
if (last_err) {
|
|
fprintf(myFP, "skipped %d ERR's\n", last_err);
|
|
last_err = 0;
|
|
}
|
|
|
|
if (fkey) {
|
|
if (fkey > KEY_MAX || (fkey_name = keyname(fkey)) == 0) {
|
|
#define CASE(name) case name: fkey_name = #name; break
|
|
switch ((DLG_KEYS_ENUM) fkey) {
|
|
CASE(DLGK_MIN);
|
|
CASE(DLGK_OK);
|
|
CASE(DLGK_CANCEL);
|
|
CASE(DLGK_EXTRA);
|
|
CASE(DLGK_HELP);
|
|
CASE(DLGK_ESC);
|
|
CASE(DLGK_PAGE_FIRST);
|
|
CASE(DLGK_PAGE_LAST);
|
|
CASE(DLGK_PAGE_NEXT);
|
|
CASE(DLGK_PAGE_PREV);
|
|
CASE(DLGK_ITEM_FIRST);
|
|
CASE(DLGK_ITEM_LAST);
|
|
CASE(DLGK_ITEM_NEXT);
|
|
CASE(DLGK_ITEM_PREV);
|
|
CASE(DLGK_FIELD_FIRST);
|
|
CASE(DLGK_FIELD_LAST);
|
|
CASE(DLGK_FIELD_NEXT);
|
|
CASE(DLGK_FIELD_PREV);
|
|
CASE(DLGK_FORM_FIRST);
|
|
CASE(DLGK_FORM_LAST);
|
|
CASE(DLGK_FORM_NEXT);
|
|
CASE(DLGK_FORM_PREV);
|
|
CASE(DLGK_GRID_UP);
|
|
CASE(DLGK_GRID_DOWN);
|
|
CASE(DLGK_GRID_LEFT);
|
|
CASE(DLGK_GRID_RIGHT);
|
|
CASE(DLGK_DELETE_LEFT);
|
|
CASE(DLGK_DELETE_RIGHT);
|
|
CASE(DLGK_DELETE_ALL);
|
|
CASE(DLGK_ENTER);
|
|
CASE(DLGK_BEGIN);
|
|
CASE(DLGK_FINAL);
|
|
CASE(DLGK_SELECT);
|
|
CASE(DLGK_HELPFILE);
|
|
CASE(DLGK_TRACE);
|
|
}
|
|
}
|
|
} else if (ch == ERR) {
|
|
fkey_name = "ERR";
|
|
last_err = 1;
|
|
} else {
|
|
fkey_name = unctrl((chtype) ch);
|
|
if (fkey_name == 0)
|
|
fkey_name = "UNKNOWN";
|
|
}
|
|
fprintf(myFP, "chr %s (ch=%#x, fkey=%d)\n",
|
|
fkey_name,
|
|
ch, fkey);
|
|
fflush(myFP);
|
|
}
|
|
}
|
|
|
|
void
|
|
dlg_trace(const char *fname)
|
|
{
|
|
if (fname != 0) {
|
|
if (myFP == 0) {
|
|
myFP = fopen(fname, "a");
|
|
if (myFP != 0) {
|
|
dlg_trace_time("** opened at");
|
|
dlg_trace_msg("** dialog %s\n", dialog_version());
|
|
}
|
|
}
|
|
} else if (myFP != 0) {
|
|
dlg_trace_time("** closed at");
|
|
fclose(myFP);
|
|
myFP = 0;
|
|
}
|
|
}
|
|
#else
|
|
#undef dlg_trace
|
|
extern void dlg_trace(const char *);
|
|
void
|
|
dlg_trace(const char *fname)
|
|
{
|
|
(void) fname;
|
|
}
|
|
#endif
|