Return to dn11.c CVS log

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

Annotation of 42BSD/usr.bin/tip/aculib/dn11.c, revision 1.1.1.1

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

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