init

2023-12-22 22:53:54 -05:00
commit 2821b7e9a1
45 changed files with 8425 additions and 0 deletions
--- a/logsrv/socket.c
+++ b/logsrv/socket.c
@@ -0,0 +1,144 @@
+#include <stdio.h>
+#include <string.h>
+#include <termios.h>
+#include <errno.h>
+#include <sys/types.h>
+#include <pwd.h>
+#include <sys/time.h>
+#include <sys/file.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <netdb.h>
+#include <signal.h>
+#include "config.h"
+
+extern char buf[512];
+extern char sockbuf[512],*sptr;
+extern int PORTNUM;
+extern int level;
+
+
+char *linetok[256];
+int USEIDENT= 0;
+int call_socket(hostname,portnum)
+  char *hostname;
+  int portnum;
+{ struct sockaddr_in sa;
+  struct hostent     *hp;
+  int    a, s;
+  if((hp=gethostbyname(hostname))==NULL) {
+        errno=ECONNREFUSED;
+        return(-1); }
+  bzero(&sa, sizeof(sa));
+  bcopy(hp->h_addr, (char *)&sa.sin_addr, hp->h_length);
+  sa.sin_family = hp->h_addrtype;
+  sa.sin_port = htons((u_short)portnum);
+  if((s=socket(hp->h_addrtype, SOCK_STREAM, 0)) < 0) return(-1);
+  if(connect(s,(struct sockaddr *) &sa, sizeof(sa)) < 0) {
+        close(s);
+        return(-1); }
+  return(s);
+}
+
+int readln(int sckfd)
+{ int i=0,valid=1; char c;
+while(valid) {
+        if(read(sckfd,&c,1)<1) return(0);
+        if(i<511 && c != '\n') sockbuf[i++]=c; else valid=0; }
+sockbuf[i]='\0'; return(1);
+}
+
+int writeln(sckfd,outbuf)
+int sckfd;
+char *outbuf;
+{ int to=0;
+if(write(sckfd, outbuf, strlen(outbuf)) < to )
+        return(0);
+return(1);
+}
+
+int readcom(sck,tout)
+int sck;
+int tout;
+{
+int sok;
+time_t time_in,time_out;
+int dumb = 1;
+fd_set  readfs;
+struct  timeval *zimeout;
+time_in=time(NULL);
+while(1) {
+	time_out = time(NULL);
+	if(time_out - time_in > tout) return 0;
+        FD_ZERO(&readfs);
+        FD_SET(sck,&readfs);
+        if(select(FD_SETSIZE, &readfs, NULL, NULL,(dumb ? NULL : zimeout))) {
+
+          if(FD_ISSET(sck,&readfs)) {
+                if(!BACKGROUND) puts("READING REPLY");
+                sok = readln(sck);
+                if (sok) {
+            sptr=sockbuf;
+            *(sptr+strlen(sockbuf)-1)='\0';
+            return 1;
+                } }
+        }
+    }
+}
+
+
+
+
+int do_auth(hostname,sockfd)
+char *hostname;
+int sockfd;
+{  int authfd,ulen,tlen,lcnt,ct;
+   struct sockaddr_in	sock,us,them;
+  
+   writeln(sockfd,"Checking your identification\n");
+
+   if( (authfd=call_socket(hostname,113)) < 0)   /* host not running identd */
+   { 
+     USEIDENT=0;
+     sprintf(buf,"[%d] [%s] You should ask your sysadmin to instal identd\n",
+	authfd,hostname);
+     writeln(sockfd,buf);
+     return 0;
+   }
+
+   if(getsockname(sockfd,(struct sockaddr *)&us,&ulen))
+   { if(!BACKGROUND) puts("getsockname failed");
+     USEIDENT=0;
+     return 0;
+   }
+   if(getpeername(sockfd,(struct sockaddr *)&them,&tlen))
+   { if(!BACKGROUND) puts("getpeername failed");
+     USEIDENT=0;
+     return 0;
+   }
+
+   sprintf(buf,"%u,%u \r\n",
+	(unsigned int) ntohs(them.sin_port),
+	(unsigned int) PORTNUM);
+
+   writeln(authfd,buf);
+   writeln(sockfd,"CHECKING IDENTD\n");
+
+   readcom(authfd,15);
+   if(!BACKGROUND) puts(sockbuf);
+
+   linetok[lcnt=0]=strtok(sockbuf," ");
+   while(linetok[++lcnt]=strtok(NULL, " ")); linetok[lcnt]=NULL;
+
+   if((lcnt > 7) && (!strcmp(linetok[4],"USERID"))) 
+   { USEIDENT = 1;
+     sprintf(buf,"Greetings %s@%s, Welcome to our system\n",linetok[8],
+	hostname);
+     writeln(sockfd,buf);
+     if(!BACKGROUND) 
+     { printf("GOT IT %s %d\n",linetok[8],lcnt);
+     }
+   }
+   else USEIDENT = 0;
+   close(authfd);
+}