1 /* 2 * The Dynix/PTX TLI implementation is not quite compatible with System V 3 * Release 4. Some important functions are not present so we are limited to 4 * IP-based services. 5 * 6 * Diagnostics are reported through syslog(3). 7 * 8 * Author: Wietse Venema, Eindhoven University of Technology, The Netherlands. 9 */ 10 11#ifndef lint 12static char sccsid[] = "@(#) ptx.c 1.3 94/12/28 17:42:38"; 13#endif 14 15#ifdef PTX 16 17/* System libraries. */ 18 19#include <sys/types.h> 20#include <sys/tiuser.h> 21#include <sys/socket.h> 22#include <stropts.h> 23#include <netinet/in.h> 24#include <netdb.h> 25#include <stdio.h> 26#include <syslog.h> 27 28/* Local stuff. */ 29 30#include "tcpd.h" 31 32/* Forward declarations. */ 33 34static void ptx_sink(); 35 36/* tli_host - determine TLI endpoint info, PTX version */ 37 38void tli_host(request) 39struct request_info *request; 40{ 41 static struct sockaddr_in client; 42 static struct sockaddr_in server; 43 44 /* 45 * getpeerinaddr() was suggested by someone at Sequent. It seems to work 46 * with connection-oriented (TCP) services such as rlogind and telnetd, 47 * but it returns 0.0.0.0 with datagram (UDP) services. No problem: UDP 48 * needs special treatment anyway, in case we must refuse service. 49 */ 50 51 if (getpeerinaddr(request->fd, &client, sizeof(client)) == 0 52 && client.sin_addr.s_addr != 0) { 53 request->client->sin = &client; 54 if (getmyinaddr(request->fd, &server, sizeof(server)) == 0) { 55 request->server->sin = &server; 56 } else { 57 tcpd_warn("warning: getmyinaddr: %m"); 58 } 59 sock_methods(request); 60 61 } else { 62 63 /* 64 * Another suggestion was to temporarily switch to the socket 65 * interface, identify the endpoint addresses with socket calls, then 66 * to switch back to TLI. This seems to works OK with UDP services, 67 * which is exactly what we should be looking at right now. 68 */ 69 70#define SWAP_MODULE(f, old, new) (ioctl(f, I_POP, old), ioctl(f, I_PUSH, new)) 71 72 if (SWAP_MODULE(request->fd, "timod", "sockmod") != 0) 73 tcpd_warn("replace timod by sockmod: %m"); 74 sock_host(request); 75 if (SWAP_MODULE(request->fd, "sockmod", "timod") != 0) 76 tcpd_warn("replace sockmod by timod: %m"); 77 if (request->sink != 0) 78 request->sink = ptx_sink; 79 } 80} 81 82/* ptx_sink - absorb unreceived IP datagram */ 83 84static void ptx_sink(fd) 85int fd; 86{ 87 char buf[BUFSIZ]; 88 struct sockaddr sa; 89 int size = sizeof(sa); 90 91 /* 92 * Eat up the not-yet received datagram. Where needed, switch to the 93 * socket programming interface. 94 */ 95 96 if (ioctl(fd, I_FIND, "timod") != 0) 97 ioctl(fd, I_POP, "timod"); 98 if (ioctl(fd, I_FIND, "sockmod") == 0) 99 ioctl(fd, I_PUSH, "sockmod"); 100 (void) recvfrom(fd, buf, sizeof(buf), 0, &sa, &size); 101} 102 103#endif /* PTX */ 104