KlugyTools/Ecoute/dump.c
2023-11-29 21:43:46 +01:00

89 lines
1.7 KiB
C

/*
* dump.c
* ====== debug module for 'Ecoute' - 2005.03.06
*
* Warning: gruik coding inside.
*/
#include <unistd.h>
#include <fcntl.h>
#include <string.h>
#include <ctype.h>
#include "ecoute.h"
/*==------------------------------------------------------------------==*/
#define T_BUFF_HEX (16*16)
int hexadump(char *fname, WINDOW *w)
{
int fd;
unsigned char buffer[T_BUFF_HEX];
int lig, col, idx;
char chaine[10], lettre;
#if DEBUG_LEVEL
fprintf(stderr, "hexadump of %s\n", fname);
#endif
if ( (fd=open(fname, O_RDONLY)) < 0 )
{
mvwaddstr(w, 2, 2, "err open"); wrefresh(w);
getch();
return -1;
}
if ( T_BUFF_HEX != read(fd, buffer, T_BUFF_HEX) )
{
mvwaddstr(w, 2, 2, "err read"); wrefresh(w);
getch();
}
close(fd);
for (lig=0; lig<16; lig++)
{
for (col=0; col<16; col++)
{
idx = (lig*16) + col;
sprintf(chaine, "%02x", buffer[idx]);
mvwaddstr(w, lig+1, (col*3)+1, chaine);
if (isprint(buffer[idx]))
lettre = buffer[idx];
else
lettre = '.';
mvwaddch(w, lig+1, col+50, lettre);
}
}
wrefresh(w);
return 0;
}
/*==------------------------------------------------------------------==*/
/*
* public entry point.
*/
int dump_this_file(char *fname, int flag)
{
WINDOW *popup;
int foo;
#if DEBUG_LEVEL
fprintf(stderr, ">> dump_this_file ( '%s' %d )\n", fname, flag);
#endif
popup = newwin(18, 68, L_POPUP, C_POPUP);
bordure(popup, 1);
mvwaddstr(popup, 0, 2, "{ dump of ");
mvwaddstr(popup, 0, 13, fname);
mvwaddstr(popup, 0, 13+strlen(fname), " }");
wrefresh(popup);
foo = hexadump(fname, popup);
wrefresh(popup);
getch();
delwin(popup);
touchwin(stdscr); refresh();
return -1;
}
/*==------------------------------------------------------------------==*/