/* ===========================================================================
*
*                            PUBLIC DOMAIN NOTICE
*               National Center for Biotechnology Information
*
*  This software/database is a "United States Government Work" under the
*  terms of the United States Copyright Act.  It was written as part of
*  the author's official duties as a United States Government employee and
*  thus cannot be copyrighted.  This software/database is freely available
*  to the public for use. The National Library of Medicine and the U.S.
*  Government have not placed any restriction on its use or reproduction.
*
*  Although all reasonable efforts have been taken to ensure the accuracy
*  and reliability of the software and data, the NLM and the U.S.
*  Government do not and cannot warrant the performance or results that
*  may be obtained by using this software or data. The NLM and the U.S.
*  Government disclaim all warranties, express or implied, including
*  warranties of performance, merchantability or fitness for any particular
*  purpose.
*
*  Please cite the author in any work or product based on this material.
*
* ===========================================================================*/

#include <ncbi.h>
#include <dfa.h>

/*************************************************************************
 * dfa_size(dp)
 *
 *	Return the no. of bytes of storage in use by the DFA.
 *	This number may be considerably less than the no. of bytes
 *	allocated to the DFA, as reported by dfa_extent().
 *
 *	Returns 0 upon error, and sets dfaerrno = the error encountered.
 *************************************************************************/
unsigned long _cdecl
dfa_size(dp)
	register DFAPtr	dp;
{
	register DFA_BufPtr	bp;
	register long	totbytes = 0;

	if (dp == NULL || dp->magic != DFA_MAGIC) {
		dfaerrno = dfaErrBadPtr;
		return 0;
	}

	if (dp->opstate < dfaOpstateMemInit || dp->opstate >= dfaOpstateDestroyed) {
		dfaerrno = dfaErrOpstate;
		return 0;
	}

	bp = &dp->buf0;
	while (bp != NULL) {
		if (bp->chain != NULL)
			totbytes += bp->bused;
		else
			totbytes += bp->bsize - dp->memavail;
		bp = bp->chain;
	}
	return totbytes;
}
