/* $OpenBSD: biz22.c,v 1.3 1996/06/26 05:40:51 deraadt Exp $ */ /* $NetBSD: biz22.c,v 1.4 1995/10/29 00:49:47 pk Exp $ */ /* * Copyright (c) 1983, 1993 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef lint #if 0 static char sccsid[] = "@(#)biz22.c 8.1 (Berkeley) 6/6/93"; #endif static char rcsid[] = "$OpenBSD: biz22.c,v 1.3 1996/06/26 05:40:51 deraadt Exp $"; #endif /* not lint */ #include "tip.h" #define DISCONNECT_CMD "\20\04" /* disconnection string */ static void sigALRM(); static int timeout = 0; static jmp_buf timeoutbuf; /* * Dial up on a BIZCOMP Model 1022 with either * tone dialing (mod = "V") * pulse dialing (mod = "W") */ static int biz_dialer(num, mod) char *num, *mod; { register int connected = 0; char cbuf[40]; static int cmd(), detect(); if (boolean(value(VERBOSE))) printf("\nstarting call..."); /* * Disable auto-answer and configure for tone/pulse * dialing */ if (cmd("\02K\r")) { printf("can't initialize bizcomp..."); return (0); } strcpy(cbuf, "\02.\r"); cbuf[1] = *mod; if (cmd(cbuf)) { printf("can't set dialing mode..."); return (0); } strcpy(cbuf, "\02D"); strcat(cbuf, num); strcat(cbuf, "\r"); write(FD, cbuf, strlen(cbuf)); if (!detect("7\r")) { printf("can't get dial tone..."); return (0); } if (boolean(value(VERBOSE))) printf("ringing..."); /* * The reply from the BIZCOMP should be: * 2 \r or 7 \r failure * 1 \r success */ connected = detect("1\r"); #ifdef ACULOG if (timeout) { char line[80]; sprintf(line, "%d second dial timeout", number(value(DIALTIMEOUT))); logent(value(HOST), num, "biz1022", line); } #endif if (timeout) biz22_disconnect(); /* insurance */ return (connected); } biz22w_dialer(num, acu) char *num, *acu; { return (biz_dialer(num, "W")); } biz22f_dialer(num, acu) char *num, *acu; { return (biz_dialer(num, "V")); } biz22_disconnect() { int rw = 2; write(FD, DISCONNECT_CMD, 4); sleep(2); tcflush(FD, TCIOFLUSH); } biz22_abort() { write(FD, "\02", 1); } static void sigALRM() { timeout = 1; longjmp(timeoutbuf, 1); } static int cmd(s) register char *s; { sig_t f; char c; write(FD, s, strlen(s)); f = signal(SIGALRM, sigALRM); if (setjmp(timeoutbuf)) { biz22_abort(); signal(SIGALRM, f); return (1); } alarm(number(value(DIALTIMEOUT))); read(FD, &c, 1); alarm(0); signal(SIGALRM, f); c &= 0177; return (c != '\r'); } static int detect(s) register char *s; { sig_t f; char c; f = signal(SIGALRM, sigALRM); timeout = 0; while (*s) { if (setjmp(timeoutbuf)) { biz22_abort(); break; } alarm(number(value(DIALTIMEOUT))); read(FD, &c, 1); alarm(0); c &= 0177; if (c != *s++) return (0); } signal(SIGALRM, f); return (timeout == 0); }