src/install.c

   1 #include "install.h"
   2 #include "main.h"
   3 #include "gettext.h"
   4
   5 #include <errno.h>
   6 #include <sys/types.h>
   7 #include <sys/stat.h>
   8 #include <fcntl.h>
   9 #include <zlib.h>
  10 #include <libtar.h>
  11
  12 static gzFile gzf = NULL;
  13
  14 #define gtk_msg(type, args...) \
  15 {                                                                        \
  16     GtkWidget *msgw;                                                     \
  17     msgw = gtk_message_dialog_new(GTK_WINDOW(mainwin),                   \
  18                                   GTK_DIALOG_DESTROY_WITH_PARENT |       \
  19                                   GTK_DIALOG_MODAL,                      \
  20                                   type,                                  \
  21                                   GTK_BUTTONS_OK,                        \
  22                                   args);                                 \
  23     gtk_dialog_run(GTK_DIALOG(msgw));                                    \
  24     gtk_widget_destroy(msgw);                                            \
  25 }
  26
  27 static int gzopen_frontend(const char *path, int oflags, int mode);
  28 static int gzclose_frontend(int nothing);
  29 static ssize_t gzread_frontend(int nothing, void *buf, size_t s);
  30 static ssize_t gzwrite_frontend(int nothing, const void *buf, size_t s);
  31 static gchar *get_theme_dir();
  32 static gboolean change_dir(const gchar *dir);
  33
  34 tartype_t funcs = {
  35     (openfunc_t) gzopen_frontend,
  36     (closefunc_t) gzclose_frontend,
  37     (readfunc_t) gzread_frontend,
  38     (writefunc_t) gzwrite_frontend
  39 };
  40
  41 static gchar *get_theme_dir()
  42 {
  43     gchar *dir;
  44     gint r;
  45
  46     dir = g_build_path(G_DIR_SEPARATOR_S, g_get_home_dir(), ".themes", NULL);
  47     r = mkdir(dir, 0777);
  48     if (r == -1 && errno != EEXIST) {
  49         gtk_msg(GTK_MESSAGE_ERROR,
  50                 _("Unable to create directory \"%s\": %s"),
  51                 dir, strerror(errno));
  52         g_free(dir);
  53         dir = NULL;
  54     }
  55
  56     return dir;
  57 }
  58
  59 static gboolean change_dir(const gchar *dir)
  60 {
  61     if (chdir(dest) == -1) {
  62         gtk_msg(GTK_MESSAGE_ERROR,
  63                 _("Unable to move to directory \"%s\": %s"),
  64                 dest, strerror(errno));
  65         return FALSE;
  66     }
  67     return TRUE;
  68 }
  69
  70 gboolean install_theme(char *path, char *theme)
  71 {
  72     TAR *t;
  73     gchar *dest;
  74     gint r;
  75     gchar *glob;
  76     gchar *curdir;
  77
  78     if (!(dest = get_theme_dir()))
  79         return FALSE;
  80
  81     curdir = g_get_current_dir();
  82     if (!change_dir(dest)) {
  83         g_free(curdir);
  84         return FALSE;
  85     }
  86
  87     if (tar_open(&t, path, &funcs, 0, O_RDONLY, TAR_GNU) == -1) {
  88         gtk_msg(GTK_MESSAGE_ERROR,
  89                 _("Unable to open the file \"%s\": %s"),
  90                 path, strerror(errno));
  91         chdir(curdir);
  92         g_free(curdir);
  93         return FALSE;
  94     }
  95
  96     glob = g_strdup_printf("%s/openbox-3/*", theme);
  97     r = tar_extract_glob(t, glob, dest);
  98     g_free(glob);
  99     tar_close(t);
 100
 101     if (r != 0) {
 102         gtk_msg(GTK_MESSAGE_ERROR,
 103                 _("Unable to extract the file \"%s\".\nIt does not appear to be a valid Openbox theme archive (in tar.gz format)."),
 104                 path, strerror(errno));
 105
 106         g_free(dest);
 107         chdir(curdir);
 108         g_free(curdir);
 109         return FALSE;
 110     }
 111
 112     gtk_msg(GTK_MESSAGE_INFO, _("%s was installed to %s"), theme, dest);
 113
 114     g_free(dest);
 115
 116     chdir(curdir);
 117     g_free(curdir);
 118
 119     return TRUE;
 120 }
 121
 122 static int gzopen_frontend(const char *path, int oflags, int mode)
 123 {
 124     int fd;
 125
 126     if ((fd = open(path, oflags, mode)) < 0) return -1;
 127     if (!(gzf = gzdopen(fd, "rb"))) return -1;
 128     return 1;
 129 }
 130
 131 static int gzclose_frontend(int nothing)
 132 {
 133     g_return_val_if_fail(gzf != NULL, 0);
 134     return gzclose(gzf);
 135 }
 136
 137 static ssize_t gzread_frontend(int nothing, void *buf, size_t s)
 138 {
 139     return gzread(gzf, buf, s);
 140 }
 141
 142 static ssize_t gzwrite_frontend(int nothing, const void *buf, size_t s)
 143 {
 144     return gzwrite(gzf, buf, s);
 145 }
 146