Function fuzzer_savelife

src/end.c:944–1016

when dying while running the debug fuzzer, [almost] always keep going; True: forced survival; False: doomed unless wearing life-save amulet */

/* when dying while running the debug fuzzer, [almost] always keep going;
   True: forced survival; False: doomed unless wearing life-save amulet */
staticfn boolean
fuzzer_savelife(int how)
{
    /*
     * Some debugging code pulled out of done() to unclutter it.
     * 'done_seq' is maintained in done().
     */
    if (!program_state.panicking && how != PANICKED && how != TRICKED) {
        savelife(how);

        /* periodically restore characteristics plus lost experience
           levels or cure lycanthropy or both; those conditions make the
           hero vulnerable to repeat deaths (often by becoming surrounded
           while being too encumbered to do anything) */
        if (!rn2((gd.done_seq > gh.hero_seq + 2L) ? 2 : 10)) {
            struct obj *potion;
            int propidx, proptim, remedies = 0;

            /* get rid of temporary potion with obfree() rather than useup()
               because it doesn't get entered into inventory */
            if (ismnum(u.ulycn) && !rn2(3)) {
                potion = mksobj(POT_WATER, TRUE, FALSE);
                bless(potion);
                (void) peffects(potion);
                obfree(potion, (struct obj *) 0);
                ++remedies;
            }
            if (!remedies || rn2(3)) {
                potion = mksobj(POT_RESTORE_ABILITY, TRUE, FALSE);
                bless(potion);
                (void) peffects(potion);
                obfree(potion, (struct obj *) 0);
                ++remedies;
            }
            if (!rn2(3 + 3 * remedies)) {
                /* confer temporary resistances for first 8 properties:
                   fire, cold, sleep, disint, shock, poison, acid, stone */
                for (propidx = 1; propidx <= 8; ++propidx) {
                    if (!u.uprops[propidx].intrinsic
                        && !u.uprops[propidx].extrinsic
                        && (proptim = rn2(3)) > 0) /* 0..2 */
                        set_itimeout(&u.uprops[propidx].intrinsic,
                                     (long) (2 * proptim + 1)); /* 3 or 5 */
                }
                ++remedies;
            }
            if (!rn2(5 + 5 * remedies)) {
                ; /* might confer temporary Antimagic (magic resistance)
                   * or even Invulnerable */
            }
        }
        /* clear stale cause of death info after life-saving */
        svk.killer.name[0] = '\0';
        svk.killer.format = 0;

        /*
         * Guard against getting stuck in a loop if we die in one of
         * the few ways where life-saving isn't effective (cited case