transmission/libtransmission/platform.c

667 lines
15 KiB
C

/*
* This file Copyright (C) 2009-2014 Mnemosyne LLC
*
* It may be used under the GNU GPL versions 2 or 3
* or any future license endorsed by Mnemosyne LLC.
*
*/
#define _XOPEN_SOURCE 600 /* needed for recursive locks. */
#ifndef __USE_UNIX98
#define __USE_UNIX98 /* some older Linuxes need it spelt out for them */
#endif
#include <stdlib.h>
#include <string.h>
#ifdef __HAIKU__
#include <limits.h> /* PATH_MAX */
#endif
#ifdef _WIN32
#include <process.h> /* _beginthreadex(), _endthreadex() */
#include <windows.h>
#include <shlobj.h> /* SHGetKnownFolderPath(), FOLDERID_... */
#else
#include <unistd.h> /* getuid() */
#ifdef BUILD_MAC_CLIENT
#include <CoreFoundation/CoreFoundation.h>
#endif
#ifdef __HAIKU__
#include <FindDirectory.h>
#endif
#include <pthread.h>
#endif
#include "transmission.h"
#include "file.h"
#include "list.h"
#include "log.h"
#include "platform.h"
#include "session.h"
#include "tr-assert.h"
#include "utils.h"
/***
**** THREADS
***/
#ifdef _WIN32
typedef DWORD tr_thread_id;
#else
typedef pthread_t tr_thread_id;
#endif
static tr_thread_id tr_getCurrentThread(void)
{
#ifdef _WIN32
return GetCurrentThreadId();
#else
return pthread_self();
#endif
}
static bool tr_areThreadsEqual(tr_thread_id a, tr_thread_id b)
{
#ifdef _WIN32
return a == b;
#else
return pthread_equal(a, b) != 0;
#endif
}
/** @brief portability wrapper around OS-dependent threads */
struct tr_thread
{
void (*func)(void*);
void* arg;
tr_thread_id thread;
#ifdef _WIN32
HANDLE thread_handle;
#endif
};
bool tr_amInThread(tr_thread const* t)
{
return tr_areThreadsEqual(tr_getCurrentThread(), t->thread);
}
#ifdef _WIN32
#define ThreadFuncReturnType unsigned WINAPI
#else
#define ThreadFuncReturnType void*
#endif
static ThreadFuncReturnType ThreadFunc(void* _t)
{
#ifndef _WIN32
pthread_detach(pthread_self());
#endif
tr_thread* t = _t;
t->func(t->arg);
tr_free(t);
#ifdef _WIN32
_endthreadex(0);
return 0;
#else
return NULL;
#endif
}
tr_thread* tr_threadNew(void (*func)(void*), void* arg)
{
tr_thread* t = tr_new0(tr_thread, 1);
t->func = func;
t->arg = arg;
#ifdef _WIN32
{
unsigned int id;
t->thread_handle = (HANDLE)_beginthreadex(NULL, 0, &ThreadFunc, t, 0, &id);
t->thread = (DWORD)id;
}
#else
pthread_create(&t->thread, NULL, (void* (*)(void*))ThreadFunc, t);
#endif
return t;
}
/***
**** LOCKS
***/
/** @brief portability wrapper around OS-dependent thread mutexes */
struct tr_lock
{
int depth;
#ifdef _WIN32
CRITICAL_SECTION lock;
DWORD lockThread;
#else
pthread_mutex_t lock;
pthread_t lockThread;
#endif
};
tr_lock* tr_lockNew(void)
{
tr_lock* l = tr_new0(tr_lock, 1);
#ifdef _WIN32
InitializeCriticalSection(&l->lock); /* supports recursion */
#else
pthread_mutexattr_t attr;
pthread_mutexattr_init(&attr);
pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE);
pthread_mutex_init(&l->lock, &attr);
#endif
return l;
}
void tr_lockFree(tr_lock* l)
{
#ifdef _WIN32
DeleteCriticalSection(&l->lock);
#else
pthread_mutex_destroy(&l->lock);
#endif
tr_free(l);
}
void tr_lockLock(tr_lock* l)
{
#ifdef _WIN32
EnterCriticalSection(&l->lock);
#else
pthread_mutex_lock(&l->lock);
#endif
TR_ASSERT(l->depth >= 0);
TR_ASSERT(l->depth == 0 || tr_areThreadsEqual(l->lockThread, tr_getCurrentThread()));
l->lockThread = tr_getCurrentThread();
++l->depth;
}
bool tr_lockHave(tr_lock const* l)
{
return l->depth > 0 && tr_areThreadsEqual(l->lockThread, tr_getCurrentThread());
}
void tr_lockUnlock(tr_lock* l)
{
TR_ASSERT(l->depth > 0);
TR_ASSERT(tr_areThreadsEqual(l->lockThread, tr_getCurrentThread()));
--l->depth;
TR_ASSERT(l->depth >= 0);
#ifdef _WIN32
LeaveCriticalSection(&l->lock);
#else
pthread_mutex_unlock(&l->lock);
#endif
}
/***
**** PATHS
***/
#ifndef _WIN32
#include <pwd.h>
#endif
#ifdef _WIN32
static char* win32_get_known_folder_ex(REFKNOWNFOLDERID folder_id, DWORD flags)
{
char* ret = NULL;
PWSTR path;
if (SHGetKnownFolderPath(folder_id, flags | KF_FLAG_DONT_UNEXPAND, NULL, &path) == S_OK)
{
ret = tr_win32_native_to_utf8(path, -1);
CoTaskMemFree(path);
}
return ret;
}
static char* win32_get_known_folder(REFKNOWNFOLDERID folder_id)
{
return win32_get_known_folder_ex(folder_id, KF_FLAG_DONT_VERIFY);
}
#endif
static char const* getHomeDir(void)
{
static char const* home = NULL;
if (home == NULL)
{
home = tr_env_get_string("HOME", NULL);
if (home == NULL)
{
#ifdef _WIN32
home = win32_get_known_folder(&FOLDERID_Profile);
#else
struct passwd pwent;
struct passwd* pw = NULL;
char buf[4096];
getpwuid_r(getuid(), &pwent, buf, sizeof buf, &pw);
if (pw != NULL)
{
home = tr_strdup(pw->pw_dir);
}
#endif
}
if (home == NULL)
{
home = tr_strdup("");
}
}
return home;
}
#if defined(__APPLE__) || defined(_WIN32)
#define RESUME_SUBDIR "Resume"
#define TORRENT_SUBDIR "Torrents"
#else
#define RESUME_SUBDIR "resume"
#define TORRENT_SUBDIR "torrents"
#endif
void tr_setConfigDir(tr_session* session, char const* configDir)
{
char* path;
session->configDir = tr_strdup(configDir);
path = tr_buildPath(configDir, RESUME_SUBDIR, NULL);
tr_sys_dir_create(path, TR_SYS_DIR_CREATE_PARENTS, 0777, NULL);
session->resumeDir = path;
path = tr_buildPath(configDir, TORRENT_SUBDIR, NULL);
tr_sys_dir_create(path, TR_SYS_DIR_CREATE_PARENTS, 0777, NULL);
session->torrentDir = path;
}
char const* tr_sessionGetConfigDir(tr_session const* session)
{
return session->configDir;
}
char const* tr_getTorrentDir(tr_session const* session)
{
return session->torrentDir;
}
char const* tr_getResumeDir(tr_session const* session)
{
return session->resumeDir;
}
char const* tr_getDefaultConfigDir(char const* appname)
{
static char const* s = NULL;
if (tr_str_is_empty(appname))
{
appname = "Transmission";
}
if (s == NULL)
{
s = tr_env_get_string("TRANSMISSION_HOME", NULL);
if (s == NULL)
{
#ifdef __APPLE__
s = tr_buildPath(getHomeDir(), "Library", "Application Support", appname, NULL);
#elif defined(_WIN32)
char* appdata = win32_get_known_folder(&FOLDERID_LocalAppData);
s = tr_buildPath(appdata, appname, NULL);
tr_free(appdata);
#elif defined(__HAIKU__)
char buf[PATH_MAX];
find_directory(B_USER_SETTINGS_DIRECTORY, -1, true, buf, sizeof(buf));
s = tr_buildPath(buf, appname, NULL);
#else
char* const xdg_config_home = tr_env_get_string("XDG_CONFIG_HOME", NULL);
if (xdg_config_home != NULL)
{
s = tr_buildPath(xdg_config_home, appname, NULL);
tr_free(xdg_config_home);
}
else
{
s = tr_buildPath(getHomeDir(), ".config", appname, NULL);
}
#endif
}
}
return s;
}
char const* tr_getDefaultDownloadDir(void)
{
static char const* user_dir = NULL;
if (user_dir == NULL)
{
char* config_home;
char* config_file;
char* content;
size_t content_len;
/* figure out where to look for user-dirs.dirs */
config_home = tr_env_get_string("XDG_CONFIG_HOME", NULL);
if (!tr_str_is_empty(config_home))
{
config_file = tr_buildPath(config_home, "user-dirs.dirs", NULL);
}
else
{
config_file = tr_buildPath(getHomeDir(), ".config", "user-dirs.dirs", NULL);
}
tr_free(config_home);
/* read in user-dirs.dirs and look for the download dir entry */
content = (char*)tr_loadFile(config_file, &content_len, NULL);
if (content != NULL && content_len > 0)
{
char const* key = "XDG_DOWNLOAD_DIR=\"";
char* line = strstr(content, key);
if (line != NULL)
{
char* value = line + strlen(key);
char* end = strchr(value, '"');
if (end != NULL)
{
*end = '\0';
if (strncmp(value, "$HOME/", 6) == 0)
{
user_dir = tr_buildPath(getHomeDir(), value + 6, NULL);
}
else if (strcmp(value, "$HOME") == 0)
{
user_dir = tr_strdup(getHomeDir());
}
else
{
user_dir = tr_strdup(value);
}
}
}
}
#ifdef _WIN32
if (user_dir == NULL)
{
user_dir = win32_get_known_folder(&FOLDERID_Downloads);
}
#endif
if (user_dir == NULL)
{
#ifdef __HAIKU__
user_dir = tr_buildPath(getHomeDir(), "Desktop", NULL);
#else
user_dir = tr_buildPath(getHomeDir(), "Downloads", NULL);
#endif
}
tr_free(content);
tr_free(config_file);
}
return user_dir;
}
/***
****
***/
static bool isWebClientDir(char const* path)
{
char* tmp = tr_buildPath(path, "index.html", NULL);
bool const ret = tr_sys_path_exists(tmp, NULL);
tr_logAddInfo(_("Searching for web interface file \"%s\""), tmp);
tr_free(tmp);
return ret;
}
char const* tr_getWebClientDir(tr_session const* session)
{
static char const* s = NULL;
if (s == NULL)
{
s = tr_env_get_string("CLUTCH_HOME", NULL);
if (s == NULL)
{
s = tr_env_get_string("TRANSMISSION_WEB_HOME", NULL);
}
if (s == NULL)
{
#ifdef BUILD_MAC_CLIENT /* on Mac, look in the Application Support folder first, then in the app bundle. */
/* Look in the Application Support folder */
s = tr_buildPath(tr_sessionGetConfigDir(session), "public_html", NULL);
if (!isWebClientDir(s))
{
tr_free(s);
CFURLRef appURL = CFBundleCopyBundleURL(CFBundleGetMainBundle());
CFStringRef appRef = CFURLCopyFileSystemPath(appURL, kCFURLPOSIXPathStyle);
CFIndex const appStringLength = CFStringGetMaximumSizeOfFileSystemRepresentation(appRef);
char* appString = tr_malloc(appStringLength);
bool const success = CFStringGetFileSystemRepresentation(appRef, appString, appStringLength);
TR_ASSERT(success);
CFRelease(appURL);
CFRelease(appRef);
/* Fallback to the app bundle */
s = tr_buildPath(appString, "Contents", "Resources", "public_html", NULL);
if (!isWebClientDir(s))
{
tr_free(s);
s = NULL;
}
tr_free(appString);
}
#elif defined(_WIN32)
TR_UNUSED(session);
/* Generally, Web interface should be stored in a Web subdir of
* calling executable dir. */
static REFKNOWNFOLDERID known_folder_ids[] = {
&FOLDERID_LocalAppData,
&FOLDERID_RoamingAppData,
&FOLDERID_ProgramData,
};
for (size_t i = 0; s == NULL && i < TR_N_ELEMENTS(known_folder_ids); ++i)
{
char* dir = win32_get_known_folder(known_folder_ids[i]);
s = tr_buildPath(dir, "Transmission", "Web", NULL);
tr_free(dir);
if (!isWebClientDir(s))
{
tr_free(s);
s = NULL;
}
}
if (s == NULL) /* check calling module place */
{
wchar_t wide_module_path[MAX_PATH];
char* module_path;
char* dir;
GetModuleFileNameW(NULL, wide_module_path, TR_N_ELEMENTS(wide_module_path));
module_path = tr_win32_native_to_utf8(wide_module_path, -1);
dir = tr_sys_path_dirname(module_path, NULL);
tr_free(module_path);
if (dir != NULL)
{
s = tr_buildPath(dir, "Web", NULL);
tr_free(dir);
if (!isWebClientDir(s))
{
tr_free(s);
s = NULL;
}
}
}
#else /* everyone else, follow the XDG spec */
TR_UNUSED(session);
tr_list* candidates = NULL;
char* tmp;
/* XDG_DATA_HOME should be the first in the list of candidates */
tmp = tr_env_get_string("XDG_DATA_HOME", NULL);
if (!tr_str_is_empty(tmp))
{
tr_list_append(&candidates, tmp);
}
else
{
char* dhome = tr_buildPath(getHomeDir(), ".local", "share", NULL);
tr_list_append(&candidates, dhome);
tr_free(tmp);
}
/* XDG_DATA_DIRS are the backup directories */
{
char const* const pkg = PACKAGE_DATA_DIR;
char* xdg = tr_env_get_string("XDG_DATA_DIRS", NULL);
char const* fallback = "/usr/local/share:/usr/share";
char* buf = tr_strdup_printf("%s:%s:%s", pkg, xdg != NULL ? xdg : "", fallback);
tr_free(xdg);
tmp = buf;
while (!tr_str_is_empty(tmp))
{
char const* end = strchr(tmp, ':');
if (end != NULL)
{
if (end - tmp > 1)
{
tr_list_append(&candidates, tr_strndup(tmp, (size_t)(end - tmp)));
}
tmp = (char*)end + 1;
}
else if (!tr_str_is_empty(tmp))
{
tr_list_append(&candidates, tr_strdup(tmp));
break;
}
}
tr_free(buf);
}
/* walk through the candidates & look for a match */
for (tr_list* l = candidates; l != NULL; l = l->next)
{
char* path = tr_buildPath(l->data, "transmission", "public_html", NULL);
bool const found = isWebClientDir(path);
if (found)
{
s = path;
break;
}
tr_free(path);
}
tr_list_free(&candidates, tr_free);
#endif
}
}
return s;
}
char* tr_getSessionIdDir(void)
{
#ifndef _WIN32
return tr_strdup("/tmp");
#else
char* program_data_dir = win32_get_known_folder_ex(&FOLDERID_ProgramData, KF_FLAG_CREATE);
char* result = tr_buildPath(program_data_dir, "Transmission", NULL);
tr_free(program_data_dir);
tr_sys_dir_create(result, 0, 0, NULL);
return result;
#endif
}