lame/frontend/console.c

311 lines
6.6 KiB
C

#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#ifdef STDC_HEADERS
# include <stdlib.h>
# include <string.h>
#else
# ifndef HAVE_STRCHR
# define strchr index
# define strrchr rindex
# endif
char *strchr(), *strrchr();
# ifndef HAVE_MEMCPY
# define memcpy(d, s, n) bcopy ((s), (d), (n))
# define memmove(d, s, n) bcopy ((s), (d), (n))
# endif
#endif
#if defined(HAVE_NCURSES_TERMCAP_H)
# include <ncurses/termcap.h>
#elif defined(HAVE_TERMCAP_H)
# include <termcap.h>
#elif defined(HAVE_TERMCAP)
# include <curses.h>
# if !defined(__bsdi__)
# include <term.h>
# endif
#endif
#include <stdio.h>
#include <stdarg.h>
#include "console.h"
#include "main.h"
#ifdef WITH_DMALLOC
#include <dmalloc.h>
#endif
#define CLASS_ID 0x434F4E53
#define REPORT_BUFF_SIZE 1024
#if defined(_WIN32) && !defined(__CYGWIN__)
# include <windows.h>
#endif
static int
my_console_printing(FILE * fp, const char *format, va_list ap)
{
if (fp != NULL)
return vfprintf(fp, format, ap);
return 0;
}
static int
my_error_printing(FILE * fp, const char *format, va_list ap)
{
if (fp != NULL)
return vfprintf(fp, format, ap);
return 0;
}
static int
my_report_printing(FILE * fp, const char *format, va_list ap)
{
if (fp != NULL)
return vfprintf(fp, format, ap);
return 0;
}
/*
* Taken from Termcap_Manual.html:
*
* With the Unix version of termcap, you must allocate space for the description yourself and pass
* the address of the space as the argument buffer. There is no way you can tell how much space is
* needed, so the convention is to allocate a buffer 2048 characters long and assume that is
* enough. (Formerly the convention was to allocate 1024 characters and assume that was enough.
* But one day, for one kind of terminal, that was not enough.)
*/
#ifdef HAVE_TERMCAP
static void
get_termcap_string(char const* id, char* dest, size_t n)
{
char tc[16];
char *tp = tc;
tp[0] = '\0';
tp = tgetstr(id, &tp);
if (tp != NULL && dest != NULL && n > 0) {
strncpy(dest, tp, n);
dest[n-1] = '\0';
}
}
static void
get_termcap_number(char const* id, int* dest, int low, int high)
{
int const val = tgetnum(id);
if (low <= val && val <= high) {
*dest = val;
}
}
static void
apply_termcap_settings(Console_IO_t * const mfp)
{
/* try to catch additional information about special console sequences */
char const* term_name = getenv("TERM");
if (NULL != term_name) {
char term_buff[4096];
int const ret = tgetent(term_buff, term_name);
if (1 == ret) {
get_termcap_number("co", &mfp->disp_width, 40, 512);
get_termcap_number("li", &mfp->disp_height, 16, 256);
get_termcap_string("up", mfp->str_up, sizeof(mfp->str_up));
get_termcap_string("md", mfp->str_emph, sizeof(mfp->str_emph));
get_termcap_string("me", mfp->str_norm, sizeof(mfp->str_norm));
get_termcap_string("ce", mfp->str_clreoln, sizeof(mfp->str_clreoln));
}
}
}
#endif /* TERMCAP_AVAILABLE */
static int
init_console(Console_IO_t * const mfp)
{
/* setup basics of brhist I/O channels */
mfp->disp_width = 80;
mfp->disp_height = 25;
mfp->Console_fp = stderr;
mfp->Error_fp = stderr;
mfp->Report_fp = NULL;
/*mfp -> Console_buff = calloc ( 1, REPORT_BUFF_SIZE ); */
setvbuf(mfp->Console_fp, mfp->Console_buff, _IOFBF, sizeof(mfp->Console_buff));
/* setvbuf ( mfp -> Error_fp , NULL , _IONBF, 0 ); */
#if defined(_WIN32) && !defined(__CYGWIN__)
mfp->Console_Handle = GetStdHandle(STD_ERROR_HANDLE);
#endif
strcpy(mfp->str_up, "\033[A");
#ifdef HAVE_TERMCAP
apply_termcap_settings(mfp);
#endif /* TERMCAP_AVAILABLE */
mfp->ClassID = CLASS_ID;
#if defined(_WIN32) && !defined(__CYGWIN__)
mfp->Console_file_type = GetFileType(Console_IO.Console_Handle);
#else
mfp->Console_file_type = 0;
#endif
return 0;
}
static void
deinit_console(Console_IO_t * const mfp)
{
if (mfp->Report_fp != NULL) {
fclose(mfp->Report_fp);
mfp->Report_fp = NULL;
}
fflush(mfp->Console_fp);
setvbuf(mfp->Console_fp, NULL, _IONBF, (size_t) 0);
memset(mfp->Console_buff, 0x55, REPORT_BUFF_SIZE);
}
/* LAME console
*/
Console_IO_t Console_IO;
int
frontend_open_console(void)
{
return init_console(&Console_IO);
}
void
frontend_close_console(void)
{
deinit_console(&Console_IO);
}
void
frontend_debugf(const char *format, va_list ap)
{
(void) my_report_printing(Console_IO.Report_fp, format, ap);
}
void
frontend_msgf(const char *format, va_list ap)
{
(void) my_console_printing(Console_IO.Console_fp, format, ap);
}
void
frontend_errorf(const char *format, va_list ap)
{
(void) my_error_printing(Console_IO.Error_fp, format, ap);
}
void
frontend_print_null(const char *format, va_list ap)
{
(void) format;
(void) ap;
}
int
console_printf(const char *format, ...)
{
va_list args;
int ret;
va_start(args, format);
ret = my_console_printing(Console_IO.Console_fp, format, args);
va_end(args);
return ret;
}
int
error_printf(const char *format, ...)
{
va_list args;
int ret;
va_start(args, format);
ret = my_console_printing(Console_IO.Error_fp, format, args);
va_end(args);
return ret;
}
int
report_printf(const char *format, ...)
{
va_list args;
int ret;
va_start(args, format);
ret = my_console_printing(Console_IO.Report_fp, format, args);
va_end(args);
return ret;
}
void
console_flush()
{
fflush(Console_IO.Console_fp);
}
void
error_flush()
{
fflush(Console_IO.Error_fp);
}
void
report_flush()
{
fflush(Console_IO.Report_fp);
}
void
console_up(int n_lines)
{
#if defined(_WIN32) && !defined(__CYGWIN__)
if (Console_IO.Console_file_type != FILE_TYPE_PIPE) {
COORD Pos;
CONSOLE_SCREEN_BUFFER_INFO CSBI;
console_flush();
GetConsoleScreenBufferInfo(Console_IO.Console_Handle, &CSBI);
Pos.Y = (SHORT)(CSBI.dwCursorPosition.Y - n_lines);
Pos.X = 0;
SetConsoleCursorPosition(Console_IO.Console_Handle, Pos);
}
#else
while (n_lines-- > 0)
fputs(Console_IO.str_up, Console_IO.Console_fp);
console_flush();
#endif
}
void
set_debug_file(const char *fn)
{
if (Console_IO.Report_fp == NULL) {
Console_IO.Report_fp = lame_fopen(fn, "a");
if (Console_IO.Report_fp != NULL) {
error_printf("writing debug info into: %s\n", fn);
}
else {
error_printf("Error: can't open for debug info: %s\n", fn);
}
}
}
/* end of console.c */