libldapschema: adding ldapschema_model_register()

2 files changed, 135 insertions, 0 deletions

diff --git a/lib/libldapschema/lmemory.c b/lib/libldapschema/lmemory.c
index 839286e..6a54ff5 100644
--- a/lib/libldapschema/lmemory.c
+++ b/lib/libldapschema/lmemory.c
@@ -50,6 +50,8 @@
 #include <stdlib.h>
 
 #include "lspec.h"
+#include "lsort.h"
+#include "lerror.h"
 
 
 /////////////////
@@ -454,6 +456,134 @@ void ldapschema_model_free(LDAPSchemaModel * model)
 }
 
 
+int ldapschema_model_register(LDAPSchema * lsd, LDAPSchemaModel * mod)
+{
+   int                     err;
+   size_t                  names_len;
+   size_t                  idx;
+   size_t *                list_lenp;
+   char **                 names;
+   const char *            spec_name;
+   const char *            desc;
+   LDAPSchemaAlias *       alias;
+   LDAPSchemaAlias ***     listp;
+   LDAPSchemaPointer       objptr;
+
+   assert(lsd != NULL);
+   assert(mod != NULL);
+
+   desc           = NULL;
+   names          = NULL;
+   names_len      = 0;
+   spec_name      = NULL;
+   objptr.model   = mod;
+
+   // determines model specific list and search keys
+   switch(mod->type)
+   {
+      case LDAPSCHEMA_ATTRIBUTETYPE:
+      listp       = &lsd->attrs;
+      list_lenp   = &lsd->attrs_len;
+      names       = objptr.attributetype->names;
+      names_len   = objptr.attributetype->names_len;
+      spec_name   = ((mod->spec)) ? mod->spec->name : NULL;
+      break;
+
+      case LDAPSCHEMA_SYNTAX:
+      listp       = &lsd->syntaxes;
+      list_lenp   = &lsd->syntaxes_len;
+      desc        = mod->desc;
+      break;
+
+      case LDAPSCHEMA_MATCHINGRULE:
+      listp       = &lsd->mtchngrls;
+      list_lenp   = &lsd->mtchngrls_len;
+      names       = objptr.matchingrule->names;
+      names_len   = objptr.matchingrule->names_len;
+      spec_name   = ((mod->spec)) ? mod->spec->name : NULL;
+      break;
+
+      case LDAPSCHEMA_OBJECTCLASS:
+      listp       = &lsd->objclses;
+      list_lenp   = &lsd->objclses_len;
+      names       = objptr.objectclass->names;
+      names_len   = objptr.objectclass->names_len;
+      spec_name   = ((mod->spec)) ? mod->spec->name : NULL;
+      break;
+
+      default:
+      assert(0);
+      return(0);
+   };
+
+   // adds model to OID list
+   if ((err = ldapschema_insert(lsd, (void ***)&lsd->oids, &lsd->oids_len, mod, ldapschema_compar_models)) > 0)
+      return(err);
+   if (err == -1)
+   {
+      ldapschema_schema_err(lsd, mod, "server defines duplicate OID '%s'", mod->oid);
+      if ((err = ldapschema_append(lsd,(void ***)&lsd->dups, &lsd->dups_len, mod)) != LDAP_SUCCESS)
+         return(err);
+   };
+
+   // adds model into model specific list using OID
+   if ((alias = malloc(sizeof(LDAPSchemaAlias *))) == NULL)
+      return(lsd->errcode = LDAPSCHEMA_NO_MEMORY);
+   alias->alias   = mod->oid;
+   alias->model   = mod;
+   if ((err = ldapschema_insert(lsd, (void ***)listp, list_lenp, alias, ldapschema_compar_aliases)) > 0)
+   {
+      free(alias);
+      return(err);
+   };
+   if (err == -1)
+   {
+      ldapschema_schema_err(lsd,  mod, " model with duplicate oid '%s' found", mod->oid);
+      free(alias);
+   };
+
+   // adds model into model specific list using desc
+   if ((desc))
+   {
+      if ((alias = malloc(sizeof(LDAPSchemaAlias *))) == NULL)
+         return(lsd->errcode = LDAPSCHEMA_NO_MEMORY);
+      alias->alias   = desc;
+      alias->model   = mod;
+      if ((err = ldapschema_insert(lsd, (void ***)listp, list_lenp, alias, ldapschema_compar_aliases)) > 0)
+      {
+         free(alias);
+         return(err);
+      };
+      if (err == -1)
+      {
+         ldapschema_schema_err(lsd,  mod, " model with duplicate desc '%s' found", mod->oid);
+         free(alias);
+      };
+   };
+
+   // adds model into model specific list using names
+   for(idx = 0; (idx < names_len); idx++)
+   {
+      if ((alias = malloc(sizeof(LDAPSchemaAlias *))) == NULL)
+         return(lsd->errcode = LDAPSCHEMA_NO_MEMORY);
+      alias->alias   = names[idx];
+      alias->model   = mod;
+      if ((err = ldapschema_insert(lsd, (void ***)listp, list_lenp, alias, ldapschema_compar_aliases)) > 0)
+      {
+         free(alias);
+         return(err);
+      };
+      if (err == -1)
+      {
+         ldapschema_schema_err(lsd,  mod, " object with duplicate name '%s' found", names[idx]);
+         free(alias);
+      };
+   };
+
+   return(0);
+}
+
+
 void ldapschema_object_free(LDAPSchemaModel * obj)
 {
    size_t ext;
diff --git a/lib/libldapschema/lmemory.h b/lib/libldapschema/lmemory.h
index f9f024b..a5887e7 100644
--- a/lib/libldapschema/lmemory.h
+++ b/lib/libldapschema/lmemory.h
@@ -73,6 +73,11 @@ LDAPSchemaCur
 ldapschema_curalloc(
          LDAPSchema            * lsd );
 
+int
+ldapschema_model_register(
+         LDAPSchema *               lsd,
+         LDAPSchemaModel *          mod );
+
 void
 ldapschema_objectclass_free(
          LDAPSchemaObjectclass * objectclass );