X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=util%2Fres.c;fp=util%2Fres.c;h=e105e596db1b7725b675ed1ac76ad9761e6873c6;hb=9b46631dae8ab93da1e8f87f5d6638a493135c03;hp=7b304544d23292bfe99ce79af59f18e845821d1d;hpb=4c112f15503aebed494fab8aa5296c3661bfb31c;p=idzebra-moved-to-github.git

diff --git a/util/res.c b/util/res.c
index 7b30454..e105e59 100644
--- a/util/res.c
+++ b/util/res.c
@@ -1,4 +1,4 @@
-/* $Id: res.c,v 1.52 2006-12-05 09:24:31 adam Exp $
+/* $Id: res.c,v 1.53 2006-12-05 14:06:30 adam Exp $
    Copyright (C) 1995-2006
    Index Data ApS
 
@@ -554,6 +554,61 @@ void res_dump (Res r, int level)
 	res_dump (r->over_res, level + 1);
     }
 }
+
+int res_check(Res r_i, Res r_v)
+{
+    struct res_entry *e_i;
+    int errors = 0;
+    
+    for (e_i = r_i->first; e_i; e_i = e_i->next)
+    {
+        struct res_entry *e_v;
+        for (e_v = r_v->first; e_v; e_v = e_v->next)
+        {
+            int prefix_allowed = 0;
+            int suffix_allowed = 0;
+            const char *name = e_i->name;
+            size_t name_len = strlen(e_i->name);
+            char namez[32];
+
+            if (strchr(e_v->value, 'p'))
+                prefix_allowed = 1;
+            if (strchr(e_v->value, 's'))
+                suffix_allowed = 1;
+
+            if (prefix_allowed)
+            {
+                const char *cp = strchr(name, '.');
+                if (cp)
+                {
+                    name = cp;
+                    name_len = strlen(name);
+                }
+            }
+            if (suffix_allowed)
+            {
+                const char *cp = strchr(name, '.');
+                if (cp)
+                    name_len = cp - name;
+            }
+            if (name_len < sizeof(namez)-1)
+            {
+                memcpy(namez, name, name_len);
+                namez[name_len] = '\0';
+                if (!yaz_matchstr(namez, e_v->name))
+                    break;
+            }
+        }
+        if (!e_v)
+        {
+            yaz_log(YLOG_WARN, "The following setting is unrecognized: %s",
+                    e_i->name);
+            errors++;
+        }
+    }
+    return errors;
+}
+
 /*
  * Local variables:
  * c-basic-offset: 4