Added hostname to configuration and example code.
[trust_router.git] / common / tr_config.c
index 713ddb8..f227796 100644 (file)
@@ -39,6 +39,7 @@
 
 #include <tr_config.h>
 #include <tr.h>
+#include <tr_filter.h>
 
 void tr_print_config (FILE *stream, TR_CFG *cfg) {
   fprintf(stream, "tr_print_config: Not yet implemented.\n");
@@ -65,6 +66,7 @@ TR_CFG_RC tr_apply_new_config (TR_INSTANCE *tr) {
 static TR_CFG_RC tr_cfg_parse_internal (TR_INSTANCE *tr, json_t *jcfg) {
   json_t *jint = NULL;
   json_t *jmtd = NULL;
+  json_t *jhname = NULL;
 
   if ((!tr) || (!tr->new_cfg) || (!jcfg))
     return TR_CFG_BAD_PARAMS;
@@ -74,108 +76,209 @@ static TR_CFG_RC tr_cfg_parse_internal (TR_INSTANCE *tr, json_t *jcfg) {
 
   memset(tr->new_cfg->internal, 0, sizeof(TR_CFG_INTERNAL));
 
-  if ((NULL != (jint = json_object_get(jcfg, "tr_internal"))) &&
-      (NULL != (jmtd = json_object_get(jint, "max_tree_depth")))) {
-    if (json_is_number(jmtd)) {
-      tr->new_cfg->internal->max_tree_depth = json_integer_value(jmtd);
+  if (NULL != (jint = json_object_get(jcfg, "tr_internal"))) {
+    if (NULL != (jmtd = json_object_get(jint, "max_tree_depth"))) {
+      if (json_is_number(jmtd)) {
+       tr->new_cfg->internal->max_tree_depth = json_integer_value(jmtd);
+      } else {
+       fprintf(stderr,"tr_cfg_parse_internal: Parsing error, max_tree_depth is not a number.\n");
+       return TR_CFG_NOPARSE;
+      }
     } else {
-      fprintf(stderr,"tr_cfg_parse_internal: Parsing error, max_tree_depth is not a number.\n");
+      /* If not configured, use the default */
+      tr->new_cfg->internal->max_tree_depth = TR_DEFAULT_MAX_TREE_DEPTH;
+    }
+    if (NULL != (jhname = json_object_get(jint, "hostname"))) {
+      if (json_is_string(jhname)) {
+       tr->new_cfg->internal->hostname = json_string_value(jhname);
+      } else {
+       fprintf(stderr,"tr_cfg_parse_internal: Parsing error, hostname is not a string.\n");
+       return TR_CFG_NOPARSE;
+      }
+    }
+    else {
+      fprintf(stderr, "tr_cfg_parse_internal: Parsing error, hostname is not found.\n");
       return TR_CFG_NOPARSE;
     }
-  } else {
-    /* If not configured, use the default */
-    tr->new_cfg->internal->max_tree_depth = TR_DEFAULT_MAX_TREE_DEPTH;
-  }
   fprintf(stderr, "tr_cfg_parse_internal: Internal config parsed.\n");
   return TR_CFG_SUCCESS;
+  }
+  else {
+    fprintf(stderr, "tr_cfg_parse_internal: Parsing error, tr_internal configuration section not found.\n");
+    return TR_CFG_NOPARSE;
+  }
 }
 
-static TR_RP_CLIENT *tr_cfg_parse_one_rp_client (TR_INSTANCE *tr, json_t *jrp, TR_CFG_RC *rc) 
+static TR_FILTER *tr_cfg_parse_one_filter (TR_INSTANCE *tr, json_t *jfilt, TR_CFG_RC *rc)
 {
-  TR_RP_CLIENT *rp = NULL;
-  json_t *jgns = NULL;
-  json_t *jfilt = NULL;
-  json_t *jfls = NULL;
+  TR_FILTER *filt = NULL;
   json_t *jftype = NULL;
-  json_t *jfact = NULL;
+  json_t *jfls = NULL;
+  json_t *jfaction = NULL;
   json_t *jfspecs = NULL;
   json_t *jffield = NULL;
-  json_t *jfrealm = NULL;
-  int i = 0;
+  json_t *jfmatch = NULL;
+  int i = 0, j = 0;
 
-  if ((!jrp) || (!rc)) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_realm: Bad parameters.\n");
-    if (rc)
-      *rc = TR_CFG_BAD_PARAMS;
-    return NULL;
-  }
-
-  if (NULL == (rp = malloc(sizeof(TR_RP_CLIENT)))) {
-    fprintf(stderr, "tr_config_parse_one_rp_realm: Out of memory.\n");
-    *rc = TR_CFG_NOMEM;
+  if ((NULL == (jftype = json_object_get(jfilt, "type"))) ||
+      (!json_is_string(jftype))) {
+    fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter type.\n");
+    *rc = TR_CFG_NOPARSE;
     return NULL;
   }
-  
-  memset(rp, 0, sizeof(TR_RP_CLIENT));
 
-  if ((NULL == (jfilt = json_object_get(jrp, "filter"))) || 
-      (NULL == (jfls = json_object_get(jfilt, "filter_lines"))) ||
-      (!json_is_array(jfls)) ||
-      (NULL == (jgns = json_object_get(jrp, "gss_names"))) ||
-      (!json_is_array(jgns))) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client configuration.\n");
-    free(rp);
+  if ((NULL == (jfls = json_object_get(jfilt, "filter_lines"))) ||
+      (!json_is_array(jfls))) {
+    fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter type.\n");
     *rc = TR_CFG_NOPARSE;
     return NULL;
   }
 
-  if (0 == json_array_size(jfls)) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_client: RP Client has no filter lines.\n");
+  if (TR_MAX_FILTER_LINES < json_array_size(jfls)) {
+    fprintf(stderr, "tr_cfg_parse_one_filter: Filter has too many filter_lines, maximimum of %d.\n", TR_MAX_FILTER_LINES);
     *rc = TR_CFG_NOPARSE;
     return NULL;
   }
 
-  if ((NULL == (jftype = json_object_get(jfilt, "type"))) ||
-      (!json_is_string(jftype)) ||
-      (strcmp(json_string_value(jftype), "rp_permitted"))) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client filter type.\n");
-    *rc = TR_CFG_NOPARSE;
+  /* TBD -- optionally parse realm and domain constraints */
+
+  if (NULL == (filt = malloc(sizeof(TR_FILTER)))) {
+    fprintf(stderr, "tr_config_parse_one_filter: Out of memory.\n");
+    *rc = TR_CFG_NOMEM;
     return NULL;
   }
 
+  memset(filt, 0, sizeof(TR_FILTER));
 
-  /* Right now, we only accept one type of filter, and we only care
-   * about one per rp_client. */
-  if ((NULL == (jfact = json_object_get(json_array_get(jfls, 0), "action"))) ||
-      (!json_is_string(jfact)) ||
-      (strcmp(json_string_value(jfact), "accept"))) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client filter action.\n");
+  if (!strcmp(json_string_value(jftype), "rp_permitted")) {
+    filt->type = TR_FILTER_TYPE_RP_PERMITTED;
+  }
+  else {
+    fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter type, unknown type '%s'.\n", json_string_value(jftype));
     *rc = TR_CFG_NOPARSE;
+    tr_filter_free(filt);
     return NULL;
-      }
+  }
+  
+  /* For each filter line... */
+  for (i = 0; i < json_array_size(jfls); i++) {
 
-  if ((NULL == (jfspecs = json_object_get(json_array_get(jfls, 0), "filter_specs"))) ||
-      (!json_is_array(jfspecs)) ||
-      (0 == json_array_size(jfspecs))) {
-      fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client filter specs.\n");
+    if ((NULL == (jfaction = json_object_get(json_array_get(jfls, i), "action"))) ||
+       (!json_is_string(jfaction))) {
+      fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter action.\n");
       *rc = TR_CFG_NOPARSE;
+      tr_filter_free(filt);
       return NULL;
-  }
+    }
+    /* TBD -- parse constraints */
+
+    if ((NULL == (jfspecs = json_object_get(json_array_get(jfls, i), "filter_specs"))) ||
+       (!json_is_array(jfspecs)) ||
+       (0 == json_array_size(jfspecs))) {
+      fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter specs.\n");
+      *rc = TR_CFG_NOPARSE;
+      tr_filter_free(filt);
+      return NULL;
+    }
+  
+    if (TR_MAX_FILTER_SPECS < json_array_size(jfspecs)) {
+      fprintf(stderr, "tr_cfg_parse_one_filter: Filter has too many filter_specs, maximimum of %d.\n", TR_MAX_FILTER_SPECS);
+      *rc = TR_CFG_NOPARSE;
+      tr_filter_free(filt);
+      return NULL;
+    }
 
-  if ((NULL == (jffield = json_object_get(json_array_get(jfspecs, 0), "field"))) ||
-      (!json_is_string(jffield)) ||
-      (strcmp(json_string_value(jffield), "rp_realm")) ||
-      (NULL == (jfrealm = json_object_get(json_array_get(jfspecs, 0), "match"))) ||
-      (!json_is_string(jfrealm))) {
-      fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client filter field and match.\n");
+    if (NULL == (filt->lines[i] = malloc(sizeof(TR_FLINE)))) {
+      fprintf(stderr, "tr_config_parse_one_filter: Out of memory.\n");
+      *rc = TR_CFG_NOMEM;
+      tr_filter_free(filt);
+      return NULL;
+    }
+
+    memset(filt->lines[i], 0, sizeof(TR_FLINE));
+
+    if (!strcmp(json_string_value(jfaction), "accept")) {
+       filt->lines[i]->action = TR_FILTER_ACTION_ACCEPT;
+    }
+    else if (!strcmp(json_string_value(jfaction), "reject")) {
+      filt->lines[i]->action = TR_FILTER_ACTION_REJECT;
+    }
+    else {
+      fprintf(stderr, "tr_cfg_parse_one_filter: Error parsing filter action, unknown action' %s'.\n", json_string_value(jfaction));
       *rc = TR_CFG_NOPARSE;
+      tr_filter_free(filt);
       return NULL;
+    }
+      
+    /*For each filter spec within the filter line... */
+    for (j = 0; j <json_array_size(jfspecs); j++) {
+      
+      if ((NULL == (jffield = json_object_get(json_array_get(jfspecs, j), "field"))) ||
+         (!json_is_string(jffield)) ||
+         (NULL == (jfmatch = json_object_get(json_array_get(jfspecs, j), "match"))) ||
+         (!json_is_string(jfmatch))) {
+       fprintf (stderr, "tr_cfg_parse_one_filter: Error parsing filter field and match for filter spec %d, filter line %d.\n", i, j);
+       *rc = TR_CFG_NOPARSE;
+       tr_filter_free(filt);
+       return NULL;
+      }
+
+      if (NULL == (filt->lines[i]->specs[j] = malloc(sizeof(TR_FSPEC)))) {
+       fprintf(stderr, "tr_config_parse_one_filter: Out of memory.\n");
+       *rc = TR_CFG_NOMEM;
+       tr_filter_free(filt);
+       return NULL;
+      }
+
+      memset(filt->lines[i]->specs[j], 0, sizeof(TR_FSPEC));
+    
+      if ((NULL == (filt->lines[i]->specs[j]->field = tr_new_name((char *)json_string_value(jffield)))) ||
+         (NULL == (filt->lines[i]->specs[j]->match = tr_new_name((char *)json_string_value(jfmatch))))) {
+       fprintf(stderr, "tr_config_parse_one_filter: Out of memory.\n");
+       *rc = TR_CFG_NOMEM;
+       tr_filter_free(filt);
+       return NULL;
+      }
+    }
   }
+  return filt;
+}
+
+static TR_RP_CLIENT *tr_cfg_parse_one_rp_client (TR_INSTANCE *tr, json_t *jrp, TR_CFG_RC *rc)
+{
+  TR_RP_CLIENT *rp = NULL;
+  json_t *jgns = NULL;
+  json_t *jfilt = NULL;
+  json_t *jftype = NULL;
+  int i = 0;
 
-  rp->rp_match = tr_new_name((char *)json_string_value(jfrealm));
+  if ((!jrp) || (!rc)) {
+    fprintf(stderr, "tr_cfg_parse_one_rp_realm: Bad parameters.\n");
+    if (rc)
+      *rc = TR_CFG_BAD_PARAMS;
+    return NULL;
+  }
 
-  if (0 == json_array_size(jgns)) {
-    fprintf(stderr, "tr_cfg_parse_one_rp_client: RP Client has no GSS Names.\n");
+  if ((NULL == (jgns = json_object_get(jrp, "gss_names"))) ||
+      (!json_is_array(jgns))) {
+    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client configuration, no GSS names.\n");
+    *rc = TR_CFG_NOPARSE;
+    return NULL;
+  }
+
+  /* TBD -- Support more than one filter per RP client? */
+  if (NULL == (jfilt = json_object_get(jrp, "filter"))) {
+    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client configuration, no filter.\n");
+    *rc = TR_CFG_NOPARSE;
+    return NULL;
+  }
+
+  /* We only support rp_permitted filters for RP clients */
+  if ((NULL == (jftype = json_object_get(jfilt, "type"))) ||
+      (!json_is_string(jftype)) ||
+      (strcmp(json_string_value(jftype), "rp_permitted"))) {
+    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing RP client filter type.\n");
     *rc = TR_CFG_NOPARSE;
     return NULL;
   }
@@ -186,9 +289,26 @@ static TR_RP_CLIENT *tr_cfg_parse_one_rp_client (TR_INSTANCE *tr, json_t *jrp, T
     return NULL;
   }
 
+  if (NULL == (rp = malloc(sizeof(TR_RP_CLIENT)))) {
+    fprintf(stderr, "tr_config_parse_one_rp_realm: Out of memory.\n");
+    *rc = TR_CFG_NOMEM;
+    return NULL;
+  }
+  
+  memset(rp, 0, sizeof(TR_RP_CLIENT));
+
+  /* TBD -- support more than one filter entry per RP Client? */
+  if (NULL == (rp->filter = tr_cfg_parse_one_filter(tr, jfilt, rc))) {
+    fprintf(stderr, "tr_cfg_parse_one_rp_client: Error parsing filter.\n");
+    free(rp);
+    *rc = TR_CFG_NOPARSE;
+    return NULL;
+  }
+    
   for (i = 0; i < json_array_size(jgns); i++) {
     if (NULL == (rp->gss_names[i] = tr_new_name ((char *)json_string_value(json_array_get(jgns, i))))) {
       fprintf(stderr, "tr_cfg_parse_one_rp_client: No memory for GSS Name.\n");
+      free(rp);
       *rc = TR_CFG_NOMEM;
       return NULL;
     }
@@ -217,7 +337,7 @@ static TR_CFG_RC tr_cfg_parse_rp_clients (TR_INSTANCE *tr, json_t *jcfg) {
                                                 &rc))) {
        return rc;
     }
-    fprintf(stderr, "tr_cfg_parse_rp_clients: RP client configured -- first gss: %s, rp_realm: %s\n", rp->gss_names[0]->buf, rp->rp_match->buf);
+    fprintf(stderr, "tr_cfg_parse_rp_clients: RP client configured -- first gss: %s", rp->gss_names[0]->buf);
     rp->next = tr->new_cfg->rp_clients;
     tr->new_cfg->rp_clients = rp;
   }
@@ -328,9 +448,7 @@ static TR_IDP_REALM *tr_cfg_parse_one_idp_realm (TR_INSTANCE *tr, json_t *jidp,
       (NULL == (jscfg = json_object_get(jidp, "shared_config"))) ||
       (!json_is_string(jscfg)) ||
       (NULL == (jsrvrs = json_object_get(jidp, "aaa_servers"))) ||
-      (!json_is_array(jsrvrs)) ||
-      (NULL == (japcs = json_object_get(jidp, "apcs"))) ||
-      (!json_is_array(japcs))) {
+      (!json_is_array(jsrvrs))) {
     fprintf(stderr, "tr_cfg_parse_one_idp_realm: Error parsing IDP realm configuration.\n");
     free(idp);
     *rc = TR_CFG_NOPARSE;
@@ -356,15 +474,18 @@ static TR_IDP_REALM *tr_cfg_parse_one_idp_realm (TR_INSTANCE *tr, json_t *jidp,
     free(idp);
     return NULL;
   }
-  if (NULL == (idp->apcs = tr_cfg_parse_apcs(tr, japcs, rc))) {
-    fprintf(stderr, "tr_cfg_parse_one_idp_realm: Can't parse APCs for realm %s .\n", idp->realm_id->buf);
-    tr_free_name(idp->realm_id);
-    /* TBD -- free aaa_servers */;
-    free(idp);
-    return NULL;
-  }
 
-return idp;
+  if ((NULL != (japcs = json_object_get(jidp, "apcs"))) &&
+      (json_is_array(japcs))) {
+    if (NULL == (idp->apcs = tr_cfg_parse_apcs(tr, japcs, rc))) {
+      fprintf(stderr, "tr_cfg_parse_one_idp_realm: Can't parse APCs for realm %s .\n", idp->realm_id->buf);
+      tr_free_name(idp->realm_id);
+      /* TBD -- free aaa_servers */;
+      free(idp);
+      return NULL;
+    }
+  } 
+  return idp;
 }
 
 static TR_CFG_RC tr_cfg_parse_idp_realms (TR_INSTANCE *tr, json_t *jcfg)