lib/conn.c

   1 /* Copyright 2010, 2011 NORDUnet A/S. All rights reserved.
   2    See the file COPYING for licensing information.  */
   3
   4 #if defined HAVE_CONFIG_H
   5 #include <config.h>
   6 #endif
   7
   8 #include <string.h>
   9 #include <assert.h>
  10 #include <event2/event.h>
  11 #include <event2/bufferevent.h>
  12 #include <radsec/radsec.h>
  13 #include <radsec/radsec-impl.h>
  14 #include "debug.h"
  15 #include "conn.h"
  16 #include "event.h"
  17 #include "packet.h"
  18 #include "tcp.h"
  19
  20 int
  21 conn_close (struct rs_connection **connp)
  22 {
  23   int r;
  24   assert (connp);
  25   assert (*connp);
  26   r = rs_conn_destroy (*connp);
  27   if (!r)
  28     *connp = NULL;
  29   return r;
  30 }
  31
  32 int
  33 conn_user_dispatch_p (const struct rs_connection *conn)
  34 {
  35   assert (conn);
  36
  37   return (conn->callbacks.connected_cb ||
  38           conn->callbacks.disconnected_cb ||
  39           conn->callbacks.received_cb ||
  40           conn->callbacks.sent_cb);
  41 }
  42
  43 int
  44 rs_conn_create (struct rs_context *ctx,
  45                 struct rs_connection **conn,
  46                 const char *config)
  47 {
  48   struct rs_connection *c;
  49
  50   c = (struct rs_connection *) malloc (sizeof(struct rs_connection));
  51   if (!c)
  52     return rs_err_ctx_push_fl (ctx, RSE_NOMEM, __FILE__, __LINE__, NULL);
  53
  54   memset (c, 0, sizeof(struct rs_connection));
  55   c->ctx = ctx;
  56   c->fd = -1;
  57   if (config)
  58     {
  59       struct rs_realm *r = rs_conf_find_realm (ctx, config);
  60       if (r)
  61         {
  62           struct rs_peer *p;
  63
  64           c->realm = r;
  65           c->peers = r->peers;  /* FIXME: Copy instead?  */
  66           for (p = c->peers; p; p = p->next)
  67             p->conn = c;
  68           c->timeout.tv_sec = r->timeout;
  69           c->tryagain = r->retries;
  70         }
  71       else
  72         {
  73           c->realm = rs_malloc (ctx, sizeof (struct rs_realm));
  74           if (!c->realm)
  75             return rs_err_ctx_push_fl (ctx, RSE_NOMEM, __FILE__, __LINE__,
  76                                        NULL);
  77           memset (c->realm, 0, sizeof (struct rs_realm));
  78         }
  79     }
  80
  81   if (conn)
  82     *conn = c;
  83   return RSE_OK;
  84 }
  85
  86 void
  87 rs_conn_set_type (struct rs_connection *conn, rs_conn_type_t type)
  88 {
  89   assert (conn);
  90   assert (conn->realm);
  91   conn->realm->type = type;
  92 }
  93
  94 int
  95 rs_conn_add_listener (struct rs_connection *conn,
  96                       rs_conn_type_t type,
  97                       const char *hostname,
  98                       int port)
  99 {
 100   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__, NULL);
 101 }
 102
 103
 104 int
 105 rs_conn_disconnect (struct rs_connection *conn)
 106 {
 107   int err = 0;
 108
 109   assert (conn);
 110
 111   err = evutil_closesocket (conn->fd);
 112   conn->fd = -1;
 113   return err;
 114 }
 115
 116 int
 117 rs_conn_destroy (struct rs_connection *conn)
 118 {
 119   int err = 0;
 120
 121   assert (conn);
 122
 123   /* NOTE: conn->realm is owned by context.  */
 124   /* NOTE: conn->peers is owned by context.  */
 125
 126   if (conn->is_connected)
 127     err = rs_conn_disconnect (conn);
 128   if (conn->tev)
 129     event_free (conn->tev);
 130   if (conn->bev)
 131     bufferevent_free (conn->bev);
 132   if (conn->evb)
 133     event_base_free (conn->evb);
 134   if (conn->rev)
 135     event_free (conn->rev);
 136   if (conn->wev)
 137     event_free (conn->wev);
 138
 139   /* TODO: free tls_ctx  */
 140   /* TODO: free tls_ssl  */
 141
 142   rs_free (conn->ctx, conn);
 143
 144   return err;
 145 }
 146
 147 int
 148 rs_conn_set_eventbase (struct rs_connection *conn, struct event_base *eb)
 149 {
 150   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__, NULL);
 151 }
 152
 153 void
 154 rs_conn_set_callbacks (struct rs_connection *conn, struct rs_conn_callbacks *cb)
 155 {
 156   assert (conn);
 157   memcpy (&conn->callbacks, cb, sizeof (conn->callbacks));
 158 }
 159
 160 void
 161 rs_conn_del_callbacks (struct rs_connection *conn)
 162 {
 163   assert (conn);
 164   memset (&conn->callbacks, 0, sizeof (conn->callbacks));
 165 }
 166
 167 struct rs_conn_callbacks *
 168 rs_conn_get_callbacks(struct rs_connection *conn)
 169 {
 170   assert (conn);
 171   return &conn->callbacks;
 172 }
 173
 174 int
 175 rs_conn_select_peer (struct rs_connection *conn, const char *name)
 176 {
 177   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__, NULL);
 178 }
 179
 180 int
 181 rs_conn_get_current_peer (struct rs_connection *conn,
 182                           const char *name,
 183                           size_t buflen)
 184 {
 185   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__, NULL);
 186 }
 187
 188 int rs_conn_fd (struct rs_connection *conn)
 189 {
 190   assert (conn);
 191   assert (conn->active_peer);
 192   return conn->fd;
 193 }
 194
 195 static void
 196 _rcb (struct rs_packet *packet, void *user_data)
 197 {
 198   struct rs_packet *pkt = (struct rs_packet *) user_data;
 199   assert (pkt);
 200   assert (pkt->conn);
 201
 202   pkt->flags |= rs_packet_received_flag;
 203   if (pkt->conn->bev)
 204     bufferevent_disable (pkt->conn->bev, EV_WRITE|EV_READ);
 205   else
 206     event_del (pkt->conn->rev);
 207 }
 208
 209 int
 210 rs_conn_receive_packet (struct rs_connection *conn,
 211                         struct rs_packet *req_msg,
 212                         struct rs_packet **pkt_out)
 213 {
 214   int err = 0;
 215   struct rs_packet *pkt = NULL;
 216
 217   assert (conn);
 218   assert (conn->realm);
 219   assert (!conn_user_dispatch_p (conn)); /* Dispatching mode only.  */
 220
 221   if (rs_packet_create (conn, &pkt))
 222     return -1;
 223
 224   assert (conn->evb);
 225   assert (conn->fd >= 0);
 226
 227   conn->callbacks.received_cb = _rcb;
 228   conn->user_data = pkt;
 229   pkt->flags &= ~rs_packet_received_flag;
 230
 231   if (conn->bev)                /* TCP.  */
 232     {
 233       bufferevent_setwatermark (conn->bev, EV_READ, RS_HEADER_LEN, 0);
 234       bufferevent_setcb (conn->bev, tcp_read_cb, NULL, tcp_event_cb, pkt);
 235       bufferevent_enable (conn->bev, EV_READ);
 236     }
 237   else                          /* UDP.  */
 238     {
 239       /* Put fresh packet in user_data for the callback and enable the
 240          read event.  */
 241       event_assign (conn->rev, conn->evb, event_get_fd (conn->rev),
 242                     EV_READ, event_get_callback (conn->rev), pkt);
 243       err = event_add (conn->rev, NULL);
 244       if (err < 0)
 245         return rs_err_conn_push_fl (pkt->conn, RSE_EVENT, __FILE__, __LINE__,
 246                                     "event_add: %s",
 247                                     evutil_gai_strerror (err));
 248
 249       /* Activae retransmission timer.  */
 250       conn_activate_timeout (pkt->conn);
 251     }
 252
 253   rs_debug (("%s: entering event loop\n", __func__));
 254   err = event_base_dispatch (conn->evb);
 255   conn->callbacks.received_cb = NULL;
 256   if (err < 0)
 257     return rs_err_conn_push_fl (pkt->conn, RSE_EVENT, __FILE__, __LINE__,
 258                                 "event_base_dispatch: %s",
 259                                 evutil_gai_strerror (err));
 260   rs_debug (("%s: event loop done\n", __func__));
 261
 262   if ((pkt->flags & rs_packet_received_flag) == 0
 263       || (req_msg
 264           && packet_verify_response (pkt->conn, pkt, req_msg) != RSE_OK))
 265     {
 266       assert (rs_err_conn_peek_code (pkt->conn));
 267       return rs_err_conn_peek_code (conn);
 268     }
 269
 270   if (pkt_out)
 271     *pkt_out = pkt;
 272   return RSE_OK;
 273 }
 274
 275 void
 276 rs_conn_set_timeout(struct rs_connection *conn, struct timeval *tv)
 277 {
 278   assert (conn);
 279   assert (tv);
 280   conn->timeout = *tv;
 281 }
 282
 283 int
 284 conn_activate_timeout (struct rs_connection *conn)
 285 {
 286   assert (conn);
 287   assert (conn->tev);
 288   assert (conn->evb);
 289   if (conn->timeout.tv_sec || conn->timeout.tv_usec)
 290     {
 291       rs_debug (("%s: activating timer: %d.%d\n", __func__,
 292                  conn->timeout.tv_sec, conn->timeout.tv_usec));
 293       if (evtimer_add (conn->tev, &conn->timeout))
 294         return rs_err_conn_push_fl (conn, RSE_EVENT, __FILE__, __LINE__,
 295                                     "evtimer_add: %d", errno);
 296     }
 297   return RSE_OK;
 298 }