gcc/testsuite/c-c++-common/analyzer/fd-glibc-byte-stream-socket.c

   1 /* Example from glibc manual (16.9.6).  */
   2 /* { dg-require-effective-target sockets } */
   3 /* { dg-skip-if "" { powerpc*-*-aix* } } */
   4
   5 #include <stdio.h>
   6 #include <string.h>
   7 #include <errno.h>
   8 #include <stdlib.h>
   9 #include <unistd.h>
  10 #include <sys/types.h>
  11 #include <sys/socket.h>
  12 #include <netinet/in.h>
  13 #include <netdb.h>
  14
  15 #define PORT            5555
  16 #define MESSAGE         "Yow!!! Are we having fun yet?!?"
  17 #define SERVERHOST      "www.gnu.org"
  18
  19 void
  20 write_to_server (int filedes)
  21 {
  22   int nbytes;
  23
  24   nbytes = write (filedes, MESSAGE, strlen (MESSAGE) + 1);
  25   if (nbytes < 0)
  26     {
  27       perror ("write");
  28       exit (EXIT_FAILURE);
  29     }
  30 }
  31
  32
  33 int
  34 main (void)
  35 {
  36   extern void init_sockaddr (struct sockaddr_in *name,
  37                              const char *hostname,
  38                              uint16_t port);
  39   int sock;
  40   struct sockaddr_in servername;
  41
  42   /* Create the socket. */
  43   sock = socket (PF_INET, SOCK_STREAM, 0);
  44   if (sock < 0)
  45     {
  46       perror ("socket (client)");
  47       exit (EXIT_FAILURE);
  48     }
  49
  50   /* Connect to the server. */
  51   init_sockaddr (&servername, SERVERHOST, PORT);
  52   if (0 > connect (sock,
  53                    (struct sockaddr *) &servername,
  54                    sizeof (servername)))
  55     {
  56       perror ("connect (client)");
  57       exit (EXIT_FAILURE);
  58     }
  59
  60   /* Send data to the server. */
  61   write_to_server (sock);
  62   close (sock);
  63   exit (EXIT_SUCCESS);
  64 }