lib/request.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 <stdint.h>
   9 #include <stdlib.h>
  10 #include <assert.h>
  11 #include <sys/time.h>
  12 #include <event2/event.h>
  13 #include <radsec/radsec.h>
  14 #include <radsec/radsec-impl.h>
  15 #include <radsec/request.h>
  16 #include <radsec/request-impl.h>
  17 #include <freeradius/libradius.h>
  18 #include "debug.h"
  19 #include "conn.h"
  20 #include "tcp.h"
  21 #include "udp.h"
  22
  23 /* RFC 5080 2.2.1.  Retransmission Behavior.  */
  24 #define IRT 2
  25 #define MRC 5
  26 #define MRT 16
  27 #define MRD 30
  28 #define RAND 100                /* Rand factor, milliseconds. */
  29
  30 int
  31 rs_request_create (struct rs_connection *conn, struct rs_request **req_out)
  32 {
  33   struct rs_request *req = rs_malloc (conn->ctx, sizeof(*req));
  34   assert (req_out);
  35   if (!req)
  36     return rs_err_conn_push_fl (conn, RSE_NOMEM, __FILE__, __LINE__, NULL);
  37   memset (req, 0, sizeof(*req));
  38   req->conn = conn;
  39   *req_out = req;
  40   return RSE_OK;
  41 }
  42
  43 void
  44 rs_request_add_reqpkt (struct rs_request *req, struct rs_packet *req_msg)
  45 {
  46   assert (req);
  47   req->req_msg = req_msg;
  48 }
  49
  50 int
  51 rs_request_create_authn (struct rs_connection *conn,
  52                          struct rs_request **req_out,
  53                          const char *user_name,
  54                          const char *user_pw)
  55 {
  56   struct rs_request *req;
  57   assert (req_out);
  58   if (rs_request_create (conn, &req))
  59     return -1;
  60
  61   if (rs_packet_create_authn_request (conn, &req->req_msg, user_name, user_pw))
  62     return -1;
  63
  64   *req_out = req;
  65   return RSE_OK;
  66 }
  67
  68 void
  69 rs_request_destroy (struct rs_request *request)
  70 {
  71   assert (request);
  72   rs_packet_destroy (request->req_msg);
  73   rs_packet_destroy (request->resp_msg);
  74   rs_free (request->conn->ctx, request);
  75 }
  76
  77 static void
  78 _rand_rt (struct timeval *res, uint32_t rtprev, uint32_t factor)
  79 {
  80   uint32_t ms = rtprev * (fr_rand () % factor);
  81   res->tv_sec = rtprev + ms / 1000;
  82   res->tv_usec = (ms % 1000) * 1000;
  83 }
  84
  85 int
  86 rs_request_send (struct rs_request *request, struct rs_packet **resp_msg)
  87 {
  88   int r = 0;
  89   struct rs_connection *conn = NULL;
  90   int count = 0;
  91   struct timeval rt = {0,0};
  92   struct timeval end = {0,0};
  93   struct timeval now = {0,0};
  94   struct timeval tmp_tv = {0,0};
  95   const struct timeval mrt_tv = {MRT,0};
  96
  97   if (!request || !request->conn || !request->req_msg || !resp_msg)
  98     return rs_err_conn_push_fl (conn, RSE_INVAL, __FILE__, __LINE__, NULL);
  99   conn = request->conn;
 100   assert (!conn_user_dispatch_p (conn)); /* This function is high level.  */
 101
 102   gettimeofday (&end, NULL);
 103   end.tv_sec += MRD;
 104   _rand_rt (&rt, IRT, RAND);
 105   while (1)
 106     {
 107       rs_conn_set_timeout (conn, &rt);
 108
 109       r = rs_packet_send (request->req_msg, NULL);
 110       if (r == RSE_OK)
 111         {
 112           r = rs_conn_receive_packet (request->conn,
 113                                       request->req_msg,
 114                                       resp_msg);
 115           if (r == RSE_OK)
 116             break;              /* Success.  */
 117
 118           if (r != RSE_TIMEOUT_CONN && r != RSE_TIMEOUT_IO)
 119             break;              /* Error.  */
 120         }
 121       else if (r != RSE_TIMEOUT_CONN && r != RSE_TIMEOUT_IO)
 122         break;                  /* Error.  */
 123
 124       gettimeofday (&now, NULL);
 125       if (++count > MRC || timercmp (&now, &end, >))
 126         {
 127           r = RSE_TIMEOUT;
 128           break;                /* Timeout.  */
 129         }
 130
 131       /* rt = 2 * rt + rand_rt (rt, RAND); */
 132       timeradd (&rt, &rt, &rt);
 133       _rand_rt (&tmp_tv, IRT, RAND);
 134       timeradd (&rt, &tmp_tv, &rt);
 135       if (timercmp (&rt, &mrt_tv, >))
 136         _rand_rt (&rt, MRT, RAND);
 137     }
 138
 139   timerclear (&rt);
 140   rs_conn_set_timeout (conn, &rt);
 141
 142   rs_debug (("%s: returning %d\n", __func__, r));
 143   return r;
 144 }