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_config.h>
  40 #include <tr_rp.h>
  41 #include <tr_debug.h>
  42
  43 static int tr_rp_client_destructor(void *obj)
  44 {
  45   TR_RP_CLIENT *client=talloc_get_type_abort(obj, TR_RP_CLIENT);
  46   int ii=0;
  47
  48   for (ii=0; ii<TR_MAX_GSS_NAMES; ii++) {
  49     if (client->gss_names[ii]!=NULL)
  50       tr_free_name(client->gss_names[ii]);
  51   }
  52   return 0;
  53 }
  54
  55 TR_RP_CLIENT *tr_rp_client_new(TALLOC_CTX *mem_ctx)
  56 {
  57   TR_RP_CLIENT *client=talloc(mem_ctx, TR_RP_CLIENT);
  58   int ii=0;
  59
  60   if (client!=NULL) {
  61     client->next=NULL;
  62     client->comm_next=NULL;
  63     for (ii=0; ii<TR_MAX_GSS_NAMES; ii++)
  64       client->gss_names[ii]=NULL;
  65     client->filter=NULL;
  66     talloc_set_destructor((void *)client, tr_rp_client_destructor);
  67   }
  68   return client;
  69 }
  70
  71 void tr_rp_client_free(TR_RP_CLIENT *client)
  72 {
  73   talloc_free(client);
  74 }
  75
  76 static TR_RP_CLIENT *tr_rp_client_tail(TR_RP_CLIENT *client)
  77 {
  78   if (client==NULL)
  79     return NULL;
  80
  81   while (client->next!=NULL)
  82     client=client->next;
  83   return client;
  84 }
  85
  86 TR_RP_CLIENT *tr_rp_client_add(TR_RP_CLIENT *clients, TR_RP_CLIENT *new)
  87 {
  88   if (clients==NULL)
  89     clients=new;
  90   else {
  91     tr_rp_client_tail(clients)->next=new;
  92     while (new!=NULL) {
  93       talloc_steal(clients, new); /* put it in the right context */
  94       new=new->next;
  95     }
  96   }
  97   return clients;
  98 }
  99
 100
 101 int tr_rp_client_add_gss_name(TR_RP_CLIENT *rp_client, TR_NAME *gss_name)
 102 {
 103   int ii=0;
 104   for (ii=0; ii<TR_MAX_GSS_NAMES; ii++) {
 105     if (NULL==rp_client->gss_names[ii]) {
 106       rp_client->gss_names[ii]=gss_name;
 107       return 0; /* success */
 108     }
 109   }
 110   return -1; /* error */
 111 }
 112
 113 int tr_rp_client_set_filter(TR_RP_CLIENT *client, TR_FILTER *filt)
 114 {
 115   if (client->filter!=NULL)
 116     tr_filter_free(client->filter);
 117   client->filter=filt;
 118   talloc_steal(client, filt);
 119   return 0; /* success */
 120 }
 121
 122 TR_RP_CLIENT *tr_rp_client_lookup(TR_RP_CLIENT *rp_clients, TR_NAME *gss_name)
 123 {
 124   TR_RP_CLIENT *rp = NULL;
 125   int i = 0;
 126
 127   if ((!rp_clients) || (!gss_name)) {
 128     tr_debug("tr_rp_client_lookup: Bad parameters.");
 129     return NULL;
 130   }
 131
 132   for (rp = rp_clients; NULL != rp; rp = rp->next) {
 133     for (i = 0; ((i < TR_MAX_GSS_NAMES) && (NULL != (rp->gss_names[i]))); i++) {
 134         if (!tr_name_cmp(gss_name, rp->gss_names[i])) {
 135         return rp;
 136       }
 137     }
 138   }
 139   return NULL;
 140  }
 141
 142 /* talloc note: lists of idp realms should be assembled using
 143  * tr_idp_realm_add(). This will put all of the elements in the
 144  * list, other than the head, as children of the head context.
 145  * The head can then be placed in whatever context is desired. */
 146
 147 static TR_RP_REALM *tr_rp_realm_tail(TR_RP_REALM *realm)
 148 {
 149   while (realm!=NULL)
 150     realm=realm->next;
 151   return realm;
 152 }
 153
 154 /* for correct behavior, call like: rp_realms=tr_rp_realm_add(rp_realms, new_realm); */
 155 TR_RP_REALM *tr_rp_realm_add(TR_RP_REALM *head, TR_RP_REALM *new)
 156 {
 157   if (head==NULL)
 158     head=new;
 159   else {
 160     tr_rp_realm_tail(head)->next=new;
 161     while (new!=NULL) {
 162       talloc_steal(head, new); /* put it in the right context */
 163       new=new->next;
 164     }
 165   }
 166   return head;
 167 }