1 /* 2 * Copyright (c) 1986, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 * 33 * @(#)acucommon.c 8.1 (Berkeley) 6/6/93 34 * $FreeBSD: src/usr.bin/tip/libacu/acucommon.c,v 1.3 1999/08/28 01:06:30 peter Exp $ 35 */ 36 37 /* 38 * Routines for calling up on a Courier modem. 39 * Derived from Hayes driver. 40 */ 41 #include "acucommon.h" 42 #include "tipconf.h" 43 #include "tip.h" 44 45 #include <err.h> 46 47 #if HAVE_SELECT 48 #include <sys/types.h> 49 #include <sys/times.h> 50 #include <unistd.h> 51 52 void 53 acu_nap(unsigned int how_long) 54 { 55 struct timeval t; 56 t.tv_usec = (how_long % 1000) * 1000; 57 t.tv_sec = how_long / 1000; 58 (void) select (0, NULL, NULL, NULL, &t); 59 } 60 61 #elif HAVE_USLEEP 62 void 63 acu_nap(unsigned int how_long) 64 { 65 (void) usleep (how_long * 1000); 66 } 67 68 #else 69 70 /* 71 * Code stolen from /usr/src/lib/libc/gen/sleep.c 72 */ 73 #define mask(s) (1<<((s)-1)) 74 #define setvec(vec, a) \ 75 vec.sv_handler = a; vec.sv_mask = vec.sv_onstack = 0 76 77 static int ringring; 78 79 static void 80 acunap_napx(void) 81 { 82 ringring = 1; 83 } 84 85 void 86 acu_nap(unsigned int how_long) 87 { 88 int omask; 89 struct itimerval itv, oitv; 90 struct itimerval *itp = &itv; 91 struct sigvec vec, ovec; 92 93 timerclear(&itp->it_interval); 94 timerclear(&itp->it_value); 95 if (setitimer(ITIMER_REAL, itp, &oitv) < 0) 96 return; 97 setvec(ovec, SIG_DFL); 98 omask = sigblock(mask(SIGALRM)); 99 itp->it_value.tv_sec = how_long / 1000; 100 itp->it_value.tv_usec = ((how_long % 1000) * 1000); 101 setvec(vec, acunap_napx); 102 ringring = 0; 103 (void) sigvec(SIGALRM, &vec, &ovec); 104 (void) setitimer(ITIMER_REAL, itp, NULL); 105 while (!ringring) 106 sigpause(omask &~ mask(SIGALRM)); 107 (void) sigvec(SIGALRM, &ovec, NULL); 108 (void) setitimer(ITIMER_REAL, &oitv, NULL); 109 (void) sigsetmask(omask); 110 } 111 112 #endif /* HAVE_USLEEP */ 113 114 void 115 acu_hw_flow_control(int hw_flow_control) 116 { 117 #if HAVE_TERMIOS 118 struct termios t; 119 if (tcgetattr (FD, &t) == 0) { 120 if (hw_flow_control) 121 t.c_cflag |= CRTSCTS; 122 else 123 t.c_cflag &= ~CRTSCTS; 124 tcsetattr (FD, TCSANOW, &t); 125 } 126 #endif /* HAVE_TERMIOS */ 127 } 128 129 int 130 acu_flush(void) 131 { 132 #ifdef TIOCFLUSH 133 int flags = 0; 134 return (ioctl (FD, TIOCFLUSH, &flags) == 0); /* flush any clutter */ 135 #elif !HAVE_TERMIOS 136 struct sgttyb buf; 137 return (ioctl (FD, TIOCGETP, &buf) == 0 && ioctl (FD, TIOCSETP, &buf) == 0); 138 #endif 139 } 140 141 int 142 acu_getspeed(void) 143 { 144 #if HAVE_TERMIOS 145 struct termios term; 146 tcgetattr (FD, &term); 147 return (term.c_ospeed); 148 #else /* HAVE_TERMIOS */ 149 struct sgttyb buf; 150 ioctl (FD, TIOCGETP, &buf); 151 return (buf.sg_ospeed); 152 #endif 153 } 154 155 int 156 acu_setspeed(int speed) 157 { 158 int rc = 0; 159 #if HAVE_TERMIOS 160 struct termios term; 161 if (tcgetattr (FD, &term) == 0) { 162 #ifndef _POSIX_SOURCE 163 cfsetspeed (&term, speed); 164 #else 165 cfsetispeed (&term, speed); 166 cfsetospeed (&term, speed); 167 #endif 168 if (tcsetattr (FD, TCSANOW, &term) == 0) 169 ++rc; 170 } 171 #else /* HAVE TERMIOS */ 172 struct sgttyb sb; 173 if (ioctl(FD, TIOCGETP, &sb) < 0) { 174 warn("TIOCGETP"); 175 } 176 else { 177 sb.sg_ispeed = sb.sg_ospeed = speed; 178 if (ioctl(FD, TIOCSETP, &sb) < 0) { 179 warn("TIOCSETP"); 180 } 181 else 182 ++rc; 183 } 184 #endif /* HAVE TERMIOS */ 185 return (rc); 186 } 187 188 void 189 acu_hupcl(void) 190 { 191 #if HAVE_TERMIOS 192 struct termios term; 193 tcgetattr (FD, &term); 194 term.c_cflag |= HUPCL; 195 tcsetattr (FD, TCSANOW, &term); 196 #elif defined(TIOCHPCL) 197 ioctl(FD, TIOCHPCL, 0); 198 #endif 199 } 200 201 /* end of acucommon.c */ 202