const long message;
}} action_t;
+typedef struct {{
+ const string_group_t words;
+ const char* message;
+}} special_t;
+
typedef struct {{
const long motion;
+ const long cond;
const long dest;
+ const bool nodwarves;
const bool stop;
}} travelop_t;
* inherited from FORTRAN, someday. To understand these, read the
* encoding description for travel.
*/
-#define T_DESTINATION(entry) MOD((entry).dest, 1000)
-#define T_CONDITION(entry) ((entry).dest / 1000)
-#define T_NODWARVES(entry) (T_CONDITION(entry) == 100)
-#define T_HIGH(entry) ((entry).dest)
#define T_TERMINATE(entry) ((entry).motion == 1)
#define L_SPEAK(loc) ((loc) - 500)
extern long conditions[];
extern const motion_t motions[];
extern const action_t actions[];
-extern const action_t specials[];
+extern const special_t specials[];
extern const travelop_t travel[];
extern const long tkey[];
+extern const char *ignore;
#define NLOCATIONS {}
#define NOBJECTS {}
{}
}};
-const action_t specials[] = {{
+const special_t specials[] = {{
{}
}};
-{}
+const long tkey[] = {{{}}};
const travelop_t travel[] = {{
{}
}};
+const char *ignore = \"{}\";
+
/* end */
"""
cnd_str += " " + line + ",\t// " + name + "\n"
return cnd_str
-def recompose(type_word, value):
- "Compose the internal code for a vocabulary word from its YAML entry"
- parts = ("motion", "action", "object", "special")
- try:
- return value + 1000 * parts.index(type_word)
- except KeyError:
- sys.stderr.write("dungeon: %s is not a known word\n" % word)
- sys.exit(1)
- except IndexError:
- sys.stderr.write("%s is not a known word classifier\n" % attrs["type"])
- sys.exit(1)
-
def get_motions(motions):
template = """ {{
.words = {},
else:
words_str = get_string_group(contents["words"])
mot_str += template.format(words_str)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
return mot_str
def get_actions(actions):
message = contents["message"]
act_str += template.format(words_str, message)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
act_str = act_str[:-1] # trim trailing newline
return act_str
+def get_specials(specials):
+ template = """ {{
+ .words = {},
+ .message = {},
+ }},
+"""
+ spc_str = ""
+ for special in specials:
+ contents = special[1]
+
+ if contents["words"] == None:
+ words_str = get_string_group([])
+ else:
+ words_str = get_string_group(contents["words"])
+
+ if contents["message"] == None:
+ message = "NULL"
+ else:
+ message = make_c_string(contents["message"])
+
+ spc_str += template.format(words_str, message)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
+ spc_str = spc_str[:-1] # trim trailing newline
+ return spc_str
+
def bigdump(arr):
out = ""
for (i, entry) in enumerate(arr):
if out and out[-1] == ' ':
out = out[:-1]
out += "\n "
- out += str(arr[i]) + ", "
+ out += str(arr[i]).lower() + ", "
out = out[:-2] + "\n"
return out
-def buildtravel(locs, objs, voc):
+def buildtravel(locs, objs):
ltravel = []
verbmap = {}
- for entry in db["vocabulary"]:
- if entry["type"] == "motion" and entry["value"] not in verbmap:
- verbmap[entry["word"]] = entry["value"]
+ for i, motion in enumerate(db["motions"]):
+ try:
+ for word in motion[1]["words"]:
+ verbmap[word.upper()] = i
+ except TypeError:
+ pass
def dencode(action, name):
"Decode a destination number"
if action[0] == "goto":
raise ValueError
def cencode(cond, name):
if cond is None:
- return 0;
+ return 0
+ elif cond == ["nodwarves"]:
+ return 100
elif cond[0] == "pct":
return cond[1]
elif cond[0] == "carry":
sys.stderr.write("dungeon: unknown object name %s in with clause of \n" % (cond[1], name))
sys.exit(1)
elif cond[0] == "not":
- # FIXME: Allow named as well as numbered states
try:
obj = objnames.index(cond[1])
if type(cond[2]) == int:
#
# In order to de-crypticize the runtime code, we're going to break these
# magic numbers up into a struct.
- travel = [[0, 0, False]]
+ travel = [[0, 0, 0, False, False]]
tkey = [0]
oldloc = 0
while ltravel:
tkey.append(len(travel))
oldloc = loc
elif travel:
- travel[-1][2] = not travel[-1][2]
+ travel[-1][-1] = not travel[-1][-1]
while rule:
- travel.append([rule.pop(0), newloc, False])
- travel[-1][2] = True
+ travel.append([rule.pop(0),
+ newloc // 1000,
+ newloc % 1000,
+ (newloc//1000)==100,
+ False])
+ travel[-1][-1] = True
return (travel, tkey)
def get_travel(travel):
template = """ {{
.motion = {},
+ .cond = {},
.dest = {},
+ .nodwarves = {},
.stop = {},
}},
"""
out = ""
for entry in travel:
- out += template.format(entry[0], entry[1], entry[2]).lower()
+ out += template.format(*entry).lower()
out = out[:-1] # trim trailing newline
return out
objnames = [el[0] for el in db["objects"]]
(travel, tkey) = buildtravel(db["locations"],
- db["objects"],
- db["vocabulary"])
-
+ db["objects"])
+ ignore = ""
c = c_template.format(
h_name,
get_arbitrary_messages(db["arbitrary_messages"]),
get_condbits(db["locations"]),
get_motions(db["motions"]),
get_actions(db["actions"]),
- get_actions(db["specials"]),
- "const long tkey[] = {%s};" % bigdump(tkey),
+ get_specials(db["specials"]),
+ bigdump(tkey),
get_travel(travel),
+ ignore,
)
h = h_template.format(