inline std::string uppercase_first(std::string s)
{
    if (s.length())
        s[0] = toupper(s[0]);
    return (s);
}

void print_description( const std::string &d );

static void print_description( const std::string &d )

void print_description( const std::string &d )

std::vector<std::string> database_find_keys(DBM *database,
                                            const std::string &regex,
                                            bool ignore_case = false);

std::string getLongDescription(const std::string &key);

std::string              getLongDescription(const std::string &key);
std::vector<std::string> getLongDescriptionByRegex(const std::string &regex);

std::vector<std::string> database_find_keys(DBM *database,
                                            const std::string &regex,
                                            bool ignore_case)
{
    text_pattern             tpat(regex, ignore_case);
    std::vector<std::string> matches;
    datum dbKey = dbm_firstkey(database);
    while (dbKey.dptr != NULL)
    {
        std::string key((const char *)dbKey.dptr, dbKey.dsize);
        if (tpat.matches(key))
            matches.push_back(key);
        dbKey = dbm_nextkey(database);
    }
    return (matches);
}

}
std::vector<std::string> getLongDescriptionByRegex(const std::string &regex)
{
    if (!descriptionDB)
    {
        std::vector<std::string> empty;
        return (empty);
    }
    return database_find_keys(descriptionDB, regex, true);

#include "database.h"
#include "describe.h"

static void find_description()
{
    clrscr();
    viewwindow(true, false);
    mpr("Describe what? (can be a partial name or a regex) ");
    char buf[80];
    if (cancelable_get_line(buf, sizeof(buf)) || buf[0] == '\0')
    {
        canned_msg( MSG_OK);
        return;
    }
    std::string regex = trimmed_string(buf);

    if (regex == "")
    {
        mpr("Description must contain at least one non-space.");
        return;
    }
    // Try to get an exact match first.
    std::string key   = regex;
    std::string desc  = getLongDescription(key);
    if (desc == "")
    {
        std::vector<std::string> matches = getLongDescriptionByRegex(regex);
        if (matches.size() == 0)
        {
            mprf("Nothing matches '%s'", buf);
            return;
        }
        else if (matches.size() > 1)
        {
            std::string prefix = "No exact match for '" +
                regex +  "', possible matches are: ";
            // Use mpr_comma_separated_list() because the list
            // might be *LONG*.
            mpr_comma_separated_list(prefix, matches, " and ", ", ",
                                     MSGCH_PLAIN);
            return;
        }
        else
        {
            // Only one match, use that.
            key  = matches[0];
            desc = getLongDescription(key);
        }
    }
    key = uppercase_first(key);
    key += "$$";
    clrscr();
    print_description(key + desc);
}

        // fall through
    default:
        return ch;

        break;
    case '/':
        find_description();
        if ( getch() == 0 )
            getch();
        viewwindow(true, false);
        return -1;

    return ch;

            "<w>/</w>: Lookup description\n"

\| Staves:

| Staves:

        ?/              Describe a monster, spell or feature.  You can
                        enter a partial name or a regex instead of the
                        full name.

description of the spell causing the enchantment will explain these.

description of the spell causing the enchantment will explain these.