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(struct request_info *request) 39{ 40 static struct sockaddr_in client; 41 static struct sockaddr_in server; 42 43 /* 44 * getpeerinaddr() was suggested by someone at Sequent. It seems to work 45 * with connection-oriented (TCP) services such as rlogind and telnetd, 46 * but it returns 0.0.0.0 with datagram (UDP) services. No problem: UDP 47 * needs special treatment anyway, in case we must refuse service. 48 */ 49 50 if (getpeerinaddr(request->fd, &client, sizeof(client)) == 0 51 && client.sin_addr.s_addr != 0) { 52 request->client->sin = &client; 53 if (getmyinaddr(request->fd, &server, sizeof(server)) == 0) { 54 request->server->sin = &server; 55 } else { 56 tcpd_warn("warning: getmyinaddr: %m"); 57 } 58 sock_methods(request); 59 60 } else { 61 62 /* 63 * Another suggestion was to temporarily switch to the socket 64 * interface, identify the endpoint addresses with socket calls, then 65 * to switch back to TLI. This seems to works OK with UDP services, 66 * which is exactly what we should be looking at right now. 67 */ 68 69#define SWAP_MODULE(f, old, new) (ioctl(f, I_POP, old), ioctl(f, I_PUSH, new)) 70 71 if (SWAP_MODULE(request->fd, "timod", "sockmod") != 0) 72 tcpd_warn("replace timod by sockmod: %m"); 73 sock_host(request); 74 if (SWAP_MODULE(request->fd, "sockmod", "timod") != 0) 75 tcpd_warn("replace sockmod by timod: %m"); 76 if (request->sink != 0) 77 request->sink = ptx_sink; 78 } 79} 80 81/* ptx_sink - absorb unreceived IP datagram */ 82 83static void ptx_sink(int fd) 84{ 85 char buf[BUFSIZ]; 86 struct sockaddr sa; 87 int size = sizeof(sa); 88 89 /* 90 * Eat up the not-yet received datagram. Where needed, switch to the 91 * socket programming interface. 92 */ 93 94 if (ioctl(fd, I_FIND, "timod") != 0) 95 ioctl(fd, I_POP, "timod"); 96 if (ioctl(fd, I_FIND, "sockmod") == 0) 97 ioctl(fd, I_PUSH, "sockmod"); 98 (void) recvfrom(fd, buf, sizeof(buf), 0, &sa, &size); 99} 100 101#endif /* PTX */ 102