6ec2b062262e2bc9b42e937018460c88af7c13ba
[radsecproxy.git] / 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_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_err_ctx_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_err_ctx_push_fl (ctx, RSE_NOSYS, __FILE__, __LINE__,
79                              "%s: NYI", __func__);
80 }
81
82 int
83 rs_conn_create(struct rs_handle *ctx, struct rs_connection **conn,
84                rs_conn_type_t type)
85 {
86   struct rs_connection *c;
87
88   c = (struct rs_connection *) malloc (sizeof(struct rs_connection));
89   if (c)
90     {
91       memset (c, 0, sizeof(struct rs_connection));
92       c->ctx = ctx;
93       c->type = type;
94     }
95   if (conn)
96     *conn = c;
97   return c ? RSE_OK : rs_err_ctx_push (ctx, RSE_NOMEM, NULL);
98 }
99
100 struct addrinfo *
101 _resolv (struct rs_connection *conn, const char *hostname, int port)
102 {
103   int err;
104   char portstr[6];
105   struct evutil_addrinfo hints, *res = NULL;
106
107   snprintf (portstr, sizeof(portstr), "%d", port);
108   memset (&hints, 0, sizeof(struct evutil_addrinfo));
109   hints.ai_family = AF_UNSPEC;  /* v4 or v6.  */
110   hints.ai_flags = AI_ADDRCONFIG;
111   switch (conn->type)
112     {
113     case RS_CONN_TYPE_NONE:
114       rs_err_conn_push_fl (conn, RSE_INVALID_CONN, __FILE__, __LINE__, NULL);
115       return NULL;
116     case RS_CONN_TYPE_TCP:
117       /* Fall through.  */
118     case RS_CONN_TYPE_TLS:
119       hints.ai_socktype = SOCK_STREAM;
120       hints.ai_protocol = IPPROTO_TCP;
121       break;
122     case RS_CONN_TYPE_UDP:
123       /* Fall through.  */
124     case RS_CONN_TYPE_DTLS:
125       hints.ai_socktype = SOCK_DGRAM;
126       hints.ai_protocol = IPPROTO_UDP;
127       break;
128     }
129   err = evutil_getaddrinfo (hostname, portstr, &hints, &res);
130   if (err)
131     rs_err_conn_push_fl (conn, RSE_BADADDR, __FILE__, __LINE__,
132                          "%s:%d: bad host name or port (%s)",
133                          hostname, port, evutil_gai_strerror(err));
134   return res;                   /* Simply use first result.  */
135 }
136
137 static struct rs_peer *
138 _peer_new (struct rs_connection *conn)
139 {
140   struct rs_peer *p;
141
142   p = (struct rs_peer *) malloc (sizeof(*p));
143   if (p)
144     {
145       memset (p, 0, sizeof(struct rs_peer));
146       p->conn = conn;
147       p->fd = -1;
148       p->next = conn->peers;
149       if (conn->peers)
150         conn->peers->next = p;
151       else
152         conn->peers = p;
153     }
154   else
155     rs_err_conn_push_fl (conn, RSE_NOMEM, __FILE__, __LINE__, NULL);
156   return p;
157 }
158
159 int
160 rs_server_create (struct rs_connection *conn, struct rs_peer **server,
161                   const char *config)
162 {
163   struct rs_peer *srv;
164
165   srv = _peer_new (conn);
166   if (srv)
167     {
168       srv->timeout = 1;
169       srv->tries = 3;
170     }
171   *server = srv;
172   return srv ? RSE_OK : -1;
173 }
174
175 int
176 rs_server_set_address (struct rs_peer *server, const char *hostname, int port)
177 {
178   server->addr = _resolv (server->conn, hostname, port);
179   return server->addr ? RSE_OK : -1;
180 }
181
182 void
183 rs_server_set_timeout (struct rs_peer *server, int timeout)
184 {
185   server->timeout = timeout;
186 }
187 void
188 rs_server_set_tries (struct rs_peer *server, int tries)
189 {
190   server->tries = tries;
191 }
192
193 int
194 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_err_conn_push (server->conn, RSE_NOMEM, NULL);
201   strcpy (server->secret, secret);
202   return RSE_OK;
203 }
204
205 int
206 rs_conn_add_listener (struct rs_connection *conn, rs_conn_type_t type,
207                       const char *hostname, int port)
208 {
209   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
210                               "%s: NYI", __func__);
211 }
212
213 void
214 rs_conn_destroy (struct rs_connection *conn)
215 {
216   struct rs_peer *p;
217
218 #warning "TODO: Disconnect active_peer."
219
220   for (p = conn->peers; p; p = p->next)
221     {
222       if (p->addr)
223         evutil_freeaddrinfo (p->addr);
224       if (p->secret)
225         rs_free (conn->ctx, p->secret);
226     }
227
228   if (conn->evb)
229     event_base_free (conn->evb);
230 }
231
232 int rs_conn_set_eventbase(struct rs_connection *conn, struct event_base *eb)
233 {
234   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
235                               "%s: NYI", __func__);
236 }
237
238 int rs_conn_set_callbacks(struct rs_connection *conn, struct rs_conn_callbacks *cb)
239 {
240   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
241                               "%s: NYI", __func__);
242 }
243
244 int rs_conn_get_current_server(struct rs_connection *conn, const char *name, size_t buflen)
245 {
246   return rs_err_conn_push_fl (conn, RSE_NOSYS, __FILE__, __LINE__,
247                               "%s: NYI", __func__);
248 }
249