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 static gboolean install_theme_to(gchar *theme, gchar *file, gchar *to);
  34
  35 tartype_t funcs = {
  36     (openfunc_t) gzopen_frontend,
  37     (closefunc_t) gzclose_frontend,
  38     (readfunc_t) gzread_frontend,
  39     (writefunc_t) gzwrite_frontend
  40 };
  41
  42 static gchar *get_theme_dir()
  43 {
  44     gchar *dir;
  45     gint r;
  46
  47     dir = g_build_path(G_DIR_SEPARATOR_S, g_get_home_dir(), ".themes", NULL);
  48     r = mkdir(dir, 0777);
  49     if (r == -1 && errno != EEXIST) {
  50         gtk_msg(GTK_MESSAGE_ERROR,
  51                 _("Unable to create directory \"%s\": %s"),
  52                 dir, strerror(errno));
  53         g_free(dir);
  54         dir = NULL;
  55     }
  56
  57     return dir;
  58 }
  59
  60 static gboolean change_dir(const gchar *dir)
  61 {
  62     if (chdir(dir) == -1) {
  63         gtk_msg(GTK_MESSAGE_ERROR, _("Unable to move to directory \"%s\": %s"),
  64                 dir, strerror(errno));
  65         return FALSE;
  66     }
  67     return TRUE;
  68 }
  69
  70 static gboolean install_theme_to(gchar *theme, gchar *file, gchar *to)
  71 {
  72     TAR *t;
  73     gchar *glob;
  74     gint r;
  75
  76     if (tar_open(&t, file, &funcs, 0, O_RDONLY, TAR_GNU) == -1) {
  77         gtk_msg(GTK_MESSAGE_ERROR,
  78                 _("Unable to open the file \"%s\": %s"),
  79                 file, strerror(errno));
  80         return FALSE;
  81     }
  82
  83     glob = g_strdup_printf("%s/openbox-3/*", theme);
  84     r = tar_extract_glob(t, glob, to);
  85     g_free(glob);
  86
  87     tar_close(t);
  88
  89     if (r != 0)
  90         gtk_msg(GTK_MESSAGE_ERROR,
  91                 _("Unable to extract the file \"%s\".\nIt does not appear to be a valid Openbox theme archive (in tar.gz format)."),
  92                 file, strerror(errno));
  93
  94     return r == 0;
  95 }
  96
  97 gboolean install_theme(gchar *path, gchar *theme)
  98 {
  99     gchar *dest;
 100     gchar *curdir;
 101
 102     if (!(dest = get_theme_dir()))
 103         return FALSE;
 104
 105     curdir = g_get_current_dir();
 106     if (!change_dir(dest)) {
 107         g_free(curdir);
 108         return FALSE;
 109     }
 110
 111     if (install_theme_to(theme, path, dest))
 112         gtk_msg(GTK_MESSAGE_INFO, _("%s was installed to %s"), theme, dest);
 113
 114     g_free(dest);
 115
 116     change_dir(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