ROX-Filer/src/choices.c

   1 /*
   2  * $Id$
   3  *
   4  * ROX-Filer, filer for the ROX desktop project
   5  * Copyright (C) 2002, the ROX-Filer team.
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the Free
   9  * Software Foundation; either version 2 of the License, or (at your option)
  10  * any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  15  * more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along with
  18  * this program; if not, write to the Free Software Foundation, Inc., 59 Temple
  19  * Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21 /* choices.c - code for handling loading and saving of user choices */
  22
  23 #include "config.h"
  24
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <sys/param.h>
  28 #include <fcntl.h>
  29 #include <errno.h>
  30
  31 #include "global.h"
  32
  33 #include "choices.h"
  34
  35 static gboolean saving_disabled = TRUE;
  36 static gchar **dir_list = NULL;
  37
  38 /* Static prototypes */
  39 static gboolean exists(char *path);
  40
  41
  42 /****************************************************************
  43  *                      EXTERNAL INTERFACE                      *
  44  ****************************************************************/
  45
  46
  47 /* Reads in CHOICESPATH and constructs the directory list table.
  48  * You must call this before using any other choices_* functions.
  49  *
  50  * If CHOICESPATH does not exist then a suitable default is used.
  51  */
  52 void choices_init(void)
  53 {
  54         char    *choices;
  55
  56         g_return_if_fail(dir_list == NULL);
  57
  58         choices = getenv("CHOICESPATH");
  59
  60         if (choices)
  61         {
  62                 if (*choices != ':' && *choices != '\0')
  63                         saving_disabled = FALSE;
  64
  65                 while (*choices == ':')
  66                         choices++;
  67
  68                 if (*choices == '\0')
  69                 {
  70                         dir_list = g_new(char *, 1);
  71                         dir_list[0] = NULL;
  72                 }
  73                 else
  74                         dir_list = g_strsplit(choices, ":", 0);
  75         }
  76         else
  77         {
  78                 saving_disabled = FALSE;
  79
  80                 dir_list = g_new(gchar *, 4);
  81                 dir_list[0] = g_strconcat(getenv("HOME"), "/Choices", NULL);
  82                 dir_list[1] = g_strdup("/usr/local/share/Choices");
  83                 dir_list[2] = g_strdup("/usr/share/Choices");
  84                 dir_list[3] = NULL;
  85         }
  86
  87 #if 0
  88         {
  89                 gchar   **cdir = dir_list;
  90
  91                 while (*cdir)
  92                 {
  93                         g_print("[ choices dir '%s' ]\n", *cdir);
  94                         cdir++;
  95                 }
  96
  97                 g_print("[ saving is %s ]\n", saving_disabled ? "disabled"
  98                                                               : "enabled");
  99         }
 100 #endif
 101 }
 102
 103 /* Returns an array of the directories in CHOICESPATH which contain
 104  * a subdirectory called 'dir'.
 105  *
 106  * Lower-indexed results should override higher-indexed ones.
 107  *
 108  * Free the list using choices_free_list().
 109  */
 110 GPtrArray *choices_list_dirs(char *dir)
 111 {
 112         GPtrArray       *list;
 113         gchar           **cdir = dir_list;
 114
 115         g_return_val_if_fail(dir_list != NULL, NULL);
 116
 117         list = g_ptr_array_new();
 118
 119         for (; *cdir; cdir++)
 120         {
 121                 guchar  *path;
 122
 123                 path = g_strconcat(*cdir, "/", dir, NULL);
 124                 if (exists(path))
 125                         g_ptr_array_add(list, path);
 126                 else
 127                         g_free(path);
 128         }
 129
 130         return list;
 131 }
 132
 133 void choices_free_list(GPtrArray *list)
 134 {
 135         guint   i;
 136
 137         g_return_if_fail(list != NULL);
 138
 139         for (i = 0; i < list->len; i++)
 140                 g_free(g_ptr_array_index(list, i));
 141
 142         g_ptr_array_free(list, TRUE);
 143 }
 144
 145 /* Get the pathname of a choices file to load. Eg:
 146  *
 147  * choices_find_path_load("menus", "ROX-Filer")
 148  *                              -> "/usr/local/share/Choices/ROX-Filer/menus".
 149  *
 150  * The return values may be NULL - use built-in defaults.
 151  * g_free() the result.
 152  */
 153 guchar *choices_find_path_load(const char *leaf, const char *dir)
 154 {
 155         gchar   **cdir = dir_list;
 156
 157         g_return_val_if_fail(dir_list != NULL, NULL);
 158
 159         for (; *cdir; cdir++)
 160         {
 161                 gchar   *path;
 162
 163                 path = g_strconcat(*cdir, "/", dir, "/", leaf, NULL);
 164
 165                 if (exists(path))
 166                         return path;
 167
 168                 g_free(path);
 169         }
 170
 171         return NULL;
 172 }
 173
 174 /* Returns the pathname of a file to save to, or NULL if saving is
 175  * disabled. If 'create' is TRUE then intermediate directories will
 176  * be created (set this to FALSE if you just want to find out where
 177  * a saved file would go without actually altering the filesystem).
 178  *
 179  * g_free() the result.
 180  */
 181 guchar *choices_find_path_save(const char *leaf, const char *dir,
 182                                 gboolean create)
 183 {
 184         gchar   *path, *retval;
 185
 186         g_return_val_if_fail(dir_list != NULL, NULL);
 187
 188         if (saving_disabled)
 189                 return NULL;
 190
 191         if (create && !exists(dir_list[0]))
 192         {
 193                 if (mkdir(dir_list[0], 0777))
 194                         g_warning("mkdir(%s): %s\n", dir_list[0],
 195                                         g_strerror(errno));
 196         }
 197
 198         path = g_strconcat(dir_list[0], "/", dir, NULL);
 199         if (create && !exists(path))
 200         {
 201                 if (mkdir(path, 0777))
 202                         g_warning("mkdir(%s): %s\n", path, g_strerror(errno));
 203         }
 204
 205         retval = g_strconcat(path, "/", leaf, NULL);
 206         g_free(path);
 207
 208         return retval;
 209 }
 210
 211
 212 /****************************************************************
 213  *                      INTERNAL FUNCTIONS                      *
 214  ****************************************************************/
 215
 216
 217 /* Returns TRUE if the object exists, FALSE if it doesn't */
 218 static gboolean exists(char *path)
 219 {
 220         struct stat info;
 221
 222         return stat(path, &info) == 0;
 223 }