/*
	dirname - return pointer to the pathname portion of a complete filename.
	NOTE: The returned value points to a static area that is over-written
	with each call.
*/
#include <ncbi.h>
#include <gishlib.h>

CharPtr _cdecl
dirname(fname)
	register CharPtr fname;
{
	register CharPtr cp;
	register size_t	n;
	static char	path[FILENAME_MAX+1];

	cp = str_rchr(fname, DIRDELIMCHR);
	if (cp == NULL) {
		path[0] = NULLB;
		return path;
	}
	n = cp - fname;
	if (n > DIM(path)-1)
		n = DIM(path)-1;
	Nlm_MemCpy(path, fname, n);
	path[n] = NULLB;
	return path;
}