File: [local] / src / usr.bin / top / screen.c (download)
Revision 1.13, Mon Jun 16 17:24:44 2003 UTC (20 years, 11 months ago) by millert
Branch: MAIN
CVS Tags: OPENBSD_3_5_BASE, OPENBSD_3_5, OPENBSD_3_4_BASE, OPENBSD_3_4 Changes since 1.12: +2 -1 lines
Add missing #include <err.h>
|
/* $OpenBSD: screen.c,v 1.13 2003/06/16 17:24:44 millert Exp $ */
/*
* Top users/processes display for Unix
* Version 3
*
* Copyright (c) 1984, 1989, William LeFebvre, Rice University
* Copyright (c) 1989, 1990, 1992, William LeFebvre, Northwestern University
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR OR HIS EMPLOYER BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
/*
* This file contains the routines that interface to termcap and stty/gtty.
*
* Paul Vixie, February 1987: converted to use ioctl() instead of stty/gtty.
*
* I put in code to turn on the TOSTOP bit while top was running, but I didn't
* really like the results. If you desire it, turn on the preprocessor
* variable "TOStop". --wnl
*/
#include <sys/types.h>
#include <sys/ioctl.h>
#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <term.h>
#include <termios.h>
#include <unistd.h>
#include "top.h"
#include "screen.h"
#include "boolean.h"
int overstrike, screen_length, screen_width;
char ch_erase, ch_kill, smart_terminal, PC;
char string_buffer[1024], home[15], lower_left[15];
char *clear_line, *clear_scr, *clear_to_end;
char *cursor_motion, *start_standout, *end_standout;
char *terminal_init, *terminal_end;
short ospeed;
static struct termios old_settings, new_settings;
static char is_a_terminal = No;
void
init_termcap(int interactive)
{
char *bufptr, *PCptr, *term_name;
int status;
/* set defaults in case we aren't smart */
screen_width = MAX_COLS;
screen_length = 0;
if (!interactive) {
/* pretend we have a dumb terminal */
smart_terminal = No;
return;
}
/* assume we have a smart terminal until proven otherwise */
smart_terminal = Yes;
/* get the terminal name */
term_name = getenv("TERM");
/* if there is no TERM, assume it's a dumb terminal */
/* patch courtesy of Sam Horrocks at telegraph.ics.uci.edu */
if (term_name == NULL) {
smart_terminal = No;
return;
}
/* now get the termcap entry */
if ((status = tgetent(NULL, term_name)) != 1) {
if (status == -1)
warnx("can't open termcap file");
else
warnx("no termcap entry for a `%s' terminal", term_name);
/* pretend it's dumb and proceed */
smart_terminal = No;
return;
}
/* "hardcopy" immediately indicates a very stupid terminal */
if (tgetflag("hc")) {
smart_terminal = No;
return;
}
/* set up common terminal capabilities */
if ((screen_length = tgetnum("li")) <= Header_lines) {
screen_length = smart_terminal = 0;
return;
}
/* screen_width is a little different */
if ((screen_width = tgetnum("co")) == -1)
screen_width = 79;
else
screen_width -= 1;
/* terminals that overstrike need special attention */
overstrike = tgetflag("os");
/* initialize the pointer into the termcap string buffer */
bufptr = string_buffer;
/* get "ce", clear to end */
if (!overstrike) {
clear_line = tgetstr("ce", &bufptr);
}
/* get necessary capabilities */
if ((clear_scr = tgetstr("cl", &bufptr)) == NULL ||
(cursor_motion = tgetstr("cm", &bufptr)) == NULL) {
smart_terminal = No;
return;
}
/* get some more sophisticated stuff -- these are optional */
clear_to_end = tgetstr("cd", &bufptr);
terminal_init = tgetstr("ti", &bufptr);
terminal_end = tgetstr("te", &bufptr);
start_standout = tgetstr("so", &bufptr);
end_standout = tgetstr("se", &bufptr);
/* pad character */
PC = (PCptr = tgetstr("pc", &bufptr)) ? *PCptr : 0;
/* set convenience strings */
(void) strlcpy(home, tgoto(cursor_motion, 0, 0), sizeof(home));
/* (lower_left is set in get_screensize) */
/* get the actual screen size with an ioctl, if needed */
/*
* This may change screen_width and screen_length, and it always sets
* lower_left.
*/
get_screensize();
/* if stdout is not a terminal, pretend we are a dumb terminal */
if (tcgetattr(STDOUT_FILENO, &old_settings) == -1)
smart_terminal = No;
}
void
init_screen(void)
{
/* get the old settings for safe keeping */
if (tcgetattr(STDOUT_FILENO, &old_settings) != -1) {
/* copy the settings so we can modify them */
new_settings = old_settings;
/* turn off ICANON, character echo and tab expansion */
new_settings.c_lflag &= ~(ICANON | ECHO);
new_settings.c_oflag &= ~(OXTABS);
new_settings.c_cc[VMIN] = 1;
new_settings.c_cc[VTIME] = 0;
(void) tcsetattr(STDOUT_FILENO, TCSADRAIN, &new_settings);
/* remember the erase and kill characters */
ch_erase = old_settings.c_cc[VERASE];
ch_kill = old_settings.c_cc[VKILL];
/* remember that it really is a terminal */
is_a_terminal = Yes;
/* send the termcap initialization string */
putcap(terminal_init);
}
if (!is_a_terminal) {
/* not a terminal at all---consider it dumb */
smart_terminal = No;
}
}
void
end_screen(void)
{
/* move to the lower left, clear the line and send "te" */
if (smart_terminal) {
putcap(lower_left);
putcap(clear_line);
fflush(stdout);
putcap(terminal_end);
}
/* if we have settings to reset, then do so */
if (is_a_terminal)
(void) tcsetattr(STDOUT_FILENO, TCSADRAIN, &old_settings);
}
void
reinit_screen(void)
{
/* install our settings if it is a terminal */
if (is_a_terminal)
(void) tcsetattr(STDOUT_FILENO, TCSADRAIN, &new_settings);
/* send init string */
if (smart_terminal)
putcap(terminal_init);
}
void
get_screensize(void)
{
struct winsize ws;
if (ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) != -1) {
if (ws.ws_row != 0)
screen_length = ws.ws_row;
if (ws.ws_col != 0)
screen_width = ws.ws_col - 1;
}
(void) strlcpy(lower_left, tgoto(cursor_motion, 0, screen_length - 1),
sizeof(lower_left));
}
void
standout(char *msg)
{
if (smart_terminal) {
putcap(start_standout);
if (fputs(msg, stdout) == EOF)
exit(1);
putcap(end_standout);
} else {
if (fputs(msg, stdout) == EOF)
exit(1);
}
}
void
clear()
{
if (smart_terminal)
putcap(clear_scr);
}
int
clear_eol(int len)
{
if (smart_terminal && !overstrike && len > 0) {
if (clear_line) {
putcap(clear_line);
return (0);
} else {
while (len-- > 0) {
if (putchar(' ') == EOF)
exit(1);
}
return (1);
}
}
return (-1);
}
void
go_home(void)
{
if (smart_terminal)
putcap(home);
}
/* This has to be defined as a subroutine for tputs (instead of a macro) */
int
putstdout(int ch)
{
int ret;
ret = putchar(ch);
if (ret == EOF)
exit(1);
return (ret);
}