Print pointers in debug with C99's `%p' rather than `0x%x'.

[nmh] / sbr / context_find.c

diff --git a/sbr/context_find.c b/sbr/context_find.c
index efac368faf68f65ee8c18cd0321f246cd7d416b2..4d89fbc5fe5013b46db3bdca5f71d93b56da5810 100644 (file)
--- a/sbr/context_find.c
+++ b/sbr/context_find.c
@@ -1,8 +1,4 @@
-
-/*
- * context_find.c -- find an entry in the context/profile list
- *
- * $Id$
+/* context_find.c -- find an entry in the context/profile list

  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for
  *
  * This code is Copyright (c) 2002, by the authors of nmh.  See the
  * COPYRIGHT file in the root directory of the nmh distribution for


@@ -13,13 +9,62 @@
 
 
 char *
 
 
 char *

-context_find (char *str)
+context_find (const char *str)

 {
     struct node *np;
 
     for (np = m_defs; np; np = np->n_next)
 {
     struct node *np;
 
     for (np = m_defs; np; np = np->n_next)

-       if (!strcasecmp (np->n_name, str))
+       if (!strcasecmp (FENDNULL(np->n_name), FENDNULL(str)))

            return (np->n_field);
 
     return NULL;
 }
            return (np->n_field);
 
     return NULL;
 }

+
+
+/*
+ * Helper function to search first, if subtype is non-NULL, for
+ * invoname-string-type/subtype and then, if not yet found,
+ * invoname-string-type.  If entry is found but is empty, it is
+ * treated as not found.
+ */
+char *
+context_find_by_type (const char *string, const char *type,
+                      const char *subtype) {
+    char *value = NULL;
+
+    if (subtype) {
+        char *cp;
+
+        cp = concat (invo_name, "-", string, "-", type, "/", subtype, NULL);
+        if ((value = context_find (cp)) != NULL && *value == '\0') value = NULL;
+        free (cp);
+    }
+
+    if (value == NULL) {
+        char *cp;
+
+        cp = concat (invo_name, "-", string, "-", type, NULL);
+        if ((value = context_find (cp)) != NULL && *value == '\0') value = NULL;
+        free (cp);
+    }
+
+    return value;
+}
+
+
+/*
+ * Helper function to search profile an entry with name beginning with prefix.
+ * The search is case insensitive.
+ */
+int
+context_find_prefix (const char *prefix) {
+    struct node *np;
+
+    for (np = m_defs; np; np = np->n_next) {
+       if (np->n_name  &&  ! strncasecmp (np->n_name, prefix, strlen(prefix))) {
+           return 1;
+        }
+    }
+
+    return 0;
+}