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         while (*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                 cdir++;
 130         }
 131
 132         return list;
 133 }
 134
 135 void choices_free_list(GPtrArray *list)
 136 {
 137         guint   i;
 138
 139         g_return_if_fail(list != NULL);
 140
 141         for (i = 0; i < list->len; i++)
 142                 g_free(g_ptr_array_index(list, i));
 143
 144         g_ptr_array_free(list, TRUE);
 145 }
 146
 147 /* Get the pathname of a choices file to load. Eg:
 148  *
 149  * choices_find_path_load("menus", "ROX-Filer")
 150  *                              -> "/usr/local/share/Choices/ROX-Filer/menus".
 151  *
 152  * The return values may be NULL - use built-in defaults.
 153  * g_free() the result.
 154  */
 155 guchar *choices_find_path_load(const char *leaf, const char *dir)
 156 {
 157         gchar   **cdir = dir_list;
 158
 159         g_return_val_if_fail(dir_list != NULL, NULL);
 160
 161         while (*cdir)
 162         {
 163                 gchar   *path;
 164
 165                 path = g_strconcat(*cdir, "/", dir, "/", leaf, NULL);
 166
 167                 if (exists(path))
 168                         return path;
 169
 170                 g_free(path);
 171
 172                 cdir++;
 173         }
 174
 175         return NULL;
 176 }
 177
 178 /* Returns the pathname of a file to save to, or NULL if saving is
 179  * disabled. If 'create' is TRUE then intermediate directories will
 180  * be created (set this to FALSE if you just want to find out where
 181  * a saved file would go without actually altering the filesystem).
 182  *
 183  * g_free() the result.
 184  */
 185 guchar *choices_find_path_save(const char *leaf, const char *dir,
 186                                 gboolean create)
 187 {
 188         gchar   *path, *retval;
 189
 190         g_return_val_if_fail(dir_list != NULL, NULL);
 191
 192         if (saving_disabled)
 193                 return NULL;
 194
 195         if (create && !exists(dir_list[0]))
 196         {
 197                 if (mkdir(dir_list[0], 0777))
 198                         g_warning("mkdir(%s): %s\n", dir_list[0],
 199                                         g_strerror(errno));
 200         }
 201
 202         path = g_strconcat(dir_list[0], "/", dir, NULL);
 203         if (create && !exists(path))
 204         {
 205                 if (mkdir(path, 0777))
 206                         g_warning("mkdir(%s): %s\n", path, g_strerror(errno));
 207         }
 208
 209         retval = g_strconcat(path, "/", leaf, NULL);
 210         g_free(path);
 211
 212         return retval;
 213 }
 214
 215
 216 /****************************************************************
 217  *                      INTERNAL FUNCTIONS                      *
 218  ****************************************************************/
 219
 220
 221 /* Returns TRUE if the object exists, FALSE if it doesn't */
 222 static gboolean exists(char *path)
 223 {
 224         struct stat info;
 225
 226         return stat(path, &info) == 0;
 227 }