mirror of
https://github.com/fish-shell/fish-shell
synced 2024-12-26 21:03:12 +00:00
691 lines
14 KiB
C++
691 lines
14 KiB
C++
/** \file output.c
|
|
Generic output functions
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#include <termios.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
#ifdef HAVE_SYS_TERMIOS_H
|
|
#include <sys/termios.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_IOCTL_H
|
|
#include <sys/ioctl.h>
|
|
#endif
|
|
|
|
#include <sys/time.h>
|
|
#include <unistd.h>
|
|
#include <wctype.h>
|
|
|
|
#if HAVE_NCURSES_H
|
|
#include <ncurses.h>
|
|
#else
|
|
#include <curses.h>
|
|
#endif
|
|
|
|
#if HAVE_TERMIO_H
|
|
#include <termio.h>
|
|
#endif
|
|
|
|
#if HAVE_TERM_H
|
|
#include <term.h>
|
|
#elif HAVE_NCURSES_TERM_H
|
|
#include <ncurses/term.h>
|
|
#endif
|
|
|
|
#include <signal.h>
|
|
#include <fcntl.h>
|
|
#include <dirent.h>
|
|
#include <time.h>
|
|
#include <wchar.h>
|
|
|
|
|
|
#include "fallback.h"
|
|
#include "util.h"
|
|
|
|
#include "wutil.h"
|
|
#include "expand.h"
|
|
#include "common.h"
|
|
#include "output.h"
|
|
#include "highlight.h"
|
|
#include "env.h"
|
|
|
|
/**
|
|
Number of color names in the col array
|
|
*/
|
|
#define COLORS (sizeof(col)/sizeof(wchar_t *))
|
|
|
|
static int writeb_internal( char c );
|
|
|
|
/**
|
|
Names of different colors.
|
|
*/
|
|
static const wchar_t *col[]=
|
|
{
|
|
L"black",
|
|
L"red",
|
|
L"green",
|
|
L"brown",
|
|
L"yellow",
|
|
L"blue",
|
|
L"magenta",
|
|
L"purple",
|
|
L"cyan",
|
|
L"white"
|
|
L"normal"
|
|
}
|
|
;
|
|
|
|
/**
|
|
Mapping from color name (the 'col' array) to color index as used in
|
|
ANSI color terminals, and also the fish_color_* constants defined
|
|
in highlight.h. Non-ANSI terminals will display the wrong colors,
|
|
since they use a different mapping.
|
|
*/
|
|
static const int col_idx[]=
|
|
{
|
|
0,
|
|
1,
|
|
2,
|
|
3,
|
|
3,
|
|
4,
|
|
5,
|
|
5,
|
|
6,
|
|
7,
|
|
FISH_COLOR_NORMAL,
|
|
};
|
|
|
|
/**
|
|
The function used for output
|
|
*/
|
|
|
|
static int (*out)(char c) = &writeb_internal;
|
|
|
|
/**
|
|
Name of terminal
|
|
*/
|
|
static wcstring current_term;
|
|
|
|
/* Whether term256 is supported */
|
|
static bool support_term256 = false;
|
|
|
|
|
|
void output_set_writer( int (*writer)(char) )
|
|
{
|
|
CHECK( writer, );
|
|
out = writer;
|
|
}
|
|
|
|
int (*output_get_writer())(char)
|
|
{
|
|
return out;
|
|
}
|
|
|
|
static bool term256_support_is_native(void) {
|
|
/* Return YES if we think the term256 support is "native" as opposed to forced. */
|
|
return max_colors == 256;
|
|
}
|
|
|
|
bool output_get_supports_term256() {
|
|
return support_term256;
|
|
}
|
|
|
|
void output_set_supports_term256(bool val) {
|
|
support_term256 = val;
|
|
}
|
|
|
|
static unsigned char index_for_color(rgb_color_t c) {
|
|
if (c.is_named() || ! output_get_supports_term256()) {
|
|
return c.to_name_index();
|
|
} else {
|
|
return c.to_term256_index();
|
|
}
|
|
}
|
|
|
|
|
|
static bool write_color(char *todo, unsigned char idx, bool is_fg) {
|
|
bool result = false;
|
|
if (idx < 16 || term256_support_is_native()) {
|
|
/* Use tparm */
|
|
writembs( tparm( todo, idx ) );
|
|
result = true;
|
|
} else {
|
|
/* We are attempting to bypass the term here. Generate the ANSI escape sequence ourself. */
|
|
char stridx[128];
|
|
format_long_safe(stridx, (long)idx);
|
|
char buff[128] = "\x1b[";
|
|
strcat(buff, is_fg ? "38;5;" : "48;5;");
|
|
strcat(buff, stridx);
|
|
strcat(buff, "m");
|
|
|
|
int (*writer)(char) = output_get_writer();
|
|
if (writer) {
|
|
for (size_t i=0; buff[i]; i++) {
|
|
writer(buff[i]);
|
|
}
|
|
}
|
|
|
|
result = true;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
static bool write_foreground_color(unsigned char idx) {
|
|
if (set_a_foreground && set_a_foreground[0]) {
|
|
return write_color(set_a_foreground, idx, true);
|
|
} else if (set_foreground && set_foreground[0]) {
|
|
return write_color(set_foreground, idx, true);
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
static bool write_background_color(unsigned char idx) {
|
|
if (set_a_background && set_a_background[0]) {
|
|
return write_color(set_a_background, idx, false);
|
|
} else if (set_background && set_background[0]) {
|
|
return write_color(set_background, idx, false);
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
|
|
void set_color(rgb_color_t c, rgb_color_t c2)
|
|
{
|
|
|
|
#if 0
|
|
wcstring tmp = c.description();
|
|
wcstring tmp2 = c2.description();
|
|
printf("set_color %ls : %ls\n", tmp.c_str(), tmp2.c_str());
|
|
#endif
|
|
ASSERT_IS_MAIN_THREAD();
|
|
|
|
const rgb_color_t normal = rgb_color_t::normal();
|
|
static rgb_color_t last_color = rgb_color_t::normal();
|
|
static rgb_color_t last_color2 = rgb_color_t::normal();
|
|
static int was_bold=0;
|
|
static int was_underline=0;
|
|
int bg_set=0, last_bg_set=0;
|
|
|
|
int is_bold = 0;
|
|
int is_underline = 0;
|
|
|
|
/*
|
|
Test if we have at least basic support for setting fonts, colors
|
|
and related bits - otherwise just give up...
|
|
*/
|
|
if( !exit_attribute_mode )
|
|
{
|
|
return;
|
|
}
|
|
|
|
|
|
is_bold |= c.is_bold();
|
|
is_bold |= c2.is_bold();
|
|
|
|
is_underline |= c.is_underline();
|
|
is_underline |= c2.is_underline();
|
|
|
|
if( c.is_reset() || c2.is_reset())
|
|
{
|
|
c = c2 = normal;
|
|
was_bold=0;
|
|
was_underline=0;
|
|
/*
|
|
If we exit attibute mode, we must first set a color, or
|
|
previously coloured text might lose it's
|
|
color. Terminals are weird...
|
|
*/
|
|
write_foreground_color(0);
|
|
writembs( exit_attribute_mode );
|
|
return;
|
|
}
|
|
|
|
if( was_bold && !is_bold )
|
|
{
|
|
/*
|
|
Only way to exit bold mode is a reset of all attributes.
|
|
*/
|
|
writembs( exit_attribute_mode );
|
|
last_color = normal;
|
|
last_color2 = normal;
|
|
was_bold=0;
|
|
was_underline=0;
|
|
}
|
|
|
|
if( ! last_color2.is_normal() &&
|
|
! last_color2.is_reset() &&
|
|
! last_color2.is_ignore() )
|
|
{
|
|
/*
|
|
Background was set
|
|
*/
|
|
last_bg_set=1;
|
|
}
|
|
|
|
if( ! c2.is_normal() &&
|
|
! c2.is_ignore())
|
|
{
|
|
/*
|
|
Background is set
|
|
*/
|
|
bg_set=1;
|
|
if ( c==c2 )
|
|
c = (c2==rgb_color_t::white())?rgb_color_t::black():rgb_color_t::white();
|
|
}
|
|
|
|
if( (enter_bold_mode != 0) && (strlen(enter_bold_mode) > 0))
|
|
{
|
|
if(bg_set && !last_bg_set)
|
|
{
|
|
/*
|
|
Background color changed and is set, so we enter bold
|
|
mode to make reading easier. This means bold mode is
|
|
_always_ on when the background color is set.
|
|
*/
|
|
writembs( enter_bold_mode );
|
|
}
|
|
if(!bg_set && last_bg_set)
|
|
{
|
|
/*
|
|
Background color changed and is no longer set, so we
|
|
exit bold mode
|
|
*/
|
|
writembs( exit_attribute_mode );
|
|
was_bold=0;
|
|
was_underline=0;
|
|
/*
|
|
We don't know if exit_attribute_mode resets colors, so
|
|
we set it to something known.
|
|
*/
|
|
if( write_foreground_color(0))
|
|
{
|
|
last_color=rgb_color_t::black();
|
|
}
|
|
}
|
|
}
|
|
|
|
if( last_color != c )
|
|
{
|
|
if( c.is_normal() )
|
|
{
|
|
write_foreground_color(0);
|
|
writembs( exit_attribute_mode );
|
|
|
|
last_color2 = rgb_color_t::normal();
|
|
was_bold=0;
|
|
was_underline=0;
|
|
}
|
|
else if( ! c.is_special() )
|
|
{
|
|
write_foreground_color(index_for_color(c));
|
|
}
|
|
}
|
|
|
|
last_color = c;
|
|
|
|
if( last_color2 != c2 )
|
|
{
|
|
if( c2.is_normal() )
|
|
{
|
|
write_background_color(0);
|
|
|
|
writembs( exit_attribute_mode );
|
|
if( ! last_color.is_normal())
|
|
{
|
|
write_foreground_color(index_for_color(last_color));
|
|
}
|
|
|
|
|
|
was_bold=0;
|
|
was_underline=0;
|
|
last_color2 = c2;
|
|
}
|
|
else if ( ! c2.is_special() )
|
|
{
|
|
write_background_color(index_for_color(c2));
|
|
last_color2 = c2;
|
|
}
|
|
}
|
|
|
|
/*
|
|
Lastly, we set bold mode and underline mode correctly
|
|
*/
|
|
if( (enter_bold_mode != 0) && (strlen(enter_bold_mode) > 0) && !bg_set )
|
|
{
|
|
if( is_bold && !was_bold )
|
|
{
|
|
if( enter_bold_mode )
|
|
{
|
|
writembs( tparm( enter_bold_mode ) );
|
|
}
|
|
}
|
|
was_bold = is_bold;
|
|
}
|
|
|
|
if( was_underline && !is_underline )
|
|
{
|
|
writembs( exit_underline_mode );
|
|
}
|
|
|
|
if( !was_underline && is_underline )
|
|
{
|
|
writembs( enter_underline_mode );
|
|
}
|
|
was_underline = is_underline;
|
|
|
|
}
|
|
|
|
/**
|
|
Default output method, simply calls write() on stdout
|
|
*/
|
|
static int writeb_internal( char c )
|
|
{
|
|
write_loop( 1, &c, 1 );
|
|
return 0;
|
|
}
|
|
|
|
int writeb( tputs_arg_t b )
|
|
{
|
|
out( b );
|
|
return 0;
|
|
}
|
|
|
|
int writembs_internal( char *str )
|
|
{
|
|
CHECK( str, 1 );
|
|
|
|
return tputs(str,1,&writeb)==ERR?1:0;
|
|
}
|
|
|
|
int writech( wint_t ch )
|
|
{
|
|
mbstate_t state;
|
|
size_t i;
|
|
char buff[MB_LEN_MAX+1];
|
|
size_t bytes;
|
|
|
|
if( ( ch >= ENCODE_DIRECT_BASE) &&
|
|
( ch < ENCODE_DIRECT_BASE+256) )
|
|
{
|
|
buff[0] = ch - ENCODE_DIRECT_BASE;
|
|
bytes=1;
|
|
}
|
|
else
|
|
{
|
|
memset( &state, 0, sizeof(state) );
|
|
bytes= wcrtomb( buff, ch, &state );
|
|
|
|
switch( bytes )
|
|
{
|
|
case (size_t)(-1):
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
for( i=0; i<bytes; i++ )
|
|
{
|
|
out( buff[i] );
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void writestr( const wchar_t *str )
|
|
{
|
|
char *pos;
|
|
|
|
CHECK( str, );
|
|
|
|
// while( *str )
|
|
// writech( *str++ );
|
|
|
|
/*
|
|
Check amount of needed space
|
|
*/
|
|
size_t len = wcstombs( 0, str, 0 );
|
|
|
|
if( len == (size_t)-1 )
|
|
{
|
|
debug( 1, L"Tried to print invalid wide character string" );
|
|
return;
|
|
}
|
|
|
|
len++;
|
|
|
|
/*
|
|
Convert
|
|
*/
|
|
char *buffer, static_buffer[256];
|
|
if (len <= sizeof static_buffer)
|
|
buffer = static_buffer;
|
|
else
|
|
buffer = new char[len];
|
|
|
|
wcstombs( buffer,
|
|
str,
|
|
len );
|
|
|
|
/*
|
|
Write
|
|
*/
|
|
for( pos = buffer; *pos; pos++ )
|
|
{
|
|
out( *pos );
|
|
}
|
|
|
|
if (buffer != static_buffer)
|
|
delete[] buffer;
|
|
}
|
|
|
|
|
|
void writestr_ellipsis( const wchar_t *str, int max_width )
|
|
{
|
|
int written=0;
|
|
int tot;
|
|
|
|
CHECK( str, );
|
|
|
|
tot = my_wcswidth(str);
|
|
|
|
if( tot <= max_width )
|
|
{
|
|
writestr( str );
|
|
return;
|
|
}
|
|
|
|
while( *str != 0 )
|
|
{
|
|
int w = wcwidth( *str );
|
|
if( written+w+wcwidth( ellipsis_char )>max_width )
|
|
{
|
|
break;
|
|
}
|
|
written+=w;
|
|
writech( *(str++) );
|
|
}
|
|
|
|
written += wcwidth( ellipsis_char );
|
|
writech( ellipsis_char );
|
|
|
|
while( written < max_width )
|
|
{
|
|
written++;
|
|
writestr( L" " );
|
|
}
|
|
}
|
|
|
|
int write_escaped_str( const wchar_t *str, int max_len )
|
|
{
|
|
|
|
wchar_t *out;
|
|
int i;
|
|
int len;
|
|
int written=0;
|
|
|
|
CHECK( str, 0 );
|
|
|
|
out = escape( str, 1 );
|
|
len = my_wcswidth( out );
|
|
|
|
if( max_len && (max_len < len))
|
|
{
|
|
for( i=0; (written+wcwidth(out[i]))<=(max_len-1); i++ )
|
|
{
|
|
writech( out[i] );
|
|
written += wcwidth( out[i] );
|
|
}
|
|
writech( ellipsis_char );
|
|
written += wcwidth( ellipsis_char );
|
|
|
|
for( i=written; i<max_len; i++ )
|
|
{
|
|
writech( L' ' );
|
|
written++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
written = len;
|
|
writestr( out );
|
|
}
|
|
|
|
free( out );
|
|
return written;
|
|
}
|
|
|
|
|
|
int output_color_code( const wcstring &val, bool is_background ) {
|
|
size_t i;
|
|
int color=FISH_COLOR_NORMAL;
|
|
int is_bold=0;
|
|
int is_underline=0;
|
|
|
|
if (val.empty())
|
|
return FISH_COLOR_NORMAL;
|
|
|
|
wcstring_list_t el;
|
|
tokenize_variable_array( val, el );
|
|
|
|
for(size_t j=0; j < el.size(); j++ ) {
|
|
const wcstring &next = el.at(j);
|
|
wcstring color_name;
|
|
if (is_background) {
|
|
// look for something like "--background=red"
|
|
const wcstring prefix = L"--background=";
|
|
if (string_prefixes_string(prefix, next)) {
|
|
color_name = wcstring(next, prefix.size());
|
|
}
|
|
|
|
} else {
|
|
if (next == L"--bold" || next == L"-o")
|
|
is_bold = true;
|
|
else if (next == L"--underline" || next == L"-u")
|
|
is_underline = true;
|
|
else
|
|
color_name = next;
|
|
}
|
|
|
|
if (! color_name.empty()) {
|
|
for( i=0; i<COLORS; i++ )
|
|
{
|
|
if( wcscasecmp( col[i], color_name.c_str() ) == 0 )
|
|
{
|
|
color = col_idx[i];
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
return color | (is_bold?FISH_COLOR_BOLD:0) | (is_underline?FISH_COLOR_UNDERLINE:0);
|
|
}
|
|
|
|
rgb_color_t parse_color( const wcstring &val, bool is_background ) {
|
|
int is_bold=0;
|
|
int is_underline=0;
|
|
|
|
std::vector<rgb_color_t> candidates;
|
|
|
|
wcstring_list_t el;
|
|
tokenize_variable_array( val, el );
|
|
|
|
for(size_t j=0; j < el.size(); j++ ) {
|
|
const wcstring &next = el.at(j);
|
|
wcstring color_name;
|
|
if (is_background) {
|
|
// look for something like "--background=red"
|
|
const wcstring prefix = L"--background=";
|
|
if (string_prefixes_string(prefix, next)) {
|
|
color_name = wcstring(next, prefix.size());
|
|
}
|
|
} else {
|
|
if (next == L"--bold" || next == L"-o")
|
|
is_bold = true;
|
|
else if (next == L"--underline" || next == L"-u")
|
|
is_underline = true;
|
|
else
|
|
color_name = next;
|
|
}
|
|
|
|
if (! color_name.empty()) {
|
|
rgb_color_t color = rgb_color_t(color_name);
|
|
if (! color.is_none()) {
|
|
candidates.push_back(color);
|
|
}
|
|
}
|
|
}
|
|
|
|
// Pick the best candidate
|
|
rgb_color_t first_rgb = rgb_color_t::none(), first_named = rgb_color_t::none();
|
|
for (size_t i=0; i < candidates.size(); i++) {
|
|
const rgb_color_t &color = candidates.at(i);
|
|
if (color.is_rgb() && first_rgb.is_none())
|
|
first_rgb = color;
|
|
if (color.is_named() && first_named.is_none())
|
|
first_named = color;
|
|
}
|
|
|
|
// If we have both RGB and named colors, then prefer rgb if term256 is supported
|
|
rgb_color_t result;
|
|
if ((!first_rgb.is_none() && output_get_supports_term256()) || first_named.is_none()) {
|
|
result = first_rgb;
|
|
} else {
|
|
result = first_named;
|
|
}
|
|
|
|
if (result.is_none())
|
|
result = rgb_color_t::normal();
|
|
|
|
result.set_bold(is_bold);
|
|
result.set_underline(is_underline);
|
|
|
|
#if 0
|
|
wcstring desc = result.description();
|
|
printf("Parsed %ls from %ls (%s)\n", desc.c_str(), val.c_str(), is_background ? "background" : "foreground");
|
|
#endif
|
|
|
|
return result;
|
|
}
|
|
|
|
void output_set_term( const wchar_t *term )
|
|
{
|
|
current_term = term;
|
|
}
|
|
|
|
const wchar_t *output_get_term()
|
|
{
|
|
return current_term.empty() ? L"<unknown>" : current_term.c_str();
|
|
}
|