/*

* Copyright 2009-2021 Peter Kosyh <p.kosyh at gmail.com>

*

* Permission is hereby granted, free of charge, to any person

* obtaining a copy of this software and associated documentation files

* (the "Software"), to deal in the Software without restriction,

* including without limitation the rights to use, copy, modify, merge,

* publish, distribute, sublicense, and/or sell copies of the Software,

* and to permit persons to whom the Software is furnished to do so,

* subject to the following conditions:

*

* The above copyright notice and this permission notice shall be

* included in all copies or substantial portions of the Software.

*

* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,

* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND

* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE

* LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION

* OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION

* WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

*

*/

#include <limits.h>

#include <pwd.h>

#include <unistd.h>

#include <sys/stat.h>

#include <sys/types.h>

#include <stdio.h>

#include <errno.h>

#include <fcntl.h>

#include <string.h>

#include <stdlib.h>

#include <time.h>

#include "externals.h"

#include "internals.h"

static char save_path[PATH_MAX];

static char cfg_path[PATH_MAX];

static char local_games_path[PATH_MAX];

static char local_themes_path[PATH_MAX];

static char local_stead_path[PATH_MAX];

char *game_locale(void)

{

char *p;

char *s;

p = getenv("LANG");

if (!p || !(s = strdup(p)))

return NULL;

if ((p = strchr(s, '_')))

*p = 0;

return s;

}

char *game_tmp_path(void)

{

static time_t t = 0;

static char tmp[PATH_MAX]="/tmp/instead-games";

if (!t) {

t = time(NULL);

sprintf(tmp, "/tmp/instead-games-%lu", (unsigned long)t);

}

if (mkdir(tmp, S_IRWXU) && errno != EEXIST)

return NULL;

return tmp;

}

char *appdir(void)

{

static char dir[PATH_MAX] = "";

struct passwd *pw;

#ifdef _LOCAL_APPDATA

if (!appdata_sw) {

strcpy(dir, game_cwd);

strcat(dir, "/appdata");

}

#endif

if (appdata_sw)

strcpy(dir, appdata_sw);

if (dir[0] && !access(dir, W_OK))

return dir;

pw = getpwuid(getuid());

if (!pw)

return NULL;

snprintf(dir, sizeof(dir) - 1 , "%s/.instead", pw->pw_dir);

return dir;

}

char *game_local_games_path(int cr)

{

char *app = appdir();

if (!app)

return NULL;

strcpy(local_games_path, app);

if (cr) {

if (mkdir(local_games_path, S_IRWXU) && errno != EEXIST)

return NULL;

}

strcat(local_games_path,"/games");

if (cr) {

if (mkdir(local_games_path, S_IRWXU) && errno != EEXIST)

return NULL;

}

return local_games_path;

}

char *game_local_themes_path(void)

{

char *app = appdir();

if (!app)

return NULL;

snprintf(local_themes_path, sizeof(local_themes_path) - 1 , "%s/themes", app);

return local_themes_path;

}

char *instead_local_stead_path(void)

{

char *app = appdir();

if (!app)

return NULL;

snprintf(local_stead_path, sizeof(local_stead_path) - 1 , "%s/stead", app);

return local_stead_path;

}

char *game_cfg_path(void)

{

char *app = appdir();

struct passwd *pw;

if (app) {

snprintf(cfg_path, sizeof(cfg_path) - 1 , "%s/", app);

if (mkdir(cfg_path, S_IRWXU) == 0 || errno == EEXIST) {

snprintf(cfg_path, sizeof(cfg_path) - 1 , "%s/insteadrc", app);

return cfg_path;

}

}

pw = getpwuid(getuid());

if (!pw)

return NULL;

snprintf(cfg_path, sizeof(cfg_path) - 1 , "%s/.insteadrc", pw->pw_dir); /* at home */

return cfg_path;

}

char *game_save_path(int cr, int nr)

{

char *app = appdir();

if (!curgame_dir)

return NULL;

if (!access("saves", R_OK)) {

if (nr)

snprintf(save_path, sizeof(save_path) - 1, "saves/save%d", nr);

else

snprintf(save_path, sizeof(save_path) - 1, "saves/autosave");

return save_path;

}

if (!app)

return NULL;

snprintf(save_path, sizeof(save_path) - 1 , "%s/", app);

if (cr && mkdir(save_path, S_IRWXU) && errno != EEXIST)

return NULL;

snprintf(save_path, sizeof(save_path) - 1 , "%s/saves", app);

if (cr && mkdir(save_path, S_IRWXU) && errno != EEXIST)

return NULL;

snprintf(save_path, sizeof(save_path) - 1, "%s/saves/%s/", app, curgame_dir);

if (cr && mkdir(save_path, S_IRWXU) && errno != EEXIST)

return NULL;

if (nr)

snprintf(save_path, sizeof(save_path) - 1, "%s/saves/%s/save%d", app, curgame_dir, nr);

else

snprintf(save_path, sizeof(save_path) - 1, "%s/saves/%s/autosave", app, curgame_dir);

return save_path;

}

int debug_init(void)

{

return 0;

}

void debug_done()

{

}

char *sdl_path(char *p)

{

unix_path(p);

return p;

}