![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to v831.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / usr.bin / tip / aculib|
Return to v831.c CVS log | Up to [CSRG BSD Unix] / 43BSD / usr.bin / tip / aculib |
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[] = "@(#)v831.c 5.1 (Berkeley) 4/30/85"; ! 9: #endif not lint ! 10: ! 11: /* ! 12: * Routines for dialing up on Vadic 831 ! 13: */ ! 14: #include <sys/time.h> ! 15: ! 16: #include "tip.h" ! 17: ! 18: int v831_abort(); ! 19: static int alarmtr(); ! 20: extern errno; ! 21: ! 22: static jmp_buf jmpbuf; ! 23: static int child = -1; ! 24: ! 25: v831_dialer(num, acu) ! 26: char *num, *acu; ! 27: { ! 28: int status, pid, connected = 1; ! 29: register int timelim; ! 30: ! 31: if (boolean(value(VERBOSE))) ! 32: printf("\nstarting call..."); ! 33: #ifdef DEBUG ! 34: printf ("(acu=%s)\n", acu); ! 35: #endif ! 36: if ((AC = open(acu, O_RDWR)) < 0) { ! 37: if (errno == EBUSY) ! 38: printf("line busy..."); ! 39: else ! 40: printf("acu open error..."); ! 41: return (0); ! 42: } ! 43: if (setjmp(jmpbuf)) { ! 44: kill(child, SIGKILL); ! 45: close(AC); ! 46: return (0); ! 47: } ! 48: signal(SIGALRM, alarmtr); ! 49: timelim = 5 * strlen(num); ! 50: alarm(timelim < 30 ? 30 : timelim); ! 51: if ((child = fork()) == 0) { ! 52: /* ! 53: * ignore this stuff for aborts ! 54: */ ! 55: signal(SIGALRM, SIG_IGN); ! 56: signal(SIGINT, SIG_IGN); ! 57: signal(SIGQUIT, SIG_IGN); ! 58: sleep(2); ! 59: exit(dialit(num, acu) != 'A'); ! 60: } ! 61: /* ! 62: * open line - will return on carrier ! 63: */ ! 64: if ((FD = open(DV, O_RDWR)) < 0) { ! 65: #ifdef DEBUG ! 66: printf("(after open, errno=%d)\n", errno); ! 67: #endif ! 68: if (errno == EIO) ! 69: printf("lost carrier..."); ! 70: else ! 71: printf("dialup line open failed..."); ! 72: alarm(0); ! 73: kill(child, SIGKILL); ! 74: close(AC); ! 75: return (0); ! 76: } ! 77: alarm(0); ! 78: #ifdef notdef ! 79: ioctl(AC, TIOCHPCL, 0); ! 80: #endif ! 81: signal(SIGALRM, SIG_DFL); ! 82: while ((pid = wait(&status)) != child && pid != -1) ! 83: ; ! 84: if (status) { ! 85: close(AC); ! 86: return (0); ! 87: } ! 88: return (1); ! 89: } ! 90: ! 91: static ! 92: alarmtr() ! 93: { ! 94: ! 95: alarm(0); ! 96: longjmp(jmpbuf, 1); ! 97: } ! 98: ! 99: /* ! 100: * Insurance, for some reason we don't seem to be ! 101: * hanging up... ! 102: */ ! 103: v831_disconnect() ! 104: { ! 105: struct sgttyb cntrl; ! 106: ! 107: sleep(2); ! 108: #ifdef DEBUG ! 109: printf("[disconnect: FD=%d]\n", FD); ! 110: #endif ! 111: if (FD > 0) { ! 112: ioctl(FD, TIOCCDTR, 0); ! 113: ioctl(FD, TIOCGETP, &cntrl); ! 114: cntrl.sg_ispeed = cntrl.sg_ospeed = 0; ! 115: ioctl(FD, TIOCSETP, &cntrl); ! 116: ioctl(FD, TIOCNXCL, (struct sgttyb *)NULL); ! 117: } ! 118: close(FD); ! 119: } ! 120: ! 121: v831_abort() ! 122: { ! 123: ! 124: #ifdef DEBUG ! 125: printf("[abort: AC=%d]\n", AC); ! 126: #endif ! 127: sleep(2); ! 128: if (child > 0) ! 129: kill(child, SIGKILL); ! 130: if (AC > 0) ! 131: ioctl(FD, TIOCNXCL, (struct sgttyb *)NULL); ! 132: close(AC); ! 133: if (FD > 0) ! 134: ioctl(FD, TIOCCDTR, 0); ! 135: close(FD); ! 136: } ! 137: ! 138: /* ! 139: * Sigh, this probably must be changed at each site. ! 140: */ ! 141: struct vaconfig { ! 142: char *vc_name; ! 143: char vc_rack; ! 144: char vc_modem; ! 145: } vaconfig[] = { ! 146: { "/dev/cua0",'4','0' }, ! 147: { "/dev/cua1",'4','1' }, ! 148: { 0 } ! 149: }; ! 150: ! 151: #define pc(x) (c = x, write(AC,&c,1)) ! 152: #define ABORT 01 ! 153: #define SI 017 ! 154: #define STX 02 ! 155: #define ETX 03 ! 156: ! 157: static ! 158: dialit(phonenum, acu) ! 159: register char *phonenum; ! 160: char *acu; ! 161: { ! 162: register struct vaconfig *vp; ! 163: struct sgttyb cntrl; ! 164: char c, *sanitize(); ! 165: int i, two = 2; ! 166: ! 167: phonenum = sanitize(phonenum); ! 168: #ifdef DEBUG ! 169: printf ("(dial phonenum=%s)\n", phonenum); ! 170: #endif ! 171: if (*phonenum == '<' && phonenum[1] == 0) ! 172: return ('Z'); ! 173: for (vp = vaconfig; vp->vc_name; vp++) ! 174: if (strcmp(vp->vc_name, acu) == 0) ! 175: break; ! 176: if (vp->vc_name == 0) { ! 177: printf("Unable to locate dialer (%s)\n", acu); ! 178: return ('K'); ! 179: } ! 180: ioctl(AC, TIOCGETP, &cntrl); ! 181: cntrl.sg_ispeed = cntrl.sg_ospeed = B2400; ! 182: cntrl.sg_flags = RAW | EVENP | ODDP; ! 183: ioctl(AC, TIOCSETP, &cntrl); ! 184: ioctl(AC, TIOCFLUSH, &two); ! 185: pc(STX); ! 186: pc(vp->vc_rack); ! 187: pc(vp->vc_modem); ! 188: while (*phonenum && *phonenum != '<') ! 189: pc(*phonenum++); ! 190: pc(SI); ! 191: pc(ETX); ! 192: sleep(1); ! 193: i = read(AC, &c, 1); ! 194: #ifdef DEBUG ! 195: printf("read %d chars, char=%c, errno %d\n", i, c, errno); ! 196: #endif ! 197: if (i != 1) ! 198: c = 'M'; ! 199: if (c == 'B' || c == 'G') { ! 200: char cc, oc = c; ! 201: ! 202: pc(ABORT); ! 203: read(AC, &cc, 1); ! 204: #ifdef DEBUG ! 205: printf("abort response=%c\n", cc); ! 206: #endif ! 207: c = oc; ! 208: v831_disconnect(); ! 209: } ! 210: close(AC); ! 211: #ifdef DEBUG ! 212: printf("dialit: returns %c\n", c); ! 213: #endif ! 214: return (c); ! 215: } ! 216: ! 217: static char * ! 218: sanitize(s) ! 219: register char *s; ! 220: { ! 221: static char buf[128]; ! 222: register char *cp; ! 223: ! 224: for (cp = buf; *s; s++) { ! 225: if (!isdigit(*s) && *s == '<' && *s != '_') ! 226: continue; ! 227: if (*s == '_') ! 228: *s = '='; ! 229: *cp++ = *s; ! 230: } ! 231: *cp++ = 0; ! 232: return (buf); ! 233: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.