Home | History | Annotate | Line # | Download | only in src 
      1 /* GNU gettext - internationalization aids
      2    Copyright (C) 1996, 1998, 2000-2002 Free Software Foundation, Inc.
      3 
      4    This file was written by Peter Miller <millerp (at) canb.auug.org.au>
      5 
      6    This program is free software; you can redistribute it and/or modify
      7    it under the terms of the GNU General Public License as published by
      8    the Free Software Foundation; either version 2, or (at your option)
      9    any later version.
     10 
     11    This program is distributed in the hope that it will be useful,
     12    but WITHOUT ANY WARRANTY; without even the implied warranty of
     13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     14    GNU General Public License for more details.
     15 
     16    You should have received a copy of the GNU General Public License
     17    along with this program; if not, write to the Free Software Foundation,
     18    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
     19 
     20 
     21 #ifdef HAVE_CONFIG_H
     22 #include "config.h"
     23 #endif
     24 
     25 /* Specification.  */
     26 #include "dir-list.h"
     27 
     28 #include <stddef.h>
     29 #include <stdlib.h>
     30 
     31 #include "str-list.h"
     32 
     33 static string_list_ty *directory /* = NULL */;
     34 
     35 
     36 /* Append a directory to the end of the list of directories.  */
     37 void
     38 dir_list_append (const char *s)
     39 {
     40   if (directory == NULL)
     41     directory = string_list_alloc ();
     42   string_list_append_unique (directory, s);
     43 }
     44 
     45 
     46 /* Return the nth directory, or NULL of n is out of range.  */
     47 const char *
     48 dir_list_nth (int n)
     49 {
     50   /* The default value of the list consists of the single directory ".".  */
     51   if (directory == NULL)
     52     dir_list_append (".");
     53 
     54   if (n < 0 || n >= directory->nitems)
     55     return NULL;
     56   return directory->item[n];
     57 }
     58 
     59 
     60 /* Return the current list of directories, for later use with dir_list_restore.
     61    Reset the list to empty.  */
     62 void *
     63 dir_list_save_reset ()
     64 {
     65   void *saved_value = directory;
     66 
     67   directory = NULL;
     68   return saved_value;
     69 }
     70 
     71 
     72 /* Restore a previously saved list of directories.  */
     73 void
     74 dir_list_restore (void *saved_value)
     75 {
     76   /* Don't free the contained strings, because they may have been returned
     77      by dir_list_nth and may still be in use.  */
     78   if (directory != NULL)
     79     {
     80       if (directory->item != NULL)
     81 	free (directory->item);
     82       free (directory);
     83     }
     84 
     85   directory = saved_value;
     86 }
     87