/*
- * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
- * Copyright (C) 1999-2012 Hiroyuki Yamamoto & The Claws Mail Team
+ * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
+ * Copyright (C) 1999-2015 Hiroyuki Yamamoto & The Claws Mail Team
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
- *
+ *
+ * The code of the g_utf8_substring function below is owned by
+ * Matthias Clasen <matthiasc@src.gnome.org>/<mclasen@redhat.com>
+ * and is got from GLIB 2.30: https://git.gnome.org/browse/glib/commit/
+ * ?h=glib-2-30&id=9eb65dd3ed5e1a9638595cbe10699c7606376511
+ *
+ * GLib 2.30 is licensed under GPL v2 or later and:
+ * Copyright (C) 1999 Tom Tromey
+ * Copyright (C) 2000 Red Hat, Inc.
+ *
+ * https://git.gnome.org/browse/glib/tree/glib/gutf8.c
+ * ?h=glib-2-30&id=9eb65dd3ed5e1a9638595cbe10699c7606376511
*/
#ifdef HAVE_CONFIG_H
#include "defs.h"
#include <glib.h>
+#include <gio/gio.h>
#include <glib/gi18n.h>
# include <w32lib.h>
#endif
-#ifdef MAEMO
-#include <libosso.h>
-#ifdef CHINOOK
-# include <tablet-browser-interface.h>
-#else
-# include <osso-browser-interface.h>
-#endif
-#endif
-
#include "utils.h"
#include "socket.h"
#include "../codeconv.h"
-#if !GLIB_CHECK_VERSION(2, 7, 0) && !defined(G_OS_UNIX)
+#if !defined(G_OS_UNIX)
gint g_chdir(const gchar *path)
{
#ifdef G_OS_WIN32
return open(filename, flags, mode);
#endif
}
-#endif /* GLIB_CHECK_VERSION && G_OS_UNIX */
+#endif /* G_OS_UNIX */
#ifdef G_OS_WIN32
}
#endif /* G_OS_WIN32 */
+GSList *slist_copy_deep(GSList *list, GCopyFunc func)
+{
+#if GLIB_CHECK_VERSION(2, 34, 0)
+ return g_slist_copy_deep(list, func, NULL);
+#else
+ GSList *res = g_slist_copy(list);
+ GSList *walk = res;
+ while (walk) {
+ walk->data = func(walk->data, NULL);
+ walk = walk->next;
+ }
+ return res;
+#endif
+}
+
void list_free_strings(GList *list)
{
list = g_list_first(list);
void slist_free_strings(GSList *list)
{
-#if GLIB_CHECK_VERSION(2,28,0)
- g_slist_free_full(list, (GDestroyNotify)g_free);
-#else
while (list != NULL) {
g_free(list->data);
list = list->next;
}
+}
+
+void slist_free_strings_full(GSList *list)
+{
+#if GLIB_CHECK_VERSION(2,28,0)
+ g_slist_free_full(list, (GDestroyNotify)g_free);
+#else
+ g_slist_foreach(list, (GFunc)g_free, NULL);
+ g_slist_free(list);
#endif
}
/* Similar to `strstr' but this function ignores the case of both strings. */
gchar *strcasestr(const gchar *haystack, const gchar *needle)
{
- register size_t haystack_len, needle_len;
+ size_t haystack_len = strlen(haystack);
+
+ return strncasestr(haystack, haystack_len, needle);
+}
+
+gchar *strncasestr(const gchar *haystack, gint haystack_len, const gchar *needle)
+{
+ register size_t needle_len;
- haystack_len = strlen(haystack);
needle_len = strlen(needle);
if (haystack_len < needle_len || needle_len == 0)
}
}
+/* Returns a newly allocated string with all quote_chr not at the beginning
+ or the end of str escaped with '\' or the given str if not required. */
+gchar *escape_internal_quotes(gchar *str, gchar quote_chr)
+{
+ register gchar *p, *q;
+ gchar *qstr;
+ int k = 0, l = 0;
+
+ if (str == NULL || *str == '\0')
+ return str;
+
+ /* search for unescaped quote_chr */
+ p = str;
+ if (*p == quote_chr)
+ ++p, ++l;
+ while (*p) {
+ if (*p == quote_chr && *(p - 1) != '\\' && *(p + 1) != '\0')
+ ++k;
+ ++p, ++l;
+ }
+ if (!k) /* nothing to escape */
+ return str;
+
+ /* unescaped quote_chr found */
+ qstr = g_malloc(l + k + 1);
+ p = str;
+ q = qstr;
+ if (*p == quote_chr) {
+ *q = quote_chr;
+ ++p, ++q;
+ }
+ while (*p) {
+ if (*p == quote_chr && *(p - 1) != '\\' && *(p + 1) != '\0')
+ *q++ = '\\';
+ *q++ = *p++;
+ }
+ *q = '\0';
+
+ return qstr;
+}
+
void eliminate_address_comment(gchar *str)
{
register gchar *srcp, *destp;
void extract_address(gchar *str)
{
+ cm_return_if_fail(str != NULL);
eliminate_address_comment(str);
if (strchr_with_skip_quote(str, '"', '<'))
extract_parenthesis_with_skip_quote(str, '"', '<', '>');
in_dquote = FALSE;
else if (!in_squote)
in_dquote = TRUE;
+ } else if (*haystack == '\\') {
+ haystack++;
+ haystack_len--;
}
haystack++;
const gchar *get_rc_dir(void)
{
- if (!claws_rc_dir)
+ if (!claws_rc_dir) {
claws_rc_dir = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S,
RC_DIR, NULL);
-
+ debug_print("using default rc_dir %s\n", claws_rc_dir);
+ }
return claws_rc_dir;
}
void set_rc_dir(const gchar *dir)
{
+ gchar *canonical_dir;
if (claws_rc_dir != NULL) {
g_print("Error: rc_dir already set\n");
} else {
- rc_dir_alt = TRUE;
- if (g_path_is_absolute(dir))
- claws_rc_dir = g_strdup(dir);
- else {
- claws_rc_dir = g_strconcat(g_get_current_dir(),
- G_DIR_SEPARATOR_S, dir, NULL);
+ int err = cm_canonicalize_filename(dir, &canonical_dir);
+ int len;
+
+ if (err) {
+ g_print("Error looking for %s: %d(%s)\n",
+ dir, -err, g_strerror(-err));
+ exit(0);
}
+ rc_dir_alt = TRUE;
+
+ claws_rc_dir = canonical_dir;
+
+ len = strlen(claws_rc_dir);
+ if (claws_rc_dir[len - 1] == G_DIR_SEPARATOR)
+ claws_rc_dir[len - 1] = '\0';
+
debug_print("set rc_dir to %s\n", claws_rc_dir);
if (!is_dir_exist(claws_rc_dir)) {
if (make_dir_hier(claws_rc_dir) != 0) {
g_print("Error: can't create %s\n",
claws_rc_dir);
+ exit(0);
}
}
}
return get_home_dir();
}
-#ifdef MAEMO
-const gchar *prefs_common_get_data_root(void);
-gchar *last_data_root = NULL;
-#endif
-
const gchar *get_news_cache_dir(void)
{
static gchar *news_cache_dir = NULL;
-#ifdef MAEMO
- const gchar *data_root = prefs_common_get_data_root();
- if (strcmp2(data_root, last_data_root)) {
- g_free(news_cache_dir);
- news_cache_dir = NULL;
- }
-#endif
if (!news_cache_dir)
-#ifndef MAEMO
news_cache_dir = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
NEWS_CACHE_DIR, NULL);
-#else
- {
- if (data_root) {
- news_cache_dir = g_strconcat(data_root, G_DIR_SEPARATOR_S,
- "Claws", G_DIR_SEPARATOR_S,
- g_get_user_name(), G_DIR_SEPARATOR_S,
- NEWS_CACHE_DIR, NULL);
- g_free(last_data_root);
- last_data_root = g_strdup(last_data_root);
- } else {
- news_cache_dir = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
- NEWS_CACHE_DIR, NULL);
- g_free(last_data_root);
- last_data_root = NULL;
- }
- }
-#endif
+
return news_cache_dir;
}
const gchar *get_imap_cache_dir(void)
{
static gchar *imap_cache_dir = NULL;
-#ifdef MAEMO
- const gchar *data_root = prefs_common_get_data_root();
- if (strcmp2(data_root, last_data_root)) {
- g_free(imap_cache_dir);
- imap_cache_dir = NULL;
- }
-#endif
if (!imap_cache_dir)
-#ifndef MAEMO
imap_cache_dir = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
IMAP_CACHE_DIR, NULL);
-#else
- {
- if (data_root) {
- imap_cache_dir = g_strconcat(data_root, G_DIR_SEPARATOR_S,
- "Claws", G_DIR_SEPARATOR_S,
- g_get_user_name(), G_DIR_SEPARATOR_S,
- IMAP_CACHE_DIR, NULL);
- g_free(last_data_root);
- last_data_root = g_strdup(last_data_root);
- } else {
- imap_cache_dir = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
- IMAP_CACHE_DIR, NULL);
- g_free(last_data_root);
- last_data_root = NULL;
- }
- }
-#endif
return imap_cache_dir;
}
if (gethostname(hostname, sizeof(hostname)) != 0) {
perror("gethostname");
- domain_name = "unknown";
+ domain_name = "localhost";
} else {
hostname[sizeof(hostname) - 1] = '\0';
if ((hp = my_gethostbyname(hostname)) == NULL) {
return domain_name;
#else
- return "unknown";
+ return "localhost";
#endif
}
gboolean dirent_is_regular_file(struct dirent *d)
{
-#if !defined(G_OS_WIN32) && !defined(MAEMO) && defined(HAVE_DIRENT_D_TYPE)
+#if !defined(G_OS_WIN32) && defined(HAVE_DIRENT_D_TYPE)
if (d->d_type == DT_REG)
return TRUE;
else if (d->d_type != DT_UNKNOWN)
if (first == last) {
/* Skip all the dir reading part. */
gchar *filename = g_strdup_printf("%s%s%u", dir, G_DIR_SEPARATOR_S, first);
+ if (is_dir_exist(filename)) {
+ /* a numbered directory with this name exists,
+ * remove the dot-file instead */
+ g_free(filename);
+ filename = g_strdup_printf("%s%s.%u", dir, G_DIR_SEPARATOR_S, first);
+ }
if (claws_unlink(filename) < 0) {
FILE_OP_ERROR(filename, "unlink");
g_free(filename);
while ((dir_name = g_dir_read_name(dp)) != NULL) {
file_no = to_number(dir_name);
if (file_no > 0 && first <= file_no && file_no <= last) {
- if (is_dir_exist(dir_name))
+ if (is_dir_exist(dir_name)) {
+ gchar *dot_file = g_strdup_printf(".%s", dir_name);
+ if (is_file_exist(dot_file) && claws_unlink(dot_file) < 0) {
+ FILE_OP_ERROR(dot_file, "unlink");
+ }
+ g_free(dot_file);
continue;
+ }
if (claws_unlink(dir_name) < 0)
FILE_OP_ERROR(dir_name, "unlink");
}
const gchar *dir_name;
gchar *prev_dir;
gint file_no;
+ GHashTable *wanted_files;
+ GSList *cur;
+
+ if (numberlist == NULL)
+ return 0;
prev_dir = g_get_current_dir();
return -1;
}
+ wanted_files = g_hash_table_new(g_direct_hash, g_direct_equal);
+ for (cur = numberlist; cur != NULL; cur = cur->next) {
+ /* numberlist->data is expected to be GINT_TO_POINTER */
+ g_hash_table_insert(wanted_files, cur->data, GINT_TO_POINTER(1));
+ }
+
while ((dir_name = g_dir_read_name(dp)) != NULL) {
file_no = to_number(dir_name);
- if (file_no > 0 && (g_slist_find(numberlist, GINT_TO_POINTER(file_no)) == NULL)) {
+ if (is_dir_exist(dir_name))
+ continue;
+ if (file_no > 0 && g_hash_table_lookup(wanted_files, GINT_TO_POINTER(file_no)) == NULL) {
debug_print("removing unwanted file %d from %s\n", file_no, dir);
- if (is_dir_exist(dir_name))
+ if (is_dir_exist(dir_name)) {
+ gchar *dot_file = g_strdup_printf(".%s", dir_name);
+ if (is_file_exist(dot_file) && claws_unlink(dot_file) < 0) {
+ FILE_OP_ERROR(dot_file, "unlink");
+ }
+ g_free(dot_file);
continue;
+ }
if (claws_unlink(dir_name) < 0)
FILE_OP_ERROR(dir_name, "unlink");
}
}
g_dir_close(dp);
+ g_hash_table_destroy(wanted_files);
if (g_chdir(prev_dir) < 0) {
FILE_OP_ERROR(prev_dir, "chdir");
#else
*filename = g_strdup_printf("%s%cclaws.XXXXXX", dir, G_DIR_SEPARATOR);
fd = mkstemp(*filename);
+ if (fd < 0)
+ return NULL;
#endif
return fdopen(fd, "w+");
}
return child_stdout;
}
-#ifndef MAEMO
+
static gint is_unchanged_uri_char(char c)
{
switch (c) {
}
encoded_uri[k] = 0;
}
-#endif
+
gint open_uri(const gchar *uri, const gchar *cmdline)
{
-#ifndef MAEMO
+
#ifndef G_OS_WIN32
gchar buf[BUFFSIZE];
gchar *p;
execute_command_line(buf, TRUE);
#else
ShellExecute(NULL, "open", uri, NULL, NULL, SW_SHOW);
-#endif
-#else
- extern osso_context_t *get_osso_context(void);
- osso_rpc_run_with_defaults(get_osso_context(), "osso_browser",
- OSSO_BROWSER_OPEN_NEW_WINDOW_REQ, NULL,
- DBUS_TYPE_STRING, uri, DBUS_TYPE_INVALID);
#endif
return 0;
}
path = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S, ".mailcap", NULL);
outpath = g_strconcat(get_home_dir(), G_DIR_SEPARATOR_S, ".mailcap.new", NULL);
FILE *fp = g_fopen(path, "rb");
- FILE *outfp = g_fopen(outpath, "wb");
+ FILE *outfp = NULL;
gchar buf[BUFFSIZE];
gboolean err = FALSE;
+ if (!fp) {
+ fp = g_fopen(path, "a");
+ if (!fp) {
+ g_warning("failed to create file %s\n", path);
+ g_free(path);
+ g_free(outpath);
+ return;
+ }
+ fp = g_freopen(path, "rb", fp);
+ if (!fp) {
+ g_warning("failed to reopen file %s\n", path);
+ g_free(path);
+ g_free(outpath);
+ return;
+ }
+ }
+
+ outfp = g_fopen(outpath, "wb");
if (!outfp) {
+ g_warning("failed to create file %s\n", outpath);
g_free(path);
g_free(outpath);
fclose(fp);
gint s_am_low_len = 0;
gint s_pm_low_len = 0;
-const gchar *def_loc_format = NULL;
-const gchar *date_loc_format = NULL;
-const gchar *time_loc_format = NULL;
-const gchar *time_am_pm = NULL;
-
static gboolean time_names_init_done = FALSE;
static void init_time_names(void)
{
int i = 0;
- daynames[0] = Q_("Complete day name for use by strftime|Sunday");
- daynames[1] = Q_("Complete day name for use by strftime|Monday");
- daynames[2] = Q_("Complete day name for use by strftime|Tuesday");
- daynames[3] = Q_("Complete day name for use by strftime|Wednesday");
- daynames[4] = Q_("Complete day name for use by strftime|Thursday");
- daynames[5] = Q_("Complete day name for use by strftime|Friday");
- daynames[6] = Q_("Complete day name for use by strftime|Saturday");
-
- monthnames[0] = Q_("Complete month name for use by strftime|January");
- monthnames[1] = Q_("Complete month name for use by strftime|February");
- monthnames[2] = Q_("Complete month name for use by strftime|March");
- monthnames[3] = Q_("Complete month name for use by strftime|April");
- monthnames[4] = Q_("Complete month name for use by strftime|May");
- monthnames[5] = Q_("Complete month name for use by strftime|June");
- monthnames[6] = Q_("Complete month name for use by strftime|July");
- monthnames[7] = Q_("Complete month name for use by strftime|August");
- monthnames[8] = Q_("Complete month name for use by strftime|September");
- monthnames[9] = Q_("Complete month name for use by strftime|October");
- monthnames[10] = Q_("Complete month name for use by strftime|November");
- monthnames[11] = Q_("Complete month name for use by strftime|December");
-
- s_daynames[0] = Q_("Abbr. day name for use by strftime|Sun");
- s_daynames[1] = Q_("Abbr. day name for use by strftime|Mon");
- s_daynames[2] = Q_("Abbr. day name for use by strftime|Tue");
- s_daynames[3] = Q_("Abbr. day name for use by strftime|Wed");
- s_daynames[4] = Q_("Abbr. day name for use by strftime|Thu");
- s_daynames[5] = Q_("Abbr. day name for use by strftime|Fri");
- s_daynames[6] = Q_("Abbr. day name for use by strftime|Sat");
+ daynames[0] = C_("Complete day name for use by strftime", "Sunday");
+ daynames[1] = C_("Complete day name for use by strftime", "Monday");
+ daynames[2] = C_("Complete day name for use by strftime", "Tuesday");
+ daynames[3] = C_("Complete day name for use by strftime", "Wednesday");
+ daynames[4] = C_("Complete day name for use by strftime", "Thursday");
+ daynames[5] = C_("Complete day name for use by strftime", "Friday");
+ daynames[6] = C_("Complete day name for use by strftime", "Saturday");
+
+ monthnames[0] = C_("Complete month name for use by strftime", "January");
+ monthnames[1] = C_("Complete month name for use by strftime", "February");
+ monthnames[2] = C_("Complete month name for use by strftime", "March");
+ monthnames[3] = C_("Complete month name for use by strftime", "April");
+ monthnames[4] = C_("Complete month name for use by strftime", "May");
+ monthnames[5] = C_("Complete month name for use by strftime", "June");
+ monthnames[6] = C_("Complete month name for use by strftime", "July");
+ monthnames[7] = C_("Complete month name for use by strftime", "August");
+ monthnames[8] = C_("Complete month name for use by strftime", "September");
+ monthnames[9] = C_("Complete month name for use by strftime", "October");
+ monthnames[10] = C_("Complete month name for use by strftime", "November");
+ monthnames[11] = C_("Complete month name for use by strftime", "December");
+
+ s_daynames[0] = C_("Abbr. day name for use by strftime", "Sun");
+ s_daynames[1] = C_("Abbr. day name for use by strftime", "Mon");
+ s_daynames[2] = C_("Abbr. day name for use by strftime", "Tue");
+ s_daynames[3] = C_("Abbr. day name for use by strftime", "Wed");
+ s_daynames[4] = C_("Abbr. day name for use by strftime", "Thu");
+ s_daynames[5] = C_("Abbr. day name for use by strftime", "Fri");
+ s_daynames[6] = C_("Abbr. day name for use by strftime", "Sat");
- s_monthnames[0] = Q_("Abbr. month name for use by strftime|Jan");
- s_monthnames[1] = Q_("Abbr. month name for use by strftime|Feb");
- s_monthnames[2] = Q_("Abbr. month name for use by strftime|Mar");
- s_monthnames[3] = Q_("Abbr. month name for use by strftime|Apr");
- s_monthnames[4] = Q_("Abbr. month name for use by strftime|May");
- s_monthnames[5] = Q_("Abbr. month name for use by strftime|Jun");
- s_monthnames[6] = Q_("Abbr. month name for use by strftime|Jul");
- s_monthnames[7] = Q_("Abbr. month name for use by strftime|Aug");
- s_monthnames[8] = Q_("Abbr. month name for use by strftime|Sep");
- s_monthnames[9] = Q_("Abbr. month name for use by strftime|Oct");
- s_monthnames[10] = Q_("Abbr. month name for use by strftime|Nov");
- s_monthnames[11] = Q_("Abbr. month name for use by strftime|Dec");
+ s_monthnames[0] = C_("Abbr. month name for use by strftime", "Jan");
+ s_monthnames[1] = C_("Abbr. month name for use by strftime", "Feb");
+ s_monthnames[2] = C_("Abbr. month name for use by strftime", "Mar");
+ s_monthnames[3] = C_("Abbr. month name for use by strftime", "Apr");
+ s_monthnames[4] = C_("Abbr. month name for use by strftime", "May");
+ s_monthnames[5] = C_("Abbr. month name for use by strftime", "Jun");
+ s_monthnames[6] = C_("Abbr. month name for use by strftime", "Jul");
+ s_monthnames[7] = C_("Abbr. month name for use by strftime", "Aug");
+ s_monthnames[8] = C_("Abbr. month name for use by strftime", "Sep");
+ s_monthnames[9] = C_("Abbr. month name for use by strftime", "Oct");
+ s_monthnames[10] = C_("Abbr. month name for use by strftime", "Nov");
+ s_monthnames[11] = C_("Abbr. month name for use by strftime", "Dec");
for (i = 0; i < 7; i++) {
daynames_len[i] = strlen(daynames[i]);
s_monthnames_len[i] = strlen(s_monthnames[i]);
}
- s_am_up = Q_("For use by strftime (morning)|AM");
- s_pm_up = Q_("For use by strftime (afternoon)|PM");
- s_am_low = Q_("For use by strftime (morning, lowercase)|am");
- s_pm_low = Q_("For use by strftime (afternoon, lowercase)|pm");
+ s_am_up = C_("For use by strftime (morning)", "AM");
+ s_pm_up = C_("For use by strftime (afternoon)", "PM");
+ s_am_low = C_("For use by strftime (morning, lowercase)", "am");
+ s_pm_low = C_("For use by strftime (afternoon, lowercase)", "pm");
s_am_up_len = strlen(s_am_up);
s_pm_up_len = strlen(s_pm_up);
s_am_low_len = strlen(s_am_low);
s_pm_low_len = strlen(s_pm_low);
-
- def_loc_format = Q_("For use by strftime (default date+time format)|%a %b %e %H:%M:%S %Y");
- date_loc_format = Q_("For use by strftime (default date format)|%m/%d/%y");
- time_loc_format = Q_("For use by strftime (default time format)|%H:%M:%S");
-
- time_am_pm = Q_("For use by strftime (default 12-hour time format)|%I:%M:%S %p");
time_names_init_done = TRUE;
}
strncpy2(curpos, monthnames[lt->tm_mon], buflen - total_done);
break;
case 'c':
- fast_strftime(subbuf, 64, def_loc_format, lt);
+ strftime(subbuf, 64, "%c", lt);
len = strlen(subbuf); CHECK_SIZE();
strncpy2(curpos, subbuf, buflen - total_done);
break;
}
break;
case 'r':
- fast_strftime(subbuf, 64, time_am_pm, lt);
+ strftime(subbuf, 64, "%r", lt);
len = strlen(subbuf); CHECK_SIZE();
strncpy2(curpos, subbuf, buflen - total_done);
break;
snprintf(curpos, buflen - total_done, "%d", lt->tm_wday);
break;
case 'x':
- fast_strftime(subbuf, 64, date_loc_format, lt);
+ strftime(subbuf, 64, "%x", lt);
len = strlen(subbuf); CHECK_SIZE();
strncpy2(curpos, subbuf, buflen - total_done);
break;
case 'X':
- fast_strftime(subbuf, 64, time_loc_format, lt);
+ strftime(subbuf, 64, "%X", lt);
len = strlen(subbuf); CHECK_SIZE();
strncpy2(curpos, subbuf, buflen - total_done);
break;
format++;
break;
default:
- if (format && *format)
- g_warning("format error (%c)", *format);
+ g_warning("format error (%c)", *format);
*curpos = '\0';
return total_done;
}
}
return g_unlink(filename);
}
+
+GMutex *cm_mutex_new(void) {
+#if GLIB_CHECK_VERSION(2,32,0)
+ GMutex *m = g_new0(GMutex, 1);
+ g_mutex_init(m);
+ return m;
+#else
+ return g_mutex_new();
+#endif
+}
+
+void cm_mutex_free(GMutex *mutex) {
+#if GLIB_CHECK_VERSION(2,32,0)
+ g_mutex_clear(mutex);
+ g_free(mutex);
+#else
+ g_mutex_free(mutex);
+#endif
+}
+
+static gchar *canonical_list_to_file(GSList *list)
+{
+ GString *result = g_string_new(NULL);
+ GSList *pathlist = g_slist_reverse(g_slist_copy(list));
+ GSList *cur;
+ gchar *str;
+
+#ifndef G_OS_WIN32
+ result = g_string_append(result, G_DIR_SEPARATOR_S);
+#else
+ if (pathlist->data) {
+ const gchar *root = (gchar *)pathlist->data;
+ if (root[0] != '\0' && g_ascii_isalpha(root[0]) &&
+ root[1] == ':') {
+ /* drive - don't prepend dir separator */
+ } else {
+ result = g_string_append(result, G_DIR_SEPARATOR_S);
+ }
+ }
+#endif
+
+ for (cur = pathlist; cur; cur = cur->next) {
+ result = g_string_append(result, (gchar *)cur->data);
+ if (cur->next)
+ result = g_string_append(result, G_DIR_SEPARATOR_S);
+ }
+ g_slist_free(pathlist);
+
+ str = result->str;
+ g_string_free(result, FALSE);
+
+ return str;
+}
+
+static GSList *cm_split_path(const gchar *filename, int depth)
+{
+ gchar **path_parts;
+ GSList *canonical_parts = NULL;
+ struct stat st;
+ int i;
+ gboolean follow_symlinks = TRUE;
+
+ if (depth > 32) {
+#ifndef G_OS_WIN32
+ errno = ELOOP;
+#else
+ errno = EINVAL; /* can't happen, no symlink handling */
+#endif
+ return NULL;
+ }
+
+ if (!g_path_is_absolute(filename)) {
+ errno =EINVAL;
+ return NULL;
+ }
+
+ path_parts = g_strsplit(filename, G_DIR_SEPARATOR_S, -1);
+
+ for (i = 0; path_parts[i] != NULL; i++) {
+ if (!strcmp(path_parts[i], ""))
+ continue;
+ if (!strcmp(path_parts[i], "."))
+ continue;
+ else if (!strcmp(path_parts[i], "..")) {
+ if (i == 0) {
+ errno =ENOTDIR;
+ return NULL;
+ }
+ else /* Remove the last inserted element */
+ canonical_parts =
+ g_slist_delete_link(canonical_parts,
+ canonical_parts);
+ } else {
+ gchar *tmp_path;
+
+ canonical_parts = g_slist_prepend(canonical_parts,
+ g_strdup(path_parts[i]));
+
+ tmp_path = canonical_list_to_file(canonical_parts);
+
+ if(g_stat(tmp_path, &st) < 0) {
+ if (errno == ENOENT) {
+ errno = 0;
+ follow_symlinks = FALSE;
+ }
+ if (errno != 0) {
+ g_free(tmp_path);
+ slist_free_strings_full(canonical_parts);
+ g_strfreev(path_parts);
+
+ return NULL;
+ }
+ }
+#ifndef G_OS_WIN32
+ if (follow_symlinks && g_file_test(tmp_path, G_FILE_TEST_IS_SYMLINK)) {
+ GError *error = NULL;
+ gchar *target = g_file_read_link(tmp_path, &error);
+
+ if (!g_path_is_absolute(target)) {
+ /* remove the last inserted element */
+ canonical_parts =
+ g_slist_delete_link(canonical_parts,
+ canonical_parts);
+ /* add the target */
+ canonical_parts = g_slist_prepend(canonical_parts,
+ g_strdup(target));
+ g_free(target);
+
+ /* and get the new target */
+ target = canonical_list_to_file(canonical_parts);
+ }
+
+ /* restart from absolute target */
+ slist_free_strings_full(canonical_parts);
+ canonical_parts = NULL;
+ if (!error)
+ canonical_parts = cm_split_path(target, depth + 1);
+ else
+ g_error_free(error);
+ if (canonical_parts == NULL) {
+ g_free(tmp_path);
+ g_strfreev(path_parts);
+ return NULL;
+ }
+ g_free(target);
+ }
+#endif
+ g_free(tmp_path);
+ }
+ }
+ g_strfreev(path_parts);
+ return canonical_parts;
+}
+
+/*
+ * Canonicalize a filename, resolving symlinks along the way.
+ * Returns a negative errno in case of error.
+ */
+int cm_canonicalize_filename(const gchar *filename, gchar **canonical_name) {
+ GSList *canonical_parts;
+ gboolean is_absolute;
+
+ if (filename == NULL)
+ return -EINVAL;
+ if (canonical_name == NULL)
+ return -EINVAL;
+ *canonical_name = NULL;
+
+ is_absolute = g_path_is_absolute(filename);
+ if (!is_absolute) {
+ /* Always work on absolute filenames. */
+ gchar *cur = g_get_current_dir();
+ gchar *absolute_filename = g_strconcat(cur, G_DIR_SEPARATOR_S,
+ filename, NULL);
+
+ canonical_parts = cm_split_path(absolute_filename, 0);
+ g_free(absolute_filename);
+ g_free(cur);
+ } else
+ canonical_parts = cm_split_path(filename, 0);
+
+ if (canonical_parts == NULL)
+ return -errno;
+
+ *canonical_name = canonical_list_to_file(canonical_parts);
+ slist_free_strings_full(canonical_parts);
+ return 0;
+}
+
+/* Returns a decoded base64 string, guaranteed to be null-terminated. */
+guchar *g_base64_decode_zero(const gchar *text, gsize *out_len)
+{
+ gchar *tmp = g_base64_decode(text, out_len);
+ gchar *out = g_strndup(tmp, *out_len);
+
+ g_free(tmp);
+
+ if (strlen(out) != *out_len) {
+ g_warning ("strlen(out) %d != *out_len %d", strlen(out), *out_len);
+ }
+
+ return out;
+}
+
+#if !GLIB_CHECK_VERSION(2, 30, 0)
+/**
+ * g_utf8_substring:
+ * @str: a UTF-8 encoded string
+ * @start_pos: a character offset within @str
+ * @end_pos: another character offset within @str
+ *
+ * Copies a substring out of a UTF-8 encoded string.
+ * The substring will contain @end_pos - @start_pos
+ * characters.
+ *
+ * Returns: a newly allocated copy of the requested
+ * substring. Free with g_free() when no longer needed.
+ *
+ * Since: GLIB 2.30
+ */
+gchar *
+g_utf8_substring (const gchar *str,
+ glong start_pos,
+ glong end_pos)
+{
+ gchar *start, *end, *out;
+
+ start = g_utf8_offset_to_pointer (str, start_pos);
+ end = g_utf8_offset_to_pointer (start, end_pos - start_pos);
+
+ out = g_malloc (end - start + 1);
+ memcpy (out, start, end - start);
+ out[end - start] = 0;
+
+ return out;
+}
+#endif