annotate libmlk-core/core/sys.c @ 258:f978fa0137ce

extern: provide libcompat
author David Demelier <markand@malikania.fr>
date Sat, 05 Dec 2020 15:57:02 +0100
parents d987a5fc4a3e
children 16be1ad3ddba
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
1 /*
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
2 * sys.c -- system routines
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
3 *
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
4 * Copyright (c) 2020 David Demelier <markand@malikania.fr>
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
5 *
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
6 * Permission to use, copy, modify, and/or distribute this software for any
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
7 * purpose with or without fee is hereby granted, provided that the above
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
8 * copyright notice and this permission notice appear in all copies.
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
9 *
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
17 */
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
18
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
19 #include "sysconfig.h"
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
20
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
21 #include <assert.h>
56
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
22 #include <stdio.h>
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
23 #include <stdlib.h>
84
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
24 #include <limits.h>
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
25
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
26 #if defined(_WIN32)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
27 # include <shlwapi.h>
255
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
28 # include <windows.h>
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
29 #else
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
30 # include <sys/stat.h>
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
31 # include <errno.h>
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
32 # include <string.h>
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
33 #endif
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
34
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
35 #include <SDL.h>
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
36 #include <SDL_image.h>
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
37 #include <SDL_mixer.h>
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
38 #include <SDL_ttf.h>
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
39
39
9d1421c09dfb core: add more utilities to improve code simplicity
David Demelier <markand@malikania.fr>
parents: 36
diff changeset
40 #include "error.h"
204
c9fbb822d269 core: allocate sound channels at startup
David Demelier <markand@malikania.fr>
parents: 169
diff changeset
41 #include "sound.h"
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
42 #include "sys.h"
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
43
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
44 static struct {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
45 char organization[128];
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
46 char name[128];
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
47 } info = {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
48 .organization = "fr.malikania",
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
49 .name = "molko"
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
50 };
36
798baf7f3ec0 core: implement sys_data* functions for Windows
David Demelier <markand@malikania.fr>
parents: 32
diff changeset
51
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
52 static const char *paths[] = {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
53 [SYS_DIR_BIN] = MOLKO_BINDIR,
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
54 [SYS_DIR_DATA] = MOLKO_DATADIR,
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
55 [SYS_DIR_LOCALE] = MOLKO_LOCALEDIR
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
56 };
36
798baf7f3ec0 core: implement sys_data* functions for Windows
David Demelier <markand@malikania.fr>
parents: 32
diff changeset
57
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
58 static const char *abspaths[] = {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
59 [SYS_DIR_BIN] = MOLKO_ABS_BINDIR,
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
60 [SYS_DIR_DATA] = MOLKO_ABS_DATADIR,
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
61 [SYS_DIR_LOCALE] = MOLKO_ABS_LOCALEDIR
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
62 };
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
63
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
64 #if defined(_WIN32)
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
65
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
66 static bool
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
67 is_absolute(const char *path)
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
68 {
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
69 return !PathIsRelativeA(path);
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
70 }
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
71
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
72 #else
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
73
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
74 static bool
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
75 is_absolute(const char *path)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
76 {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
77 return path[0] == '/';
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
78 }
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
79
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
80 #endif
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
81
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
82 static char *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
83 normalize(char *str)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
84 {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
85 for (char *p = str; *p; ++p)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
86 if (*p == '\\')
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
87 *p = '/';
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
88
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
89 return str;
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
90 }
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
91
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
92 bool
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
93 sys_init(const char *organization, const char *name)
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
94 {
56
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
95 #if defined(__MINGW64__)
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
96 /* On MinGW buffering leads to painful debugging. */
84
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
97 setbuf(stderr, NULL);
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
98 setbuf(stdout, NULL);
56
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
99 #endif
43d1102a367e core: disable buffering on MinGW
David Demelier <markand@malikania.fr>
parents: 52
diff changeset
100
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
101 strlcpy(info.organization, organization, sizeof (info.organization));
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
102 strlcpy(info.name, name, sizeof (info.name));
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
103
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
104 if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO) < 0)
169
eb0a7ab71023 misc: extreme cleanup, closes #2506
David Demelier <markand@malikania.fr>
parents: 121
diff changeset
105 return errorf("%s", SDL_GetError());
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
106 if (IMG_Init(IMG_INIT_PNG) != IMG_INIT_PNG)
169
eb0a7ab71023 misc: extreme cleanup, closes #2506
David Demelier <markand@malikania.fr>
parents: 121
diff changeset
107 return errorf("%s", SDL_GetError());
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
108 if (TTF_Init() < 0)
169
eb0a7ab71023 misc: extreme cleanup, closes #2506
David Demelier <markand@malikania.fr>
parents: 121
diff changeset
109 return errorf("%s", SDL_GetError());
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
110 if (Mix_Init(MIX_INIT_OGG) != MIX_INIT_OGG)
169
eb0a7ab71023 misc: extreme cleanup, closes #2506
David Demelier <markand@malikania.fr>
parents: 121
diff changeset
111 return errorf("%s", SDL_GetError());
103
68ce8e02061a sound: add basic sound API
David Demelier <markand@malikania.fr>
parents: 97
diff changeset
112 if (Mix_OpenAudio(44100, MIX_DEFAULT_FORMAT, 2, 4096) < 0)
169
eb0a7ab71023 misc: extreme cleanup, closes #2506
David Demelier <markand@malikania.fr>
parents: 121
diff changeset
113 return errorf("%s", SDL_GetError());
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
114
204
c9fbb822d269 core: allocate sound channels at startup
David Demelier <markand@malikania.fr>
parents: 169
diff changeset
115 Mix_AllocateChannels(SOUND_CHANNELS_MAX);
c9fbb822d269 core: allocate sound channels at startup
David Demelier <markand@malikania.fr>
parents: 169
diff changeset
116
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
117 return true;
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
118 }
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
119
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
120 static const char *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
121 absolute(const char *which)
31
80f008ce2079 core: add base dir
David Demelier <markand@malikania.fr>
parents: 23
diff changeset
122 {
84
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
123 static char path[PATH_MAX];
31
80f008ce2079 core: add base dir
David Demelier <markand@malikania.fr>
parents: 23
diff changeset
124
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
125 strlcpy(path, which, sizeof (path));
31
80f008ce2079 core: add base dir
David Demelier <markand@malikania.fr>
parents: 23
diff changeset
126
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
127 return normalize(path);
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
128 }
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
129
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
130 static const char *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
131 system_directory(enum sys_dir kind)
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
132 {
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
133 static char path[PATH_MAX];
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
134 static char ret[PATH_MAX];
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
135 char *base, *binsect;
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
136
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
137 /* 1. Get current binary directory. */
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
138 base = SDL_GetBasePath();
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
139
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
140 /*
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
141 * 2. Decompose the path to the given special directory by computing
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
142 * relative directory to it from where the binary is located.
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
143 *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
144 * Example:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
145 * PREFIX/bin/mlk
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
146 * PREFIX/share/molko
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
147 *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
148 * The path to the data is ../share/molko starting from the binary.
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
149 *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
150 * If path to binary is absolute we can't determine relative paths to
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
151 * any other directory and use the absolute one instead.
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
152 *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
153 * Also, on some platforms SDL_GetBasePath isn't implemented and returns
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
154 * NULL, in that case return the fallback to the installation prefix.
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
155 */
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
156 if (is_absolute(paths[SYS_DIR_BIN]) || is_absolute(paths[kind]) || !base)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
157 return absolute(abspaths[kind]);
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
158
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
159 /*
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
160 * 3. Put the base path into the path and remove the value of
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
161 * MOLKO_BINDIR.
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
162 *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
163 * Example:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
164 * from: /usr/local/bin
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
165 * to: /usr/local
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
166 */
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
167 strlcpy(path, base, sizeof (path));
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
168 SDL_free(base);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
169
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
170 if ((binsect = strstr(path, paths[SYS_DIR_BIN])))
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
171 *binsect = '\0';
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
172
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
173 /* 4. For data directories, we append the program name. */
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
174 if (kind == SYS_DIR_DATA)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
175 snprintf(ret, sizeof (ret), "%s%s/%s", path, paths[kind], info.name);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
176 else
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
177 snprintf(ret, sizeof (ret), "%s%s", path, paths[kind]);
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
178
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
179 return normalize(ret);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
180 }
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
181
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
182 static const char *
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
183 user_directory(enum sys_dir kind)
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
184 {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
185 /* Kept for future use. */
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
186 (void)kind;
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
187
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
188 static char path[PATH_MAX];
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
189 char *pref;
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
190
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
191 if ((pref = SDL_GetPrefPath(info.organization, info.name))) {
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
192 strlcpy(path, pref, sizeof (path));
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
193 SDL_free(pref);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
194 } else
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
195 strlcpy(path, "./", sizeof (path));
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
196
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
197 return NULL;
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
198 }
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
199
255
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
200 static bool
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
201 mkpath(const char *path)
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
202 {
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
203 #ifdef _WIN32
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
204 /* TODO: add error using the convenient FormatMessage function. */
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
205 if (!CreateDirectoryA(path, NULL) && GetLastError() != ERROR_ALREADY_EXISTS)
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
206 return errorf("unable to create directory: %s", path);
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
207 #else
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
208 if (mkdir(path, 0755) < 0 && errno != EEXIST)
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
209 return errorf("%s", strerror(errno));
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
210 #endif
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
211
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
212 return true;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
213 }
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
214
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
215 const char *
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
216 sys_dir(enum sys_dir kind)
32
91bc2329ab0c core: implement data directory access, closes #2454 @1h
David Demelier <markand@malikania.fr>
parents: 31
diff changeset
217 {
241
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
218 switch (kind) {
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
219 case SYS_DIR_BIN:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
220 case SYS_DIR_DATA:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
221 case SYS_DIR_LOCALE:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
222 return system_directory(kind);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
223 default:
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
224 return user_directory(kind);
76afe639fd72 misc: add support for NLS, closes #22510 @4h
David Demelier <markand@malikania.fr>
parents: 204
diff changeset
225 }
84
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
226 }
a6c2067709ce core: implement basic save routines, closes #2476 @2h
David Demelier <markand@malikania.fr>
parents: 59
diff changeset
227
255
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
228 bool
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
229 sys_mkdir(const char *directory)
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
230 {
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
231 char path[PATH_MAX], *p;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
232
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
233 /* Copy the directory to normalize and iterate over '/'. */
258
f978fa0137ce extern: provide libcompat
David Demelier <markand@malikania.fr>
parents: 255
diff changeset
234 strlcpy(path, directory, sizeof (path));
255
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
235 normalize(path);
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
236
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
237 #if defined(_WIN32)
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
238 /* Remove drive letter that we don't need. */
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
239 if ((p = strchr(path, ':')))
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
240 ++p;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
241 else
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
242 p = path;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
243 #else
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
244 p = path;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
245 #endif
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
246
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
247 for (p = p + 1; *p; ++p) {
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
248 if (*p == '/') {
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
249 *p = 0;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
250
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
251 if (!mkpath(path))
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
252 return false;
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
253
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
254 *p = '/';
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
255 }
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
256 }
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
257
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
258 return mkpath(path);
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
259 }
d987a5fc4a3e core: add sys_mkdir function
David Demelier <markand@malikania.fr>
parents: 243
diff changeset
260
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
261 void
97
58133933ea17 window: expose some data to avoid functions
David Demelier <markand@malikania.fr>
parents: 87
diff changeset
262 sys_finish(void)
23
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
263 {
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
264 Mix_Quit();
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
265 TTF_Quit();
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
266 IMG_Quit();
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
267 SDL_Quit();
bc9637a2601b core: add basic system routines
David Demelier <markand@malikania.fr>
parents:
diff changeset
268 }