1 /* 2 * This part for NCR UNIX with is from Andrew Maffei (arm@aqua.whoi.edu). It 3 * assumes TLI throughout. In order to look up endpoint address information 4 * we must talk to the "timod" streams module. For some reason "timod" wants 5 * to sit directly on top of the device driver. Therefore we pop off all 6 * streams modules except the driver, install the "timod" module so that we 7 * can figure out network addresses, and then restore the original state. 8 */ 9 10 #ifndef lint 11 static char sccsid[] = "@(#) ncr.c 1.1 94/12/28 17:42:34"; 12 #endif 13 14 #include <sys/types.h> 15 #include <stdio.h> 16 #include <syslog.h> 17 #include <sys/tiuser.h> 18 #include <stropts.h> 19 #include <sys/conf.h> 20 21 #include "tcpd.h" 22 23 #define MAX_MODULE_COUNT 10 /* XXX */ 24 25 /* fromhost - tear down the streams stack then rebuild it */ 26 27 void fromhost(struct request_info *request) 28 { 29 int i; 30 int num_mod; 31 struct str_list str_list; 32 struct str_mlist mod_buffer[MAX_MODULE_COUNT]; 33 int fd = request->fd; 34 35 str_list.sl_nmods = MAX_MODULE_COUNT; 36 str_list.sl_modlist = &mod_buffer[0]; 37 38 /* 39 * On systems with WIN streams support we have to be careful about what 40 * is on the stream we are passed. This code POPs off all modules above 41 * the pseudo driver, pushes timod, gets the host address information, 42 * pops timod and then pushes all modules back on the stream. 43 * 44 * Some state may be lost in this process. /usr/etc/tlid seems to do special 45 * things to the stream depending on the TCP port being serviced. (not a 46 * very nice thing to do!). It is unclear what to do if this code breaks 47 * - the stream may be left in an unknown condition. 48 */ 49 if ((num_mod = ioctl(fd, I_LIST, NULL)) < 0) 50 tcpd_warn("fromhost: LIST failed: %m"); 51 if (ioctl(fd, I_LIST, &str_list) < 0) 52 tcpd_warn("fromhost: LIST failed: %m"); 53 54 /* 55 * POP stream modules except for the driver. 56 */ 57 for (i = 0; i < num_mod - 1; i++) 58 if (ioctl(fd, I_POP, 0) < 0) 59 tcpd_warn("fromhost: POP %s: %m", mod_buffer[i].l_name); 60 61 /* 62 * PUSH timod so that host address ioctls can be executed. 63 */ 64 if (ioctl(fd, I_PUSH, "timod") < 0) 65 tcpd_warn("fromhost: PUSH timod: %m"); 66 tli_host(request); 67 68 /* 69 * POP timod, we're done with it now. 70 */ 71 if (ioctl(fd, I_POP, 0) < 0) 72 tcpd_warn("fromhost: POP timod: %m"); 73 74 /* 75 * Restore stream modules. 76 */ 77 for (i = num_mod - 2; i >= 0; i--) 78 if (ioctl(fd, I_PUSH, mod_buffer[i].l_name) < 0) 79 tcpd_warn("fromhost: PUSH %s: %m", mod_buffer[i].l_name); 80 } 81