winsup/cygwin/passwd.cc

   1 /* passwd.cc: getpwnam () and friends
   2
   3    Copyright 1996, 1997, 1998, 2001, 2002, 2003, 2007, 2008, 2009 Red Hat, Inc.
   4
   5 This file is part of Cygwin.
   6
   7 This software is a copyrighted work licensed under the terms of the
   8 Cygwin license.  Please consult the file "CYGWIN_LICENSE" for
   9 details. */
  10
  11 #include "winsup.h"
  12 #include <stdlib.h>
  13 #include <stdio.h>
  14 #include "cygerrno.h"
  15 #include "security.h"
  16 #include "path.h"
  17 #include "fhandler.h"
  18 #include "dtable.h"
  19 #include "pinfo.h"
  20 #include "cygheap.h"
  21 #include "pwdgrp.h"
  22 #include "shared_info.h"
  23
  24 /* Read /etc/passwd only once for better performance.  This is done
  25    on the first call that needs information from it. */
  26
  27 passwd *passwd_buf;
  28 static pwdgrp pr (passwd_buf);
  29
  30 /* Parse /etc/passwd line into passwd structure. */
  31 bool
  32 pwdgrp::parse_passwd ()
  33 {
  34 # define res (*passwd_buf)[curr_lines]
  35   res.pw_name = next_str (':');
  36   res.pw_passwd = next_str (':');
  37   if (!next_num (res.pw_uid))
  38     return false;
  39   if (!next_num (res.pw_gid))
  40     return false;
  41   res.pw_comment = NULL;
  42   res.pw_gecos = next_str (':');
  43   res.pw_dir =  next_str (':');
  44   res.pw_shell = next_str (':');
  45   return true;
  46 # undef res
  47 }
  48
  49 /* Read in /etc/passwd and save contents in the password cache.
  50    This sets pr to loaded or emulated so functions in this file can
  51    tell that /etc/passwd has been read in or will be emulated. */
  52 void
  53 pwdgrp::read_passwd ()
  54 {
  55   load (L"\\etc\\passwd");
  56
  57   char strbuf[128] = "";
  58   bool searchentry = true;
  59   struct passwd *pw;
  60   /* must be static */
  61   static char NO_COPY pretty_ls[] = "????????:*:-1:-1:";
  62
  63   add_line (pretty_ls);
  64   cygsid tu = cygheap->user.sid ();
  65   tu.string (strbuf);
  66   if (!user_shared->cb || myself->uid == ILLEGAL_UID)
  67     searchentry = !internal_getpwsid (tu);
  68   if (searchentry
  69       && (!(pw = internal_getpwnam (cygheap->user.name ()))
  70           || !user_shared->cb
  71           || (myself->uid != ILLEGAL_UID
  72               && myself->uid != (__uid32_t) pw->pw_uid
  73               && !internal_getpwuid (myself->uid))))
  74     {
  75       static char linebuf[1024];        // must be static and
  76                                         // should not be NO_COPY
  77       snprintf (linebuf, sizeof (linebuf), "%s:*:%lu:%lu:,%s:%s:/bin/sh",
  78                 cygheap->user.name (),
  79                 (!user_shared->cb || myself->uid == ILLEGAL_UID)
  80                 ? UNKNOWN_UID : myself->uid,
  81                 !user_shared->cb ? UNKNOWN_GID : myself->gid,
  82                 strbuf, getenv ("HOME") ?: "");
  83       debug_printf ("Completing /etc/passwd: %s", linebuf);
  84       add_line (linebuf);
  85     }
  86 }
  87
  88 struct passwd *
  89 internal_getpwsid (cygpsid &sid)
  90 {
  91   struct passwd *pw;
  92   char *ptr1, *ptr2, *endptr;
  93   char sid_string[128] = {0,','};
  94
  95   pr.refresh (false);
  96
  97   if (sid.string (sid_string + 2))
  98     {
  99       endptr = strchr (sid_string + 2, 0) - 1;
 100       for (int i = 0; i < pr.curr_lines; i++)
 101         if ((pw = passwd_buf + i)->pw_dir > pw->pw_gecos + 8)
 102           for (ptr1 = endptr, ptr2 = pw->pw_dir - 2;
 103                *ptr1 == *ptr2; ptr2--)
 104             if (!*--ptr1)
 105               return pw;
 106     }
 107   return NULL;
 108 }
 109
 110 struct passwd *
 111 internal_getpwuid (__uid32_t uid, bool check)
 112 {
 113   pr.refresh (check);
 114
 115   for (int i = 0; i < pr.curr_lines; i++)
 116     if (uid == (__uid32_t) passwd_buf[i].pw_uid)
 117       return passwd_buf + i;
 118   return NULL;
 119 }
 120
 121 struct passwd *
 122 internal_getpwnam (const char *name, bool check)
 123 {
 124   pr.refresh (check);
 125
 126   for (int i = 0; i < pr.curr_lines; i++)
 127     /* on Windows NT user names are case-insensitive */
 128     if (strcasematch (name, passwd_buf[i].pw_name))
 129       return passwd_buf + i;
 130   return NULL;
 131 }
 132
 133
 134 extern "C" struct passwd *
 135 getpwuid32 (__uid32_t uid)
 136 {
 137   struct passwd *temppw = internal_getpwuid (uid, true);
 138   pthread_testcancel ();
 139   return temppw;
 140 }
 141
 142 extern "C" struct passwd *
 143 getpwuid (__uid16_t uid)
 144 {
 145   return getpwuid32 (uid16touid32 (uid));
 146 }
 147
 148 extern "C" int
 149 getpwuid_r32 (__uid32_t uid, struct passwd *pwd, char *buffer, size_t bufsize, struct passwd **result)
 150 {
 151   *result = NULL;
 152
 153   if (!pwd || !buffer)
 154     return ERANGE;
 155
 156   struct passwd *temppw = internal_getpwuid (uid, true);
 157   pthread_testcancel ();
 158   if (!temppw)
 159     return 0;
 160
 161   /* check needed buffer size. */
 162   size_t needsize = strlen (temppw->pw_name) + strlen (temppw->pw_passwd)
 163                     + strlen (temppw->pw_gecos) + strlen (temppw->pw_dir)
 164                     + strlen (temppw->pw_shell) + 5;
 165   if (needsize > bufsize)
 166     return ERANGE;
 167
 168   /* make a copy of temppw */
 169   *result = pwd;
 170   pwd->pw_uid = temppw->pw_uid;
 171   pwd->pw_gid = temppw->pw_gid;
 172   buffer = stpcpy (pwd->pw_name = buffer, temppw->pw_name);
 173   buffer = stpcpy (pwd->pw_passwd = buffer + 1, temppw->pw_passwd);
 174   buffer = stpcpy (pwd->pw_gecos = buffer + 1, temppw->pw_gecos);
 175   buffer = stpcpy (pwd->pw_dir = buffer + 1, temppw->pw_dir);
 176   stpcpy (pwd->pw_shell = buffer + 1, temppw->pw_shell);
 177   pwd->pw_comment = NULL;
 178   return 0;
 179 }
 180
 181 extern "C" int
 182 getpwuid_r (__uid16_t uid, struct passwd *pwd, char *buffer, size_t bufsize, struct passwd **result)
 183 {
 184   return getpwuid_r32 (uid16touid32 (uid), pwd, buffer, bufsize, result);
 185 }
 186
 187 extern "C" struct passwd *
 188 getpwnam (const char *name)
 189 {
 190   struct passwd *temppw = internal_getpwnam (name, true);
 191   pthread_testcancel ();
 192   return temppw;
 193 }
 194
 195
 196 /* the max size buffer we can expect to
 197  * use is returned via sysconf with _SC_GETPW_R_SIZE_MAX.
 198  * This may need updating! - Rob Collins April 2001.
 199  */
 200 extern "C" int
 201 getpwnam_r (const char *nam, struct passwd *pwd, char *buffer, size_t bufsize, struct passwd **result)
 202 {
 203   *result = NULL;
 204
 205   if (!pwd || !buffer || !nam)
 206     return ERANGE;
 207
 208   struct passwd *temppw = internal_getpwnam (nam, true);
 209   pthread_testcancel ();
 210
 211   if (!temppw)
 212     return 0;
 213
 214   /* check needed buffer size. */
 215   size_t needsize = strlen (temppw->pw_name) + strlen (temppw->pw_passwd)
 216                     + strlen (temppw->pw_gecos) + strlen (temppw->pw_dir)
 217                     + strlen (temppw->pw_shell) + 5;
 218   if (needsize > bufsize)
 219     return ERANGE;
 220
 221   /* make a copy of temppw */
 222   *result = pwd;
 223   pwd->pw_uid = temppw->pw_uid;
 224   pwd->pw_gid = temppw->pw_gid;
 225   buffer = stpcpy (pwd->pw_name = buffer, temppw->pw_name);
 226   buffer = stpcpy (pwd->pw_passwd = buffer + 1, temppw->pw_passwd);
 227   buffer = stpcpy (pwd->pw_gecos = buffer + 1, temppw->pw_gecos);
 228   buffer = stpcpy (pwd->pw_dir = buffer + 1, temppw->pw_dir);
 229   stpcpy (pwd->pw_shell = buffer + 1, temppw->pw_shell);
 230   pwd->pw_comment = NULL;
 231   return 0;
 232 }
 233
 234 extern "C" struct passwd *
 235 getpwent (void)
 236 {
 237   if (_my_tls.locals.pw_pos == 0)
 238     pr.refresh (true);
 239   if (_my_tls.locals.pw_pos < pr.curr_lines)
 240     return passwd_buf + _my_tls.locals.pw_pos++;
 241
 242   return NULL;
 243 }
 244
 245 extern "C" struct passwd *
 246 getpwduid (__uid16_t)
 247 {
 248   return NULL;
 249 }
 250
 251 extern "C" void
 252 setpwent (void)
 253 {
 254   _my_tls.locals.pw_pos = 0;
 255 }
 256
 257 extern "C" void
 258 endpwent (void)
 259 {
 260   _my_tls.locals.pw_pos = 0;
 261 }
 262
 263 extern "C" int
 264 setpassent ()
 265 {
 266   return 0;
 267 }
 268
 269 extern "C" char *
 270 getpass (const char * prompt)
 271 {
 272   char *pass = _my_tls.locals.pass;
 273   struct termios ti, newti;
 274
 275   cygheap_fdget fhstdin (0);
 276
 277   if (fhstdin < 0)
 278     pass[0] = '\0';
 279   else
 280     {
 281       fhstdin->tcgetattr (&ti);
 282       newti = ti;
 283       newti.c_lflag &= ~ECHO;
 284       fhstdin->tcsetattr (TCSANOW, &newti);
 285       fputs (prompt, stderr);
 286       fgets (pass, _PASSWORD_LEN, stdin);
 287       fprintf (stderr, "\n");
 288       for (int i=0; pass[i]; i++)
 289         if (pass[i] == '\r' || pass[i] == '\n')
 290           pass[i] = '\0';
 291       fhstdin->tcsetattr (TCSANOW, &ti);
 292     }
 293   return pass;
 294 }