Return to cds224.c CVS log

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

Annotation of 43BSD/usr.bin/uucp/aculib/cds224.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)cds224.c   1.1 (Berkeley) 1/13/86";
                      3: #endif !lint
                      4: 
                      5: #include "../condevs.h"
                      6: #ifdef CDS224
                      7: 
                      8: /*
                      9:  *     conopn: establish dial-out connection through a Concord CDS 224.
                     10:  *     Returns descriptor open to tty for reading and writing.
                     11:  *     Negative values (-1...-7) denote errors in connmsg.
                     12:  *     Be sure to disconnect tty when done, via HUPCL or stty 0.
                     13:  */
                     14: #define TRYS 5 /* number of trys */
                     15: 
                     16: cdsopn224(telno, flds, dev)
                     17: char *telno;
                     18: char *flds[];
                     19: struct Devices *dev;
                     20: {
                     21:        int     dh = -1;
                     22:        int     i, ok, er = 0, delay;
                     23:        extern errno;
                     24:        char dcname[20];
                     25:        char *tempbuf[20];
                     26: 
                     27:        sprintf(dcname, "/dev/%s", dev->D_line);
                     28:        if (setjmp(Sjbuf)) {
                     29:                DEBUG(1, "timeout concord open\n", "");
                     30:                logent("concord open", "TIMEOUT");
                     31:                if (dh >= 0)
                     32:                        cdscls224(dh);
                     33:                delock(dev->D_line);
                     34:                return CF_NODEV;
                     35:        }
                     36:        signal(SIGALRM, alarmtr);
                     37:        getnextfd();
                     38:        alarm(10);
                     39:        dh = open(dcname, 2);
                     40:        alarm(0);
                     41: 
                     42:        /* modem is open */
                     43:        next_fd = -1;
                     44:        if (dh < 0) {
                     45:                delock(dev->D_line);
                     46:                return CF_NODEV;
                     47:        }
                     48:        fixline(dh, dev->D_speed);
                     49: 
                     50:        DEBUG(4, "calling %s -> ", telno);
                     51:        if (dochat(dev, flds, dh)) {
                     52:                logent(dcname, "CHAT FAILED");
                     53:                cdscls224(dh);
                     54:                return CF_DIAL;
                     55:        }
                     56:        for(i = 0; i < TRYS; ++i) {
                     57:                /* wake up Concord */
                     58:                write(dh, "\r\r", 2);
                     59:                DEBUG(4, "wanted CDS >", CNULL);
                     60:                ok = expect("CDS >", dh);
                     61:                DEBUG(4, "got %s\n", ok ? "?" : "that");
                     62:                if (ok != 0)
                     63:                        continue;
                     64: 
                     65:                write(dh, "\r", 2);
                     66:                DEBUG(4, "wanted CDS >", CNULL);
                     67:                ok = expect("CDS >", dh);
                     68:                DEBUG(4, "got %s\n", ok ? "?" : "that");
                     69:                if (ok != 0)
                     70:                        continue;
                     71: 
                     72:                /* send telno \r */
                     73:                sprintf(tempbuf,"D%s\r",telno);
                     74:                write(dh, tempbuf, strlen(tempbuf));
                     75: 
                     76:                DEBUG(4, "wanted DIALING ", CNULL);
                     77:                ok = expect("DIALING ", dh);
                     78:                DEBUG(4, "got %s\n", ok ? "?" : "that");
                     79:                if (ok == 0) 
                     80:                        break;
                     81:        }
                     82: 
                     83:        if (ok == 0) {
                     84:                sleep(10);      /* give concord some time */
                     85:                DEBUG(4, "wanted INITIATING " , CNULL);
                     86:                ok = expect("INITIATING", dh);
                     87:                DEBUG(4, "got %s\n", ok ? "?" : "that");
                     88:        }
                     89: 
                     90:        if (ok != 0) {
                     91:                if (dh > 2)
                     92:                        close(dh);
                     93:                DEBUG(4, "conDial failed\n", CNULL);
                     94:                delock(dev->D_line);
                     95:                return CF_DIAL;
                     96:        }
                     97:        DEBUG(4, "concord ok\n", CNULL);
                     98:        return dh;
                     99: }
                    100: 
                    101: cdscls224(fd)
                    102: {
                    103: 
                    104:        if (fd > 0) {
                    105:                close(fd);
                    106:                sleep(5);
                    107:                delock(devSel);
                    108:        }
                    109: }
                    110: #endif CDS224

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