#include <unistd.h>

#include "WINGsP.h"

#include "wconfig.h"

#include "X11/Xlocale.h"

extern void W_InitNotificationCenter(void);

struct W_Application WMApplication;

char *_WINGS_progname = NULL;

Bool W_ApplicationInitialized(void)
{
	return _WINGS_progname != NULL;
}

void WMInitializeApplication(char *applicationName, int *argc, char **argv)
{
	int i;

	assert(argc != NULL);
	assert(argv != NULL);
	assert(applicationName != NULL);

	setlocale(LC_ALL, "");

#ifdef I18N
	if (getenv("NLSPATH"))
		bindtextdomain("WINGs", getenv("NLSPATH"));
	else
		bindtextdomain("WINGs", LOCALEDIR);
	bind_textdomain_codeset("WINGs", "UTF-8");
#endif

	_WINGS_progname = argv[0];

	WMApplication.applicationName = wstrdup(applicationName);
	WMApplication.argc = *argc;

	WMApplication.argv = wmalloc((*argc + 1) * sizeof(char *));
	for (i = 0; i < *argc; i++) {
		WMApplication.argv[i] = wstrdup(argv[i]);
	}
	WMApplication.argv[i] = NULL;

	/* initialize notification center */
	W_InitNotificationCenter();
}

void WMSetResourcePath(char *path)
{
	if (WMApplication.resourcePath)
		wfree(WMApplication.resourcePath);
	WMApplication.resourcePath = wstrdup(path);
}

char *WMGetApplicationName()
{
	return WMApplication.applicationName;
}

static char *checkFile(char *path, char *folder, char *ext, char *resource)
{
	char *ret;
	int extralen;

	extralen = (ext ? strlen(ext) : 0) + (folder ? strlen(folder) : 0) + 4;
	ret = wmalloc(strlen(path) + strlen(resource) + extralen + 8);
	strcpy(ret, path);
	if (folder) {
		strcat(ret, "/");
		strcat(ret, folder);
	}
	if (ext) {
		strcat(ret, "/");
		strcat(ret, ext);
	}
	strcat(ret, "/");
	strcat(ret, resource);

	if (access(ret, F_OK) != 0) {
		wfree(ret);
		ret = NULL;
	}

	return ret;
}

char *WMPathForResourceOfType(char *resource, char *ext)
{
	char *path = NULL;
	char *tmp, *appdir;
	int i;

	/*
	 * Paths are searched in this order:
	 * - resourcePath/ext
	 * - argv[0]/ext
	 * - GNUSTEP_USER_ROOT/Applications/ApplicationName.app/ext
	 * - ~/GNUstep/Applications/ApplicationName.app/ext
	 * - GNUSTEP_LOCAL_ROOT/Applications/ApplicationName.app/ext
	 * - /usr/local/GNUstep/Applications/ApplicationName.app/ext
	 * - GNUSTEP_SYSTEM_ROOT/Applications/ApplicationName.app/ext
	 * - /usr/GNUstep/Applications/ApplicationName.app/ext
	 */

	if (WMApplication.resourcePath) {
		path = checkFile(WMApplication.resourcePath, NULL, ext, resource);
		if (path)
			return path;
	}

	if (WMApplication.argv[0]) {
		tmp = wstrdup(WMApplication.argv[0]);
		i = strlen(tmp);
		while (i > 0 && tmp[i] != '/')
			i--;
		tmp[i] = 0;
		if (i > 0) {
			path = checkFile(tmp, NULL, ext, resource);
		} else {
			path = NULL;
		}
		wfree(tmp);
		if (path)
			return path;
	}

	appdir = wmalloc(strlen(WMApplication.applicationName) + 20);
	sprintf(appdir, "Applications/%s.app", WMApplication.applicationName);

	if (getenv("GNUSTEP_USER_ROOT")) {
		path = checkFile(getenv("GNUSTEP_USER_ROOT"), appdir, ext, resource);
		if (path) {
			wfree(appdir);
			return path;
		}
	}

	tmp = wusergnusteppath();
	if (tmp) {
		path = checkFile(tmp, appdir, ext, resource);
		if (path) {
			wfree(appdir);
			return path;
		}
	}

	if (getenv("GNUSTEP_LOCAL_ROOT")) {
		path = checkFile(getenv("GNUSTEP_LOCAL_ROOT"), appdir, ext, resource);
		if (path) {
			wfree(appdir);
			return path;
		}
	}

	path = checkFile("/usr/local/GNUstep", appdir, ext, resource);
	if (path) {
		wfree(appdir);
		return path;
	}

	if (getenv("GNUSTEP_SYSTEM_ROOT")) {
		path = checkFile(getenv("GNUSTEP_SYSTEM_ROOT"), appdir, ext, resource);
		if (path) {
			wfree(appdir);
			return path;
		}
	}

	path = checkFile("/usr/GNUstep", appdir, ext, resource);
	if (path) {
		wfree(appdir);
		return path;
	}

	return NULL;
}