--- /dev/null
+/*
+ * locate the originating host
+ */
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <signal.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <limits.h>
+#include <netdb.h>
+#include <string.h>
+
+void locate_host(char *tbuf, int client_socket)
+{
+ struct sockaddr_in cs;
+ struct hostent * ch;
+ int len;
+ char *i;
+ int a1,a2,a3,a4;
+
+ len = sizeof(cs);
+ if (getpeername(client_socket, (struct sockaddr *)&cs,&len) < 0) {
+ strcpy(tbuf, "<unknown>");
+ return;
+ }
+
+ if((ch = gethostbyaddr((char *) &cs.sin_addr, sizeof(cs.sin_addr),
+ AF_INET)) == NULL) {
+ i = (char *) &cs.sin_addr;
+ a1 = ((*i++)&0xff);
+ a2 = ((*i++)&0xff);
+ a3 = ((*i++)&0xff);
+ a4 = ((*i++)&0xff);
+ sprintf(tbuf,"%d.%d.%d.%d",a1,a2,a3,a4);
+ return;
+ }
+
+ strncpy(tbuf,ch->h_name, 24);
+ tbuf[24] = 0;
+ }