/*

 * Unfortunately, the behavior this module has inherited is not one

 * of "get me information about file X or directory Y", but "tell me

 * what calling 'new File(X)' would do in Java".  This includes

 * nonsense like manufacturing correct fake data for nonexistent

 * files.

 *

 * This sorely needs to be ripped out and replaced with a sane

 * interface.

 */

#include <limits.h>

empty_file(data_t *data, const char *apath, const char *cpath)

	struct_set(data, "absolutePath", data_new_string(apath, lt_copy));

	struct_set(data, "canonicalPath", data_new_string(cpath, lt_copy));

	struct_set(data, "canonical", data_new_boolean(B_TRUE));

	struct_set(data, "baseName", data_new_string("", lt_copy));

	struct_set(data, "exists", data_new_boolean(B_FALSE));

	struct_set(data, "readable", data_new_boolean(B_FALSE));

	struct_set(data, "writable", data_new_boolean(B_FALSE));

	struct_set(data, "hidden", data_new_boolean(B_FALSE));

	struct_set(data, "directory", data_new_boolean(B_FALSE));

	struct_set(data, "file", data_new_boolean(B_FALSE));

	struct_set(data, "lastModified", data_new_time(0));

	struct_set(data, "length", data_new_long(0));

	struct_set(data, "freeSpace", data_new_long(0));

	struct_set(data, "totalSpace", data_new_long(0));

	struct_set(data, "usableSpace", data_new_long(0));

	return (data_purify(data));

}

static data_t *

read_file(const char *path, const char *file)

{

	struct stat64 st;

	char apath[PATH_MAX] = "";

	char cpath[PATH_MAX] = "";

	const char *name = file != NULL ? file : path;

	data_t *data = data_new_struct(&t__FileSnapshot);

	struct_set(data, "path", data_new_string(name, lt_copy));

	struct_set(data, "absolute", data_new_boolean(name[0] == '/'));

		if (getcwd(apath, PATH_MAX) == NULL) {

			data_free(data);

			return (NULL);

		}

		if (apath[1] != '\0')

			strlcat(apath, "/", PATH_MAX);

		strlcat(apath, path, PATH_MAX);

		strlcpy(apath, path, PATH_MAX);

	if (resolvepath(apath, cpath, PATH_MAX) == -1 ||

	    stat64(path, &st) == -1)

		return (empty_file(data, apath, apath));

	struct_set(data, "absolutePath", data_new_string(apath, lt_copy));

	struct_set(data, "canonicalPath", data_new_string(cpath, lt_copy));

	struct_set(data, "canonical",

	    data_new_boolean(strcmp(apath, cpath) == 0));

	struct_set(data, "baseName", data_new_string(basename(apath), lt_copy));

	struct_set(data, "exists", data_new_boolean(B_TRUE));

	struct_set(data, "readable", data_new_boolean(access(path, R_OK) == 0));

	struct_set(data, "writable", data_new_boolean(access(path, W_OK) == 0));

	struct_set(data, "hidden", data_new_boolean(B_FALSE));

	struct_set(data, "directory", data_new_boolean(S_ISDIR(st.st_mode)));

	struct_set(data, "file", data_new_boolean(S_ISREG(st.st_mode)));

	struct_set(data, "lastModified", data_new_time(st.st_mtime));

	struct_set(data, "length", data_new_long(st.st_size));

	struct_set(data, "freeSpace", data_new_long(0));

	struct_set(data, "totalSpace", data_new_long(0));

	struct_set(data, "usableSpace", data_new_long(0));

	return (data_purify(data));

	array_add(result, read_file("/", NULL));

	*data = data_purify(result);

	*ret = read_file(args[0]->d_data.string, NULL);

		char buf[PATH_MAX];

		snprintf(buf, PATH_MAX, "%.*s/%s", len, path, ent->d_name);

		data_t *file = read_file(buf, NULL);

	(void) closedir(d);

	*ret = data_purify(result);