Function viable_nhfile

src/files.c:548–579

#ifndef SFCTOOL
staticfn NHFILE *
viable_nhfile(NHFILE *nhfp)
{
    /* perform some sanity checks before returning
       the pointer to the nethack file descriptor */
    if (nhfp) {
         /* check for no open file at all,
          * not a structlevel legacy file,
          * nor a fieldlevel file.
          */
         if (((nhfp->fd == -1) && !nhfp->fpdef)
                || (nhfp->structlevel && nhfp->fd < 0)
                || (nhfp->fieldlevel && !nhfp->fpdef)) {
            /* not viable, start the cleanup */
            if (nhfp->fieldlevel) {
                if (nhfp->fpdef) {
                    (void) fclose(nhfp->fpdef);
                    nhfp->fpdef = (FILE *) 0;
                }
                if (nhfp->fplog) {
                    (void) fprintf(nhfp->fplog, "# closing, not viable\n");
                    (void) fclose(nhfp->fplog);
                }
                if (nhfp->fpdebug)
                    (void) fclose(nhfp->fpdebug);
            }
            free_nhfile(nhfp);
            nhfp = (NHFILE *) 0;
        }
    }
    return nhfp;
}
#endif /* !SFCTOOL */

int