/*
 * <dirent.h> wrapper functions.
 *
 * Authors:
 *   Jonathan Pryor (jonpryor@vt.edu)
 *
 * Copyright (C) 2004 Jonathan Pryor
 */

#include <dirent.h>
#include <errno.h>
#include <string.h>
#include <stdlib.h>

#include "mph.h"

G_BEGIN_DECLS

struct Mono_Posix_Syscall__Dirent {
	/* ino_t  */ mph_ino_t      d_ino;
	/* off_t  */ mph_off_t      d_off;
	/* ushort */ unsigned short d_reclen;
	/* byte   */ unsigned char  d_type;
	/* string */ char          *d_name;
};

gint32
Mono_Posix_Syscall_seekdir (DIR *dir, mph_off_t offset)
{
	mph_return_if_off_t_overflow (offset);

	errno = 0;

	seekdir (dir, (off_t) offset);

	return errno != 0;
}

mph_off_t
Mono_Posix_Syscall_telldir (DIR *dir)
{
	return telldir (dir);
}

static void
copy_dirent (
	struct Mono_Posix_Syscall__Dirent *to, 
#ifdef MPH_USE_64_API
	struct dirent64 *from
#else
	struct dirent *from
#endif
	)
{
	to->d_ino    = from->d_ino;
#ifdef MPH_ON_BSD
	to->d_off    = 0;
#else
	to->d_off    = from->d_off;
#endif
	to->d_reclen = from->d_reclen;
	to->d_type   = from->d_type;
	to->d_name   = strdup (from->d_name);
}

gint32
Mono_Posix_Syscall_readdir (DIR *dirp, struct Mono_Posix_Syscall__Dirent *entry)
{
#ifdef MPH_USE_64_API
	struct dirent64 *d;
#else
	struct dirent *d;
#endif

	if (entry == NULL) {
		errno = EFAULT;
		return -1;
	}

#ifdef MPH_USE_64_API
	d = readdir64 (dirp);
#else
	d = readdir (dirp);
#endif
	if (d == NULL) {
		return -1;
	}

	copy_dirent (entry, d);

	return 0;
}

gint32
Mono_Posix_Syscall_readdir_r (DIR *dirp, struct Mono_Posix_Syscall__Dirent *entry, void **result)
{
#ifdef MPH_USE_64_API
	struct dirent64 _entry;
#else
	struct dirent _entry;
#endif
	int r;

#ifdef MPH_USE_64_API
	r = readdir64_r (dirp, &_entry, (struct dirent64**) result);
#else
	r = readdir_r (dirp, &_entry, (struct dirent**) result);
#endif

	if (r == 0 && result != NULL) {
		copy_dirent (entry, &_entry);
	}

	return r;
}

G_END_DECLS

/*
 * vim: noexpandtab
 */