support/pwd.c

   1 /*
   2  * <pwd.h> wrapper functions.
   3  *
   4  * Authors:
   5  *   Jonathan Pryor (jonpryor@vt.edu)
   6  *
   7  * Copyright (C) 2004-2005 Jonathan Pryor
   8  */
   9
  10 #include <pwd.h>
  11 #include <errno.h>
  12 #include <string.h>
  13 #include <stdio.h>
  14 #include <stdlib.h>
  15
  16 #include "map.h"
  17 #include "mph.h"
  18
  19 G_BEGIN_DECLS
  20
  21 static const mph_string_offset_t
  22 passwd_offsets[] = {
  23         MPH_STRING_OFFSET (struct passwd, pw_name,    MPH_STRING_OFFSET_PTR),
  24         MPH_STRING_OFFSET (struct passwd, pw_passwd,  MPH_STRING_OFFSET_PTR),
  25 #if HAVE_STRUCT_PASSWD_PW_GECOS
  26         MPH_STRING_OFFSET (struct passwd, pw_gecos,   MPH_STRING_OFFSET_PTR),
  27 #endif  /* def HAVE_STRUCT_PASSWD_PW_GECOS */
  28         MPH_STRING_OFFSET (struct passwd, pw_dir,     MPH_STRING_OFFSET_PTR),
  29         MPH_STRING_OFFSET (struct passwd, pw_shell,   MPH_STRING_OFFSET_PTR)
  30 };
  31
  32 static const mph_string_offset_t
  33 mph_passwd_offsets[] = {
  34         MPH_STRING_OFFSET (struct Mono_Posix_Syscall__Passwd, pw_name,    MPH_STRING_OFFSET_PTR),
  35         MPH_STRING_OFFSET (struct Mono_Posix_Syscall__Passwd, pw_passwd,  MPH_STRING_OFFSET_PTR),
  36 #if HAVE_STRUCT_PASSWD_PW_GECOS
  37         MPH_STRING_OFFSET (struct Mono_Posix_Syscall__Passwd, pw_gecos,   MPH_STRING_OFFSET_PTR),
  38 #endif  /* def HAVE_STRUCT_PASSWD_PW_GECOS */
  39         MPH_STRING_OFFSET (struct Mono_Posix_Syscall__Passwd, pw_dir,     MPH_STRING_OFFSET_PTR),
  40         MPH_STRING_OFFSET (struct Mono_Posix_Syscall__Passwd, pw_shell,   MPH_STRING_OFFSET_PTR)
  41 };
  42
  43 /*
  44  * Copy the native `passwd' structure to it's managed representation.
  45  *
  46  * To minimize separate mallocs, all the strings are allocated within the same
  47  * memory block (stored in _pw_buf_).
  48  */
  49 static int
  50 copy_passwd (struct Mono_Posix_Syscall__Passwd *to, struct passwd *from)
  51 {
  52         char *buf;
  53         buf = _mph_copy_structure_strings (to, mph_passwd_offsets,
  54                         from, passwd_offsets, sizeof(passwd_offsets)/sizeof(passwd_offsets[0]));
  55
  56         to->pw_uid    = from->pw_uid;
  57         to->pw_gid    = from->pw_gid;
  58
  59         to->_pw_buf_ = buf;
  60         if (buf == NULL) {
  61                 return -1;
  62         }
  63
  64         return 0;
  65 }
  66
  67 gint32
  68 Mono_Posix_Syscall_getpwnam (const char *name, struct Mono_Posix_Syscall__Passwd *pwbuf)
  69 {
  70         struct passwd *pw;
  71
  72         if (pwbuf == NULL) {
  73                 errno = EFAULT;
  74                 return -1;
  75         }
  76
  77         errno = 0;
  78         pw = getpwnam (name);
  79         if (pw == NULL)
  80                 return -1;
  81
  82         if (copy_passwd (pwbuf, pw) == -1) {
  83                 errno = ENOMEM;
  84                 return -1;
  85         }
  86         return 0;
  87 }
  88
  89 gint32
  90 Mono_Posix_Syscall_getpwuid (mph_uid_t uid, struct Mono_Posix_Syscall__Passwd *pwbuf)
  91 {
  92         struct passwd *pw;
  93
  94         if (pwbuf == NULL) {
  95                 errno = EFAULT;
  96                 return -1;
  97         }
  98
  99         errno = 0;
 100         pw = getpwuid (uid);
 101         if (pw == NULL) {
 102                 return -1;
 103         }
 104
 105         if (copy_passwd (pwbuf, pw) == -1) {
 106                 errno = ENOMEM;
 107                 return -1;
 108         }
 109         return 0;
 110 }
 111
 112 #ifdef HAVE_GETPWNAM_R
 113 gint32
 114 Mono_Posix_Syscall_getpwnam_r (const char *name,
 115         struct Mono_Posix_Syscall__Passwd *pwbuf,
 116         void **pwbufp)
 117 {
 118         char *buf, *buf2;
 119         size_t buflen;
 120         int r;
 121         struct passwd _pwbuf;
 122
 123         if (pwbuf == NULL) {
 124                 errno = EFAULT;
 125                 return -1;
 126         }
 127
 128         buf = buf2 = NULL;
 129         buflen = 2;
 130
 131         do {
 132                 buf2 = realloc (buf, buflen *= 2);
 133                 if (buf2 == NULL) {
 134                         free (buf);
 135                         errno = ENOMEM;
 136                         return -1;
 137                 }
 138                 buf = buf2;
 139                 errno = 0;
 140         } while ((r = getpwnam_r (name, &_pwbuf, buf, buflen, (struct passwd**) pwbufp)) &&
 141                         recheck_range (r));
 142
 143         if (r == 0 && !(*pwbufp))
 144                 /* On solaris, this function returns 0 even if the entry was not found */
 145                 r = errno = ENOENT;
 146
 147         if (r == 0 && copy_passwd (pwbuf, &_pwbuf) == -1)
 148                 r = errno = ENOMEM;
 149         free (buf);
 150
 151         return r;
 152 }
 153 #endif /* ndef HAVE_GETPWNAM_R */
 154
 155 #ifdef HAVE_GETPWUID_R
 156 gint32
 157 Mono_Posix_Syscall_getpwuid_r (mph_uid_t uid,
 158         struct Mono_Posix_Syscall__Passwd *pwbuf,
 159         void **pwbufp)
 160 {
 161         char *buf, *buf2;
 162         size_t buflen;
 163         int r;
 164         struct passwd _pwbuf;
 165
 166         if (pwbuf == NULL) {
 167                 errno = EFAULT;
 168                 return -1;
 169         }
 170
 171         buf = buf2 = NULL;
 172         buflen = 2;
 173
 174         do {
 175                 buf2 = realloc (buf, buflen *= 2);
 176                 if (buf2 == NULL) {
 177                         free (buf);
 178                         errno = ENOMEM;
 179                         return -1;
 180                 }
 181                 buf = buf2;
 182                 errno = 0;
 183         } while ((r = getpwuid_r (uid, &_pwbuf, buf, buflen, (struct passwd**) pwbufp)) &&
 184                         recheck_range (r));
 185
 186         if (r == 0 && copy_passwd (pwbuf, &_pwbuf) == -1)
 187                 r = errno = ENOMEM;
 188         free (buf);
 189
 190         return r;
 191 }
 192 #endif /* ndef HAVE_GETPWUID_R */
 193
 194 #if HAVE_GETPWENT
 195 gint32
 196 Mono_Posix_Syscall_getpwent (struct Mono_Posix_Syscall__Passwd *pwbuf)
 197 {
 198         struct passwd *pw;
 199
 200         if (pwbuf == NULL) {
 201                 errno = EFAULT;
 202                 return -1;
 203         }
 204
 205         errno = 0;
 206         pw = getpwent ();
 207         if (pw == NULL)
 208                 return -1;
 209
 210         if (copy_passwd (pwbuf, pw) == -1) {
 211                 errno = ENOMEM;
 212                 return -1;
 213         }
 214         return 0;
 215 }
 216 #endif  /* def HAVE_GETPWENT */
 217
 218 #ifdef HAVE_FGETPWENT
 219 gint32
 220 Mono_Posix_Syscall_fgetpwent (void *stream, struct Mono_Posix_Syscall__Passwd *pwbuf)
 221 {
 222         struct passwd *pw;
 223
 224         if (pwbuf == NULL) {
 225                 errno = EFAULT;
 226                 return -1;
 227         }
 228
 229         errno = 0;
 230         pw = fgetpwent ((FILE*) stream);
 231         if (pw == NULL)
 232                 return -1;
 233
 234         if (copy_passwd (pwbuf, pw) == -1) {
 235                 errno = ENOMEM;
 236                 return -1;
 237         }
 238         return 0;
 239 }
 240 #endif /* ndef HAVE_FGETPWENT */
 241
 242 #if HAVE_SETPWENT
 243 int
 244 Mono_Posix_Syscall_setpwent (void)
 245 {
 246         errno = 0;
 247         do {
 248                 setpwent ();
 249         } while (errno == EINTR);
 250         mph_return_if_val_in_list5(errno, EIO, EMFILE, ENFILE, ENOMEM, ERANGE);
 251         return 0;
 252 }
 253 #endif  /* def HAVE_SETPWENT */
 254
 255 #if HAVE_ENDPWENT
 256 int
 257 Mono_Posix_Syscall_endpwent (void)
 258 {
 259         errno = 0;
 260         endpwent ();
 261         if (errno == EIO)
 262                 return -1;
 263         return 0;
 264 }
 265 #endif  /* def HAVE_ENDPWENT */
 266
 267 G_END_DECLS
 268
 269 /*
 270  * vim: noexpandtab
 271  */