/*++ /* NAME /* name_mask 3 /* SUMMARY /* map names to bit mask /* SYNOPSIS /* #include <name_mask.h> /* /* int name_mask(context, table, names) /* const char *context; /* const NAME_MASK *table; /* const char *names; /* /* const char *str_name_mask(context, table, mask) /* const char *context; /* const NAME_MASK *table; /* int mask; /* /* int name_mask_opt(context, table, names, flags) /* const char *context; /* const NAME_MASK *table; /* const char *names; /* int flags; /* /* int name_mask_delim_opt(context, table, names, delim, flags) /* const char *context; /* const NAME_MASK *table; /* const char *names; /* const char *delim; /* int flags; /* /* const char *str_name_mask_opt(buf, context, table, mask, flags) /* VSTRING *buf; /* const char *context; /* const NAME_MASK *table; /* int mask; /* int flags; /* DESCRIPTION /* name_mask() takes a null-terminated \fItable\fR with (name, mask) /* values and computes the bit-wise OR of the masks that correspond /* to the names listed in the \fInames\fR argument, separated by /* comma and/or whitespace characters. /* /* str_name_mask() translates a mask into its equivalent names. /* The result is written to a static buffer that is overwritten /* upon each call. /* /* name_mask_opt() and str_name_mask_opt() are extended versions /* with additional fine control. name_mask_delim_opt() supports /* non-default delimiter characters. /* /* Arguments: /* .IP buf /* Null pointer or pointer to buffer storage. /* .IP context /* What kind of names and /* masks are being manipulated, in order to make error messages /* more understandable. Typically, this would be the name of a /* user-configurable parameter. /* .IP table /* Table with (name, bit mask) pairs. /* .IP names /* A list of names that is to be converted into a bit mask. /* .IP mask /* A bit mask. /* .IP flags /* Bit-wise OR of zero or more of the following: /* .IP delim /* Delimiter characters to use instead of whitespace and commas. /* .RS /* .IP NAME_MASK_FATAL /* Require that all names listed in \fIname\fR exist in \fItable\fR, /* and that all bits listed in \fImask\fR exist in \fItable\fR. /* Terminate with a fatal run-time error if this condition is not met. /* This feature is enabled by default when calling name_mask() /* or str_name_mask(). /* .IP NAME_MASK_RETURN /* Require that all names listed in \fIname\fR exist in \fItable\fR, /* and that all bits listed in \fImask\fR exist in \fItable\fR. /* Log a warning, and return 0 (name_mask()) or a null pointer /* (str_name_mask()) if this condition is not met. /* .IP NAME_MASK_NUMBER /* Require that all bits listed in \fImask\fR exist in \fItable\fR. /* For unrecognized bits, print the numerical hexadecimal form. /* .IP NAME_MASK_ANY_CASE /* Enable case-insensitive matching. /* This feature is not enabled by default when calling name_mask(); /* it has no effect with str_name_mask(). /* .IP NAME_MASK_COMMA /* Use comma instead of space when converting a mask to string. /* .IP NAME_MASK_PIPE /* Use "|" instead of space when converting a mask to string. /* .RE /* The value NAME_MASK_NONE explicitly requests no features, /* and NAME_MASK_DEFAULT enables the default options. /* DIAGNOSTICS /* Fatal: the \fInames\fR argument specifies a name not found in /* \fItable\fR, or the \fImask\fR specifies a bit not found in /* \fItable\fR. /* LICENSE /* .ad /* .fi /* The Secure Mailer license must be distributed with this software. /* AUTHOR(S) /* Wietse Venema /* IBM T.J. Watson Research /* P.O. Box 704 /* Yorktown Heights, NY 10598, USA /*--*/ /* System library. */ #include <sys_defs.h> #include <string.h> #ifdef STRCASECMP_IN_STRINGS_H #include <strings.h> #endif /* Utility library. */ #include <msg.h> #include <mymalloc.h> #include <stringops.h> #include <name_mask.h> #include <vstring.h> #define STR(x) vstring_str(x) /* name_mask_delim_opt - compute mask corresponding to list of names */ int name_mask_delim_opt(const char *context, const NAME_MASK *table, const char *names, const char *delim, int flags) { const char *myname = "name_mask"; char *saved_names = mystrdup(names); char *bp = saved_names; int result = 0; const NAME_MASK *np; char *name; int (*lookup) (const char *, const char *); if (flags & NAME_MASK_ANY_CASE) lookup = strcasecmp; else lookup = strcmp; /* * Break up the names string, and look up each component in the table. If * the name is found, merge its mask with the result. */ while ((name = mystrtok(&bp, delim)) != 0) { for (np = table; /* void */ ; np++) { if (np->name == 0) { if (flags & NAME_MASK_FATAL) msg_fatal("unknown %s value \"%s\" in \"%s\"", context, name, names); if (flags & NAME_MASK_RETURN) { msg_warn("unknown %s value \"%s\" in \"%s\"", context, name, names); return (0); } break; } if (lookup(name, np->name) == 0) { if (msg_verbose) msg_info("%s: %s", myname, name); result |= np->mask; break; } } } myfree(saved_names); return (result); } /* str_name_mask_opt - mask to string */ const char *str_name_mask_opt(VSTRING *buf, const char *context, const NAME_MASK *table, int mask, int flags) { const char *myname = "name_mask"; const NAME_MASK *np; int len; static VSTRING *my_buf = 0; int delim = (flags & NAME_MASK_COMMA ? ',' : (flags & NAME_MASK_PIPE ? '|' : ' ')); if (buf == 0) { if (my_buf == 0) my_buf = vstring_alloc(1); buf = my_buf; } VSTRING_RESET(buf); for (np = table; mask != 0; np++) { if (np->name == 0) { if (flags & NAME_MASK_FATAL) { msg_fatal("%s: unknown %s bit in mask: 0x%x", myname, context, mask); } else if (flags & NAME_MASK_RETURN) { msg_warn("%s: unknown %s bit in mask: 0x%x", myname, context, mask); return (0); } else if (flags & NAME_MASK_NUMBER) { vstring_sprintf_append(buf, "0x%x%c", mask, delim); } break; } if (mask & np->mask) { mask &= ~np->mask; vstring_sprintf_append(buf, "%s%c", np->name, delim); } } if ((len = VSTRING_LEN(buf)) > 0) vstring_truncate(buf, len - 1); VSTRING_TERMINATE(buf); return (STR(buf)); } #ifdef TEST /* * Stand-alone test program. */ #include <stdlib.h> #include <vstream.h> int main(int argc, char **argv) { static const NAME_MASK table[] = { "zero", 1 << 0, "one", 1 << 1, "two", 1 << 2, "three", 1 << 3, 0, 0, }; int mask; VSTRING *buf = vstring_alloc(1); while (--argc && *++argv) { mask = name_mask("test", table, *argv); vstream_printf("%s -> 0x%x -> %s\n", *argv, mask, str_name_mask((VSTRING *) 0, "mask_test", table, mask)); vstream_fflush(VSTREAM_OUT); } vstring_free(buf); exit(0); } #endif