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 = NULL;
  57   assert (req_out);
  58
  59   if (rs_request_create (conn, &req))
  60     return -1;
  61
  62   if (rs_packet_create_authn_request (conn, &req->req_msg, user_name, user_pw))
  63     return -1;
  64
  65   if (req_out)
  66     *req_out = req;
  67   return RSE_OK;
  68 }
  69
  70 void
  71 rs_request_destroy (struct rs_request *request)
  72 {
  73   assert (request);
  74   rs_packet_destroy (request->req_msg);
  75   rs_packet_destroy (request->resp_msg);
  76   rs_free (request->conn->ctx, request);
  77 }
  78
  79 static void
  80 _rand_rt (struct timeval *res, uint32_t rtprev, uint32_t factor)
  81 {
  82   uint32_t ms = rtprev * (fr_rand () % factor);
  83   res->tv_sec = rtprev + ms / 1000;
  84   res->tv_usec = (ms % 1000) * 1000;
  85 }
  86
  87 int
  88 rs_request_send (struct rs_request *request, struct rs_packet **resp_msg)
  89 {
  90   int r = 0;
  91   struct rs_connection *conn = NULL;
  92   int count = 0;
  93   struct timeval rt = {0,0};
  94   struct timeval end = {0,0};
  95   struct timeval now = {0,0};
  96   struct timeval tmp_tv = {0,0};
  97   const struct timeval mrt_tv = {MRT,0};
  98
  99   if (!request || !request->conn || !request->req_msg || !resp_msg)
 100     return rs_err_conn_push_fl (conn, RSE_INVAL, __FILE__, __LINE__, NULL);
 101   conn = request->conn;
 102   assert (!conn_user_dispatch_p (conn)); /* This function is high level.  */
 103
 104   gettimeofday (&end, NULL);
 105   end.tv_sec += MRD;
 106   _rand_rt (&rt, IRT, RAND);
 107   while (1)
 108     {
 109       rs_conn_set_timeout (conn, &rt);
 110
 111       r = rs_packet_send (request->req_msg, NULL);
 112       if (r == RSE_OK)
 113         {
 114           r = rs_conn_receive_packet (request->conn,
 115                                       request->req_msg,
 116                                       resp_msg);
 117           if (r == RSE_OK)
 118             break;              /* Success.  */
 119
 120           if (r != RSE_TIMEOUT_CONN && r != RSE_TIMEOUT_IO)
 121             break;              /* Error.  */
 122         }
 123       else if (r != RSE_TIMEOUT_CONN && r != RSE_TIMEOUT_IO)
 124         break;                  /* Error.  */
 125
 126       gettimeofday (&now, NULL);
 127       if (++count > MRC || timercmp (&now, &end, >))
 128         {
 129           r = RSE_TIMEOUT;
 130           break;                /* Timeout.  */
 131         }
 132
 133       /* rt = 2 * rt + rand_rt (rt, RAND); */
 134       timeradd (&rt, &rt, &rt);
 135       _rand_rt (&tmp_tv, IRT, RAND);
 136       timeradd (&rt, &tmp_tv, &rt);
 137       if (timercmp (&rt, &mrt_tv, >))
 138         _rand_rt (&rt, MRT, RAND);
 139     }
 140
 141   timerclear (&rt);
 142   rs_conn_set_timeout (conn, &rt);
 143
 144   rs_debug (("%s: returning %d\n", __func__, r));
 145   return r;
 146 }
 147
 148 struct rs_packet *
 149 rs_request_get_reqmsg (const struct rs_request *request)
 150 {
 151   assert (request);
 152   return request->req_msg;
 153 }