/* $OpenBSD: biz22.c,v 1.13 2006/03/17 19:17:13 moritz Exp $ */ /* $NetBSD: biz22.c,v 1.6 1997/02/11 09:24:11 mrg Exp $ */ /*- * SPDX-License-Identifier: BSD-3-Clause * * 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. 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. */ #include #ifndef lint #if 0 static char sccsid[] = "@(#)biz22.c 8.1 (Berkeley) 6/6/93"; static const char rcsid[] = "$OpenBSD: biz22.c,v 1.13 2006/03/17 19:17:13 moritz Exp $"; #endif #endif /* not lint */ #include "tip.h" #define DISCONNECT_CMD "\20\04" /* disconnection string */ static int dialtimeout = 0; static jmp_buf timeoutbuf; static int biz_dialer(char *, char *); static void sigALRM(int); static int cmd(char *); static int detect(char *); /* * Dial up on a BIZCOMP Model 1022 with either * tone dialing (mod = "V") * pulse dialing (mod = "W") */ static int biz_dialer(char *num, char *mod) { int connected = 0; char cbuf[40]; 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); } (void)strlcpy(cbuf, "\02.\r", sizeof cbuf); cbuf[1] = *mod; if (cmd(cbuf)) { printf("can't set dialing mode..."); return (0); } (void)snprintf(cbuf, sizeof(cbuf), "\02D%s\r", num); 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 (dialtimeout) { char line[80]; (void)snprintf(line, sizeof line, "%ld second dial timeout", number(value(DIALTIMEOUT))); logent(value(HOST), num, "biz1022", line); } #endif if (dialtimeout) biz22_disconnect(); /* insurance */ return (connected); } int biz22w_dialer(char *num, char *acu) { return (biz_dialer(num, "W")); } int biz22f_dialer(char *num, char *acu) { return (biz_dialer(num, "V")); } void biz22_disconnect(void) { write(FD, DISCONNECT_CMD, sizeof(DISCONNECT_CMD)-1); sleep(2); tcflush(FD, TCIOFLUSH); } void biz22_abort(void) { write(FD, "\02", 1); } /*ARGSUSED*/ static void sigALRM(int signo) { dialtimeout = 1; longjmp(timeoutbuf, 1); } static int cmd(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(char *s) { sig_t f; char c; f = signal(SIGALRM, sigALRM); dialtimeout = 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 (dialtimeout == 0); }