Function engulf_target

src/mhitm.c:806–845

return True if magr is allowed to swallow mdef, False otherwise */

/* return True if magr is allowed to swallow mdef, False otherwise */
boolean
engulf_target(struct monst *magr, struct monst *mdef)
{
    struct rm *lev;
    int ax, ay, dx, dy;
    boolean uatk = (magr == &gy.youmonst),
            udef = (mdef == &gy.youmonst);

    /* can't swallow something that's too big */
    if (mdef->data->msize >= MZ_HUGE
        || (magr->data->msize < mdef->data->msize && !is_whirly(magr->data)))
        return FALSE;

    /* can't (move to) swallow if trapped. TODO: could do some? */
    if (mdef->mtrapped || magr->mtrapped)
        return FALSE;

    /* if attacker is phasing in solid rock and defender can't move there,
       or vice versa, don't allow engulf to succeed; otherwise expelling
       might not be able to place attacker and defender both back on map;
       when defender is the hero, a sanity_check complaint about placing
       the hero on top of a monster can occur */
    dx = (mdef == &gy.youmonst) ? u.ux : mdef->mx;
    dy = (mdef == &gy.youmonst) ? u.uy : mdef->my;
    lev = &levl[dx][dy];
    if (!(udef ? Passes_walls : passes_walls(mdef->data))
          && (IS_OBSTRUCTED(lev->typ) || closed_door(dx, dy) || IS_TREE(lev->typ)
              /* not passes_bars(); engulfer isn't squeezing through */
              || (lev->typ == IRONBARS && !is_whirly(magr->data))))
        return FALSE;
    ax = (magr == &gy.youmonst) ? u.ux : magr->mx;
    ay = (magr == &gy.youmonst) ? u.uy : magr->my;
    lev = &levl[ax][ay];
    if (!(uatk ? Passes_walls : passes_walls(magr->data))
        && (IS_OBSTRUCTED(lev->typ) || closed_door(ax, ay) || IS_TREE(lev->typ)
            || (lev->typ == IRONBARS && !is_whirly(mdef->data))))
        return FALSE;

    return TRUE;
}

/* Returns the same values as mattackm(). */
staticfn int