crypto/LPdir_unix.c

   1 /* $LP: LPlib/source/LPdir_unix.c,v 1.8 2004/07/19 16:34:39 _cvs_levitte Exp $ */
   2 /*
   3  * Copyright (c) 2004, Richard Levitte <richard@levitte.org>
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25  * SUCH DAMAGE.
  26  */
  27
  28 #include <stddef.h>
  29 #include <stdlib.h>
  30 #include <limits.h>
  31 #include <string.h>
  32 #include <sys/types.h>
  33 #include <dirent.h>
  34 #include <errno.h>
  35 #ifndef LPDIR_H
  36 #include "LPdir.h"
  37 #endif
  38
  39 #if defined(NAME_MAX) && NAME_MAX<255
  40 /* HP-UX offers 14 for NAME_MAX, which is far from enough */
  41 # undef NAME_MAX
  42 # define NAME_MAX 255
  43 #endif
  44
  45 struct LP_dir_context_st
  46 {
  47   DIR *dir;
  48   char entry_name[NAME_MAX+1];
  49 };
  50
  51 const char *LP_find_file(LP_DIR_CTX **ctx, const char *directory)
  52 {
  53   struct dirent *direntry = NULL;
  54
  55   if (ctx == NULL || directory == NULL)
  56     {
  57       errno = EINVAL;
  58       return 0;
  59     }
  60
  61   errno = 0;
  62   if (*ctx == NULL)
  63     {
  64       *ctx = (LP_DIR_CTX *)malloc(sizeof(LP_DIR_CTX));
  65       if (*ctx == NULL)
  66         {
  67           errno = ENOMEM;
  68           return 0;
  69         }
  70       memset(*ctx, '\0', sizeof(LP_DIR_CTX));
  71
  72       (*ctx)->dir = opendir(directory);
  73       if ((*ctx)->dir == NULL)
  74         {
  75           int save_errno = errno; /* Probably not needed, but I'm paranoid */
  76           free(*ctx);
  77           *ctx = NULL;
  78           errno = save_errno;
  79           return 0;
  80         }
  81     }
  82
  83   direntry = readdir((*ctx)->dir);
  84   if (direntry == NULL)
  85     {
  86       return 0;
  87     }
  88
  89   strncpy((*ctx)->entry_name, direntry->d_name, sizeof((*ctx)->entry_name) - 1);
  90   (*ctx)->entry_name[sizeof((*ctx)->entry_name) - 1] = '\0';
  91   return (*ctx)->entry_name;
  92 }
  93
  94 int LP_find_file_end(LP_DIR_CTX **ctx)
  95 {
  96   if (ctx != NULL && *ctx != NULL)
  97     {
  98       int ret = closedir((*ctx)->dir);
  99
 100       free(*ctx);
 101       switch (ret)
 102         {
 103         case 0:
 104           return 1;
 105         case -1:
 106           return 0;
 107         default:
 108           break;
 109         }
 110     }
 111   errno = EINVAL;
 112   return 0;
 113 }