home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MISC / NETWORK / SRC_1218.ZIP / FINGER.C < prev    next >
Encoding:
C/C++ Source or Header  |  1991-01-27  |  1.7 KB  |  76 lines
  1. /* Internet finger client
  2.  * Copyright 1991 Phil Karn, KA9Q
  3.  */
  4. #include <stdio.h>
  5. #include <string.h>
  6. #include "global.h"
  7. #include "mbuf.h"
  8. #include "socket.h"
  9. #include "session.h"
  10. #include "proc.h"
  11. #include "netuser.h"
  12. #include "commands.h"
  13. #include "tty.h"
  14.  
  15. int
  16. dofinger(argc,argv,p)
  17. int argc;
  18. char *argv[];
  19. void *p;
  20. {
  21.     struct sockaddr_in sock;
  22.     char *cp;
  23.     int s,i;
  24.     struct mbuf *bp;
  25.     struct session *sp;
  26.  
  27.     /* Allocate a session descriptor */
  28.     if((sp = newsession(argv[1],FINGER)) == NULLSESSION){
  29.         tprintf("Too many sessions\n");
  30.         keywait(NULLCHAR,1);
  31.         return 1;
  32.     }
  33.     sp->ttystate.echo = sp->ttystate.edit = 0;
  34.     sp->flowmode = 1;
  35.     sock.sin_family = AF_INET;
  36.     sock.sin_port = IPPORT_FINGER;
  37.     for(i=1;i<argc;i++){
  38.         cp = strchr(argv[i],'@');
  39.         if(cp == NULLCHAR){
  40.             tprintf("%s: local names not supported\n",argv[i]);
  41.             continue;
  42.         }
  43.         *cp++ = '\0';
  44.         tprintf("%s@%s -- ",argv[i],cp);
  45.         tprintf("Resolving %s... ",cp);
  46.         if((sock.sin_addr.s_addr = resolve(cp)) == 0){
  47.             tprintf("Host %s unknown\n",cp);
  48.             continue;
  49.         }
  50.         tprintf("trying %s",psocket((struct sockaddr *)&sock));
  51.         if((sp->s = s = socket(AF_INET,SOCK_STREAM,0)) == -1){
  52.             tprintf("Can't create socket\n");
  53.             break;
  54.         }
  55.         sockmode(s,SOCK_ASCII);
  56.         if(connect(s,(char *)&sock,sizeof(sock)) == -1){
  57.             cp = sockerr(s);
  58.             tprintf(" -- Connect failed: %s\n",cp != NULLCHAR ? cp : "");
  59.             close_s(s);
  60.             sp->s = -1;
  61.             continue;
  62.         }
  63.         tprintf("\n");
  64.         usprintf(s,"%s\n",argv[i]);
  65.         usflush(Curproc->output);
  66.         while(recv_mbuf(s,&bp,0,NULLCHAR,(int *)0) > 0){
  67.             send_mbuf(Curproc->output,bp,0,NULLCHAR,0);
  68.         }
  69.         close_s(s);
  70.         sp->s = -1;
  71.     }
  72.     keywait(NULLCHAR,1);
  73.     freesession(sp);
  74.     return 0;
  75. }
  76.