new.c: Order two return statements to match comment.

[nmh] / sbr / context_find.c

diff --git a/sbr/context_find.c b/sbr/context_find.c
index 5cad0164144ac8b9497609d715a6466758cde790..f4fe7ed1303035120e68ff9b3d7d8032e2b81edf 100644 (file)
--- a/sbr/context_find.c
+++ b/sbr/context_find.c
@@ -1,6 +1,4 @@
-
-/*
- * context_find.c -- find an entry in the context/profile list
+/* 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
@@ -15,9 +13,10 @@ context_find (const char *str)
 {
     struct node *np;
 
+    str = FENDNULL(str);
     for (np = m_defs; np; np = np->n_next)
-       if (!strcasecmp (np->n_name ? np->n_name : "", str ? str : ""))
-           return (np->n_field);
+       if (!strcasecmp(FENDNULL(np->n_name), str))
+           return np->n_field;
 
     return NULL;
 }
@@ -25,8 +24,9 @@ context_find (const char *str)
 
 /*
  * Helper function to search first, if subtype is non-NULL, for
- * invoname-string-type/subtype and then invoname-string-type.
- * If entry is found but is empty, returns NULL.
+ * 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,
@@ -51,3 +51,23 @@ context_find_by_type (const char *string, const char *type,
 
     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;
+    size_t len;
+
+    len = strlen(prefix);
+    for (np = m_defs; np; np = np->n_next) {
+       if (np->n_name  &&  ! strncasecmp (np->n_name, prefix, len)) {
+           return 1;
+        }
+    }
+
+    return 0;
+}