static enum parser_error helper_rand1(struct parser *p) {
struct random v = parser_getrand(p, "r0");
struct random u = parser_getrand(p, "r1");
int *wasok = parser_priv(p);
if (v.dice != 2 || v.sides != 3 || u.dice != 4 || u.sides != 5)
return PARSE_ERROR_GENERIC;
*wasok = 1;
return PARSE_ERROR_NONE;
}
static enum parser_error parse_r_b(struct parser *p) {
struct monster_race *r = parser_priv(p);
int i;
struct random dam;
if (!r)
return PARSE_ERROR_MISSING_RECORD_HEADER;
for (i = 0; i < MONSTER_BLOW_MAX; i++)
if (!r->blow[i].method)
break;
if (i == MONSTER_BLOW_MAX)
return PARSE_ERROR_TOO_MANY_ENTRIES;
r->blow[i].method = find_blow_method(parser_getsym(p, "method"));
if (!r_info_blow_method[r->blow[i].method])
return PARSE_ERROR_UNRECOGNISED_BLOW;
if (parser_hasval(p, "effect")) {
r->blow[i].effect = find_blow_effect(parser_getsym(p, "effect"));
if (!r_info_blow_effect[r->blow[i].effect])
return PARSE_ERROR_INVALID_EFFECT;
}
if (parser_hasval(p, "damage")) {
dam = parser_getrand(p, "damage");
r->blow[i].d_dice = dam.dice;
r->blow[i].d_side = dam.sides;
}
return PARSE_ERROR_NONE;
}
static enum parser_error parse_r_friends(struct parser *p) {
struct monster_race *r = parser_priv(p);
struct monster_friends *f;
struct random number;
if (!r)
return PARSE_ERROR_MISSING_RECORD_HEADER;
f = mem_zalloc(sizeof *f);
number = parser_getrand(p, "number");
f->number_dice = number.dice;
f->number_side = number.sides;
f->percent_chance = parser_getuint(p, "chance");
f->name = string_make(parser_getstr(p, "name"));
f->next = r->friends;
r->friends = f;
return PARSE_ERROR_NONE;
}
static enum parser_error parse_r_friends_base(struct parser *p) {
struct monster_race *r = parser_priv(p);
struct monster_friends_base *f;
struct random number;
if (!r)
return PARSE_ERROR_MISSING_RECORD_HEADER;
f = mem_zalloc(sizeof *f);
number = parser_getrand(p, "number");
f->number_dice = number.dice;
f->number_side = number.sides;
f->percent_chance = parser_getuint(p, "chance");
f->base = lookup_monster_base(parser_getstr(p, "name"));
if (!f->base) return PARSE_ERROR_UNRECOGNISED_TVAL;
f->next = r->friends_base;
r->friends_base = f;
return PARSE_ERROR_NONE;
}