Peer organizations now parsed and added to peer table.
[trust_router.git] / common / tr_rp.c
1 /*
2  * Copyright (c) 2012, JANET(UK)
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  *
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.
15  *
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.
19  *
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.
32  *
33  */
34
35 #include <talloc.h>
36
37 #include <tr.h>
38 #include <trust_router/tr_name.h>
39 #include <tr_gss.h>
40 #include <tr_config.h>
41 #include <tr_rp.h>
42 #include <tr_debug.h>
43
44 static int tr_rp_client_destructor(void *obj)
45 {
46   return 0;
47 }
48
49 TR_RP_CLIENT *tr_rp_client_new(TALLOC_CTX *mem_ctx)
50 {
51   TR_RP_CLIENT *client=talloc(mem_ctx, TR_RP_CLIENT);
52
53   if (client!=NULL) {
54     client->next=NULL;
55     client->comm_next=NULL;
56     client->gss_names=NULL;
57     client->filter=NULL;
58     talloc_set_destructor((void *)client, tr_rp_client_destructor);
59   }
60   return client;
61 }
62
63 void tr_rp_client_free(TR_RP_CLIENT *client)
64 {
65   talloc_free(client);
66 }
67
68 static TR_RP_CLIENT *tr_rp_client_tail(TR_RP_CLIENT *client)
69 {
70   if (client==NULL)
71     return NULL;
72
73   while (client->next!=NULL)
74     client=client->next;
75   return client;
76 }
77
78 TR_RP_CLIENT *tr_rp_client_add(TR_RP_CLIENT *clients, TR_RP_CLIENT *new)
79 {
80   if (clients==NULL)
81     clients=new;
82   else {
83     tr_rp_client_tail(clients)->next=new;
84     while (new!=NULL) {
85       talloc_steal(clients, new); /* put it in the right context */
86       new=new->next;
87     }
88   }
89   return clients;
90 }
91
92
93 int tr_rp_client_add_gss_name(TR_RP_CLIENT *rp_client, TR_NAME *gss_name)
94 {
95   return tr_gss_names_add(rp_client->gss_names, gss_name);
96 }
97
98 int tr_rp_client_set_filter(TR_RP_CLIENT *client, TR_FILTER *filt)
99 {
100   if (client->filter!=NULL)
101     tr_filter_free(client->filter);
102   client->filter=filt;
103   talloc_steal(client, filt);
104   return 0; /* success */
105 }
106
107 TR_RP_CLIENT *tr_rp_client_lookup(TR_RP_CLIENT *rp_clients, TR_NAME *gss_name)
108 {
109   TR_RP_CLIENT *rp = NULL;
110
111   if ((!rp_clients) || (!gss_name)) {
112     tr_debug("tr_rp_client_lookup: Bad parameters.");
113     return NULL;
114   }
115
116   for (rp = rp_clients; NULL != rp; rp = rp->next) {
117     if (tr_gss_names_matches(rp->gss_names, gss_name))
118       return rp;
119   } 
120   return NULL;
121 }
122
123 /* talloc note: lists of idp realms should be assembled using
124  * tr_idp_realm_add(). This will put all of the elements in the
125  * list, other than the head, as children of the head context.
126  * The head can then be placed in whatever context is desired. */
127
128 static TR_RP_REALM *tr_rp_realm_tail(TR_RP_REALM *realm)
129 {
130   while (realm!=NULL)
131     realm=realm->next;
132   return realm;
133 }
134
135 /* for correct behavior, call like: rp_realms=tr_rp_realm_add(rp_realms, new_realm); */
136 TR_RP_REALM *tr_rp_realm_add(TR_RP_REALM *head, TR_RP_REALM *new)
137 {
138   if (head==NULL)
139     head=new;
140   else {
141     tr_rp_realm_tail(head)->next=new;
142     while (new!=NULL) {
143       talloc_steal(head, new); /* put it in the right context */
144       new=new->next;
145     }
146   }
147   return head;
148 }