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