2 * Copyright (c) 2012, JANET(UK)
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of JANET(UK) nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
25 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
26 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
27 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
29 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
31 * OF THE POSSIBILITY OF SUCH DAMAGE.
38 #include <trust_router/tr_name.h>
40 #include <tr_config.h>
43 static int tr_aaa_server_destructor(void *obj)
45 TR_AAA_SERVER *aaa=talloc_get_type_abort(obj, TR_AAA_SERVER);
46 if (aaa->hostname!=NULL)
47 tr_free_name(aaa->hostname);
51 TR_AAA_SERVER *tr_aaa_server_new(TALLOC_CTX *mem_ctx, TR_NAME *hostname)
53 TR_AAA_SERVER *aaa=talloc(mem_ctx, TR_AAA_SERVER);
55 aaa->hostname=hostname;
56 talloc_set_destructor((void *)aaa, tr_aaa_server_destructor);
61 void tr_aaa_server_free(TR_AAA_SERVER *aaa)
66 TR_AAA_SERVER *tr_idp_aaa_server_lookup(TR_IDP_REALM *idp_realms, TR_NAME *idp_realm_name, TR_NAME *comm)
68 TR_IDP_REALM *idp = NULL;
70 for (idp = idp_realms; idp != NULL; idp = idp->next) {
71 if (!tr_name_cmp(idp_realm_name, idp->realm_id)) {
72 /* TBD -- check that the community is one of the APCs for the IDP */
77 return idp->aaa_servers;
82 TR_AAA_SERVER *tr_default_server_lookup(TR_AAA_SERVER *default_servers, TR_NAME *comm)
87 return(default_servers);
90 static int tr_idp_realm_destructor(void *obj)
92 TR_IDP_REALM *idp=talloc_get_type_abort(obj, TR_IDP_REALM);
93 if (idp->realm_id!=NULL)
94 tr_free_name(idp->realm_id);
98 /* talloc note: lists of idp realms should be assembled using
99 * tr_idp_realm_add(). This will put all of the elements in the
100 * list, other than the head, as children of the head context.
101 * The head can then be placed in whatever context is desired. */
102 TR_IDP_REALM *tr_idp_realm_new(TALLOC_CTX *mem_ctx)
104 TR_IDP_REALM *idp=talloc(mem_ctx, TR_IDP_REALM);
109 idp->shared_config=0;
110 idp->aaa_servers=NULL;
112 idp->origin=TR_REALM_LOCAL;
113 talloc_set_destructor((void *)idp, tr_idp_realm_destructor);
118 void tr_idp_realm_free(TR_IDP_REALM *idp)
123 TR_NAME *tr_idp_realm_get_id(TR_IDP_REALM *idp)
128 return idp->realm_id;
131 TR_NAME *tr_idp_realm_dup_id(TR_IDP_REALM *idp)
136 return tr_dup_name(tr_idp_realm_get_id(idp));
139 void tr_idp_realm_set_id(TR_IDP_REALM *idp, TR_NAME *id)
141 if (idp->realm_id!=NULL)
142 tr_free_name(idp->realm_id);
146 void tr_idp_realm_set_apcs(TR_IDP_REALM *idp, TR_APC *apc)
149 tr_apc_free(idp->apcs);
151 talloc_steal(idp, apc);
154 TR_APC *tr_idp_realm_get_apcs(TR_IDP_REALM *idp)
159 TR_IDP_REALM *tr_idp_realm_lookup(TR_IDP_REALM *idp_realms, TR_NAME *idp_name)
161 TR_IDP_REALM *idp = NULL;
164 tr_debug("tr_idp_realm_lookup: Bad parameters.");
168 for (idp=idp_realms; NULL!=idp; idp=idp->next) {
169 if (0==tr_name_cmp(tr_idp_realm_get_id(idp), idp_name))
176 static TR_IDP_REALM *tr_idp_realm_tail(TR_IDP_REALM *idp)
181 while (idp->next!=NULL)
186 /* do not call directly, use the tr_idp_realm_add() macro */
187 TR_IDP_REALM *tr_idp_realm_add_func(TR_IDP_REALM *head, TR_IDP_REALM *new)
192 tr_idp_realm_tail(head)->next=new;
194 talloc_steal(head, new); /* put it in the right context */
201 static int tr_idp_realm_apc_count(TR_IDP_REALM *idp)
204 TR_APC *apc=idp->apcs;
212 static int tr_idp_realm_aaa_server_count(TR_IDP_REALM *idp)
215 TR_AAA_SERVER *aaa=idp->aaa_servers;
223 static char *tr_aaa_server_to_str(TALLOC_CTX *mem_ctx, TR_AAA_SERVER *aaa)
225 return talloc_strndup(mem_ctx, aaa->hostname->buf, aaa->hostname->len);
228 char *tr_idp_realm_to_str(TALLOC_CTX *mem_ctx, TR_IDP_REALM *idp)
230 TALLOC_CTX *tmp_ctx=talloc_new(NULL);
231 char **s_aaa=NULL, *aaa_servers=NULL;
232 char **s_apc=NULL, *apcs=NULL;
233 int ii=0, aaa_servers_strlen=0, apcs_strlen=0;
234 int n_aaa_servers=tr_idp_realm_aaa_server_count(idp);
235 int n_apcs=tr_idp_realm_apc_count(idp);
236 TR_AAA_SERVER *aaa=NULL;
240 /* get the AAA servers */
241 if (n_aaa_servers<=0)
242 aaa_servers=talloc_strdup(tmp_ctx, "");
244 s_aaa=talloc_array(tmp_ctx, char *, n_aaa_servers);
245 for (aaa=idp->aaa_servers,ii=0; aaa!=NULL; aaa=aaa->next,ii++) {
246 s_aaa[ii]=tr_aaa_server_to_str(s_aaa, aaa);
247 aaa_servers_strlen+=strlen(s_aaa[ii]);
250 /* add space for comma-space separators */
251 aaa_servers_strlen+=2*(n_aaa_servers-1);
253 aaa_servers=talloc_array(tmp_ctx, char, aaa_servers_strlen+1);
255 for (ii=0; ii<n_aaa_servers; ii++) {
256 strcat(aaa_servers, s_aaa[ii]);
257 if (ii<(n_aaa_servers-1))
258 strcat(aaa_servers, ", ");
265 apcs=talloc_strdup(tmp_ctx, "");
267 s_apc=talloc_array(tmp_ctx, char *, n_apcs);
268 for (apc=idp->apcs,ii=0; apc!=NULL; apc=apc->next,ii++) {
269 s_apc[ii]=tr_apc_to_str(s_apc, apc);
270 apcs_strlen+=strlen(s_apc[ii]);
273 /* add space for comma-space separators */
274 apcs_strlen+=2*(n_apcs-1);
276 apcs=talloc_array(tmp_ctx, char, apcs_strlen+1);
278 for (ii=0; ii<n_apcs; ii++) {
279 strcat(apcs, s_apc[ii]);
286 result=talloc_asprintf(mem_ctx,
287 "IDP realm: \"%.*s\"\n"
292 idp->realm_id->len, idp->realm_id->buf,
293 (idp->shared_config)?"yes":"no",
294 (idp->origin==TR_REALM_LOCAL)?"yes":"no",
297 talloc_free(tmp_ctx);
301 void tr_idp_realm_incref(TR_IDP_REALM *realm)
306 void tr_idp_realm_decref(TR_IDP_REALM *realm)
308 if (realm->refcount>0)