Pileus Git - ~andy/fetchmail/blob - socket.c

   1 /*
   2  * socket.c -- socket library functions
   3  *
   4  * For license terms, see the file COPYING in this directory.
   5  */
   6
   7 #include <config.h>
   8
   9 #include <stdio.h>
  10 #include <string.h>
  11 #include <sys/types.h>
  12 #include <sys/socket.h>
  13 #include <netinet/in.h>
  14 #include <arpa/inet.h>
  15 #include <netdb.h>
  16 #if defined(STDC_HEADERS)
  17 #include <stdlib.h>
  18 #endif
  19 #if defined(HAVE_UNISTD_H)
  20 #include <unistd.h>
  21 #endif
  22 #if defined(HAVE_STDARG_H)
  23 #include <stdarg.h>
  24 #else
  25 #include <varargs.h>
  26 #endif
  27 #include "socket.h"
  28
  29 #ifndef  INADDR_NONE
  30 #ifdef   INADDR_BROADCAST
  31 #define  INADDR_NONE    INADDR_BROADCAST
  32 #else
  33 #define  INADDR_NONE    -1
  34 #endif
  35 #endif
  36
  37 /*
  38  * Size of buffer for internal buffering read function
  39  * don't increase beyond the maximum atomic read/write size for
  40  * your sockets, or you'll take a potentially huge performance hit
  41  */
  42 #define  INTERNAL_BUFSIZE       2048
  43
  44 FILE *sockopen(char *host, int clientPort)
  45 {
  46     int sock;
  47     unsigned long inaddr;
  48     struct sockaddr_in ad;
  49     struct hostent *hp;
  50     FILE *fp;
  51     static char sbuf[INTERNAL_BUFSIZE];
  52
  53     memset(&ad, 0, sizeof(ad));
  54     ad.sin_family = AF_INET;
  55
  56     inaddr = inet_addr(host);
  57     if (inaddr != INADDR_NONE)
  58         memcpy(&ad.sin_addr, &inaddr, sizeof(inaddr));
  59     else
  60     {
  61         hp = gethostbyname(host);
  62         if (hp == NULL)
  63             return (FILE *)NULL;
  64         memcpy(&ad.sin_addr, hp->h_addr, hp->h_length);
  65     }
  66     ad.sin_port = htons(clientPort);
  67
  68     sock = socket(AF_INET, SOCK_STREAM, 0);
  69     if (sock < 0)
  70         return (FILE *)NULL;
  71     if (connect(sock, (struct sockaddr *) &ad, sizeof(ad)) < 0)
  72     {
  73         close(sock);
  74         return (FILE *)NULL;
  75     }
  76     fp = fdopen(sock, "r+");
  77
  78 #ifdef FOO
  79     /* for unknown reasons, this results in horrible lossage */
  80     setvbuf(fp, sbuf, _IOLBF, INTERNAL_BUFSIZE);
  81 #endif /* FOO */
  82
  83     return(fp);
  84 }
  85
  86 /* socket.c ends here */