libsoup/soup-socket.c

   1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
   2 /*
   3  * soup-socket.c: Socket networking code.
   4  *
   5  * Copyright (C) 2000-2003, Ximian, Inc.
   6  */
   7
   8 #ifdef HAVE_CONFIG_H
   9 #include <config.h>
  10 #endif
  11
  12 #include <errno.h>
  13 #include <fcntl.h>
  14 #include <signal.h>
  15 #include <string.h>
  16 #include <unistd.h>
  17
  18 #include "soup-address.h"
  19 #include "soup-socket.h"
  20 #include "soup-marshal.h"
  21 #include "soup-misc.h"
  22 #include "soup-ssl.h"
  23
  24 #include <sys/types.h>
  25 #include <sys/socket.h>
  26 #include <netinet/in.h>
  27 #include <netinet/tcp.h>
  28
  29 #define PARENT_TYPE G_TYPE_OBJECT
  30 static GObjectClass *parent_class;
  31
  32 enum {
  33         CONNECT_RESULT,
  34         READABLE,
  35         WRITABLE,
  36         DISCONNECTED,
  37         NEW_CONNECTION,
  38         LAST_SIGNAL
  39 };
  40
  41 static guint signals[LAST_SIGNAL] = { 0 };
  42
  43 enum {
  44         PROP_0,
  45
  46         PROP_NON_BLOCKING,
  47         PROP_NODELAY,
  48         PROP_REUSEADDR,
  49         PROP_IS_SERVER,
  50         PROP_SSL_CREDENTIALS,
  51
  52         LAST_PROP
  53 };
  54
  55 struct SoupSocketPrivate {
  56         int sockfd;
  57         SoupAddress *local_addr, *remote_addr;
  58         GIOChannel *iochannel;
  59
  60         guint non_blocking:1;
  61         guint nodelay:1;
  62         guint reuseaddr:1;
  63         guint is_server:1;
  64         gpointer ssl_creds;
  65
  66         guint           watch;
  67         guint           read_tag, write_tag, error_tag;
  68         GByteArray     *read_buf;
  69
  70         GMutex *iolock, *addrlock;
  71 };
  72
  73 #ifdef HAVE_IPV6
  74 #define soup_sockaddr_max sockaddr_in6
  75 #else
  76 #define soup_sockaddr_max sockaddr_in
  77 #endif
  78
  79 static void set_property (GObject *object, guint prop_id,
  80                           const GValue *value, GParamSpec *pspec);
  81 static void get_property (GObject *object, guint prop_id,
  82                           GValue *value, GParamSpec *pspec);
  83
  84 static void
  85 init (GObject *object)
  86 {
  87         SoupSocket *sock = SOUP_SOCKET (object);
  88
  89         sock->priv = g_new0 (SoupSocketPrivate, 1);
  90         sock->priv->sockfd = -1;
  91         sock->priv->non_blocking = sock->priv->nodelay = TRUE;
  92         sock->priv->reuseaddr = TRUE;
  93         sock->priv->addrlock = g_mutex_new ();
  94         sock->priv->iolock = g_mutex_new ();
  95 }
  96
  97 static void
  98 disconnect_internal (SoupSocket *sock)
  99 {
 100         g_io_channel_unref (sock->priv->iochannel);
 101         sock->priv->iochannel = NULL;
 102         sock->priv->sockfd = -1;
 103
 104         if (sock->priv->read_tag) {
 105                 g_source_remove (sock->priv->read_tag);
 106                 sock->priv->read_tag = 0;
 107         }
 108         if (sock->priv->write_tag) {
 109                 g_source_remove (sock->priv->write_tag);
 110                 sock->priv->write_tag = 0;
 111         }
 112         if (sock->priv->error_tag) {
 113                 g_source_remove (sock->priv->error_tag);
 114                 sock->priv->error_tag = 0;
 115         }
 116 }
 117
 118 static void
 119 finalize (GObject *object)
 120 {
 121         SoupSocket *sock = SOUP_SOCKET (object);
 122
 123         if (sock->priv->iochannel)
 124                 disconnect_internal (sock);
 125
 126         if (sock->priv->local_addr)
 127                 g_object_unref (sock->priv->local_addr);
 128         if (sock->priv->remote_addr)
 129                 g_object_unref (sock->priv->remote_addr);
 130
 131         if (sock->priv->watch)
 132                 g_source_remove (sock->priv->watch);
 133
 134         g_mutex_free (sock->priv->addrlock);
 135         g_mutex_free (sock->priv->iolock);
 136
 137         g_free (sock->priv);
 138
 139         G_OBJECT_CLASS (parent_class)->finalize (object);
 140 }
 141
 142 static void
 143 class_init (GObjectClass *object_class)
 144 {
 145         parent_class = g_type_class_ref (PARENT_TYPE);
 146
 147         /* virtual method override */
 148         object_class->finalize = finalize;
 149         object_class->set_property = set_property;
 150         object_class->get_property = get_property;
 151
 152         /* signals */
 153         signals[CONNECT_RESULT] =
 154                 g_signal_new ("connect_result",
 155                               G_OBJECT_CLASS_TYPE (object_class),
 156                               G_SIGNAL_RUN_FIRST,
 157                               G_STRUCT_OFFSET (SoupSocketClass, connect_result),
 158                               NULL, NULL,
 159                               soup_marshal_NONE__INT,
 160                               G_TYPE_NONE, 1,
 161                               G_TYPE_INT);
 162         signals[READABLE] =
 163                 g_signal_new ("readable",
 164                               G_OBJECT_CLASS_TYPE (object_class),
 165                               G_SIGNAL_RUN_LAST,
 166                               G_STRUCT_OFFSET (SoupSocketClass, readable),
 167                               NULL, NULL,
 168                               soup_marshal_NONE__NONE,
 169                               G_TYPE_NONE, 0);
 170         signals[WRITABLE] =
 171                 g_signal_new ("writable",
 172                               G_OBJECT_CLASS_TYPE (object_class),
 173                               G_SIGNAL_RUN_LAST,
 174                               G_STRUCT_OFFSET (SoupSocketClass, writable),
 175                               NULL, NULL,
 176                               soup_marshal_NONE__NONE,
 177                               G_TYPE_NONE, 0);
 178         signals[DISCONNECTED] =
 179                 g_signal_new ("disconnected",
 180                               G_OBJECT_CLASS_TYPE (object_class),
 181                               G_SIGNAL_RUN_LAST,
 182                               G_STRUCT_OFFSET (SoupSocketClass, disconnected),
 183                               NULL, NULL,
 184                               soup_marshal_NONE__NONE,
 185                               G_TYPE_NONE, 0);
 186         signals[NEW_CONNECTION] =
 187                 g_signal_new ("new_connection",
 188                               G_OBJECT_CLASS_TYPE (object_class),
 189                               G_SIGNAL_RUN_FIRST,
 190                               G_STRUCT_OFFSET (SoupSocketClass, new_connection),
 191                               NULL, NULL,
 192                               soup_marshal_NONE__OBJECT,
 193                               G_TYPE_NONE, 1,
 194                               SOUP_TYPE_SOCKET);
 195
 196         /* properties */
 197         g_object_class_install_property (
 198                 object_class, PROP_NON_BLOCKING,
 199                 g_param_spec_boolean (SOUP_SOCKET_FLAG_NONBLOCKING,
 200                                       "Non-blocking",
 201                                       "Whether or not the socket uses non-blocking I/O",
 202                                       TRUE,
 203                                       G_PARAM_READWRITE));
 204         g_object_class_install_property (
 205                 object_class, PROP_NODELAY,
 206                 g_param_spec_boolean (SOUP_SOCKET_FLAG_NODELAY,
 207                                       "NODELAY",
 208                                       "Whether or not the socket uses TCP NODELAY",
 209                                       TRUE,
 210                                       G_PARAM_READWRITE));
 211         g_object_class_install_property (
 212                 object_class, PROP_REUSEADDR,
 213                 g_param_spec_boolean (SOUP_SOCKET_FLAG_REUSEADDR,
 214                                       "REUSEADDR",
 215                                       "Whether or not the socket uses the TCP REUSEADDR flag",
 216                                       TRUE,
 217                                       G_PARAM_READWRITE));
 218         g_object_class_install_property (
 219                 object_class, PROP_IS_SERVER,
 220                 g_param_spec_boolean (SOUP_SOCKET_IS_SERVER,
 221                                       "Server",
 222                                       "Whether or not the socket is a server socket",
 223                                       FALSE,
 224                                       G_PARAM_READABLE));
 225         g_object_class_install_property (
 226                 object_class, PROP_SSL_CREDENTIALS,
 227                 g_param_spec_pointer (SOUP_SOCKET_SSL_CREDENTIALS,
 228                                       "SSL credentials",
 229                                       "SSL credential information, passed from the session to the SSL implementation",
 230                                       G_PARAM_READWRITE));
 231 }
 232
 233 SOUP_MAKE_TYPE (soup_socket, SoupSocket, class_init, init, PARENT_TYPE)
 234
 235
 236 static void
 237 update_fdflags (SoupSocket *sock)
 238 {
 239         int flags, opt;
 240
 241         if (sock->priv->sockfd == -1)
 242                 return;
 243
 244         flags = fcntl (sock->priv->sockfd, F_GETFL, 0);
 245         if (flags != -1) {
 246                 if (sock->priv->non_blocking)
 247                         flags |= O_NONBLOCK;
 248                 else
 249                         flags &= ~O_NONBLOCK;
 250                 fcntl (sock->priv->sockfd, F_SETFL, flags);
 251         }
 252
 253         opt = (sock->priv->nodelay != 0);
 254         setsockopt (sock->priv->sockfd, IPPROTO_TCP,
 255                     TCP_NODELAY, &opt, sizeof (opt));
 256
 257         opt = (sock->priv->reuseaddr != 0);
 258         setsockopt (sock->priv->sockfd, SOL_SOCKET,
 259                     SO_REUSEADDR, &opt, sizeof (opt));
 260 }
 261
 262 static void
 263 set_property (GObject *object, guint prop_id,
 264               const GValue *value, GParamSpec *pspec)
 265 {
 266         SoupSocket *sock = SOUP_SOCKET (object);
 267
 268         switch (prop_id) {
 269         case PROP_NON_BLOCKING:
 270                 sock->priv->non_blocking = g_value_get_boolean (value);
 271                 update_fdflags (sock);
 272                 break;
 273         case PROP_NODELAY:
 274                 sock->priv->nodelay = g_value_get_boolean (value);
 275                 update_fdflags (sock);
 276                 break;
 277         case PROP_REUSEADDR:
 278                 sock->priv->reuseaddr = g_value_get_boolean (value);
 279                 update_fdflags (sock);
 280                 break;
 281         case PROP_SSL_CREDENTIALS:
 282                 sock->priv->ssl_creds = g_value_get_pointer (value);
 283                 break;
 284         default:
 285                 break;
 286         }
 287 }
 288
 289 static void
 290 get_property (GObject *object, guint prop_id,
 291               GValue *value, GParamSpec *pspec)
 292 {
 293         SoupSocket *sock = SOUP_SOCKET (object);
 294
 295         switch (prop_id) {
 296         case PROP_NON_BLOCKING:
 297                 g_value_set_boolean (value, sock->priv->non_blocking);
 298                 break;
 299         case PROP_NODELAY:
 300                 g_value_set_boolean (value, sock->priv->nodelay);
 301                 break;
 302         case PROP_REUSEADDR:
 303                 g_value_set_boolean (value, sock->priv->reuseaddr);
 304                 break;
 305         case PROP_IS_SERVER:
 306                 g_value_set_boolean (value, sock->priv->is_server);
 307                 break;
 308         case PROP_SSL_CREDENTIALS:
 309                 g_value_set_pointer (value, sock->priv->ssl_creds);
 310                 break;
 311         default:
 312                 break;
 313         }
 314 }
 315
 316
 317 /**
 318  * soup_socket_new:
 319  * @optname1: name of first property to set (or %NULL)
 320  * @...: value of @optname1, followed by additional property/value pairs
 321  *
 322  * Return value: a new (disconnected) socket
 323  **/
 324 SoupSocket *
 325 soup_socket_new (const char *optname1, ...)
 326 {
 327         SoupSocket *sock;
 328         va_list ap;
 329
 330         va_start (ap, optname1);
 331         sock = (SoupSocket *)g_object_new_valist (SOUP_TYPE_SOCKET,
 332                                                   optname1, ap);
 333         va_end (ap);
 334
 335         return sock;
 336 }
 337
 338 static GIOChannel *
 339 get_iochannel (SoupSocket *sock)
 340 {
 341         g_mutex_lock (sock->priv->iolock);
 342         if (!sock->priv->iochannel) {
 343                 sock->priv->iochannel =
 344                         g_io_channel_unix_new (sock->priv->sockfd);
 345                 g_io_channel_set_close_on_unref (sock->priv->iochannel, TRUE);
 346                 g_io_channel_set_encoding (sock->priv->iochannel, NULL, NULL);
 347                 g_io_channel_set_buffered (sock->priv->iochannel, FALSE);
 348         }
 349         g_mutex_unlock (sock->priv->iolock);
 350         return sock->priv->iochannel;
 351 }
 352
 353 static gboolean
 354 idle_connect_result (gpointer user_data)
 355 {
 356         SoupSocket *sock = user_data;
 357
 358         sock->priv->watch = 0;
 359
 360         g_signal_emit (sock, signals[CONNECT_RESULT], 0,
 361                        sock->priv->sockfd != -1 ? SOUP_STATUS_OK : SOUP_STATUS_CANT_CONNECT);
 362         return FALSE;
 363 }
 364
 365 static gboolean
 366 connect_watch (GIOChannel* iochannel, GIOCondition condition, gpointer data)
 367 {
 368         SoupSocket *sock = data;
 369         int error = 0;
 370         int len = sizeof (error);
 371
 372         /* Remove the watch now in case we don't return immediately */
 373         g_source_remove (sock->priv->watch);
 374         sock->priv->watch = 0;
 375
 376         if (condition & ~(G_IO_IN | G_IO_OUT))
 377                 goto cant_connect;
 378
 379         if (getsockopt (sock->priv->sockfd, SOL_SOCKET, SO_ERROR,
 380                         &error, &len) != 0)
 381                 goto cant_connect;
 382         if (error)
 383                 goto cant_connect;
 384
 385         return idle_connect_result (sock);
 386
 387  cant_connect:
 388         g_signal_emit (sock, signals[CONNECT_RESULT], 0, SOUP_STATUS_CANT_CONNECT);
 389         return FALSE;
 390 }
 391
 392 static void
 393 got_address (SoupAddress *addr, guint status, gpointer user_data)
 394 {
 395         SoupSocket *sock = user_data;
 396
 397         if (!SOUP_STATUS_IS_SUCCESSFUL (status)) {
 398                 g_signal_emit (sock, signals[CONNECT_RESULT], 0, status);
 399                 g_object_unref (sock);
 400                 return;
 401         }
 402
 403         soup_socket_connect (sock, sock->priv->remote_addr);
 404         /* soup_socket_connect re-reffed addr */
 405         g_object_unref (addr);
 406
 407         g_object_unref (sock);
 408 }
 409
 410 /**
 411  * soup_socket_connect:
 412  * @sock: a client #SoupSocket (which must not already be connected)
 413  * @remote_addr: address to connect to
 414  *
 415  * If %SOUP_SOCKET_FLAG_NONBLOCKING has been set on the socket, this
 416  * begins asynchronously connecting to the given address. The socket
 417  * will emit %connect_result when it succeeds or fails (but not before
 418  * returning from this function).
 419  *
 420  * If %SOUP_SOCKET_FLAG_NONBLOCKING has not been set, this will
 421  * attempt to synchronously connect.
 422  *
 423  * Return value: %SOUP_STATUS_CONTINUE if connecting asynchronously,
 424  * otherwise a success or failure code.
 425  **/
 426 guint
 427 soup_socket_connect (SoupSocket *sock, SoupAddress *remote_addr)
 428 {
 429         struct sockaddr *sa;
 430         int len, status;
 431
 432         g_return_val_if_fail (SOUP_IS_SOCKET (sock), SOUP_STATUS_MALFORMED);
 433         g_return_val_if_fail (!sock->priv->is_server, SOUP_STATUS_MALFORMED);
 434         g_return_val_if_fail (sock->priv->sockfd == -1, SOUP_STATUS_MALFORMED);
 435         g_return_val_if_fail (SOUP_IS_ADDRESS (remote_addr), SOUP_STATUS_MALFORMED);
 436
 437         sock->priv->remote_addr = g_object_ref (remote_addr);
 438         if (!sock->priv->non_blocking) {
 439                 status = soup_address_resolve_sync (remote_addr);
 440                 if (!SOUP_STATUS_IS_SUCCESSFUL (status))
 441                         return status;
 442         }
 443
 444         sa = soup_address_get_sockaddr (sock->priv->remote_addr, &len);
 445         if (!sa) {
 446                 if (!sock->priv->non_blocking)
 447                         return SOUP_STATUS_CANT_RESOLVE;
 448
 449                 g_object_ref (sock);
 450                 soup_address_resolve_async (remote_addr, got_address, sock);
 451                 return SOUP_STATUS_CONTINUE;
 452         }
 453
 454         sock->priv->sockfd = socket (sa->sa_family, SOCK_STREAM, 0);
 455         if (sock->priv->sockfd == -1) {
 456                 goto done;
 457         }
 458         update_fdflags (sock);
 459
 460         status = connect (sock->priv->sockfd, sa, len);
 461
 462         if (status == -1) {
 463                 if (errno == EINPROGRESS) {
 464                         /* Wait for connect to succeed or fail */
 465                         sock->priv->watch =
 466                                 g_io_add_watch (get_iochannel (sock),
 467                                                 G_IO_IN | G_IO_OUT |
 468                                                 G_IO_PRI | G_IO_ERR |
 469                                                 G_IO_HUP | G_IO_NVAL,
 470                                                 connect_watch, sock);
 471                         return SOUP_STATUS_CONTINUE;
 472                 } else {
 473                         close (sock->priv->sockfd);
 474                         sock->priv->sockfd = -1;
 475                 }
 476         }
 477
 478  done:
 479         if (sock->priv->non_blocking) {
 480                 sock->priv->watch = g_idle_add (idle_connect_result, sock);
 481                 return SOUP_STATUS_CONTINUE;
 482         } else if (sock->priv->sockfd == -1)
 483                 return SOUP_STATUS_CANT_CONNECT;
 484         else {
 485                 get_iochannel (sock);
 486                 return SOUP_STATUS_OK;
 487         }
 488 }
 489
 490 static gboolean
 491 listen_watch (GIOChannel* iochannel, GIOCondition condition, gpointer data)
 492 {
 493         SoupSocket *sock = data, *new;
 494         struct soup_sockaddr_max sa;
 495         int sa_len, sockfd;
 496
 497         if (condition & (G_IO_HUP | G_IO_ERR)) {
 498                 g_source_remove (sock->priv->watch);
 499                 sock->priv->watch = 0;
 500                 return FALSE;
 501         }
 502
 503         sa_len = sizeof (sa);
 504         sockfd = accept (sock->priv->sockfd, (struct sockaddr *)&sa, &sa_len);
 505         if (sockfd == -1)
 506                 return TRUE;
 507
 508         new = g_object_new (SOUP_TYPE_SOCKET, NULL);
 509         new->priv->sockfd = sockfd;
 510         new->priv->non_blocking = sock->priv->non_blocking;
 511         new->priv->nodelay = sock->priv->nodelay;
 512         new->priv->is_server = TRUE;
 513         new->priv->ssl_creds = sock->priv->ssl_creds;
 514         update_fdflags (new);
 515
 516         new->priv->remote_addr = soup_address_new_from_sockaddr ((struct sockaddr *)&sa, sa_len);
 517
 518         if (new->priv->ssl_creds) {
 519                 if (!soup_socket_start_ssl (new)) {
 520                         g_object_unref (new);
 521                         return TRUE;
 522                 }
 523         } else
 524                 get_iochannel (new);
 525
 526         g_signal_emit (sock, signals[NEW_CONNECTION], 0, new);
 527         g_object_unref (new);
 528
 529         return TRUE;
 530 }
 531
 532 /**
 533  * soup_socket_listen:
 534  * @sock: a server #SoupSocket (which must not already be connected or
 535  * listening)
 536  * @local_addr: Local address to bind to.
 537  *
 538  * Makes @sock start listening on the given interface and port. When
 539  * connections come in, @sock will emit %new_connection.
 540  *
 541  * Return value: whether or not @sock is now listening.
 542  **/
 543 gboolean
 544 soup_socket_listen (SoupSocket *sock, SoupAddress *local_addr)
 545 {
 546         struct sockaddr *sa;
 547         int sa_len;
 548
 549         g_return_val_if_fail (SOUP_IS_SOCKET (sock), FALSE);
 550         g_return_val_if_fail (sock->priv->is_server, FALSE);
 551         g_return_val_if_fail (sock->priv->sockfd == -1, FALSE);
 552         g_return_val_if_fail (SOUP_IS_ADDRESS (local_addr), FALSE);
 553
 554         /* @local_addr may have its port set to 0. So we intentionally
 555          * don't store it in sock->priv->local_addr, so that if the
 556          * caller calls soup_socket_get_local_address() later, we'll
 557          * have to make a new addr by calling getsockname(), which
 558          * will have the right port number.
 559          */
 560         sa = soup_address_get_sockaddr (local_addr, &sa_len);
 561         g_return_val_if_fail (sa != NULL, FALSE);
 562
 563         sock->priv->sockfd = socket (sa->sa_family, SOCK_STREAM, 0);
 564         if (sock->priv->sockfd < 0)
 565                 goto cant_listen;
 566         update_fdflags (sock);
 567
 568         /* Bind */
 569         if (bind (sock->priv->sockfd, sa, sa_len) != 0)
 570                 goto cant_listen;
 571
 572         /* Listen */
 573         if (listen (sock->priv->sockfd, 10) != 0)
 574                 goto cant_listen;
 575
 576         sock->priv->watch = g_io_add_watch (get_iochannel (sock),
 577                                             G_IO_IN | G_IO_ERR | G_IO_HUP,
 578                                             listen_watch, sock);
 579         return TRUE;
 580
 581  cant_listen:
 582         if (sock->priv->sockfd != -1) {
 583                 close (sock->priv->sockfd);
 584                 sock->priv->sockfd = -1;
 585         }
 586
 587         return FALSE;
 588 }
 589
 590 /**
 591  * soup_socket_start_ssl:
 592  * @sock: the socket
 593  *
 594  * Starts using SSL on @socket.
 595  *
 596  * Return value: success or failure
 597  **/
 598 gboolean
 599 soup_socket_start_ssl (SoupSocket *sock)
 600 {
 601         GIOChannel *ssl_chan;
 602
 603         get_iochannel (sock);
 604         ssl_chan = soup_ssl_wrap_iochannel (
 605                 sock->priv->iochannel, sock->priv->is_server ?
 606                 SOUP_SSL_TYPE_SERVER : SOUP_SSL_TYPE_CLIENT,
 607                 soup_address_get_name (sock->priv->remote_addr),
 608                 sock->priv->ssl_creds);
 609
 610         if (!ssl_chan)
 611                 return FALSE;
 612
 613         sock->priv->iochannel = ssl_chan;
 614         return TRUE;
 615 }
 616
 617
 618 /**
 619  * soup_socket_client_new_async:
 620  * @hostname: remote machine to connect to
 621  * @port: remote port to connect to
 622  * @ssl_creds: SSL credentials structure, or %NULL if not SSL
 623  * @callback: callback to call when the socket is connected
 624  * @user_data: data for @callback
 625  *
 626  * Creates a connection to @hostname and @port. @callback will be
 627  * called when the connection completes (or fails).
 628  *
 629  * Return value: the new socket (not yet ready for use).
 630  **/
 631 SoupSocket *
 632 soup_socket_client_new_async (const char *hostname, guint port,
 633                               gpointer ssl_creds,
 634                               SoupSocketCallback callback, gpointer user_data)
 635 {
 636         SoupSocket *sock;
 637
 638         g_return_val_if_fail (hostname != NULL, NULL);
 639
 640         sock = g_object_new (SOUP_TYPE_SOCKET,
 641                              SOUP_SOCKET_SSL_CREDENTIALS, ssl_creds,
 642                              NULL);
 643         soup_socket_connect (sock, soup_address_new (hostname, port));
 644
 645         if (callback) {
 646                 soup_signal_connect_once (sock, "connect_result",
 647                                           G_CALLBACK (callback), user_data);
 648         }
 649         return sock;
 650 }
 651
 652 /**
 653  * soup_socket_client_new_sync:
 654  * @hostname: remote machine to connect to
 655  * @port: remote port to connect to
 656  * @ssl_creds: SSL credentials structure, or %NULL if not SSL
 657  * @status_ret: pointer to return the soup status in
 658  *
 659  * Creates a connection to @hostname and @port. If @status_ret is not
 660  * %NULL, it will contain a status code on return.
 661  *
 662  * Return value: the new socket, or %NULL if it could not connect.
 663  **/
 664 SoupSocket *
 665 soup_socket_client_new_sync (const char *hostname, guint port,
 666                              gpointer ssl_creds, guint *status_ret)
 667 {
 668         SoupSocket *sock;
 669         guint status;
 670
 671         g_return_val_if_fail (hostname != NULL, NULL);
 672
 673         sock = g_object_new (SOUP_TYPE_SOCKET,
 674                              SOUP_SOCKET_SSL_CREDENTIALS, ssl_creds,
 675                              NULL);
 676         sock->priv->non_blocking = FALSE;
 677         status = soup_socket_connect (sock, soup_address_new (hostname, port));
 678
 679         if (!SOUP_STATUS_IS_SUCCESSFUL (status)) {
 680                 g_object_unref (sock);
 681                 sock = NULL;
 682         }
 683
 684         if (status_ret)
 685                 *status_ret = status;
 686         return sock;
 687 }
 688
 689 /**
 690  * soup_socket_server_new:
 691  * @local_addr: Local address to bind to. (Use soup_address_any_new() to
 692  * accept connections on any local address)
 693  * @ssl_creds: SSL credentials, or %NULL if this is not an SSL server
 694  * @callback: Callback to call when a client connects
 695  * @user_data: data to pass to @callback.
 696  *
 697  * Create and open a new #SoupSocket listening on the specified
 698  * address. @callback will be called each time a client connects,
 699  * with a new #SoupSocket.
 700  *
 701  * Returns: a new #SoupSocket, or NULL if there was a failure.
 702  **/
 703 SoupSocket *
 704 soup_socket_server_new (SoupAddress *local_addr, gpointer ssl_creds,
 705                         SoupSocketListenerCallback callback,
 706                         gpointer user_data)
 707 {
 708         SoupSocket *sock;
 709
 710         g_return_val_if_fail (SOUP_IS_ADDRESS (local_addr), NULL);
 711
 712         sock = g_object_new (SOUP_TYPE_SOCKET,
 713                              SOUP_SOCKET_SSL_CREDENTIALS, ssl_creds,
 714                              NULL);
 715         sock->priv->is_server = TRUE;
 716         if (!soup_socket_listen (sock, local_addr)) {
 717                 g_object_unref (sock);
 718                 return NULL;
 719         }
 720
 721         if (callback) {
 722                 g_signal_connect (sock, "new_connection",
 723                                   G_CALLBACK (callback), user_data);
 724         }
 725
 726         return sock;
 727 }
 728
 729
 730 void
 731 soup_socket_disconnect (SoupSocket *sock)
 732 {
 733         gboolean already_disconnected = FALSE;
 734
 735         g_return_if_fail (SOUP_IS_SOCKET (sock));
 736
 737         if (g_mutex_trylock (sock->priv->iolock)) {
 738                 if (sock->priv->iochannel)
 739                         disconnect_internal (sock);
 740                 else
 741                         already_disconnected = TRUE;
 742                 g_mutex_unlock (sock->priv->iolock);
 743         } else {
 744                 int sockfd;
 745
 746                 /* Another thread is currently doing IO, so
 747                  * we can't close the iochannel. So just kick
 748                  * the file descriptor out from under it.
 749                  */
 750
 751                 sockfd = sock->priv->sockfd;
 752                 sock->priv->sockfd = -1;
 753                 if (sockfd == -1)
 754                         already_disconnected = TRUE;
 755                 else {
 756                         g_io_channel_set_close_on_unref (sock->priv->iochannel,
 757                                                          FALSE);
 758                         close (sockfd);
 759                 }
 760         }
 761
 762         if (already_disconnected)
 763                 return;
 764
 765         /* Give all readers a chance to notice the connection close */
 766         g_signal_emit (sock, signals[READABLE], 0);
 767
 768         /* FIXME: can't disconnect until all data is read */
 769
 770         /* Then let everyone know we're disconnected */
 771         g_signal_emit (sock, signals[DISCONNECTED], 0);
 772 }
 773
 774 gboolean
 775 soup_socket_is_connected (SoupSocket *sock)
 776 {
 777         g_return_val_if_fail (SOUP_IS_SOCKET (sock), FALSE);
 778
 779         return sock->priv->iochannel != NULL;
 780 }
 781
 782
 783 SoupAddress *
 784 soup_socket_get_local_address (SoupSocket *sock)
 785 {
 786         g_return_val_if_fail (SOUP_IS_SOCKET (sock), NULL);
 787
 788         g_mutex_lock (sock->priv->addrlock);
 789         if (!sock->priv->local_addr) {
 790                 struct soup_sockaddr_max bound_sa;
 791                 int sa_len;
 792
 793                 sa_len = sizeof (bound_sa);
 794                 getsockname (sock->priv->sockfd, (struct sockaddr *)&bound_sa, &sa_len);
 795                 sock->priv->local_addr = soup_address_new_from_sockaddr ((struct sockaddr *)&bound_sa, sa_len);
 796         }
 797         g_mutex_unlock (sock->priv->addrlock);
 798
 799         return sock->priv->local_addr;
 800 }
 801
 802 SoupAddress *
 803 soup_socket_get_remote_address (SoupSocket *sock)
 804 {
 805         g_return_val_if_fail (SOUP_IS_SOCKET (sock), NULL);
 806
 807         g_mutex_lock (sock->priv->addrlock);
 808         if (!sock->priv->remote_addr) {
 809                 struct soup_sockaddr_max bound_sa;
 810                 int sa_len;
 811
 812                 sa_len = sizeof (bound_sa);
 813                 getpeername (sock->priv->sockfd, (struct sockaddr *)&bound_sa, &sa_len);
 814                 sock->priv->remote_addr = soup_address_new_from_sockaddr ((struct sockaddr *)&bound_sa, sa_len);
 815         }
 816         g_mutex_unlock (sock->priv->addrlock);
 817
 818         return sock->priv->remote_addr;
 819 }
 820
 821
 822
 823
 824 static gboolean
 825 socket_read_watch (GIOChannel *chan, GIOCondition cond, gpointer user_data)
 826 {
 827         SoupSocket *sock = user_data;
 828
 829         sock->priv->read_tag = 0;
 830         g_signal_emit (sock, signals[READABLE], 0);
 831
 832         return FALSE;
 833 }
 834
 835 static SoupSocketIOStatus
 836 read_from_network (SoupSocket *sock, gpointer buffer, gsize len, gsize *nread)
 837 {
 838         GIOStatus status;
 839         GIOCondition cond = G_IO_IN;
 840         GError *err = NULL;
 841
 842         if (!sock->priv->iochannel)
 843                 return SOUP_SOCKET_EOF;
 844
 845         status = g_io_channel_read_chars (sock->priv->iochannel,
 846                                           buffer, len, nread, &err);
 847         if (err) {
 848                 if (err->domain == SOUP_SSL_ERROR &&
 849                     err->code == SOUP_SSL_ERROR_HANDSHAKE_NEEDS_WRITE)
 850                         cond = G_IO_OUT;
 851                 g_error_free (err);
 852         }
 853
 854         switch (status) {
 855         case G_IO_STATUS_NORMAL:
 856         case G_IO_STATUS_AGAIN:
 857                 if (*nread > 0)
 858                         return SOUP_SOCKET_OK;
 859
 860                 if (!sock->priv->read_tag) {
 861                         sock->priv->read_tag =
 862                                 g_io_add_watch (sock->priv->iochannel, cond,
 863                                                 socket_read_watch, sock);
 864                 }
 865                 return SOUP_SOCKET_WOULD_BLOCK;
 866
 867         case G_IO_STATUS_EOF:
 868                 return SOUP_SOCKET_EOF;
 869
 870         default:
 871                 return SOUP_SOCKET_ERROR;
 872         }
 873 }
 874
 875 static SoupSocketIOStatus
 876 read_from_buf (SoupSocket *sock, gpointer buffer, gsize len, gsize *nread)
 877 {
 878         GByteArray *read_buf = sock->priv->read_buf;
 879
 880         *nread = MIN (read_buf->len, len);
 881         memcpy (buffer, read_buf->data, *nread);
 882
 883         if (*nread == read_buf->len) {
 884                 g_byte_array_free (read_buf, TRUE);
 885                 sock->priv->read_buf = NULL;
 886         } else {
 887                 memmove (read_buf->data, read_buf->data + *nread,
 888                          read_buf->len - *nread);
 889                 g_byte_array_set_size (read_buf, read_buf->len - *nread);
 890         }
 891
 892         return SOUP_SOCKET_OK;
 893 }
 894
 895 /**
 896  * soup_socket_read:
 897  * @sock: the socket
 898  * @buffer: buffer to read into
 899  * @len: size of @buffer in bytes
 900  * @nread: on return, the number of bytes read into @buffer
 901  *
 902  * Attempts to read up to @len bytes from @sock into @buffer. If some
 903  * data is successfully read, soup_socket_read() will return
 904  * %SOUP_SOCKET_OK, and *@nread will contain the number of bytes
 905  * actually read.
 906  *
 907  * If @sock is non-blocking, and no data is available, the return
 908  * value will be %SOUP_SOCKET_WOULD_BLOCK. In this case, the caller
 909  * can connect to the %readable signal to know when there is more data
 910  * to read. (NB: You MUST read all available data off the socket
 911  * first. The %readable signal will only be emitted after
 912  * soup_socket_read() has returned %SOUP_SOCKET_WOULD_BLOCK.)
 913  *
 914  * Return value: a #SoupSocketIOStatus, as described above (or
 915  * %SOUP_SOCKET_EOF if the socket is no longer connected, or
 916  * %SOUP_SOCKET_ERROR on any other error).
 917  **/
 918 SoupSocketIOStatus
 919 soup_socket_read (SoupSocket *sock, gpointer buffer, gsize len, gsize *nread)
 920 {
 921         SoupSocketIOStatus status;
 922
 923         g_return_val_if_fail (SOUP_IS_SOCKET (sock), SOUP_SOCKET_ERROR);
 924
 925         g_mutex_lock (sock->priv->iolock);
 926         if (sock->priv->read_buf)
 927                 status = read_from_buf (sock, buffer, len, nread);
 928         else
 929                 status = read_from_network (sock, buffer, len, nread);
 930         g_mutex_unlock (sock->priv->iolock);
 931
 932         return status;
 933 }
 934
 935 /**
 936  * soup_socket_read_until:
 937  * @sock: the socket
 938  * @buffer: buffer to read into
 939  * @len: size of @buffer in bytes
 940  * @boundary: boundary to read until
 941  * @boundary_len: length of @boundary in bytes
 942  * @nread: on return, the number of bytes read into @buffer
 943  * @got_boundary: on return, whether or not the data in @buffer
 944  * ends with the boundary string
 945  *
 946  * Like soup_socket_read(), but reads no further than the first
 947  * occurrence of @boundary. (If the boundary is found, it will be
 948  * included in the returned data, and *@got_boundary will be set to
 949  * %TRUE.) Any data after the boundary will returned in future reads.
 950  *
 951  * Return value: as for soup_socket_read()
 952  **/
 953 SoupSocketIOStatus
 954 soup_socket_read_until (SoupSocket *sock, gpointer buffer, gsize len,
 955                         gconstpointer boundary, gsize boundary_len,
 956                         gsize *nread, gboolean *got_boundary)
 957 {
 958         SoupSocketIOStatus status;
 959         GByteArray *read_buf;
 960         guint match_len, prev_len;
 961         guint8 *p, *end;
 962
 963         g_return_val_if_fail (SOUP_IS_SOCKET (sock), SOUP_SOCKET_ERROR);
 964         g_return_val_if_fail (len >= boundary_len, SOUP_SOCKET_ERROR);
 965
 966         g_mutex_lock (sock->priv->iolock);
 967
 968         *got_boundary = FALSE;
 969
 970         if (!sock->priv->read_buf)
 971                 sock->priv->read_buf = g_byte_array_new ();
 972         read_buf = sock->priv->read_buf;
 973
 974         if (read_buf->len < boundary_len) {
 975                 prev_len = read_buf->len;
 976                 g_byte_array_set_size (read_buf, len);
 977                 status = read_from_network (sock,
 978                                             read_buf->data + prev_len,
 979                                             len - prev_len, nread);
 980                 read_buf->len = prev_len + *nread;
 981
 982                 if (status != SOUP_SOCKET_OK) {
 983                         g_mutex_unlock (sock->priv->iolock);
 984                         return status;
 985                 }
 986         }
 987
 988         /* Scan for the boundary */
 989         end = read_buf->data + read_buf->len;
 990         for (p = read_buf->data; p <= end - boundary_len; p++) {
 991                 if (!memcmp (p, boundary, boundary_len)) {
 992                         p += boundary_len;
 993                         *got_boundary = TRUE;
 994                         break;
 995                 }
 996         }
 997
 998         /* Return everything up to 'p' (which is either just after the
 999          * boundary, or @boundary_len - 1 bytes before the end of the
1000          * buffer).
1001          */
1002         match_len = p - read_buf->data;
1003         status = read_from_buf (sock, buffer, MIN (len, match_len), nread);
1004
1005         g_mutex_unlock (sock->priv->iolock);
1006         return status;
1007 }
1008
1009 static gboolean
1010 socket_write_watch (GIOChannel *chan, GIOCondition condition, gpointer user_data)
1011 {
1012         SoupSocket *sock = user_data;
1013
1014         sock->priv->write_tag = 0;
1015         g_signal_emit (sock, signals[WRITABLE], 0);
1016
1017         return FALSE;
1018 }
1019
1020 /**
1021  * soup_socket_write:
1022  * @sock: the socket
1023  * @buffer: data to write
1024  * @len: size of @buffer, in bytes
1025  * @nwrote: on return, number of bytes written
1026  *
1027  * Attempts to write @len bytes from @buffer to @sock. If some data is
1028  * successfully written, the resturn status will be
1029  * %SOUP_SOCKET_SUCCESS, and *@nwrote will contain the number of bytes
1030  * actually written.
1031  *
1032  * If @sock is non-blocking, and no data could be written right away,
1033  * the return value will be %SOUP_SOCKET_WOULD_BLOCK. In this case,
1034  * the caller can connect to the %writable signal to know when more
1035  * data can be written. (NB: %writable is only emitted after a
1036  * %SOUP_SOCKET_WOULD_BLOCK.)
1037  *
1038  * Return value: a #SoupSocketIOStatus, as described above (or
1039  * %SOUP_SOCKET_EOF or %SOUP_SOCKET_ERROR).
1040  **/
1041 SoupSocketIOStatus
1042 soup_socket_write (SoupSocket *sock, gconstpointer buffer,
1043                    gsize len, gsize *nwrote)
1044 {
1045         GIOStatus status;
1046         gpointer pipe_handler;
1047         GIOCondition cond = G_IO_OUT;
1048         GError *err = NULL;
1049
1050         g_return_val_if_fail (SOUP_IS_SOCKET (sock), SOUP_SOCKET_ERROR);
1051
1052         g_mutex_lock (sock->priv->iolock);
1053
1054         if (!sock->priv->iochannel) {
1055                 g_mutex_unlock (sock->priv->iolock);
1056                 return SOUP_SOCKET_EOF;
1057         }
1058         if (sock->priv->write_tag) {
1059                 g_mutex_unlock (sock->priv->iolock);
1060                 return SOUP_SOCKET_WOULD_BLOCK;
1061         }
1062
1063         pipe_handler = signal (SIGPIPE, SIG_IGN);
1064         status = g_io_channel_write_chars (sock->priv->iochannel,
1065                                            buffer, len, nwrote, &err);
1066         signal (SIGPIPE, pipe_handler);
1067         if (err) {
1068                 if (err->domain == SOUP_SSL_ERROR &&
1069                     err->code == SOUP_SSL_ERROR_HANDSHAKE_NEEDS_READ)
1070                         cond = G_IO_IN;
1071                 g_error_free (err);
1072         }
1073
1074         if (status != G_IO_STATUS_NORMAL && status != G_IO_STATUS_AGAIN) {
1075                 g_mutex_unlock (sock->priv->iolock);
1076                 return SOUP_SOCKET_ERROR;
1077         }
1078
1079         if (*nwrote) {
1080                 g_mutex_unlock (sock->priv->iolock);
1081                 return SOUP_SOCKET_OK;
1082         }
1083
1084         sock->priv->write_tag =
1085                 g_io_add_watch (sock->priv->iochannel, cond,
1086                                 socket_write_watch, sock);
1087         g_mutex_unlock (sock->priv->iolock);
1088         return SOUP_SOCKET_WOULD_BLOCK;
1089 }