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
12 static 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
34 static void ptx_sink();
35
36 /* tli_host - determine TLI endpoint info, PTX version */
37
tli_host(request)38 void tli_host(request)
39 struct 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
ptx_sink(fd)84 static void ptx_sink(fd)
85 int 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