Return to emperrs.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / bsc / cmd / 3270

Annotation of cci/usr/src/usr.bin/bsc/cmd/3270/emperrs.c, revision 1.1

1.1     ! root        1: /*     D.L.Buck and Associates, Inc. - 8/27/84
        !             2:  *
        !             3:  *     COPYRIGHT NOTICE:
        !             4:  *             Copyright c 8/27/84 - An unpublished work by
        !             5:  *             D.L.Buck and Associates, Inc.
        !             6:  *
        !             7:  *     PROPRIETARY RIGHTS NOTICE:
        !             8:  *             All rights reserved. This document and program contains
        !             9:  *             proprietary information of D.L.Buck and Associates,Inc.
        !            10:  *             of San Jose, California, U.S.A., embodying confidential
        !            11:  *             information,  ideas, and expressions,  no part of which
        !            12:  *             may be reproduced, or transmitted in any form or by any
        !            13:  *             means,  electronic,  mechanical,  or otherwise, without
        !            14:  *             the written permission of D.L.Buck and Associates, Inc.
        !            15:  *
        !            16:  * NAME
        !            17:  *     get_errors
        !            18:  *
        !            19:  * SYNOPSIS
        !            20:  *     get_errors()
        !            21:  *
        !            22:  * DESCRIPTION
        !            23:  *     get_errors - deal with transmit/receive errors - called from em3280
        !            24:  * RETURNS:
        !            25:  *     1 for `nasty' errors, 0 for `tame' errors
        !            26:  */
        !            27: 
        !            28: #include <stdio.h>
        !            29: #include "local.h"
        !            30: #include <bsc/bscio.h>
        !            31: #include <errno.h>
        !            32: #include <empr.h>
        !            33: 
        !            34: char *bsc_errlist[] = {
        !            35:        "Internal error 0",
        !            36:        "Protocol error by remote host ",
        !            37:        "RVI abort ",
        !            38:        "NBID limit exceeded ",
        !            39:        "NNAK limit exceeded ",
        !            40:        "NRETRY limit exceeded ",
        !            41:        "NTTD limit exceeded ",
        !            42:        "NWACK limit exceeded ",
        !            43:        "No DSR indication from modem ",
        !            44:        "Transmit timeout ",
        !            45:        "Idle receive timeout ",
        !            46:        "Remote end sent DISC (DLE-EOT) ",
        !            47:        "Remote end aborted our sending ",
        !            48:        "Remote end aborted their sending ",
        !            49:        "Wrong host id ",
        !            50:        "Block received in transparent mode (not an error) ",
        !            51:        "Block began with SOH (not an error) ",
        !            52:        "Line contention (not an error) "
        !            53: };
        !            54: 
        !            55: extern struct bscio p;
        !            56: extern int devfd;
        !            57: extern int errno;
        !            58: extern char *sys_errlist[];
        !            59: extern char devname[];
        !            60: extern char note[];
        !            61: #ifndef lint
        !            62: static char sccsid[] = "@(#)emperrs.c  1.4 ";
        !            63: #endif
        !            64: 
        !            65: get_errors()
        !            66: {
        !            67: 
        !            68: /* check errno for system error */
        !            69:        if (errno == EINTR || errno == EINVAL)
        !            70:                return 1;
        !            71:        if (errno == EAGAIN)
        !            72:                return 0;
        !            73:        if (errno && errno != EIO) {
        !            74:                sprintf(note,"System error: %s",sys_errlist[errno]);
        !            75:                fprintf(stderr,"%s\n",note);
        !            76:                write_aud("E",note);
        !            77:                return 1;
        !            78:        }
        !            79:        /* do ioctl to get b_flags */
        !            80:        ioctl(devfd,BSCGET,&p);
        !            81: 
        !            82:        switch(p.b_flags)       {
        !            83:        case BSCPROTO:
        !            84:        case BSCRVI:
        !            85:        case BSCNBID:
        !            86:        case BSCNNAK:
        !            87:        case BSCNRETR:
        !            88:        case BSCNTTD:
        !            89:        case BSCNWACK:
        !            90:        case BSCNDSR:
        !            91:        case BSCTXTO:
        !            92:        case BSCDSC:
        !            93:                sprintf(note,"Comm.check: %s",bsc_errlist[p.b_flags]);
        !            94:                fprintf(stderr,"%s\n",note);
        !            95:                write_aud("E",note);
        !            96:                return 1;
        !            97: 
        !            98:        case BSCRXTO:
        !            99:        case BSCRABT:
        !           100:        case BSCEEOF:
        !           101:        case BSCWHI:
        !           102:        case BSCTXP:
        !           103:        case BSCBSOH:
        !           104:        case BSCONTND:
        !           105:        default:
        !           106:                return 0;
        !           107:        }
        !           108: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.