home *** CD-ROM | disk | FTP | other *** search
/ HAM Radio 1 / HamRadio.cdr / misc / tcpipsrc / fingerd.c < prev    next >
C/C++ Source or Header  |  1991-01-26  |  2KB  |  116 lines
  1. /* Internet Finger server
  2.  * Copyright 1991 Phil Karn, KA9Q
  3.  */
  4. #include <stdio.h>
  5. #include <string.h>
  6. #include "global.h"
  7. #include "files.h"
  8. #include "mbuf.h"
  9. #include "socket.h"
  10. #include "session.h"
  11. #include "proc.h"
  12. #include "dirutil.h"
  13. #include "commands.h"
  14. #include "mailbox.h"
  15. #include "config.h"
  16.  
  17. static int Sfinger = -1;    /* Prototype socket for service */
  18.  
  19. static void fingerd __ARGS((int s,void *unused,void *p));
  20.  
  21. /* Start up finger service */
  22. int
  23. finstart(argc,argv,p)
  24. int argc;
  25. char *argv[];
  26. void *p;
  27. {
  28.     struct sockaddr_in lsocket;
  29.     int s;
  30.  
  31.     if(Sfinger != -1){
  32.         return 0;
  33.     }
  34.     psignal(Curproc,0);    /* Don't keep the parser waiting */
  35.     chname(Curproc,"Finger listener");
  36.  
  37.     lsocket.sin_family = AF_INET;
  38.     lsocket.sin_addr.s_addr = INADDR_ANY;
  39.     if(argc < 2)
  40.         lsocket.sin_port = IPPORT_FINGER;
  41.     else
  42.         lsocket.sin_port = atoi(argv[1]);
  43.  
  44.     Sfinger = socket(AF_INET,SOCK_STREAM,0);
  45.     bind(Sfinger,(char *)&lsocket,sizeof(lsocket));
  46.     listen(Sfinger,1);
  47.     for(;;){
  48.         if((s = accept(Sfinger,NULLCHAR,(int *)NULL)) == -1)
  49.             break;    /* Service is shutting down */
  50.  
  51.         /* Spawn a server */
  52.         newproc("fingerd",512,fingerd,s,NULL,NULL,0);
  53.     }
  54.     return 0;
  55. }
  56. static void
  57. fingerd(s,unused,p)
  58. int s;
  59. void *unused;
  60. void *p;
  61. {
  62.     char user[80];
  63.     FILE *fp;
  64.     char *file,*cp;
  65.  
  66.     sockmode(s,SOCK_ASCII);
  67.     sockowner(s,Curproc);
  68.     log(s,"open Finger");
  69.     recvline(s,user,80);
  70.     rip(user);
  71.     if(strlen(user) == 0){
  72.         fp = dir(Fdir,0);
  73.         if(fp == NULLFILE)
  74.             usprintf(s,"No finger information available\n");
  75.         else
  76.             usprintf(s,"Known users on this system:\n");
  77.     } else {
  78.         file = pathname(Fdir,user);
  79.         cp = pathname(Fdir,"");
  80.         /* Check for attempted security violation (e.g., somebody
  81.          * might be trying to finger "../ftpusers"!)
  82.          */
  83.         if(strncmp(file,cp,strlen(cp)) != 0){
  84.             fp = NULLFILE;
  85.             usprintf(s,"Invalid user name %s\n",user);
  86.         } else if((fp = fopen(file,READ_TEXT)) == NULLFILE)
  87.             usprintf(s,"User %s not known\n",user);
  88.         free(cp);
  89.         free(file);
  90.     }
  91.     if(fp != NULLFILE){
  92.         sendfile(fp,s,ASCII_TYPE,0);
  93.         fclose(fp);
  94.     }
  95. #ifdef    MAILBOX
  96.     if(strlen(user) == 0){
  97.         usprintf(s,"\nCurrent remote users:\n");
  98.         close_s(Curproc->output);
  99.         Curproc->output = s;
  100.         domboxdisplay(0,NULLCHARP,NULL);
  101.     }
  102. #endif
  103.     close_s(s);
  104.     log(s,"close Finger");
  105. }
  106. int
  107. fin0(argc,argv,p)
  108. int argc;
  109. char *argv[];
  110. void *p;
  111. {
  112.     close_s(Sfinger);
  113.     Sfinger = -1;
  114.     return 0;
  115. }
  116.