clear.c revision 166124
150276Speter/****************************************************************************
2166124Srafan * Copyright (c) 1998-2005,2006 Free Software Foundation, Inc.              *
350276Speter *                                                                          *
450276Speter * Permission is hereby granted, free of charge, to any person obtaining a  *
550276Speter * copy of this software and associated documentation files (the            *
650276Speter * "Software"), to deal in the Software without restriction, including      *
750276Speter * without limitation the rights to use, copy, modify, merge, publish,      *
850276Speter * distribute, distribute with modifications, sublicense, and/or sell       *
950276Speter * copies of the Software, and to permit persons to whom the Software is    *
1050276Speter * furnished to do so, subject to the following conditions:                 *
1150276Speter *                                                                          *
1250276Speter * The above copyright notice and this permission notice shall be included  *
1350276Speter * in all copies or substantial portions of the Software.                   *
1450276Speter *                                                                          *
1550276Speter * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
1650276Speter * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
1750276Speter * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
1850276Speter * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
1950276Speter * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
2050276Speter * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
2150276Speter * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
2250276Speter *                                                                          *
2350276Speter * Except as contained in this notice, the name(s) of the above copyright   *
2450276Speter * holders shall not be used in advertising or otherwise to promote the     *
2550276Speter * sale, use or other dealings in this Software without prior written       *
2650276Speter * authorization.                                                           *
2750276Speter ****************************************************************************/
2850276Speter
2950276Speter/****************************************************************************
3050276Speter *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
3150276Speter *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
32166124Srafan *     and: Thomas E. Dickey                        1996-on                 *
3350276Speter ****************************************************************************/
3450276Speter
3550276Speter/*
3650276Speter * clear.c --  clears the terminal's screen
3750276Speter */
3850276Speter
3950276Speter#include <progs.priv.h>
4050276Speter
41166124SrafanMODULE_ID("$Id: clear.c,v 1.10 2006/05/20 17:47:47 tom Exp $")
4250276Speter
43166124Srafanstatic int
44166124Srafanputch(int c)
4550276Speter{
46166124Srafan    return putchar(c);
4750276Speter}
4850276Speter
49166124Srafanint
50166124Srafanmain(
5150276Speter	int argc GCC_UNUSED,
52166124Srafan	char *argv[]GCC_UNUSED)
5350276Speter{
54166124Srafan    setupterm((char *) 0, STDOUT_FILENO, (int *) 0);
55166124Srafan    ExitProgram((tputs(clear_screen, lines > 0 ? lines : 1, putch) == ERR)
5650276Speter		? EXIT_FAILURE
57166124Srafan		: EXIT_SUCCESS);
5850276Speter}
59