Return to dn11.c CVS log

Up to [CSRG BSD Unix] / 43BSD / usr.bin / tip / aculib

Annotation of 43BSD/usr.bin/tip/aculib/dn11.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1983 Regents of the University of California.
        !             3:  * All rights reserved.  The Berkeley software License Agreement
        !             4:  * specifies the terms and conditions for redistribution.
        !             5:  */
        !             6: 
        !             7: #ifndef lint
        !             8: static char sccsid[] = "@(#)dn11.c     5.1 (Berkeley) 4/30/85";
        !             9: #endif not lint
        !            10: 
        !            11: /*
        !            12:  * Routines for dialing up on DN-11
        !            13:  */
        !            14: #include "tip.h"
        !            15: 
        !            16: int dn_abort(), alarmtr();
        !            17: static jmp_buf jmpbuf;
        !            18: static int child = -1, dn;
        !            19: 
        !            20: dn_dialer(num, acu)
        !            21:        char *num, *acu;
        !            22: {
        !            23:        extern errno;
        !            24:        char *p, *q, phone[40];
        !            25:        int lt, nw, connected = 1;
        !            26:        register int timelim;
        !            27: 
        !            28:        if (boolean(value(VERBOSE)))
        !            29:                printf("\nstarting call...");
        !            30:        if ((dn = open(acu, 1)) < 0) {
        !            31:                if (errno == EBUSY)
        !            32:                        printf("line busy...");
        !            33:                else
        !            34:                        printf("acu open error...");
        !            35:                return (0);
        !            36:        }
        !            37:        if (setjmp(jmpbuf)) {
        !            38:                kill(child, SIGKILL);
        !            39:                close(dn);
        !            40:                return (0);
        !            41:        }
        !            42:        signal(SIGALRM, alarmtr);
        !            43:        timelim = 5 * strlen(num);
        !            44:        alarm(timelim < 30 ? 30 : timelim);
        !            45:        if ((child = fork()) == 0) {
        !            46:                /*
        !            47:                 * ignore this stuff for aborts
        !            48:                 */
        !            49:                signal(SIGALRM, SIG_IGN);
        !            50:                signal(SIGINT, SIG_IGN);
        !            51:                signal(SIGQUIT, SIG_IGN);
        !            52:                sleep(2);
        !            53:                nw = write(dn, num, lt = strlen(num));
        !            54:                exit(nw != lt);
        !            55:        }
        !            56:        /*
        !            57:         * open line - will return on carrier
        !            58:         */
        !            59:        if ((FD = open(DV, 2)) < 0) {
        !            60:                if (errno == EIO)
        !            61:                        printf("lost carrier...");
        !            62:                else
        !            63:                        printf("dialup line open failed...");
        !            64:                alarm(0);
        !            65:                kill(child, SIGKILL);
        !            66:                close(dn);
        !            67:                return (0);
        !            68:        }
        !            69:        alarm(0);
        !            70:        ioctl(dn, TIOCHPCL, 0);
        !            71:        signal(SIGALRM, SIG_DFL);
        !            72:        while ((nw = wait(&lt)) != child && nw != -1)
        !            73:                ;
        !            74:        fflush(stdout);
        !            75:        close(dn);
        !            76:        if (lt != 0) {
        !            77:                close(FD);
        !            78:                return (0);
        !            79:        }
        !            80:        return (1);
        !            81: }
        !            82: 
        !            83: alarmtr()
        !            84: {
        !            85: 
        !            86:        alarm(0);
        !            87:        longjmp(jmpbuf, 1);
        !            88: }
        !            89: 
        !            90: /*
        !            91:  * Insurance, for some reason we don't seem to be
        !            92:  *  hanging up...
        !            93:  */
        !            94: dn_disconnect()
        !            95: {
        !            96: 
        !            97:        sleep(2);
        !            98:        if (FD > 0)
        !            99:                ioctl(FD, TIOCCDTR, 0);
        !           100:        close(FD);
        !           101: }
        !           102: 
        !           103: dn_abort()
        !           104: {
        !           105: 
        !           106:        sleep(2);
        !           107:        if (child > 0)
        !           108:                kill(child, SIGKILL);
        !           109:        if (dn > 0)
        !           110:                close(dn);
        !           111:        if (FD > 0)
        !           112:                ioctl(FD, TIOCCDTR, 0);
        !           113:        close(FD);
        !           114: }

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