aboutsummaryrefslogtreecommitdiffstats
path: root/mail/glacier
ModeNameSize
-rw-r--r--Makefile523logstatsplainblame
-rw-r--r--distinfo62logstatsplainblame
-rw-r--r--pkg-comment30logstatsplainblame
-rw-r--r--pkg-descr213logstatsplainblame
-rw-r--r--pkg-plist12logstatsplainblame
003cff"> * * Copyright 2001 Ximian, Inc. (www.ximian.com) * * This program is free software; you can redistribute it and/or * modify it under the terms of version 2 of the GNU General Public * License as published by the Free Software Foundation. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public * License along with this program; if not, write to the * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. */ #ifdef HAVE_CONFIG_H #include <config.h> #endif #include <glib.h> #include <sys/stat.h> #include <sys/types.h> #include <stdlib.h> #include <string.h> #include <fcntl.h> #include <unistd.h> #include <dirent.h> #include <errno.h> #include <stdio.h> #include <time.h> #include <gal/util/e-util.h> #include "e-mktemp.h" #define d(x) /* define to put temporary files in ~/evolution/cache/tmp */ #define TEMP_HOME (1) /* how old things need to be to expire */ #define TEMP_EXPIRE (60*60*2) /* dont scan more often than this */ #define TEMP_SCAN (60) static int expire_dir_rec(const char *base, time_t now) { DIR *dir; struct dirent *d; GString *path; size_t len; struct stat st; int count = 0; d(printf("expire dir '%s'\n", base)); dir = opendir(base); if (dir == NULL) return 0; path = g_string_new(base); len = path->len; while ( (d = readdir(dir)) ) { if (strcmp(d->d_name, ".") == 0 || strcmp(d->d_name, "..") == 0) continue; g_string_truncate(path, len); g_string_append_printf(path, "/%s", d->d_name); d(printf("Checking '%s' for expiry\n", path->str)); if (stat(path->str, &st) == 0 && st.st_atime + TEMP_EXPIRE < now) { if (S_ISDIR(st.st_mode)) { if (expire_dir_rec(path->str, now) == 0) { d(printf("Removing dir '%s'\n", path->str)); rmdir(path->str); } else { count++; } } else if (unlink(path->str) == -1) { d(printf("expiry failed: %s\n", strerror(errno))); count++; } else { d(printf("expired %s\n", path->str)); } } else { count++; } } g_string_free(path, TRUE); closedir(dir); d(printf("expire dir '%s' %d remaining files\n", base, count)); return count; } static GString * get_dir (gboolean make) { GString *path; time_t now = time(0); static time_t last = 0; #ifdef TEMP_HOME path = g_string_new (g_get_home_dir()); g_string_append_printf(path, "/.evolution/cache/tmp"); if (make && e_mkdir_hier(path->str, 0777) == -1) { g_string_free(path, TRUE); path = NULL; } #else path = g_string_new("/tmp/evolution-"); g_string_append_printf (path, "%d", (int) getuid ()); if (make) { int ret; /* shoot now, ask questions later */ ret = mkdir (path->str, S_IRWXU); if (ret == -1) { if (errno == EEXIST) { struct stat st; if (stat (path->str, &st) == -1) { /* reset errno */ errno = EEXIST; g_string_free (path, TRUE); return NULL; } /* make sure this is a directory and belongs to us... */ if (!S_ISDIR (st.st_mode) || st.st_uid != getuid ()) { /* eek! this is bad... */ g_string_free (path, TRUE); return NULL; } } else { /* some other error...do not pass go, do not collect $200 */ g_string_free (path, TRUE); return NULL; } } } #endif d(printf("temp dir '%s'\n", path ? path->str : "(null)")); /* fire off an expirey attempt no more often than TEMP_SCAN seconds */ if (path && (last+TEMP_SCAN) < now) { last = now; expire_dir_rec(path->str, now); } return path; } char * e_mktemp (const char *template) { GString *path; char *ret; path = get_dir (TRUE); if (!path) return NULL; g_string_append_c (path, '/'); if (template) g_string_append (path, template); else g_string_append (path, "unknown-XXXXXX"); ret = mktemp (path->str); g_string_free(path, ret == NULL); return ret; } int e_mkstemp (const char *template) { GString *path; int fd; path = get_dir (TRUE); if (!path) return -1; g_string_append_c (path, '/'); if (template) g_string_append (path, template); else g_string_append (path, "unknown-XXXXXX"); fd = mkstemp (path->str); g_string_free(path, TRUE); return fd; } char * e_mkdtemp (const char *template) { GString *path; char *tmpdir; path = get_dir (TRUE); if (!path) return NULL; g_string_append_c (path, '/'); if (template) g_string_append (path, template); else g_string_append (path, "unknown-XXXXXX"); #ifdef HAVE_MKDTEMP tmpdir = mkdtemp (path->str); #else tmpdir = mktemp (path->str); if (tmpdir) { if (mkdir (tmpdir, S_IRWXU) == -1) tmpdir = NULL; } #endif g_string_free(path, tmpdir == NULL); return tmpdir; }