src/theme.c

   1 #include "theme.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 <unistd.h>
  10 #include <zlib.h>
  11 #include <libtar.h>
  12
  13 static gzFile gzf = NULL;
  14
  15 #define gtk_msg(type, args...) \
  16 {                                                                        \
  17     GtkWidget *msgw;                                                     \
  18     msgw = gtk_message_dialog_new(GTK_WINDOW(mainwin),                   \
  19                                   GTK_DIALOG_DESTROY_WITH_PARENT |       \
  20                                   GTK_DIALOG_MODAL,                      \
  21                                   type,                                  \
  22                                   GTK_BUTTONS_OK,                        \
  23                                   args);                                 \
  24     gtk_dialog_run(GTK_DIALOG(msgw));                                    \
  25     gtk_widget_destroy(msgw);                                            \
  26 }
  27
  28 static int gzopen_frontend(const char *path, int oflags, int mode);
  29 static int gzclose_frontend(int nothing);
  30 static ssize_t gzread_frontend(int nothing, void *buf, size_t s);
  31 static ssize_t gzwrite_frontend(int nothing, const void *buf, size_t s);
  32 static gchar *get_theme_dir();
  33 static gboolean change_dir(const gchar *dir);
  34 static gboolean install_theme_to(gchar *theme, gchar *file, gchar *to);
  35 static gchar* name_from_file(const gchar *path);
  36 static gchar* name_from_dir(const gchar *dir);
  37 static gboolean create_theme_archive(gchar *dir, gchar *to);
  38
  39 tartype_t funcs = {
  40     (openfunc_t) gzopen_frontend,
  41     (closefunc_t) gzclose_frontend,
  42     (readfunc_t) gzread_frontend,
  43     (writefunc_t) gzwrite_frontend
  44 };
  45
  46 gchar* theme_install(gchar *path)
  47 {
  48     gchar *dest;
  49     gchar *curdir;
  50     gchar *name;
  51
  52     if (!(dest = get_theme_dir()))
  53         return NULL;
  54
  55     curdir = g_get_current_dir();
  56     if (!change_dir(dest)) {
  57         g_free(curdir);
  58         return NULL;
  59     }
  60
  61     if (!(name = name_from_file(path)))
  62         return NULL;
  63
  64     if (install_theme_to(name, path, dest))
  65         gtk_msg(GTK_MESSAGE_INFO, _("\"%s\" was installed to %s"), name, dest);
  66
  67     g_free(dest);
  68
  69     change_dir(curdir);
  70     g_free(curdir);
  71
  72     return name;
  73 }
  74
  75 void theme_archive(gchar *path)
  76 {
  77     gchar *name;
  78     gchar *dest;
  79
  80     if (!(name = name_from_dir(path)))
  81         return;
  82
  83     {
  84         gchar *file;
  85         file = g_strdup_printf("%s.obt", name);
  86         dest = g_build_path(G_DIR_SEPARATOR_S, g_get_current_dir(), file);
  87         g_free(file);
  88     }
  89
  90     if (create_theme_archive(path, dest))
  91         gtk_msg(GTK_MESSAGE_INFO, _("\"%s\" was successfully created"),
  92                 dest);
  93
  94     g_free(dest);
  95     g_free(name);
  96 }
  97
  98 static gboolean create_theme_archive(gchar *dir, gchar *to)
  99 {
 100     TAR *t;
 101
 102     if (tar_open(&t, to, &funcs, 0, O_WRONLY, TAR_GNU) == -1) {
 103         gtk_msg(GTK_MESSAGE_ERROR,
 104                 _("Unable to create the file \"%s\": %s"),
 105                 to, strerror(errno));
 106         return;
 107     }
 108
 109     tar_close(t);
 110 }
 111
 112 static gchar *get_theme_dir()
 113 {
 114     gchar *dir;
 115     gint r;
 116
 117     dir = g_build_path(G_DIR_SEPARATOR_S, g_get_home_dir(), ".themes", NULL);
 118     r = mkdir(dir, 0777);
 119     if (r == -1 && errno != EEXIST) {
 120         gtk_msg(GTK_MESSAGE_ERROR,
 121                 _("Unable to create directory \"%s\": %s"),
 122                 dir, strerror(errno));
 123         g_free(dir);
 124         dir = NULL;
 125     }
 126
 127     return dir;
 128 }
 129
 130 static gchar* name_from_dir(const gchar *dir)
 131 {
 132     gchar *rc;
 133     struct stat st;
 134     gboolean r;
 135
 136     rc = g_build_path(G_DIR_SEPARATOR_S, dir, "openbox-3", "themerc");
 137
 138     r = (stat(rc, &st) == 0 && S_ISREG(st.st_mode));
 139     g_free(rc);
 140
 141     if (!r) {
 142         gtk_msg(GTK_MESSAGE_ERROR,
 143                 _("\"%s\" does not appear to be a valid Openbox theme directory"),
 144                 dir);
 145         return NULL;
 146     }
 147     return g_path_get_basename(dir);
 148 }
 149
 150 static gchar* name_from_file(const gchar *path)
 151 {
 152     /* decipher the theme name from the file name */
 153     gchar *fname = g_path_get_basename(path);
 154     gint len = strlen(fname);
 155     gchar *name = NULL;
 156
 157     if (len > 4 &&
 158         (fname[len-4] == '.' && fname[len-3] == 'o' &&
 159          fname[len-2] == 'b' && fname[len-1] == 't'))
 160     {
 161         fname[len-4] = '\0';
 162         name = strdup(fname);
 163         fname[len-4] = '.';
 164     }
 165
 166     if (name == NULL)
 167         gtk_msg(GTK_MESSAGE_ERROR,
 168                 _("Unable to determine the theme's name from \"%s\".  File name should be ThemeName.obt."), fname);
 169
 170     return name;
 171 }
 172
 173 static gboolean change_dir(const gchar *dir)
 174 {
 175     if (chdir(dir) == -1) {
 176         gtk_msg(GTK_MESSAGE_ERROR, _("Unable to move to directory \"%s\": %s"),
 177                 dir, strerror(errno));
 178         return FALSE;
 179     }
 180     return TRUE;
 181 }
 182
 183 static gboolean install_theme_to(gchar *theme, gchar *file, gchar *to)
 184 {
 185     TAR *t;
 186     gchar *glob;
 187     gint r;
 188
 189     if (tar_open(&t, file, &funcs, 0, O_RDONLY, TAR_GNU) == -1) {
 190         gtk_msg(GTK_MESSAGE_ERROR,
 191                 _("Unable to open the file \"%s\": %s"),
 192                 file, strerror(errno));
 193         return FALSE;
 194     }
 195
 196     glob = g_strdup_printf("%s/openbox-3/*", theme);
 197     r = tar_extract_glob(t, glob, to);
 198     g_free(glob);
 199
 200     tar_close(t);
 201
 202     if (r != 0)
 203         gtk_msg(GTK_MESSAGE_ERROR,
 204                 _("Unable to extract the file \"%s\".\nIt does not appear to be a valid Openbox theme archive (in tar.gz format)."),
 205                 file, strerror(errno));
 206
 207     return r == 0;
 208 }
 209
 210 static int gzopen_frontend(const char *path, int oflags, int mode)
 211 {
 212     int fd;
 213     const char *gzflags;
 214
 215     if (oflags & O_RDONLY)
 216         gzflags = "rb";
 217     else if (oflags & O_WRONLY)
 218         gzflags = "wb";
 219     else
 220         g_assert_not_reached();
 221
 222     if ((fd = open(path, oflags, mode)) < 0) return -1;
 223     if (!(gzf = gzdopen(fd, gzflags))) return -1;
 224     return 1;
 225 }
 226
 227 static int gzclose_frontend(int nothing)
 228 {
 229     g_return_val_if_fail(gzf != NULL, 0);
 230     return gzclose(gzf);
 231 }
 232
 233 static ssize_t gzread_frontend(int nothing, void *buf, size_t s)
 234 {
 235     return gzread(gzf, buf, s);
 236 }
 237
 238 static ssize_t gzwrite_frontend(int nothing, const void *buf, size_t s)
 239 {
 240     return gzwrite(gzf, buf, s);
 241 }
 242