cmd/sh/error.c

	error.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*  Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*    All Rights Reserved   */


#ident  "%Z%%M% %I% %E% SMI"    /* SVr4.0 1.9.5.1   */
/*
 * UNIX shell
 */

#include    "defs.h"


/* ======== error handling  ======== */

extern void done();

failed(s1, s2)
unsigned char   *s1, *s2;
{
    prp();
    prs_cntl(s1);
    if (s2)
    {
        prs(colon);
        prs(s2);
    }
    newline();
    exitsh(ERROR);
}

error(s)
unsigned char   *s;
{
    failed(s, NIL);
}

exitsh(xno)
int xno;
{
    /*
     * Arrive here from `FATAL' errors
     *  a) exit command,
     *  b) default trap,
     *  c) fault with no trap set.
     *
     * Action is to return to command level or exit.
     */
    exitval = xno;
    flags |= eflag;
    if ((flags & (forcexit | forked | errflg | ttyflg)) != ttyflg)
        done(0);
    else
    {
        clearup();
        restore(0);
        (void)setb(1);
        execbrk = breakcnt = funcnt = 0;
        longjmp(errshell, 1);
    }
}

rmtemp(base)
struct ionod    *base;
{
    while (iotemp > base)
    {
        unlink(iotemp->ioname);
        free(iotemp->iolink);
        iotemp = iotemp->iolst;
    }
}

rmfunctmp()
{
    while (fiotemp)
    {
        unlink(fiotemp->ioname);
        fiotemp = fiotemp->iolst;
    }
}

failure(s1, s2)
unsigned char   *s1, *s2;
{
    prp();
    prs_cntl(s1);
    if (s2)
    {
        prs(colon);
        prs(s2);
    }
    newline();

    if (flags & errflg)
        exitsh(ERROR);

    flags |= eflag;
    exitval = ERROR;
    exitset();
}