A new Shop Name generator

crawl-ref/source/database.cc

@@ -124,6 +124,7 @@ static TextDB AllDBs[] =
             "montitle.txt", // titles for monsters (i.e. uniques)
             "decorlines.txt", //  miscellaneous lines for walking on decoration
             "gizmo.txt",    // name-assembling for gizmos
+            "shopname.txt", // fancy shop name generator
             }),
 
     TextDB("quotes", "descript/",
@@ -700,7 +701,6 @@ static void _call_recursive_replacement(string &str, TextDB &db,
             break;
         }
 
-        string marker_full = str.substr(pos, end - pos + 1);
         string marker      = str.substr(pos + 1, end - pos - 1);
 
         string replacement =
@@ -714,7 +714,7 @@ static void _call_recursive_replacement(string &str, TextDB &db,
         }
         else
         {
-            str.replace(pos, marker_full.length(), replacement);
+            str.replace(pos, marker.length() + 2, replacement);
 
             // Start search from pos rather than end + 1, so that if
             // the replacement contains its own @foo@, we can replace

crawl-ref/source/dungeon.cc

@@ -6236,16 +6236,24 @@ void place_spec_shop(const coord_def& where, shop_spec &spec, int shop_level)
     shop_struct& shop = env.shop[where];
 
     const int level_number = shop_level ? shop_level : env.absdepth0;
-
-    for (int j = 0; j < 3; j++)
-        shop.keeper_name[j] = 1 + random2(200);
-    shop.shop_name = spec.name;
-    shop.shop_type_name = spec.type;
-    shop.shop_suffix_name = spec.suffix;
+    shop.type = spec.sh_type == SHOP_RANDOM ? _random_shop() : spec.sh_type;
     shop.level = level_number * 2;
-    shop.type = spec.sh_type;
-    if (shop.type == SHOP_RANDOM)
-        shop.type = _random_shop();
+    if (!spec.full_name.empty())
+    {
+        shop.shop_name = spec.name;
+        shop.full_shop_name = spec.full_name;
+    }
+    else if (spec.name.empty() && spec.type.empty() && spec.suffix.empty())
+    {
+        auto names = generate_shop_name(shop.type, shop.level, spec.gozag);
+        std::tie(shop.full_shop_name, shop.shop_name) = names;
+    }
+    else
+    {
+        shop.shop_name = spec.name;
+        shop.shop_type_name = spec.type;
+        shop.shop_suffix_name = spec.suffix;
+    }
     shop.greed = _shop_greed(shop.type, level_number, spec.greed);
     shop.pos = where;
 

crawl-ref/source/god-abil.cc

@@ -3144,6 +3144,7 @@ static int _gozag_shop_price(int index)
 static void _setup_gozag_shop(int index, vector<shop_type> &valid_shops)
 {
     ASSERT(!you.props.exists(make_stringf(GOZAG_SHOPKEEPER_NAME_KEY, index)));
+    ASSERT(!you.props.exists(make_stringf(GOZAG_SHOP_NAME_KEY, index)));
 
     shop_type type = NUM_SHOPS;
     int choice = random2(valid_shops.size());
@@ -3152,17 +3153,11 @@ static void _setup_gozag_shop(int index, vector<shop_type> &valid_shops)
     valid_shops.erase(valid_shops.begin() + choice);
     you.props[make_stringf(GOZAG_SHOP_TYPE_KEY, index)].get_int() = type;
 
-    you.props[make_stringf(GOZAG_SHOPKEEPER_NAME_KEY, index)].get_string()
-                                    = make_name();
-
-    const bool need_suffix = type != SHOP_GENERAL
-                             && type != SHOP_GENERAL_ANTIQUE
-                             && type != SHOP_DISTILLERY;
-    you.props[make_stringf(GOZAG_SHOP_SUFFIX_KEY, index)].get_string()
-                                    = need_suffix
-                                      ? random_choose("Shoppe", "Boutique",
-                                                      "Emporium", "Shop")
-                                      : "";
+    auto names = generate_shop_name(type, you.experience_level, true);
+    you.props[make_stringf(GOZAG_SHOP_NAME_KEY, index)]
+        = names.first;
+    you.props[make_stringf(GOZAG_SHOPKEEPER_NAME_KEY, index)]
+        = names.second;
 
     you.props[make_stringf(GOZAG_SHOP_COST_KEY, index)].get_int()
         = gozag_price_for_shop();
@@ -3181,20 +3176,18 @@ static string _describe_gozag_shop(int index)
     const int cost = _gozag_shop_price(index);
 
     const char offer_letter = 'a' + index;
+
     const string shop_name =
-        apostrophise(you.props[make_stringf(GOZAG_SHOPKEEPER_NAME_KEY,
-                                            index)].get_string());
+        you.props[make_stringf(GOZAG_SHOP_NAME_KEY,
+                               index)].get_string();
     const shop_type type = _gozag_shop_type(index);
     const string type_name = shop_type_name(type);
-    const string suffix =
-        you.props[make_stringf(GOZAG_SHOP_SUFFIX_KEY, index)].get_string();
 
-    return make_stringf("  [%c] %5d gold - %s %s %s",
+    return make_stringf("  [%c] %5d gold - %s (%s)",
                         offer_letter,
                         cost,
                         shop_name.c_str(),
-                        type_name.c_str(),
-                        suffix.c_str());
+                        type_name.c_str());
 }
 
 /**
@@ -3230,24 +3223,15 @@ static int _gozag_choose_shop()
 /**
  * Make a vault spec for the gozag shop offer at the given index.
  */
-static string _gozag_shop_spec(int index)
+static shop_spec _gozag_shop_spec(int index)
 {
     const shop_type type = _gozag_shop_type(index);
     const string name =
         you.props[make_stringf(GOZAG_SHOPKEEPER_NAME_KEY, index)];
+    const string full_name =
+        you.props[make_stringf(GOZAG_SHOP_NAME_KEY, index)];
 
-    string suffix = replace_all(
-                                you.props[make_stringf(GOZAG_SHOP_SUFFIX_KEY,
-                                                       index)]
-                                .get_string(), " ", "_");
-    if (!suffix.empty())
-        suffix = " suffix:" + suffix;
-
-    return make_stringf("%s shop name:%s%s gozag",
-                        shoptype_to_str(type),
-                        replace_all(name, " ", "_").c_str(),
-                        suffix.c_str());
-
+    return shop_spec(type, name, "", "", -1, -1, false, true, full_name);
 }
 
 /**
@@ -3258,13 +3242,8 @@ static string _gozag_shop_spec(int index)
 static void _gozag_place_shop(int index)
 {
     ASSERT(env.grid(you.pos()) == DNGN_FLOOR);
-    keyed_mapspec kmspec;
-    kmspec.set_feat(_gozag_shop_spec(index), false);
-
-    feature_spec feat = kmspec.get_feat();
-    if (!feat.shop)
-        die("Invalid shop spec?");
-    place_spec_shop(you.pos(), *feat.shop, you.experience_level);
+    shop_spec spec = _gozag_shop_spec(index);
+    place_spec_shop(you.pos(), spec, you.experience_level);
 
     link_items();
     env.markers.add(new map_feature_marker(you.pos(), DNGN_ABANDONED_SHOP));
@@ -3273,12 +3252,9 @@ static void _gozag_place_shop(int index)
     shop_struct *shop = shop_at(you.pos());
     ASSERT(shop);
 
-    const gender_type gender = random_choose(GENDER_FEMALE, GENDER_MALE,
-                                             GENDER_NEUTRAL);
-
     mprf(MSGCH_GOD, "%s invites you to visit %s %s%s%s.",
                     shop->shop_name.c_str(),
-                    decline_pronoun(gender, PRONOUN_POSSESSIVE),
+                    decline_pronoun(GENDER_NEUTRAL, PRONOUN_POSSESSIVE),
                     shop_type_name(shop->type).c_str(),
                     !shop->shop_suffix_name.empty() ? " " : "",
                     shop->shop_suffix_name.c_str());
@@ -3290,6 +3266,7 @@ static bool _shop_type_valid(shop_type type)
     {
 #if TAG_MAJOR_VERSION == 34
     case SHOP_FOOD:
+        return false;
 #endif
     case SHOP_EVOKABLES:
         return !you.has_mutation(MUT_NO_ARTIFICE);
@@ -3347,9 +3324,12 @@ bool gozag_call_merchant()
 
     for (int j = 0; j < GOZAG_MAX_SHOPS; j++)
     {
+#if TAG_MAJOR_VERSION == 34
         you.props.erase(make_stringf(GOZAG_SHOPKEEPER_NAME_KEY, j));
-        you.props.erase(make_stringf(GOZAG_SHOP_TYPE_KEY, j));
         you.props.erase(make_stringf(GOZAG_SHOP_SUFFIX_KEY, j));
+#endif
+        you.props.erase(make_stringf(GOZAG_SHOP_NAME_KEY, j));
+        you.props.erase(make_stringf(GOZAG_SHOP_TYPE_KEY, j));
         you.props.erase(make_stringf(GOZAG_SHOP_COST_KEY, j));
     }
 

crawl-ref/source/god-abil.h

@@ -40,8 +40,11 @@ const char * const GOZAG_POTIONS_KEY = "gozag_potions%d";
 const char * const GOZAG_PRICE_KEY = "gozag_price%d";
 
 const char * const GOZAG_SHOPKEEPER_NAME_KEY = "gozag_shopkeeper_%d";
-const char * const GOZAG_SHOP_TYPE_KEY       = "gozag_shop_type_%d";
+#if TAG_MAJOR_VERSION == 34
 const char * const GOZAG_SHOP_SUFFIX_KEY     = "gozag_shop_suffix_%d";
+#endif
+const char * const GOZAG_SHOP_NAME_KEY       = "gozag_shop_%d";
+const char * const GOZAG_SHOP_TYPE_KEY       = "gozag_shop_type_%d";
 const char * const GOZAG_SHOP_COST_KEY       = "gozag_shop_cost_%d";
 
 #define GOZAG_GOLD_AURA_KEY "gozag_gold_aura_amount"

crawl-ref/source/l-dgn.cc

@@ -21,6 +21,7 @@
 #include "libutil.h"
 #include "mapmark.h"
 #include "maps.h"
+#include "shopping.h"
 #include "shout.h"
 #include "spl-util.h"
 #include "state.h"
@@ -1780,6 +1781,16 @@ LUAFN(dgn_state_is_descent)
     return 1;
 }
 
+LUAFN(dgn_shopname)
+{
+    const char* type_name = luaL_checkstring(ls, 1);
+    shop_type shop = str_to_shoptype(type_name);
+    int level = luaL_safe_checkint(ls, 2);
+    bool gozag = lua_isboolean(ls, 3) ? lua_toboolean(ls, 3) : false;
+    auto generated = generate_shop_name(shop, level, gozag);
+    PLUARET(string, generated.first.c_str());
+}
+
 const struct luaL_reg dgn_dlib[] =
 {
 { "reset_level", _dgn_reset_level },
@@ -1898,6 +1909,8 @@ const struct luaL_reg dgn_dlib[] =
 
 { "is_descent", dgn_state_is_descent },
 
+{ "shopname", dgn_shopname },
+
 { nullptr, nullptr }
 };
 

crawl-ref/source/mapdef.cc

@@ -6083,6 +6083,7 @@ feature_spec keyed_mapspec::parse_shop(string s, int weight, int mimic,
 
     const bool gozag = strip_tag(s, "gozag");
 
+    string full_shop_name = replace_all_of(strip_tag_prefix(s, "full_name:"), "_", " ");
     string shop_name = replace_all_of(strip_tag_prefix(s, "name:"), "_", " ");
     string shop_type_name = replace_all_of(strip_tag_prefix(s, "type:"),
                                            "_", " ");
@@ -6123,7 +6124,7 @@ feature_spec keyed_mapspec::parse_shop(string s, int weight, int mimic,
     feature_spec fspec(-1, weight, mimic, no_mimic);
     fspec.shop.reset(new shop_spec(shop, shop_name, shop_type_name,
                                    shop_suffix_name, greed,
-                                   num_items, use_all, gozag));
+                                   num_items, use_all, gozag, full_shop_name));
     fspec.shop->items = items;
     return fspec;
 }

crawl-ref/source/mapdef.h

@@ -797,10 +797,14 @@ struct shop_spec
                          *   stock).
                          *   */
 
+    string full_name;   /**< Overrides all other name parameters and sets the entire
+                             name of the shop */
+
     shop_spec(shop_type sh, string n="", string t="",
-              string s="", int g=-1, int ni=-1, bool u=false, bool goz=false)
+              string s="", int g=-1, int ni=-1, bool u=false, bool goz=false,
+              string fname="")
         : sh_type(sh), name(n), type(t), suffix(s),
-          greed(g), num_items(ni), items(), use_all(u), gozag(goz) { }
+          greed(g), num_items(ni), items(), use_all(u), gozag(goz), full_name(fname) { }
 };
 
 /**

crawl-ref/source/scripts/shopnames.lua

@@ -0,0 +1,31 @@
+-- Generates a huge number of shop names to test the generator
+-- Runs through the full range of "levels" (we increment 2 levels per dungeon
+-- level, so 54), all shop types, and again with Gozag shops
+-- Usage:
+-- ./crawl -script shopnames 1> shopnames_test.txt
+
+local shop_types = {
+    "general",
+    "antiques",
+    "weapon",
+    "antique weapon",
+    "armour",
+    "antique armour",
+    "book",
+    "scroll",
+    "distillery",
+    "jewellery",
+    "gadget"
+}
+
+for i,shop in ipairs(shop_types) do
+    print (shop .. ":\n")
+    for level = 1,54 do
+        print (level .. ": " .. dgn.shopname(shop, level))
+    end
+    print ("\n" .. shop .. " (Gozag):\n")
+    for level = 1,54 do
+        print (level .. ": " .. dgn.shopname(shop, level, true))
+    end
+    print ("\n")
+end