git.sur5r.net Git - openldap/blob - libraries/liblutil/passfile.c

   1 /* $OpenLDAP$ */
   2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   3  *
   4  * Copyright 1998-2013 The OpenLDAP Foundation.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted only as authorized by the OpenLDAP
   9  * Public License.
  10  *
  11  * A copy of this license is available in the file LICENSE in the
  12  * top-level directory of the distribution or, alternatively, at
  13  * <http://www.OpenLDAP.org/license.html>.
  14  */
  15
  16 #include "portable.h"
  17
  18 #include <stdio.h>
  19
  20 #include <ac/stdlib.h>
  21 #include <ac/ctype.h>
  22 #include <ac/string.h>
  23
  24 #ifdef HAVE_FSTAT
  25 #include <sys/types.h>
  26 #include <sys/stat.h>
  27 #endif /* HAVE_FSTAT */
  28
  29 #include <lber.h>
  30 #include <lutil.h>
  31
  32 /* Get a password from a file. */
  33 int
  34 lutil_get_filed_password(
  35         const char *filename,
  36         struct berval *passwd )
  37 {
  38         size_t nread, nleft, nr;
  39         FILE *f = fopen( filename, "r" );
  40
  41         if( f == NULL ) {
  42                 perror( filename );
  43                 return -1;
  44         }
  45
  46         passwd->bv_val = NULL;
  47         passwd->bv_len = 4096;
  48
  49 #ifdef HAVE_FSTAT
  50         {
  51                 struct stat sb;
  52                 if ( fstat( fileno( f ), &sb ) == 0 ) {
  53                         if( sb.st_mode & 006 ) {
  54                                 fprintf( stderr, _("Warning: Password file %s"
  55                                         " is publicly readable/writeable\n"),
  56                                         filename );
  57                         }
  58
  59                         if ( sb.st_size )
  60                                 passwd->bv_len = sb.st_size;
  61                 }
  62         }
  63 #endif /* HAVE_FSTAT */
  64
  65         passwd->bv_val = (char *) ber_memalloc( passwd->bv_len + 1 );
  66         if( passwd->bv_val == NULL ) {
  67                 perror( filename );
  68                 fclose( f );
  69                 return -1;
  70         }
  71
  72         nread = 0;
  73         nleft = passwd->bv_len;
  74         do {
  75                 if( nleft == 0 ) {
  76                         /* double the buffer size */
  77                         char *p = (char *) ber_memrealloc( passwd->bv_val,
  78                                 2 * passwd->bv_len + 1 );
  79                         if( p == NULL ) {
  80                                 ber_memfree( passwd->bv_val );
  81                                 passwd->bv_val = NULL;
  82                                 passwd->bv_len = 0;
  83                                 fclose( f );
  84                                 return -1;
  85                         }
  86                         nleft = passwd->bv_len;
  87                         passwd->bv_len *= 2;
  88                         passwd->bv_val = p;
  89                 }
  90
  91                 nr = fread( &passwd->bv_val[nread], 1, nleft, f );
  92
  93                 if( nr < nleft && ferror( f ) ) {
  94                         ber_memfree( passwd->bv_val );
  95                         passwd->bv_val = NULL;
  96                         passwd->bv_len = 0;
  97                         fclose( f );
  98                         return -1;
  99                 }
 100
 101                 nread += nr;
 102                 nleft -= nr;
 103         } while ( !feof(f) );
 104
 105         passwd->bv_len = nread;
 106         passwd->bv_val[nread] = '\0';
 107
 108         fclose( f );
 109         return 0;
 110 }