lib/radsec.c

   1 /* See the file COPYING for licensing information.  */
   2
   3 #include <stdio.h>
   4 #include <stdlib.h>
   5 #include <stdint.h>
   6 #include <string.h>
   7 #include <libgen.h>
   8 #include <assert.h>
   9
  10 #include <freeradius/libradius.h>
  11 #include <event2/event.h>
  12 #include <event2/util.h>
  13 #include <radsec/radsec.h>
  14 #include <radsec/radsec-impl.h>
  15
  16 int
  17 rs_context_create(struct rs_context **ctx, const char *dict)
  18 {
  19   struct rs_context *h;
  20
  21   if (ctx)
  22     *ctx = NULL;
  23   h = (struct rs_context *) malloc (sizeof(struct rs_context));
  24   if (h)
  25     {
  26       char *buf1 = NULL, *buf2 = NULL;
  27       char *dir, *fn;
  28
  29       buf1 = malloc (strlen (dict) + 1);
  30       buf2 = malloc (strlen (dict) + 1);
  31       if (!buf1 || !buf2)
  32         {
  33           free (h);
  34           if (buf1)
  35             free (buf1);
  36           if (buf2)
  37             free (buf2);
  38           return RSE_NOMEM;
  39         }
  40       strcpy (buf1, dict);
  41       dir = dirname (buf1);
  42       strcpy (buf2, dict);
  43       fn = basename (buf2);
  44       if (dict_init (dir, fn) < 0)
  45         {
  46           free (h);
  47           return RSE_SOME_ERROR;
  48         }
  49       free (buf1);
  50       free (buf2);
  51 #if defined (DEBUG)
  52       fr_log_fp = stderr;
  53       fr_debug_flag = 1;
  54 #endif
  55
  56       memset (h, 0, sizeof(struct rs_context));
  57       fr_randinit (&h->fr_randctx, 0);
  58       fr_rand_seed (NULL, 0);
  59
  60       if (ctx)
  61         *ctx = h;
  62     }
  63   return h ? RSE_OK : RSE_NOMEM;
  64 }
  65
  66 void rs_context_destroy(struct rs_context *ctx)
  67 {
  68   free (ctx);
  69 }
  70
  71 int rs_context_set_alloc_scheme(struct rs_context *ctx,
  72                                 struct rs_alloc_scheme *scheme)
  73 {
  74   return rs_err_ctx_push_fl (ctx, RSE_NOSYS, __FILE__, __LINE__,
  75                              "%s: NYI", __func__);
  76 }
  77
  78 int
  79 rs_conn_create(struct rs_context *ctx, struct rs_connection **conn,
  80                const char *config)
  81 {
  82   struct rs_connection *c;
  83
  84   c = (struct rs_connection *) malloc (sizeof(struct rs_connection));
  85   if (c)
  86     {
  87       memset (c, 0, sizeof(struct rs_connection));
  88       c->ctx = ctx;
  89       if (config)
  90         {
  91           struct rs_realm *r = rs_conf_find_realm (ctx, config);
  92           if (r)
  93             {
  94               struct rs_peer *p;
  95
  96               c->type = r->type;
  97               c->peers = r->peers; /* FIXME: Copy instead?  */
  98               for (p = c->peers; p; p = p->next)
  99                 p->conn = c;
 100             }
 101         }
 102     }
 103   if (conn)
 104     *conn = c;
 105   return c ? RSE_OK : rs_err_ctx_push (ctx, RSE_NOMEM, NULL);
 106 }
 107
 108 void
 109 rs_conn_set_type(struct rs_connection *conn, rs_conn_type_t type)
 110 {
 111   conn->type = type;
 112 }
 113
 114
 115 struct rs_error *
 116 _rs_resolv (struct evutil_addrinfo **addr, rs_conn_type_t type,
 117             const char *hostname, const char *service)
 118 {
 119   int err;
 120   struct evutil_addrinfo hints, *res = NULL;
 121
 122   memset (&hints, 0, sizeof(struct evutil_addrinfo));
 123   hints.ai_family = AF_UNSPEC;  /* v4 or v6.  */
 124   hints.ai_flags = AI_ADDRCONFIG;
 125   switch (type)
 126     {
 127     case RS_CONN_TYPE_NONE:
 128       return _rs_err_create (RSE_INVALID_CONN, __FILE__, __LINE__, NULL, NULL);
 129     case RS_CONN_TYPE_TCP:
 130       /* Fall through.  */
 131     case RS_CONN_TYPE_TLS:
 132       hints.ai_socktype = SOCK_STREAM;
 133       hints.ai_protocol = IPPROTO_TCP;
 134       break;
 135     case RS_CONN_TYPE_UDP:
 136       /* Fall through.  */
 137     case RS_CONN_TYPE_DTLS:
 138       hints.ai_socktype = SOCK_DGRAM;
 139       hints.ai_protocol = IPPROTO_UDP;
 140       break;
 141     }
 142   err = evutil_getaddrinfo (hostname, service, &hints, &res);
 143   if (err)
 144     return _rs_err_create (RSE_BADADDR, __FILE__, __LINE__,
 145                            "%s:%s: bad host name or service name (%s)",
 146                            hostname, service, evutil_gai_strerror(err));
 147   *addr = res;                  /* Simply use first result.  */
 148   return NULL;
 149 }
 150
 151 struct rs_peer *
 152 _rs_peer_create (struct rs_context *ctx, struct rs_peer **rootp)
 153 {
 154   struct rs_peer *p;
 155
 156   p = (struct rs_peer *) rs_malloc (ctx, sizeof(*p));
 157   if (p)
 158     {
 159       memset (p, 0, sizeof(struct rs_peer));
 160       p->fd = -1;
 161       if (*rootp)
 162         (*rootp)->next = p;
 163       else
 164         *rootp = p;
 165     }
 166   return p;
 167 }
 168
 169 int
 170 rs_server_create (struct rs_connection *conn, struct rs_peer **server)
 171 {
 172   struct rs_peer *srv;
 173
 174   srv = _rs_peer_create (conn->ctx, &conn->peers);
 175   if (srv)
 176     {
 177       srv->conn = conn;
 178       srv->timeout = 1;
 179       srv->tries = 3;
 180     }
 181   else
 182     return rs_err_conn_push_fl (conn, RSE_NOMEM, __FILE__, __LINE__, NULL);
 183   if (*server)
 184     *server = srv;
 185   return RSE_OK;
 186 }
 187
 188 int
 189 rs_server_set_address (struct rs_peer *server, const char *hostname,
 190                        const char *service)
 191 {
 192   struct rs_error *err;
 193
 194   err = _rs_resolv (&server->addr, server->conn->type, hostname, service);
 195   if (err)
 196     return _rs_err_conn_push_err (server->conn, err);
 197   return RSE_OK;
 198 }
 199
 200 void
 201 rs_server_set_timeout (struct rs_peer *server, int timeout)
 202 {
 203   server->timeout = timeout;
 204 }
 205 void
 206 rs_server_set_tries (struct rs_peer *server, int tries)
 207 {
 208   server->tries = tries;
 209 }
 210
 211 int
 212 rs_server_set_secret (struct rs_peer *server, const char *secret)
 213 {
 214   if (server->secret)
 215     free (server->secret);
 216   server->secret = (char *) malloc (strlen(secret) + 1);
 217   if (!server->secret)
 218     return rs_err_conn_push (server->conn, RSE_NOMEM, NULL);
 219   strcpy (server->secret, secret);
 220   return RSE_OK;
 221 }
 222
 223 int
 224 rs_conn_add_listener (struct rs_connection *conn, rs_conn_type_t type,
 225                       const char *hostname, int port)
 226 {
 227   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 228                               "%s: NYI", __func__);
 229 }
 230
 231 void
 232 rs_conn_destroy (struct rs_connection *conn)
 233 {
 234   struct rs_peer *p;
 235
 236 #warning "TODO: Disconnect active_peer."
 237
 238   for (p = conn->peers; p; p = p->next)
 239     {
 240       if (p->addr)
 241         evutil_freeaddrinfo (p->addr);
 242       if (p->secret)
 243         rs_free (conn->ctx, p->secret);
 244     }
 245
 246   if (conn->evb)
 247     event_base_free (conn->evb);
 248 }
 249
 250 int
 251 rs_conn_set_eventbase(struct rs_connection *conn, struct event_base *eb)
 252 {
 253   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 254                               "%s: NYI", __func__);
 255 }
 256
 257 int
 258 rs_conn_set_callbacks(struct rs_connection *conn, struct rs_conn_callbacks *cb)
 259 {
 260   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 261                               "%s: NYI", __func__);
 262 }
 263
 264 int
 265 rs_conn_get_current_server(struct rs_connection *conn, const char *name,
 266                            size_t buflen)
 267 {
 268   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 269                               "%s: NYI", __func__);
 270 }
 271
 272 int rs_conn_fd(struct rs_connection *conn)
 273 {
 274   assert (conn);
 275   assert (conn->active_peer);
 276   return conn->active_peer->fd;
 277 }