/**
* Reads the next file name from an open directory.
*
* @param dir The directory that is being read
*
* @return a UTF-8 string of the directory entry. Use free() to release it.
* If there are no more entries in the directory, NULL is returned.
* If an error occurs, errno is set and NULL is returned.
*/
char *vlc_readdir( DIR *dir )
{
/* Beware that readdir_r() assumes <buf> is large enough to hold the result
* dirent including the file name. A buffer overflow could occur otherwise.
* In particular, pathconf() and _POSIX_NAME_MAX cannot be used here. */
struct dirent *ent;
char *path = NULL;
/* In the implementation of Innotek LIBC, aka kLIBC on OS/2,
* fpathconf (_PC_NAME_MAX) is broken, and errno is set to EBADF.
* Moreover, d_name is not the last member of struct dirent.
* So just allocate as many as the size of struct dirent. */
#if 1
long len = sizeof (struct dirent);
#else
long len = fpathconf (dirfd (dir), _PC_NAME_MAX);
len += offsetof (struct dirent, d_name) + 1;
#endif
struct dirent *buf = malloc (len);
if (unlikely(buf == NULL))
return NULL;
int val = readdir_r (dir, buf, &ent);
if (val != 0)
errno = val;
else if (ent != NULL)
path = FromLocaleDup (ent->d_name);
free (buf);
return path;
}
static char *config_GetHomeDir (void)
{
const char *home = getenv ("HOME");
if (home == NULL)
home = "/tmp";
return FromLocaleDup (home);
}
static inline void MaybeFromLocaleRep (char **str)
{
char *const orig_str = *str;
if ((orig_str != NULL) && !IsUTF8 (orig_str))
{
*str = FromLocaleDup (orig_str);
free (orig_str);
}
}
/**
* Reads the next file name from an open directory.
*
* @param dir The directory that is being read
*
* @return a UTF-8 string of the directory entry. Use free() to release it.
* If there are no more entries in the directory, NULL is returned.
* If an error occurs, errno is set and NULL is returned.
*/
char *vlc_readdir( DIR *dir )
{
/* Beware that readdir_r() assumes <buf> is large enough to hold the result
* dirent including the file name. A buffer overflow could occur otherwise.
* In particular, pathconf() and _POSIX_NAME_MAX cannot be used here. */
struct dirent *ent;
char *path = NULL;
long len = fpathconf (dirfd (dir), _PC_NAME_MAX);
#if !defined(__OS2__) || !defined(__INNOTEK_LIBC__)
#ifdef NAME_MAX
/* POSIX says there shall we room for NAME_MAX bytes at all times */
if (/*len == -1 ||*/ len < NAME_MAX)
len = NAME_MAX;
#else
/* OS is broken. Lets assume there is no files left. */
if (len == -1)
return NULL;
#endif
len += offsetof (struct dirent, d_name) + 1;
#else /* __OS2__ && __INNOTEK_LIBC__ */
/* In the implementation of Innotek LIBC, aka kLIBC on OS/2,
* fpathconf (_PC_NAME_MAX) is broken, and d_name is not the last member
* of struct dirent.
* So just allocate as many as the size of struct dirent. */
len = sizeof (struct dirent);
#endif
struct dirent *buf = malloc (len);
if (unlikely(buf == NULL))
return NULL;
int val = readdir_r (dir, buf, &ent);
if (val != 0)
errno = val;
else if (ent != NULL)
#ifndef __APPLE__
path = FromLocaleDup (ent->d_name);
#else
path = FromCharset ("UTF-8-MAC", ent->d_name, strlen (ent->d_name));
#endif
free (buf);
return path;
}
static char *config_GetHomeDir (void)
{
/* 1/ Try $HOME */
const char *home = getenv ("HOME");
#if defined(HAVE_GETPWUID_R)
/* 2/ Try /etc/passwd */
char buf[sysconf (_SC_GETPW_R_SIZE_MAX)];
if (home == NULL)
{
struct passwd pw, *res;
if (!getpwuid_r (getuid (), &pw, buf, sizeof (buf), &res) && res)
home = pw.pw_dir;
}
#endif
if (!home)
return NULL;
return FromLocaleDup (home);
}
static char *config_GetTypeDir (const char *xdg_name)
{
const size_t namelen = strlen (xdg_name);
const char *home = getenv ("HOME");
const char *dir = getenv ("XDG_CONFIG_HOME");
const char *file = "user-dirs.dirs";
if (home == NULL)
return NULL;
if (dir == NULL)
{
dir = home;
file = ".config/user-dirs.dirs";
}
char *path;
if (asprintf (&path, "%s/%s", dir, file) == -1)
return NULL;
FILE *stream = fopen (path, "rt");
free (path);
path = NULL;
if (stream != NULL)
{
char *linebuf = NULL;
size_t linelen = 0;
while (getline (&linebuf, &linelen, stream) != -1)
{
char *ptr = linebuf;
ptr += strspn (ptr, " \t"); /* Skip whites */
if (strncmp (ptr, "XDG_", 4))
continue;
ptr += 4; /* Skip XDG_ */
if (strncmp (ptr, xdg_name, namelen))
continue;
ptr += namelen; /* Skip XDG type name */
if (strncmp (ptr, "_DIR", 4))
continue;
ptr += 4; /* Skip _DIR */
ptr += strspn (ptr, " \t"); /* Skip whites */
if (*ptr != '=')
continue;
ptr++; /* Skip equality sign */
ptr += strspn (ptr, " \t"); /* Skip whites */
if (*ptr != '"')
continue;
ptr++; /* Skip quote */
linelen -= ptr - linebuf;
char *out;
if (strncmp (ptr, "$HOME", 5))
{
path = malloc (linelen);
if (path == NULL)
continue;
out = path;
}
else
{ /* Prefix with $HOME */
const size_t homelen = strlen (home);
ptr += 5;
path = malloc (homelen + linelen - 5);
if (path == NULL)
continue;
memcpy (path, home, homelen);
out = path + homelen;
}
while (*ptr != '"')
{
if (*ptr == '\\')
ptr++;
if (*ptr == '\0')
{
free (path);
path = NULL;
continue;
}
*(out++) = *(ptr++);
}
*out = '\0';
break;
}
free (linebuf);
fclose (stream);
}
/* Default! */
if (path == NULL)
{
if (strcmp (xdg_name, "DESKTOP") == 0)
{
if (asprintf (&path, "%s/Desktop", home) == -1)
return NULL;
}
else
path = strdup (home);
}
char *ret = FromLocaleDup (path);
free (path);
return ret;
}
