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 "libradsec.h"
  13 #include "libradsec-impl.h"
  14
  15 int
  16 rs_context_create(struct rs_handle **ctx, const char *dict)
  17 {
  18   struct rs_handle *h;
  19
  20   if (ctx)
  21     *ctx = NULL;
  22   h = (struct rs_handle *) malloc (sizeof(struct rs_handle));
  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_handle));
  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_handle *ctx)
  66 {
  67   free (ctx);
  68 }
  69
  70 int rs_context_set_alloc_scheme(struct rs_handle *ctx, struct rs_alloc_scheme *scheme)
  71 {
  72   return rs_ctx_err_push_fl (ctx, RSE_NOSYS, __FILE__, __LINE__,
  73                              "%s: NYI", __func__);
  74 }
  75
  76 int rs_context_config_read(struct rs_handle *ctx, const char *config_file)
  77 {
  78   return rs_ctx_err_push_fl (ctx, RSE_NOSYS, __FILE__, __LINE__,
  79                              "%s: NYI", __func__);
  80 }
  81
  82 int rs_conn_create(struct rs_handle *ctx, struct rs_connection **conn)
  83 {
  84   struct rs_connection *c;
  85
  86   c = (struct rs_connection *) malloc (sizeof(struct rs_connection));
  87   if (c)
  88     {
  89       memset (c, 0, sizeof(struct rs_connection));
  90       c->ctx = ctx;
  91     }
  92   if (conn)
  93     *conn = c;
  94   return c ? RSE_OK : rs_ctx_err_push (ctx, RSE_NOMEM, NULL);
  95 }
  96
  97 struct addrinfo *
  98 _resolv (struct rs_connection *conn, const char *hostname, int port)
  99 {
 100   int err;
 101   char portstr[6];
 102   struct evutil_addrinfo hints, *res = NULL;
 103
 104   snprintf (portstr, sizeof(portstr), "%d", port);
 105   memset (&hints, 0, sizeof(struct evutil_addrinfo));
 106   //hints.ai_family = AF_UNSPEC;        /* v4 or v6.  */
 107   hints.ai_family = AF_INET;    /* FIXME: v4 only, while debuging */
 108   hints.ai_flags = AI_ADDRCONFIG;
 109   switch (conn->type)
 110     {
 111     case RS_CONN_TYPE_NONE:
 112       rs_conn_err_push_fl (conn, RSE_INVALID_CONN, __FILE__, __LINE__, NULL);
 113       return NULL;
 114     case RS_CONN_TYPE_TCP:
 115     case RS_CONN_TYPE_TLS:
 116       hints.ai_socktype = SOCK_STREAM;
 117       hints.ai_protocol = IPPROTO_TCP;
 118       break;
 119     case RS_CONN_TYPE_UDP:
 120     case RS_CONN_TYPE_DTLS:
 121       hints.ai_socktype = SOCK_DGRAM;
 122       hints.ai_protocol = IPPROTO_UDP;
 123       break;
 124     }
 125   err = evutil_getaddrinfo (hostname, portstr, &hints, &res);
 126   if (err)
 127     rs_conn_err_push_fl (conn, RSE_BADADDR, __FILE__, __LINE__,
 128                          " %s:%d: bad host name or port (%s)",
 129                          hostname, port, evutil_gai_strerror(err));
 130   return res;                   /* Simply use first result.  */
 131 }
 132
 133 static struct rs_peer *
 134 _peer_new (struct rs_connection *conn, const char *hostname, int port)
 135 {
 136   struct rs_peer *p;
 137   struct evutil_addrinfo *addr;
 138
 139   addr = _resolv (conn, hostname, port);
 140   if (!addr)
 141     return NULL;
 142
 143   p = (struct rs_peer *) malloc (sizeof(*p));
 144   if (p)
 145     {
 146       memset (p, 0, sizeof(struct rs_peer));
 147       p->conn = conn;
 148       p->s = -1;
 149       p->addr = addr;
 150       p->next = conn->peers;
 151       if (conn->peers)
 152         conn->peers->next = p;
 153       else
 154         conn->peers = p;
 155     }
 156   else
 157     {
 158       evutil_freeaddrinfo (addr);
 159       rs_conn_err_push_fl (conn, RSE_NOMEM, __FILE__, __LINE__, NULL);
 160     }
 161   return p;
 162 }
 163
 164 int
 165 rs_conn_add_server(struct rs_connection *conn, struct rs_peer **server,
 166                    rs_conn_type_t type, const char *hostname, int port)
 167 {
 168   struct rs_peer *srv;
 169
 170   if (conn->type == RS_CONN_TYPE_NONE)
 171     conn->type = type;
 172   else if (conn->type != type)
 173     return rs_conn_err_push (conn, RSE_CONN_TYPE_MISMATCH, NULL);
 174
 175   srv = _peer_new (conn, hostname, port);
 176   if (srv)
 177     {
 178       srv->timeout = 10;
 179       srv->tries = 3;
 180     }
 181   if (*server)
 182     *server = srv;
 183   return srv ? RSE_OK : rs_conn_err_push (conn, RSE_NOMEM, NULL);
 184 }
 185
 186 void rs_server_set_timeout(struct rs_peer *server, int timeout)
 187 {
 188   server->timeout = timeout;
 189 }
 190 void rs_server_set_tries(struct rs_peer *server, int tries)
 191 {
 192   server->tries = tries;
 193 }
 194 int rs_server_set_secret(struct rs_peer *server, const char *secret)
 195 {
 196   if (server->secret)
 197     free (server->secret);
 198   server->secret = (char *) malloc (strlen(secret) + 1);
 199   if (!server->secret)
 200     return rs_conn_err_push (server->conn, RSE_NOMEM, NULL);
 201   strcpy (server->secret, secret);
 202   return RSE_OK;
 203 }
 204
 205 int rs_conn_add_listener(struct rs_connection *conn, rs_conn_type_t type, const char *hostname, int port)
 206 {
 207   return rs_conn_err_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 208                               "%s: NYI", __func__);
 209 }
 210
 211 void
 212 rs_conn_destroy(struct rs_connection *conn)
 213 {
 214   struct rs_peer *p;
 215
 216 #warning "TODO: Disconnect active_peer."
 217
 218   for (p = conn->peers; p; p = p->next)
 219     {
 220       if (p->addr)
 221         evutil_freeaddrinfo (p->addr);
 222       if (p->secret)
 223         rs_free (conn->ctx, p->secret);
 224     }
 225
 226   if (conn->evb)
 227     event_base_free (conn->evb);
 228 }
 229
 230 int rs_conn_set_eventbase(struct rs_connection *conn, struct event_base *eb)
 231 {
 232   return rs_conn_err_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 233                               "%s: NYI", __func__);
 234 }
 235
 236 int rs_conn_set_callbacks(struct rs_connection *conn, struct rs_conn_callbacks *cb)
 237 {
 238   return rs_conn_err_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 239                               "%s: NYI", __func__);
 240 }
 241
 242 int rs_conn_set_server(struct rs_connection *conn, const char *name)
 243 {
 244   return rs_conn_err_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 245                               "%s: NYI", __func__);
 246 }
 247
 248 int rs_conn_get_current_server(struct rs_connection *conn, const char *name, size_t buflen)
 249 {
 250   return rs_conn_err_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
 251                               "%s: NYI", __func__);
 252 }
 253